未知命令

madbull

(defun c:w11 ( / old )
(setq old (getvar "osmode"))
(setvar "osmode" 0)
(command "vpoint" "0,0,0" "" "UCS" "G" "T" "" "")
(setvar "osmode" old)
(princ)
)
被人帮我编的LSP,变换试图用.可是总提示"未知命令".为什么?
我用的是R2002.

madbull

(DEFUN C:TRR (/ GP) (SETQ GP (SSGET)) (COMMAND "TRIM" GP "" "F" PAUSE PAUSE "" ""))
按右键重复命令时,也被提示为"未知命令".
请指教.

meflying

一般是(command ..."")的问题，将最后的""去掉，如果还有，就再去掉一个，直到正确为止[br]

madbull

将最后的""去掉,第一次按右键，好使，不提示"未知命令"。。
但如果第一次按右键，不执行，再按一次右键，则提示"未知命令"。
再去掉一个"，加载时即报错。

龙龙仔

(defun c:w11 ( / old )
(setq old (getvar "osmode"))
(setvar "osmode" 0)
(command "vpoint" '(0 0 0) "UCS" "G" "T")
(setvar "osmode" old)
(princ)
)

madbull

问题终于解决了。
谢谢龙龙仔！！