CyberResearch STH 15B Series, User Manual

Page: 123 / 130

User Manual version 4.11
STH 15B Series
9-111
Example program
5 REM Watchdog timer
10 X=OUTP(&H444)Timer REM Enable / Setting the Watchdog timer
15 GOSUB 500
20 X=OUTP(&H444)Timer REM Refresh the Watchdog timer
25 GOSUB 600
30 X=OUTP(&H444)Timer REM Refresh the Watchdog timer
35 GOSUB 800
X=INP(&H441) REM Disable Watchdog timer
45 END
500 REM Subroutine takes shorter than setting level to complete
.
.
550 RETURN
600 REM Subroutine takes shorter than setting level to complete
.
.
680 RETURN
800 REM Subroutine takes shorter than setting level to complete
.
.
870 RETURN