说明: (defun c:22 (/ YC R FC FH A RA B EB REB C EC REC RLA RLB FDA FDB FDC FDD RLD RLDA FRLDA FRLDD FFD RREB DEL XD DEL) (ETEND 300) (if (> UF_estimate 0) (progn (setq YC (getpoint "输入圆心:")) (setq R (getdist "\n 输入半径:")) (setq FC (getdist "\n 输入弧长:"))
<zhxhzhxh> 上传 | 大小:4kb