878276777 发表于 2012-3-1 10:15

刚学CAD二次开发，请各位高手帮忙看一下一下的原代码有什么问题，加载时提示错误

本帖最后由 878276777 于 2012-3-1 14:25 编辑

;;光标旋转。
;;十进制输入任意角度。
;;命令：zhuan
(defun c:zhuan (/ fw)
       (setg fw (getreal "\n 请输入光标旋转十进制角度:"))
       (setvar "snapang" (* fw(/ pi 180)))
       (prinl)

(prompt " \n<< c:zhuan >> 设计者 XXX " )
(prinl)

youyi24 发表于 2012-3-1 16:05

呀，这个还没研究的那么深奥
页: [1]
查看完整版本: 刚学CAD二次开发，请各位高手帮忙看一下一下的原代码有什么问题，加载时提示错误