有没有cline to shape的skill，帮忙分享一个。谢谢。

promissingwh

1 s3 V" b8 g% K  G. V/ T. z: _9 [
4 Y7 `8 `5 ~5 a. K; i- u* K有没有cline to shape的skill，帮忙分享一个。谢谢。
我在论坛上找到的，运行命令后，会出现：
W- *WARNING* (axlDBCreateOpenShape): Invalid database id argument - dbid:removed

2 ?) W7 ?! S/ O- k" c( d) H; j

dzkcool

Allegro自带了这个功能，启动时打开Toolbox选项，Edit->Cross Copy功能就能实现了。
2 W' `9 a% B5 d3 x5 O, [+ J

db-_-

16.x及之前的版本需要把出现的两个“?undo t"删掉。
+ w9 Y% n# O3 M* M8 y- s6 P

1. ;###############################################################################
   1 C; z3 @7 L, x/ i9 n- n
2. ;                                                                              #
   2 Y% F  f: k# e6 O/ X) M/ Z- a; I
3. ;                      Command: cline2shape                                    #
   8 n# V$ ~2 o8 r; M1 V: x7 r" \
4. ;                   Skill File: cline2shape.il                                 #
   3 [* r$ [3 H5 ]/ J# G
5. ;               How To Execute: Command> cline2shape                           #
   + S% w) K/ A, @
6. ;                                                                              #
   9 [6 l; R  p% ^' e) o$ q
7. ;  DISCLAIMER:                                                                 #
   * d4 k6 `* B* _7 g0 V% L9 O! T2 k
8. ;       The user of this command assumes all responsibility and does not       #
   / `" c) C( S& e5 j8 j/ E, S
9. ;       hold Cadence Design Systems nor the author of this code for any        #
   + K4 i: H. G: }) m6 x  r
10. ;       unwarranted results or problems due to the use of this code.           #
    
11. ;                                                                              #
    : I' C0 H2 C) {* v
12. ;       This is non-supported code and the user may modify it as needed.       #
    
13. ;                                                                              #
    % b& h4 o; A$ `0 s
14. ;###############################################################################
    
15. 
    ) b5 A# u" D! x! T/ \  S; E$ h
16. ; demostrates
    & {4 x0 M* N# S6 s0 D
17. ;        1) style for an interactive command
    
18. ;        2) use of the database tranasction APIs
    
19. ;        3) two styles of undo/redo support
    
20. ; Added undo support
    
21. 
    8 S+ W1 Y- M+ b- C# h: b
22. ;  Know Bug: Sometimes the program will not convert all cline segments but it
    
23. ;            will DELETE all segments.  Use at your OWN discretion!
    * v0 s  \- C" ?3 \
24. ;            Select Cancel or Undo before exiting the command to restore  
    
25. ;            to original Clines.
    6 J) b0 S1 k! M) E6 n  f$ P* f6 n
26. 
    : Y5 \6 O) O1 z- Z, D5 O# A* @
27. 
    
28. 
    
29. 
    + o7 o% U+ G8 x2 |4 M, l1 Y
30. axlCmdRegister("cline2shape" 'LCB_cline_to_shape ?cmdType "interactive"
    4 Z5 V* E- i+ M3 J  ^" \  @) M
31. ?doneCmd 'LCB_Done ?cancelCmd 'LCB_Cancel ?undo t)
    
32. axlCmdRegister("cline2shape2" 'LCB_cline_to_shape2 ?cmdType "interactive"
    
33. ?doneCmd 'LCB_Done ?cancelCmd 'LCB_Cancel ?undo t)
    
34. 
    0 L! y" W3 b% P1 U% o
35. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
36. ; This shows undo where all of the conversions that this user does while
    
37. ; in the command a undone as a single operation.
    
38. ;        To convert an existing command to support undo this method is
    9 b1 U" |6 Z0 S- _& ~
39. ;        typically easier.
    
40. 
    
41. procedure(LCB_cline_to_shape()
    - G% ^, |6 m8 r8 [+ n* z( f
42. let( (lclines layer polydbid )
    3 y# {" c8 ?, J' _( _
43. 
    
44.   LCB_Setup()
    9 l/ C6 o% z  Z
45. 
    
46.   ; cannot have a global transaction if we want undo to roll back each operation
    $ n6 L; n; Y. A9 {8 T8 {$ }
47.   LCB_mark = axlDBTransactionStart()
    # x# J1 A+ q. o' Q5 w/ j0 E; E
48. 
    , ?  R2 u1 [9 O$ c" U3 R
49.   LCBnotDone = t
    
50.   while( LCBnotDone
    6 Z) c& B/ N( D8 @6 X# U1 p2 H
51.       lclines = axlGetSelSet(axlSelect(?prompt "Select Clines to convert to a shape."))
    
52. 
    
53.       foreach( clinedbid lclines
    & P" ^3 {$ F  d4 z( ]
54.             layer = clinedbid->layer
    ; N$ a! u; ]% I+ o$ @
55.             polydbid = axlPolyFromDB(clinedbid ?endCapType "ROUND")
    4 B( c$ w1 o1 `4 U6 X8 E
