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

shihen88

! G. g  f  ~- J2 ~- I7 L8 j    一直都想要这样的一功能，在网上找了很久也没有很好的决结方案。
5 x. A* G4 A  k# u5 O+ X  W- b) y今天自己闲着用脚本加ENV设置实现了这个功能，这里是录的视频操效果演示，大家看看效果觉得怎么样。


铺铜显示关闭.exe.rar (861.88 KB, 下载次数: 236)

2013-1-30 16:31 上传

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

longzhiming

有人分享了快捷键:
alias F9 'settoggle  no_etch_shape_display;redraw'
, X0 [# W  M" i" ]" ~8 e. O$ a

枯木雨生花

我是在ENV文件里面添加的：
" T. a, o4 H4 S5 g1 q# q5 u7 l* ofunckey 2 set no_etch_shape_display
  Z+ z% ~9 l$ ^- M+ ofunckey 3 unset no_etch_shape_display

诸葛向上

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

promissingwh

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

promissingwh

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

shihen88

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

没错！是在用户设置，通过Script 录制脚本，然后再通过修改ENV文件设置快捷键
6 J" F9 y9 u; D" b
+ q3 t5 v( b% C; i* K" z7 Ifunckey n replay D:\word_material\MODULE\RE_module\display_shape.scr 脚本存放路径

3 k. U  [% a: K, B7 I
funckey h replay D:\word_material\MODULE\RE_module\no_shape_fill.scr
! r6 |# L0 t. A8 N

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

2013-1-30 17:10 上传

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

shihen88

promissingwh 发表于 2013-1-30 16:58
6 N, l9 @& A6 Z3 [! t& x, P最后的效果不错，不知道怎么实现的？

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

297469214

过来看看

wangshilei

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

longzhiming

wangshilei 发表于 2013-1-31 11:35
2 x- H( h. |; D3 I2 J& p( Z已习惯了显示shape_fill 了，中要调整下透明度，显示是很好的

0 h6 ]* I, B. R" v2 [: S是的,根据不同的板调一下透明度,很少有必要关的时候, 所以不必要设快捷键

XYX365

shihen88 发表于 2013-1-30 17:12
1 |/ {) [3 _3 p5 ~没错！是在用户设置，通过Script 录制脚本，然后再通过修改ENV文件设置快捷键

funckey n replay D:\wo ...

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

1. ; load("fShapesOnOff.il")
   8 M% J) b' X5 B
2. axlSetFunckey("n" "so ON")
   
3. axlSetFunckey("h" "so OFF")
   
4. axlCmdRegister("so" 'fnShapesOnOff ?cmdType "general")
   - g0 W. X* k$ X
5. procedure(fnShapesOnOff(tArge)
   
6.         let((nVersion)
   ! ?$ l7 m. ]" |) U( n7 }: s; d0 |
7.                 nVersion = axlVersion('version)
   
8.                 cond(
   
9.                         (tArge == "ON"
   
10.                                 when(nVersion >= 16.3
    - G8 t: W, p- T, [
11.                                         axlShell("unset no_etch_shape_display")
    
12.                                 )
    ' s  {& s( C7 I7 ^, t4 c9 n
13.                                 axlShell("unset no_shape_fill")
    
14.                         )
    
15.                         (tArge == "OFF"
    $ L% P' ~3 t- ?
16.                                 when(nVersion >= 16.3
    
17.                                         axlShell("set no_etch_shape_display")
    6 l8 `& ]9 O! U8 ~) V4 a+ k5 |
18.                                 )
    
19.                                 axlShell("set no_shape_fill")
      f$ M3 r( X" @, U6 I, }8 |6 I8 S
20.                         )
    " i0 }2 \. a6 @% V
21.                 )
    
22.                 axlShell("redraw")
    
23.         )
    5 M& M9 M* L2 n! K$ t5 G8 W
24. )

复制代码

JIMDENG

8 A7 i% e: K; y& o* T, W  n谢谢xy365，把代码分享，在另外一个"ALLEGRO SKILL开发“栏已设置烂了，进去也下不了SKILL!

JIMDENG

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

molin

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

xxzzhy

挺不错的资料。谢谢楼主