
29
10
REM EXAMPLE PROGRAM
11
REM WATCH-DOG TIMER == WDT
20
GOSUB 5000 REM ENABLE AND REFRESH THE WDT
30
GOSUB 1000 REM TASK 1, 2 SECS
40
GOSUB 5000 REFRESH THE WDT
50
GOSUB 2000 REM TASK 2, 3 SECS
60
GOSUB 6000 REM DISABLE THE WDT
70
GOSUB 3000 REM TASK 3, 5 SECS
80
GOSUB 5000 REM ENABLE AND REFRESH THE WDT
90
GOTO 30
1000
REM SUBROUTINE #1
2 SECONDS TO COMPLETE
1070
RETURN
2000
REM SUBROUTINE #2
3 SECONDS TO COMPLETE
2070
RETURN
5000
REM SUBROUTINE TO ENABLE AND RESET WDT
5010
X = INP( &H443) REM ENABLE AND REFRESH TIMER
5020
RETURN
6000
REM SUBROUTINE TO DISABLE THE WDT
6010
X = INP( &H43) REM RESET WDT
6020
RETURN