[原创]根据ECS里面的CLASS/BUS来自动创建PINPAIR以及对应的MATCHGROUP

hifiout · 发表于 2022-3-16 15:12

Good Info!

18273075097 · 发表于 2022-3-22 16:24

贡献不够怎么办呀

cjh168 · 发表于 2022-3-26 22:20

谢谢楼主

mofise007 · 发表于 2022-3-27 23:49

111111111111

zgtsang · 发表于 2022-3-31 12:59

为撒我的为王欧洲那个是不够

zgtsang · 发表于 2022-5-2 16:35

弄个积分太难了

digitzing · 发表于 2022-10-19 17:33

本帖最后由 digitzing 于 2022-10-19 17:44 编辑

kevin890505 发表于 2021-6-19 22:00
要有BUS或者CLASS才可以忘了做防呆如果没有就会出现这情况

我帮你修改了，改成英文，并支持allegro 17以上，没有BUS也不会一条细线无法退出

/*
├─
│ ├─ 程序名称：Quick_pinpair.il
│ ├─ 程序功能：快速创建选择BUS/CLASS对应的pin pair
│ ├─ 创建时间：2014年10月31日
│ ├─ 作者：kevin wong
│ ├─ Q Q：263350809
├─
1，2014.10.31开始构建主函数思路；
2，2014.11.07完成初步功能，测试通过；
3，2014.12.31修改添加部分按钮，提示；
4，2019.07.31修改增加分列显示功能，以避免超出屏幕范围
5，2019.07.31修改多30整除情况下的界面布局，以避免空白列
6，2019.09.01修改再3个以上器件时候，只显示位号不容易区分，以REF+VALUE的形式展示，
并增加新建的MG添加约束，点对点为5mil，菊花链为20mil
7,2022.10.19 修改width为0时，from显示问题 by digitzing
*/
axlCmdRegister( "quickpinpair" 'Quick_PinPair)
; load("Quick_pinpair.il")
defun(Quick_PinPair ()
let( (one allclass)
allclass = axlDBGetDesign()->netclass
alleleclass_name = list()
foreach(one allclass
if(one->electrical
then
alleleclass_name = cons(list(one->name one) alleleclass_name)
)
)
if(allbus = axlDBGetDesign()->bus
foreach(one allbus
alleleclass_name = cons(list(one->name one) alleleclass_name)
)
)
classnum = length(alleleclass_name) ;class 数量
if(classnum <= 30
then
hig = classnum*2+6
else
hig = 30*2 + 6 ;>30个时高度固定，增加宽度
)
;----------修改部分
if(mod(classnum 30) == 0
then
width = ((classnum/30) + 0)*30 ;项目过多时加宽列数,整除列宽=列数*30
else
width = ((classnum/30) + 1)*30 ;项目过多时加宽列数，有多余的，不整除列宽=（列数+1）*30
)
if(width == 0
then
width = 31
axlUIWPrint(displayform "No Class was found!")
else
nil
)
;----------修改部分
Quick_pinpairform()
))
defun(Quick_pinpairform ()
let( (curclass)
Formfile = axlTempFile()
;Formfile = "./pinpairform.form"
formport = outfile(Formfile "w")
fprintf(formport "FILE_TYPE=FORM_DEFN VERSION=2\n")
if(axlVersion('version)>17
then
fprintf(formport "FORM \n")
else
fprintf(formport "FORM toolwindow\n")
)
fprintf(formport "FIXED\n")
fprintf(formport "PORT %d 1\n" width)
fprintf(formport "HEADER \"Create PinPair - kevin\"\n")
fprintf(formport "TILE\n")
fprintf(formport "\n")
fprintf(formport "TEXT \"1.Please creat BUS/CLASS first\"\n")
fprintf(formport "TLOC 2 1\n")
fprintf(formport "ENDTEXT\n")
fprintf(formport "\n")
fprintf(formport "TEXT \"2.Please select blew BUS/CLASS\"\n")
fprintf(formport "TLOC 2 2\n")
fprintf(formport "ENDTEXT\n")
x =2
y = 4
foreach(curclass alleleclass_name
fieldname = car(curclass)
fprintf( formport "FIELD %s\n" fieldname)
fprintf( formport "FLOC %d %d\n" x y)
fprintf( formport "CHECKLIST \" %s\"\n" fieldname)
fprintf( formport "ENDFIELD\n\n")
y = y+2
if( y >= 64 ;大于30行就切换下一列
then
y = 4
x = x+30
)
)
fprintf(formport "FIELD sel\n")
fprintf(formport "FLOC 2 %d\n" hig)
fprintf(formport "MENUBUTTON \"Select All\" 10 3\n")
fprintf(formport "ENDFIELD \n\n")
fprintf(formport "FIELD desel\n")
fprintf(formport "FLOC 14 %d\n" hig)
fprintf(formport "MENUBUTTON \"Deselect\" 10 3\n")
fprintf(formport "ENDFIELD \n\n")
fprintf(formport "FIELD create\n")
fprintf(formport "FLOC 2 %d\n" hig+2)
fprintf(formport "MENUBUTTON \"Creat\" 10 3\n")
fprintf(formport "ENDFIELD \n\n")
fprintf(formport "FIELD cacel\n")
fprintf(formport "FLOC 14 %d\n" hig+2)
fprintf(formport "MENUBUTTON \"Exit\" 10 3\n")
fprintf(formport "ENDFIELD \n\n")
fprintf(formport "ENDTILE\n")
fprintf(formport "ENDFORM\n")
close(formport)
displayform = axlFormCreate((gensym) Formfile '(ne inner) 'createpinpairact t)
axlFormDisplay(displayform)
foreach(curclass alleleclass_name
axlFormSetField(displayform car(curclass) t)
)
if(width == 31
then
axlUIWPrint(displayform "No Class or Bus was found!")
else
axlUIWPrint(displayform "Kevin Wong")
)
deleteFile(Formfile)
)
)
defun(createpinpairact (displayform)
let( (membersel curclass onecl one alldp2net)
allclass = axlDBGetDesign()->netclass
alleleclass_name = list()
foreach(one allclass
if(one->electrical
then
alleleclass_name = cons(list(one->name one) alleleclass_name)
)
)
if(allbus = axlDBGetDesign()->bus
foreach(one allbus
alleleclass_name = cons(list(one->name one) alleleclass_name)
)
)
membersel = displayform->curField
case(membersel
("sel"
foreach(curclass alleleclass_name
axlFormSetField(displayform car(curclass) t)
axlUIWPrint(displayform "Select All")
)
)
("desel"
foreach(curclass alleleclass_name
axlFormSetField(displayform car(curclass) nil)
axlUIWPrint(displayform "Deselect All")
)
)
("create"
axlUIWPrint(displayform "Create the pinpair of selected BUS/Class")
foreach(onecl alleleclass_name
alldp2net = cadr(onecl)->groupMembers
foreach(one alldp2net
if(one->type == "DIFF_PAIR"
alldp2net = append(remove(one alldp2net) one->groupMembers)
)
)
if(axlFormGetField(displayform car(onecl))
then
curMGname = strcat("MG_" car(onecl))
allpinslist = list()
foreach(one alldp2net
allpinslist = append1(allpinslist axlPinsOfNet(one 'pin))
)
get_min_pinlist(allpinslist)
if(length(result) == 1
then
axlUIConfirm(strcat("there is some thing wrong with the BUS/Class " car(onecl)))
else
if(length(result) == 2
then
get_main_pinlist()
Creat_Match_Group()
else
if(length(result) >= 3
then
axlClearSelSet()
axlSetFindFilter(?enabled list("noall" "COMPONENTS") ?onButtons list("all"))
axlSingleSelectName("REFDES" result)
resultdbid = axlGetSelSet()
resultref = nil
foreach(ref resultdbid
resultref = append1(resultref strcat(strcat(ref->name "_") ref->deviceType))
)
choice = axlUIMultipleChoice("Please select a main CPU"
resultref strcat("Please select branch" car(onecl)))
maindev = nth(choice result)
get_main_pinlist()
Creat_Match_Group()
)
)
)
)
)
axlUIWPrint(displayform "Create the pinpair successfully!")
)
("cacel"
axlUIWPrint(displayform "Exit")
axlFormClose(displayform)
deleteFile(Formfile)
)
)
) )
defun( get_min_pinlist (allpinslist)
let( (one mlist pin2netlist i j curlist okflag)
mlist = list()
foreach(one nth(0 allpinslist)
mlist= cons(one->component->name mlist) ;list(U1 U2)
)
result = mlist
foreach(pin2netlist allpinslist
curlist = pin2netlist
i = 0
while( (i < length(mlist))
j = nth(i mlist)
okflag = 0
foreach(one curlist
if(j == one->component->name
okflag++
)
)
if(okflag == 0
result = remove(j result)
)
i++
)
)
))
defun( get_main_pinlist ()
let( (curcalcu pinid containflag)
pinneedres = list()
foreach(curcalcu allpinslist
curcalcu = car(allpinslist)
allpinslist = remove(curcalcu allpinslist)
foreach(pinid curcalcu
containflag = 0
foreach(one result
if(pinid->component->name == one
containflag++
)
)
if(containflag == 0
curcalcu = remove(pinid curcalcu) )
)
if(length(result)>=3
then
foreach(one curcalcu
if(one->component->name == maindev
curcalcu = cons(one remove(one curcalcu))
)
)
pinneedres = append1(pinneedres curcalcu)
else
pinneedres = append1(pinneedres curcalcu)
)
)
))
defun( Creat_Match_Group ()
let( (lastpinlist onepinlist lastpins onespin onelist curpinpair ref one onepin)
lastpinlist = list()
foreach(onepinlist pinneedres
lastpins = list()
foreach(one onepinlist
onespin = strcat(strcat(one->component->name ".") one->number)
lastpins = append1(lastpins onespin)
)
lastpinlist = cons(lastpins lastpinlist)
)
if(length(result) == 2
then
axlMatchGroupDelete(curMGname)
axlMatchGroupCreate(curMGname)
foreach(onelist lastpinlist
curpinpair = axlPinPair(car(onelist) cadr(onelist))
axlMatchGroupAdd(curMGname curpinpair)
axlMatchGroupProp(curMGname curpinpair strcat(curMGname ":G:::0 mil:5mil"))
)
else
if(length(result)>=3
then
groupneedsuf = remove(maindev result)
foreach(ref groupneedsuf
axlMatchGroupDelete(strcat(strcat(curMGname "_") ref))
axlMatchGroupCreate(strcat(strcat(curMGname "_") ref))
)
foreach(one lastpinlist
pinpre = car(one)
pinsuflist = cdr(one)
foreach(onepin pinsuflist
curpinpair = axlPinPair(pinpre onepin)
; car(parseString(onepin "."))
lastname = strcat(strcat(curMGname "_") car(parseString(onepin ".")))
axlMatchGroupAdd(lastname curpinpair)
axlMatchGroupProp(lastname curpinpair strcat(lastname ":G:::0 mil:20mil"))
)
)
)
)
))

复制代码

EagleJi · 发表于 2023-1-16 13:44

咨询个问题，我设置了BUS了，可以用这个skill, 但是设置了class就不能用。版本17.4的

光光光 · 发表于 2023-3-17 16:02

好好好

ee_windy · 发表于 2023-4-27 13:41

谢谢分享！

ximencuocuo0517 · 发表于 2023-6-1 08:33

digitzing 发表于 2022-10-19 17:33
我帮你修改了，改成英文，并支持allegro 17以上，没有BUS也不会一条细线无法退出

你好，加载后报错怎么回事啊
*Error* eval:unbound variable - displayform

bright5588 · 发表于 2023-6-7 17:10

谢谢楼主分享，赞赏楼主的精神！

ann_wz · 发表于 2023-8-11 15:16

误差可以选择自己填不，不要做成死的，20mil

jklplll13398 · 发表于 2024-2-4 17:53

感谢

七彩雨 · 发表于 2024-2-5 15:02

学习学习，谢谢分享

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

[原创]根据ECS里面的CLASS/BUS来自动创建PINPAIR以及对应的MATCHGROUP

点评

浏览过的版块

推荐内容 /1