我写了个代码，大师们帮看看怎么能继续使用上次我用的选择集

lisp_beginner · 发表于 2016-9-26 13:30:42

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

大家好，我写了个代码：

(defun c:mmove (/ sel1)
  (setq sel1 (ssget '((0 . "circle"))))
  (command "move"
   sel1
   ""
  )
  (princ)
)

我选择了圆，程序可以把他们移走，现在问题是如果我想这些选择的圆不用我再选择，其他的程序直接选择他们，怎么做？

WhoCanSay · 发表于 2016-9-26 13:44:02

ssget "_P"

Lisphk · 发表于 2016-9-26 14:08:51

也可以这样：
(defun c:mmove (/ sel1)
  (setq sel1 (ssget '((0 . "circle"))))
  (command "move"
         sel1
         ""
  )
  (sssetfirst nil ss)
  (princ)
)

aeo · 发表于 2016-9-26 16:47:43

(defun c:mmove (/ ) ....

lisp_beginner · 发表于 2016-9-26 17:18:28

谢谢楼主大大的热心帮助！！

cable2004 · 发表于 2016-9-28 07:29:46

kkkkkkkkkkkkkkkk

cable2004 · 发表于 2016-9-28 07:30:52

kkkkkkkkkkkkkkkk

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

[求助] 我写了个代码，大师们帮看看怎么能继续使用上次我用的选择集

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。