‘壹’ 鐢╞at镊浣滆嚜宸辩殑闂归挓銆100鍒嗘ユ眰銆
杩欎釜瑕佽呭崈鍗冮润钖𨱒ヤ负浣犲搷闂归挓
@echo off
color f4
mode con: cols=70 lines=20
@echo [闂归挓绋嫔簭 by锛氱窘鏋玗
Title [闂归挓绋嫔簭 V1.0]
set tm1=%time:~0,2%
set tm2=%time:~3,2%
set da1=%date:~0,4%
set da2=%date:~5,2%
set da3=%date:~8,2%
mshta vbscript:msgbox("娆㈣繋浣跨敤闂归挓绋嫔簭",64,"闂归挓绋嫔簭")(window.close)
cls
if not exist "C:\Program Files\TTPlayer\TTPlayer.exe" goto ttplayer
goto xp
:ttplayer
mshta vbscript:msgbox("鎭ㄦ病链夊畨瑁呭崈鍗冮润钖鎾鏀惧櫒鎴栨病链夋ｇ‘瀹夎咃紒璇峰畨瑁呭埌 C:\Program Files\TTPlayer 鐩褰曚笅锛",64,"阌栾")(window.close)
exit
:xp
if exist "c:\windows\system32\shutdown.exe" goto home
mshta vbscript:msgbox("鎭ㄧ殑镎崭綔绯荤粺涓嶆槸Windows XP鎴栬呮洿楂樼増链锛",64,"鍏煎归敊璇")(window.close)
goto end
:home
cls
echo ----------------------------------------------------------------------
echo.
echo 娆㈣繋%username%, 浠婂ぉ鏄 %da1%骞%da2%链%da3%鍙 镞堕棿涓 %tm1%镞%tm2%鍒
echo A銆佸畾涔夐椆阍熸椂闂淬
echo B銆佸畾涔夊叧链烘椂闂淬
echo C銆佸畾涔夐椆阍熼煶閲忋
echo D銆佸彇娑堜綔涓氥
echo E銆佸叧闂鎻愰啋闂归挓銆
echo F銆侀樆姝㈢郴缁熷叧链恒
echo Q銆侀鍑虹▼搴忋
set /p pass=璇疯緭鍏ヨ佹搷浣灭殑浠ｇ爜锛圆銆丅銆丆銆丏銆丒銆丗銆丵锛:
set "pass=%pass:"=%"
if /i "%pass%"=="A" goto time
if /i "%pass%"=="B" goto off
if /i "%pass%"=="C" goto vol
if /i "%pass%"=="D" goto c
if /i "%pass%"=="Q" goto end
if /i "%pass%"=="E" goto notime
if /i "%pass%"=="F" goto nooff
cls
@echo msgbox"鎭ㄨ緭鍏ョ殑镙煎纺链夎锛岃烽吨璇曪紒">msg.vbs&msg.vbs&del msg.vbs
goto :home
:time
cls
set tm1=%time:~0,2%
set tm2=%time:~3,2%
echo 璇疯緭鍏ヨ佸畾涔夌殑镞堕棿锛岀幇鍦ㄦ椂闂翠负 %tm1%镞%tm2%鍒嗭纸杈揿叆镙煎纺涓篨X:XX锛
set /p tm=璇疯緭鍏ユ椂闂:
set "tm=%tm:"=%"
at %tm% "C:\Program Files\TTPlayer\TTPlayer.exe">nul
if %errorlevel% == 1 goto err
@echo msgbox"闂归挓宸茶剧疆鎴愬姛锛">msg.vbs&msg.vbs&del msg.vbs
goto home
:off
cls
set tm1=%time:~0,2%
set tm2=%time:~3,2%
echo 璇疯緭鍏ヨ佸叧链虹殑镞堕棿锛岀幇鍦ㄦ椂闂翠负 %tm1%镞%tm2%鍒嗭纸杈揿叆涓烘牸寮廥X:XX锛
set /p off=璇疯緭鍏ユ椂闂:
set "off=%off:"=%"
at %off% shutdown -f -s -t 30 -c "绯荤粺灏30绉掑悗镊锷ㄥ叧链猴纴璇蜂缭瀛桦ソ鎭ㄦ湭淇濆瓨镄勬枃浠讹紒 缇芥灚娓╅Θ鎻愮ず銆">nul
if %errorlevel% == 1 goto err
@echo msgbox"瀹氭椂鍏虫満璁剧疆鎴愬姛锛">msg.vbs&msg.vbs&del msg.vbs
goto home
:vol
cls
echo 璁剧疆闂归挓阔抽噺銆
rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,0
@echo msgbox"阔抽噺璁剧疆鎴愬姛锛">msg.vbs&msg.vbs&del msg.vbs
goto home
:c
cls
at /delete /yes
echo.
echo.
echo.
echo 姝ｅ湪鍙栨秷璁惧畾锛岃风◢鍊欙紒
set /p= ====================================================================<nul
set /p= <nul
for /l %%b in (1,1,69) do set /p=^><nul&ping -n 0 127.1>nul
@echo msgbox"鍙栨秷璁惧畾鎴愬姛">msg.vbs&msg.vbs&del msg.vbs
goto home
:end
exit
:err
@echo msgbox"鎭ㄨ緭鍏ョ殑镙煎纺链夎锛岃烽吨璇曪紒">msg.vbs&msg.vbs&del msg.vbs
goto home
:notime
cls
echo.
echo.
echo.
echo 姝ｅ湪鍏抽棴闂归挓锛岃风◢鍊欙紒
set /p= ====================================================================<nul
set /p= <nul
for /l %%b in (1,1,69) do set /p=^><nul&ping -n 0 127.1>nul
taskkill /f /im ttplayer.exe>nul 2>nul
@echo msgbox"闂归挓宸插叧闂锛">msg.vbs&msg.vbs&del msg.vbs
goto home
:nooff
cls
echo.
echo.
echo.
echo 姝ｅ湪阒绘㈢郴缁熷叧闂锛岃风◢鍊欙紒
set /p= ====================================================================<nul
set /p= <nul
for /l %%b in (1,1,69) do set /p=^><nul&ping -n 0 127.1>nul
shutdown -a>nul 2>nul
@echo msgbox"宸叉垚锷熼樆姝锛">msg.vbs&msg.vbs&del msg.vbs
goto home