漂亮的bat 进度条

yagizaMJ

1. @echo off&setLocal EnableDelayedExpansion
   
2. echo 进度条
   
3. set /a n=0
   
4. set /a max=200
   
5. :loop
   
6.     set /a n+=1
   
7.     call :runProgress %n% %max%
   
8.     if %n% GEQ %max% (echo;&pause&goto :eof)
   
9. goto:loop
   
10. rem pause
    
11. rem goto :eof
    
12. rem 显示进程
    
13. :runProgress
    
14.     set /a str=100 * %1 / %2
    
15.     set /a runProgressN=%str%/2
    
16.     set cmplt=■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
    
17.     set uncmp=□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□
    
18.     call:BpByStr !cmplt:~0,%runProgressN%!!uncmp:~%runProgressN%! %str%%%%%
    
19. goto :eof
    
20. rem 重复显示删除
    
21. :BpByStr
    
22.   if "%bp%"=="" call:Backspace bp
    
23.   set "BpByStrold=%*"
    
24.   set /p=%bp%%bp%%bp%%bp%%bp%<nul
    
25.   set "BpByStr=%BpByStrold%"
    
26.   set /p=%BpByStr%<nul
    
27. goto :eof
    
28. rem 退格
    
29. :Backspace
    
30.     for /F %%a in ('"prompt $h&for %%b in (1) do rem"') do (
    
31.         Set "%~1=%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a")
    
32. goto :eof

复制代码

yagizaMJ

yagizaMJ

saintao 发表于 2021-8-4 18:05
这个是做什么用的呢？

好玩漂亮，在你需要的控制界面里可以使用