我想知道你是否知道如何复制[多个]。我很惊讶你们到目前为止都没有提到这件事。
我有自己的lisp,我对其进行了修改以使其工作(结果有些不满意):
见下文:
(defun c:CX ()
(setq ss (ssget))
(command "._copy" ss "" "M" pause ".yz" "@" pause)
(setq ss nil);; add this line to clean the selection
(princ)
)
(defun c:CY ()
(setq ss (ssget))
(command "._copy" ss "" "M" pause ".xz" "@" pause)
(setq ss nil);; add this line to clean the selection
(princ)
)
(prompt "\n:: Lock_Copy_X&Y.lsp loaded ::") (princ)
(prompt "\n:: Invoke by typing 'CX' (Copy on X-axis) or 'CY' (Copy on Y-axis) ::") (princ)这会锁定第一个副本,但不会锁定之后的副本。如有任何帮助,将不胜感激。谢谢
页:
1
[2]