[求助]急！请教

dadaodui

我刚学autolisp编程，下面是我试编的一个，运行后老是说“参数太少“，可我觉得这段代码没错啊，请教各位大侠问题到底在什么地方？ (defun c:gangjin (/a b)
(setq a (getpoint"请\n输入第一点:")) (setq b (getpoint"请\n输入第二点:")) (command "line" a b "")

)

CADghost

(defun c:gangjin (/ a b)
(setq a (getpoint"请\n输入第一点:")) (setq b (getpoint"请\n输入第二点:")) (command "line" a b "")

) 看看第一行你设的变量，在a与\之间加一个空格就好了！

xyp1964

最好增加拖拽显示： (defun c:gangjin (/ a b)
(setq a (getpoint"\n\t请输入第一点:"))
(setq b (getpoint a "\n\t请输入第二点:"))
(command "line" a b "")
)

dadaodui

谢谢各位大侠，还是不行，可我改成下边这样就行了，难道变量不能设？到底是怎么回事？ (defun c:gangjin ()
(setq a (getpoint"请\n输入第一点:")) (setq b (getpoint"请\n输入第二点:")) (command "line" a b "")

)

spring

dadaodui发表于2004-8-9 10:37:00谢谢各位大侠，还是不行，可我改成下边这样就行了，难道变量不能设？到底是怎么回事？ (defun c:gangjin () (setq a (getpoint\"请\n输入第一点:\")) ...

看 2 楼的

dadaodui

还是不行

meflying

请把你改的不行的放上来