[办公]每间隔一段时间，提醒做某事

gosub auto
!t:: ;中断循环
global time_b:=1
return
!r::
global time_b:=0
tooltip,请输入数字后按回车键表示确认`n—————————————`n1——按照20分钟间隔提醒`n2——自定义间隔时间提醒`n3——设定时间开始倒计时
Input,z,,{Enter}
if z=1
{
work()
return
}
if z=2
{
ToolTip,请输入数字表示提醒间隔`n单位为分钟`n请回车完成
Input,time,,{Enter}
ToolTip,间隔为 %time% 分钟
settimer,canceltip,1000
Sleep,1000
work(time)
return
}
if z=3
{
Gui Show, w225 h25, 设定时间
settimer,canceltip,100
return
}

guiover:
gui,submit
ToolTip,时间已经设定好了`n预计在%hours% 小时 %minutes% 分钟后弹出提醒
settimer,canceltip,2000
;~ time_set:=hours*60*60*1000+minutes*60*1000
time_set:=hours*1000+minutes*1000
SetTimer,waittime,%time_set%
Return

f5::Reload
waittime:

ToolTip,已经到时间了。
settimer,waittime,off
settimer,canceltip,1000
return
work(time=2){
time_s:=time*1000
tooltip,开始计时啦
loop
{
if time_b=1
break
else
{
SetTimer,canceltip,1000
Sleep,%time_s%
tooltip,%time% 分钟已经过去了
SetTimer,canceltip,1000
}
}
Return
}

canceltip:
SetTimer,canceltip,off
ToolTip
Return

auto:
global time_b:=1
Gui Add, Edit,vhours x24 y0 w32 h21, 0-23
Gui Add, Edit,vminutes x72 y0 w30 h21, 1-60
Gui Add, Button,gguiover x136 y0 w75 h23, OK

上班的时候总是忘记喝水，于是写一个脚本，每间隔一段时间提醒一下。代码只是为了做测试，所以里面时间都是秒，要正常使用的话要改一些数字，就不继续了。

亲爱的朋友们，如果你认为本站不错请打赏，我们非常感谢你的支持！

[su_button url=”http://www.autoahk.com/buyamoney” style=”3d” color=”#ffe41c” size=”20″ radius=”round”]赏[/su_button]