请选择 进入手机版 | 继续访问电脑版

EDABOSS电子论坛

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 1079|回复: 6

[转帖] 自动清除当前目录下的Gerber文件和一些没用的临时文件skill

[复制链接]

47

主题

3

回帖

430

E币

技术员

Rank: 2

积分
97
发表于 2017-12-16 16:04:23 | 显示全部楼层 |阅读模式
在大伙的帮助和启发下完成的第一个SKILL,把源代码分享给大家,代码比较简单,思路:通过创建批处理文件,然后向批处理文件中写入删除代码,再调用该批处理删除文件,刚学编写SKILL,代码的注释不知是否正确,有误的地方望指教!
  1. axlCmdRegister( "cam_clear" 'camclear  ?cmdType "general")  ;注册allegro命令"cam_clear",调用函数"camclear",命令类型为"general",当调用命令时会立即执行命令,立即停止allegro当前正在执行的命令。
  2. defun( camclear ()     ;定义函数"camclear"
  3. p = axlDMOpenFile("TEMP" "./temp.bat" "w");在当前目录创建打开一个批处理文件"temp.bat"
  4. fprintf(p "del /f /s /q ".\\*.art"\n")  ;向temp.bat中写入删除语句:del /f /s /q ".\*.art",删除当前目录下后缀为.art的文件
  5. fprintf(p "del /f /s /q ".\\*.log"\n")  ;删除当前目录下后缀为.lon的文件
  6. fprintf(p "del /f /s /q ".\\*.tag"\n")  ;删除当前目录下后缀为.tag的文件
  7. fprintf(p "del /f /s /q ".\\*.drl"\n")  ;删除当前目录下后缀为.drl的文件
  8. fprintf(p "del /f /s /q ".\\*.dxf"\n")  ;删除当前目录下后缀为.dxf的文件
  9. fprintf(p "del /f /s /q ".\\*.ipc"\n")  ;删除当前目录下后缀为.ipc的文件
  10. fprintf(p "del /f /s /q ".\\*.jrl,1"\n") ;删除当前目录下后缀为.jrl,1的文件
  11. fprintf(p "del /f /s /q ".\\art_aper.txt"\n") ;删除当前目录下的art_aper.txt
  12. fprintf(p "del /f /s /q ".\\art_param.txt"\n") ;删除当前目录下的art_param.txt
  13. fprintf(p "del /f /s /q ".\\nc_param.txt"\n")  ;删除当前目录下的nc_param.txt
  14. fprintf(p "rd /s /q signoise.run\n") ;删除当前目录下的signoise.run文件夹
复制代码


积分规则
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|EDABOSS电子论坛

GMT+8, 2024-3-28 16:47 , Processed in 0.037310 second(s), 20 queries .

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表