|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?注册
x
本帖最后由 ymiker 于 2021-6-10 14:21 编辑
- procedure(AddMosM1()
- let((cv objs metal1 temp temp1 shapes x y ux uy xy row column transform M1_width)
- M1_width = 0.38
- cv = geGetEditCellView()
- objs = geGetSelSet()
- foreach(obj objs
- transform = nil
- if(obj~>objType == "inst" then transform = list(obj~>transform));end if
- if(obj~>objType == "mosaic" then
- x = xCoord(obj~>xy)
- y = yCoord(obj~>xy)
- ux = obj~>uX
- uy = obj~>uY
- row = obj~>rows
- column = obj~>columns
- for(a 0 row-1
- for(b 0 column-1
- case(car(obj~>tileArray)
- ("R0" || "MXR90" xy = list(x+a*ux : y+b*uy))
- ("R90" || "MY" xy = list(x-a*ux : y+b*uy))
- ("R0" || "MXR90" xy = list(x+a*ux : y-b*uy))
- ("R0" || "MXR90" xy = list(x-a*ux : y-b*uy))
- );end case
- transform = append1(transform list(car(xy) car(obj~>tileArray) 1.0))
- );end for
- );enf for
- );end if
- shapes = obj~>master~>shapes
- foreach(shape shapes
- if(car(shape~>lpp) == "METAL1" && cadr(shape~>lpp) == "drawing"
- then
- foreach(trans transform
- metal1 = dbCopyFig(shape cv trans)
- temp = leConvertPolygonToPath(metal1)
- ;;;;temp1 = leHiConvertShapeToPathSeg(temp)
- temp~>width = M1_width
- );foreach
- );if
- );foreach
- );foreach
- );let
- );proc
复制代码 ctrl,shift滑轮改孔
- ;==========================================================================
- ;Function: "Ctrl" or "Shift" + mouse wheel to modify the horizontal or vertical number of through holes (Via)
- ;Instructions:
- ; 1.In the CIW window, Load this il file
- ; 2.In the layout window, After selecting Via,
- ; Hold down "Ctrl" or "Shift" and slide the mouse wheel
- ;
- ;Note: When selecting Via, you may accidentally select other devices.
- ; This script only modifies Via parameters, not other device parameters.
- ;
- ;==========================================================================
- row = "row"
- col = "column"
- hiSetBindKey("Layout" "Shift<Btn4Down>" "NewVia(row 1)")
- hiSetBindKey("Layout" "Shift<Btn5Down>" "NewVia(row -1)")
- hiSetBindKey("Layout" "Ctrl<Btn4Down>" "NewVia(col 1)")
- hiSetBindKey("Layout" "Ctrl<Btn5Down>" "NewVia(col -1)")
- procedure(NewVia(dir num)
- instID = geGetSelSet() ;get via ID list
- viaID = setof(obj instID obj~>objType == "stdVia")
- rotation = list("R90" "R270" "MYR90" "MXR90")
- foreach(via viaID
- when(dir == "row"
- if(member(via~>orient rotation) == nil then
- org = via~>cutRows
- via~>cutRows = apply('plus list(org num))
- else
- org = via~>cutColumns
- via~>cutColumns = apply('plus list(org num))
- );end if
- );end when
- when(dir == "column"
- if(member(via~>orient rotation) == nil then
- org = via~>cutColumns
- via~>cutColumns = apply('plus list(org num))
- else
- org = via~>cutRows
- via~>cutRows = apply('plus list(org num))
- );end if
- );end when
- );end foreach()
- );end procedure
复制代码
|
|