热度 1|
;; Date : 17 April 2013 ;; Revision : 1.1 ;; Author : Divya Akella ;; Description : Skill procedures and Bindkeys for easier layout drawing procedure( AllLayerToggle(num "x") leiMouseSetEntryLayer(779) let(((AllList list(sprintf(nil "M%d" num) "drawing")) ) if( leIsLayerVisible(AllList) then leSetAllLayerVisible(nil) else leSetAllLayerVisible(t) ) hiRedraw() ) ) hiSetBindKey("Layout" "<Key>0" "AllLayerToggle(1)") procedure( MetalToggle(num "x") leiMouseSetEntryLayer(779) let(((MetalList list(sprintf(nil "M%d" num) "drawing")) ) if( leIsLayerVisible(MetalList) then leSetLayerVisible(MetalList nil) else leSetLayerVisible(MetalList t) ) hiRedraw() ) let(((ViaList list(sprintf(nil "V%d" num) "drawing")) ) if( leIsLayerVisible(ViaList) then leSetLayerVisible(ViaList nil) else leSetLayerVisible(ViaList t) ) hiRedraw() ) ) procedure( RXToggle() leiMouseSetEntryLayer(779) if( leIsLayerVisible(list("RX" "drawing")) then leSetLayerVisible(list("RX" "drawing") nil) else leSetLayerVisible(list("RX" "drawing") t) ) hiRedraw() if( leIsLayerVisible(list("CA" "drawing")) then leSetLayerVisible(list("CA" "drawing") nil) else leSetLayerVisible(list("CA" "drawing") t) ) hiRedraw() ) procedure( PCToggle() leiMouseSetEntryLayer(779) if( leIsLayerVisible(list("PC" "drawing")) then leSetLayerVisible(list("PC" "drawing") nil) else leSetLayerVisible(list("PC" "drawing") t) ) hiRedraw() if( leIsLayerVisible(list("CA" "drawing")) then leSetLayerVisible(list("CA" "drawing") nil) else leSetLayerVisible(list("CA" "drawing") t) ) hiRedraw() ) procedure( NWToggle() leiMouseSetEntryLayer(779) if( leIsLayerVisible(list("NW" "drawing")) then leSetLayerVisible(list("NW" "drawing") nil) else leSetLayerVisible(list("NW" "drawing") t) ) hiRedraw() ) hiSetBindKey("Layout" "<Key>1" "MetalToggle(1)") hiSetBindKey("Layout" "<Key>2" "MetalToggle(2)") hiSetBindKey("Layout" "<Key>3" "MetalToggle(3)") hiSetBindKey("Layout" "<Key>4" "MetalToggle(4)") hiSetBindKey("Layout" "<Key>5" "MetalToggle(5)") hiSetBindKey("Layout" "<Key>6" "MetalToggle(6)") hiSetBindKey("Layout" "Shift<Key>1" "RXToggle()") hiSetBindKey("Layout" "Shift<Key>2" "PCToggle()") hiSetBindKey("Layout" "Shift<Key>3" "NWToggle()") procedure( MetalSelect(num "x") let(((MetalList list(sprintf(nil "M%d" num) "drawing")) ) leSetEntryLayer(MetalList) hiRedraw() ) ) hiSetBindKey("Layout" "Ctrl<Key>1" "MetalSelect(1)") hiSetBindKey("Layout" "Ctrl<Key>2" "MetalSelect(2)") hiSetBindKey("Layout" "Ctrl<Key>3" "MetalSelect(3)") hiSetBindKey("Layout" "Ctrl<Key>4" "MetalSelect(4)") hiSetBindKey("Layout" "Ctrl<Key>5" "MetalSelect(5)") hiSetBindKey("Layout" "Ctrl<Key>6" "MetalSelect(6)") hiSetBindKey("Layout" "Ctrl<Key>7" "leiMouseSetEntryLayer(0)") hiSetBindKey("Layout" "Ctrl<Key>8" "leiMouseSetEntryLayer(32)") hiSetBindKey("Layout" "Ctrl<Key>9" "leiMouseSetEntryLayer(16)")