vb script for a alarm
OneHourTimer Sub OneHourTimer For i = 1 To 2 ...