[求助]急！！关于lisp的问题！！！

wpizi · 发表于 2004-3-9 20:15:00

请教各位高手！怎样用lisp中的command执行偏移命令！！！！

meflying · 发表于 2004-3-9 21:11:00

(command "_.offset" pause pause pause "")

wpizi · 发表于 2004-3-10 09:44:00

多谢！！！请问这样将直线偏移30错在哪里 (defun c:cc()
(setq pt1 (getpoint "\n 一点"))
(setq pt2 (getpoint "\n 一点"))
(setq pt3 (getpoint "\n一点"))
(command "line" pt1 pt2 "")
(command "offset" 30 "" (entlast) pt3 "")
(prin1)
)

f5612140 · 发表于 2004-3-10 10:06:00

(command "offset" 30 (entlast) pt3 "")

30後多一個""

wpizi · 发表于 2004-3-10 11:24:00

多谢啦！！！！！！！

账号		自动登录	找回密码
密码			注册