我是一个LISP的小白学习者,刚刚开始学习, 自已写了一个画三角形的LISP, 但是在A0UTOCAD中加载时提示,加载成功,但是输入的列表有缺陷。 请各位高手大大帮助给看下这段代码那里不对,不胜感激! (defun: c: sjx() (setq p1 (getpoint "/n enter p1") (setq p2 (getpoint "/n enter p2") (setq p3 (getpoint "/n enter p3") (command "line"P1 P2 P3"C") ) 非常感谢! |