中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-07-29 08:36
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 太无聊,再发个小动画(利用random) 查看 1,003 回复 5
楼 主 太无聊,再发个小动画(利用random) 发表于 2008-05-06 20:33 ·  中国 湖南 株洲 电信
金牌会员
★★★★
永远的学习者
积分 3,105
发帖 1,276
注册 2008-03-08 13:00
18年会员
UID 112398
性别 男
状态 离线
@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 ]
批处理之家新域名:www.bathome.net
2 发表于 2008-05-07 17:53 ·  中国 广东 深圳 电信
中级用户
★★
积分 358
发帖 130
注册 2005-11-12 16:29
20年会员
UID 45117
状态 离线
呵呵 很好玩的
3 发表于 2008-05-07 22:54 ·  中国 福建 泉州 电信
初级用户
★★
积分 148
发帖 69
注册 2006-11-23 23:04
19年会员
UID 71504
性别 男
状态 离线
看来,自己还得继续努力……
4 发表于 2008-05-09 16:56 ·  中国 浙江 温州 电信
初级用户
★★
积分 158
发帖 89
注册 2007-04-25 08:06
19年会员
UID 86402
性别 男
状态 离线
强,顶起。。。。。。
5 发表于 2008-05-09 18:12 ·  中国 湖南 长沙 联通
初级用户
★★
积分 187
发帖 87
注册 2007-10-23 16:04
18年会员
UID 100558
性别 男
状态 离线
Originally posted by zw19750516 at 2008-5-6 08:33 PM:
@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=% ...


嘿嘿,不错的东东,顶!!
6 发表于 2009-10-31 19:30 ·  中国 四川 成都 电信
初级用户
★★
积分 145
发帖 95
注册 2008-04-12 16:29
18年会员
UID 115703
性别 男
状态 离线
古董……
论坛跳转: