中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-07 16:18
48,041 主题排行 / 350,128 发帖 / 今日 3 篇 / 48,252 会员排行
DOS批处理 & 脚本技术(批处理室) » [原创]菜菜庆祝新年的批处理
可打印版本  723 / 5
第1楼 523066680 发表于 2008-02-17 15:57
银牌会员 发帖 1,133 积分 2,362
[原创]菜菜庆祝新年的批处理
@echo off
title 新年快乐
mode con:cols=109 lines=20
echo.
echo. ★ ,._★.*- ☆ ☆★
for /l %%a in (1,1,2) do (ping -n 1 127.0>nul)&color 0a
echo. ■ 祝新年快乐! ★,_.,☆*~'`^^`'~*-,._ * _.,-*~'☆`^^`'~*-,_.,-*~'☆
for /l %%a in (1,1,2) do (ping -n 1 127.0>nul) &color 0d
echo. ■
for /l %%a in (1,1,2) do (ping -n 1 127.0>nul) &color 01
echo. ■Happy time! ☆%^^~``~-.,,.-'*~^^ ★ ☆
for /l %%a in (1,1,2) do (ping -n 1 127.0>nul) &color 03
echo. ■ ☆ *.,~~^^^ ★ ☆ ☆ ★
for /l %%a in (1,1,3) do (ping -n 1 127.0>nul) &color 05
echo. 新╭╮╭╮╭──╮★──╮╭──╮╭╮╭╮ ☆╭╮╭╮╭──╮╭╮╭╮ ╭╮★╮╭──╮╭──╮☆──╮★
for /l %%a in (1,1,2) do (ping -n 1 127.0>nul) &color 08
echo. ■│││★│╭╮││╭╮││╭☆││╰╯│ │╰╮││╭─╯││││ │╰╯││╭─╯│╭╮││╭╮│
for /l %%a in (1,1,3) do (ping -n 1 127.0>nul) &color 80
echo. 年│╰╯││╰╯││╰╯││╰╯│╰╮╭╯ │  ││╰─★│╰╯│ ╰╮╭╯│╰─╮│╰╯││╰╯│
for /l %%a in (1,1,2) do (ping -n 1 127.0>nul) &color 87
echo. ■│╭╮││╭╮★│╭─╯│╭─╯ ││ ★ │  ││╭─╯││││  ││ │╭★╯│╭╮││╭╭☆
for /l %%a in (1,1,3) do (ping -n 1 127.0>nul) &color 81
echo. 好││││││││││  ││★  ││  │╰╮││╰─╮│  │ ││ │╰─╮││││││╰╮
for /l %%a in (1,1,2) do (ping -n 1 127.0>nul) &color 83
echo. ■╰╯╰╯╰╯╰╯╰╯  ╰╯   ╰╯☆ ╰╯╰╯╰──╯╰╰╯╯☆  ╰╯ ╰──╯╰╯╰╯╰╯╰╯
for /l %%a in (1,1,2) do (ping -n 1 127.0>nul) &color 8c
echo. ■ ★.,-*~' ,.*,-.,☆*~'`^^`'~* ★,_.,☆*~'`^^`'~*-,._ * _.,-*~'☆`^^`'~*-,_.,-*~'☆`^^`'~*-,._★
for /l %%a in (1,1,2) do (ping -n 1 127.0>nul) &color 8e
echo. ■ ☆ ★ ★ ☆ ☆☆ ☆★
for /l %%a in (1,1,2) do (ping -n 1 127.0>nul) &color 8a
echo. ■ ,._★.*-_☆,' ,,*~'`^^`'~*,_ _.,-*~'☆`^^`'~*-,.
for /l %%a in (1,1,2) do (ping -n 1 127.0>nul) &color 81
echo. ☆ ☆
for /l %%f in (1,1,3) do (
for %%a in (9 1 b c d e) do (
color 8%%a
for /l %%f in (1,1,6) do (ping -n 1 127.0>nul)
))
color 87
ping -n 2 127.0>nul
echo.
::///////////////////////这部分是在cn-dos论坛看到并更改的///////////////////////////////////////
set c=----祝大家新年快乐,万事如意! Happy每一天! ---523066680 o(∩_∩)o
for /l %%i in (1,1,76) do (call set/p=%%c:~%%i,1%%<nul&for /l %%f in (1,1,5) do (ping/n 1 127.0>nul))

ping -n 2 127.0>nul
mshta vbscript:CreateObject("SAPI.SpVoice").Speak("Happy new year")(Window.close)
pause>nul
第2楼 suntb 发表于 2008-02-17 17:17
高级用户 发帖 277 积分 581
效果还不错 支持下
第3楼 JIANHUILAI 发表于 2008-02-17 19:28
初级用户 发帖 51 积分 116
good
第4楼 moniuming 发表于 2008-02-17 23:06
银牌会员 发帖 574 积分 1,335 来自 广西
最后能用类似下面的代码让程序自动退出就好了
for /l %%x in (1,1,5000) do echo %%x 1>nul 2>nul
第5楼 jamiyang 发表于 2008-02-18 11:15
初级用户 发帖 12 积分 26
不错,
第6楼 yuehong 发表于 2008-03-05 16:51
初级用户 发帖 37 积分 64
效果还不错 支持下
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023