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

motofatfat

如題:內文如下
$ }) z+ W8 ~) ?9 X+ g$ f% Uprocedure( Main_Modify_Fun( )
. v5 S' ^# v8 v  prog( ( SizeField LIbField LayerField FormId )
, @9 t, z: e- V* a+ B) ?6 k/ e" m
8 s8 i2 c4 }/ \1 h. ^        Size = hiCreateFloatField(
: M' \0 A  c6 Y0 x1 R      ?name 'Size
( S6 m7 s+ c; d! S& }' {( S! o      ?prompt "Size Offset(+/-):"
* L+ s* B- K. B. k      ?value 0.1
; j) s- m# \" V# I. l, \       ?defValue 0.1
        )
8 s3 D3 d; G. ?" [) ]% ^& \
" X* N, N: H1 m, p# }        LibName = hiCreateStringField(
     ?name 'LibName
* {- `, `+ |2 N     ?prompt "Library Name:"
     ?value ""
6 x- G1 T1 t' \     ?defValue ""
0 W( ~' ~' a+ s  C- L) F        )
0 j8 S2 K6 s/ t0 q1 H1 L
        Layer = hiCreateStringField(
                   ?name 'Layer
                   ?prompt "Layer Name:"
$ c; ~" q+ Z4 e) {) l/ O, v                   ?value ""
) Z' b* F" v+ _  }4 U                   ?defValue ""
        )

        label = hiCreateLabel(
                   ?name 'Text
                   ?labelText "  sizing via "
        )

3 Q# c' e$ z, X+ ?$ Y+ }        hiCreateForm(
    'name
    "Modify Via/Cont"
   "Modify_Fun( name->Size->value name->LibName->value name->Layer->value)"
    list( Size LibName Layer label)
     ""
9 j# r/ _% i' e3 [& c     ""
* |+ d2 n8 M8 ~. j% u. S        )
! x( W5 B  s. \; e8 t

; c# z7 G, S8 Y: p$ z' _% F, M    hiDisplayForm( name )

5 k( r9 d- Q9 A9 f1 C5 H; Z: a ) ;prog

)

+ N, G. {4 `; Y$ A4 k# m: Y- O# m
# m3 ?2 q: T9 }  \: zprocedure(Modify_Fun(offset LibName Layer )
0 s  i2 h* I% s, Y5 _( O( X/ l prog( ( cvId ObjList one two Cells LibId Shaps ll_x ll_y uu_x uu_y
         ll uu )
2 e& m- m" w) _: l
# M6 w/ [( N/ A     LibId = ddGetObj( LibName )
     Cells = LibId->cells
8 M# M" s# d6 n; Y% a
, S( W, W+ ~7 _; X8 k     foreach( one Cells
  cvId  = dbOpenCellViewByType( LibId one->name "layout" "" "a" )
, k/ I- x% V" H; X     Shapes = cvId->shapes

7 @' U" S$ J6 x2 [   foreach( two Shapes
8 G3 \0 I3 Y5 E3 d- {% i# d   caseq(  two->layerName

      ( "Cont"
$ L$ {% j: \7 `: s
; I4 \/ E% I% z+ g: N# o/ ?! U     ll=lowerLeft( two->bBox )
   uu=upperRight( two->bBox )
# S) ?' e  Q( v      
' `! d$ L9 V* G# W! b! Q# @* F    ll_x = xCoord( ll ) - offset
3 z; W3 [" Z7 \   ll_y = yCoord( ll ) - offset
                  
     uu_x = xCoord( uu ) + offset
$ k) ?2 K0 q' t3 _% A% ?    uu_y = yCoord( uu ) + offset
, u4 v5 w  Q0 l& E3 \. n- {7 m  
        dbCreateRect( cvId Layer list( ll_x:ll_y uu_x:uu_y ) )
        dbDeleteObject( two )
                    
! z- l5 F9 ?1 r, U- [/ Y2 p0 s       printf("%s------> ok\n" one->name )
3 G/ w  h; A9 q4 i, ?5 y5 V0 ]
      ) ; end Layer
# g" p$ t% m* x) P) \
       ) ;case

     ) ; foreach two

   dbSave( cvId )
   dbClose( cvId )

8 m/ s7 t" d8 H    ) ; foreact one
. m' Y. X9 N2 Q1 Q5 N
4 \* i+ Y0 w. }8 f* I4 C" m% f)
# w: h! \1 _2 A) r);proc