'==========以下是按键精灵录制的内容 author:chzeze ==========
dim h,m,s
Rem [wait]
h=Hour(time)
m = Minute(time)
s = Second(time)
UserVar HH=0 "时（时）"
UserVar MM=0 "分（分）"
UserVar SS=0 "秒（秒）"
UserVar inter=6500 "第二次提交间隔(毫秒)"

If h = HH and m = MM and s=SS

MoveTo 85, 40
Delay 0
LeftDown 1
Delay 0
LeftClick 1
Delay 0
LeftUp 1

Delay inter
LeftDown 1
Delay 0
LeftClick 1
Delay 0
LeftUp 1

Else 
Delay 200
Goto [wait] 
EndIf

'==========以上是按键精灵录制的内容==========