|
- UID
- 16231
- 帖子
- 26
- 积分
- 13
- 紫菀
- 0 朵
- 花瓣
- 16 片
- 花蕊
- 0 朵
- 野草莓
- 0 个
- 蒲公英
- 0 朵
- 社区等级
- 2 级
- 在线时间
- 3 小时
- 注册时间
- 2007-9-30
- 登录状态
-
当前离线
|
5楼
发表于 2008-4-9 22:43
| 只看该作者
@echo off
if %date:~11,3% == 星期二 goto YesDay
if exist %temp%\QQffo.tmp goto list
:cho
cls
echo 今天不是星期二,是否对程序进行设置。
echo.
echo Y(是) N(否)
echo.
echo.
set /p pap=输入：
if %pap% == y goto parp
if %pap% == Y goto parp
if %pap% == n goto Aarp
if %pap% == N goto Aarp
echo 你的输入有误，请重新输入：
goto cho
:Aarp
echo 没有找到上次记录的打BOSS时间！
echo 程序在5秒后退出
ping /n 5 127.0.0.1 >nul
exit
:list
for /f "skip=1 tokens=1" %%M in (%temp%\QQffo.tmp) do set Shijian=%%M
GOTO loop
:YesDay
echo 今天是星期二，游戏进行了更新
echo 时间类型为24小时制 例：10点请输入 10
:parp
set /p Shijian=请输入更新完后的时间：
:GOp
set /a Shijian=%Shijian% + 6
del %temp%\HostTW.tmp >nul
echo.>%temp%\QQffo.tmp
echo %Shijian%>>%temp%\QQffo.tmp
cls
echo 程序进行中，下次提醒时间为 "%Shijian%"点！
ping 127.0.0.1 >nul
cls
echo 到了%Shijian%点本程序会给于提醒
ping 127.0.0.1>nul
cls
echo 请最小化本程序！
ping /n 60 127.0.0.1 >nul
:Loop
cls
echo 下次提醒时间为 "%Shijian%"点
ping /n 6 127.0.0.1 >nul
if exist "%temp%\HostTW.tmp" goto GOp
if %time:~0,2% == %Shijian% goto Star
goto Loop
:Star
echo msgbox "QQ自由幻想BOSS已出现，现在时间为 %Shijian%",48,"QQ自由幻想提示" >%temp%\vbs.vbs
start %temp%\vbs.vbs
echo.>%temp%\HostTW.tmp
goto Loop
exit
我转的 看不懂算了 |
|
