怎么实现仿CAD2004copy?

puzb2001 · 发表于 2013-7-8 09:48

今天刚开始升级用CAD2006，CAD2006默认是多重考贝，能不能实现仿2004的考贝，即选参数M才能实现多重考贝？谢谢各位

kwok · 发表于 2013-7-8 10:00

试试copy后输入"o"设一下默认设置，改成"s"单一

自贡黄明儒 · 发表于 2013-7-8 11:02

想复古呀？

puzb2001 · 发表于 2013-7-8 11:16

谢谢kwok 兄，自贡黄明儒兄我比较守旧，呵呵

669423907 · 发表于 2013-7-8 19:15

用co和cp啊

puzb2001 · 发表于 2013-7-9 09:34

(defun C:c ()
   (setvar "cmdecho" 0)
   (setq css (ssget)) (command "copy" css "o" "s")
   (setq css nil) (setvar "cmdecho" 1)
   (prin1)  )

kwok 兄,我按照您的提示，没有做成功，请帮我看看是什么原因，肯请路过的大侠也出个手，谢谢

kwok · 发表于 2013-7-9 10:36

(setq css (ssget)) (command "copy" css "o" "s")
=> (setq css (ssget)) (command "copy" css "" "o" "s")

puzb2001 · 发表于 2013-7-9 10:41

可以了，谢谢kwok 兄

caoyin · 发表于 2013-7-9 12:16

不用这么麻烦,这样就可以
(defun c:CO ()
(command "_.copy")
(princ)
)

puzb2001 · 发表于 2013-7-9 14:30

caoyin 兄，神奇！

账号		自动登录	找回密码
密码			注册

[讨论] 怎么实现仿CAD2004copy?