Hour = Mod(GetHour(),12)
IsPM = Floor(GetHour() / 12)

If Hour = 0
	Hour = 12
EndIf

Minute=""+GetMinute()
If Minute < 10
	Minute="0"+Minute
EndIf

If IsPM = 0
	SendMessageToAll("The time is now "+Hour+":"+Minute+" AM",#MSG_EMOTE)
Else
	SendMessageToAll("The time is now "+Hour+":"+Minute+" PM",#MSG_EMOTE)
EndIf

;1 hour: 3600000
;15 minutes: 900000
Timer(514,900000,0,0,0)

Continue = 1