请问如何将scr写成skill？

亦久忆旧

想写1个scr放置钻孔表，但是下列代码运行以后有问题，论坛大佬可以指导一下嘛？

1. defun(NCdrill_Legend ()
   
2.     let(()
   
3.     ;设置 NCdrill Legend 参数
   
4.     axlShell("setwindow pcb")
   
5.     axlShell("placementedit")
   
6.         axlShell("ncdrill customization")
   
7.         axlShell("setwindow form.nc_drillcustomization")
   
8.         axlShell("FORM nc_drillcustomization auto_symbols;fillin yes")
   
9.         axlShell("FORM nc_drillcustomization done;fillin yes")
   
10.         ;放置 NCdrill Legend 表格
    
11.         axlShell("setwindow pcb")
    
12.         axlShell("placementedit")
    
13.         axlShell("ncdrill legend")
    
14.         axlShell("setwindow form.nc_drilllegend")
    
15.         axlShell("FORM nc_drilllegend backdrill_legends YES")
    
16.         ;根据设计单位，输出
    
17.     (case (car (axlDBGetDesignUnits))
    
18.     ("mils"
    
19.         axlShell("FORM nc_drilllegend output_unit Mils")
    
20.         )
    
21.     ("millimeters"
    
22.     axlShell("FORM nc_drilllegend output_unit Millimeter"))
    
23.         )
    
24.         
    
25.         
    
26.         axlShell("FORM nc_drilllegend done")
    
27.         axlShell("setwindow pcb")
    
28.         axlShell("placementedit")
    
29.         )
    
30. );end defun
    
31. 
    
32. axlCmdRegister("NCdrill" 'NCdrill_Legend)

复制代码

求大佬指导，我应该怎么在skill中写scr？

亦久忆旧

运行以后出现如下错误：W- Cannot exit current application E- Can't find window; form.nc_drillcustomization E- Form not found E- Command not found: fillin yes E- Form not found E- Command not found: fillin yes E- Can't find window; form.nc_drilllegend E- Form not found