炫酷的批处理BAT走字特效源码_DOS/BAT_

 @echo off&setlocal enabledelayedexpansion mode con: cols=87 lines=15 title code by foxjl 2007-12-1 www.jb51.net color 1a set long=43,minus=43 set,=^ 我们，是一群执著的批处理爱好者^ 在色彩斑斓的ＷＩＮＤＯＷＳ下，开启ＣＭＤ这扇深邃的窗口^ 曾经挑灯夜战，曾经彻夜不眠^ 我们之所以如此似痴若狂，是因为我们深知：^ 尺有所短、寸有所长，ＣＭＤ不同凡响^ 我们精益求精，力求完美^ 所有的努力，只为了用最简洁的语言，编写最具实用性的代码^ www.jb51.net^ 高手汇聚、资料齐全、是新手入门的福地、老手晋级的乐园^ 不求最大、但求最好、展现批处理的无穷魅力、一切精彩，尽在～～～～ 演示完毕。再见！！ :start echo. 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 2>nul) goto :eof

 : @echo off&setlocal enabledelayedexpansion title code by 泛滥棏慌° 2007-12-1 www.jb51.net mode con: cols=87 lines=15 for /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 2>nul) goto :eof