查找无位号器件的SKILL（开源）

vivienluo

功能：
1.该SKILL用于查找器件有无位号，并将无位号的器件打印到报表中。
2.会自动跳过本身就无位号的器件（比如定位孔等）。
3.可直接点击报表中的坐标，跳转到指定器件的位置。
4.自动高亮无位号的器件。



代码：

1. /****************************************************/
   
2. /*               Title :  find symbol no refdes                */
   
3. /*     Execute Command :  find_symbol_no_refdes                */
   
4. /*              Author :  Vivien Luo                */
   
5. /*       Creation Date :  2013-09-16                */
   
6. /*                       Update :                                          */
   
7. /*            Web site :  www.allegro-skill.com     */
   
8. /*             E-maial :  admin@allegro-skill.com        */
   
9. /****************************************************/
   
10. axlCmdRegister("find_symbol_no_refdes" 'find_symbol_no_refdes)
    
11. 
    
12. defun(find_symbol_no_refdes ()
    
13.         let((curVisible symbols logfile sym txt norefdes)
    
14.         logifile = outfile("./find_symbol_no_refdes.log")
    
15.         fprintf(logifile "------------------------------------------\n")
    
16.         fprintf(logifile "Find symbol no refdes report                                \n")
    
17.         fprintf(logifile "   Author : Vivien Luo                                        \n")
    
18.         fprintf(logifile "   E-mail : admin@allegro-skill.com                \n")
    
19.         fprintf(logifile "Date&Time : %s                                                        \n" getCurrentTime())
    
20.         fprintf(logifile "------------------------------------------\n")
    
21.         fprintf(logifile "Refdes\t\t\tLocation\n")
    
22.         ;visible the layers
    
23.         axlVisibleLayer("PIN/TOP" t)
    
24.         axlVisibleLayer("PIN/BOTTOM" t)
    
25.         axlVisibleLayer("REF DES/SILKSCREEN_TOP" t)
    
26.         axlVisibleLayer("REF DES/SILKSCREEN_BOTTOM" t)
    
27.         axlVisibleLayer("PACKAGE GEOMETRY/SILKSCREEN_TOP" t)
    
28.         axlVisibleLayer("PACKAGE GEOMETRY/SILKSCREEN_BOTTOM" t)
    
29.         axlVisibleUpdate(t)
    
30.         symbols = axlDBGetDesign()->symbols
    
31.         foreach(sym symbols
    
32.                 norefdes = t
    
33.                 when(sym->refdes
    
34.                         foreach(txt axlDBGetAttachedText(sym)
    
35.                                 when(txt->layer == "REF DES/SILKSCREEN_TOP" || txt->layer == "REF DES/SILKSCREEN_BOTTOM"
    
36.                                         norefdes = nil
    
37.                                 )
    
38.                         )
    
39.                         when(norefdes
    
40.                                 fprintf(logifile "%s\t\t\t(%P)\n" sym->refdes sym->xy)
    
41.                                 axlHighlightObject(sym)
    
42.                         )
    
43.                 )
    
44.         )
    
45.         close(logifile)
    
46.         axlUIViewFileCreate("./find_symbol_no_refdes.log" "Find Symbol No Refdes  - www.allegro-skill.com" nil)
    
47. )
    
48. )

复制代码

find_no_refdes.rar (1.05 KB, 下载次数: 211)

2013-9-16 23:12 上传

点击文件名下载附件

欢迎新手积极提出不明白的地方。。。。

wolf343105

虽然用不到,但还是谢谢你,并祝你节日快乐.

vivienluo

wolf343105 发表于 2013-9-18 16:29
虽然用不到,但还是谢谢你,并祝你节日快乐.

嘿嘿，你也节日快乐哦

XYX365

虽然用不到,但还是谢谢你

375259768

不错，可以用到

andyyu1982

不错，辛苦了

molinchz

谢谢分享

遊樂天空

load("find_no_refdes.il")这样对吗谢谢

vivienluo

遊樂天空 发表于 2013-11-22 16:34
load("find_no_refdes.il")这样对吗谢谢

是的，参考：
http://www.allegro-skill.com/thread-306-1-1.html
http://www.allegro-skill.com/thread-112-1-1.html

ecoren

谢谢lz