BASIC stamp manual v2.2
POLLOUT – BASIC Stamp Command Reference
Page 330 • BASIC Stamp Syntax and Reference Manual 2.2 • www.parallax.com
"Front Door : ", CR,
"Back Door : ", CR,
"Patio : ", CR
FOR idx = 0 TO 2 ' scan alarm bits
DEBUG CRSRXY, 13, idx ' move cursor
IF (alarms.LOWBIT(idx)) THEN ' report each bit status
DEBUG "Alarm", CR
ELSE
DEBUG "-", CR
ENDIF
NEXT
DEBUG CR, "Press RESET to clear..."
DO : LOOP UNTIL (Rst = 0) ' wait until Rst pressed
GOTO Setup
END