先上第一版的代碼，
代碼肯定還存在BUG,先發(fā)上來給大家測試.
@echo offsetlocal 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,=^ 我們，是一群執(zhí)著的批處理愛好者^ 在色彩斑斕的ＷＩＮＤＯＷＳ下，開啟ＣＭＤ這扇深邃的窗口^ 曾經(jīng)挑燈夜戰(zhàn)，曾經(jīng)徹夜不眠^ 我們之所以如此似癡若狂，是因為我們深知：^ 尺有所短、寸有所長，ＣＭＤ不同凡響^ 我們精益求精，力求完美^ 所有的努力，只為了用最簡潔的語言，編寫最具實用性的代碼^ 腳本之家www.jb51.net^ 高手匯聚、資料齊全、是新手入門的福地、老手晉級的樂園^ 不求最大、但求最好、展現(xiàn)批處理的無窮魅力、一切精彩，盡在～～腳本之家～～ 演示完畢。再見??！ :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)) else (for /l %%k in (1,1,%%i) do (set/p= nul) ) ) call :delay 700 echo\echo\ for /l %%z in (1,1,255) do ( if not !long! equ 0 set /a long-=1 for /l %%j in (1,1,87) do (set/p=nul) for /l %%k in (1,1,!long!) do (set/p= nul) set /a longn+=1 set /a longs=longn-43 set /a remnant=255-43 if !longn! lss 43 (set/p=!,:~0,%%z!nul) else ( if !longn! geq !remnant! ( set /a minus-=1 set /a minuss=minus*2 for /l %%l in (1,1,!minus!) do (set/p= nul) for /l %%j in (1,1,!minuss!) do (set/p=nul) call set/p=%%,:~!longs!,43%%nul ) else ( call set/p=%%,:~!longs!,43%%nul ) ) call :delay 40 修改這個數(shù)字可以調(diào)整走字的速度. ) call :delay 700exit :delay for /l %%i in (1,1,%1) do (error>nul 2>nul) goto :eof
動畫效果很不錯,象電視里的飛字幕.很有觀賞性.
真是開了眼了 set ,=^ 再把每句最后加個^符號,就可以把它們都賦值給變量,?這是什么原理? 并且最后一句末尾又沒有^符號?
不過,飛字幕部分,代碼似乎可以更簡潔.
來看看第二版的代碼
: @echo offsetlocal 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 1aecho\set,=!ko!^ 我們，是一群執(zhí)著的批處理愛好者^ 在色彩斑斕的ＷＩＮＤＯＷＳ下，開啟ＣＭＤ這扇深邃的窗口^ 曾經(jīng)挑燈夜戰(zhàn)，曾經(jīng)徹夜不眠^ 我們之所以如此似癡若狂，是因為我們深知：^ 尺有所短、寸有所長，ＣＭＤ不同凡響^ 我們精益求精，力求完美^ 所有的努力，只為了用最簡潔的語言，編寫最具實用性的代碼^ 腳本之家www.jb51.net^ 高手匯聚、資料齊全、是新手入門的福地、老手晉級的樂園^ 不求最大、但求最好、展現(xiàn)批處理的無窮魅力、一切精彩，盡在～～腳本之家～～ 演示完畢。再見?。? 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 700echo\echo\ for /l %%l in (1 1 255) do ( set /p=!,:~0,43!nul call :delay 40 修改這個數(shù)字可以調(diào)整走字的速度. for /l %%j in (1,1,87) do (set/p=nul) set ,=!,:~1! ) call :delay 700exit :delay for /l %%i in (1,1,%1) do (error>nul 2>nul) goto :eof
