按键精灵获取系统时间定时点击

'==========以下是按键精灵录制的内容 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
'==========以上是按键精灵录制的内容==========