DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦a5d5a2b7a⟧

    Length: 17290 (0x438a)
    Notes: pts_type(SC)
    Names: »DRTW01.SC«

Derivation

└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
    └─⟦this⟧ »TOSSWORK/DRTW01.SC« 

PTS(SC)

	IDENT DRTW01 	REL 8.2 78-09-15  870105040820 

			INPUT WITHOUT READ 
			REL 8.1 78-04-21 

* 
**************************************************
* 
*   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	DWT STATUS 
	EXTRN	DWTECB	ECB-ADDRESS 
	EXTRN	DWTOR	ORDER
	EXTRN	INTSAV	SAVE AREA LAST INTRRUPT 
	EJECT
* 
* 
********************* 
* DWT-DISPLACEMENTS * 
********************* 
* 
* 
DWTA5	EQU	/16 
DWTHP	EQU	/28 
DWTTP	EQU	/20 
DWTBC	EQU	/3
TWCLR	EQU	/25 
TWEOF	EQU	/26 
TWBSP	EQU	/24 
DWTSB1	EQU	/1A
DWTSB2	EQU	/1E
DWTA2	EQU	/2A 
DWTA3	EQU	/12 
DWTA4	EQU	/14 
* 
* 
* 
* 
********************
* I/O-INSTRUCTIONS
********************
* 
* 
TWSTRT	EQU	/42C0	CIO-START
TWHLT	EQU	/4280	CIO-HALT
TWINR	EQU	/4A00	INPUT 
TWOTR	EQU	/4200	OUTPUT
TWSST	EQU	/4AC0	SENCE 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 

TIMOUT	EQU	X:A	 
POWUP	EQU	X:B 

CREDIT	EQU	0
* 
* 
* 
TWAD	EQU	*
	DATA	TWA	ACTIVATION PART 
	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	*
	CF	A15,SAVE8 
	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
	LDK	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
	CF	A15,SAVE8 
	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	SKIP CHARACTER
	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,0	LAST OUTPUT, ORDER AND ECB-ADDRESS
	DATA	TWAD	POINTER TO ADDRESS BLOCK 
	DATA	0	TTAB-ADDRESS
	DATA	0	WAIT/ACTIVATE INDICATOR 
	DATA	0	TERMINAL QUEUE
	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
