|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 23928 (0x5d78)
Notes: pts_type(SC)
Names: »DRTC01.SC«
└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
└─⟦this⟧ »TOSSWORK/DRTC01.SC«
IDENT DRTC01 REL 8.2 78-09-15 870105040820 NO SELECT AT PGM LOADING FAST I/O, SHORT INH TIME REL 8.1 78-04-21 ******************************************************* * * PHILIPS TERMINAL SYSTEM PTS * * DRTC01 = DRIVER TAPE CASSETTE RECORDER * * * * * * ******************************************************* * * * THIS DRIVER HANDLES ONE OR TWO TAPE CASSETTE RECORDERS * CONNECTED TO CPU VIA CHCR-DCR * * ONLY ONE RECORDER CAN BE BE OPERATED AT A TIME, EXCEPT * AT REWIND AND UNLOAD * * DATA IS RECORDED IN BLOCKS WITH LENGTHS FROM 2 TO * 256 CHARACTERS * EJECT DRTC01 * * * THE DRIVER CONSISTS OF THE FOLLOWING PARTS: * * T C D A : ACTIVATION PART * * I H T C : INTERRUPT HANDLER * * R C O V E R : RECOVERY ROUTINE * * D W T C 0 1 : DEVICE WORK TABLE 01 * * D W T C 0 2 : DEVICE WORK TABLE 02 * * AND O R D E R P R O C E S S O R S * * * THE FOLLOWING ORDERS ARE TREATED: * * ORDER /00: TEST STATUS * /02: READ * /05: WRITE * /06: WRITE * /22: WRITE TAPE MARK * /26: LOCK * /31: REWIND * /33: REVERSE * /24: ERASE * /37: LOAD * /38: UNLOAD * EJECT DRTC01 * * * THE FOLLOWING RETURN CODES ARE USED: * * BIT 0 REQUEST ERROR * 1 LEADER * 2 BOT MISSING * 3 TAPE MARK DETECTED * 4 NO DATA/ERASED * 5 BOT/EOT HOLE * 6 WRITE PROTECTED * 7 B-SIDE * 9 REWIND TIME-OUT * 11 SEQUENCE ERROR * -READ SEQUENCE ERROR * -POSITION OF TAPE UNSUCCESSFULL AT WRITE RECOVERY * -POWER RECOVERY WHEN SEQ. COUNTER NOT USED * -POWER RECOVERY NOT SUCCESSFULL * 12 INCORRECT LENGTH * 13 CRC ERRROR * 14 THROUGHPUT ERROR * 15 NOT OPERABEL * EJECT DRTC01 * * * NORMAL USAGE OF REGISTERS: * * REGISTER A1: RETURN CODE * A2: SST STATUS * A3: DWT STATUS AFTER SST * A4: RETRY COUNTER * A5: SEQUENCE CHARACTER AFTER READ/WRITE * A6: DWT ADDRESS * A8: SUBROUTINE STACK * * * SYSTEM ADAPTATION: * * BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER CAN BE * REDUCED TO HANDLE: * * -ONLY ONE CASSETTE RECORDER * -ORDERS REVERSE, ERASE AND LOCK EXCLUDED * EJECT DRTC01 * * *********** * ENTRIES * *********** * * ENTRY IHTC INTERRUPT ADDRESS ENTRY DWTC01 DWT FOR CASSETTE RECORDER 01 ENTRY DWTC02 DWT FOR CASSETTE RECORDER 02 ENTRY TCDRON POWER UP RECOVERY * * ******************************** * EXTERNAL TOSS MODULE ENTRIES * ******************************** * * EXTRN TDISP DISPATCHER MAIN ENTRY EXTRN SAVE8 DISPATCHER SAVE REGS 1-8 SUBROUTINE EXTRN RETUR8 DISPATCHER LOAD A1-A8 RETURN EXTRN TENDIO GLOBAL END-OF-I/O ROUTINE EXTRN DISEND GO TO DISPATCHER VIA TENDIO EXTRN DISIOE DISPATCHER I/O REQUEST ERROR ENTRY EXTRN INTSAV SAVE AREA LAST INTERRUPT EXTRN INIFLG INIT FLAG AT PGM LOADING EXTRN SWLXY SWITCH TO LEVEL XY EXTRN ECBRL REQUESTED LENGTH IN ECB EXTRN ECBEL EFFECTIVE LENGTH IN ECB EXTRN ECBCW CONTROL WORD IN ECB EJECT DRTC01 * * ****************** * DWT PARAMETERS * ****************** * * EXTRN DWTST DWT SOFTWARE STATUS: * BIT # 0 - DEVICE AND CONTROLLER READY * BIT #11 - TAPE MARK ENCOUNTERED ON LAST * BIT #12 - REPOSITIONING AT RECOVERY * BIT #13 - WRITE PROTECTED * BIT #14 - A-SIDE BIT #15 - DEVICE LOCKED (OPERABLE) EXTRN DWTOR DWT ORDER EXTRN DWTECB DWT ECB ADDRESS EJECT DRTC01 * * ************************ * CONDITIONAL ASSEMBLY * ************************ * * THE DRIVER CAN BE REDUCED TO HANDLE ONLY ONE CASSETTE * RECORDER BY SETTING X:A=1 * X:A EQU 1 DBCAS EQU X:A * * ORDERS REVERSE, ERASE AND LOCK MAY BE EXCLUDED * BY SETTING X:B=0 * X:B EQU 0 REVER EQU X:B * EJECT DRTC01 * * CONSTANTS AND WORK AREAS * TCAD DATA TCDA ACTIVATION ENTRY DATA 0 ABORT ROUTINE ADDRESS RES 4 SUBROUTINE STACK STB EQU *-2 * * TAB DATA /0031,/2237,/3802,/0506 IFT REVER=1 DATA /2633,/24FF XIF TABL EQU *-TAB EJECT DRTC01 * * *************************** * CHANNEL UNIT PARAMETERS * *************************** * * * DEVICE ADDRESS: * CHCRDA EQU /0E * * ************* * CONSTANTS * ************* * * RTRIES EQU 3 MAX NO OF RETRIES * PSUBS EQU 5 POWER UP BACKSPACE NUMBER * PREAD EQU 4 POWER UP READ NUMBER * PINT EQU 10 POWER UP RECOVERY BLOCK COUNT INTERVAL * IFT REVER=1 PERAS EQU 6 NO OF ERASE FOR ORDER /24 XIF EJECT DRTC01 * * * T C D A * * ACTIVATION PART : CHECK VALIDITY OF ORDERS AND START PROCESSING * * TCDA EQU * LDK A1,0 LDK A4,TABL-1 * TCDA10 CC A7,TAB,A4 FIND OUT IF LEGAL ORDER RF(E) TCDA20 VALID ORDER SUK A4,1 RB(NN) TCDA10 TRY NEXT * TCDA15 EQU * ABL DISIOE ILLEGAL ORDER * TCDA20 ADR A4,A4 DOUBLE TO GET INDEX ST A4,TCDAX SAVE INDEX LD A5,ECBRL,A8 GET REQUESTED LENGTH LD A3,SEKBYT,A6 SEQUENCE COUNTER ? RF(NE) TCDA21 NO ADK A5,1 COMPENSATE FOR SEQUENCE CHARACTER * TCDA21 EQU * LDR A2,A3 RECOVERY/SEQUENCE ERROR STATUS ANK A2,2 RF(NZ) TCDR10 YES * ADK A5,1 NGR A5,A5 MAKE REQUESTED LENGTH NEGATIVE ST A5,HELPME SAVE IT FOR RECOVERY PURPOSES SUK A7,/37 LOAD ? RF(NE) TCDA22 NO LD A3,ECBCW,A8 GET CONTROL WORD ANK A3,1 ST A3,SEKBYT,A6 INDICATE SEQ. COUNTER OR NOT * TCDA22 LD A3,2,A8 GET BUFFER ADDRESS ST A3,BUFADR SAVE IT FOR RECOVERY PURPOSES SUK A4,14 RF(Z) TCDA23 WRITE ADK A4,2 RF(NZ) TCDA25 NOT WRITE * TCDA23 ADK A5,3 CHECK REQUESTED LENGTH RB(P) TCDA15 LESS THAN 2 CHARACTERS ADK A5,254 RB(N) TCDA15 MORE THAN 256 CHARACTERS SUR A3,A5 LD A4,SEKBYT,A6 SEQ. COUNTING ? RF(NZ) TCDA25 NO LD A2,DWTBKC,A6 GET SEQUENCE CHARACTER SC A2,255,A3 STORE IT IN BUFFER * TCDA25 ST A6,TCDADT SAVE ACTIVE DWT EJECT DRTC01 * * * SELECT RECORDER * * TCDA30 LDKL A8,STB LOAD STACK BASE CF A8,SELECT SELECT CASSETT CF A15,SWLXY GIVE OTHER TASKS A CHANCE LDR A1,A2 SAVE STATUS LDK A4,RTRIES PRESET NUMBER OF RETRIES LDKL A2,0 GET FUNCTION INDEX TCDAX EQU *-2 **ORDER INDEX** INH ABI TCDFUN,A2 BRANCH TO FUNCTION TCDFUN DATA ENDIO,REWIND,TM,LOAD,UNLOAD,READ,WRITE,WRITE IFT REVER=1 DATA OLOCK,REVERS,ERTAPE XIF * EJECT DRTC01 * * * RECOVERY AFTER POWER ON * * TCDRON EQU * CF A15,SAVE8 LD A1,INIFLG CHECK IF PGM LOADING ABL(NZ) TDISP YES SKIP RECOVERY LDKL A8,STB LOAD STACK BASE LDKL A6,DWTC01 FIRST DWT CF A8,RCOVER RECOVERY IFT DBCAS=2 LDR* A6,A6 GET OTHER DWT CF A8,RCOVER RECOVERY XIF LDKL A4,0 GET ACTIVE DWT TCDADT EQU *-2 **ACTIVATED DWT ADDRESS** RF(Z) ENDIO NO REQUEST GOING ON LDR A6,A4 PUT DWT ADDRESS IN A6 LD A3,SEKBYT,A6 SEQ. COUNTING RB(Z) TCDA30 YES; REACTIVATE ORDER * TCDR10 ANK A3,1 JUSTIFY SEQ. INDICATOR ST A3,SEKBYT,A6 ORK A1,/10 IND SEQUENCE ERROR, BIT #11 RF ENDIO * EJECT DRTC01 * * R E A D * READ CF A8,READR READ RECORD ANKL A1,/400 SAVE EOT BIT ORR A1,A2 ANK A2,/0E RF(Z) READ20 STATUS OK * READ15 SUK A4,1 RECOVERABLE ERROR RF(Z) READ20 3 TRIALS DONE CF A8,BKSP BACKSPACE ONE BLOCK RB READ READ AGAIN * READ20 LDR A2,A1 SLL A2,3 CHECK IF TAPE MARK RF(NN) READ30 NOT TAPE MARK * READ25 ORK A3,/10 INDICATE TAPE MARK LDK A7,0 RESET EFFECTIVE LENGTH RF READ35 * READ30 LDR A2,A1 LDKL A7,0 GET EFFECTIVE LENGTH EFFLEN EQU *-2 **EFFECTIVE LENGTH** ANKL A2,/801 NO DATA,NOT OP RF(NZ) READ32 LDR A7,A7 RF(NZ) READ32 NOT EQUAL ZERO LDR A4,A4 THIRD TRIAL DONE RB(NZ) READ15 NO; READ SAME BLOCK AGAIN LDK A4,1 SET NO OF RETRIES TO ONE RB READ TRY NEXT BLOCK * READ32 EQU * ANK A3,/2F NOT TAPE MARK LD A2,SEKBYT,A6 SEQ. COUNTING ? RF(NE) READ35 NO SUK A7,1 DECREMENT EFF. LENGTH COUNTER CC A5,DWTBKC+1,A6 CHECK SEQUENCE COUNTER RF(E) READ35 OK ORK A1,/10 SEQUENCE ERROR * READ35 IM DWTBKC,A6 INCREMENT SEQUENCE COUNTER * READ40 LD A8,DWTECB,A6 GET ECB ADDRESS ST A7,ECBEL,A8 SAVE EFFECTIVE LENGTH LDK A2,RTRIES SUR A2,A4 GET NUMBER OF RETRIES PERFORMED ST A2,ECBCW,A8 SAVE IT IN CONTROL WORD * READ50 EQU * ST A3,DWTST,A6 SAVE STATUS EJECT DRTC01 * * * END OF I/O OPERATION * * ENDIO EQU * CM TCDADT INDICATE NONE ACTIVE DWT IFT DBCAS=2 CF A15,SWLXY GIVE OTHER TASKS A CHANCE LDR* A6,A6 GET OTHER DWT CF A15,TENDIO PERFORM TENDIO FOR THIS LDR* A6,A6 GET FIRST DWT XIF CF A15,SWLXY GIVE OTHER TASKS A CHANCE ABL DISEND GO TO DISPATCHER VIA TENDIO * EJECT DRTC01 * * * WRITE TAPE MARK * TM LDKL A3,-1 ST A3,HELPME * * W R I T E * * WRITE ONE BLOCK * * WRITE LD A3,DWTBKC,A6 GET BLOCK COUNTER RF(NZ) WRIT10 NOT FIRST BLOCK CF A8,ERASE MAKE ONE BLANK BLOCK SUK A4,1 DEC. NO OF RETRIES 1ST BLOCK * WRIT10 CF A8,WRITER WRITE RECORD ANKL A1,/400 SAVE EOT-BIT ORR A1,A2 ANK A2,/0E RF(Z) WRIT30 STATUS OK * WRIT12 ST A4,WRITA4 STORE RETRY COUNTER LD A2,SEKBYT,A6 RF(Z) WRIT15 SEQ. COUNTING * EJECT DRTC01 * * CF A8,BKSP BACKSPACE ONE BLOCK LDK A4,0 ONE ERASE RF WRIT20 * WRIT15 CF A8,REPOS POSITION TAPE CM SEKBYT,A6 RESET SEQ. INDICATOR LD A4,WRITA4 GET NO ... LDR A2,A2 RF(NZ) WRIT40 POSITIONING NOT OK SUK A4,RTRIES ... OF ERASE * WRIT20 CF A8,ERASE ERASE ORR A1,A2 SAVE EOT ADK A4,1 COUNT ERASE RB(NG) WRIT20 NOT READY LDKL A4,0 GET RETRY COUNTER WRITA4 EQU *-2 **RETRY COUNTER** SUK A4,1 RB(NZ) WRIT10 TRY AGAIN ORR A1,A2 3 TRIALS DONE,SET ERASE BIT #4 RF WRIT50 GIVE UP * EJECT DRTC01 * * WRIT30 LD A2,TCDAX GET ORDER SUK A2,4 TAPE MARK WRITTEN? RB(NZ) READ30 NO LDR A2,A1 CHECK IF SLL A2,3 TAPE MARK OK RB(N) READ25 YES RB WRIT12 NO * WRIT40 ORK A1,/10 POSITIONING FAILED = SEQUENCE ERROR * WRIT50 LD A7,EFFLEN GET EFFECTIVE LENGTH RB READ40 * EJECT DRTC01 * * * L O A D * * LOAD CASSETTE * * LOAD CF A8,LOCK LOCK CASSETTE RF(Z) REWIND CASSETTE LOCKED LOAD10 LDR A1,A2 NO CASSETTE RB READ50 * * * R E W I N D * * REWIND TAPE * * REWIND CM DWTBKC,A6 CLEAR BLOCK COUNTER CF A8,SBOT SEARCH BEGINNING OF TAPE REW010 EQU * LDR A3,A2 SRL A3,7 ANK A3,6 ORK A3,1 PREPARE STATUS RB LOAD10 * EJECT DRTC01 * * * U N L O A D * * UNLOAD CASSETTE * * UNLOAD CM DWTST,A6 RESET STATUS CF A8,UNLD UNLOAD CASSETTE UNLO10 LDR A1,A2 SAVE RETURN CODE RB ENDIO IFT REVER=1 * * * R E V E R S * * BACKSPACE ONE BLOCK * * REVERS CF A8,BKSP BACKSPACE LDKL A4,-1 DECREMENT BLOCK SEQ. ADS A4,DWTBKC,A6 COUNTER BY ONE RB UNLO10 * EJECT DRTC01 * * * E R T A P E * * ERASE TAPE * * ERTAPE LDK A4,PERAS SET NO OF ERASE ERT10 CF A8,ERASE ERASE ONE BLOCK ANKL A1,/400 SAVE EOT BIT ORR A1,A2 RETURN CODE SUK A4,1 RB(NZ) ERT10 ERASE NOT READY RB READ50 * * * O L O C K * * ORDER LOCK CASSETTE * * OLOCK CF A8,LOCK LOCK CASSETTE RB(Z) REW010 CASSETTE LOCKED RB LOAD10 XIF * EJECT DRTC01 * * * CASSETTE COMMANDS * * * SELECT * SELECT EQU * LDK A2,/FF LOAD MASK ANS A2,DWTST,A6 SET DWT BUSY IFT DBCAS=1 LDK A3,0 SELECT CODE XIF IFT DBCAS=2 LDR* A3,A6 GET OTHER DWT ANS A2,DWTST,A3 SET DWT BUSY ANK A3,1 GET SELECT CODE XIF * CRCOM CIO A3,1,CHCRDA CIO START RF EXIT * * READ SEQUENCE CHAR TO A5 * READSQ EQU * LDK A3,/A ST A3,REQLEN MAKE REQUESTED LENGTH > 0 RB CRCOM * EJECT DRTC01 * * READ ONE RECORD * READR LDK A3,/A READR1 CM EFFLEN RESET EFFECTIVE LENGTH LDKL A2,0 GET BUFFER ADDRESS BUFADR EQU *-2 **BUFADR** ST A2,TCDBA LDKL A2,0 GET REQUESTED LENGTH HELPME EQU *-2 **HELPME** ST A2,REQLEN RB CRCOM * * WRITE ONE RECORD * WRITER LDK A3,/B RB READR1 * * ERASE ONE BLOCK * ERASE LDK A3,9 RB CRCOM * * LOCK CASSETTE * LOCK LDK A3,2 RB CRCOM * EJECT DRTC01 * * SEARCH BEGINNING OF TAPE * SBOT LDK A3,8 RB CRCOM * * REWIND TAPE AND UNLOCK CASSETTE * UNLD LDK A3,/F RB CRCOM * * BACKSPACE ONE BLOCK * BKSP LDK A3,/E RB CRCOM * EJECT DRTC01 * * * I H T C * * INTERRUPT HANDLER : PROCESS OF INTERRUPT * * IHTC EQU * ST P,INTSAV SAVE LAST INTERRUPT STR A5,A15 SAVE A5 ON STACK SST A5,CHCRDA RF(A) SST SST ACCEPTED IM REQLEN INCREMENT COUNTER RF(Z) CIOHLT RF(P) INRSQ GET SEQUENCE COUNTER STR A3,A15 SAVE A3 ON STACK LDKL A3,0 GET BUFFER ADDRESS TCDBA EQU *-2 **BUFFER ADDRESS** IM TCDBA INCREMENT BUFFER ADDRESS LD A5,TCDAX GET FUNCTION SWITCH FOR READ/WRITE SUK A5,10 RF(NZ) IHTC05 WRITE * IHTC02 INR A5,0,CHCRDA READ CHAR. SCR A5,A3 STORE CHARACTER IN BUFFER RF EXIT2 * IHTC05 EQU * LCR A5,A3 GET CHAR FROM BUFFER OTR A5,0,CHCRDA OUTPUT IT EJECT DRTC01 * * EXIT2 ST A5,TCDA5 IM EFFLEN INCREMENT EFFECTIVE LENGTH LDR* A3,A15 RESTORE A3 AND A5 FROM STACK * EXIT3 LDR* A5,A15 RTN A15 * INRSQ INR A5,0,CHCRDA READ CHAR TO A5 ST A5,TCDA5 RB EXIT3 * SST ST A5,TCDA2 SAVE STATUS LDR* A5,A15 RESTORE A5 CF A15,SAVE8 SAVE REGISTERS LDKL A1,0 TCDA1 EQU *-2 LDKL A4,0 TCDA4 EQU *-2 LDKL A5,0 TCDA5 EQU *-2 LDKL A6,0 TCDA6 EQU *-2 LDKL A8,0 TCDA8 EQU *-2 EJECT DRTC01 * * LDKL A2,0 RESTORE STATUS TCDA2 EQU *-2 LDR A3,A2 GET STATUS SLL A3,9 SHIFT ST A3,2,A8 SAVE ON STACK LD A3,DWTST,A6 PUT DWT STATUS IN A3 * IHTRTN EQU * RTN A8 * CIOHLT EQU * CIO A1,0,CHCRDA CIO-HALT RB EXIT3 * EXIT ST A1,TCDA1 ST A4,TCDA4 ST A5,TCDA5 ST A6,TCDA6 ST A8,TCDA8 ABL TDISP GO TO DISPATCHER * EJECT DRTC01 * * * R C O V E R * * RECOVERY ROUTINE : POSITIONING OF TAPE AT POWER ON * * RCOVER EQU * CF A8,SELECT SELECT ANK A3,1 RB(Z) IHTRTN NOT LOCKED: RETURN FROM RECOVERY CF A8,LOCK RF(NZ) REPER NO CASSETTE LD A1,DWTBKC,A6 ANY BLOCK WRITTEN/READ RF(NZ) RC0050 YES CF A8,SBOT SEARCH BEGINNING OF TAPE SLL A2,5 RF(NN) REPER BOT NOT FOUND RF REPOK * RC0050 LD A1,SEKBYT,A6 SEQ. COUNTING RF(NZ) REPER NO * EJECT DRTC01 * * * R E P O S * * REPOSITIONING OF TAPE AT POWER ON * AND WRITE RECOVERY * * EXIT: A2 EQ ZERO SUCCESS * A2 NOT EQ ZERO NO SUCCESS * * REPOS EQU * LDK A4,8 SET REPOSITIONING BIT ORS A4,DWTST,A6 STORE IN DWT * REP005 EQU * LDK A4,PSUBS SET NO OF BACKSPACES * REP010 CF A8,BKSP BACKSPACE SLL A2,4 RF(NN) REP015 DATA FOUND LD A2,DWTBKC,A6 GET BLOCK COUNTER SUK A2,8 GREATER 8 ? RF(G) REPER YES CF A8,SBOT NO DATA; SEARCH BEGIN OF TAPE SLL A2,5 RF(NN) REPER BOT NOT FOUND LDKL A5,-1 RESET SEQ. COUNTER RF REP020 READ SEQ. CHAR * EJECT DRTC01 * * REP015 EQU * SUK A4,1 RB(NZ) REP010 BACKSPACE AGAIN LDK A4,PREAD SET NO OF MAX READ * REP017 CF A8,READSQ READ SEQ. CHAR LDKL A7,/180F SET READ MASK TM A2,A7 RF(Z) REP020 READ OK SUK A4,1 COUNT READ RB(P) REP017 NOT ALL READ DONE RF REP060 GIVE UP * REP020 LC A4,DWTBKC+1,A6 GET SEQ. CHAR SUR A4,A5 CALCULATE SUK A4,1 NO OF BLOCKS TO ANK A4,/FF READ FORWARD. CWK A4,PINT TOO MANY BLOCKS RF(G) REPER YES * EJECT DRTC01 * * REP030 SUK A4,1 POSITION TAPE RF(N) REP040 READY CF A8,READSQ READ NEXT BLOCK RB REP030 * REP040 LDK A4,RTRIES SET NO OF RETRY REP042 LDKL A7,/80F SET READ MASK TM A2,A7 CORRECT READ RF(Z) REP045 YES SUK A4,1 COUNT RETRY RF(NP) REP060 GIVE UP CF A8,BKSP BACKSPACE CF A8,READSQ READ SEQ NUMBER RB REP042 * EJECT DRTC01 * * REP045 SLC A2,3 RF(NN) REP050 NOT TAPE MARK ANK A3,/10 RF(Z) REP060 SHOULD NOT BE TAPE MARK RF REPOK * REP050 ADK A5,1 CHECK SEQ. NUMBER CC A5,DWTBKC+1,A6 RF(E) REPOK EQUAL * REP060 LD A7,DWTST,A6 ANK A7,8 TRY POSITIONING AGAIN? RF(Z) REPER NO XRS A7,DWTST,A6 RESET REPOSITIONING BIT RB REP005 YES * * REPER LDK A2,2 IND RECOVERY/SEQUENCE ERROR STATUS ORS A2,SEKBYT,A6 SAVE IN DWT RTN A8 * REPOK LDK A2,0 IND RECOVERY CORRECT RTN A8 * EJECT DRTC01 * * * D W T C 0 2 * * DEVICE WORK TABLE FOR CASSETTE RECORDER 02 * * DWTC02 EQU * TABLE ENTRY IFT DBCAS=2 DATA DWTC01+1 DWT NO. 1 DATA /8000 STATUS./8000 MEANS DEVICE READY DATA 0 ECB ADDRESS DATA 0 ORDER DATA TCAD POINTER TO ADDRESS BLOCK DATA 0 TTAB ADDRESS DATA 0 WAIT/ACTIVATE INDICATOR DATA 0 TERMINAL QUEUE DATA 0 BLOCK COUNTER DATA 0 SEQ. INDICATOR XIF EJECT DRTC01 * * * D W T C 0 1 * * DEVICE WORK TABLE FOR CASSETTE RECORDER 01 * * DWTC01 EQU * TABLE ENTRY DATA DWTC02 DWT NO. 2 DATA /8000 STATUS./8000 MEANS DEVICE READY DATA 0 ECB ADDRESS DATA 0 ORDER DATA TCAD POINTER TO ADDRESS BLOCK DATA 0 TTAB ADDRESS DATA 0 WAIT/ACTIVATE INDICATOR DATA 0 TERMINAL QUEUE DWTBKC EQU *-DWTC01 BLOCK COUNTER DATA 0 SEKBYT EQU *-DWTC01 DATA 0 SEQ. INDICATOR * * REQLEN DATA 0 REQUESTED LENGTH * * * END
0x0000…0036 (0, 0, 398) Head {h00=0x0032, h01=0x0050, text=» IDENT DRTC01 REL 8.2 78-09-15 870105040820 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0062 Head {h00=0x0020, h01=0x0050, text=» NO SELECT AT PGM LOADING «, t00=0x0000, t01=0x0042}
0x0062…0086 Head {h00=0x0020, h01=0x0050, text=» FAST I/O, SHORT INH TIME «, t00=0x0000, t01=0x0066}
0x0086…00a2 Head {h00=0x0018, h01=0x0050, text=» REL 8.1 78-04-21 «, t00=0x0000, t01=0x008a}
0x00a2…00aa Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x00a6}
0x00aa…00b2 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x00ae}
0x00b2…00f2 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x00b6}
0x00f2…00fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f6}
0x00fc…0124 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0100}
0x0124…012e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0128}
0x012e…0160 Head {h00=0x002e, h01=0x0050, text=»* DRTC01 = DRIVER TAPE CASSETTE RECORDER«, t00=0x0000, t01=0x0132}
0x0160…016a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0164}
0x016a…0174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016e}
0x0174…017e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0178}
0x017e…0188 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0182}
0x0188…0192 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x018c}
0x0192…019c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0008}
0x019c…01dc Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0001, t01=0x0012}
0x01dc…01e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0052}
0x01e6…01f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x005c}
0x01f0…0232 Head {h00=0x003e, h01=0x0050, text=»* THIS DRIVER HANDLES ONE OR TWO TAPE CASSETTE RECORDERS«, t00=0x0001, t01=0x0066}
0x0232…025c Head {h00=0x0026, h01=0x0050, text=»* CONNECTED TO CPU VIA CHCR-DCR «, t00=0x0001, t01=0x00a8}
0x025c…0266 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d2}
0x0266…02a8 Head {h00=0x003e, h01=0x0050, text=»* ONLY ONE RECORDER CAN BE BE OPERATED AT A TIME, EXCEPT«, t00=0x0001, t01=0x00dc}
0x02a8…02c8 Head {h00=0x001c, h01=0x0050, text=»* AT REWIND AND UNLOAD«, t00=0x0001, t01=0x011e}
0x02c8…02d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x013e}
0x02d2…0310 Head {h00=0x003a, h01=0x0050, text=»* DATA IS RECORDED IN BLOCKS WITH LENGTHS FROM 2 TO «, t00=0x0001, t01=0x0148}
0x0310…032a Head {h00=0x0016, h01=0x0050, text=»* 256 CHARACTERS«, t00=0x0001, t01=0x0186}
0x032a…0334 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0010}
0x0334…034c Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0002, t01=0x001a}
0x034c…0356 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0032}
0x0356…0360 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x003c}
0x0360…0398 Head {h00=0x0034, h01=0x0050, text=»* THE DRIVER CONSISTS OF THE FOLLOWING PARTS: «, t00=0x0002, t01=0x0046}
0x0398…03a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x007e}
0x03a2…03c8 Head {h00=0x0022, h01=0x0050, text=»* T C D A : ACTIVATION PART «, t00=0x0002, t01=0x0088}
0x03c8…03d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ae}
0x03d2…03fa Head {h00=0x0024, h01=0x0050, text=»* I H T C : INTERRUPT HANDLER «, t00=0x0002, t01=0x00b8}
0x03fa…0404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e0}
0x0404…042e Head {h00=0x0026, h01=0x0050, text=»* R C O V E R : RECOVERY ROUTINE«, t00=0x0002, t01=0x00ea}
0x042e…0438 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0114}
0x0438…0466 Head {h00=0x002a, h01=0x0050, text=»* D W T C 0 1 : DEVICE WORK TABLE 01«, t00=0x0002, t01=0x011e}
0x0466…0470 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014c}
0x0470…049e Head {h00=0x002a, h01=0x0050, text=»* D W T C 0 2 : DEVICE WORK TABLE 02«, t00=0x0002, t01=0x0156}
0x049e…04a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0184}
0x04a8…04d8 Head {h00=0x002c, h01=0x0050, text=»* AND O R D E R P R O C E S S O R S «, t00=0x0002, t01=0x018e}
0x04d8…04e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002e}
0x04e2…04ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0038}
0x04ec…051a Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TREATED: «, t00=0x0003, t01=0x0042}
0x051a…0524 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0070}
0x0524…0546 Head {h00=0x001e, h01=0x0050, text=»* ORDER /00: TEST STATUS«, t00=0x0003, t01=0x007a}
0x0546…0562 Head {h00=0x0018, h01=0x0050, text=»* /02: READ «, t00=0x0003, t01=0x009c}
0x0562…0582 Head {h00=0x001c, h01=0x0050, text=»* /05: WRITE «, t00=0x0003, t01=0x00b8}
0x0582…05a2 Head {h00=0x001c, h01=0x0050, text=»* /06: WRITE «, t00=0x0003, t01=0x00d8}
0x05a2…05c8 Head {h00=0x0022, h01=0x0050, text=»* /22: WRITE TAPE MARK«, t00=0x0003, t01=0x00f8}
0x05c8…05e6 Head {h00=0x001a, h01=0x0050, text=»* /26: LOCK«, t00=0x0003, t01=0x011e}
0x05e6…0604 Head {h00=0x001a, h01=0x0050, text=»* /31: REWIND «, t00=0x0003, t01=0x013c}
0x0604…0626 Head {h00=0x001e, h01=0x0050, text=»* /33: REVERSE «, t00=0x0003, t01=0x015a}
0x0626…0646 Head {h00=0x001c, h01=0x0050, text=»* /24: ERASE «, t00=0x0003, t01=0x017c}
0x0646…0662 Head {h00=0x0018, h01=0x0050, text=»* /37: LOAD «, t00=0x0004, t01=0x000c}
0x0662…0680 Head {h00=0x001a, h01=0x0050, text=»* /38: UNLOAD «, t00=0x0004, t01=0x0028}
0x0680…068a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0046}
0x068a…06a2 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0004, t01=0x0050}
0x06a2…06ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0068}
0x06ac…06b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0072}
0x06b6…06e6 Head {h00=0x002c, h01=0x0050, text=»* THE FOLLOWING RETURN CODES ARE USED:«, t00=0x0004, t01=0x007c}
0x06e6…06f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00ac}
0x06f0…070e Head {h00=0x001a, h01=0x0050, text=»* BIT 0 REQUEST ERROR«, t00=0x0004, t01=0x00b6}
0x070e…0726 Head {h00=0x0014, h01=0x0050, text=»* 1 LEADER «, t00=0x0004, t01=0x00d4}
0x0726…0742 Head {h00=0x0018, h01=0x0050, text=»* 2 BOT MISSING«, t00=0x0004, t01=0x00ec}
0x0742…0766 Head {h00=0x0020, h01=0x0050, text=»* 3 TAPE MARK DETECTED «, t00=0x0004, t01=0x0108}
0x0766…0786 Head {h00=0x001c, h01=0x0050, text=»* 4 NO DATA/ERASED «, t00=0x0004, t01=0x012c}
0x0786…07a4 Head {h00=0x001a, h01=0x0050, text=»* 5 BOT/EOT HOLE «, t00=0x0004, t01=0x014c}
0x07a4…07c4 Head {h00=0x001c, h01=0x0050, text=»* 6 WRITE PROTECTED«, t00=0x0004, t01=0x016a}
0x07c4…07dc Head {h00=0x0014, h01=0x0050, text=»* 7 B-SIDE «, t00=0x0004, t01=0x018a}
0x07dc…07fc Head {h00=0x001c, h01=0x0050, text=»* 9 REWIND TIME-OUT«, t00=0x0005, t01=0x0012}
0x07fc…081c Head {h00=0x001c, h01=0x0050, text=»* 11 SEQUENCE ERROR «, t00=0x0005, t01=0x0032}
0x081c…0840 Head {h00=0x0020, h01=0x0050, text=»* -READ SEQUENCE ERROR«, t00=0x0005, t01=0x0052}
0x0840…0882 Head {h00=0x003e, h01=0x0050, text=»* -POSITION OF TAPE UNSUCCESSFULL AT WRITE RECOVERY «, t00=0x0005, t01=0x0076}
0x0882…08bc Head {h00=0x0036, h01=0x0050, text=»* -POWER RECOVERY WHEN SEQ. COUNTER NOT USED«, t00=0x0005, t01=0x00b8}
0x08bc…08ec Head {h00=0x002c, h01=0x0050, text=»* -POWER RECOVERY NOT SUCCESSFULL «, t00=0x0005, t01=0x00f2}
0x08ec…090e Head {h00=0x001e, h01=0x0050, text=»* 12 INCORRECT LENGTH «, t00=0x0005, t01=0x0122}
0x090e…092a Head {h00=0x0018, h01=0x0050, text=»* 13 CRC ERRROR «, t00=0x0005, t01=0x0144}
0x092a…094c Head {h00=0x001e, h01=0x0050, text=»* 14 THROUGHPUT ERROR «, t00=0x0005, t01=0x0160}
0x094c…096a Head {h00=0x001a, h01=0x0050, text=»* 15 NOT OPERABEL «, t00=0x0005, t01=0x0182}
0x096a…0974 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0010}
0x0974…098c Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0006, t01=0x001a}
0x098c…0996 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0032}
0x0996…09a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x003c}
0x09a0…09c6 Head {h00=0x0022, h01=0x0050, text=»* NORMAL USAGE OF REGISTERS:«, t00=0x0006, t01=0x0046}
0x09c6…09d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x006c}
0x09d0…09f4 Head {h00=0x0020, h01=0x0050, text=»* REGISTER A1: RETURN CODE«, t00=0x0006, t01=0x0076}
0x09f4…0a18 Head {h00=0x0020, h01=0x0050, text=»* A2: SST STATUS «, t00=0x0006, t01=0x009a}
0x0a18…0a46 Head {h00=0x002a, h01=0x0050, text=»* A3: DWT STATUS AFTER SST «, t00=0x0006, t01=0x00be}
0x0a46…0a6c Head {h00=0x0022, h01=0x0050, text=»* A4: RETRY COUNTER«, t00=0x0006, t01=0x00ec}
0x0a6c…0aaa Head {h00=0x003a, h01=0x0050, text=»* A5: SEQUENCE CHARACTER AFTER READ/WRITE «, t00=0x0006, t01=0x0112}
0x0aaa…0ace Head {h00=0x0020, h01=0x0050, text=»* A6: DWT ADDRESS«, t00=0x0006, t01=0x0150}
0x0ace…0af8 Head {h00=0x0026, h01=0x0050, text=»* A8: SUBROUTINE STACK «, t00=0x0006, t01=0x0174}
0x0af8…0b02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000e}
0x0b02…0b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0018}
0x0b0c…0b2a Head {h00=0x001a, h01=0x0050, text=»* SYSTEM ADAPTATION:«, t00=0x0007, t01=0x0022}
0x0b2a…0b34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0040}
0x0b34…0b72 Head {h00=0x003a, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER CAN BE«, t00=0x0007, t01=0x004a}
0x0b72…0b90 Head {h00=0x001a, h01=0x0050, text=»* REDUCED TO HANDLE:«, t00=0x0007, t01=0x0088}
0x0b90…0b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a6}
0x0b9a…0bc0 Head {h00=0x0022, h01=0x0050, text=»* -ONLY ONE CASSETTE RECORDER«, t00=0x0007, t01=0x00b0}
0x0bc0…0bf4 Head {h00=0x0030, h01=0x0050, text=»* -ORDERS REVERSE, ERASE AND LOCK EXCLUDED «, t00=0x0007, t01=0x00d6}
0x0bf4…0bfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x010a}
0x0bfe…0c16 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0007, t01=0x0114}
0x0c16…0c20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x012c}
0x0c20…0c2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0136}
0x0c2a…0c3e Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0007, t01=0x0140}
0x0c3e…0c52 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0007, t01=0x0154}
0x0c52…0c66 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0007, t01=0x0168}
0x0c66…0c70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x017c}
0x0c70…0c7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0186}
0x0c7a…0ca0 Head {h00=0x0022, h01=0x0050, text=» ENTRY IHTC INTERRUPT ADDRESS «, t00=0x0007, t01=0x0190}
0x0ca0…0cd2 Head {h00=0x002e, h01=0x0050, text=» ENTRY DWTC01 DWT FOR CASSETTE RECORDER 01«, t00=0x0008, t01=0x0026}
0x0cd2…0d04 Head {h00=0x002e, h01=0x0050, text=» ENTRY DWTC02 DWT FOR CASSETTE RECORDER 02«, t00=0x0008, t01=0x0058}
0x0d04…0d2c Head {h00=0x0024, h01=0x0050, text=» ENTRY TCDRON POWER UP RECOVERY «, t00=0x0008, t01=0x008a}
0x0d2c…0d34 Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x00b2}
0x0d34…0d3c Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x00ba}
0x0d3c…0d44 Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x00c2}
0x0d44…0d4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ca}
0x0d4e…0d58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00d4}
0x0d58…0d80 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0008, t01=0x00de}
0x0d80…0da8 Head {h00=0x0024, h01=0x0050, text=»* EXTERNAL TOSS MODULE ENTRIES *«, t00=0x0008, t01=0x0106}
0x0da8…0dd0 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0008, t01=0x012e}
0x0dd0…0dda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0156}
0x0dda…0de4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0160}
0x0de4…0e0e Head {h00=0x0026, h01=0x0050, text=» EXTRN TDISP DISPATCHER MAIN ENTRY«, t00=0x0008, t01=0x016a}
0x0e0e…0e46 (9, 0, 400) Head {h00=0x0034, h01=0x0050, text=» EXTRN SAVE8 DISPATCHER SAVE REGS 1-8 SUBROUTINE«, t00=0x0009, t01=0x0004}
0x0e46…0e78 Head {h00=0x002e, h01=0x0050, text=» EXTRN RETUR8 DISPATCHER LOAD A1-A8 RETURN«, t00=0x0009, t01=0x003c}
0x0e78…0ea8 Head {h00=0x002c, h01=0x0050, text=» EXTRN TENDIO GLOBAL END-OF-I/O ROUTINE «, t00=0x0009, t01=0x006e}
0x0ea8…0eda Head {h00=0x002e, h01=0x0050, text=» EXTRN DISEND GO TO DISPATCHER VIA TENDIO «, t00=0x0009, t01=0x009e}
0x0eda…0f12 Head {h00=0x0034, h01=0x0050, text=» EXTRN DISIOE DISPATCHER I/O REQUEST ERROR ENTRY«, t00=0x0009, t01=0x00d0}
0x0f12…0f40 Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0009, t01=0x0108}
0x0f40…0f6e Head {h00=0x002a, h01=0x0050, text=» EXTRN INIFLG INIT FLAG AT PGM LOADING«, t00=0x0009, t01=0x0136}
0x0f6e…0f96 Head {h00=0x0024, h01=0x0050, text=» EXTRN SWLXY SWITCH TO LEVEL XY «, t00=0x0009, t01=0x0164}
0x0f96…0fc2 Head {h00=0x0028, h01=0x0050, text=» EXTRN ECBRL REQUESTED LENGTH IN ECB«, t00=0x0009, t01=0x018c}
0x0fc2…0fee Head {h00=0x0028, h01=0x0050, text=» EXTRN ECBEL EFFECTIVE LENGTH IN ECB«, t00=0x000a, t01=0x0028}
0x0fee…1016 Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBCW CONTROL WORD IN ECB«, t00=0x000a, t01=0x0054}
0x1016…102e Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x000a, t01=0x007c}
0x102e…1038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0094}
0x1038…1042 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x009e}
0x1042…105c Head {h00=0x0016, h01=0x0050, text=»******************«, t00=0x000a, t01=0x00a8}
0x105c…1076 Head {h00=0x0016, h01=0x0050, text=»* DWT PARAMETERS *«, t00=0x000a, t01=0x00c2}
0x1076…1090 Head {h00=0x0016, h01=0x0050, text=»******************«, t00=0x000a, t01=0x00dc}
0x1090…109a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00f6}
0x109a…10a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0100}
0x10a4…10ce Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTST DWT SOFTWARE STATUS: «, t00=0x000a, t01=0x010a}
0x10ce…1100 Head {h00=0x002e, h01=0x0050, text=»* BIT # 0 - DEVICE AND CONTROLLER READY «, t00=0x000a, t01=0x0134}
0x1100…1134 Head {h00=0x0030, h01=0x0050, text=»* BIT #11 - TAPE MARK ENCOUNTERED ON LAST «, t00=0x000a, t01=0x0166}
0x1134…1164 Head {h00=0x002c, h01=0x0050, text=»* BIT #12 - REPOSITIONING AT RECOVERY «, t00=0x000b, t01=0x000a}
0x1164…118a Head {h00=0x0022, h01=0x0050, text=»* BIT #13 - WRITE PROTECTED «, t00=0x000b, t01=0x003a}
0x118a…11a6 Head {h00=0x0018, h01=0x0050, text=»* BIT #14 - A-SIDE«, t00=0x000b, t01=0x0060}
0x11a6…11d4 Head {h00=0x002a, h01=0x0050, text=» BIT #15 - DEVICE LOCKED (OPERABLE) «, t00=0x000b, t01=0x007c}
0x11d4…11f2 Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x000b, t01=0x00aa}
0x11f2…1218 Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTECB DWT ECB ADDRESS «, t00=0x000b, t01=0x00c8}
0x1218…1230 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x000b, t01=0x00ee}
0x1230…123a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0106}
0x123a…1244 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0110}
0x1244…1264 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000b, t01=0x011a}
0x1264…1284 Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000b, t01=0x013a}
0x1284…12a4 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000b, t01=0x015a}
0x12a4…12ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x017a}
0x12ae…12f0 Head {h00=0x003e, h01=0x0050, text=»* THE DRIVER CAN BE REDUCED TO HANDLE ONLY ONE CASSETTE «, t00=0x000b, t01=0x0184}
0x12f0…1316 Head {h00=0x0022, h01=0x0050, text=»* RECORDER BY SETTING X:A=1 «, t00=0x000c, t01=0x0036}
0x1316…1320 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x005c}
0x1320…1332 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x000c, t01=0x0066}
0x1332…1348 Head {h00=0x0012, h01=0x0050, text=»DBCAS EQU X:A «, t00=0x000c, t01=0x0078}
0x1348…1352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x008e}
0x1352…138c Head {h00=0x0036, h01=0x0050, text=»* ORDERS REVERSE, ERASE AND LOCK MAY BE EXCLUDED«, t00=0x000c, t01=0x0098}
0x138c…13a8 Head {h00=0x0018, h01=0x0050, text=»* BY SETTING X:B=0«, t00=0x000c, t01=0x00d2}
0x13a8…13b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ee}
0x13b2…13c4 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x000c, t01=0x00f8}
0x13c4…13da Head {h00=0x0012, h01=0x0050, text=»REVER EQU X:B «, t00=0x000c, t01=0x010a}
0x13da…13e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0120}
0x13e4…13fc Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x000c, t01=0x012a}
0x13fc…1406 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0142}
0x1406…1428 Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x000c, t01=0x014c}
0x1428…1432 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x016e}
0x1432…145a Head {h00=0x0024, h01=0x0050, text=»TCAD DATA TCDA ACTIVATION ENTRY «, t00=0x000c, t01=0x0178}
0x145a…1480 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x000d, t01=0x0010}
0x1480…14a0 Head {h00=0x001c, h01=0x0050, text=» RES 4 SUBROUTINE STACK «, t00=0x000d, t01=0x0036}
0x14a0…14b4 Head {h00=0x0010, h01=0x0050, text=»STB EQU *-2 «, t00=0x000d, t01=0x0056}
0x14b4…14be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x006a}
0x14be…14c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0074}
0x14c8…14f0 Head {h00=0x0024, h01=0x0050, text=»TAB DATA /0031,/2237,/3802,/0506«, t00=0x000d, t01=0x007e}
0x14f0…1504 Head {h00=0x0010, h01=0x0050, text=» IFT REVER=1«, t00=0x000d, t01=0x00a6}
0x1504…151e Head {h00=0x0016, h01=0x0050, text=» DATA /2633,/24FF «, t00=0x000d, t01=0x00ba}
0x151e…152a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x00d4}
0x152a…1540 Head {h00=0x0012, h01=0x0050, text=»TABL EQU *-TAB«, t00=0x000d, t01=0x00e0}
0x1540…1558 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x000d, t01=0x00f6}
0x1558…1562 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x010e}
0x1562…156c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0118}
0x156c…1590 Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x000d, t01=0x0122}
0x1590…15b4 Head {h00=0x0020, h01=0x0050, text=»* CHANNEL UNIT PARAMETERS * «, t00=0x000d, t01=0x0146}
0x15b4…15d8 Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x000d, t01=0x016a}
0x15d8…15e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x018e}
0x15e2…15ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0008}
0x15ec…1606 Head {h00=0x0016, h01=0x0050, text=»* DEVICE ADDRESS:«, t00=0x000e, t01=0x0012}
0x1606…1610 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x002c}
0x1610…1626 Head {h00=0x0012, h01=0x0050, text=»CHCRDA EQU /0E«, t00=0x000e, t01=0x0036}
0x1626…1630 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x004c}
0x1630…163a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0056}
0x163a…1650 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000e, t01=0x0060}
0x1650…1666 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x000e, t01=0x0076}
0x1666…167c Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000e, t01=0x008c}
0x167c…1686 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00a2}
0x1686…1690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ac}
0x1690…16b6 Head {h00=0x0022, h01=0x0050, text=»RTRIES EQU 3 MAX NO OF RETRIES«, t00=0x000e, t01=0x00b6}
0x16b6…16c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00dc}
0x16c0…16ee Head {h00=0x002a, h01=0x0050, text=»PSUBS EQU 5 POWER UP BACKSPACE NUMBER «, t00=0x000e, t01=0x00e6}
0x16ee…16f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0114}
0x16f8…1720 Head {h00=0x0024, h01=0x0050, text=»PREAD EQU 4 POWER UP READ NUMBER«, t00=0x000e, t01=0x011e}
0x1720…172a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0146}
0x172a…1764 Head {h00=0x0036, h01=0x0050, text=»PINT EQU 10 POWER UP RECOVERY BLOCK COUNT INTERVAL«, t00=0x000e, t01=0x0150}
0x1764…176e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x018a}
0x176e…1782 (15, 0, 398) Head {h00=0x0010, h01=0x0050, text=» IFT REVER=1«, t00=0x000f, t01=0x0004}
0x1782…17b0 Head {h00=0x002a, h01=0x0050, text=»PERAS EQU 6 NO OF ERASE FOR ORDER /24 «, t00=0x000f, t01=0x0018}
0x17b0…17bc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0046}
0x17bc…17d4 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x000f, t01=0x0052}
0x17d4…17de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x006a}
0x17de…17e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0074}
0x17e8…17fc Head {h00=0x0010, h01=0x0050, text=»* T C D A «, t00=0x000f, t01=0x007e}
0x17fc…1806 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0092}
0x1806…1852 Head {h00=0x0048, h01=0x0050, text=»* ACTIVATION PART : CHECK VALIDITY OF ORDERS AND START PROCESSING «, t00=0x000f, t01=0x009c}
0x1852…185c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e8}
0x185c…1866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f2}
0x1866…1878 Head {h00=0x000e, h01=0x0050, text=»TCDA EQU *«, t00=0x000f, t01=0x00fc}
0x1878…188a Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x000f, t01=0x010e}
0x188a…18a0 Head {h00=0x0012, h01=0x0050, text=» LDK A4,TABL-1«, t00=0x000f, t01=0x0120}
0x18a0…18aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0136}
0x18aa…18de Head {h00=0x0030, h01=0x0050, text=»TCDA10 CC A7,TAB,A4 FIND OUT IF LEGAL ORDER«, t00=0x000f, t01=0x0140}
0x18de…1900 Head {h00=0x001e, h01=0x0050, text=» RF(E) TCDA20 VALID ORDER «, t00=0x000f, t01=0x0174}
0x1900…1912 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0010, t01=0x0008}
0x1912…1932 Head {h00=0x001c, h01=0x0050, text=» RB(NN) TCDA10 TRY NEXT «, t00=0x0010, t01=0x001a}
0x1932…193c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x003a}
0x193c…1950 Head {h00=0x0010, h01=0x0050, text=»TCDA15 EQU *«, t00=0x0010, t01=0x0044}
0x1950…1972 Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE ILLEGAL ORDER «, t00=0x0010, t01=0x0058}
0x1972…197c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x007a}
0x197c…19a8 Head {h00=0x0028, h01=0x0050, text=»TCDA20 ADR A4,A4 DOUBLE TO GET INDEX«, t00=0x0010, t01=0x0084}
0x19a8…19c8 Head {h00=0x001c, h01=0x0050, text=» ST A4,TCDAX SAVE INDEX «, t00=0x0010, t01=0x00b0}
0x19c8…19f4 Head {h00=0x0028, h01=0x0050, text=» LD A5,ECBRL,A8 GET REQUESTED LENGTH«, t00=0x0010, t01=0x00d0}
0x19f4…1a20 Head {h00=0x0028, h01=0x0050, text=» LD A3,SEKBYT,A6 SEQUENCE COUNTER ? «, t00=0x0010, t01=0x00fc}
0x1a20…1a3a Head {h00=0x0016, h01=0x0050, text=» RF(NE) TCDA21 NO «, t00=0x0010, t01=0x0128}
0x1a3a…1a6e Head {h00=0x0030, h01=0x0050, text=» ADK A5,1 COMPENSATE FOR SEQUENCE CHARACTER «, t00=0x0010, t01=0x0142}
0x1a6e…1a78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0176}
0x1a78…1a8c Head {h00=0x0010, h01=0x0050, text=»TCDA21 EQU *«, t00=0x0010, t01=0x0180}
0x1a8c…1abe (17, 0, 398) Head {h00=0x002e, h01=0x0050, text=» LDR A2,A3 RECOVERY/SEQUENCE ERROR STATUS «, t00=0x0011, t01=0x0004}
0x1abe…1ad0 Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0011, t01=0x0036}
0x1ad0…1aea Head {h00=0x0016, h01=0x0050, text=» RF(NZ) TCDR10 YES«, t00=0x0011, t01=0x0048}
0x1aea…1af4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0062}
0x1af4…1b06 Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x0011, t01=0x006c}
0x1b06…1b38 Head {h00=0x002e, h01=0x0050, text=» NGR A5,A5 MAKE REQUESTED LENGTH NEGATIVE «, t00=0x0011, t01=0x007e}
0x1b38…1b6c Head {h00=0x0030, h01=0x0050, text=» ST A5,HELPME SAVE IT FOR RECOVERY PURPOSES «, t00=0x0011, t01=0x00b0}
0x1b6c…1b86 Head {h00=0x0016, h01=0x0050, text=» SUK A7,/37 LOAD ?«, t00=0x0011, t01=0x00e4}
0x1b86…1ba0 Head {h00=0x0016, h01=0x0050, text=» RF(NE) TCDA22 NO «, t00=0x0011, t01=0x00fe}
0x1ba0…1bc8 Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBCW,A8 GET CONTROL WORD«, t00=0x0011, t01=0x0118}
0x1bc8…1bda Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0011, t01=0x0140}
0x1bda…1c10 Head {h00=0x0032, h01=0x0050, text=» ST A3,SEKBYT,A6 INDICATE SEQ. COUNTER OR NOT «, t00=0x0011, t01=0x0152}
0x1c10…1c1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0188}
0x1c1a…1c46 (18, 0, 400) Head {h00=0x0028, h01=0x0050, text=»TCDA22 LD A3,2,A8 GET BUFFER ADDRESS«, t00=0x0012, t01=0x0004}
0x1c46…1c7a Head {h00=0x0030, h01=0x0050, text=» ST A3,BUFADR SAVE IT FOR RECOVERY PURPOSES «, t00=0x0012, t01=0x0030}
0x1c7a…1c8c Head {h00=0x000e, h01=0x0050, text=» SUK A4,14«, t00=0x0012, t01=0x0064}
0x1c8c…1ca8 Head {h00=0x0018, h01=0x0050, text=» RF(Z) TCDA23 WRITE «, t00=0x0012, t01=0x0076}
0x1ca8…1cba Head {h00=0x000e, h01=0x0050, text=» ADK A4,2 «, t00=0x0012, t01=0x0092}
0x1cba…1cda Head {h00=0x001c, h01=0x0050, text=» RF(NZ) TCDA25 NOT WRITE«, t00=0x0012, t01=0x00a4}
0x1cda…1ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00c4}
0x1ce4…1d12 Head {h00=0x002a, h01=0x0050, text=»TCDA23 ADK A5,3 CHECK REQUESTED LENGTH«, t00=0x0012, t01=0x00ce}
0x1d12…1d3e Head {h00=0x0028, h01=0x0050, text=» RB(P) TCDA15 LESS THAN 2 CHARACTERS«, t00=0x0012, t01=0x00fc}
0x1d3e…1d52 Head {h00=0x0010, h01=0x0050, text=» ADK A5,254 «, t00=0x0012, t01=0x0128}
0x1d52…1d80 Head {h00=0x002a, h01=0x0050, text=» RB(N) TCDA15 MORE THAN 256 CHARACTERS«, t00=0x0012, t01=0x013c}
0x1d80…1d92 Head {h00=0x000e, h01=0x0050, text=» SUR A3,A5«, t00=0x0012, t01=0x016a}
0x1d92…1dba Head {h00=0x0024, h01=0x0050, text=» LD A4,SEKBYT,A6 SEQ. COUNTING ?«, t00=0x0012, t01=0x017c}
0x1dba…1dd4 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) TCDA25 NO «, t00=0x0013, t01=0x0014}
0x1dd4…1e04 Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTBKC,A6 GET SEQUENCE CHARACTER «, t00=0x0013, t01=0x002e}
0x1e04…1e2c Head {h00=0x0024, h01=0x0050, text=» SC A2,255,A3 STORE IT IN BUFFER«, t00=0x0013, t01=0x005e}
0x1e2c…1e36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0086}
0x1e36…1e62 Head {h00=0x0028, h01=0x0050, text=»TCDA25 ST A6,TCDADT SAVE ACTIVE DWT «, t00=0x0013, t01=0x0090}
0x1e62…1e7a Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0013, t01=0x00bc}
0x1e7a…1e84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d4}
0x1e84…1e8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00de}
0x1e8e…1ea8 Head {h00=0x0016, h01=0x0050, text=»* SELECT RECORDER «, t00=0x0013, t01=0x00e8}
0x1ea8…1eb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0102}
0x1eb2…1ebc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x010c}
0x1ebc…1ee6 Head {h00=0x0026, h01=0x0050, text=»TCDA30 LDKL A8,STB LOAD STACK BASE«, t00=0x0013, t01=0x0116}
0x1ee6…1f0a Head {h00=0x0020, h01=0x0050, text=» CF A8,SELECT SELECT CASSETT«, t00=0x0013, t01=0x0140}
0x1f0a…1f3a Head {h00=0x002c, h01=0x0050, text=» CF A15,SWLXY GIVE OTHER TASKS A CHANCE «, t00=0x0013, t01=0x0164}
0x1f3a…1f58 (20, 0, 400) Head {h00=0x001a, h01=0x0050, text=» LDR A1,A2 SAVE STATUS«, t00=0x0014, t01=0x0004}
0x1f58…1f88 Head {h00=0x002c, h01=0x0050, text=» LDK A4,RTRIES PRESET NUMBER OF RETRIES «, t00=0x0014, t01=0x0022}
0x1f88…1fae Head {h00=0x0022, h01=0x0050, text=» LDKL A2,0 GET FUNCTION INDEX «, t00=0x0014, t01=0x0052}
0x1fae…1fd4 Head {h00=0x0022, h01=0x0050, text=»TCDAX EQU *-2 **ORDER INDEX** «, t00=0x0014, t01=0x0078}
0x1fd4…1fe0 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0014, t01=0x009e}
0x1fe0…200a Head {h00=0x0026, h01=0x0050, text=» ABI TCDFUN,A2 BRANCH TO FUNCTION «, t00=0x0014, t01=0x00aa}
0x200a…204a Head {h00=0x003c, h01=0x0050, text=»TCDFUN DATA ENDIO,REWIND,TM,LOAD,UNLOAD,READ,WRITE,WRITE«, t00=0x0014, t01=0x00d4}
0x204a…205e Head {h00=0x0010, h01=0x0050, text=» IFT REVER=1«, t00=0x0014, t01=0x0114}
0x205e…2080 Head {h00=0x001e, h01=0x0050, text=» DATA OLOCK,REVERS,ERTAPE «, t00=0x0014, t01=0x0128}
0x2080…208c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x014a}
0x208c…2096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0156}
0x2096…20ae Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0014, t01=0x0160}
0x20ae…20b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0178}
0x20b8…20c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0182}
0x20c2…20e4 Head {h00=0x001e, h01=0x0050, text=»* RECOVERY AFTER POWER ON «, t00=0x0014, t01=0x018c}
0x20e4…20ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x001e}
0x20ee…20f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0028}
0x20f8…210c Head {h00=0x0010, h01=0x0050, text=»TCDRON EQU *«, t00=0x0015, t01=0x0032}
0x210c…2122 Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x0015, t01=0x0046}
0x2122…214c Head {h00=0x0026, h01=0x0050, text=» LD A1,INIFLG CHECK IF PGM LOADING«, t00=0x0015, t01=0x005c}
0x214c…2174 Head {h00=0x0024, h01=0x0050, text=» ABL(NZ) TDISP YES SKIP RECOVERY«, t00=0x0015, t01=0x0086}
0x2174…2198 Head {h00=0x0020, h01=0x0050, text=» LDKL A8,STB LOAD STACK BASE«, t00=0x0015, t01=0x00ae}
0x2198…21ba Head {h00=0x001e, h01=0x0050, text=» LDKL A6,DWTC01 FIRST DWT «, t00=0x0015, t01=0x00d2}
0x21ba…21d8 Head {h00=0x001a, h01=0x0050, text=» CF A8,RCOVER RECOVERY«, t00=0x0015, t01=0x00f4}
0x21d8…21ec Head {h00=0x0010, h01=0x0050, text=» IFT DBCAS=2«, t00=0x0015, t01=0x0112}
0x21ec…220e Head {h00=0x001e, h01=0x0050, text=» LDR* A6,A6 GET OTHER DWT «, t00=0x0015, t01=0x0126}
0x220e…222c Head {h00=0x001a, h01=0x0050, text=» CF A8,RCOVER RECOVERY«, t00=0x0015, t01=0x0148}
0x222c…2238 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0166}
0x2238…225a Head {h00=0x001e, h01=0x0050, text=» LDKL A4,0 GET ACTIVE DWT «, t00=0x0015, t01=0x0172}
0x225a…228a (22, 0, 400) Head {h00=0x002c, h01=0x0050, text=»TCDADT EQU *-2 **ACTIVATED DWT ADDRESS**«, t00=0x0016, t01=0x0004}
0x228a…22b2 Head {h00=0x0024, h01=0x0050, text=» RF(Z) ENDIO NO REQUEST GOING ON«, t00=0x0016, t01=0x0034}
0x22b2…22da Head {h00=0x0024, h01=0x0050, text=» LDR A6,A4 PUT DWT ADDRESS IN A6«, t00=0x0016, t01=0x005c}
0x22da…2300 Head {h00=0x0022, h01=0x0050, text=» LD A3,SEKBYT,A6 SEQ. COUNTING«, t00=0x0016, t01=0x0084}
0x2300…232c Head {h00=0x0028, h01=0x0050, text=» RB(Z) TCDA30 YES; REACTIVATE ORDER «, t00=0x0016, t01=0x00aa}
0x232c…2336 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00d6}
0x2336…2364 Head {h00=0x002a, h01=0x0050, text=»TCDR10 ANK A3,1 JUSTIFY SEQ. INDICATOR«, t00=0x0016, t01=0x00e0}
0x2364…237c Head {h00=0x0014, h01=0x0050, text=» ST A3,SEKBYT,A6«, t00=0x0016, t01=0x010e}
0x237c…23ac Head {h00=0x002c, h01=0x0050, text=» ORK A1,/10 IND SEQUENCE ERROR, BIT #11 «, t00=0x0016, t01=0x0126}
0x23ac…23be Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0016, t01=0x0156}
0x23be…23c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0168}
0x23c8…23e0 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0016, t01=0x0172}
0x23e0…23ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x018a}
0x23ea…23fe (23, 0, 400) Head {h00=0x0010, h01=0x0050, text=»* R E A D «, t00=0x0017, t01=0x0004}
0x23fe…2408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0018}
0x2408…242c Head {h00=0x0020, h01=0x0050, text=»READ CF A8,READR READ RECORD«, t00=0x0017, t01=0x0022}
0x242c…244e Head {h00=0x001e, h01=0x0050, text=» ANKL A1,/400 SAVE EOT BIT«, t00=0x0017, t01=0x0046}
0x244e…2460 Head {h00=0x000e, h01=0x0050, text=» ORR A1,A2«, t00=0x0017, t01=0x0068}
0x2460…2474 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/0E «, t00=0x0017, t01=0x007a}
0x2474…2494 Head {h00=0x001c, h01=0x0050, text=» RF(Z) READ20 STATUS OK «, t00=0x0017, t01=0x008e}
0x2494…249e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ae}
0x249e…24c8 Head {h00=0x0026, h01=0x0050, text=»READ15 SUK A4,1 RECOVERABLE ERROR «, t00=0x0017, t01=0x00b8}
0x24c8…24ec Head {h00=0x0020, h01=0x0050, text=» RF(Z) READ20 3 TRIALS DONE «, t00=0x0017, t01=0x00e2}
0x24ec…2514 Head {h00=0x0024, h01=0x0050, text=» CF A8,BKSP BACKSPACE ONE BLOCK «, t00=0x0017, t01=0x0106}
0x2514…2530 Head {h00=0x0018, h01=0x0050, text=» RB READ READ AGAIN«, t00=0x0017, t01=0x012e}
0x2530…253a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x014a}
0x253a…2552 Head {h00=0x0014, h01=0x0050, text=»READ20 LDR A2,A1«, t00=0x0017, t01=0x0154}
0x2552…2576 Head {h00=0x0020, h01=0x0050, text=» SLL A2,3 CHECK IF TAPE MARK«, t00=0x0017, t01=0x016c}
0x2576…259a Head {h00=0x0020, h01=0x0050, text=» RF(NN) READ30 NOT TAPE MARK«, t00=0x0017, t01=0x0190}
0x259a…25a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0024}
0x25a4…25d0 Head {h00=0x0028, h01=0x0050, text=»READ25 ORK A3,/10 INDICATE TAPE MARK«, t00=0x0018, t01=0x002e}
0x25d0…25f8 Head {h00=0x0024, h01=0x0050, text=» LDK A7,0 RESET EFFECTIVE LENGTH«, t00=0x0018, t01=0x005a}
0x25f8…260c Head {h00=0x0010, h01=0x0050, text=» RF READ35 «, t00=0x0018, t01=0x0082}
0x260c…2616 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0096}
0x2616…262e Head {h00=0x0014, h01=0x0050, text=»READ30 LDR A2,A1«, t00=0x0018, t01=0x00a0}
0x262e…2656 Head {h00=0x0024, h01=0x0050, text=» LDKL A7,0 GET EFFECTIVE LENGTH «, t00=0x0018, t01=0x00b8}
0x2656…2682 Head {h00=0x0028, h01=0x0050, text=»EFFLEN EQU *-2 **EFFECTIVE LENGTH** «, t00=0x0018, t01=0x00e0}
0x2682…26a6 Head {h00=0x0020, h01=0x0050, text=» ANKL A2,/801 NO DATA,NOT OP«, t00=0x0018, t01=0x010c}
0x26a6…26bc Head {h00=0x0012, h01=0x0050, text=» RF(NZ) READ32«, t00=0x0018, t01=0x0130}
0x26bc…26ce Head {h00=0x000e, h01=0x0050, text=» LDR A7,A7«, t00=0x0018, t01=0x0146}
0x26ce…26f4 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) READ32 NOT EQUAL ZERO «, t00=0x0018, t01=0x0158}
0x26f4…2718 Head {h00=0x0020, h01=0x0050, text=» LDR A4,A4 THIRD TRIAL DONE «, t00=0x0018, t01=0x017e}
0x2718…2748 Head {h00=0x002c, h01=0x0050, text=» RB(NZ) READ15 NO; READ SAME BLOCK AGAIN«, t00=0x0019, t01=0x0012}
0x2748…2772 Head {h00=0x0026, h01=0x0050, text=» LDK A4,1 SET NO OF RETRIES TO ONE«, t00=0x0019, t01=0x0042}
0x2772…2792 Head {h00=0x001c, h01=0x0050, text=» RB READ TRY NEXT BLOCK«, t00=0x0019, t01=0x006c}
0x2792…279c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x008c}
0x279c…27b0 Head {h00=0x0010, h01=0x0050, text=»READ32 EQU *«, t00=0x0019, t01=0x0096}
0x27b0…27d2 Head {h00=0x001e, h01=0x0050, text=» ANK A3,/2F NOT TAPE MARK «, t00=0x0019, t01=0x00aa}
0x27d2…27fa Head {h00=0x0024, h01=0x0050, text=» LD A2,SEKBYT,A6 SEQ. COUNTING ?«, t00=0x0019, t01=0x00cc}
0x27fa…2814 Head {h00=0x0016, h01=0x0050, text=» RF(NE) READ35 NO «, t00=0x0019, t01=0x00f4}
0x2814…2844 Head {h00=0x002c, h01=0x0050, text=» SUK A7,1 DECREMENT EFF. LENGTH COUNTER «, t00=0x0019, t01=0x010e}
0x2844…2876 Head {h00=0x002e, h01=0x0050, text=» CC A5,DWTBKC+1,A6 CHECK SEQUENCE COUNTER «, t00=0x0019, t01=0x013e}
0x2876…288e Head {h00=0x0014, h01=0x0050, text=» RF(E) READ35 OK«, t00=0x0019, t01=0x0170}
0x288e…28b0 Head {h00=0x001e, h01=0x0050, text=» ORK A1,/10 SEQUENCE ERROR«, t00=0x0019, t01=0x0188}
0x28b0…28ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x001a}
0x28ba…28f0 Head {h00=0x0032, h01=0x0050, text=»READ35 IM DWTBKC,A6 INCREMENT SEQUENCE COUNTER«, t00=0x001a, t01=0x0024}
0x28f0…28fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x005a}
0x28fa…2928 Head {h00=0x002a, h01=0x0050, text=»READ40 LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x001a, t01=0x0064}
0x2928…2956 Head {h00=0x002a, h01=0x0050, text=» ST A7,ECBEL,A8 SAVE EFFECTIVE LENGTH «, t00=0x001a, t01=0x0092}
0x2956…296c Head {h00=0x0012, h01=0x0050, text=» LDK A2,RTRIES«, t00=0x001a, t01=0x00c0}
0x296c…299e Head {h00=0x002e, h01=0x0050, text=» SUR A2,A4 GET NUMBER OF RETRIES PERFORMED«, t00=0x001a, t01=0x00d6}
0x299e…29ce Head {h00=0x002c, h01=0x0050, text=» ST A2,ECBCW,A8 SAVE IT IN CONTROL WORD «, t00=0x001a, t01=0x0108}
0x29ce…29d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0138}
0x29d8…29ec Head {h00=0x0010, h01=0x0050, text=»READ50 EQU *«, t00=0x001a, t01=0x0142}
0x29ec…2a10 Head {h00=0x0020, h01=0x0050, text=» ST A3,DWTST,A6 SAVE STATUS «, t00=0x001a, t01=0x0156}
0x2a10…2a28 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x001a, t01=0x017a}
0x2a28…2a32 (27, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0004}
0x2a32…2a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x000e}
0x2a3c…2a5a Head {h00=0x001a, h01=0x0050, text=»* END OF I/O OPERATION«, t00=0x001b, t01=0x0018}
0x2a5a…2a64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0036}
0x2a64…2a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0040}
0x2a6e…2a82 Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x001b, t01=0x004a}
0x2a82…2aae Head {h00=0x0028, h01=0x0050, text=» CM TCDADT INDICATE NONE ACTIVE DWT «, t00=0x001b, t01=0x005e}
0x2aae…2ac2 Head {h00=0x0010, h01=0x0050, text=» IFT DBCAS=2«, t00=0x001b, t01=0x008a}
0x2ac2…2af2 Head {h00=0x002c, h01=0x0050, text=» CF A15,SWLXY GIVE OTHER TASKS A CHANCE «, t00=0x001b, t01=0x009e}
0x2af2…2b14 Head {h00=0x001e, h01=0x0050, text=» LDR* A6,A6 GET OTHER DWT «, t00=0x001b, t01=0x00ce}
0x2b14…2b42 Head {h00=0x002a, h01=0x0050, text=» CF A15,TENDIO PERFORM TENDIO FOR THIS«, t00=0x001b, t01=0x00f0}
0x2b42…2b64 Head {h00=0x001e, h01=0x0050, text=» LDR* A6,A6 GET FIRST DWT «, t00=0x001b, t01=0x011e}
0x2b64…2b70 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0140}
0x2b70…2ba0 Head {h00=0x002c, h01=0x0050, text=» CF A15,SWLXY GIVE OTHER TASKS A CHANCE «, t00=0x001b, t01=0x014c}
0x2ba0…2bd0 Head {h00=0x002c, h01=0x0050, text=» ABL DISEND GO TO DISPATCHER VIA TENDIO «, t00=0x001b, t01=0x017c}
0x2bd0…2bda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x001c}
0x2bda…2bf2 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x001c, t01=0x0026}
0x2bf2…2bfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x003e}
0x2bfc…2c06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0048}
0x2c06…2c22 Head {h00=0x0018, h01=0x0050, text=»* WRITE TAPE MARK «, t00=0x001c, t01=0x0052}
0x2c22…2c2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x006e}
0x2c2c…2c42 Head {h00=0x0012, h01=0x0050, text=»TM LDKL A3,-1 «, t00=0x001c, t01=0x0078}
0x2c42…2c58 Head {h00=0x0012, h01=0x0050, text=» ST A3,HELPME «, t00=0x001c, t01=0x008e}
0x2c58…2c62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00a4}
0x2c62…2c78 Head {h00=0x0012, h01=0x0050, text=»* W R I T E «, t00=0x001c, t01=0x00ae}
0x2c78…2c82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00c4}
0x2c82…2c9e Head {h00=0x0018, h01=0x0050, text=»* WRITE ONE BLOCK «, t00=0x001c, t01=0x00ce}
0x2c9e…2ca8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00ea}
0x2ca8…2cb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00f4}
0x2cb2…2ce2 Head {h00=0x002c, h01=0x0050, text=»WRITE LD A3,DWTBKC,A6 GET BLOCK COUNTER «, t00=0x001c, t01=0x00fe}
0x2ce2…2d08 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) WRIT10 NOT FIRST BLOCK«, t00=0x001c, t01=0x012e}
0x2d08…2d32 Head {h00=0x0026, h01=0x0050, text=» CF A8,ERASE MAKE ONE BLANK BLOCK «, t00=0x001c, t01=0x0154}
0x2d32…2d60 Head {h00=0x002a, h01=0x0050, text=» SUK A4,1 DEC. NO OF RETRIES 1ST BLOCK«, t00=0x001c, t01=0x017e}
0x2d60…2d6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x001c}
0x2d6a…2d92 Head {h00=0x0024, h01=0x0050, text=»WRIT10 CF A8,WRITER WRITE RECORD«, t00=0x001d, t01=0x0026}
0x2d92…2db4 Head {h00=0x001e, h01=0x0050, text=» ANKL A1,/400 SAVE EOT-BIT«, t00=0x001d, t01=0x004e}
0x2db4…2dc6 Head {h00=0x000e, h01=0x0050, text=» ORR A1,A2«, t00=0x001d, t01=0x0070}
0x2dc6…2dda Head {h00=0x0010, h01=0x0050, text=» ANK A2,/0E «, t00=0x001d, t01=0x0082}
0x2dda…2dfa Head {h00=0x001c, h01=0x0050, text=» RF(Z) WRIT30 STATUS OK «, t00=0x001d, t01=0x0096}
0x2dfa…2e04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00b6}
0x2e04…2e34 Head {h00=0x002c, h01=0x0050, text=»WRIT12 ST A4,WRITA4 STORE RETRY COUNTER «, t00=0x001d, t01=0x00c0}
0x2e34…2e4c Head {h00=0x0014, h01=0x0050, text=» LD A2,SEKBYT,A6«, t00=0x001d, t01=0x00f0}
0x2e4c…2e70 Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRIT15 SEQ. COUNTING «, t00=0x001d, t01=0x0108}
0x2e70…2e7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x012c}
0x2e7a…2e92 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x001d, t01=0x0136}
0x2e92…2e9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x014e}
0x2e9c…2ea6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0158}
0x2ea6…2ece Head {h00=0x0024, h01=0x0050, text=» CF A8,BKSP BACKSPACE ONE BLOCK «, t00=0x001d, t01=0x0162}
0x2ece…2eea Head {h00=0x0018, h01=0x0050, text=» LDK A4,0 ONE ERASE «, t00=0x001d, t01=0x018a}
0x2eea…2efc Head {h00=0x000e, h01=0x0050, text=» RF WRIT20«, t00=0x001e, t01=0x0016}
0x2efc…2f06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0028}
0x2f06…2f2e Head {h00=0x0024, h01=0x0050, text=»WRIT15 CF A8,REPOS POSITION TAPE«, t00=0x001e, t01=0x0032}
0x2f2e…2f58 Head {h00=0x0026, h01=0x0050, text=» CM SEKBYT,A6 RESET SEQ. INDICATOR«, t00=0x001e, t01=0x005a}
0x2f58…2f78 Head {h00=0x001c, h01=0x0050, text=» LD A4,WRITA4 GET NO ...«, t00=0x001e, t01=0x0084}
0x2f78…2f8a Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x001e, t01=0x00a4}
0x2f8a…2fb4 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) WRIT40 POSITIONING NOT OK «, t00=0x001e, t01=0x00b6}
0x2fb4…2fd8 Head {h00=0x0020, h01=0x0050, text=» SUK A4,RTRIES ... OF ERASE «, t00=0x001e, t01=0x00e0}
0x2fd8…2fe2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0104}
0x2fe2…3002 Head {h00=0x001c, h01=0x0050, text=»WRIT20 CF A8,ERASE ERASE«, t00=0x001e, t01=0x010e}
0x3002…301e Head {h00=0x0018, h01=0x0050, text=» ORR A1,A2 SAVE EOT «, t00=0x001e, t01=0x012e}
0x301e…303c Head {h00=0x001a, h01=0x0050, text=» ADK A4,1 COUNT ERASE «, t00=0x001e, t01=0x014a}
0x303c…305c Head {h00=0x001c, h01=0x0050, text=» RB(NG) WRIT20 NOT READY«, t00=0x001e, t01=0x0168}
0x305c…3080 Head {h00=0x0020, h01=0x0050, text=» LDKL A4,0 GET RETRY COUNTER«, t00=0x001e, t01=0x0188}
0x3080…30a8 Head {h00=0x0024, h01=0x0050, text=»WRITA4 EQU *-2 **RETRY COUNTER**«, t00=0x001f, t01=0x001c}
0x30a8…30ba Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001f, t01=0x0044}
0x30ba…30da Head {h00=0x001c, h01=0x0050, text=» RB(NZ) WRIT10 TRY AGAIN«, t00=0x001f, t01=0x0056}
0x30da…310c Head {h00=0x002e, h01=0x0050, text=» ORR A1,A2 3 TRIALS DONE,SET ERASE BIT #4 «, t00=0x001f, t01=0x0076}
0x310c…3126 Head {h00=0x0016, h01=0x0050, text=» RF WRIT50 GIVE UP«, t00=0x001f, t01=0x00a8}
0x3126…3130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00c2}
0x3130…3148 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x001f, t01=0x00cc}
0x3148…3152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00e4}
0x3152…315c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00ee}
0x315c…3180 Head {h00=0x0020, h01=0x0050, text=»WRIT30 LD A2,TCDAX GET ORDER«, t00=0x001f, t01=0x00f8}
0x3180…31a4 Head {h00=0x0020, h01=0x0050, text=» SUK A2,4 TAPE MARK WRITTEN?«, t00=0x001f, t01=0x011c}
0x31a4…31be Head {h00=0x0016, h01=0x0050, text=» RB(NZ) READ30 NO «, t00=0x001f, t01=0x0140}
0x31be…31da Head {h00=0x0018, h01=0x0050, text=» LDR A2,A1 CHECK IF «, t00=0x001f, t01=0x015a}
0x31da…31f8 Head {h00=0x001a, h01=0x0050, text=» SLL A2,3 TAPE MARK OK«, t00=0x001f, t01=0x0176}
0x31f8…3212 (32, 0, 398) Head {h00=0x0016, h01=0x0050, text=» RB(N) READ25 YES «, t00=0x0020, t01=0x0004}
0x3212…3228 Head {h00=0x0012, h01=0x0050, text=» RB WRIT12 NO «, t00=0x0020, t01=0x001e}
0x3228…3232 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0034}
0x3232…3270 Head {h00=0x003a, h01=0x0050, text=»WRIT40 ORK A1,/10 POSITIONING FAILED = SEQUENCE ERROR «, t00=0x0020, t01=0x003e}
0x3270…327a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x007c}
0x327a…32aa Head {h00=0x002c, h01=0x0050, text=»WRIT50 LD A7,EFFLEN GET EFFECTIVE LENGTH«, t00=0x0020, t01=0x0086}
0x32aa…32bc Head {h00=0x000e, h01=0x0050, text=» RB READ40«, t00=0x0020, t01=0x00b6}
0x32bc…32c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00c8}
0x32c6…32de Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0020, t01=0x00d2}
0x32de…32e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00ea}
0x32e8…32f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00f4}
0x32f2…3306 Head {h00=0x0010, h01=0x0050, text=»* L O A D «, t00=0x0020, t01=0x00fe}
0x3306…3310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0112}
0x3310…332a Head {h00=0x0016, h01=0x0050, text=»* LOAD CASSETTE «, t00=0x0020, t01=0x011c}
0x332a…3334 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0136}
0x3334…333e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0140}
0x333e…3364 Head {h00=0x0022, h01=0x0050, text=»LOAD CF A8,LOCK LOCK CASSETTE «, t00=0x0020, t01=0x014a}
0x3364…338a Head {h00=0x0022, h01=0x0050, text=» RF(Z) REWIND CASSETTE LOCKED «, t00=0x0020, t01=0x0170}
0x338a…33ae Head {h00=0x0020, h01=0x0050, text=»LOAD10 LDR A1,A2 NO CASSETTE«, t00=0x0021, t01=0x0008}
0x33ae…33c0 Head {h00=0x000e, h01=0x0050, text=» RB READ50«, t00=0x0021, t01=0x002c}
0x33c0…33ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x003e}
0x33ca…33d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0048}
0x33d4…33ec Head {h00=0x0014, h01=0x0050, text=»* R E W I N D «, t00=0x0021, t01=0x0052}
0x33ec…33f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x006a}
0x33f6…340e Head {h00=0x0014, h01=0x0050, text=»* REWIND TAPE «, t00=0x0021, t01=0x0074}
0x340e…3418 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x008c}
0x3418…3422 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0096}
0x3422…3452 Head {h00=0x002c, h01=0x0050, text=»REWIND CM DWTBKC,A6 CLEAR BLOCK COUNTER «, t00=0x0021, t01=0x00a0}
0x3452…347e Head {h00=0x0028, h01=0x0050, text=» CF A8,SBOT SEARCH BEGINNING OF TAPE«, t00=0x0021, t01=0x00d0}
0x347e…3492 Head {h00=0x0010, h01=0x0050, text=»REW010 EQU *«, t00=0x0021, t01=0x00fc}
0x3492…34a4 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0021, t01=0x0110}
0x34a4…34b6 Head {h00=0x000e, h01=0x0050, text=» SRL A3,7 «, t00=0x0021, t01=0x0122}
0x34b6…34c8 Head {h00=0x000e, h01=0x0050, text=» ANK A3,6 «, t00=0x0021, t01=0x0134}
0x34c8…34e8 Head {h00=0x001c, h01=0x0050, text=» ORK A3,1 PREPARE STATUS«, t00=0x0021, t01=0x0146}
0x34e8…34fa Head {h00=0x000e, h01=0x0050, text=» RB LOAD10«, t00=0x0021, t01=0x0166}
0x34fa…3504 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0178}
0x3504…351c Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0021, t01=0x0182}
0x351c…3526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x000a}
0x3526…3530 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0014}
0x3530…3548 Head {h00=0x0014, h01=0x0050, text=»* U N L O A D «, t00=0x0022, t01=0x001e}
0x3548…3552 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0036}
0x3552…356e Head {h00=0x0018, h01=0x0050, text=»* UNLOAD CASSETTE «, t00=0x0022, t01=0x0040}
0x356e…3578 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x005c}
0x3578…3582 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0066}
0x3582…35aa Head {h00=0x0024, h01=0x0050, text=»UNLOAD CM DWTST,A6 RESET STATUS «, t00=0x0022, t01=0x0070}
0x35aa…35ce Head {h00=0x0020, h01=0x0050, text=» CF A8,UNLD UNLOAD CASSETTE «, t00=0x0022, t01=0x0098}
0x35ce…35f8 Head {h00=0x0026, h01=0x0050, text=»UNLO10 LDR A1,A2 SAVE RETURN CODE «, t00=0x0022, t01=0x00bc}
0x35f8…360a Head {h00=0x000e, h01=0x0050, text=» RB ENDIO «, t00=0x0022, t01=0x00e6}
0x360a…361e Head {h00=0x0010, h01=0x0050, text=» IFT REVER=1«, t00=0x0022, t01=0x00f8}
0x361e…3628 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x010c}
0x3628…3632 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0116}
0x3632…364a Head {h00=0x0014, h01=0x0050, text=»* R E V E R S «, t00=0x0022, t01=0x0120}
0x364a…3654 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0138}
0x3654…3674 Head {h00=0x001c, h01=0x0050, text=»* BACKSPACE ONE BLOCK «, t00=0x0022, t01=0x0142}
0x3674…367e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0162}
0x367e…3688 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x016c}
0x3688…36ac Head {h00=0x0020, h01=0x0050, text=»REVERS CF A8,BKSP BACKSPACE «, t00=0x0022, t01=0x0176}
0x36ac…36d4 Head {h00=0x0024, h01=0x0050, text=» LDKL A4,-1 DECREMENT BLOCK SEQ.«, t00=0x0023, t01=0x000a}
0x36d4…36fc Head {h00=0x0024, h01=0x0050, text=» ADS A4,DWTBKC,A6 COUNTER BY ONE«, t00=0x0023, t01=0x0032}
0x36fc…370e Head {h00=0x000e, h01=0x0050, text=» RB UNLO10«, t00=0x0023, t01=0x005a}
0x370e…3718 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x006c}
0x3718…3730 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0023, t01=0x0076}
0x3730…373a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x008e}
0x373a…3744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0098}
0x3744…375c Head {h00=0x0014, h01=0x0050, text=»* E R T A P E «, t00=0x0023, t01=0x00a2}
0x375c…3766 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00ba}
0x3766…377c Head {h00=0x0012, h01=0x0050, text=»* ERASE TAPE«, t00=0x0023, t01=0x00c4}
0x377c…3786 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00da}
0x3786…3790 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00e4}
0x3790…37bc Head {h00=0x0028, h01=0x0050, text=»ERTAPE LDK A4,PERAS SET NO OF ERASE «, t00=0x0023, t01=0x00ee}
0x37bc…37e6 Head {h00=0x0026, h01=0x0050, text=»ERT10 CF A8,ERASE ERASE ONE BLOCK «, t00=0x0023, t01=0x011a}
0x37e6…3808 Head {h00=0x001e, h01=0x0050, text=» ANKL A1,/400 SAVE EOT BIT«, t00=0x0023, t01=0x0144}
0x3808…3826 Head {h00=0x001a, h01=0x0050, text=» ORR A1,A2 RETURN CODE«, t00=0x0023, t01=0x0166}
0x3826…3838 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0023, t01=0x0184}
0x3838…385e Head {h00=0x0022, h01=0x0050, text=» RB(NZ) ERT10 ERASE NOT READY «, t00=0x0024, t01=0x0008}
0x385e…3870 Head {h00=0x000e, h01=0x0050, text=» RB READ50«, t00=0x0024, t01=0x002e}
0x3870…387a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0040}
0x387a…3884 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x004a}
0x3884…389a Head {h00=0x0012, h01=0x0050, text=»* O L O C K «, t00=0x0024, t01=0x0054}
0x389a…38a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x006a}
0x38a4…38c4 Head {h00=0x001c, h01=0x0050, text=»* ORDER LOCK CASSETTE «, t00=0x0024, t01=0x0074}
0x38c4…38ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0094}
0x38ce…38d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x009e}
0x38d8…38fe Head {h00=0x0022, h01=0x0050, text=»OLOCK CF A8,LOCK LOCK CASSETTE«, t00=0x0024, t01=0x00a8}
0x38fe…3924 Head {h00=0x0022, h01=0x0050, text=» RB(Z) REW010 CASSETTE LOCKED «, t00=0x0024, t01=0x00ce}
0x3924…3936 Head {h00=0x000e, h01=0x0050, text=» RB LOAD10«, t00=0x0024, t01=0x00f4}
0x3936…3942 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0106}
0x3942…394c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0112}
0x394c…3964 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0024, t01=0x011c}
0x3964…396e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0134}
0x396e…3978 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x013e}
0x3978…3994 Head {h00=0x0018, h01=0x0050, text=»* CASSETTE COMMANDS «, t00=0x0024, t01=0x0148}
0x3994…399e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0164}
0x399e…39a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x016e}
0x39a8…39b8 Head {h00=0x000c, h01=0x0050, text=»* SELECT«, t00=0x0024, t01=0x0178}
0x39b8…39c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0188}
0x39c2…39d6 (37, 0, 398) Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x0025, t01=0x0004}
0x39d6…39f4 Head {h00=0x001a, h01=0x0050, text=» LDK A2,/FF LOAD MASK «, t00=0x0025, t01=0x0018}
0x39f4…3a1a Head {h00=0x0022, h01=0x0050, text=» ANS A2,DWTST,A6 SET DWT BUSY «, t00=0x0025, t01=0x0036}
0x3a1a…3a2e Head {h00=0x0010, h01=0x0050, text=» IFT DBCAS=1«, t00=0x0025, t01=0x005c}
0x3a2e…3a4c Head {h00=0x001a, h01=0x0050, text=» LDK A3,0 SELECT CODE «, t00=0x0025, t01=0x0070}
0x3a4c…3a58 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x008e}
0x3a58…3a6c Head {h00=0x0010, h01=0x0050, text=» IFT DBCAS=2«, t00=0x0025, t01=0x009a}
0x3a6c…3a8e Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A6 GET OTHER DWT «, t00=0x0025, t01=0x00ae}
0x3a8e…3ab4 Head {h00=0x0022, h01=0x0050, text=» ANS A2,DWTST,A3 SET DWT BUSY «, t00=0x0025, t01=0x00d0}
0x3ab4…3ad6 Head {h00=0x001e, h01=0x0050, text=» ANK A3,1 GET SELECT CODE «, t00=0x0025, t01=0x00f6}
0x3ad6…3ae2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0118}
0x3ae2…3aec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0124}
0x3aec…3b14 Head {h00=0x0024, h01=0x0050, text=»CRCOM CIO A3,1,CHCRDA CIO START «, t00=0x0025, t01=0x012e}
0x3b14…3b24 Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x0025, t01=0x0156}
0x3b24…3b2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0166}
0x3b2e…3b50 Head {h00=0x001e, h01=0x0050, text=»* READ SEQUENCE CHAR TO A5«, t00=0x0025, t01=0x0170}
0x3b50…3b5a (38, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0004}
0x3b5a…3b6e Head {h00=0x0010, h01=0x0050, text=»READSQ EQU *«, t00=0x0026, t01=0x000e}
0x3b6e…3b80 Head {h00=0x000e, h01=0x0050, text=» LDK A3,/A«, t00=0x0026, t01=0x0022}
0x3b80…3bb0 Head {h00=0x002c, h01=0x0050, text=» ST A3,REQLEN MAKE REQUESTED LENGTH > 0 «, t00=0x0026, t01=0x0034}
0x3bb0…3bc2 Head {h00=0x000e, h01=0x0050, text=» RB CRCOM «, t00=0x0026, t01=0x0064}
0x3bc2…3bcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0076}
0x3bcc…3be4 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0026, t01=0x0080}
0x3be4…3bee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0098}
0x3bee…3c08 Head {h00=0x0016, h01=0x0050, text=»* READ ONE RECORD «, t00=0x0026, t01=0x00a2}
0x3c08…3c12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00bc}
0x3c12…3c2a Head {h00=0x0014, h01=0x0050, text=»READR LDK A3,/A «, t00=0x0026, t01=0x00c6}
0x3c2a…3c5a Head {h00=0x002c, h01=0x0050, text=»READR1 CM EFFLEN RESET EFFECTIVE LENGTH «, t00=0x0026, t01=0x00de}
0x3c5a…3c80 Head {h00=0x0022, h01=0x0050, text=» LDKL A2,0 GET BUFFER ADDRESS «, t00=0x0026, t01=0x010e}
0x3c80…3ca2 Head {h00=0x001e, h01=0x0050, text=»BUFADR EQU *-2 **BUFADR** «, t00=0x0026, t01=0x0134}
0x3ca2…3cb6 Head {h00=0x0010, h01=0x0050, text=» ST A2,TCDBA«, t00=0x0026, t01=0x0156}
0x3cb6…3cde Head {h00=0x0024, h01=0x0050, text=» LDKL A2,0 GET REQUESTED LENGTH «, t00=0x0026, t01=0x016a}
0x3cde…3d00 (39, 0, 400) Head {h00=0x001e, h01=0x0050, text=»HELPME EQU *-2 **HELPME** «, t00=0x0027, t01=0x0004}
0x3d00…3d16 Head {h00=0x0012, h01=0x0050, text=» ST A2,REQLEN «, t00=0x0027, t01=0x0026}
0x3d16…3d28 Head {h00=0x000e, h01=0x0050, text=» RB CRCOM «, t00=0x0027, t01=0x003c}
0x3d28…3d32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x004e}
0x3d32…3d4c Head {h00=0x0016, h01=0x0050, text=»* WRITE ONE RECORD«, t00=0x0027, t01=0x0058}
0x3d4c…3d56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0072}
0x3d56…3d6e Head {h00=0x0014, h01=0x0050, text=»WRITER LDK A3,/B«, t00=0x0027, t01=0x007c}
0x3d6e…3d80 Head {h00=0x000e, h01=0x0050, text=» RB READR1«, t00=0x0027, t01=0x0094}
0x3d80…3d8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00a6}
0x3d8a…3da4 Head {h00=0x0016, h01=0x0050, text=»* ERASE ONE BLOCK «, t00=0x0027, t01=0x00b0}
0x3da4…3dae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00ca}
0x3dae…3dc4 Head {h00=0x0012, h01=0x0050, text=»ERASE LDK A3,9«, t00=0x0027, t01=0x00d4}
0x3dc4…3dd6 Head {h00=0x000e, h01=0x0050, text=» RB CRCOM «, t00=0x0027, t01=0x00ea}
0x3dd6…3de0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00fc}
0x3de0…3df8 Head {h00=0x0014, h01=0x0050, text=»* LOCK CASSETTE «, t00=0x0027, t01=0x0106}
0x3df8…3e02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x011e}
0x3e02…3e18 Head {h00=0x0012, h01=0x0050, text=»LOCK LDK A3,2 «, t00=0x0027, t01=0x0128}
0x3e18…3e2a Head {h00=0x000e, h01=0x0050, text=» RB CRCOM «, t00=0x0027, t01=0x013e}
0x3e2a…3e34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0150}
0x3e34…3e4c Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0027, t01=0x015a}
0x3e4c…3e56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0172}
0x3e56…3e78 Head {h00=0x001e, h01=0x0050, text=»* SEARCH BEGINNING OF TAPE«, t00=0x0027, t01=0x017c}
0x3e78…3e82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x000e}
0x3e82…3e98 Head {h00=0x0012, h01=0x0050, text=»SBOT LDK A3,8 «, t00=0x0028, t01=0x0018}
0x3e98…3eaa Head {h00=0x000e, h01=0x0050, text=» RB CRCOM «, t00=0x0028, t01=0x002e}
0x3eaa…3eb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0040}
0x3eb4…3ede Head {h00=0x0026, h01=0x0050, text=»* REWIND TAPE AND UNLOCK CASSETTE «, t00=0x0028, t01=0x004a}
0x3ede…3ee8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0074}
0x3ee8…3efe Head {h00=0x0012, h01=0x0050, text=»UNLD LDK A3,/F«, t00=0x0028, t01=0x007e}
0x3efe…3f10 Head {h00=0x000e, h01=0x0050, text=» RB CRCOM «, t00=0x0028, t01=0x0094}
0x3f10…3f1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00a6}
0x3f1a…3f38 Head {h00=0x001a, h01=0x0050, text=»* BACKSPACE ONE BLOCK «, t00=0x0028, t01=0x00b0}
0x3f38…3f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00ce}
0x3f42…3f58 Head {h00=0x0012, h01=0x0050, text=»BKSP LDK A3,/E«, t00=0x0028, t01=0x00d8}
0x3f58…3f6a Head {h00=0x000e, h01=0x0050, text=» RB CRCOM «, t00=0x0028, t01=0x00ee}
0x3f6a…3f74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0100}
0x3f74…3f8c Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0028, t01=0x010a}
0x3f8c…3f96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0122}
0x3f96…3fa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x012c}
0x3fa0…3fb4 Head {h00=0x0010, h01=0x0050, text=»* I H T C «, t00=0x0028, t01=0x0136}
0x3fb4…3fbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x014a}
0x3fbe…3ff2 Head {h00=0x0030, h01=0x0050, text=»* INTERRUPT HANDLER : PROCESS OF INTERRUPT«, t00=0x0028, t01=0x0154}
0x3ff2…3ffc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0188}
0x3ffc…4006 (41, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0004}
0x4006…4018 Head {h00=0x000e, h01=0x0050, text=»IHTC EQU *«, t00=0x0029, t01=0x000e}
0x4018…4040 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0029, t01=0x0020}
0x4040…4064 Head {h00=0x0020, h01=0x0050, text=» STR A5,A15 SAVE A5 ON STACK«, t00=0x0029, t01=0x0048}
0x4064…407a Head {h00=0x0012, h01=0x0050, text=» SST A5,CHCRDA«, t00=0x0029, t01=0x006c}
0x407a…409a Head {h00=0x001c, h01=0x0050, text=» RF(A) SST SST ACCEPTED «, t00=0x0029, t01=0x0082}
0x409a…40be Head {h00=0x0020, h01=0x0050, text=» IM REQLEN INCREMENT COUNTER«, t00=0x0029, t01=0x00a2}
0x40be…40d4 Head {h00=0x0012, h01=0x0050, text=» RF(Z) CIOHLT «, t00=0x0029, t01=0x00c6}
0x40d4…40fe Head {h00=0x0026, h01=0x0050, text=» RF(P) INRSQ GET SEQUENCE COUNTER «, t00=0x0029, t01=0x00dc}
0x40fe…4122 Head {h00=0x0020, h01=0x0050, text=» STR A3,A15 SAVE A3 ON STACK«, t00=0x0029, t01=0x0106}
0x4122…4148 Head {h00=0x0022, h01=0x0050, text=» LDKL A3,0 GET BUFFER ADDRESS «, t00=0x0029, t01=0x012a}
0x4148…4170 Head {h00=0x0024, h01=0x0050, text=»TCDBA EQU *-2 **BUFFER ADDRESS**«, t00=0x0029, t01=0x0150}
0x4170…419a Head {h00=0x0026, h01=0x0050, text=» IM TCDBA INCREMENT BUFFER ADDRESS«, t00=0x0029, t01=0x0178}
0x419a…41d2 Head {h00=0x0034, h01=0x0050, text=» LD A5,TCDAX GET FUNCTION SWITCH FOR READ/WRITE «, t00=0x002a, t01=0x0012}
0x41d2…41e4 Head {h00=0x000e, h01=0x0050, text=» SUK A5,10«, t00=0x002a, t01=0x004a}
0x41e4…4200 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) IHTC05 WRITE«, t00=0x002a, t01=0x005c}
0x4200…420a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0078}
0x420a…4234 Head {h00=0x0026, h01=0x0050, text=»IHTC02 INR A5,0,CHCRDA READ CHAR. «, t00=0x002a, t01=0x0082}
0x4234…4260 Head {h00=0x0028, h01=0x0050, text=» SCR A5,A3 STORE CHARACTER IN BUFFER«, t00=0x002a, t01=0x00ac}
0x4260…4272 Head {h00=0x000e, h01=0x0050, text=» RF EXIT2 «, t00=0x002a, t01=0x00d8}
0x4272…427c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00ea}
0x427c…4290 Head {h00=0x0010, h01=0x0050, text=»IHTC05 EQU *«, t00=0x002a, t01=0x00f4}
0x4290…42b8 Head {h00=0x0024, h01=0x0050, text=» LCR A5,A3 GET CHAR FROM BUFFER «, t00=0x002a, t01=0x0108}
0x42b8…42da Head {h00=0x001e, h01=0x0050, text=» OTR A5,0,CHCRDA OUTPUT IT«, t00=0x002a, t01=0x0130}
0x42da…42f2 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x002a, t01=0x0152}
0x42f2…42fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x016a}
0x42fc…4306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0174}
0x4306…4320 Head {h00=0x0016, h01=0x0050, text=»EXIT2 ST A5,TCDA5 «, t00=0x002a, t01=0x017e}
0x4320…434e Head {h00=0x002a, h01=0x0050, text=» IM EFFLEN INCREMENT EFFECTIVE LENGTH«, t00=0x002b, t01=0x0008}
0x434e…4380 Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A15 RESTORE A3 AND A5 FROM STACK «, t00=0x002b, t01=0x0036}
0x4380…438a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0068}
0x438a…43a4 Head {h00=0x0016, h01=0x0050, text=»EXIT3 LDR* A5,A15 «, t00=0x002b, t01=0x0072}
0x43a4…43b4 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x002b, t01=0x008c}
0x43b4…43be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x009c}
0x43be…43ec Head {h00=0x002a, h01=0x0050, text=»INRSQ INR A5,0,CHCRDA READ CHAR TO A5 «, t00=0x002b, t01=0x00a6}
0x43ec…4400 Head {h00=0x0010, h01=0x0050, text=» ST A5,TCDA5«, t00=0x002b, t01=0x00d4}
0x4400…4412 Head {h00=0x000e, h01=0x0050, text=» RB EXIT3 «, t00=0x002b, t01=0x00e8}
0x4412…441c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00fa}
0x441c…4440 Head {h00=0x0020, h01=0x0050, text=»SST ST A5,TCDA2 SAVE STATUS «, t00=0x002b, t01=0x0104}
0x4440…4460 Head {h00=0x001c, h01=0x0050, text=» LDR* A5,A15 RESTORE A5 «, t00=0x002b, t01=0x0128}
0x4460…4484 Head {h00=0x0020, h01=0x0050, text=» CF A15,SAVE8 SAVE REGISTERS«, t00=0x002b, t01=0x0148}
0x4484…4496 Head {h00=0x000e, h01=0x0050, text=» LDKL A1,0«, t00=0x002b, t01=0x016c}
0x4496…44ac Head {h00=0x0012, h01=0x0050, text=»TCDA1 EQU *-2 «, t00=0x002b, t01=0x017e}
0x44ac…44be (44, 0, 398) Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x002c, t01=0x0004}
0x44be…44d4 Head {h00=0x0012, h01=0x0050, text=»TCDA4 EQU *-2 «, t00=0x002c, t01=0x0016}
0x44d4…44e6 Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x002c, t01=0x002c}
0x44e6…44fc Head {h00=0x0012, h01=0x0050, text=»TCDA5 EQU *-2 «, t00=0x002c, t01=0x003e}
0x44fc…450e Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x002c, t01=0x0054}
0x450e…4524 Head {h00=0x0012, h01=0x0050, text=»TCDA6 EQU *-2 «, t00=0x002c, t01=0x0066}
0x4524…4536 Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x002c, t01=0x007c}
0x4536…454c Head {h00=0x0012, h01=0x0050, text=»TCDA8 EQU *-2 «, t00=0x002c, t01=0x008e}
0x454c…4564 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x002c, t01=0x00a4}
0x4564…456e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00bc}
0x456e…4578 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00c6}
0x4578…459a Head {h00=0x001e, h01=0x0050, text=» LDKL A2,0 RESTORE STATUS «, t00=0x002c, t01=0x00d0}
0x459a…45b0 Head {h00=0x0012, h01=0x0050, text=»TCDA2 EQU *-2 «, t00=0x002c, t01=0x00f2}
0x45b0…45ce Head {h00=0x001a, h01=0x0050, text=» LDR A3,A2 GET STATUS«, t00=0x002c, t01=0x0108}
0x45ce…45e6 Head {h00=0x0014, h01=0x0050, text=» SLL A3,9 SHIFT «, t00=0x002c, t01=0x0126}
0x45e6…4608 Head {h00=0x001e, h01=0x0050, text=» ST A3,2,A8 SAVE ON STACK «, t00=0x002c, t01=0x013e}
0x4608…4634 Head {h00=0x0028, h01=0x0050, text=» LD A3,DWTST,A6 PUT DWT STATUS IN A3«, t00=0x002c, t01=0x0160}
0x4634…463e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x018c}
0x463e…4652 Head {h00=0x0010, h01=0x0050, text=»IHTRTN EQU *«, t00=0x002d, t01=0x0008}
0x4652…4662 Head {h00=0x000c, h01=0x0050, text=» RTN A8 «, t00=0x002d, t01=0x001c}
0x4662…466c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x002c}
0x466c…4680 Head {h00=0x0010, h01=0x0050, text=»CIOHLT EQU *«, t00=0x002d, t01=0x0036}
0x4680…46a2 Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,CHCRDA CIO-HALT«, t00=0x002d, t01=0x004a}
0x46a2…46b4 Head {h00=0x000e, h01=0x0050, text=» RB EXIT3 «, t00=0x002d, t01=0x006c}
0x46b4…46be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x007e}
0x46be…46d6 Head {h00=0x0014, h01=0x0050, text=»EXIT ST A1,TCDA1«, t00=0x002d, t01=0x0088}
0x46d6…46ea Head {h00=0x0010, h01=0x0050, text=» ST A4,TCDA4«, t00=0x002d, t01=0x00a0}
0x46ea…46fe Head {h00=0x0010, h01=0x0050, text=» ST A5,TCDA5«, t00=0x002d, t01=0x00b4}
0x46fe…4712 Head {h00=0x0010, h01=0x0050, text=» ST A6,TCDA6«, t00=0x002d, t01=0x00c8}
0x4712…4726 Head {h00=0x0010, h01=0x0050, text=» ST A8,TCDA8«, t00=0x002d, t01=0x00dc}
0x4726…474a Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER«, t00=0x002d, t01=0x00f0}
0x474a…4754 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0114}
0x4754…476c Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x002d, t01=0x011e}
0x476c…4776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0136}
0x4776…4780 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0140}
0x4780…4798 Head {h00=0x0014, h01=0x0050, text=»* R C O V E R «, t00=0x002d, t01=0x014a}
0x4798…47a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0162}
0x47a2…47e0 Head {h00=0x003a, h01=0x0050, text=»* RECOVERY ROUTINE : POSITIONING OF TAPE AT POWER ON«, t00=0x002d, t01=0x016c}
0x47e0…47ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x001a}
0x47ea…47f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0024}
0x47f4…4808 Head {h00=0x0010, h01=0x0050, text=»RCOVER EQU *«, t00=0x002e, t01=0x002e}
0x4808…4824 Head {h00=0x0018, h01=0x0050, text=» CF A8,SELECT SELECT«, t00=0x002e, t01=0x0042}
0x4824…4836 Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x002e, t01=0x005e}
0x4836…486c Head {h00=0x0032, h01=0x0050, text=» RB(Z) IHTRTN NOT LOCKED: RETURN FROM RECOVERY«, t00=0x002e, t01=0x0070}
0x486c…4880 Head {h00=0x0010, h01=0x0050, text=» CF A8,LOCK «, t00=0x002e, t01=0x00a6}
0x4880…48a2 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) REPER NO CASSETTE «, t00=0x002e, t01=0x00ba}
0x48a2…48d2 Head {h00=0x002c, h01=0x0050, text=» LD A1,DWTBKC,A6 ANY BLOCK WRITTEN/READ «, t00=0x002e, t01=0x00dc}
0x48d2…48ec Head {h00=0x0016, h01=0x0050, text=» RF(NZ) RC0050 YES«, t00=0x002e, t01=0x010c}
0x48ec…4918 Head {h00=0x0028, h01=0x0050, text=» CF A8,SBOT SEARCH BEGINNING OF TAPE«, t00=0x002e, t01=0x0126}
0x4918…492a Head {h00=0x000e, h01=0x0050, text=» SLL A2,5 «, t00=0x002e, t01=0x0152}
0x492a…494e Head {h00=0x0020, h01=0x0050, text=» RF(NN) REPER BOT NOT FOUND «, t00=0x002e, t01=0x0164}
0x494e…4960 Head {h00=0x000e, h01=0x0050, text=» RF REPOK «, t00=0x002e, t01=0x0188}
0x4960…496a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x000a}
0x496a…4996 Head {h00=0x0028, h01=0x0050, text=»RC0050 LD A1,SEKBYT,A6 SEQ. COUNTING«, t00=0x002f, t01=0x0014}
0x4996…49ae Head {h00=0x0014, h01=0x0050, text=» RF(NZ) REPER NO«, t00=0x002f, t01=0x0040}
0x49ae…49b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0058}
0x49b8…49d0 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x002f, t01=0x0062}
0x49d0…49da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x007a}
0x49da…49e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0084}
0x49e4…49fa Head {h00=0x0012, h01=0x0050, text=»* R E P O S «, t00=0x002f, t01=0x008e}
0x49fa…4a04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00a4}
0x4a04…4a32 Head {h00=0x002a, h01=0x0050, text=»* REPOSITIONING OF TAPE AT POWER ON «, t00=0x002f, t01=0x00ae}
0x4a32…4a50 Head {h00=0x001a, h01=0x0050, text=»* AND WRITE RECOVERY«, t00=0x002f, t01=0x00dc}
0x4a50…4a5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00fa}
0x4a5a…4a92 Head {h00=0x0034, h01=0x0050, text=»* EXIT: A2 EQ ZERO SUCCESS«, t00=0x002f, t01=0x0104}
0x4a92…4ace Head {h00=0x0038, h01=0x0050, text=»* A2 NOT EQ ZERO NO SUCCESS «, t00=0x002f, t01=0x013c}
0x4ace…4ad8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0178}
0x4ad8…4ae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0182}
0x4ae2…4af6 Head {h00=0x0010, h01=0x0050, text=»REPOS EQU * «, t00=0x002f, t01=0x018c}
0x4af6…4b1e Head {h00=0x0024, h01=0x0050, text=» LDK A4,8 SET REPOSITIONING BIT «, t00=0x0030, t01=0x0010}
0x4b1e…4b44 Head {h00=0x0022, h01=0x0050, text=» ORS A4,DWTST,A6 STORE IN DWT «, t00=0x0030, t01=0x0038}
0x4b44…4b4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x005e}
0x4b4e…4b62 Head {h00=0x0010, h01=0x0050, text=»REP005 EQU *«, t00=0x0030, t01=0x0068}
0x4b62…4b8c Head {h00=0x0026, h01=0x0050, text=» LDK A4,PSUBS SET NO OF BACKSPACES«, t00=0x0030, t01=0x007c}
0x4b8c…4b96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00a6}
0x4b96…4bba Head {h00=0x0020, h01=0x0050, text=»REP010 CF A8,BKSP BACKSPACE «, t00=0x0030, t01=0x00b0}
0x4bba…4bcc Head {h00=0x000e, h01=0x0050, text=» SLL A2,4 «, t00=0x0030, t01=0x00d4}
0x4bcc…4bee Head {h00=0x001e, h01=0x0050, text=» RF(NN) REP015 DATA FOUND «, t00=0x0030, t01=0x00e6}
0x4bee…4c18 Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTBKC,A6 GET BLOCK COUNTER«, t00=0x0030, t01=0x0108}
0x4c18…4c36 Head {h00=0x001a, h01=0x0050, text=» SUK A2,8 GREATER 8 ? «, t00=0x0030, t01=0x0132}
0x4c36…4c4e Head {h00=0x0014, h01=0x0050, text=» RF(G) REPER YES«, t00=0x0030, t01=0x0150}
0x4c4e…4c80 Head {h00=0x002e, h01=0x0050, text=» CF A8,SBOT NO DATA; SEARCH BEGIN OF TAPE «, t00=0x0030, t01=0x0168}
0x4c80…4c92 Head {h00=0x000e, h01=0x0050, text=» SLL A2,5 «, t00=0x0031, t01=0x000a}
0x4c92…4cb6 Head {h00=0x0020, h01=0x0050, text=» RF(NN) REPER BOT NOT FOUND «, t00=0x0031, t01=0x001c}
0x4cb6…4cdc Head {h00=0x0022, h01=0x0050, text=» LDKL A5,-1 RESET SEQ. COUNTER«, t00=0x0031, t01=0x0040}
0x4cdc…4cfe Head {h00=0x001e, h01=0x0050, text=» RF REP020 READ SEQ. CHAR «, t00=0x0031, t01=0x0066}
0x4cfe…4d08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0088}
0x4d08…4d20 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0031, t01=0x0092}
0x4d20…4d2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00aa}
0x4d2a…4d34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00b4}
0x4d34…4d48 Head {h00=0x0010, h01=0x0050, text=»REP015 EQU *«, t00=0x0031, t01=0x00be}
0x4d48…4d5a Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0031, t01=0x00d2}
0x4d5a…4d80 Head {h00=0x0022, h01=0x0050, text=» RB(NZ) REP010 BACKSPACE AGAIN«, t00=0x0031, t01=0x00e4}
0x4d80…4da8 Head {h00=0x0024, h01=0x0050, text=» LDK A4,PREAD SET NO OF MAX READ«, t00=0x0031, t01=0x010a}
0x4da8…4db2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0132}
0x4db2…4ddc Head {h00=0x0026, h01=0x0050, text=»REP017 CF A8,READSQ READ SEQ. CHAR«, t00=0x0031, t01=0x013c}
0x4ddc…4e00 Head {h00=0x0020, h01=0x0050, text=» LDKL A7,/180F SET READ MASK«, t00=0x0031, t01=0x0166}
0x4e00…4e12 Head {h00=0x000e, h01=0x0050, text=» TM A2,A7 «, t00=0x0031, t01=0x018a}
0x4e12…4e30 Head {h00=0x001a, h01=0x0050, text=» RF(Z) REP020 READ OK «, t00=0x0032, t01=0x000c}
0x4e30…4e4c Head {h00=0x0018, h01=0x0050, text=» SUK A4,1 COUNT READ«, t00=0x0032, t01=0x002a}
0x4e4c…4e74 Head {h00=0x0024, h01=0x0050, text=» RB(P) REP017 NOT ALL READ DONE «, t00=0x0032, t01=0x0046}
0x4e74…4e8e Head {h00=0x0016, h01=0x0050, text=» RF REP060 GIVE UP«, t00=0x0032, t01=0x006e}
0x4e8e…4e98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0088}
0x4e98…4ec6 Head {h00=0x002a, h01=0x0050, text=»REP020 LC A4,DWTBKC+1,A6 GET SEQ. CHAR«, t00=0x0032, t01=0x0092}
0x4ec6…4ee2 Head {h00=0x0018, h01=0x0050, text=» SUR A4,A5 CALCULATE«, t00=0x0032, t01=0x00c0}
0x4ee2…4f04 Head {h00=0x001e, h01=0x0050, text=» SUK A4,1 NO OF BLOCKS TO «, t00=0x0032, t01=0x00dc}
0x4f04…4f26 Head {h00=0x001e, h01=0x0050, text=» ANK A4,/FF READ FORWARD. «, t00=0x0032, t01=0x00fe}
0x4f26…4f4a Head {h00=0x0020, h01=0x0050, text=» CWK A4,PINT TOO MANY BLOCKS«, t00=0x0032, t01=0x0120}
0x4f4a…4f62 Head {h00=0x0014, h01=0x0050, text=» RF(G) REPER YES«, t00=0x0032, t01=0x0144}
0x4f62…4f6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x015c}
0x4f6c…4f84 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0032, t01=0x0166}
0x4f84…4f8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x017e}
0x4f8e…4f98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0188}
0x4f98…4fbe (51, 0, 398) Head {h00=0x0022, h01=0x0050, text=»REP030 SUK A4,1 POSITION TAPE «, t00=0x0033, t01=0x0004}
0x4fbe…4fda Head {h00=0x0018, h01=0x0050, text=» RF(N) REP040 READY «, t00=0x0033, t01=0x002a}
0x4fda…5000 Head {h00=0x0022, h01=0x0050, text=» CF A8,READSQ READ NEXT BLOCK «, t00=0x0033, t01=0x0046}
0x5000…5012 Head {h00=0x000e, h01=0x0050, text=» RB REP030«, t00=0x0033, t01=0x006c}
0x5012…501c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x007e}
0x501c…5048 Head {h00=0x0028, h01=0x0050, text=»REP040 LDK A4,RTRIES SET NO OF RETRY«, t00=0x0033, t01=0x0088}
0x5048…5072 Head {h00=0x0026, h01=0x0050, text=»REP042 LDKL A7,/80F SET READ MASK «, t00=0x0033, t01=0x00b4}
0x5072…5090 Head {h00=0x001a, h01=0x0050, text=» TM A2,A7 CORRECT READ«, t00=0x0033, t01=0x00de}
0x5090…50aa Head {h00=0x0016, h01=0x0050, text=» RF(Z) REP045 YES «, t00=0x0033, t01=0x00fc}
0x50aa…50c8 Head {h00=0x001a, h01=0x0050, text=» SUK A4,1 COUNT RETRY «, t00=0x0033, t01=0x0116}
0x50c8…50e6 Head {h00=0x001a, h01=0x0050, text=» RF(NP) REP060 GIVE UP«, t00=0x0033, t01=0x0134}
0x50e6…5104 Head {h00=0x001a, h01=0x0050, text=» CF A8,BKSP BACKSPACE «, t00=0x0033, t01=0x0152}
0x5104…512a Head {h00=0x0022, h01=0x0050, text=» CF A8,READSQ READ SEQ NUMBER «, t00=0x0033, t01=0x0170}
0x512a…513c Head {h00=0x000e, h01=0x0050, text=» RB REP042«, t00=0x0034, t01=0x0008}
0x513c…5146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x001a}
0x5146…515e Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0034, t01=0x0024}
0x515e…5168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x003c}
0x5168…5172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0046}
0x5172…518a Head {h00=0x0014, h01=0x0050, text=»REP045 SLC A2,3 «, t00=0x0034, t01=0x0050}
0x518a…51ae Head {h00=0x0020, h01=0x0050, text=» RF(NN) REP050 NOT TAPE MARK«, t00=0x0034, t01=0x0068}
0x51ae…51c2 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/10 «, t00=0x0034, t01=0x008c}
0x51c2…51f0 Head {h00=0x002a, h01=0x0050, text=» RF(Z) REP060 SHOULD NOT BE TAPE MARK «, t00=0x0034, t01=0x00a0}
0x51f0…5202 Head {h00=0x000e, h01=0x0050, text=» RF REPOK «, t00=0x0034, t01=0x00ce}
0x5202…520c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00e0}
0x520c…5236 Head {h00=0x0026, h01=0x0050, text=»REP050 ADK A5,1 CHECK SEQ. NUMBER «, t00=0x0034, t01=0x00ea}
0x5236…5250 Head {h00=0x0016, h01=0x0050, text=» CC A5,DWTBKC+1,A6«, t00=0x0034, t01=0x0114}
0x5250…526a Head {h00=0x0016, h01=0x0050, text=» RF(E) REPOK EQUAL«, t00=0x0034, t01=0x012e}
0x526a…5274 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0148}
0x5274…5292 Head {h00=0x001a, h01=0x0050, text=»REP060 LD A7,DWTST,A6 «, t00=0x0034, t01=0x0152}
0x5292…52ba Head {h00=0x0024, h01=0x0050, text=» ANK A7,8 TRY POSITIONING AGAIN?«, t00=0x0034, t01=0x0170}
0x52ba…52d2 Head {h00=0x0014, h01=0x0050, text=» RF(Z) REPER NO «, t00=0x0035, t01=0x0008}
0x52d2…5302 Head {h00=0x002c, h01=0x0050, text=» XRS A7,DWTST,A6 RESET REPOSITIONING BIT«, t00=0x0035, t01=0x0020}
0x5302…5318 Head {h00=0x0012, h01=0x0050, text=» RB REP005 YES«, t00=0x0035, t01=0x0050}
0x5318…5322 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0066}
0x5322…532c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0070}
0x532c…5366 Head {h00=0x0036, h01=0x0050, text=»REPER LDK A2,2 IND RECOVERY/SEQUENCE ERROR STATUS «, t00=0x0035, t01=0x007a}
0x5366…538c Head {h00=0x0022, h01=0x0050, text=» ORS A2,SEKBYT,A6 SAVE IN DWT «, t00=0x0035, t01=0x00b4}
0x538c…539c Head {h00=0x000c, h01=0x0050, text=» RTN A8 «, t00=0x0035, t01=0x00da}
0x539c…53a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00ea}
0x53a6…53d2 Head {h00=0x0028, h01=0x0050, text=»REPOK LDK A2,0 IND RECOVERY CORRECT «, t00=0x0035, t01=0x00f4}
0x53d2…53e2 Head {h00=0x000c, h01=0x0050, text=» RTN A8 «, t00=0x0035, t01=0x0120}
0x53e2…53ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0130}
0x53ec…5404 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0035, t01=0x013a}
0x5404…540e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0152}
0x540e…5418 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x015c}
0x5418…5430 Head {h00=0x0014, h01=0x0050, text=»* D W T C 0 2 «, t00=0x0035, t01=0x0166}
0x5430…543a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x017e}
0x543a…5470 Head {h00=0x0032, h01=0x0050, text=»* DEVICE WORK TABLE FOR CASSETTE RECORDER 02«, t00=0x0035, t01=0x0188}
0x5470…547a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x002e}
0x547a…5484 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0038}
0x5484…54a4 Head {h00=0x001c, h01=0x0050, text=»DWTC02 EQU * TABLE ENTRY«, t00=0x0036, t01=0x0042}
0x54a4…54b8 Head {h00=0x0010, h01=0x0050, text=» IFT DBCAS=2«, t00=0x0036, t01=0x0062}
0x54b8…54d8 Head {h00=0x001c, h01=0x0050, text=» DATA DWTC01+1 DWT NO. 1«, t00=0x0036, t01=0x0076}
0x54d8…550c Head {h00=0x0030, h01=0x0050, text=» DATA /8000 STATUS./8000 MEANS DEVICE READY «, t00=0x0036, t01=0x0096}
0x550c…5528 Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0036, t01=0x00ca}
0x5528…553e Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0036, t01=0x00e6}
0x553e…556a Head {h00=0x0028, h01=0x0050, text=» DATA TCAD POINTER TO ADDRESS BLOCK «, t00=0x0036, t01=0x00fc}
0x556a…5586 Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x0036, t01=0x0128}
0x5586…55ae Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0036, t01=0x0144}
0x55ae…55cc Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0036, t01=0x016c}
0x55cc…55ea Head {h00=0x001a, h01=0x0050, text=» DATA 0 BLOCK COUNTER «, t00=0x0036, t01=0x018a}
0x55ea…5608 Head {h00=0x001a, h01=0x0050, text=» DATA 0 SEQ. INDICATOR«, t00=0x0037, t01=0x0018}
0x5608…5614 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0036}
0x5614…562c Head {h00=0x0014, h01=0x0050, text=» EJECT DRTC01 «, t00=0x0037, t01=0x0042}
0x562c…5636 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x005a}
0x5636…5640 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0064}
0x5640…5658 Head {h00=0x0014, h01=0x0050, text=»* D W T C 0 1 «, t00=0x0037, t01=0x006e}
0x5658…5662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0086}
0x5662…5698 Head {h00=0x0032, h01=0x0050, text=»* DEVICE WORK TABLE FOR CASSETTE RECORDER 01«, t00=0x0037, t01=0x0090}
0x5698…56a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00c6}
0x56a2…56ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00d0}
0x56ac…56ce Head {h00=0x001e, h01=0x0050, text=»DWTC01 EQU * TABLE ENTRY «, t00=0x0037, t01=0x00da}
0x56ce…56ec Head {h00=0x001a, h01=0x0050, text=» DATA DWTC02 DWT NO. 2«, t00=0x0037, t01=0x00fc}
0x56ec…5720 Head {h00=0x0030, h01=0x0050, text=» DATA /8000 STATUS./8000 MEANS DEVICE READY «, t00=0x0037, t01=0x011a}
0x5720…573c Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0037, t01=0x014e}
0x573c…5752 Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0037, t01=0x016a}
0x5752…577e Head {h00=0x0028, h01=0x0050, text=» DATA TCAD POINTER TO ADDRESS BLOCK «, t00=0x0037, t01=0x0180}
0x577e…579a Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x0038, t01=0x001c}
0x579a…57c2 Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0038, t01=0x0038}
0x57c2…57e0 Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0038, t01=0x0060}
0x57e0…580a Head {h00=0x0026, h01=0x0050, text=»DWTBKC EQU *-DWTC01 BLOCK COUNTER «, t00=0x0038, t01=0x007e}
0x580a…581a Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0038, t01=0x00a8}
0x581a…5836 Head {h00=0x0018, h01=0x0050, text=»SEKBYT EQU *-DWTC01 «, t00=0x0038, t01=0x00b8}
0x5836…5854 Head {h00=0x001a, h01=0x0050, text=» DATA 0 SEQ. INDICATOR«, t00=0x0038, t01=0x00d4}
0x5854…585e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00f2}
0x585e…5868 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00fc}
0x5868…588e Head {h00=0x0022, h01=0x0050, text=»REQLEN DATA 0 REQUESTED LENGTH«, t00=0x0038, t01=0x0106}
0x588e…5898 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x012c}
0x5898…58a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0136}
0x58a2…58ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0140}
0x58ac…58b8 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0038, t01=0x014a}
0x58b8…58bc Head {h00=0x4004, h01=0x0000}
0x58bc…58c0 00 38 01 56 ┆ 8 V┆
0x58c0…58c8 (57, 1, 8) 20 04 00 00 00 39 00 04 ┆ 9 ┆
0x58c8…5918 (58, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 52 4c 20 38 2e 31 3a 31 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 37 38 2d 30 33 2d 30 33 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 31 20 20 20 20 20 20 20 20 20 20 20 ┆ LABEL = RL 8.1:1 DATE = 78-03-03 PACK NBR = 001 ┆
0x5918…5968 00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 1f ┆ f ┆
0x5968…59b8 f0 3a 85 5c 00 00 15 08 85 5d 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 1c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ : ] =IR E ┆
0x59b8…5a08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
[…0x1…]
0x5a58…5aa8 (59, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 52 4c 20 38 2e 31 3a 31 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 37 38 2d 30 33 2d 30 33 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 31 20 20 20 20 20 20 20 20 20 20 20 ┆ LABEL = RL 8.1:1 DATE = 78-03-03 PACK NBR = 001 ┆
0x5aa8…5af8 00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 1f ┆ f ┆
0x5af8…5b48 f0 3a 85 5c 00 00 15 08 85 5d 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 1d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ : ] =IR E ┆
0x5b48…5b98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
[…0x1…]
0x5be8…5c38 (60, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 52 4c 20 38 2e 31 3a 31 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 37 38 2d 30 33 2d 30 33 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 31 20 20 20 20 20 20 20 20 20 20 20 ┆ LABEL = RL 8.1:1 DATE = 78-03-03 PACK NBR = 001 ┆
0x5c38…5c88 00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 1f ┆ f ┆
0x5c88…5cd8 f0 3a 85 5c 00 00 15 08 85 5d 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ : ] =IR E ┆
0x5cd8…5d28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
[…0x1…]