Intermec Transaction Manager 9560, User Manual

Page: 239 / 309

Interactive Reader Language
9-13
9
G#0=0.START :Nothing at the sense inputs, return to beginning.
C$0=#0 :Convert the input to string for test.
D#1=[$0] :Determine the string length.
G#1=2.ALARM :If second bit is set, an alarm is detected.
G#1=1.DOROPEN :If first bit is set, the door is open.
G.FAULT :If any other bit is set, the unit faulted.
:**********************************************************************
:This subroutine handles an alarm signal. *
:**********************************************************************
:
.ALARM
P"ALARM SIGNAL DETECTED" :Inform user of the alarm.
P"ACCESS DENIED"
D$0="ALARM --" :Prepare message for host.
TA :Append time to message.
XMP,$0 :Transmit alarm message to host.
G.HOUSKEP :Continue testing for alarm.
:**********************************************************************
:If the door is held open too long, the program prompts the user to *
:close it. *
:**********************************************************************
:
.DOROPEN
B01010101 :Beep at the user.
P"DOOR OPEN" :Prompt user to close door.
P"PLEASE CLOSE"
W5 :Wait 5 seconds for the message to be read.
G.HOUSKEP :Continue testing for open door.
:**********************************************************************
:This subroutine handles any fault detection. *
:**********************************************************************
:
.FAULT
B11110000 :Beep at the user.
P"FAULT" :Inform user of the fault
P"INVALID SENSE INPUT"
W5 :Wait 5 seconds for the message to be read.
G.HOUSKEP :Continue testing for fault.
E