感谢大家的支持，我又给改进了，这次有颜色的变换。
@echo off
setlocal enabledelayedexpansion
set b=1
color 0c
set a= 我祝大家新年快乐！万事如意！！！
echo .
echo.
echo.
for /f "skip=25 delims=" %%i in ('type %0' ) do (
echo %%i & ping 127.1 -n 1 >nul
set /a b+=1
color 0!b!
if "!b!"=="10" set b=0
)
color 0c
echo.&echo.&echo =============================================================================&echo.
for /l %%i in (1,1,30) do (
set/p=!a:~%%i,1!<nul
ping/n 127.1 >nul 2>nul
)
echo.
echo -------------------------------------------------------------------------
mshta vbscript:CreateObject("SAPI.SpVoice").Speak("Happy new year")(Window.close)

pause >nul
■■◣　 ◢■■◣　◢■■◣　 ◢■◣
　　　■　■　　■　■　　■　■ ■
◢■■◤　■　　■　■　　■　 ■■ ■
■　　　　■　　■　■　　■　 ■
◥■■■　◥■■◤　◥■■◤ ■
　★☆★　　★☆★　　★☆★　　★☆★
★　新　★★　年　★★　快　★★　樂　★
　★☆★　　★☆★　　★☆★　　★☆★
╭╧╮╭╧╮╭╧╮╭╧╮╭╧╮ ╭╧╮
║新│║年│║快│║樂│║喲│ ║！│
☆ ╭☆╯ ╰☆╮☆
║ ☆ 元旦节到了 　　☆ ║
║ 请接受我给您的深深祝福 　 ║
║ 好运 祝： 　 ║
元 ╭☆ 您及您的朋友、家人 ☆╮ 快
旦 ╰☆╮ 元旦快乐 ！！ ╭☆╯ 乐

Last edited by youkaib on 2009-1-3 at 13:00 ]

挺好看的,不错

我是来学习的。楼主，继续努力啊。

顶一个

新年快乐！

呵呵。。。。

有意思，就是闪的太快了点