lisp调用COMMAND命令时遇到连续输入怎么处理?比如说偏移命令和复制命令中"m"多次复制,我是用repeat一次一次重复调用COMMAND命令,
(repeat nn
(setq ss1 (entlast))
(COMMAND "OFFSET" dd ss1 PT0 ^C^C)
)
;
(repeat ssl
(setq pt1 (nth 0 pt));pt为点列表
(COMMAND "copy" ss "" pt0 pt1)
)
请教有没有什么可以在lisp中一次调用COMMAND然后连续输入?
如上(COMMAND "copy" ss "" pt0 pt1)改为(COMMAND "copy" ss "" "m" pt0 pt1)怎么把pt点列表输入命令中! |