实现allegro像PADS那样通过快捷键快速打开关闭铺铜显示

shihen88

    一直都想要这样的一功能，在网上找了很久也没有很好的决结方案。
/ N" \) x3 p# X, `今天自己闲着用脚本加ENV设置实现了这个功能，这里是录的视频操效果演示，大家看看效果觉得怎么样。
( |+ x: n2 J" b% \
* v: J8 m$ Q$ K) h
) H% x8 D/ l3 b 铺铜显示关闭.exe.rar (861.88 KB, 下载次数: 236)

2013-1-30 16:31 上传

点击文件名下载附件
下载积分: 威望 -5

longzhiming

有人分享了快捷键:
alias F9 'settoggle  no_etch_shape_display;redraw'
4 O& D) O& g0 V7 J9 K& `- D6 @2 a

枯木雨生花

我是在ENV文件里面添加的：
funckey 2 set no_etch_shape_display
funckey 3 unset no_etch_shape_display

诸葛向上

看着这快捷方式挺好用的，但是要怎么设置呢？

promissingwh

最后的效果不错，不知道怎么实现的？

promissingwh

是属性里面那个no_shape_fill
怎么把它弄成快捷键的，求赐教

shihen88

promissingwh 发表于 2013-1-30 17:02
是属性里面那个no_shape_fill
怎么把它弄成快捷键的，求赐教

没错！是在用户设置，通过Script 录制脚本，然后再通过修改ENV文件设置快捷键
; e! j0 C6 I- u9 ^$ w2 ^3 {
funckey n replay D:\word_material\MODULE\RE_module\display_shape.scr 脚本存放路径


! ]- N$ j% g9 o' ]! T  h% s5 Kfunckey h replay D:\word_material\MODULE\RE_module\no_shape_fill.scr
' m, I0 {& G2 m' [8 a

这里我电脑上录好的脚本，可能有些电脑分辨率什么不一样会不能用， 那就在自己的电脑上录制一个脚本。
1 \/ w9 }  U& Y4 G# F3 @ RE_module.rar (748 Bytes, 下载次数: 45)

2013-1-30 17:10 上传

点击文件名下载附件
下载积分: 威望 -5

shihen88

promissingwh 发表于 2013-1-30 16:58
最后的效果不错，不知道怎么实现的？

参见下面回复方法可以试一下先， 有什么问题 的话可以给我留言。

297469214

过来看看

wangshilei

已习惯了显示shape_fill 了，中要调整下透明度，显示是很好的

longzhiming

wangshilei 发表于 2013-1-31 11:35
8 l) R5 N- J8 @" t已习惯了显示shape_fill 了，中要调整下透明度，显示是很好的

; H$ f8 p5 g, B8 [1 a. l9 Z是的,根据不同的板调一下透明度,很少有必要关的时候, 所以不必要设快捷键

XYX365

shihen88 发表于 2013-1-30 17:12
1 K+ r! x5 \- }& L5 ~没错！是在用户设置，通过Script 录制脚本，然后再通过修改ENV文件设置快捷键

$ _8 g2 e' W% |+ U/ e, Sfunckey n replay D:\wo ...

可以試試看,使用下面的Skill

1. ; load("fShapesOnOff.il")
   
2. axlSetFunckey("n" "so ON")
   
3. axlSetFunckey("h" "so OFF")
   
4. axlCmdRegister("so" 'fnShapesOnOff ?cmdType "general")
   ! a& X8 ^" k+ L" ~/ u( a0 x" t7 x
5. procedure(fnShapesOnOff(tArge)
   
6.         let((nVersion)
   
7.                 nVersion = axlVersion('version)
   9 M7 N; z" U+ X1 w% w8 ?  I; x
8.                 cond(
   1 x3 u# @) _& N- R" q) G
9.                         (tArge == "ON"
   $ [: j0 ^$ p" [) T& e
10.                                 when(nVersion >= 16.3
    - X3 I. v$ Y& u- {( J
11.                                         axlShell("unset no_etch_shape_display")
    
12.                                 )
    - x8 K3 x" J. _' D6 E8 b0 X
13.                                 axlShell("unset no_shape_fill")
    " ~; R$ a9 ~! u3 F% @1 W2 @  }
14.                         )
    
15.                         (tArge == "OFF"
    1 }- S! _5 I) s  ^+ ~" d
16.                                 when(nVersion >= 16.3
    
17.                                         axlShell("set no_etch_shape_display")
    
18.                                 )
    
19.                                 axlShell("set no_shape_fill")
    
20.                         )
    7 ]0 w$ `7 a" }$ W$ z' y
21.                 )
    % j) `# F5 ~0 ~5 C! f( t- ]7 O) T) j
22.                 axlShell("redraw")
    . H: |7 V% @- L
23.         )
    - i+ Y' z# ]# ]# U2 n4 }' c
24. )

复制代码

JIMDENG

谢谢xy365，把代码分享，在另外一个"ALLEGRO SKILL开发“栏已设置烂了，进去也下不了SKILL!

JIMDENG

同意7.8楼的说法！习惯了就好用。

molin

有原码也不会用啊！！！{:soso_e118:}

xxzzhy

挺不错的资料。谢谢楼主