找一个skill,实现走线时用快捷键切层的功能，求db-_-大佬出山。

vimgcc

8 n; u' i0 \  E
   走线模式下，打孔之后，这时导线被抓取在鼠标上的，想要切层需要鼠标移动到Options里面去点选或者右键菜单换层，这些都是不太理想的方法。以前用过比较笨的方法：


/ G: Z9 g' K4 I: Q1 Z3 Wfunckey L1 "pop swap;subclass top"
funckey L2 "pop swap;subclass top;+"
funckey L3 "pop swap;subclass top;+;+"
1 W) H% Q" B) A* z; ?' Ufunckey L4 "pop swap;subclass top;+;+;+"


......

& @) Y7 F0 p1 g4 U2 o- u
这个方法对于新版的allegro不太好用，它会将所有层都打开。所以我现放弃这个方法了。想找要一个skill，自己又不会写。只能在这里求帮助了。
# n- g6 l6 q( U' V

呼叫db-_-大佬，能帮我写一个吗？按下快捷键，就弹出一个对话框，然后输入数字几就是第几层。就像你之前在别的帖子写的切线宽的skill一样：
9 r/ w: Z- h( i0 T9 G2 \
0 v4 n8 G3 n7 f& Y; i7 q  }) q3 nhttps://eda365.com/thread-628008-1-1.html

, y7 t' _) N: i. n% L. b6 K;;v1.0
4 N" P# R1 e0 \+ h8 `5 L3 m- i. KaxlCmdRegister("caw" 'dbChangeACtWidth ?cmdType "sub_cmd")
axlSetFunckey("w" "caw" t)

( i" S5 s% }# o6 Q;;---------------------------------------------------------
;; skill load "change_ac_width.il"
;;指令: caw
4 V5 M* D! d+ N+ @: T+ u;;功能: 修改ADD CONNECT命令下的线宽
  {2 M0 z! f6 D9 a+ o;;描述: v1.0
7 ^) N7 S- j5 g- j  \2 j;;
* g/ J8 T0 ~6 i- A3 u: Z: j;;---------------------------------------------------------
$ Q% ^$ _: e( ~: L* U8 F
;;主函数
4 N% H# U0 W5 A' pprocedure(dbChangeACtWidth()
% ~- y* q" @1 e3 E) Z; Z(let (width)
    width = axlEnterString(?prompts list("Please enter your width:"))
    when(width && atof(width)
+ |8 B" l( ~% q: D' q  v/ z! n        axlShell(sprintf(nil "options acon_line_width %.2f" atof(width)))
+ x# J' U6 b, X! T    )
))

/ Y# t* f  P7 ?4 F5 x: g1 G7 i

真的非常好用，已经免费使用了你好几个skill，万分感谢！！！
$ J2 b* m2 R/ b6 @1 `1 [7 D
$ v5 t  `* P& U" g) z& U5 U6 z4 b再次拜啦！！

$ i" k/ F' f$ A5 t7 U

; U8 P$ a( A. S0 {# H" j

! c5 a3 z* k; v1 {! j0 x5 {

yangjinxing521

用AI写啊。