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