neorobin

@echo off&setlocal enabledelayedexpansion
set /p total=请输入总循环次数:
for /f "tokens=2 delims= " %%i in ('mode ^| findstr "列"') do set /a cols=%%i-4
(set /a rate=0)&(set lastPct=)
for /l %%i in (1,1,!total!) do (
  ping -n 1 127.1>nul & rem 这里是基本操作
  set /a pct=%%i*100/total+1000
  if "!pct:~0,2!" equ "10" (set pct= !pct:~2!) else set "pct=!pct:~1!"
  set /a n=%%i*cols / total
  if !n! gtr !rate! (call :reflesh) else if "!lastPct!" neq "!pct!" (call :reflesh)
)
echo\&pause&exit /b
:reflesh
title !pct!%%
(for /l %%j in (1,1,!rate!) do set /p=<nul)&(set /p=<nul)
(set /p=!pct!%%<nul)&(for /l %%j in (1,1,!rate!) do set /p=^><nul)&(set /a rate=n)
(set lastPct=!pct!)
exit /b
复制代码

[ 本帖最后由 neorobin 于 2009-12-28 16:01 编辑 ]