|
|
EDA365欢迎您！
您需要 登录 才可以下载或查看，没有帐号？注册
x
本帖最后由 skill_rc 于 2016-3-25 13:51 编辑 3 C4 X. S# x- ]/ P0 G( C4 Q- v, s9 C
8 X6 y: c* c# p1 r" |7 O4 }+ p4 Iprocedure(convert_cline_shape()8 x- v3 T5 B+ q. l5 q4 `1 {
let((cline_ids net layer polydbid)
' P6 R, ]& r0 y2 Z% m8 g2 }" I axlClearSelSet()+ \( b: l. b3 G5 A
axlSetFindFilter(?enabled list("noall" "clines") ?onButtons list("noall" "clines"))
* v( M" {2 r+ ^: u axlSelect(?prompt "Select Clines to convert to a shape.")
8 y3 ?5 I7 }* ?& Y) u9 R9 a cline_ids= axlGetSelSet()2 a i0 a$ J( T6 M
if(cline_ids then
& j5 n6 l' N6 a7 D( k foreach(bid cline_ids
1 s, i; ~( C3 t- P: S- b% Q$ _3 N8 L net = bid->net->name. |+ ]- ^5 p g+ `
layer = bid->layer8 }, g5 N: s7 Z. o, R* c
polydbid = axlPolyFromDB(bid ?endCapType 'OCTAGON)! D2 |% o. ]8 Z
axlUIWPrint(nil "### polydbid is %L" polydbid)* r1 a0 Y6 v" {# Z
if(polydbid then
/ M, x; X/ X& N axlDBCreateShape(car(polydbid) t layer net)$ Y( z: y5 L% g7 A* y2 A6 {* ]
axlDeleteObject(bid)
+ w$ l9 u0 g0 L: T )5 { ?' g! b/ V8 f2 ], ~
): G# L/ U9 Y- J) x7 P
) T! m) d/ k3 Z& w, L
axlClearSelSet()' o2 \ F7 Q$ w
axlFinishEnterFun()
# S8 _0 Q4 V1 _4 ~- J )" c @$ ^9 e$ i h' P
), m0 V: `* T- p) L# R
+ w- V' Y4 }4 \$ a& y
; L: v/ E1 s- R: k补充内容 (2016-7-4 16:19):/ d. {% i4 ?; X) {- e) u4 m0 D
出现转换完后多边形线头的问题，只需要修改如下一行代码即可。
% f' b9 C P) \" K% B$ [- Spolydbid = axlPolyFromDB(bid ?endCapType 'OCTAGON)----〉（修改为下面一行）
1 \) J0 _" N; U# d' @4 E6 Opolydbid = axlPolyFromDB(bid ?endCapType 'ROUND) |
评分
-
查看全部评分
|
/1 
发表于 2016-3-25 11:03
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
微信
收藏
支持！
反对！
楼主
