无忧启动论坛

 找回密码
 注册
搜索
系统gho:最纯净好用系统下载站广告联系 微信:wuyouceo QQ:184822951
查看: 25293|回复: 65

高手用批处理做的进度条(强烈推荐看看)

[复制链接]
发表于 2007-6-2 15:49:15 | 显示全部楼层 |阅读模式
高手用批处理做的进度条(强烈推荐看看)

@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
发表于 2007-6-2 16:11:04 | 显示全部楼层
似曾相识,楼主否从DOS联盟转帖吧。

[ 本帖最后由 haiou327 于 2007-6-2 04:30 PM 编辑 ]
回复

使用道具 举报

发表于 2007-6-2 21:47:53 | 显示全部楼层
呵呵!
进度条=电影胶片的真
回复

使用道具 举报

发表于 2007-6-2 22:10:13 | 显示全部楼层
我也觉得在哪看过!:)
回复

使用道具 举报

发表于 2007-6-2 23:52:01 | 显示全部楼层
很不错的 学习一下:)
回复

使用道具 举报

发表于 2007-6-3 11:33:46 | 显示全部楼层
多谢了。。学习啦
回复

使用道具 举报

发表于 2007-6-3 12:26:24 | 显示全部楼层
很棒挖  呵呵  收藏起来 标记
回复

使用道具 举报

发表于 2007-6-3 20:33:51 | 显示全部楼层
收藏起来,以后有可以用的上的时候。
回复

使用道具 举报

发表于 2007-6-11 19:19:14 | 显示全部楼层
:em02 太绚烂了~都眼花了
回复

使用道具 举报

发表于 2007-6-12 16:10:18 | 显示全部楼层
不错,谢谢分享~~~~~
回复

使用道具 举报

发表于 2007-6-12 17:43:21 | 显示全部楼层
确实不错!谢谢分享~~~~~
回复

使用道具 举报

发表于 2007-6-12 21:00:54 | 显示全部楼层
同意2楼兄弟意见~
MS见过滴~
回复

使用道具 举报

发表于 2007-9-10 09:03:56 | 显示全部楼层
看看,,,不错...呵呵:) :)
回复

使用道具 举报

发表于 2007-9-16 03:13:56 | 显示全部楼层
似乎一直都不停下去吧
回复

使用道具 举报

发表于 2007-9-17 14:19:03 | 显示全部楼层
学习一下。谢谢/

其它用其它工具也可以做到。不过自已动手丰衣足食嘛
回复

使用道具 举报

发表于 2007-9-21 20:28:24 | 显示全部楼层
疯狂的占用cpu啊!!!
回复

使用道具 举报

发表于 2007-9-21 23:00:45 | 显示全部楼层
学习一下,不知有什么用处?
回复

使用道具 举报

发表于 2007-9-22 18:16:42 | 显示全部楼层
如此的经典就是要顶!!!!!!!!!!!!!!
回复

使用道具 举报

发表于 2007-9-22 20:31:38 | 显示全部楼层
真是高高手!!!!!!!!!!!!
回复

使用道具 举报

发表于 2007-9-22 20:53:23 | 显示全部楼层

呵呵

的确不错,非常感谢啊!
回复

使用道具 举报

发表于 2007-9-23 14:18:14 | 显示全部楼层
好啊。这样的啊在解压缩的时候就有进度条啊。
回复

使用道具 举报

发表于 2007-9-24 13:05:49 | 显示全部楼层
真是高!  证明转贴的人也是高手。
回复

使用道具 举报

发表于 2007-9-24 14:17:31 | 显示全部楼层
不错的 学习一下      :)
回复

使用道具 举报

发表于 2007-9-24 19:48:04 | 显示全部楼层
不错的说~~~`i~
回复

使用道具 举报

发表于 2007-9-24 23:27:38 | 显示全部楼层
强啊,编程真是门艺术
回复

使用道具 举报

发表于 2007-9-25 16:50:52 | 显示全部楼层
以前看过 很好看 一闪闪的 看了眼睛不怎么舒服:) :)
回复

使用道具 举报

发表于 2007-9-26 17:11:14 | 显示全部楼层
学习了,批处理的最高境界有了啊!
回复

使用道具 举报

发表于 2007-9-27 19:56:58 | 显示全部楼层
正好学习学习,支持一下!
回复

使用道具 举报

发表于 2007-9-30 03:04:48 | 显示全部楼层
DOS研究必学
回复

使用道具 举报

发表于 2007-10-1 13:10:33 | 显示全部楼层
很不错,但,得花点时间来学学!!!!!!!!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2024-3-29 18:59

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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