via center代码分享。新手不懂的地方直接回帖即可。

vivienluo

1. /****************************************************/
   
2. /*               Title :  Via Center                                */
   
3. /*     Execute Command :  via_center                                */
   
4. /*              Author :  Vivien Luo                */
   
5. /*       Creation Date :  2013-07-13                */
   
6. /*       Creation Date :                                          */
   
7. /*            Web site :  www.allegro-skill.com     */
   
8. /*             E-maial :  admin@allegro-skill.com        */
   
9. /*                            QQ :  379809083                                        */
   
10. /****************************************************/
    
11. 
    
12. axlCmdRegister("via_center" 'via_center ?cmdType "interactive"
    
13.                                  ?doneCmd 'via_center_done ?cancelCmd 'via_center_Cancel)
    
14. 
    
15. procedure(via_center()
    
16. notdone = t
    
17. axlUIWPrint(nil "Via Center Set V1.0")
    
18. axlUIWPrint(nil "Written by VivienLuo - Email:admin@allegro-skill.com")
    
19. while(notdone
    
20.         FirstPin = nil
    
21.         SecondPin = nil
    
22.         axlClearSelSet()
    
23.         axlSetFindFilter(?enabled list("noall" "pins") ?onButtons list("noall" "pins"))
    
24.         axlUIWPrint(nil "Please Select First Pin.....")
    
25.         axlSingleSelectPoint()
    
26.         FirstPin = car(axlGetSelSet())
    
27.         axlClearSelSet()
    
28.         axlHighlightObject(FirstPin)
    
29.         axlSetFindFilter(?enabled list("noall" "pins") ?onButtons list("noall" "pins"))
    
30.         axlUIWPrint(nil "Please Select Second Pin.....")
    
31.         axlSingleSelectPoint()
    
32.         SecondPin = car(axlGetSelSet())
    
33.         axlClearSelSet()
    
34.         axlHighlightObject(SecondPin)
    
35.         when(FirstPin != nil && SecondPin != nil
    
36.                 centerPoint = (xCoord(FirstPin->xy) + xCoord(SecondPin->xy))/2 : (yCoord(FirstPin->xy) + yCoord(SecondPin->xy))/2
    
37.                 axlClearSelSet()
    
38.                 axlSetFindFilter(?enabled list("noall" "vias") ?onButtons list("noall" "vias"))
    
39.                 axlUIWPrint(nil "Please Select Via...")
    
40.                 axlSingleSelectPoint()
    
41.                 selVia = car(axlGetSelSet())
    
42.                 if(selVia
    
43.                         then
    
44.                                 axlDBCreateVia(selVia->name centerPoint)
    
45.                         else
    
46.                                 axlUIWPrint(nil "No via selected....")
    
47.                 )
    
48.         );end when
    
49.         axlDehighlightObject(FirstPin)
    
50.         axlDehighlightObject(SecondPin))
    
51. );end procedure
    
52. 
    
53. procedure(via_center_done()
    
54.                 notdone = nil
    
55.                 axlFinishEnterFun()
    
56.                 axlUIWPrint(nil "- Done -")
    
57. )
    
58. procedure(via_center_Cancel()
    
59.                 notdone = nil
    
60.                 axlCancelEnterFun()
    
61.                 axlUIWPrint(nil "- Cancel -")
    
62. )

复制代码

f126054488

謝謝大大學到很多

冷青瓷

不好意思问，新手很多看不懂

冷青瓷

axlSetFindFilter(?enabled list("noall" "pins") ?onButtons list("noall" "pins"))这句看不明白，是这个个函数括号里面的看不懂

vivienluo

冷青瓷 发表于 2013-7-25 16:06
axlSetFindFilter(?enabled list("noall" "pins") ?onButtons list("noall" "pins"))这句看不明白，是这个个 ...

用于筛选需要选择的目标

冷青瓷

能否详细说明？

vivienluo

冷青瓷 发表于 2013-7-26 08:40
能否详细说明？

就是设置侧边栏find里面的选项，设置成什么，就只能选择什么。

warlock

就是让option栏里的哪些项打勾，哪些项不打勾。

warlock

冷青瓷 发表于 2013-7-25 16:06
axlSetFindFilter(?enabled list("noall" "pins") ?onButtons list("noall" "pins"))这句看不明白，是这个个 ...

这句就是控制Find面板中哪些项 打勾，哪些项不打勾

Sun

多谢楼主了，