老大拜托帮忙解决下我请教的这个选择镜像后图元的问题，这个问题对你来说肯定很简单，恳请帮忙解决下， ...
镜像之后不能动，理论上说生成新图元的都适用，阵列 拷贝什么的
(defun c:tt5 (/ s0 en ss);拷贝、镜像后新图元选集
(command"u")
(setq s0 (entlast))
(command "REDO" )
(setq en (entnext s0))
(setq ss (ssadd en))
(while (setq en (entnext en)) (ssadd en ss))
(sssetfirst nil ss)
(princ)
) start4444 发表于 2020-9-5 22:23
镜像之后不能动，理论上说生成新图元的都适用，阵列 拷贝什么的
(defun c:tt5 (/ s0 en ss);拷贝、镜像 ...
老大我这样简单拼凑了下达不到效果，请指点迷津！!:loveliness:
(defun c:tt(/ s0 en ss);拷贝、镜像后新图元
(command "mirror" )
(setq s0 (entlast))
(command "REDO" )
(setq en (entnext s0))
(setq ss (ssadd en))
(while (setq en (entnext en)) (ssadd en ss))
(sssetfirst nil ss)
(command "select" ss "")
(princ)) wangxf888 发表于 2020-9-6 00:52
老大我这样简单拼凑了下达不到效果，请指点迷津！!
(defun c:tt(/ s0 en ss);拷贝、镜 ...
我那个是单独命令，没必要拼凑的，镜像之后运行那个代码就选定新图元了，你爱拷贝拷贝 爱移动移动的 本帖最后由 wangxf888 于 2020-9-6 01:25 编辑
这么晚了还回复我的问题 感谢 再次感谢！ 我的意思是把这个代码跟镜像命令结合起来，我再运行接下来的移动拷贝等命令可以直接+P，来选择镜像后的图元。您这个代码，我运行了下，没毛病，只是运行下一个命令之前我要运行下这个代码，多了一步，感觉还是有点麻烦，能不能帮忙把镜像命令加进去，最后加一句(command "select" ss "")我运行下个命令选择图元的时候直接点下P，就可以了，这样方便些！拜托处理下，先谢谢了！！ 就是要这个效果，非常感谢，因为我用的镜像命令比较频繁，所以想到用这个代码，完美！！再次感谢这个点了还热心的回复！再次感谢！！！
页:
1
[2]