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

⟦fd7e538ae⟧

    Length: 55778 (0xd9e2)
    Notes: pts_type(SC)
    Names: »TOSSIO.SC«

Derivation

└─⟦7b35573c9⟧ Bits:30009690 Philips computer tape "600402"
    └─⟦this⟧ »M:AF/TOSSIO.SC« 
└─⟦f350e1b7a⟧ Bits:30009678 Philips computer tape "600219"
    └─⟦this⟧ »MONGEN/TOSSIO.SC« 

	IDENT TOSSIO 	REL 11.0 81-04-13 870105041100 

			=4, CPU857 DEFINITION NOT CORRECT
			=4, REL 11.0 81-03-18
			=3, ORDERS IN ORDTAB CHANGED TO FIT TND
			=3, REL 11.0 81-02-25
			=2, CORRECTION OF UPDATE =1	=1 
			=2, REL 11.0 81-02-20	=1 
			=1, WRONG ATTACH TIMER HANDLING
			=1, REL 11.0 81-01-26
* 
* 
**************************************************
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   TOSSIO = TOSS I/O LKM PROCESSOR 
* 
* 
* 
**************************************************
* 
* 
*   THIS IS THE TOSS I/O LKM PROCESSOR. 
*   IT CONTAINS THE FOLLOWING MONITOR SUBROUTINES:
* 
*   -TIO     INITIALIZE I/O 
* 
*   -TENDIO  END I/O
* 
*   -ATTACH  ATTACH DEVICE
* 
*   -DETACH  DETACH DEVICE
* 
*   -DC:MIN  DATA COMMUNICATION MOVE ROUTINE (READ) 
* 
*   -DC:MOT  DATA COMMUNICATION MOVE ROUTINE (WRITE)
* 
*   SPECIAL ROUTINES ARE CARRIED OUT IN SYSTEMS 
*   WITH MEMORY MANAGEMENT UNIT (MMU).
* 
*   THIS MODULE ALSO CONTAINS STANDARD DISPLACEMENT 
*   VALUES FOR ECB, DWT AND DAB AREAS.
* 
	EJECT			TOSSIO 
* 
* 
*********** 
* ENTRIES * 
*********** 
* 
* 
	ENTRY	TIO	I/O PROCESSOR
	ENTRY	TIO:FM	ENTRY USED BY FILE MANAGEMENT 
	ENTRY	TIOERR	ERROR: QUEUE TASK AND DISPATCH
	ENTRY	TENDIO	END I/O 
	ENTRY	QUEDEV	QUEUE REQUEST IN DEVICE QUEUE 
	ENTRY	QUEFIL	QUEUE FILE REQUEST IN DEVICE QUEUE
	ENTRY	DC:MIN	MOVE ROUTINE FOR DATACOM, INPUT 
	ENTRY	DC:MOT	MOVE ROUTINE FOR DATACOM, OUTPUT
	ENTRY	TIOMXI	CONVERT LOGICAL ADDRESS TO PHYSICAL 
	ENTRY	MONMMU	MONITOR (SYSTEM) MMU TABLE
	ENTRY	ECBFC	FILE CODE
	ENTRY	ECBFN	FILE NUMBER
	ENTRY	ECBBA	BUFFER ADDRESS 
	ENTRY	ECBRL	REQUESTED LENGTH 
	ENTRY	ECBEL	EFFECTIVE LENGTH 
	ENTRY	ECBRC	RETURN CODE
	ENTRY	ECBCW	CONTROL WORD 
	ENTRY	ECBCW1	CONTROL WORD 1
	ENTRY	ECBCW2	CONTROL WORD 2
	ENTRY	DC:DIX	DEVICE INDEX DATA COMMUNICATION 
	ENTRY	DM:DIX	DEVICE INDEX DATA MANAGEMENT
	ENTRY	PC:DIX	DEVICE INDEX PROGRAMMED CHANNEL 
	ENTRY	MX:DIX	DEVICE INDEX MULTIPLEX CHANNEL
	ENTRY	KB:DIX	DEVICE INDEX KEYBOARD/CTW 
	ENTRY	IT:DIX	DEVICE INDEX INTERTASK COMMUNICATION
	ENTRY	DK:DIX	DEVICE INDEX DISC 
	ENTRY	BUFLEN	MMU BUFFER LENGTH 
* 
	EJECT			TOSSIO 
* 
* 
	ENTRY	ACTADR	ACTIVATION ADDRESS
	ENTRY	ABTADR	ABORT ADDRESS 
	ENTRY	INTADR	INTERRUPT ADDRESS 
	ENTRY	POLADR	BUFFER POOL ADDRESS (DC DRIVERS)
	ENTRY	HDRLEN	BUFFER HEADER LENGTH (DC DRIVERS) 
	ENTRY	RECADR	RECOVERY ADDRESS
	ENTRY	ECHADR	ECHO ADDRESS
	ENTRY	DWTCHP	CHANNEL PARAMETERS
	ENTRY	DWTST	STATUS 
	ENTRY	DWTBC	BYTE COUNTER 
	ENTRY	DWTECB	ECB ADDRESS 
	ENTRY	DWTOPT	ORDER OPTION
	ENTRY	DWTOR	INDEX AND ORDER
	ENTRY	DWTOCH	LAST OUTPUT CHARACTER 
	ENTRY	DWTADR	DRIVER ADDRESS BLOCK
	ENTRY	DWTTAB	TTAB ADDRESS
	ENTRY	DWTWAT	WAIT/ACTIVATE INDICATOR 
	ENTRY	DWTTQ	TERMINAL QUEUE 
	ENTRY	DWTOTQ	OUTPUT QUEUE LINK 
	ENTRY	DWTUEC	USER ECB ADDRESS
	ENTRY	DWTMEC	MMU ECB ADDRESS 
	ENTRY	DWTA2	SAVE AREA A2 
	ENTRY	DWTA3	SAVE AREA A3 
	ENTRY	DWTA4	SAVE AREA A4 
	ENTRY	DWTA5	SAVE AREA A5 
	ENTRY	DWTSB1	STACK BASE 1 IN DWT 
	ENTRY	DWTSB2	STACK BASE 2 IN DWT 
	ENTRY	DWTTP	TIMER POINTER
	ENTRY	DWTECH	ECHO DEVICE DWT 
	ENTRY	DWTSQ	START OF QUEUE 
	ENTRY	DWTORD	SAVE AREA INDEX AND ORDER 
	ENTRY	DWTNVL	NEW VOLUME LOADED FLAGS 
	ENTRY	DWTVOL	DISC VOLUME NAME
	ENTRY	DWTA7	SAVE AREA A7 
	ENTRY	DWTA8	SAVE AREA A8 
	ENTRY	DWTCP2	CHANNEL PARAMETERS 2
	ENTRY	DWTLD1	LINE DRIVER DEPENDENT 1 
	ENTRY	DWTLD2	LINE DRIVER DEPENDENT 2 
	ENTRY	DWTDEV	TERMINAL DEVICE STATUS
	ENTRY	DWTTBU	PLC TEST BUFFER ADDRESS 
	ENTRY	DWTTLN	PLC TEST BUFFER LENGTH
	ENTRY	DWTTCW	PLC TEST PARAMETER
* 
	EJECT			TOSSIO 
* 
* 
************* 
* EXTERNALS * 
************* 
* 
* 
	EXTRN	SAVE8	SAVE 8 REGISTERS 
	EXTRN	IHRET8	RESTORE 8 REGISTERS AND RETURN
	EXTRN	IHRTN	RETURN WITHOUT ENABLING INTERRUPTS 
	EXTRN	ACTOTP	ACTIVATE TASK (LIFO)
	EXTRN	FNDDWT	SEARCH DWT
	EXTRN	QTJOB	QUEUE TASK FOR DISPATCHING 
	EXTRN	TDISP	DISPATCHER 
	EXTRN	DISEND	BRANCH TO DISPATCHER VIA TENDIO 
	EXTRN	LKMQDI	QUEUE TASK AND DISPATCH 
	EXTRN	LKMERR	HALT SYSTEM, FATAL ERROR
	EXTRN	GETBLK	PUT BLOCK IN PENDING QUEUE
	EXTRN	FREBLK	RELEASE BLOCK FROM PENDING QUEUE
	EXTRN	SETIMP	SET TIMER 
	EXTRN	TTMJOB	MONITOR TASK
	EXTRN	TTB:ID	TASK IDENTIFICATION 
	EXTRN	TTB:ST	TASK STATUS AND LEVEL 
	EXTRN	TTB:PW	PROGRAM STATUS WORD 
	EXTRN	TTB:SA	SAVE AREA 
	EXTRN	TTB:MT	MMUTAB
	EXTRN	HALT		=1 
* 
	EJECT			TOSSIO 
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	1
* 
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	0
* 
* 
*	A PROGRAM VERSION INCLUDING ATTACH/DETACH 
*	IS OBTAINED BY SETTING ATTDET EQU 1.
* 
X:A	EQU	0 
ATTDET	EQU	1
* 
* 
*	A PROGRAM VERSION SPECIALIZED FOR THE 857 CPU 
*	IS OBTAINED BY SETTING CPU857 EQU 1.
* 
CPU857	EQU	1		=4
* 
X:C	EQU	0 
TC8000	EQU	X:C	 
	EJECT			TOSSIO 
* 
* 
******************* 
* FORM STATEMENTS * 
******************* 
* 
* 
BYTES	FORM	8,8
* 
	EJECT			TOSSIO 
* 
* 
********************* 
* DWT DISPLACEMENTS * 
********************* 
* 
*	DEVICE WORK TABLE DISPLACEMENTS: FIXED PART 
* 
DWTCHP	EQU	/00	CHANNEL PARAMETERS 
DWTST	EQU	/02	STATUS
DWTBC	EQU	/03	BYTE COUNTER
DWTECB	EQU	/04	ECB ADDRESS
DWTOPT	EQU	/06	ORDER OPTION 
DWTOR	EQU	/06	INDEX AND ORDER 
DWTOCH	EQU	/06	LAST OUTPUT CHARACTER
DWTADR	EQU	/08	DRIVER ADDRESS BLOCK 
DWTTAB	EQU	/0A	TTAB ADDRESS 
DWTWAT	EQU	/0C	WAIT/ACTIVATE INDICATOR
DWTTQ	EQU	/0E	TERMINAL QUEUE
DWTUEC	EQU	/10	USER ECB ADDRESS 
DWTMEC	EQU	/12	MMU ECB ADDRESS
* 
	IFT	MMUPAG=0 
DWTDRD	EQU	DWTTQ+2	START OF DRIVER DEFINED PART 
	XIF
* 
	IFT	MMUPAG=1 
DWTDRD	EQU	DWTMEC+2	START OF DRIVER DEFINED PART
	XIF
* 
	EJECT			TOSSIO 
* 
*	DWT DISPLACEMENTS: DRIVER DEFINED PART
* 
DWTOTQ	EQU	DWTDRD+/00	OUTPUT QUEUE LINK 
DWTA2	EQU	DWTDRD+/02	SAVE AREA A2 
DWTA3	EQU	DWTDRD+/02	SAVE AREA A3 
DWTA4	EQU	DWTDRD+/04	SAVE AREA A4 
DWTA5	EQU	DWTDRD+/06	SAVE AREA A5 
DWTSB1	EQU	DWTDRD+/0A	STACK BASE 1 IN DWT 
DWTSB2	EQU	DWTDRD+/0E	STACK BASE 2 IN DWT 
DWTTP	EQU	DWTDRD+/10	TIMER POINTER
DWTORD	EQU	DWTDRD+/10	SAVE AREA INDEX AND ORDER 
DWTA7	EQU	DWTDRD+/10	SAVE AREA A7 
DWTA8	EQU	DWTDRD+/12	SAVE AREA A8 
DWTNVL	EQU	DWTDRD+/12	NEW VOLUME LOADED FLAGS 
DWTCP2	EQU	DWTDRD+/14	CHANNEL PARAMETERS 2
DWTLD1	EQU	DWTDRD+/16	LINE DRIVER DEPENDENT 1 
DWTLD2	EQU	DWTDRD+/18	LINE DRIVER DEPENDENT 2 
DWTDEV	EQU	DWTDRD+/1A	TERMINAL DEVICE STATUS

DWTTBU	EQU	DWTDRD+/1A	PLC TEST BUFFER ADDRESS 
DWTVOL	EQU	DWTDRD+/1A	DISC VOLUME NAME
DWTECH	EQU	DWTDRD+/1C	ECHO DEVICE DWT 
DWTTLN	EQU	DWTDRD+/1C	PLC TEST BUFFER LENGTH
DWTTCW	EQU	DWTDRD+/1E	PLC TEST PARAMETER
DWTSQ	EQU	DWTDRD+/2A	START OF QUEUE 
* 
	EJECT			TOSSIO 
* 
* 
********************* 
* DAB DISPLACEMENTS * 
********************* 
* 
*	DRIVER ADDRESS BLOCK DISPLACEMENTS
* 
KEYLEN	EQU	-6	DWT KEYTABLE LENGTH 
BUFLEN	EQU	-4	DWT BUFFER LENGTH 
DEVIND	EQU	-2	DEVICE INDEX
ACTADR	EQU	0	ACTIVATION ADDRESS 
ABTADR	EQU	2	ABORT ADDRESS
INTADR	EQU	4	INTERRUPT ADDRESS
POLADR	EQU	4	BUFFER POOL ADDRESS (DC DRIVERS) 
HDRLEN	EQU	6	BUFFER HEADER LENGTH (DC DRIVERS)
RECADR	EQU	6	RECOVERY ADDRESS 
ECHADR	EQU	8	ECHO ADDRESS 
* 
* 
*********************** 
* DEVICE INDEX VALUES * 
*********************** 
* 
* 
*   THE VALUES ARE USED IN MMU SYSTEMS FOR SELECTING A SPECIAL ROUTINE
*   FROM ADDRESS TABLES TIOTAB AND TENTAB AT READ/WRITE REQUESTS. 
* 
DC:DIX	EQU	-2	DATA COMMUNICATION
DM:DIX	EQU	0	DATA MANAGEMENT
PC:DIX	EQU	2	PROGRAMMED CHANNEL 
MX:DIX	EQU	4	MULTIPLEX CHANNEL
KB:DIX	EQU	6	KEYBOARD/CTW 
IT:DIX	EQU	8	INTERTASK COMMUNICATION
DK:DIX	EQU	10	DISC
* 
	EJECT			TOSSIO 
* 
* 
********************* 
* ECB DISPLACEMENTS * 
********************* 
* 
*	EVENT CONTROL BLOCK DISPLACEMENTS 
* 
ECBFC	EQU	1	FILE CODE 
ECBFN	EQU	1	FILE NUMBER 
ECBBA	EQU	2	BUFFER ADDRESS
ECBRL	EQU	4	REQUESTED LENGTH
ECBEL	EQU	6	EFFECTIVE LENGTH
ECBRC	EQU	8	RETURN CODE 
ECBCW	EQU	10	CONTROL WORD 
ECBCW1	EQU	10	CONTROL WORD 1
ECBCW2	EQU	12	CONTROL WORD 2
* 
	EJECT			TOSSIO 
* 
* 
	IFT	MMUPAG=1 
* 
* 
**********
* TIOTAB *
**********
* 
*	TIOTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TIO
* 
TIOTAB	EQU	*	DEVICE TYPE/ROUTINE ADDRESS TABLE
	DATA	TIO:DM	DATA MANAGEMENT, INPUT/OUTPUT
	DATA	TIOPCI	PROGRAMMED CHANNEL, INPUT
	DATA	TIOMXI	MUX, INPUT 
	DATA	TIOKBI	KEYBOARD/CTW, INPUT
	DATA	TIOITI	INTERTASK COMMUNICATION, INPUT 
* 
TINDEX	EQU	*-TIOTAB 
	DATA	TIODKI	DISC, INPUT
	DATA	TIOPCO	PROGRAMMED CHANNEL, OUTPUT 
	DATA	TIOMXO	MUX, OUTPUT
	DATA	TIOKBO	KEYBOARD/CTW, OUTPUT 
	DATA	TIOITO	INTERTASK COMMUNICATION, OUTPUT
	DATA	TIODKO	DISC, OUTPUT 
* 
	EJECT			TOSSIO 
* 
* 
**********
* TENTAB *
**********
* 
*	TENTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TENDIO 
* 
TENTAB	EQU	*	DEVICE TYPE/ROUTINE ADDRESS TABLE
	DATA	TEN:DM	DATA MANAGEMENT, INPUT/OUTPUT
	DATA	TENPCI	PROGRAMMED CHANNEL, INPUT
	DATA	TENMXI	MUX, INPUT 
	DATA	TENKBI	KEYBOARD/CTW, INPUT
	DATA	TENITI	INTERTASK COMMUNICATION, INPUT 
	DATA	TENDKI	DISC, INPUT
	DATA	TENPCO	PROGRAMMED CHANNEL, OUTPUT 
	DATA	TENMXO	MUX, OUTPUT
	DATA	TENKBO	KEYBOARD/CTW, OUTPUT 
	DATA	TENITO	INTERTASK COMMUNICATION, OUTPUT
	DATA	TENDKO	DISC, OUTPUT 
	XIF
* 
	EJECT			TOSSIO 
* 
* 
**********
* MONMMU *
**********
* 
*	MONITOR (SYSTEM) MMU TABLE
* 
MONMMU	EQU	*
	IFT	MMUPAG=1 
	DATA	/0000,/0400,/0800,/0C00 
	DATA	/1000,/1400,/1800,/1C00 
	DATA	/2000,/2400,/2800,/2C00 
	DATA	/3000,/3400,/3800,/3C00 
	XIF
* 
	EJECT			TOSSIO 
* 
* 
	IFT	ATTDET=1 
* 
*	SUBROUTINES BELOW ARE USED BY ATTACH/DETACH 
* 
*	T I M O U T 
* 
* INPUT:  A1 = DWT ADDRESS
*         A2 = ADDRESS TO 2ND TIMER BLOCK 
* 
* OUTPUT: A4 = BLOCK ADDRESS
*         A5 = TTAB ADDRESS 
*         A6 = DWT ADDRESS
*         A1-A3 ARE DESTROYED 
* 
TIMOUT	LDR	A6,A1
	LDR*	A2,A2	TIMER POINTER ADDRESS 
	LD	A5,2,A2	TTAB ADDRESS
	CF	A15,FNDBLK
	LDR*	A1,A4 
	STR	A1,A2	REMOVE FROM ATT:CH 
	CF	A15,FREBLK
* 
	EJECT			TOSSIO 
* 
*   	REMOVE TTAB FROM DEVICE QUEUE
* 
	LDR	A1,A6
	ADK	A1,DWTTQ	QUEUE ANCHOR ADDRESS
* 
TIM:10	LDR	A2,A1	SAVE 
	LDR*	A1,A1	NEXT IN QUEUE 
	RF(Z)	TIM:20	ERROR IN QUEUE HANDLING	=1
	CWR	A1,A5
	RB(NE)	TIM:10	NOT FOUND
* 
	EJECT			TOSSIO 
* 
*  	TTAB FOUND - REMOVE FROM QUEUE
* 
	LDR*	A1,A1 
	STR	A1,A2
* 
	LDK	A3,4 
	ADS	A3,TTB:SA,A5	UPDATE DISPATCH ADDRESS 
	LD	A8,TTB:SA+16,A5	ECB ADDRESS FROM A8 SAVE AREA 
	LDK	A3,/40	SET TIMEOUT BIT 
* 
	IFT	MMUPAG=0 
	ST	A3,ECBRC,A8	INDICATE ERROR IN ECB 
	XIF
* 
	IFT	ATTDET=1 
	IFT	MMUPAG=1 
	TL	TTB:MT,A5	LOAD MMU REGISTERS FROM TTAB
	ES	A3,ECBRC,A8	INDICATE ERROR IN ECB 
	TL	MONMMU	LOAD MONITOR (SYSTEM) MMU TABLE
	XIF
* 
	IFT	ATTDET=1 
	RF	TIORTN	QUEUE TASK AND DISPATCH
TIM:20	EQU	*		=1
	LDK	A1,1	INDICATE ERROR	=1 
	CF	A15,HALT		=1
* 
	EJECT			TOSSIO 
* 
*	F N D B L K 
* 
* SUBROUTINE TO FIND BLOCK IN ATT:CH
* 
* INPUT:  A5 = TTAB ADDRESS 
* 
* OUTPUT: A2 = ADDRESS TO PRECEDING BLOCK IN CHAIN
*         A4 = BLOCK ADDRESS IF FOUND, ELSE 0 
* 
FNDBLK	LDKL	A4,ATT:CH	ANCHOR ADDRESS
* 
FND:10	LDR	A2,A4	SAVE A4
	LDR*	A4,A4 
	RF(Z)	FND:20	END OF ATT:CH 
	CW	A5,4,A4 
	RB(NE)	FND:10	NOT FOUND
* 
FND:20	EQU	*
	IFT	CPU852=1 
	ABL	IHRTN	RETURN 
	XIF
* 
	IFT	ATTDET=1 
	IFT	CPU852=0 
	RTN	A15	RETURN 
	XIF
* 
	IFT	ATTDET=1 
ATT:CH	DATA	0	ATTACH CHAIN ANCHOR 
* 
	EJECT
* 
*		F R A B L K		=1
* 
*	FREE BLOCK AND TIMER IN ATT:CH IF FOUND	=1
* 
*	INPUT: A5=TTAB ADDRESS		=1
* 
*	OUTPUT:A2,A3,A4=DESTROYED		=1 
* 
FRABLK	EQU	*		=1
	STR	A1,A15	SAVE A1	=1
	CF	A15,FNDBLK	FIND BLOCK IN ATT:CH	=1
	ADK	A4,0	SET CR	=1 
	RF(Z)	FRAEND	TASK NOT FOUND IN ATT:CH	=1 
	CM*	2,A4	FREE TIMER	=1 
	LDR*	A3,A4	REMOVE FROM ATTACH	=1 
	STR	A3,A2		=1
	CF	A15,FREBLK	RELEASE BLOCK	=1 
FRAEND	EQU	*		=1
	LDR*	A1,A15	RESTORE A1	=1
	RB	FND:20	RETURN	=1
	EJECT			TOSSIO 
* 
* 
**********
* ATTACH *
**********
* 
* 
*  THIS MODULE IS CALLED FROM TIO WITH
*  THE FOLLOWING PARAMETERS:
* 
*   A3  /8000 (REQUEST ERROR BIT) 
*   A4  I/O AND ACTIVATE INDICATOR
*   A5  TTAB ADDRESS
*   A6  DWT ADDRESS 
*   A7  ORDER CODE
*   A8  ECB ADDRESS 
*  A10  /0800 (ATTACH BIT)
*  A12  ADDRESS TO DRIVER ADDRESS BLOCK 
*  A13  DWT STATUS
* 
ATTACH	EQU	*	ENTRY
	ADK	A4,0	SET CR
	RF(NZ)	TIOERR	I/O AND ACTIVATE ERROR 
* 
	IFT	MMUPAG=0 
	CM	ECBRC,A8	RESET RETURN CODE
	XIF
* 
	IFT	ATTDET=1 
	IFT	MMUPAG=1 
	ES	A4,ECBRC,A8	RESET RETURN CODE 
	XIF
* 
	EJECT			TOSSIO 
* 
* 
	IFT	ATTDET=1 
	TM	A10,A13 
	RF(NZ)	ATT:40	DEVICE ALREADY ATTACHED
	LDR	A13,A13
	RF(NN)	ATT:50	DEVICE BUSY
* 
*   	ATTACH REQUESTING TASK 
* 
	ORS	A10,DWTST,A6	ATTACH
	ST	A5,DWTTAB,A6	PUT TTAB ADDRESS IN DWT
	RF	ATTRTN		=1
* 
ATT:40	CW	A5,DWTTAB,A6
	RF(E)	TIOERR	ATTACHED TO REQUESTING TASK 
* 
ATT:50	EQU	*		=1
* 
*    	SET TIMER 
* 
	IFT	MMUPAG=0 
	LD	A1,ECBCW,A8	TIME
	XIF
* 
	EJECT			TOSSIO 
* 
* 
	IFT	ATTDET=1 
	IFT	MMUPAG=1 
	EL	A1,ECBCW,A8	TIME
	XIF
* 
	IFT	ATTDET=1 
	RF(N)	TIOERR	NEGATIVE TIME 
	RF(Z)	ATT:80	END REQUEST 
* 
ATT:60	ST	A1,ATTIM
	LDR	A1,A5	TTAB ADDRESS 
	LD	A3,ATT:CH	ANCHOR
	CF	A15,GETBLK	BLOCK
	ST	A4,ATT:CH	UPDATE ANCHOR 
	ADK	A4,2	TIMER POINTER ADDRESS 
	LDR	A1,A6	DWT ADDRESS
	CF	A15,SETIMP	SET TIMER
	DATA	TIMOUT
* 
ATTIM	DATA	0
* 
ATT:70	LDK	A4,0	NOT ACTIVATION PARAMETER
	RF	TIOQ20
* 
ATT:80	LDK	A3,/40	SET TIME OUT BIT
	RF	TIOERR	RETURN 
* 
	EJECT			TOSSIO 
* 
* 
**********
* DETACH *
**********
* 
* THIS MODULE IS CALLED FROM TIO WITH 
* THE SAME PARAMETERS AS ATTACH.
* 
DETACH	EQU	*
	ADK	A4,0	SET CR
	RF(NZ)	TIOERR	I/O AND ACTIVATE ERROR 
	TM	A10,A13 
	RF(Z)	TIOERR	NOT ATTACHED
	CW	A5,DWTTAB,A6
	RF(NE)	TIOERR	ATTACHED TO OTHER TASK 
	XRS	A10,DWTST,A6	DETACH
	LDR	A7,A5	SAVE TTAB ADDRESS	=1 
	LD	A5,DWTTQ,A6	QUEUE ANCHOR
	RF(Z)	DET:10	QUEUE EMPTY 
	CF	A15,FRABLK	FREE ATTACH BLOCK AND TIMER	=1 
	LDR*	A3,A5	UPDATE QUEUE ANCHOR	=1
	ST	A3,DWTTQ,A6		=1 
	CF	A15,QTJOB	QUEUE TASK
* 
DET:10	EQU	*
	LDR	A5,A7	RESTORE TTAB ADDRESS	=1
* 
ATTRTN	EQU	*	COMMON ATTACH/DETACH NORMAL EXIT 
DETRTN	LDK	A3,0	RETURN CODE 
	XIF
* 
	EJECT			TOSSIO 
* 
* 
**********
* TIOERR *
**********
* 
*	ERROR: FILE CODE UNKNOWN
*	TIOERR IS ALSO USED AS COMMON EXIT
*	FOR MODULES 'ATTACH' AND 'DETACH'.
* 
TIOERR	EQU	*
	IFT	MMUPAG=0 
	ST	A3,ECBRC,A8	SET RETURN CODE IN ECB
	CM	ECBEL,A8	RESET EFFECTIVE LENGTH 
	XIF
* 
	IFT	MMUPAG=1 
	ES	A3,ECBRC,A8	SET RETURN CODE IN ECB
	LDK	A3,0 
	ES	A3,ECBEL,A8	RESET EFFECTIVE LENGTH
	XIF
* 
TIORTN	EQU	*
	ABL	LKMQDI	QUEUE TASK AND DISPATCH 
* 
	EJECT			TOSSIO 
* 
* 
****************
* QUEUE DEVICE *
****************
* 
* 
*	THIS IS THE ROUTINE FOR QUEUEING DEVICE REQUESTS. 
*	THE ROUTINE IS ENTERED AT DIFFERENT LABELS DEPENDING ON 
*	WHETHER THE DEVICE IS AN ECHO DEVICE OR NOT, AND DEPENDING
*	ON WHETHER THE DEVICE IS ATTACHED OR NOT, AND WHEN
*	ATTACHED, WHETHER THE DEVICE IS ATTACHED TO THE TASK OR NOT.
* 
	IFT	ATTDET=1 
* 
*	QUEUE ECHO DEVICE FIRST 
* 
TIOQ00	LDR	A6,A2
* 
*	QUEUE DEVICE FIRST
* 
TIOQ05	ADK	A6,DWTTQ	QUEUE ANCHOR
	LDR	A2,A6
	LDR*	A6,A6 
	RF	TIOQ40	INSERT FIRST IN QUEUE
	XIF
* 
TIOQ10	LDR	A6,A2	QUEUE ECHO DEVICE
* 
QUEDEV	EQU	*	ENTRY USED BY FILE MANAGEMENT
TIOQ20	ADK	A6,DWTTQ	QUEUE ANCHOR
* 
QUEFIL	EQU	*	ENTRY USED BY FILE MANAGEMENT
	LD	A1,TTB:ST+1,A5	LEVEL
* 
	EJECT			TOSSIO 
* 
*	SEARCH QUEUE FOR PLACE OF INSERTION 
* 
TIOQ30	LDR	A2,A6
	LDR*	A6,A6	FOLLOW QUEUE TO END 
	RF(Z)	TIOQ40	END FOUND 
	CC	A1,TTB:ST+1,A6	COMPARE LEVELS 
	RB(NL)	TIOQ30	TRY NEXT 
* 
*	INSERT IN QUEUE AND UPDATE PROGRAM COUNTER
* 
TIOQ40	LDKL	A3,-4 
	STR	A6,A5	INSERT IN QUEUE
	STR	A5,A2
	ADK	A4,0	SET CR
	RF(Z)	TIOQ50	NO ACTIVATION 
	SUK	A3,2	ACTIVATION
* 
TIOQ50	ADS	A3,TTB:SA,A5	UPDATE PC TO REPEAT LKM 
* 
TIOQ60	EQU	*
	ABL	TDISP	GO TO DISPATCHER 
* 
	EJECT			TOSSIO 
* 
* 
******* 
* TIO * 
******* 
* 
* 
* THIS MODULE IS ENTERED WHEN TASK INPUT/OUTPUT 
* IS REQUIRED. IF A REQUEST CANNOT BE SERVICED
* DUE TO E.G. BUSY DEVICE, THE REQUEST IS QUEUED
* AND THE TASK SET IN WAIT STATE. 
* 
* WHEN RUNNING WITH MMU OPTION SPECIAL DEVICE 
* DEPENDENT SUBROUTINES ARE PERFORMED.
* 
* THIS MODULE IS CALLED BY THE LKM HANDLING MODULE
* WITH THE FOLLOWING PARAMETERS:- 
* 
*  A1 = PARAMETER WHEN I/O AND ACTIVATION 
* 
*  A4 = ZERO, NORMAL I/O REQUEST
*       NOT ZERO, I/O AND ACTIVATION
* 
*  A5 = TTAB ADDRESS
* 
*  A7 = ORDER CODE
* 
*  A8 = ECB ADDRESS 
* 
	EJECT			TOSSIO 
* 
* 
* THE 'TIO'-ROUTINE EXITS TO REQUESTED ACTIVATION DRIVER
* WITH THE FOLLOWING REGISTER VAULES:-
* 
*  A5 = STACK BASE 2 IN DWT 
* 
*  A6 = DWT ADDRESS 
* 
*  A7 = ORDER CODE
* 
*  A8 = ECB ADDRESS 
* 
* A12 = ADDRESS TO DRIVER ADDRESS BLOCK 
* 
* A13 = 0, IF REQUEST ISSUED IN SYSTEM MODE 
*     = 1, "     "      "    "  USER MODE 
* 
* 
* THE FOLLOWING DWT FIELDS ARE UPDATED:-
* 
*  -DWTOR  DWT INDEX AND ORDER
*  -DWTECB ECB ADDRESS
*  -DWTST  READY AND ECHO FIELDS
*  -DWTTAB TTAB ADDRESS 
*  -DWTWAT WAIT/ACTIVATE INDICATOR
*  -DWTUEC USER ECB ADDRESS (MMU SYSTEMS) 
* 
* 
* THE FOLLOWING ECB FIELDS ARE RESET:-
* 
*  -BIT 0 IN THE FIRST WORD 
*  -ECBEL  EFFECTIVE LENGTH 
*  -ECBRC  RETURN CODE
* 
	EJECT			TOSSIO 
* 
*	DWT ADDRESS AND CHECK IF REQUEST IS BUSY
* 
TIO	CF	A15,FNDDWT	SEARCH DWT ADDRESS
* 
TIO:FM	EQU	*	ENTRY USED BY FILE MANAGEMENT
	CF	A15,SWITCH	SWITCH LEVEL 
	INH
	LDKL	A3,/8000
	ADK	A6,0	SET CR
	RB(Z)	TIOERR	FILE CODE UNKNOWN 
	LD	A12,DWTADR,A6	ADDRESS TO DRIVER ADDRESS BLOCK 
	LD	A13,DWTST,A6	DWT STATUS 
* 
	EJECT			TOSSIO 
* 
*	CHECK IF ATTACH/DETACH ORDER OR IF DEVICE IS BUSY/ATTACHED
* 
	IFT	ATTDET=1 
	LDKL	A10,/0800	ATTACH BIT
	CCK	A7,/BB00 
	RB(E)	ATTACH	ATTACH ORDER
	CCK	A7,/BC00 
	RB(E)	DETACH	DETACH ORDER
	TM	A10,A13 
	RF(Z)	TIO020	NOT ATTACHED
	CW	A5,DWTTAB,A6
	RB(NE)	TIOQ20	ATTACHED TO OTHER TASK 
	TM	A3,A13
	RF(NZ)	TIO030	DEVICE NOT BUSY
	RB	TIOQ05	BUSY, QUEUE DEVICE 
	XIF
* 
TIO020	EQU	*
	TM	A3,A13
	RB(Z)	TIOQ20	DEVICE BUSY 
* 
	EJECT			TOSSIO 
* 
*	CHECK IF ECHO, AND WHEN TRUE CHECK IF ECHO DEVICE IS BUSY/ATTACHED
* 
TIO030	SC	A2,DWTOR,A6	STORE DWT INDEX 
	LDK	A2,/40	CHECK IF ECHO 
	ANR	A2,A7
	RF(Z)	TIO070	NOT ECHO
* 
	LD	A2,DEVIND,A12	DEVICE INDEX
	SUK	A2,KB:DIX	CHECK IF KEYBOARD
	RF(NZ)	TIO070	ECHO NOT ALLOWED IF NOT KEYBOARD 
	LD	A2,DWTECH,A6	ECHO DEVICE DWT ADDRESS
	RF(Z)	TIO070	NO ECHO DEVICE
	LD	A14,DWTST,A2	ECHO DWT STATUS
* 
	IFT	ATTDET=1 
	TM	A10,A14 
	RF(Z)	TIO050	ECHO DEVICE NOT ATTACHED
	CW	A5,DWTTAB,A2
	RB(NE)	TIOQ10	ECHO DEVICE ATTACHED TO OTHER TASK 
	TM	A3,A14
	RF(NZ)	TIO060	ECHO DEVICE NOT BUSY 
	RB	TIOQ00	BUSY, QUEUE ECHO DEVICE
	XIF
* 
	EJECT			TOSSIO 
* 
* 
TIO050	TM	A3,A14
	RB(Z)	TIOQ10	ECHO DEVICE BUSY
* 
TIO060	LDKL	A3,/A000
	XRS	A3,DWTST,A2	UPDATE BUSY & ECHO BITS IN DWT STATUS
* 
*	UPDATE ECB AND DWT FIELDS 
* 
TIO070	XRS	A3,DWTST,A6	UPDATE BUSY & ECHO BITS IN DWT STATUS
* 
	IFT	MMUPAG=1 
	LD	A13,TTB:PW,A5	PSW 
	ANKL	A13,1	SYSTEM/USER MODE BIT
	RF(NZ)	TIO100	JUMP IF USER MODE
	LDKL	A2,/7FFF
	ANRS	A2,A8	RESET BIT 0 IN ECB FILE CODE
	ST	A8,DWTECB,A6	SET ACTUAL ECB ADDRESS 
	CM	ECBEL,A8	 RESET EFFECTIVE LENGTH
	CM	ECBRC,A8	 RESET RETURN CODE 
	RF	TIO110
* 
	EJECT			TOSSIO 
* 
*	MOVE USER ECB TO DWT ECB
* 
TIO100	EQU	*
	LDKL	A2,/4FFF
	ELR	A3,A8	LOAD FIRST WORD OF USER ECB
	ANR	A3,A2	RESET BITS 0,2,3 IN ECB FILE CODE
	ESR	A3,A8
	LD	A2,DWTMEC,A6	DWT MMU ECB ADDRESS
	ST	A2,DWTECB,A6	SET ACTUAL ECB ADDRESS 
	STR	A3,A2
	ST	A8,DWTUEC,A6	SAVE USER ECB ADDRESS
	LDR	A9,A8
	LDK	A3,0 
	ES	A3,ECBEL,A8	RESET EFFECTIVE LENGTH
	ES	A3,ECBRC,A8	RESET RETURN CODE 
* 
	LDR	A10,A1	SAVE PARAMETER
	LDR	A1,A8
	ADK	A1,ECBRL 
	LDR	A8,A2	SET A8 TO DWT ECB ADDRESS
	ADK	A2,ECBRL 
	LDK	A3,8 
	MVUS	A3	MOVE PART OF USER ECB TO DWT ECB 
	LDR	A1,A10	RESTORE PARAMETER 
	XIF
* 
	IFT	MMUPAG=0 
	LDKL	A3,/7FFF
	ANRS	A3,A8	RESET BIT 0 IN ECB FILE CODE
	CM	ECBEL,A8	 RESET EFFECTIVE LENGTH
	CM	ECBRC,A8	 RESET RETURN CODE 
	XIF
* 
	EJECT			TOSSIO 
