TIMER tm;
TIMER maxTimer;
DCL
   result BOOLEAN,
   ID Integer,
   toID Integer,
   foreignID Integer,
   tmpID Integer,
   time DURATION; (they used this to define what 30 second is, they used time:=30)

Hour Integer,
Minute Integer,
Delay DURATION;

---------------------
Our Stuff
New req: Although alarm is set by default to 0:00, it will not sound when alarm clock is 
plugged(started) initially.
Pressing @Wake@ shows the current alarm time

For time:
When time is updated, the second timer is reset and coutns fom 0 second again.

For time and alarm:
When minute or 10minute is pressed, if the minute counter passes 59 minutes, then the
hour counter is incremented.
=-=-=-=-=-=-=-=-=


SIGNAL
iTimeToShow(Integer,Integer),
iTimeToAlarm(Integer,Integer),
iCurAlarmTime(Integer,Integer),

bMinButtonPressed,
bMin10ButtonPressed,
bHourButtonPressed,

bWakeButtonPressed,
bWakeMinButtonPressed,
bWakeMin10ButtonPressed,
bWakeHourButtonPressed,

bSnoozeButtonPressed,
sTypeRadioSel,
sTypeBuzzerSel,
sTypeOffSel,
bSoundActualAlarm,
RadioOn,	//So those here should tell the user is the radio or buzzer is actually on.
RadioOff,
BuzzerON,
BuzzerOFF;



TimeUpdater Process:

TIMER waitMinuteTimer;
DCL
Hour Integer,
Minute Integer,
MinuteHelper Integer,
Delay DURATION;

ActualAlarm Process:

TIMER SNOOZETimer;
DCL
ActivateAlarm BOOLEAN,
ActivateSnooze BOOLEAN,
AlarmTypeRadio BOOLEAN,
AlarmTypeBuzzer BOOLEAN,
AlarmTypeOff BOOLEAN,
RadioIsOn BOOLEAN,
BuzzerIsOn BOOLEAN,
SnoozeDelay DURATION;