一個sKILL範列,切4邊行的角

12345

最近才剛在看SKILL,cadence的pdf檔寫的好爛,一個leChopShape試好久才試出來,這是我最近寫的,還有註解
* e8 e& e9 s9 Q! q- q5 `6 @/*
' {2 q1 v4 m5 _, X8 G7 v9 j, m//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/ j2 d) D* s* L作者:Y.P.LIN
File name : CUT.il
POP menu Write by nfmao
, l0 B" R  \' E4 s5 |1 ZDate: 2007.12.11
Ver : 0.01
& T% h' U8 k6 h4 l, b" [7 t用法:在icfb,load本sKILL(例如 load "CUT.il" ),再開一個layout,選取rectangle(可複選),按滑鼠中鍵(會跳初選單),再選chop
) [/ h5 U$ q' N% t2 J5 x7 D參考:雷奧星空論壇(http://www.armbell.com/forum/viewforum.php?f=13&mforum=iclayout)
     :中国集成电路教育网(http://www.icedu.net/Article/shuzi/houduan/Index.html)
$ ]# s! }6 |1 Z+ T; l; S& E. E     :cadence手冊(安裝目錄下/doc/sk開頭目錄)
8 [& Y7 d4 o- U3 x/ @' {注:本SKILL還在開發中,目前只能切RECTANGLE的4個角
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
*/
4 ~# b$ q/ M$ V  \. K: J;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;cut矩型的4個角;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
" r& r/ J) Q3 u7 S+ ?$ g- J1 Oprocedure(getXY(xyBox)                                ;取得四邊行CUT點座標的程序
d=0.5                                                 ;切的距離(自己設)
x1 = car(car(xyBox))
; s7 c2 ?0 C# Z# m  t  Py1 = cadr(car(xyBox))
- w5 J5 {1 V. G! x9 hx2 = car(cadr(xyBox))
y2 = cadr(cadr(xyBox))
cut1=list((x1:y1) (x1+d:y1) (x1:y1+d) (x1:y1))                        ;cut lin1座標list(是一個封閉cycle)
! Z# I( i" ]) a  Y  L7 v5 Rcut2=list((x2:y1) (x2-d:y1) (x2:y1+d) (x2:y1))                        ;cut lin2座標list(是一個封閉cycle)
cut3=list((x1:y2) (x1+d:y2) (x1:y2-d) (x1:y2))                        ;cut lin3座標list(是一個封閉cycle)
cut4=list((x2:y2) (x2-d:y2) (x2:y2-d) (x2:y2))                        ;cut lin4座標list(是一個封閉cycle)
6 y/ ^; r+ V  W, P( I- j7 h7 D)

4 X) w% E' E/ V# x* L/ vprocedure(chop()
   selobj=geGetSelSet()                                ;取得選的物件
   foreach(shape selobj                                ;把每一個物件逐一丟到shape變數
   ;leChopShape( selobj list(0:0 100:100 ) nil nil 10 )
   selobjbox=shape~>bBox                               ;取得物件的BOX(指方形座標2點->list)
   getXY(selobjbox);                                   ;呼叫getXY程序,且給一個參數selobjx
   leChopShape( shape cut1  t t)                       ;cut一邊,第一個t只是一個封閉cycle,第2個t指移除(remove)
' \3 S' ]6 G- \" M) e) F   leChopShape( shape cut2  t t)                       ;cut一邊
/ O! w2 @0 ~; W7 b. {- Y/ k! W* M   leChopShape( shape cut3  t t)                       ;cut一邊
   leChopShape( shape cut4  t t)                       ;cut一邊
   println(x1);
   println(y1);
7 H6 o! f; j7 t4 W& E* @   println(x2);
( Z1 A# c1 l4 K  g% m( _: J1 e   println(y2);
   );foreach
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;表單;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
9 ?1 X* g: M3 I% @6 k: n/ @0 OtrA_MenuItem = hiCreateMenuItem(                          ;menu項目1
   ?name 'trA_MenuItem
   ?itemText "chop"                                       ;menu項目2標題
   ?callback "chop()" ;;; prints B in the CIW             ;選項後的動作(呼叫chop()程序)
   )
- _8 y7 D4 d5 A' t+ atrB_MenuItem = hiCreateMenuItem(                          ;menu項目2
   ?name 'trB_MenuItem
   ?itemText "Hello World"                                ;menu項目1標題
  m6 T, _9 X, M3 ]# A& B4 T, m   ?callback  "println(word)"                     ;選項後的動作(在CIW視窗印出Hello World!!)
7 M: M$ O5 K. r+ }0 J( H3 |! S. `: L   )


  x6 g# L' T* }  t3 a# uprocedure(trSimpleMenu()                                ;產生meun表單的程序
let((simpleMenuID)                                     ;宣告區域(local)變數
$ p$ Y; Y! ?3 Y. [8 b$ j! Kword="Hello wodr!!"                                    ;字串變數
4 T! {/ b2 P2 z/ x" w1 fsimpleMenuID=hiCreateMenu(                              ;產生一個menu
$ `6 t$ T: E( R$ ~! b'simpleMenu                                            ;GLOBAL(ID)
+ b  ?4 J6 Y  b' R7 F# l- E"Simple Menu"                                          ;標題
; t8 v0 N5 `" }9 M* p! i1 o'(trA_MenuItem trB_MenuItem)                           ;LIST(表單的項目)
)

6 l, Y2 G; N/ G$ p% ^  }hiDisplayMenu(simpleMenuID)                             ;根據menuID在螢幕顯示
' y' I& P; p  h0 Q0 h);let
);proce

遊客，如果您要查看本帖隱藏內容請回復

oiziyo

那麼勵害，
& Z' L9 H; Q6 z3 o2 j這可是高手啊，
8 I0 P" w$ ~' ~' z4 ~+ h4 j這樣的東西可不是一般人可以做的到的
謝謝分享

afor

原來還可以這樣用啊.....
) u. f, a, y- H- ]- V' l可惜都已經下線出去了,
' i! q1 D( m' u) @. ]+ j/ r謝謝大大分享實用的技巧

jling

正在找这个skill，网上这个资料好少啊，谢谢分享！

ryan1

好像不錯喔.來試試看囉.謝謝您的方享...............

sterling

  謝謝啦謝謝啦 謝謝啦謝謝啦

loongsky

cadence有自带的切角工具嘛

a2763338

非常感謝  這部分目前需要做測試

pjh02032121

好不好用，我来试一试，多谢楼主。

blackcorrupt

謝謝分享囉, 來實驗看看

sheilamenuett

正好很需要，謝謝分享~

janus7799

正好很需要，超級感謝！

skeepy

ic5141  EDIT > Other > modify corner ，不會就按Help 看一下就會設定了。

hunky

太神啦，谢谢分享啊啊啊啊