* 
* 
TIO110	EQU	*
	ECR	A3,A7
	ANK	A3,/FF	ORDER OPTION
	RF(Z)	TIO120	NO SPECIAL OPTION IF ZERO 
	SC	A3,DWTOPT,A6	STORE OPTION IN DWT
* 
TIO120	EQU	*
	LDR	A3,A7
	ANK	A7,/3F 
	SC	A7,DWTOR+1,A6	STORE ORDER IN DWT
	ST	A5,DWTTAB,A6	SAVE TTAB ADDRESS IN DWTTAB
* 
TIO130	EQU	*
	IFT	MMUPAG=0 
	ST	A8,DWTECB,A6	 SET ECB ADDRESS 
	XIF
* 
	EJECT			TOSSIO 
* 
*	UPDATE DWTWAT (WAIT/ACTIVATE INDICATOR) 
* 
	LDR	A2,A4	CHECK PARAMETER
	RF(NZ)	TIO210	I/O AND ACTIVATION 
	ANK	A3,/80	NORMAL I/O. CHECK IF WAIT REQUESTED 
	RF(Z)	TIO220	NOT WAIT
	LDK	A4,1	INDICATE WAIT 
	RF	TIO230
* 
*	I/O WITH ACTIVATION 
* 
TIO210	CF	A15,GETBLK	SAVE PARAMETER AND DISPATCH ADDRESS
* 
*	NO WAIT 
* 
TIO220	CF	A15,QTJOB	QUEUE TASK FOR DISPATCHING
* 
*	WAIT
* 
TIO230	ST	A4,DWTWAT,A6	STORE WAIT/ACTIVATE INDICATOR
* 
	EJECT			TOSSIO 
* 
* 
	IFT	MMUPAG=1 
	LDR	A13,A13	CHECK IF SYSTEM/USER MODE
	RF(Z)	TIO250	JUMP IF SYSTEM MODE 
	LD	A3,DEVIND,A12	DEVICE INDEX
	RF(N)	TIO250	NO SPECIAL ACTION REQUIRED
	RF(Z)	TIO240	DATA MANAGEMENT 
	CWK	A3,DK:DIX	CHECK IF DISC
	RF(NE)	TIO235	NOT DISC 
	CF	A15,TIOCW2	MOVE 2ND CONTROL WORD
* 
*	PERFORM CHECK ON ORDER CODE 
* 
TIO235	EQU	*
	LDR	A4,A7	ORDER CODE 
	CF	A15,RD:WR2 	CHECK IF ORDER IS READ/WRITE
	RF(Z)	TIO250	JUMP IF NO READ/WRITE ORDER 
* 
TIO240	EQU	*
	ENB
	CFI	A15,TIOTAB,A3	BRANCH TO RELEVANT READ/WRITE ROUTINE
	XIF
* 
TIO250	ENB		GIVE OTHER TASKS A CHANCE 
* 
TIO260	LDK	A5,DWTSB2	LOAD STACK BASE 2
	ADR	A5,A6
	INH
	ABR*	A12	GO TO DRIVER ACTIVATION 
* 
	EJECT			TOSSIO 
* 
* 
**********
* SWITCH *
**********
* 
*	SWITCH PRIORITY LEVEL:
* 
*	IF CPU851, THEN SWITCH TO LEVEL 12
*	IF CPU852,  "     "    "    "   16
*	IF CPU857,  "     "    "    "   16
* 
*	A3 IS DESTROYED, AND SO IS CR 
* 
SWITCH	EQU	*	SWITCH LEVEL ON STACK
	IFT	TC8000=0 
	IFF	CPU852+CPU857=0		=4
	LDK	A3,/40	LEVEL 16
	XIF
	IFT	TC8000=1 
	LDK	A3,/30	LEVEL 12
	XIF
	IFT	TC8000=0		=4 
	IFT	CPU852+CPU857=0
	LDK	A3,/30	CPU851: LEVEL 12
	XIF
* 
* 
	SC	A3,2,A15	SET NEW LEVEL ON STACK 
	RTN	A15	RETURN WITH NEW LEVEL
* 
	EJECT			TOSSIO 
* 
* 
	IFT	MMUPAG=0 
TIOMXI	EQU	*	DUMMY ENTRY IN NON-MMU SYSTEMS 
	XIF
* 
	EJECT			TOSSIO 
* 
* 
	IFT	MMUPAG=1 
* 
*	R D : W R 
* 
* THIS MODULE IS CALLED BY 'TIO' AND 'TENDIO' FOR SELECTING 
* THE APPROPRIATE ROUTINE AT READ/WRITE REQUESTS, DEPENDING 
* ON THE DEVICE CONNECTION (PROGRAMMED CHANNEL, MUX ETX). 
* IF NO READ/WRITE REQUEST, CONDITION REGISTER ON STACK IS
* SET TO ZERO, ELSE NOT EQUAL TO ZERO.
* 
* INPUT:  A3 = DEVICE INDEX 
*         A6 = DWT ADDRESS
* 
* OUTPUT: A3 = INDEX FOR USE IN THE INDEXED BRANCHING 
*         CR = 0 IF NO READ/WRITE REQUEST 
*         CR <> 0 IF READ/WRITE REQUEST 
*	 A4 IS DESTROYED
* 
RD:WR	LD	A4,DWTOR,A6	ORDER CODE FROM DWT
	ANK	A4,/3F 
* 
RD:WR2	ADKL	A15,4	ADJUST STACKPOINTER 
	LC	A4,ORDTAB,A4	ORDER INDEX
	ANK	A4,/FF 
	ABR(Z)*	A15	RETURN IF NO READ/WRITE ORDER
	SUK	A4,1 
	ADR	A3,A4	ADD READ/WRITE INDEX 
	ABR*	A15	RETURN WITHOUT CHANGING CR
* 
	EJECT			TOSSIO 
* 
* 
**********
* ORDTAB *
**********
* 
*	ORDTAB CONTAINS ORDER CONSTANTS AS FOLLOWS: 
* 
* 	=0: NO READ/WRITE ORDER
* 	=1: READ ORDER 
* 	=TINDEX+1: WRITE ORDER 
* 
ORDTAB	EQU	*	ORDER CONSTANTS
	BYTES	0,1	/00, /01 
	BYTES	1,1	/02, /03 
	BYTES	0,TINDEX+1	/04, /05
	BYTES	TINDEX+1,TINDEX+1	/06, /07 
	BYTES	TINDEX+1,0	/08, /09
	BYTES	1,TINDEX+1	/0A, /0B
	BYTES	0,0	/0C, /0D 
	BYTES	0,0	/0E, /0F 
	BYTES	0,1	/10, /11 
	BYTES	0,0	/12, /13 
	BYTES	0,TINDEX+1	/14, /15
	BYTES	0,0	/16, /17 
	BYTES	0,0	/18, /19 
	BYTES	0,0	/1A, /1B 
	BYTES	0,0	/1C, /1D 
	BYTES	0,0	/1E, /1F 
	BYTES	0,TINDEX+1	/20, /21
	BYTES	TINDEX+1,0	/22, /23
	BYTES	TINDEX+1,0	/24, /25
	BYTES	0,TINDEX+1	/26, /27
	BYTES	0,0	/28, /29 
	BYTES	1,TINDEX+1	/2A, /2B	=3 
	BYTES	1,1	/2C, /2D	=3
	BYTES	1,TINDEX+1	/2E, /2F
	BYTES	0,0	/30, /31 
	BYTES	0,0	/32, /33 
	BYTES	0,0	/34, /35 
	BYTES	0,0	/36, /37 
	BYTES	0,0	/38, /39 
	BYTES	0,0	/3A, /3B 
	BYTES	0,0	/3C, /3D 
	BYTES	0,0	/3E, /3F 
* 
	EJECT			TOSSIO 
* 
*	T I O : D M 
* 
* THIS MODULE IS CALLED BY 'TIO' WHEN A REQUEST 
* FOR DATA MANAGEMENT HAS BEEN ISSUED.
* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT
* COMPLETION OF THE REQUEST IS 'TEN:DM'.
* 
* INPUT:  A8 = DWT ECB ADDRESS
*         A9 = USER ECB ADDRESS 
* 
* OUTPUT: A2 IS DESTROYED 
* 
TIO:DM	EQU	*	DATA MANAGEMENT, INPUT/OUTPUT
	EL	A2,ECBBA,A9	USER BUFFER ADDRESS 
	ST	A2,ECBBA,A8 
* 
TIOCW2	EQU	*
	EL	A2,ECBCW2,A9	SECOND CONTROL WORD
	ST	A2,ECBCW2,A8
* 
A15RTN	EQU	*
	RTN	A15
* 
	EJECT			TOSSIO 
* 
*	T I O P C I 
* 
* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN 
* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. 
* TIOPCI CHECKS USER AND DWT BUFFER ADDRESSES SO THAT BOTH ARE
* EVEN OR UNEVEN, DEPENDING ON THE USER BUFFER ADDRESS. 
* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT
* COMPLETION OF THE REQUEST IS 'TENPCI'.
* NOTICE THAT ENTRY TIPI05 IS USED BY 'TIOKBI'. 
* 
* INPUT:  A8 = DWT ECB ADDRESS
*         A9 = USER ECB ADDRESS 
*	A12 = ADDRESS TO DRIVER ADDRESS BLOCK 
* 
* OUTPUT: A1 IS DESTROYED 
* 
TIOPCI	EQU	*	PROGRAMMED CHANNEL, INPUT
	LD	A1,ECBRL,A8	REQUESTED LENGTH
	CW	A1,BUFLEN,A12	COMPARE WITH DWT BUFFER SIZE
	RF(G)	IO:ERR	REQ. LENGTH EXCEEDS DWT BUFFER SIZE 
* 
TIPI05	EQU	*	ENTRY POINT USED BY 'TIOKBI' 
	EL	A1,ECBBA,A9	USER BUFFER ADDRESS 
	ANK	A1,1 
	RF(Z)	TIPI10	USER BUFFER ADDRESS EVEN
	ORS	A1,ECBBA,A8
	RTN	A15
* 
TIPI10	SUK	A1,2	MAKE DWT BUFFER ADDRESS EVEN
	ANS	A1,ECBBA,A8
	RTN	A15
* 
	EJECT			TOSSIO 
* 
*	T I O M X I 
* 
* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN 
* ISSUED AND THE DEVICE IS RUNNING ON MULTIPLEXOR CHANNEL.
* TIOMXI ASSEMBLES THE FULL 18 BIT BUFFER ADDRESS WHICH IS
* TRANSFERRED TO THE MUX BY THE DRIVER. 
* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT
* COMPLETION OF THE REQUEST IS 'TENMXI'.
* NOTICE THAT MODULES 'TIOMXO', 'TIODKI' AND 'TIODKO' ARE EQUAL TO TIOMXI.
* 
* INPUT:  A5 = TTAB ADDRESS 
*         A8 = DWT ECB ADDRESS
*	 A9 = USER ECB ADDRESS
* 
* OUTPUT: A1-A2 ARE DESTROYED 
*         18 BIT USER BUFFER ADDRESS IS TRANSFERRED TO DWT ECB
* 
TIOMXI	EQU	*	MUX, INPUT 
	LDK	A1,0 
	EL	A2,ECBBA,A9	USER BUFFER ADDRESS (LOGICAL) 
	DLL	4	4 LEFTMOST BITS INTO A1
	ADR	A1,A1	DOUBLE INDEX 
	ADR	A1,A5
	LC	A1,TTB:MT,A1	PAGE ADDRESS 
	ANK	A1,/FC 
	SRL	A1,2 
	DRL	4
	SLL	A1,4 
	SCR	A1,A8	SET BITS  0-1 IN DWT ECB 1ST WORD
	ST	A2,ECBBA,A8	BITS 2-17 IN 18-BIT ADDRESS 
	RTN	A15
* 
	EJECT			TOSSIO 
* 
*	T I O K B I 
* 
* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN 
* ISSUED AND THE DEVICE IS KEYBOARD/CTW. TIOKBI WILL SET BUFFER ADDRESSES 
* AND MOVE KEYTABLE (IF ANY) BY USING ENTRY TIPI05
* IN 'TIOPCI' AND ENTRY TIPO05 IN 'TIOPCO'. 
* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT
* COMPLETION OF THE REQUEST IS 'TENKBI'.
* 
* INPUT:  A6 = DWT ADDRESS
*	 A7 = ORDER CODE
*         A8 = DWT ECB ADDRESS
*	 A9 = USER ECB ADDRESS
*	A12 = ADDRESS TO DRIVER ADDRESS BLOCK 
* 
* OUTPUT: A1-A4 ARE DESTROYED 
* 
TIOKBI	EQU	*	KEYBOARD/CTW 
	LD	A1,ECBRL,A8	REQUESTED LENGTH
	CW	A1,BUFLEN,A12	COMPARE WITH DWT BUFFER SIZE
	RF(G)	IO:ERR	REQ. LENGTH EXCEEDS DWT BUFFER SIZE 
	CF	A15,TIPI05	CHECK AND CORRECT BUFFER ADDRESSES 
	CWK	A7,1	CHECK ORDER CODE
	RF(E)	TIKB20	NO KEYTABLE IF BASIC READ 
	LD	A4,ECBCW,A8	USER KEYTABLE ADDRESS 
	RF(Z)	TIKB20	NO KEYTABLE 
* 
	EJECT			TOSSIO 
* 
* 
	LDR	A1,A9
	ADK	A1,8 
	ADKL	A8,12 
	ST	A8,-2,A8	SET DWT KEYTABLE ADDRESS 
	SUKL	A8,4
	ELR	A3,A4	FIRST WORD OF USER KEYTABLE
	ANK	A4,1 
	RF(NZ)	TIKB10	KEYTABLE ADDRESS UNEVEN
	ECR	A3,A3	NO, PUT LENGTH IN RIGHT BYTE 
* 
TIKB10	ANK	A3,/FF	SKIP LEFT CHARACTER 
	ADK	A3,1 
	CW	A3,KEYLEN,A12	CHECK KEYTABLE BUFFER SIZE
	RF(G)	IO:ERR	TOO SMALL 
	CF	A15,TIPO05
	SUKL	A8,8	ADJUST DWT ECB ADDRESS 
* 
TIKB20	EQU	*
	RTN	A15
* 
	EJECT			TOSSIO 
* 
*	T I O I T I 
* 
TIOITI	EQU	A15RTN	INTERTASK COMMUNICATION, INPUT
* 
*	T I O D K I 
* 
TIODKI	EQU	TIOMXI	DISC, INPUT 
* 
	EJECT			TOSSIO 
* 
*	T I O P C O 
* 
* THIS MODULE IS CALLED BY 'TIO' WHEN A WRITE REQUEST HAS BEEN
* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. 
* TIOPCO CHECKS THAT REQUESTED LENGTH DOES NOT EXCEED THE DWT 
* BUFFER LENGTH, AND PERFORMS A MOVE OF THE CONTENTS OF THE USER
* BUFFER TO THE DWT BUFFER. 
* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT
* COMPLETION OF THE REQUEST IS 'TENPCO'.
* NOTICE THAT MODULE 'TIOKBO' IS EQUAL TO TIOPCO. 
* NOTICE ALSO THAT ENTRY TIPO05 IS USED BY 'TIOKBI' AND 'TENITO'. 
* TIOPCO IS ALSO USED BY 'DC:MOT'.
* 
* INPUT:  A6 = DWT ADDRESS
*         A8 = DWT ECB ADDRESS
* 
* OUTPUT: A1-A4 ARE DESTROYED 
* 
TIOPCO	EQU	*	PROGRAMMED CHANNEL, OUTPUT 
	LD	A2,DWTADR,A6	ADDRESS TO DRIVER ADDRESS BLOCK
	LD	A3,ECBRL,A8	REQUESTED LENGTH
	RF(NP)	TIPO20	REQUESTED LENGTH <= 0
	CW	A3,BUFLEN,A2	COMPARE WITH DWT BUFFER SIZE 
	RF(G)	IO:ERR	REQ. LENGTH EXCEEDS DWT BUFFER SIZE 
	LD	A1,DWTUEC,A6	USER ECB ADDRESS 
* 
	EJECT			TOSSIO 
* 
* 
TIPO05	EQU	*	ENTRY POINT USED BY 'TIOKBI' AND 'TENITO'
	ADK	A3,1 
	ANKL	A3,/FFFE	MAKE REQUESTED LENGTH EVEN 
	EL	A1,ECBBA,A1	USER BUFFER ADDRESS 
	LD	A2,ECBBA,A8	DWT BUFFER ADDRESS
	ANKL	A2,/FFFE	MAKE DWT BUFFER ADDRESS EVEN 
	LDR	A4,A1
	ANK	A4,1 
	RF(NZ)	TIPO30	USER BUFFER ADDRESS UNEVEN 
	ST	A2,ECBBA,A8 
* 
TIPO10	MVUS	A3	MOVE (USER BUFFER) TO SYSTEM BUFFER
* 
TIPO20	RTN	A15
* 
TIPO30	EQU	*	USER BUFFER ADDRESS WAS UNEVEN 
	ORS	A4,ECBBA,A8	MAKE DWT BUFFER ADDRESS UNEVEN 
	ELR	A4,A1	FIRST CHARACTER FROM USER BUFFER 
	STR	A4,A2	STORE FIRST CHARACTER IN DWT BUFFER
	ADK	A1,1	UPDATE USER BUFFER POINTER
	ADK	A2,2	UPDATE DWT BUFFER POINTER 
	RB	TIPO10	MOVE REMAINING CHARACTERS
* 
	EJECT			TOSSIO 
* 
*	I O : E R R 
* 
* DRIVER (DWT) MMU BUFFER IS TOO SMALL. 
* SET RETURN CODE /8008 (REQUEST ERROR AND INCORRECT LENGTH). 
* BRANCH TO DISPATCHER VIA TENDIO.
* 
IO:ERR	EQU	*	REQUEST ERROR EXIT FOR MMU ROUTINES
	INH
 	ADKL	A15,4	ADJUST STACKPOINTER
	LD	A1,DWTST,A6	DWT STATUS
	SLL	A1,2	CHECK ECHO BIT
	RF(NN)	IO:E10	NOT ECHO 
	LDR	A1,A6	SAVE DWT ADDRESS 
	LD	A6,DWTECH,A6	ECHO DWT ADDRESS 
	CF	A15,TENDIO
	LDR	A6,A1	RESTORE DWT ADDRESS
* 
IO:E10	EQU	*
	LDKL	A1,/8008	SET RETURN CODE
	ABL	DISEND	BRANCH TO DISPATCHER VIA TENDIO 
* 
	EJECT			TOSSIO 
* 
*	T I O M X O 
* 
TIOMXO	EQU	TIOMXI	MUX, OUTPUT 
* 
*	T I O K B O 
* 
TIOKBO	EQU	TIOPCO	KEYBOARD/CTW, OUTPUT
* 
*	T I O I T O 
* 
TIOITO	EQU	A15RTN	INTERTASK COMMUNICATION, OUTPUT 
* 
*	T I O D K O 
* 
TIODKO	EQU	TIODKI	DISC, OUTPUT
* 
	EJECT			TOSSIO 
* 
*	T E N : D M 
* 
* THIS MODULE IS CALLED BY 'TENDIO' WHEN A REQUEST
* FOR DATA MANAGEMENT HAS BEEN COMPLETED. 
* NOTICE THAT MODULES 'TENDKI' AND 'TENDKO' ARE EQUAL TO TEN:DM.
* 
* INPUT:  A6 = DWT ADDRESS
*         A8 = USER ECB ADDRESS 
* 
* OUTPUT: A1 IS DESTROYED 
* 
TEN:DM	EQU	*	DATA MANAGEMENT, INPUT/OUTPUT
	LD	A1,DWTMEC,A6	MMU ECB ADDRESS
	LD	A1,ECBCW2,A1	SECOND CONTROL WORD
	ES	A1,ECBCW2,A8
	RTN	A15
* 
	EJECT			TOSSIO 
* 
*	T E N P C I 
* 
* THIS MODULE IS CALLED BY 'TENDIO' WHEN A READ REQUEST HAS BEEN
* COMPLETED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL.
* TENPCI PERFORMS A MOVE OF THE CONTENTS OF THE DWT BUFFER
* TO THE USER BUFFER. 
* NOTICE THAT MODULES 'TENKBI' AND 'TENITI' ARE EQUAL TO TENPCI.
* NOTICE ALSO THAT ENTRY TEN:DC IS USED BY 'DC:MIN'.
* 
* INPUT:  A6 = DWT ADDRESS
*         A8 = USER ECB ADDRESS 
* 
* OUTPUT: A1-A4, A8 ARE DESTROYED 
* 
TENPCI	EQU	*	PROGRAMMED CHANNEL, INPUT
	LD	A2,DWTECB,A6	DWT ECB ADDRESS
	LD	A4,ECBEL,A2	EFFECTIVE LENGTH
	RF(NP)	TEPI30	NO MOVE IF ZERO
	LD	A1,ECBBA,A2	DWT BUFFER ADDRESS
* 
TEN:DC	EQU	*	ENTRY POINT USED BY 'DC:MIN' 
	EL	A2,ECBBA,A8	USER BUFFER ADDRESS 
	LDK	A3,1	CHECK BUFFER ADDRESSES
	TM	A3,A1 
	RF(Z)	TEPI20	DWT BUFFER ADDRESS EVEN 
	TM	A3,A2	NO, CHECK USER BUFFER ADDRESS 
	RF(Z)	TEPI60	USER BUFFER ADDRESS EVEN
* 
	EJECT			TOSSIO 
* 
* 
TEPI10	EQU	*	BOTH BUFFER ADDRESSES WERE UNEVEN
 	LDR*	A3,A1	FIRST CHARACTER FROM DWT BUFFER
	ELR	A8,A2
* 
TEPI15	ANK	A3,/FF	SKIP LEFT CHARACTER 
	ANKL	A8,/FF00	SKIP RIGHT CHARACTER 
	ORR	A8,A3
	ESR	A8,A2	STORE CHARACTER IN USER BUFFER 
	ADK	A1,1	UPDATE BUFFER POINTERS
	ADK	A2,1 
	SUK	A4,1 
	RF(P)	TEPI25	MORE CHARACTERS TO MOVE 
	RTN	A15	NO, RETURN 
* 
TEPI20	TM	A3,A2 
	RF(Z)	TEPI25	USER BUFFER ADDRESS EVEN
	LDR	A3,A1	DWT BUFFER ADDRESS 
	ADR	A3,A4	ADD EFFECTIVE LENGTH 
* 
TEPI23	LC	A8,-1,A3	ONE CHARACTER
	SCR	A8,A3	MOVE THIS CHAR. ONE BYTE TO THE RIGHT
	SUK	A3,1	POINT TO NEXT CHARACTER 
	CWR	A3,A1	COMPARE WITH START ADDRESS OF BUFFER 
	RB(NE)	TEPI23	MORE CHARACTERS TO MOVE
	ADK	A1,1	NO, MAKE DWT BUFFER ADDRESS UNEVEN
	RB	TEPI10
* 
	EJECT			TOSSIO 
* 
* 
TEPI25	LDR	A3,A4	CHECK REQUESTED LENGTH 
	ANK	A3,1 
	RF(NZ)	TEPI40	EFFECTIVE LENGTH UNEVEN
	MVSU	A4	MOVE (SYSTEM BUFFER) TO USER BUFFER
* 
TEPI30	RTN	A15
* 
TEPI40	EQU	*	EFFECTIVE LENGTH WAS UNEVEN
	SUK	A4,1	MAKE EFFECTIVE LENGTH EVEN
	RF(Z)	TEPI50	ONLY ONE CHARACTER TO MOVE
	LDR	A8,A4	NO, SAVE A4
	MVSU	A4	MOVE (SYSTEM BUFFER) TO USER BUFFER
	ADR	A1,A8	UPDATE BUFFER POINTERS 
	ADR	A2,A8
* 
TEPI50	EQU	*
	LDR*	A8,A1	LAST CHARACTER FROM DWT BUFFER
	ELR	A3,A2
	RB	TEPI15
* 
TEPI60	EQU	*	DWT BUFFER ADDRESS WAS UNEVEN
	LDR	A3,A1	DWT BUFFER ADDRESS 
	ADR	A1,A4	ADD EFFECTIVE LENGTH 
* 
TEPI70	LCR	A8,A3	ONE CHARACTER
	SC	A8,-1,A3	MOVE THIS CHAR. ONE BYTE TO THE LEFT 
	ADK	A3,1	POINT TO NEXT CHARACTER 
	CWR	A3,A1	COMPARE WITH ENDING ADDRESS
	RB(NE)	TEPI70	MORE CHARACTERS TO MOVE
	SUR	A1,A4	NO, RESTORE DWT BUFFER ADDRESS 
	SUK	A1,1	MAKE DWT BUFFER ADDRESS EVEN
	RB	TEPI25
* 
	EJECT			TOSSIO 
* 
*	T E N M X I 
* 
TENMXI	EQU	A15RTN	MUX, INPUT
* 
*	T E N K B I 
* 
TENKBI	EQU	TENPCI	KEYBOARD, INPUT 
* 
*	T E N I T I 
* 
TENITI	EQU	TENPCI	INTERTASK COMMUNICATION, INPUT
* 
*	T E N D K I 
* 
TENDKI	EQU	TEN:DM	DISC, INPUT 
* 
	EJECT			TOSSIO 
* 
*	T E N P C O 
* 
TENPCO	EQU	A15RTN	PROGRAMMED CHANNEL, OUTPUT
* 
*	T E N M X O 
* 
TENMXO	EQU	A15RTN	MUX, OUTPUT 
* 
*	T E N K B O 
* 
TENKBO	EQU	A15RTN	KEYBOARD/CTW, OUTPUT
* 
*	T E N D K O 
* 
TENDKO	EQU	TEN:DM	DISC, OUTPUT
* 
	EJECT			TOSSIO 
* 
*	T E N I T O 
* 
* THIS MODULE IS CALLED BY 'TENDIO' WHEN A WRITE REQUEST HAS BEEN 
* COMPLETED FOR INTERTASK COMMUNICATION, IN PURPOSE TO MOVE THE CONTENTS
* OF THE USER BUFFER TO THE DRIVER BUFFER. THE ENTRY TIPO05 IN MODULE 
* 'TIOPCO' IS USED FOR MOVING THE DATA. 
* 
* INPUT:  A6 = DWT ADDRESS
* 
* OUTPUT: A1-A4, A8 ARE DESTROYED 
* 
TENITO	EQU	*	INTERTASK COMMUNICATION, OUTPUT
	LD	A8,DWTECB,A6	DWT ECB ADDRESS
	LD	A3,ECBEL,A8	EFFECTIVE LENGTH
	RF(NP)	TEIO10	NO MOVE
	LD	A1,DWTUEC,A6	USER ECB ADDRESS 
	CF	A15,TIPO05	MOVE BUFFER CONTENTS 
* 
TEIO10	RTN	A15
* 
	EJECT			TOSSIO 
* 
*	D C : M O T 
* 
* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER
* IN PURPOSE TO MOVE THE CONTENTS OF THE USER BUFFER TO 
* THE DRIVER BUFFER. THE MOVE ROUTINE IN MODULE 'TIOPCO'
* IS USED FOR MOVING THE DATA.
* 
* INPUT:  A6 = DWT ADDRESS
* 
* OUTPUT: NO REGISTERS ARE DESTROYED
* 
DC:MOT	EQU	*	DATA COMMUNICATION, OUTPUT 
	MSR	8,A15	SAVE A1-A8 ON STACK
	SUKL	A15,32	ADJUST STACKPOINTER
	TS	2,A15	SAVE MMU REGISTERS ON STACK 
	LD	A5,DWTTAB,A6	TTAB ADDRESS 
	TL	TTB:MT,A5	LOAD MMU REGISTERS
	LD	A8,DWTMEC,A6	DWT ECB ADDRESS
	ENB
	CF	A15,TIOPCO	MOVE BUFFER CONTENTS 
* 
DC:RTN	EQU	*	RETURN TO DC DRIVER
	TL	2,A15	RESTORE MMU REGISTERS FROM STACK
	ADKL	A15,32	ADJUST STACKPOINTER
	MLR	8,A15	RESTORE A1-A8 FROM STACK...
	RTN	A15	...AND RETURN
	XIF
* 
	EJECT			TOSSIO 
* 
*	D C : M I N 
* 
* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER
* IN PURPOSE TO MOVE THE CONTENTS OF THE DRIVER BUFFER TO THE USER BUFFER.
* 
* INPUT:  A1 = RETURN CODE
*         A4 = DRIVER BUFFER ADDRESS
*         A6 = DWT ADDRESS
* 
* OUTPUT: NO REGISTERS ARE DESTROYED
* 
DC:MIN	EQU	*
	IFT	MMUPAG=0 
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8 ON STACK 
	XIF
* 
	IFT	CPU852=0 
	MSR	8,A15	SAVE A1-A8 ON STACK
* 
	IFT	MMUPAG=1 
	SUKL	A15,32	ADJUST STACKPOINTER
	TS	2,A15	SAVE MMU REGISTERS ON STACK 
	LD	A5,DWTTAB,A6	TTAB ADDRESS 
	TL	TTB:MT,A5	LOAD MMU REGISTERS
	XIF
* 
	EJECT			TOSSIO 
* 
*	M I N M O V 
* 
* INPUT:  A1 = RETURN CODE
*         A3 = ECB ADDRESS
*         A4 = DRIVER BUFFER ADDRESS
*         A6 = DWT ADDRESS
* 
MINMOV	EQU	*	DC:MIN MOVE ENTRY
	ENB
	LD	A3,DWTECB,A6	ECB ADDRESS
	LDR	A7,A4	SAVE DRIVER BUFFER ADDRESS 
	LD	A2,ECBEL,A3	EFFECTIVE LENGTH
	RF(NP)	MIN:40	NOTHING TO MOVE
	CW	A2,ECBRL,A3	CHECK IF USER BUFFER IS LARGE ENOUGH
	RF(G)	MIN:70	NO, REQUEST ERROR 
* 
	IFT	MMUPAG=0 
	LD	A5,ECBBA,A3	USER BUFFER ADDRESS 
	LDR	A3,A5
	ANK	A3,1	CHECK USER BUFFER ADDRESS 
	RF(NZ)	MIN:30	USER BUFFER ADDRESS UNEVEN 
	SUK	A2,2 
	RF(N)	MIN:30	ONLY ONE CHARACTER TO MOVE
* 
	EJECT			TOSSIO 
* 
*	WORD MOVE 
* 
MIN:10	EQU	*
	LDR*	A3,A7	MOVE ONE WORD 
	STR	A3,A5
	ADK	A7,2	INCREMENT BUFFER POINTERS 
	ADK	A5,2 
	SUK	A2,2	DECREMENT LOOP COUNTER
	RB(NN)	MIN:10	AT LEAST ONE MORE WORD TO MOVE 
* 
MIN:20	EQU	*
	ADK	A2,1 
	RF(N)	MIN:40	MOVE FINISHED 
* 
*	CHARACTER MOVE
* 
MIN:30	EQU	*
	LCR	A3,A7	MOVE ONE CHARACTER 
	SCR	A3,A5
	ADK	A7,1	INCREMENT BUFFER POINTERS 
	ADK	A5,1 
	SUK	A2,1	DECREMENT LOOP COUNTER
	RB(P)	MIN:30	AT LEAST ONE MORE CHARACTER TO MOVE 
	XIF
* 
	IFT	MMUPAG=1 
	ST	A1,ECBRC,A3	SET RETURN CODE IN ECB
	LDR	A1,A4	DRIVER BUFFER ADDRESS
	LDR	A4,A2	EFFECTIVE LENGTH 
	LD	A8,DWTUEC,A6	USER ECB ADDRESS 
	CF	A15,TEN:DC	MOVE BUFFER CONTENTS 
	LDR	A4,A7	RESTORE BUFFER ADDRESS 
	LDK	A1,0 
	XIF
* 
	EJECT			TOSSIO 
* 
* 
MIN:40	EQU	*
	INH
	CF	A15,TENDIO	PERFORM TENDIO 
* 
*	RELEASE BUFFER
* 
	LD	A3,DWTADR,A6	DRIVER ADDRESS BLOCK 
	LD	A1,POLADR,A3	BUFFER POOL ADDRESS
	RF(Z)	MIN:60	NO RELEASE OF BUFFER
* 
MIN:50	EQU	*
	LDR	A2,A1	SAVE BUFFER ADDRESS
	LDR*	A1,A2	NEXT BUFFER ADDRESS 
	RB(NZ)	MIN:50	NOT LAST BUFFER IN CHAIN 
* 
*	INSERT BUFFER AT END OF CHAIN 
* 
	SU	A4,HDRLEN,A3	REAL BUFFER ADDRESS
	STR	A4,A2	UPDATE QUEUE LINKS 
	CMR	A4 
* 
MIN:60	EQU	*
	IFT	CPU852=1 
	ABL	IHRET8	RESTORE A1-A8 AND RETURN
	XIF
* 
	EJECT			TOSSIO 
* 
* 
	IFT	MMUPAG=0 
	IFT	CPU852=0 
	MLR	8,A15	RESTORE A1-A8 FROM STACK...
* 
DC:MOT	RTN	A15	...AND RETURN
	XIF
* 
	IFT	MMUPAG=1 
	RB	DC:RTN	RETURN TO DC DRIVER
	XIF
* 
*	ERROR EXIT
* 
MIN:70	EQU	*	DC:MIN ERROR EXIT
	LDKL	A1,/8008	REQUEST ERROR/INCORRECT LENGTH 
	RB	MIN:40	RETURN VIA TENDIO ETC
* 
	EJECT			TOSSIO 
* 
* 
	IFT	MMUPAG=0 
	IFT	CPU852=1 
DC:MOT	EQU	*
 	ABL	IHRTN	RETURN WITHOUT ENABLING INTERRUPTS
	XIF
* 
	EJECT			TOSSIO 
* 
* 
**********
* TENDIO *
**********
* 
* 
* THIS MODULE IS CALLED WHEN COMPLETION OF
* I/O OCCURS. 
* 
* - IF I/O AND ACTIVATION REQUEST:- 
* 
*   ACTOTP IS CALLED TO START THE TASK
* 
* -IF NORMAL I/O WITH WAIT:-
* 
*   QTJOB IS CALLED TO QUEUE THE TASK 
*   FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- 
* 
*   A5 = TTAB ADDRESS 
* 
* -IF NORMAL I/O WITH NO WAIT:- 
* 
*   NO ACTION REQUIRED
* 
* IF AN EVENT WAS QUEUED FOR THIS DEVICE (DWTTQ NOT ZERO) 
* THAT TASK IS PUT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION. 
* 
	EJECT			TOSSIO 
* 
* 
* ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- 
* 
*   A1 = RETURN CODE
* 
*   A6 = DWT ADDRESS
* 
* NO REGISTERS ARE DESTROYED
* 
* WHEN RUNNING WITH MMU OPTION SPECIAL DEVICE 
* DEPENDENT SUBROUTINES ARE PERFORMED.
* 
	EJECT			TOSSIO 
* 
*	END I/O ENTRY 
* 
TENDIO	EQU	*
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8 ON STACK 
	XIF
* 
	IFT	CPU852=0 
	INH
	MSR	8,A15	SAVE A1-A8 ON STACK
	XIF
* 
TEN090	EQU	*
	ENB
	LDR	A4,A6	DWT ADDRESS
	ADK	A4,DWTST	POINT TO DWT STATUS 
	INH
	LD	A5,DWTTQ,A6	TERMINAL QUEUE LINK 
	RF(Z)	TEN110	NO TASK QUEUED
* 
	IFT	ATTDET=1 
	LDKL	A2,/800	ATTACH BIT
	ANR*	A2,A4 
	RF(Z)	TEN095	DEVICE NOT ATTACHED	=2	=1 
	CW	A5,DWTTAB,A6	ATTACHED TO OTHER TASK 
	RF(NE)	TEN110	YES, DON'T QUEUE TASK
TEN095	EQU	*		=2	=1 
	CF	A15,FRABLK	FREE ATTACH BLOCK AND TIMER	=1 
	LDR	A4,A6		=1
	ADK	A4,DWTST	RESTORE A4	=1 
	XIF
* 
	EJECT			TOSSIO 
* 
* 
TEN100	EQU	*
	LDR*	A3,A5	UPDATE QUEUE ANCHOR ADDRESS 
	ST	A3,DWTTQ,A6 
	CF	A15,QTJOB	QUEUE TASK TO REPEAT REQUEST
* 
*	UPDATE ECB AND DWT
* 
TEN110	LD	A5,DWTTAB,A6	TTAB ADDRESS FROM DWT
* 
TEN120	LDKL	A2,/8000
	ORRS	A2,A4	INDICATE DEVICE READY IN DWT
	LDKL	A3,/DBFF
	ANRS	A3,A4	RESET ECHO BIT AND BIT 5
	LD	A3,DWTECB,A6	ECB ADDRESS
	RF(Z)	TEN260	BRANCH IF ENTERED FROM ECHO OR RECOVERY 
* 
	EJECT			TOSSIO 
* 
* 
	ORRS	A2,A3	SET EVENT COMPLETED IN ECB
	ORS	A1,ECBRC,A3	SET RETURN CODE IN ECB 
* 
	IFT	MMUPAG=1 
	LD	A4,TTB:PW,A5	PSW
	ANK	A4,1	SYSTEM/USER MODE BIT
	RF(Z)	TEN200	SYSTEM MODE 
* 
*	LOAD MMU REGISTERS
* 
TEN130	EQU	*
	SUKL	A15,32	ADJUST STACKPOINTER
	TS	2,A15	SAVE MMU REGISTERS ON STACK 
	TL	TTB:MT,A5	LOAD MMU REGISTERS FROM TTAB
* 
	EJECT			TOSSIO 
