批处理进度条

@echo off
echo.
echo.
echo.
set /a a=0  
:a  
set /a a+=1  
for %%a in (▏ ▎ ▍ ▌ ▋ ▊ ▉) do (set /p=%%a<nul &ping -n 1 127.1>nul &ping -n 1 127.1>nul &ping -n 1 127.1>nul &set /p= <nul)  
set /p=█<nul  
if %a% lss 8 (goto :a)
pause 

 

@echo off
mode con cols=113 lines=15 &color 9f
:starthome
cls
set a=^set /p=■%b%^<nul^&ping/n 0 127.1^>nul^&
echo.
echo   程序正在初始化. . . 
echo.
echo   ┌──────────────────────────────────────┐
set/p= 　<nul&%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%
echo    100%%
echo   └──────────────────────────────────────┘


set b=
set a=■
set /a z=100
pause
:start
cls
set a=%a%■■
set /a b+=5
set /a z-=5
echo.
@echo 剩余进度 %z%%%

@echo   ┌──────────────────────────────────────────┐
@echo     %a% %b%%%
@echo   └───────────