标题: 偶写的一个圣诞卡片批处理，，请前辈还指导 [打印本页]
作者: lzbow 时间: 2010-12-14 18:45 标题: 偶写的一个圣诞卡片批处理，，请前辈还指导
@echo off
title 圣诞卡片
color 02
echo.
echo.
echo 想要给你的TA一张电子圣诞卡片吗?按照下面的提示就可以了.
echo.
pause
cls
set /p name= 输入你的TA的名字^(输入完后按回车键继续^)：
set /p one= 输入你要对TA说的第一句话，最多只能25个字哦(输入完后按回车键继续^)：
set /p two= 输入你要对TA说的第二句话，最多只能25个字哦(输入完后按回车键继续^)：
set /p three= 输入你要对TA说的第二句话，最多只能25个字哦(输入完后按回车键继续^)：
set /p you= 输入你的大名(输入完后按回车键继续^)：
set one=%one:~0,25%
set two=%two:~0,25%
set three=%three:~0,25%
set a=10
set b=5
set c=0
:m
set /a a+=7
set /a b+=2
set /a c+=1
if %c% gtr 9 set c=0
color 0%c%
echo.
echo ·
echo · ☆ ·
echo · ☆△☆
echo · ◇※※◇ · ·
echo · △△※△△
echo · ★※☆★※★☆ ·
echo △
echo · ☆※☆ ·
echo ◆◇●◎ ·
echo · △※▲※★ ·
echo ※☆◇◇☆※
echo · △△△△△△△△△
echo · ■ ·
echo · ■ ·
echo · ■ ·
echo ----------------------------------------------------------------------------------------------
echo · · · · 祝你 · · · ·
echo · · · · · · · ·
echo · · · · · ·
echo · · · ·
echo · 圣诞 · · 快乐 ·
echo · · · ·
echo · · · ·
echo · · · ·
echo · · · ·
echo · ·
mode con cols=%a% lines=%b%
if %a% lss 90 goto m
echo.
echo ·
echo · ☆ ·
echo · ☆△☆
echo · ◇※※◇ · · TO:%name%
echo · △△※△△ %one%
echo · ★※☆★※★☆ · %two%
echo △ %three%
echo · ☆※☆ ·
echo ◆◇●◎ ·
echo · △※▲※★ ·
echo ※☆◇◇☆※
echo · △△△△△△△△△
echo · ■ · By:%you%
echo · ■ ·
echo · ■ ·
echo ----------------------------------------------------------------------------------------------
echo · · · · 祝你 · · · ·
echo · · · · · · · ·
echo · · · · · ·
echo · · · ·
echo · 圣诞 · · 快乐 ·
echo · · · ·
echo · · · ·
echo · · · ·
echo · · · ·
echo · ·
for %%i in (01 02 03 04 05 06 07 08 09 0a 0b 0c 0d 0e 0f) do (ping 127.0.0.1 -n 2 > nul & color %%i)
echo 预览完了吗?按任意键退出！ & pause >nul
echo @echo off >> temp.txt
echo title 圣诞节快乐 >> temp.txt
echo set one=%one% >> temp.txt
echo set two=%two% >> temp.txt
echo set three=%three% >> temp.txt
echo set you=%you% >> temp.txt
for /f "skip=17 tokens=*" %%i in ('type %0') do echo %%i >> temp.txt
for /f "skip=2 tokens=*" %%i in ('find /v /i "temp" temp.txt') do echo %%i >>temp1.txt
for /f "skip=2 tokens=*" %%i in ('find /v /i "explorer" temp1.txt') do echo %%i >>temp2.txt
for /f "skip=2 tokens=*" %%i in ('find /v /i "ta" temp2.txt') do echo %%i >> 圣诞卡片.bat
del temp.txt
del temp1.txt
del temp2.txt
echo 卡片已经保存在%~d0%~p0，你可以发给你的那个TA了. 按任意键退出. & pause > nul
start explorer %~d0%~p0
:s
set /a a-=7
set /a b-=2
mode con cols=%a% lines=%b%
if %a% gtr 10 (goto s) else (exit)
作者: qinchun36 时间: 2010-12-15 12:12
挺细心啊，还有进入和退出效果，很人性化的东西，有这样的心态相信你一定能做出更完美的东西。
说一点，%~d0%~p0跟%~pd0和%~dp0其实是一样的。我感觉如果把下面这些帖子里的东西应用进来，可能会更好：
单行输出彩色字符
http://cn-dos.net/forum/viewthread.php?tid=38940
explorer.exe的命令参数及其应用
http://cn-dos.net/forum/viewthread.php?tid=28256
作者: netbenton 时间: 2010-12-16 15:10
我也写一个
用楼主的图，
但是多彩的，
星星会一闪一闪的~~~
文件还是逐字变色的~~~
还有鼠标特效哦~~~
跟随鼠标上的星星还会变色的~~嘿嘿~~
鼠标移多了花屏怎么办，不要紧！文字逐字变好后，就会自动刷新的~~~
最主要的一点，CPU占用率在%1以下！！！
[ Last edited by netbenton on 2010-12-16 at 01:03 ]
附件 1:2010圣诞贺卡.rar (2010-12-16 20:59, 3.13 K,下载次数： 70)
作者: Hanyeguxing 时间: 2010-12-16 17:57
| Quote: | |
|
小心哦~~~是炸弹来的，按任意键暴炸。。。
作者: netbenton 时间: 2010-12-16 21:07
说是炸弹，是用来吓MM的，哈哈~~~
刚刚增加了不少功能，在cmd窗口能玩成这样~~~~~~~。。。
3楼附件已经更新。
特别提醒：
这个ts.com 也可以在纯DOS下实现这些特效功能的！！！
作者: Hanyeguxing 时间: 2010-12-16 21:14
给你点出乱码了哈。。。
附件 1:未命名.gif (2010-12-16 21:14, 14.15 K,下载次数： 3)
作者: netbenton 时间: 2010-12-16 21:39
Hanyeguxing
看来你的电脑和我的较兼容，
好多网友说运行看不到效果，
也不知道原因何在？
作者: Hanyeguxing 时间: 2010-12-16 22:50
凡是看不到的通通RPWT......
作者: netbenton 时间: 2010-12-17 21:58
再写个在纯dos下特效，win下就试3楼的
要把环境变量空间设置大一点：
command /E:4096
用 天汇 或，ucdos 汉字显示系统
附件 1:
作者: renmingwu 时间: 2010-12-23 09:46
我这没有乱码，效果也出来了，挺漂亮的。
作者: Gipors 时间: 2010-12-24 15:28 标题: ts.com 是什么东东？~
ts.com 是什么东东？~ 吓人是不是因为这个？！
作者: acaigg 时间: 2010-12-27 17:55
好东东，哈
作者: netbenton 时间: 2010-12-27 19:49
再增强下：
实现了按鼠标移动轨迹显示多彩星星，并逐渐消失。
附件 1:
作者: 726842270 时间: 2011-1-17 10:14
思路非常不错，构思奇妙,学习了
作者: acaigg 时间: 2011-1-18 19:52
建議增加音樂效果進去會更好.
作者: x1x1h 时间: 2016-11-19 12:09
哇塞，各位都好厉害，学习 了。