找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 27609|回复: 5

[系统相关] [巳解决]请教批处理倒计时进度条问题

[复制链接]
发表于 2015-3-25 16:15:49 | 显示全部楼层 |阅读模式
本帖最后由 whwyd 于 2015-3-26 12:58 编辑

下面这段批处理,进度条只能往前走,▉是一秒一个,一直到60秒60个为止,作为倒计时不太合适,我想让它一开始就有60个▉,然后一秒减一个到0秒全部减完,也就是让进度条倒着走,下面这段程序怎么改啊?请高手指教?
  1. @echo off&mode con cols=114 lines=6
  2. color 70&title 倒计时60秒
  3. :star
  4. set /a work=0,n=0,mo=0,number=0,all=60
  5. set num=
  6. set time=%all%
  7. :check
  8. if %number% GTR %mo% set num=%num%▉&set /a mo=%mo%+1&goto check
  9. cls&echo.
  10. echo                                              ★倒计时: %time% 秒
  11. echo.
  12. CurS /crv 0
  13. if not "%num%"=="" echo       %num%
  14. if not "%num%"=="" echo       %num%
  15. if %time%==0 pause>nul&goto start
  16. ping -n 2 127.1>nul
  17. set /a n=%n%+1
  18. set /a time=%all%-%n%
  19. set /a work=(%n%)*100/(%all%)
  20. set /a number=%work%/2
  21. set /a number=%number%+1
  22. goto check
复制代码

评分

参与人数 1PB +2 收起 理由
Batcher + 2 感谢给帖子标题标注[已解决]字样

查看全部评分

发表于 2015-3-25 18:59:03 | 显示全部楼层
本帖最后由 pcl_test 于 2015-3-26 13:07 编辑

回复 1# whwyd
  1. @echo off & setlocal enabledelayedexpansion
  2. mode con cols=132 lines=2
  3. title 倒计时60秒
  4. color 70
  5. set t=60
  6. for /l %%a in (0 1 60) do set s=!s!▉
  7. :begin
  8. cls
  9. echo, !s:~,%t%!(剩余%t%秒)
  10. set /a t-=1
  11. ping -n 2 0 >nul
  12. if %t% lss 0 pause >nul & exit
  13. goto begin
复制代码
 楼主| 发表于 2015-3-25 21:26:42 | 显示全部楼层
谢谢pcl_test,确实不错,达到了要求,高手。
 楼主| 发表于 2015-3-26 08:40:32 | 显示全部楼层
pcl_test您好,我想把这句echo  !s:~,%t%!(剩余%t%秒)中的(剩余%t%秒)去掉,出现ECHO 处于关闭状态,怎么解决?谢谢!
发表于 2015-3-26 10:26:02 | 显示全部楼层
本帖最后由 pcl_test 于 2017-4-10 07:19 编辑

echo, !s:~,%t%!
回复 5# whwyd

评分

参与人数 2技术 +2 收起 理由
whwyd + 1 技术好
Batcher + 1 乐于助人

查看全部评分

 楼主| 发表于 2015-3-26 12:58:20 | 显示全部楼层
非常完美,太感谢pcl_test 了。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-19 12:52 , Processed in 0.019043 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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