[求助]菜鸟请大家帮忙看看

ngl_123

我想用lisp画一个表格   

自己写了一小段代码  可是加载进去后总是出错   请帮忙看看是怎么回事   谢谢大家

(defun c:zbbg()
       (setq pt  (getpoint"\n请选择成果表写入点:"))
       (setq p1(polar pt 0 20)
       (setq p2(polar pt 0 44))
       (setq p3(polar pt 0 83))
       (setq p4(polar pt 0 122))
       (setq p5(polar pt 0 147))
       (setq p6(polar pt 0 172))
       (setq p7(polar pt (/ pi 2) 220))
       (setq p8(polar p6 (/ pi 2) 220))
       (command "line" p1 p6 "")
       (command "line" p1 p7 "")
       (command "line" p7 p8 "")
       (command "line" p6 p8 "")
);程序结束

jxlsp

(setq p1(polar pt 0 20)
少一括号

caoyin

还要关闭osmode

ngl_123

知道了  真的是太感谢了