[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[特效代码] [分享]批处理彩色进度条

  1. @echo off&mode con cols=70 lines=7
  2. echo.&echo                              程序启动中...&echo.
  3. ::创建带删除符的文件,文件名为█
  4. set /p=<nul>█
  5. set ys=abde12345689
  6. :a
  7. set p=-1
  8. :b
  9. set /a p+=1
  10. call set q=%%ys:~%p%,1%%
  11. set /a kk+=1
  12. set /a k=0
  13. set /p=            <nul
  14. :s
  15. set /a k+=1
  16. ::颜色输出的关键一步,利用findstr /a:输出颜色
  17. findstr /a:%q% . █*
  18. ::删除掉 :
  19. set /p=<nul
  20. ::控制每次循环都比上一次多一个█
  21. if %k% == %kk% (goto h) else (goto s)
  22. :h
  23. ::控制循环结束
  24. if %kk% == 21 del █&echo &pause>nul&exit
  25. set /a n=21-%KK%
  26. for /l %%a in (1 1 %n%) do (set /p=█<nul)
  27. for /l %%a in (1 1 6) do (set /p=<nul)
  28. :: 控制颜色循环
  29. if %p% gtr 10 (goto a) else (goto b)
复制代码

虽说是比较老掉牙,但好歹和别人还是有区别的嘛,至少,它是彩色的!批处理要同时显示两个颜色还是有点难的!

TOP

理解万岁!不过我百度了好久都没见,可能是以前那个发得早,现在都搜不到吧!呵呵

TOP

多谢大家对我的支持!

TOP

回复 14楼 的帖子

时间不用控制,控制循环就好了

TOP

返回列表