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

12345

最近才剛在看SKILL,cadence的pdf檔寫的好爛,一個leChopShape試好久才試出來,這是我最近寫的,還有註解
. ]$ H6 Q# h. J# L/*
; r7 V/ `% C. B2 @9 W/ ?- B//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
作者:Y.P.LIN
File name : CUT.il
POP menu Write by nfmao
Date: 2007.12.11
Ver : 0.01
1 Z% o: P' I. o用法:在icfb,load本sKILL(例如 load "CUT.il" ),再開一個layout,選取rectangle(可複選),按滑鼠中鍵(會跳初選單),再選chop
參考:雷奧星空論壇(http://www.armbell.com/forum/viewforum.php?f=13&mforum=iclayout)
     :中国集成电路教育网(http://www.icedu.net/Article/shuzi/houduan/Index.html)
' f# p% M4 o' [     :cadence手冊(安裝目錄下/doc/sk開頭目錄)
  y' R6 ]' d/ Q0 J; ]注:本SKILL還在開發中,目前只能切RECTANGLE的4個角
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
, }! a. |4 z8 ^*/
& C# S+ B4 ~0 U% `  r;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;cut矩型的4個角;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
* {# ?8 ^8 C/ }. ~procedure(getXY(xyBox)                                ;取得四邊行CUT點座標的程序
- B4 v1 _* P, Y. b+ A, kd=0.5                                                 ;切的距離(自己設)
9 K, N4 e1 \9 n/ t: n( |x1 = car(car(xyBox))
+ G# ?2 L. m4 [0 Wy1 = cadr(car(xyBox))
x2 = car(cadr(xyBox))
; ~8 Q7 L8 n* h3 L8 k4 Y5 e9 U" oy2 = cadr(cadr(xyBox))
+ Y* N/ N4 V) i" L( Qcut1=list((x1:y1) (x1+d:y1) (x1:y1+d) (x1:y1))                        ;cut lin1座標list(是一個封閉cycle)
cut2=list((x2:y1) (x2-d:y1) (x2:y1+d) (x2:y1))                        ;cut lin2座標list(是一個封閉cycle)
: d& A0 j8 Y6 k6 {; ocut3=list((x1:y2) (x1+d:y2) (x1:y2-d) (x1:y2))                        ;cut lin3座標list(是一個封閉cycle)
5 R. t3 [3 z" d% Z3 ~* ncut4=list((x2:y2) (x2-d:y2) (x2:y2-d) (x2:y2))                        ;cut lin4座標list(是一個封閉cycle)
- [# m( Y. [, ?8 l)
* Z0 e& o# @3 s- e& Y# _
8 U: {9 u% a* l: Q! Iprocedure(chop()
5 G  X8 |2 @$ L; i5 j   selobj=geGetSelSet()                                ;取得選的物件
   foreach(shape selobj                                ;把每一個物件逐一丟到shape變數
3 C5 J! i4 }: _% g   ;leChopShape( selobj list(0:0 100:100 ) nil nil 10 )
   selobjbox=shape~>bBox                               ;取得物件的BOX(指方形座標2點->list)
+ J  p& x/ y3 Z0 c) K+ n( @; o- i   getXY(selobjbox);                                   ;呼叫getXY程序,且給一個參數selobjx
8 S* h# Z8 Q" }+ M' m# Y+ G7 G   leChopShape( shape cut1  t t)                       ;cut一邊,第一個t只是一個封閉cycle,第2個t指移除(remove)
   leChopShape( shape cut2  t t)                       ;cut一邊
   leChopShape( shape cut3  t t)                       ;cut一邊
* _6 i9 @" S& |; g  x   leChopShape( shape cut4  t t)                       ;cut一邊
9 q, v% u" m4 E  z8 r  P   println(x1);
   println(y1);
   println(x2);
   println(y2);
7 C% V0 T3 b3 ?" K0 {) R4 }, h   );foreach
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;表單;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
4 F( t' M8 d' W, z: Q( ptrA_MenuItem = hiCreateMenuItem(                          ;menu項目1
   ?name 'trA_MenuItem
   ?itemText "chop"                                       ;menu項目2標題
2 _  k9 S) `1 n" A" a4 a   ?callback "chop()" ;;; prints B in the CIW             ;選項後的動作(呼叫chop()程序)
& O$ u8 ]5 v1 M3 d* ]1 Z  z   )
trB_MenuItem = hiCreateMenuItem(                          ;menu項目2
   ?name 'trB_MenuItem
- _3 m. z8 h5 ^+ B" B   ?itemText "Hello World"                                ;menu項目1標題
: K" V" g3 g7 W# J% W   ?callback  "println(word)"                     ;選項後的動作(在CIW視窗印出Hello World!!)
# w  c# s+ L0 ]2 E' [, p   )


procedure(trSimpleMenu()                                ;產生meun表單的程序
let((simpleMenuID)                                     ;宣告區域(local)變數
6 N% L* i4 M9 H  n( e4 g  y$ N, Sword="Hello wodr!!"                                    ;字串變數
1 ^3 s" x4 @9 U$ O/ }6 jsimpleMenuID=hiCreateMenu(                              ;產生一個menu
) l7 ?- m8 J4 Z, w! _'simpleMenu                                            ;GLOBAL(ID)
2 z6 f4 J9 U; J9 e$ N/ C6 r"Simple Menu"                                          ;標題
'(trA_MenuItem trB_MenuItem)                           ;LIST(表單的項目)
- Z+ `+ Y# I' Z/ q)
+ t0 h0 q5 o3 j+ C* j
hiDisplayMenu(simpleMenuID)                             ;根據menuID在螢幕顯示
4 v# d+ |* {; |2 P);let
% V5 N9 ~0 b, J# a: w( ?0 b/ M);proce

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

oiziyo

那麼勵害，
4 t7 x  D2 N3 h  U* l; ?5 k* x這可是高手啊，
1 c# E9 \$ d4 _4 v這樣的東西可不是一般人可以做的到的
4 ^$ D2 I) c) D; P. A+ p9 V謝謝分享

afor

原來還可以這樣用啊.....
" }0 X" V* z8 |! W  b可惜都已經下線出去了,
謝謝大大分享實用的技巧

jling

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

ryan1

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

sterling

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

loongsky

cadence有自带的切角工具嘛

a2763338

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

pjh02032121

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

blackcorrupt

謝謝分享囉, 來實驗看看

sheilamenuett

正好很需要，謝謝分享~

janus7799

正好很需要，超級感謝！

skeepy

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

hunky

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