中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 我给大家写的祝福批处理，改进版

youkaib
初级用户

积分 61
发帖 22
注册 2008-10-19
状态离线

『楼主』: 我给大家写的祝福批处理，改进版

感谢大家的支持，我又给改进了，这次有颜色的变换。 @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 ]

此帖被 +29 点积分

点击查看详情