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

⟦6dfc6c4b1⟧

    Length: 20400 (0x4fb0)
    Notes: pts_type(SC)
    Names: »DRTW01.SC«

Derivation

└─⟦13e5fd45a⟧ Bits:30009699 Philips computer tape "600507"
    └─⟦this⟧ »TOSSWORK/DRTW01.SC« 
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
    └─⟦this⟧ »TOSSWORK/DRTW01.SC« 

PTS(SC)

	IDENT DRTW01 	REL 11.0 81-06-12 870105041100 

			=4,COND. FOR BSP,CANC AND EOR
			REL 11.0 81-04-15
			=3,ONLY CREDIT-INDEX FOR EOR-KEY IN KTAB 
			REL 11.0 81-01-26
			=2,BOTH KEYTABLE AND STANDARD
			   EOR-KEY WAS CHECKED 
			REL 11.0 80-11-19
			=1, PROBLEM WITH CHANGED DWT-LAYOUT
			REL 10.0 80-03-14



**************************************************
* 
*   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 
	EXTRN	PFPOST	PWF POST PROCESSING FLAG
	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 
X:F	EQU	/5F5E		=4 
X:G	EQU	/0D00		=4 

TIMOUT	EQU	X:A	 
POWUP	EQU	X:B 
DVBLEN	EQU	X:C
DVBKTB	EQU	X:D
DEVIND	EQU	X:E

				=3
* 
*	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)	RED085	KEY NOT IN KEYTABLE	=2
	SUK	A1,1	DECREMENT ADDRESS 
	CCR	A2,A1	CHECK IF IN KEYTABLE 
	RB(NE)	RED060	NOT IN KEYTABLE
	ADK	A4,1	MAKE INDEX	=3 
	ST	A4,10,A8	STORE INDEX IN CONTROL WORD
RED070	CF	A5,STORE	STORE KEY IN ECB-BUFFER	=2 
	RB	RED040	EXECUTE CIO-HALT 
RED080	CC	A2,TWEOF,A6	
	RB(E)	RED070	STANDARD EOR-KEY
RED085	EQU	*	 	=2 
	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	*
				=3
	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	LD	A7,PFPOST 
	RF(NZ)	STREG	PFINIT PENDING
	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	X:F	LEFT BYTE BACKSPACE KEY	=4
			RIGHT BYTE CANCEL KEY
	DATA	X:G	LEFT BYTE STANDARD EOR	=4 
			RIGHT BYTE DOUBLE ZERO 
	DATA	0	HEAD POSITION POINETR 
	DATA	0	SAVE AREA FOR A2
	DATA	0	ECHO DEV (CHANGED DWT-LAYOUT)	=1
* 
	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

HexDump

