标题: 我给大家写的祝福批处理，改进版 [打印本页]
作者: youkaib 时间: 2009-1-1 11:46 标题: 我给大家写的祝福批处理，改进版
感谢大家的支持，我又给改进了，这次有颜色的变换。
@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 ]
作者: netbenton 时间: 2009-1-2 03:21
挺好看的,不错
作者: hackerscans 时间: 2009-1-2 09:51
我是来学习的。楼主，继续努力啊。
作者: Evangel 时间: 2009-1-2 23:12
顶一个
作者: wxcute 时间: 2009-1-3 13:54
新年快乐！
作者: youkaib 时间: 2009-1-5 00:37
呵呵。。。。
作者: qinchun36 时间: 2009-1-15 21:38
有意思，就是闪的太快了点