批处理之家 - Powered by Discuz! Board

标题: [游戏娱乐] 批处理窗口也疯狂 [打印本页]

作者: firewolf85 时间: 2008-12-10 09:39 标题: 批处理窗口也疯狂

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

@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
复制代码

作者: bnxf 时间: 2008-12-11 15:13

原来运行后会不断闪动窗口颜色

作者: noname_hero 时间: 2008-12-16 21:01

挺好玩的，可以吓吓朋友

作者: Peking007 时间: 2009-2-27 17:23

厉害！不错，有点意思～

作者: xiaoxin 时间: 2009-4-11 17:14

呵呵 ..试了一下蛮好的

作者: k83133058 时间: 2009-4-12 00:52

一个随机代码!!!!

作者: keen 时间: 2009-4-12 14:41

按照楼主的拓宽一下：

@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
复制代码

作者: tslnyys 时间: 2009-6-3 13:53

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

作者: jing2049 时间: 2009-6-9 14:44

挺有意思，学习了不少

作者: zljzsmzzx 时间: 2009-6-10 10:50

新手来学习了！！！！

作者: zljzsmzzx 时间: 2009-6-12 18:03

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

作者: Seter 时间: 2009-8-9 22:09

闪的快是因为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 编辑 ]

作者: konghero 时间: 2009-8-26 15:48

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

作者: joker 时间: 2009-10-1 00:54

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

作者: canyuexiaolang 时间: 2009-10-1 07:27

随机出现的效果

作者: LeavesFLy 时间: 2009-11-2 23:26

有意思,到时吓吓别人

作者: zcydez 时间: 2010-7-12 15:44 标题: 回复 13楼的帖子

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

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

@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 编辑 ]

欢迎光临批处理之家 (http://bbs.bathome.net/)