求教各位大侠？skill如何兼容不同版本的软件

zhangjunxuan21

我用fpm的方法将群里面各位大侠几个好用的skill导入到15.5中可以使用，可是软件转换成16.3的时候（电脑同时安装了16.3和15.5）这时候问题来了，16.3的菜单不正常了，查找了一下原因发现E:\work\pcbenv目录下的allegro.ilinit文件里面有这么一句 load( "D:\\user15.51\\pcbenv\\DstCxi.il")，当我把这一句删掉的时候，skill导入到16.3就不会出现菜单混乱不能用的现象，不知道有没有神马办法可以让skill兼容2个版本的软件，就像我们论坛里面的这个365 skill一样可以调用，这样子发现好的skill可以弥补论坛365 skill没有的功能。诚心求教啊

wu55

謝謝

zhangjunxuan21

https://www.eda365.com/search.php ... l%BC%D3%D4%D8%C6%F7

zhangjunxuan21

qianfengsjtu 发表于 2012-12-8 06:44

谢谢大侠的热心帮助 我找到一个解决办法了 用这个帖子里面的加载器可以兼容多个版本软件skill的加载 https://www.eda365.com/forum.php? ... l%BC%D3%D4%D8%C6%F7  不过被加密了看不到代码  大侠写的这个skill我试试啊

zhangjunxuan21

谢谢大侠的热心帮助 我找到一个解决办法了 用这个帖子里面的加载器可以兼容多个版本软件skill的加载 https://www.eda365.com/forum.php? ... l%BC%D3%D4%D8%C6%F7  不过被加密了看不到代码  大侠写的这个skill我试试啊

qianfengsjtu

这个是我想出来的办法，但没有在15.x里面试过，不知道15.x里axlmenudump和axlmenuload命令是否可以用。

qianfengsjtu

