很雷人的DOS动画的脚本!

社区服务
高级搜索
猴岛论坛电脑百科很雷人的DOS动画的脚本!
发帖 回复
倒序阅读 最近浏览的帖子最近浏览的版块
1个回复

很雷人的DOS动画的脚本!

楼层直达
thedling

ZxID:1693239

等级: 贵宾
举报 只看楼主 使用道具 楼主   发表于: 2009-04-08 0
我论坛里的小亮做的,被他雷倒了,哈哈!
原来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



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

世界上有两样东西是最震撼人心的,一样是天上的星空,还有一样是我们心里高尚的道德标准。
q7500112

ZxID:4167597

等级: 中校
子弹LOVE小辣椒
举报 只看该作者 沙发   发表于: 2009-04-09 0
看不懂。。。呵呵
Ρs;ヤ▓爲嬡洏哭泣╭爲凊洏酗揂ɑ爲妳洏攺變ì茵爲莪眞啲佷嬡妳ヤ▓
« 返回列表
发帖 回复