* 
*	MOVE DWT ECB TO USER ECB
* 
	LD	A8,DWTUEC,A6	USER ECB ADDRESS 
	ELR	A4,A8
	ORR	A4,A2	SET EVENT COMPLETED IN ECB 
	ESR	A4,A8
	LDR	A1,A3
	ADK	A1,ECBEL 
	LDR	A2,A8
	ADK	A2,ECBEL 
	LDK	A4,6 
	MVSU	A4	MOVE EFF. LENGTH, RTN CODE & CNTRL WORD
* 
	LD	A3,DWTADR,A6	ADDRESS TO DRIVER ADDRESS BLOCK
	LD	A3,DEVIND,A3	DEVICE INDEX 
	RF(N)	TEN160	NO SPECIAL ACTION REQUIRED
	RF(Z)	TEN140	DATA MANAGEMENT 
	CWK	A3,DK:DIX	CHECK IF DISC
	RF(E)	TEN140	DISC
* 
*	PERFORM CHECK ON ORDER CODE 
* 
	CF	A15,RD:WR	CHECK IF IT WAS READ/WRITE
	RF(Z)	TEN160	JUMP IF NO READ/WRITE ORDER 
* 
TEN140	EQU	*
	ENB
	CFI	A15,TENTAB,A3	BRANCH TO RELEVANT READ/WRITE ROUTINE
* 
	EJECT			TOSSIO 
* 
*	RESTORE MMU REGISTERS 
* 
TEN150	EQU	*
	INH
* 
TEN160	EQU	*
	TL	2,A15	RESTORE MMU REGISTERS FROM STACK
	ADKL	A15,32	ADJUST STACKPOINTER
	XIF
* 
	EJECT			TOSSIO 
* 
*	CHECK IF NO WAIT, WAIT, MULTIPLE WAIT OR ACTIVATION 
* 
TEN200	EQU	*
	LD	A4,DWTWAT,A6	WAIT/ACTIVATE INDICATOR
	RF(Z)	TEN250	NOT WAIT OR ACTIVATION
	SUK	A4,1 
	RF(Z)	TEN240	WAIT
	ADK	A4,1 
	LDR	A3,A4
	ANK	A3,1 
	RF(Z)	TEN270	ACTIVATION
* 
*	MULTIPLE WAIT 
* 
	LD	A8,DWTECB,A6	ECB ADDRESS
* 
	IFT	MMUPAG=1 
	AN	A3,TTB:PW,A5	SYSTEM/USER MODE BIT 
	RF(Z)	TEN210	SYSTEM MODE 
	LD	A8,DWTUEC,A6	NO, GET USER ECB ADDRESS 
	XIF
* 
TEN210	EQU	*
	ST	A8,TTB:SA+16,A5	SET TO A8 IN TTAB SAVE AREA 
* 
TEN220	ADK	A4,DWTWAT	POINT TO WAIT/ACTIVATE INDICATOR 
	LDR*	A3,A4	NEXT DWT ADDRESS
	CMR	A4	SET TO NO WAIT AGAIN
	LDR	A4,A3
	RB(NZ)	TEN220
* 
	EJECT			TOSSIO 
* 
*	WAIT
* 
TEN240	EQU	*
	CF	A15,QTJOB	WAIT: QUEUE TASK FOR DISPATCHING
* 
*	NO WAIT 
* 
TEN250	EQU	*
	CM	DWTECB,A6	RESET ECB ADDRESS 
* 
TEN260	EQU	*
	IFT	CPU852=1 
	ABL	IHRET8 
	XIF
* 
	IFT	CPU852=0 
	MLR	8,A15	RESTORE A1-A8 FROM STACK...
	RTN	A15	...AND RETURN
	XIF
* 
*	I/O WITH ACTIVATION 
* 
TEN270	EQU	*
	CF	A15,FREBLK	ACTIVATE: GET PARAMETER AND DISP ADDR
	CF	A15,ACTOTP	ACTIVATE TASK ON LIFO BASIS
	RB	TEN250
* 
* 
* 
	END

