@echo off title 黑客帝国数码雨color 0a :start set num=0 set "echos= " :num set /a a1=%random%%%3 if "%a1%" == "1" set "a1= " if "%a1%" == "2" set "a1= " if "%a1%" == "0" set /a a1=%random%%%2 set echos=%echos%%a1% set /a num=%num%+1 if "%num%" == "75" echo %echos%&&goto :start goto :num

@echo offtitle 黑客帝国数码雨效果color 02setlocal ENABLEDELAYEDEXPANSIONfor /l %%i in (1,1,80) do (set Down%%i=0):heikefor /l %%j in (1,1,80) do (set /a guxing%%j-=1if !guxing%%j! LSS 0 (set /a hanye%%j=!random!%%4set /a guxing%%j=!random!%%15+10)if "!hanye%%j!" == "1" (set /a shu=!random!%%2set /p=!shu!<NUL) else (set /p= <NUL))goto heike

@echo off&setlocal enabledelayedexpansiontitle code by 泛滥棏慌° 2007-12-1 www.jb51.netmode con: cols=87 lines=15for /l %%l in (1 1 42) do set "ko=　!ko!"color 1a&echo\&set,=!ko!^我们，是一群执著的批处理爱好者^在色彩斑斓的ＷＩＮＤＯＷＳ下，开启ＣＭＤ这扇深邃的窗口^曾经挑灯夜战，曾经彻夜不眠^我们之所以如此似痴若狂，是因为我们深知：^尺有所短、寸有所长，ＣＭＤ不同凡响^我们精益求精，力求完美^所有的努力，只为了用最简洁的语言，编写最具实用性的代码^脚本之家www.jb51.net^高手汇聚、资料齐全、是新手入门的福地、老手晋级的乐园^不求最大、但求最好、展现批处理的无穷魅力、一切精彩，尽在～～脚本之家～～                 演示完毕。再见！！for %%i in (8 4 -1 4 -1 4 -1 10 -1 8 -1 16 -7 ， 8 4 -1 4 -1 4 -1 10 -1 8 -1 8 -5 4 -1 4 -1 ， 8 -4 2 -1 4 -1 10 -4 2 -1 12 -1 2 -7 ， 8 4 -1 4 -1 4 -1 2 -1 6 -1 4 -1 2 -2 10 -1 2 -1 4 -1 4 -1 ， 8 4 -1 4 -2 2 -2 6 -1 6 -1 2 -1 2 -1 4 -5 4 -1 4 -1 ， 8 4 -2 2 -1 4 -1 8 -1 4 -1 4 -1 4 -1 6 -1 2 -7 ， 8 -3 4 -1 4 -1 6 -1 2 -1 2 -1 4 -1 12 -1 8 -1 ， 8 4 -1 4 -1 4 -1 12 -1 6 -1 12 -1 4 -5 ， 8 4 -1 4 -1 2 -2 2 -1 8 -1 6 -1 12 -2 6 -1 ， 8 4 -1 4 -2 2 -1 2 -1 6 -1 2 -2 2 -1 8 -2 10 -1 ， 8 -3 4 -1 4 -3 2 -2 8 -5 8 -8) do ((if "%%i"=="，" (echo.&ping -n 1 127.1>nul)) && (set a=%%i)&(set b=!a:-=!) if %%i lss 0 (for /l %%j in (1,1,!b!) do (set/p=▓<nul)) else (for /l %%k in (1,1,%%i) do (set/p= <nul)))call :delay 700&echo\&echo\for /l %%l in (1 1 255) do (  set /p=!,:~0,43!<nul  call :delay 40 修改这个数字可以调整走字的速度.  for /l %%j in (1,1,87) do (set/p=<nul)  set ,=!,:~1!)call :delay 700&exit:delayfor /l %%i in (1,1,%1) do (error>nul 2>nul)goto :eof