Board logo

标题: [推荐]看到不错的代码---实现进度条 [打印本页]

作者: onflypuma     时间: 2007-12-9 22:08    标题: [推荐]看到不错的代码---实现进度条
@echo %dbg% 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 :start cls set a=%a%■■ set /a b+=5 set /a z-=5 echo. @echo 剩余进度 %z%%% @echo ┌──────────────────────────────────────────┐ @echo %a% %b%%% @echo └──────────────────────────────────────────┘ if %b% geq 100 goto num2 ping /n 0 127.1 >nul set /a sum =5 goto start :_exit set /a sum-=1 set/p=%sum% 秒后退出! <nul echo. if %sum% EQU 0 exit ping /n 2 127.1 >nul goto _exit rem 冲到一半再缩,冲到一半再加 :num2 setlocal EnableDelayedexpansion set sum= Set z= set a=■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■ set /a z1=52 set /a z2=52 :start2 cls set sum52= set /a z2=52 set /a sum+=1 set /a z1-=1 set b=!a:~%sum%! set c=!a:~-%sum%! call :_color echo. echo. echo 剩余进度:%z1%%% echo ┌──────────────────────────────────────────────────────┐ echo %b% %z1%%% echo └──────────────────────────────────────────────────────┘ echo 当前颜色代码: COLOR 0!numca! echo. echo. echo 当前进度:%sum%%% echo ┌──────────────────────────────────────────────────────┐ echo %c% %sum%%% echo └──────────────────────────────────────────────────────┘ echo 当前颜色代码: COLOR 0!numca! if %sum% geq 52 call :sum52 ping /n 0 127.1 >nul goto start2 :sum52 cls set sum= set /a z1=52 set /a sum52+=1 set /a z2-=1 set c=!a:~%sum52%! set b=!a:~-%sum52%! call :_color echo. echo. echo 当前进度:%sum52%%% echo ┌──────────────────────────────────────────────────────┐ echo %b% %sum52%%% echo └──────────────────────────────────────────────────────┘ echo 当前颜色代码: COLOR 0!numca! echo. echo. echo 剩余进度:%z2%%% echo ┌──────────────────────────────────────────────────────┐ echo %c% %z2%%% echo └──────────────────────────────────────────────────────┘ echo 当前颜色代码: COLOR 0!numca! if %sum52% geq 52 call :start2 ping /n 0 127.1 >nul cls goto sum52 :_color set _color=1234567890ABCDEF set /a _random=%random%%%16 set numca=!_color:~%_random%,1! color 0!numca! goto :eof

作者: zerocq     时间: 2007-12-10 12:32
不错!!!!!!!!!!!!!!!

作者: bbs4033     时间: 2008-1-6 17:49
太好 了

作者: jia332     时间: 2008-2-1 14:00
这里高人太多了,本人就不敢说话了

作者: slore     时间: 2008-2-1 14:06
代码不能同步……所以进度条也就只能看看罢了。。。 应用不起来。。。

作者: HAT     时间: 2008-2-1 14:33
在本版搜索“进度条”能找到很多方案: )

作者: jamiyang     时间: 2008-2-3 17:40
无法应用呀

作者: awera     时间: 2008-2-11 03:18
强人真多

作者: zncznc     时间: 2008-2-15 05:08
厉害啊。佩服

作者: knoppix7     时间: 2008-2-16 20:44
Originally posted by slore at 2008-2-1 02:06 PM: 代码不能同步……所以进度条也就只能看看罢了。。。 应用不起来。。。
之见过在FOR里用的。其他感觉没法用..