怎样中断LISP程序

lzy9788 · 发表于 2004-3-9 10:02:00

请教各位高手：
我在执行LISP程序时想从中间中断退出，有什么
函数能用了，EXIT,QUIT行不，我试了下好像不能。
（例像画线那样空格键就退出了)
因为我现在有个程序在取点时我按空格可以退出，但
总是提示点错误，我也就是不想出现这样的提示。
请高手指点我的菜鸟问题。

alin · 发表于 2004-3-9 10:27:00

Upload your codes

f5612140 · 发表于 2004-3-9 12:05:00

增加
(if (/= ss nil)
...
有選到物件或有值才做後面的工作

meflying · 发表于 2004-3-9 12:33:00

用exit退出是可以的，如果你不想出现错误提示，要自己定义出错处理函数*error*

lzy9788 · 发表于 2004-3-9 15:06:00

好的，我试下看

yxp · 发表于 2004-3-9 17:28:00

用(command)也可以.

meflying · 发表于 2004-3-9 17:31:00

(command)只是取消正在执行的命令，而不会退出程序

yxp · 发表于 2004-3-9 17:34:00

收到，谢谢。

yxp · 发表于 2004-3-9 17:42:00

遇到这种情况，我一般用多层嵌套的IF语句，加上子程序来完成，一般不用强行退出。若需要，自定义出错处理函数*error*是最好的办法。

lzy9788 · 发表于 2004-3-9 17:45:00

(setq pt1 (getpoint "\n输入第一标注点："))
(setq pt2 (getpoint pt1 "输入第二标注点："))
(ww_hi )
我在输入第一点时按空格，（想退出该程序）怎么样做了（不让提示错误信息）
（ww_hi)这个函数已定义的。