56. 
    
57.             axlDeleteObject(clinedbid)
    * _- d- G( P1 X" ?8 A& J, ~
58. 
    % k8 U: y* K# L) S+ v) d
59.             unless( axlDBCreateShape(car(polydbid) t layer)  
    
60.                 axlUIWPrint(nil "ERROR: Failed to create Shape from Cline.")
    * D: L( `% M3 N7 {2 `4 R
61.             )
    
62.             when( cadr(polydbid)
    4 L8 l5 p6 J, U
63.                 axlDBCreateShape(cadr(polydbid) t layer)
    ( p+ \6 T7 U7 Y- \1 H- g
64.             )
    ) q5 @$ h2 h' a' X% [0 c9 d# N
65.      )
    
66. 
    7 F( y( x8 n* s1 n9 ~, r  u
67.      ; marks are only required if undo is using rolling back all database changes
    5 [, N8 g* E) g: _/ S- j
68.      ; when command is active. When undoing each conversion this is not needed
    + t4 L2 F! Z, y5 Y3 A& c3 t3 p
69.      ; nor is Oops functional.
    
70.      when(LCB_mark axlDBTransactionMark(LCB_mark))
    
71.   )
    2 x  Q) N. y1 K/ @  ?# m
72.   ;LCB_Done() ; just in case
    
73. ))
    
74. 
    
75. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
76. ; This shows undo where each conversion is supported as seperate undo operation
    
77. ; in the command a undone as a single operation.
    ! s; m' w1 y. H2 e4 K1 B2 [* K0 \9 P
78. ;        To convert an existing command to support undo this method is
    
79. ;        typically easier.
    
80. 
    
