[游戏娱乐] 批处理进度条

jinzeyu

@echo off&setlocal enabledelayedexpansion
title 进度条 by:金则宇 2011年4月5日
mode con lines=7 cols=55
set z=0
SET ge=0
for /l %%i in (1,1,25) do (
  set "a%%i=  "
  set "c=!c!▉"
  set "d=!d! "
)
:1
set /a z+=4
for /l %%i in (1,1,3) do ping /n 1 127.1>nul
set /a ge+=1
set "a%ge%=▉"
set jdt=
for /l %%i in (1,1,25) do set "jdt=!jdt!!a%%i!"
cls
echo ┏━━━━━━━━━━━━━━━━━━━━━━━━━┓
echo ┃%jdt%┃
echo ┗━━━━━━━━━━━━━━━━━━━━━━━━━┛
echo %d:~1%%z%﹪
if "%jdt%"=="%c%" echo OK^! &pause >nul & exit
goto 1
复制代码

1797128183

牛蛙牛蛙！支持支持！

hlzj88

凑热闹，加一个

@echo off&&setlocal enabledelayedexpansion
set aa=▉
set bb=
set p=0
:ff
echo.
set bb=!bb!!aa!
set /a p+=4
echo !bb!!p!%%
if !p! equ 100 goto ks
ping /n 2 127.1>nul
cls
goto ff

:ks
echo 在这里写你的p&pause>nul
复制代码

bruce61

怎样运用到FTP下载上面呀？请大神指教！

狱渊

回复 1# jinzeyu


    谢谢了 哦  呵呵   刚好要用呢

crazyforus

很好，很强大。

cjiabing

这里人多，补一个进度条，可以左右移动的哦！~
代码不是我的，我只是修改成这样了！

@echo off&setlocal enabledelayedexpansion
::可以通过修改两个FOR以及str的空格数量来控制图标往前或者往后移动。
::退格键的意义就是cls的意义，只不过它不是全屏清理，而是往前清理。
echo,
echo.
set "str=　　                               《《"
for /l %%a in (1,1,50) do set "t=!t! "
echo.&set /p= <nul
echo.弹簧、钟摆、火车
:lp
for /l %%a in (1,1,20) do (
     set /a a=6*%%a
     for %%b in (!a!) do set "t1=!t:~%%b!"
     set /p=!str:~%%a!<nul
     for /l %%b in (1,1,2000) do echo>nul
     set /p=!t1!<nul
)
goto lp
复制代码

cxypy

不错，学习了~

冷玉公子

好看 就是看不懂

batman

思维定向，可以做到的（注意替换tab为实际的制表符）：

@echo off&setlocal enabledelayedexpansion
set "tab=	"
for /l %%a in (1,1,22) do set "t=!t!"
for /l %%a in (1,1,80) do set "tg=!tg! "
echo,&echo     ┌────────────────────┐
echo                                               │
echo     └────────────────────┘
for /l %%a in (1,1,20) do (
    echo %tab%%t% 2>nul&set /p=     │<nul
    set /a a=%%a00/20
    set "a=  !a!"&set "a=!a:~-3!"
    for /l %%b in (1,1,%%a) do set /p=■<nul
    for /l %%b in (1,1,500) do echo>nul
    echo,&echo,&set /p=                      !a!%%<nul
    for /l %%b in (1,1,200) do echo>nul
    if %%a neq 20 set /p=%tg%<nul
)
pause>nul
复制代码

jay_16

27# batman


谢谢。原来我的想法是不现实的。呵呵。非常感谢

batman

要不就只能这样：

@echo off&setlocal enabledelayedexpansion
set "tab=	"
for /l %%a in (1,1,22) do set "t=!t!"
for /l %%a in (1,1,80) do set "tg=!tg! "
echo,&echo     ┌───────────────────┐
echo,&echo     └───────────────────┘
for /l %%a in (1,1,20) do (
    echo %tab%%t% 2>nul&set /p=      <nul
    set /a a=%%a00/20
    set "a=  !a!"&set "a=!a:~-3!"
    for /l %%b in (1,1,%%a) do set /p=■<nul
    for /l %%b in (1,1,1000) do echo>nul
    if %%a neq 20 set /p=%tg%<nul
    echo,&echo,&set /p=                      !a!%%<nul
    for /l %%b in (1,1,1000) do echo>nul
    if %%a neq 20 set /p=%tg%<nul
)
pause>nul
复制代码

batman

这样子可以不（注意替换tab）：

@echo off&setlocal enabledelayedexpansion
set "tab=	"
for /l %%a in (1,1,22) do (
    set "t=!t!"
    if %%a leq 20 set "k=!k!  "
)
for /l %%a in (1,1,80) do set "tg=!tg! "
echo,&echo     ┌────────────────────┐
echo,&echo     └────────────────────┘
echo %tab%%t% 2>nul&set /p=     │<nul
for /l %%a in (1,1,20) do (
    set /a "a=(20-%%a)*2","b=(22-%%a)*6+4",c=%%a00/20
    set "c=  !c!"&set "c=!c:~-3!"
    for %%a in (!a!) do (
        set "str=■!k:~,%%a!│!c!%%"
        set /p=!str!<nul
        for /l %%b in (1,1,500) do echo>nul
        if %%a neq 0 for %%a in (!b!) do set /p=!tg:~,%%a!<nul
    )
)
pause>nul
复制代码

jay_16

20# batman

for /l %%i in (1,1,20) do set/p=▉<nul&ping /n %p% 127.1>nul
复制代码

请问一下，这个同行输出▉，可以跳转其他行后再返回此行接着同行输出吗？不是从行首开始，而是接着这行其他内容后输出！？

jinzeyu

batman的好像没有左右两边的框..