空中彩棉 16:16:59
;下面是一个在两点间画线的程序,加载时提示讲法错误。请高手指点。
(defun c: line1()
(setq p1(getpoint "
enter point first of line:"))
(setq p2(getpoint "
enter point second of line:"))
(command "line" p1 p2)
)
[pzweng]天蝎 16:20:01
(defun C:line1 ()
(setq p1 (getpoint "
enter point first of line:"))
(setq p2 (getpoint "
enter point second of line:"))
(command "line" p1 p2 "")
)
全角与半角输入法 |