0x0000…0036 (0, 0, 400)   Head {h00=0x0032, h01=0x0050, text=» IDENT TOSSIO  REL 11.0 81-04-13 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…006a               Head {h00=0x0028, h01=0x0050, text=»   =4, CPU857 DEFINITION NOT CORRECT«, t00=0x0000, t01=0x0042}
0x006a…008a               Head {h00=0x001c, h01=0x0050, text=»   =4, REL 11.0 81-03-18«, t00=0x0000, t01=0x006e}
0x008a…00bc               Head {h00=0x002e, h01=0x0050, text=»   =3, ORDERS IN ORDTAB CHANGED TO FIT TND«, t00=0x0000, t01=0x008e}
0x00bc…00dc               Head {h00=0x001c, h01=0x0050, text=»   =3, REL 11.0 81-02-25«, t00=0x0000, t01=0x00c0}
0x00dc…0106               Head {h00=0x0026, h01=0x0050, text=»   =2, CORRECTION OF UPDATE =1 =1 «, t00=0x0000, t01=0x00e0}
0x0106…012a               Head {h00=0x0020, h01=0x0050, text=»   =2, REL 11.0 81-02-20 =1 «, t00=0x0000, t01=0x010a}
0x012a…0154               Head {h00=0x0026, h01=0x0050, text=»   =1, WRONG ATTACH TIMER HANDLING«, t00=0x0000, t01=0x012e}
0x0154…0174               Head {h00=0x001c, h01=0x0050, text=»   =1, REL 11.0 81-01-26«, t00=0x0000, t01=0x0158}
0x0174…017e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0178}
0x017e…0188               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0182}
0x0188…01c2               Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x018c}
0x01c2…01cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0036}
0x01cc…01f4               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0001, t01=0x0040}
0x01f4…01fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0068}
0x01fe…022a               Head {h00=0x0028, h01=0x0050, text=»*   TOSSIO = TOSS I/O LKM PROCESSOR «, t00=0x0001, t01=0x0072}
0x022a…0234               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x009e}
0x0234…023e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a8}
0x023e…0248               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b2}
0x0248…0282               Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0001, t01=0x00bc}
0x0282…028c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00f6}
0x028c…0296               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0100}
0x0296…02c6               Head {h00=0x002c, h01=0x0050, text=»*   THIS IS THE TOSS I/O LKM PROCESSOR. «, t00=0x0001, t01=0x010a}
0x02c6…0300               Head {h00=0x0036, h01=0x0050, text=»*   IT CONTAINS THE FOLLOWING MONITOR SUBROUTINES:«, t00=0x0001, t01=0x013a}
0x0300…030a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0174}
0x030a…032e               Head {h00=0x0020, h01=0x0050, text=»*   -TIO     INITIALIZE I/O «, t00=0x0001, t01=0x017e}
0x032e…0338               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0012}
0x0338…0354               Head {h00=0x0018, h01=0x0050, text=»*   -TENDIO  END I/O«, t00=0x0002, t01=0x001c}
0x0354…035e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0038}
0x035e…0380               Head {h00=0x001e, h01=0x0050, text=»*   -ATTACH  ATTACH DEVICE«, t00=0x0002, t01=0x0042}
0x0380…038a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0064}
0x038a…03ac               Head {h00=0x001e, h01=0x0050, text=»*   -DETACH  DETACH DEVICE«, t00=0x0002, t01=0x006e}
0x03ac…03b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0090}
0x03b6…03f2               Head {h00=0x0038, h01=0x0050, text=»*   -DC:MIN  DATA COMMUNICATION MOVE ROUTINE (READ) «, t00=0x0002, t01=0x009a}
0x03f2…03fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d6}
0x03fc…0438               Head {h00=0x0038, h01=0x0050, text=»*   -DC:MOT  DATA COMMUNICATION MOVE ROUTINE (WRITE)«, t00=0x0002, t01=0x00e0}
0x0438…0442               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x011c}
0x0442…047a               Head {h00=0x0034, h01=0x0050, text=»*   SPECIAL ROUTINES ARE CARRIED OUT IN SYSTEMS «, t00=0x0002, t01=0x0126}
0x047a…04a8               Head {h00=0x002a, h01=0x0050, text=»*   WITH MEMORY MANAGEMENT UNIT (MMU).«, t00=0x0002, t01=0x015e}
0x04a8…04b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x018c}
0x04b2…04ee               Head {h00=0x0038, h01=0x0050, text=»*   THIS MODULE ALSO CONTAINS STANDARD DISPLACEMENT «, t00=0x0003, t01=0x0008}
0x04ee…051c               Head {h00=0x002a, h01=0x0050, text=»*   VALUES FOR ECB, DWT AND DAB AREAS.«, t00=0x0003, t01=0x0044}
0x051c…0526               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0072}
0x0526…053e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0003, t01=0x007c}
0x053e…0548               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0094}
0x0548…0552               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x009e}
0x0552…0566               Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0003, t01=0x00a8}
0x0566…057a               Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0003, t01=0x00bc}
0x057a…058e               Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0003, t01=0x00d0}
0x058e…0598               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e4}
0x0598…05a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ee}
0x05a2…05c2               Head {h00=0x001c, h01=0x0050, text=» ENTRY TIO I/O PROCESSOR«, t00=0x0003, t01=0x00f8}
0x05c2…05f6               Head {h00=0x0030, h01=0x0050, text=» ENTRY TIO:FM ENTRY USED BY FILE MANAGEMENT «, t00=0x0003, t01=0x0118}
0x05f6…062a               Head {h00=0x0030, h01=0x0050, text=» ENTRY TIOERR ERROR: QUEUE TASK AND DISPATCH«, t00=0x0003, t01=0x014c}
0x062a…0648               Head {h00=0x001a, h01=0x0050, text=» ENTRY TENDIO END I/O «, t00=0x0003, t01=0x0180}
0x0648…067c               Head {h00=0x0030, h01=0x0050, text=» ENTRY QUEDEV QUEUE REQUEST IN DEVICE QUEUE «, t00=0x0004, t01=0x000e}
0x067c…06b4               Head {h00=0x0034, h01=0x0050, text=» ENTRY QUEFIL QUEUE FILE REQUEST IN DEVICE QUEUE«, t00=0x0004, t01=0x0042}
0x06b4…06ea               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC:MIN MOVE ROUTINE FOR DATACOM, INPUT «, t00=0x0004, t01=0x007a}
0x06ea…0720               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC:MOT MOVE ROUTINE FOR DATACOM, OUTPUT«, t00=0x0004, t01=0x00b0}
0x0720…075a               Head {h00=0x0036, h01=0x0050, text=» ENTRY TIOMXI CONVERT LOGICAL ADDRESS TO PHYSICAL «, t00=0x0004, t01=0x00e6}
0x075a…078a               Head {h00=0x002c, h01=0x0050, text=» ENTRY MONMMU MONITOR (SYSTEM) MMU TABLE«, t00=0x0004, t01=0x0120}
0x078a…07a8               Head {h00=0x001a, h01=0x0050, text=» ENTRY ECBFC FILE CODE«, t00=0x0004, t01=0x0150}
0x07a8…07c8               Head {h00=0x001c, h01=0x0050, text=» ENTRY ECBFN FILE NUMBER«, t00=0x0004, t01=0x016e}
0x07c8…07ec               Head {h00=0x0020, h01=0x0050, text=» ENTRY ECBBA BUFFER ADDRESS «, t00=0x0004, t01=0x018e}
0x07ec…0812               Head {h00=0x0022, h01=0x0050, text=» ENTRY ECBRL REQUESTED LENGTH «, t00=0x0005, t01=0x0022}
0x0812…0838               Head {h00=0x0022, h01=0x0050, text=» ENTRY ECBEL EFFECTIVE LENGTH «, t00=0x0005, t01=0x0048}
0x0838…0858               Head {h00=0x001c, h01=0x0050, text=» ENTRY ECBRC RETURN CODE«, t00=0x0005, t01=0x006e}
0x0858…087a               Head {h00=0x001e, h01=0x0050, text=» ENTRY ECBCW CONTROL WORD «, t00=0x0005, t01=0x008e}
0x087a…089e               Head {h00=0x0020, h01=0x0050, text=» ENTRY ECBCW1 CONTROL WORD 1«, t00=0x0005, t01=0x00b0}
0x089e…08c2               Head {h00=0x0020, h01=0x0050, text=» ENTRY ECBCW2 CONTROL WORD 2«, t00=0x0005, t01=0x00d4}
0x08c2…08f8               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC:DIX DEVICE INDEX DATA COMMUNICATION «, t00=0x0005, t01=0x00f8}
0x08f8…092a               Head {h00=0x002e, h01=0x0050, text=» ENTRY DM:DIX DEVICE INDEX DATA MANAGEMENT«, t00=0x0005, t01=0x012e}
0x092a…0960               Head {h00=0x0032, h01=0x0050, text=» ENTRY PC:DIX DEVICE INDEX PROGRAMMED CHANNEL «, t00=0x0005, t01=0x0160}
0x0960…0994               Head {h00=0x0030, h01=0x0050, text=» ENTRY MX:DIX DEVICE INDEX MULTIPLEX CHANNEL«, t00=0x0006, t01=0x0008}
0x0994…09c4               Head {h00=0x002c, h01=0x0050, text=» ENTRY KB:DIX DEVICE INDEX KEYBOARD/CTW «, t00=0x0006, t01=0x003c}
0x09c4…09fe               Head {h00=0x0036, h01=0x0050, text=» ENTRY IT:DIX DEVICE INDEX INTERTASK COMMUNICATION«, t00=0x0006, t01=0x006c}
0x09fe…0a26               Head {h00=0x0024, h01=0x0050, text=» ENTRY DK:DIX DEVICE INDEX DISC «, t00=0x0006, t01=0x00a6}
0x0a26…0a4e               Head {h00=0x0024, h01=0x0050, text=» ENTRY BUFLEN MMU BUFFER LENGTH «, t00=0x0006, t01=0x00ce}
0x0a4e…0a58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f6}
0x0a58…0a70               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0006, t01=0x0100}
0x0a70…0a7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0118}
0x0a7a…0a84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0122}
0x0a84…0aac               Head {h00=0x0024, h01=0x0050, text=» ENTRY ACTADR ACTIVATION ADDRESS«, t00=0x0006, t01=0x012c}
0x0aac…0ad0               Head {h00=0x0020, h01=0x0050, text=» ENTRY ABTADR ABORT ADDRESS «, t00=0x0006, t01=0x0154}
0x0ad0…0af8               Head {h00=0x0024, h01=0x0050, text=» ENTRY INTADR INTERRUPT ADDRESS «, t00=0x0006, t01=0x0178}
0x0af8…0b2e               Head {h00=0x0032, h01=0x0050, text=» ENTRY POLADR BUFFER POOL ADDRESS (DC DRIVERS)«, t00=0x0007, t01=0x0010}
0x0b2e…0b66               Head {h00=0x0034, h01=0x0050, text=» ENTRY HDRLEN BUFFER HEADER LENGTH (DC DRIVERS) «, t00=0x0007, t01=0x0046}
0x0b66…0b8c               Head {h00=0x0022, h01=0x0050, text=» ENTRY RECADR RECOVERY ADDRESS«, t00=0x0007, t01=0x007e}
0x0b8c…0bae               Head {h00=0x001e, h01=0x0050, text=» ENTRY ECHADR ECHO ADDRESS«, t00=0x0007, t01=0x00a4}
0x0bae…0bd6               Head {h00=0x0024, h01=0x0050, text=» ENTRY DWTCHP CHANNEL PARAMETERS«, t00=0x0007, t01=0x00c6}
0x0bd6…0bf2               Head {h00=0x0018, h01=0x0050, text=» ENTRY DWTST STATUS «, t00=0x0007, t01=0x00ee}
0x0bf2…0c14               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTBC BYTE COUNTER «, t00=0x0007, t01=0x010a}
0x0c14…0c36               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTECB ECB ADDRESS «, t00=0x0007, t01=0x012c}
0x0c36…0c58               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTOPT ORDER OPTION«, t00=0x0007, t01=0x014e}
0x0c58…0c7c               Head {h00=0x0020, h01=0x0050, text=» ENTRY DWTOR INDEX AND ORDER«, t00=0x0007, t01=0x0170}
0x0c7c…0ca8 (8, 0, 400)   Head {h00=0x0028, h01=0x0050, text=» ENTRY DWTOCH LAST OUTPUT CHARACTER «, t00=0x0008, t01=0x0004}
0x0ca8…0cd2               Head {h00=0x0026, h01=0x0050, text=» ENTRY DWTADR DRIVER ADDRESS BLOCK«, t00=0x0008, t01=0x0030}
0x0cd2…0cf4               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTTAB TTAB ADDRESS«, t00=0x0008, t01=0x005a}
0x0cf4…0d22               Head {h00=0x002a, h01=0x0050, text=» ENTRY DWTWAT WAIT/ACTIVATE INDICATOR «, t00=0x0008, t01=0x007c}
0x0d22…0d46               Head {h00=0x0020, h01=0x0050, text=» ENTRY DWTTQ TERMINAL QUEUE «, t00=0x0008, t01=0x00aa}
0x0d46…0d6e               Head {h00=0x0024, h01=0x0050, text=» ENTRY DWTOTQ OUTPUT QUEUE LINK «, t00=0x0008, t01=0x00ce}
0x0d6e…0d94               Head {h00=0x0022, h01=0x0050, text=» ENTRY DWTUEC USER ECB ADDRESS«, t00=0x0008, t01=0x00f6}
0x0d94…0dba               Head {h00=0x0022, h01=0x0050, text=» ENTRY DWTMEC MMU ECB ADDRESS «, t00=0x0008, t01=0x011c}
0x0dba…0ddc               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTA2 SAVE AREA A2 «, t00=0x0008, t01=0x0142}
0x0ddc…0dfe               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTA3 SAVE AREA A3 «, t00=0x0008, t01=0x0164}
0x0dfe…0e20               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTA4 SAVE AREA A4 «, t00=0x0008, t01=0x0186}
0x0e20…0e42               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTA5 SAVE AREA A5 «, t00=0x0009, t01=0x0018}
0x0e42…0e6c               Head {h00=0x0026, h01=0x0050, text=» ENTRY DWTSB1 STACK BASE 1 IN DWT «, t00=0x0009, t01=0x003a}
0x0e6c…0e96               Head {h00=0x0026, h01=0x0050, text=» ENTRY DWTSB2 STACK BASE 2 IN DWT «, t00=0x0009, t01=0x0064}
0x0e96…0eb8               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTTP TIMER POINTER«, t00=0x0009, t01=0x008e}
0x0eb8…0ede               Head {h00=0x0022, h01=0x0050, text=» ENTRY DWTECH ECHO DEVICE DWT «, t00=0x0009, t01=0x00b0}
0x0ede…0f02               Head {h00=0x0020, h01=0x0050, text=» ENTRY DWTSQ START OF QUEUE «, t00=0x0009, t01=0x00d6}
0x0f02…0f32               Head {h00=0x002c, h01=0x0050, text=» ENTRY DWTORD SAVE AREA INDEX AND ORDER «, t00=0x0009, t01=0x00fa}
0x0f32…0f60               Head {h00=0x002a, h01=0x0050, text=» ENTRY DWTNVL NEW VOLUME LOADED FLAGS «, t00=0x0009, t01=0x012a}
0x0f60…0f86               Head {h00=0x0022, h01=0x0050, text=» ENTRY DWTVOL DISC VOLUME NAME«, t00=0x0009, t01=0x0158}
0x0f86…0fa8               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTA7 SAVE AREA A7 «, t00=0x0009, t01=0x017e}
0x0fa8…0fca               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTA8 SAVE AREA A8 «, t00=0x000a, t01=0x0010}
0x0fca…0ff4               Head {h00=0x0026, h01=0x0050, text=» ENTRY DWTCP2 CHANNEL PARAMETERS 2«, t00=0x000a, t01=0x0032}
0x0ff4…1022               Head {h00=0x002a, h01=0x0050, text=» ENTRY DWTLD1 LINE DRIVER DEPENDENT 1 «, t00=0x000a, t01=0x005c}
0x1022…1050               Head {h00=0x002a, h01=0x0050, text=» ENTRY DWTLD2 LINE DRIVER DEPENDENT 2 «, t00=0x000a, t01=0x008a}
0x1050…107c               Head {h00=0x0028, h01=0x0050, text=» ENTRY DWTDEV TERMINAL DEVICE STATUS«, t00=0x000a, t01=0x00b8}
0x107c…10aa               Head {h00=0x002a, h01=0x0050, text=» ENTRY DWTTBU PLC TEST BUFFER ADDRESS «, t00=0x000a, t01=0x00e4}
0x10aa…10d6               Head {h00=0x0028, h01=0x0050, text=» ENTRY DWTTLN PLC TEST BUFFER LENGTH«, t00=0x000a, t01=0x0112}
0x10d6…10fe               Head {h00=0x0024, h01=0x0050, text=» ENTRY DWTTCW PLC TEST PARAMETER«, t00=0x000a, t01=0x013e}
0x10fe…1108               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0166}
0x1108…1120               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x000a, t01=0x0170}
0x1120…112a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0188}
0x112a…1134 (11, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0004}
0x1134…114a               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000b, t01=0x000e}
0x114a…1160               Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x000b, t01=0x0024}
0x1160…1176               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000b, t01=0x003a}
0x1176…1180               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0050}
0x1180…118a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x005a}
0x118a…11b0               Head {h00=0x0022, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS «, t00=0x000b, t01=0x0064}
0x11b0…11e4               Head {h00=0x0030, h01=0x0050, text=» EXTRN IHRET8 RESTORE 8 REGISTERS AND RETURN«, t00=0x000b, t01=0x008a}
0x11e4…121c               Head {h00=0x0034, h01=0x0050, text=» EXTRN IHRTN RETURN WITHOUT ENABLING INTERRUPTS «, t00=0x000b, t01=0x00be}
0x121c…1246               Head {h00=0x0026, h01=0x0050, text=» EXTRN ACTOTP ACTIVATE TASK (LIFO)«, t00=0x000b, t01=0x00f6}
0x1246…1266               Head {h00=0x001c, h01=0x0050, text=» EXTRN FNDDWT SEARCH DWT«, t00=0x000b, t01=0x0120}
0x1266…1296               Head {h00=0x002c, h01=0x0050, text=» EXTRN QTJOB QUEUE TASK FOR DISPATCHING «, t00=0x000b, t01=0x0140}
0x1296…12b6               Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x000b, t01=0x0170}
0x12b6…12ec               Head {h00=0x0032, h01=0x0050, text=» EXTRN DISEND BRANCH TO DISPATCHER VIA TENDIO «, t00=0x000b, t01=0x0190}
0x12ec…131a               Head {h00=0x002a, h01=0x0050, text=» EXTRN LKMQDI QUEUE TASK AND DISPATCH «, t00=0x000c, t01=0x0036}
0x131a…1348               Head {h00=0x002a, h01=0x0050, text=» EXTRN LKMERR HALT SYSTEM, FATAL ERROR«, t00=0x000c, t01=0x0064}
0x1348…1378               Head {h00=0x002c, h01=0x0050, text=» EXTRN GETBLK PUT BLOCK IN PENDING QUEUE«, t00=0x000c, t01=0x0092}
0x1378…13ae               Head {h00=0x0032, h01=0x0050, text=» EXTRN FREBLK RELEASE BLOCK FROM PENDING QUEUE«, t00=0x000c, t01=0x00c2}
0x13ae…13ce               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIMP SET TIMER «, t00=0x000c, t01=0x00f8}
0x13ce…13f0               Head {h00=0x001e, h01=0x0050, text=» EXTRN TTMJOB MONITOR TASK«, t00=0x000c, t01=0x0118}
0x13f0…141a               Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:ID TASK IDENTIFICATION «, t00=0x000c, t01=0x013a}
0x141a…1446               Head {h00=0x0028, h01=0x0050, text=» EXTRN TTB:ST TASK STATUS AND LEVEL «, t00=0x000c, t01=0x0164}
0x1446…1470               Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:PW PROGRAM STATUS WORD «, t00=0x000c, t01=0x0190}
0x1470…1490               Head {h00=0x001c, h01=0x0050, text=» EXTRN TTB:SA SAVE AREA «, t00=0x000d, t01=0x002a}
0x1490…14ac               Head {h00=0x0018, h01=0x0050, text=» EXTRN TTB:MT MMUTAB«, t00=0x000d, t01=0x004a}
0x14ac…14c4               Head {h00=0x0014, h01=0x0050, text=» EXTRN HALT  =1 «, t00=0x000d, t01=0x0066}
0x14c4…14ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x007e}
0x14ce…14e6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x000d, t01=0x0088}
0x14e6…14f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00a0}
0x14f0…14fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00aa}
0x14fa…152c               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000d, t01=0x00b4}
0x152c…1536               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00e6}
0x1536…1554               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000d, t01=0x00f0}
0x1554…155e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x010e}
0x155e…1590               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000d, t01=0x0118}
0x1590…159a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x014a}
0x159a…15cc               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000d, t01=0x0154}
0x15cc…15fa               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000d, t01=0x0186}
0x15fa…1604               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0024}
0x1604…1618               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000e, t01=0x002e}
0x1618…1622               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0042}
0x1622…162c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x004c}
0x162c…1666               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000e, t01=0x0056}
0x1666…1698               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000e, t01=0x0090}
0x1698…16a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00c2}
0x16a2…16b6               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000e, t01=0x00cc}
0x16b6…16c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00e0}
0x16c0…16ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ea}
0x16ca…16fe               Head {h00=0x0030, h01=0x0050, text=»* A PROGRAM VERSION INCLUDING ATTACH/DETACH «, t00=0x000e, t01=0x00f4}
0x16fe…172c               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING ATTDET EQU 1.«, t00=0x000e, t01=0x0128}
0x172c…1736               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0156}
0x1736…1748               Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x000e, t01=0x0160}
0x1748…175c               Head {h00=0x0010, h01=0x0050, text=»ATTDET EQU 1«, t00=0x000e, t01=0x0172}
0x175c…1766               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0186}
0x1766…1770               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0190}
0x1770…17a8               Head {h00=0x0034, h01=0x0050, text=»* A PROGRAM VERSION SPECIALIZED FOR THE 857 CPU «, t00=0x000f, t01=0x000a}
0x17a8…17d6               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING CPU857 EQU 1.«, t00=0x000f, t01=0x0042}
0x17d6…17e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0070}
0x17e0…17f8               Head {h00=0x0014, h01=0x0050, text=»CPU857 EQU 1  =4«, t00=0x000f, t01=0x007a}
0x17f8…1802               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0092}
0x1802…1814               Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x000f, t01=0x009c}
0x1814…182c               Head {h00=0x0014, h01=0x0050, text=»TC8000 EQU X:C  «, t00=0x000f, t01=0x00ae}
0x182c…1844               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x000f, t01=0x00c6}
0x1844…184e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00de}
0x184e…1858               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e8}
0x1858…1874               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x000f, t01=0x00f2}
0x1874…1890               Head {h00=0x0018, h01=0x0050, text=»* FORM STATEMENTS * «, t00=0x000f, t01=0x010e}
0x1890…18ac               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x000f, t01=0x012a}
0x18ac…18b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0146}
0x18b6…18c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0150}
0x18c0…18d6               Head {h00=0x0012, h01=0x0050, text=»BYTES FORM 8,8«, t00=0x000f, t01=0x015a}
0x18d6…18e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0170}
0x18e0…18f8               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x000f, t01=0x017a}
0x18f8…1902 (16, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0004}
0x1902…190c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x000e}
0x190c…192a               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0010, t01=0x0018}
0x192a…1948               Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS * «, t00=0x0010, t01=0x0036}
0x1948…1966               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0010, t01=0x0054}
0x1966…1970               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0072}
0x1970…19a6               Head {h00=0x0032, h01=0x0050, text=»* DEVICE WORK TABLE DISPLACEMENTS: FIXED PART «, t00=0x0010, t01=0x007c}
0x19a6…19b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b2}
0x19b0…19da               Head {h00=0x0026, h01=0x0050, text=»DWTCHP EQU /00 CHANNEL PARAMETERS «, t00=0x0010, t01=0x00bc}
0x19da…19f6               Head {h00=0x0018, h01=0x0050, text=»DWTST EQU /02 STATUS«, t00=0x0010, t01=0x00e6}
0x19f6…1a18               Head {h00=0x001e, h01=0x0050, text=»DWTBC EQU /03 BYTE COUNTER«, t00=0x0010, t01=0x0102}
0x1a18…1a3a               Head {h00=0x001e, h01=0x0050, text=»DWTECB EQU /04 ECB ADDRESS«, t00=0x0010, t01=0x0124}
0x1a3a…1a5e               Head {h00=0x0020, h01=0x0050, text=»DWTOPT EQU /06 ORDER OPTION «, t00=0x0010, t01=0x0146}
0x1a5e…1a84               Head {h00=0x0022, h01=0x0050, text=»DWTOR EQU /06 INDEX AND ORDER «, t00=0x0010, t01=0x016a}
0x1a84…1ab0               Head {h00=0x0028, h01=0x0050, text=»DWTOCH EQU /06 LAST OUTPUT CHARACTER«, t00=0x0010, t01=0x0190}
0x1ab0…1adc               Head {h00=0x0028, h01=0x0050, text=»DWTADR EQU /08 DRIVER ADDRESS BLOCK «, t00=0x0011, t01=0x002c}
0x1adc…1b00               Head {h00=0x0020, h01=0x0050, text=»DWTTAB EQU /0A TTAB ADDRESS «, t00=0x0011, t01=0x0058}
0x1b00…1b2e               Head {h00=0x002a, h01=0x0050, text=»DWTWAT EQU /0C WAIT/ACTIVATE INDICATOR«, t00=0x0011, t01=0x007c}
0x1b2e…1b52               Head {h00=0x0020, h01=0x0050, text=»DWTTQ EQU /0E TERMINAL QUEUE«, t00=0x0011, t01=0x00aa}
0x1b52…1b7a               Head {h00=0x0024, h01=0x0050, text=»DWTUEC EQU /10 USER ECB ADDRESS «, t00=0x0011, t01=0x00ce}
0x1b7a…1ba0               Head {h00=0x0022, h01=0x0050, text=»DWTMEC EQU /12 MMU ECB ADDRESS«, t00=0x0011, t01=0x00f6}
0x1ba0…1baa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x011c}
0x1baa…1bc0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0011, t01=0x0126}
0x1bc0…1bf8               Head {h00=0x0034, h01=0x0050, text=»DWTDRD EQU DWTTQ+2 START OF DRIVER DEFINED PART «, t00=0x0011, t01=0x013c}
0x1bf8…1c04               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0174}
0x1c04…1c0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0180}
0x1c0e…1c24               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0011, t01=0x018a}
0x1c24…1c5c               Head {h00=0x0034, h01=0x0050, text=»DWTDRD EQU DWTMEC+2 START OF DRIVER DEFINED PART«, t00=0x0012, t01=0x0010}
0x1c5c…1c68               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0048}
0x1c68…1c72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0054}
0x1c72…1c8a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0012, t01=0x005e}
0x1c8a…1c94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0076}
0x1c94…1cc4               Head {h00=0x002c, h01=0x0050, text=»* DWT DISPLACEMENTS: DRIVER DEFINED PART«, t00=0x0012, t01=0x0080}
0x1cc4…1cce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b0}
0x1cce…1cfe               Head {h00=0x002c, h01=0x0050, text=»DWTOTQ EQU DWTDRD+/00 OUTPUT QUEUE LINK «, t00=0x0012, t01=0x00ba}
0x1cfe…1d28               Head {h00=0x0026, h01=0x0050, text=»DWTA2 EQU DWTDRD+/02 SAVE AREA A2 «, t00=0x0012, t01=0x00ea}
0x1d28…1d52               Head {h00=0x0026, h01=0x0050, text=»DWTA3 EQU DWTDRD+/02 SAVE AREA A3 «, t00=0x0012, t01=0x0114}
0x1d52…1d7c               Head {h00=0x0026, h01=0x0050, text=»DWTA4 EQU DWTDRD+/04 SAVE AREA A4 «, t00=0x0012, t01=0x013e}
0x1d7c…1da6               Head {h00=0x0026, h01=0x0050, text=»DWTA5 EQU DWTDRD+/06 SAVE AREA A5 «, t00=0x0012, t01=0x0168}
0x1da6…1dd8 (19, 0, 400)  Head {h00=0x002e, h01=0x0050, text=»DWTSB1 EQU DWTDRD+/0A STACK BASE 1 IN DWT «, t00=0x0013, t01=0x0004}
0x1dd8…1e0a               Head {h00=0x002e, h01=0x0050, text=»DWTSB2 EQU DWTDRD+/0E STACK BASE 2 IN DWT «, t00=0x0013, t01=0x0036}
0x1e0a…1e34               Head {h00=0x0026, h01=0x0050, text=»DWTTP EQU DWTDRD+/10 TIMER POINTER«, t00=0x0013, t01=0x0068}
0x1e34…1e6c               Head {h00=0x0034, h01=0x0050, text=»DWTORD EQU DWTDRD+/10 SAVE AREA INDEX AND ORDER «, t00=0x0013, t01=0x0092}
0x1e6c…1e96               Head {h00=0x0026, h01=0x0050, text=»DWTA7 EQU DWTDRD+/10 SAVE AREA A7 «, t00=0x0013, t01=0x00ca}
0x1e96…1ec0               Head {h00=0x0026, h01=0x0050, text=»DWTA8 EQU DWTDRD+/12 SAVE AREA A8 «, t00=0x0013, t01=0x00f4}
0x1ec0…1ef6               Head {h00=0x0032, h01=0x0050, text=»DWTNVL EQU DWTDRD+/12 NEW VOLUME LOADED FLAGS «, t00=0x0013, t01=0x011e}
0x1ef6…1f28               Head {h00=0x002e, h01=0x0050, text=»DWTCP2 EQU DWTDRD+/14 CHANNEL PARAMETERS 2«, t00=0x0013, t01=0x0154}
0x1f28…1f5e               Head {h00=0x0032, h01=0x0050, text=»DWTLD1 EQU DWTDRD+/16 LINE DRIVER DEPENDENT 1 «, t00=0x0013, t01=0x0186}
0x1f5e…1f94               Head {h00=0x0032, h01=0x0050, text=»DWTLD2 EQU DWTDRD+/18 LINE DRIVER DEPENDENT 2 «, t00=0x0014, t01=0x002c}
0x1f94…1fc8               Head {h00=0x0030, h01=0x0050, text=»DWTDEV EQU DWTDRD+/1A TERMINAL DEVICE STATUS«, t00=0x0014, t01=0x0062}
0x1fc8…1fd0               Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0096}
0x1fd0…2006               Head {h00=0x0032, h01=0x0050, text=»DWTTBU EQU DWTDRD+/1A PLC TEST BUFFER ADDRESS «, t00=0x0014, t01=0x009e}
0x2006…2034               Head {h00=0x002a, h01=0x0050, text=»DWTVOL EQU DWTDRD+/1A DISC VOLUME NAME«, t00=0x0014, t01=0x00d4}
0x2034…2062               Head {h00=0x002a, h01=0x0050, text=»DWTECH EQU DWTDRD+/1C ECHO DEVICE DWT «, t00=0x0014, t01=0x0102}
0x2062…2096               Head {h00=0x0030, h01=0x0050, text=»DWTTLN EQU DWTDRD+/1C PLC TEST BUFFER LENGTH«, t00=0x0014, t01=0x0130}
0x2096…20c6               Head {h00=0x002c, h01=0x0050, text=»DWTTCW EQU DWTDRD+/1E PLC TEST PARAMETER«, t00=0x0014, t01=0x0164}
0x20c6…20f2 (21, 0, 400)  Head {h00=0x0028, h01=0x0050, text=»DWTSQ EQU DWTDRD+/2A START OF QUEUE «, t00=0x0015, t01=0x0004}
0x20f2…20fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0030}
0x20fc…2114               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0015, t01=0x003a}
0x2114…211e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0052}
0x211e…2128               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005c}
0x2128…2146               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0015, t01=0x0066}
0x2146…2164               Head {h00=0x001a, h01=0x0050, text=»* DAB DISPLACEMENTS * «, t00=0x0015, t01=0x0084}
0x2164…2182               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0015, t01=0x00a2}
0x2182…218c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00c0}
0x218c…21b8               Head {h00=0x0028, h01=0x0050, text=»* DRIVER ADDRESS BLOCK DISPLACEMENTS«, t00=0x0015, t01=0x00ca}
0x21b8…21c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f6}
0x21c2…21ec               Head {h00=0x0026, h01=0x0050, text=»KEYLEN EQU -6 DWT KEYTABLE LENGTH «, t00=0x0015, t01=0x0100}
0x21ec…2214               Head {h00=0x0024, h01=0x0050, text=»BUFLEN EQU -4 DWT BUFFER LENGTH «, t00=0x0015, t01=0x012a}
0x2214…2236               Head {h00=0x001e, h01=0x0050, text=»DEVIND EQU -2 DEVICE INDEX«, t00=0x0015, t01=0x0152}
0x2236…225e               Head {h00=0x0024, h01=0x0050, text=»ACTADR EQU 0 ACTIVATION ADDRESS «, t00=0x0015, t01=0x0174}
0x225e…2280               Head {h00=0x001e, h01=0x0050, text=»ABTADR EQU 2 ABORT ADDRESS«, t00=0x0016, t01=0x000c}
0x2280…22a6               Head {h00=0x0022, h01=0x0050, text=»INTADR EQU 4 INTERRUPT ADDRESS«, t00=0x0016, t01=0x002e}
0x22a6…22dc               Head {h00=0x0032, h01=0x0050, text=»POLADR EQU 4 BUFFER POOL ADDRESS (DC DRIVERS) «, t00=0x0016, t01=0x0054}
0x22dc…2312               Head {h00=0x0032, h01=0x0050, text=»HDRLEN EQU 6 BUFFER HEADER LENGTH (DC DRIVERS)«, t00=0x0016, t01=0x008a}
0x2312…2338               Head {h00=0x0022, h01=0x0050, text=»RECADR EQU 6 RECOVERY ADDRESS «, t00=0x0016, t01=0x00c0}
0x2338…235a               Head {h00=0x001e, h01=0x0050, text=»ECHADR EQU 8 ECHO ADDRESS «, t00=0x0016, t01=0x00e6}
0x235a…2364               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0108}
0x2364…236e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0112}
0x236e…238e               Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0016, t01=0x011c}
0x238e…23ae               Head {h00=0x001c, h01=0x0050, text=»* DEVICE INDEX VALUES * «, t00=0x0016, t01=0x013c}
0x23ae…23ce               Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0016, t01=0x015c}
0x23ce…23d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x017c}
0x23d8…23e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0186}
0x23e2…2430               Head {h00=0x004a, h01=0x0050, text=»*   THE VALUES ARE USED IN MMU SYSTEMS FOR SELECTING A SPECIAL ROUTINE«, t00=0x0016, t01=0x0190}
0x2430…247a               Head {h00=0x0046, h01=0x0050, text=»*   FROM ADDRESS TABLES TIOTAB AND TENTAB AT READ/WRITE REQUESTS. «, t00=0x0017, t01=0x004e}
0x247a…2484               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0098}
0x2484…24ac               Head {h00=0x0024, h01=0x0050, text=»DC:DIX EQU -2 DATA COMMUNICATION«, t00=0x0017, t01=0x00a2}
0x24ac…24d0               Head {h00=0x0020, h01=0x0050, text=»DM:DIX EQU 0 DATA MANAGEMENT«, t00=0x0017, t01=0x00ca}
0x24d0…24f8               Head {h00=0x0024, h01=0x0050, text=»PC:DIX EQU 2 PROGRAMMED CHANNEL «, t00=0x0017, t01=0x00ee}
0x24f8…251e               Head {h00=0x0022, h01=0x0050, text=»MX:DIX EQU 4 MULTIPLEX CHANNEL«, t00=0x0017, t01=0x0116}
0x251e…2540               Head {h00=0x001e, h01=0x0050, text=»KB:DIX EQU 6 KEYBOARD/CTW «, t00=0x0017, t01=0x013c}
0x2540…256c               Head {h00=0x0028, h01=0x0050, text=»IT:DIX EQU 8 INTERTASK COMMUNICATION«, t00=0x0017, t01=0x015e}
0x256c…2586               Head {h00=0x0016, h01=0x0050, text=»DK:DIX EQU 10 DISC«, t00=0x0017, t01=0x018a}
0x2586…2590               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0014}
0x2590…25a8               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0018, t01=0x001e}
0x25a8…25b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0036}
0x25b2…25bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0040}
0x25bc…25da               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0018, t01=0x004a}
0x25da…25f8               Head {h00=0x001a, h01=0x0050, text=»* ECB DISPLACEMENTS * «, t00=0x0018, t01=0x0068}
0x25f8…2616               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0018, t01=0x0086}
0x2616…2620               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00a4}
0x2620…264c               Head {h00=0x0028, h01=0x0050, text=»* EVENT CONTROL BLOCK DISPLACEMENTS «, t00=0x0018, t01=0x00ae}
0x264c…2656               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00da}
0x2656…2674               Head {h00=0x001a, h01=0x0050, text=»ECBFC EQU 1 FILE CODE «, t00=0x0018, t01=0x00e4}
0x2674…2694               Head {h00=0x001c, h01=0x0050, text=»ECBFN EQU 1 FILE NUMBER «, t00=0x0018, t01=0x0102}
0x2694…26b6               Head {h00=0x001e, h01=0x0050, text=»ECBBA EQU 2 BUFFER ADDRESS«, t00=0x0018, t01=0x0122}
0x26b6…26da               Head {h00=0x0020, h01=0x0050, text=»ECBRL EQU 4 REQUESTED LENGTH«, t00=0x0018, t01=0x0144}
0x26da…26fe               Head {h00=0x0020, h01=0x0050, text=»ECBEL EQU 6 EFFECTIVE LENGTH«, t00=0x0018, t01=0x0168}
0x26fe…271e               Head {h00=0x001c, h01=0x0050, text=»ECBRC EQU 8 RETURN CODE «, t00=0x0018, t01=0x018c}
0x271e…2740               Head {h00=0x001e, h01=0x0050, text=»ECBCW EQU 10 CONTROL WORD «, t00=0x0019, t01=0x001c}
0x2740…2764               Head {h00=0x0020, h01=0x0050, text=»ECBCW1 EQU 10 CONTROL WORD 1«, t00=0x0019, t01=0x003e}
0x2764…2788               Head {h00=0x0020, h01=0x0050, text=»ECBCW2 EQU 12 CONTROL WORD 2«, t00=0x0019, t01=0x0062}
0x2788…2792               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0086}
0x2792…27aa               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0019, t01=0x0090}
0x27aa…27b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00a8}
0x27b4…27be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00b2}
0x27be…27d4               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0019, t01=0x00bc}
0x27d4…27de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00d2}
0x27de…27e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00dc}
0x27e8…27fa               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0019, t01=0x00e6}
0x27fa…280c               Head {h00=0x000e, h01=0x0050, text=»* TIOTAB *«, t00=0x0019, t01=0x00f8}
0x280c…281e               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0019, t01=0x010a}
0x281e…2828               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x011c}
0x2828…2868               Head {h00=0x003c, h01=0x0050, text=»* TIOTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TIO«, t00=0x0019, t01=0x0126}
0x2868…2872               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0166}
0x2872…28a8               Head {h00=0x0032, h01=0x0050, text=»TIOTAB EQU * DEVICE TYPE/ROUTINE ADDRESS TABLE«, t00=0x0019, t01=0x0170}
0x28a8…28da               Head {h00=0x002e, h01=0x0050, text=» DATA TIO:DM DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x001a, t01=0x0016}
0x28da…2908               Head {h00=0x002a, h01=0x0050, text=» DATA TIOPCI PROGRAMMED CHANNEL, INPUT«, t00=0x001a, t01=0x0048}
0x2908…2928               Head {h00=0x001c, h01=0x0050, text=» DATA TIOMXI MUX, INPUT «, t00=0x001a, t01=0x0076}
0x2928…2950               Head {h00=0x0024, h01=0x0050, text=» DATA TIOKBI KEYBOARD/CTW, INPUT«, t00=0x001a, t01=0x0096}
0x2950…2984               Head {h00=0x0030, h01=0x0050, text=» DATA TIOITI INTERTASK COMMUNICATION, INPUT «, t00=0x001a, t01=0x00be}
0x2984…298e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00f2}
0x298e…29aa               Head {h00=0x0018, h01=0x0050, text=»TINDEX EQU *-TIOTAB «, t00=0x001a, t01=0x00fc}
0x29aa…29ca               Head {h00=0x001c, h01=0x0050, text=» DATA TIODKI DISC, INPUT«, t00=0x001a, t01=0x0118}
0x29ca…29fa               Head {h00=0x002c, h01=0x0050, text=» DATA TIOPCO PROGRAMMED CHANNEL, OUTPUT «, t00=0x001a, t01=0x0138}
0x29fa…2a1a               Head {h00=0x001c, h01=0x0050, text=» DATA TIOMXO MUX, OUTPUT«, t00=0x001a, t01=0x0168}
0x2a1a…2a44               Head {h00=0x0026, h01=0x0050, text=» DATA TIOKBO KEYBOARD/CTW, OUTPUT «, t00=0x001a, t01=0x0188}
0x2a44…2a78               Head {h00=0x0030, h01=0x0050, text=» DATA TIOITO INTERTASK COMMUNICATION, OUTPUT«, t00=0x001b, t01=0x0022}
0x2a78…2a9a               Head {h00=0x001e, h01=0x0050, text=» DATA TIODKO DISC, OUTPUT «, t00=0x001b, t01=0x0056}
0x2a9a…2aa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0078}
0x2aa4…2abc               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001b, t01=0x0082}
0x2abc…2ac6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x009a}
0x2ac6…2ad0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00a4}
0x2ad0…2ae2               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001b, t01=0x00ae}
0x2ae2…2af4               Head {h00=0x000e, h01=0x0050, text=»* TENTAB *«, t00=0x001b, t01=0x00c0}
0x2af4…2b06               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001b, t01=0x00d2}
0x2b06…2b10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00e4}
0x2b10…2b54               Head {h00=0x0040, h01=0x0050, text=»* TENTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TENDIO «, t00=0x001b, t01=0x00ee}
0x2b54…2b5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0132}
0x2b5e…2b94               Head {h00=0x0032, h01=0x0050, text=»TENTAB EQU * DEVICE TYPE/ROUTINE ADDRESS TABLE«, t00=0x001b, t01=0x013c}
0x2b94…2bc6               Head {h00=0x002e, h01=0x0050, text=» DATA TEN:DM DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x001b, t01=0x0172}
0x2bc6…2bf4               Head {h00=0x002a, h01=0x0050, text=» DATA TENPCI PROGRAMMED CHANNEL, INPUT«, t00=0x001c, t01=0x0014}
0x2bf4…2c14               Head {h00=0x001c, h01=0x0050, text=» DATA TENMXI MUX, INPUT «, t00=0x001c, t01=0x0042}
0x2c14…2c3c               Head {h00=0x0024, h01=0x0050, text=» DATA TENKBI KEYBOARD/CTW, INPUT«, t00=0x001c, t01=0x0062}
0x2c3c…2c70               Head {h00=0x0030, h01=0x0050, text=» DATA TENITI INTERTASK COMMUNICATION, INPUT «, t00=0x001c, t01=0x008a}
0x2c70…2c90               Head {h00=0x001c, h01=0x0050, text=» DATA TENDKI DISC, INPUT«, t00=0x001c, t01=0x00be}
0x2c90…2cc0               Head {h00=0x002c, h01=0x0050, text=» DATA TENPCO PROGRAMMED CHANNEL, OUTPUT «, t00=0x001c, t01=0x00de}
0x2cc0…2ce0               Head {h00=0x001c, h01=0x0050, text=» DATA TENMXO MUX, OUTPUT«, t00=0x001c, t01=0x010e}
0x2ce0…2d0a               Head {h00=0x0026, h01=0x0050, text=» DATA TENKBO KEYBOARD/CTW, OUTPUT «, t00=0x001c, t01=0x012e}
0x2d0a…2d3e               Head {h00=0x0030, h01=0x0050, text=» DATA TENITO INTERTASK COMMUNICATION, OUTPUT«, t00=0x001c, t01=0x0158}
0x2d3e…2d60               Head {h00=0x001e, h01=0x0050, text=» DATA TENDKO DISC, OUTPUT «, t00=0x001c, t01=0x018c}
0x2d60…2d6c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x001e}
0x2d6c…2d76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x002a}
0x2d76…2d8e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001d, t01=0x0034}
0x2d8e…2d98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x004c}
0x2d98…2da2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0056}
0x2da2…2db4               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001d, t01=0x0060}
0x2db4…2dc6               Head {h00=0x000e, h01=0x0050, text=»* MONMMU *«, t00=0x001d, t01=0x0072}
0x2dc6…2dd8               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001d, t01=0x0084}
0x2dd8…2de2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0096}
0x2de2…2e06               Head {h00=0x0020, h01=0x0050, text=»* MONITOR (SYSTEM) MMU TABLE«, t00=0x001d, t01=0x00a0}
0x2e06…2e10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c4}
0x2e10…2e24               Head {h00=0x0010, h01=0x0050, text=»MONMMU EQU *«, t00=0x001d, t01=0x00ce}
0x2e24…2e3a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001d, t01=0x00e2}
0x2e3a…2e60               Head {h00=0x0022, h01=0x0050, text=» DATA /0000,/0400,/0800,/0C00 «, t00=0x001d, t01=0x00f8}
0x2e60…2e86               Head {h00=0x0022, h01=0x0050, text=» DATA /1000,/1400,/1800,/1C00 «, t00=0x001d, t01=0x011e}
0x2e86…2eac               Head {h00=0x0022, h01=0x0050, text=» DATA /2000,/2400,/2800,/2C00 «, t00=0x001d, t01=0x0144}
0x2eac…2ed2               Head {h00=0x0022, h01=0x0050, text=» DATA /3000,/3400,/3800,/3C00 «, t00=0x001d, t01=0x016a}
0x2ed2…2ede               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0190}
0x2ede…2ee8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x000c}
0x2ee8…2f00               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001e, t01=0x0016}
0x2f00…2f0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x002e}
0x2f0a…2f14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0038}
0x2f14…2f2a               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x001e, t01=0x0042}
0x2f2a…2f34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0058}
0x2f34…2f6a               Head {h00=0x0032, h01=0x0050, text=»* SUBROUTINES BELOW ARE USED BY ATTACH/DETACH «, t00=0x001e, t01=0x0062}
0x2f6a…2f74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0098}
0x2f74…2f8a               Head {h00=0x0012, h01=0x0050, text=»* T I M O U T «, t00=0x001e, t01=0x00a2}
0x2f8a…2f94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00b8}
0x2f94…2fb6               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A1 = DWT ADDRESS«, t00=0x001e, t01=0x00c2}
0x2fb6…2fe8               Head {h00=0x002e, h01=0x0050, text=»*         A2 = ADDRESS TO 2ND TIMER BLOCK «, t00=0x001e, t01=0x00e4}
0x2fe8…2ff2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0116}
0x2ff2…3016               Head {h00=0x0020, h01=0x0050, text=»* OUTPUT: A4 = BLOCK ADDRESS«, t00=0x001e, t01=0x0120}
0x3016…303a               Head {h00=0x0020, h01=0x0050, text=»*         A5 = TTAB ADDRESS «, t00=0x001e, t01=0x0144}
0x303a…305c               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x001e, t01=0x0168}
0x305c…3082               Head {h00=0x0022, h01=0x0050, text=»*         A1-A3 ARE DESTROYED «, t00=0x001e, t01=0x018a}
0x3082…308c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0020}
0x308c…30a4               Head {h00=0x0014, h01=0x0050, text=»TIMOUT LDR A6,A1«, t00=0x001f, t01=0x002a}
0x30a4…30ce               Head {h00=0x0026, h01=0x0050, text=» LDR* A2,A2 TIMER POINTER ADDRESS «, t00=0x001f, t01=0x0042}
0x30ce…30ee               Head {h00=0x001c, h01=0x0050, text=» LD A5,2,A2 TTAB ADDRESS«, t00=0x001f, t01=0x006c}
0x30ee…3104               Head {h00=0x0012, h01=0x0050, text=» CF A15,FNDBLK«, t00=0x001f, t01=0x008c}
0x3104…3118               Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A4 «, t00=0x001f, t01=0x00a2}
0x3118…313e               Head {h00=0x0022, h01=0x0050, text=» STR A1,A2 REMOVE FROM ATT:CH «, t00=0x001f, t01=0x00b6}
0x313e…3154               Head {h00=0x0012, h01=0x0050, text=» CF A15,FREBLK«, t00=0x001f, t01=0x00dc}
0x3154…315e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00f2}
0x315e…3176               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001f, t01=0x00fc}
0x3176…3180               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0114}
0x3180…31aa               Head {h00=0x0026, h01=0x0050, text=»*    REMOVE TTAB FROM DEVICE QUEUE«, t00=0x001f, t01=0x011e}
0x31aa…31b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0148}
0x31b4…31c6               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x001f, t01=0x0152}
0x31c6…31f0               Head {h00=0x0026, h01=0x0050, text=» ADK A1,DWTTQ QUEUE ANCHOR ADDRESS«, t00=0x001f, t01=0x0164}
0x31f0…31fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x018e}
0x31fa…3218               Head {h00=0x001a, h01=0x0050, text=»TIM:10 LDR A2,A1 SAVE «, t00=0x0020, t01=0x0008}
0x3218…323a               Head {h00=0x001e, h01=0x0050, text=» LDR* A1,A1 NEXT IN QUEUE «, t00=0x0020, t01=0x0026}
0x323a…326a               Head {h00=0x002c, h01=0x0050, text=» RF(Z) TIM:20 ERROR IN QUEUE HANDLING =1«, t00=0x0020, t01=0x0048}
0x326a…327c               Head {h00=0x000e, h01=0x0050, text=» CWR A1,A5«, t00=0x0020, t01=0x0078}
0x327c…329c               Head {h00=0x001c, h01=0x0050, text=» RB(NE) TIM:10 NOT FOUND«, t00=0x0020, t01=0x008a}
0x329c…32a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00aa}
0x32a6…32be               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0020, t01=0x00b4}
0x32be…32c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00cc}
0x32c8…32f2               Head {h00=0x0026, h01=0x0050, text=»*   TTAB FOUND - REMOVE FROM QUEUE«, t00=0x0020, t01=0x00d6}
0x32f2…32fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0100}
0x32fc…3310               Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A1 «, t00=0x0020, t01=0x010a}
0x3310…3322               Head {h00=0x000e, h01=0x0050, text=» STR A1,A2«, t00=0x0020, t01=0x011e}
0x3322…332c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0130}
0x332c…333e               Head {h00=0x000e, h01=0x0050, text=» LDK A3,4 «, t00=0x0020, t01=0x013a}
0x333e…3370               Head {h00=0x002e, h01=0x0050, text=» ADS A3,TTB:SA,A5 UPDATE DISPATCH ADDRESS «, t00=0x0020, t01=0x014c}
0x3370…33aa               Head {h00=0x0036, h01=0x0050, text=» LD A8,TTB:SA+16,A5 ECB ADDRESS FROM A8 SAVE AREA «, t00=0x0020, t01=0x017e}
0x33aa…33ce               Head {h00=0x0020, h01=0x0050, text=» LDK A3,/40 SET TIMEOUT BIT «, t00=0x0021, t01=0x0028}
0x33ce…33d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x004c}
0x33d8…33ee               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0021, t01=0x0056}
0x33ee…341c               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBRC,A8 INDICATE ERROR IN ECB «, t00=0x0021, t01=0x006c}
0x341c…3428               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x009a}
0x3428…3432               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00a6}
0x3432…3448               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0021, t01=0x00b0}
0x3448…345e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0021, t01=0x00c6}
0x345e…3490               Head {h00=0x002e, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS FROM TTAB«, t00=0x0021, t01=0x00dc}
0x3490…34be               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBRC,A8 INDICATE ERROR IN ECB «, t00=0x0021, t01=0x010e}
0x34be…34f0               Head {h00=0x002e, h01=0x0050, text=» TL MONMMU LOAD MONITOR (SYSTEM) MMU TABLE«, t00=0x0021, t01=0x013c}
0x34f0…34fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x016e}
0x34fc…3506               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x017a}
0x3506…351c               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0021, t01=0x0184}
0x351c…3546               Head {h00=0x0026, h01=0x0050, text=» RF TIORTN QUEUE TASK AND DISPATCH«, t00=0x0022, t01=0x000a}
0x3546…355e               Head {h00=0x0014, h01=0x0050, text=»TIM:20 EQU *  =1«, t00=0x0022, t01=0x0034}
0x355e…3582               Head {h00=0x0020, h01=0x0050, text=» LDK A1,1 INDICATE ERROR =1 «, t00=0x0022, t01=0x004c}
0x3582…359a               Head {h00=0x0014, h01=0x0050, text=» CF A15,HALT  =1«, t00=0x0022, t01=0x0070}
0x359a…35a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0088}
0x35a4…35bc               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0022, t01=0x0092}
0x35bc…35c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00aa}
0x35c6…35dc               Head {h00=0x0012, h01=0x0050, text=»* F N D B L K «, t00=0x0022, t01=0x00b4}
0x35dc…35e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ca}
0x35e6…3612               Head {h00=0x0028, h01=0x0050, text=»* SUBROUTINE TO FIND BLOCK IN ATT:CH«, t00=0x0022, t01=0x00d4}
0x3612…361c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0100}
0x361c…3640               Head {h00=0x0020, h01=0x0050, text=»* INPUT:  A5 = TTAB ADDRESS «, t00=0x0022, t01=0x010a}
0x3640…364a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x012e}
0x364a…3684               Head {h00=0x0036, h01=0x0050, text=»* OUTPUT: A2 = ADDRESS TO PRECEDING BLOCK IN CHAIN«, t00=0x0022, t01=0x0138}
0x3684…36ba               Head {h00=0x0032, h01=0x0050, text=»*         A4 = BLOCK ADDRESS IF FOUND, ELSE 0 «, t00=0x0022, t01=0x0172}
0x36ba…36c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0018}
0x36c4…36f0               Head {h00=0x0028, h01=0x0050, text=»FNDBLK LDKL A4,ATT:CH ANCHOR ADDRESS«, t00=0x0023, t01=0x0022}
0x36f0…36fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x004e}
0x36fa…371a               Head {h00=0x001c, h01=0x0050, text=»FND:10 LDR A2,A4 SAVE A4«, t00=0x0023, t01=0x0058}
0x371a…372e               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A4 «, t00=0x0023, t01=0x0078}
0x372e…3752               Head {h00=0x0020, h01=0x0050, text=» RF(Z) FND:20 END OF ATT:CH «, t00=0x0023, t01=0x008c}
0x3752…3766               Head {h00=0x0010, h01=0x0050, text=» CW A5,4,A4 «, t00=0x0023, t01=0x00b0}
0x3766…3786               Head {h00=0x001c, h01=0x0050, text=» RB(NE) FND:10 NOT FOUND«, t00=0x0023, t01=0x00c4}
0x3786…3790               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00e4}
0x3790…37a4               Head {h00=0x0010, h01=0x0050, text=»FND:20 EQU *«, t00=0x0023, t01=0x00ee}
0x37a4…37ba               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0023, t01=0x0102}
0x37ba…37d4               Head {h00=0x0016, h01=0x0050, text=» ABL IHRTN RETURN «, t00=0x0023, t01=0x0118}
0x37d4…37e0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0132}
0x37e0…37ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x013e}
0x37ea…3800               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0023, t01=0x0148}
0x3800…3816               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0023, t01=0x015e}
0x3816…382e               Head {h00=0x0014, h01=0x0050, text=» RTN A15 RETURN «, t00=0x0023, t01=0x0174}
0x382e…383a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x018c}
0x383a…3844               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0008}
0x3844…385a               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0024, t01=0x0012}
0x385a…3884               Head {h00=0x0026, h01=0x0050, text=»ATT:CH DATA 0 ATTACH CHAIN ANCHOR «, t00=0x0024, t01=0x0028}
0x3884…388e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0052}
0x388e…389c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x005c}
0x389c…38a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x006a}
0x38a6…38c0               Head {h00=0x0016, h01=0x0050, text=»*  F R A B L K  =1«, t00=0x0024, t01=0x0074}
0x38c0…38ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x008e}
0x38ca…38fe               Head {h00=0x0030, h01=0x0050, text=»* FREE BLOCK AND TIMER IN ATT:CH IF FOUND =1«, t00=0x0024, t01=0x0098}
0x38fe…3908               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00cc}
0x3908…392c               Head {h00=0x0020, h01=0x0050, text=»* INPUT: A5=TTAB ADDRESS  =1«, t00=0x0024, t01=0x00d6}
0x392c…3936               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00fa}
0x3936…395e               Head {h00=0x0024, h01=0x0050, text=»* OUTPUT:A2,A3,A4=DESTROYED  =1 «, t00=0x0024, t01=0x0104}
0x395e…3968               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x012c}
0x3968…3980               Head {h00=0x0014, h01=0x0050, text=»FRABLK EQU *  =1«, t00=0x0024, t01=0x0136}
0x3980…399e               Head {h00=0x001a, h01=0x0050, text=» STR A1,A15 SAVE A1 =1«, t00=0x0024, t01=0x014e}
0x399e…39cc               Head {h00=0x002a, h01=0x0050, text=» CF A15,FNDBLK FIND BLOCK IN ATT:CH =1«, t00=0x0024, t01=0x016c}
0x39cc…39e8               Head {h00=0x0018, h01=0x0050, text=» ADK A4,0 SET CR =1 «, t00=0x0025, t01=0x000a}
0x39e8…3a1a               Head {h00=0x002e, h01=0x0050, text=» RF(Z) FRAEND TASK NOT FOUND IN ATT:CH =1 «, t00=0x0025, t01=0x0026}
0x3a1a…3a3a               Head {h00=0x001c, h01=0x0050, text=» CM* 2,A4 FREE TIMER =1 «, t00=0x0025, t01=0x0058}
0x3a3a…3a64               Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A4 REMOVE FROM ATTACH =1 «, t00=0x0025, t01=0x0078}
0x3a64…3a7a               Head {h00=0x0012, h01=0x0050, text=» STR A3,A2  =1«, t00=0x0025, t01=0x00a2}
0x3a7a…3aa2               Head {h00=0x0024, h01=0x0050, text=» CF A15,FREBLK RELEASE BLOCK =1 «, t00=0x0025, t01=0x00b8}
0x3aa2…3aba               Head {h00=0x0014, h01=0x0050, text=»FRAEND EQU *  =1«, t00=0x0025, t01=0x00e0}
0x3aba…3adc               Head {h00=0x001e, h01=0x0050, text=» LDR* A1,A15 RESTORE A1 =1«, t00=0x0025, t01=0x00f8}
0x3adc…3af8               Head {h00=0x0018, h01=0x0050, text=» RB FND:20 RETURN =1«, t00=0x0025, t01=0x011a}
0x3af8…3b10               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0025, t01=0x0136}
0x3b10…3b1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x014e}
0x3b1a…3b24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0158}
0x3b24…3b36               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0025, t01=0x0162}
0x3b36…3b48               Head {h00=0x000e, h01=0x0050, text=»* ATTACH *«, t00=0x0025, t01=0x0174}
0x3b48…3b5a               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0025, t01=0x0186}
0x3b5a…3b64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0008}
0x3b64…3b6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0012}
0x3b6e…3b9c               Head {h00=0x002a, h01=0x0050, text=»*  THIS MODULE IS CALLED FROM TIO WITH«, t00=0x0026, t01=0x001c}
0x3b9c…3bc0               Head {h00=0x0020, h01=0x0050, text=»*  THE FOLLOWING PARAMETERS:«, t00=0x0026, t01=0x004a}
0x3bc0…3bca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x006e}
0x3bca…3bf4               Head {h00=0x0026, h01=0x0050, text=»*   A3  /8000 (REQUEST ERROR BIT) «, t00=0x0026, t01=0x0078}
0x3bf4…3c1e               Head {h00=0x0026, h01=0x0050, text=»*   A4  I/O AND ACTIVATE INDICATOR«, t00=0x0026, t01=0x00a2}
0x3c1e…3c3a               Head {h00=0x0018, h01=0x0050, text=»*   A5  TTAB ADDRESS«, t00=0x0026, t01=0x00cc}
0x3c3a…3c56               Head {h00=0x0018, h01=0x0050, text=»*   A6  DWT ADDRESS «, t00=0x0026, t01=0x00e8}
0x3c56…3c70               Head {h00=0x0016, h01=0x0050, text=»*   A7  ORDER CODE«, t00=0x0026, t01=0x0104}
0x3c70…3c8c               Head {h00=0x0018, h01=0x0050, text=»*   A8  ECB ADDRESS «, t00=0x0026, t01=0x011e}
0x3c8c…3cae               Head {h00=0x001e, h01=0x0050, text=»*  A10  /0800 (ATTACH BIT)«, t00=0x0026, t01=0x013a}
0x3cae…3cde               Head {h00=0x002c, h01=0x0050, text=»*  A12  ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0026, t01=0x015c}
0x3cde…3cf8               Head {h00=0x0016, h01=0x0050, text=»*  A13  DWT STATUS«, t00=0x0026, t01=0x018c}
0x3cf8…3d02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0016}
0x3d02…3d1c               Head {h00=0x0016, h01=0x0050, text=»ATTACH EQU * ENTRY«, t00=0x0027, t01=0x0020}
0x3d1c…3d34               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x0027, t01=0x003a}
0x3d34…3d62               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TIOERR I/O AND ACTIVATE ERROR «, t00=0x0027, t01=0x0052}
0x3d62…3d6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0080}
0x3d6c…3d82               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0027, t01=0x008a}
0x3d82…3da8               Head {h00=0x0022, h01=0x0050, text=» CM ECBRC,A8 RESET RETURN CODE«, t00=0x0027, t01=0x00a0}
0x3da8…3db4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x00c6}
0x3db4…3dbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00d2}
0x3dbe…3dd4               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0027, t01=0x00dc}
0x3dd4…3dea               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0027, t01=0x00f2}
0x3dea…3e14               Head {h00=0x0026, h01=0x0050, text=» ES A4,ECBRC,A8 RESET RETURN CODE «, t00=0x0027, t01=0x0108}
0x3e14…3e20               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0132}
0x3e20…3e2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x013e}
0x3e2a…3e42               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0027, t01=0x0148}
0x3e42…3e4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0160}
0x3e4c…3e56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x016a}
0x3e56…3e6c               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0027, t01=0x0174}
0x3e6c…3e80               Head {h00=0x0010, h01=0x0050, text=» TM A10,A13 «, t00=0x0027, t01=0x018a}
0x3e80…3eae               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) ATT:40 DEVICE ALREADY ATTACHED«, t00=0x0028, t01=0x000e}
0x3eae…3ec2               Head {h00=0x0010, h01=0x0050, text=» LDR A13,A13«, t00=0x0028, t01=0x003c}
0x3ec2…3ee4               Head {h00=0x001e, h01=0x0050, text=» RF(NN) ATT:50 DEVICE BUSY«, t00=0x0028, t01=0x0050}
0x3ee4…3eee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0072}
0x3eee…3f12               Head {h00=0x0020, h01=0x0050, text=»*    ATTACH REQUESTING TASK «, t00=0x0028, t01=0x007c}
0x3f12…3f1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00a0}
0x3f1c…3f3c               Head {h00=0x001c, h01=0x0050, text=» ORS A10,DWTST,A6 ATTACH«, t00=0x0028, t01=0x00aa}
0x3f3c…3f6c               Head {h00=0x002c, h01=0x0050, text=» ST A5,DWTTAB,A6 PUT TTAB ADDRESS IN DWT«, t00=0x0028, t01=0x00ca}
0x3f6c…3f82               Head {h00=0x0012, h01=0x0050, text=» RF ATTRTN  =1«, t00=0x0028, t01=0x00fa}
0x3f82…3f8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0110}
0x3f8c…3faa               Head {h00=0x001a, h01=0x0050, text=»ATT:40 CW A5,DWTTAB,A6«, t00=0x0028, t01=0x011a}
0x3faa…3fdc               Head {h00=0x002e, h01=0x0050, text=» RF(E) TIOERR ATTACHED TO REQUESTING TASK «, t00=0x0028, t01=0x0138}
0x3fdc…3fe6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x016a}
0x3fe6…3ffe               Head {h00=0x0014, h01=0x0050, text=»ATT:50 EQU *  =1«, t00=0x0028, t01=0x0174}
0x3ffe…4008               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x018c}
0x4008…4020               Head {h00=0x0014, h01=0x0050, text=»*     SET TIMER «, t00=0x0029, t01=0x0008}
0x4020…402a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0020}
0x402a…4040               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0029, t01=0x002a}
0x4040…405c               Head {h00=0x0018, h01=0x0050, text=» LD A1,ECBCW,A8 TIME«, t00=0x0029, t01=0x0040}
0x405c…4068               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x005c}
0x4068…4072               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0068}
0x4072…408a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0029, t01=0x0072}
0x408a…4094               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x008a}
0x4094…409e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0094}
0x409e…40b4               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0029, t01=0x009e}
0x40b4…40ca               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0029, t01=0x00b4}
0x40ca…40e6               Head {h00=0x0018, h01=0x0050, text=» EL A1,ECBCW,A8 TIME«, t00=0x0029, t01=0x00ca}
0x40e6…40f2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x00e6}
0x40f2…40fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00f2}
0x40fc…4112               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0029, t01=0x00fc}
0x4112…4136               Head {h00=0x0020, h01=0x0050, text=» RF(N) TIOERR NEGATIVE TIME «, t00=0x0029, t01=0x0112}
0x4136…4158               Head {h00=0x001e, h01=0x0050, text=» RF(Z) ATT:80 END REQUEST «, t00=0x0029, t01=0x0136}
0x4158…4162               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0158}
0x4162…417c               Head {h00=0x0016, h01=0x0050, text=»ATT:60 ST A1,ATTIM«, t00=0x0029, t01=0x0162}
0x417c…419c               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A5 TTAB ADDRESS «, t00=0x0029, t01=0x017c}
0x419c…41b8               Head {h00=0x0018, h01=0x0050, text=» LD A3,ATT:CH ANCHOR«, t00=0x002a, t01=0x000c}
0x41b8…41d4               Head {h00=0x0018, h01=0x0050, text=» CF A15,GETBLK BLOCK«, t00=0x002a, t01=0x0028}
0x41d4…41f8               Head {h00=0x0020, h01=0x0050, text=» ST A4,ATT:CH UPDATE ANCHOR «, t00=0x002a, t01=0x0044}
0x41f8…4220               Head {h00=0x0024, h01=0x0050, text=» ADK A4,2 TIMER POINTER ADDRESS «, t00=0x002a, t01=0x0068}
0x4220…423e               Head {h00=0x001a, h01=0x0050, text=» LDR A1,A6 DWT ADDRESS«, t00=0x002a, t01=0x0090}
0x423e…425e               Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIMER«, t00=0x002a, t01=0x00ae}
0x425e…4272               Head {h00=0x0010, h01=0x0050, text=» DATA TIMOUT«, t00=0x002a, t01=0x00ce}
0x4272…427c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00e2}
0x427c…4290               Head {h00=0x0010, h01=0x0050, text=»ATTIM DATA 0«, t00=0x002a, t01=0x00ec}
0x4290…429a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0100}
0x429a…42ca               Head {h00=0x002c, h01=0x0050, text=»ATT:70 LDK A4,0 NOT ACTIVATION PARAMETER«, t00=0x002a, t01=0x010a}
0x42ca…42dc               Head {h00=0x000e, h01=0x0050, text=» RF TIOQ20«, t00=0x002a, t01=0x013a}
0x42dc…42e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x014c}
0x42e6…4310               Head {h00=0x0026, h01=0x0050, text=»ATT:80 LDK A3,/40 SET TIME OUT BIT«, t00=0x002a, t01=0x0156}
0x4310…432a               Head {h00=0x0016, h01=0x0050, text=» RF TIOERR RETURN «, t00=0x002a, t01=0x0180}
0x432a…4334               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x000a}
0x4334…434c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x002b, t01=0x0014}
0x434c…4356               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x002c}
0x4356…4360               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0036}
0x4360…4372               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002b, t01=0x0040}
0x4372…4384               Head {h00=0x000e, h01=0x0050, text=»* DETACH *«, t00=0x002b, t01=0x0052}
0x4384…4396               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002b, t01=0x0064}
0x4396…43a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0076}
0x43a0…43ce               Head {h00=0x002a, h01=0x0050, text=»* THIS MODULE IS CALLED FROM TIO WITH «, t00=0x002b, t01=0x0080}
0x43ce…43f6               Head {h00=0x0024, h01=0x0050, text=»* THE SAME PARAMETERS AS ATTACH.«, t00=0x002b, t01=0x00ae}
0x43f6…4400               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00d6}
0x4400…4414               Head {h00=0x0010, h01=0x0050, text=»DETACH EQU *«, t00=0x002b, t01=0x00e0}
0x4414…442c               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x002b, t01=0x00f4}
0x442c…445a               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TIOERR I/O AND ACTIVATE ERROR «, t00=0x002b, t01=0x010c}
0x445a…446e               Head {h00=0x0010, h01=0x0050, text=» TM A10,A13 «, t00=0x002b, t01=0x013a}
0x446e…4490               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TIOERR NOT ATTACHED«, t00=0x002b, t01=0x014e}
0x4490…44a8               Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A6«, t00=0x002b, t01=0x0170}
0x44a8…44d6               Head {h00=0x002a, h01=0x0050, text=» RF(NE) TIOERR ATTACHED TO OTHER TASK «, t00=0x002b, t01=0x0188}
0x44d6…44f6               Head {h00=0x001c, h01=0x0050, text=» XRS A10,DWTST,A6 DETACH«, t00=0x002c, t01=0x0026}
0x44f6…451e               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A5 SAVE TTAB ADDRESS =1 «, t00=0x002c, t01=0x0046}
0x451e…4542               Head {h00=0x0020, h01=0x0050, text=» LD A5,DWTTQ,A6 QUEUE ANCHOR«, t00=0x002c, t01=0x006e}
0x4542…4564               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DET:10 QUEUE EMPTY «, t00=0x002c, t01=0x0092}
0x4564…459a               Head {h00=0x0032, h01=0x0050, text=» CF A15,FRABLK FREE ATTACH BLOCK AND TIMER =1 «, t00=0x002c, t01=0x00b4}
0x459a…45c4               Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A5 UPDATE QUEUE ANCHOR =1«, t00=0x002c, t01=0x00ea}
0x45c4…45e0               Head {h00=0x0018, h01=0x0050, text=» ST A3,DWTTQ,A6  =1 «, t00=0x002c, t01=0x0114}
0x45e0…4600               Head {h00=0x001c, h01=0x0050, text=» CF A15,QTJOB QUEUE TASK«, t00=0x002c, t01=0x0130}
0x4600…460a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0150}
0x460a…461e               Head {h00=0x0010, h01=0x0050, text=»DET:10 EQU *«, t00=0x002c, t01=0x015a}
0x461e…4648               Head {h00=0x0026, h01=0x0050, text=» LDR A5,A7 RESTORE TTAB ADDRESS =1«, t00=0x002c, t01=0x016e}
0x4648…4652               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0008}
0x4652…4688               Head {h00=0x0032, h01=0x0050, text=»ATTRTN EQU * COMMON ATTACH/DETACH NORMAL EXIT «, t00=0x002d, t01=0x0012}
0x4688…46ac               Head {h00=0x0020, h01=0x0050, text=»DETRTN LDK A3,0 RETURN CODE «, t00=0x002d, t01=0x0048}
0x46ac…46b8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x006c}
0x46b8…46c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0078}
0x46c2…46da               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x002d, t01=0x0082}
0x46da…46e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x009a}
0x46e4…46ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00a4}
0x46ee…4700               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002d, t01=0x00ae}
0x4700…4712               Head {h00=0x000e, h01=0x0050, text=»* TIOERR *«, t00=0x002d, t01=0x00c0}
0x4712…4724               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002d, t01=0x00d2}
0x4724…472e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00e4}
0x472e…4750               Head {h00=0x001e, h01=0x0050, text=»* ERROR: FILE CODE UNKNOWN«, t00=0x002d, t01=0x00ee}
0x4750…477c               Head {h00=0x0028, h01=0x0050, text=»* TIOERR IS ALSO USED AS COMMON EXIT«, t00=0x002d, t01=0x0110}
0x477c…47a8               Head {h00=0x0028, h01=0x0050, text=»* FOR MODULES 'ATTACH' AND 'DETACH'.«, t00=0x002d, t01=0x013c}
0x47a8…47b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0168}
0x47b2…47c6               Head {h00=0x0010, h01=0x0050, text=»TIOERR EQU *«, t00=0x002d, t01=0x0172}
0x47c6…47dc               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x002d, t01=0x0186}
0x47dc…480a               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBRC,A8 SET RETURN CODE IN ECB«, t00=0x002e, t01=0x000c}
0x480a…4836               Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8 RESET EFFECTIVE LENGTH «, t00=0x002e, t01=0x003a}
0x4836…4842               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0066}
0x4842…484c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0072}
0x484c…4862               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x002e, t01=0x007c}
0x4862…4890               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBRC,A8 SET RETURN CODE IN ECB«, t00=0x002e, t01=0x0092}
0x4890…48a2               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002e, t01=0x00c0}
0x48a2…48d0               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBEL,A8 RESET EFFECTIVE LENGTH«, t00=0x002e, t01=0x00d2}
0x48d0…48dc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0100}
0x48dc…48e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x010c}
0x48e6…48fa               Head {h00=0x0010, h01=0x0050, text=»TIORTN EQU *«, t00=0x002e, t01=0x0116}
0x48fa…4926               Head {h00=0x0028, h01=0x0050, text=» ABL LKMQDI QUEUE TASK AND DISPATCH «, t00=0x002e, t01=0x012a}
0x4926…4930               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0156}
0x4930…4948               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x002e, t01=0x0160}
0x4948…4952               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0178}
0x4952…495c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0182}
0x495c…4974               Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x002e, t01=0x018c}
0x4974…498c               Head {h00=0x0014, h01=0x0050, text=»* QUEUE DEVICE *«, t00=0x002f, t01=0x0014}
0x498c…49a4               Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x002f, t01=0x002c}
0x49a4…49ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0044}
0x49ae…49b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x004e}
0x49b8…49f4               Head {h00=0x0038, h01=0x0050, text=»* THIS IS THE ROUTINE FOR QUEUEING DEVICE REQUESTS. «, t00=0x002f, t01=0x0058}
0x49f4…4a36               Head {h00=0x003e, h01=0x0050, text=»* THE ROUTINE IS ENTERED AT DIFFERENT LABELS DEPENDING ON «, t00=0x002f, t01=0x0094}
0x4a36…4a7a               Head {h00=0x0040, h01=0x0050, text=»* WHETHER THE DEVICE IS AN ECHO DEVICE OR NOT, AND DEPENDING«, t00=0x002f, t01=0x00d6}
0x4a7a…4ab6               Head {h00=0x0038, h01=0x0050, text=»* ON WHETHER THE DEVICE IS ATTACHED OR NOT, AND WHEN«, t00=0x002f, t01=0x011a}
0x4ab6…4afc               Head {h00=0x0042, h01=0x0050, text=»* ATTACHED, WHETHER THE DEVICE IS ATTACHED TO THE TASK OR NOT.«, t00=0x002f, t01=0x0156}
0x4afc…4b06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x000c}
0x4b06…4b1c               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0030, t01=0x0016}
0x4b1c…4b26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x002c}
0x4b26…4b48               Head {h00=0x001e, h01=0x0050, text=»* QUEUE ECHO DEVICE FIRST «, t00=0x0030, t01=0x0036}
0x4b48…4b52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0058}
0x4b52…4b6a               Head {h00=0x0014, h01=0x0050, text=»TIOQ00 LDR A6,A2«, t00=0x0030, t01=0x0062}
0x4b6a…4b74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x007a}
0x4b74…4b90               Head {h00=0x0018, h01=0x0050, text=»* QUEUE DEVICE FIRST«, t00=0x0030, t01=0x0084}
0x4b90…4b9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00a0}
0x4b9a…4bc2               Head {h00=0x0024, h01=0x0050, text=»TIOQ05 ADK A6,DWTTQ QUEUE ANCHOR«, t00=0x0030, t01=0x00aa}
0x4bc2…4bd4               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x0030, t01=0x00d2}
0x4bd4…4be8               Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A6 «, t00=0x0030, t01=0x00e4}
0x4be8…4c10               Head {h00=0x0024, h01=0x0050, text=» RF TIOQ40 INSERT FIRST IN QUEUE«, t00=0x0030, t01=0x00f8}
0x4c10…4c1c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x0120}
0x4c1c…4c26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x012c}
0x4c26…4c50               Head {h00=0x0026, h01=0x0050, text=»TIOQ10 LDR A6,A2 QUEUE ECHO DEVICE«, t00=0x0030, t01=0x0136}
0x4c50…4c5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0160}
0x4c5a…4c8c               Head {h00=0x002e, h01=0x0050, text=»QUEDEV EQU * ENTRY USED BY FILE MANAGEMENT«, t00=0x0030, t01=0x016a}
0x4c8c…4cb4               Head {h00=0x0024, h01=0x0050, text=»TIOQ20 ADK A6,DWTTQ QUEUE ANCHOR«, t00=0x0031, t01=0x000c}
0x4cb4…4cbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0034}
0x4cbe…4cf0               Head {h00=0x002e, h01=0x0050, text=»QUEFIL EQU * ENTRY USED BY FILE MANAGEMENT«, t00=0x0031, t01=0x003e}
0x4cf0…4d10               Head {h00=0x001c, h01=0x0050, text=» LD A1,TTB:ST+1,A5 LEVEL«, t00=0x0031, t01=0x0070}
0x4d10…4d1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0090}
0x4d1a…4d32               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0031, t01=0x009a}
0x4d32…4d3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00b2}
0x4d3c…4d6a               Head {h00=0x002a, h01=0x0050, text=»* SEARCH QUEUE FOR PLACE OF INSERTION «, t00=0x0031, t01=0x00bc}
0x4d6a…4d74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00ea}
0x4d74…4d8c               Head {h00=0x0014, h01=0x0050, text=»TIOQ30 LDR A2,A6«, t00=0x0031, t01=0x00f4}
0x4d8c…4db4               Head {h00=0x0024, h01=0x0050, text=» LDR* A6,A6 FOLLOW QUEUE TO END «, t00=0x0031, t01=0x010c}
0x4db4…4dd4               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIOQ40 END FOUND «, t00=0x0031, t01=0x0134}
0x4dd4…4dfe               Head {h00=0x0026, h01=0x0050, text=» CC A1,TTB:ST+1,A6 COMPARE LEVELS «, t00=0x0031, t01=0x0154}
0x4dfe…4e1e               Head {h00=0x001c, h01=0x0050, text=» RB(NL) TIOQ30 TRY NEXT «, t00=0x0031, t01=0x017e}
0x4e1e…4e28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x000e}
0x4e28…4e5c               Head {h00=0x0030, h01=0x0050, text=»* INSERT IN QUEUE AND UPDATE PROGRAM COUNTER«, t00=0x0032, t01=0x0018}
0x4e5c…4e66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x004c}
0x4e66…4e80               Head {h00=0x0016, h01=0x0050, text=»TIOQ40 LDKL A3,-4 «, t00=0x0032, t01=0x0056}
0x4e80…4ea2               Head {h00=0x001e, h01=0x0050, text=» STR A6,A5 INSERT IN QUEUE«, t00=0x0032, t01=0x0070}
0x4ea2…4eb4               Head {h00=0x000e, h01=0x0050, text=» STR A5,A2«, t00=0x0032, t01=0x0092}
0x4eb4…4ecc               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x0032, t01=0x00a4}
0x4ecc…4ef0               Head {h00=0x0020, h01=0x0050, text=» RF(Z) TIOQ50 NO ACTIVATION «, t00=0x0032, t01=0x00bc}
0x4ef0…4f0c               Head {h00=0x0018, h01=0x0050, text=» SUK A3,2 ACTIVATION«, t00=0x0032, t01=0x00e0}
0x4f0c…4f16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00fc}
0x4f16…4f4e               Head {h00=0x0034, h01=0x0050, text=»TIOQ50 ADS A3,TTB:SA,A5 UPDATE PC TO REPEAT LKM «, t00=0x0032, t01=0x0106}
0x4f4e…4f58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x013e}
0x4f58…4f6c               Head {h00=0x0010, h01=0x0050, text=»TIOQ60 EQU *«, t00=0x0032, t01=0x0148}
0x4f6c…4f90               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0032, t01=0x015c}
0x4f90…4f9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0180}
0x4f9a…4fb2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0032, t01=0x018a}
0x4fb2…4fbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0012}
0x4fbc…4fc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x001c}
0x4fc6…4fd6               Head {h00=0x000c, h01=0x0050, text=»******* «, t00=0x0033, t01=0x0026}
0x4fd6…4fe6               Head {h00=0x000c, h01=0x0050, text=»* TIO * «, t00=0x0033, t01=0x0036}
0x4fe6…4ff6               Head {h00=0x000c, h01=0x0050, text=»******* «, t00=0x0033, t01=0x0046}
0x4ff6…5000               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0056}
0x5000…500a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0060}
0x500a…5042               Head {h00=0x0034, h01=0x0050, text=»* THIS MODULE IS ENTERED WHEN TASK INPUT/OUTPUT «, t00=0x0033, t01=0x006a}
0x5042…5078               Head {h00=0x0032, h01=0x0050, text=»* IS REQUIRED. IF A REQUEST CANNOT BE SERVICED«, t00=0x0033, t01=0x00a2}
0x5078…50b0               Head {h00=0x0034, h01=0x0050, text=»* DUE TO E.G. BUSY DEVICE, THE REQUEST IS QUEUED«, t00=0x0033, t01=0x00d8}
0x50b0…50da               Head {h00=0x0026, h01=0x0050, text=»* AND THE TASK SET IN WAIT STATE. «, t00=0x0033, t01=0x0110}
0x50da…50e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x013a}
0x50e4…511a               Head {h00=0x0032, h01=0x0050, text=»* WHEN RUNNING WITH MMU OPTION SPECIAL DEVICE «, t00=0x0033, t01=0x0144}
0x511a…5148               Head {h00=0x002a, h01=0x0050, text=»* DEPENDENT SUBROUTINES ARE PERFORMED.«, t00=0x0033, t01=0x017a}
0x5148…5152               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0018}
0x5152…518c               Head {h00=0x0036, h01=0x0050, text=»* THIS MODULE IS CALLED BY THE LKM HANDLING MODULE«, t00=0x0034, t01=0x0022}
0x518c…51b6               Head {h00=0x0026, h01=0x0050, text=»* WITH THE FOLLOWING PARAMETERS:- «, t00=0x0034, t01=0x005c}
0x51b6…51c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0086}
0x51c0…51f2               Head {h00=0x002e, h01=0x0050, text=»*  A1 = PARAMETER WHEN I/O AND ACTIVATION «, t00=0x0034, t01=0x0090}
0x51f2…51fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00c2}
0x51fc…5224               Head {h00=0x0024, h01=0x0050, text=»*  A4 = ZERO, NORMAL I/O REQUEST«, t00=0x0034, t01=0x00cc}
0x5224…5250               Head {h00=0x0028, h01=0x0050, text=»*       NOT ZERO, I/O AND ACTIVATION«, t00=0x0034, t01=0x00f4}
0x5250…525a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0120}
0x525a…5276               Head {h00=0x0018, h01=0x0050, text=»*  A5 = TTAB ADDRESS«, t00=0x0034, t01=0x012a}
0x5276…5280               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0146}
0x5280…529a               Head {h00=0x0016, h01=0x0050, text=»*  A7 = ORDER CODE«, t00=0x0034, t01=0x0150}
0x529a…52a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x016a}
0x52a4…52c0               Head {h00=0x0018, h01=0x0050, text=»*  A8 = ECB ADDRESS «, t00=0x0034, t01=0x0174}
0x52c0…52ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0190}
0x52ca…52e2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0035, t01=0x000a}
0x52e2…52ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0022}
0x52ec…52f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x002c}
0x52f6…5336               Head {h00=0x003c, h01=0x0050, text=»* THE 'TIO'-ROUTINE EXITS TO REQUESTED ACTIVATION DRIVER«, t00=0x0035, t01=0x0036}
0x5336…5364               Head {h00=0x002a, h01=0x0050, text=»* WITH THE FOLLOWING REGISTER VAULES:-«, t00=0x0035, t01=0x0076}
0x5364…536e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00a4}
0x536e…5392               Head {h00=0x0020, h01=0x0050, text=»*  A5 = STACK BASE 2 IN DWT «, t00=0x0035, t01=0x00ae}
0x5392…539c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00d2}
0x539c…53b8               Head {h00=0x0018, h01=0x0050, text=»*  A6 = DWT ADDRESS «, t00=0x0035, t01=0x00dc}
0x53b8…53c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00f8}
0x53c2…53dc               Head {h00=0x0016, h01=0x0050, text=»*  A7 = ORDER CODE«, t00=0x0035, t01=0x0102}
0x53dc…53e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x011c}
0x53e6…5402               Head {h00=0x0018, h01=0x0050, text=»*  A8 = ECB ADDRESS «, t00=0x0035, t01=0x0126}
0x5402…540c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0142}
0x540c…543c               Head {h00=0x002c, h01=0x0050, text=»* A12 = ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0035, t01=0x014c}
0x543c…5446               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x017c}
0x5446…547a               Head {h00=0x0030, h01=0x0050, text=»* A13 = 0, IF REQUEST ISSUED IN SYSTEM MODE «, t00=0x0035, t01=0x0186}
0x547a…54ac               Head {h00=0x002e, h01=0x0050, text=»*     = 1, "     "      "    "  USER MODE «, t00=0x0036, t01=0x002a}
0x54ac…54b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x005c}
0x54b6…54c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0066}
0x54c0…54f0               Head {h00=0x002c, h01=0x0050, text=»* THE FOLLOWING DWT FIELDS ARE UPDATED:-«, t00=0x0036, t01=0x0070}
0x54f0…54fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00a0}
0x54fa…5520               Head {h00=0x0022, h01=0x0050, text=»*  -DWTOR  DWT INDEX AND ORDER«, t00=0x0036, t01=0x00aa}
0x5520…553e               Head {h00=0x001a, h01=0x0050, text=»*  -DWTECB ECB ADDRESS«, t00=0x0036, t01=0x00d0}
0x553e…5566               Head {h00=0x0024, h01=0x0050, text=»*  -DWTST  READY AND ECHO FIELDS«, t00=0x0036, t01=0x00ee}
0x5566…5586               Head {h00=0x001c, h01=0x0050, text=»*  -DWTTAB TTAB ADDRESS «, t00=0x0036, t01=0x0116}
0x5586…55b0               Head {h00=0x0026, h01=0x0050, text=»*  -DWTWAT WAIT/ACTIVATE INDICATOR«, t00=0x0036, t01=0x0136}
0x55b0…55e2               Head {h00=0x002e, h01=0x0050, text=»*  -DWTUEC USER ECB ADDRESS (MMU SYSTEMS) «, t00=0x0036, t01=0x0160}
0x55e2…55ec (55, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0004}
0x55ec…55f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x000e}
0x55f6…5624               Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ECB FIELDS ARE RESET:-«, t00=0x0037, t01=0x0018}
0x5624…562e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0046}
0x562e…5652               Head {h00=0x0020, h01=0x0050, text=»*  -BIT 0 IN THE FIRST WORD «, t00=0x0037, t01=0x0050}
0x5652…5676               Head {h00=0x0020, h01=0x0050, text=»*  -ECBEL  EFFECTIVE LENGTH «, t00=0x0037, t01=0x0074}
0x5676…5694               Head {h00=0x001a, h01=0x0050, text=»*  -ECBRC  RETURN CODE«, t00=0x0037, t01=0x0098}
0x5694…569e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00b6}
0x569e…56b6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0037, t01=0x00c0}
0x56b6…56c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00d8}
0x56c0…56f2               Head {h00=0x002e, h01=0x0050, text=»* DWT ADDRESS AND CHECK IF REQUEST IS BUSY«, t00=0x0037, t01=0x00e2}
0x56f2…56fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0114}
0x56fc…5728               Head {h00=0x0028, h01=0x0050, text=»TIO CF A15,FNDDWT SEARCH DWT ADDRESS«, t00=0x0037, t01=0x011e}
0x5728…5732               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x014a}
0x5732…5764               Head {h00=0x002e, h01=0x0050, text=»TIO:FM EQU * ENTRY USED BY FILE MANAGEMENT«, t00=0x0037, t01=0x0154}
0x5764…5788               Head {h00=0x0020, h01=0x0050, text=» CF A15,SWITCH SWITCH LEVEL «, t00=0x0037, t01=0x0186}
0x5788…5794               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0038, t01=0x001a}
0x5794…57aa               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/8000«, t00=0x0038, t01=0x0026}
0x57aa…57c2               Head {h00=0x0014, h01=0x0050, text=» ADK A6,0 SET CR«, t00=0x0038, t01=0x003c}
0x57c2…57ea               Head {h00=0x0024, h01=0x0050, text=» RB(Z) TIOERR FILE CODE UNKNOWN «, t00=0x0038, t01=0x0054}
0x57ea…5824               Head {h00=0x0036, h01=0x0050, text=» LD A12,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0038, t01=0x007c}
0x5824…5848               Head {h00=0x0020, h01=0x0050, text=» LD A13,DWTST,A6 DWT STATUS «, t00=0x0038, t01=0x00b6}
0x5848…5852               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00da}
0x5852…586a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0038, t01=0x00e4}
0x586a…5874               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00fc}
0x5874…58b8               Head {h00=0x0040, h01=0x0050, text=»* CHECK IF ATTACH/DETACH ORDER OR IF DEVICE IS BUSY/ATTACHED«, t00=0x0038, t01=0x0106}
0x58b8…58c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x014a}
0x58c2…58d8               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0038, t01=0x0154}
0x58d8…58fa               Head {h00=0x001e, h01=0x0050, text=» LDKL A10,/0800 ATTACH BIT«, t00=0x0038, t01=0x016a}
0x58fa…5910               Head {h00=0x0012, h01=0x0050, text=» CCK A7,/BB00 «, t00=0x0038, t01=0x018c}
0x5910…5932               Head {h00=0x001e, h01=0x0050, text=» RB(E) ATTACH ATTACH ORDER«, t00=0x0039, t01=0x0012}
0x5932…5948               Head {h00=0x0012, h01=0x0050, text=» CCK A7,/BC00 «, t00=0x0039, t01=0x0034}
0x5948…596a               Head {h00=0x001e, h01=0x0050, text=» RB(E) DETACH DETACH ORDER«, t00=0x0039, t01=0x004a}
0x596a…597e               Head {h00=0x0010, h01=0x0050, text=» TM A10,A13 «, t00=0x0039, t01=0x006c}
0x597e…59a0               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TIO020 NOT ATTACHED«, t00=0x0039, t01=0x0080}
0x59a0…59b8               Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A6«, t00=0x0039, t01=0x00a2}
0x59b8…59e6               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TIOQ20 ATTACHED TO OTHER TASK «, t00=0x0039, t01=0x00ba}
0x59e6…59f8               Head {h00=0x000e, h01=0x0050, text=» TM A3,A13«, t00=0x0039, t01=0x00e8}
0x59f8…5a1e               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TIO030 DEVICE NOT BUSY«, t00=0x0039, t01=0x00fa}
0x5a1e…5a44               Head {h00=0x0022, h01=0x0050, text=» RB TIOQ05 BUSY, QUEUE DEVICE «, t00=0x0039, t01=0x0120}
0x5a44…5a50               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0146}
0x5a50…5a5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0152}
0x5a5a…5a6e               Head {h00=0x0010, h01=0x0050, text=»TIO020 EQU *«, t00=0x0039, t01=0x015c}
0x5a6e…5a80               Head {h00=0x000e, h01=0x0050, text=» TM A3,A13«, t00=0x0039, t01=0x0170}
0x5a80…5aa2               Head {h00=0x001e, h01=0x0050, text=» RB(Z) TIOQ20 DEVICE BUSY «, t00=0x0039, t01=0x0182}
0x5aa2…5aac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0014}
0x5aac…5ac4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x003a, t01=0x001e}
0x5ac4…5ace               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0036}
0x5ace…5b1a               Head {h00=0x0048, h01=0x0050, text=»* CHECK IF ECHO, AND WHEN TRUE CHECK IF ECHO DEVICE IS BUSY/ATTACHED«, t00=0x003a, t01=0x0040}
0x5b1a…5b24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x008c}
0x5b24…5b52               Head {h00=0x002a, h01=0x0050, text=»TIO030 SC A2,DWTOR,A6 STORE DWT INDEX «, t00=0x003a, t01=0x0096}
0x5b52…5b74               Head {h00=0x001e, h01=0x0050, text=» LDK A2,/40 CHECK IF ECHO «, t00=0x003a, t01=0x00c4}
0x5b74…5b86               Head {h00=0x000e, h01=0x0050, text=» ANR A2,A7«, t00=0x003a, t01=0x00e6}
0x5b86…5ba4               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TIO070 NOT ECHO«, t00=0x003a, t01=0x00f8}
0x5ba4…5bae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0116}
0x5bae…5bd4               Head {h00=0x0022, h01=0x0050, text=» LD A2,DEVIND,A12 DEVICE INDEX«, t00=0x003a, t01=0x0120}
0x5bd4…5bfc               Head {h00=0x0024, h01=0x0050, text=» SUK A2,KB:DIX CHECK IF KEYBOARD«, t00=0x003a, t01=0x0146}
0x5bfc…5c34               Head {h00=0x0034, h01=0x0050, text=» RF(NZ) TIO070 ECHO NOT ALLOWED IF NOT KEYBOARD «, t00=0x003a, t01=0x016e}
0x5c34…5c64               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTECH,A6 ECHO DEVICE DWT ADDRESS«, t00=0x003b, t01=0x0016}
0x5c64…5c88               Head {h00=0x0020, h01=0x0050, text=» RF(Z) TIO070 NO ECHO DEVICE«, t00=0x003b, t01=0x0046}
0x5c88…5cb0               Head {h00=0x0024, h01=0x0050, text=» LD A14,DWTST,A2 ECHO DWT STATUS«, t00=0x003b, t01=0x006a}
0x5cb0…5cba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0092}
0x5cba…5cd0               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x003b, t01=0x009c}
0x5cd0…5ce4               Head {h00=0x0010, h01=0x0050, text=» TM A10,A14 «, t00=0x003b, t01=0x00b2}
0x5ce4…5d12               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TIO050 ECHO DEVICE NOT ATTACHED«, t00=0x003b, t01=0x00c6}
0x5d12…5d2a               Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A2«, t00=0x003b, t01=0x00f4}
0x5d2a…5d64               Head {h00=0x0036, h01=0x0050, text=» RB(NE) TIOQ10 ECHO DEVICE ATTACHED TO OTHER TASK «, t00=0x003b, t01=0x010c}
0x5d64…5d76               Head {h00=0x000e, h01=0x0050, text=» TM A3,A14«, t00=0x003b, t01=0x0146}
0x5d76…5da2               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TIO060 ECHO DEVICE NOT BUSY «, t00=0x003b, t01=0x0158}
0x5da2…5dcc               Head {h00=0x0026, h01=0x0050, text=» RB TIOQ00 BUSY, QUEUE ECHO DEVICE«, t00=0x003b, t01=0x0184}
0x5dcc…5dd8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x001e}
0x5dd8…5de2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x002a}
0x5de2…5dfa               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x003c, t01=0x0034}
0x5dfa…5e04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x004c}
0x5e04…5e0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0056}
0x5e0e…5e26               Head {h00=0x0014, h01=0x0050, text=»TIO050 TM A3,A14«, t00=0x003c, t01=0x0060}
0x5e26…5e4c               Head {h00=0x0022, h01=0x0050, text=» RB(Z) TIOQ10 ECHO DEVICE BUSY«, t00=0x003c, t01=0x0078}
0x5e4c…5e56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x009e}
0x5e56…5e72               Head {h00=0x0018, h01=0x0050, text=»TIO060 LDKL A3,/A000«, t00=0x003c, t01=0x00a8}
0x5e72…5eb0               Head {h00=0x003a, h01=0x0050, text=» XRS A3,DWTST,A2 UPDATE BUSY & ECHO BITS IN DWT STATUS«, t00=0x003c, t01=0x00c4}
0x5eb0…5eba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0102}
0x5eba…5ede               Head {h00=0x0020, h01=0x0050, text=»* UPDATE ECB AND DWT FIELDS «, t00=0x003c, t01=0x010c}
0x5ede…5ee8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0130}
0x5ee8…5f2c               Head {h00=0x0040, h01=0x0050, text=»TIO070 XRS A3,DWTST,A6 UPDATE BUSY & ECHO BITS IN DWT STATUS«, t00=0x003c, t01=0x013a}
0x5f2c…5f36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x017e}
0x5f36…5f4c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x003c, t01=0x0188}
0x5f4c…5f6a               Head {h00=0x001a, h01=0x0050, text=» LD A13,TTB:PW,A5 PSW «, t00=0x003d, t01=0x000e}
0x5f6a…5f92               Head {h00=0x0024, h01=0x0050, text=» ANKL A13,1 SYSTEM/USER MODE BIT«, t00=0x003d, t01=0x002c}
0x5f92…5fba               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TIO100 JUMP IF USER MODE«, t00=0x003d, t01=0x0054}
0x5fba…5fd0               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/7FFF«, t00=0x003d, t01=0x007c}
0x5fd0…6000               Head {h00=0x002c, h01=0x0050, text=» ANRS A2,A8 RESET BIT 0 IN ECB FILE CODE«, t00=0x003d, t01=0x0092}
0x6000…6030               Head {h00=0x002c, h01=0x0050, text=» ST A8,DWTECB,A6 SET ACTUAL ECB ADDRESS «, t00=0x003d, t01=0x00c2}
0x6030…605c               Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8  RESET EFFECTIVE LENGTH«, t00=0x003d, t01=0x00f2}
0x605c…6084               Head {h00=0x0024, h01=0x0050, text=» CM ECBRC,A8  RESET RETURN CODE «, t00=0x003d, t01=0x011e}
0x6084…6096               Head {h00=0x000e, h01=0x0050, text=» RF TIO110«, t00=0x003d, t01=0x0146}
0x6096…60a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0158}
0x60a0…60b8               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x003d, t01=0x0162}
0x60b8…60c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x017a}
0x60c2…60e4               Head {h00=0x001e, h01=0x0050, text=»* MOVE USER ECB TO DWT ECB«, t00=0x003d, t01=0x0184}
0x60e4…60ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0016}
0x60ee…6102               Head {h00=0x0010, h01=0x0050, text=»TIO100 EQU *«, t00=0x003e, t01=0x0020}
0x6102…6118               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/4FFF«, t00=0x003e, t01=0x0034}
0x6118…6146               Head {h00=0x002a, h01=0x0050, text=» ELR A3,A8 LOAD FIRST WORD OF USER ECB«, t00=0x003e, t01=0x004a}
0x6146…617a               Head {h00=0x0030, h01=0x0050, text=» ANR A3,A2 RESET BITS 0,2,3 IN ECB FILE CODE«, t00=0x003e, t01=0x0078}
0x617a…618c               Head {h00=0x000e, h01=0x0050, text=» ESR A3,A8«, t00=0x003e, t01=0x00ac}
0x618c…61b8               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTMEC,A6 DWT MMU ECB ADDRESS«, t00=0x003e, t01=0x00be}
0x61b8…61e8               Head {h00=0x002c, h01=0x0050, text=» ST A2,DWTECB,A6 SET ACTUAL ECB ADDRESS «, t00=0x003e, t01=0x00ea}
0x61e8…61fa               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x003e, t01=0x011a}
0x61fa…6228               Head {h00=0x002a, h01=0x0050, text=» ST A8,DWTUEC,A6 SAVE USER ECB ADDRESS«, t00=0x003e, t01=0x012c}
0x6228…623a               Head {h00=0x000e, h01=0x0050, text=» LDR A9,A8«, t00=0x003e, t01=0x015a}
0x623a…624c               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003e, t01=0x016c}
0x624c…627a               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBEL,A8 RESET EFFECTIVE LENGTH«, t00=0x003e, t01=0x017e}
0x627a…62a4               Head {h00=0x0026, h01=0x0050, text=» ES A3,ECBRC,A8 RESET RETURN CODE «, t00=0x003f, t01=0x001c}
0x62a4…62ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0046}
0x62ae…62d0               Head {h00=0x001e, h01=0x0050, text=» LDR A10,A1 SAVE PARAMETER«, t00=0x003f, t01=0x0050}
0x62d0…62e2               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A8«, t00=0x003f, t01=0x0072}
0x62e2…62f8               Head {h00=0x0012, h01=0x0050, text=» ADK A1,ECBRL «, t00=0x003f, t01=0x0084}
0x62f8…6324               Head {h00=0x0028, h01=0x0050, text=» LDR A8,A2 SET A8 TO DWT ECB ADDRESS«, t00=0x003f, t01=0x009a}
0x6324…633a               Head {h00=0x0012, h01=0x0050, text=» ADK A2,ECBRL «, t00=0x003f, t01=0x00c6}
0x633a…634c               Head {h00=0x000e, h01=0x0050, text=» LDK A3,8 «, t00=0x003f, t01=0x00dc}
0x634c…637e               Head {h00=0x002e, h01=0x0050, text=» MVUS A3 MOVE PART OF USER ECB TO DWT ECB «, t00=0x003f, t01=0x00ee}
0x637e…63a4               Head {h00=0x0022, h01=0x0050, text=» LDR A1,A10 RESTORE PARAMETER «, t00=0x003f, t01=0x0120}
0x63a4…63b0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x0146}
0x63b0…63ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0152}
0x63ba…63d0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003f, t01=0x015c}
0x63d0…63e6               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/7FFF«, t00=0x003f, t01=0x0172}
0x63e6…6416               Head {h00=0x002c, h01=0x0050, text=» ANRS A3,A8 RESET BIT 0 IN ECB FILE CODE«, t00=0x003f, t01=0x0188}
0x6416…6442               Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8  RESET EFFECTIVE LENGTH«, t00=0x0040, t01=0x0028}
0x6442…646a               Head {h00=0x0024, h01=0x0050, text=» CM ECBRC,A8  RESET RETURN CODE «, t00=0x0040, t01=0x0054}
0x646a…6476               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x007c}
0x6476…6480               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0088}
0x6480…6498               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0040, t01=0x0092}
0x6498…64a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00aa}
0x64a2…64ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00b4}
0x64ac…64c0               Head {h00=0x0010, h01=0x0050, text=»TIO110 EQU *«, t00=0x0040, t01=0x00be}
0x64c0…64d2               Head {h00=0x000e, h01=0x0050, text=» ECR A3,A7«, t00=0x0040, t01=0x00d2}
0x64d2…64f2               Head {h00=0x001c, h01=0x0050, text=» ANK A3,/FF ORDER OPTION«, t00=0x0040, t01=0x00e4}
0x64f2…6522               Head {h00=0x002c, h01=0x0050, text=» RF(Z) TIO120 NO SPECIAL OPTION IF ZERO «, t00=0x0040, t01=0x0104}
0x6522…654e               Head {h00=0x0028, h01=0x0050, text=» SC A3,DWTOPT,A6 STORE OPTION IN DWT«, t00=0x0040, t01=0x0134}
0x654e…6558               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0160}
0x6558…656c               Head {h00=0x0010, h01=0x0050, text=»TIO120 EQU *«, t00=0x0040, t01=0x016a}
0x656c…657e               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A7«, t00=0x0040, t01=0x017e}
0x657e…6592               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x0040, t01=0x0190}
0x6592…65be               Head {h00=0x0028, h01=0x0050, text=» SC A7,DWTOR+1,A6 STORE ORDER IN DWT«, t00=0x0041, t01=0x0014}
0x65be…65f2               Head {h00=0x0030, h01=0x0050, text=» ST A5,DWTTAB,A6 SAVE TTAB ADDRESS IN DWTTAB«, t00=0x0041, t01=0x0040}
0x65f2…65fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0074}
0x65fc…6610               Head {h00=0x0010, h01=0x0050, text=»TIO130 EQU *«, t00=0x0041, t01=0x007e}
0x6610…6626               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0041, t01=0x0092}
0x6626…6650               Head {h00=0x0026, h01=0x0050, text=» ST A8,DWTECB,A6  SET ECB ADDRESS «, t00=0x0041, t01=0x00a8}
0x6650…665c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x00d2}
0x665c…6666               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00de}
0x6666…667e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0041, t01=0x00e8}
0x667e…6688               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0100}
0x6688…66ba               Head {h00=0x002e, h01=0x0050, text=»* UPDATE DWTWAT (WAIT/ACTIVATE INDICATOR) «, t00=0x0041, t01=0x010a}
0x66ba…66c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x013c}
0x66c4…66e6               Head {h00=0x001e, h01=0x0050, text=» LDR A2,A4 CHECK PARAMETER«, t00=0x0041, t01=0x0146}
0x66e6…6710               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) TIO210 I/O AND ACTIVATION «, t00=0x0041, t01=0x0168}
0x6710…6748 (66, 0, 400)  Head {h00=0x0034, h01=0x0050, text=» ANK A3,/80 NORMAL I/O. CHECK IF WAIT REQUESTED «, t00=0x0042, t01=0x0004}
0x6748…6766               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TIO220 NOT WAIT«, t00=0x0042, t01=0x003c}
0x6766…6786               Head {h00=0x001c, h01=0x0050, text=» LDK A4,1 INDICATE WAIT «, t00=0x0042, t01=0x005a}
0x6786…6798               Head {h00=0x000e, h01=0x0050, text=» RF TIO230«, t00=0x0042, t01=0x007a}
0x6798…67a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x008c}
0x67a2…67c0               Head {h00=0x001a, h01=0x0050, text=»* I/O WITH ACTIVATION «, t00=0x0042, t01=0x0096}
0x67c0…67ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00b4}
0x67ca…680a               Head {h00=0x003c, h01=0x0050, text=»TIO210 CF A15,GETBLK SAVE PARAMETER AND DISPATCH ADDRESS«, t00=0x0042, t01=0x00be}
0x680a…6814               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00fe}
0x6814…6826               Head {h00=0x000e, h01=0x0050, text=»* NO WAIT «, t00=0x0042, t01=0x0108}
0x6826…6830               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x011a}
0x6830…6866               Head {h00=0x0032, h01=0x0050, text=»TIO220 CF A15,QTJOB QUEUE TASK FOR DISPATCHING«, t00=0x0042, t01=0x0124}
0x6866…6870               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x015a}
0x6870…687e               Head {h00=0x000a, h01=0x0050, text=»* WAIT«, t00=0x0042, t01=0x0164}
0x687e…6888               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0172}
0x6888…68c4               Head {h00=0x0038, h01=0x0050, text=»TIO230 ST A4,DWTWAT,A6 STORE WAIT/ACTIVATE INDICATOR«, t00=0x0042, t01=0x017c}
0x68c4…68ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0028}
0x68ce…68e6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0043, t01=0x0032}
0x68e6…68f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x004a}
0x68f0…68fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0054}
0x68fa…6910               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0043, t01=0x005e}
0x6910…693e               Head {h00=0x002a, h01=0x0050, text=» LDR A13,A13 CHECK IF SYSTEM/USER MODE«, t00=0x0043, t01=0x0074}
0x693e…6968               Head {h00=0x0026, h01=0x0050, text=» RF(Z) TIO250 JUMP IF SYSTEM MODE «, t00=0x0043, t01=0x00a2}
0x6968…698e               Head {h00=0x0022, h01=0x0050, text=» LD A3,DEVIND,A12 DEVICE INDEX«, t00=0x0043, t01=0x00cc}
0x698e…69be               Head {h00=0x002c, h01=0x0050, text=» RF(N) TIO250 NO SPECIAL ACTION REQUIRED«, t00=0x0043, t01=0x00f2}
0x69be…69e4               Head {h00=0x0022, h01=0x0050, text=» RF(Z) TIO240 DATA MANAGEMENT «, t00=0x0043, t01=0x0122}
0x69e4…6a08               Head {h00=0x0020, h01=0x0050, text=» CWK A3,DK:DIX CHECK IF DISC«, t00=0x0043, t01=0x0148}
0x6a08…6a28               Head {h00=0x001c, h01=0x0050, text=» RF(NE) TIO235 NOT DISC «, t00=0x0043, t01=0x016c}
0x6a28…6a54               Head {h00=0x0028, h01=0x0050, text=» CF A15,TIOCW2 MOVE 2ND CONTROL WORD«, t00=0x0043, t01=0x018c}
0x6a54…6a5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0028}
0x6a5e…6a84               Head {h00=0x0022, h01=0x0050, text=»* PERFORM CHECK ON ORDER CODE «, t00=0x0044, t01=0x0032}
0x6a84…6a8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0058}
0x6a8e…6aa2               Head {h00=0x0010, h01=0x0050, text=»TIO235 EQU *«, t00=0x0044, t01=0x0062}
0x6aa2…6ac0               Head {h00=0x001a, h01=0x0050, text=» LDR A4,A7 ORDER CODE «, t00=0x0044, t01=0x0076}
0x6ac0…6af4               Head {h00=0x0030, h01=0x0050, text=» CF A15,RD:WR2  CHECK IF ORDER IS READ/WRITE«, t00=0x0044, t01=0x0094}
0x6af4…6b26               Head {h00=0x002e, h01=0x0050, text=» RF(Z) TIO250 JUMP IF NO READ/WRITE ORDER «, t00=0x0044, t01=0x00c8}
0x6b26…6b30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00fa}
0x6b30…6b44               Head {h00=0x0010, h01=0x0050, text=»TIO240 EQU *«, t00=0x0044, t01=0x0104}
0x6b44…6b50               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0044, t01=0x0118}
0x6b50…6b90               Head {h00=0x003c, h01=0x0050, text=» CFI A15,TIOTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE«, t00=0x0044, t01=0x0124}
0x6b90…6b9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x0164}
0x6b9c…6ba6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0170}
0x6ba6…6bd4               Head {h00=0x002a, h01=0x0050, text=»TIO250 ENB  GIVE OTHER TASKS A CHANCE «, t00=0x0044, t01=0x017a}
0x6bd4…6bde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0018}
0x6bde…6c0c               Head {h00=0x002a, h01=0x0050, text=»TIO260 LDK A5,DWTSB2 LOAD STACK BASE 2«, t00=0x0045, t01=0x0022}
0x6c0c…6c1e               Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0045, t01=0x0050}
0x6c1e…6c2a               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0045, t01=0x0062}
0x6c2a…6c54               Head {h00=0x0026, h01=0x0050, text=» ABR* A12 GO TO DRIVER ACTIVATION «, t00=0x0045, t01=0x006e}
0x6c54…6c5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0098}
0x6c5e…6c76               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0045, t01=0x00a2}
0x6c76…6c80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00ba}
0x6c80…6c8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00c4}
0x6c8a…6c9c               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0045, t01=0x00ce}
0x6c9c…6cae               Head {h00=0x000e, h01=0x0050, text=»* SWITCH *«, t00=0x0045, t01=0x00e0}
0x6cae…6cc0               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0045, t01=0x00f2}
0x6cc0…6cca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0104}
0x6cca…6cea               Head {h00=0x001c, h01=0x0050, text=»* SWITCH PRIORITY LEVEL:«, t00=0x0045, t01=0x010e}
0x6cea…6cf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x012e}
0x6cf4…6d20               Head {h00=0x0028, h01=0x0050, text=»* IF CPU851, THEN SWITCH TO LEVEL 12«, t00=0x0045, t01=0x0138}
0x6d20…6d4c               Head {h00=0x0028, h01=0x0050, text=»* IF CPU852,  "     "    "    "   16«, t00=0x0045, t01=0x0164}
0x6d4c…6d78               Head {h00=0x0028, h01=0x0050, text=»* IF CPU857,  "     "    "    "   16«, t00=0x0045, t01=0x0190}
0x6d78…6d82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x002c}
0x6d82…6daa               Head {h00=0x0024, h01=0x0050, text=»* A3 IS DESTROYED, AND SO IS CR «, t00=0x0046, t01=0x0036}
0x6daa…6db4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x005e}
0x6db4…6dde               Head {h00=0x0026, h01=0x0050, text=»SWITCH EQU * SWITCH LEVEL ON STACK«, t00=0x0046, t01=0x0068}
0x6dde…6df4               Head {h00=0x0012, h01=0x0050, text=» IFT TC8000=0 «, t00=0x0046, t01=0x0092}
0x6df4…6e14               Head {h00=0x001c, h01=0x0050, text=» IFF CPU852+CPU857=0  =4«, t00=0x0046, t01=0x00a8}
0x6e14…6e30               Head {h00=0x0018, h01=0x0050, text=» LDK A3,/40 LEVEL 16«, t00=0x0046, t01=0x00c8}
0x6e30…6e3c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x00e4}
0x6e3c…6e52               Head {h00=0x0012, h01=0x0050, text=» IFT TC8000=1 «, t00=0x0046, t01=0x00f0}
0x6e52…6e6e               Head {h00=0x0018, h01=0x0050, text=» LDK A3,/30 LEVEL 12«, t00=0x0046, t01=0x0106}
0x6e6e…6e7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x0122}
0x6e7a…6e94               Head {h00=0x0016, h01=0x0050, text=» IFT TC8000=0  =4 «, t00=0x0046, t01=0x012e}
0x6e94…6eb0               Head {h00=0x0018, h01=0x0050, text=» IFT CPU852+CPU857=0«, t00=0x0046, t01=0x0148}
0x6eb0…6ed4               Head {h00=0x0020, h01=0x0050, text=» LDK A3,/30 CPU851: LEVEL 12«, t00=0x0046, t01=0x0164}
0x6ed4…6ee0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x0188}
0x6ee0…6eea (71, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0004}
0x6eea…6ef4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x000e}
0x6ef4…6f20               Head {h00=0x0028, h01=0x0050, text=» SC A3,2,A15 SET NEW LEVEL ON STACK «, t00=0x0047, t01=0x0018}
0x6f20…6f46               Head {h00=0x0022, h01=0x0050, text=» RTN A15 RETURN WITH NEW LEVEL«, t00=0x0047, t01=0x0044}
0x6f46…6f50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x006a}
0x6f50…6f68               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0047, t01=0x0074}
0x6f68…6f72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x008c}
0x6f72…6f7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0096}
0x6f7c…6f92               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0047, t01=0x00a0}
0x6f92…6fc6               Head {h00=0x0030, h01=0x0050, text=»TIOMXI EQU * DUMMY ENTRY IN NON-MMU SYSTEMS «, t00=0x0047, t01=0x00b6}
0x6fc6…6fd2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x00ea}
0x6fd2…6fdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00f6}
0x6fdc…6ff4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0047, t01=0x0100}
0x6ff4…6ffe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0118}
0x6ffe…7008               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0122}
0x7008…701e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0047, t01=0x012c}
0x701e…7028               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0142}
0x7028…703c               Head {h00=0x0010, h01=0x0050, text=»* R D : W R «, t00=0x0047, t01=0x014c}
0x703c…7046               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0160}
0x7046…708a               Head {h00=0x0040, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' AND 'TENDIO' FOR SELECTING «, t00=0x0047, t01=0x016a}
0x708a…70ce               Head {h00=0x0040, h01=0x0050, text=»* THE APPROPRIATE ROUTINE AT READ/WRITE REQUESTS, DEPENDING «, t00=0x0048, t01=0x001e}
0x70ce…7110               Head {h00=0x003e, h01=0x0050, text=»* ON THE DEVICE CONNECTION (PROGRAMMED CHANNEL, MUX ETX). «, t00=0x0048, t01=0x0062}
0x7110…7152               Head {h00=0x003e, h01=0x0050, text=»* IF NO READ/WRITE REQUEST, CONDITION REGISTER ON STACK IS«, t00=0x0048, t01=0x00a4}
0x7152…7180               Head {h00=0x002a, h01=0x0050, text=»* SET TO ZERO, ELSE NOT EQUAL TO ZERO.«, t00=0x0048, t01=0x00e6}
0x7180…718a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0114}
0x718a…71ae               Head {h00=0x0020, h01=0x0050, text=»* INPUT:  A3 = DEVICE INDEX «, t00=0x0048, t01=0x011e}
0x71ae…71d0               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x0048, t01=0x0142}
0x71d0…71da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0164}
0x71da…7218               Head {h00=0x003a, h01=0x0050, text=»* OUTPUT: A3 = INDEX FOR USE IN THE INDEXED BRANCHING «, t00=0x0048, t01=0x016e}
0x7218…724a               Head {h00=0x002e, h01=0x0050, text=»*         CR = 0 IF NO READ/WRITE REQUEST «, t00=0x0049, t01=0x001c}
0x724a…727a               Head {h00=0x002c, h01=0x0050, text=»*         CR <> 0 IF READ/WRITE REQUEST «, t00=0x0049, t01=0x004e}
0x727a…7294               Head {h00=0x0016, h01=0x0050, text=»*  A4 IS DESTROYED«, t00=0x0049, t01=0x007e}
0x7294…729e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0098}
0x729e…72ce               Head {h00=0x002c, h01=0x0050, text=»RD:WR LD A4,DWTOR,A6 ORDER CODE FROM DWT«, t00=0x0049, t01=0x00a2}
0x72ce…72e2               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/3F «, t00=0x0049, t01=0x00d2}
0x72e2…72ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00e6}
0x72ec…731a               Head {h00=0x002a, h01=0x0050, text=»RD:WR2 ADKL A15,4 ADJUST STACKPOINTER «, t00=0x0049, t01=0x00f0}
0x731a…733e               Head {h00=0x0020, h01=0x0050, text=» LC A4,ORDTAB,A4 ORDER INDEX«, t00=0x0049, t01=0x011e}
0x733e…7352               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0049, t01=0x0142}
0x7352…7384               Head {h00=0x002e, h01=0x0050, text=» ABR(Z)* A15 RETURN IF NO READ/WRITE ORDER«, t00=0x0049, t01=0x0156}
0x7384…7396               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0049, t01=0x0188}
0x7396…73be               Head {h00=0x0024, h01=0x0050, text=» ADR A3,A4 ADD READ/WRITE INDEX «, t00=0x004a, t01=0x000a}
0x73be…73ea               Head {h00=0x0028, h01=0x0050, text=» ABR* A15 RETURN WITHOUT CHANGING CR«, t00=0x004a, t01=0x0032}
0x73ea…73f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x005e}
0x73f4…740c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x004a, t01=0x0068}
0x740c…7416               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0080}
0x7416…7420               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x008a}
0x7420…7432               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x004a, t01=0x0094}
0x7432…7444               Head {h00=0x000e, h01=0x0050, text=»* ORDTAB *«, t00=0x004a, t01=0x00a6}
0x7444…7456               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x004a, t01=0x00b8}
0x7456…7460               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00ca}
0x7460…7496               Head {h00=0x0032, h01=0x0050, text=»* ORDTAB CONTAINS ORDER CONSTANTS AS FOLLOWS: «, t00=0x004a, t01=0x00d4}
0x7496…74a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x010a}
0x74a0…74c2               Head {h00=0x001e, h01=0x0050, text=»*  =0: NO READ/WRITE ORDER«, t00=0x004a, t01=0x0114}
0x74c2…74dc               Head {h00=0x0016, h01=0x0050, text=»*  =1: READ ORDER «, t00=0x004a, t01=0x0136}
0x74dc…74fe               Head {h00=0x001e, h01=0x0050, text=»*  =TINDEX+1: WRITE ORDER «, t00=0x004a, t01=0x0150}
0x74fe…7508               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0172}
0x7508…752c               Head {h00=0x0020, h01=0x0050, text=»ORDTAB EQU * ORDER CONSTANTS«, t00=0x004a, t01=0x017c}
0x752c…7548               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,1 /00, /01 «, t00=0x004b, t01=0x0010}
0x7548…7564               Head {h00=0x0018, h01=0x0050, text=» BYTES 1,1 /02, /03 «, t00=0x004b, t01=0x002c}
0x7564…7586               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /04, /05«, t00=0x004b, t01=0x0048}
0x7586…75b0               Head {h00=0x0026, h01=0x0050, text=» BYTES TINDEX+1,TINDEX+1 /06, /07 «, t00=0x004b, t01=0x006a}
0x75b0…75d2               Head {h00=0x001e, h01=0x0050, text=» BYTES TINDEX+1,0 /08, /09«, t00=0x004b, t01=0x0094}
0x75d2…75f4               Head {h00=0x001e, h01=0x0050, text=» BYTES 1,TINDEX+1 /0A, /0B«, t00=0x004b, t01=0x00b6}
0x75f4…7610               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /0C, /0D «, t00=0x004b, t01=0x00d8}
0x7610…762c               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /0E, /0F «, t00=0x004b, t01=0x00f4}
0x762c…7648               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,1 /10, /11 «, t00=0x004b, t01=0x0110}
0x7648…7664               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /12, /13 «, t00=0x004b, t01=0x012c}
0x7664…7686               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /14, /15«, t00=0x004b, t01=0x0148}
0x7686…76a2               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /16, /17 «, t00=0x004b, t01=0x016a}
0x76a2…76be               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /18, /19 «, t00=0x004b, t01=0x0186}
0x76be…76da               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /1A, /1B «, t00=0x004c, t01=0x0012}
0x76da…76f6               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /1C, /1D «, t00=0x004c, t01=0x002e}
0x76f6…7712               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /1E, /1F «, t00=0x004c, t01=0x004a}
0x7712…7734               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /20, /21«, t00=0x004c, t01=0x0066}
0x7734…7756               Head {h00=0x001e, h01=0x0050, text=» BYTES TINDEX+1,0 /22, /23«, t00=0x004c, t01=0x0088}
0x7756…7778               Head {h00=0x001e, h01=0x0050, text=» BYTES TINDEX+1,0 /24, /25«, t00=0x004c, t01=0x00aa}
0x7778…779a               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /26, /27«, t00=0x004c, t01=0x00cc}
0x779a…77b6               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /28, /29 «, t00=0x004c, t01=0x00ee}
0x77b6…77dc               Head {h00=0x0022, h01=0x0050, text=» BYTES 1,TINDEX+1 /2A, /2B =3 «, t00=0x004c, t01=0x010a}
0x77dc…77fa               Head {h00=0x001a, h01=0x0050, text=» BYTES 1,1 /2C, /2D =3«, t00=0x004c, t01=0x0130}
0x77fa…781c               Head {h00=0x001e, h01=0x0050, text=» BYTES 1,TINDEX+1 /2E, /2F«, t00=0x004c, t01=0x014e}
0x781c…7838               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /30, /31 «, t00=0x004c, t01=0x0170}
0x7838…7854               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /32, /33 «, t00=0x004c, t01=0x018c}
0x7854…7870               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /34, /35 «, t00=0x004d, t01=0x0018}
0x7870…788c               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /36, /37 «, t00=0x004d, t01=0x0034}
0x788c…78a8               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /38, /39 «, t00=0x004d, t01=0x0050}
0x78a8…78c4               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /3A, /3B «, t00=0x004d, t01=0x006c}
0x78c4…78e0               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /3C, /3D «, t00=0x004d, t01=0x0088}
0x78e0…78fc               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /3E, /3F «, t00=0x004d, t01=0x00a4}
0x78fc…7906               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00c0}
0x7906…791e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x004d, t01=0x00ca}
0x791e…7928               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00e2}
0x7928…793e               Head {h00=0x0012, h01=0x0050, text=»* T I O : D M «, t00=0x004d, t01=0x00ec}
0x793e…7948               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0102}
0x7948…7980               Head {h00=0x0034, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A REQUEST «, t00=0x004d, t01=0x010c}
0x7980…79ae               Head {h00=0x002a, h01=0x0050, text=»* FOR DATA MANAGEMENT HAS BEEN ISSUED.«, t00=0x004d, t01=0x0144}
0x79ae…79e6               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x004d, t01=0x0172}
0x79e6…7a16               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TEN:DM'.«, t00=0x004e, t01=0x001a}
0x7a16…7a20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x004a}
0x7a20…7a46               Head {h00=0x0022, h01=0x0050, text=»* INPUT:  A8 = DWT ECB ADDRESS«, t00=0x004e, t01=0x0054}
0x7a46…7a6e               Head {h00=0x0024, h01=0x0050, text=»*         A9 = USER ECB ADDRESS «, t00=0x004e, t01=0x007a}
0x7a6e…7a78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00a2}
0x7a78…7a9a               Head {h00=0x001e, h01=0x0050, text=»* OUTPUT: A2 IS DESTROYED «, t00=0x004e, t01=0x00ac}
0x7a9a…7aa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00ce}
0x7aa4…7ad6               Head {h00=0x002e, h01=0x0050, text=»TIO:DM EQU * DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x004e, t01=0x00d8}
0x7ad6…7b02               Head {h00=0x0028, h01=0x0050, text=» EL A2,ECBBA,A9 USER BUFFER ADDRESS «, t00=0x004e, t01=0x010a}
0x7b02…7b1a               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBBA,A8 «, t00=0x004e, t01=0x0136}
0x7b1a…7b24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x014e}
0x7b24…7b38               Head {h00=0x0010, h01=0x0050, text=»TIOCW2 EQU *«, t00=0x004e, t01=0x0158}
0x7b38…7b64               Head {h00=0x0028, h01=0x0050, text=» EL A2,ECBCW2,A9 SECOND CONTROL WORD«, t00=0x004e, t01=0x016c}
0x7b64…7b7c               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW2,A8«, t00=0x004f, t01=0x0008}
0x7b7c…7b86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0020}
0x7b86…7b9a               Head {h00=0x0010, h01=0x0050, text=»A15RTN EQU *«, t00=0x004f, t01=0x002a}
0x7b9a…7baa               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x004f, t01=0x003e}
0x7baa…7bb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x004e}
0x7bb4…7bcc               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x004f, t01=0x0058}
0x7bcc…7bd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0070}
0x7bd6…7bec               Head {h00=0x0012, h01=0x0050, text=»* T I O P C I «, t00=0x004f, t01=0x007a}
0x7bec…7bf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0090}
0x7bf6…7c3c               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN «, t00=0x004f, t01=0x009a}
0x7c3c…7c7e               Head {h00=0x003e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. «, t00=0x004f, t01=0x00e0}
0x7c7e…7cc4               Head {h00=0x0042, h01=0x0050, text=»* TIOPCI CHECKS USER AND DWT BUFFER ADDRESSES SO THAT BOTH ARE«, t00=0x004f, t01=0x0122}
0x7cc4…7d04               Head {h00=0x003c, h01=0x0050, text=»* EVEN OR UNEVEN, DEPENDING ON THE USER BUFFER ADDRESS. «, t00=0x004f, t01=0x0168}
0x7d04…7d3c               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x0050, t01=0x0018}
0x7d3c…7d6c               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENPCI'.«, t00=0x0050, t01=0x0050}
0x7d6c…7da4               Head {h00=0x0034, h01=0x0050, text=»* NOTICE THAT ENTRY TIPI05 IS USED BY 'TIOKBI'. «, t00=0x0050, t01=0x0080}
0x7da4…7dae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00b8}
0x7dae…7dd4               Head {h00=0x0022, h01=0x0050, text=»* INPUT:  A8 = DWT ECB ADDRESS«, t00=0x0050, t01=0x00c2}
0x7dd4…7dfc               Head {h00=0x0024, h01=0x0050, text=»*         A9 = USER ECB ADDRESS «, t00=0x0050, t01=0x00e8}
0x7dfc…7e2c               Head {h00=0x002c, h01=0x0050, text=»* A12 = ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0050, t01=0x0110}
0x7e2c…7e36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0140}
0x7e36…7e58               Head {h00=0x001e, h01=0x0050, text=»* OUTPUT: A1 IS DESTROYED «, t00=0x0050, t01=0x014a}
0x7e58…7e62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x016c}
0x7e62…7e90               Head {h00=0x002a, h01=0x0050, text=»TIOPCI EQU * PROGRAMMED CHANNEL, INPUT«, t00=0x0050, t01=0x0176}
0x7e90…7eb8               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x0051, t01=0x0014}
0x7eb8…7eee               Head {h00=0x0032, h01=0x0050, text=» CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE«, t00=0x0051, t01=0x003c}
0x7eee…7f28               Head {h00=0x0036, h01=0x0050, text=» RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE «, t00=0x0051, t01=0x0072}
0x7f28…7f32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00ac}
0x7f32…7f64               Head {h00=0x002e, h01=0x0050, text=»TIPI05 EQU * ENTRY POINT USED BY 'TIOKBI' «, t00=0x0051, t01=0x00b6}
0x7f64…7f90               Head {h00=0x0028, h01=0x0050, text=» EL A1,ECBBA,A9 USER BUFFER ADDRESS «, t00=0x0051, t01=0x00e8}
0x7f90…7fa2               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0051, t01=0x0114}
0x7fa2…7fd0               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TIPI10 USER BUFFER ADDRESS EVEN«, t00=0x0051, t01=0x0126}
0x7fd0…7fe8               Head {h00=0x0014, h01=0x0050, text=» ORS A1,ECBBA,A8«, t00=0x0051, t01=0x0154}
0x7fe8…7ff8               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0051, t01=0x016c}
0x7ff8…8002               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x017c}
0x8002…8036               Head {h00=0x0030, h01=0x0050, text=»TIPI10 SUK A1,2 MAKE DWT BUFFER ADDRESS EVEN«, t00=0x0051, t01=0x0186}
0x8036…804e               Head {h00=0x0014, h01=0x0050, text=» ANS A1,ECBBA,A8«, t00=0x0052, t01=0x002a}
0x804e…805e               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0052, t01=0x0042}
0x805e…8068               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0052}
0x8068…8080               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0052, t01=0x005c}
0x8080…808a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0074}
0x808a…80a0               Head {h00=0x0012, h01=0x0050, text=»* T I O M X I «, t00=0x0052, t01=0x007e}
0x80a0…80aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0094}
0x80aa…80f0               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN «, t00=0x0052, t01=0x009e}
0x80f0…8132               Head {h00=0x003e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS RUNNING ON MULTIPLEXOR CHANNEL.«, t00=0x0052, t01=0x00e4}
0x8132…8174               Head {h00=0x003e, h01=0x0050, text=»* TIOMXI ASSEMBLES THE FULL 18 BIT BUFFER ADDRESS WHICH IS«, t00=0x0052, t01=0x0126}
0x8174…81a4               Head {h00=0x002c, h01=0x0050, text=»* TRANSFERRED TO THE MUX BY THE DRIVER. «, t00=0x0052, t01=0x0168}
0x81a4…81dc               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x0053, t01=0x0008}
0x81dc…820c               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENMXI'.«, t00=0x0053, t01=0x0040}
0x820c…825e               Head {h00=0x004e, h01=0x0050, text=»* NOTICE THAT MODULES 'TIOMXO', 'TIODKI' AND 'TIODKO' ARE EQUAL TO TIOMXI.«, t00=0x0053, t01=0x0070}
0x825e…8268               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00c2}
0x8268…828c               Head {h00=0x0020, h01=0x0050, text=»* INPUT:  A5 = TTAB ADDRESS «, t00=0x0053, t01=0x00cc}
0x828c…82b2               Head {h00=0x0022, h01=0x0050, text=»*         A8 = DWT ECB ADDRESS«, t00=0x0053, t01=0x00f0}
0x82b2…82d2               Head {h00=0x001c, h01=0x0050, text=»*  A9 = USER ECB ADDRESS«, t00=0x0053, t01=0x0116}
0x82d2…82dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0136}
0x82dc…8302               Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A2 ARE DESTROYED «, t00=0x0053, t01=0x0140}
0x8302…8348               Head {h00=0x0042, h01=0x0050, text=»*         18 BIT USER BUFFER ADDRESS IS TRANSFERRED TO DWT ECB«, t00=0x0053, t01=0x0166}
0x8348…8352               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x001c}
0x8352…8372               Head {h00=0x001c, h01=0x0050, text=»TIOMXI EQU * MUX, INPUT «, t00=0x0054, t01=0x0026}
0x8372…8384               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0054, t01=0x0046}
0x8384…83ba               Head {h00=0x0032, h01=0x0050, text=» EL A2,ECBBA,A9 USER BUFFER ADDRESS (LOGICAL) «, t00=0x0054, t01=0x0058}
0x83ba…83e0               Head {h00=0x0022, h01=0x0050, text=» DLL 4 4 LEFTMOST BITS INTO A1«, t00=0x0054, t01=0x008e}
0x83e0…8400               Head {h00=0x001c, h01=0x0050, text=» ADR A1,A1 DOUBLE INDEX «, t00=0x0054, t01=0x00b4}
0x8400…8412               Head {h00=0x000e, h01=0x0050, text=» ADR A1,A5«, t00=0x0054, t01=0x00d4}
0x8412…8438               Head {h00=0x0022, h01=0x0050, text=» LC A1,TTB:MT,A1 PAGE ADDRESS «, t00=0x0054, t01=0x00e6}
0x8438…844c               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FC «, t00=0x0054, t01=0x010c}
0x844c…845e               Head {h00=0x000e, h01=0x0050, text=» SRL A1,2 «, t00=0x0054, t01=0x0120}
0x845e…846c               Head {h00=0x000a, h01=0x0050, text=» DRL 4«, t00=0x0054, t01=0x0132}
0x846c…847e               Head {h00=0x000e, h01=0x0050, text=» SLL A1,4 «, t00=0x0054, t01=0x0140}
0x847e…84b2               Head {h00=0x0030, h01=0x0050, text=» SCR A1,A8 SET BITS  0-1 IN DWT ECB 1ST WORD«, t00=0x0054, t01=0x0152}
0x84b2…84e6               Head {h00=0x0030, h01=0x0050, text=» ST A2,ECBBA,A8 BITS 2-17 IN 18-BIT ADDRESS «, t00=0x0054, t01=0x0186}
0x84e6…84f6               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0055, t01=0x002a}
0x84f6…8500               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x003a}
0x8500…8518               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0055, t01=0x0044}
0x8518…8522               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x005c}
0x8522…8538               Head {h00=0x0012, h01=0x0050, text=»* T I O K B I «, t00=0x0055, t01=0x0066}
0x8538…8542               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x007c}
0x8542…8588               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN «, t00=0x0055, t01=0x0086}
0x8588…85da               Head {h00=0x004e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS KEYBOARD/CTW. TIOKBI WILL SET BUFFER ADDRESSES «, t00=0x0055, t01=0x00cc}
0x85da…8614               Head {h00=0x0036, h01=0x0050, text=»* AND MOVE KEYTABLE (IF ANY) BY USING ENTRY TIPI05«, t00=0x0055, t01=0x011e}
0x8614…8648               Head {h00=0x0030, h01=0x0050, text=»* IN 'TIOPCI' AND ENTRY TIPO05 IN 'TIOPCO'. «, t00=0x0055, t01=0x0158}
0x8648…8680               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x0055, t01=0x018c}
0x8680…86b0               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENKBI'.«, t00=0x0056, t01=0x0034}
0x86b0…86ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0064}
0x86ba…86dc               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x0056, t01=0x006e}
0x86dc…86f6               Head {h00=0x0016, h01=0x0050, text=»*  A7 = ORDER CODE«, t00=0x0056, t01=0x0090}
0x86f6…871c               Head {h00=0x0022, h01=0x0050, text=»*         A8 = DWT ECB ADDRESS«, t00=0x0056, t01=0x00aa}
0x871c…873c               Head {h00=0x001c, h01=0x0050, text=»*  A9 = USER ECB ADDRESS«, t00=0x0056, t01=0x00d0}
0x873c…876c               Head {h00=0x002c, h01=0x0050, text=»* A12 = ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0056, t01=0x00f0}
0x876c…8776               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0120}
0x8776…879c               Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A4 ARE DESTROYED «, t00=0x0056, t01=0x012a}
0x879c…87a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0150}
0x87a6…87c8               Head {h00=0x001e, h01=0x0050, text=»TIOKBI EQU * KEYBOARD/CTW «, t00=0x0056, t01=0x015a}
0x87c8…87f0               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x0056, t01=0x017c}
0x87f0…8826               Head {h00=0x0032, h01=0x0050, text=» CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE«, t00=0x0057, t01=0x0014}
0x8826…8860               Head {h00=0x0036, h01=0x0050, text=» RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE «, t00=0x0057, t01=0x004a}
0x8860…889a               Head {h00=0x0036, h01=0x0050, text=» CF A15,TIPI05 CHECK AND CORRECT BUFFER ADDRESSES «, t00=0x0057, t01=0x0084}
0x889a…88bc               Head {h00=0x001e, h01=0x0050, text=» CWK A7,1 CHECK ORDER CODE«, t00=0x0057, t01=0x00be}
0x88bc…88ec               Head {h00=0x002c, h01=0x0050, text=» RF(E) TIKB20 NO KEYTABLE IF BASIC READ «, t00=0x0057, t01=0x00e0}
0x88ec…891a               Head {h00=0x002a, h01=0x0050, text=» LD A4,ECBCW,A8 USER KEYTABLE ADDRESS «, t00=0x0057, t01=0x0110}
0x891a…893c               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TIKB20 NO KEYTABLE «, t00=0x0057, t01=0x013e}
0x893c…8946               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0160}
0x8946…895e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0057, t01=0x016a}
0x895e…8968               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0182}
0x8968…8972               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x018c}
0x8972…8984               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A9«, t00=0x0058, t01=0x0008}
0x8984…8996               Head {h00=0x000e, h01=0x0050, text=» ADK A1,8 «, t00=0x0058, t01=0x001a}
0x8996…89aa               Head {h00=0x0010, h01=0x0050, text=» ADKL A8,12 «, t00=0x0058, t01=0x002c}
0x89aa…89d8               Head {h00=0x002a, h01=0x0050, text=» ST A8,-2,A8 SET DWT KEYTABLE ADDRESS «, t00=0x0058, t01=0x0040}
0x89d8…89ea               Head {h00=0x000e, h01=0x0050, text=» SUKL A8,4«, t00=0x0058, t01=0x006e}
0x89ea…8a18               Head {h00=0x002a, h01=0x0050, text=» ELR A3,A4 FIRST WORD OF USER KEYTABLE«, t00=0x0058, t01=0x0080}
0x8a18…8a2a               Head {h00=0x000e, h01=0x0050, text=» ANK A4,1 «, t00=0x0058, t01=0x00ae}
0x8a2a…8a58               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TIKB10 KEYTABLE ADDRESS UNEVEN«, t00=0x0058, t01=0x00c0}
0x8a58…8a88               Head {h00=0x002c, h01=0x0050, text=» ECR A3,A3 NO, PUT LENGTH IN RIGHT BYTE «, t00=0x0058, t01=0x00ee}
0x8a88…8a92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x011e}
0x8a92…8ac0               Head {h00=0x002a, h01=0x0050, text=»TIKB10 ANK A3,/FF SKIP LEFT CHARACTER «, t00=0x0058, t01=0x0128}
0x8ac0…8ad2               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0058, t01=0x0156}
0x8ad2…8b06               Head {h00=0x0030, h01=0x0050, text=» CW A3,KEYLEN,A12 CHECK KEYTABLE BUFFER SIZE«, t00=0x0058, t01=0x0168}
0x8b06…8b26               Head {h00=0x001c, h01=0x0050, text=» RF(G) IO:ERR TOO SMALL «, t00=0x0059, t01=0x000c}
0x8b26…8b3c               Head {h00=0x0012, h01=0x0050, text=» CF A15,TIPO05«, t00=0x0059, t01=0x002c}
0x8b3c…8b66               Head {h00=0x0026, h01=0x0050, text=» SUKL A8,8 ADJUST DWT ECB ADDRESS «, t00=0x0059, t01=0x0042}
0x8b66…8b70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x006c}
0x8b70…8b84               Head {h00=0x0010, h01=0x0050, text=»TIKB20 EQU *«, t00=0x0059, t01=0x0076}
0x8b84…8b94               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0059, t01=0x008a}
0x8b94…8b9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x009a}
0x8b9e…8bb6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0059, t01=0x00a4}
0x8bb6…8bc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00bc}
0x8bc0…8bd6               Head {h00=0x0012, h01=0x0050, text=»* T I O I T I «, t00=0x0059, t01=0x00c6}
0x8bd6…8be0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00dc}
0x8be0…8c18               Head {h00=0x0034, h01=0x0050, text=»TIOITI EQU A15RTN INTERTASK COMMUNICATION, INPUT«, t00=0x0059, t01=0x00e6}
0x8c18…8c22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x011e}
0x8c22…8c38               Head {h00=0x0012, h01=0x0050, text=»* T I O D K I «, t00=0x0059, t01=0x0128}
0x8c38…8c42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x013e}
0x8c42…8c68               Head {h00=0x0022, h01=0x0050, text=»TIODKI EQU TIOMXI DISC, INPUT «, t00=0x0059, t01=0x0148}
0x8c68…8c72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x016e}
0x8c72…8c8a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0059, t01=0x0178}
0x8c8a…8c94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0190}
0x8c94…8caa               Head {h00=0x0012, h01=0x0050, text=»* T I O P C O «, t00=0x005a, t01=0x000a}
0x8caa…8cb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0020}
0x8cb4…8cfa               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A WRITE REQUEST HAS BEEN«, t00=0x005a, t01=0x002a}
0x8cfa…8d3c               Head {h00=0x003e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. «, t00=0x005a, t01=0x0070}
0x8d3c…8d82               Head {h00=0x0042, h01=0x0050, text=»* TIOPCO CHECKS THAT REQUESTED LENGTH DOES NOT EXCEED THE DWT «, t00=0x005a, t01=0x00b2}
0x8d82…8dca               Head {h00=0x0044, h01=0x0050, text=»* BUFFER LENGTH, AND PERFORMS A MOVE OF THE CONTENTS OF THE USER«, t00=0x005a, t01=0x00f8}
0x8dca…8dee               Head {h00=0x0020, h01=0x0050, text=»* BUFFER TO THE DWT BUFFER. «, t00=0x005a, t01=0x0140}
0x8dee…8e26               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x005a, t01=0x0164}
0x8e26…8e56               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENPCO'.«, t00=0x005b, t01=0x000c}
0x8e56…8e90               Head {h00=0x0036, h01=0x0050, text=»* NOTICE THAT MODULE 'TIOKBO' IS EQUAL TO TIOPCO. «, t00=0x005b, t01=0x003c}
0x8e90…8eda               Head {h00=0x0046, h01=0x0050, text=»* NOTICE ALSO THAT ENTRY TIPO05 IS USED BY 'TIOKBI' AND 'TENITO'. «, t00=0x005b, t01=0x0076}
0x8eda…8f04               Head {h00=0x0026, h01=0x0050, text=»* TIOPCO IS ALSO USED BY 'DC:MOT'.«, t00=0x005b, t01=0x00c0}
0x8f04…8f0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00ea}
0x8f0e…8f30               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x005b, t01=0x00f4}
0x8f30…8f56               Head {h00=0x0022, h01=0x0050, text=»*         A8 = DWT ECB ADDRESS«, t00=0x005b, t01=0x0116}
0x8f56…8f60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x013c}
0x8f60…8f86               Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A4 ARE DESTROYED «, t00=0x005b, t01=0x0146}
0x8f86…8f90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x016c}
0x8f90…8fc0               Head {h00=0x002c, h01=0x0050, text=»TIOPCO EQU * PROGRAMMED CHANNEL, OUTPUT «, t00=0x005b, t01=0x0176}
0x8fc0…8ff8               Head {h00=0x0034, h01=0x0050, text=» LD A2,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK«, t00=0x005c, t01=0x0016}
0x8ff8…9020               Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBRL,A8 REQUESTED LENGTH«, t00=0x005c, t01=0x004e}
0x9020…904c               Head {h00=0x0028, h01=0x0050, text=» RF(NP) TIPO20 REQUESTED LENGTH <= 0«, t00=0x005c, t01=0x0076}
0x904c…9082               Head {h00=0x0032, h01=0x0050, text=» CW A3,BUFLEN,A2 COMPARE WITH DWT BUFFER SIZE «, t00=0x005c, t01=0x00a2}
0x9082…90bc               Head {h00=0x0036, h01=0x0050, text=» RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE «, t00=0x005c, t01=0x00d8}
0x90bc…90e6               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTUEC,A6 USER ECB ADDRESS «, t00=0x005c, t01=0x0112}
0x90e6…90f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x013c}
0x90f0…9108               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x005c, t01=0x0146}
0x9108…9112               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x015e}
0x9112…911c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0168}
0x911c…915a               Head {h00=0x003a, h01=0x0050, text=»TIPO05 EQU * ENTRY POINT USED BY 'TIOKBI' AND 'TENITO'«, t00=0x005c, t01=0x0172}
0x915a…916c               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x005d, t01=0x0020}
0x916c…919e               Head {h00=0x002e, h01=0x0050, text=» ANKL A3,/FFFE MAKE REQUESTED LENGTH EVEN «, t00=0x005d, t01=0x0032}
0x919e…91ca               Head {h00=0x0028, h01=0x0050, text=» EL A1,ECBBA,A1 USER BUFFER ADDRESS «, t00=0x005d, t01=0x0064}
0x91ca…91f4               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBBA,A8 DWT BUFFER ADDRESS«, t00=0x005d, t01=0x0090}
0x91f4…9228               Head {h00=0x0030, h01=0x0050, text=» ANKL A2,/FFFE MAKE DWT BUFFER ADDRESS EVEN «, t00=0x005d, t01=0x00ba}
0x9228…923a               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x005d, t01=0x00ee}
0x923a…924c               Head {h00=0x000e, h01=0x0050, text=» ANK A4,1 «, t00=0x005d, t01=0x0100}
0x924c…927e               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) TIPO30 USER BUFFER ADDRESS UNEVEN «, t00=0x005d, t01=0x0112}
0x927e…9296               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBBA,A8 «, t00=0x005d, t01=0x0144}
0x9296…92a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x015c}
0x92a0…92da               Head {h00=0x0036, h01=0x0050, text=»TIPO10 MVUS A3 MOVE (USER BUFFER) TO SYSTEM BUFFER«, t00=0x005d, t01=0x0166}
0x92da…92e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0010}
0x92e4…92fa               Head {h00=0x0012, h01=0x0050, text=»TIPO20 RTN A15«, t00=0x005e, t01=0x001a}
0x92fa…9304               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0030}
0x9304…9338               Head {h00=0x0030, h01=0x0050, text=»TIPO30 EQU * USER BUFFER ADDRESS WAS UNEVEN «, t00=0x005e, t01=0x003a}
0x9338…9370               Head {h00=0x0034, h01=0x0050, text=» ORS A4,ECBBA,A8 MAKE DWT BUFFER ADDRESS UNEVEN «, t00=0x005e, t01=0x006e}
0x9370…93a4               Head {h00=0x0030, h01=0x0050, text=» ELR A4,A1 FIRST CHARACTER FROM USER BUFFER «, t00=0x005e, t01=0x00a6}
0x93a4…93da               Head {h00=0x0032, h01=0x0050, text=» STR A4,A2 STORE FIRST CHARACTER IN DWT BUFFER«, t00=0x005e, t01=0x00da}
0x93da…9406               Head {h00=0x0028, h01=0x0050, text=» ADK A1,1 UPDATE USER BUFFER POINTER«, t00=0x005e, t01=0x0110}
0x9406…9432               Head {h00=0x0028, h01=0x0050, text=» ADK A2,2 UPDATE DWT BUFFER POINTER «, t00=0x005e, t01=0x013c}
0x9432…945e               Head {h00=0x0028, h01=0x0050, text=» RB TIPO10 MOVE REMAINING CHARACTERS«, t00=0x005e, t01=0x0168}
0x945e…9468 (95, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0004}
0x9468…9480               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x005f, t01=0x000e}
0x9480…948a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0026}
0x948a…94a0               Head {h00=0x0012, h01=0x0050, text=»* I O : E R R «, t00=0x005f, t01=0x0030}
0x94a0…94aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0046}
0x94aa…94da               Head {h00=0x002c, h01=0x0050, text=»* DRIVER (DWT) MMU BUFFER IS TOO SMALL. «, t00=0x005f, t01=0x0050}
0x94da…9520               Head {h00=0x0042, h01=0x0050, text=»* SET RETURN CODE /8008 (REQUEST ERROR AND INCORRECT LENGTH). «, t00=0x005f, t01=0x0080}
0x9520…954a               Head {h00=0x0026, h01=0x0050, text=»* BRANCH TO DISPATCHER VIA TENDIO.«, t00=0x005f, t01=0x00c6}
0x954a…9554               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00f0}
0x9554…958c               Head {h00=0x0034, h01=0x0050, text=»IO:ERR EQU * REQUEST ERROR EXIT FOR MMU ROUTINES«, t00=0x005f, t01=0x00fa}
0x958c…9598               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x005f, t01=0x0132}
0x9598…95c0               Head {h00=0x0024, h01=0x0050, text=»  ADKL A15,4 ADJUST STACKPOINTER«, t00=0x005f, t01=0x013e}
0x95c0…95e2               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT STATUS«, t00=0x005f, t01=0x0166}
0x95e2…9602               Head {h00=0x001c, h01=0x0050, text=» SLL A1,2 CHECK ECHO BIT«, t00=0x005f, t01=0x0188}
0x9602…9622               Head {h00=0x001c, h01=0x0050, text=» RF(NN) IO:E10 NOT ECHO «, t00=0x0060, t01=0x0018}
0x9622…9646               Head {h00=0x0020, h01=0x0050, text=» LDR A1,A6 SAVE DWT ADDRESS «, t00=0x0060, t01=0x0038}
0x9646…9670               Head {h00=0x0026, h01=0x0050, text=» LD A6,DWTECH,A6 ECHO DWT ADDRESS «, t00=0x0060, t01=0x005c}
0x9670…9686               Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x0060, t01=0x0086}
0x9686…96ac               Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 RESTORE DWT ADDRESS«, t00=0x0060, t01=0x009c}
0x96ac…96b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00c2}
0x96b6…96ca               Head {h00=0x0010, h01=0x0050, text=»IO:E10 EQU *«, t00=0x0060, t01=0x00cc}
0x96ca…96f0               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/8008 SET RETURN CODE«, t00=0x0060, t01=0x00e0}
0x96f0…9724               Head {h00=0x0030, h01=0x0050, text=» ABL DISEND BRANCH TO DISPATCHER VIA TENDIO «, t00=0x0060, t01=0x0106}
0x9724…972e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x013a}
0x972e…9746               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0060, t01=0x0144}
0x9746…9750               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x015c}
0x9750…9766               Head {h00=0x0012, h01=0x0050, text=»* T I O M X O «, t00=0x0060, t01=0x0166}
0x9766…9770               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x017c}
0x9770…9796               Head {h00=0x0022, h01=0x0050, text=»TIOMXO EQU TIOMXI MUX, OUTPUT «, t00=0x0060, t01=0x0186}
0x9796…97a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x001c}
0x97a0…97b6               Head {h00=0x0012, h01=0x0050, text=»* T I O K B O «, t00=0x0061, t01=0x0026}
0x97b6…97c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x003c}
0x97c0…97ee               Head {h00=0x002a, h01=0x0050, text=»TIOKBO EQU TIOPCO KEYBOARD/CTW, OUTPUT«, t00=0x0061, t01=0x0046}
0x97ee…97f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0074}
0x97f8…980e               Head {h00=0x0012, h01=0x0050, text=»* T I O I T O «, t00=0x0061, t01=0x007e}
0x980e…9818               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0094}
0x9818…9852               Head {h00=0x0036, h01=0x0050, text=»TIOITO EQU A15RTN INTERTASK COMMUNICATION, OUTPUT «, t00=0x0061, t01=0x009e}
0x9852…985c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00d8}
0x985c…9872               Head {h00=0x0012, h01=0x0050, text=»* T I O D K O «, t00=0x0061, t01=0x00e2}
0x9872…987c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00f8}
0x987c…98a2               Head {h00=0x0022, h01=0x0050, text=»TIODKO EQU TIODKI DISC, OUTPUT«, t00=0x0061, t01=0x0102}
0x98a2…98ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0128}
0x98ac…98c4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0061, t01=0x0132}
0x98c4…98ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x014a}
0x98ce…98e4               Head {h00=0x0012, h01=0x0050, text=»* T E N : D M «, t00=0x0061, t01=0x0154}
0x98e4…98ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x016a}
0x98ee…9928               Head {h00=0x0036, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TENDIO' WHEN A REQUEST«, t00=0x0061, t01=0x0174}
0x9928…995a               Head {h00=0x002e, h01=0x0050, text=»* FOR DATA MANAGEMENT HAS BEEN COMPLETED. «, t00=0x0062, t01=0x001e}
0x995a…99a2               Head {h00=0x0044, h01=0x0050, text=»* NOTICE THAT MODULES 'TENDKI' AND 'TENDKO' ARE EQUAL TO TEN:DM.«, t00=0x0062, t01=0x0050}
0x99a2…99ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0098}
0x99ac…99ce               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x0062, t01=0x00a2}
0x99ce…99f6               Head {h00=0x0024, h01=0x0050, text=»*         A8 = USER ECB ADDRESS «, t00=0x0062, t01=0x00c4}
0x99f6…9a00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x00ec}
0x9a00…9a22               Head {h00=0x001e, h01=0x0050, text=»* OUTPUT: A1 IS DESTROYED «, t00=0x0062, t01=0x00f6}
0x9a22…9a2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0118}
0x9a2c…9a5e               Head {h00=0x002e, h01=0x0050, text=»TEN:DM EQU * DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x0062, t01=0x0122}
0x9a5e…9a86               Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTMEC,A6 MMU ECB ADDRESS«, t00=0x0062, t01=0x0154}
0x9a86…9ab2               Head {h00=0x0028, h01=0x0050, text=» LD A1,ECBCW2,A1 SECOND CONTROL WORD«, t00=0x0062, t01=0x017c}
0x9ab2…9aca               Head {h00=0x0014, h01=0x0050, text=» ES A1,ECBCW2,A8«, t00=0x0063, t01=0x0018}
0x9aca…9ada               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0063, t01=0x0030}
0x9ada…9ae4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0040}
0x9ae4…9afc               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0063, t01=0x004a}
0x9afc…9b06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0062}
0x9b06…9b1c               Head {h00=0x0012, h01=0x0050, text=»* T E N P C I «, t00=0x0063, t01=0x006c}
0x9b1c…9b26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0082}
0x9b26…9b6e               Head {h00=0x0044, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TENDIO' WHEN A READ REQUEST HAS BEEN«, t00=0x0063, t01=0x008c}
0x9b6e…9bb2               Head {h00=0x0040, h01=0x0050, text=»* COMPLETED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL.«, t00=0x0063, t01=0x00d4}
0x9bb2…9bf4               Head {h00=0x003e, h01=0x0050, text=»* TENPCI PERFORMS A MOVE OF THE CONTENTS OF THE DWT BUFFER«, t00=0x0063, t01=0x0118}
0x9bf4…9c12               Head {h00=0x001a, h01=0x0050, text=»* TO THE USER BUFFER. «, t00=0x0063, t01=0x015a}
0x9c12…9c5a               Head {h00=0x0044, h01=0x0050, text=»* NOTICE THAT MODULES 'TENKBI' AND 'TENITI' ARE EQUAL TO TENPCI.«, t00=0x0063, t01=0x0178}
0x9c5a…9c96               Head {h00=0x0038, h01=0x0050, text=»* NOTICE ALSO THAT ENTRY TEN:DC IS USED BY 'DC:MIN'.«, t00=0x0064, t01=0x0030}
0x9c96…9ca0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x006c}
0x9ca0…9cc2               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x0064, t01=0x0076}
0x9cc2…9cea               Head {h00=0x0024, h01=0x0050, text=»*         A8 = USER ECB ADDRESS «, t00=0x0064, t01=0x0098}
0x9cea…9cf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x00c0}
0x9cf4…9d1e               Head {h00=0x0026, h01=0x0050, text=»* OUTPUT: A1-A4, A8 ARE DESTROYED «, t00=0x0064, t01=0x00ca}
0x9d1e…9d28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x00f4}
0x9d28…9d56               Head {h00=0x002a, h01=0x0050, text=»TENPCI EQU * PROGRAMMED CHANNEL, INPUT«, t00=0x0064, t01=0x00fe}
0x9d56…9d7e               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTECB,A6 DWT ECB ADDRESS«, t00=0x0064, t01=0x012c}
0x9d7e…9da6               Head {h00=0x0024, h01=0x0050, text=» LD A4,ECBEL,A2 EFFECTIVE LENGTH«, t00=0x0064, t01=0x0154}
0x9da6…9dcc               Head {h00=0x0022, h01=0x0050, text=» RF(NP) TEPI30 NO MOVE IF ZERO«, t00=0x0064, t01=0x017c}
0x9dcc…9df6               Head {h00=0x0026, h01=0x0050, text=» LD A1,ECBBA,A2 DWT BUFFER ADDRESS«, t00=0x0065, t01=0x0012}
0x9df6…9e00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x003c}
0x9e00…9e32               Head {h00=0x002e, h01=0x0050, text=»TEN:DC EQU * ENTRY POINT USED BY 'DC:MIN' «, t00=0x0065, t01=0x0046}
0x9e32…9e5e               Head {h00=0x0028, h01=0x0050, text=» EL A2,ECBBA,A8 USER BUFFER ADDRESS «, t00=0x0065, t01=0x0078}
0x9e5e…9e86               Head {h00=0x0024, h01=0x0050, text=» LDK A3,1 CHECK BUFFER ADDRESSES«, t00=0x0065, t01=0x00a4}
0x9e86…9e98               Head {h00=0x000e, h01=0x0050, text=» TM A3,A1 «, t00=0x0065, t01=0x00cc}
0x9e98…9ec6               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TEPI20 DWT BUFFER ADDRESS EVEN «, t00=0x0065, t01=0x00de}
0x9ec6…9ef6               Head {h00=0x002c, h01=0x0050, text=» TM A3,A2 NO, CHECK USER BUFFER ADDRESS «, t00=0x0065, t01=0x010c}
0x9ef6…9f24               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TEPI60 USER BUFFER ADDRESS EVEN«, t00=0x0065, t01=0x013c}
0x9f24…9f2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x016a}
0x9f2e…9f46               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0065, t01=0x0174}
0x9f46…9f50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x018c}
0x9f50…9f5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0008}
0x9f5a…9f90               Head {h00=0x0032, h01=0x0050, text=»TEPI10 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN«, t00=0x0066, t01=0x0012}
0x9f90…9fc4               Head {h00=0x0030, h01=0x0050, text=»  LDR* A3,A1 FIRST CHARACTER FROM DWT BUFFER«, t00=0x0066, t01=0x0048}
0x9fc4…9fd6               Head {h00=0x000e, h01=0x0050, text=» ELR A8,A2«, t00=0x0066, t01=0x007c}
0x9fd6…9fe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x008e}
0x9fe0…a00e               Head {h00=0x002a, h01=0x0050, text=»TEPI15 ANK A3,/FF SKIP LEFT CHARACTER «, t00=0x0066, t01=0x0098}
0xa00e…a03a               Head {h00=0x0028, h01=0x0050, text=» ANKL A8,/FF00 SKIP RIGHT CHARACTER «, t00=0x0066, t01=0x00c6}
0xa03a…a04c               Head {h00=0x000e, h01=0x0050, text=» ORR A8,A3«, t00=0x0066, t01=0x00f2}
0xa04c…a07e               Head {h00=0x002e, h01=0x0050, text=» ESR A8,A2 STORE CHARACTER IN USER BUFFER «, t00=0x0066, t01=0x0104}
0xa07e…a0a6               Head {h00=0x0024, h01=0x0050, text=» ADK A1,1 UPDATE BUFFER POINTERS«, t00=0x0066, t01=0x0136}
0xa0a6…a0b8               Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0066, t01=0x015e}
0xa0b8…a0ca               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0066, t01=0x0170}
0xa0ca…a0f8               Head {h00=0x002a, h01=0x0050, text=» RF(P) TEPI25 MORE CHARACTERS TO MOVE «, t00=0x0066, t01=0x0182}
0xa0f8…a114               Head {h00=0x0018, h01=0x0050, text=» RTN A15 NO, RETURN «, t00=0x0067, t01=0x0020}
0xa114…a11e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x003c}
0xa11e…a136               Head {h00=0x0014, h01=0x0050, text=»TEPI20 TM A3,A2 «, t00=0x0067, t01=0x0046}
0xa136…a164               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TEPI25 USER BUFFER ADDRESS EVEN«, t00=0x0067, t01=0x005e}
0xa164…a18a               Head {h00=0x0022, h01=0x0050, text=» LDR A3,A1 DWT BUFFER ADDRESS «, t00=0x0067, t01=0x008c}
0xa18a…a1b2               Head {h00=0x0024, h01=0x0050, text=» ADR A3,A4 ADD EFFECTIVE LENGTH «, t00=0x0067, t01=0x00b2}
0xa1b2…a1bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00da}
0xa1bc…a1e4               Head {h00=0x0024, h01=0x0050, text=»TEPI23 LC A8,-1,A3 ONE CHARACTER«, t00=0x0067, t01=0x00e4}
0xa1e4…a21c               Head {h00=0x0034, h01=0x0050, text=» SCR A8,A3 MOVE THIS CHAR. ONE BYTE TO THE RIGHT«, t00=0x0067, t01=0x010c}
0xa21c…a246               Head {h00=0x0026, h01=0x0050, text=» SUK A3,1 POINT TO NEXT CHARACTER «, t00=0x0067, t01=0x0144}
0xa246…a27e               Head {h00=0x0034, h01=0x0050, text=» CWR A3,A1 COMPARE WITH START ADDRESS OF BUFFER «, t00=0x0067, t01=0x016e}
0xa27e…a2ac               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TEPI23 MORE CHARACTERS TO MOVE«, t00=0x0068, t01=0x0016}
0xa2ac…a2e0               Head {h00=0x0030, h01=0x0050, text=» ADK A1,1 NO, MAKE DWT BUFFER ADDRESS UNEVEN«, t00=0x0068, t01=0x0044}
0xa2e0…a2f2               Head {h00=0x000e, h01=0x0050, text=» RB TEPI10«, t00=0x0068, t01=0x0078}
0xa2f2…a2fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x008a}
0xa2fc…a314               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0068, t01=0x0094}
0xa314…a31e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00ac}
0xa31e…a328               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00b6}
0xa328…a358               Head {h00=0x002c, h01=0x0050, text=»TEPI25 LDR A3,A4 CHECK REQUESTED LENGTH «, t00=0x0068, t01=0x00c0}
0xa358…a36a               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0068, t01=0x00f0}
0xa36a…a398               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TEPI40 EFFECTIVE LENGTH UNEVEN«, t00=0x0068, t01=0x0102}
0xa398…a3cc               Head {h00=0x0030, h01=0x0050, text=» MVSU A4 MOVE (SYSTEM BUFFER) TO USER BUFFER«, t00=0x0068, t01=0x0130}
0xa3cc…a3d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0164}
0xa3d6…a3ec               Head {h00=0x0012, h01=0x0050, text=»TEPI30 RTN A15«, t00=0x0068, t01=0x016e}
0xa3ec…a3f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0184}
0xa3f6…a426               Head {h00=0x002c, h01=0x0050, text=»TEPI40 EQU * EFFECTIVE LENGTH WAS UNEVEN«, t00=0x0068, t01=0x018e}
0xa426…a452               Head {h00=0x0028, h01=0x0050, text=» SUK A4,1 MAKE EFFECTIVE LENGTH EVEN«, t00=0x0069, t01=0x002e}
0xa452…a482               Head {h00=0x002c, h01=0x0050, text=» RF(Z) TEPI50 ONLY ONE CHARACTER TO MOVE«, t00=0x0069, t01=0x005a}
0xa482…a4a0               Head {h00=0x001a, h01=0x0050, text=» LDR A8,A4 NO, SAVE A4«, t00=0x0069, t01=0x008a}
0xa4a0…a4d4               Head {h00=0x0030, h01=0x0050, text=» MVSU A4 MOVE (SYSTEM BUFFER) TO USER BUFFER«, t00=0x0069, t01=0x00a8}
0xa4d4…a4fe               Head {h00=0x0026, h01=0x0050, text=» ADR A1,A8 UPDATE BUFFER POINTERS «, t00=0x0069, t01=0x00dc}
0xa4fe…a510               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A8«, t00=0x0069, t01=0x0106}
0xa510…a51a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0118}
0xa51a…a52e               Head {h00=0x0010, h01=0x0050, text=»TEPI50 EQU *«, t00=0x0069, t01=0x0122}
0xa52e…a560               Head {h00=0x002e, h01=0x0050, text=» LDR* A8,A1 LAST CHARACTER FROM DWT BUFFER«, t00=0x0069, t01=0x0136}
0xa560…a572               Head {h00=0x000e, h01=0x0050, text=» ELR A3,A2«, t00=0x0069, t01=0x0168}
0xa572…a584               Head {h00=0x000e, h01=0x0050, text=» RB TEPI15«, t00=0x0069, t01=0x017a}
0xa584…a58e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x018c}
0xa58e…a5c0               Head {h00=0x002e, h01=0x0050, text=»TEPI60 EQU * DWT BUFFER ADDRESS WAS UNEVEN«, t00=0x006a, t01=0x0008}
0xa5c0…a5e6               Head {h00=0x0022, h01=0x0050, text=» LDR A3,A1 DWT BUFFER ADDRESS «, t00=0x006a, t01=0x003a}
0xa5e6…a60e               Head {h00=0x0024, h01=0x0050, text=» ADR A1,A4 ADD EFFECTIVE LENGTH «, t00=0x006a, t01=0x0060}
0xa60e…a618               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0088}
0xa618…a63e               Head {h00=0x0022, h01=0x0050, text=»TEPI70 LCR A8,A3 ONE CHARACTER«, t00=0x006a, t01=0x0092}
0xa63e…a678               Head {h00=0x0036, h01=0x0050, text=» SC A8,-1,A3 MOVE THIS CHAR. ONE BYTE TO THE LEFT «, t00=0x006a, t01=0x00b8}
0xa678…a6a2               Head {h00=0x0026, h01=0x0050, text=» ADK A3,1 POINT TO NEXT CHARACTER «, t00=0x006a, t01=0x00f2}
0xa6a2…a6d0               Head {h00=0x002a, h01=0x0050, text=» CWR A3,A1 COMPARE WITH ENDING ADDRESS«, t00=0x006a, t01=0x011c}
0xa6d0…a6fe               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TEPI70 MORE CHARACTERS TO MOVE«, t00=0x006a, t01=0x014a}
0xa6fe…a730               Head {h00=0x002e, h01=0x0050, text=» SUR A1,A4 NO, RESTORE DWT BUFFER ADDRESS «, t00=0x006a, t01=0x0178}
0xa730…a75e               Head {h00=0x002a, h01=0x0050, text=» SUK A1,1 MAKE DWT BUFFER ADDRESS EVEN«, t00=0x006b, t01=0x001a}
0xa75e…a770               Head {h00=0x000e, h01=0x0050, text=» RB TEPI25«, t00=0x006b, t01=0x0048}
0xa770…a77a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x005a}
0xa77a…a792               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x006b, t01=0x0064}
0xa792…a79c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x007c}
0xa79c…a7b2               Head {h00=0x0012, h01=0x0050, text=»* T E N M X I «, t00=0x006b, t01=0x0086}
0xa7b2…a7bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x009c}
0xa7bc…a7e0               Head {h00=0x0020, h01=0x0050, text=»TENMXI EQU A15RTN MUX, INPUT«, t00=0x006b, t01=0x00a6}
0xa7e0…a7ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00ca}
0xa7ea…a800               Head {h00=0x0012, h01=0x0050, text=»* T E N K B I «, t00=0x006b, t01=0x00d4}
0xa800…a80a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00ea}
0xa80a…a834               Head {h00=0x0026, h01=0x0050, text=»TENKBI EQU TENPCI KEYBOARD, INPUT «, t00=0x006b, t01=0x00f4}
0xa834…a83e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x011e}
0xa83e…a854               Head {h00=0x0012, h01=0x0050, text=»* T E N I T I «, t00=0x006b, t01=0x0128}
0xa854…a85e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x013e}
0xa85e…a896               Head {h00=0x0034, h01=0x0050, text=»TENITI EQU TENPCI INTERTASK COMMUNICATION, INPUT«, t00=0x006b, t01=0x0148}
0xa896…a8a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0180}
0xa8a0…a8b6               Head {h00=0x0012, h01=0x0050, text=»* T E N D K I «, t00=0x006b, t01=0x018a}
0xa8b6…a8c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0010}
0xa8c0…a8e6               Head {h00=0x0022, h01=0x0050, text=»TENDKI EQU TEN:DM DISC, INPUT «, t00=0x006c, t01=0x001a}
0xa8e6…a8f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0040}
0xa8f0…a908               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x006c, t01=0x004a}
0xa908…a912               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0062}
0xa912…a928               Head {h00=0x0012, h01=0x0050, text=»* T E N P C O «, t00=0x006c, t01=0x006c}
0xa928…a932               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0082}
0xa932…a966               Head {h00=0x0030, h01=0x0050, text=»TENPCO EQU A15RTN PROGRAMMED CHANNEL, OUTPUT«, t00=0x006c, t01=0x008c}
0xa966…a970               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00c0}
0xa970…a986               Head {h00=0x0012, h01=0x0050, text=»* T E N M X O «, t00=0x006c, t01=0x00ca}
0xa986…a990               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00e0}
0xa990…a9b6               Head {h00=0x0022, h01=0x0050, text=»TENMXO EQU A15RTN MUX, OUTPUT «, t00=0x006c, t01=0x00ea}
0xa9b6…a9c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0110}
0xa9c0…a9d6               Head {h00=0x0012, h01=0x0050, text=»* T E N K B O «, t00=0x006c, t01=0x011a}
0xa9d6…a9e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0130}
0xa9e0…aa0e               Head {h00=0x002a, h01=0x0050, text=»TENKBO EQU A15RTN KEYBOARD/CTW, OUTPUT«, t00=0x006c, t01=0x013a}
0xaa0e…aa18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0168}
0xaa18…aa2e               Head {h00=0x0012, h01=0x0050, text=»* T E N D K O «, t00=0x006c, t01=0x0172}
0xaa2e…aa38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0188}
0xaa38…aa5e (109, 0, 400) Head {h00=0x0022, h01=0x0050, text=»TENDKO EQU TEN:DM DISC, OUTPUT«, t00=0x006d, t01=0x0004}
0xaa5e…aa68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x002a}
0xaa68…aa80               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x006d, t01=0x0034}
0xaa80…aa8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x004c}
0xaa8a…aaa0               Head {h00=0x0012, h01=0x0050, text=»* T E N I T O «, t00=0x006d, t01=0x0056}
0xaaa0…aaaa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x006c}
0xaaaa…aaf4               Head {h00=0x0046, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TENDIO' WHEN A WRITE REQUEST HAS BEEN «, t00=0x006d, t01=0x0076}
0xaaf4…ab44               Head {h00=0x004c, h01=0x0050, text=»* COMPLETED FOR INTERTASK COMMUNICATION, IN PURPOSE TO MOVE THE CONTENTS«, t00=0x006d, t01=0x00c0}
0xab44…ab92               Head {h00=0x004a, h01=0x0050, text=»* OF THE USER BUFFER TO THE DRIVER BUFFER. THE ENTRY TIPO05 IN MODULE «, t00=0x006d, t01=0x0110}
0xab92…abc2               Head {h00=0x002c, h01=0x0050, text=»* 'TIOPCO' IS USED FOR MOVING THE DATA. «, t00=0x006d, t01=0x015e}
0xabc2…abcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x018e}
0xabcc…abee               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x006e, t01=0x0008}
0xabee…abf8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x002a}
0xabf8…ac22               Head {h00=0x0026, h01=0x0050, text=»* OUTPUT: A1-A4, A8 ARE DESTROYED «, t00=0x006e, t01=0x0034}
0xac22…ac2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x005e}
0xac2c…ac60               Head {h00=0x0030, h01=0x0050, text=»TENITO EQU * INTERTASK COMMUNICATION, OUTPUT«, t00=0x006e, t01=0x0068}
0xac60…ac88               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 DWT ECB ADDRESS«, t00=0x006e, t01=0x009c}
0xac88…acb0               Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBEL,A8 EFFECTIVE LENGTH«, t00=0x006e, t01=0x00c4}
0xacb0…acce               Head {h00=0x001a, h01=0x0050, text=» RF(NP) TEIO10 NO MOVE«, t00=0x006e, t01=0x00ec}
0xacce…acf8               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTUEC,A6 USER ECB ADDRESS «, t00=0x006e, t01=0x010a}
0xacf8…ad24               Head {h00=0x0028, h01=0x0050, text=» CF A15,TIPO05 MOVE BUFFER CONTENTS «, t00=0x006e, t01=0x0134}
0xad24…ad2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0160}
0xad2e…ad44               Head {h00=0x0012, h01=0x0050, text=»TEIO10 RTN A15«, t00=0x006e, t01=0x016a}
0xad44…ad4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0180}
0xad4e…ad66               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x006e, t01=0x018a}
0xad66…ad70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0012}
0xad70…ad86               Head {h00=0x0012, h01=0x0050, text=»* D C : M O T «, t00=0x006f, t01=0x001c}
0xad86…ad90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0032}
0xad90…add0               Head {h00=0x003c, h01=0x0050, text=»* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER«, t00=0x006f, t01=0x003c}
0xadd0…ae10               Head {h00=0x003c, h01=0x0050, text=»* IN PURPOSE TO MOVE THE CONTENTS OF THE USER BUFFER TO «, t00=0x006f, t01=0x007c}
0xae10…ae50               Head {h00=0x003c, h01=0x0050, text=»* THE DRIVER BUFFER. THE MOVE ROUTINE IN MODULE 'TIOPCO'«, t00=0x006f, t01=0x00bc}
0xae50…ae76               Head {h00=0x0022, h01=0x0050, text=»* IS USED FOR MOVING THE DATA.«, t00=0x006f, t01=0x00fc}
0xae76…ae80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0122}
0xae80…aea2               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x006f, t01=0x012c}
0xaea2…aeac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x014e}
0xaeac…aed8               Head {h00=0x0028, h01=0x0050, text=»* OUTPUT: NO REGISTERS ARE DESTROYED«, t00=0x006f, t01=0x0158}
0xaed8…aee2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0184}
0xaee2…af12               Head {h00=0x002c, h01=0x0050, text=»DC:MOT EQU * DATA COMMUNICATION, OUTPUT «, t00=0x006f, t01=0x018e}
0xaf12…af38               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0070, t01=0x002e}
0xaf38…af60               Head {h00=0x0024, h01=0x0050, text=» SUKL A15,32 ADJUST STACKPOINTER«, t00=0x0070, t01=0x0054}
0xaf60…af8e               Head {h00=0x002a, h01=0x0050, text=» TS 2,A15 SAVE MMU REGISTERS ON STACK «, t00=0x0070, t01=0x007c}
0xaf8e…afb4               Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A6 TTAB ADDRESS «, t00=0x0070, t01=0x00aa}
0xafb4…afdc               Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS«, t00=0x0070, t01=0x00d0}
0xafdc…b004               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTMEC,A6 DWT ECB ADDRESS«, t00=0x0070, t01=0x00f8}
0xb004…b010               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0070, t01=0x0120}
0xb010…b03c               Head {h00=0x0028, h01=0x0050, text=» CF A15,TIOPCO MOVE BUFFER CONTENTS «, t00=0x0070, t01=0x012c}
0xb03c…b046               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0158}
0xb046…b06e               Head {h00=0x0024, h01=0x0050, text=»DC:RTN EQU * RETURN TO DC DRIVER«, t00=0x0070, t01=0x0162}
0xb06e…b0a0               Head {h00=0x002e, h01=0x0050, text=» TL 2,A15 RESTORE MMU REGISTERS FROM STACK«, t00=0x0070, t01=0x018a}
0xb0a0…b0c8               Head {h00=0x0024, h01=0x0050, text=» ADKL A15,32 ADJUST STACKPOINTER«, t00=0x0071, t01=0x002c}
0xb0c8…b0f6               Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x0071, t01=0x0054}
0xb0f6…b114               Head {h00=0x001a, h01=0x0050, text=» RTN A15 ...AND RETURN«, t00=0x0071, t01=0x0082}
0xb114…b120               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x00a0}
0xb120…b12a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00ac}
0xb12a…b142               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0071, t01=0x00b6}
0xb142…b14c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00ce}
0xb14c…b162               Head {h00=0x0012, h01=0x0050, text=»* D C : M I N «, t00=0x0071, t01=0x00d8}
0xb162…b16c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00ee}
0xb16c…b1ac               Head {h00=0x003c, h01=0x0050, text=»* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER«, t00=0x0071, t01=0x00f8}
0xb1ac…b1fe               Head {h00=0x004e, h01=0x0050, text=»* IN PURPOSE TO MOVE THE CONTENTS OF THE DRIVER BUFFER TO THE USER BUFFER.«, t00=0x0071, t01=0x0138}
0xb1fe…b208               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x018a}
0xb208…b22a (114, 0, 400) Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A1 = RETURN CODE«, t00=0x0072, t01=0x0004}
0xb22a…b256               Head {h00=0x0028, h01=0x0050, text=»*         A4 = DRIVER BUFFER ADDRESS«, t00=0x0072, t01=0x0026}
0xb256…b278               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x0072, t01=0x0052}
0xb278…b282               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0074}
0xb282…b2ae               Head {h00=0x0028, h01=0x0050, text=»* OUTPUT: NO REGISTERS ARE DESTROYED«, t00=0x0072, t01=0x007e}
0xb2ae…b2b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00aa}
0xb2b8…b2cc               Head {h00=0x0010, h01=0x0050, text=»DC:MIN EQU *«, t00=0x0072, t01=0x00b4}
0xb2cc…b2e2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0072, t01=0x00c8}
0xb2e2…b2f8               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0072, t01=0x00de}
0xb2f8…b322               Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0072, t01=0x00f4}
0xb322…b32e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x011e}
0xb32e…b338               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x012a}
0xb338…b34e               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0072, t01=0x0134}
0xb34e…b374               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0072, t01=0x014a}
0xb374…b37e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0170}
0xb37e…b394               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0072, t01=0x017a}
0xb394…b3bc               Head {h00=0x0024, h01=0x0050, text=» SUKL A15,32 ADJUST STACKPOINTER«, t00=0x0072, t01=0x0190}
0xb3bc…b3ea               Head {h00=0x002a, h01=0x0050, text=» TS 2,A15 SAVE MMU REGISTERS ON STACK «, t00=0x0073, t01=0x0028}
0xb3ea…b410               Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A6 TTAB ADDRESS «, t00=0x0073, t01=0x0056}
0xb410…b438               Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS«, t00=0x0073, t01=0x007c}
0xb438…b444               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x00a4}
0xb444…b44e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00b0}
0xb44e…b466               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0073, t01=0x00ba}
0xb466…b470               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00d2}
0xb470…b486               Head {h00=0x0012, h01=0x0050, text=»* M I N M O V «, t00=0x0073, t01=0x00dc}
0xb486…b490               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00f2}
0xb490…b4b2               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A1 = RETURN CODE«, t00=0x0073, t01=0x00fc}
0xb4b2…b4d4               Head {h00=0x001e, h01=0x0050, text=»*         A3 = ECB ADDRESS«, t00=0x0073, t01=0x011e}
0xb4d4…b500               Head {h00=0x0028, h01=0x0050, text=»*         A4 = DRIVER BUFFER ADDRESS«, t00=0x0073, t01=0x0140}
0xb500…b522               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x0073, t01=0x016c}
0xb522…b52c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x018e}
0xb52c…b552               Head {h00=0x0022, h01=0x0050, text=»MINMOV EQU * DC:MIN MOVE ENTRY«, t00=0x0074, t01=0x0008}
0xb552…b55e               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0074, t01=0x002e}
0xb55e…b582               Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTECB,A6 ECB ADDRESS«, t00=0x0074, t01=0x003a}
0xb582…b5b0               Head {h00=0x002a, h01=0x0050, text=» LDR A7,A4 SAVE DRIVER BUFFER ADDRESS «, t00=0x0074, t01=0x005e}
0xb5b0…b5d8               Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBEL,A3 EFFECTIVE LENGTH«, t00=0x0074, t01=0x008c}
0xb5d8…b5fe               Head {h00=0x0022, h01=0x0050, text=» RF(NP) MIN:40 NOTHING TO MOVE«, t00=0x0074, t01=0x00b4}
0xb5fe…b63a               Head {h00=0x0038, h01=0x0050, text=» CW A2,ECBRL,A3 CHECK IF USER BUFFER IS LARGE ENOUGH«, t00=0x0074, t01=0x00da}
0xb63a…b662               Head {h00=0x0024, h01=0x0050, text=» RF(G) MIN:70 NO, REQUEST ERROR «, t00=0x0074, t01=0x0116}
0xb662…b66c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x013e}
0xb66c…b682               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0074, t01=0x0148}
0xb682…b6ae               Head {h00=0x0028, h01=0x0050, text=» LD A5,ECBBA,A3 USER BUFFER ADDRESS «, t00=0x0074, t01=0x015e}
0xb6ae…b6c0               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A5«, t00=0x0074, t01=0x018a}
0xb6c0…b6ec               Head {h00=0x0028, h01=0x0050, text=» ANK A3,1 CHECK USER BUFFER ADDRESS «, t00=0x0075, t01=0x000c}
0xb6ec…b71e               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) MIN:30 USER BUFFER ADDRESS UNEVEN «, t00=0x0075, t01=0x0038}
0xb71e…b730               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0075, t01=0x006a}
0xb730…b760               Head {h00=0x002c, h01=0x0050, text=» RF(N) MIN:30 ONLY ONE CHARACTER TO MOVE«, t00=0x0075, t01=0x007c}
0xb760…b76a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00ac}
0xb76a…b782               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0075, t01=0x00b6}
0xb782…b78c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00ce}
0xb78c…b7a0               Head {h00=0x0010, h01=0x0050, text=»* WORD MOVE «, t00=0x0075, t01=0x00d8}
0xb7a0…b7aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00ec}
0xb7aa…b7be               Head {h00=0x0010, h01=0x0050, text=»MIN:10 EQU *«, t00=0x0075, t01=0x00f6}
0xb7be…b7e0               Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A7 MOVE ONE WORD «, t00=0x0075, t01=0x010a}
0xb7e0…b7f2               Head {h00=0x000e, h01=0x0050, text=» STR A3,A5«, t00=0x0075, t01=0x012c}
0xb7f2…b81e               Head {h00=0x0028, h01=0x0050, text=» ADK A7,2 INCREMENT BUFFER POINTERS «, t00=0x0075, t01=0x013e}
0xb81e…b830               Head {h00=0x000e, h01=0x0050, text=» ADK A5,2 «, t00=0x0075, t01=0x016a}
0xb830…b858               Head {h00=0x0024, h01=0x0050, text=» SUK A2,2 DECREMENT LOOP COUNTER«, t00=0x0075, t01=0x017c}
0xb858…b88e               Head {h00=0x0032, h01=0x0050, text=» RB(NN) MIN:10 AT LEAST ONE MORE WORD TO MOVE «, t00=0x0076, t01=0x0014}
0xb88e…b898               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x004a}
0xb898…b8ac               Head {h00=0x0010, h01=0x0050, text=»MIN:20 EQU *«, t00=0x0076, t01=0x0054}
0xb8ac…b8be               Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0076, t01=0x0068}
0xb8be…b8e2               Head {h00=0x0020, h01=0x0050, text=» RF(N) MIN:40 MOVE FINISHED «, t00=0x0076, t01=0x007a}
0xb8e2…b8ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x009e}
0xb8ec…b904               Head {h00=0x0014, h01=0x0050, text=»* CHARACTER MOVE«, t00=0x0076, t01=0x00a8}
0xb904…b90e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00c0}
0xb90e…b922               Head {h00=0x0010, h01=0x0050, text=»MIN:30 EQU *«, t00=0x0076, t01=0x00ca}
0xb922…b948               Head {h00=0x0022, h01=0x0050, text=» LCR A3,A7 MOVE ONE CHARACTER «, t00=0x0076, t01=0x00de}
0xb948…b95a               Head {h00=0x000e, h01=0x0050, text=» SCR A3,A5«, t00=0x0076, t01=0x0104}
0xb95a…b986               Head {h00=0x0028, h01=0x0050, text=» ADK A7,1 INCREMENT BUFFER POINTERS «, t00=0x0076, t01=0x0116}
0xb986…b998               Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x0076, t01=0x0142}
0xb998…b9c0               Head {h00=0x0024, h01=0x0050, text=» SUK A2,1 DECREMENT LOOP COUNTER«, t00=0x0076, t01=0x0154}
0xb9c0…b9fa               Head {h00=0x0036, h01=0x0050, text=» RB(P) MIN:30 AT LEAST ONE MORE CHARACTER TO MOVE «, t00=0x0076, t01=0x017c}
0xb9fa…ba06               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x0026}
0xba06…ba10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0032}
0xba10…ba26               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0077, t01=0x003c}
0xba26…ba54               Head {h00=0x002a, h01=0x0050, text=» ST A1,ECBRC,A3 SET RETURN CODE IN ECB«, t00=0x0077, t01=0x0052}
0xba54…ba7c               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A4 DRIVER BUFFER ADDRESS«, t00=0x0077, t01=0x0080}
0xba7c…baa0               Head {h00=0x0020, h01=0x0050, text=» LDR A4,A2 EFFECTIVE LENGTH «, t00=0x0077, t01=0x00a8}
0xbaa0…baca               Head {h00=0x0026, h01=0x0050, text=» LD A8,DWTUEC,A6 USER ECB ADDRESS «, t00=0x0077, t01=0x00cc}
0xbaca…baf6               Head {h00=0x0028, h01=0x0050, text=» CF A15,TEN:DC MOVE BUFFER CONTENTS «, t00=0x0077, t01=0x00f6}
0xbaf6…bb20               Head {h00=0x0026, h01=0x0050, text=» LDR A4,A7 RESTORE BUFFER ADDRESS «, t00=0x0077, t01=0x0122}
0xbb20…bb32               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0077, t01=0x014c}
0xbb32…bb3e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x015e}
0xbb3e…bb48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x016a}
0xbb48…bb60               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0077, t01=0x0174}
0xbb60…bb6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x018c}
0xbb6a…bb74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0008}
0xbb74…bb88               Head {h00=0x0010, h01=0x0050, text=»MIN:40 EQU *«, t00=0x0078, t01=0x0012}
0xbb88…bb94               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0078, t01=0x0026}
0xbb94…bbba               Head {h00=0x0022, h01=0x0050, text=» CF A15,TENDIO PERFORM TENDIO «, t00=0x0078, t01=0x0032}
0xbbba…bbc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0058}
0xbbc4…bbdc               Head {h00=0x0014, h01=0x0050, text=»* RELEASE BUFFER«, t00=0x0078, t01=0x0062}
0xbbdc…bbe6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x007a}
0xbbe6…bc14               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTADR,A6 DRIVER ADDRESS BLOCK «, t00=0x0078, t01=0x0084}
0xbc14…bc40               Head {h00=0x0028, h01=0x0050, text=» LD A1,POLADR,A3 BUFFER POOL ADDRESS«, t00=0x0078, t01=0x00b2}
0xbc40…bc6a               Head {h00=0x0026, h01=0x0050, text=» RF(Z) MIN:60 NO RELEASE OF BUFFER«, t00=0x0078, t01=0x00de}
0xbc6a…bc74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0108}
0xbc74…bc88               Head {h00=0x0010, h01=0x0050, text=»MIN:50 EQU *«, t00=0x0078, t01=0x0112}
0xbc88…bcae               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A1 SAVE BUFFER ADDRESS«, t00=0x0078, t01=0x0126}
0xbcae…bcd6               Head {h00=0x0024, h01=0x0050, text=» LDR* A1,A2 NEXT BUFFER ADDRESS «, t00=0x0078, t01=0x014c}
0xbcd6…bd06               Head {h00=0x002c, h01=0x0050, text=» RB(NZ) MIN:50 NOT LAST BUFFER IN CHAIN «, t00=0x0078, t01=0x0174}
0xbd06…bd10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0014}
0xbd10…bd38               Head {h00=0x0024, h01=0x0050, text=»* INSERT BUFFER AT END OF CHAIN «, t00=0x0079, t01=0x001e}
0xbd38…bd42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0046}
0xbd42…bd6e               Head {h00=0x0028, h01=0x0050, text=» SU A4,HDRLEN,A3 REAL BUFFER ADDRESS«, t00=0x0079, t01=0x0050}
0xbd6e…bd94               Head {h00=0x0022, h01=0x0050, text=» STR A4,A2 UPDATE QUEUE LINKS «, t00=0x0079, t01=0x007c}
0xbd94…bda4               Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x0079, t01=0x00a2}
0xbda4…bdae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00b2}
0xbdae…bdc2               Head {h00=0x0010, h01=0x0050, text=»MIN:60 EQU *«, t00=0x0079, t01=0x00bc}
0xbdc2…bdd8               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0079, t01=0x00d0}
0xbdd8…be04               Head {h00=0x0028, h01=0x0050, text=» ABL IHRET8 RESTORE A1-A8 AND RETURN«, t00=0x0079, t01=0x00e6}
0xbe04…be10               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0112}
0xbe10…be1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x011e}
0xbe1a…be32               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0079, t01=0x0128}
0xbe32…be3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0140}
0xbe3c…be46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x014a}
0xbe46…be5c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0079, t01=0x0154}
0xbe5c…be72               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0079, t01=0x016a}
0xbe72…bea0               Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x0079, t01=0x0180}
0xbea0…beaa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x001e}
0xbeaa…bece               Head {h00=0x0020, h01=0x0050, text=»DC:MOT RTN A15 ...AND RETURN«, t00=0x007a, t01=0x0028}
0xbece…beda               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x004c}
0xbeda…bee4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0058}
0xbee4…befa               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x007a, t01=0x0062}
0xbefa…bf20               Head {h00=0x0022, h01=0x0050, text=» RB DC:RTN RETURN TO DC DRIVER«, t00=0x007a, t01=0x0078}
0xbf20…bf2c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x009e}
0xbf2c…bf36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00aa}
0xbf36…bf4a               Head {h00=0x0010, h01=0x0050, text=»* ERROR EXIT«, t00=0x007a, t01=0x00b4}
0xbf4a…bf54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00c8}
0xbf54…bf7a               Head {h00=0x0022, h01=0x0050, text=»MIN:70 EQU * DC:MIN ERROR EXIT«, t00=0x007a, t01=0x00d2}
0xbf7a…bfb0               Head {h00=0x0032, h01=0x0050, text=» LDKL A1,/8008 REQUEST ERROR/INCORRECT LENGTH «, t00=0x007a, t01=0x00f8}
0xbfb0…bfd8               Head {h00=0x0024, h01=0x0050, text=» RB MIN:40 RETURN VIA TENDIO ETC«, t00=0x007a, t01=0x012e}
0xbfd8…bfe2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0156}
0xbfe2…bffa               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007a, t01=0x0160}
0xbffa…c004               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0178}
0xc004…c00e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0182}
0xc00e…c024               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x007a, t01=0x018c}
0xc024…c03a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x007b, t01=0x0012}
0xc03a…c04e               Head {h00=0x0010, h01=0x0050, text=»DC:MOT EQU *«, t00=0x007b, t01=0x0028}
0xc04e…c084               Head {h00=0x0032, h01=0x0050, text=»  ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS«, t00=0x007b, t01=0x003c}
0xc084…c090               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007b, t01=0x0072}
0xc090…c09a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x007e}
0xc09a…c0b2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007b, t01=0x0088}
0xc0b2…c0bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00a0}
0xc0bc…c0c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00aa}
0xc0c6…c0d8               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x007b, t01=0x00b4}
0xc0d8…c0ea               Head {h00=0x000e, h01=0x0050, text=»* TENDIO *«, t00=0x007b, t01=0x00c6}
0xc0ea…c0fc               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x007b, t01=0x00d8}
0xc0fc…c106               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00ea}
0xc106…c110               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00f4}
0xc110…c142               Head {h00=0x002e, h01=0x0050, text=»* THIS MODULE IS CALLED WHEN COMPLETION OF«, t00=0x007b, t01=0x00fe}
0xc142…c158               Head {h00=0x0012, h01=0x0050, text=»* I/O OCCURS. «, t00=0x007b, t01=0x0130}
0xc158…c162               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0146}
0xc162…c18e               Head {h00=0x0028, h01=0x0050, text=»* - IF I/O AND ACTIVATION REQUEST:- «, t00=0x007b, t01=0x0150}
0xc18e…c198               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x017c}
0xc198…c1c6               Head {h00=0x002a, h01=0x0050, text=»*   ACTOTP IS CALLED TO START THE TASK«, t00=0x007b, t01=0x0186}
0xc1c6…c1d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0024}
0xc1d0…c1f4               Head {h00=0x0020, h01=0x0050, text=»* -IF NORMAL I/O WITH WAIT:-«, t00=0x007c, t01=0x002e}
0xc1f4…c1fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0052}
0xc1fe…c22c               Head {h00=0x002a, h01=0x0050, text=»*   QTJOB IS CALLED TO QUEUE THE TASK «, t00=0x007c, t01=0x005c}
0xc22c…c268               Head {h00=0x0038, h01=0x0050, text=»*   FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- «, t00=0x007c, t01=0x008a}
0xc268…c272               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00c6}
0xc272…c290               Head {h00=0x001a, h01=0x0050, text=»*   A5 = TTAB ADDRESS «, t00=0x007c, t01=0x00d0}
0xc290…c29a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00ee}
0xc29a…c2c2               Head {h00=0x0024, h01=0x0050, text=»* -IF NORMAL I/O WITH NO WAIT:- «, t00=0x007c, t01=0x00f8}
0xc2c2…c2cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0120}
0xc2cc…c2ea               Head {h00=0x001a, h01=0x0050, text=»*   NO ACTION REQUIRED«, t00=0x007c, t01=0x012a}
0xc2ea…c2f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0148}
0xc2f4…c336               Head {h00=0x003e, h01=0x0050, text=»* IF AN EVENT WAS QUEUED FOR THIS DEVICE (DWTTQ NOT ZERO) «, t00=0x007c, t01=0x0152}
0xc336…c384 (125, 0, 400) Head {h00=0x004a, h01=0x0050, text=»* THAT TASK IS PUT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION. «, t00=0x007d, t01=0x0004}
0xc384…c38e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0052}
0xc38e…c3a6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007d, t01=0x005c}
0xc3a6…c3b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0074}
0xc3b0…c3ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x007e}
0xc3ba…c3ee               Head {h00=0x0030, h01=0x0050, text=»* ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- «, t00=0x007d, t01=0x0088}
0xc3ee…c3f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00bc}
0xc3f8…c414               Head {h00=0x0018, h01=0x0050, text=»*   A1 = RETURN CODE«, t00=0x007d, t01=0x00c6}
0xc414…c41e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00e2}
0xc41e…c43a               Head {h00=0x0018, h01=0x0050, text=»*   A6 = DWT ADDRESS«, t00=0x007d, t01=0x00ec}
0xc43a…c444               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0108}
0xc444…c468               Head {h00=0x0020, h01=0x0050, text=»* NO REGISTERS ARE DESTROYED«, t00=0x007d, t01=0x0112}
0xc468…c472               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0136}
0xc472…c4a8               Head {h00=0x0032, h01=0x0050, text=»* WHEN RUNNING WITH MMU OPTION SPECIAL DEVICE «, t00=0x007d, t01=0x0140}
0xc4a8…c4d6               Head {h00=0x002a, h01=0x0050, text=»* DEPENDENT SUBROUTINES ARE PERFORMED.«, t00=0x007d, t01=0x0176}
0xc4d6…c4e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0014}
0xc4e0…c4f8               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007e, t01=0x001e}
0xc4f8…c502               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0036}
0xc502…c51a               Head {h00=0x0014, h01=0x0050, text=»* END I/O ENTRY «, t00=0x007e, t01=0x0040}
0xc51a…c524               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0058}
0xc524…c538               Head {h00=0x0010, h01=0x0050, text=»TENDIO EQU *«, t00=0x007e, t01=0x0062}
0xc538…c54e               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x007e, t01=0x0076}
0xc54e…c578               Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x007e, t01=0x008c}
0xc578…c584               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x00b6}
0xc584…c58e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00c2}
0xc58e…c5a4               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x007e, t01=0x00cc}
0xc5a4…c5b0               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x007e, t01=0x00e2}
0xc5b0…c5d6               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x007e, t01=0x00ee}
0xc5d6…c5e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x0114}
0xc5e2…c5ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0120}
0xc5ec…c600               Head {h00=0x0010, h01=0x0050, text=»TEN090 EQU *«, t00=0x007e, t01=0x012a}
0xc600…c60c               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x007e, t01=0x013e}
0xc60c…c62a               Head {h00=0x001a, h01=0x0050, text=» LDR A4,A6 DWT ADDRESS«, t00=0x007e, t01=0x014a}
0xc62a…c654               Head {h00=0x0026, h01=0x0050, text=» ADK A4,DWTST POINT TO DWT STATUS «, t00=0x007e, t01=0x0168}
0xc654…c660 (127, 0, 398) Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x007f, t01=0x0004}
0xc660…c68c               Head {h00=0x0028, h01=0x0050, text=» LD A5,DWTTQ,A6 TERMINAL QUEUE LINK «, t00=0x007f, t01=0x0010}
0xc68c…c6b0               Head {h00=0x0020, h01=0x0050, text=» RF(Z) TEN110 NO TASK QUEUED«, t00=0x007f, t01=0x003c}
0xc6b0…c6ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0060}
0xc6ba…c6d0               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x007f, t01=0x006a}
0xc6d0…c6f0               Head {h00=0x001c, h01=0x0050, text=» LDKL A2,/800 ATTACH BIT«, t00=0x007f, t01=0x0080}
0xc6f0…c704               Head {h00=0x0010, h01=0x0050, text=» ANR* A2,A4 «, t00=0x007f, t01=0x00a0}
0xc704…c734               Head {h00=0x002c, h01=0x0050, text=» RF(Z) TEN095 DEVICE NOT ATTACHED =2 =1 «, t00=0x007f, t01=0x00b4}
0xc734…c764               Head {h00=0x002c, h01=0x0050, text=» CW A5,DWTTAB,A6 ATTACHED TO OTHER TASK «, t00=0x007f, t01=0x00e4}
0xc764…c790               Head {h00=0x0028, h01=0x0050, text=» RF(NE) TEN110 YES, DON'T QUEUE TASK«, t00=0x007f, t01=0x0114}
0xc790…c7ac               Head {h00=0x0018, h01=0x0050, text=»TEN095 EQU *  =2 =1 «, t00=0x007f, t01=0x0140}
0xc7ac…c7e2               Head {h00=0x0032, h01=0x0050, text=» CF A15,FRABLK FREE ATTACH BLOCK AND TIMER =1 «, t00=0x007f, t01=0x015c}
0xc7e2…c7f8 (128, 0, 400) Head {h00=0x0012, h01=0x0050, text=» LDR A4,A6  =1«, t00=0x0080, t01=0x0004}
0xc7f8…c81c               Head {h00=0x0020, h01=0x0050, text=» ADK A4,DWTST RESTORE A4 =1 «, t00=0x0080, t01=0x001a}
0xc81c…c828               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x003e}
0xc828…c832               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x004a}
0xc832…c84a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0080, t01=0x0054}
0xc84a…c854               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x006c}
0xc854…c85e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0076}
0xc85e…c872               Head {h00=0x0010, h01=0x0050, text=»TEN100 EQU *«, t00=0x0080, t01=0x0080}
0xc872…c8a2               Head {h00=0x002c, h01=0x0050, text=» LDR* A3,A5 UPDATE QUEUE ANCHOR ADDRESS «, t00=0x0080, t01=0x0094}
0xc8a2…c8ba               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTTQ,A6 «, t00=0x0080, t01=0x00c4}
0xc8ba…c8ec               Head {h00=0x002e, h01=0x0050, text=» CF A15,QTJOB QUEUE TASK TO REPEAT REQUEST«, t00=0x0080, t01=0x00dc}
0xc8ec…c8f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x010e}
0xc8f6…c912               Head {h00=0x0018, h01=0x0050, text=»* UPDATE ECB AND DWT«, t00=0x0080, t01=0x0118}
0xc912…c91c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0134}
0xc91c…c950               Head {h00=0x0030, h01=0x0050, text=»TEN110 LD A5,DWTTAB,A6 TTAB ADDRESS FROM DWT«, t00=0x0080, t01=0x013e}
0xc950…c95a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0172}
0xc95a…c976               Head {h00=0x0018, h01=0x0050, text=»TEN120 LDKL A2,/8000«, t00=0x0080, t01=0x017c}
0xc976…c9a6               Head {h00=0x002c, h01=0x0050, text=» ORRS A2,A4 INDICATE DEVICE READY IN DWT«, t00=0x0081, t01=0x0008}
0xc9a6…c9bc               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/DBFF«, t00=0x0081, t01=0x0038}
0xc9bc…c9e8               Head {h00=0x0028, h01=0x0050, text=» ANRS A3,A4 RESET ECHO BIT AND BIT 5«, t00=0x0081, t01=0x004e}
0xc9e8…ca0c               Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTECB,A6 ECB ADDRESS«, t00=0x0081, t01=0x007a}
0xca0c…ca4a               Head {h00=0x003a, h01=0x0050, text=» RF(Z) TEN260 BRANCH IF ENTERED FROM ECHO OR RECOVERY «, t00=0x0081, t01=0x009e}
0xca4a…ca54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00dc}
0xca54…ca6c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0081, t01=0x00e6}
0xca6c…ca76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00fe}
0xca76…ca80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0108}
0xca80…caae               Head {h00=0x002a, h01=0x0050, text=» ORRS A2,A3 SET EVENT COMPLETED IN ECB«, t00=0x0081, t01=0x0112}
0xcaae…cade               Head {h00=0x002c, h01=0x0050, text=» ORS A1,ECBRC,A3 SET RETURN CODE IN ECB «, t00=0x0081, t01=0x0140}
0xcade…cae8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0170}
0xcae8…cafe               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0081, t01=0x017a}
0xcafe…cb1a               Head {h00=0x0018, h01=0x0050, text=» LD A4,TTB:PW,A5 PSW«, t00=0x0081, t01=0x0190}
0xcb1a…cb40               Head {h00=0x0022, h01=0x0050, text=» ANK A4,1 SYSTEM/USER MODE BIT«, t00=0x0082, t01=0x001c}
0xcb40…cb62               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TEN200 SYSTEM MODE «, t00=0x0082, t01=0x0042}
0xcb62…cb6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0064}
0xcb6c…cb88               Head {h00=0x0018, h01=0x0050, text=»* LOAD MMU REGISTERS«, t00=0x0082, t01=0x006e}
0xcb88…cb92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x008a}
0xcb92…cba6               Head {h00=0x0010, h01=0x0050, text=»TEN130 EQU *«, t00=0x0082, t01=0x0094}
0xcba6…cbce               Head {h00=0x0024, h01=0x0050, text=» SUKL A15,32 ADJUST STACKPOINTER«, t00=0x0082, t01=0x00a8}
0xcbce…cbfc               Head {h00=0x002a, h01=0x0050, text=» TS 2,A15 SAVE MMU REGISTERS ON STACK «, t00=0x0082, t01=0x00d0}
0xcbfc…cc2e               Head {h00=0x002e, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS FROM TTAB«, t00=0x0082, t01=0x00fe}
0xcc2e…cc38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0130}
0xcc38…cc50               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0082, t01=0x013a}
0xcc50…cc5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0152}
0xcc5a…cc7c               Head {h00=0x001e, h01=0x0050, text=»* MOVE DWT ECB TO USER ECB«, t00=0x0082, t01=0x015c}
0xcc7c…cc86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x017e}
0xcc86…ccb0               Head {h00=0x0026, h01=0x0050, text=» LD A8,DWTUEC,A6 USER ECB ADDRESS «, t00=0x0082, t01=0x0188}
0xccb0…ccc2               Head {h00=0x000e, h01=0x0050, text=» ELR A4,A8«, t00=0x0083, t01=0x0022}
0xccc2…ccf0               Head {h00=0x002a, h01=0x0050, text=» ORR A4,A2 SET EVENT COMPLETED IN ECB «, t00=0x0083, t01=0x0034}
0xccf0…cd02               Head {h00=0x000e, h01=0x0050, text=» ESR A4,A8«, t00=0x0083, t01=0x0062}
0xcd02…cd14               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0083, t01=0x0074}
0xcd14…cd2a               Head {h00=0x0012, h01=0x0050, text=» ADK A1,ECBEL «, t00=0x0083, t01=0x0086}
0xcd2a…cd3c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x0083, t01=0x009c}
0xcd3c…cd52               Head {h00=0x0012, h01=0x0050, text=» ADK A2,ECBEL «, t00=0x0083, t01=0x00ae}
0xcd52…cd64               Head {h00=0x000e, h01=0x0050, text=» LDK A4,6 «, t00=0x0083, t01=0x00c4}
0xcd64…cd9c               Head {h00=0x0034, h01=0x0050, text=» MVSU A4 MOVE EFF. LENGTH, RTN CODE & CNTRL WORD«, t00=0x0083, t01=0x00d6}
0xcd9c…cda6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x010e}
0xcda6…cdde               Head {h00=0x0034, h01=0x0050, text=» LD A3,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK«, t00=0x0083, t01=0x0118}
0xcdde…ce04               Head {h00=0x0022, h01=0x0050, text=» LD A3,DEVIND,A3 DEVICE INDEX «, t00=0x0083, t01=0x0150}
0xce04…ce34               Head {h00=0x002c, h01=0x0050, text=» RF(N) TEN160 NO SPECIAL ACTION REQUIRED«, t00=0x0083, t01=0x0176}
0xce34…ce5a               Head {h00=0x0022, h01=0x0050, text=» RF(Z) TEN140 DATA MANAGEMENT «, t00=0x0084, t01=0x0016}
0xce5a…ce7e               Head {h00=0x0020, h01=0x0050, text=» CWK A3,DK:DIX CHECK IF DISC«, t00=0x0084, t01=0x003c}
0xce7e…ce98               Head {h00=0x0016, h01=0x0050, text=» RF(E) TEN140 DISC«, t00=0x0084, t01=0x0060}
0xce98…cea2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x007a}
0xcea2…cec8               Head {h00=0x0022, h01=0x0050, text=»* PERFORM CHECK ON ORDER CODE «, t00=0x0084, t01=0x0084}
0xcec8…ced2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00aa}
0xced2…cf02               Head {h00=0x002c, h01=0x0050, text=» CF A15,RD:WR CHECK IF IT WAS READ/WRITE«, t00=0x0084, t01=0x00b4}
0xcf02…cf34               Head {h00=0x002e, h01=0x0050, text=» RF(Z) TEN160 JUMP IF NO READ/WRITE ORDER «, t00=0x0084, t01=0x00e4}
0xcf34…cf3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0116}
0xcf3e…cf52               Head {h00=0x0010, h01=0x0050, text=»TEN140 EQU *«, t00=0x0084, t01=0x0120}
0xcf52…cf5e               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0084, t01=0x0134}
0xcf5e…cf9e               Head {h00=0x003c, h01=0x0050, text=» CFI A15,TENTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE«, t00=0x0084, t01=0x0140}
0xcf9e…cfa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0180}
0xcfa8…cfc0               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0084, t01=0x018a}
0xcfc0…cfca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0012}
0xcfca…cfea               Head {h00=0x001c, h01=0x0050, text=»* RESTORE MMU REGISTERS «, t00=0x0085, t01=0x001c}
0xcfea…cff4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x003c}
0xcff4…d008               Head {h00=0x0010, h01=0x0050, text=»TEN150 EQU *«, t00=0x0085, t01=0x0046}
0xd008…d014               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0085, t01=0x005a}
0xd014…d01e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0066}
0xd01e…d032               Head {h00=0x0010, h01=0x0050, text=»TEN160 EQU *«, t00=0x0085, t01=0x0070}
0xd032…d064               Head {h00=0x002e, h01=0x0050, text=» TL 2,A15 RESTORE MMU REGISTERS FROM STACK«, t00=0x0085, t01=0x0084}
0xd064…d08c               Head {h00=0x0024, h01=0x0050, text=» ADKL A15,32 ADJUST STACKPOINTER«, t00=0x0085, t01=0x00b6}
0xd08c…d098               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x00de}
0xd098…d0a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x00ea}
0xd0a2…d0ba               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0085, t01=0x00f4}
0xd0ba…d0c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x010c}
0xd0c4…d102               Head {h00=0x003a, h01=0x0050, text=»* CHECK IF NO WAIT, WAIT, MULTIPLE WAIT OR ACTIVATION «, t00=0x0085, t01=0x0116}
0xd102…d10c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0154}
0xd10c…d120               Head {h00=0x0010, h01=0x0050, text=»TEN200 EQU *«, t00=0x0085, t01=0x015e}
0xd120…d150               Head {h00=0x002c, h01=0x0050, text=» LD A4,DWTWAT,A6 WAIT/ACTIVATE INDICATOR«, t00=0x0085, t01=0x0172}
0xd150…d17c               Head {h00=0x0028, h01=0x0050, text=» RF(Z) TEN250 NOT WAIT OR ACTIVATION«, t00=0x0086, t01=0x0012}
0xd17c…d18e               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0086, t01=0x003e}
0xd18e…d1a8               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TEN240 WAIT«, t00=0x0086, t01=0x0050}
0xd1a8…d1ba               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0086, t01=0x006a}
0xd1ba…d1cc               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A4«, t00=0x0086, t01=0x007c}
0xd1cc…d1de               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0086, t01=0x008e}
0xd1de…d1fe               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TEN270 ACTIVATION«, t00=0x0086, t01=0x00a0}
0xd1fe…d208               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00c0}
0xd208…d220               Head {h00=0x0014, h01=0x0050, text=»* MULTIPLE WAIT «, t00=0x0086, t01=0x00ca}
0xd220…d22a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00e2}
0xd22a…d24e               Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x0086, t01=0x00ec}
0xd24e…d258               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0110}
0xd258…d26e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0086, t01=0x011a}
0xd26e…d29c               Head {h00=0x002a, h01=0x0050, text=» AN A3,TTB:PW,A5 SYSTEM/USER MODE BIT «, t00=0x0086, t01=0x0130}
0xd29c…d2be               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TEN210 SYSTEM MODE «, t00=0x0086, t01=0x015e}
0xd2be…d2f0               Head {h00=0x002e, h01=0x0050, text=» LD A8,DWTUEC,A6 NO, GET USER ECB ADDRESS «, t00=0x0086, t01=0x0180}
0xd2f0…d2fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x0022}
0xd2fc…d306               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x002e}
0xd306…d31a               Head {h00=0x0010, h01=0x0050, text=»TEN210 EQU *«, t00=0x0087, t01=0x0038}
0xd31a…d352               Head {h00=0x0034, h01=0x0050, text=» ST A8,TTB:SA+16,A5 SET TO A8 IN TTAB SAVE AREA «, t00=0x0087, t01=0x004c}
0xd352…d35c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0084}
0xd35c…d39a               Head {h00=0x003a, h01=0x0050, text=»TEN220 ADK A4,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR «, t00=0x0087, t01=0x008e}
0xd39a…d3be               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 NEXT DWT ADDRESS«, t00=0x0087, t01=0x00cc}
0xd3be…d3e2               Head {h00=0x0020, h01=0x0050, text=» CMR A4 SET TO NO WAIT AGAIN«, t00=0x0087, t01=0x00f0}
0xd3e2…d3f4               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0087, t01=0x0114}
0xd3f4…d40a               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TEN220«, t00=0x0087, t01=0x0126}
0xd40a…d414               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x013c}
0xd414…d42c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0087, t01=0x0146}
0xd42c…d436               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x015e}
0xd436…d444               Head {h00=0x000a, h01=0x0050, text=»* WAIT«, t00=0x0087, t01=0x0168}
0xd444…d44e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0176}
0xd44e…d462               Head {h00=0x0010, h01=0x0050, text=»TEN240 EQU *«, t00=0x0087, t01=0x0180}
0xd462…d498 (136, 0, 400) Head {h00=0x0032, h01=0x0050, text=» CF A15,QTJOB WAIT: QUEUE TASK FOR DISPATCHING«, t00=0x0088, t01=0x0004}
0xd498…d4a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x003a}
0xd4a2…d4b4               Head {h00=0x000e, h01=0x0050, text=»* NO WAIT «, t00=0x0088, t01=0x0044}
0xd4b4…d4be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0056}
0xd4be…d4d2               Head {h00=0x0010, h01=0x0050, text=»TEN250 EQU *«, t00=0x0088, t01=0x0060}
0xd4d2…d4fa               Head {h00=0x0024, h01=0x0050, text=» CM DWTECB,A6 RESET ECB ADDRESS «, t00=0x0088, t01=0x0074}
0xd4fa…d504               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x009c}
0xd504…d518               Head {h00=0x0010, h01=0x0050, text=»TEN260 EQU *«, t00=0x0088, t01=0x00a6}
0xd518…d52e               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0088, t01=0x00ba}
0xd52e…d542               Head {h00=0x0010, h01=0x0050, text=» ABL IHRET8 «, t00=0x0088, t01=0x00d0}
0xd542…d54e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x00e4}
0xd54e…d558               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00f0}
0xd558…d56e               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0088, t01=0x00fa}
0xd56e…d59c               Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x0088, t01=0x0110}
0xd59c…d5ba               Head {h00=0x001a, h01=0x0050, text=» RTN A15 ...AND RETURN«, t00=0x0088, t01=0x013e}
0xd5ba…d5c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x015c}
0xd5c6…d5d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0168}
0xd5d0…d5ee               Head {h00=0x001a, h01=0x0050, text=»* I/O WITH ACTIVATION «, t00=0x0088, t01=0x0172}
0xd5ee…d5f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0190}
0xd5f8…d60c               Head {h00=0x0010, h01=0x0050, text=»TEN270 EQU *«, t00=0x0089, t01=0x000a}
0xd60c…d648               Head {h00=0x0038, h01=0x0050, text=» CF A15,FREBLK ACTIVATE: GET PARAMETER AND DISP ADDR«, t00=0x0089, t01=0x001e}
0xd648…d67a               Head {h00=0x002e, h01=0x0050, text=» CF A15,ACTOTP ACTIVATE TASK ON LIFO BASIS«, t00=0x0089, t01=0x005a}
0xd67a…d68c               Head {h00=0x000e, h01=0x0050, text=» RB TEN250«, t00=0x0089, t01=0x008c}
0xd68c…d696               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x009e}
0xd696…d6a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00a8}
0xd6a0…d6aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00b2}
0xd6aa…d6b6               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0089, t01=0x00bc}
0xd6b6…d6ba               Head {h00=0x4004, h01=0x0000}
0xd6ba…d6be               00 89 00 c8                                                                                                                                                                                                                                       ┆    ┆
0xd6be…d6c6 (138, 1, 8)   20 04 00 00 00 8a 00 04                                                                                                                                                                                                                           ┆        ┆
0xd6c6…d716 (139, 0, 398) 00 32 00 50 2a 20 20 43 4f 4d 50 55 54 45 20 4e 55 4d 42 45 52 20 4f 46 20 43 48 41 52 41 43 54 45 52 53 20 49 4e 20 54 48 49 53 20 52 45 43 4f 52 44 00 8b 00 04 00 06 00 50 2a 20 00 8b 00 3a 00 36 00 50 5c 4c 44 5c 41 31 2c 45 49 4e 50 42   ┆ 2 P*  COMPUTE NUMBER OF CHARACTERS IN THIS RECORD       P*    : 6 P LD A1,EINPB┆
0xd716…d766               46 2b 53 54 4b 45 4e 44 5c 47 45 54 20 43 55 52 52 45 4e 54 20 50 4f 49 4e 54 45 52 20 49 4e 20 42 55 46 46 45 52 00 8b 00 44 00 14 00 50 5c 4c 44 52 5c 41 32 2c 41 31 5c 53 41 56 45 20 00 8b 00 7e 00 26 00 50 5c 4c 44 4b 5c 41 33 2c 30 5c   ┆F+STKEND GET CURRENT POINTER IN BUFFER   D   P LDR A2,A1 SAVE    ~ & P LDK A3,0 ┆
0xd766…d7b6               52 45 53 45 54 20 43 48 41 52 41 43 54 45 52 20 43 4f 55 4e 54 45 52 20 00 8b 00 96 00 1e 00 50 5c 4c 44 52 5c 41 34 2c 41 38 5c 53 54 41 52 54 20 4f 46 20 52 45 43 4f 52 44 00 8b 00 c0 00 10 00 50 43 4f 52 3a 33 30 5c 45 51 55 5c 2a 00 8b   ┆RESET CHARACTER COUNTER        P LDR A4,A8 START OF RECORD       PCOR:30 EQU *  ┆
0xd7b6…d806               00 e2 00 1c 00 50 5c 4c 43 52 5c 41 35 2c 41 34 5c 47 45 54 20 43 48 41 52 41 43 54 45 52 00 8b 00 f6 00 20 00 50 5c 43 43 4b 5c 41 35 2c 27 3b 3b 27 5c 45 4e 44 20 4f 46 20 52 45 43 4f 52 44 3f 20 00 8b 01 16 00 16 00 50 5c 52 46 28 45 29   ┆     P LCR A5,A4 GET CHARACTER       P CCK A5,';;' END OF RECORD?        P RF(E)┆
0xd806…d854               5c 43 4f 52 3a 34 30 5c 59 45 53 21 00 8b 01 3a 00 10 00 50 43 4f 52 3a 33 35 5c 45 51 55 5c 2a 00 8b 01 54 00 2a 00 50 5c 43 57 4b 5c 41 33 2c 52 45 43 4c 45 4e 5c 4d 41 58 49 4d 55 4d 20 53 49 5a 45 20 41 43 48 49 45 56 45 44 3f 20         ┆ COR:40 YES!   :   PCOR:35 EQU *   T * P CWK A3,RECLEN MAXIMUM SIZE ACHIEVED? ┆
0xd854…d8a4 (140, 0, 398) 00 8b 01 68 00 12 00 50 43 4f 52 3a 33 38 5c 45 51 55 5c 2a 2d 32 00 8c 00 08 00 16 00 50 5c 52 46 28 45 29 5c 43 4f 52 3a 34 30 5c 59 45 53 21 00 8c 00 1e 00 2a 00 50 5c 43 57 5c 41 31 2c 45 53 59 53 54 41 2b 53 54 4b 45 4e 44 5c 4d 45 4d   ┆   h   PCOR:38 EQU *-2       P RF(E) COR:40 YES!     * P CW A1,ESYSTA+STKEND MEM┆
0xd8a4…d8f4               4f 52 59 20 4f 56 45 52 46 4c 4f 57 3f 20 00 8c 00 38 00 16 00 50 5c 52 46 28 45 29 5c 4d 45 4d 4f 46 4c 5c 59 45 53 21 00 8c 00 66 00 26 00 50 5c 41 44 4b 5c 41 31 2c 31 5c 49 4e 43 52 45 4d 45 4e 54 20 42 55 46 46 45 52 20 50 4f 49 4e 54   ┆ORY OVERFLOW?    8   P RF(E) MEMOFL YES!   f & P ADK A1,1 INCREMENT BUFFER POINT┆
0xd8f4…d944               45 52 00 8c 00 80 00 2a 00 50 5c 41 44 4b 5c 41 33 2c 31 5c 49 4e 43 52 45 4d 45 4e 54 20 43 48 41 52 41 43 54 45 52 20 43 4f 55 4e 54 45 52 20 00 8c 00 aa 00 26 00 50 5c 41 44 4b 5c 41 34 2c 31 5c 49 4e 43 52 45 4d 45 4e 54 20 52 45 43 4f   ┆ER     * P ADK A3,1 INCREMENT CHARACTER COUNTER      & P ADK A4,1 INCREMENT RECO┆
0xd944…d994               52 44 20 50 4f 49 4e 54 45 52 00 8c 00 d8 00 14 00 50 5c 52 42 5c 43 4f 52 3a 33 30 5c 4c 4f 4f 50 20 00 8c 01 02 00 10 00 50 43 4f 52 3a 34 30 5c 45 51 55 5c 2a 00 8c 01 1a 00 22 00 50 5c 4c 43 5c 41 35 2c 31 2c 41 34 5c 47 45 54 20 4e 45   ┆RD POINTER       P RB COR:30 LOOP        PCOR:40 EQU *     " P LC A5,1,A4 GET NE┆
0xd994…d9e2               58 54 20 43 48 41 52 41 43 54 45 52 00 8c 01 2e 00 20 00 50 5c 43 43 4b 5c 41 35 2c 27 3b 3b 27 5c 54 57 4f 20 53 45 4d 49 43 4f 4c 4f 4e 53 3f 00 8c 01 54 00 16 00 50 5c 52 46 28 4e 45 29 5c 43 4f 52 3a 34 35 5c 4e 4f 21 00 8c 01 78         ┆XT CHARACTER   .   P CCK A5,';;' TWO SEMICOLONS?   T   P RF(NE) COR:45 NO!   x┆

Reduced view