快乐小子春天 发表于 2013-11-1 09:23:11

简化后的画圆

(defun c:tt()
   (setq A (getpoint "\n指定一个圆心:"))
   (setq B (getDist "\n写出半径:"))
   (command "circle" A B )；；；把变量赋值给圆 A 圆心   B 圆的半径
   (princ)
)

purpletyx2009 发表于 2013-11-8 12:40:14

这个c有区别么

快乐小子春天 发表于 2013-11-8 14:45:34

没有
页: [1]
查看完整版本: 简化后的画圆