比较漂亮的批处理进度条效果代码

@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 └──────────────────────────────────────────┘ 
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

为防止代码因为编辑器出错，特打包提供下载 http://xiazai.gimoo.net/201102/other/jindutiao_bat.rar

批处理实现的文字的飞入+变色效果代码
@echooff&setlocalenabledelayedexpansion&cls&color0f&titleWelcometoCN-DOS!modecon:cols=30lines=3set"a=PC-X69"setb=set"c=12345689abcde"echo:cfor/l%%ain(6,1,28)do(set/ad=%random%%%13+1call:pp%%a)gotoc:p

服务器防arp欺骗批处理 ARP双绑脚本 无临时文件(LZ-Myst版)
ARP双绑脚本，无临时文件(LZ-Myst版)横线以下内容，保存为BAT格式即可用了。for/f"tokens=13"%%Iin('ipconfig/all^|find"DefaultGateway"')dosetGatewayIP=%%Ifor/f"tokens=1,2"%%Iin('

批处理获取网卡名称的代码（附修改IP、网关、DNS脚本）
::用ipconfig/all命令获取网卡名称。FOR/F"tokens=2*"%%iIN('ipconfig/all^|find/i"Ethernetadapter"')DOsetname=%%j::用for命令删除网卡名称后面的冒号。FOR/F"tokens=1*delims=:"%%iin("