spline????

springsky

(defun c:ss(/ cm tc os ot ss )
(setq cm (getvar "cmdecho")
tc(getvar "clayer")
os(getvar "osmode")
ot(getvar "orthomode")
)
(command "osnap" "off")
(command "ortho" "off")
(setvar "cmdecho" 0)
;;(setq pt(getpoint ""))
(command "spline" (getpoint))
(setq ss(ssget "l"))
(tl ss)
(setvar "cmdecho" cm)
(setvar "osmode" os)
(setvar "orthomode" ot)
) 程序中我想绘完一条spline线，之后在进行其他的语句，可是我写的程序总是运行完后才能绘制spline线，不知道有没有办法实现先绘完spline线，然后再创建选择集？

meflying

一个点是汇不成一条SPLINE的，是程序出错了


而且SPLINE画了最后一个点后，还要诺干回车，才能结束此命令，你这样命令没结束，就想做后面的事情，肯定不行，所以是程序出错退出了，而不是先创建选择集再画直线（程序退出，但命令没有退出，所以最后还让你继续画SPLINE）


...


(command "spline" (getpoint) (getpoint) (getpoint) "" "" "")


...