@echo off
mode con lines=10
title 感情进度条
color 0c
set /a sleep=1
set n=0
for /l %%i in (1,1,36) do (set /a n+=1&call :ech)
color fc
echo.任意健退出.......
pause > nul
exit
:ech
cls
set /a k=%n%*100
set /a i=%k%/36
if "%n%" EQU "36" (set end=爱情溢出啦...)
set bar=%bar%▉
echo ┏━━┓我 ●╭○╮ 我┏━━┓
echo ┃天长┃愛 ★ /█∨█\ ★ 想┃永远┃
echo ┃地久┃你 ∏ ∏ 你┃拥有┃
echo ┗━━┛． 我爱你一万年 ┗━━┛
echo 感情进度条......%i%%% %end%
echo ┏────────────────────────────────────┓
echo │%bar%
echo ┗────────────────────────────────────┛
ping -n %sleep% 127.1 > nul
mode con lines=10
title 感情进度条
color 0c
set /a sleep=1
set n=0
for /l %%i in (1,1,36) do (set /a n+=1&call :ech)
color fc
echo.任意健退出.......
pause > nul
exit
:ech
cls
set /a k=%n%*100
set /a i=%k%/36
if "%n%" EQU "36" (set end=爱情溢出啦...)
set bar=%bar%▉
echo ┏━━┓我 ●╭○╮ 我┏━━┓
echo ┃天长┃愛 ★ /█∨█\ ★ 想┃永远┃
echo ┃地久┃你 ∏ ∏ 你┃拥有┃
echo ┗━━┛． 我爱你一万年 ┗━━┛
echo 感情进度条......%i%%% %end%
echo ┏────────────────────────────────────┓
echo │%bar%
echo ┗────────────────────────────────────┛
ping -n %sleep% 127.1 > nul
本帖最近评分记录
（共 1 条）
点击查看详情
| 评分人 | 分数 | 时间 |
|---|---|---|
| huahua0919 | +3 | 2008-05-06 13:54 |