0x0000…0036 (0, 0, 398)  Head {h00=0x0032, h01=0x0050, text=» IDENT DRTW01  REL 11.0 81-06-12 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0066              Head {h00=0x0024, h01=0x0050, text=»   =4,COND. FOR BSP,CANC AND EOR«, t00=0x0000, t01=0x0042}
0x0066…0082              Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-04-15«, t00=0x0000, t01=0x006a}
0x0082…00b6              Head {h00=0x0030, h01=0x0050, text=»   =3,ONLY CREDIT-INDEX FOR EOR-KEY IN KTAB «, t00=0x0000, t01=0x0086}
0x00b6…00d2              Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-01-26«, t00=0x0000, t01=0x00ba}
0x00d2…00fa              Head {h00=0x0024, h01=0x0050, text=»   =2,BOTH KEYTABLE AND STANDARD«, t00=0x0000, t01=0x00d6}
0x00fa…011c              Head {h00=0x001e, h01=0x0050, text=»      EOR-KEY WAS CHECKED «, t00=0x0000, t01=0x00fe}
0x011c…0138              Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 80-11-19«, t00=0x0000, t01=0x0120}
0x0138…0166              Head {h00=0x002a, h01=0x0050, text=»   =1, PROBLEM WITH CHANGED DWT-LAYOUT«, t00=0x0000, t01=0x013c}
0x0166…0182              Head {h00=0x0018, h01=0x0050, text=»   REL 10.0 80-03-14«, t00=0x0000, t01=0x016a}
0x0182…018a              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0186}
0x018a…0192              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x018e}
0x0192…019a              Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0008}
0x019a…01d4              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0001, t01=0x0010}
0x01d4…01de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x004a}
0x01de…0206              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTE  PTS «, t00=0x0001, t01=0x0054}
0x0206…0210              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x007c}
0x0210…0240              Head {h00=0x002c, h01=0x0050, text=»*   DRTW01 = DRIVER TYPEWRITER PTS 6862 «, t00=0x0001, t01=0x0086}
0x0240…024a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b6}
0x024a…0254              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c0}
0x0254…025e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ca}
0x025e…0268              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d4}
0x0268…0272              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00de}
0x0272…027c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e8}
0x027c…02b6              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0001, t01=0x00f2}
0x02b6…02c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x012c}
0x02c0…0300              Head {h00=0x003c, h01=0x0050, text=»*   THIS DRIVER HANDLES INPUT AND OUTPUT TO TYPEWRITERS «, t00=0x0001, t01=0x0136}
0x0300…0314              Head {h00=0x0010, h01=0x0050, text=»*   PTS 6862«, t00=0x0001, t01=0x0176}
0x0314…031e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x018a}
0x031e…0328 (2, 0, 398)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0004}
0x0328…0336              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x000e}
0x0336…0340              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001c}
0x0340…034a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0026}
0x034a…035e              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0030}
0x035e…0372              Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x0044}
0x0372…0386              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0058}
0x0386…0390              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x006c}
0x0390…03b2              Head {h00=0x001e, h01=0x0050, text=» ENTRY TWAD ADDRESS BLOCK «, t00=0x0002, t01=0x0076}
0x03b2…03c6              Head {h00=0x0010, h01=0x0050, text=» ENTRY IHTW «, t00=0x0002, t01=0x0098}
0x03c6…03da              Head {h00=0x0010, h01=0x0050, text=» ENTRY TWON «, t00=0x0002, t01=0x00ac}
0x03da…03f0              Head {h00=0x0012, h01=0x0050, text=» ENTRY DWTW01 «, t00=0x0002, t01=0x00c0}
0x03f0…03fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d6}
0x03fa…0410              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x00e0}
0x0410…0426              Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0002, t01=0x00f6}
0x0426…043c              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x010c}
0x043c…0446              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0122}
0x0446…046a              Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0002, t01=0x012c}
0x046a…0488              Head {h00=0x001a, h01=0x0050, text=» EXTRN TDISP DISPATCH «, t00=0x0002, t01=0x0150}
0x0488…04b0              Head {h00=0x0024, h01=0x0050, text=» EXTRN DISEND DISPATCH AND ENDIO«, t00=0x0002, t01=0x016e}
0x04b0…04de              Head {h00=0x002a, h01=0x0050, text=» EXTRN SETIME SET TIME BEFORE TIME-OUT«, t00=0x0003, t01=0x0008}
0x04de…0510              Head {h00=0x002e, h01=0x0050, text=» EXTRN SAVE8 SAVE REGISTERS A1-A8 ON STACK«, t00=0x0003, t01=0x0036}
0x0510…052c              Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0003, t01=0x0068}
0x052c…054e              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTBC BYTE COUNTER «, t00=0x0003, t01=0x0084}
0x054e…0570              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB ADDRESS «, t00=0x0003, t01=0x00a6}
0x0570…0598              Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTOR DWT INDEX AND ORDER«, t00=0x0003, t01=0x00c8}
0x0598…05ba              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA3 SAVE AREA A3 «, t00=0x0003, t01=0x00f0}
0x05ba…05dc              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA4 SAVE AREA A4 «, t00=0x0003, t01=0x0112}
0x05dc…05fe              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA5 SAVE AREA A5 «, t00=0x0003, t01=0x0134}
0x05fe…0628              Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTSB1 STACK BASE 1 IN DWT «, t00=0x0003, t01=0x0156}
0x0628…0652              Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTSB2 STACK BASE 2 IN DWT «, t00=0x0003, t01=0x0180}
0x0652…0674              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTP TIMER POINTER«, t00=0x0004, t01=0x001a}
0x0674…06a2              Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTRRUPT «, t00=0x0004, t01=0x003c}
0x06a2…06d0              Head {h00=0x002a, h01=0x0050, text=» EXTRN PFPOST PWF POST PROCESSING FLAG«, t00=0x0004, t01=0x006a}
0x06d0…06de              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0098}
0x06de…06e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a6}
0x06e8…06f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00b0}
0x06f2…070e              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0004, t01=0x00ba}
0x070e…0728              Head {h00=0x0016, h01=0x0050, text=»* I/O-INSTRUCTIONS«, t00=0x0004, t01=0x00d6}
0x0728…0744              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0004, t01=0x00f0}
0x0744…074e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x010c}
0x074e…0758              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0116}
0x0758…077a              Head {h00=0x001e, h01=0x0050, text=»TWSTRT EQU /42C0 CIO-START«, t00=0x0004, t01=0x0120}
0x077a…079a              Head {h00=0x001c, h01=0x0050, text=»TWHLT EQU /4280 CIO-HALT«, t00=0x0004, t01=0x0142}
0x079a…07b8              Head {h00=0x001a, h01=0x0050, text=»TWINR EQU /4A00 INPUT «, t00=0x0004, t01=0x0162}
0x07b8…07d6              Head {h00=0x001a, h01=0x0050, text=»TWOTR EQU /4200 OUTPUT«, t00=0x0004, t01=0x0180}
0x07d6…07fa              Head {h00=0x0020, h01=0x0050, text=»TWSST EQU /4AC0 SENSE STATUS«, t00=0x0005, t01=0x000e}
0x07fa…0804              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0032}
0x0804…080e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x003c}
0x080e…081c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0046}
0x081c…0826              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0054}
0x0826…0830              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x005e}
0x0830…0846              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0005, t01=0x0068}
0x0846…085c              Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0005, t01=0x007e}
0x085c…0872              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0005, t01=0x0094}
0x0872…087c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00aa}
0x087c…0886              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00b4}
0x0886…08a8              Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x0005, t01=0x00be}
0x08a8…08c4              Head {h00=0x0018, h01=0x0050, text=»LF EQU /0A LINE FEED«, t00=0x0005, t01=0x00e0}
0x08c4…08ea              Head {h00=0x0022, h01=0x0050, text=»LNGERR EQU /8 INCORRECT LENGTH«, t00=0x0005, t01=0x00fc}
0x08ea…0910              Head {h00=0x0022, h01=0x0050, text=»TPERR EQU /2 THROUGHPUT ERROR «, t00=0x0005, t01=0x0122}
0x0910…093a              Head {h00=0x0026, h01=0x0050, text=»TIME EQU 300 TIME BEFORE TIME-OUT «, t00=0x0005, t01=0x0148}
0x093a…0944              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0172}
0x0944…094e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x017c}
0x094e…096e              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0005, t01=0x0186}
0x096e…098e              Head {h00=0x001c, h01=0x0050, text=»*  CONDITIONAL ASSEMBLY*«, t00=0x0006, t01=0x0016}
0x098e…09ae              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0006, t01=0x0036}
0x09ae…09b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0056}
0x09b8…09c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0060}
0x09c2…09d4              Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0006, t01=0x006a}
0x09d4…09e6              Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0006, t01=0x007c}
0x09e6…09f8              Head {h00=0x000e, h01=0x0050, text=»X:C EQU 60«, t00=0x0006, t01=0x008e}
0x09f8…0a0a              Head {h00=0x000e, h01=0x0050, text=»X:D EQU 10«, t00=0x0006, t01=0x00a0}
0x0a0a…0a1c              Head {h00=0x000e, h01=0x0050, text=»X:E EQU 6 «, t00=0x0006, t01=0x00b2}
0x0a1c…0a36              Head {h00=0x0016, h01=0x0050, text=»X:F EQU /5F5E  =4 «, t00=0x0006, t01=0x00c4}
0x0a36…0a50              Head {h00=0x0016, h01=0x0050, text=»X:G EQU /0D00  =4 «, t00=0x0006, t01=0x00de}
0x0a50…0a58              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x00f8}
0x0a58…0a70              Head {h00=0x0014, h01=0x0050, text=»TIMOUT EQU X:A  «, t00=0x0006, t01=0x0100}
0x0a70…0a86              Head {h00=0x0012, h01=0x0050, text=»POWUP EQU X:B «, t00=0x0006, t01=0x0118}
0x0a86…0a9c              Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:C«, t00=0x0006, t01=0x012e}
0x0a9c…0ab2              Head {h00=0x0012, h01=0x0050, text=»DVBKTB EQU X:D«, t00=0x0006, t01=0x0144}
0x0ab2…0ac8              Head {h00=0x0012, h01=0x0050, text=»DEVIND EQU X:E«, t00=0x0006, t01=0x015a}
0x0ac8…0ad0              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x0170}
0x0ad0…0ade              Head {h00=0x000a, h01=0x0050, text=»    =3«, t00=0x0006, t01=0x0178}
0x0ade…0ae8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0186}
0x0ae8…0b1a              Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0006, t01=0x0190}
0x0b1a…0b48              Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0007, t01=0x0032}
0x0b48…0b52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0060}
0x0b52…0b66              Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0007, t01=0x006a}
0x0b66…0b70              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x007e}
0x0b70…0b7a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0088}
0x0b7a…0bb4              Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0007, t01=0x0092}
0x0bb4…0be6              Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0007, t01=0x00cc}
0x0be6…0bf0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00fe}
0x0bf0…0c04              Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0007, t01=0x0108}
0x0c04…0c0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x011c}
0x0c0e…0c1c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0126}
0x0c1c…0c26              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0134}
0x0c26…0c30              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x013e}
0x0c30…0c4e              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0007, t01=0x0148}
0x0c4e…0c6c              Head {h00=0x001a, h01=0x0050, text=»* DWT-DISPLACEMENTS * «, t00=0x0007, t01=0x0166}
0x0c6c…0c8a              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0007, t01=0x0184}
0x0c8a…0c94              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0012}
0x0c94…0c9e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x001c}
0x0c9e…0cd2              Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x0008, t01=0x0026}
0x0cd2…0cdc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x005a}
0x0cdc…0cf2              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0008, t01=0x0064}
0x0cf2…0d0a              Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0008, t01=0x007a}
0x0d0a…0d16              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0008, t01=0x0092}
0x0d16…0d20              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x009e}
0x0d20…0d36              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0008, t01=0x00a8}
0x0d36…0d50              Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0008, t01=0x00be}
0x0d50…0d5c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0008, t01=0x00d8}
0x0d5c…0d66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e4}
0x0d66…0d82              Head {h00=0x0018, h01=0x0050, text=»DWTHP EQU START+/18 «, t00=0x0008, t01=0x00ee}
0x0d82…0d9e              Head {h00=0x0018, h01=0x0050, text=»TWCLR EQU START+/15 «, t00=0x0008, t01=0x010a}
0x0d9e…0dba              Head {h00=0x0018, h01=0x0050, text=»TWEOF EQU START+/16 «, t00=0x0008, t01=0x0126}
0x0dba…0dd6              Head {h00=0x0018, h01=0x0050, text=»TWBSP EQU START+/14 «, t00=0x0008, t01=0x0142}
0x0dd6…0df2              Head {h00=0x0018, h01=0x0050, text=»DWTA2 EQU START+/1A «, t00=0x0008, t01=0x015e}
0x0df2…0e20              Head {h00=0x002a, h01=0x0050, text=» DATA DVBKTB+DVBKTB MMU KEY TABLE SIZE«, t00=0x0008, t01=0x017a}
0x0e20…0e4c              Head {h00=0x0028, h01=0x0050, text=» DATA DVBLEN+DVBLEN MMU BUFFER SIZE «, t00=0x0009, t01=0x0018}
0x0e4c…0e6e              Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0009, t01=0x0044}
0x0e6e…0e80              Head {h00=0x000e, h01=0x0050, text=»TWAD EQU *«, t00=0x0009, t01=0x0066}
0x0e80…0ea2              Head {h00=0x001e, h01=0x0050, text=» DATA TWA ACTIVATION PART «, t00=0x0009, t01=0x0078}
0x0ea2…0ec8              Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0009, t01=0x009a}
0x0ec8…0ed6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00c0}
0x0ed6…0ee0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ce}
0x0ee0…0eea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d8}
0x0eea…0f20              Head {h00=0x0032, h01=0x0050, text=»*   ACTIVATION PART: CHECK VALIDITY OF ORDERS «, t00=0x0009, t01=0x00e2}
0x0f20…0f2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0118}
0x0f2a…0f34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0122}
0x0f34…0f46              Head {h00=0x000e, h01=0x0050, text=»TWA EQU * «, t00=0x0009, t01=0x012c}
0x0f46…0f58              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0009, t01=0x013e}
0x0f58…0f80              Head {h00=0x0024, h01=0x0050, text=» LD A2,4,A8 GET REQUESTED LENGTH«, t00=0x0009, t01=0x0150}
0x0f80…0faa              Head {h00=0x0026, h01=0x0050, text=» ABL(Z) IHTW50 REQUESTED LENGTH =0«, t00=0x0009, t01=0x0178}
0x0faa…0fb4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0012}
0x0fb4…0fbe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x001c}
0x0fbe…0fdc              Head {h00=0x001a, h01=0x0050, text=» LDR A2,A7 COPY ORDER «, t00=0x000a, t01=0x0026}
0x0fdc…1000              Head {h00=0x0020, h01=0x0050, text=» RF(NP) TWAERR REQUEST ERROR«, t00=0x000a, t01=0x0044}
0x1000…1012              Head {h00=0x000e, h01=0x0050, text=» SUK A2,4 «, t00=0x000a, t01=0x0068}
0x1012…1036              Head {h00=0x0020, h01=0x0050, text=» RF(Z) TWAERR REQUEST ERROR «, t00=0x000a, t01=0x007a}
0x1036…1058              Head {h00=0x001e, h01=0x0050, text=» RF(N) TWAIN INPUT REQUEST«, t00=0x000a, t01=0x009e}
0x1058…106a              Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x000a, t01=0x00c0}
0x106a…1090              Head {h00=0x0022, h01=0x0050, text=» RF(NP) TWAOUT OUTPUT REQUEST «, t00=0x000a, t01=0x00d2}
0x1090…109a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00f8}
0x109a…10a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0102}
0x10a4…10cc              Head {h00=0x0024, h01=0x0050, text=»TWAERR ABL DISIOE REQUEST ERROR «, t00=0x000a, t01=0x010c}
0x10cc…10da              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0134}
0x10da…10e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0142}
0x10e4…10ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x014c}
0x10ee…1102              Head {h00=0x0010, h01=0x0050, text=»TWAIN EQU * «, t00=0x000a, t01=0x0156}
0x1102…1118              Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x000a, t01=0x016a}
0x1118…1142              Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x000a, t01=0x0180}
0x1142…1170              Head {h00=0x002a, h01=0x0050, text=» RF(Z) TWA010 NO TIMING ON THIS DEVICE«, t00=0x000b, t01=0x001a}
0x1170…1194              Head {h00=0x0020, h01=0x0050, text=» LDR A1,A6 SAVE DWT-ADDRESS «, t00=0x000b, t01=0x0048}
0x1194…11aa              Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x000b, t01=0x006c}
0x11aa…11c2              Head {h00=0x0014, h01=0x0050, text=» DATA TWTUT,TIME«, t00=0x000b, t01=0x0082}
0x11c2…11f2              Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTTP,A6 SAVE TIMER BLOCK-ADDRESS«, t00=0x000b, t01=0x009a}
0x11f2…11fe              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x00ca}
0x11fe…1212              Head {h00=0x0010, h01=0x0050, text=»TWA010 EQU *«, t00=0x000b, t01=0x00d6}
0x1212…1226              Head {h00=0x0010, h01=0x0050, text=» IFT POWUP=1«, t00=0x000b, t01=0x00ea}
0x1226…124c              Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 GET DWT-STATUS«, t00=0x000b, t01=0x00fe}
0x124c…1262              Head {h00=0x0012, h01=0x0050, text=» ANKL A2,/200 «, t00=0x000b, t01=0x0124}
0x1262…1296              Head {h00=0x0030, h01=0x0050, text=» RF(Z) TWA020 NOT FIRST READ AFTER POEWR UP «, t00=0x000b, t01=0x013a}
0x1296…12bc              Head {h00=0x0022, h01=0x0050, text=» XRS A2,DWTST,A6 RESET POINTER«, t00=0x000b, t01=0x016e}
0x12bc…12d0 (12, 0, 400) Head {h00=0x0010, h01=0x0050, text=» LDKL A2,-2 «, t00=0x000c, t01=0x0004}
0x12d0…12f6              Head {h00=0x0022, h01=0x0050, text=» ST A2,10,A8 INDICATE POWER UP«, t00=0x000c, t01=0x0018}
0x12f6…1318              Head {h00=0x001e, h01=0x0050, text=» ABL IHTW35 PERFORM ENDIO «, t00=0x000c, t01=0x003e}
0x1318…1324              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0060}
0x1324…133e              Head {h00=0x0016, h01=0x0050, text=»TWA020 LDK A2,/21 «, t00=0x000c, t01=0x006c}
0x133e…1348              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0086}
0x1348…1352              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0090}
0x1352…137e              Head {h00=0x0028, h01=0x0050, text=»READ CF A5,STRTIO EXECUTE CIO-START «, t00=0x000c, t01=0x009a}
0x137e…1390              Head {h00=0x000e, h01=0x0050, text=» RF RED030«, t00=0x000c, t01=0x00c6}
0x1390…13ba              Head {h00=0x0026, h01=0x0050, text=»RED020 CF A5,STREG SAVE REGISTERS «, t00=0x000c, t01=0x00d8}
0x13ba…13c8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0102}
0x13c8…13d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0110}
0x13d2…13f4              Head {h00=0x001e, h01=0x0050, text=»*   RETURN AFTER INTERRUPT«, t00=0x000c, t01=0x011a}
0x13f4…13fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x013c}
0x13fe…1408              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0146}
0x1408…141c              Head {h00=0x0010, h01=0x0050, text=»RED030 EQU *«, t00=0x000c, t01=0x0150}
0x141c…1432              Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x000c, t01=0x0164}
0x1432…1444              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x000c, t01=0x017a}
0x1444…145a              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) RED037«, t00=0x000c, t01=0x018c}
0x145a…1466              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0012}
0x1466…1478              Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x000d, t01=0x001e}
0x1478…149a              Head {h00=0x001e, h01=0x0050, text=» RF(P) RED050 ORDERS 02/03«, t00=0x000d, t01=0x0030}
0x149a…14a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0052}
0x14a4…14ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x005c}
0x14ae…14e2              Head {h00=0x0030, h01=0x0050, text=»RED035 CF A5,STORE STORE CHARACTER IN BUFFER«, t00=0x000d, t01=0x0066}
0x14e2…14f6              Head {h00=0x0010, h01=0x0050, text=» CW A3,4,A8 «, t00=0x000d, t01=0x009a}
0x14f6…151e              Head {h00=0x0024, h01=0x0050, text=» RB(L) RED020 GET NEXT CHARACTER«, t00=0x000d, t01=0x00ae}
0x151e…1530              Head {h00=0x000e, h01=0x0050, text=» LDR A7,A7«, t00=0x000d, t01=0x00d6}
0x1530…1550              Head {h00=0x001c, h01=0x0050, text=» RF(Z) RED040 BASIC READ«, t00=0x000d, t01=0x00e8}
0x1550…155a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0108}
0x155a…1564              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0112}
0x1564…1584              Head {h00=0x001c, h01=0x0050, text=» LDK A1,LNGERR OVERFLOW «, t00=0x000d, t01=0x011c}
0x1584…15ae              Head {h00=0x0026, h01=0x0050, text=»RED037 ORS A1,8,A8 SET RETURN CODE«, t00=0x000d, t01=0x013c}
0x15ae…15b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0166}
0x15b8…15c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0170}
0x15c2…15d0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x017a}
0x15d0…15d8              Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0188}
0x15d8…15ec              Head {h00=0x0010, h01=0x0050, text=»RED040 EQU *«, t00=0x000d, t01=0x0190}
0x15ec…15f4              Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0014}
0x15f4…160a              Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x000e, t01=0x001c}
0x160a…162c              Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x000e, t01=0x0032}
0x162c…164a              Head {h00=0x001a, h01=0x0050, text=» ANK A7,/FF MASK ORDER«, t00=0x000e, t01=0x0054}
0x164a…165c              Head {h00=0x000e, h01=0x0050, text=» CWK A7,4 «, t00=0x000e, t01=0x0072}
0x165c…167e              Head {h00=0x001e, h01=0x0050, text=» RF(G) RED045 WRITE ORDER «, t00=0x000e, t01=0x0084}
0x167e…16a4              Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTTP,A6 TIMER POINTER «, t00=0x000e, t01=0x00a6}
0x16a4…16d2              Head {h00=0x002a, h01=0x0050, text=» RF(Z) RED045 NO TIMIMG ON THIS DEVICE«, t00=0x000e, t01=0x00cc}
0x16d2…16f4              Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x000e, t01=0x00fa}
0x16f4…1700              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x011c}
0x1700…1708              Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0128}
0x1708…171c              Head {h00=0x0010, h01=0x0050, text=»RED045 EQU *«, t00=0x000e, t01=0x0130}
0x171c…1742              Head {h00=0x0022, h01=0x0050, text=» CF A5,HLTIO EXECUTE CIO-HALT «, t00=0x000e, t01=0x0144}
0x1742…1764              Head {h00=0x001e, h01=0x0050, text=» ABL IHTW40 PERFORM TENDIO«, t00=0x000e, t01=0x016a}
0x1764…1772              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x018c}
0x1772…177c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x000a}
0x177c…1786              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0014}
0x1786…1790              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x001e}
0x1790…17a8              Head {h00=0x0014, h01=0x0050, text=»*   ORDERS 02,03«, t00=0x000f, t01=0x0028}
0x17a8…17b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0040}
0x17b2…17bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x004a}
0x17bc…17d0              Head {h00=0x0010, h01=0x0050, text=»RED050 EQU *«, t00=0x000f, t01=0x0054}
0x17d0…17f6              Head {h00=0x0022, h01=0x0050, text=» LD A1,10,A8 GET CONTROL WORD «, t00=0x000f, t01=0x0068}
0x17f6…1818              Head {h00=0x001e, h01=0x0050, text=» RF(Z) RED080 NO KEYTABLE «, t00=0x000f, t01=0x008e}
0x1818…183e              Head {h00=0x0022, h01=0x0050, text=» LCR A4,A1 GET NUMBER OF KEYS «, t00=0x000f, t01=0x00b0}
0x183e…1852              Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x000f, t01=0x00d6}
0x1852…1878              Head {h00=0x0022, h01=0x0050, text=» ADR A1,A4 ADDRESS TO LAST KEY«, t00=0x000f, t01=0x00ea}
0x1878…188a              Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x000f, t01=0x0110}
0x188a…18a2              Head {h00=0x0014, h01=0x0050, text=»RED060 SUK A4,1 «, t00=0x000f, t01=0x0122}
0x18a2…18ce              Head {h00=0x0028, h01=0x0050, text=» RF(N) RED085 KEY NOT IN KEYTABLE =2«, t00=0x000f, t01=0x013a}
0x18ce…18f2              Head {h00=0x0020, h01=0x0050, text=» SUK A1,1 DECREMENT ADDRESS «, t00=0x000f, t01=0x0166}
0x18f2…191a              Head {h00=0x0024, h01=0x0050, text=» CCR A2,A1 CHECK IF IN KEYTABLE «, t00=0x000f, t01=0x018a}
0x191a…1940              Head {h00=0x0022, h01=0x0050, text=» RB(NE) RED060 NOT IN KEYTABLE«, t00=0x0010, t01=0x0022}
0x1940…1960              Head {h00=0x001c, h01=0x0050, text=» ADK A4,1 MAKE INDEX =3 «, t00=0x0010, t01=0x0048}
0x1960…1990              Head {h00=0x002c, h01=0x0050, text=» ST A4,10,A8 STORE INDEX IN CONTROL WORD«, t00=0x0010, t01=0x0068}
0x1990…19c6              Head {h00=0x0032, h01=0x0050, text=»RED070 CF A5,STORE STORE KEY IN ECB-BUFFER =2 «, t00=0x0010, t01=0x0098}
0x19c6…19ea              Head {h00=0x0020, h01=0x0050, text=» RB RED040 EXECUTE CIO-HALT «, t00=0x0010, t01=0x00ce}
0x19ea…1a08              Head {h00=0x001a, h01=0x0050, text=»RED080 CC A2,TWEOF,A6 «, t00=0x0010, t01=0x00f2}
0x1a08…1a2e              Head {h00=0x0022, h01=0x0050, text=» RB(E) RED070 STANDARD EOR-KEY«, t00=0x0010, t01=0x0110}
0x1a2e…1a48              Head {h00=0x0016, h01=0x0050, text=»RED085 EQU *   =2 «, t00=0x0010, t01=0x0136}
0x1a48…1a60              Head {h00=0x0014, h01=0x0050, text=» CC A2,TWBSP,A6 «, t00=0x0010, t01=0x0150}
0x1a60…1a80              Head {h00=0x001c, h01=0x0050, text=» RF(E) RED110 BACKSPACE «, t00=0x0010, t01=0x0168}
0x1a80…1a98              Head {h00=0x0014, h01=0x0050, text=» CC A2,TWCLR,A6 «, t00=0x0010, t01=0x0188}
0x1a98…1ab4              Head {h00=0x0018, h01=0x0050, text=» RF(E) RED110 CLEAR «, t00=0x0011, t01=0x0010}
0x1ab4…1ac2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x002c}
0x1ac2…1acc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x003a}
0x1acc…1ad6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0044}
0x1ad6…1b02              Head {h00=0x0028, h01=0x0050, text=»*   CHARACTER NOT FOUND IN KEYTABLE «, t00=0x0011, t01=0x004e}
0x1b02…1b0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x007a}
0x1b0c…1b16              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0084}
0x1b16…1b20              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x008e}
0x1b20…1b48              Head {h00=0x0024, h01=0x0050, text=»RED090 LDR A4,A2 COPY CHARACTER «, t00=0x0011, t01=0x0098}
0x1b48…1b60              Head {h00=0x0014, h01=0x0050, text=» ANK A4,/FF MASK«, t00=0x0011, t01=0x00c0}
0x1b60…1b72              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0011, t01=0x00d8}
0x1b72…1b84              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0011, t01=0x00ea}
0x1b84…1ba2              Head {h00=0x001a, h01=0x0050, text=» RF(Z) RED100 ORDER 02«, t00=0x0011, t01=0x00fc}
0x1ba2…1bbe              Head {h00=0x0018, h01=0x0050, text=» SUK A4,/30 ORDER 03«, t00=0x0011, t01=0x011a}
0x1bbe…1be2              Head {h00=0x0020, h01=0x0050, text=» RF(N) CODERR LESS THAN /30 «, t00=0x0011, t01=0x0136}
0x1be2…1bf4              Head {h00=0x000e, h01=0x0050, text=» SUK A4,/9«, t00=0x0011, t01=0x015a}
0x1bf4…1c1a              Head {h00=0x0022, h01=0x0050, text=» RF(P) CODERR GREATER THAN /39«, t00=0x0011, t01=0x016c}
0x1c1a…1c2c (18, 0, 400) Head {h00=0x000e, h01=0x0050, text=» RF RED110«, t00=0x0012, t01=0x0004}
0x1c2c…1c36              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0016}
0x1c36…1c40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0020}
0x1c40…1c5a              Head {h00=0x0016, h01=0x0050, text=»RED100 SUK A4,/20 «, t00=0x0012, t01=0x002a}
0x1c5a…1c7e              Head {h00=0x0020, h01=0x0050, text=» RF(N) CODERR LESS THAN /20 «, t00=0x0012, t01=0x0044}
0x1c7e…1c92              Head {h00=0x0010, h01=0x0050, text=» SUK A4,/3F «, t00=0x0012, t01=0x0068}
0x1c92…1cba              Head {h00=0x0024, h01=0x0050, text=» RF(NP) RED110 CORRECT CHARACTER«, t00=0x0012, t01=0x007c}
0x1cba…1cc4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00a4}
0x1cc4…1cce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ae}
0x1cce…1cf6              Head {h00=0x0024, h01=0x0050, text=»CODERR LDK A1,4 CODE CHECK ERROR«, t00=0x0012, t01=0x00b8}
0x1cf6…1d0a              Head {h00=0x0010, h01=0x0050, text=» ORS A1,8,A8«, t00=0x0012, t01=0x00e0}
0x1d0a…1d3c              Head {h00=0x002e, h01=0x0050, text=» CF A5,STORE STORE CHARACTER IN ECB-BUFFER«, t00=0x0012, t01=0x00f4}
0x1d3c…1d60              Head {h00=0x0020, h01=0x0050, text=» RB RED040 EXECUTE CIO-HALT «, t00=0x0012, t01=0x0126}
0x1d60…1d6a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x014a}
0x1d6a…1d74              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0154}
0x1d74…1d82              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x015e}
0x1d82…1d8c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x016c}
0x1d8c…1d96              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0176}
0x1d96…1da0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0180}
0x1da0…1dbe              Head {h00=0x001a, h01=0x0050, text=»RED110 CC A2,TWBSP,A6 «, t00=0x0012, t01=0x018a}
0x1dbe…1dde              Head {h00=0x001c, h01=0x0050, text=» RF(E) RED120 BACKSPACE «, t00=0x0013, t01=0x0018}
0x1dde…1df6              Head {h00=0x0014, h01=0x0050, text=» CC A2,TWCLR,A6 «, t00=0x0013, t01=0x0038}
0x1df6…1e0c              Head {h00=0x0012, h01=0x0050, text=» RB(NE) RED035«, t00=0x0013, t01=0x0050}
0x1e0c…1e16              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0066}
0x1e16…1e20              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0070}
0x1e20…1e42              Head {h00=0x001e, h01=0x0050, text=» LDK A3,0 CLEAR ECB-BUFFER«, t00=0x0013, t01=0x007a}
0x1e42…1e68              Head {h00=0x0022, h01=0x0050, text=» RB RED020 GET NEXT CHARACTER «, t00=0x0013, t01=0x009c}
0x1e68…1e72              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00c2}
0x1e72…1e7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00cc}
0x1e7c…1e9e              Head {h00=0x001e, h01=0x0050, text=»RED120 SUK A3,1 BACKSPACE «, t00=0x0013, t01=0x00d6}
0x1e9e…1ec8              Head {h00=0x0026, h01=0x0050, text=» RB(NN) RED020 GET NEXT CHARACTER «, t00=0x0013, t01=0x00f8}
0x1ec8…1eda              Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0013, t01=0x0122}
0x1eda…1f00              Head {h00=0x0022, h01=0x0050, text=» RB RED020 GET NEXT CHARACTER «, t00=0x0013, t01=0x0134}
0x1f00…1f0a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x015a}
0x1f0a…1f14              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0164}
0x1f14…1f1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x016e}
0x1f1e…1f2c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0178}
0x1f2c…1f36              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0186}
0x1f36…1f40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0190}
0x1f40…1f56              Head {h00=0x0012, h01=0x0050, text=»*   W R I T E «, t00=0x0014, t01=0x000a}
0x1f56…1f60              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0020}
0x1f60…1f98              Head {h00=0x0034, h01=0x0050, text=»*   ORDERS 05 AND 06:  BASIC AND STANDARD WRITE «, t00=0x0014, t01=0x002a}
0x1f98…1fa2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0062}
0x1fa2…1fac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x006c}
0x1fac…1fc0              Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0014, t01=0x0076}
0x1fc0…1fd4              Head {h00=0x0010, h01=0x0050, text=»TWAOUT EQU *«, t00=0x0014, t01=0x008a}
0x1fd4…1fe0              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0014, t01=0x009e}
0x1fe0…1ff2              Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0014, t01=0x00aa}
0x1ff2…2004              Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0014, t01=0x00bc}
0x2004…202c              Head {h00=0x0024, h01=0x0050, text=» CF A5,STRTIO EXECUTE CIO-START «, t00=0x0014, t01=0x00ce}
0x202c…2036              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00f6}
0x2036…2040              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0100}
0x2040…2052              Head {h00=0x000e, h01=0x0050, text=» CWK A7,5 «, t00=0x0014, t01=0x010a}
0x2052…2070              Head {h00=0x001a, h01=0x0050, text=» RF(Z) WRT050 ORDER 05«, t00=0x0014, t01=0x011c}
0x2070…207a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x013a}
0x207a…2084              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0144}
0x2084…20aa              Head {h00=0x0022, h01=0x0050, text=» LD A3,2,A8 GET BUFFER ADDRESS«, t00=0x0014, t01=0x014e}
0x20aa…20d0              Head {h00=0x0022, h01=0x0050, text=» LC A3,1,A3 CONTROL CHARACTER «, t00=0x0014, t01=0x0174}
0x20d0…20e4              Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0015, t01=0x000a}
0x20e4…20f8              Head {h00=0x0010, h01=0x0050, text=» SUK A3,/2B «, t00=0x0015, t01=0x001e}
0x20f8…211a              Head {h00=0x001e, h01=0x0050, text=» RF(Z) WRT030 NO CR OR LF «, t00=0x0015, t01=0x0032}
0x211a…2124              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0054}
0x2124…212e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005e}
0x212e…215e              Head {h00=0x002c, h01=0x0050, text=» ST A4,DWTHP,A6 HEAD POSITION INDICATOR «, t00=0x0015, t01=0x0068}
0x215e…2170              Head {h00=0x000e, h01=0x0050, text=» LDK A4,2 «, t00=0x0015, t01=0x0098}
0x2170…2198              Head {h00=0x0024, h01=0x0050, text=» LDK A2,CR SEND CARRIAGE RETURN «, t00=0x0015, t01=0x00aa}
0x2198…21a6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x00d2}
0x21a6…21b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00e0}
0x21b0…21ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ea}
0x21ba…21c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f4}
0x21c4…21ec              Head {h00=0x0024, h01=0x0050, text=»WRT010 CF A5,OTR SEND CHARACTER «, t00=0x0015, t01=0x00fe}
0x21ec…21f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0126}
0x21f6…2200              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0130}
0x2200…2212              Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0015, t01=0x013a}
0x2212…2228              Head {h00=0x0012, h01=0x0050, text=» RF(NP) WRT020«, t00=0x0015, t01=0x014c}
0x2228…2248              Head {h00=0x001c, h01=0x0050, text=»WRT015 LDK A2,LF SEND LF«, t00=0x0015, t01=0x0162}
0x2248…225a              Head {h00=0x000e, h01=0x0050, text=» RB WRT010«, t00=0x0015, t01=0x0182}
0x225a…2264 (22, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0004}
0x2264…227c              Head {h00=0x0014, h01=0x0050, text=»WRT020 SUK A3,5 «, t00=0x0016, t01=0x000e}
0x227c…22a0              Head {h00=0x0020, h01=0x0050, text=» RB(Z) WRT015 SEND SECOND LF«, t00=0x0016, t01=0x0026}
0x22a0…22b2              Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0016, t01=0x004a}
0x22b2…22ca              Head {h00=0x0014, h01=0x0050, text=» RF(NZ) WRT030  «, t00=0x0016, t01=0x005c}
0x22ca…22ec              Head {h00=0x001e, h01=0x0050, text=» LDK A2,/0C SEND FORM FEED«, t00=0x0016, t01=0x0074}
0x22ec…22fe              Head {h00=0x000e, h01=0x0050, text=» RB WRT010«, t00=0x0016, t01=0x0096}
0x22fe…2324              Head {h00=0x0022, h01=0x0050, text=»WRT030 LDK A3,2 BUFFER POINTER«, t00=0x0016, t01=0x00a8}
0x2324…2344              Head {h00=0x001c, h01=0x0050, text=» RF WRT050 GET CHARACTER«, t00=0x0016, t01=0x00ce}
0x2344…234e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ee}
0x234e…2358              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00f8}
0x2358…2362              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0102}
0x2362…2376              Head {h00=0x0010, h01=0x0050, text=»WRT040 EQU *«, t00=0x0016, t01=0x010c}
0x2376…2398              Head {h00=0x001e, h01=0x0050, text=» CF A5,OTR SEND CHARACTER «, t00=0x0016, t01=0x0120}
0x2398…23c4              Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 INCREMENT BYTE COUNTER «, t00=0x0016, t01=0x0142}
0x23c4…23d2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x016e}
0x23d2…23dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x017c}
0x23dc…23e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0186}
0x23e6…23f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0190}
0x23f0…242a              Head {h00=0x0036, h01=0x0050, text=»WRT050 CF A5,GETCHR GET CHARACTER FROM ECB-BUFFER «, t00=0x0017, t01=0x000a}
0x242a…243e              Head {h00=0x0010, h01=0x0050, text=» LDR A1,A1  «, t00=0x0017, t01=0x0044}
0x243e…2462              Head {h00=0x0020, h01=0x0050, text=» RB(Z) RED040 LAST CHARACTER«, t00=0x0017, t01=0x0058}
0x2462…2474              Head {h00=0x000e, h01=0x0050, text=» CWK A7,5 «, t00=0x0017, t01=0x007c}
0x2474…2496              Head {h00=0x001e, h01=0x0050, text=» RB(Z) WRT040 BASIC WRITE «, t00=0x0017, t01=0x008e}
0x2496…24a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b0}
0x24a0…24aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ba}
0x24aa…24d6              Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 ORDER 06: STANDARD WRITE «, t00=0x0017, t01=0x00c4}
0x24d6…24ea              Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x0017, t01=0x00f0}
0x24ea…24fe              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/07 «, t00=0x0017, t01=0x0104}
0x24fe…2518              Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRT040 BELL«, t00=0x0017, t01=0x0118}
0x2518…2522              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0132}
0x2522…2534              Head {h00=0x000e, h01=0x0050, text=» SUK A1,/A«, t00=0x0017, t01=0x013c}
0x2534…2554              Head {h00=0x001c, h01=0x0050, text=» RF(E) WRTTAB TABULATION«, t00=0x0017, t01=0x014e}
0x2554…255e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x016e}
0x255e…2570              Head {h00=0x000e, h01=0x0050, text=» SUK A1,/F«, t00=0x0017, t01=0x0178}
0x2570…2594              Head {h00=0x0020, h01=0x0050, text=» RF(L) ERRCOD LESS THAN /20 «, t00=0x0017, t01=0x018a}
0x2594…25a8              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/3F «, t00=0x0018, t01=0x001e}
0x25a8…25ce              Head {h00=0x0022, h01=0x0050, text=» RB(NP) WRT040 BETWEEN /20-/5F«, t00=0x0018, t01=0x0032}
0x25ce…25e2              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/20 «, t00=0x0018, t01=0x0058}
0x25e2…2608              Head {h00=0x0022, h01=0x0050, text=» RF(NP) WRT060 BETWEEN /60-/7F«, t00=0x0018, t01=0x006c}
0x2608…2612              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0092}
0x2612…261c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x009c}
0x261c…2634              Head {h00=0x0014, h01=0x0050, text=»ERRCOD LDK A1,4 «, t00=0x0018, t01=0x00a6}
0x2634…2648              Head {h00=0x0010, h01=0x0050, text=» ORS A1,8,A8«, t00=0x0018, t01=0x00be}
0x2648…266e              Head {h00=0x0022, h01=0x0050, text=» RB WRT050 GET NEXT CHARACTER «, t00=0x0018, t01=0x00d2}
0x266e…2678              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f8}
0x2678…2682              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0102}
0x2682…269c              Head {h00=0x0016, h01=0x0050, text=»WRT060 SUK A2,/20 «, t00=0x0018, t01=0x010c}
0x269c…26ae              Head {h00=0x000e, h01=0x0050, text=» RB WRT040«, t00=0x0018, t01=0x0126}
0x26ae…26b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0138}
0x26b8…26c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0142}
0x26c2…26d0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x014c}
0x26d0…26da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x015a}
0x26da…26e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0164}
0x26e4…2704              Head {h00=0x001c, h01=0x0050, text=»*   T A B U L A T I O N «, t00=0x0018, t01=0x016e}
0x2704…270e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x018e}
0x270e…2718              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0008}
0x2718…272c              Head {h00=0x0010, h01=0x0050, text=»WRTTAB EQU *«, t00=0x0019, t01=0x0012}
0x272c…2762              Head {h00=0x0032, h01=0x0050, text=» CF A5,GETCHR GET FIRST TAB.POSITION CHARACTER«, t00=0x0019, t01=0x0026}
0x2762…277a              Head {h00=0x0014, h01=0x0050, text=» LDR A4,A2 COPY «, t00=0x0019, t01=0x005c}
0x277a…27b2              Head {h00=0x0034, h01=0x0050, text=» CF A5,GETCHR GET SECOND TAB. POSITION CHARACTER«, t00=0x0019, t01=0x0074}
0x27b2…27c4              Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x0019, t01=0x00ac}
0x27c4…27d6              Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x0019, t01=0x00be}
0x27d6…27ec              Head {h00=0x0012, h01=0x0050, text=» RF(Z) TAB020 «, t00=0x0019, t01=0x00d0}
0x27ec…2804              Head {h00=0x0014, h01=0x0050, text=»TAB010 ADK A2,/A«, t00=0x0019, t01=0x00e6}
0x2804…2816              Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0019, t01=0x00fe}
0x2816…282c              Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TAB010«, t00=0x0019, t01=0x0110}
0x282c…2836              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0126}
0x2836…2854              Head {h00=0x001a, h01=0x0050, text=»TAB020 SU A2,DWTHP,A6 «, t00=0x0019, t01=0x0130}
0x2854…288c              Head {h00=0x0034, h01=0x0050, text=» LC A4,DWTBC,A6 GET NUMBER OF OUTPUT CHARACTERS «, t00=0x0019, t01=0x014e}
0x288c…28ba              Head {h00=0x002a, h01=0x0050, text=» SUR A2,A4 NUMBER OF SPACES TO BE SENT«, t00=0x0019, t01=0x0186}
0x28ba…28ea              Head {h00=0x002c, h01=0x0050, text=» RB(NP) WRT050 NO SPACES SHOULD BE SENT «, t00=0x001a, t01=0x0024}
0x28ea…28fc              Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001a, t01=0x0054}
0x28fc…2922              Head {h00=0x0022, h01=0x0050, text=»TAB030 LDK A2,/20 SEND BALNKS «, t00=0x001a, t01=0x0066}
0x2922…294a              Head {h00=0x0024, h01=0x0050, text=»TAB040 CF A5,OTR SEND CHARACTER «, t00=0x001a, t01=0x008c}
0x294a…2976              Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 INCREMENT BYTE COUNTER «, t00=0x001a, t01=0x00b4}
0x2976…2988              Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001a, t01=0x00e0}
0x2988…29b2              Head {h00=0x0026, h01=0x0050, text=» RB(NZ) TAB030 SEND ANOTHER SPACE «, t00=0x001a, t01=0x00f2}
0x29b2…29c4              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x001a, t01=0x011c}
0x29c4…29e8              Head {h00=0x0020, h01=0x0050, text=» RB(NZ) WRT050 NOT RECOVERY «, t00=0x001a, t01=0x012e}
0x29e8…2a12              Head {h00=0x0026, h01=0x0050, text=» SC A4,DWTBC,A6 RESET BYTE COUNTER«, t00=0x001a, t01=0x0152}
0x2a12…2a38              Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 PRESET BUFFER INDEX «, t00=0x001a, t01=0x017c}
0x2a38…2a5e              Head {h00=0x0022, h01=0x0050, text=» RB WRT050 GET NEXT CHARACTER «, t00=0x001b, t01=0x0012}
0x2a5e…2a6c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0038}
0x2a6c…2a76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0046}
0x2a76…2a80              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0050}
0x2a80…2a9c              Head {h00=0x0018, h01=0x0050, text=»*   RECOVERY ROUTINE«, t00=0x001b, t01=0x005a}
0x2a9c…2aa6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0076}
0x2aa6…2ab0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0080}
0x2ab0…2aba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x008a}
0x2aba…2acc              Head {h00=0x000e, h01=0x0050, text=»TWON EQU *«, t00=0x001b, t01=0x0094}
0x2acc…2ae2              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001b, t01=0x00a6}
0x2ae2…2b0c              Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x001b, t01=0x00bc}
0x2b0c…2b18              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00e6}
0x2b18…2b22              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00f2}
0x2b22…2b38              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001b, t01=0x00fc}
0x2b38…2b5e              Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x001b, t01=0x0112}
0x2b5e…2b6a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0138}
0x2b6a…2b74              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0144}
0x2b74…2b9c              Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWTW01 GET DWT-ADDRESS «, t00=0x001b, t01=0x014e}
0x2b9c…2bb0              Head {h00=0x0010, h01=0x0050, text=» IFT POWUP=1«, t00=0x001b, t01=0x0176}
0x2bb0…2bc6              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/200 «, t00=0x001b, t01=0x018a}
0x2bc6…2bf0              Head {h00=0x0026, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE POWER UP«, t00=0x001c, t01=0x0010}
0x2bf0…2bfc              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x003a}
0x2bfc…2c14              Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x001c, t01=0x0046}
0x2c14…2c38              Head {h00=0x0020, h01=0x0050, text=» RF(N) EXIT DEVICE NOT BUSY «, t00=0x001c, t01=0x005e}
0x2c38…2c56              Head {h00=0x001a, h01=0x0050, text=»TWON10 LD A3,DWTA3,A6 «, t00=0x001c, t01=0x0082}
0x2c56…2c78              Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x001c, t01=0x00a0}
0x2c78…2c8c              Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x001c, t01=0x00c2}
0x2c8c…2cb0              Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB-ADDRESS«, t00=0x001c, t01=0x00d6}
0x2cb0…2cc8              Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB2 «, t00=0x001c, t01=0x00fa}
0x2cc8…2cea              Head {h00=0x001e, h01=0x0050, text=» ADR A5,A6 GET STACK BASE «, t00=0x001c, t01=0x0112}
0x2cea…2cfc              Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x001c, t01=0x0134}
0x2cfc…2d22              Head {h00=0x0022, h01=0x0050, text=» ABL(N) TWA010 ORDERS 01,02,03«, t00=0x001c, t01=0x0146}
0x2d22…2d34              Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x001c, t01=0x016c}
0x2d34…2d52              Head {h00=0x001a, h01=0x0050, text=» RF(Z) TWON20 ORDER 05«, t00=0x001c, t01=0x017e}
0x2d52…2d5e              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x001d, t01=0x000c}
0x2d5e…2d70              Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x001d, t01=0x0018}
0x2d70…2d98              Head {h00=0x0024, h01=0x0050, text=» CF A5,STRTIO EXECUTE CIO-START «, t00=0x001d, t01=0x002a}
0x2d98…2daa              Head {h00=0x000e, h01=0x0050, text=» LDK A2,CR«, t00=0x001d, t01=0x0052}
0x2daa…2dbc              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x001d, t01=0x0064}
0x2dbc…2dd4              Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTHP,A6 «, t00=0x001d, t01=0x0076}
0x2dd4…2de6              Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x001d, t01=0x008e}
0x2de6…2e0e              Head {h00=0x0024, h01=0x0050, text=» RB TAB040 REPRINT LAST REQUEST «, t00=0x001d, t01=0x00a0}
0x2e0e…2e18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c8}
0x2e18…2e3c              Head {h00=0x0020, h01=0x0050, text=»TWON20 LDK A1,TPERR ORDER 05«, t00=0x001d, t01=0x00d2}
0x2e3c…2e50              Head {h00=0x0010, h01=0x0050, text=» ABL DISEND «, t00=0x001d, t01=0x00f6}
0x2e50…2e5a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x010a}
0x2e5a…2e64              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0114}
0x2e64…2e72              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x011e}
0x2e72…2e7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x012c}
0x2e7c…2e86              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0136}
0x2e86…2e9a              Head {h00=0x0010, h01=0x0050, text=»*   I H T W «, t00=0x001d, t01=0x0140}
0x2e9a…2ea4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0154}
0x2ea4…2ed8              Head {h00=0x0030, h01=0x0050, text=»*   INTERRUPT HANDLER: PROCESS OF INTERRUPT «, t00=0x001d, t01=0x015e}
0x2ed8…2ee2 (30, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0004}
0x2ee2…2eec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x000e}
0x2eec…2efe              Head {h00=0x000e, h01=0x0050, text=»IHTW EQU *«, t00=0x001e, t01=0x0018}
0x2efe…2f26              Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x001e, t01=0x002a}
0x2f26…2f3c              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001e, t01=0x0052}
0x2f3c…2f66              Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x001e, t01=0x0068}
0x2f66…2f72              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0092}
0x2f72…2f7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x009e}
0x2f7c…2f92              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001e, t01=0x00a8}
0x2f92…2fb8              Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x001e, t01=0x00be}
0x2fb8…2fc4              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00e4}
0x2fc4…2fce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00f0}
0x2fce…2fe6              Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWTW01 «, t00=0x001e, t01=0x00fa}
0x2fe6…2ffa              Head {h00=0x0010, h01=0x0050, text=»LDREG EQU * «, t00=0x001e, t01=0x0112}
0x2ffa…3012              Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x001e, t01=0x0126}
0x3012…3036              Head {h00=0x0020, h01=0x0050, text=» RF(N) SKIP DEVICE NOT BUSY «, t00=0x001e, t01=0x013e}
0x3036…3062              Head {h00=0x0028, h01=0x0050, text=»IHTW10 LDR* A2,A6 GET DEVICE ADDRESS«, t00=0x001e, t01=0x0162}
0x3062…3078              Head {h00=0x0012, h01=0x0050, text=» ORKL A2,TWSST«, t00=0x001e, t01=0x018e}
0x3078…3094              Head {h00=0x0018, h01=0x0050, text=» EXR A2 EXECUTE SST «, t00=0x001f, t01=0x0014}
0x3094…30b0              Head {h00=0x0018, h01=0x0050, text=» RF(A) IHTW30 ENDIO «, t00=0x001f, t01=0x0030}
0x30b0…30d2              Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x001f, t01=0x004c}
0x30d2…30e6              Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x001f, t01=0x006e}
0x30e6…30f8              Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x001f, t01=0x0082}
0x30f8…310e              Head {h00=0x0012, h01=0x0050, text=» RF(P) IHTW30 «, t00=0x001f, t01=0x0094}
0x310e…3134              Head {h00=0x0022, h01=0x0050, text=» LDR* A2,A6 GET DEVICE ADDRESS«, t00=0x001f, t01=0x00aa}
0x3134…314c              Head {h00=0x0014, h01=0x0050, text=» ORKL A2,TWINR  «, t00=0x001f, t01=0x00d0}
0x314c…3168              Head {h00=0x0018, h01=0x0050, text=» EXR A2 EXECUTE INR «, t00=0x001f, t01=0x00e8}
0x3168…3190              Head {h00=0x0024, h01=0x0050, text=» ANK A2,/7F MASK INPUT-CHARACTER«, t00=0x001f, t01=0x0104}
0x3190…319e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x012c}
0x319e…31a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x013a}
0x31a8…31be              Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x001f, t01=0x0144}
0x31be…31e8              Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTTP,A6 GET TIMER POINTER «, t00=0x001f, t01=0x015a}
0x31e8…3216              Head {h00=0x002a, h01=0x0050, text=» RF(Z) IHTW30 NO TIMING ON THIS DEVICE«, t00=0x001f, t01=0x0184}
0x3216…322c              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,-TIME«, t00=0x0020, t01=0x0022}
0x322c…3244              Head {h00=0x0014, h01=0x0050, text=» ST* A1,DWTTP,A6«, t00=0x0020, t01=0x0038}
0x3244…3250              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0050}
0x3250…325a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x005c}
0x325a…3264              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0066}
0x3264…327c              Head {h00=0x0014, h01=0x0050, text=»IHTW30 LDK A1,0 «, t00=0x0020, t01=0x0070}
0x327c…32a0              Head {h00=0x0020, h01=0x0050, text=» RF LDREGE RESTORE REGISTERS«, t00=0x0020, t01=0x0088}
0x32a0…32a8              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00ac}
0x32a8…32b0              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00b4}
0x32b0…32c4              Head {h00=0x0010, h01=0x0050, text=»IHTW35 EQU *«, t00=0x0020, t01=0x00bc}
0x32c4…32e0              Head {h00=0x0018, h01=0x0050, text=» IFT POWUP+TIMOUT=2 «, t00=0x0020, t01=0x00d0}
0x32e0…32e8              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00ec}
0x32e8…330e              Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTTP,A6 TIMER POINTER «, t00=0x0020, t01=0x00f4}
0x330e…333c              Head {h00=0x002a, h01=0x0050, text=» RF(Z) IHTW40 NO TIMING ON THIS DEVICE«, t00=0x0020, t01=0x011a}
0x333c…335e              Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x0020, t01=0x0148}
0x335e…336a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x016a}
0x336a…3378              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x0176}
0x3378…3382              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0184}
0x3382…338c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x018e}
0x338c…33a0              Head {h00=0x0010, h01=0x0050, text=»IHTW40 EQU *«, t00=0x0021, t01=0x0008}
0x33a0…33aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x001c}
0x33aa…33b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0026}
0x33b4…33e4              Head {h00=0x002c, h01=0x0050, text=»IHTW50 ST A3,6,A8 SAVE EFFECTIVE LENGTH «, t00=0x0021, t01=0x0030}
0x33e4…33fc              Head {h00=0x0014, h01=0x0050, text=»IHTW55 SUK A7,4 «, t00=0x0021, t01=0x0060}
0x33fc…341e              Head {h00=0x001e, h01=0x0050, text=» RF(NP) IHTW60 READ ORDER «, t00=0x0021, t01=0x0078}
0x341e…3428              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x009a}
0x3428…3432              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00a4}
0x3432…345a              Head {h00=0x0024, h01=0x0050, text=» LC A3,DWTBC,A6 GET BYTE COUNTER«, t00=0x0021, t01=0x00ae}
0x345a…3488              Head {h00=0x002a, h01=0x0050, text=» ADS A3,DWTHP,A6 UPDATE HEAD POSITION «, t00=0x0021, t01=0x00d6}
0x3488…349a              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0021, t01=0x0104}
0x349a…34c4              Head {h00=0x0026, h01=0x0050, text=» SC A3,DWTBC,A6 CLEAR BYTE COUNTER«, t00=0x0021, t01=0x0116}
0x34c4…34ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0140}
0x34ce…34e2              Head {h00=0x0010, h01=0x0050, text=»IHTW60 EQU *«, t00=0x0021, t01=0x014a}
0x34e2…34f0              Head {h00=0x000a, h01=0x0050, text=»    =3«, t00=0x0021, t01=0x015e}
0x34f0…3502              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0021, t01=0x016c}
0x3502…3524              Head {h00=0x001e, h01=0x0050, text=» ABL DISEND PERFORM TENDIO«, t00=0x0021, t01=0x017e}
0x3524…352e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0010}
0x352e…3538              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x001a}
0x3538…3540              Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0024}
0x3540…3558              Head {h00=0x0014, h01=0x0050, text=»SKIP LDR* A2,A6 «, t00=0x0022, t01=0x002c}
0x3558…356e              Head {h00=0x0012, h01=0x0050, text=» ORKL A2,TWSST«, t00=0x0022, t01=0x0044}
0x356e…3582              Head {h00=0x0010, h01=0x0050, text=» EXR A2 SST «, t00=0x0022, t01=0x005a}
0x3582…3596              Head {h00=0x0010, h01=0x0050, text=» RF(A) EXIT «, t00=0x0022, t01=0x006e}
0x3596…35aa              Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0022, t01=0x0082}
0x35aa…35c0              Head {h00=0x0012, h01=0x0050, text=» ORKL A2,TWHLT«, t00=0x0022, t01=0x0096}
0x35c0…35d8              Head {h00=0x0014, h01=0x0050, text=» EXR A2 CIO HALT«, t00=0x0022, t01=0x00ac}
0x35d8…35e8              Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x0022, t01=0x00c4}
0x35e8…35f6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x00d4}
0x35f6…3600              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00e2}
0x3600…360a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ec}
0x360a…3614              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00f6}
0x3614…362c              Head {h00=0x0014, h01=0x0050, text=»*   I/O COMMANDS«, t00=0x0022, t01=0x0100}
0x362c…3636              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0118}
0x3636…3640              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0122}
0x3640…3670              Head {h00=0x002c, h01=0x0050, text=»STRTIO LDKL A1,TWSTRT EXECUTE CIO-START «, t00=0x0022, t01=0x012c}
0x3670…3682              Head {h00=0x000e, h01=0x0050, text=» RF EXECIO«, t00=0x0022, t01=0x015c}
0x3682…36ae              Head {h00=0x0028, h01=0x0050, text=»HLTIO LDKL A1,TWHLT         CIO-HALT«, t00=0x0022, t01=0x016e}
0x36ae…36c0              Head {h00=0x000e, h01=0x0050, text=» RF EXECIO«, t00=0x0023, t01=0x000a}
0x36c0…36e6              Head {h00=0x0022, h01=0x0050, text=»OTR LDKL A1,TWOTR         OTR «, t00=0x0023, t01=0x001c}
0x36e6…36f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0042}
0x36f0…36fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x004c}
0x36fa…3716              Head {h00=0x0018, h01=0x0050, text=»EXECIO LD A7,PFPOST «, t00=0x0023, t01=0x0056}
0x3716…373a              Head {h00=0x0020, h01=0x0050, text=» RF(NZ) STREG PFINIT PENDING«, t00=0x0023, t01=0x0072}
0x373a…375e              Head {h00=0x0020, h01=0x0050, text=» ORR* A1,A6 GET I/O-COMMAND «, t00=0x0023, t01=0x0096}
0x375e…377e              Head {h00=0x001c, h01=0x0050, text=» EXR A1 EXECUTE COMMAND «, t00=0x0023, t01=0x00ba}
0x377e…3792              Head {h00=0x0010, h01=0x0050, text=» RF(NA) HALT«, t00=0x0023, t01=0x00da}
0x3792…37a6              Head {h00=0x0010, h01=0x0050, text=»STREG EQU * «, t00=0x0023, t01=0x00ee}
0x37a6…37bc              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/100 «, t00=0x0023, t01=0x0102}
0x37bc…37f0              Head {h00=0x0030, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED«, t00=0x0023, t01=0x0118}
0x37f0…3818              Head {h00=0x0024, h01=0x0050, text=» ST A3,DWTA3,A6 SAVE REGISTER A3«, t00=0x0023, t01=0x014c}
0x3818…3840              Head {h00=0x0024, h01=0x0050, text=» ST A4,DWTA4,A6               A4«, t00=0x0023, t01=0x0174}
0x3840…3868              Head {h00=0x0024, h01=0x0050, text=» ST A5,DWTA5,A6               A5«, t00=0x0024, t01=0x000c}
0x3868…387e              Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0024, t01=0x0034}
0x387e…389a              Head {h00=0x0018, h01=0x0050, text=»HALT ST A2,DWTA2,A6 «, t00=0x0024, t01=0x004a}
0x389a…38c0              Head {h00=0x0022, h01=0x0050, text=» CF A5,HLTIO EXECUTE CIO-HALT «, t00=0x0024, t01=0x0066}
0x38c0…38d8              Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTA2,A6 «, t00=0x0024, t01=0x008c}
0x38d8…38fa              Head {h00=0x001e, h01=0x0050, text=» RB STRTIO RESTART REQUEST«, t00=0x0024, t01=0x00a4}
0x38fa…3904              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00c6}
0x3904…390e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00d0}
0x390e…391c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x00da}
0x391c…3926              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00e8}
0x3926…3930              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00f2}
0x3930…393a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00fc}
0x393a…3964              Head {h00=0x0026, h01=0x0050, text=»*   STORE CHARACTER IN ECB-BUFFER «, t00=0x0024, t01=0x0106}
0x3964…396e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0130}
0x396e…3978              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x013a}
0x3978…39a4              Head {h00=0x0028, h01=0x0050, text=»STORE LD A4,2,A8 GET BUFFER ADDRESS «, t00=0x0024, t01=0x0144}
0x39a4…39cc              Head {h00=0x0024, h01=0x0050, text=» ADR A4,A3 GET CHARACTER ADDRESS«, t00=0x0024, t01=0x0170}
0x39cc…39ee              Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x0025, t01=0x0008}
0x39ee…3a16              Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0025, t01=0x002a}
0x3a16…3a26              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0025, t01=0x0052}
0x3a26…3a30              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0062}
0x3a30…3a3a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x006c}
0x3a3a…3a44              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0076}
0x3a44…3a5a              Head {h00=0x0012, h01=0x0050, text=» IFT TIMOUT=1 «, t00=0x0025, t01=0x0080}
0x3a5a…3a64              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0096}
0x3a64…3a6e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00a0}
0x3a6e…3a88              Head {h00=0x0016, h01=0x0050, text=»*   TIMOUT ROUTINE«, t00=0x0025, t01=0x00aa}
0x3a88…3a92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00c4}
0x3a92…3a9c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00ce}
0x3a9c…3ab0              Head {h00=0x0010, h01=0x0050, text=»TWTUT EQU * «, t00=0x0025, t01=0x00d8}
0x3ab0…3ad2              Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 GET DWT-ADDRESS«, t00=0x0025, t01=0x00ec}
0x3ad2…3afa              Head {h00=0x0024, h01=0x0050, text=» LDK A1,/40 TIME OUT RETURN CODE«, t00=0x0025, t01=0x010e}
0x3afa…3b06              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0136}
0x3b06…3b10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0142}
0x3b10…3b1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x014c}
0x3b1a…3b28              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x0156}
0x3b28…3b32              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0164}
0x3b32…3b3c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x016e}
0x3b3c…3b54              Head {h00=0x0014, h01=0x0050, text=»*   L D R E G E «, t00=0x0025, t01=0x0178}
0x3b54…3b5e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0190}
0x3b5e…3b9a              Head {h00=0x0038, h01=0x0050, text=»*   RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5«, t00=0x0026, t01=0x000a}
0x3b9a…3ba4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0046}
0x3ba4…3bae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0050}
0x3bae…3bc2              Head {h00=0x0010, h01=0x0050, text=»LDREGE EQU *«, t00=0x0026, t01=0x005a}
0x3bc2…3bec              Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTA3,A6 RELOAD REGISTER A3«, t00=0x0026, t01=0x006e}
0x3bec…3c16              Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTA4,A6                 A4«, t00=0x0026, t01=0x0098}
0x3c16…3c40              Head {h00=0x0026, h01=0x0050, text=» LD A5,DWTA5,A6                 A5«, t00=0x0026, t01=0x00c2}
0x3c40…3c58              Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x0026, t01=0x00ec}
0x3c58…3c6c              Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0026, t01=0x0104}
0x3c6c…3c84              Head {h00=0x0014, h01=0x0050, text=» LD A8,DWTECB,A6«, t00=0x0026, t01=0x0118}
0x3c84…3ca8              Head {h00=0x0020, h01=0x0050, text=» RTN A5 RETURN VIA A5-STACK «, t00=0x0026, t01=0x0130}
0x3ca8…3cb6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x0154}
0x3cb6…3cc0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0162}
0x3cc0…3cca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x016c}
0x3cca…3ce2              Head {h00=0x0014, h01=0x0050, text=»*    G E T C H R«, t00=0x0026, t01=0x0176}
0x3ce2…3cec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x018e}
0x3cec…3d28              Head {h00=0x0038, h01=0x0050, text=»*    SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER«, t00=0x0027, t01=0x0008}
0x3d28…3d32              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0044}
0x3d32…3d48              Head {h00=0x0012, h01=0x0050, text=»*    ON ENTRY:«, t00=0x0027, t01=0x004e}
0x3d48…3d52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0064}
0x3d52…3d70              Head {h00=0x001a, h01=0x0050, text=»*    A3 = BUFFER INDEX«, t00=0x0027, t01=0x006e}
0x3d70…3d8e              Head {h00=0x001a, h01=0x0050, text=»*    A8 = ECB-ADDRESS «, t00=0x0027, t01=0x008c}
0x3d8e…3d98              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00aa}
0x3d98…3dae              Head {h00=0x0012, h01=0x0050, text=»*    ON EXIT: «, t00=0x0027, t01=0x00b4}
0x3dae…3db8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00ca}
0x3db8…3dd4              Head {h00=0x0018, h01=0x0050, text=»*    A2 = CHARACTER «, t00=0x0027, t01=0x00d4}
0x3dd4…3e02              Head {h00=0x002a, h01=0x0050, text=»*    A1 = 0 IF LAST CHARACTER ELSE # 0«, t00=0x0027, t01=0x00f0}
0x3e02…3e0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x011e}
0x3e0c…3e5a              Head {h00=0x004a, h01=0x0050, text=»*    IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH«, t00=0x0027, t01=0x0128}
0x3e5a…3e64              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0176}
0x3e64…3e6e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0180}
0x3e6e…3e82              Head {h00=0x0010, h01=0x0050, text=»GETCHR EQU *«, t00=0x0027, t01=0x018a}
0x3e82…3ea6              Head {h00=0x0020, h01=0x0050, text=» LD A1,4,A8 REQUESTED LENGTH«, t00=0x0028, t01=0x000e}
0x3ea6…3eb8              Head {h00=0x000e, h01=0x0050, text=» SUR A1,A3«, t00=0x0028, t01=0x0032}
0x3eb8…3ee6              Head {h00=0x002a, h01=0x0050, text=» RF(NP) GCH010 LAST CHARACTER REACHED «, t00=0x0028, t01=0x0044}
0x3ee6…3f0c              Head {h00=0x0022, h01=0x0050, text=» LD A1,2,A8 GET BUFFER ADDRESS«, t00=0x0028, t01=0x0072}
0x3f0c…3f1e              Head {h00=0x000e, h01=0x0050, text=» ADR A1,A3«, t00=0x0028, t01=0x0098}
0x3f1e…3f3c              Head {h00=0x001a, h01=0x0050, text=» LCR A2,A1 CHAR. TO A2«, t00=0x0028, t01=0x00aa}
0x3f3c…3f50              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0028, t01=0x00c8}
0x3f50…3f78              Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0028, t01=0x00dc}
0x3f78…3f88              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0028, t01=0x0104}
0x3f88…3fb8              Head {h00=0x002c, h01=0x0050, text=»GCH010 ST A3,6,A8 STORE EFFECTIVE LENGTH«, t00=0x0028, t01=0x0114}
0x3fb8…3fc8              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0028, t01=0x0144}
0x3fc8…3fd6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0154}
0x3fd6…3fe0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0162}
0x3fe0…400c              Head {h00=0x0028, h01=0x0050, text=»*   DEVICE WORK TABLE FOR TYPEWRITER«, t00=0x0028, t01=0x016c}
0x400c…4016              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0008}
0x4016…4020              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0012}
0x4020…4040              Head {h00=0x001c, h01=0x0050, text=»DWTW01 EQU * TABLE ENTRY«, t00=0x0029, t01=0x001c}
0x4040…4066              Head {h00=0x0022, h01=0x0050, text=» DATA /0010 CHANNEL PARAMETER «, t00=0x0029, t01=0x003c}
0x4066…409a              Head {h00=0x0030, h01=0x0050, text=» DATA /8000 STATUS./8000 MEANS DEVICE READY «, t00=0x0029, t01=0x0062}
0x409a…40b6              Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0029, t01=0x0096}
0x40b6…40cc              Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0029, t01=0x00b2}
0x40cc…40f8              Head {h00=0x0028, h01=0x0050, text=» DATA TWAD POINTER TO ADDRESS BLOCK «, t00=0x0029, t01=0x00c8}
0x40f8…4114              Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB-ADDRESS«, t00=0x0029, t01=0x00f4}
0x4114…413c              Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0029, t01=0x0110}
0x413c…415a              Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0029, t01=0x0138}
0x415a…4170              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0029, t01=0x0156}
0x4170…419a              Head {h00=0x0026, h01=0x0050, text=» DATA 0 SAVE AREA USER ECB ADDRESS«, t00=0x0029, t01=0x016c}
0x419a…41be              Head {h00=0x0020, h01=0x0050, text=» DATA DEVECB MMU ECB ADDRESS«, t00=0x002a, t01=0x0008}
0x41be…41ca              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x002c}
0x41ca…41ec              Head {h00=0x001e, h01=0x0050, text=» DATA 0 OUTPUT QUEUE LINK «, t00=0x002a, t01=0x0038}
0x41ec…420c              Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A3«, t00=0x002a, t01=0x005a}
0x420c…422c              Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A4«, t00=0x002a, t01=0x007a}
0x422c…424c              Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A5«, t00=0x002a, t01=0x009a}
0x424c…4266              Head {h00=0x0016, h01=0x0050, text=» RES 4 STACK BASE «, t00=0x002a, t01=0x00ba}
0x4266…4284              Head {h00=0x001a, h01=0x0050, text=» DATA 1 TIMER POINTER «, t00=0x002a, t01=0x00d4}
0x4284…42a0              Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECHO DEVICE «, t00=0x002a, t01=0x00f2}
0x42a0…42cc              Head {h00=0x0028, h01=0x0050, text=» DATA X:F LEFT BYTE BACKSPACE KEY =4«, t00=0x002a, t01=0x010e}
0x42cc…42ec              Head {h00=0x001c, h01=0x0050, text=»   RIGHT BYTE CANCEL KEY«, t00=0x002a, t01=0x013a}
0x42ec…4318              Head {h00=0x0028, h01=0x0050, text=» DATA X:G LEFT BYTE STANDARD EOR =4 «, t00=0x002a, t01=0x015a}
0x4318…433a              Head {h00=0x001e, h01=0x0050, text=»   RIGHT BYTE DOUBLE ZERO «, t00=0x002a, t01=0x0186}
0x433a…4360              Head {h00=0x0022, h01=0x0050, text=» DATA 0 HEAD POSITION POINETR «, t00=0x002b, t01=0x0018}
0x4360…4380              Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A2«, t00=0x002b, t01=0x003e}
0x4380…43b0              Head {h00=0x002c, h01=0x0050, text=» DATA 0 ECHO DEV (CHANGED DWT-LAYOUT) =1«, t00=0x002b, t01=0x005e}
0x43b0…43ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x008e}
0x43ba…43d2              Head {h00=0x0014, h01=0x0050, text=» EJECT   DRTW01 «, t00=0x002b, t01=0x0098}
0x43d2…43dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00b0}
0x43dc…43e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00ba}
0x43e6…43fc              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x002b, t01=0x00c4}
0x43fc…4410              Head {h00=0x0010, h01=0x0050, text=»DEVECB EQU *«, t00=0x002b, t01=0x00da}
0x4410…4420              Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x002b, t01=0x00ee}
0x4420…4434              Head {h00=0x0010, h01=0x0050, text=» DATA TW:BUF«, t00=0x002b, t01=0x00fe}
0x4434…444a              Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,0,0 «, t00=0x002b, t01=0x0112}
0x444a…4460              Head {h00=0x0012, h01=0x0050, text=» RES DVBKTB+1 «, t00=0x002b, t01=0x0128}
0x4460…447c              Head {h00=0x0018, h01=0x0050, text=»TW:BUF RES DVBLEN+1 «, t00=0x002b, t01=0x013e}
0x447c…4488              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x015a}
0x4488…4492              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0166}
0x4492…449c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0170}
0x449c…44a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x017a}
0x44a6…44b2              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002b, t01=0x0184}
0x44b2…44b6 (44, 2, 8)   Head {h00=0x4004, h01=0x0000}
0x44b6…44ba              00 2c 00 04                                                                                                                                                                                                                                       ┆ ,  ┆
0x44ba…44c2 (45, 1, 8)   20 04 00 00 00 2d 00 04                                                                                                                                                                                                                           ┆     -  ┆
0x44c2…4512 (46, 0, 400) 5c 50 4c 43 4e 52 52 3d 32 20 00 2d 01 8c 00 2a 00 50 5c 44 41 54 41 5c 2f 30 31 30 33 2c 2f 30 34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54 2c 2f 30 31 30 38 2c 30 00 2e 00 12 00 08 00 50 5c 58 49 46 00 2e 00 40 00 18 00 50 4f 50 4e 52   ┆ PLCNRR=2  -   * P DATA /0103,/0400,/0D05,TIMACT,/0108,0 .     P XIF . @   POPNR┆
0x4512…4562              33 31 5c 45 51 55 5c 2a 5c 4c 49 4e 45 20 31 20 00 2e 00 4c 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 30 20 00 2e 00 68 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 31 20 00 2e 00 7e 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d   ┆31 EQU * LINE 1  . L   P IFF PLCNRR=0  . h   P IFF PLCNRR=1  . ~   P IFF PLCNRR=┆
0x4562…45b2              32 20 00 2e 00 94 00 2a 00 50 5c 44 41 54 41 5c 2f 30 31 30 33 2c 2f 30 34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54 2c 2f 30 39 30 38 2c 30 00 2e 00 aa 00 08 00 50 5c 58 49 46 00 2e 00 d8 00 18 00 50 4f 50 4e 52 33 32 5c 45 51 55 5c 2a   ┆2  .   * P DATA /0103,/0400,/0D05,TIMACT,/0908,0 .     P XIF .     POPNR32 EQU *┆
0x45b2…4602              5c 4c 49 4e 45 20 32 20 00 2e 00 e4 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 30 20 00 2e 01 00 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 31 20 00 2e 01 16 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 32 20 00 2e 01 2c 00 2a   ┆ LINE 2  .     P IFF PLCNRR=0  .     P IFF PLCNRR=1  .     P IFF PLCNRR=2  . , *┆
0x4602…4652              00 50 5c 44 41 54 41 5c 2f 30 31 30 33 2c 2f 30 34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54 2c 2f 30 42 30 38 2c 30 00 2e 01 42 00 08 00 50 5c 58 49 46 00 2e 01 70 00 18 00 50 4f 50 4e 52 33 33 5c 45 51 55 5c 2a 5c 4c 49 4e 45 20 33 20   ┆ P DATA /0103,/0400,/0D05,TIMACT,/0B08,0 . B   P XIF . p   POPNR33 EQU * LINE 3 ┆
0x4652…46a2 (47, 0, 400) 00 2e 01 7c 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 30 20 00 2f 00 08 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 31 20 00 2f 00 1e 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 32 20 00 2f 00 34 00 2a 00 50 5c 44 41 54 41 5c   ┆ . |   P IFF PLCNRR=0  /     P IFF PLCNRR=1  /     P IFF PLCNRR=2  / 4 * P DATA ┆
0x46a2…46f2              2f 30 31 30 33 2c 2f 30 34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54 2c 2f 31 33 30 38 2c 30 00 2f 00 4a 00 08 00 50 5c 58 49 46 00 2f 00 78 00 06 00 50 2a 20 00 2f 00 84 00 12 00 50 2a 5c 52 45 4d 4f 54 45 20 50 4c 43 20 32 00 2f 00 8e   ┆/0103,/0400,/0D05,TIMACT,/1308,0 / J   P XIF / x   P*  /     P* REMOTE PLC 2 /  ┆
0x46f2…4742              00 18 00 50 4f 50 4e 52 32 30 5c 45 51 55 5c 2a 5c 4c 49 4e 45 20 30 20 00 2f 00 a4 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 30 20 00 2f 00 c0 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 31 20 00 2f 00 d6 00 2a 00 50 5c 44 41 54   ┆   POPNR20 EQU * LINE 0  /     P IFF PLCNRR=0  /     P IFF PLCNRR=1  /   * P DAT┆
0x4742…4792              41 5c 2f 30 31 30 33 2c 2f 30 34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54 2c 2f 30 31 30 38 2c 30 00 2f 00 ec 00 08 00 50 5c 58 49 46 00 2f 01 1a 00 18 00 50 4f 50 4e 52 32 31 5c 45 51 55 5c 2a 5c 4c 49 4e 45 20 31 20 00 2f 01 26 00 12   ┆A /0103,/0400,/0D05,TIMACT,/0108,0 /     P XIF /     POPNR21 EQU * LINE 1  / &  ┆
0x4792…47e2              00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 30 20 00 2f 01 42 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 31 20 00 2f 01 58 00 2a 00 50 5c 44 41 54 41 5c 2f 30 31 30 33 2c 2f 30 34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54 2c 2f 30 39   ┆ P IFF PLCNRR=0  / B   P IFF PLCNRR=1  / X * P DATA /0103,/0400,/0D05,TIMACT,/09┆
0x47e2…4832 (48, 0, 400) 30 38 2c 30 00 2f 01 6e 00 08 00 50 5c 58 49 46 00 30 00 0c 00 18 00 50 4f 50 4e 52 32 32 5c 45 51 55 5c 2a 5c 4c 49 4e 45 20 32 20 00 30 00 18 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 30 20 00 30 00 34 00 12 00 50 5c 49 46 46 5c 50   ┆08,0 / n   P XIF 0     POPNR22 EQU * LINE 2  0     P IFF PLCNRR=0  0 4   P IFF P┆
0x4832…4882              4c 43 4e 52 52 3d 31 20 00 30 00 4a 00 2a 00 50 5c 44 41 54 41 5c 2f 30 31 30 33 2c 2f 30 34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54 2c 2f 30 42 30 38 2c 30 00 30 00 60 00 08 00 50 5c 58 49 46 00 30 00 8e 00 18 00 50 4f 50 4e 52 32 33   ┆LCNRR=1  0 J * P DATA /0103,/0400,/0D05,TIMACT,/0B08,0 0 `   P XIF 0     POPNR23┆
0x4882…48d2              5c 45 51 55 5c 2a 5c 4c 49 4e 45 20 33 20 00 30 00 9a 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 30 20 00 30 00 b6 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 31 20 00 30 00 cc 00 2a 00 50 5c 44 41 54 41 5c 2f 30 31 30 33 2c 2f 30   ┆ EQU * LINE 3  0     P IFF PLCNRR=0  0     P IFF PLCNRR=1  0   * P DATA /0103,/0┆
0x48d2…4922              34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54 2c 2f 31 33 30 38 2c 30 00 30 00 e2 00 08 00 50 5c 58 49 46 00 30 01 10 00 06 00 50 2a 20 00 30 01 1c 00 12 00 50 2a 5c 52 45 4d 4f 54 45 20 50 4c 43 20 31 00 30 01 26 00 18 00 50 4f 50 4e 52   ┆400,/0D05,TIMACT,/1308,0 0     P XIF 0     P*  0     P* REMOTE PLC 1 0 &   POPNR┆
0x4922…4972              31 30 5c 45 51 55 5c 2a 5c 4c 49 4e 45 20 30 20 00 30 01 3c 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 30 20 00 30 01 58 00 2a 00 50 5c 44 41 54 41 5c 2f 30 31 30 33 2c 2f 30 34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54 2c 2f 30 31   ┆10 EQU * LINE 0  0 <   P IFF PLCNRR=0  0 X * P DATA /0103,/0400,/0D05,TIMACT,/01┆
0x4972…49c2 (49, 0, 398) 30 38 2c 30 00 30 01 6e 00 08 00 50 5c 58 49 46 00 31 00 0c 00 18 00 50 4f 50 4e 52 31 31 5c 45 51 55 5c 2a 5c 4c 49 4e 45 20 31 20 00 31 00 18 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 30 20 00 31 00 34 00 2a 00 50 5c 44 41 54 41 5c   ┆08,0 0 n   P XIF 1     POPNR11 EQU * LINE 1  1     P IFF PLCNRR=0  1 4 * P DATA ┆
0x49c2…4a12              2f 30 31 30 33 2c 2f 30 34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54 2c 2f 30 39 30 38 2c 30 00 31 00 4a 00 08 00 50 5c 58 49 46 00 31 00 78 00 18 00 50 4f 50 4e 52 31 32 5c 45 51 55 5c 2a 5c 4c 49 4e 45 20 32 20 00 31 00 84 00 12 00 50   ┆/0103,/0400,/0D05,TIMACT,/0908,0 1 J   P XIF 1 x   POPNR12 EQU * LINE 2  1     P┆
0x4a12…4a62              5c 49 46 46 5c 50 4c 43 4e 52 52 3d 30 20 00 31 00 a0 00 2a 00 50 5c 44 41 54 41 5c 2f 30 31 30 33 2c 2f 30 34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54 2c 2f 30 42 30 38 2c 30 00 31 00 b6 00 08 00 50 5c 58 49 46 00 31 00 e4 00 18 00 50   ┆ IFF PLCNRR=0  1   * P DATA /0103,/0400,/0D05,TIMACT,/0B08,0 1     P XIF 1     P┆
0x4a62…4ab2              4f 50 4e 52 31 33 5c 45 51 55 5c 2a 5c 4c 49 4e 45 20 33 20 00 31 00 f0 00 12 00 50 5c 49 46 46 5c 50 4c 43 4e 52 52 3d 30 20 00 31 01 0c 00 2a 00 50 5c 44 41 54 41 5c 2f 30 31 30 33 2c 2f 30 34 30 30 2c 2f 30 44 30 35 2c 54 49 4d 41 43 54   ┆OPNR13 EQU * LINE 3  1     P IFF PLCNRR=0  1   * P DATA /0103,/0400,/0D05,TIMACT┆
0x4ab2…4b00              2c 2f 31 33 30 38 2c 30 00 31 01 22 00 08 00 50 5c 58 49 46 00 31 01 50 00 28 00 50 2a 5c 45 4e 44 20 4f 46 20 52 45 4d 4f 54 45 20 4c 49 4e 45 20 50 41 52 41 4d 45 54 45 52 20 41 52 45 41 53 00 31 01 5c 00 06 00 50 2a 20 00 31 01 88         ┆,/1308,0 1 "   P XIF 1 P ( P* END OF REMOTE LINE PARAMETER AREAS 1     P*  1  ┆
0x4b00…4b50 (50, 0, 400) 00 06 00 50 2a 20 00 32 00 04 00 2c 00 50 50 4c 43 50 46 50 5c 44 41 54 41 5c 30 5c 50 4c 43 20 4c 4f 43 41 4c 20 50 4f 57 45 52 20 46 41 49 4c 20 46 4c 41 47 20 00 32 00 0e 00 06 00 50 2a 20 00 32 00 3e 00 28 00 50 5c 49 46 46 5c 55 54 54   ┆   P*  2   , PPLCPFP DATA 0 PLC LOCAL POWER FAIL FLAG  2     P*  2 > ( P IFF UTT┆
0x4b50…4ba0              45 53 54 3d 30 5c 54 45 53 54 20 56 45 52 53 49 4f 4e 20 4f 46 20 44 52 49 56 45 52 00 32 00 48 00 06 00 50 2a 20 00 32 00 74 00 0a 00 50 5c 45 4a 45 43 54 00 32 00 7e 00 06 00 50 2a 20 00 32 00 8c 00 28 00 50 55 54 54 53 54 5c 44 41 54 41   ┆EST=0 TEST VERSION OF DRIVER 2 H   P*  2 t   P EJECT 2 ~   P*  2   ( PUTTST DATA┆
0x4ba0…4bf0              5c 55 54 54 45 53 54 5c 31 20 3d 20 54 52 41 50 20 4e 4f 54 20 55 53 45 44 20 00 32 00 96 00 06 00 50 2a 20 00 32 00 c2 00 06 00 50 2a 20 00 32 00 cc 00 22 00 50 2a 20 20 20 20 51 55 45 55 45 20 53 54 41 54 49 53 54 49 43 53 20 43 4f 55 4e   ┆ UTTEST 1 = TRAP NOT USED  2     P*  2     P*  2   " P*    QUEUE STATISTICS COUN┆
0x4bf0…4c40              54 45 52 53 00 32 00 d6 00 26 00 50 2a 5c 45 41 43 48 20 43 4f 55 4e 54 45 52 20 48 41 53 20 4f 4e 45 20 57 4f 52 44 20 2f 20 50 4c 43 20 00 32 00 fc 00 06 00 50 2a 20 00 32 01 26 00 10 00 50 53 54 41 54 41 52 5c 45 51 55 5c 2a 00 32 01 30   ┆TERS 2   & P* EACH COUNTER HAS ONE WORD / PLC  2     P*  2 &   PSTATAR EQU * 2 0┆
0x4c40…4c90              00 1e 00 50 57 49 51 53 54 41 5c 52 45 53 5c 38 5c 57 49 4e 44 4f 57 20 51 55 45 55 45 20 00 32 01 44 00 24 00 50 53 42 51 53 54 41 5c 52 45 53 5c 38 5c 53 48 4f 52 54 20 42 55 46 46 45 52 53 20 51 55 45 55 45 00 32 01 66 00 24 00 50 4c 42   ┆   PWIQSTA RES 8 WINDOW QUEUE  2 D $ PSBQSTA RES 8 SHORT BUFFERS QUEUE 2 f $ PLB┆
0x4c90…4ce0 (51, 0, 400) 51 53 54 41 5c 52 45 53 5c 38 5c 4c 4f 4e 47 20 42 55 46 46 45 52 53 20 51 55 45 55 45 20 00 32 01 8e 00 1a 00 50 43 43 51 53 54 41 5c 52 45 53 5c 38 5c 43 43 41 20 51 55 45 55 45 00 33 00 26 00 24 00 50 53 54 41 54 4c 4e 5c 45 51 55 5c 2a   ┆QSTA RES 8 LONG BUFFERS QUEUE  2     PCCQSTA RES 8 CCA QUEUE 3 & $ PSTATLN EQU *┆
0x4ce0…4d30              2d 53 54 41 54 41 52 5c 54 41 42 4c 45 20 4c 45 4e 47 54 48 00 33 00 44 00 06 00 50 2a 20 00 33 00 6c 00 08 00 50 5c 58 49 46 00 33 00 76 00 0a 00 50 5c 45 4a 45 43 54 00 33 00 82 00 06 00 50 2a 20 00 33 00 90 00 06 00 50 2a 20 00 33 00 9a   ┆-STATAR TABLE LENGTH 3 D   P*  3 l   P XIF 3 v   P EJECT 3     P*  3     P*  3  ┆
0x4d30…4d80              00 1a 00 50 2a 20 20 20 43 57 54 20 44 49 53 50 4c 41 43 45 4d 45 4e 54 53 20 00 33 00 a4 00 06 00 50 2a 20 00 33 00 c2 00 1e 00 50 43 57 54 4f 50 52 5c 45 51 55 5c 2f 30 30 5c 43 55 20 4f 50 45 52 41 42 4c 45 00 33 00 cc 00 1c 00 50 43 57   ┆   P*   CWT DISPLACEMENTS  3     P*  3     PCWTOPR EQU /00 CU OPERABLE 3     PCW┆
0x4d80…4dd0              54 43 43 42 5c 45 51 55 5c 2f 30 32 5c 43 43 41 20 42 55 53 59 5c 00 33 00 ee 00 28 00 50 43 57 54 47 52 5c 45 51 55 5c 2f 30 34 5c 47 45 4e 45 52 41 4c 20 52 45 41 44 20 41 4c 4c 4f 57 45 44 5c 20 00 33 01 0e 00 22 00 50 43 57 54 50 4e 52   ┆TCCB EQU /02 CCA BUSY  3   ( PCWTGR EQU /04 GENERAL READ ALLOWED   3   " PCWTPNR┆
0x4dd0…4e20              5c 45 51 55 5c 2f 30 36 5c 43 55 20 4e 55 4d 42 45 52 20 28 30 2d 37 29 00 33 01 3a 00 1e 00 50 43 57 54 41 42 57 5c 45 51 55 5c 2f 30 38 5c 57 53 20 54 4f 20 41 42 4f 52 54 00 33 01 60 00 28 00 50 43 57 54 50 4c 53 5c 45 51 55 5c 2f 30 41   ┆ EQU /06 CU NUMBER (0-7) 3 :   PCWTABW EQU /08 WS TO ABORT 3 ` ( PCWTPLS EQU /0A┆
0x4e20…4e70 (52, 0, 400) 5c 4c 41 54 45 53 54 20 50 4c 43 20 52 43 41 20 53 54 41 54 55 53 00 33 01 82 00 24 00 50 43 57 54 4c 4e 4f 5c 45 51 55 5c 2f 30 43 5c 4c 49 4e 45 20 4e 4f 20 49 4e 44 49 43 41 54 4f 52 00 34 00 1e 00 2c 00 50 43 57 54 50 41 52 5c 45 51 55   ┆ LATEST PLC RCA STATUS 3   $ PCWTLNO EQU /0C LINE NO INDICATOR 4   , PCWTPAR EQU┆
0x4e70…4ec0              5c 2f 30 45 5c 49 4e 44 45 58 20 54 4f 20 50 41 52 41 4d 45 54 45 52 20 41 52 45 41 5c 20 00 34 00 46 00 36 00 50 43 57 54 4f 50 50 5c 45 51 55 5c 2f 31 30 5c 4f 50 45 4e 20 4c 49 4e 45 20 50 41 52 41 4d 45 54 45 52 20 41 52 45 41 20 41 44   ┆ /0E INDEX TO PARAMETER AREA   4 F 6 PCWTOPP EQU /10 OPEN LINE PARAMETER AREA AD┆
0x4ec0…4f10              44 52 45 53 53 5c 3d 32 00 34 00 76 00 24 00 50 43 57 54 49 4e 54 5c 45 51 55 5c 2f 31 32 5c 57 53 20 54 41 42 4c 45 20 41 44 44 52 45 53 53 5c 00 34 00 b0 00 28 00 50 43 57 54 42 55 46 5c 45 51 55 5c 2f 31 34 5c 49 4e 50 2e 20 42 55 46 46   ┆DRESS =2 4 v $ PCWTINT EQU /12 WS TABLE ADDRESS  4   ( PCWTBUF EQU /14 INP. BUFF┆
0x4f10…4f60              45 52 20 41 44 44 52 45 53 53 5c 20 00 34 00 d8 00 32 00 50 43 57 54 53 42 51 5c 45 51 55 5c 2f 31 36 5c 51 55 45 55 45 20 46 4f 52 20 53 48 4f 52 54 20 4f 55 54 50 2e 20 42 55 46 46 45 52 53 5c 20 00 34 01 04 00 30 00 50 43 57 54 4c 42 51   ┆ER ADDRESS   4   2 PCWTSBQ EQU /16 QUEUE FOR SHORT OUTP. BUFFERS   4   0 PCWTLBQ┆
0x4f60…4fb0              5c 45 51 55 5c 2f 31 38 5c 51 55 45 55 45 20 46 4f 52 20 4c 4f 4e 47 20 4f 55 54 50 2e 20 42 55 46 46 45 52 53 5c 00 34 01 3a 00 26 00 50 43 57 54 43 43 51 5c 45 51 55 5c 2f 31 41 5c 51 55 45 55 45 20 46 4f 52 20 43 43 41 20 46 52 45 45 5c   ┆ EQU /18 QUEUE FOR LONG OUTP. BUFFERS  4 : & PCWTCCQ EQU /1A QUEUE FOR CCA FREE ┆

Reduced view