jessey, This should save you a few bytes......
_On con 1
COUNTER VAR BYTE
Timer_Is var byte[13]
Clock_Mode var byte
On_Am_Pm_Mode VAR BYTE[13]
Hours VAR BYTE
On_Timer_Hour VAR BYTE[13]
Minutes VAR BYTE
On_Timer_Min VAR BYTE[13]
Seconds VAR BYTE
On_Timer_Sec VAR BYTE[13]
Check_The_Timers_Relay: 'this code uses 1404 bytes
COUNTER = 1
WHILE COUNTER < 13 'LOOP 12 TIMES
IF Timer_Is(COUNTER) = _On then
IF Clock_Mode = On_Am_Pm_Mode(COUNTER) THEN ' this checks the am/pm mode for on Timer
IF Hours = On_Timer_Hour(COUNTER) THEN
IF Minutes = On_Timer_Min(COUNTER) then
IF Seconds = On_Timer_Sec(COUNTER) THEN
GOSUB Turn_On_The_Relay
ENDIF
ENDIF
ENDIF
endif
IF Clock_Mode = Off_Am_Pm_Mode(COUNTER) THEN
IF Hours = Off_Timer_Hour(COUNTER) THEN
IF Minutes = Off_Timer_Min(COUNTER) then
IF Seconds = Off_Timer_Sec(COUNTER) THEN
GOSUB Turn_Off_The_Relay
ENDIF
ENDIF
ENDIF
endif
ENDIF
COUNTER = COUNTER + 1
WEND
RETURN
Dave Purola,
N8NTA
Bookmarks