EDA365电子工程师网

标题: cline 转 shape 源码呈上看者有份 [只为三级] [打印本页]

作者: skill_rc 时间: 2016-3-25 11:03
标题: cline 转 shape 源码呈上看者有份 [只为三级]
本帖最后由 skill_rc 于 2016-3-25 13:51 编辑

procedure(convert_cline_shape()
let((cline_ids net layer polydbid)
      axlClearSelSet()
      axlSetFindFilter(?enabled list("noall" "clines") ?onButtons list("noall" "clines"))
      axlSelect(?prompt "Select Clines to convert to a shape.")
      cline_ids= axlGetSelSet()
      if(cline_ids then
         foreach(bid  cline_ids
            net = bid->net->name
            layer = bid->layer
            polydbid = axlPolyFromDB(bid ?endCapType 'OCTAGON)
            axlUIWPrint(nil "### polydbid is %L" polydbid)
            if(polydbid then
                  axlDBCreateShape(car(polydbid) t layer net)
                  axlDeleteObject(bid)
            )
         )
      )
axlClearSelSet()
axlFinishEnterFun()
)
)

补充内容 (2016-7-4 16:19):
出现转换完后多边形线头的问题，只需要修改如下一行代码即可。
polydbid = axlPolyFromDB(bid ?endCapType 'OCTAGON)----〉（修改为下面一行）
polydbid = axlPolyFromDB(bid ?endCapType 'ROUND)

convert_cline_shape.zip

510 Bytes, 下载次数: 43, 下载积分: 威望 -5

补充文件

作者: 不要命的荨麻草 时间: 2016-3-25 11:45
这个怎么用呢？

作者: skill_rc 时间: 2016-3-25 12:23
本帖最后由 skill_rc 于 2016-4-1 09:46 编辑

不要命的荨麻草发表于 2016-3-25 11:451 M/ P* g- q8 [2 c* I
这个怎么用呢？

1，新建一个il文件
2，把这个代码放到这个文件中，保存。
3，通过allegro的命令行部分，输入skill+回车进入skill模式。显示为：skill〉
3，使用load 命令把这个新建的il文件加载进来
4，命令行中输入convert_cline_shape() 敲回车，会提示你选择一个cline，你鼠标点击后，点击的cline就变成shape了。
5，over。

作者: skill_rc 时间: 2016-3-25 12:24
别人回复不会增加我的积分么？哭晕在厕所。。。。。。。

作者: mintjelly_abc 时间: 2016-3-25 13:32
同学，你还不如自己把文件做好，别人下载的时候你还可以赚点积分威望什么的

作者: mintjelly_abc 时间: 2016-3-25 13:46
试了下，蛮好用的，谢谢楼主

作者: skill_rc 时间: 2016-3-25 13:52

mintjelly_abc 发表于 2016-3-25 13:46( Q( t, n* M" n9 h0 m
试了下，蛮好用的，谢谢楼主

还以为别人回复能积分。。。。。。

作者: mintjelly_abc 时间: 2016-3-25 13:58

skill_rc 发表于 2016-3-25 13:52# O- ]! p/ r, u
还以为别人回复能积分。。。。。。

太天真了，我支持下你啊

作者: mintjelly_abc 时间: 2016-3-25 14:00
怎么不在文件里面加个快捷命令行啊？太敷衍了

作者: skill_rc 时间: 2016-3-25 14:01

mintjelly_abc 发表于 2016-3-25 13:58
3 J' D, m+ N' P: e9 u4 R太天真了，我支持下你啊

谢谢！谢谢！谢谢！重要的事情说三遍！

作者: skill_rc 时间: 2016-3-25 14:01

mintjelly_abc 发表于 2016-3-25 14:00
% I( Q r O5 O5 \4 a怎么不在文件里面加个快捷命令行啊？太敷衍了

额。。。。

作者: skill_rc 时间: 2016-3-25 14:06
给附件的函数添加快捷键：
axlCmdRegister("c2s" `convert_cline_shape)

作者: 流云逝水 时间: 2016-3-25 14:08
哈哈！

作者: skill_rc 时间: 2016-3-25 14:14
自己下载还减掉威望值，这是一种什么样的酸爽体验。说好的三级呢。。。。

作者: niliudehe 时间: 2016-3-25 15:37
好几啦

作者: No.5 时间: 2016-3-25 15:49
Command > convert_cline_shape()
E- Command not found: convert_cline_shape()
楼主，这是什么情况，能指点下吗？

作者: jyl518 时间: 2016-3-25 16:51
好东西，谢谢！

作者: skill_rc 时间: 2016-3-28 08:52

No.5 发表于 2016-3-25 15:49
3 `1 M6 n. ]) ]) A7 y HCommand > convert_cline_shape()
) O5 |; x& c3 O. [8 b5 ?6 yE- Command not found: convert_cline_shape()* @3 C0 `7 e; X
楼主，这是什么情况，能 ...

需要进入skill模式，进入方法：输入skill 即可

作者: wareleo 时间: 2016-3-30 09:13
很不错，谢谢

作者: Nicole 时间: 2016-3-31 18:18

skill_rc 发表于 2016-3-28 08:52
: c+ K% x$ E a需要进入skill模式，进入方法：输入skill 即可

我也是用不了，我用的命令是：  skill load（“convert_cline_shape.il")
                  出现  T
                        command> 再输入：convert_cline_shape()
                  出现  E-Command not found: convert_cline_shape()

求解！！

作者: skill_rc 时间: 2016-3-31 18:33

Nicole 发表于 2016-3-31 18:18+ p' ~% b& P) P7 ]! K( s4 O
我也是用不了，我用的命令是： skill load（“convert_cline_shape.il")
( I+ H' x" O, ?) @- U! F9 m 出现 ...

1，输入skill 显示skill〉
2，load("convert_cline_shape.il")
3,convert_cline_shape
4,over

作者: Nicole 时间: 2016-4-1 09:16

skill_rc 发表于 2016-3-31 18:33
' @7 k/ {$ E3 c" _% Y1 ]. d1，输入skill 显示skill〉
% K8 p! E6 f3 w2 Y" `: F- g2，load("convert_cline_shape.il")6 T# U/ j0 K: W" f
3,convert_cline_shape

搞定！谢谢！

作者: skill_rc 时间: 2016-4-1 09:41
本帖最后由 skill_rc 于 2016-4-1 09:47 编辑

使用方法参考三楼说明

作者: Nicole 时间: 2016-4-1 10:07
这个文件线头处转成shape后是45度倒角，怎么转成和线一样的圆头呢？

作者: skill_rc 时间: 2016-4-1 11:00

Nicole 发表于 2016-4-1 10:07 w! V$ [# G5 v* L6 k4 I' D
这个文件线头处转成shape后是45度倒角，怎么转成和线一样的圆头呢？

目前这个skill不具备这个功能。可以参考这个帖子https://www.eda365.com/forum.php? ... D%C7%2B%D4%B2%BD%C7

作者: huxiao119 时间: 2016-4-1 20:47
好人啊，二级也能下载了

作者: skill_rc 时间: 2016-4-11 11:37
路过，顶一下。

作者: skill_rc 时间: 2016-4-13 11:18
ding

作者: skill_rc 时间: 2016-4-15 17:49
福利应该置顶。

作者: skill_rc 时间: 2016-5-5 14:36
新人福利

作者: nyx 时间: 2016-6-28 15:54
顶下

欢迎光临 EDA365电子工程师网 (http://bbs.elecnest.cn/)