SUBR STRT REV E 1 PAGE 3

0115 00160 0 04 00446 STA REPT 0116 00161 54 1012 SERV INA '1012 ARE SERVOS AT ZERO? 0117 00162 0 01 00161 JMP *-1 0118 00163 0 03 00510 ANA ='7777 0119 00164 101040 SNZ THESE WILL BE OFF 0120 00165 0 01 00203 JMP LIFT GO LIFT J.6 0121 00166 0 12 00446 IRS REPT WAIT 0122 00167 100000 SKP 0123 00170 0 01 00174 JMP SER1 0124 00171 0 02 00515 LDA =10 0125 00172 0 10 00000 CALL WAIT 0126 00173 0 01 00161 JMP SERV 0127 00174 54 1012 SER1 INA '1012 0128 00175 0 01 00174 JMP *-1 0129 00176 0 04 00447 STA SAVA 0130 00177 0 03 00527 ANA ='77 SERVOS AT ZERO? 0131 00200 101040 SNZ 0132 00201 0 01 00355 JMP POTS NO - POT FAULT 0133 00202 0 01 00364 JMP SERF SERVO FAULT 0134 00203 0 02 00523 LIFT LDA ='20000 0135 00204 74 0022 OTA '22 0136 00205 0 01 00204 JMP *-1 0137 00206 0 02 00507 LDA ='32 0138 00207 74 0030 OTA '30 0139 00210 0 01 00207 JMP *-1 0140 00211 0 02 00506 LDA ='47 LIFT J.6. 0141 00212 0 10 00000 CALL HOLD 0142 00213 100000 SKP 0143 00214 0 01 00277 JMP ERR3 0144 00215 0 02 00505 LDA =5 0145 00216 0 10 00000 CALL WAIT 0146 00217 0 02 00514 LDA =-30 0147 00220 0 04 00446 STA REPT 0148 00221 54 1012 UP INA '1012 0149 00222 0 01 00221 JMP *-1 0150 00223 0 04 00447 STA SAVA 0151 00224 0 03 00527 ANA ='77 0152 00225 101040 SNZ 0153 00226 0 01 00235 JMP SLEV 0154 00227 0 12 00446 IRS REPT 0155 00230 100000 SKP 0156 00231 0 01 00364 JMP SERF 0157 00232 0 02 00515 LDA =10 0158 00233 0 10 00000 CALL WAIT 0159 00234 0 01 00221 JMP UP 0160 00235 0 02 00712 SLEV LDA SL1! 0161 00236 0 10 00000 CALL MSGINT 0162 00237 0 02 00504 LDA =ARV 0163 00240 0 04 00074 STA '74 0164 00241 54 1012 INA '1012 0165 00242 0 01 00241 JMP *-1 0166 00243 0 03 04000 ANA '4000 IS J.6. AT ZERO? 0167 00244 101040 SNZ 0168 00245 0 10 00000 CALL INTR YES - FAULT 0169 00246 0 02 00077 LDA '77 0170 00247 0 03 00504 ANA =ARV IS RV THERE 0171 00250 0 05 00504 ERA =ARV