hildebran 发表于 2022-7-6 08:25:37

方块秤和旋转塔帮助

大家好,我使用AUtoCAD MEP并定期使用“设备”。我们通常将顾问的电气模块转换为设备,并做我们所做的事情,但在这个项目中,一半的顾问模块是镜像的。当转换为MEP设备时会出现问题。创建的设备与原始块旋转180度。这意味着需要手动旋转20种不同类型的大约1200台设备。啊!
 
我在下面看到了这条线索,这是我找到的最接近解决方案的线索。
 
http://www.cadtutor.net/forum/showthread.php?54913-围绕各自的原点旋转多个块
 
我不知道Lisp程序除了一个小的调整在这里和那里。我希望有人有一个Lisp程序的例行克洛伊做以下。
 
选择具有负“x”比例的块
 
获取旋转值“RO”
获取比例值“SC”
 
虽然有负“x”比例的块
 
反转比例
相对于原始旋转值“RO”旋转180度
 
谢谢你的时间!

Lee Mac 发表于 2022-7-6 08:42:13

也许 吧:
 
(defun c:测试(/e i s)(if(setq s(ssget“_X”)((0。“插入”)(-4。“

hildebran 发表于 2022-7-6 08:57:02

李,这是一个奇迹!
 
我试了几次,除了我希望看到的,什么也没看到。
 
非常感谢!

monkey7 发表于 2022-7-6 09:08:06

该死的,比我快。使用了我需要的十分之一的线路。
 
*在角落里生气,分析上面的代码*

hildebran 发表于 2022-7-6 09:22:42

我很感激Monkey7!
 
他花了7分钟回复我的帖子,所以他显然没有给任何人机会!

Lee Mac 发表于 2022-7-6 09:31:33

对不起,伙计们,我练习太多了
 
很高兴你也这么想
页: [1]
查看完整版本: 方块秤和旋转塔帮助