* 
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT DRTW01  REL 8.2 78-09-15  870105040820 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…005c              Head {h00=0x001a, h01=0x0050, text=»   INPUT WITHOUT READ «, t00=0x0000, t01=0x0042}
0x005c…0078              Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-04-21 «, t00=0x0000, t01=0x0060}
0x0078…0080              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x007c}
0x0080…008a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0084}
0x008a…00c4              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x008e}
0x00c4…00ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c8}
0x00ce…00f6              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTE  PTS «, t00=0x0000, t01=0x00d2}
0x00f6…0100              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fa}
0x0100…0130              Head {h00=0x002c, h01=0x0050, text=»*   DRTW01 = DRIVER TYPEWRITER PTS 6862 «, t00=0x0000, t01=0x0104}
0x0130…013a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0134}
0x013a…0144              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013e}
0x0144…014e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0148}
0x014e…0158              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0152}
0x0158…0162              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015c}
0x0162…016c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0166}
0x016c…01a6              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0170}
0x01a6…01b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x001a}
0x01b0…01f0              Head {h00=0x003c, h01=0x0050, text=»*   THIS DRIVER HANDLES INPUT AND OUTPUT TO TYPEWRITERS «, t00=0x0001, t01=0x0024}
0x01f0…0204              Head {h00=0x0010, h01=0x0050, text=»*   PTS 6862«, t00=0x0001, t01=0x0064}
0x0204…020e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0078}
0x020e…0218              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0082}
0x0218…0226              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x008c}
0x0226…0230              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x009a}
0x0230…023a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a4}
0x023a…024e              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x00ae}
0x024e…0262              Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x00c2}
0x0262…0276              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x00d6}
0x0276…0280              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ea}
0x0280…02a2              Head {h00=0x001e, h01=0x0050, text=» ENTRY TWAD ADDRESS BLOCK «, t00=0x0001, t01=0x00f4}
0x02a2…02b6              Head {h00=0x0010, h01=0x0050, text=» ENTRY IHTW «, t00=0x0001, t01=0x0116}
0x02b6…02ca              Head {h00=0x0010, h01=0x0050, text=» ENTRY TWON «, t00=0x0001, t01=0x012a}
0x02ca…02e0              Head {h00=0x0012, h01=0x0050, text=» ENTRY DWTW01 «, t00=0x0001, t01=0x013e}
0x02e0…02ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0154}
0x02ea…0300              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0001, t01=0x015e}
0x0300…0316              Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0001, t01=0x0174}
0x0316…032c              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0001, t01=0x018a}
0x032c…0336              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0010}
0x0336…035a              Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0002, t01=0x001a}
0x035a…0378              Head {h00=0x001a, h01=0x0050, text=» EXTRN TDISP DISPATCH «, t00=0x0002, t01=0x003e}
0x0378…03a0              Head {h00=0x0024, h01=0x0050, text=» EXTRN DISEND DISPATCH AND ENDIO«, t00=0x0002, t01=0x005c}
0x03a0…03ce              Head {h00=0x002a, h01=0x0050, text=» EXTRN SETIME SET TIME BEFORE TIME-OUT«, t00=0x0002, t01=0x0084}
0x03ce…0400              Head {h00=0x002e, h01=0x0050, text=» EXTRN SAVE8 SAVE REGISTERS A1-A8 ON STACK«, t00=0x0002, t01=0x00b2}
0x0400…0420              Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0002, t01=0x00e4}
0x0420…0442              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB-ADDRESS «, t00=0x0002, t01=0x0104}
0x0442…045c              Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0002, t01=0x0126}
0x045c…048a              Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTRRUPT «, t00=0x0002, t01=0x0140}
0x048a…0498              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x016e}
0x0498…04a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x017c}
0x04a2…04ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0186}
0x04ac…04ca              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0002, t01=0x0190}
0x04ca…04e8              Head {h00=0x001a, h01=0x0050, text=»* DWT-DISPLACEMENTS * «, t00=0x0003, t01=0x001e}
0x04e8…0506              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0003, t01=0x003c}
0x0506…0510              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x005a}
0x0510…051a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0064}
0x051a…0530              Head {h00=0x0012, h01=0x0050, text=»DWTA5 EQU /16 «, t00=0x0003, t01=0x006e}
0x0530…0546              Head {h00=0x0012, h01=0x0050, text=»DWTHP EQU /28 «, t00=0x0003, t01=0x0084}
0x0546…055c              Head {h00=0x0012, h01=0x0050, text=»DWTTP EQU /20 «, t00=0x0003, t01=0x009a}
0x055c…0570              Head {h00=0x0010, h01=0x0050, text=»DWTBC EQU /3«, t00=0x0003, t01=0x00b0}
0x0570…0586              Head {h00=0x0012, h01=0x0050, text=»TWCLR EQU /25 «, t00=0x0003, t01=0x00c4}
0x0586…059c              Head {h00=0x0012, h01=0x0050, text=»TWEOF EQU /26 «, t00=0x0003, t01=0x00da}
0x059c…05b2              Head {h00=0x0012, h01=0x0050, text=»TWBSP EQU /24 «, t00=0x0003, t01=0x00f0}
0x05b2…05c8              Head {h00=0x0012, h01=0x0050, text=»DWTSB1 EQU /1A«, t00=0x0003, t01=0x0106}
0x05c8…05de              Head {h00=0x0012, h01=0x0050, text=»DWTSB2 EQU /1E«, t00=0x0003, t01=0x011c}
0x05de…05f4              Head {h00=0x0012, h01=0x0050, text=»DWTA2 EQU /2A «, t00=0x0003, t01=0x0132}
0x05f4…060a              Head {h00=0x0012, h01=0x0050, text=»DWTA3 EQU /12 «, t00=0x0003, t01=0x0148}
0x060a…0620              Head {h00=0x0012, h01=0x0050, text=»DWTA4 EQU /14 «, t00=0x0003, t01=0x015e}
0x0620…062a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0174}
0x062a…0634              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x017e}
0x0634…063e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0188}
0x063e…0648 (4, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0004}
0x0648…0664              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0004, t01=0x000e}
0x0664…067e              Head {h00=0x0016, h01=0x0050, text=»* I/O-INSTRUCTIONS«, t00=0x0004, t01=0x002a}
0x067e…069a              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0004, t01=0x0044}
0x069a…06a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0060}
0x06a4…06ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006a}
0x06ae…06d0              Head {h00=0x001e, h01=0x0050, text=»TWSTRT EQU /42C0 CIO-START«, t00=0x0004, t01=0x0074}
0x06d0…06f0              Head {h00=0x001c, h01=0x0050, text=»TWHLT EQU /4280 CIO-HALT«, t00=0x0004, t01=0x0096}
0x06f0…070e              Head {h00=0x001a, h01=0x0050, text=»TWINR EQU /4A00 INPUT «, t00=0x0004, t01=0x00b6}
0x070e…072c              Head {h00=0x001a, h01=0x0050, text=»TWOTR EQU /4200 OUTPUT«, t00=0x0004, t01=0x00d4}
0x072c…0750              Head {h00=0x0020, h01=0x0050, text=»TWSST EQU /4AC0 SENCE STATUS«, t00=0x0004, t01=0x00f2}
0x0750…075a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0116}
0x075a…0764              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0120}
0x0764…0772              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x012a}
0x0772…077c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0138}
0x077c…0786              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0142}
0x0786…0790              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x014c}
0x0790…07a6              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x0156}
0x07a6…07bc              Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0004, t01=0x016c}
0x07bc…07d2              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x0182}
0x07d2…07dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0008}
0x07dc…07e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0012}
0x07e6…0808              Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x0005, t01=0x001c}
0x0808…0824              Head {h00=0x0018, h01=0x0050, text=»LF EQU /0A LINE FEED«, t00=0x0005, t01=0x003e}
0x0824…084a              Head {h00=0x0022, h01=0x0050, text=»LNGERR EQU /8 INCORRECT LENGTH«, t00=0x0005, t01=0x005a}
0x084a…0870              Head {h00=0x0022, h01=0x0050, text=»TPERR EQU /2 THROUGHPUT ERROR «, t00=0x0005, t01=0x0080}
0x0870…089a              Head {h00=0x0026, h01=0x0050, text=»TIME EQU 300 TIME BEFORE TIME-OUT «, t00=0x0005, t01=0x00a6}
0x089a…08a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00d0}
0x08a4…08ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00da}
0x08ae…08ce              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0005, t01=0x00e4}
0x08ce…08ee              Head {h00=0x001c, h01=0x0050, text=»*  CONDITIONAL ASSEMBLY*«, t00=0x0005, t01=0x0104}
0x08ee…090e              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0005, t01=0x0124}
0x090e…0918              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0144}
0x0918…0922              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x014e}
0x0922…0934              Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0005, t01=0x0158}
0x0934…0946              Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0005, t01=0x016a}
0x0946…094e              Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x017c}
0x094e…0966              Head {h00=0x0014, h01=0x0050, text=»TIMOUT EQU X:A  «, t00=0x0005, t01=0x0184}
0x0966…097c              Head {h00=0x0012, h01=0x0050, text=»POWUP EQU X:B «, t00=0x0006, t01=0x000c}
0x097c…0984              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x0022}
0x0984…0998              Head {h00=0x0010, h01=0x0050, text=»CREDIT EQU 0«, t00=0x0006, t01=0x002a}
0x0998…09a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x003e}
0x09a2…09ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0048}
0x09ac…09b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0052}
0x09b6…09c8              Head {h00=0x000e, h01=0x0050, text=»TWAD EQU *«, t00=0x0006, t01=0x005c}
0x09c8…09ea              Head {h00=0x001e, h01=0x0050, text=» DATA TWA ACTIVATION PART «, t00=0x0006, t01=0x006e}
0x09ea…09f8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0090}
0x09f8…0a02              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x009e}
0x0a02…0a0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a8}
0x0a0c…0a42              Head {h00=0x0032, h01=0x0050, text=»*   ACTIVATION PART: CHECK VALIDITY OF ORDERS «, t00=0x0006, t01=0x00b2}
0x0a42…0a4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00e8}
0x0a4c…0a56              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f2}
0x0a56…0a68              Head {h00=0x000e, h01=0x0050, text=»TWA EQU * «, t00=0x0006, t01=0x00fc}
0x0a68…0a7a              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0006, t01=0x010e}
0x0a7a…0aa2              Head {h00=0x0024, h01=0x0050, text=» LD A2,4,A8 GET REQUESTED LENGTH«, t00=0x0006, t01=0x0120}
0x0aa2…0acc              Head {h00=0x0026, h01=0x0050, text=» ABL(Z) IHTW50 REQUESTED LENGTH =0«, t00=0x0006, t01=0x0148}
0x0acc…0ad6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0172}
0x0ad6…0ae0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x017c}
0x0ae0…0afe              Head {h00=0x001a, h01=0x0050, text=» LDR A2,A7 COPY ORDER «, t00=0x0006, t01=0x0186}
0x0afe…0b22              Head {h00=0x0020, h01=0x0050, text=» RF(NP) TWAERR REQUEST ERROR«, t00=0x0007, t01=0x0014}
0x0b22…0b34              Head {h00=0x000e, h01=0x0050, text=» SUK A2,4 «, t00=0x0007, t01=0x0038}
0x0b34…0b58              Head {h00=0x0020, h01=0x0050, text=» RF(Z) TWAERR REQUEST ERROR «, t00=0x0007, t01=0x004a}
0x0b58…0b7a              Head {h00=0x001e, h01=0x0050, text=» RF(N) TWAIN INPUT REQUEST«, t00=0x0007, t01=0x006e}
0x0b7a…0b8c              Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0007, t01=0x0090}
0x0b8c…0bb2              Head {h00=0x0022, h01=0x0050, text=» RF(NP) TWAOUT OUTPUT REQUEST «, t00=0x0007, t01=0x00a2}
0x0bb2…0bbc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c8}
0x0bbc…0bc6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00d2}
0x0bc6…0bee              Head {h00=0x0024, h01=0x0050, text=»TWAERR ABL DISIOE REQUEST ERROR «, t00=0x0007, t01=0x00dc}
0x0bee…0bfc              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0104}
0x0bfc…0c06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0112}
0x0c06…0c10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x011c}
0x0c10…0c24              Head {h00=0x0010, h01=0x0050, text=»TWAIN EQU * «, t00=0x0007, t01=0x0126}
0x0c24…0c3a              Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x0007, t01=0x013a}
0x0c3a…0c64              Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0007, t01=0x0150}
0x0c64…0c92              Head {h00=0x002a, h01=0x0050, text=» RF(Z) TWA010 NO TIMING ON THIS DEVICE«, t00=0x0007, t01=0x017a}
0x0c92…0cb6              Head {h00=0x0020, h01=0x0050, text=» LDR A1,A6 SAVE DWT-ADDRESS «, t00=0x0008, t01=0x0018}
0x0cb6…0ccc              Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0008, t01=0x003c}
0x0ccc…0ce4              Head {h00=0x0014, h01=0x0050, text=» DATA TWTUT,TIME«, t00=0x0008, t01=0x0052}
0x0ce4…0d14              Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTTP,A6 SAVE TIMER BLOCK-ADDRESS«, t00=0x0008, t01=0x006a}
0x0d14…0d20              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0008, t01=0x009a}
0x0d20…0d34              Head {h00=0x0010, h01=0x0050, text=»TWA010 EQU *«, t00=0x0008, t01=0x00a6}
0x0d34…0d48              Head {h00=0x0010, h01=0x0050, text=» IFT POWUP=1«, t00=0x0008, t01=0x00ba}
0x0d48…0d6e              Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 GET DWT-STATUS«, t00=0x0008, t01=0x00ce}
0x0d6e…0d84              Head {h00=0x0012, h01=0x0050, text=» ANKL A2,/200 «, t00=0x0008, t01=0x00f4}
0x0d84…0db8              Head {h00=0x0030, h01=0x0050, text=» RF(Z) TWA020 NOT FIRST READ AFTER POEWR UP «, t00=0x0008, t01=0x010a}
0x0db8…0dde              Head {h00=0x0022, h01=0x0050, text=» XRS A2,DWTST,A6 RESET POINTER«, t00=0x0008, t01=0x013e}
0x0dde…0df2              Head {h00=0x0010, h01=0x0050, text=» LDKL A2,-2 «, t00=0x0008, t01=0x0164}
0x0df2…0e18              Head {h00=0x0022, h01=0x0050, text=» ST A2,10,A8 INDICATE POWER UP«, t00=0x0008, t01=0x0178}
0x0e18…0e3a              Head {h00=0x001e, h01=0x0050, text=» ABL IHTW35 PERFORM ENDIO «, t00=0x0009, t01=0x000e}
0x0e3a…0e46              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0030}
0x0e46…0e60              Head {h00=0x0016, h01=0x0050, text=»TWA020 LDK A2,/21 «, t00=0x0009, t01=0x003c}
0x0e60…0e6a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0056}
0x0e6a…0e74              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0060}
0x0e74…0ea0              Head {h00=0x0028, h01=0x0050, text=»READ CF A5,STRTIO EXECUTE CIO-START «, t00=0x0009, t01=0x006a}
0x0ea0…0eb2              Head {h00=0x000e, h01=0x0050, text=» RF RED030«, t00=0x0009, t01=0x0096}
0x0eb2…0edc              Head {h00=0x0026, h01=0x0050, text=»RED020 CF A5,STREG SAVE REGISTERS «, t00=0x0009, t01=0x00a8}
0x0edc…0eea              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00d2}
0x0eea…0ef4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e0}
0x0ef4…0f16              Head {h00=0x001e, h01=0x0050, text=»*   RETURN AFTER INTERRUPT«, t00=0x0009, t01=0x00ea}
0x0f16…0f20              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x010c}
0x0f20…0f2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0116}
0x0f2a…0f3e              Head {h00=0x0010, h01=0x0050, text=»RED030 EQU *«, t00=0x0009, t01=0x0120}
0x0f3e…0f54              Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x0009, t01=0x0134}
0x0f54…0f66              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0009, t01=0x014a}
0x0f66…0f7c              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) RED037«, t00=0x0009, t01=0x015c}
0x0f7c…0f88              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0172}
0x0f88…0f9a              Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0009, t01=0x017e}
0x0f9a…0fbc              Head {h00=0x001e, h01=0x0050, text=» RF(P) RED050 ORDERS 02/03«, t00=0x0009, t01=0x0190}
0x0fbc…0fc6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0022}
0x0fc6…0fd0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x002c}
0x0fd0…1004              Head {h00=0x0030, h01=0x0050, text=»RED035 CF A5,STORE STORE CHARACTER IN BUFFER«, t00=0x000a, t01=0x0036}
0x1004…1018              Head {h00=0x0010, h01=0x0050, text=» CW A3,4,A8 «, t00=0x000a, t01=0x006a}
0x1018…1040              Head {h00=0x0024, h01=0x0050, text=» RB(L) RED020 GET NEXT CHARACTER«, t00=0x000a, t01=0x007e}
0x1040…1052              Head {h00=0x000e, h01=0x0050, text=» LDR A7,A7«, t00=0x000a, t01=0x00a6}
0x1052…1072              Head {h00=0x001c, h01=0x0050, text=» RF(Z) RED040 BASIC READ«, t00=0x000a, t01=0x00b8}
0x1072…107c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d8}
0x107c…1086              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00e2}
0x1086…10a6              Head {h00=0x001c, h01=0x0050, text=» LDK A1,LNGERR OVERFLOW «, t00=0x000a, t01=0x00ec}
0x10a6…10d0              Head {h00=0x0026, h01=0x0050, text=»RED037 ORS A1,8,A8 SET RETURN CODE«, t00=0x000a, t01=0x010c}
0x10d0…10da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0136}
0x10da…10e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0140}
0x10e4…10f2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x014a}
0x10f2…10fa              Head {h00=0x0004, h01=0x0050, t00=0x000a, t01=0x0158}
0x10fa…110e              Head {h00=0x0010, h01=0x0050, text=»RED040 EQU *«, t00=0x000a, t01=0x0160}
0x110e…1116              Head {h00=0x0004, h01=0x0050, t00=0x000a, t01=0x0174}
0x1116…112c              Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x000a, t01=0x017c}
0x112c…114e (11, 0, 400) Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x000b, t01=0x0004}
0x114e…116c              Head {h00=0x001a, h01=0x0050, text=» ANK A7,/FF MASK ORDER«, t00=0x000b, t01=0x0026}
0x116c…117e              Head {h00=0x000e, h01=0x0050, text=» CWK A7,4 «, t00=0x000b, t01=0x0044}
0x117e…11a0              Head {h00=0x001e, h01=0x0050, text=» RF(G) RED045 WRITE ORDER «, t00=0x000b, t01=0x0056}
0x11a0…11c6              Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTTP,A6 TIMER POINTER «, t00=0x000b, t01=0x0078}
0x11c6…11f4              Head {h00=0x002a, h01=0x0050, text=» RF(Z) RED045 NO TIMIMG ON THIS DEVICE«, t00=0x000b, t01=0x009e}
0x11f4…1216              Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x000b, t01=0x00cc}
0x1216…1222              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x00ee}
0x1222…122a              Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x00fa}
0x122a…123e              Head {h00=0x0010, h01=0x0050, text=»RED045 EQU *«, t00=0x000b, t01=0x0102}
0x123e…1264              Head {h00=0x0022, h01=0x0050, text=» CF A5,HLTIO EXECUTE CIO-HALT «, t00=0x000b, t01=0x0116}
0x1264…1286              Head {h00=0x001e, h01=0x0050, text=» ABL IHTW40 PERFORM TENDIO«, t00=0x000b, t01=0x013c}
0x1286…1294              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x015e}
0x1294…129e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x016c}
0x129e…12a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0176}
0x12a8…12b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0180}
0x12b2…12ca              Head {h00=0x0014, h01=0x0050, text=»*   ORDERS 02,03«, t00=0x000b, t01=0x018a}
0x12ca…12d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0012}
0x12d4…12de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x001c}
0x12de…12f2              Head {h00=0x0010, h01=0x0050, text=»RED050 EQU *«, t00=0x000c, t01=0x0026}
0x12f2…1318              Head {h00=0x0022, h01=0x0050, text=» LD A1,10,A8 GET CONTROL WORD «, t00=0x000c, t01=0x003a}
0x1318…133a              Head {h00=0x001e, h01=0x0050, text=» RF(Z) RED080 NO KEYTABLE «, t00=0x000c, t01=0x0060}
0x133a…1360              Head {h00=0x0022, h01=0x0050, text=» LCR A4,A1 GET NUMBER OF KEYS «, t00=0x000c, t01=0x0082}
0x1360…1374              Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x000c, t01=0x00a8}
0x1374…139a              Head {h00=0x0022, h01=0x0050, text=» ADR A1,A4 ADDRESS TO LAST KEY«, t00=0x000c, t01=0x00bc}
0x139a…13ac              Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x000c, t01=0x00e2}
0x13ac…13c4              Head {h00=0x0014, h01=0x0050, text=»RED060 SUK A4,1 «, t00=0x000c, t01=0x00f4}
0x13c4…13ee              Head {h00=0x0026, h01=0x0050, text=» RF(N) RED080 KEY NOT IN KEYTABLE «, t00=0x000c, t01=0x010c}
0x13ee…1412              Head {h00=0x0020, h01=0x0050, text=» SUK A1,1 DECREMENT ADDRESS «, t00=0x000c, t01=0x0136}
0x1412…143a              Head {h00=0x0024, h01=0x0050, text=» CCR A2,A1 CHECK IF IN KEYTABLE «, t00=0x000c, t01=0x015a}
0x143a…1460              Head {h00=0x0022, h01=0x0050, text=» RB(NE) RED060 NOT IN KEYTABLE«, t00=0x000c, t01=0x0182}
0x1460…1480              Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 DOUBLE INDEX «, t00=0x000d, t01=0x0018}
0x1480…14b0              Head {h00=0x002c, h01=0x0050, text=» ST A4,10,A8 STORE INDEX IN CONTROL WORD«, t00=0x000d, t01=0x0038}
0x14b0…14e0              Head {h00=0x002c, h01=0x0050, text=»RED070 CF A5,STORE STORE KEY IN KEYTABLE«, t00=0x000d, t01=0x0068}
0x14e0…1504              Head {h00=0x0020, h01=0x0050, text=» RB RED040 EXECUTE CIO-HALT «, t00=0x000d, t01=0x0098}
0x1504…1522              Head {h00=0x001a, h01=0x0050, text=»RED080 CC A2,TWEOF,A6 «, t00=0x000d, t01=0x00bc}
0x1522…1548              Head {h00=0x0022, h01=0x0050, text=» RB(E) RED070 STANDARD EOR-KEY«, t00=0x000d, t01=0x00da}
0x1548…1560              Head {h00=0x0014, h01=0x0050, text=» CC A2,TWBSP,A6 «, t00=0x000d, t01=0x0100}
0x1560…1580              Head {h00=0x001c, h01=0x0050, text=» RF(E) RED110 BACKSPACE «, t00=0x000d, t01=0x0118}
0x1580…1598              Head {h00=0x0014, h01=0x0050, text=» CC A2,TWCLR,A6 «, t00=0x000d, t01=0x0138}
0x1598…15b4              Head {h00=0x0018, h01=0x0050, text=» RF(E) RED110 CLEAR «, t00=0x000d, t01=0x0150}
0x15b4…15c2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x016c}
0x15c2…15cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x017a}
0x15cc…15d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0184}
0x15d6…1602              Head {h00=0x0028, h01=0x0050, text=»*   CHARACTER NOT FOUND IN KEYTABLE «, t00=0x000d, t01=0x018e}
0x1602…160c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x002a}
0x160c…1616              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0034}
0x1616…1620              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003e}
0x1620…1648              Head {h00=0x0024, h01=0x0050, text=»RED090 LDR A4,A2 COPY CHARACTER «, t00=0x000e, t01=0x0048}
0x1648…1660              Head {h00=0x0014, h01=0x0050, text=» ANK A4,/FF MASK«, t00=0x000e, t01=0x0070}
0x1660…1672              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x000e, t01=0x0088}
0x1672…1684              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000e, t01=0x009a}
0x1684…16a2              Head {h00=0x001a, h01=0x0050, text=» RF(Z) RED100 ORDER 02«, t00=0x000e, t01=0x00ac}
0x16a2…16be              Head {h00=0x0018, h01=0x0050, text=» SUK A4,/30 ORDER 03«, t00=0x000e, t01=0x00ca}
0x16be…16e2              Head {h00=0x0020, h01=0x0050, text=» RF(N) CODERR LESS THAN /30 «, t00=0x000e, t01=0x00e6}
0x16e2…16f4              Head {h00=0x000e, h01=0x0050, text=» SUK A4,/9«, t00=0x000e, t01=0x010a}
0x16f4…171a              Head {h00=0x0022, h01=0x0050, text=» RF(P) CODERR GREATER THAN /39«, t00=0x000e, t01=0x011c}
0x171a…172c              Head {h00=0x000e, h01=0x0050, text=» RF RED110«, t00=0x000e, t01=0x0142}
0x172c…1736              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0154}
0x1736…1740              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x015e}
0x1740…175a              Head {h00=0x0016, h01=0x0050, text=»RED100 SUK A4,/20 «, t00=0x000e, t01=0x0168}
0x175a…177e              Head {h00=0x0020, h01=0x0050, text=» RF(N) CODERR LESS THAN /20 «, t00=0x000e, t01=0x0182}
0x177e…1792              Head {h00=0x0010, h01=0x0050, text=» SUK A4,/3F «, t00=0x000f, t01=0x0016}
0x1792…17ba              Head {h00=0x0024, h01=0x0050, text=» RF(NP) RED110 CORRECT CHARACTER«, t00=0x000f, t01=0x002a}
0x17ba…17c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0052}
0x17c4…17ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x005c}
0x17ce…17f6              Head {h00=0x0024, h01=0x0050, text=»CODERR LDK A1,4 CODE CHECK ERROR«, t00=0x000f, t01=0x0066}
0x17f6…180a              Head {h00=0x0010, h01=0x0050, text=» ORS A1,8,A8«, t00=0x000f, t01=0x008e}
0x180a…183c              Head {h00=0x002e, h01=0x0050, text=» CF A5,STORE STORE CHARACTER IN ECB-BUFFER«, t00=0x000f, t01=0x00a2}
0x183c…1860              Head {h00=0x0020, h01=0x0050, text=» RB RED040 EXECUTE CIO-HALT «, t00=0x000f, t01=0x00d4}
0x1860…186a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f8}
0x186a…1874              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0102}
0x1874…1882              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x010c}
0x1882…188c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x011a}
0x188c…1896              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0124}
0x1896…18a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x012e}
0x18a0…18be              Head {h00=0x001a, h01=0x0050, text=»RED110 CC A2,TWBSP,A6 «, t00=0x000f, t01=0x0138}
0x18be…18de              Head {h00=0x001c, h01=0x0050, text=» RF(E) RED120 BACKSPACE «, t00=0x000f, t01=0x0156}
0x18de…18f6              Head {h00=0x0014, h01=0x0050, text=» CC A2,TWCLR,A6 «, t00=0x000f, t01=0x0176}
0x18f6…190c              Head {h00=0x0012, h01=0x0050, text=» RB(NE) RED035«, t00=0x000f, t01=0x018e}
0x190c…1916              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0014}
0x1916…1920              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x001e}
0x1920…1942              Head {h00=0x001e, h01=0x0050, text=» LDK A3,0 CLEAR ECB-BUFFER«, t00=0x0010, t01=0x0028}
0x1942…1968              Head {h00=0x0022, h01=0x0050, text=» RB RED020 GET NEXT CHARACTER «, t00=0x0010, t01=0x004a}
0x1968…1972              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0070}
0x1972…197c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x007a}
0x197c…199e              Head {h00=0x001e, h01=0x0050, text=»RED120 SUK A3,1 BACKSPACE «, t00=0x0010, t01=0x0084}
0x199e…19c8              Head {h00=0x0026, h01=0x0050, text=» RB(NN) RED020 GET NEXT CHARACTER «, t00=0x0010, t01=0x00a6}
0x19c8…19da              Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0010, t01=0x00d0}
0x19da…1a00              Head {h00=0x0022, h01=0x0050, text=» RB RED020 GET NEXT CHARACTER «, t00=0x0010, t01=0x00e2}
0x1a00…1a0a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0108}
0x1a0a…1a14              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0112}
0x1a14…1a1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x011c}
0x1a1e…1a2c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0126}
0x1a2c…1a36              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0134}
0x1a36…1a40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x013e}
0x1a40…1a56              Head {h00=0x0012, h01=0x0050, text=»*   W R I T E «, t00=0x0010, t01=0x0148}
0x1a56…1a60              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x015e}
0x1a60…1a98              Head {h00=0x0034, h01=0x0050, text=»*   ORDERS 05 AND 06:  BASIC AND STANDARD WRITE «, t00=0x0010, t01=0x0168}
0x1a98…1aa2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0010}
0x1aa2…1aac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x001a}
0x1aac…1ac0              Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0011, t01=0x0024}
0x1ac0…1ad4              Head {h00=0x0010, h01=0x0050, text=»TWAOUT EQU *«, t00=0x0011, t01=0x0038}
0x1ad4…1ae0              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0011, t01=0x004c}
0x1ae0…1af2              Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0011, t01=0x0058}
0x1af2…1b04              Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0011, t01=0x006a}
0x1b04…1b2c              Head {h00=0x0024, h01=0x0050, text=» CF A5,STRTIO EXECUTE CIO-START «, t00=0x0011, t01=0x007c}
0x1b2c…1b36              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00a4}
0x1b36…1b40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ae}
0x1b40…1b52              Head {h00=0x000e, h01=0x0050, text=» CWK A7,5 «, t00=0x0011, t01=0x00b8}
0x1b52…1b70              Head {h00=0x001a, h01=0x0050, text=» RF(Z) WRT050 ORDER 05«, t00=0x0011, t01=0x00ca}
0x1b70…1b7a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00e8}
0x1b7a…1b84              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f2}
0x1b84…1baa              Head {h00=0x0022, h01=0x0050, text=» LD A3,2,A8 GET BUFFER ADDRESS«, t00=0x0011, t01=0x00fc}
0x1baa…1bd0              Head {h00=0x0022, h01=0x0050, text=» LC A3,1,A3 CONTROL CHARACTER «, t00=0x0011, t01=0x0122}
0x1bd0…1be4              Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0011, t01=0x0148}
0x1be4…1bf8              Head {h00=0x0010, h01=0x0050, text=» SUK A3,/2B «, t00=0x0011, t01=0x015c}
0x1bf8…1c1a              Head {h00=0x001e, h01=0x0050, text=» RF(Z) WRT030 NO CR OR LF «, t00=0x0011, t01=0x0170}
0x1c1a…1c24 (18, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0004}
0x1c24…1c2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x000e}
0x1c2e…1c5e              Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTHP,A6 HEAD POSITION INDICATOR «, t00=0x0012, t01=0x0018}
0x1c5e…1c70              Head {h00=0x000e, h01=0x0050, text=» LDK A4,2 «, t00=0x0012, t01=0x0048}
0x1c70…1c98              Head {h00=0x0024, h01=0x0050, text=» LDK A2,CR SEND CARRIAGE RETURN «, t00=0x0012, t01=0x005a}
0x1c98…1ca6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0082}
0x1ca6…1cb0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0090}
0x1cb0…1cba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x009a}
0x1cba…1cc4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00a4}
0x1cc4…1cec              Head {h00=0x0024, h01=0x0050, text=»WRT010 CF A5,OTR SEND CHARACTER «, t00=0x0012, t01=0x00ae}
0x1cec…1cf6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00d6}
0x1cf6…1d00              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e0}
0x1d00…1d12              Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0012, t01=0x00ea}
0x1d12…1d28              Head {h00=0x0012, h01=0x0050, text=» RF(NP) WRT020«, t00=0x0012, t01=0x00fc}
0x1d28…1d48              Head {h00=0x001c, h01=0x0050, text=»WRT015 LDK A2,LF SEND LF«, t00=0x0012, t01=0x0112}
0x1d48…1d5a              Head {h00=0x000e, h01=0x0050, text=» RB WRT010«, t00=0x0012, t01=0x0132}
0x1d5a…1d64              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0144}
0x1d64…1d7c              Head {h00=0x0014, h01=0x0050, text=»WRT020 SUK A3,5 «, t00=0x0012, t01=0x014e}
0x1d7c…1da0              Head {h00=0x0020, h01=0x0050, text=» RB(Z) WRT015 SEND SECOND LF«, t00=0x0012, t01=0x0166}
0x1da0…1db2              Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0012, t01=0x018a}
0x1db2…1dca              Head {h00=0x0014, h01=0x0050, text=» RF(NZ) WRT030  «, t00=0x0013, t01=0x000c}
0x1dca…1dec              Head {h00=0x001e, h01=0x0050, text=» LDK A2,/0C SEND FORM FEED«, t00=0x0013, t01=0x0024}
0x1dec…1dfe              Head {h00=0x000e, h01=0x0050, text=» RB WRT010«, t00=0x0013, t01=0x0046}
0x1dfe…1e24              Head {h00=0x0022, h01=0x0050, text=»WRT030 LDK A3,2 BUFFER POINTER«, t00=0x0013, t01=0x0058}
0x1e24…1e44              Head {h00=0x001c, h01=0x0050, text=» RF WRT050 GET CHARACTER«, t00=0x0013, t01=0x007e}
0x1e44…1e4e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x009e}
0x1e4e…1e58              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a8}
0x1e58…1e62              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00b2}
0x1e62…1e76              Head {h00=0x0010, h01=0x0050, text=»WRT040 EQU *«, t00=0x0013, t01=0x00bc}
0x1e76…1e98              Head {h00=0x001e, h01=0x0050, text=» CF A5,OTR SEND CHARACTER «, t00=0x0013, t01=0x00d0}
0x1e98…1ec4              Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 INCREMENT BYTE COUNTER «, t00=0x0013, t01=0x00f2}
0x1ec4…1ed2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x011e}
0x1ed2…1edc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x012c}
0x1edc…1ee6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0136}
0x1ee6…1ef0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0140}
0x1ef0…1f2a              Head {h00=0x0036, h01=0x0050, text=»WRT050 CF A5,GETCHR GET CHARACTER FROM ECB-BUFFER «, t00=0x0013, t01=0x014a}
0x1f2a…1f3e              Head {h00=0x0010, h01=0x0050, text=» LDR A1,A1  «, t00=0x0013, t01=0x0184}
0x1f3e…1f62              Head {h00=0x0020, h01=0x0050, text=» RB(Z) RED040 LAST CHARACTER«, t00=0x0014, t01=0x0008}
0x1f62…1f74              Head {h00=0x000e, h01=0x0050, text=» CWK A7,5 «, t00=0x0014, t01=0x002c}
0x1f74…1f96              Head {h00=0x001e, h01=0x0050, text=» RB(Z) WRT040 BASIC WRITE «, t00=0x0014, t01=0x003e}
0x1f96…1fa0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0060}
0x1fa0…1faa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x006a}
0x1faa…1fd6              Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 ORDER 06: STANDARD WRITE «, t00=0x0014, t01=0x0074}
0x1fd6…1fea              Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x0014, t01=0x00a0}
0x1fea…1ffe              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/07 «, t00=0x0014, t01=0x00b4}
0x1ffe…2018              Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRT040 BELL«, t00=0x0014, t01=0x00c8}
0x2018…2022              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00e2}
0x2022…2034              Head {h00=0x000e, h01=0x0050, text=» SUK A1,/A«, t00=0x0014, t01=0x00ec}
0x2034…2054              Head {h00=0x001c, h01=0x0050, text=» RF(E) WRTTAB TABULATION«, t00=0x0014, t01=0x00fe}
0x2054…205e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x011e}
0x205e…2070              Head {h00=0x000e, h01=0x0050, text=» SUK A1,/F«, t00=0x0014, t01=0x0128}
0x2070…2094              Head {h00=0x0020, h01=0x0050, text=» RF(L) ERRCOD LESS THAN /20 «, t00=0x0014, t01=0x013a}
0x2094…20a8              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/3F «, t00=0x0014, t01=0x015e}
0x20a8…20ce              Head {h00=0x0022, h01=0x0050, text=» RB(NP) WRT040 BETWEEN /20-/5F«, t00=0x0014, t01=0x0172}
0x20ce…20e2              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/20 «, t00=0x0015, t01=0x0008}
0x20e2…2108              Head {h00=0x0022, h01=0x0050, text=» RF(NP) WRT060 BETWEEN /60-/7F«, t00=0x0015, t01=0x001c}
0x2108…2112              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0042}
0x2112…211c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x004c}
0x211c…2134              Head {h00=0x0014, h01=0x0050, text=»ERRCOD LDK A1,4 «, t00=0x0015, t01=0x0056}
0x2134…2148              Head {h00=0x0010, h01=0x0050, text=» ORS A1,8,A8«, t00=0x0015, t01=0x006e}
0x2148…216e              Head {h00=0x0022, h01=0x0050, text=» RB WRT050 GET NEXT CHARACTER «, t00=0x0015, t01=0x0082}
0x216e…2178              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a8}
0x2178…2182              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00b2}
0x2182…219c              Head {h00=0x0016, h01=0x0050, text=»WRT060 SUK A2,/20 «, t00=0x0015, t01=0x00bc}
0x219c…21ae              Head {h00=0x000e, h01=0x0050, text=» RB WRT040«, t00=0x0015, t01=0x00d6}
0x21ae…21b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00e8}
0x21b8…21c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f2}
0x21c2…21d0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x00fc}
0x21d0…21da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x010a}
0x21da…21e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0114}
0x21e4…2204              Head {h00=0x001c, h01=0x0050, text=»*   T A B U L A T I O N «, t00=0x0015, t01=0x011e}
0x2204…220e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x013e}
0x220e…2218              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0148}
0x2218…222c              Head {h00=0x0010, h01=0x0050, text=»WRTTAB EQU *«, t00=0x0015, t01=0x0152}
0x222c…2262              Head {h00=0x0032, h01=0x0050, text=» CF A5,GETCHR GET FIRST TAB.POSITION CHARACTER«, t00=0x0015, t01=0x0166}
0x2262…227a              Head {h00=0x0014, h01=0x0050, text=» LDR A4,A2 COPY «, t00=0x0016, t01=0x000c}
0x227a…22b2              Head {h00=0x0034, h01=0x0050, text=» CF A5,GETCHR GET SECOND TAB. POSITION CHARACTER«, t00=0x0016, t01=0x0024}
0x22b2…22c4              Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x0016, t01=0x005c}
0x22c4…22d6              Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x0016, t01=0x006e}
0x22d6…22ec              Head {h00=0x0012, h01=0x0050, text=» RF(Z) TAB020 «, t00=0x0016, t01=0x0080}
0x22ec…2304              Head {h00=0x0014, h01=0x0050, text=»TAB010 ADK A2,/A«, t00=0x0016, t01=0x0096}
0x2304…2316              Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0016, t01=0x00ae}
0x2316…232c              Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TAB010«, t00=0x0016, t01=0x00c0}
0x232c…2336              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00d6}
0x2336…2354              Head {h00=0x001a, h01=0x0050, text=»TAB020 SU A2,DWTHP,A6 «, t00=0x0016, t01=0x00e0}
0x2354…238c              Head {h00=0x0034, h01=0x0050, text=» LC A4,DWTBC,A6 GET NUMBER OF OUTPUT CHARACTERS «, t00=0x0016, t01=0x00fe}
0x238c…23ba              Head {h00=0x002a, h01=0x0050, text=» SUR A2,A4 NUMBER OF SPACES TO BE SENT«, t00=0x0016, t01=0x0136}
0x23ba…23ea              Head {h00=0x002c, h01=0x0050, text=» RB(NP) WRT050 NO SPACES SHOULD BE SENT «, t00=0x0016, t01=0x0164}
0x23ea…23fc (23, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0017, t01=0x0004}
0x23fc…2422              Head {h00=0x0022, h01=0x0050, text=»TAB030 LDK A2,/20 SEND BALNKS «, t00=0x0017, t01=0x0016}
0x2422…244a              Head {h00=0x0024, h01=0x0050, text=»TAB040 CF A5,OTR SEND CHARACTER «, t00=0x0017, t01=0x003c}
0x244a…2476              Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 INCREMENT BYTE COUNTER «, t00=0x0017, t01=0x0064}
0x2476…2488              Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0017, t01=0x0090}
0x2488…24b2              Head {h00=0x0026, h01=0x0050, text=» RB(NZ) TAB030 SEND ANOTHER SPACE «, t00=0x0017, t01=0x00a2}
0x24b2…24c4              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0017, t01=0x00cc}
0x24c4…24e8              Head {h00=0x0020, h01=0x0050, text=» RB(NZ) WRT050 NOT RECOVERY «, t00=0x0017, t01=0x00de}
0x24e8…2512              Head {h00=0x0026, h01=0x0050, text=» SC A4,DWTBC,A6 RESET BYTE COUNTER«, t00=0x0017, t01=0x0102}
0x2512…2538              Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 PRESET BUFFER INDEX «, t00=0x0017, t01=0x012c}
0x2538…255e              Head {h00=0x0022, h01=0x0050, text=» RB WRT050 GET NEXT CHARACTER «, t00=0x0017, t01=0x0152}
0x255e…256c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0178}
0x256c…2576              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0186}
0x2576…2580              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0190}
0x2580…259c              Head {h00=0x0018, h01=0x0050, text=»*   RECOVERY ROUTINE«, t00=0x0018, t01=0x000a}
0x259c…25a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0026}
0x25a6…25b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0030}
0x25b0…25ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x003a}
0x25ba…25cc              Head {h00=0x000e, h01=0x0050, text=»TWON EQU *«, t00=0x0018, t01=0x0044}
0x25cc…25e2              Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x0018, t01=0x0056}
0x25e2…260a              Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWTW01 GET DWT-ADDRESS «, t00=0x0018, t01=0x006c}
0x260a…261e              Head {h00=0x0010, h01=0x0050, text=» IFT POWUP=1«, t00=0x0018, t01=0x0094}
0x261e…2634              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/200 «, t00=0x0018, t01=0x00a8}
0x2634…265e              Head {h00=0x0026, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE POWER UP«, t00=0x0018, t01=0x00be}
0x265e…266a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00e8}
0x266a…2682              Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0018, t01=0x00f4}
0x2682…26a6              Head {h00=0x0020, h01=0x0050, text=» RF(N) EXIT DEVICE NOT BUSY «, t00=0x0018, t01=0x010c}
0x26a6…26c4              Head {h00=0x001a, h01=0x0050, text=»TWON10 LD A3,DWTA3,A6 «, t00=0x0018, t01=0x0130}
0x26c4…26e6              Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x0018, t01=0x014e}
0x26e6…26fa              Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0018, t01=0x0170}
0x26fa…271e              Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB-ADDRESS«, t00=0x0018, t01=0x0184}
0x271e…2734              Head {h00=0x0012, h01=0x0050, text=» LDK A5,DWTSB2«, t00=0x0019, t01=0x0018}
0x2734…2756              Head {h00=0x001e, h01=0x0050, text=» ADR A5,A6 GET STACK BASE «, t00=0x0019, t01=0x002e}
0x2756…2768              Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x0019, t01=0x0050}
0x2768…278e              Head {h00=0x0022, h01=0x0050, text=» ABL(N) TWA010 ORDERS 01,02,03«, t00=0x0019, t01=0x0062}
0x278e…27a0              Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0019, t01=0x0088}
0x27a0…27be              Head {h00=0x001a, h01=0x0050, text=» RF(Z) TWON20 ORDER 05«, t00=0x0019, t01=0x009a}
0x27be…27ca              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0019, t01=0x00b8}
0x27ca…27dc              Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0019, t01=0x00c4}
0x27dc…2804              Head {h00=0x0024, h01=0x0050, text=» CF A5,STRTIO EXECUTE CIO-START «, t00=0x0019, t01=0x00d6}
0x2804…2816              Head {h00=0x000e, h01=0x0050, text=» LDK A2,CR«, t00=0x0019, t01=0x00fe}
0x2816…2828              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0019, t01=0x0110}
0x2828…2840              Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTHP,A6 «, t00=0x0019, t01=0x0122}
0x2840…2852              Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0019, t01=0x013a}
0x2852…287a              Head {h00=0x0024, h01=0x0050, text=» RB TAB040 REPRINT LAST REQUEST «, t00=0x0019, t01=0x014c}
0x287a…2884              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0174}
0x2884…28a8              Head {h00=0x0020, h01=0x0050, text=»TWON20 LDK A1,TPERR ORDER 05«, t00=0x0019, t01=0x017e}
0x28a8…28bc              Head {h00=0x0010, h01=0x0050, text=» ABL DISEND «, t00=0x001a, t01=0x0012}
0x28bc…28c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0026}
0x28c6…28d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0030}
0x28d0…28de              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x003a}
0x28de…28e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0048}
0x28e8…28f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0052}
0x28f2…2906              Head {h00=0x0010, h01=0x0050, text=»*   I H T W «, t00=0x001a, t01=0x005c}
0x2906…2910              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0070}
0x2910…2944              Head {h00=0x0030, h01=0x0050, text=»*   INTERRUPT HANDLER: PROCESS OF INTERRUPT «, t00=0x001a, t01=0x007a}
0x2944…294e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00ae}
0x294e…2958              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00b8}
0x2958…296a              Head {h00=0x000e, h01=0x0050, text=»IHTW EQU *«, t00=0x001a, t01=0x00c2}
0x296a…2992              Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x001a, t01=0x00d4}
0x2992…29a8              Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x001a, t01=0x00fc}
0x29a8…29c0              Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWTW01 «, t00=0x001a, t01=0x0112}
0x29c0…29d4              Head {h00=0x0010, h01=0x0050, text=»LDREG EQU * «, t00=0x001a, t01=0x012a}
0x29d4…29ec              Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x001a, t01=0x013e}
0x29ec…2a10              Head {h00=0x0020, h01=0x0050, text=» RF(N) SKIP DEVICE NOT BUSY «, t00=0x001a, t01=0x0156}
0x2a10…2a3c              Head {h00=0x0028, h01=0x0050, text=»IHTW10 LDR* A2,A6 GET DEVICE ADDRESS«, t00=0x001a, t01=0x017a}
0x2a3c…2a52              Head {h00=0x0012, h01=0x0050, text=» ORKL A2,TWSST«, t00=0x001b, t01=0x0016}
0x2a52…2a6e              Head {h00=0x0018, h01=0x0050, text=» EXR A2 EXECUTE SST «, t00=0x001b, t01=0x002c}
0x2a6e…2a8a              Head {h00=0x0018, h01=0x0050, text=» RF(A) IHTW30 ENDIO «, t00=0x001b, t01=0x0048}
0x2a8a…2aac              Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x001b, t01=0x0064}
0x2aac…2ac0              Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x001b, t01=0x0086}
0x2ac0…2ad2              Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x001b, t01=0x009a}
0x2ad2…2ae8              Head {h00=0x0012, h01=0x0050, text=» RF(P) IHTW30 «, t00=0x001b, t01=0x00ac}
0x2ae8…2b0e              Head {h00=0x0022, h01=0x0050, text=» LDR* A2,A6 GET DEVICE ADDRESS«, t00=0x001b, t01=0x00c2}
0x2b0e…2b26              Head {h00=0x0014, h01=0x0050, text=» ORKL A2,TWINR  «, t00=0x001b, t01=0x00e8}
0x2b26…2b42              Head {h00=0x0018, h01=0x0050, text=» EXR A2 EXECUTE INR «, t00=0x001b, t01=0x0100}
0x2b42…2b6a              Head {h00=0x0024, h01=0x0050, text=» ANK A2,/7F MASK INPUT-CHARACTER«, t00=0x001b, t01=0x011c}
0x2b6a…2b78              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0144}
0x2b78…2b82              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0152}
0x2b82…2b98              Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x001b, t01=0x015c}
0x2b98…2bc2              Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTTP,A6 GET TIMER POINTER «, t00=0x001b, t01=0x0172}
0x2bc2…2bf0              Head {h00=0x002a, h01=0x0050, text=» RF(Z) IHTW30 NO TIMING ON THIS DEVICE«, t00=0x001c, t01=0x000c}
0x2bf0…2c06              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,-TIME«, t00=0x001c, t01=0x003a}
0x2c06…2c1e              Head {h00=0x0014, h01=0x0050, text=» ST* A1,DWTTP,A6«, t00=0x001c, t01=0x0050}
0x2c1e…2c2a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0068}
0x2c2a…2c34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0074}
0x2c34…2c3e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x007e}
0x2c3e…2c56              Head {h00=0x0014, h01=0x0050, text=»IHTW30 LDK A1,0 «, t00=0x001c, t01=0x0088}
0x2c56…2c7a              Head {h00=0x0020, h01=0x0050, text=» RF LDREGE RESTORE REGISTERS«, t00=0x001c, t01=0x00a0}
0x2c7a…2c82              Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x00c4}
0x2c82…2c8a              Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x00cc}
0x2c8a…2c9e              Head {h00=0x0010, h01=0x0050, text=»IHTW35 EQU *«, t00=0x001c, t01=0x00d4}
0x2c9e…2cba              Head {h00=0x0018, h01=0x0050, text=» IFT POWUP+TIMOUT=2 «, t00=0x001c, t01=0x00e8}
0x2cba…2cc2              Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0104}
0x2cc2…2ce8              Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTTP,A6 TIMER POINTER «, t00=0x001c, t01=0x010c}
0x2ce8…2d16              Head {h00=0x002a, h01=0x0050, text=» RF(Z) IHTW40 NO TIMING ON THIS DEVICE«, t00=0x001c, t01=0x0132}
0x2d16…2d38              Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x001c, t01=0x0160}
0x2d38…2d44              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0182}
0x2d44…2d52              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x018e}
0x2d52…2d5c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x000c}
0x2d5c…2d66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0016}
0x2d66…2d7a              Head {h00=0x0010, h01=0x0050, text=»IHTW40 EQU *«, t00=0x001d, t01=0x0020}
0x2d7a…2d84              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0034}
0x2d84…2d8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x003e}
0x2d8e…2dbe              Head {h00=0x002c, h01=0x0050, text=»IHTW50 ST A3,6,A8 SAVE EFFECTIVE LENGTH «, t00=0x001d, t01=0x0048}
0x2dbe…2dd6              Head {h00=0x0014, h01=0x0050, text=»IHTW55 SUK A7,4 «, t00=0x001d, t01=0x0078}
0x2dd6…2df8              Head {h00=0x001e, h01=0x0050, text=» RF(NP) IHTW60 READ ORDER «, t00=0x001d, t01=0x0090}
0x2df8…2e02              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00b2}
0x2e02…2e0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00bc}
0x2e0c…2e34              Head {h00=0x0024, h01=0x0050, text=» LC A3,DWTBC,A6 GET BYTE COUNTER«, t00=0x001d, t01=0x00c6}
0x2e34…2e62              Head {h00=0x002a, h01=0x0050, text=» ADS A3,DWTHP,A6 UPDATE HEAD POSITION «, t00=0x001d, t01=0x00ee}
0x2e62…2e74              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x001d, t01=0x011c}
0x2e74…2e9e              Head {h00=0x0026, h01=0x0050, text=» SC A3,DWTBC,A6 CLEAR BYTE COUNTER«, t00=0x001d, t01=0x012e}
0x2e9e…2ea8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0158}
0x2ea8…2ebc              Head {h00=0x0010, h01=0x0050, text=»IHTW60 EQU *«, t00=0x001d, t01=0x0162}
0x2ebc…2ed2              Head {h00=0x0012, h01=0x0050, text=» IFT CREDIT=1 «, t00=0x001d, t01=0x0176}
0x2ed2…2ef4              Head {h00=0x001e, h01=0x0050, text=» LD A1,10,A8 CONVERT INDEX«, t00=0x001d, t01=0x018c}
0x2ef4…2f06              Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x001e, t01=0x001e}
0x2f06…2f18              Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x001e, t01=0x0030}
0x2f18…2f2c              Head {h00=0x0010, h01=0x0050, text=» ST A1,10,A8«, t00=0x001e, t01=0x0042}
0x2f2c…2f38              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0056}
0x2f38…2f4a              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x001e, t01=0x0062}
0x2f4a…2f6c              Head {h00=0x001e, h01=0x0050, text=» ABL DISEND PERFORM TENDIO«, t00=0x001e, t01=0x0074}
0x2f6c…2f76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0096}
0x2f76…2f80              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00a0}
0x2f80…2fa6              Head {h00=0x0022, h01=0x0050, text=»SKIP LDR* A2,A6 SKIP CHARACTER«, t00=0x001e, t01=0x00aa}
0x2fa6…2fbc              Head {h00=0x0012, h01=0x0050, text=» ORKL A2,TWSST«, t00=0x001e, t01=0x00d0}
0x2fbc…2fd0              Head {h00=0x0010, h01=0x0050, text=» EXR A2 SST «, t00=0x001e, t01=0x00e6}
0x2fd0…2fe4              Head {h00=0x0010, h01=0x0050, text=» RF(A) EXIT «, t00=0x001e, t01=0x00fa}
0x2fe4…2ff8              Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x001e, t01=0x010e}
0x2ff8…300e              Head {h00=0x0012, h01=0x0050, text=» ORKL A2,TWHLT«, t00=0x001e, t01=0x0122}
0x300e…3026              Head {h00=0x0014, h01=0x0050, text=» EXR A2 CIO-HALT«, t00=0x001e, t01=0x0138}
0x3026…3036              Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x001e, t01=0x0150}
0x3036…3044              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x0160}
0x3044…304e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x016e}
0x304e…3058              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0178}
0x3058…3062              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0182}
0x3062…307a              Head {h00=0x0014, h01=0x0050, text=»*   I/O COMMANDS«, t00=0x001e, t01=0x018c}
0x307a…3084              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0014}
0x3084…308e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x001e}
0x308e…30be              Head {h00=0x002c, h01=0x0050, text=»STRTIO LDKL A1,TWSTRT EXECUTE CIO-START «, t00=0x001f, t01=0x0028}
0x30be…30d0              Head {h00=0x000e, h01=0x0050, text=» RF EXECIO«, t00=0x001f, t01=0x0058}
0x30d0…30fc              Head {h00=0x0028, h01=0x0050, text=»HLTIO LDKL A1,TWHLT         CIO-HALT«, t00=0x001f, t01=0x006a}
0x30fc…310e              Head {h00=0x000e, h01=0x0050, text=» RF EXECIO«, t00=0x001f, t01=0x0096}
0x310e…3134              Head {h00=0x0022, h01=0x0050, text=»OTR LDKL A1,TWOTR         OTR «, t00=0x001f, t01=0x00a8}
0x3134…313e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00ce}
0x313e…3148              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00d8}
0x3148…3172              Head {h00=0x0026, h01=0x0050, text=»EXECIO ORR* A1,A6 GET I/O-COMMAND «, t00=0x001f, t01=0x00e2}
0x3172…3192              Head {h00=0x001c, h01=0x0050, text=» EXR A1 EXECUTE COMMAND «, t00=0x001f, t01=0x010c}
0x3192…31a6              Head {h00=0x0010, h01=0x0050, text=» RF(NA) HALT«, t00=0x001f, t01=0x012c}
0x31a6…31ba              Head {h00=0x0010, h01=0x0050, text=»STREG EQU * «, t00=0x001f, t01=0x0140}
0x31ba…31d0              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/100 «, t00=0x001f, t01=0x0154}
0x31d0…3204              Head {h00=0x0030, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED«, t00=0x001f, t01=0x016a}
0x3204…322c              Head {h00=0x0024, h01=0x0050, text=» ST A3,DWTA3,A6 SAVE REGISTER A3«, t00=0x0020, t01=0x000e}
0x322c…3254              Head {h00=0x0024, h01=0x0050, text=» ST A4,DWTA4,A6               A4«, t00=0x0020, t01=0x0036}
0x3254…327c              Head {h00=0x0024, h01=0x0050, text=» ST A5,DWTA5,A6               A5«, t00=0x0020, t01=0x005e}
0x327c…3292              Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0020, t01=0x0086}
0x3292…32ae              Head {h00=0x0018, h01=0x0050, text=»HALT ST A2,DWTA2,A6 «, t00=0x0020, t01=0x009c}
0x32ae…32d4              Head {h00=0x0022, h01=0x0050, text=» CF A5,HLTIO EXECUTE CIO-HALT «, t00=0x0020, t01=0x00b8}
0x32d4…32ec              Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTA2,A6 «, t00=0x0020, t01=0x00de}
0x32ec…330e              Head {h00=0x001e, h01=0x0050, text=» RB STRTIO RESTART REQUEST«, t00=0x0020, t01=0x00f6}
0x330e…3318              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0118}
0x3318…3322              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0122}
0x3322…3330              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x012c}
0x3330…333a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x013a}
0x333a…3344              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0144}
0x3344…334e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x014e}
0x334e…3378              Head {h00=0x0026, h01=0x0050, text=»*   STORE CHARACTER IN ECB-BUFFER «, t00=0x0020, t01=0x0158}
0x3378…3382              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0182}
0x3382…338c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x018c}
0x338c…33b8              Head {h00=0x0028, h01=0x0050, text=»STORE LD A4,2,A8 GET BUFFER ADDRESS «, t00=0x0021, t01=0x0008}
0x33b8…33e0              Head {h00=0x0024, h01=0x0050, text=» ADR A4,A3 GET CHARACTER ADDRESS«, t00=0x0021, t01=0x0034}
0x33e0…3402              Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x0021, t01=0x005c}
0x3402…342a              Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0021, t01=0x007e}
0x342a…343a              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0021, t01=0x00a6}
0x343a…3444              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00b6}
0x3444…344e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00c0}
0x344e…3458              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00ca}
0x3458…346e              Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x0021, t01=0x00d4}
0x346e…3478              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00ea}
0x3478…3482              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00f4}
0x3482…349c              Head {h00=0x0016, h01=0x0050, text=»*   TIMOUT ROUTINE«, t00=0x0021, t01=0x00fe}
0x349c…34a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0118}
0x34a6…34b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0122}
0x34b0…34c4              Head {h00=0x0010, h01=0x0050, text=»TWTUT EQU * «, t00=0x0021, t01=0x012c}
0x34c4…34e6              Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 GET DWT-ADDRESS«, t00=0x0021, t01=0x0140}
0x34e6…350e              Head {h00=0x0024, h01=0x0050, text=» LDK A1,/40 TIME OUT RETURN CODE«, t00=0x0021, t01=0x0162}
0x350e…351a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x018a}
0x351a…3524              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0008}
0x3524…352e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0012}
0x352e…353c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x001c}
0x353c…3546              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x002a}
0x3546…3550              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0034}
0x3550…3568              Head {h00=0x0014, h01=0x0050, text=»*   L D R E G E «, t00=0x0022, t01=0x003e}
0x3568…3572              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0056}
0x3572…35ae              Head {h00=0x0038, h01=0x0050, text=»*   RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5«, t00=0x0022, t01=0x0060}
0x35ae…35b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x009c}
0x35b8…35c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00a6}
0x35c2…35d6              Head {h00=0x0010, h01=0x0050, text=»LDREGE EQU *«, t00=0x0022, t01=0x00b0}
0x35d6…3600              Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTA3,A6 RELOAD REGISTER A3«, t00=0x0022, t01=0x00c4}
0x3600…362a              Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTA4,A6                 A4«, t00=0x0022, t01=0x00ee}
0x362a…3654              Head {h00=0x0026, h01=0x0050, text=» LD A5,DWTA5,A6                 A5«, t00=0x0022, t01=0x0118}
0x3654…366c              Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x0022, t01=0x0142}
0x366c…3680              Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0022, t01=0x015a}
0x3680…3698              Head {h00=0x0014, h01=0x0050, text=» LD A8,DWTECB,A6«, t00=0x0022, t01=0x016e}
0x3698…36bc              Head {h00=0x0020, h01=0x0050, text=» RTN A5 RETURN VIA A5-STACK «, t00=0x0022, t01=0x0186}
0x36bc…36ca              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x001a}
0x36ca…36d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0028}
0x36d4…36de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0032}
0x36de…36f6              Head {h00=0x0014, h01=0x0050, text=»*    G E T C H R«, t00=0x0023, t01=0x003c}
0x36f6…3700              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0054}
0x3700…373c              Head {h00=0x0038, h01=0x0050, text=»*    SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER«, t00=0x0023, t01=0x005e}
0x373c…3746              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x009a}
0x3746…375c              Head {h00=0x0012, h01=0x0050, text=»*    ON ENTRY:«, t00=0x0023, t01=0x00a4}
0x375c…3766              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00ba}
0x3766…3784              Head {h00=0x001a, h01=0x0050, text=»*    A3 = BUFFER INDEX«, t00=0x0023, t01=0x00c4}
0x3784…37a2              Head {h00=0x001a, h01=0x0050, text=»*    A8 = ECB-ADDRESS «, t00=0x0023, t01=0x00e2}
0x37a2…37ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0100}
0x37ac…37c2              Head {h00=0x0012, h01=0x0050, text=»*    ON EXIT: «, t00=0x0023, t01=0x010a}
0x37c2…37cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0120}
0x37cc…37e8              Head {h00=0x0018, h01=0x0050, text=»*    A2 = CHARACTER «, t00=0x0023, t01=0x012a}
0x37e8…3816              Head {h00=0x002a, h01=0x0050, text=»*    A1 = 0 IF LAST CHARACTER ELSE # 0«, t00=0x0023, t01=0x0146}
0x3816…3820              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0174}
0x3820…386e              Head {h00=0x004a, h01=0x0050, text=»*    IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH«, t00=0x0023, t01=0x017e}
0x386e…3878              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x003c}
0x3878…3882              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0046}
0x3882…3896              Head {h00=0x0010, h01=0x0050, text=»GETCHR EQU *«, t00=0x0024, t01=0x0050}
0x3896…38ba              Head {h00=0x0020, h01=0x0050, text=» LD A1,4,A8 REQUESTED LENGTH«, t00=0x0024, t01=0x0064}
0x38ba…38cc              Head {h00=0x000e, h01=0x0050, text=» SUR A1,A3«, t00=0x0024, t01=0x0088}
0x38cc…38fa              Head {h00=0x002a, h01=0x0050, text=» RF(NP) GCH010 LAST CHARACTER REACHED «, t00=0x0024, t01=0x009a}
0x38fa…3920              Head {h00=0x0022, h01=0x0050, text=» LD A1,2,A8 GET BUFFER ADDRESS«, t00=0x0024, t01=0x00c8}
0x3920…3932              Head {h00=0x000e, h01=0x0050, text=» ADR A1,A3«, t00=0x0024, t01=0x00ee}
0x3932…3950              Head {h00=0x001a, h01=0x0050, text=» LCR A2,A1 CHAR. TO A2«, t00=0x0024, t01=0x0100}
0x3950…3964              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0024, t01=0x011e}
0x3964…398c              Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0024, t01=0x0132}
0x398c…399c              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0024, t01=0x015a}
0x399c…39cc              Head {h00=0x002c, h01=0x0050, text=»GCH010 ST A3,6,A8 STORE EFFECTIVE LENGTH«, t00=0x0024, t01=0x016a}
0x39cc…39dc              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0025, t01=0x000a}
0x39dc…39ea              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x001a}
0x39ea…39f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0028}
0x39f4…3a20              Head {h00=0x0028, h01=0x0050, text=»*   DEVICE WORK TABLE FOR TYPEWRITER«, t00=0x0025, t01=0x0032}
0x3a20…3a2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x005e}
0x3a2a…3a34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0068}
0x3a34…3a54              Head {h00=0x001c, h01=0x0050, text=»DWTW01 EQU * TABLE ENTRY«, t00=0x0025, t01=0x0072}
0x3a54…3a7a              Head {h00=0x0022, h01=0x0050, text=» DATA /0010 CHANNEL PARAMETER «, t00=0x0025, t01=0x0092}
0x3a7a…3aae              Head {h00=0x0030, h01=0x0050, text=» DATA /8000 STATUS./8000 MEANS DEVICE READY «, t00=0x0025, t01=0x00b8}
0x3aae…3ae2              Head {h00=0x0030, h01=0x0050, text=» DATA 0,0 LAST OUTPUT, ORDER AND ECB-ADDRESS«, t00=0x0025, t01=0x00ec}
0x3ae2…3b0e              Head {h00=0x0028, h01=0x0050, text=» DATA TWAD POINTER TO ADDRESS BLOCK «, t00=0x0025, t01=0x0120}
0x3b0e…3b2a              Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB-ADDRESS«, t00=0x0025, t01=0x014c}
0x3b2a…3b52              Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0025, t01=0x0168}
0x3b52…3b70              Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0025, t01=0x0190}
0x3b70…3b92              Head {h00=0x001e, h01=0x0050, text=» DATA 0 OUTPUT QUEUE LINK «, t00=0x0026, t01=0x001e}
0x3b92…3bb2              Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A3«, t00=0x0026, t01=0x0040}
0x3bb2…3bd2              Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A4«, t00=0x0026, t01=0x0060}
0x3bd2…3bf2              Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A5«, t00=0x0026, t01=0x0080}
0x3bf2…3c0c              Head {h00=0x0016, h01=0x0050, text=» RES 4 STACK BASE «, t00=0x0026, t01=0x00a0}
0x3c0c…3c2a              Head {h00=0x001a, h01=0x0050, text=» DATA 1 TIMER POINTER «, t00=0x0026, t01=0x00ba}
0x3c2a…3c46              Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECHO DEVICE «, t00=0x0026, t01=0x00d8}
0x3c46…3c72              Head {h00=0x0028, h01=0x0050, text=» DATA /5F5E LEFT BYTE BACKSPACE KEY «, t00=0x0026, t01=0x00f4}
0x3c72…3c92              Head {h00=0x001c, h01=0x0050, text=»   RIGHT BYTE CANCEL KEY«, t00=0x0026, t01=0x0120}
0x3c92…3cbc              Head {h00=0x0026, h01=0x0050, text=» DATA /0D00 LEFT BYTE STANDARD EOR«, t00=0x0026, t01=0x0140}
0x3cbc…3cde              Head {h00=0x001e, h01=0x0050, text=»   RIGHT BYTE DOUBLE ZERO «, t00=0x0026, t01=0x016a}
0x3cde…3d04              Head {h00=0x0022, h01=0x0050, text=» DATA 0 HEAD POSITION POINETR «, t00=0x0026, t01=0x018c}
0x3d04…3d24              Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A2«, t00=0x0027, t01=0x0022}
0x3d24…3d2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0042}
0x3d2e…3d3a              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0027, t01=0x004c}
0x3d3a…3d3e              Head {h00=0x4004, h01=0x0000}
0x3d3e…3d40              00 27                                                                                                                                                                                                                                             ┆ '┆
0x3d40…3d42              00 58                                                                                                                                                                                                                                             ┆ X┆
0x3d42…3d4a (40, 1, 8)   20 04 00 00 00 28 00 04                                                                                                                                                                                                                           ┆     (  ┆
0x3d4a…3d9a (41, 0, 400) 05 05 dc 49 4e 54 52 54 31 cc 00 00 07 04 00 00 00 00 00 00 00 00 00 2c 49 4e 54 52 54 32 00 89 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 49 4e 54 52 54 32 cc 00 00 07 04 00 00 00 00 00 00 00 00 00 38 42 4c 4f 4b 3a 53 00 8a 00 01   ┆   INTRT1              ,INTRT2                   INTRT2              8BLOK:S    ┆
0x3d9a…3dea              00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 42 4c 4f 4b 3a 53 cc 00 00 05 05 d4 42 4c 4f 43 4b 45 ff 00 78 07 04 00 00 00 00 00 78 00 00 00 2a 43 54 41 42 58 20 00 8b 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 04 bc 43 54 41 42 58 00 00   ┆               BLOK:S      BLOCKE  x       x   *CTABX                    CTABX  ┆
0x3dea…3e3a              07 04 00 00 00 00 00 10 00 00 00 2c 44 43 54 42 55 46 00 8c 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 44 43 54 42 55 46 cc 00 00 07 04 00 00 00 00 01 16 00 00 00 2c 44 43 52 42 55 46 00 8d 00 01 00 01 20 20 20 20 20 20 00 00 00 00   ┆           ,DCTBUF                   DCTBUF              ,DCRBUF                ┆
0x3e3a…3e8a              05 05 dc 44 43 52 42 55 46 cc 00 00 07 04 00 00 00 00 02 1e 00 00 00 2c 54 43 4c 41 53 53 00 8e 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 54 43 4c 41 53 53 cc 00 00 07 04 00 00 00 00 00 02 00 00 00 2c 45 43 4c 41 53 53 00 8f 00 01   ┆   DCRBUF              ,TCLASS                   TCLASS              ,ECLASS    ┆
0x3e8a…3eda              00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 45 43 4c 41 53 53 cc 00 00 07 04 00 00 00 00 00 02 00 00 00 2c 53 43 4c 41 53 53 00 90 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 53 43 4c 41 53 53 cc 00 00 07 04 00 00 00 00 00 02 00 00   ┆               ECLASS              ,SCLASS                   SCLASS             ┆
0x3eda…3f2a (42, 0, 400) 01 80 49 4e 49 4d 4f 4d 00 91 00 04 00 04 20 20 20 20 20 20 00 00 00 00 05 05 dc 49 4e 49 4d 4f 4e cc 00 00 02 03 a2 54 43 54 41 42 02 04 c2 54 54 42 3a 53 54 00 02 04 c2 54 54 42 3a 50 50 d3 02 04 c2 54 54 42 3a 53 41 00 02 04 c2 54 54 42   ┆  INIMOM                   INIMON      TCTAB   TTB:ST    TTB:PP    TTB:SA    TTB┆
0x3f2a…3f7a              3a 53 50 c1 02 04 c2 54 54 42 3a 53 53 83 02 04 c2 54 54 42 3a 54 44 44 02 03 a2 43 44 54 41 42 02 03 a2 49 54 41 44 49 02 04 c2 44 57 54 41 44 52 00 02 03 a2 49 54 41 44 4f 02 03 a2 44 57 54 53 54 02 04 c2 44 57 54 45 43 42 c5 02 03 a2 44   ┆:SP    TTB:SS    TTB:TDD   CDTAB   ITADI   DWTADR    ITADO   DWTST   DWTECB    D┆
0x3f7a…3fca              57 54 54 51 02 04 c2 54 49 4d 51 55 45 20 02 04 c2 42 4c 4f 43 4b 4c 30 02 04 c2 42 4c 4f 43 4b 53 46 02 04 c2 46 52 45 51 55 45 1e 02 03 a2 47 42 51 55 45 02 04 c2 41 54 54 3a 43 48 32 02 04 c2 4c 44 50 45 4e 44 4e 02 04 c2 4c 52 55 51 55   ┆WTTQ   TIMQUE    BLOCKL0   BLOCKSF   FREQUE    GBQUE   ATT:CH2   LDPENDN   LRUQU┆
0x3fca…401a              45 24 02 04 c2 43 56 54 4c 53 42 30 02 04 c2 4e 55 4d 50 41 52 00 02 04 c2 43 56 54 53 42 41 06 02 04 c2 46 52 45 50 41 52 d5 02 04 c2 50 41 52 4c 45 4e 4e 02 04 c2 43 56 54 53 54 42 01 02 03 82 4c 4f 4f 50 4e 02 04 c2 54 54 42 3a 49 44 c1   ┆E$   CVTLSB0   NUMPAR    CVTSBA    FREPAR    PARLENN   CVTSTB    LOOPN   TTB:ID ┆
0x401a…406a              02 03 82 50 52 55 4e 4e 02 03 82 53 52 55 4e 4e 02 04 c2 44 49 53 51 55 45 57 02 04 c2 49 4e 49 46 4c 47 53 02 04 c2 50 46 49 4e 49 54 00 02 04 c2 43 56 54 41 50 53 ec 07 04 00 00 00 00 01 56 00 00 00 9e 49 4e 50 52 45 4f 00 95 00 03 00 03   ┆   PRUNN   SRUNN   DISQUEW   INIFLGS   PFINIT    CVTAPS        V    INPREO      ┆
0x406a…40ba (43, 0, 400) 20 20 20 20 20 20 00 00 00 00 05 05 dc 49 48 49 4e 50 54 cc 00 00 02 03 82 50 52 55 4e 20 02 03 82 53 52 55 4e 4e 02 04 c2 43 56 54 49 4e 50 ff 02 04 c2 43 56 54 4c 53 42 4b 02 04 c2 54 54 42 3a 53 41 00 02 04 c2 54 54 42 3a 53 50 20 02 04   ┆             IHINPT      PRUN    SRUNN   CVTINP    CVTLSBK   TTB:SA    TTB:SP   ┆
0x40ba…410a              c2 54 54 42 3a 53 53 00 02 04 c2 55 50 44 4c 52 49 c1 02 04 c2 52 45 54 55 52 38 d3 02 04 c2 43 56 54 41 50 41 d3 02 04 c2 4c 4b 4d 44 49 53 90 02 03 a2 4c 44 31 35 30 07 04 00 00 00 00 01 4c 00 00 00 94 4c 4f 41 44 45 52 00 98 00 02 00 02   ┆ TTB:SS    UPDLRI    RETUR8    CVTAPA    LKMDIS    LD150       L    LOADER      ┆
0x410a…415a              20 20 20 20 20 20 00 00 00 00 05 05 dc 4c 4f 41 44 45 52 cc 00 00 02 04 c2 54 54 42 3a 53 50 11 02 04 c2 54 54 42 3a 53 53 20 02 04 c2 54 54 42 3a 53 41 00 02 03 a2 51 54 4a 4f 42 05 04 bc 4c 44 31 35 30 00 50 02 04 c2 47 45 54 42 4c 4b 83   ┆             LOADER      TTB:SP    TTB:SS    TTB:SA    QTJOB   LD150 P   GETBLK ┆
0x415a…41aa              02 04 c2 4c 44 54 41 53 4b c1 02 04 c2 54 54 41 42 4c 44 11 02 03 a2 41 43 54 4f 54 02 03 a2 54 44 49 53 50 02 04 c2 4c 4b 4d 52 51 45 4b 07 04 00 00 00 00 00 6c 00 00 00 98 4c 44 54 41 53 4b 00 9a 00 04 00 04 20 20 20 20 20 20 00 00 00 00   ┆   LDTASK    TTABLD    ACTOT   TDISP   LKMRQEK       l    LDTASK                ┆
0x41aa…41fa              05 05 dc 45 43 42 52 45 44 ff 00 00 05 05 dc 4c 44 54 41 53 4b cc 00 0e 02 03 a2 43 56 54 44 4b 02 04 c2 46 52 45 42 4c 4b c1 02 04 c2 46 52 45 50 41 52 c1 02 04 c2 4c 52 55 51 55 45 d9 02 04 c2 4c 44 50 45 4e 44 56 02 04 c2 54 54 42 3a 53   ┆   ECBRED      LDTASK      CVTDK   FREBLK    FREPAR    LRUQUE    LDPENDV   TTB:S┆
0x41fa…424a (44, 0, 400) 41 44 02 04 c2 54 54 42 3a 53 53 00 02 04 c2 54 54 42 3a 53 50 00 02 03 a2 51 54 4a 4f 42 02 04 c2 43 56 54 49 4e 50 20 07 04 00 00 00 00 01 d6 00 00 00 34 49 4e 49 4d 4f 44 00 9e 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 d4 49 4e 49   ┆AD   TTB:SS    TTB:SP    QTJOB   CVTINP            4INIMOD                   INI┆
0x424a…429a              4d 4f 4e cc 00 00 05 03 74 42 55 47 00 00 07 04 00 00 00 00 00 00 00 00 00 80 54 54 4d 4a 4f 42 00 9f 00 02 00 02 20 20 20 20 20 20 00 00 00 00 05 05 dc 54 54 4d 4a 4f 42 cc 00 00 05 05 d4 54 54 42 3a 53 54 ff 00 02 05 05 d4 54 54 42 3a 49   ┆MON     tBUG              TTMJOB                   TTMJOB      TTB:ST      TTB:I┆
0x429a…42ea              44 c1 00 04 05 05 d4 54 54 42 3a 50 50 4b 00 06 05 05 d4 54 54 42 3a 53 53 4b 00 08 05 05 d4 54 54 42 3a 53 50 d3 00 0a 05 05 d4 54 54 42 3a 53 41 c1 00 0c 05 05 d4 54 54 42 3a 54 44 4b 00 2a 07 04 00 00 00 00 00 2c 00 00 00 56 43 44 3a 54   ┆D      TTB:PPK     TTB:SSK     TTB:SP      TTB:SA      TTB:TDK *       ,   VCD:T┆
0x42ea…433a              41 42 00 a1 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 05 dc 43 44 3a 54 41 42 cc 00 00 02 04 c2 44 57 44 55 30 31 c1 02 04 c2 44 57 44 55 30 32 4b 02 04 c2 44 57 46 44 30 31 d3 05 05 dc 43 44 54 41 42 46 ff 00 22 07 04 00 00 00 00 00 22   ┆AB                   CD:TAB      DWDU01    DWDU02K   DWFD01    CDTABF  "       "┆
0x433a…438a              00 00 00 2a 54 54 41 42 58 20 00 a2 00 01 00 01 20 20 20 20 20 20 00 00 00 00 05 04 bc 54 54 41 42 58 00 00 07 04 00 00 00 00 00 2c 00 00 00 a8 4c 4b 4d 41 4c 20 00 a3 00 02 00 02 20 20 20 20 20 20 00 00 00 00 05 04 bc 4c 4b 4d 41 4c 00 00   ┆   *TTABX                    TTABX         ,    LKMAL                    LKMAL  ┆

Reduced view