捕捉的设置

fcut2004

请问如何将下面这段代码修改为：复制前为插入点捕捉，复制完成后修改为后面那种捕捉方式。谢谢。
(DEFUN C:CZ ()
(command "osnap" "INS" )
(COMMAND "COPY"  (ssget) "")
(command "osnap" ",END,MID,INT,EXT,APP,CEN,NOD,QUA,PER,TAN,NEA,PAR")
(PRINC))

Andyhon

(DEFUN C:CZ ()
   (SetVar "OsMode" 64 )
   (COMMAND "COPY"  (ssget) "")
   (while (= (logand (getvar "CmdActive") 1) 1) (command pause))
   ;; (command "osnap" ",END,MID,INT,EXT,APP,CEN,NOD,QUA,PER,TAN,NEA,PAR")
   (SetVar "OsMode" (+ 1 2 ....))  ; Ref OsMode 系统变量  / http://bbs.mjtd.com/thread-95818-1-1.html

   (PRINC)
)

fcut2004

上面的代码只能复制一次，要怎么修改才能复制多次呢？

preone

Andyhon 发表于 2012-8-1 21:33
(DEFUN C:CZ ()
   (SetVar "OsMode" 64 )
   (COMMAND "COPY"  (ssget) "")

学习了~~

Andyhon

...复制多次...
(COMMAND "COPY"  (ssget) "" "M")

LIULISHENG

学习了