[游戏娱乐] 批处理窗口也疯狂

firewolf85

昨天没睡好，发点东西大家兴奋下。

@echo off
set c=00123456789ABCDEF0
:loop
set /a num=%random%%%16
call set col=%%c:~%num%,2%%
COLOR %col%
ping -n3 127.1>nul
goto loop
复制代码

zcydez

来个全屏的
全屏+文字，绝对疯狂！！！！！！！！


应该叫……………………批处理全屏也疯狂！！！！！！！！！！如不能正常使用请用附件！！

@echo off
echo exit|%ComSpec% /k prompt e 100 B4 00 B0 12 CD 10 B0 03 CD 10 CD 20 
$_g$_q$_|debug>nul
chcp 437>nul
graftabl 936>nul
graftabl 936>nul
set c=00123456789ABCDEF0
:loop
set /a num=%random%%%16
call set col=%%c:~%num%,2%%
COLOR %col%
echo 批处理全屏也疯狂！！！！！！！！！  批处理全屏也疯狂！！！！！！！！！
goto loop
复制代码

[ 本帖最后由 zcydez 于 2010-7-12 15:58 编辑 ]

LeavesFLy

有意思,到时吓吓别人

canyuexiaolang

随机出现的效果

joker

试了一下结合别的bat
蛮不错的
多谢作者

konghero

应该一打开就自动变成全屏才好玩.....

Seter

闪的快是因为LZ的ping中-n与3之间少了空格..
如果要改窗口大小也可以啊
加几句话

set /a cols=%random%%%30+30
set /a lines=%random%%%30+3
mode con: cols=%cols% lines=%lines%
复制代码

[ 本帖最后由 Seter 于 2009-8-9 22:12 编辑 ]

zljzsmzzx

如果能够再配合窗口放大缩小就更有意思了

zljzsmzzx

新手来学习了！！！！

jing2049

挺有意思，学习了不少

tslnyys

闪动的好快。。。。。。。。。。。。。。。

keen

按照楼主的拓宽一下：

@echo off
rem 仿照显示器测试工具，纯色，检测LCD有无坏点
echo exit|%ComSpec% /k prompt e 100 B4 00 B0 12 CD 10 B0 03 CD 10 CD 20 $_g$_q$_|debug>nul
chcp 437 >nul
graftabl 936 >nul
set "str=0 7 9 a b c d e f"
for %%i in (%str%) do (
    cls
    color %%i0 &echo                            按任意键换下个颜色!&pause>nul
)
cls
echo.
echo.
echo.
echo.
echo 检测完毕！
echo.
echo.
echo 按任意键退出！
pause>nul
复制代码

k83133058

一个随机代码!!!!

xiaoxin

呵呵 ..试了一下  蛮好的

Peking007

厉害！不错，有点意思～