有大佬能帮忙写给走线＋shielding的脚本吗

wangxu19950704 · 发表于 2024-9-3 18:05:21

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

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

x

如题

Looney36 · 发表于 2024-9-4 09:17:45

我有一个给横线或竖线加屏蔽线的脚本，间距和屏蔽线宽可调

wangxu19950704 · 发表于 2024-9-4 15:52:20

Looney36 发表于 2024-9-4 09:17
我有一个给横线或竖线加屏蔽线的脚本，间距和屏蔽线宽可调

能分享一下吗

Looney36 · 发表于 2024-9-5 09:57:40

wangxu19950704 发表于 2024-9-4 15:52
能分享一下吗

可以积分买

暴躁的兔子 · 发表于 2024-11-20 16:38:53

蹲蹲蹲

abc1978 · 发表于 2024-11-26 16:02:49

同求

galizhangjiali · 发表于 2024-11-26 17:20:07

hiSetBindKey("Layout" "Ctrl Shift<Key>S" "addShielding")

procedure(addShielding()
let((cvId objs obj space width_shield objLayer layer1 layer2
   layer_shield1 layer_shieldPath layer_shieldPolygon)
cvId = geGetEditCellView()
objs = geGetSelSet()
geDeselectAllFig()
space = 0.28
width_shield = 0.28
foreach(obj objs
   if(obj~>isShape then
      objLayer = nth(0 obj~>lpp)
      layer1 = dbLayerSize(cvId objLayer list(obj) space)
      layer2 = dbLayerSize(cvId objLayer list(obj) width_shield+space)
      layer_shieldPolygon = dbLayerAndNot(cvId objLayer layer2 layer1)
      layer_shield1 = layer_shieldPolygon
      dbDeleteObject(car(layer1))
      dbDeleteObject(car(layer2))
      if(layer_shieldPath = leConvertPolygonToPath(car(layer_shield1)) then
         geSelectObject(layer_shieldPath)
      else geSelectObject(car(layer_shieldPolygon))
      );if
   );if
   );foreach
);let
);proc

欢迎大家一起优化

galizhangjiali · 发表于 2024-11-26 17:24:41

galizhangjiali 发表于 2024-11-26 17:20
hiSetBindKey("Layout" "Ctrl ShiftS" "addShielding")

procedure(addShielding()

这个加完shielding ，两头可能根据需要cut metal，不然应该会short

[求助] 有大佬能帮忙写给走线＋shielding的脚本吗

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

站长推荐 /1