[应用] 很雷人的DOS动画的脚本!

我论坛里的小亮做的,被他雷倒了,哈哈!
原来DOS都可以做动画!


@echo off
color 4f
setlocal enabledelayedexpansion
set fu= ^/ ^
set "kong=                                                                            "
set "kong2=____________________________________________________________________________"
set /a a=0,b=0,e=2,tiao=0
:a
set /a b+=1,c=30-%b%+%e%
cls
echo,  我在找网址的的路上……--
for /l %%a in (1,1,6) do echo,
echo,!kong:~0,%b%!⊙
echo,!kong:~0,%b%! ^/
echo,!kong2:~0,%b%!!fu:~%a%,2!!kong2:~0,%c%!
ping -n>nul
if %a% equ 4 (set /a a=0) else (set /a a+=1)
if %a% leq 2 (set e=2)
if %a% equ 3 (set e=3)
if %a% equ 4 (set e=4)
if not %b% equ 30 goto :a else goto :b
set /a b=30,j=0,k=6
:b
if not %j% equ 6 (set /a j+=1,tiao=%j%) else (set /a k-=1,tiao=%k%)
set /a b+=1,up=6-%tiao%
cls
for /l %%a in (1,1,%up%) do echo,
echo,!kong:~0,%b%!  ⊙/
echo,!kong:~0,%b%!^<^/
echo,!kong:~0,%b%!!/^>
for /l %%a in (1,1,%tiao%) do echo,
echo,!kong2:~0,30!
ping -n>nul&ping -n>nul
if %a% equ 4 (set /a a=0) else (set /a a+=1)
if %k%==0 (goto :c1) else (goto :b)
:c1
set /a cc=0,dd=0
set call1=嘿嘿,找到啦！
:c
if not %tiao% equ 10 set /a tiao+=1
if not %b% equ 60 set /a b+=1
if not "%cc%" == "30" (set /a cc+=1,num=30-%cc%)
if "%cc%"=="30" if not "%dd%"=="30" set /a dd+=1
cls
for /l %%a in (1,1,9) do echo,
echo,!kong2:~0,%num%!
for /l %%a in (1,1,%tiao%) do echo,
if %tiao% equ 10 echo,!kong:~0,%b%!!call1:~0,%dd%!
echo,!kong:~0,%b%!_ ⊙  
echo,!kong:~0,%b%! ^/  
echo,!kong:~0,%b%!!fu:~%a%,2!
if %tiao% lss 10 (ping -n>nul&ping -n>nul&ping -n>nul) else (ping -n>nul)
if %a% equ 4 (set /a a=0) else (set /a a+=1)
if "%dd%"=="30" (ping -n 2 127.1>nul &goto :d1) else (goto :c)
:d1
set name= 7 7 5 9. c o m
set /a a=0
cls
color 02
:dd
if %time:~10,1% lss 3 set /a a+=1
set an=%random%%random%%random%%random%%random%%random%%random%%random%%random%
set an=%an:~0,20%!name:~0,%a%!%an:~20%
if %a% equ 32 set an=                       http://blog.163.com/hhl101@126   黑客小亮  &color 0a
cls
color 0e
echo.              ☆                                    ☆                                                
echo.              ☆                        ☆☆☆☆☆☆☆☆☆☆☆☆                                                                              
echo.              ☆                               ☆☆☆☆☆                                                              
echo.              ☆                               ☆      ☆                                                                                
echo.              ☆                               ☆☆☆☆☆                                                                          
echo.         ☆   ☆   ☆                   ☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆                                                                                  
echo.        ☆    ☆    ☆                 ☆       ☆☆☆☆☆           ☆                                                  
echo.       ☆     ☆     ☆               ☆        ☆      ☆            ☆
echo.              ☆       ☆                      ☆       ☆
echo.          ☆  ☆                              ☆         ☆      ☆
echo.           ☆ ☆                            ☆             ☆      ☆
echo.              ☆                           ☆               ☆☆☆☆☆
echo.      %an%
echo.&echo.&echo.
echo. 哇 传说中的黑客小亮【http://blog.163.com/hhl101@126】
echo.
ping -n>nul
if %a% lss 32 (goto :dd) else (goto :end)
:end
pause>nul



大家可以保存为批处理文件,看下效果,还不错的说呢,真有才!