command 中的tcircle命令不认识

mikewolf2k

做了个lisp，需要调用express中的文字加框tcircle命令
此命令用图标或者手工输入tcircle都增长，但是如果加在command命令后就说不认识了，各位知道为什么么？谢谢

Command: tcircle
Select TEXT, MTEXT or ATTDEF objects...
Select objects: *Cancel*
Command:
Command: (command "tcircle")
tcircle Unknown command "TCIRCLE".  Press F1 for help.

vormittag

1. (c:tcircle)

复制代码

即可

mikewolf2k

vormittag 发表于 2012-12-4 09:35
即可

请问具体加在哪个位置？以下是我的代码：
;  (c:tcircle)
(defun c:test ()
;  (c:tcircle)
  (command "tcircle" "0.5" "R" "c" "b")
  (command "revcloud" "o" "l" "")
  )

加了之后，的确是可以认识这个命令了，但是后面的那些参数就无效了，还得一个个输入，再后面的revcloud后面的参数认识。请问有办法解决么，让tcircle后面的参数都执行下去。
另外，为什么这个tcircle要加这行才能认识？别的acad命令都直接command后面就可以了，而且这个tcircle也不是不认识啊，手工输入都可以的？有没有其它办法，因为一些原因，在这段lsp中不方便加这一行？多谢。

mikewolf2k

刚才仔细检查了下，加了那句之后，其实执行的是c:tcircle, command命令仍然是不认tcircle的。