标题: 太无聊，再发个小动画（利用random） [打印本页]
作者: bat-zw 时间: 2008-5-6 20:33 标题: 太无聊，再发个小动画（利用random）
@echo off&mode con cols=41 lines=5
title 权当打发无聊的小动画
set a=★&set b=☆&set c=0123456789abcdef
echo.&echo.
:begin
set /a n=%random%%%20+1,m=40-2*n,x=%random%%%16
call,color 1%%c:~%x%,1%%
for /l %%i in (1,1,20) do set /p=%b%<nul&ping /n 127.1>nul
for /l %%i in (1,1,100) do set /p=<nul
for /l %%i in (1,1,%m%) do set /p= <nul&ping /n 127.1>nul
for /l %%i in (1,1,%n%) do set /p=%a%<nul&ping /n 127.1>nul
for /l %%i in (1,1,100) do set /p=<nul
goto begin
[ Last edited by zw19750516 on 2008-5-6 at 08:46 PM ]title 权当打发无聊的小动画
set a=★&set b=☆&set c=0123456789abcdef
echo.&echo.
:begin
set /a n=%random%%%20+1,m=40-2*n,x=%random%%%16
call,color 1%%c:~%x%,1%%
for /l %%i in (1,1,20) do set /p=%b%<nul&ping /n 127.1>nul
for /l %%i in (1,1,100) do set /p=<nul
for /l %%i in (1,1,%m%) do set /p= <nul&ping /n 127.1>nul
for /l %%i in (1,1,%n%) do set /p=%a%<nul&ping /n 127.1>nul
for /l %%i in (1,1,100) do set /p=<nul
goto begin
作者: yywd 时间: 2008-5-7 17:53
呵呵 很好玩的
作者: echo 时间: 2008-5-7 22:54
看来，自己还得继续努力……
作者: kgdetg1127 时间: 2008-5-9 16:56
强，顶起。。。。。。
作者: regvip2008 时间: 2008-5-9 18:12
| Quote: | |
|
嘿嘿，不错的东东，顶！！
作者: Evangel 时间: 2009-10-31 19:30
古董……