|
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: 17554 (0x4492)
Notes: pts_type(SC)
Names: »DRTW01.SC«
└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
└─⟦this⟧ »TOSSWORK/DRTW01.SC«
IDENT DRTW01 REL 9.2 79-11-16 870105040920 ************************************************** * * PHILIPS TERMINAL SYSTE PTS * * DRTW01 = DRIVER TYPEWRITER PTS 6862 * * * * * * ************************************************** * * THIS DRIVER HANDLES INPUT AND OUTPUT TO TYPEWRITERS * PTS 6862 * * EJECT * * *********** * ENTRIES * *********** * ENTRY TWAD ADDRESS BLOCK ENTRY IHTW ENTRY TWON ENTRY DWTW01 * ************* * EXTERNALS * ************* * EXTRN DISIOE REQUEST ERROR EXTRN TDISP DISPATCH EXTRN DISEND DISPATCH AND ENDIO EXTRN SETIME SET TIME BEFORE TIME-OUT EXTRN SAVE8 SAVE REGISTERS A1-A8 ON STACK EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER EXTRN DWTECB ECB ADDRESS EXTRN DWTOR DWT INDEX AND ORDER EXTRN DWTA3 SAVE AREA A3 EXTRN DWTA4 SAVE AREA A4 EXTRN DWTA5 SAVE AREA A5 EXTRN DWTSB1 STACK BASE 1 IN DWT EXTRN DWTSB2 STACK BASE 2 IN DWT EXTRN DWTTP TIMER POINTER EXTRN INTSAV SAVE AREA LAST INTRRUPT EJECT * * ******************** * I/O-INSTRUCTIONS ******************** * * TWSTRT EQU /42C0 CIO-START TWHLT EQU /4280 CIO-HALT TWINR EQU /4A00 INPUT TWOTR EQU /4200 OUTPUT TWSST EQU /4AC0 SENSE STATUS * * EJECT * * ************* * CONSTANTS * ************* * * CR EQU /0D CARRIAGE RETURN LF EQU /0A LINE FEED LNGERR EQU /8 INCORRECT LENGTH TPERR EQU /2 THROUGHPUT ERROR TIME EQU 300 TIME BEFORE TIME-OUT * * ************************ * CONDITIONAL ASSEMBLY* ************************ * * X:A EQU 0 X:B EQU 0 X:C EQU 60 X:D EQU 10 X:E EQU 6 TIMOUT EQU X:A POWUP EQU X:B DVBLEN EQU X:C DVBKTB EQU X:D DEVIND EQU X:E CREDIT EQU 0 * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 1 * EJECT * * ********************* * DWT-DISPLACEMENTS * ********************* * * DWTDRD EQU /10 START OF DRIVER DEFINED PART * IFT MMUPAG=0 START EQU DWTDRD XIF * IFT MMUPAG=1 START EQU DWTDRD+4 XIF * DWTHP EQU START+/18 TWCLR EQU START+/15 TWEOF EQU START+/16 TWBSP EQU START+/14 DWTA2 EQU START+/1A DATA DVBKTB+DVBKTB MMU KEY TABLE SIZE DATA DVBLEN+DVBLEN MMU BUFFER SIZE DATA DEVIND DEVICE INDEX TWAD EQU * DATA TWA ACTIVATION PART DATA 0 ABORT ROUTINE ADDRESS EJECT * * * ACTIVATION PART: CHECK VALIDITY OF ORDERS * * TWA EQU * LDK A3,0 LD A2,4,A8 GET REQUESTED LENGTH ABL(Z) IHTW50 REQUESTED LENGTH =0 * * LDR A2,A7 COPY ORDER RF(NP) TWAERR REQUEST ERROR SUK A2,4 RF(Z) TWAERR REQUEST ERROR RF(N) TWAIN INPUT REQUEST SUK A2,2 RF(NP) TWAOUT OUTPUT REQUEST * * TWAERR ABL DISIOE REQUEST ERROR EJECT * * TWAIN EQU * IFT TIMOUT=1 LD A2,DWTTP,A6 GET TIMER POINTER RF(Z) TWA010 NO TIMING ON THIS DEVICE LDR A1,A6 SAVE DWT-ADDRESS CF A15,SETIME DATA TWTUT,TIME ST A4,DWTTP,A6 SAVE TIMER BLOCK-ADDRESS XIF TWA010 EQU * IFT POWUP=1 LD A2,DWTST,A6 GET DWT-STATUS ANKL A2,/200 RF(Z) TWA020 NOT FIRST READ AFTER POEWR UP XRS A2,DWTST,A6 RESET POINTER LDKL A2,-2 ST A2,10,A8 INDICATE POWER UP ABL IHTW35 PERFORM ENDIO XIF TWA020 LDK A2,/21 * * READ CF A5,STRTIO EXECUTE CIO-START RF RED030 RED020 CF A5,STREG SAVE REGISTERS EJECT * * RETURN AFTER INTERRUPT * * RED030 EQU * IFT TIMOUT=1 LDR A1,A1 RF(NZ) RED037 XIF SUK A7,1 RF(P) RED050 ORDERS 02/03 * * RED035 CF A5,STORE STORE CHARACTER IN BUFFER CW A3,4,A8 RB(L) RED020 GET NEXT CHARACTER LDR A7,A7 RF(Z) RED040 BASIC READ * * LDK A1,LNGERR OVERFLOW RED037 ORS A1,8,A8 SET RETURN CODE * * EJECT RED040 EQU * IFT TIMOUT=1 LD A7,DWTOR,A6 GET ORDER ANK A7,/FF MASK ORDER CWK A7,4 RF(G) RED045 WRITE ORDER LD A4,DWTTP,A6 TIMER POINTER RF(Z) RED045 NO TIMIMG ON THIS DEVICE CM* DWTTP,A6 RESET TIMER XIF RED045 EQU * CF A5,HLTIO EXECUTE CIO-HALT ABL IHTW40 PERFORM TENDIO EJECT * * * * ORDERS 02,03 * * RED050 EQU * LD A1,10,A8 GET CONTROL WORD RF(Z) RED080 NO KEYTABLE LCR A4,A1 GET NUMBER OF KEYS ANK A4,/FF ADR A1,A4 ADDRESS TO LAST KEY ADK A1,1 RED060 SUK A4,1 RF(N) RED080 KEY NOT IN KEYTABLE SUK A1,1 DECREMENT ADDRESS CCR A2,A1 CHECK IF IN KEYTABLE RB(NE) RED060 NOT IN KEYTABLE ADR A4,A4 DOUBLE INDEX ST A4,10,A8 STORE INDEX IN CONTROL WORD RED070 CF A5,STORE STORE KEY IN KEYTABLE RB RED040 EXECUTE CIO-HALT RED080 CC A2,TWEOF,A6 RB(E) RED070 STANDARD EOR-KEY CC A2,TWBSP,A6 RF(E) RED110 BACKSPACE CC A2,TWCLR,A6 RF(E) RED110 CLEAR EJECT * * * CHARACTER NOT FOUND IN KEYTABLE * * * RED090 LDR A4,A2 COPY CHARACTER ANK A4,/FF MASK LDR A1,A7 SUK A1,1 RF(Z) RED100 ORDER 02 SUK A4,/30 ORDER 03 RF(N) CODERR LESS THAN /30 SUK A4,/9 RF(P) CODERR GREATER THAN /39 RF RED110 * * RED100 SUK A4,/20 RF(N) CODERR LESS THAN /20 SUK A4,/3F RF(NP) RED110 CORRECT CHARACTER * * CODERR LDK A1,4 CODE CHECK ERROR ORS A1,8,A8 CF A5,STORE STORE CHARACTER IN ECB-BUFFER RB RED040 EXECUTE CIO-HALT * * EJECT * * * RED110 CC A2,TWBSP,A6 RF(E) RED120 BACKSPACE CC A2,TWCLR,A6 RB(NE) RED035 * * LDK A3,0 CLEAR ECB-BUFFER RB RED020 GET NEXT CHARACTER * * RED120 SUK A3,1 BACKSPACE RB(NN) RED020 GET NEXT CHARACTER ADK A3,1 RB RED020 GET NEXT CHARACTER * * * EJECT * * * W R I T E * * ORDERS 05 AND 06: BASIC AND STANDARD WRITE * * WRITE EQU * TWAOUT EQU * INH LDK A4,0 LDK A2,0 CF A5,STRTIO EXECUTE CIO-START * * CWK A7,5 RF(Z) WRT050 ORDER 05 * * LD A3,2,A8 GET BUFFER ADDRESS LC A3,1,A3 CONTROL CHARACTER ANK A3,/FF SUK A3,/2B RF(Z) WRT030 NO CR OR LF * * ST A4,DWTHP,A6 HEAD POSITION INDICATOR LDK A4,2 LDK A2,CR SEND CARRIAGE RETURN EJECT * * * WRT010 CF A5,OTR SEND CHARACTER * * SUK A4,1 RF(NP) WRT020 WRT015 LDK A2,LF SEND LF RB WRT010 * WRT020 SUK A3,5 RB(Z) WRT015 SEND SECOND LF SUK A3,1 RF(NZ) WRT030 LDK A2,/0C SEND FORM FEED RB WRT010 WRT030 LDK A3,2 BUFFER POINTER RF WRT050 GET CHARACTER * * * WRT040 EQU * CF A5,OTR SEND CHARACTER IM DWTST,A6 INCREMENT BYTE COUNTER EJECT * * * WRT050 CF A5,GETCHR GET CHARACTER FROM ECB-BUFFER LDR A1,A1 RB(Z) RED040 LAST CHARACTER CWK A7,5 RB(Z) WRT040 BASIC WRITE * * LDR A1,A2 ORDER 06: STANDARD WRITE ANK A1,/FF SUK A1,/07 RB(Z) WRT040 BELL * SUK A1,/A RF(E) WRTTAB TABULATION * SUK A1,/F RF(L) ERRCOD LESS THAN /20 SUK A1,/3F RB(NP) WRT040 BETWEEN /20-/5F SUK A1,/20 RF(NP) WRT060 BETWEEN /60-/7F * * ERRCOD LDK A1,4 ORS A1,8,A8 RB WRT050 GET NEXT CHARACTER * * WRT060 SUK A2,/20 RB WRT040 * * EJECT * * * T A B U L A T I O N * * WRTTAB EQU * CF A5,GETCHR GET FIRST TAB.POSITION CHARACTER LDR A4,A2 COPY CF A5,GETCHR GET SECOND TAB. POSITION CHARACTER ANK A2,/F ANK A4,/F RF(Z) TAB020 TAB010 ADK A2,/A SUK A4,1 RB(NZ) TAB010 * TAB020 SU A2,DWTHP,A6 LC A4,DWTBC,A6 GET NUMBER OF OUTPUT CHARACTERS SUR A2,A4 NUMBER OF SPACES TO BE SENT RB(NP) WRT050 NO SPACES SHOULD BE SENT LDR A4,A2 TAB030 LDK A2,/20 SEND BALNKS TAB040 CF A5,OTR SEND CHARACTER IM DWTST,A6 INCREMENT BYTE COUNTER SUK A4,1 RB(NZ) TAB030 SEND ANOTHER SPACE LDR A3,A3 RB(NZ) WRT050 NOT RECOVERY SC A4,DWTBC,A6 RESET BYTE COUNTER LDK A3,2 PRESET BUFFER INDEX RB WRT050 GET NEXT CHARACTER EJECT * * * RECOVERY ROUTINE * * * TWON EQU * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * LDKL A6,DWTW01 GET DWT-ADDRESS IFT POWUP=1 LDKL A1,/200 ORS A1,DWTST,A6 INDICATE POWER UP XIF LD A1,DWTST,A6 RF(N) EXIT DEVICE NOT BUSY TWON10 LD A3,DWTA3,A6 LD A7,DWTOR,A6 GET ORDER ANK A7,/FF LD A8,DWTECB,A6 ECB-ADDRESS LDKL A5,DWTSB2 ADR A5,A6 GET STACK BASE SUK A7,4 ABL(N) TWA010 ORDERS 01,02,03 SUK A7,1 RF(Z) TWON20 ORDER 05 INH LDK A2,0 CF A5,STRTIO EXECUTE CIO-START LDK A2,CR LDK A3,0 LD A4,DWTHP,A6 ADK A4,1 RB TAB040 REPRINT LAST REQUEST * TWON20 LDK A1,TPERR ORDER 05 ABL DISEND * * EJECT * * * I H T W * * INTERRUPT HANDLER: PROCESS OF INTERRUPT * * IHTW EQU * ST P,INTSAV SAVE LAST INTERRUPT IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * LDKL A6,DWTW01 LDREG EQU * LD A3,DWTST,A6 RF(N) SKIP DEVICE NOT BUSY IHTW10 LDR* A2,A6 GET DEVICE ADDRESS ORKL A2,TWSST EXR A2 EXECUTE SST RF(A) IHTW30 ENDIO LD A7,DWTOR,A6 GET ORDER ANK A7,/FF SUK A7,4 RF(P) IHTW30 LDR* A2,A6 GET DEVICE ADDRESS ORKL A2,TWINR EXR A2 EXECUTE INR ANK A2,/7F MASK INPUT-CHARACTER EJECT * IFT TIMOUT=1 LD A1,DWTTP,A6 GET TIMER POINTER RF(Z) IHTW30 NO TIMING ON THIS DEVICE LDKL A1,-TIME ST* A1,DWTTP,A6 XIF * * IHTW30 LDK A1,0 RF LDREGE RESTORE REGISTERS IHTW35 EQU * IFT POWUP+TIMOUT=2 LD A1,DWTTP,A6 TIMER POINTER RF(Z) IHTW40 NO TIMING ON THIS DEVICE CM* DWTTP,A6 RESET TIMER XIF EJECT * * IHTW40 EQU * * * IHTW50 ST A3,6,A8 SAVE EFFECTIVE LENGTH IHTW55 SUK A7,4 RF(NP) IHTW60 READ ORDER * * LC A3,DWTBC,A6 GET BYTE COUNTER ADS A3,DWTHP,A6 UPDATE HEAD POSITION LDK A3,0 SC A3,DWTBC,A6 CLEAR BYTE COUNTER * IHTW60 EQU * IFT CREDIT=1 LD A1,10,A8 CONVERT INDEX ADK A1,2 SRL A1,1 ST A1,10,A8 XIF LDK A1,0 ABL DISEND PERFORM TENDIO * * SKIP LDR* A2,A6 ORKL A2,TWSST EXR A2 SST RF(A) EXIT LDR* A2,A6 ORKL A2,TWHLT EXR A2 CIO HALT RF EXIT EJECT * * * * I/O COMMANDS * * STRTIO LDKL A1,TWSTRT EXECUTE CIO-START RF EXECIO HLTIO LDKL A1,TWHLT CIO-HALT RF EXECIO OTR LDKL A1,TWOTR OTR * * EXECIO ORR* A1,A6 GET I/O-COMMAND EXR A1 EXECUTE COMMAND RF(NA) HALT STREG EQU * LDKL A1,/100 ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED ST A3,DWTA3,A6 SAVE REGISTER A3 ST A4,DWTA4,A6 A4 ST A5,DWTA5,A6 A5 EXIT ABL TDISP HALT ST A2,DWTA2,A6 CF A5,HLTIO EXECUTE CIO-HALT LD A2,DWTA2,A6 RB STRTIO RESTART REQUEST * * EJECT * * * * STORE CHARACTER IN ECB-BUFFER * * STORE LD A4,2,A8 GET BUFFER ADDRESS ADR A4,A3 GET CHARACTER ADDRESS SCR A2,A4 STORE CHARACTER ADK A3,1 INCREMENT BUFFER INDEX RTN A5 * * * IFT TIMOUT=1 * * * TIMOUT ROUTINE * * TWTUT EQU * LDR A6,A1 GET DWT-ADDRESS LDK A1,/40 TIME OUT RETURN CODE XIF * * EJECT * * * L D R E G E * * RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5 * * LDREGE EQU * LD A3,DWTA3,A6 RELOAD REGISTER A3 LD A4,DWTA4,A6 A4 LD A5,DWTA5,A6 A5 LD A7,DWTOR,A6 ANK A7,/FF LD A8,DWTECB,A6 RTN A5 RETURN VIA A5-STACK EJECT * * * G E T C H R * * SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER * * ON ENTRY: * * A3 = BUFFER INDEX * A8 = ECB-ADDRESS * * ON EXIT: * * A2 = CHARACTER * A1 = 0 IF LAST CHARACTER ELSE # 0 * * IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH * * GETCHR EQU * LD A1,4,A8 REQUESTED LENGTH SUR A1,A3 RF(NP) GCH010 LAST CHARACTER REACHED LD A1,2,A8 GET BUFFER ADDRESS ADR A1,A3 LCR A2,A1 CHAR. TO A2 ANK A2,/FF ADK A3,1 INCREMENT BUFFER INDEX RTN A5 GCH010 ST A3,6,A8 STORE EFFECTIVE LENGTH RTN A5 EJECT * * DEVICE WORK TABLE FOR TYPEWRITER * * DWTW01 EQU * TABLE ENTRY DATA /0010 CHANNEL PARAMETER DATA /8000 STATUS./8000 MEANS DEVICE READY DATA 0 ECB ADDRESS DATA 0 ORDER DATA TWAD POINTER TO ADDRESS BLOCK DATA 0 TTAB-ADDRESS DATA 0 WAIT/ACTIVATE INDICATOR DATA 0 TERMINAL QUEUE IFT MMUPAG=1 DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADDRESS XIF DATA 0 OUTPUT QUEUE LINK DATA 0 SAVE AREA FOR A3 DATA 0 SAVE AREA FOR A4 DATA 0 SAVE AREA FOR A5 RES 4 STACK BASE DATA 1 TIMER POINTER DATA 0 ECHO DEVICE DATA /5F5E LEFT BYTE BACKSPACE KEY RIGHT BYTE CANCEL KEY DATA /0D00 LEFT BYTE STANDARD EOR RIGHT BYTE DOUBLE ZERO DATA 0 HEAD POSITION POINETR DATA 0 SAVE AREA FOR A2 * EJECT DRTW01 * * IFT MMUPAG=1 DEVECB EQU * DATA 0 DATA TW:BUF DATA 0,0,0,0 RES DVBKTB+1 TW:BUF RES DVBLEN+1 XIF * * * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRTW01 REL 9.2 79-11-16 870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0046 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0042}
0x0046…004e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x004a}
0x004e…0056 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0052}
0x0056…0090 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x005a}
0x0090…009a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0094}
0x009a…00c2 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTE PTS «, t00=0x0000, t01=0x009e}
0x00c2…00cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c6}
0x00cc…00fc Head {h00=0x002c, h01=0x0050, text=»* DRTW01 = DRIVER TYPEWRITER PTS 6862 «, t00=0x0000, t01=0x00d0}
0x00fc…0106 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0100}
0x0106…0110 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010a}
0x0110…011a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0114}
0x011a…0124 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011e}
0x0124…012e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0128}
0x012e…0138 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0132}
0x0138…0172 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x013c}
0x0172…017c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0176}
0x017c…01bc Head {h00=0x003c, h01=0x0050, text=»* THIS DRIVER HANDLES INPUT AND OUTPUT TO TYPEWRITERS «, t00=0x0000, t01=0x0180}
0x01bc…01d0 Head {h00=0x0010, h01=0x0050, text=»* PTS 6862«, t00=0x0001, t01=0x0030}
0x01d0…01da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0044}
0x01da…01e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x004e}
0x01e4…01f2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0058}
0x01f2…01fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0066}
0x01fc…0206 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0070}
0x0206…021a Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x007a}
0x021a…022e Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x008e}
0x022e…0242 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x00a2}
0x0242…024c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b6}
0x024c…026e Head {h00=0x001e, h01=0x0050, text=» ENTRY TWAD ADDRESS BLOCK «, t00=0x0001, t01=0x00c0}
0x026e…0282 Head {h00=0x0010, h01=0x0050, text=» ENTRY IHTW «, t00=0x0001, t01=0x00e2}
0x0282…0296 Head {h00=0x0010, h01=0x0050, text=» ENTRY TWON «, t00=0x0001, t01=0x00f6}
0x0296…02ac Head {h00=0x0012, h01=0x0050, text=» ENTRY DWTW01 «, t00=0x0001, t01=0x010a}
0x02ac…02b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0120}
0x02b6…02cc Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0001, t01=0x012a}
0x02cc…02e2 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0001, t01=0x0140}
0x02e2…02f8 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0001, t01=0x0156}
0x02f8…0302 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x016c}
0x0302…0326 Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0001, t01=0x0176}
0x0326…0344 Head {h00=0x001a, h01=0x0050, text=» EXTRN TDISP DISPATCH «, t00=0x0002, t01=0x000a}
0x0344…036c Head {h00=0x0024, h01=0x0050, text=» EXTRN DISEND DISPATCH AND ENDIO«, t00=0x0002, t01=0x0028}
0x036c…039a Head {h00=0x002a, h01=0x0050, text=» EXTRN SETIME SET TIME BEFORE TIME-OUT«, t00=0x0002, t01=0x0050}
0x039a…03cc Head {h00=0x002e, h01=0x0050, text=» EXTRN SAVE8 SAVE REGISTERS A1-A8 ON STACK«, t00=0x0002, t01=0x007e}
0x03cc…03e8 Head {h00=0x0018, h01=0x0013, text=» EXTRN DWTST STATUS «, t00=0x0002, t01=0x00b0}
0x03e8…040a Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTBC BYTE COUNTER «, t00=0x0002, t01=0x00cc}
0x040a…042c Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTECB ECB ADDRESS «, t00=0x0002, t01=0x00ee}
0x042c…0454 Head {h00=0x0024, h01=0x0020, text=» EXTRN DWTOR DWT INDEX AND ORDER«, t00=0x0002, t01=0x0110}
0x0454…0476 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA3 SAVE AREA A3 «, t00=0x0002, t01=0x0138}
0x0476…0498 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA4 SAVE AREA A4 «, t00=0x0002, t01=0x015a}
0x0498…04ba Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA5 SAVE AREA A5 «, t00=0x0002, t01=0x017c}
0x04ba…04e4 Head {h00=0x0026, h01=0x0021, text=» EXTRN DWTSB1 STACK BASE 1 IN DWT «, t00=0x0003, t01=0x000e}
0x04e4…050e Head {h00=0x0026, h01=0x0021, text=» EXTRN DWTSB2 STACK BASE 2 IN DWT «, t00=0x0003, t01=0x0038}
0x050e…0530 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTP TIMER POINTER«, t00=0x0003, t01=0x0062}
0x0530…055e Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTRRUPT «, t00=0x0003, t01=0x0084}
0x055e…056c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x00b2}
0x056c…0576 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00c0}
0x0576…0580 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ca}
0x0580…059c Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0003, t01=0x00d4}
0x059c…05b6 Head {h00=0x0016, h01=0x0050, text=»* I/O-INSTRUCTIONS«, t00=0x0003, t01=0x00f0}
0x05b6…05d2 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0003, t01=0x010a}
0x05d2…05dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0126}
0x05dc…05e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0130}
0x05e6…0608 Head {h00=0x001e, h01=0x0050, text=»TWSTRT EQU /42C0 CIO-START«, t00=0x0003, t01=0x013a}
0x0608…0628 Head {h00=0x001c, h01=0x0050, text=»TWHLT EQU /4280 CIO-HALT«, t00=0x0003, t01=0x015c}
0x0628…0646 Head {h00=0x001a, h01=0x0050, text=»TWINR EQU /4A00 INPUT «, t00=0x0003, t01=0x017c}
0x0646…0664 Head {h00=0x001a, h01=0x0050, text=»TWOTR EQU /4200 OUTPUT«, t00=0x0004, t01=0x000a}
0x0664…0688 Head {h00=0x0020, h01=0x0050, text=»TWSST EQU /4AC0 SENSE STATUS«, t00=0x0004, t01=0x0028}
0x0688…0692 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x004c}
0x0692…069c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0056}
0x069c…06aa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0060}
0x06aa…06b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006e}
0x06b4…06be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0078}
0x06be…06d4 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x0082}
0x06d4…06ea Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0004, t01=0x0098}
0x06ea…0700 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x00ae}
0x0700…070a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00c4}
0x070a…0714 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00ce}
0x0714…0736 Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x0004, t01=0x00d8}
0x0736…0752 Head {h00=0x0018, h01=0x0050, text=»LF EQU /0A LINE FEED«, t00=0x0004, t01=0x00fa}
0x0752…0778 Head {h00=0x0022, h01=0x0050, text=»LNGERR EQU /8 INCORRECT LENGTH«, t00=0x0004, t01=0x0116}
0x0778…079e Head {h00=0x0022, h01=0x0050, text=»TPERR EQU /2 THROUGHPUT ERROR «, t00=0x0004, t01=0x013c}
0x079e…07c8 Head {h00=0x0026, h01=0x0050, text=»TIME EQU 300 TIME BEFORE TIME-OUT «, t00=0x0004, t01=0x0162}
0x07c8…07d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x018c}
0x07d2…07dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0008}
0x07dc…07fc Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0005, t01=0x0012}
0x07fc…081c Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY*«, t00=0x0005, t01=0x0032}
0x081c…083c Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0005, t01=0x0052}
0x083c…0846 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0072}
0x0846…0850 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x007c}
0x0850…0862 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0005, t01=0x0086}
0x0862…0874 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0005, t01=0x0098}
0x0874…0886 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 60«, t00=0x0005, t01=0x00aa}
0x0886…0898 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 10«, t00=0x0005, t01=0x00bc}
0x0898…08aa Head {h00=0x000e, h01=0x0050, text=»X:E EQU 6 «, t00=0x0005, t01=0x00ce}
0x08aa…08b2 Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x00e0}
0x08b2…08ca Head {h00=0x0014, h01=0x0050, text=»TIMOUT EQU X:A «, t00=0x0005, t01=0x00e8}
0x08ca…08e0 Head {h00=0x0012, h01=0x0050, text=»POWUP EQU X:B «, t00=0x0005, t01=0x0100}
0x08e0…08f6 Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:C«, t00=0x0005, t01=0x0116}
0x08f6…090c Head {h00=0x0012, h01=0x0050, text=»DVBKTB EQU X:D«, t00=0x0005, t01=0x012c}
0x090c…0922 Head {h00=0x0012, h01=0x0050, text=»DEVIND EQU X:E«, t00=0x0005, t01=0x0142}
0x0922…092a Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x0158}
0x092a…093e Head {h00=0x0010, h01=0x0050, text=»CREDIT EQU 0«, t00=0x0005, t01=0x0160}
0x093e…0948 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0174}
0x0948…097a Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0005, t01=0x017e}
0x097a…09a8 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0006, t01=0x0020}
0x09a8…09b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x004e}
0x09b2…09c6 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0006, t01=0x0058}
0x09c6…09d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x006c}
0x09d0…09da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0076}
0x09da…0a14 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0006, t01=0x0080}
0x0a14…0a46 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0006, t01=0x00ba}
0x0a46…0a50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ec}
0x0a50…0a64 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0006, t01=0x00f6}
0x0a64…0a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x010a}
0x0a6e…0a7c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0114}
0x0a7c…0a86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0122}
0x0a86…0a90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x012c}
0x0a90…0aae Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0006, t01=0x0136}
0x0aae…0acc Head {h00=0x001a, h01=0x0050, text=»* DWT-DISPLACEMENTS * «, t00=0x0006, t01=0x0154}
0x0acc…0aea Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0006, t01=0x0172}
0x0aea…0af4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0190}
0x0af4…0afe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000a}
0x0afe…0b32 Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x0007, t01=0x0014}
0x0b32…0b3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0048}
0x0b3c…0b52 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0007, t01=0x0052}
0x0b52…0b6a Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0007, t01=0x0068}
0x0b6a…0b76 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x0080}
0x0b76…0b80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x008c}
0x0b80…0b96 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0007, t01=0x0096}
0x0b96…0bb0 Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0007, t01=0x00ac}
0x0bb0…0bbc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x00c6}
0x0bbc…0bc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00d2}
0x0bc6…0be2 Head {h00=0x0018, h01=0x0050, text=»DWTHP EQU START+/18 «, t00=0x0007, t01=0x00dc}
0x0be2…0bfe Head {h00=0x0018, h01=0x0050, text=»TWCLR EQU START+/15 «, t00=0x0007, t01=0x00f8}
0x0bfe…0c1a Head {h00=0x0018, h01=0x0050, text=»TWEOF EQU START+/16 «, t00=0x0007, t01=0x0114}
0x0c1a…0c36 Head {h00=0x0018, h01=0x0050, text=»TWBSP EQU START+/14 «, t00=0x0007, t01=0x0130}
0x0c36…0c52 Head {h00=0x0018, h01=0x0050, text=»DWTA2 EQU START+/1A «, t00=0x0007, t01=0x014c}
0x0c52…0c80 Head {h00=0x002a, h01=0x0050, text=» DATA DVBKTB+DVBKTB MMU KEY TABLE SIZE«, t00=0x0007, t01=0x0168}
0x0c80…0cac Head {h00=0x0028, h01=0x0050, text=» DATA DVBLEN+DVBLEN MMU BUFFER SIZE «, t00=0x0008, t01=0x0008}
0x0cac…0cce Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0008, t01=0x0034}
0x0cce…0ce0 Head {h00=0x000e, h01=0x0050, text=»TWAD EQU *«, t00=0x0008, t01=0x0056}
0x0ce0…0d02 Head {h00=0x001e, h01=0x0050, text=» DATA TWA ACTIVATION PART «, t00=0x0008, t01=0x0068}
0x0d02…0d28 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0008, t01=0x008a}
0x0d28…0d36 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x00b0}
0x0d36…0d40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00be}
0x0d40…0d4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00c8}
0x0d4a…0d80 Head {h00=0x0032, h01=0x0050, text=»* ACTIVATION PART: CHECK VALIDITY OF ORDERS «, t00=0x0008, t01=0x00d2}
0x0d80…0d8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0108}
0x0d8a…0d94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0112}
0x0d94…0da6 Head {h00=0x000e, h01=0x0050, text=»TWA EQU * «, t00=0x0008, t01=0x011c}
0x0da6…0db8 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0008, t01=0x012e}
0x0db8…0de0 Head {h00=0x0024, h01=0x0050, text=» LD A2,4,A8 GET REQUESTED LENGTH«, t00=0x0008, t01=0x0140}
0x0de0…0e0a Head {h00=0x0026, h01=0x0050, text=» ABL(Z) IHTW50 REQUESTED LENGTH =0«, t00=0x0008, t01=0x0168}
0x0e0a…0e14 (9, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0004}
0x0e14…0e1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x000e}
0x0e1e…0e3c Head {h00=0x001a, h01=0x0050, text=» LDR A2,A7 COPY ORDER «, t00=0x0009, t01=0x0018}
0x0e3c…0e60 Head {h00=0x0020, h01=0x0050, text=» RF(NP) TWAERR REQUEST ERROR«, t00=0x0009, t01=0x0036}
0x0e60…0e72 Head {h00=0x000e, h01=0x0050, text=» SUK A2,4 «, t00=0x0009, t01=0x005a}
0x0e72…0e96 Head {h00=0x0020, h01=0x0050, text=» RF(Z) TWAERR REQUEST ERROR «, t00=0x0009, t01=0x006c}
0x0e96…0eb8 Head {h00=0x001e, h01=0x0050, text=» RF(N) TWAIN INPUT REQUEST«, t00=0x0009, t01=0x0090}
0x0eb8…0eca Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0009, t01=0x00b2}
0x0eca…0ef0 Head {h00=0x0022, h01=0x0050, text=» RF(NP) TWAOUT OUTPUT REQUEST «, t00=0x0009, t01=0x00c4}
0x0ef0…0efa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ea}
0x0efa…0f04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00f4}
0x0f04…0f2c Head {h00=0x0024, h01=0x0050, text=»TWAERR ABL DISIOE REQUEST ERROR «, t00=0x0009, t01=0x00fe}
0x0f2c…0f3a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0126}
0x0f3a…0f44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0134}
0x0f44…0f4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x013e}
0x0f4e…0f62 Head {h00=0x0010, h01=0x0050, text=»TWAIN EQU * «, t00=0x0009, t01=0x0148}
0x0f62…0f78 Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x0009, t01=0x015c}
0x0f78…0fa2 Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0009, t01=0x0172}
0x0fa2…0fd0 Head {h00=0x002a, h01=0x0050, text=» RF(Z) TWA010 NO TIMING ON THIS DEVICE«, t00=0x000a, t01=0x000c}
0x0fd0…0ff4 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A6 SAVE DWT-ADDRESS «, t00=0x000a, t01=0x003a}
0x0ff4…100a Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x000a, t01=0x005e}
0x100a…1022 Head {h00=0x0014, h01=0x0050, text=» DATA TWTUT,TIME«, t00=0x000a, t01=0x0074}
0x1022…1052 Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTTP,A6 SAVE TIMER BLOCK-ADDRESS«, t00=0x000a, t01=0x008c}
0x1052…105e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000a, t01=0x00bc}
0x105e…1072 Head {h00=0x0010, h01=0x0050, text=»TWA010 EQU *«, t00=0x000a, t01=0x00c8}
0x1072…1086 Head {h00=0x0010, h01=0x0050, text=» IFT POWUP=1«, t00=0x000a, t01=0x00dc}
0x1086…10ac Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 GET DWT-STATUS«, t00=0x000a, t01=0x00f0}
0x10ac…10c2 Head {h00=0x0012, h01=0x0050, text=» ANKL A2,/200 «, t00=0x000a, t01=0x0116}
0x10c2…10f6 Head {h00=0x0030, h01=0x0050, text=» RF(Z) TWA020 NOT FIRST READ AFTER POEWR UP «, t00=0x000a, t01=0x012c}
0x10f6…111c Head {h00=0x0022, h01=0x0050, text=» XRS A2,DWTST,A6 RESET POINTER«, t00=0x000a, t01=0x0160}
0x111c…1130 Head {h00=0x0010, h01=0x0050, text=» LDKL A2,-2 «, t00=0x000a, t01=0x0186}
0x1130…1156 Head {h00=0x0022, h01=0x0050, text=» ST A2,10,A8 INDICATE POWER UP«, t00=0x000b, t01=0x000a}
0x1156…1178 Head {h00=0x001e, h01=0x0050, text=» ABL IHTW35 PERFORM ENDIO «, t00=0x000b, t01=0x0030}
0x1178…1184 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0052}
0x1184…119e Head {h00=0x0016, h01=0x0050, text=»TWA020 LDK A2,/21 «, t00=0x000b, t01=0x005e}
0x119e…11a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0078}
0x11a8…11b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0082}
0x11b2…11de Head {h00=0x0028, h01=0x0050, text=»READ CF A5,STRTIO EXECUTE CIO-START «, t00=0x000b, t01=0x008c}
0x11de…11f0 Head {h00=0x000e, h01=0x0050, text=» RF RED030«, t00=0x000b, t01=0x00b8}
0x11f0…121a Head {h00=0x0026, h01=0x0050, text=»RED020 CF A5,STREG SAVE REGISTERS «, t00=0x000b, t01=0x00ca}
0x121a…1228 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x00f4}
0x1228…1232 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0102}
0x1232…1254 Head {h00=0x001e, h01=0x0050, text=»* RETURN AFTER INTERRUPT«, t00=0x000b, t01=0x010c}
0x1254…125e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x012e}
0x125e…1268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0138}
0x1268…127c Head {h00=0x0010, h01=0x0050, text=»RED030 EQU *«, t00=0x000b, t01=0x0142}
0x127c…1292 Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x000b, t01=0x0156}
0x1292…12a4 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x000b, t01=0x016c}
0x12a4…12ba Head {h00=0x0012, h01=0x0050, text=» RF(NZ) RED037«, t00=0x000b, t01=0x017e}
0x12ba…12c6 (12, 0, 398) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0004}
0x12c6…12d8 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x000c, t01=0x0010}
0x12d8…12fa Head {h00=0x001e, h01=0x0050, text=» RF(P) RED050 ORDERS 02/03«, t00=0x000c, t01=0x0022}
0x12fa…1304 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0044}
0x1304…130e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x004e}
0x130e…1342 Head {h00=0x0030, h01=0x0050, text=»RED035 CF A5,STORE STORE CHARACTER IN BUFFER«, t00=0x000c, t01=0x0058}
0x1342…1356 Head {h00=0x0010, h01=0x0050, text=» CW A3,4,A8 «, t00=0x000c, t01=0x008c}
0x1356…137e Head {h00=0x0024, h01=0x0050, text=» RB(L) RED020 GET NEXT CHARACTER«, t00=0x000c, t01=0x00a0}
0x137e…1390 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A7«, t00=0x000c, t01=0x00c8}
0x1390…13b0 Head {h00=0x001c, h01=0x0050, text=» RF(Z) RED040 BASIC READ«, t00=0x000c, t01=0x00da}
0x13b0…13ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00fa}
0x13ba…13c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0104}
0x13c4…13e4 Head {h00=0x001c, h01=0x0050, text=» LDK A1,LNGERR OVERFLOW «, t00=0x000c, t01=0x010e}
0x13e4…140e Head {h00=0x0026, h01=0x0050, text=»RED037 ORS A1,8,A8 SET RETURN CODE«, t00=0x000c, t01=0x012e}
0x140e…1418 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0158}
0x1418…1422 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0162}
0x1422…1430 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x016c}
0x1430…1438 Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x017a}
0x1438…144c Head {h00=0x0010, h01=0x0050, text=»RED040 EQU *«, t00=0x000c, t01=0x0182}
0x144c…1454 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0008}
0x1454…146a Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x000d, t01=0x0010}
0x146a…148c Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x000d, t01=0x0026}
0x148c…14aa Head {h00=0x001a, h01=0x0050, text=» ANK A7,/FF MASK ORDER«, t00=0x000d, t01=0x0048}
0x14aa…14bc Head {h00=0x000e, h01=0x0050, text=» CWK A7,4 «, t00=0x000d, t01=0x0066}
0x14bc…14de Head {h00=0x001e, h01=0x0050, text=» RF(G) RED045 WRITE ORDER «, t00=0x000d, t01=0x0078}
0x14de…1504 Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTTP,A6 TIMER POINTER «, t00=0x000d, t01=0x009a}
0x1504…1532 Head {h00=0x002a, h01=0x0050, text=» RF(Z) RED045 NO TIMIMG ON THIS DEVICE«, t00=0x000d, t01=0x00c0}
0x1532…1554 Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x000d, t01=0x00ee}
0x1554…1560 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0110}
0x1560…1568 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x011c}
0x1568…157c Head {h00=0x0010, h01=0x0050, text=»RED045 EQU *«, t00=0x000d, t01=0x0124}
0x157c…15a2 Head {h00=0x0022, h01=0x0050, text=» CF A5,HLTIO EXECUTE CIO-HALT «, t00=0x000d, t01=0x0138}
0x15a2…15c4 Head {h00=0x001e, h01=0x0050, text=» ABL IHTW40 PERFORM TENDIO«, t00=0x000d, t01=0x015e}
0x15c4…15d2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0180}
0x15d2…15dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x018e}
0x15dc…15e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0008}
0x15e6…15f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0012}
0x15f0…1608 Head {h00=0x0014, h01=0x0050, text=»* ORDERS 02,03«, t00=0x000e, t01=0x001c}
0x1608…1612 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0034}
0x1612…161c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003e}
0x161c…1630 Head {h00=0x0010, h01=0x0050, text=»RED050 EQU *«, t00=0x000e, t01=0x0048}
0x1630…1656 Head {h00=0x0022, h01=0x0050, text=» LD A1,10,A8 GET CONTROL WORD «, t00=0x000e, t01=0x005c}
0x1656…1678 Head {h00=0x001e, h01=0x0050, text=» RF(Z) RED080 NO KEYTABLE «, t00=0x000e, t01=0x0082}
0x1678…169e Head {h00=0x0022, h01=0x0050, text=» LCR A4,A1 GET NUMBER OF KEYS «, t00=0x000e, t01=0x00a4}
0x169e…16b2 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x000e, t01=0x00ca}
0x16b2…16d8 Head {h00=0x0022, h01=0x0050, text=» ADR A1,A4 ADDRESS TO LAST KEY«, t00=0x000e, t01=0x00de}
0x16d8…16ea Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x000e, t01=0x0104}
0x16ea…1702 Head {h00=0x0014, h01=0x0050, text=»RED060 SUK A4,1 «, t00=0x000e, t01=0x0116}
0x1702…172c Head {h00=0x0026, h01=0x0050, text=» RF(N) RED080 KEY NOT IN KEYTABLE «, t00=0x000e, t01=0x012e}
0x172c…1750 Head {h00=0x0020, h01=0x0050, text=» SUK A1,1 DECREMENT ADDRESS «, t00=0x000e, t01=0x0158}
0x1750…1778 Head {h00=0x0024, h01=0x0050, text=» CCR A2,A1 CHECK IF IN KEYTABLE «, t00=0x000e, t01=0x017c}
0x1778…179e Head {h00=0x0022, h01=0x0050, text=» RB(NE) RED060 NOT IN KEYTABLE«, t00=0x000f, t01=0x0014}
0x179e…17be Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 DOUBLE INDEX «, t00=0x000f, t01=0x003a}
0x17be…17ee Head {h00=0x002c, h01=0x0050, text=» ST A4,10,A8 STORE INDEX IN CONTROL WORD«, t00=0x000f, t01=0x005a}
0x17ee…181e Head {h00=0x002c, h01=0x0050, text=»RED070 CF A5,STORE STORE KEY IN KEYTABLE«, t00=0x000f, t01=0x008a}
0x181e…1842 Head {h00=0x0020, h01=0x0050, text=» RB RED040 EXECUTE CIO-HALT «, t00=0x000f, t01=0x00ba}
0x1842…1860 Head {h00=0x001a, h01=0x0050, text=»RED080 CC A2,TWEOF,A6 «, t00=0x000f, t01=0x00de}
0x1860…1886 Head {h00=0x0022, h01=0x0050, text=» RB(E) RED070 STANDARD EOR-KEY«, t00=0x000f, t01=0x00fc}
0x1886…189e Head {h00=0x0014, h01=0x0050, text=» CC A2,TWBSP,A6 «, t00=0x000f, t01=0x0122}
0x189e…18be Head {h00=0x001c, h01=0x0050, text=» RF(E) RED110 BACKSPACE «, t00=0x000f, t01=0x013a}
0x18be…18d6 Head {h00=0x0014, h01=0x0050, text=» CC A2,TWCLR,A6 «, t00=0x000f, t01=0x015a}
0x18d6…18f2 Head {h00=0x0018, h01=0x0050, text=» RF(E) RED110 CLEAR «, t00=0x000f, t01=0x0172}
0x18f2…1900 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x018e}
0x1900…190a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x000c}
0x190a…1914 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0016}
0x1914…1940 Head {h00=0x0028, h01=0x0050, text=»* CHARACTER NOT FOUND IN KEYTABLE «, t00=0x0010, t01=0x0020}
0x1940…194a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x004c}
0x194a…1954 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0056}
0x1954…195e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0060}
0x195e…1986 Head {h00=0x0024, h01=0x0050, text=»RED090 LDR A4,A2 COPY CHARACTER «, t00=0x0010, t01=0x006a}
0x1986…199e Head {h00=0x0014, h01=0x0050, text=» ANK A4,/FF MASK«, t00=0x0010, t01=0x0092}
0x199e…19b0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0010, t01=0x00aa}
0x19b0…19c2 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0010, t01=0x00bc}
0x19c2…19e0 Head {h00=0x001a, h01=0x0050, text=» RF(Z) RED100 ORDER 02«, t00=0x0010, t01=0x00ce}
0x19e0…19fc Head {h00=0x0018, h01=0x0050, text=» SUK A4,/30 ORDER 03«, t00=0x0010, t01=0x00ec}
0x19fc…1a20 Head {h00=0x0020, h01=0x0050, text=» RF(N) CODERR LESS THAN /30 «, t00=0x0010, t01=0x0108}
0x1a20…1a32 Head {h00=0x000e, h01=0x0050, text=» SUK A4,/9«, t00=0x0010, t01=0x012c}
0x1a32…1a58 Head {h00=0x0022, h01=0x0050, text=» RF(P) CODERR GREATER THAN /39«, t00=0x0010, t01=0x013e}
0x1a58…1a6a Head {h00=0x000e, h01=0x0050, text=» RF RED110«, t00=0x0010, t01=0x0164}
0x1a6a…1a74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0176}
0x1a74…1a7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0180}
0x1a7e…1a98 Head {h00=0x0016, h01=0x0050, text=»RED100 SUK A4,/20 «, t00=0x0010, t01=0x018a}
0x1a98…1abc Head {h00=0x0020, h01=0x0050, text=» RF(N) CODERR LESS THAN /20 «, t00=0x0011, t01=0x0014}
0x1abc…1ad0 Head {h00=0x0010, h01=0x0050, text=» SUK A4,/3F «, t00=0x0011, t01=0x0038}
0x1ad0…1af8 Head {h00=0x0024, h01=0x0050, text=» RF(NP) RED110 CORRECT CHARACTER«, t00=0x0011, t01=0x004c}
0x1af8…1b02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0074}
0x1b02…1b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x007e}
0x1b0c…1b34 Head {h00=0x0024, h01=0x0050, text=»CODERR LDK A1,4 CODE CHECK ERROR«, t00=0x0011, t01=0x0088}
0x1b34…1b48 Head {h00=0x0010, h01=0x0050, text=» ORS A1,8,A8«, t00=0x0011, t01=0x00b0}
0x1b48…1b7a Head {h00=0x002e, h01=0x0050, text=» CF A5,STORE STORE CHARACTER IN ECB-BUFFER«, t00=0x0011, t01=0x00c4}
0x1b7a…1b9e Head {h00=0x0020, h01=0x0050, text=» RB RED040 EXECUTE CIO-HALT «, t00=0x0011, t01=0x00f6}
0x1b9e…1ba8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x011a}
0x1ba8…1bb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0124}
0x1bb2…1bc0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x012e}
0x1bc0…1bca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x013c}
0x1bca…1bd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0146}
0x1bd4…1bde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0150}
0x1bde…1bfc Head {h00=0x001a, h01=0x0050, text=»RED110 CC A2,TWBSP,A6 «, t00=0x0011, t01=0x015a}
0x1bfc…1c1c Head {h00=0x001c, h01=0x0050, text=» RF(E) RED120 BACKSPACE «, t00=0x0011, t01=0x0178}
0x1c1c…1c34 Head {h00=0x0014, h01=0x0050, text=» CC A2,TWCLR,A6 «, t00=0x0012, t01=0x0008}
0x1c34…1c4a Head {h00=0x0012, h01=0x0050, text=» RB(NE) RED035«, t00=0x0012, t01=0x0020}
0x1c4a…1c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0036}
0x1c54…1c5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0040}
0x1c5e…1c80 Head {h00=0x001e, h01=0x0050, text=» LDK A3,0 CLEAR ECB-BUFFER«, t00=0x0012, t01=0x004a}
0x1c80…1ca6 Head {h00=0x0022, h01=0x0050, text=» RB RED020 GET NEXT CHARACTER «, t00=0x0012, t01=0x006c}
0x1ca6…1cb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0092}
0x1cb0…1cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x009c}
0x1cba…1cdc Head {h00=0x001e, h01=0x0050, text=»RED120 SUK A3,1 BACKSPACE «, t00=0x0012, t01=0x00a6}
0x1cdc…1d06 Head {h00=0x0026, h01=0x0050, text=» RB(NN) RED020 GET NEXT CHARACTER «, t00=0x0012, t01=0x00c8}
0x1d06…1d18 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0012, t01=0x00f2}
0x1d18…1d3e Head {h00=0x0022, h01=0x0050, text=» RB RED020 GET NEXT CHARACTER «, t00=0x0012, t01=0x0104}
0x1d3e…1d48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x012a}
0x1d48…1d52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0134}
0x1d52…1d5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x013e}
0x1d5c…1d6a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0148}
0x1d6a…1d74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0156}
0x1d74…1d7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0160}
0x1d7e…1d94 Head {h00=0x0012, h01=0x0050, text=»* W R I T E «, t00=0x0012, t01=0x016a}
0x1d94…1d9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0180}
0x1d9e…1dd6 Head {h00=0x0034, h01=0x0050, text=»* ORDERS 05 AND 06: BASIC AND STANDARD WRITE «, t00=0x0012, t01=0x018a}
0x1dd6…1de0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0032}
0x1de0…1dea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x003c}
0x1dea…1dfe Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0013, t01=0x0046}
0x1dfe…1e12 Head {h00=0x0010, h01=0x0050, text=»TWAOUT EQU *«, t00=0x0013, t01=0x005a}
0x1e12…1e1e Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0013, t01=0x006e}
0x1e1e…1e30 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0013, t01=0x007a}
0x1e30…1e42 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0013, t01=0x008c}
0x1e42…1e6a Head {h00=0x0024, h01=0x0050, text=» CF A5,STRTIO EXECUTE CIO-START «, t00=0x0013, t01=0x009e}
0x1e6a…1e74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00c6}
0x1e74…1e7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d0}
0x1e7e…1e90 Head {h00=0x000e, h01=0x0050, text=» CWK A7,5 «, t00=0x0013, t01=0x00da}
0x1e90…1eae Head {h00=0x001a, h01=0x0050, text=» RF(Z) WRT050 ORDER 05«, t00=0x0013, t01=0x00ec}
0x1eae…1eb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x010a}
0x1eb8…1ec2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0114}
0x1ec2…1ee8 Head {h00=0x0022, h01=0x0050, text=» LD A3,2,A8 GET BUFFER ADDRESS«, t00=0x0013, t01=0x011e}
0x1ee8…1f0e Head {h00=0x0022, h01=0x0050, text=» LC A3,1,A3 CONTROL CHARACTER «, t00=0x0013, t01=0x0144}
0x1f0e…1f22 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0013, t01=0x016a}
0x1f22…1f36 Head {h00=0x0010, h01=0x0050, text=» SUK A3,/2B «, t00=0x0013, t01=0x017e}
0x1f36…1f58 (20, 0, 400) Head {h00=0x001e, h01=0x0050, text=» RF(Z) WRT030 NO CR OR LF «, t00=0x0014, t01=0x0004}
0x1f58…1f62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0026}
0x1f62…1f6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0030}
0x1f6c…1f9c Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTHP,A6 HEAD POSITION INDICATOR «, t00=0x0014, t01=0x003a}
0x1f9c…1fae Head {h00=0x000e, h01=0x0050, text=» LDK A4,2 «, t00=0x0014, t01=0x006a}
0x1fae…1fd6 Head {h00=0x0024, h01=0x0050, text=» LDK A2,CR SEND CARRIAGE RETURN «, t00=0x0014, t01=0x007c}
0x1fd6…1fe4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x00a4}
0x1fe4…1fee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00b2}
0x1fee…1ff8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00bc}
0x1ff8…2002 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00c6}
0x2002…202a Head {h00=0x0024, h01=0x0050, text=»WRT010 CF A5,OTR SEND CHARACTER «, t00=0x0014, t01=0x00d0}
0x202a…2034 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00f8}
0x2034…203e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0102}
0x203e…2050 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0014, t01=0x010c}
0x2050…2066 Head {h00=0x0012, h01=0x0050, text=» RF(NP) WRT020«, t00=0x0014, t01=0x011e}
0x2066…2086 Head {h00=0x001c, h01=0x0050, text=»WRT015 LDK A2,LF SEND LF«, t00=0x0014, t01=0x0134}
0x2086…2098 Head {h00=0x000e, h01=0x0050, text=» RB WRT010«, t00=0x0014, t01=0x0154}
0x2098…20a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0166}
0x20a2…20ba Head {h00=0x0014, h01=0x0050, text=»WRT020 SUK A3,5 «, t00=0x0014, t01=0x0170}
0x20ba…20de Head {h00=0x0020, h01=0x0050, text=» RB(Z) WRT015 SEND SECOND LF«, t00=0x0014, t01=0x0188}
0x20de…20f0 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0015, t01=0x001c}
0x20f0…2108 Head {h00=0x0014, h01=0x0050, text=» RF(NZ) WRT030 «, t00=0x0015, t01=0x002e}
0x2108…212a Head {h00=0x001e, h01=0x0050, text=» LDK A2,/0C SEND FORM FEED«, t00=0x0015, t01=0x0046}
0x212a…213c Head {h00=0x000e, h01=0x0050, text=» RB WRT010«, t00=0x0015, t01=0x0068}
0x213c…2162 Head {h00=0x0022, h01=0x0050, text=»WRT030 LDK A3,2 BUFFER POINTER«, t00=0x0015, t01=0x007a}
0x2162…2182 Head {h00=0x001c, h01=0x0050, text=» RF WRT050 GET CHARACTER«, t00=0x0015, t01=0x00a0}
0x2182…218c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00c0}
0x218c…2196 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ca}
0x2196…21a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00d4}
0x21a0…21b4 Head {h00=0x0010, h01=0x0050, text=»WRT040 EQU *«, t00=0x0015, t01=0x00de}
0x21b4…21d6 Head {h00=0x001e, h01=0x0050, text=» CF A5,OTR SEND CHARACTER «, t00=0x0015, t01=0x00f2}
0x21d6…2202 Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 INCREMENT BYTE COUNTER «, t00=0x0015, t01=0x0114}
0x2202…2210 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0140}
0x2210…221a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x014e}
0x221a…2224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0158}
0x2224…222e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0162}
0x222e…2268 Head {h00=0x0036, h01=0x0050, text=»WRT050 CF A5,GETCHR GET CHARACTER FROM ECB-BUFFER «, t00=0x0015, t01=0x016c}
0x2268…227c Head {h00=0x0010, h01=0x0050, text=» LDR A1,A1 «, t00=0x0016, t01=0x0016}
0x227c…22a0 Head {h00=0x0020, h01=0x0050, text=» RB(Z) RED040 LAST CHARACTER«, t00=0x0016, t01=0x002a}
0x22a0…22b2 Head {h00=0x000e, h01=0x0050, text=» CWK A7,5 «, t00=0x0016, t01=0x004e}
0x22b2…22d4 Head {h00=0x001e, h01=0x0050, text=» RB(Z) WRT040 BASIC WRITE «, t00=0x0016, t01=0x0060}
0x22d4…22de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0082}
0x22de…22e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x008c}
0x22e8…2314 Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 ORDER 06: STANDARD WRITE «, t00=0x0016, t01=0x0096}
0x2314…2328 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x0016, t01=0x00c2}
0x2328…233c Head {h00=0x0010, h01=0x0050, text=» SUK A1,/07 «, t00=0x0016, t01=0x00d6}
0x233c…2356 Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRT040 BELL«, t00=0x0016, t01=0x00ea}
0x2356…2360 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0104}
0x2360…2372 Head {h00=0x000e, h01=0x0050, text=» SUK A1,/A«, t00=0x0016, t01=0x010e}
0x2372…2392 Head {h00=0x001c, h01=0x0050, text=» RF(E) WRTTAB TABULATION«, t00=0x0016, t01=0x0120}
0x2392…239c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0140}
0x239c…23ae Head {h00=0x000e, h01=0x0050, text=» SUK A1,/F«, t00=0x0016, t01=0x014a}
0x23ae…23d2 Head {h00=0x0020, h01=0x0050, text=» RF(L) ERRCOD LESS THAN /20 «, t00=0x0016, t01=0x015c}
0x23d2…23e6 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/3F «, t00=0x0016, t01=0x0180}
0x23e6…240c (23, 0, 400) Head {h00=0x0022, h01=0x0050, text=» RB(NP) WRT040 BETWEEN /20-/5F«, t00=0x0017, t01=0x0004}
0x240c…2420 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/20 «, t00=0x0017, t01=0x002a}
0x2420…2446 Head {h00=0x0022, h01=0x0050, text=» RF(NP) WRT060 BETWEEN /60-/7F«, t00=0x0017, t01=0x003e}
0x2446…2450 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0064}
0x2450…245a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x006e}
0x245a…2472 Head {h00=0x0014, h01=0x0050, text=»ERRCOD LDK A1,4 «, t00=0x0017, t01=0x0078}
0x2472…2486 Head {h00=0x0010, h01=0x0050, text=» ORS A1,8,A8«, t00=0x0017, t01=0x0090}
0x2486…24ac Head {h00=0x0022, h01=0x0050, text=» RB WRT050 GET NEXT CHARACTER «, t00=0x0017, t01=0x00a4}
0x24ac…24b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ca}
0x24b6…24c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00d4}
0x24c0…24da Head {h00=0x0016, h01=0x0050, text=»WRT060 SUK A2,/20 «, t00=0x0017, t01=0x00de}
0x24da…24ec Head {h00=0x000e, h01=0x0050, text=» RB WRT040«, t00=0x0017, t01=0x00f8}
0x24ec…24f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x010a}
0x24f6…2500 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0114}
0x2500…250e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x011e}
0x250e…2518 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x012c}
0x2518…2522 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0136}
0x2522…2542 Head {h00=0x001c, h01=0x0050, text=»* T A B U L A T I O N «, t00=0x0017, t01=0x0140}
0x2542…254c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0160}
0x254c…2556 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x016a}
0x2556…256a Head {h00=0x0010, h01=0x0050, text=»WRTTAB EQU *«, t00=0x0017, t01=0x0174}
0x256a…25a0 Head {h00=0x0032, h01=0x0050, text=» CF A5,GETCHR GET FIRST TAB.POSITION CHARACTER«, t00=0x0017, t01=0x0188}
0x25a0…25b8 Head {h00=0x0014, h01=0x0050, text=» LDR A4,A2 COPY «, t00=0x0018, t01=0x002e}
0x25b8…25f0 Head {h00=0x0034, h01=0x0050, text=» CF A5,GETCHR GET SECOND TAB. POSITION CHARACTER«, t00=0x0018, t01=0x0046}
0x25f0…2602 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x0018, t01=0x007e}
0x2602…2614 Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x0018, t01=0x0090}
0x2614…262a Head {h00=0x0012, h01=0x0050, text=» RF(Z) TAB020 «, t00=0x0018, t01=0x00a2}
0x262a…2642 Head {h00=0x0014, h01=0x0050, text=»TAB010 ADK A2,/A«, t00=0x0018, t01=0x00b8}
0x2642…2654 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0018, t01=0x00d0}
0x2654…266a Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TAB010«, t00=0x0018, t01=0x00e2}
0x266a…2674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f8}
0x2674…2692 Head {h00=0x001a, h01=0x0050, text=»TAB020 SU A2,DWTHP,A6 «, t00=0x0018, t01=0x0102}
0x2692…26ca Head {h00=0x0034, h01=0x0050, text=» LC A4,DWTBC,A6 GET NUMBER OF OUTPUT CHARACTERS «, t00=0x0018, t01=0x0120}
0x26ca…26f8 Head {h00=0x002a, h01=0x0050, text=» SUR A2,A4 NUMBER OF SPACES TO BE SENT«, t00=0x0018, t01=0x0158}
0x26f8…2728 Head {h00=0x002c, h01=0x0050, text=» RB(NP) WRT050 NO SPACES SHOULD BE SENT «, t00=0x0018, t01=0x0186}
0x2728…273a Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0019, t01=0x0026}
0x273a…2760 Head {h00=0x0022, h01=0x0050, text=»TAB030 LDK A2,/20 SEND BALNKS «, t00=0x0019, t01=0x0038}
0x2760…2788 Head {h00=0x0024, h01=0x0050, text=»TAB040 CF A5,OTR SEND CHARACTER «, t00=0x0019, t01=0x005e}
0x2788…27b4 Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 INCREMENT BYTE COUNTER «, t00=0x0019, t01=0x0086}
0x27b4…27c6 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0019, t01=0x00b2}
0x27c6…27f0 Head {h00=0x0026, h01=0x0050, text=» RB(NZ) TAB030 SEND ANOTHER SPACE «, t00=0x0019, t01=0x00c4}
0x27f0…2802 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0019, t01=0x00ee}
0x2802…2826 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) WRT050 NOT RECOVERY «, t00=0x0019, t01=0x0100}
0x2826…2850 Head {h00=0x0026, h01=0x0050, text=» SC A4,DWTBC,A6 RESET BYTE COUNTER«, t00=0x0019, t01=0x0124}
0x2850…2876 Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 PRESET BUFFER INDEX «, t00=0x0019, t01=0x014e}
0x2876…289c Head {h00=0x0022, h01=0x0050, text=» RB WRT050 GET NEXT CHARACTER «, t00=0x0019, t01=0x0174}
0x289c…28aa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x000a}
0x28aa…28b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0018}
0x28b4…28be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0022}
0x28be…28da Head {h00=0x0018, h01=0x0050, text=»* RECOVERY ROUTINE«, t00=0x001a, t01=0x002c}
0x28da…28e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0048}
0x28e4…28ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0052}
0x28ee…28f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x005c}
0x28f8…290a Head {h00=0x000e, h01=0x0050, text=»TWON EQU *«, t00=0x001a, t01=0x0066}
0x290a…2920 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001a, t01=0x0078}
0x2920…294a Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x001a, t01=0x008e}
0x294a…2956 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x00b8}
0x2956…2960 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00c4}
0x2960…2976 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001a, t01=0x00ce}
0x2976…299c Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x001a, t01=0x00e4}
0x299c…29a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x010a}
0x29a8…29b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0116}
0x29b2…29da Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWTW01 GET DWT-ADDRESS «, t00=0x001a, t01=0x0120}
0x29da…29ee Head {h00=0x0010, h01=0x0050, text=» IFT POWUP=1«, t00=0x001a, t01=0x0148}
0x29ee…2a04 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/200 «, t00=0x001a, t01=0x015c}
0x2a04…2a2e Head {h00=0x0026, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE POWER UP«, t00=0x001a, t01=0x0172}
0x2a2e…2a3a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x000c}
0x2a3a…2a52 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x001b, t01=0x0018}
0x2a52…2a76 Head {h00=0x0020, h01=0x0050, text=» RF(N) EXIT DEVICE NOT BUSY «, t00=0x001b, t01=0x0030}
0x2a76…2a94 Head {h00=0x001a, h01=0x0050, text=»TWON10 LD A3,DWTA3,A6 «, t00=0x001b, t01=0x0054}
0x2a94…2ab6 Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x001b, t01=0x0072}
0x2ab6…2aca Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x001b, t01=0x0094}
0x2aca…2aee Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB-ADDRESS«, t00=0x001b, t01=0x00a8}
0x2aee…2b06 Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB2 «, t00=0x001b, t01=0x00cc}
0x2b06…2b28 Head {h00=0x001e, h01=0x0050, text=» ADR A5,A6 GET STACK BASE «, t00=0x001b, t01=0x00e4}
0x2b28…2b3a Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x001b, t01=0x0106}
0x2b3a…2b60 Head {h00=0x0022, h01=0x0050, text=» ABL(N) TWA010 ORDERS 01,02,03«, t00=0x001b, t01=0x0118}
0x2b60…2b72 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x001b, t01=0x013e}
0x2b72…2b90 Head {h00=0x001a, h01=0x0050, text=» RF(Z) TWON20 ORDER 05«, t00=0x001b, t01=0x0150}
0x2b90…2b9c Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x001b, t01=0x016e}
0x2b9c…2bae Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x001b, t01=0x017a}
0x2bae…2bd6 Head {h00=0x0024, h01=0x0050, text=» CF A5,STRTIO EXECUTE CIO-START «, t00=0x001b, t01=0x018c}
0x2bd6…2be8 Head {h00=0x000e, h01=0x0050, text=» LDK A2,CR«, t00=0x001c, t01=0x0024}
0x2be8…2bfa Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x001c, t01=0x0036}
0x2bfa…2c12 Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTHP,A6 «, t00=0x001c, t01=0x0048}
0x2c12…2c24 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x001c, t01=0x0060}
0x2c24…2c4c Head {h00=0x0024, h01=0x0050, text=» RB TAB040 REPRINT LAST REQUEST «, t00=0x001c, t01=0x0072}
0x2c4c…2c56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x009a}
0x2c56…2c7a Head {h00=0x0020, h01=0x0050, text=»TWON20 LDK A1,TPERR ORDER 05«, t00=0x001c, t01=0x00a4}
0x2c7a…2c8e Head {h00=0x0010, h01=0x0050, text=» ABL DISEND «, t00=0x001c, t01=0x00c8}
0x2c8e…2c98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00dc}
0x2c98…2ca2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00e6}
0x2ca2…2cb0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x00f0}
0x2cb0…2cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00fe}
0x2cba…2cc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0108}
0x2cc4…2cd8 Head {h00=0x0010, h01=0x0050, text=»* I H T W «, t00=0x001c, t01=0x0112}
0x2cd8…2ce2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0126}
0x2ce2…2d16 Head {h00=0x0030, h01=0x0050, text=»* INTERRUPT HANDLER: PROCESS OF INTERRUPT «, t00=0x001c, t01=0x0130}
0x2d16…2d20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0164}
0x2d20…2d2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x016e}
0x2d2a…2d3c Head {h00=0x000e, h01=0x0050, text=»IHTW EQU *«, t00=0x001c, t01=0x0178}
0x2d3c…2d64 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x001c, t01=0x018a}
0x2d64…2d7a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001d, t01=0x0022}
0x2d7a…2da4 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x001d, t01=0x0038}
0x2da4…2db0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0062}
0x2db0…2dba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x006e}
0x2dba…2dd0 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001d, t01=0x0078}
0x2dd0…2df6 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x001d, t01=0x008e}
0x2df6…2e02 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00b4}
0x2e02…2e0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c0}
0x2e0c…2e24 Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWTW01 «, t00=0x001d, t01=0x00ca}
0x2e24…2e38 Head {h00=0x0010, h01=0x0050, text=»LDREG EQU * «, t00=0x001d, t01=0x00e2}
0x2e38…2e50 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x001d, t01=0x00f6}
0x2e50…2e74 Head {h00=0x0020, h01=0x0050, text=» RF(N) SKIP DEVICE NOT BUSY «, t00=0x001d, t01=0x010e}
0x2e74…2ea0 Head {h00=0x0028, h01=0x0050, text=»IHTW10 LDR* A2,A6 GET DEVICE ADDRESS«, t00=0x001d, t01=0x0132}
0x2ea0…2eb6 Head {h00=0x0012, h01=0x0050, text=» ORKL A2,TWSST«, t00=0x001d, t01=0x015e}
0x2eb6…2ed2 Head {h00=0x0018, h01=0x0050, text=» EXR A2 EXECUTE SST «, t00=0x001d, t01=0x0174}
0x2ed2…2eee Head {h00=0x0018, h01=0x0050, text=» RF(A) IHTW30 ENDIO «, t00=0x001d, t01=0x0190}
0x2eee…2f10 Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x001e, t01=0x001c}
0x2f10…2f24 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x001e, t01=0x003e}
0x2f24…2f36 Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x001e, t01=0x0052}
0x2f36…2f4c Head {h00=0x0012, h01=0x0050, text=» RF(P) IHTW30 «, t00=0x001e, t01=0x0064}
0x2f4c…2f72 Head {h00=0x0022, h01=0x0050, text=» LDR* A2,A6 GET DEVICE ADDRESS«, t00=0x001e, t01=0x007a}
0x2f72…2f8a Head {h00=0x0014, h01=0x0050, text=» ORKL A2,TWINR «, t00=0x001e, t01=0x00a0}
0x2f8a…2fa6 Head {h00=0x0018, h01=0x0050, text=» EXR A2 EXECUTE INR «, t00=0x001e, t01=0x00b8}
0x2fa6…2fce Head {h00=0x0024, h01=0x0050, text=» ANK A2,/7F MASK INPUT-CHARACTER«, t00=0x001e, t01=0x00d4}
0x2fce…2fdc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x00fc}
0x2fdc…2fe6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x010a}
0x2fe6…2ffc Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x001e, t01=0x0114}
0x2ffc…3026 Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTTP,A6 GET TIMER POINTER «, t00=0x001e, t01=0x012a}
0x3026…3054 Head {h00=0x002a, h01=0x0050, text=» RF(Z) IHTW30 NO TIMING ON THIS DEVICE«, t00=0x001e, t01=0x0154}
0x3054…306a Head {h00=0x0012, h01=0x0050, text=» LDKL A1,-TIME«, t00=0x001e, t01=0x0182}
0x306a…3082 Head {h00=0x0014, h01=0x0050, text=» ST* A1,DWTTP,A6«, t00=0x001f, t01=0x0008}
0x3082…308e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0020}
0x308e…3098 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x002c}
0x3098…30a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0036}
0x30a2…30ba Head {h00=0x0014, h01=0x0050, text=»IHTW30 LDK A1,0 «, t00=0x001f, t01=0x0040}
0x30ba…30de Head {h00=0x0020, h01=0x0050, text=» RF LDREGE RESTORE REGISTERS«, t00=0x001f, t01=0x0058}
0x30de…30e6 Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x007c}
0x30e6…30ee Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0084}
0x30ee…3102 Head {h00=0x0010, h01=0x0050, text=»IHTW35 EQU *«, t00=0x001f, t01=0x008c}
0x3102…311e Head {h00=0x0018, h01=0x0050, text=» IFT POWUP+TIMOUT=2 «, t00=0x001f, t01=0x00a0}
0x311e…3126 Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x00bc}
0x3126…314c Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTTP,A6 TIMER POINTER «, t00=0x001f, t01=0x00c4}
0x314c…317a Head {h00=0x002a, h01=0x0050, text=» RF(Z) IHTW40 NO TIMING ON THIS DEVICE«, t00=0x001f, t01=0x00ea}
0x317a…319c Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x001f, t01=0x0118}
0x319c…31a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x013a}
0x31a8…31b6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0146}
0x31b6…31c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0154}
0x31c0…31ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x015e}
0x31ca…31de Head {h00=0x0010, h01=0x0050, text=»IHTW40 EQU *«, t00=0x001f, t01=0x0168}
0x31de…31e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x017c}
0x31e8…31f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0186}
0x31f2…3222 Head {h00=0x002c, h01=0x0050, text=»IHTW50 ST A3,6,A8 SAVE EFFECTIVE LENGTH «, t00=0x001f, t01=0x0190}
0x3222…323a Head {h00=0x0014, h01=0x0050, text=»IHTW55 SUK A7,4 «, t00=0x0020, t01=0x0030}
0x323a…325c Head {h00=0x001e, h01=0x0050, text=» RF(NP) IHTW60 READ ORDER «, t00=0x0020, t01=0x0048}
0x325c…3266 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x006a}
0x3266…3270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0074}
0x3270…3298 Head {h00=0x0024, h01=0x0050, text=» LC A3,DWTBC,A6 GET BYTE COUNTER«, t00=0x0020, t01=0x007e}
0x3298…32c6 Head {h00=0x002a, h01=0x0050, text=» ADS A3,DWTHP,A6 UPDATE HEAD POSITION «, t00=0x0020, t01=0x00a6}
0x32c6…32d8 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0020, t01=0x00d4}
0x32d8…3302 Head {h00=0x0026, h01=0x0050, text=» SC A3,DWTBC,A6 CLEAR BYTE COUNTER«, t00=0x0020, t01=0x00e6}
0x3302…330c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0110}
0x330c…3320 Head {h00=0x0010, h01=0x0050, text=»IHTW60 EQU *«, t00=0x0020, t01=0x011a}
0x3320…3336 Head {h00=0x0012, h01=0x0050, text=» IFT CREDIT=1 «, t00=0x0020, t01=0x012e}
0x3336…3358 Head {h00=0x001e, h01=0x0050, text=» LD A1,10,A8 CONVERT INDEX«, t00=0x0020, t01=0x0144}
0x3358…336a Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0020, t01=0x0166}
0x336a…337c Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0020, t01=0x0178}
0x337c…3390 Head {h00=0x0010, h01=0x0050, text=» ST A1,10,A8«, t00=0x0020, t01=0x018a}
0x3390…339c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x000e}
0x339c…33ae Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0021, t01=0x001a}
0x33ae…33d0 Head {h00=0x001e, h01=0x0050, text=» ABL DISEND PERFORM TENDIO«, t00=0x0021, t01=0x002c}
0x33d0…33da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x004e}
0x33da…33e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0058}
0x33e4…33ec Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0062}
0x33ec…3404 Head {h00=0x0014, h01=0x0050, text=»SKIP LDR* A2,A6 «, t00=0x0021, t01=0x006a}
0x3404…341a Head {h00=0x0012, h01=0x0050, text=» ORKL A2,TWSST«, t00=0x0021, t01=0x0082}
0x341a…342e Head {h00=0x0010, h01=0x0050, text=» EXR A2 SST «, t00=0x0021, t01=0x0098}
0x342e…3442 Head {h00=0x0010, h01=0x0050, text=» RF(A) EXIT «, t00=0x0021, t01=0x00ac}
0x3442…3456 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0021, t01=0x00c0}
0x3456…346c Head {h00=0x0012, h01=0x0050, text=» ORKL A2,TWHLT«, t00=0x0021, t01=0x00d4}
0x346c…3484 Head {h00=0x0014, h01=0x0050, text=» EXR A2 CIO HALT«, t00=0x0021, t01=0x00ea}
0x3484…3494 Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x0021, t01=0x0102}
0x3494…34a2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0112}
0x34a2…34ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0120}
0x34ac…34b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x012a}
0x34b6…34c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0134}
0x34c0…34d8 Head {h00=0x0014, h01=0x0050, text=»* I/O COMMANDS«, t00=0x0021, t01=0x013e}
0x34d8…34e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0156}
0x34e2…34ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0160}
0x34ec…351c Head {h00=0x002c, h01=0x0050, text=»STRTIO LDKL A1,TWSTRT EXECUTE CIO-START «, t00=0x0021, t01=0x016a}
0x351c…352e Head {h00=0x000e, h01=0x0050, text=» RF EXECIO«, t00=0x0022, t01=0x000a}
0x352e…355a Head {h00=0x0028, h01=0x0050, text=»HLTIO LDKL A1,TWHLT CIO-HALT«, t00=0x0022, t01=0x001c}
0x355a…356c Head {h00=0x000e, h01=0x0050, text=» RF EXECIO«, t00=0x0022, t01=0x0048}
0x356c…3592 Head {h00=0x0022, h01=0x0050, text=»OTR LDKL A1,TWOTR OTR «, t00=0x0022, t01=0x005a}
0x3592…359c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0080}
0x359c…35a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x008a}
0x35a6…35d0 Head {h00=0x0026, h01=0x0050, text=»EXECIO ORR* A1,A6 GET I/O-COMMAND «, t00=0x0022, t01=0x0094}
0x35d0…35f0 Head {h00=0x001c, h01=0x0050, text=» EXR A1 EXECUTE COMMAND «, t00=0x0022, t01=0x00be}
0x35f0…3604 Head {h00=0x0010, h01=0x0050, text=» RF(NA) HALT«, t00=0x0022, t01=0x00de}
0x3604…3618 Head {h00=0x0010, h01=0x0050, text=»STREG EQU * «, t00=0x0022, t01=0x00f2}
0x3618…362e Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/100 «, t00=0x0022, t01=0x0106}
0x362e…3662 Head {h00=0x0030, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED«, t00=0x0022, t01=0x011c}
0x3662…368a Head {h00=0x0024, h01=0x0050, text=» ST A3,DWTA3,A6 SAVE REGISTER A3«, t00=0x0022, t01=0x0150}
0x368a…36b2 Head {h00=0x0024, h01=0x0050, text=» ST A4,DWTA4,A6 A4«, t00=0x0022, t01=0x0178}
0x36b2…36da Head {h00=0x0024, h01=0x0050, text=» ST A5,DWTA5,A6 A5«, t00=0x0023, t01=0x0010}
0x36da…36f0 Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0023, t01=0x0038}
0x36f0…370c Head {h00=0x0018, h01=0x0050, text=»HALT ST A2,DWTA2,A6 «, t00=0x0023, t01=0x004e}
0x370c…3732 Head {h00=0x0022, h01=0x0050, text=» CF A5,HLTIO EXECUTE CIO-HALT «, t00=0x0023, t01=0x006a}
0x3732…374a Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTA2,A6 «, t00=0x0023, t01=0x0090}
0x374a…376c Head {h00=0x001e, h01=0x0050, text=» RB STRTIO RESTART REQUEST«, t00=0x0023, t01=0x00a8}
0x376c…3776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00ca}
0x3776…3780 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00d4}
0x3780…378e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x00de}
0x378e…3798 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00ec}
0x3798…37a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00f6}
0x37a2…37ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0100}
0x37ac…37d6 Head {h00=0x0026, h01=0x0050, text=»* STORE CHARACTER IN ECB-BUFFER «, t00=0x0023, t01=0x010a}
0x37d6…37e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0134}
0x37e0…37ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x013e}
0x37ea…3816 Head {h00=0x0028, h01=0x0050, text=»STORE LD A4,2,A8 GET BUFFER ADDRESS «, t00=0x0023, t01=0x0148}
0x3816…383e Head {h00=0x0024, h01=0x0050, text=» ADR A4,A3 GET CHARACTER ADDRESS«, t00=0x0023, t01=0x0174}
0x383e…3860 Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x0024, t01=0x000c}
0x3860…3888 Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0024, t01=0x002e}
0x3888…3898 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0024, t01=0x0056}
0x3898…38a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0066}
0x38a2…38ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0070}
0x38ac…38b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x007a}
0x38b6…38cc Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x0024, t01=0x0084}
0x38cc…38d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x009a}
0x38d6…38e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00a4}
0x38e0…38fa Head {h00=0x0016, h01=0x0050, text=»* TIMOUT ROUTINE«, t00=0x0024, t01=0x00ae}
0x38fa…3904 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00c8}
0x3904…390e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00d2}
0x390e…3922 Head {h00=0x0010, h01=0x0050, text=»TWTUT EQU * «, t00=0x0024, t01=0x00dc}
0x3922…3944 Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 GET DWT-ADDRESS«, t00=0x0024, t01=0x00f0}
0x3944…396c Head {h00=0x0024, h01=0x0050, text=» LDK A1,/40 TIME OUT RETURN CODE«, t00=0x0024, t01=0x0112}
0x396c…3978 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x013a}
0x3978…3982 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0146}
0x3982…398c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0150}
0x398c…399a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x015a}
0x399a…39a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0168}
0x39a4…39ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0172}
0x39ae…39c6 Head {h00=0x0014, h01=0x0050, text=»* L D R E G E «, t00=0x0024, t01=0x017c}
0x39c6…39d0 (37, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0004}
0x39d0…3a0c Head {h00=0x0038, h01=0x0050, text=»* RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5«, t00=0x0025, t01=0x000e}
0x3a0c…3a16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x004a}
0x3a16…3a20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0054}
0x3a20…3a34 Head {h00=0x0010, h01=0x0050, text=»LDREGE EQU *«, t00=0x0025, t01=0x005e}
0x3a34…3a5e Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTA3,A6 RELOAD REGISTER A3«, t00=0x0025, t01=0x0072}
0x3a5e…3a88 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTA4,A6 A4«, t00=0x0025, t01=0x009c}
0x3a88…3ab2 Head {h00=0x0026, h01=0x0050, text=» LD A5,DWTA5,A6 A5«, t00=0x0025, t01=0x00c6}
0x3ab2…3aca Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x0025, t01=0x00f0}
0x3aca…3ade Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0025, t01=0x0108}
0x3ade…3af6 Head {h00=0x0014, h01=0x0050, text=» LD A8,DWTECB,A6«, t00=0x0025, t01=0x011c}
0x3af6…3b1a Head {h00=0x0020, h01=0x0050, text=» RTN A5 RETURN VIA A5-STACK «, t00=0x0025, t01=0x0134}
0x3b1a…3b28 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x0158}
0x3b28…3b32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0166}
0x3b32…3b3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0170}
0x3b3c…3b54 Head {h00=0x0014, h01=0x0050, text=»* G E T C H R«, t00=0x0025, t01=0x017a}
0x3b54…3b5e (38, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0004}
0x3b5e…3b9a Head {h00=0x0038, h01=0x0050, text=»* SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER«, t00=0x0026, t01=0x000e}
0x3b9a…3ba4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x004a}
0x3ba4…3bba Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0026, t01=0x0054}
0x3bba…3bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x006a}
0x3bc4…3be2 Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER INDEX«, t00=0x0026, t01=0x0074}
0x3be2…3c00 Head {h00=0x001a, h01=0x0050, text=»* A8 = ECB-ADDRESS «, t00=0x0026, t01=0x0092}
0x3c00…3c0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00b0}
0x3c0a…3c20 Head {h00=0x0012, h01=0x0050, text=»* ON EXIT: «, t00=0x0026, t01=0x00ba}
0x3c20…3c2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00d0}
0x3c2a…3c46 Head {h00=0x0018, h01=0x0050, text=»* A2 = CHARACTER «, t00=0x0026, t01=0x00da}
0x3c46…3c74 Head {h00=0x002a, h01=0x0050, text=»* A1 = 0 IF LAST CHARACTER ELSE # 0«, t00=0x0026, t01=0x00f6}
0x3c74…3c7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0124}
0x3c7e…3ccc Head {h00=0x004a, h01=0x0050, text=»* IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH«, t00=0x0026, t01=0x012e}
0x3ccc…3cd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x017c}
0x3cd6…3ce0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0186}
0x3ce0…3cf4 Head {h00=0x0010, h01=0x0050, text=»GETCHR EQU *«, t00=0x0026, t01=0x0190}
0x3cf4…3d18 Head {h00=0x0020, h01=0x0050, text=» LD A1,4,A8 REQUESTED LENGTH«, t00=0x0027, t01=0x0014}
0x3d18…3d2a Head {h00=0x000e, h01=0x0050, text=» SUR A1,A3«, t00=0x0027, t01=0x0038}
0x3d2a…3d58 Head {h00=0x002a, h01=0x0050, text=» RF(NP) GCH010 LAST CHARACTER REACHED «, t00=0x0027, t01=0x004a}
0x3d58…3d7e Head {h00=0x0022, h01=0x0050, text=» LD A1,2,A8 GET BUFFER ADDRESS«, t00=0x0027, t01=0x0078}
0x3d7e…3d90 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A3«, t00=0x0027, t01=0x009e}
0x3d90…3dae Head {h00=0x001a, h01=0x0050, text=» LCR A2,A1 CHAR. TO A2«, t00=0x0027, t01=0x00b0}
0x3dae…3dc2 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0027, t01=0x00ce}
0x3dc2…3dea Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0027, t01=0x00e2}
0x3dea…3dfa Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0027, t01=0x010a}
0x3dfa…3e2a Head {h00=0x002c, h01=0x0050, text=»GCH010 ST A3,6,A8 STORE EFFECTIVE LENGTH«, t00=0x0027, t01=0x011a}
0x3e2a…3e3a Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0027, t01=0x014a}
0x3e3a…3e48 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x015a}
0x3e48…3e52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0168}
0x3e52…3e7e Head {h00=0x0028, h01=0x0050, text=»* DEVICE WORK TABLE FOR TYPEWRITER«, t00=0x0027, t01=0x0172}
0x3e7e…3e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x000e}
0x3e88…3e92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0018}
0x3e92…3eb2 Head {h00=0x001c, h01=0x0050, text=»DWTW01 EQU * TABLE ENTRY«, t00=0x0028, t01=0x0022}
0x3eb2…3ed8 Head {h00=0x0022, h01=0x0050, text=» DATA /0010 CHANNEL PARAMETER «, t00=0x0028, t01=0x0042}
0x3ed8…3f0c Head {h00=0x0030, h01=0x0050, text=» DATA /8000 STATUS./8000 MEANS DEVICE READY «, t00=0x0028, t01=0x0068}
0x3f0c…3f28 Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0028, t01=0x009c}
0x3f28…3f3e Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0028, t01=0x00b8}
0x3f3e…3f6a Head {h00=0x0028, h01=0x0050, text=» DATA TWAD POINTER TO ADDRESS BLOCK «, t00=0x0028, t01=0x00ce}
0x3f6a…3f86 Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB-ADDRESS«, t00=0x0028, t01=0x00fa}
0x3f86…3fae Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0028, t01=0x0116}
0x3fae…3fcc Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0028, t01=0x013e}
0x3fcc…3fe2 Head {h00=0x0012, h01=0x000d, text=» IFT MMUPAG=1 «, t00=0x0028, t01=0x015c}
0x3fe2…400c Head {h00=0x0026, h01=0x0022, text=» DATA 0 SAVE AREA USER ECB ADDRESS«, t00=0x0028, t01=0x0172}
0x400c…4030 Head {h00=0x0020, h01=0x001c, text=» DATA DEVECB MMU ECB ADDRESS«, t00=0x0029, t01=0x000c}
0x4030…403c Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0029, t01=0x0030}
0x403c…405e Head {h00=0x001e, h01=0x0050, text=» DATA 0 OUTPUT QUEUE LINK «, t00=0x0029, t01=0x003c}
0x405e…407e Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A3«, t00=0x0029, t01=0x005e}
0x407e…409e Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A4«, t00=0x0029, t01=0x007e}
0x409e…40be Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A5«, t00=0x0029, t01=0x009e}
0x40be…40d8 Head {h00=0x0016, h01=0x0050, text=» RES 4 STACK BASE «, t00=0x0029, t01=0x00be}
0x40d8…40f6 Head {h00=0x001a, h01=0x0050, text=» DATA 1 TIMER POINTER «, t00=0x0029, t01=0x00d8}
0x40f6…4112 Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECHO DEVICE «, t00=0x0029, t01=0x00f6}
0x4112…413e Head {h00=0x0028, h01=0x0050, text=» DATA /5F5E LEFT BYTE BACKSPACE KEY «, t00=0x0029, t01=0x0112}
0x413e…415e Head {h00=0x001c, h01=0x0050, text=» RIGHT BYTE CANCEL KEY«, t00=0x0029, t01=0x013e}
0x415e…4188 Head {h00=0x0026, h01=0x0050, text=» DATA /0D00 LEFT BYTE STANDARD EOR«, t00=0x0029, t01=0x015e}
0x4188…41aa Head {h00=0x001e, h01=0x0050, text=» RIGHT BYTE DOUBLE ZERO «, t00=0x0029, t01=0x0188}
0x41aa…41d0 Head {h00=0x0022, h01=0x0050, text=» DATA 0 HEAD POSITION POINETR «, t00=0x002a, t01=0x001a}
0x41d0…41f0 Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A2«, t00=0x002a, t01=0x0040}
0x41f0…41fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0060}
0x41fa…4212 Head {h00=0x0014, h01=0x0050, text=» EJECT DRTW01 «, t00=0x002a, t01=0x006a}
0x4212…421c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0082}
0x421c…4226 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x008c}
0x4226…423c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x002a, t01=0x0096}
0x423c…4250 Head {h00=0x0010, h01=0x0050, text=»DEVECB EQU *«, t00=0x002a, t01=0x00ac}
0x4250…4260 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x002a, t01=0x00c0}
0x4260…4274 Head {h00=0x0010, h01=0x0050, text=» DATA TW:BUF«, t00=0x002a, t01=0x00d0}
0x4274…428a Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,0,0 «, t00=0x002a, t01=0x00e4}
0x428a…42a0 Head {h00=0x0012, h01=0x0050, text=» RES DVBKTB+1 «, t00=0x002a, t01=0x00fa}
0x42a0…42bc Head {h00=0x0018, h01=0x0050, text=»TW:BUF RES DVBLEN+1 «, t00=0x002a, t01=0x0110}
0x42bc…42c8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x012c}
0x42c8…42d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0138}
0x42d2…42dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0142}
0x42dc…42e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x014c}
0x42e6…42f2 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002a, t01=0x0156}
0x42f2…42f6 Head {h00=0x4004, h01=0x0000}
0x42f6…42fa 00 2a 01 62 ┆ * b┆
0x42fa…4302 (43, 1, 8) 20 04 00 00 00 2b 00 04 ┆ + ┆
0x4302…4352 (44, 0, 400) 43 52 5c 41 34 2c 41 33 5c 53 45 41 52 43 45 44 20 4b 45 59 20 43 48 41 52 20 00 0b 01 8e 00 12 00 50 5c 43 43 4b 5c 41 34 2c 2f 45 45 30 30 20 00 0c 00 22 00 22 00 50 5c 52 46 28 45 29 5c 43 48 4b 30 36 30 5c 45 4e 44 20 4f 46 20 4b 45 59 ┆CR A4,A3 SEARCED KEY CHAR P CCK A4,/EE00 " " P RF(E) CHK060 END OF KEY┆
0x4352…43a2 20 43 48 41 52 20 00 0c 00 38 00 16 00 50 5c 43 43 52 5c 41 34 2c 41 32 5c 53 43 3d 45 43 3f 20 00 0c 00 5e 00 1e 00 50 5c 52 46 28 47 29 5c 43 48 4b 31 30 30 5c 53 43 20 47 54 20 54 48 20 45 43 20 00 0c 00 78 00 22 00 50 5c 52 46 28 4c 29 ┆ CHAR 8 P CCR A4,A2 SC=EC? ^ P RF(G) CHK100 SC GT TH EC x " P RF(L)┆
0x43a2…43f2 5c 43 48 4b 31 32 30 5c 53 43 20 4c 45 53 53 20 54 48 41 4e 20 45 43 20 00 0c 00 9a 00 1e 00 50 5c 41 44 4b 5c 41 37 2c 31 5c 4e 4f 20 4f 46 20 53 41 4d 45 20 43 48 41 52 20 00 0c 00 c0 00 1a 00 50 5c 43 57 52 5c 41 37 2c 41 36 5c 4e 4f 20 ┆ CHK120 SC LESS THAN EC P ADK A7,1 NO OF SAME CHAR P CWR A7,A6 NO ┆
0x43f2…4442 4f 46 20 43 48 41 52 20 00 0c 00 e2 00 24 00 50 5c 52 46 28 4e 4c 29 5c 43 48 4b 30 36 30 5c 41 4c 4c 20 43 48 41 52 20 43 48 45 43 4b 45 44 20 00 0c 01 00 00 1c 00 50 5c 41 44 4b 5c 41 33 2c 31 5c 4e 58 54 20 53 43 20 54 4f 20 54 45 53 54 ┆OF CHAR $ P RF(NL) CHK060 ALL CHAR CHECKED P ADK A3,1 NXT SC TO TEST┆
0x4442…4492 00 0c 01 28 00 1c 00 50 5c 41 44 4b 5c 41 32 2c 31 5c 4e 58 54 20 45 43 20 54 4f 20 54 45 53 54 00 0c 01 48 00 10 00 50 5c 52 42 5c 43 48 4b 30 32 30 5c 20 00 0c 01 68 00 10 00 50 43 48 4b 30 36 30 5c 45 51 55 5c 2a 00 0c 01 7c 00 14 00 50 ┆ ( P ADK A2,1 NXT EC TO TEST H P RB CHK020 h PCHK060 EQU * | P┆