67HD ...[??? AUTFAIL SECT FILE FGN 7 DOC 67R= # 68=W # TERMINATES AN OLPA AFTER A FAIL HAS OCCURRED WHILST (POSSIBLY) 68QG # RUNNING IN AUTONOUOUS MODE 69=6 # 69PQ #MAC AUTFAIL 6=9B ... LDX 5 %A [LOAD REPLY 6=P2 LDX 2 FX2 6?8L LDX 1 APETADDR(2) [GET PCA ADDR 6?N= LDX 3 EVENT2(2) [GET PNTR TO CONTROL AREA 6#7W ... LDX 7 BFSTATE(2) 6#MG ... BPZ 7 MAUTFAIL8 [J IF NOT IN AUTONOMOUS MODE 6B6B LDN 4 1 6BL2 ADS 4 ASTOP(1) [INCREMENT STOP WORD FOR FAIL 6C5L ... STOPIT 1 6HG= LDCT 0 256 6H^W ERS 0 BFSTATE(2) [CLEAR CHANNEL BUSY MARKER 6JFG ORS 4 BFSTATE(2) [SET CHANNEL FAILED MARKER 6JHP ...MAUTFAIL8 6JKY ... ADN 3 1 [GET PNTR TO REPLY WORD 6JN7 ... FADDRESS 1,3,HLOCK1,2 [GEORGE ADDRESS 6JQB ... STO 5 0(3) [STORE (FAILED) REPLY 6JSK ... CLEAR 1,0 [CLEAR LOCKS & MARK ENTRIES EMPTY 6JWS ... BPZ 7 MAUTFAIL7 [J IF NOT IN AUTONOMOUS MODE 6J^6 JNOTFDRM MAUTFAIL7 6KDQ TICKLES 2,3 6KYB MAUTFAIL7 6LD2 LDX 0 AVENT1(2) 6LXL BZE 0 MAUTFAIL4 [J IF SPOUT EMPTY 6MC= STOZ AVENT1(2) [CLEAR SPOUT 6MWW BNG 0 MAUTFAIL3 [J IF SUSBY SPOUTED 6NBG SBS 4 ACOUNT(2) [DECREMENT PERI COUNT 6NW6 MAUTFAIL3 6P*Q STEPBAC1 ,1 [STEP BACK PROGRAMS ONR 6PTB MAUTFAIL5 6Q*2 LDX 2 APETADDR(2) 6QSL MONEND [CLEAR STOP BIT - THIS IS ALL THAT 6R#= [IS LEFT OF OLPFIN1 AFTER REMOVING 6RRW [CLEAR & COOR1Y 6S?G MAUTFAIL4 6SR6 COOR1Y [SWITCH OFF - ACCUMULATORS NOT SAVED 6T=Q #NOR