change程序无法运行？源码内详

arthwon

(DEFUN C:RR ( / ss)
(PRINC "\n选择要转换的文字 ")  
(SETQ    SS (SSGET (LIST        
                       '(0 . "TEXT")        
                       '(7 . "Standard")          )       )  )
(command "change" ss "" "" "TSSD_Rein" "300" "")
(prin1))

以上程序运行错误信息是：

二维点无效。
; 错误: *error* 函数中出错函数被取消
指定新的文字插入点 <不修改>:

此时change程序尚未退出运行，按空格键可以继续下一步 操 作。
奇怪的是，为什么 “” 代替不了空格键？
请各位指点，谢谢。

if

(command "change" ss "" "" "" "TSSD_Rein" "300" "")
少一个空格--------第一个空格-----结束选集

arthwon

感谢楼上的，感激涕零啊。那么迟回复，应该是还没睡吧？要注意身体啊。

实在菜啊，原来还是缺了一个确认键而已。我以为跟实际运行的步骤相同就可以了。实际运行时确实只要两个空格确认键即可。
我接触LISP语言不多，昨天调试程序，不知道问题出在哪里，拼命找资料，看“AutoLISP编程大全”“函数参考”等想找出相关出错控制方案，未果。

crazylsp

呵呵，调试是很令人辛苦郁闷的。