抓了一個修改via size skill file沒有效果, 請高手指點 ...

motofatfat

如題:內文如下
* a, a6 M4 K, T( B( j; Nprocedure( Main_Modify_Fun( )
! B* n( \2 Y+ b/ v1 e  prog( ( SizeField LIbField LayerField FormId )

- M; y/ K! i1 H/ v  f        Size = hiCreateFloatField(
      ?name 'Size
6 N; r( X6 z( g, g; G( _  n      ?prompt "Size Offset(+/-):"
, z* F' N: {1 v      ?value 0.1
& e7 z8 i. F9 @  a3 F) T3 V, ]       ?defValue 0.1
        )

( ^) w3 R; l9 E. M, y- j4 G+ v        LibName = hiCreateStringField(
     ?name 'LibName
) ~5 R  g1 L( \/ \; a, B" ]     ?prompt "Library Name:"
     ?value ""
, U4 q% T* W! z& d! b$ _% L+ J8 R     ?defValue ""
        )
; @6 N8 H2 Y9 q4 r
        Layer = hiCreateStringField(
- |) ?( K. ~+ ~- T: ?% G                   ?name 'Layer
                   ?prompt "Layer Name:"
                   ?value ""
                   ?defValue ""
        )
" j; m8 h3 h7 d( |/ p; A3 T$ d( }
        label = hiCreateLabel(
3 }. s6 V# u) h! I                   ?name 'Text
                   ?labelText "  sizing via "
        )
5 i% `% Q$ l7 U  f" c
$ m! a' ?( {" r  p7 m        hiCreateForm(
3 e4 _1 N6 t: q8 {' I4 X& K; h    'name
! Q' _! J* @: L+ v( h    "Modify Via/Cont"
   "Modify_Fun( name->Size->value name->LibName->value name->Layer->value)"
    list( Size LibName Layer label)
: E& {0 r2 A2 @6 N1 F     ""
* ^) x: o- L# i6 A( E     ""
        )


    hiDisplayForm( name )

) ;prog
( Z- g. Z% V+ F. G. n# @6 l
)
4 P, s9 U7 K0 G; i) A
& }7 Y# x- s7 T: x1 p: F6 }
procedure(Modify_Fun(offset LibName Layer )
prog( ( cvId ObjList one two Cells LibId Shaps ll_x ll_y uu_x uu_y
         ll uu )
8 D7 |; _; P7 o' H4 c) C6 `+ B
     LibId = ddGetObj( LibName )
6 B) h/ J+ B, ]$ a' g     Cells = LibId->cells
. z! B7 R7 ~% n" A5 [; V
     foreach( one Cells
5 z: R0 Q" {- H3 l* J8 D+ Y& o; r  cvId  = dbOpenCellViewByType( LibId one->name "layout" "" "a" )
     Shapes = cvId->shapes

   foreach( two Shapes
- b! `# p% y6 q: M; M7 E   caseq(  two->layerName

      ( "Cont"

     ll=lowerLeft( two->bBox )
   uu=upperRight( two->bBox )
. R  _/ E( Q$ [# c% {8 q      
    ll_x = xCoord( ll ) - offset
   ll_y = yCoord( ll ) - offset
( V& P9 p+ E  ?0 t                  
; S" n, j4 Y4 W# c% q6 w. C5 H     uu_x = xCoord( uu ) + offset
    uu_y = yCoord( uu ) + offset
7 r9 |0 o$ D% ~4 c& A  
7 q- R; Y! {' R" g+ M# Z! x        dbCreateRect( cvId Layer list( ll_x:ll_y uu_x:uu_y ) )
0 X/ U" `: c8 d' Q* G9 N9 Q  I        dbDeleteObject( two )
; J0 j/ ]  z3 S# M                    
- L% n& I+ e9 l; W- T7 j8 P       printf("%s------> ok\n" one->name )

      ) ; end Layer
9 o1 }% Z) {: X4 ?
) w9 U7 m! `% u# C$ _       ) ;case

     ) ; foreach two
, `0 V8 w% r1 i9 y  `+ d
9 R: V- B7 v. M; ^) }, ~; F   dbSave( cvId )
! \) E( ]! c* S) g4 s/ _7 E) e) ^: c   dbClose( cvId )
. V, X+ M, U, z2 [- P
2 m0 \) w+ |7 h; `2 `* d$ i9 s# E, M    ) ; foreact one

2 }; z$ n1 s, ~: n; p# p)
);proc