[求助]请教大虾：我在用lisp编程时调用（command "line")怎样才能避免

我爱lisp

我在用lisp编程时调用（command "line")，但线化完程序就结束了。怎样才能避免结束程序，我主要是想利用命令可以连续自由的画线，如果用getpoint则不好把握画线位置，因为要等两点输完才看得见线，
有没有更好的解决方案啊？

meflying

用getpoint也可以,
(setq pt1 (getpoint "Enter the first point:"))
(setq pt2 (getpoint pt1 "Enter the second point:"))
这样你在输入第二点之前可以看到拉线橡皮筋

flyingant

[此贴子已经被作者于2003-5-17 10:59:15编辑过]

我爱lisp

陈伯雄