鼠标滚轮直接修改 Via 的行数和列数skill脚本

恒裕

1. 
   
2. 
   
3. ;==========================================================================
   
4. ;Function:         "Ctrl" or "Shift" + mouse wheel to modify the horizontal or vertical number of through holes (Via)
   
5. ;Instructions:
   
6. ;                1.In the CIW window, Load this il file
   
7. ;                2.In the layout window, After selecting Via,
   
8. ;                  Hold down "Ctrl" or "Shift" and slide the mouse wheel
   
9. ;
   
10. ;Note:                When selecting Via, you may accidentally select other devices.
    
11. ;                This script only modifies Via parameters, not other device parameters.
    
12. ;
    
13. ;==========================================================================
    
14. row = "row"
    
15. col = "column"
    
16. hiSetBindKey("Layout" "Shift<Btn4Down>" "NewVia(row  1)")
    
17. hiSetBindKey("Layout" "Shift<Btn5Down>" "NewVia(row -1)")
    
18. hiSetBindKey("Layout" "Ctrl<Btn4Down>"  "NewVia(col  1)")
    
19. hiSetBindKey("Layout" "Ctrl<Btn5Down>"  "NewVia(col -1)")
    
20. 
    
21. procedure(NewVia(dir num)        
    
22.         instID = geGetSelSet()        ;get via ID list
    
23.         viaID = setof(obj instID obj~>objType == "stdVia")
    
24.         rotation = list("R90" "R270" "MYR90" "MXR90")
    
25.         foreach(via viaID
    
26.                 when(dir == "row"
    
27.                         if(member(via~>orient rotation) == nil then         
    
28.                                 org = via~>cutRows                        
    
29.                                 via~>cutRows = apply('plus list(org num))
    
30.                         else                                                
    
31.                                 org = via~>cutColumns                        
    
32.                                 via~>cutColumns = apply('plus list(org num))
    
33.                         );end if
    
34.                 );end when
    
35.                 when(dir == "column"
    
36.                         if(member(via~>orient rotation) == nil then
    
37.                                 org = via~>cutColumns
    
38.                                 via~>cutColumns = apply('plus list(org num))
    
39.                         else
    
40.                                 org = via~>cutRows
    
41.                                 via~>cutRows = apply('plus list(org num))
    
42.                         );end if
    
43.                 );end when
    
44.         );end foreach()
    
45. );end procedure
    
46. 
    
47. 
    

复制代码

恒裕

再增加一个，可以使用Shift+上下左右键增加已有孔的数目，使用Ctrl+上下左右来减少已有孔的数目

1. 
   
2. 
   
3. <div>UpAdd = "UpAdd"
   
4. DownAdd = "DownAdd"
   
5. LeftAdd = "LeftAdd"
   
6. RightAdd = "RightAdd"
   
7. UpMinus = "UpMinus"
   
8. DownMinus = "DownMinus"
   
9. LeftMinus = "LeftMinus"
   
10. RightMinus = "RightMinus"
    
11. hiSetBindKey("Layout" "Shift<Key>Up" "ChangeVia(UpAdd)")
    
12. hiSetBindKey("Layout" "Shift<Key>Down" "ChangeVia(DownAdd)")
    
13. hiSetBindKey("Layout" "Shift<Key>Left"  "ChangeVia(LeftAdd)")
    
14. hiSetBindKey("Layout" "Shift<Key>Right"  "ChangeVia(RightAdd)")
    
15. hiSetBindKey("Layout" "Ctrl<Key>Up" "ChangeVia(UpMinus)")
    
16. hiSetBindKey("Layout" "Ctrl<Key>Down" "ChangeVia(DownMinus)")
    
17. hiSetBindKey("Layout" "Ctrl<Key>Left"  "ChangeVia(LeftMinus)")
    
18. hiSetBindKey("Layout" "Ctrl<Key>Right"  "ChangeVia(RightMinus)") </div><div> </div><div>procedure(ChangeVia(change)
    
19.        instID = geGetSelSet()                                                     ;get via ID list
    
20.        viaID = setof(obj instID obj~>objType == "stdVia")                         ;choose Via ID list
    
21.        foreach(via viaID                                                          ;loop via IDlist
    
22.                   ViaOrient = via~>orient                                            ;get via Rotation
    
23.                   ViaRows = via~>cutRows                                             ;get via row number
    
24.                   ViaColumns = via~>cutColumns                                       ;get via column number
    
25.                   viaWidth = via ~> cutWidth
    
26.                   viaRowSpace = cadr(via~>cutSpacing)
    
27.                   viaColumnSpace = car(via~>cutSpacing)
    
28.                   layer1 = dbGetViaLayer(via "layer1")                               ;get via layer1
    
29. ;~~~~~~~~~~~~~~~~~TSMC 130nm BCD+ HV~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
30.                   Cont = 0.2       ;Array 4X4
    
31.                   Via12 = 0.29     ;Array 3X3
    
32.                   Via34 = 0.54     ;Array 3X3
    
33. ;~~~~~~~~~~~~~~~~~use UpAdd/DownAdd , judge the Rows number is equal to 2~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
34.                   when(ViaOrient=="R0"||ViaOrient=="R180"||ViaOrient=="MY"||ViaOrient=="MX"
    
35.                        when(ViaRows==2 && ViaColumns>=3 && change=="UpAdd" && layer1=="METAL3"
    
36.                             if(viaRowSpace < Via34
    
37.                                dbMoveFig(via nil list(0:Via34-viaRowSpace "R0")))
    
38.                                via~>cutSpacing = (viaColumnSpace:Via34)
    
39.                            );end when
    
40.                        when(ViaRows==2 && ViaColumns>=3 && change=="UpAdd" && layer1=="METAL2"
    
41.                             if(viaRowSpace < Via12
    
42.                                dbMoveFig(via nil list(0:Via12-viaRowSpace "R0")))
    
43.                                via~>cutSpacing = (viaColumnSpace:Via12)
    
44.                            );end when
    
45.                        when(ViaRows==2 && ViaColumns>=3 && change=="UpAdd" && layer1=="METAL1"
    
46.                             if(viaRowSpace < Via12
    
47.                                dbMoveFig(via nil list(0:Via12-viaRowSpace "R0")))
    
48.                                via~>cutSpacing = (viaColumnSpace:Via12)
    
49.                            );end when
    
50.                        when(ViaRows==2 && ViaColumns>=3 && change=="UpAdd" && layer1=="POLYG"
    
51.                             if(viaRowSpace < Cont
    
52.                                dbMoveFig(via nil list(0:Cont-viaRowSpace "R0")))
    
53.                                via~>cutSpacing = (viaColumnSpace:Cont)
    
54.                            );end when
    
55. ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
56.                        when(ViaRows==2 && ViaColumns>=3 && change=="DownAdd" && layer1=="METAL3"
    
57.                             if(viaRowSpace < Via34
    
58.                                dbMoveFig(via nil list(0:-Via34+viaRowSpace "R0")))
    
59.                                via~>cutSpacing = (viaColumnSpace:Via34)
    
60.                            );end when
    
61.                        when(ViaRows==2 && ViaColumns>=3 && change=="DownAdd" && layer1=="METAL2"
    
62.                             if(viaRowSpace < Via12
    
63.                                dbMoveFig(via nil list(0:-Via12+viaRowSpace "R0")))
    
64.                                via~>cutSpacing = (viaColumnSpace:Via12)
    
65.                            );end when
    
66.                        when(ViaRows==2 && ViaColumns>=3 && change=="DownAdd" && layer1=="METAL1"
    
67.                             if(viaRowSpace < Via12
    
68.                                dbMoveFig(via nil list(0:-Via12+viaRowSpace "R0")))
    
69.                                via~>cutSpacing = (viaColumnSpace:Via12)
    
70.                            );end when
    
71.                        when(ViaRows==2 && ViaColumns>=3 && change=="DownAdd" && layer1=="POLYG"
    
72.                             if(viaRowSpace < Cont
    
73.                                dbMoveFig(via nil list(0:-Cont+viaRowSpace "R0")))
    
74.                                via~>cutSpacing = (viaColumnSpace:Cont)
    
75.                            );end when
    
76. ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
77.                        when(ViaRows>=3 && ViaColumns==2 && change=="LeftAdd" && layer1=="METAL3"
    
78.                             if(viaRowSpace < Via34
    
79.                                dbMoveFig(via nil list(-Via34+viaRowSpace:0 "R0")))
    
80.                                via~>cutSpacing = (Via34:viaColumnSpace)
    
81.                            );end when
    
82.                        when(ViaRows>=3 && ViaColumns==2 && change=="LeftAdd" && layer1=="METAL2"
    
83.                             if(viaRowSpace < Via12
    
84.                                dbMoveFig(via nil list(-Via12+viaRowSpace:0 "R0")))
    
85.                                via~>cutSpacing = (Via12:viaColumnSpace)
    
86.                            );end when
    
87.                        when(ViaRows>=3 && ViaColumns==2 && change=="LeftAdd" && layer1=="METAL1"
    
88.                             if(viaRowSpace < Via12
    
89.                                dbMoveFig(via nil list(-Via12+viaRowSpace:0 "R0")))
    
90.                                via~>cutSpacing = (Via12:viaColumnSpace)
    
91.                            );end when
    
92.                        when(ViaRows>=3 && ViaColumns==2 && change=="LeftAdd" && layer1=="POLYG"
    
93.                             if(viaRowSpace < Cont
    
94.                                dbMoveFig(via nil list(-Cont+viaRowSpace:0 "R0")))
    
95.                                via~>cutSpacing = (Cont:viaColumnSpace)
    
96.                            );end when
    
97. ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
98.                        when(ViaRows>=3 && ViaColumns==2 && change=="RightAdd" && layer1=="METAL3"
    
99.                             if(viaRowSpace < Via34
    
100.                                dbMoveFig(via nil list(Via34-viaRowSpace:0 "R0")))
     
101.                                via~>cutSpacing = (Via34:viaColumnSpace)
     
102.                            );end when
     
103.                        when(ViaRows>=3 && ViaColumns==2 && change=="Rightdd" && layer1=="METAL2"
     
104.                             if(viaRowSpace < Via12
     
105.                                dbMoveFig(via nil list(Via12-viaRowSpace:0 "R0")))
     
106.                                via~>cutSpacing = (Via12:viaColumnSpace)
     
107.                            );end when
     
108.                        when(ViaRows>=3 && ViaColumns==2 && change=="RightAdd" && layer1=="METAL1"
     
109.                             if(viaRowSpace < Via12
     
110.                                dbMoveFig(via nil list(Via12-viaRowSpace:0 "R0")))
     
111.                                via~>cutSpacing = (Via12:viaColumnSpace)
     
112.                            );end when
     
113.                        when(ViaRows>=3 && ViaColumns==2 && change=="RightAdd" && layer1=="POLYG"
     
114.                             if(viaRowSpace < Cont
     
115.                                dbMoveFig(via nil list(Cont-viaRowSpace:0 "R0")))
     
116.                                via~>cutSpacing = (Cont:viaColumnSpace)
     
117.                            );end when
     
118.                       );end when
     
119. ;~~~~~~~~~~~~~~~~~use LeftAdd/RightAdd,judge the Columns number is equal to 2~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
     
120.                   when(ViaOrient=="R90"||ViaOrient=="R270"||ViaOrient=="MYR90"||ViaOrient=="MXR90"
     
121.                        when(ViaRows>=3 && ViaColumns==2 && change=="UpAdd" && layer1=="METAL3"
     
122.                             if(viaRowSpace < Via34
     
123.                                dbMoveFig(via nil list(0:Via34-viaRowSpace "R0")))
     
124.                                via~>cutSpacing = (Via34:viaColumnSpace)
     
125.                            );end when
     
126.                        when(ViaRows>=3 && ViaColumns==2 && change=="UpAdd" && layer1=="METAL2"
     
127.                             if(viaRowSpace < Via12
     
128.                                dbMoveFig(via nil list(0:Via12-viaRowSpace "R0")))
     
129.                                via~>cutSpacing = (Via12:viaColumnSpace)
     
130.                            );end when
     
131.                        when(ViaRows>=3 && ViaColumns==2 && change=="UpAdd" && layer1=="METAL1"
     
132.                             if(viaRowSpace < Via12
     
133.                                dbMoveFig(via nil list(0:Via12-viaRowSpace "R0")))
     
134.                                via~>cutSpacing = (Via12:viaColumnSpace)
     
135.                            );end when
     
136.                        when(ViaRows>=3 && ViaColumns==2 && change=="UpAdd" && layer1=="POLYG"
     
137.                             if(viaRowSpace < Cont
     
138.                                dbMoveFig(via nil list(0:Cont-viaRowSpace "R0")))
     
139.                                via~>cutSpacing = (Cont:viaColumnSpace)
     
140.                            );end when
     
141. ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
     
142.                        when(ViaRows>=3 && ViaColumns==2 && change=="DownAdd" && layer1=="METAL3"
     
143.                             if(viaRowSpace < Via34
     
144.                                dbMoveFig(via nil list(0:-Via34+viaRowSpace "R0")))
     
145.                                via~>cutSpacing = (Via34:viaColumnSpace)
     
146.                            );end when
     
147.                        when(ViaRows>=3 && ViaColumns==2 && change=="DownAdd" && layer1=="METAL2"
     
148.                             if(viaRowSpace < Via12
     
149.                                dbMoveFig(via nil list(0:-Via12+viaRowSpace "R0")))
     
150.                                via~>cutSpacing = (Via12:viaColumnSpace)
     
151.                            );end when
     
152.                        when(ViaRows>=3 && ViaColumns==2 && change=="DownAdd" && layer1=="METAL1"
     
153.                             if(viaRowSpace < Via12
     
154.                                dbMoveFig(via nil list(0:-Via12+viaRowSpace "R0")))
     
155.                                via~>cutSpacing = (Via12:viaColumnSpace)
     
156.                            );end when
     
157.                        when(ViaRows>=3 && ViaColumns==2 && change=="DownAdd" && layer1=="POLYG"
     
158.                             if(viaRowSpace < Cont
     
159.                                dbMoveFig(via nil list(0:-Cont+viaRowSpace "R0")))
     
160.                                via~>cutSpacing = (Cont:viaColumnSpace)
     
161.                            );end when
     
162. ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
     
163.                        when(ViaRows==2 && ViaColumns>=3 && change=="LeftAdd" && layer1=="METAL3"
     
164.                             if(viaRowSpace < Via34
     
165.                                dbMoveFig(via nil list(-Via34+viaRowSpace:0 "R0")))
     
166.                                via~>cutSpacing = (viaColumnSpace:Via34)
     
167.                            );end when
     
168.                        when(ViaRows==2 && ViaColumns>=3 && change=="LeftAdd" && layer1=="METAL2"
     
169.                             if(viaRowSpace < Via12
     
170.                                dbMoveFig(via nil list(-Via12+viaRowSpace:0 "R0")))
     
171.                                via~>cutSpacing = (viaColumnSpace:Via12)
     
172.                            );end when
     
173.                        when(ViaRows==2 && ViaColumns>=3 && change=="LeftAdd" && layer1=="METAL1"
     
174.                             if(viaRowSpace < Via12
     
175.                                dbMoveFig(via nil list(-Via12+viaRowSpace:0 "R0")))
     
176.                                via~>cutSpacing = (viaColumnSpace:Via12)
     
177.                            );end when
     
178.                        when(ViaRows==2 && ViaColumns>=3 && change=="LeftAdd" && layer1=="POLYG"
     
179.                             if(viaRowSpace < Cont
     
180.                                dbMoveFig(via nil list(-Cont+viaRowSpace:0 "R0")))
     
181.                                via~>cutSpacing = (viaColumnSpace:Cont)
     
182.                            );end when
     
183. ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
     
184.                        when(ViaRows==2 && ViaColumns>=3 && change=="RightAdd" && layer1=="METAL3"
     
185.                             if(viaRowSpace < Via34
     
186.                                dbMoveFig(via nil list(Via34-viaRowSpace:0 "R0")))
     
187.                                via~>cutSpacing = (viaColumnSpace:Via34)
     
188.                            );end when
     
189.                        when(ViaRows==2 && ViaColumns>=3 && change=="Rightdd" && layer1=="METAL2"
     
190.                             if(viaRowSpace < Via12
     
191.                                dbMoveFig(via nil list(Via12-viaRowSpace:0 "R0")))
     
192.                                via~>cutSpacing = (viaColumnSpace:Via12)
     
193.                            );end when
     
194.                        when(ViaRows==2 && ViaColumns>=3 && change=="RightAdd" && layer1=="METAL1"
     
195.                             if(viaRowSpace < Via12
     
196.                                dbMoveFig(via nil list(Via12-viaRowSpace:0 "R0")))
     
197.                                via~>cutSpacing = (viaColumnSpace:Via12)
     
198.                            );end when
     
199.                        when(ViaRows==2 && ViaColumns>=3 && change=="RightAdd" && layer1=="POLYG"
     
200.                             if(viaRowSpace < Cont
     
201.                                dbMoveFig(via nil list(Cont-viaRowSpace:0 "R0")))
     
202.                                via~>cutSpacing = (viaColumnSpace:Cont)
     
203.                            );end when
     
204.                       );end when
     
205. ;~~~~~~~~~~~~~~~~~judge the distance of Via coordinate movement~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
     
206.                   if(ViaOrient=="R0"||ViaOrient=="R180"||ViaOrient=="MY"||ViaOrient=="MX"
     
207.                      then if(change=="UpAdd"||change=="DownAdd"||change=="UpMinus"||change=="DownMinus"  
     
208.                              then MoveDistance=(viaWidth/2) + (viaRowSpace/2)
     
209.                              else MoveDistance=(viaWidth/2) + (viaColumnSpace/2)
     
210.                             )
     
211.                      else if(change=="UpAdd"||change=="DownAdd"||change=="UpMinus"||change=="DownMinus"  
     
212.                              then MoveDistance=(viaWidth/2) + (viaColumnSpace/2)
     
213.                              else MoveDistance=(viaWidth/2) + (viaRowSpace/2)
     
214.                             )
     
215.                     )
     
216. ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
     
217.             when(change=="UpAdd"
     
218.               if(ViaOrient=="R0"||ViaOrient=="R180"||ViaOrient=="MY"||ViaOrient=="MX"
     
219.                           then via~>cutRows = ViaRows+1
     
220.                           else via~>cutColumns = ViaColumns+1);end if
     
221.                           dbMoveFig(via nil list(0:MoveDistance "R0")))
     
222.             when(change=="DownAdd"
     
223.               if(ViaOrient=="R0"||ViaOrient=="R180"||ViaOrient=="MY"||ViaOrient=="MX"
     
224.                           then via~>cutRows = ViaRows+1
     
225.                           else via~>cutColumns = ViaColumns+1);end if
     
226.                           dbMoveFig(via nil list(0:-MoveDistance "R0")))
     
227.             when(change=="LeftAdd"
     
228.               if(ViaOrient=="R0"||ViaOrient=="R180"||ViaOrient=="MY"||ViaOrient=="MX"
     
229.                           then via~>cutColumns = ViaColumns+1
     
230.                           else via~>cutRows = ViaRows+1);end if
     
231.                           dbMoveFig(via nil list(-MoveDistance:0 "R0")))
     
232.             when(change=="RightAdd"
     
233.               if(ViaOrient=="R0"||ViaOrient=="R180"||ViaOrient=="MY"||ViaOrient=="MX"
     
234.                           then via~>cutColumns = ViaColumns+1
     
235.                           else via~>cutRows = ViaRows+1);end if
     
236.                           dbMoveFig(via nil list(MoveDistance:0 "R0")))
     
237.             when(change=="UpMinus"
     
238.               if(ViaOrient=="R0"||ViaOrient=="R180"||ViaOrient=="MY"||ViaOrient=="MX"
     
239.                           then via~>cutRows = ViaRows-1
     
240.                           else via~>cutColumns = ViaColumns-1);end if
     
241.                           dbMoveFig(via nil list(0:-MoveDistance "R0")))
     
242.             when(change=="DownMinus"
     
243.               if(ViaOrient=="R0"||ViaOrient=="R180"||ViaOrient=="MY"||ViaOrient=="MX"
     
244.                           then via~>cutRows = ViaRows-1
     
245.                           else via~>cutColumns = ViaColumns-1);end if
     
246.                           dbMoveFig(via nil list(0:MoveDistance "R0")))
     
247.             when(change=="LeftMinus"
     
248.               if(ViaOrient=="R0"||ViaOrient=="R180"||ViaOrient=="MY"||ViaOrient=="MX"
     
249.                           then via~>cutColumns = ViaColumns-1
     
250.                           else via~>cutRows = ViaRows-1);end if
     
251.                           dbMoveFig(via nil list(MoveDistance:0 "R0")))
     
252.             when(change=="RightMinus"
     
253.               if(ViaOrient=="R0"||ViaOrient=="R180"||ViaOrient=="MY"||ViaOrient=="MX"
     
254.                           then via~>cutColumns = ViaColumns-1
     
255.                           else via~>cutRows = ViaRows-1);end if
     
256.                           dbMoveFig(via nil list(-MoveDistance:0 "R0")))
     
257. );end foreach
     
258. );end procedure
     
259. </div>
     
260. 
     

复制代码

恒裕

更新一下给instance打gate via的skill

1. 
   
2. 
   
3. procedure( create_gate()
   
4.            let(( cv instList inst_fl inst_l inst_fw
   
5.                  fingers tech viaDefId viaParams xy cutNum via
   
6.                  x1 y1 x2 y2 x3 y3 x4 y4 x5 y5
   
7.                  PolyEncloseCOUD PolyEncloseCOLR MetalEncloseCOUD MetalEncloseCOLR COSpace
   
8.                  PolyExtensionOD MetalWidth COCoreSpaceOD
   
9.                  PolyEncloseMetal PolyWidth FingersPolySpace )
   
10. ;~~~~~~~~~~~~~~TSMC 130nm BCD+ HV~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
11.                PolyEncloseCOUD = 0.07         ;contact ~> poly enclosures contact top and down
    
12.                PolyEncloseCOLR = 0.12         ;contact ~> poly enclosures contact left and right
    
13.                MetalEncloseCOUD = 0.07        ;contact ~> metal1 enclosures contact top and down
    
14.                MetalEncloseCOLR = 0.12        ;contact ~> metal1 enclosures contact left and right
    
15.                COSpace = 0.2                  ;contact ~> space
    
16.                PolyExtensionOD = 0.2          ;instance ~> poly extension diffusion
    
17.                MetalWidth = 0.3               ;analog ~> metal1 width
    
18.                COCoreSpaceOD = 0.41           
    
19.                PolyEncloseMetal = 0.25        
    
20.                PolyWidth = 0.36               
    
21.                FingersPolySpace = 0.42        
    
22.                Polybitch = 0.36               
    
23. ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
24.                cv = geGetEditCellView(getCurrentWindow())
    
25.                tech = techGetTechFile(cv)
    
26.                instList = geGetSelSet()
    
27.                foreach(inst instList
    
28.                        inst_fl = atof(car(last(inst~>prop~>l)));get instance l\
    
29.                                 prop=information in properties\
    
30.                                 atof is change to float   from Character string\
    
31.                                 atoi is change to integer from Character string
    
32.                        if( (inst_fl >= 100) then inst_fl = inst_fl / 1000 )
    
33.                        inst_fw = atof(car(last(inst~>prop~>fw)));get instance fw
    
34.                        fingers = atof(car(last(inst~>prop~>fingers)));get instance fingers
    
35.                        inst_l = inst_fl * fingers + (fingers - 1) * FingersPolySpace
    
36.                        xy = inst~>xy
    
37.                        cutNum = int(((inst_l - (MetalWidth * 2)) / Polybitch))
    
38.                        if( (cutNum <= 2)
    
39.                           then cutNum = 2
    
40.                           else cutNum = cutNum
    
41.                          )
    
42.                        viaDefId = techFindViaDefByName(tech "M1_PO")
    
43.                        viaParams = list(list("cutSpacing" list(COSpace COSpace));cont via space
    
44.                                         list("layer1Enc" list(PolyEncloseCOLR PolyEncloseCOUD));POLYG enclosures cont via
    
45.                                         list("layer2Enc" list(MetalEncloseCOLR MetalEncloseCOUD));METAL1 enclosures cont via
    
46.                                         list("cutRows" 1) list("cutColumns" cutNum));Row=1   Column=cutNum
    
47. ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
48.                        case(inst~>orient
    
49.                            ("R0"
    
50.                             x1 = car(xy)
    
51.                             y1 = cadr(xy) + inst_fw + PolyExtensionOD
    
52.                             x2 = x1 + inst_l
    
53.                             y2 = y1 + PolyWidth
    
54.                             x3 = x1 + inst_l/2
    
55.                             y3 = cadr(xy) + inst_fw + COCoreSpaceOD
    
56.                             x4 = x1 + PolyEncloseMetal
    
57.                             y4 = y2 - MetalWidth
    
58.                             x5 = x2 - PolyEncloseMetal
    
59.                             y5 = y2
    
60.                             dbCreateRect( cv list( "METAL1" "drawing" ) list(x4:y4 x5:y5))
    
61.                             dbCreateRect( cv list( "POLYG" "drawing" ) list(x1:y1 x2:y2))
    
62.                             dbCreateVia( cv viaDefId list(x3 y3) "R0" viaParams)
    
63.                            );end "R0"
    
64.                            ("R90"
    
65.                             x1 = car(xy) - inst_fw - (PolyExtensionOD + PolyWidth)
    
66.                             y1 = cadr(xy)
    
67.                             x2 = car(xy) - inst_fw - PolyExtensionOD
    
68.                             y2 = y1 + inst_l
    
69.                             x3 = x1 + (MetalWidth / 2)
    
70.                             y3 = y1 + inst_l/2
    
71.                             x4 = x1
    
72.                             y4 = y1 + PolyEncloseMetal
    
73.                             x5 = x1 + MetalWidth
    
74.                             y5 = y2 - PolyEncloseMetal
    
75.                             dbCreateRect( cv list( "METAL1" "drawing" ) list(x4:y4 x5:y5))
    
76.                             dbCreateRect( cv list( "POLYG" "drawing" ) list(x1:y1 x2:y2))
    
77.                             dbCreateVia( cv viaDefId list(x3 y3) "R90" viaParams)
    
78.                            );end "R90"
    
79.                            ("R180"
    
80.                             x1 = car(xy) - inst_l
    
81.                             y1 = cadr(xy) + PolyExtensionOD
    
82.                             x2 = car(xy)
    
83.                             y2 = cadr(xy) + (PolyExtensionOD + PolyWidth)
    
84.                             x3 = x1 + inst_l/2
    
85.                             y3 = cadr(xy) + COCoreSpaceOD
    
86.                             x4 = x1 + PolyEncloseMetal
    
87.                             y4 = y2 - MetalWidth
    
88.                             x5 = x2 - PolyEncloseMetal
    
89.                             y5 = y2
    
90.                             dbCreateRect( cv list( "METAL1" "drawing" ) list(x4:y4 x5:y5))
    
91.                             dbCreateRect( cv list( "POLYG" "drawing" ) list(x1:y1 x2:y2))
    
92.                             dbCreateVia( cv viaDefId list(x3 y3) "R180" viaParams)
    
93.                            );end "R180"
    
94.                            ("R270"
    
95.                             x1 = car(xy) - (PolyExtensionOD + PolyWidth)
    
96.                             y1 = cadr(xy) - inst_l
    
97.                             x2 = car(xy) - PolyExtensionOD
    
98.                             y2 = cadr(xy)
    
99.                             x3 = x1 + (MetalWidth / 2)
    
100.                             y3 = y1 + inst_l/2
     
101.                             x4 = x1
     
102.                             y4 = y1 + PolyEncloseMetal
     
103.                             x5 = x1 + MetalWidth
     
104.                             y5 = y2 - PolyEncloseMetal
     
105.                             dbCreateRect( cv list( "METAL1" "drawing" ) list(x4:y4 x5:y5))
     
106.                             dbCreateRect( cv list( "POLYG" "drawing" ) list(x1:y1 x2:y2))
     
107.                             dbCreateVia( cv viaDefId list(x3 y3) "R270" viaParams)
     
108.                            );end "R270"
     
109.                            ("MY"
     
110.                             x1 = car(xy) - inst_l
     
111.                             y1 = cadr(xy) + inst_fw + PolyExtensionOD
     
112.                             x2 = car(xy)
     
113.                             y2 = y1 + PolyWidth
     
114.                             x3 = x1 + inst_l/2
     
115.                             y3 = y1 + PolyExtensionOD + 0.01
     
116.                             x4 = x1 + PolyEncloseMetal
     
117.                             y4 = y2 - MetalWidth
     
118.                             x5 = x2 - PolyEncloseMetal
     
119.                             y5 = y2
     
120.                             dbCreateRect( cv list( "METAL1" "drawing" ) list(x4:y4 x5:y5))
     
121.                             dbCreateRect( cv list( "POLYG" "drawing" ) list(x1:y1 x2:y2))
     
122.                             dbCreateVia( cv viaDefId list(x3 y3) "MY" viaParams)
     
123.                            );end "MY"
     
124.                            ("MYR90"
     
125.                             x1 = car(xy) - inst_fw - (PolyExtensionOD + PolyWidth)
     
126.                             y1 = cadr(xy) - inst_l
     
127.                             x2 = car(xy) - inst_fw - PolyExtensionOD
     
128.                             y2 = cadr(xy)
     
129.                             x3 = x1 + (MetalWidth / 2)
     
130.                             y3 = y1 + inst_l/2
     
131.                             x4 = x1
     
132.                             y4 = y1 + PolyEncloseMetal
     
133.                             x5 = x1 + MetalWidth
     
134.                             y5 = y2 - PolyEncloseMetal
     
135.                             dbCreateRect( cv list( "METAL1" "drawing" ) list(x4:y4 x5:y5))
     
136.                             dbCreateRect( cv list( "POLYG" "drawing" ) list(x1:y1 x2:y2))
     
137.                             dbCreateVia( cv viaDefId list(x3 y3) "MYR90" viaParams)
     
138.                            );end "MYR90"
     
139.                            ("MX"
     
140.                             x1 = car(xy)
     
141.                             y1 = cadr(xy) + PolyExtensionOD
     
142.                             x2 = x1 + inst_l
     
143.                             y2 = y1 + PolyWidth
     
144.                             x3 = x1 + inst_l/2
     
145.                             y3 = y1 + PolyExtensionOD + 0.01
     
146.                             x4 = x1 + PolyEncloseMetal
     
147.                             y4 = y2 - MetalWidth
     
148.                             x5 = x2 - PolyEncloseMetal
     
149.                             y5 = y2
     
150.                             dbCreateRect( cv list( "METAL1" "drawing" ) list(x4:y4 x5:y5))
     
151.                             dbCreateRect( cv list( "POLYG" "drawing" ) list(x1:y1 x2:y2))
     
152.                             dbCreateVia( cv viaDefId list(x3 y3) "MX" viaParams)
     
153.                            );end "MX"
     
154.                            ("MXR90"
     
155.                             x1 = car(xy) - (PolyExtensionOD + PolyWidth)
     
156.                             y1 = cadr(xy)
     
157.                             x2 = car(xy) - PolyExtensionOD
     
158.                             y2 = cadr(xy)+ inst_l
     
159.                             x3 = x1 + (MetalWidth / 2)
     
160.                             y3 = y1 + inst_l/2
     
161.                             x4 = x1
     
162.                             y4 = y1 + PolyEncloseMetal
     
163.                             x5 = x1 + MetalWidth
     
164.                             y5 = y2 - PolyEncloseMetal
     
165.                             dbCreateRect( cv list( "METAL1" "drawing" ) list(x4:y4 x5:y5))
     
166.                             dbCreateRect( cv list( "POLYG" "drawing" ) list(x1:y1 x2:y2))
     
167.                             dbCreateVia( cv viaDefId list(x3 y3) "MXR90" viaParams)
     
168.                            );end "MXR90"
     
169.                            );end case   
     
170.                        );end foreach
     
171.                );end let
     
172. );end procedure
     
173. hiSetBindKey("Layout" "<Key>7" "create_gate()" )
     
174. 
     
175. 
     

复制代码

恒裕

根据工艺不同，atof(car(last(inst~>prop~>fw)))，其中inst~>prop~>fw可能是多个list嵌套，所以要自己细改一下，atof作用（atof("1u")=1）是提取参数(string）的float值

恒裕

1. 
   
2. 
   
3. procedure(CreateCrossRuler()
   
4.           let( ( windowID enterpoint point cvID x y )
   
5. ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
   
6.                cvID = geGetEditCellView(getCurrentWindow());geGetWindowCellView()
   
7.                windowID = getCurrentWindow()
   
8.                enterpoint = enterPoint()
   
9.                x = car(enterpoint)
   
10.                y = cadr(enterpoint)
    
11.                point = geWindowToEditPoint(windowID x:y)
    
12. ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
13.                dbCreateRuler(cvID list(point xCoord(point)+100:yCoord(point)))
    
14.                dbCreateRuler(cvID list(point xCoord(point)-100:yCoord(point)))
    
15.                dbCreateRuler(cvID list(point xCoord(point):yCoord(point)+100))
    
16.                dbCreateRuler(cvID list(point xCoord(point):yCoord(point)-100))
    
17.              ); end of let
    
18. ); end procedure CreateCrossRuler
    
19. hiSetBindKey("Layout" "<Key>6" "CreateCrossRuler()")
    
20. 
    
21. 
    

复制代码

populaa

谢谢分享