當前位置:編程學習大全網 - 編程語言 - 在寫字板編程

在寫字板編程

這個是個鬧鐘程序,不會發聲但是會提醒妳時間到了。操作方法如下:

將以下代碼復制到寫字板上,然後另存為 鬧鐘.bat ,打開這個鬧鐘.bat試下~

很久以前自己寫的,當時不是很會,代碼有點繁冗,高手請不要賤笑哈~

@echo off

title -miniclock- Bata1 -CCP

COLOR a

del %temp%\1.cab,%temp%\2.hta,%temp%\3.bat||cls

:start

cls

mode con lines=4 cols=39 || cls

ECHO 請設置壹個提醒時間,如8:30或09:50等...

ECHO.

SET /P a=

if "%a:~1,1%"==":" goto ss

if "%a:~0,1%"=="0" goto sm

if "%a:~0,2%"=="11" goto sq

if "%a:~0,2%"=="10" goto sq

:st

CLS

color c

ECHO 妳設置的時間是下午%a%,確認[Y,N]...

ECHO.

set /p q=

if "%q%"=="y" goto aft

if "%q%"=="Y" goto aft

if "%q%"=="N" goto start

if "%q%"=="n" goto start

goto st

:aft

ECHO :x > %temp%\3.bat

ECHO set p=%%time%% >> %temp%\3.bat

ECHO ECHO "%%p:~0,-6%%" ^> %temp%\1.cab >> %temp%\3.bat

ECHO find %temp%\1.cab "%a%" ^&^& goto p >> %temp%\3.bat

ECHO ping -n 40 127.1>nul >> %temp%\3.bat

ECHO goto x >> %temp%\3.bat

ECHO :P >> %temp%\3.bat

ECHO ECHO ^@ECHO OFF ^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO ECHO 小子,時間到了,準備幹嗎啊?^>^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO PAUSE ^>^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO DEL ^%%^%%0 ^>^>%temp%\x.bat >> %temp%\3.bat

ECHO start/max %temp%\x.bat >> %temp%\3.bat

ECHO del %temp%\1.cab ^&^& del %%0 >> %temp%\3.bat

ECHO set a=wscript.createobject("wscript.shell") >> 3.vbs

ECHO a.run "%temp%\3.bat /start",0 >> 3.vbs

3.vbs && del 3.vbs

exit

:sq

CLS

color c

ECHO 妳設置的時間是上午%a%,確認[Y,N]...

ECHO.

set /p q=

if "%q%"=="y" goto mor

if "%q%"=="Y" goto mor

if "%q%"=="N" goto start

if "%q%"=="n" goto start

goto sq

:mor

ECHO :x > %temp%\3.bat

ECHO set p=%%time%% >> %temp%\3.bat

ECHO ECHO "%%p:~0,-6%%" ^> %temp%\1.cab >> %temp%\3.bat

ECHO find %temp%\1.cab "%a%" ^&^& goto p >> %temp%\3.bat

ECHO ping -n 40 127.1>nul >> %temp%\3.bat

ECHO goto x >> %temp%\3.bat

ECHO :P >> %temp%\3.bat

ECHO ECHO ^@ECHO OFF ^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO ECHO 小子,時間到了,準備幹嗎啊?^>^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO PAUSE ^>^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO DEL ^%%^%%0 ^>^>%temp%\x.bat >> %temp%\3.bat

ECHO start/max %temp%\x.bat >> %temp%\3.bat

ECHO del %temp%\1.cab ^&^& del %%0 >> %temp%\3.bat

ECHO set a=wscript.createobject("wscript.shell") >> 3.vbs

ECHO a.run "%temp%\3.bat /start",0 >> 3.vbs

3.vbs && del 3.vbs

exit

:ss

CLS

color c

ECHO 妳設置的時間是上午%a%,確認[Y,N]...

ECHO.

set /p q=

if "%q%"=="y" goto mor

if "%q%"=="Y" goto mor

if "%q%"=="N" goto start

if "%q%"=="n" goto start

goto ss

:mor

ECHO :x > %temp%\3.bat

ECHO set p=%%time%% >> %temp%\3.bat

ECHO ECHO "%%p:~0,-6%%" ^> %temp%\1.cab >> %temp%\3.bat

ECHO find %temp%\1.cab " %a%" ^&^& goto p >> %temp%\3.bat

ECHO ping -n 40 127.1>nul >> %temp%\3.bat

ECHO goto x >> %temp%\3.bat

ECHO :P >> %temp%\3.bat

ECHO ECHO ^@ECHO OFF ^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO ECHO 小子,時間到了,準備幹嗎啊?^>^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO PAUSE ^>^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO DEL ^%%^%%0 ^>^>%temp%\x.bat >> %temp%\3.bat

ECHO start/max %temp%\x.bat >> %temp%\3.bat

ECHO del %temp%\1.cab ^&^& del %%0 >> %temp%\3.bat

ECHO set a=wscript.createobject("wscript.shell") >> 3.vbs

ECHO a.run "%temp%\3.bat /start",0 >> 3.vbs

3.vbs && del 3.vbs

exit

:sm

CLS

color c

ECHO 妳設置的時間是上午%a%,確認[Y,N]...

ECHO.

set /p q=

if "%q%"=="y" goto mor

if "%q%"=="Y" goto mor

if "%q%"=="N" goto start

if "%q%"=="n" goto start

goto sm

:mor

ECHO :x > %temp%\3.bat

ECHO set p=%%time%% >> %temp%\3.bat

ECHO ECHO "%%p:~0,-6%%" ^> %temp%\1.cab >> %temp%\3.bat

ECHO find %temp%\1.cab "%a:~1,4%" ^&^& goto p >> %temp%\3.bat

ECHO ping -n 40 127.1>nul >> %temp%\3.bat

ECHO goto x >> %temp%\3.bat

ECHO :P >> %temp%\3.bat

ECHO ECHO ^@ECHO OFF ^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO ECHO 小子,時間到了,準備幹嗎啊?^>^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO PAUSE ^>^>%temp%\x.bat >> %temp%\3.bat

ECHO ECHO DEL ^%%^%%0 ^>^>%temp%\x.bat >> %temp%\3.bat

ECHO start/max %temp%\x.bat >> %temp%\3.bat

ECHO del %temp%\1.cab ^&^& del %%0 >> %temp%\3.bat

ECHO set a=wscript.createobject("wscript.shell") >> 3.vbs

ECHO a.run "%temp%\3.bat /start",0 >> 3.vbs

3.vbs && del 3.vbs

exit

  • 上一篇:我的世界的各種指令。
  • 下一篇:西部戰區列裝新型PLC-181卡車炮?
  • copyright 2024編程學習大全網