SUBR STRT REV E 1 PAGE 2
0058 00067 0 01 00073 JMP OK YES - THEY ARE ON
0059 00070 0 02 00444 TEST LDA IND
0060 00071 101040 SNZ
0061 00072 0 01 00346 JMP OUT
0062 00073 0 02 00633 OK LDA OVR!
0063 00074 0 10 00000 CALL MSGINT
0064 00075 54 1500 OVER INA '1500
0065 00076 0 01 00075 JMP *-1
0066 00077 0 03 00523 ANA ='20000
IS OVERRIDE PRESSED
0067 00100 101040 SNZ
0068 00101 0 01 00075 JMP OVER NO - WAIT FOR IT
0069 00102 0 02 00522 LDA ='6
TURN ON SOLENOID &
0070 00103 0 10 00000 CALL HOLD 15 VOLTS
0071 00104 100000 SKP
0072 00105 0 01 00300 JMP ERR2
0073 00106 54 1500 INA '1500
0074 00107 0 01 00106 JMP *-1
0075 00110 0 04 00447 STA SAVA
0076 00111 0 03 00521 ANA ='300
15V SHOULD BE ON
0077 00112 0 05 00520 ERA ='200
AND MOOG OFF
0078 00113 100040 SZE
0079 00114 0 01 00340 JMP RELY RELAY FAULT
0080 00115 0 02 00517 LDA =-10
0081 00116 0 04 00446 STA REPT
0082 00117 54 1500 LOW INA '1500
0083 00120 0 01 00117 JMP *-1
0084 00121 0 04 00447 STA SAVA
0085 00122 0 03 00516 ANA ='1000
LP SHOULD BE ON
0086 00123 100040 SZE
0087 00124 0 01 00133 JMP HIGH YES
0088 00125 0 12 00446 IRS REPT NO - WAIT
0089 00126 100000 SKP
0090 00127 0 01 00342 JMP NOLO NO LOW PRESSURE
0091 00130 0 02 00515 LDA =10
0092 00131 0 10 00000 CALL WAIT
0093 00132 0 01 00117 JMP LOW
0094 00133 0 02 00514 HIGH LDA =-30
0095 00134 0 04 00446 STA REPT
0096 00135 54 1500 INA '1500
0097 00136 0 01 00135 JMP *-1
0098 00137 0 04 00447 STA SAVA
0099 00140 0 03 00513 ANA ='400
HP SHOULD BE ON
0100 00141 100040 SZE
0101 00142 0 01 00153 JMP MOOG
0102 00143 0 12 00446 IRS REPT WAIT
0103 00144 100000 SKP
0104 00145 0 01 00344 JMP NOHI NO HIGH PRESSURE
0105 00146 0 02 00515 LDA =10
0106 00147 0 10 00000 CALL WAIT
0107 00150 0 01 00135 JMP HIGH+2
0108 00151 0 02 00512 LDA =20
0109 00152 0 10 00000 CALL WAIT
0110 00153 0 02 00511 MOOG LDA ='7
TURN OM MOOG
0111 00154 0 10 00000 CALL HOLD
0112 00155 100000 SKP
0113 00156 0 01 00276 JMP ERR4
0114 00157 0 02 00517 LDA =-10