'' Desktop reminder
'' Nikolai Bird 2009 3qwe.com
''
'' Great for constant reminders such as taking a break every hour.
'' When you sit in fron of a PC all day long it is hard to remember to give
'' your eyes a rest and also take on water. I wrote this script for that very purpose
''
'' Just place it on your desktop and run it in the morning when you start your PC.
''
'' To set the timer change the following to the number of seconds between reminders. One hour example: ReminderAfterThisManySeconds = 3600
'' Also set the message within the quotes. Ex: ReminderMessage = "Drink some water"
ReminderAfterThisManySeconds = 3600 ' 1 hour
ReminderMessage = "Time to take a break. Drink some water."
''''''''''''''''''' Do not change anything under this line
do
WScript.Sleep ReminderAfterThisManySeconds * 1000
answer=MsgBox(ReminderMessage,65,"Reminder - Cancel to stop messages")
if answer = 2 then WScript.Quit
loop