1. axlCmdRegister("menumain" 'menumain);register command
   
2. 
   
3. procedure(menumain()
   
4.         let(()
   
5.                 menucheck()
   
6.                 if(check_result==nil
   
7.                         then
   
8.                         menuload()
   
9.                         else
   
10.                         menudelete()
    
11.                 )
    
12.                 deleteFile(strcat(getWorkingDir(),"/old.men"))
    
13.                 deleteFile(strcat(getWorkingDir(),"/new.men"))
    
14.                 deleteFile(strcat(getWorkingDir(),"/check.men"))
    
15.         )
    
16. );menumain function
    
17. 
    
18. procedure(menuload()
    
19.         let((origin_menufile,inport,outport,nextline)
    
20.                 origin_menufile=axlUIMenuDump(strcat(getWorkingDir(),"/old.men"))
    
21.                 inport=infile(origin_menufile)
    
22.                 outport=outfile(strcat(getWorkingDir(),"/new.men"))
    
23.                 gets(nextline inport)
    
24.                 while(nextline!="END\n"
    
25.                         fprintf(outport,nextline)
    
26.                         gets(nextline,inport)
    
27.                         )
    
28.                 fprintf(outport,"    POPUP \"%s\"\n","SKILL PDFs")
    
29.                 fprintf(outport,"    BEGIN\n")
    
30.                 fprintf(outport,"        MENUITEM \"%s\", \"%s\"\n","SKILL Language User Guide","skill pdf1")
    
31.                 fprintf(outport,"        MENUITEM \"%s\", \"%s\"\n","SKILL Language Reference","skill pdf2")
    
32.                 fprintf(outport,"        MENUITEM \"%s\", \"%s\"\n","Allegro eXtention Language","skill pdf3")
    
33.                 fprintf(outport,"        MENUITEM \"%s\", \"%s\"\n","SKILL Development Help","skill pdf4")
    
34.                 fprintf(outport,"    END\n")
    
35.                 fprintf(outport,"END\n")
    
36.                 close(outport)
    
37.                 close(inport)
    
38.                 axlUIMenuLoad(strcat(getWorkingDir(),"/new.men"))
    
39.         )
    
40. );menuload function
    
41. 
    
42. procedure(menudelete()
    
43.         let((origin_menufile,inport,outport,nextline)
    
44.                 origin_menufile=axlUIMenuDump(strcat(getWorkingDir(),"/old.men"))
    
45.                 inport=infile(origin_menufile)
    
46.                 outport=outfile(strcat(getWorkingDir(),"/new.men"))
    
47.                 gets(nextline inport)
    
48.                 while(nextline!="    POPUP \"SKILL PDFs\"\n",
    
49.                         fprintf(outport,nextline)
    
50.                         gets(nextline,inport)
    
51.                         )
    
52.                 fprintf(outport,"END\n")
    
53.                 close(outport)
    
54.                 close(inport)
    
55.                 axlUIMenuLoad(strcat(getWorkingDir(),"/new.men"))
    
56.         )
    
57. );menudelete function
    
58. 
    
59. procedure(menucheck()
    
60.         check_result=prog((check_menufile,inport,outport,nextline)
    
61.                                         check_menufile=axlUIMenuDump(strcat(getWorkingDir(),"/check.men"))
    
62.                                         inport=infile(check_menufile)
    
63.                                         START
    
64.                                         gets(nextline inport)
    
65.                                         if(nextline=="    POPUP \"SKILL PDFs\"\n"
    
66.                                                 then
    
67.                                                 close(inport)
    
68.                                                 return(t)
    
69.                                                 else
    
70.                                                         if(nextline==nil
    
71.                                                         then
    
72.                                                         go(END)
    
73.                                                         else
    
74.                                                         go(START)
    
75.                                                         )
    
76.                                         )
    
77.                                         END
    
78.                                         close(inport)
    
79.                                 )
    
80. );menucheck function, return t if added already or nil if not added yet.
    
81. 
    
82. procedure(pdf1()
    
83.         axlPdfView(strcat(cdsGetInstPath("doc"),"\\sklanguser\\sklanguser.pdf"))
    
84. )
    
85. procedure(pdf2()
    
86.         axlPdfView(strcat(cdsGetInstPath("doc"),"\\sklangref\\sklangref.pdf"))
    
87. )
    
88. procedure(pdf3()
    
89.         axlPdfView(strcat(cdsGetInstPath("doc"),"\\algroskill\\algroskill.pdf"))
    
90. )
    
91. procedure(pdf4()
    
92.         axlPdfView(strcat(cdsGetInstPath("doc"),"\\skhelp\\skhelp.pdf"))
    
93. )

复制代码

qianfengsjtu

额。。。我花了15金币才下了你的skill附件，让我先看看是什么问题再回复你啊

qianfengsjtu

zhangjunxuan21 发表于 2012-12-4 16:14
不知道大侠方便把这个加载菜单的skill分享一下吗 最近瞎折腾了好几天 愣是没搞出来又还原成最初的了 新手 ...

不好意思最近太忙了，没看到你的回复啊

zhangjunxuan21

qianfengsjtu 发表于 2012-11-29 09:59
一直劝说大家不要直接改menu file然后load，这样会造成很多问题
不过貌似坛子里很多人都喜欢这么做
我自己 ...

不知道大侠方便把这个加载菜单的skill分享一下吗 最近瞎折腾了好几天 愣是没搞出来又还原成最初的了 新手还不会学skill，自学了点勉强看懂了一些些

zhangjunxuan21

qianfengsjtu 发表于 2012-11-30 05:14
axlUIMenuDump是一个skill AXL 函数
就是Allegro Extention Language,就是Allegro提供的库函数

{:soso_e143:} 糗大了

qianfengsjtu

axlUIMenuDump是一个skill AXL 函数
就是Allegro Extention Language,就是Allegro提供的库函数

zhangjunxuan21

qianfengsjtu 发表于 2012-11-29 09:59
一直劝说大家不要直接改menu file然后load，这样会造成很多问题
不过貌似坛子里很多人都喜欢这么做
我自己 ...

我也知道不要直接改menu，可以用fpm加载skill的时候他就会生成一个menu文件，这个menu文件在切换版本的时候以后重新加载的时候不会跟着改变，这个问题很多指导skill用fpm方法加载的文档都没提出来，每次都要还原环境变量以后重新加载才能切换过去，这样子很不方便，调用个skill文件都要整半天很不方便，期待大侠们分享一个加载skill的工具，兼容不同版本，还能在软件菜单上直接调用，而不是每次都要输入调用命令。能分享一下你说的软件吗

zhangjunxuan21

wolf343105 发表于 2012-11-29 14:04
你否把你的SKILL发给我吗?下载扣分太严重了. thanks.

好 明天发给你 最近忙着画板子都没上论坛了

zhangjunxuan21

wolf343105 发表于 2012-11-29 14:04
你否把你的SKILL发给我吗?下载扣分太严重了. thanks.

嗯好 我明天上班的时候发给你 最近赶着一块板子没空儿研究这个也没上论坛了