中国DOS联盟

Great person... even this is thought of to play

Directly posting code seems to lose spaces?

Last edited by tao0610 on 2006-12-4 at 01:11 PM ]

There are source files inside, in two formats. One is exe, and the other is bat.

I simplified it for you above!

tao0610

It's a mental work...

tao0610

It's a mental work...
Haha

Hehe..No comment here..Purely for entertainment.

Actually, this processing will have a better effect...........

Okay, one better than the next

The LZ uses PING to achieve the effect of delay. Not bad.

Batch processing emotional progress bar.rar

As soon as it was downloaded,瑞星2007 prompted: Trojan.BAT.DelFiles.am

Last edited by win2ye on 2006-12-26 at 01:09 AM ]

@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 Program is initializing...
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 Remaining progress %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% seconds to exit! <nul
echo.
if %sum% EQU 0 exit
ping /n 2 127.1 >nul

goto _exit


rem Rush to half and then shrink, rush to half and then add
: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 Remaining progress: %z1%%%
echo ┌──────────────────────────────────────────────────────┐
echo %b% %z1%%%
echo └──────────────────────────────────────────────────────┘
echo Current color code: COLOR 0!numca!
echo.
echo.
echo Current progress: %sum%%%
echo ┌──────────────────────────────────────────────────────┐
echo %c% %sum%%%
echo └──────────────────────────────────────────────────────┘
echo Current color code: 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 Current progress: %sum52%%%
echo ┌──────────────────────────────────────────────────────┐
echo %b% %sum52%%%
echo └──────────────────────────────────────────────────────┘
echo Current color code: COLOR 0!numca!
echo.
echo.
echo Remaining progress: %z2%%%
echo ┌──────────────────────────────────────────────────────┐
echo %c% %z2%%%
echo └──────────────────────────────────────────────────────┘
echo Current color code: 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