เกี่ยวกับเวลาครับ

ผมอยากให้ Func  1 ทำงานตอน12.00และ17.30 Func 2 ทำงานทุกๆ3ชั่วโมงครึ่ง  ขอ ต.ย สคิปไว้ศึกษาครับ

-จากตัวอย่างนี้จะรันFunc1 เวลา12.00หรือ17.30ตรงเท่านั้น ขาด-เกินแม้แต่นาทีเดียวจะไม่รันFunc1
-ส่วน Func2 รันทุกๆ 12600000 milliseconds(มิลลิวินาที)

Code:

$Timer = TimerInit()
While 1
   If (@HOUR = 12 And @MIN = 00) Or (@HOUR = 17 And @MIN = 30) Then Func1()
   If TimerDiff($Timer) > 12600000 Then Func2()
   Sleep(500)
WEnd

Func Func1()
   MsgBox(0, "ขณะนี้เป็นเวลา " & @HOUR & ":" & @MIN, "Func1 ทำงาน")
EndFunc

Func Func2()
   MsgBox(0, "เวลาผ่านไป " & TimerDiff($Timer) & " milliseconds", "Func2 ทำงาน")
   $Timer = TimerInit()
EndFunc

ได้แล้วครับขอบคุณมากครับ