标题: Merry Christmas! [打印本页]
作者: scriptor 时间: 2006-12-25 13:10 标题: Merry Christmas!
Merry Christmas!
附件 1:WishUHappy.rar (2006-12-25 13:10, 53.12 KiB, 下载附件所需积分 1点 ,下载次数： 78)
作者: gene771771 时间: 2006-12-25 14:09
圣诞节的沙发！
源码如下
cls
@echo off
if not "%~n0"=="EncryBat" goto EncryBat_Display
if not == if exist %1 goto EncryBat_Encryption
:EncryBat_Help
echo.
echo %~n0 - Cryptographic machine for batch program
echo zxcv@cn-dos, willsort@cn-dos - 2006-7-29 - CMD@WinXP
echo.
echo Useage: %~n0 batch_program_with_extname
echo Reference: http://www.cn-dos.net/forum/viewthread.php?tid=22053
if /i not == pause
goto :eof
:EncryBat_Encryption
copy /b "%~f0"+%1 enc_%1>nul
if exist enc_%1 echo. Enc_%1 is create.
goto :eof
:EncryBat_Display
@echo off
echo Please Type the Name
echo Whose You Want to Send this Wish to.
set /p Name=
cls
if {%Name%} == {} goto :default
:start
echo.
mode con: cols=60 lines=30
echo %username%
echo MERRY CHRISTMAS!
start /min wb.mid
@color 49
echo.
echo Your Friend Send This Little Present to you
echo in this Cold and Missing Season.
@echo Best wishes to my good friend!
@echo ------------------------------------------
echo.
echo ╰╮╭－－ －M－E－R－R－Y－ －－╮╭╯
echo ▲╯║ ║╰▲
echo ◇★║ ║★◇
echo ★◇║ ║◇★
echo ▼╮║ ║╭▼
echo ╭╯║ ║╰╮
echo ║ ║
echo ║ ║
echo ║ ║
echo ║ ║
echo ╰╮║ # ║╭╯
echo ▲╯║ # ║╰▲
echo ◇★║ # ║★◇
echo ★◇║ # ║◇★
echo ▼╮║ ║╭▼
echo ╭╯╰－C－H－R－I－S－T－M－A－S－╯╰╮
echo.
@echo ------------------------------------------
@echo.
for /l %%a in (0,2,9) do (
for /l %%b in (1,2,8) do (
ping -n 2 127.1>nul
color d%%a
color %%ab
color 3%%a
color %%b%%a
)
)
color 9d
@echo Press any key to continue......
@pause >nul
echo Again Or Quit(a,q)?
set /p ch=
if /i {%ch%}=={a} goto :start else goto :defalt
:default
cls
echo
echo
echo All Copyright Reserved!
echo No Bussiness Permitted!
echo Author: IsSaint
echo Contact Infomation: 52080012
echo
echo
pause >nul
Last edited by gene771771 on 2006-12-26 at 01:45 PM ]
源码如下
cls
@echo off
if not "%~n0"=="EncryBat" goto EncryBat_Display
if not == if exist %1 goto EncryBat_Encryption
:EncryBat_Help
echo.
echo %~n0 - Cryptographic machine for batch program
echo zxcv@cn-dos, willsort@cn-dos - 2006-7-29 - CMD@WinXP
echo.
echo Useage: %~n0 batch_program_with_extname
echo Reference: http://www.cn-dos.net/forum/viewthread.php?tid=22053
if /i not == pause
goto :eof
:EncryBat_Encryption
copy /b "%~f0"+%1 enc_%1>nul
if exist enc_%1 echo. Enc_%1 is create.
goto :eof
:EncryBat_Display
@echo off
echo Please Type the Name
echo Whose You Want to Send this Wish to.
set /p Name=
cls
if {%Name%} == {} goto :default
:start
echo.
mode con: cols=60 lines=30
echo %username%
echo MERRY CHRISTMAS!
start /min wb.mid
@color 49
echo.
echo Your Friend Send This Little Present to you
echo in this Cold and Missing Season.
@echo Best wishes to my good friend!
@echo ------------------------------------------
echo.
echo ╰╮╭－－ －M－E－R－R－Y－ －－╮╭╯
echo ▲╯║ ║╰▲
echo ◇★║ ║★◇
echo ★◇║ ║◇★
echo ▼╮║ ║╭▼
echo ╭╯║ ║╰╮
echo ║ ║
echo ║ ║
echo ║ ║
echo ║ ║
echo ╰╮║ # ║╭╯
echo ▲╯║ # ║╰▲
echo ◇★║ # ║★◇
echo ★◇║ # ║◇★
echo ▼╮║ ║╭▼
echo ╭╯╰－C－H－R－I－S－T－M－A－S－╯╰╮
echo.
@echo ------------------------------------------
@echo.
for /l %%a in (0,2,9) do (
for /l %%b in (1,2,8) do (
ping -n 2 127.1>nul
color d%%a
color %%ab
color 3%%a
color %%b%%a
)
)
color 9d
@echo Press any key to continue......
@pause >nul
echo Again Or Quit(a,q)?
set /p ch=
if /i {%ch%}=={a} goto :start else goto :defalt
:default
cls
echo
echo
echo All Copyright Reserved!
echo No Bussiness Permitted!
echo Author: IsSaint
echo Contact Infomation: 52080012
echo
echo
pause >nul
Last edited by gene771771 on 2006-12-26 at 01:45 PM ]
作者: ccwan 时间: 2006-12-25 20:54
呵呵，楼上的贴代码选择宋体就工整了。（听Wengier说的）
作者: scriptor 时间: 2006-12-26 02:47 标题: hehe
你好强
作者: xy588 时间: 2006-12-26 11:56
不错，哦
作者: jmz573515 时间: 2006-12-26 12:09
不错！