无忧启动论坛

标题: 用G4D脚本模拟循环结构 [打印本页]
作者: 星语    时间: 2014-3-15 20:10
标题: 用G4D脚本模拟循环结构
本帖最后由 星语 于 2014-3-15 20:14 编辑

因为G4D脚本（BAT）没有可用的循环结构（就是for、while）命令
所以我就做了一个通用的。
啥也不说了，上代码（有说明）
将这段代码直接放到你的BAT文件的最后即可使用

注意：这段脚本不会检查参数是否合法，请确保变量不会为文本再在参数中使用变量



  1. ::--------------------------------------------------------------------------
  2. ::--------------------------------------------------------------------------
  3. ::循环代码区
  4. ::参数说明：
  5. :: while int start end step docmd
  6. :: int变量名【此变量需自行清除】，start开始值，end结束值，step步值
  7. :: docmd执行的命令行（要求为一个子程序的名称（带冒号！），子程序结束需要在最后加一行代码:exit）
  8. :while
  9. set blname=%1 > nul
  10. set start=%2 > nul
  11. set end=%3 > nul
  12. set step=%4 > nul
  13. set ftn=%5 > nul
  14. ::initialize
  15. set %blname%=%start% > nul
  16. set dq=%start% > nul

  18. :callfff_while
  19. call %ftn%
  20. if %dq%>=%end% && goto :exit_while
  21. set /a dq=%dq%+%step% > nul
  22. set %blname%=%dq% > nul
  23. goto :callfff_while

  25. :exit_while
  26. set blname=
  27. set start=
  28. set end=
  29. set step=
  30. set ftn=
  31. set dq=
  32. exit
复制代码



还有一个例子：显示所有的硬盘分区信息

  1. :start
  2. call :while i 1 %hdnum% 1 :xunhuan
  3. echo
  4. goto :eof

  6. :xunhuan
  7. set /a l=%i%-1 > nul
  8. echo -e 第%i%个硬盘(hd%l%)的信息：
  9. geometry (hd%l%) || echo No hd%l%
  10. exit

  12. ::--------------------------------------------------------------------------
  13. ::--------------------------------------------------------------------------
  14. ::循环代码区
  15. ::参数说明：
  16. :: while int start end step docmd
  17. :: int变量名【此变量需自行清除】，start开始值，end结束值，step步值
  18. :: docmd执行的命令行（要求为一个子程序的名称，子程序结束需要有一行代码:exit）
  19. :: while已经可以正常使用了
  20. :while
  21. set blname=%1 > nul
  22. set start=%2 > nul
  23. set end=%3 > nul
  24. set step=%4 > nul
  25. set ftn=%5 > nul
  26. ::initialize
  27. set %blname%=%start% > nul
  28. set dq=%start% > nul

  30. :callfff_while
  31. call %ftn%
  32. if %dq%>=%end% && goto :exit_while
  33. set /a dq=%dq%+%step% > nul
  34. set %blname%=%dq% > nul
  35. goto :callfff_while

  37. :exit_while
  38. set blname=
  39. set start=
  40. set end=
  41. set step=
  42. set ftn=
  43. set dq=
  44. exit
复制代码


如果这段代码有什么bug，请发上来，让大家一起来解决
作者: 2010lizhilong    时间: 2014-3-16 09:39
学习一下，给你顶起来
作者: 2011895866818    时间: 2014-4-5 00:51
支持一下
作者: 天使的魔翼    时间: 2014-4-8 16:11
正需要这样的批处理，在实际使用过程发现一个问题，如果根目录和BOOT、GRUB目录同时存在MEUN.LST、GLRDR文件时，实际指向这两个文件时会出错，建议增加处理出错后跳转。
例如MENU菜单如下时出错：
  1. title  01. 启动本机 Windows 操作系统
  2. find --set-root --devices=h /ntldr || find --set-root --devices=h /bootmgr || configfile (bd)/BOOT/GRUB/MENU.LST
  3. map (hd0) ()
  4. map () (hd0)
  5. map --rehook
  6. find --set-root --devices=h /ntldr || find --set-root --devices=h /bootmgr
  7. chainloader /ntldr || chainloader /bootmgr

  9. title  02. 启动Windows_2003PE(Native极速,智能外置SRS,支持网络)
  10. calc *0x8280 || set mem=yes
  11. calc *0x82b8 && calc *0x82b9&0xff || set mem=yes
  12. root (bd)
  13. /BOOT/GRUB/SRSF6
  14. if NOT "%@root%"=="(cd)" && map /BOOT/TWOF.ISO (0xfa)
  15. if %mem%==yes && map --mem /BOOT/NVBOOTF.ISO (0xff) ! map /BOOT/NVBOOTF.ISO (0xff)
  16. map --e820cycles=3
  17. map --rehook
  18. chainloader (0xff) || chainloader (0xff)/BOOT/NVTUPLDR.BIN
复制代码





欢迎光临 无忧启动论坛 (http://bbs.c3.wuyou.net/) Powered by Discuz! X3.3