请大家帮助，谢谢！

maomao2004

我想将下面的四个函数用一个总的函数对它进行调用，由于初学所以能力有限，希望得到大家的帮助！主要是command命令出错后怎么让他再次进行下一个函数的调用，盼回复！ (defun ct()
(setvar "cmdecho" 1)
(command "circle" "0 0" 2);正常输入!
(command "erase" "all" "");判断是否完成命令，并擦除所画circle!
(princ"\n")
(princ "数值输入正常");显示输入正常
(princ)
) (defun ct10()
(princ"\n测试getpoint后加字符串")
(princ"\n")
(command "circle" "abc" 2)
) (defun ct30()
(princ"\n测试getpoint后加序列")
(princ"\n")
(command "circle" "(0,0)" 2)
) (defun ct51()
(princ"\n测试getpoint后输入空值")
(princ"\n")
(command "circle" "" 2)
)

meflying

你跟她是同学还是同一个人？？？ http://bbs.mjtd.com/forum.php?mod=viewthread&tid=33399 调用： (defun c:test() (ct) (ct10) (ct30) (ct51));直接使用命令TEST就可以了 一个command出错后，就退出程序了（执行*error*函数后退出），不会再执行后面的代码。。。而且你的那个正常输入也是有错的，你再仔细看看

maomao2004

谢谢meflying大哥 不好意思！应该是"0,0"，呵呵 我知道这样可以，可是我不明白怎样让它继续向下走，到了中断那不就不能向下执行了吗？还请赐教！

maomao2004

还有我和她是同学，呵呵