關於 via重複

penny190 · 发表于 2016-4-21 13:56

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

x

想請問各位大大  ~~
剛接到一張公版 ~~  結果一看昏頭
對方在很多VIA上重複打孔  ~~  造成一堆錯誤
改圖也很麻煩
所以想請問各位大大  ~~  有沒有辦法一次刪除 ~~ 同個位置的重複VIA

謝謝

deargds · 发表于 2016-4-21 15:17

写了一个简单的删除程序，只适用坐标完全相等的情况，下载附件在Allegro中加载后执行rdv命令即可。

axlCmdRegister( "rdv" 'EDA365_RemoveDupVia ?cmdType "interactive")
defun( EDA365_RemoveDupVia ()
prog((lVias lDupVias ViaTable)
axlClearSelSet()
axlSetFindFilter( ?enabled (list "noall" "invisible" "vias") ?onButtons (list "vias"))
lVias = axlGetSelSet(axlAddSelectAll())
axlClearSelSet()
lDupVias = nil
ViaTable = makeTable("DupVia")
foreach(v lVias
if(ViaTable[v->xy] == 'unbound then
ViaTable[v->xy] = t
else
lDupVias = cons(v lDupVias)
)
)
if(lDupVias then
axlMsgPut("%d duplicate Vias Found." length(lDupVias))
when(axlUIYesNo("Click Yes to confirm Via deletion. ?")
axlDBCloak('axlDeleteObject(lDupVias))
)
else
axlUIConfirm("No Duplicate Vias Found")
)
)
)
;deargds
;www.eda365.com

复制代码

EDA365_RemoveDupVia.zip (590 Bytes, 下载次数: 9)

penny190 · 发表于 2016-4-21 16:13

deargds 发表于 2016-4-21 15:17
写了一个简单的删除程序，只适用坐标完全相等的情况，下载附件在Allegro中加载后执行rdv命令即可。

真的非常感謝大大
可以了
真的太感謝了
刪到眼睛都快脫窗了

mentorkk · 发表于 2016-11-15 04:23

感謝了

lovesweet33 · 发表于 2016-12-22 22:41

谢谢分享。。。

mentorkk · 发表于 2016-12-23 05:00

谢谢分享。。。

lovesweet33 · 发表于 2016-12-27 23:09

谢谢分享

wcjcn · 发表于 2017-6-8 15:18

谢谢啦。。。。。

badkai1988 · 发表于 2021-11-9 16:38

真的可以使用，好用推推～～～

myhome43 · 发表于 2021-11-24 13:49

學習學習學習學習學習學習

Freese · 发表于 2022-3-24 12:23

先下載看看，現在非常需要這個功能
謝謝

davidxp · 发表于 2024-6-13 13:55

下載試試感謝分享

susan888 · 发表于 2024-6-25 16:23

学习学习学习

SNOW282008 · 发表于 2025-4-11 15:46

很好用，不用下载扣贡献，非常感谢无私分享！

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

推荐内容 /1