81. procedure(LCB_cline_to_shape2()
    
82. let( (lclines layer polydbid doMark )
    + W* Z: E2 d- ]6 R& B5 n
83. 
    $ [- ?+ C! y& P% w7 [/ a
84.   LCB_Setup()
    ) l; {* c2 R0 {3 }- Y: h1 g9 _3 h
85. 
    0 L% a; G0 O8 y! W2 D4 H. h: b  R
86.   ; cannot have a global transaction if we want undo to roll back each operation
    2 K! [4 G* b, f7 l" l9 i4 X
87. 
    
88.   LCBnotDone = t
    . N/ f: f- Y* K9 M$ g$ n8 m
89.   doMark = 'undoMark
    
90. 
    
91.   while(LCBnotDone
    - {0 r! M0 o+ F* b9 h
92.       lclines = axlGetSelSet(axlSelect(?prompt "Select Clines to convert to a shape."))
    
93. 
    
94.       ; need to do a start/commit for each operation if we want undo to
    
95.       ; rollback each change. This mostly disables Oops
    
96.       ;          don't want to start a transaction unless we have work to do or it will
    
97.       ;   do a unneeded undoMark.
    
98.       when(lclines
    - |; n0 @* ^" J. f3 \* z. u+ L
99.           LCB_mark = axlDBTransactionStart(doMark)
    4 m7 W9 a8 i: D5 L7 K( s
100.       )
       Y) x4 M( t+ U
101. 
     
102.       foreach( clinedbid lclines
     $ ?8 _" I9 {  [2 l1 |6 _
103.             layer = clinedbid->layer
     ! ^  P/ }( |. f* o
104.             polydbid = axlPolyFromDB(clinedbid ?endCapType "ROUND")
     - `. B# |' d" M/ U/ `7 Y
105. 
     
106.             axlDeleteObject(clinedbid)
     
107. 
     
108.             unless( axlDBCreateShape(car(polydbid) t layer)
     
109.                 axlUIWPrint(nil "ERROR: Failed to create Shape from Cline.")
     
110.             )
     
111.             when( cadr(polydbid)
     5 u! m3 N4 ]3 A, u7 r9 Q
112.                 axlDBCreateShape(cadr(polydbid) t layer)
     + z) g8 E2 k4 \' X
113.             )
     - _7 l; g$ b% z6 L) K1 Q
114.      )
     
115. 
     & o( o. r& z. z) k9 b" X: {; Z
116.      ; marks are only required if undo is using rolling back all database changes
     4 x* S- W! y6 ]; P( ~! {
117.      ; when command is active. When undoing each conversion this is not needed
     
118.      ; nor is Oops functional.
     
119.      when(LCB_mark axlDBTransactionCommit(LCB_mark))
     / f1 x& l0 U1 A9 j9 V
120.      LCB_mark = nil
     
121.   )
     ' t+ J7 t  s+ O/ {$ C9 Z! _
122.   LCB_Done() ; just in case
     
123. ))
     3 b" m, r5 E2 P  o: j! r5 e) f/ ^
124. 
     
125. 
     ( N+ K4 p' D- ~7 l: X: a
126. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
     3 Q( o* p' X8 d: F+ S6 T7 ]3 x
127. ;; support APIs
     4 o1 ?1 ]2 {7 F0 _+ B
128. 
     
129. procedure(LCB_Setup()
     - L- A' O9 v" I, j' e0 H
130. let( (popup)
     
131.   axlSetFindFilter(?enabled list("noall" "clines")
       S! }0 A* Y! X) ]+ f
132.                   ?onButtons list("noall" "clines"))
     8 `. g4 g! T2 L6 v
133. 
     $ ^( R7 u$ D9 n3 D
134.   popup = axlUIPopupDefine( nil (list
     
135.     (list "Done" 'LCB_Done)
     
136.     (list "Oop" 'LCB_Oops)
     
137.     (list "Cancel" 'LCB_Cancel)
     
138.      ))
     9 r6 @9 A4 y5 R" D; D9 ?4 x) {
139. 
     3 P5 z7 n9 J$ g7 q( r! E5 h
140.   ; Snapping is not required by this command but this shows the ability
     
141.   ; to add the snap sub-menu to the Right Mouse Popup menu
     
142.   axlSnapEnableAtRMB()
     
143. 
     0 L+ |7 w7 m: H+ O
144.   axlUIPopupSet(popup)
     5 `, M" q2 @5 B! |* b; w
145.   LCB_mark = nil
     4 Q, Q$ G- I2 C
146. ))
     
147. 
     
148. procedure(LCB_Oops()
     
149.   when(LCB_mark
     4 v5 y9 j6 L; s- Y
150.     if(! axlDBTransactionOops(LCB_mark) then
     
151.       axlUIWPrint(nil "-- Nothing Left To oops. --")
     
152.     else
     ( d7 e7 W* J4 @: U
153.       axlUIWPrint(nil "-- Replacing Clines. --")
     & E8 s$ x2 {9 }5 @3 x  J
154.     )
     
155.   )
     
156.   axlClearSelSet()
     
157. )
     ( [5 C+ L9 E; I9 w. I8 T! _8 H3 p
158. 
     3 e7 |3 g; [( y! V" M# `
159. procedure(LCB_Cancel()
     0 D+ n9 t# ^, g
160.   axlUIWPrint(nil "** Cancelled Program. **")
     
161.   when( LCB_mark axlDBTransactionRollback(LCB_mark))
     
162.   ;LCB_mark = nil
     
163.   LCBnotDone = nil
     
164.   axlClearSelSet()
     ; R2 K" H) |  _( p4 C( i+ V( ?
165.   axlCancelEnterFun()
     
166. )
     
167. 
     
168. 
     
169. procedure(LCB_Done()
     * u( O6 W- F- ~3 H
170.   when( LCB_mark axlDBTransactionCommit(LCB_mark))
     # j* P9 K' R& v- y. b
171.   ;LCB_mark = nil
     
172.   LCBnotDone = nil
     
173.   axlFinishEnterFun()
     " S' s& C' N& O+ t0 N
174. )
     

复制代码

子木_eda

db-_- 发表于 2022-2-18 11:54
16.x及之前的版本需要把出现的两个“?undo t"删掉。

删掉也不行，还是报错E- *Error* axlDBTransactionStart: too many arguments (0 expected, 1 given) - (undoMark)
+ l+ e2 K+ _5 g# K9 K3 ]

ph20009

看一下，学一下

owenli520

dzkcool 发表于 2019-1-2 15:50
3 ~5 e* E+ o  o8 ~Allegro自带了这个功能，启动时打开Toolbox选项，Edit->Cross Copy功能就能实现了。

学习了

lavidayao

owenli520 发表于 2019-1-4 10:00
2 k3 J. O# w3 V; [# y) G0 \* D: i学习了

请问16.6有这个功能吗
0 w0 F7 N; R+ E

dzkcool

从16.6开始就有了

13349852893

allegro productivity toolbox

13349852893

corss copy确实很好用，还可以直接将pad copy成shape,对于挖空来说很方便。

owenli520

lavidayao 发表于 2019-1-4 10:14
请问16.6有这个功能吗

. @8 [: R5 ~1 h$ r新版本有，我用的17.2

melody55555

新版的功能学习起来
; |0 \8 c5 m4 G

nnew

13349852893 发表于 2019-1-4 11:21
  \+ d' y7 A7 U! ~+ `- g* r% }allegro productivity toolbox

/ [6 g; o7 `3 X$ M請問是在哪裡呢? 我的沒瞧見

何文斌

16.6版本 shape栏有个compose shape 选中后，在optins 选项栏中 设置好你要的shape图层属性。在finds中只勾选lines然后框选你的闭合线框就会生成你设定的shape。注意线框一定要闭合的

promissingwh

何文斌 发表于 2019-1-9 10:16
16.6版本 shape栏有个compose shape 选中后，在optins 选项栏中 设置好你要的shape图层属性。在finds中只勾 ...

. X# H! e0 F8 B" N这个15.X版本就已经有了的。不过还是感谢回答。

promissingwh

dzkcool 发表于 2019-1-4 10:16
7 [: H9 ]& T; o" {0 Z从16.6开始就有了

我哪儿都找不到toolbox，请问在哪里可以打开？麻烦告之，谢谢！
9 E+ c4 E( ~  a" D- `. U4 o, z

promissingwh

dzkcool 发表于 2019-1-4 10:16
从16.6开始就有了

是不是需要再打个补丁？
6 D9 j4 H- t/ N, c1 \