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

⟦a5122544d⟧

    Length: 52714 (0xcdea)
    Notes: pts_type(SC)
    Names: »TOSSIO.SC«

Derivation

└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »M:LP/TOSSIO.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »M:LP/TOSSIO.SC« 

PTS(SC)

	IDENT TOSSIO 	REL 10.0 80-04-30 870105041000 

			REL 10.0 80-03-15  POHO
			=1,RELEASE DC-BUFFER UPDATED 
* 
* 
**************************************************
* 
*   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	MONMMU	MONITOR (SYSTEM) MMU TABLE
* 
	ENTRY	ECBFC	FILE CODE
	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
* 
	EJECT			TOSSIO 
* 
* 
************* 
* EXTERNALS * 
************* 
* 
* 
	EXTRN	SAVE8	SAVE 8 REGISTERS 
	EXTRN	IHRET8	RESTORE 8 REGISTERS AND RETURN
	EXTRN	IHRTN	RETURN WITHOUT ENABLING INTERRUPTS 
	EXTRN	ACTOTP	ACTIVATE TERMINAL (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	GETBLK	PUT BLOCK IN PENDING QUEUE
	EXTRN	FREBLK	RELEASE BLOCK FROM PENDING QUEUE
	EXTRN	SETIMP	SET TIMER 
	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
* 
	EJECT			TOSSIO 
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	0
* 
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	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.
* 
X:B	EQU	0 
CPU857	EQU	1
* 
	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 
DWTNVL	EQU	DWTDRD+/12	NEW VOLUME LOADED FLAGS 
DWTECH	EQU	DWTDRD+/12	ECHO DEVICE DWT 
DWTVOL	EQU	DWTDRD+/1A	DISC VOLUME NAME
DWTSQ	EQU	DWTDRD+/1C	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	/01	FILE CODE 
ECBBA	EQU	/02	BUFFER ADDRESS
ECBRL	EQU	/04	REQUESTED LENGTH
ECBEL	EQU	/06	EFFECTIVE LENGTH
ECBRC	EQU	/08	RETURN CODE 
ECBCW	EQU	/0A	CONTROL WORD
ECBCW1	EQU	/0A	CONTROL WORD 1 
ECBCW2	EQU	/0C	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	END OF QUEUE
 	CWR	A1,A5 
	RB(NE)	TIM:10	NOT FOUND
* 
	EJECT			TOSSIO 
* 
*  	TTAB FOUND - REMOVE FROM QUEUE
* 
	LDR*	A1,A1 
	STR	A1,A2
* 
TIM:20	EQU	*
	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
* 
	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			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
	CF	A15,FNDBLK	ANY TIMERS ACTIVE
	ADK	A4,0	SET CR
	RF(Z)	ATTRTN	NO! 
* 
	EJECT			TOSSIO 
* 
*  	FREE BLOCK AND TIMER IN ATT:CH
* 
	CM*	2,A4	FREE TIMER
	LDR*	A3,A4	REMOVE FROM ATT:CH
	STR	A3,A2
	CF	A15,FREBLK	RELEASE BLOCK
	RF	ATTRTN	END REQUEST
* 
ATT:40	CW	A5,DWTTAB,A6
	RF(E)	TIOERR	ATTACHED TO REQUESTING TASK 
* 
ATT:50	CF	A15,FNDBLK	 
	ADK	A4,0	SET CR
	RF(NZ)	ATT:70	IS TIMER ACTIVE
* 
*    	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	A3,A5	SAVE TTAB ADDRESS
	LD	A5,DWTTQ,A6	QUEUE ANCHOR
	RF(Z)	DET:10	QUEUE EMPTY 
	LDR*	A2,A5	UPDATE QUEUE ANCHOR 
	ST	A2,DWTTQ,A6 
	CF	A15,QTJOB	QUEUE TASK
* 
DET:10	EQU	*
	LDR	A5,A3	RESTORE TTAB ADDRESS 
* 
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.
* 
*	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
* 
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 TERMINAL I/O
* IS REQUIRED. IF A REQUEST CANNOT BE SERVICED
* DUE TO E.G. BUSY DEVICE, THE REQUEST IS QUEUED
* AND THE TERMINAL PROGRAM 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
* 
TIO210	CF	A15,GETBLK	SAVE PARAMETER AND DISPATCH ADDRESS
* 
TIO220	CF	A15,QTJOB	QUEUE TASK FOR DISPATCHING
* 
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	CPU852+CPU857=0
	LDK	A3,/30	CPU851: LEVEL 12
	XIF
* 
	IFF	CPU852+CPU857=0
	LDK	A3,/40	CPU852/CPU857: LEVEL 16 
	XIF
* 
	SC	A3,2,A15	SET NEW LEVEL ON STACK 
	RTN	A15	RETURN WITH NEW LEVEL
* 
	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	0,0	/2A, /2B 
	BYTES	0,1	/2C, /2D 
	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 
	EL	A1,ECBBA,A9	USER BUFFER ADDRESS 
	ECR	A2,A1
	ANKL	A1,/FFF	SKIP 4 LEFTMOST BITS
	SRL	A2,3 
	ANK	A2,/1E	MMUTAB INDEX (5 BITS) 
	ADR	A2,A5	ADD TTAB ADDRESS 
	LC	A2,TTB:MT,A2	PHYSICAL PAGE ADDRESS
	SRL	A2,2 
	ANK	A2,/3F 
	SCR	A2,A8	STORE BITS 16-17 IN DWT ECB 1ST WORD 
	ANK	A2,/0F 
	SRC	A2,4 
	ORR	A1,A2
	ST	A1,ECBBA,A8	STORE MODIFIED BUFFER 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
*         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	A1,DWTADR,A6	DRIVER ADDRESS BLOCK 
	SU	A4,HDRLEN,A1	REAL BUFFER ADDRESS	=1 
	LD	A1,POLADR,A1	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 
* 
	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
	LDKL	A2,/800	ATTACH BIT
	ANR*	A2,A4 
	RF(Z)	TEN100	DEVICE NOT ATTACHED 
	CW	A5,DWTTAB,A6	ATTACHED TO OTHER TASK 
	RF(NE)	TEN110	YES, DON'T QUEUE TASK
* 
	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)	TEN230	ACTIVATION
	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
	RF(Z)	TEN240	NO MORE DWT:S 
	CMR	A4	SET TO NO WAIT AGAIN
	LDR	A4,A3
	RB	TEN220
* 
	EJECT			TOSSIO 
* 
* 
TEN230	EQU	*
	CF	A15,FREBLK	ACTIVATE: GET PARAMETER AND DISP ADDR
	CF	A15,ACTOTP	ACTIVATE TASK ON LIFO BASIS
	RF	TEN250
* 
TEN240	EQU	*
	CF	A15,QTJOB	WAIT: QUEUE TASK FOR DISPATCHING
* 
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
* 
* 
* 
	END

HexDump

0x0000…0036 (0, 0, 400)   Head {h00=0x0032, h01=0x0050, text=» IDENT TOSSIO  REL 10.0 80-04-30 870105041000 «, t00=0x0000, t01=0x0004}
0x0036…003e               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0060               Head {h00=0x001e, h01=0x0050, text=»   REL 10.0 80-03-15  POHO«, t00=0x0000, t01=0x0042}
0x0060…0088               Head {h00=0x0024, h01=0x0050, text=»   =1,RELEASE DC-BUFFER UPDATED «, t00=0x0000, t01=0x0064}
0x0088…0092               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008c}
0x0092…009c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0096}
0x009c…00d6               Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x00a0}
0x00d6…00e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00da}
0x00e0…0108               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00e4}
0x0108…0112               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010c}
0x0112…013e               Head {h00=0x0028, h01=0x0050, text=»*   TOSSIO = TOSS I/O LKM PROCESSOR «, t00=0x0000, t01=0x0116}
0x013e…0148               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0142}
0x0148…0152               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014c}
0x0152…015c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0156}
0x015c…0196               Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0160}
0x0196…01a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000a}
0x01a0…01aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0014}
0x01aa…01da               Head {h00=0x002c, h01=0x0050, text=»*   THIS IS THE TOSS I/O LKM PROCESSOR. «, t00=0x0001, t01=0x001e}
0x01da…0214               Head {h00=0x0036, h01=0x0050, text=»*   IT CONTAINS THE FOLLOWING MONITOR SUBROUTINES:«, t00=0x0001, t01=0x004e}
0x0214…021e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0088}
0x021e…0242               Head {h00=0x0020, h01=0x0050, text=»*   -TIO     INITIALIZE I/O «, t00=0x0001, t01=0x0092}
0x0242…024c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b6}
0x024c…0268               Head {h00=0x0018, h01=0x0050, text=»*   -TENDIO  END I/O«, t00=0x0001, t01=0x00c0}
0x0268…0272               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00dc}
0x0272…0294               Head {h00=0x001e, h01=0x0050, text=»*   -ATTACH  ATTACH DEVICE«, t00=0x0001, t01=0x00e6}
0x0294…029e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0108}
0x029e…02c0               Head {h00=0x001e, h01=0x0050, text=»*   -DETACH  DETACH DEVICE«, t00=0x0001, t01=0x0112}
0x02c0…02ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0134}
0x02ca…0306               Head {h00=0x0038, h01=0x0050, text=»*   -DC:MIN  DATA COMMUNICATION MOVE ROUTINE (READ) «, t00=0x0001, t01=0x013e}
0x0306…0310               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x017a}
0x0310…034c               Head {h00=0x0038, h01=0x0050, text=»*   -DC:MOT  DATA COMMUNICATION MOVE ROUTINE (WRITE)«, t00=0x0001, t01=0x0184}
0x034c…0356               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0030}
0x0356…038e               Head {h00=0x0034, h01=0x0050, text=»*   SPECIAL ROUTINES ARE CARRIED OUT IN SYSTEMS «, t00=0x0002, t01=0x003a}
0x038e…03bc               Head {h00=0x002a, h01=0x0050, text=»*   WITH MEMORY MANAGEMENT UNIT (MMU).«, t00=0x0002, t01=0x0072}
0x03bc…03c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a0}
0x03c6…0402               Head {h00=0x0038, h01=0x0050, text=»*   THIS MODULE ALSO CONTAINS STANDARD DISPLACEMENT «, t00=0x0002, t01=0x00aa}
0x0402…0430               Head {h00=0x002a, h01=0x0050, text=»*   VALUES FOR ECB, DWT AND DAB AREAS.«, t00=0x0002, t01=0x00e6}
0x0430…043a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0114}
0x043a…0452               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0002, t01=0x011e}
0x0452…045c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0136}
0x045c…0466               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0140}
0x0466…047a               Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x014a}
0x047a…048e               Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x015e}
0x048e…04a2               Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0172}
0x04a2…04ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0186}
0x04ac…04b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0190}
0x04b6…04d6               Head {h00=0x001c, h01=0x0050, text=» ENTRY TIO I/O PROCESSOR«, t00=0x0003, t01=0x000a}
0x04d6…050a               Head {h00=0x0030, h01=0x0050, text=» ENTRY TIO:FM ENTRY USED BY FILE MANAGEMENT «, t00=0x0003, t01=0x002a}
0x050a…053e               Head {h00=0x0030, h01=0x0050, text=» ENTRY TIOERR ERROR: QUEUE TASK AND DISPATCH«, t00=0x0003, t01=0x005e}
0x053e…055c               Head {h00=0x001a, h01=0x0050, text=» ENTRY TENDIO END I/O «, t00=0x0003, t01=0x0092}
0x055c…0590               Head {h00=0x0030, h01=0x0050, text=» ENTRY QUEDEV QUEUE REQUEST IN DEVICE QUEUE «, t00=0x0003, t01=0x00b0}
0x0590…05c8               Head {h00=0x0034, h01=0x0050, text=» ENTRY QUEFIL QUEUE FILE REQUEST IN DEVICE QUEUE«, t00=0x0003, t01=0x00e4}
0x05c8…05fe               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC:MIN MOVE ROUTINE FOR DATACOM, INPUT «, t00=0x0003, t01=0x011c}
0x05fe…0634               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC:MOT MOVE ROUTINE FOR DATACOM, OUTPUT«, t00=0x0003, t01=0x0152}
0x0634…0664               Head {h00=0x002c, h01=0x0050, text=» ENTRY MONMMU MONITOR (SYSTEM) MMU TABLE«, t00=0x0003, t01=0x0188}
0x0664…066e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0028}
0x066e…068c               Head {h00=0x001a, h01=0x0050, text=» ENTRY ECBFC FILE CODE«, t00=0x0004, t01=0x0032}
0x068c…06b0               Head {h00=0x0020, h01=0x0050, text=» ENTRY ECBBA BUFFER ADDRESS «, t00=0x0004, t01=0x0050}
0x06b0…06d6               Head {h00=0x0022, h01=0x0050, text=» ENTRY ECBRL REQUESTED LENGTH «, t00=0x0004, t01=0x0074}
0x06d6…06fc               Head {h00=0x0022, h01=0x0050, text=» ENTRY ECBEL EFFECTIVE LENGTH «, t00=0x0004, t01=0x009a}
0x06fc…071c               Head {h00=0x001c, h01=0x0050, text=» ENTRY ECBRC RETURN CODE«, t00=0x0004, t01=0x00c0}
0x071c…073e               Head {h00=0x001e, h01=0x0050, text=» ENTRY ECBCW CONTROL WORD «, t00=0x0004, t01=0x00e0}
0x073e…0762               Head {h00=0x0020, h01=0x0050, text=» ENTRY ECBCW1 CONTROL WORD 1«, t00=0x0004, t01=0x0102}
0x0762…0786               Head {h00=0x0020, h01=0x0050, text=» ENTRY ECBCW2 CONTROL WORD 2«, t00=0x0004, t01=0x0126}
0x0786…0790               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x014a}
0x0790…07c6               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC:DIX DEVICE INDEX DATA COMMUNICATION «, t00=0x0004, t01=0x0154}
0x07c6…07f8               Head {h00=0x002e, h01=0x0050, text=» ENTRY DM:DIX DEVICE INDEX DATA MANAGEMENT«, t00=0x0004, t01=0x018a}
0x07f8…082e               Head {h00=0x0032, h01=0x0050, text=» ENTRY PC:DIX DEVICE INDEX PROGRAMMED CHANNEL «, t00=0x0005, t01=0x002c}
0x082e…0862               Head {h00=0x0030, h01=0x0050, text=» ENTRY MX:DIX DEVICE INDEX MULTIPLEX CHANNEL«, t00=0x0005, t01=0x0062}
0x0862…0892               Head {h00=0x002c, h01=0x0050, text=» ENTRY KB:DIX DEVICE INDEX KEYBOARD/CTW «, t00=0x0005, t01=0x0096}
0x0892…08cc               Head {h00=0x0036, h01=0x0050, text=» ENTRY IT:DIX DEVICE INDEX INTERTASK COMMUNICATION«, t00=0x0005, t01=0x00c6}
0x08cc…08f4               Head {h00=0x0024, h01=0x0050, text=» ENTRY DK:DIX DEVICE INDEX DISC «, t00=0x0005, t01=0x0100}
0x08f4…08fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0128}
0x08fe…0926               Head {h00=0x0024, h01=0x0050, text=» ENTRY BUFLEN MMU BUFFER LENGTH «, t00=0x0005, t01=0x0132}
0x0926…0930               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x015a}
0x0930…0948               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0005, t01=0x0164}
0x0948…0952               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x017c}
0x0952…095c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0186}
0x095c…0984               Head {h00=0x0024, h01=0x0050, text=» ENTRY ACTADR ACTIVATION ADDRESS«, t00=0x0005, t01=0x0190}
0x0984…09a8               Head {h00=0x0020, h01=0x0050, text=» ENTRY ABTADR ABORT ADDRESS «, t00=0x0006, t01=0x0028}
0x09a8…09d0               Head {h00=0x0024, h01=0x0050, text=» ENTRY INTADR INTERRUPT ADDRESS «, t00=0x0006, t01=0x004c}
0x09d0…0a06               Head {h00=0x0032, h01=0x0050, text=» ENTRY POLADR BUFFER POOL ADDRESS (DC DRIVERS)«, t00=0x0006, t01=0x0074}
0x0a06…0a3e               Head {h00=0x0034, h01=0x0050, text=» ENTRY HDRLEN BUFFER HEADER LENGTH (DC DRIVERS) «, t00=0x0006, t01=0x00aa}
0x0a3e…0a64               Head {h00=0x0022, h01=0x0050, text=» ENTRY RECADR RECOVERY ADDRESS«, t00=0x0006, t01=0x00e2}
0x0a64…0a86               Head {h00=0x001e, h01=0x0050, text=» ENTRY ECHADR ECHO ADDRESS«, t00=0x0006, t01=0x0108}
0x0a86…0aae               Head {h00=0x0024, h01=0x0050, text=» ENTRY DWTCHP CHANNEL PARAMETERS«, t00=0x0006, t01=0x012a}
0x0aae…0aca               Head {h00=0x0018, h01=0x0050, text=» ENTRY DWTST STATUS «, t00=0x0006, t01=0x0152}
0x0aca…0aec               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTBC BYTE COUNTER «, t00=0x0006, t01=0x016e}
0x0aec…0b0e               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTECB ECB ADDRESS «, t00=0x0006, t01=0x0190}
0x0b0e…0b30               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTOPT ORDER OPTION«, t00=0x0007, t01=0x0022}
0x0b30…0b54               Head {h00=0x0020, h01=0x0050, text=» ENTRY DWTOR INDEX AND ORDER«, t00=0x0007, t01=0x0044}
0x0b54…0b80               Head {h00=0x0028, h01=0x0050, text=» ENTRY DWTOCH LAST OUTPUT CHARACTER «, t00=0x0007, t01=0x0068}
0x0b80…0baa               Head {h00=0x0026, h01=0x0050, text=» ENTRY DWTADR DRIVER ADDRESS BLOCK«, t00=0x0007, t01=0x0094}
0x0baa…0bcc               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTTAB TTAB ADDRESS«, t00=0x0007, t01=0x00be}
0x0bcc…0bfa               Head {h00=0x002a, h01=0x0050, text=» ENTRY DWTWAT WAIT/ACTIVATE INDICATOR «, t00=0x0007, t01=0x00e0}
0x0bfa…0c1e               Head {h00=0x0020, h01=0x0050, text=» ENTRY DWTTQ TERMINAL QUEUE «, t00=0x0007, t01=0x010e}
0x0c1e…0c46               Head {h00=0x0024, h01=0x0050, text=» ENTRY DWTOTQ OUTPUT QUEUE LINK «, t00=0x0007, t01=0x0132}
0x0c46…0c6c               Head {h00=0x0022, h01=0x0050, text=» ENTRY DWTUEC USER ECB ADDRESS«, t00=0x0007, t01=0x015a}
0x0c6c…0c92               Head {h00=0x0022, h01=0x0050, text=» ENTRY DWTMEC MMU ECB ADDRESS «, t00=0x0007, t01=0x0180}
0x0c92…0cb4               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTA2 SAVE AREA A2 «, t00=0x0008, t01=0x0016}
0x0cb4…0cd6               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTA3 SAVE AREA A3 «, t00=0x0008, t01=0x0038}
0x0cd6…0cf8               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTA4 SAVE AREA A4 «, t00=0x0008, t01=0x005a}
0x0cf8…0d1a               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTA5 SAVE AREA A5 «, t00=0x0008, t01=0x007c}
0x0d1a…0d44               Head {h00=0x0026, h01=0x0050, text=» ENTRY DWTSB1 STACK BASE 1 IN DWT «, t00=0x0008, t01=0x009e}
0x0d44…0d6e               Head {h00=0x0026, h01=0x0050, text=» ENTRY DWTSB2 STACK BASE 2 IN DWT «, t00=0x0008, t01=0x00c8}
0x0d6e…0d90               Head {h00=0x001e, h01=0x0050, text=» ENTRY DWTTP TIMER POINTER«, t00=0x0008, t01=0x00f2}
0x0d90…0db6               Head {h00=0x0022, h01=0x0050, text=» ENTRY DWTECH ECHO DEVICE DWT «, t00=0x0008, t01=0x0114}
0x0db6…0dda               Head {h00=0x0020, h01=0x0050, text=» ENTRY DWTSQ START OF QUEUE «, t00=0x0008, t01=0x013a}
0x0dda…0e0a               Head {h00=0x002c, h01=0x0050, text=» ENTRY DWTORD SAVE AREA INDEX AND ORDER «, t00=0x0008, t01=0x015e}
0x0e0a…0e38               Head {h00=0x002a, h01=0x0050, text=» ENTRY DWTNVL NEW VOLUME LOADED FLAGS «, t00=0x0008, t01=0x018e}
0x0e38…0e5e               Head {h00=0x0022, h01=0x0050, text=» ENTRY DWTVOL DISC VOLUME NAME«, t00=0x0009, t01=0x002c}
0x0e5e…0e68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0052}
0x0e68…0e80               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0009, t01=0x005c}
0x0e80…0e8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0074}
0x0e8a…0e94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x007e}
0x0e94…0eaa               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x0088}
0x0eaa…0ec0               Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0009, t01=0x009e}
0x0ec0…0ed6               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x00b4}
0x0ed6…0ee0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ca}
0x0ee0…0eea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d4}
0x0eea…0f10               Head {h00=0x0022, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS «, t00=0x0009, t01=0x00de}
0x0f10…0f44               Head {h00=0x0030, h01=0x0050, text=» EXTRN IHRET8 RESTORE 8 REGISTERS AND RETURN«, t00=0x0009, t01=0x0104}
0x0f44…0f7c               Head {h00=0x0034, h01=0x0050, text=» EXTRN IHRTN RETURN WITHOUT ENABLING INTERRUPTS «, t00=0x0009, t01=0x0138}
0x0f7c…0faa               Head {h00=0x002a, h01=0x0050, text=» EXTRN ACTOTP ACTIVATE TERMINAL (LIFO)«, t00=0x0009, t01=0x0170}
0x0faa…0fca               Head {h00=0x001c, h01=0x0050, text=» EXTRN FNDDWT SEARCH DWT«, t00=0x000a, t01=0x000e}
0x0fca…0ffa               Head {h00=0x002c, h01=0x0050, text=» EXTRN QTJOB QUEUE TASK FOR DISPATCHING «, t00=0x000a, t01=0x002e}
0x0ffa…101a               Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x000a, t01=0x005e}
0x101a…1050               Head {h00=0x0032, h01=0x0050, text=» EXTRN DISEND BRANCH TO DISPATCHER VIA TENDIO «, t00=0x000a, t01=0x007e}
0x1050…107e               Head {h00=0x002a, h01=0x0050, text=» EXTRN LKMQDI QUEUE TASK AND DISPATCH «, t00=0x000a, t01=0x00b4}
0x107e…10ae               Head {h00=0x002c, h01=0x0050, text=» EXTRN GETBLK PUT BLOCK IN PENDING QUEUE«, t00=0x000a, t01=0x00e2}
0x10ae…10e4               Head {h00=0x0032, h01=0x0050, text=» EXTRN FREBLK RELEASE BLOCK FROM PENDING QUEUE«, t00=0x000a, t01=0x0112}
0x10e4…1104               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIMP SET TIMER «, t00=0x000a, t01=0x0148}
0x1104…112e               Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:ID TASK IDENTIFICATION «, t00=0x000a, t01=0x0168}
0x112e…115a (11, 0, 400)  Head {h00=0x0028, h01=0x0050, text=» EXTRN TTB:ST TASK STATUS AND LEVEL «, t00=0x000b, t01=0x0004}
0x115a…1184               Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:PW PROGRAM STATUS WORD «, t00=0x000b, t01=0x0030}
0x1184…11a4               Head {h00=0x001c, h01=0x0050, text=» EXTRN TTB:SA SAVE AREA «, t00=0x000b, t01=0x005a}
0x11a4…11c0               Head {h00=0x0018, h01=0x0050, text=» EXTRN TTB:MT MMUTAB«, t00=0x000b, t01=0x007a}
0x11c0…11ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0096}
0x11ca…11e2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x000b, t01=0x00a0}
0x11e2…11ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b8}
0x11ec…11f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00c2}
0x11f6…1228               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000b, t01=0x00cc}
0x1228…1232               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00fe}
0x1232…1250               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000b, t01=0x0108}
0x1250…125a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0126}
0x125a…128c               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000b, t01=0x0130}
0x128c…1296               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0162}
0x1296…12c8               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000b, t01=0x016c}
0x12c8…12f6               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000c, t01=0x000e}
0x12f6…1300               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x003c}
0x1300…1314               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x000c, t01=0x0046}
0x1314…131e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x005a}
0x131e…1328               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0064}
0x1328…1362               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000c, t01=0x006e}
0x1362…1394               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000c, t01=0x00a8}
0x1394…139e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00da}
0x139e…13b2               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000c, t01=0x00e4}
0x13b2…13bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f8}
0x13bc…13c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0102}
0x13c6…13fa               Head {h00=0x0030, h01=0x0050, text=»* A PROGRAM VERSION INCLUDING ATTACH/DETACH «, t00=0x000c, t01=0x010c}
0x13fa…1428               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING ATTDET EQU 1.«, t00=0x000c, t01=0x0140}
0x1428…1432               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x016e}
0x1432…1444               Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x000c, t01=0x0178}
0x1444…1458               Head {h00=0x0010, h01=0x0050, text=»ATTDET EQU 1«, t00=0x000c, t01=0x018a}
0x1458…1462               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x000e}
0x1462…146c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0018}
0x146c…14a4               Head {h00=0x0034, h01=0x0050, text=»* A PROGRAM VERSION SPECIALIZED FOR THE 857 CPU «, t00=0x000d, t01=0x0022}
0x14a4…14d2               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING CPU857 EQU 1.«, t00=0x000d, t01=0x005a}
0x14d2…14dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0088}
0x14dc…14ee               Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x000d, t01=0x0092}
0x14ee…1502               Head {h00=0x0010, h01=0x0050, text=»CPU857 EQU 1«, t00=0x000d, t01=0x00a4}
0x1502…150c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00b8}
0x150c…1524               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x000d, t01=0x00c2}
0x1524…152e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00da}
0x152e…1538               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00e4}
0x1538…1554               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x000d, t01=0x00ee}
0x1554…1570               Head {h00=0x0018, h01=0x0050, text=»* FORM STATEMENTS * «, t00=0x000d, t01=0x010a}
0x1570…158c               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x000d, t01=0x0126}
0x158c…1596               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0142}
0x1596…15a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x014c}
0x15a0…15b6               Head {h00=0x0012, h01=0x0050, text=»BYTES FORM 8,8«, t00=0x000d, t01=0x0156}
0x15b6…15c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x016c}
0x15c0…15d8               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x000d, t01=0x0176}
0x15d8…15e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x018e}
0x15e2…15ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0008}
0x15ec…160a               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000e, t01=0x0012}
0x160a…1628               Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS * «, t00=0x000e, t01=0x0030}
0x1628…1646               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000e, t01=0x004e}
0x1646…1650               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x006c}
0x1650…1686               Head {h00=0x0032, h01=0x0050, text=»* DEVICE WORK TABLE DISPLACEMENTS: FIXED PART «, t00=0x000e, t01=0x0076}
0x1686…1690               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ac}
0x1690…16ba               Head {h00=0x0026, h01=0x0050, text=»DWTCHP EQU /00 CHANNEL PARAMETERS «, t00=0x000e, t01=0x00b6}
0x16ba…16d6               Head {h00=0x0018, h01=0x0050, text=»DWTST EQU /02 STATUS«, t00=0x000e, t01=0x00e0}
0x16d6…16f8               Head {h00=0x001e, h01=0x0050, text=»DWTBC EQU /03 BYTE COUNTER«, t00=0x000e, t01=0x00fc}
0x16f8…171a               Head {h00=0x001e, h01=0x0050, text=»DWTECB EQU /04 ECB ADDRESS«, t00=0x000e, t01=0x011e}
0x171a…173e               Head {h00=0x0020, h01=0x0050, text=»DWTOPT EQU /06 ORDER OPTION «, t00=0x000e, t01=0x0140}
0x173e…1764               Head {h00=0x0022, h01=0x0050, text=»DWTOR EQU /06 INDEX AND ORDER «, t00=0x000e, t01=0x0164}
0x1764…1790               Head {h00=0x0028, h01=0x0050, text=»DWTOCH EQU /06 LAST OUTPUT CHARACTER«, t00=0x000e, t01=0x018a}
0x1790…17bc               Head {h00=0x0028, h01=0x0050, text=»DWTADR EQU /08 DRIVER ADDRESS BLOCK «, t00=0x000f, t01=0x0026}
0x17bc…17e0               Head {h00=0x0020, h01=0x0050, text=»DWTTAB EQU /0A TTAB ADDRESS «, t00=0x000f, t01=0x0052}
0x17e0…180e               Head {h00=0x002a, h01=0x0050, text=»DWTWAT EQU /0C WAIT/ACTIVATE INDICATOR«, t00=0x000f, t01=0x0076}
0x180e…1832               Head {h00=0x0020, h01=0x0050, text=»DWTTQ EQU /0E TERMINAL QUEUE«, t00=0x000f, t01=0x00a4}
0x1832…185a               Head {h00=0x0024, h01=0x0050, text=»DWTUEC EQU /10 USER ECB ADDRESS «, t00=0x000f, t01=0x00c8}
0x185a…1880               Head {h00=0x0022, h01=0x0050, text=»DWTMEC EQU /12 MMU ECB ADDRESS«, t00=0x000f, t01=0x00f0}
0x1880…188a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0116}
0x188a…18a0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000f, t01=0x0120}
0x18a0…18d8               Head {h00=0x0034, h01=0x0050, text=»DWTDRD EQU DWTTQ+2 START OF DRIVER DEFINED PART «, t00=0x000f, t01=0x0136}
0x18d8…18e4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x016e}
0x18e4…18ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x017a}
0x18ee…1904               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000f, t01=0x0184}
0x1904…193c               Head {h00=0x0034, h01=0x0050, text=»DWTDRD EQU DWTMEC+2 START OF DRIVER DEFINED PART«, t00=0x0010, t01=0x000a}
0x193c…1948               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0042}
0x1948…1952               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x004e}
0x1952…196a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0010, t01=0x0058}
0x196a…1974               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0070}
0x1974…19a4               Head {h00=0x002c, h01=0x0050, text=»* DWT DISPLACEMENTS: DRIVER DEFINED PART«, t00=0x0010, t01=0x007a}
0x19a4…19ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00aa}
0x19ae…19de               Head {h00=0x002c, h01=0x0050, text=»DWTOTQ EQU DWTDRD+/00 OUTPUT QUEUE LINK «, t00=0x0010, t01=0x00b4}
0x19de…1a08               Head {h00=0x0026, h01=0x0050, text=»DWTA2 EQU DWTDRD+/02 SAVE AREA A2 «, t00=0x0010, t01=0x00e4}
0x1a08…1a32               Head {h00=0x0026, h01=0x0050, text=»DWTA3 EQU DWTDRD+/02 SAVE AREA A3 «, t00=0x0010, t01=0x010e}
0x1a32…1a5c               Head {h00=0x0026, h01=0x0050, text=»DWTA4 EQU DWTDRD+/04 SAVE AREA A4 «, t00=0x0010, t01=0x0138}
0x1a5c…1a86               Head {h00=0x0026, h01=0x0050, text=»DWTA5 EQU DWTDRD+/06 SAVE AREA A5 «, t00=0x0010, t01=0x0162}
0x1a86…1ab8               Head {h00=0x002e, h01=0x0050, text=»DWTSB1 EQU DWTDRD+/0A STACK BASE 1 IN DWT «, t00=0x0010, t01=0x018c}
0x1ab8…1aea               Head {h00=0x002e, h01=0x0050, text=»DWTSB2 EQU DWTDRD+/0E STACK BASE 2 IN DWT «, t00=0x0011, t01=0x002e}
0x1aea…1b14               Head {h00=0x0026, h01=0x0050, text=»DWTTP EQU DWTDRD+/10 TIMER POINTER«, t00=0x0011, t01=0x0060}
0x1b14…1b4c               Head {h00=0x0034, h01=0x0050, text=»DWTORD EQU DWTDRD+/10 SAVE AREA INDEX AND ORDER «, t00=0x0011, t01=0x008a}
0x1b4c…1b82               Head {h00=0x0032, h01=0x0050, text=»DWTNVL EQU DWTDRD+/12 NEW VOLUME LOADED FLAGS «, t00=0x0011, t01=0x00c2}
0x1b82…1bb0               Head {h00=0x002a, h01=0x0050, text=»DWTECH EQU DWTDRD+/12 ECHO DEVICE DWT «, t00=0x0011, t01=0x00f8}
0x1bb0…1bde               Head {h00=0x002a, h01=0x0050, text=»DWTVOL EQU DWTDRD+/1A DISC VOLUME NAME«, t00=0x0011, t01=0x0126}
0x1bde…1c0a               Head {h00=0x0028, h01=0x0050, text=»DWTSQ EQU DWTDRD+/1C START OF QUEUE «, t00=0x0011, t01=0x0154}
0x1c0a…1c14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0180}
0x1c14…1c2c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0011, t01=0x018a}
0x1c2c…1c36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0012}
0x1c36…1c40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x001c}
0x1c40…1c5e               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0012, t01=0x0026}
0x1c5e…1c7c               Head {h00=0x001a, h01=0x0050, text=»* DAB DISPLACEMENTS * «, t00=0x0012, t01=0x0044}
0x1c7c…1c9a               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0012, t01=0x0062}
0x1c9a…1ca4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0080}
0x1ca4…1cd0               Head {h00=0x0028, h01=0x0050, text=»* DRIVER ADDRESS BLOCK DISPLACEMENTS«, t00=0x0012, t01=0x008a}
0x1cd0…1cda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b6}
0x1cda…1d04               Head {h00=0x0026, h01=0x0050, text=»KEYLEN EQU -6 DWT KEYTABLE LENGTH «, t00=0x0012, t01=0x00c0}
0x1d04…1d2c               Head {h00=0x0024, h01=0x0050, text=»BUFLEN EQU -4 DWT BUFFER LENGTH «, t00=0x0012, t01=0x00ea}
0x1d2c…1d4e               Head {h00=0x001e, h01=0x0050, text=»DEVIND EQU -2 DEVICE INDEX«, t00=0x0012, t01=0x0112}
0x1d4e…1d76               Head {h00=0x0024, h01=0x0050, text=»ACTADR EQU 0 ACTIVATION ADDRESS «, t00=0x0012, t01=0x0134}
0x1d76…1d98               Head {h00=0x001e, h01=0x0050, text=»ABTADR EQU 2 ABORT ADDRESS«, t00=0x0012, t01=0x015c}
0x1d98…1dbe               Head {h00=0x0022, h01=0x0050, text=»INTADR EQU 4 INTERRUPT ADDRESS«, t00=0x0012, t01=0x017e}
0x1dbe…1df4               Head {h00=0x0032, h01=0x0050, text=»POLADR EQU 4 BUFFER POOL ADDRESS (DC DRIVERS) «, t00=0x0013, t01=0x0014}
0x1df4…1e2a               Head {h00=0x0032, h01=0x0050, text=»HDRLEN EQU 6 BUFFER HEADER LENGTH (DC DRIVERS)«, t00=0x0013, t01=0x004a}
0x1e2a…1e50               Head {h00=0x0022, h01=0x0050, text=»RECADR EQU 6 RECOVERY ADDRESS «, t00=0x0013, t01=0x0080}
0x1e50…1e72               Head {h00=0x001e, h01=0x0050, text=»ECHADR EQU 8 ECHO ADDRESS «, t00=0x0013, t01=0x00a6}
0x1e72…1e7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00c8}
0x1e7c…1e86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d2}
0x1e86…1ea6               Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0013, t01=0x00dc}
0x1ea6…1ec6               Head {h00=0x001c, h01=0x0050, text=»* DEVICE INDEX VALUES * «, t00=0x0013, t01=0x00fc}
0x1ec6…1ee6               Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0013, t01=0x011c}
0x1ee6…1ef0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x013c}
0x1ef0…1efa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0146}
0x1efa…1f48               Head {h00=0x004a, h01=0x0050, text=»*   THE VALUES ARE USED IN MMU SYSTEMS FOR SELECTING A SPECIAL ROUTINE«, t00=0x0013, t01=0x0150}
0x1f48…1f92               Head {h00=0x0046, h01=0x0050, text=»*   FROM ADDRESS TABLES TIOTAB AND TENTAB AT READ/WRITE REQUESTS. «, t00=0x0014, t01=0x000e}
0x1f92…1f9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0058}
0x1f9c…1fc4               Head {h00=0x0024, h01=0x0050, text=»DC:DIX EQU -2 DATA COMMUNICATION«, t00=0x0014, t01=0x0062}
0x1fc4…1fe8               Head {h00=0x0020, h01=0x0050, text=»DM:DIX EQU 0 DATA MANAGEMENT«, t00=0x0014, t01=0x008a}
0x1fe8…2010               Head {h00=0x0024, h01=0x0050, text=»PC:DIX EQU 2 PROGRAMMED CHANNEL «, t00=0x0014, t01=0x00ae}
0x2010…2036               Head {h00=0x0022, h01=0x0050, text=»MX:DIX EQU 4 MULTIPLEX CHANNEL«, t00=0x0014, t01=0x00d6}
0x2036…2058               Head {h00=0x001e, h01=0x0050, text=»KB:DIX EQU 6 KEYBOARD/CTW «, t00=0x0014, t01=0x00fc}
0x2058…2084               Head {h00=0x0028, h01=0x0050, text=»IT:DIX EQU 8 INTERTASK COMMUNICATION«, t00=0x0014, t01=0x011e}
0x2084…209e               Head {h00=0x0016, h01=0x0050, text=»DK:DIX EQU 10 DISC«, t00=0x0014, t01=0x014a}
0x209e…20a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0164}
0x20a8…20c0               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0014, t01=0x016e}
0x20c0…20ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0186}
0x20ca…20d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0190}
0x20d4…20f2               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0015, t01=0x000a}
0x20f2…2110               Head {h00=0x001a, h01=0x0050, text=»* ECB DISPLACEMENTS * «, t00=0x0015, t01=0x0028}
0x2110…212e               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0015, t01=0x0046}
0x212e…2138               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0064}
0x2138…2164               Head {h00=0x0028, h01=0x0050, text=»* EVENT CONTROL BLOCK DISPLACEMENTS «, t00=0x0015, t01=0x006e}
0x2164…216e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x009a}
0x216e…218e               Head {h00=0x001c, h01=0x0050, text=»ECBFC EQU /01 FILE CODE «, t00=0x0015, t01=0x00a4}
0x218e…21b2               Head {h00=0x0020, h01=0x0050, text=»ECBBA EQU /02 BUFFER ADDRESS«, t00=0x0015, t01=0x00c4}
0x21b2…21d8               Head {h00=0x0022, h01=0x0050, text=»ECBRL EQU /04 REQUESTED LENGTH«, t00=0x0015, t01=0x00e8}
0x21d8…21fe               Head {h00=0x0022, h01=0x0050, text=»ECBEL EQU /06 EFFECTIVE LENGTH«, t00=0x0015, t01=0x010e}
0x21fe…2220               Head {h00=0x001e, h01=0x0050, text=»ECBRC EQU /08 RETURN CODE «, t00=0x0015, t01=0x0134}
0x2220…2242               Head {h00=0x001e, h01=0x0050, text=»ECBCW EQU /0A CONTROL WORD«, t00=0x0015, t01=0x0156}
0x2242…2268               Head {h00=0x0022, h01=0x0050, text=»ECBCW1 EQU /0A CONTROL WORD 1 «, t00=0x0015, t01=0x0178}
0x2268…228e               Head {h00=0x0022, h01=0x0050, text=»ECBCW2 EQU /0C CONTROL WORD 2 «, t00=0x0016, t01=0x000e}
0x228e…2298               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0034}
0x2298…22b0               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0016, t01=0x003e}
0x22b0…22ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0056}
0x22ba…22c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0060}
0x22c4…22da               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0016, t01=0x006a}
0x22da…22e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0080}
0x22e4…22ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x008a}
0x22ee…2300               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0016, t01=0x0094}
0x2300…2312               Head {h00=0x000e, h01=0x0050, text=»* TIOTAB *«, t00=0x0016, t01=0x00a6}
0x2312…2324               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0016, t01=0x00b8}
0x2324…232e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ca}
0x232e…236e               Head {h00=0x003c, h01=0x0050, text=»* TIOTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TIO«, t00=0x0016, t01=0x00d4}
0x236e…2378               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0114}
0x2378…23ae               Head {h00=0x0032, h01=0x0050, text=»TIOTAB EQU * DEVICE TYPE/ROUTINE ADDRESS TABLE«, t00=0x0016, t01=0x011e}
0x23ae…23e0               Head {h00=0x002e, h01=0x0050, text=» DATA TIO:DM DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x0016, t01=0x0154}
0x23e0…240e               Head {h00=0x002a, h01=0x0050, text=» DATA TIOPCI PROGRAMMED CHANNEL, INPUT«, t00=0x0016, t01=0x0186}
0x240e…242e               Head {h00=0x001c, h01=0x0050, text=» DATA TIOMXI MUX, INPUT «, t00=0x0017, t01=0x0024}
0x242e…2456               Head {h00=0x0024, h01=0x0050, text=» DATA TIOKBI KEYBOARD/CTW, INPUT«, t00=0x0017, t01=0x0044}
0x2456…248a               Head {h00=0x0030, h01=0x0050, text=» DATA TIOITI INTERTASK COMMUNICATION, INPUT «, t00=0x0017, t01=0x006c}
0x248a…2494               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00a0}
0x2494…24b0               Head {h00=0x0018, h01=0x0050, text=»TINDEX EQU *-TIOTAB «, t00=0x0017, t01=0x00aa}
0x24b0…24d0               Head {h00=0x001c, h01=0x0050, text=» DATA TIODKI DISC, INPUT«, t00=0x0017, t01=0x00c6}
0x24d0…2500               Head {h00=0x002c, h01=0x0050, text=» DATA TIOPCO PROGRAMMED CHANNEL, OUTPUT «, t00=0x0017, t01=0x00e6}
0x2500…2520               Head {h00=0x001c, h01=0x0050, text=» DATA TIOMXO MUX, OUTPUT«, t00=0x0017, t01=0x0116}
0x2520…254a               Head {h00=0x0026, h01=0x0050, text=» DATA TIOKBO KEYBOARD/CTW, OUTPUT «, t00=0x0017, t01=0x0136}
0x254a…257e               Head {h00=0x0030, h01=0x0050, text=» DATA TIOITO INTERTASK COMMUNICATION, OUTPUT«, t00=0x0017, t01=0x0160}
0x257e…25a0 (24, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» DATA TIODKO DISC, OUTPUT «, t00=0x0018, t01=0x0004}
0x25a0…25aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0026}
0x25aa…25c2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0018, t01=0x0030}
0x25c2…25cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0048}
0x25cc…25d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0052}
0x25d6…25e8               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0018, t01=0x005c}
0x25e8…25fa               Head {h00=0x000e, h01=0x0050, text=»* TENTAB *«, t00=0x0018, t01=0x006e}
0x25fa…260c               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0018, t01=0x0080}
0x260c…2616               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0092}
0x2616…265a               Head {h00=0x0040, h01=0x0050, text=»* TENTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TENDIO «, t00=0x0018, t01=0x009c}
0x265a…2664               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00e0}
0x2664…269a               Head {h00=0x0032, h01=0x0050, text=»TENTAB EQU * DEVICE TYPE/ROUTINE ADDRESS TABLE«, t00=0x0018, t01=0x00ea}
0x269a…26cc               Head {h00=0x002e, h01=0x0050, text=» DATA TEN:DM DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x0018, t01=0x0120}
0x26cc…26fa               Head {h00=0x002a, h01=0x0050, text=» DATA TENPCI PROGRAMMED CHANNEL, INPUT«, t00=0x0018, t01=0x0152}
0x26fa…271a               Head {h00=0x001c, h01=0x0050, text=» DATA TENMXI MUX, INPUT «, t00=0x0018, t01=0x0180}
0x271a…2742               Head {h00=0x0024, h01=0x0050, text=» DATA TENKBI KEYBOARD/CTW, INPUT«, t00=0x0019, t01=0x0010}
0x2742…2776               Head {h00=0x0030, h01=0x0050, text=» DATA TENITI INTERTASK COMMUNICATION, INPUT «, t00=0x0019, t01=0x0038}
0x2776…2796               Head {h00=0x001c, h01=0x0050, text=» DATA TENDKI DISC, INPUT«, t00=0x0019, t01=0x006c}
0x2796…27c6               Head {h00=0x002c, h01=0x0050, text=» DATA TENPCO PROGRAMMED CHANNEL, OUTPUT «, t00=0x0019, t01=0x008c}
0x27c6…27e6               Head {h00=0x001c, h01=0x0050, text=» DATA TENMXO MUX, OUTPUT«, t00=0x0019, t01=0x00bc}
0x27e6…2810               Head {h00=0x0026, h01=0x0050, text=» DATA TENKBO KEYBOARD/CTW, OUTPUT «, t00=0x0019, t01=0x00dc}
0x2810…2844               Head {h00=0x0030, h01=0x0050, text=» DATA TENITO INTERTASK COMMUNICATION, OUTPUT«, t00=0x0019, t01=0x0106}
0x2844…2866               Head {h00=0x001e, h01=0x0050, text=» DATA TENDKO DISC, OUTPUT «, t00=0x0019, t01=0x013a}
0x2866…2872               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x015c}
0x2872…287c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0168}
0x287c…2894               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0019, t01=0x0172}
0x2894…289e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x018a}
0x289e…28a8 (26, 0, 398)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0004}
0x28a8…28ba               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001a, t01=0x000e}
0x28ba…28cc               Head {h00=0x000e, h01=0x0050, text=»* MONMMU *«, t00=0x001a, t01=0x0020}
0x28cc…28de               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001a, t01=0x0032}
0x28de…28e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0044}
0x28e8…290c               Head {h00=0x0020, h01=0x0050, text=»* MONITOR (SYSTEM) MMU TABLE«, t00=0x001a, t01=0x004e}
0x290c…2916               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0072}
0x2916…292a               Head {h00=0x0010, h01=0x0050, text=»MONMMU EQU *«, t00=0x001a, t01=0x007c}
0x292a…2940               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001a, t01=0x0090}
0x2940…2966               Head {h00=0x0022, h01=0x0050, text=» DATA /0000,/0400,/0800,/0C00 «, t00=0x001a, t01=0x00a6}
0x2966…298c               Head {h00=0x0022, h01=0x0050, text=» DATA /1000,/1400,/1800,/1C00 «, t00=0x001a, t01=0x00cc}
0x298c…29b2               Head {h00=0x0022, h01=0x0050, text=» DATA /2000,/2400,/2800,/2C00 «, t00=0x001a, t01=0x00f2}
0x29b2…29d8               Head {h00=0x0022, h01=0x0050, text=» DATA /3000,/3400,/3800,/3C00 «, t00=0x001a, t01=0x0118}
0x29d8…29e4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x013e}
0x29e4…29ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x014a}
0x29ee…2a06               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001a, t01=0x0154}
0x2a06…2a10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x016c}
0x2a10…2a1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0176}
0x2a1a…2a30               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x001a, t01=0x0180}
0x2a30…2a3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0008}
0x2a3a…2a70               Head {h00=0x0032, h01=0x0050, text=»* SUBROUTINES BELOW ARE USED BY ATTACH/DETACH «, t00=0x001b, t01=0x0012}
0x2a70…2a7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0048}
0x2a7a…2a90               Head {h00=0x0012, h01=0x0050, text=»* T I M O U T «, t00=0x001b, t01=0x0052}
0x2a90…2a9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0068}
0x2a9a…2abc               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A1 = DWT ADDRESS«, t00=0x001b, t01=0x0072}
0x2abc…2aee               Head {h00=0x002e, h01=0x0050, text=»*         A2 = ADDRESS TO 2ND TIMER BLOCK «, t00=0x001b, t01=0x0094}
0x2aee…2af8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00c6}
0x2af8…2b1c               Head {h00=0x0020, h01=0x0050, text=»* OUTPUT: A4 = BLOCK ADDRESS«, t00=0x001b, t01=0x00d0}
0x2b1c…2b40               Head {h00=0x0020, h01=0x0050, text=»*         A5 = TTAB ADDRESS «, t00=0x001b, t01=0x00f4}
0x2b40…2b62               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x001b, t01=0x0118}
0x2b62…2b88               Head {h00=0x0022, h01=0x0050, text=»*         A1-A3 ARE DESTROYED «, t00=0x001b, t01=0x013a}
0x2b88…2b92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0160}
0x2b92…2baa               Head {h00=0x0014, h01=0x0050, text=»TIMOUT LDR A6,A1«, t00=0x001b, t01=0x016a}
0x2baa…2bd4               Head {h00=0x0026, h01=0x0050, text=» LDR* A2,A2 TIMER POINTER ADDRESS «, t00=0x001b, t01=0x0182}
0x2bd4…2bf4               Head {h00=0x001c, h01=0x0050, text=» LD A5,2,A2 TTAB ADDRESS«, t00=0x001c, t01=0x001c}
0x2bf4…2c0a               Head {h00=0x0012, h01=0x0050, text=» CF A15,FNDBLK«, t00=0x001c, t01=0x003c}
0x2c0a…2c1e               Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A4 «, t00=0x001c, t01=0x0052}
0x2c1e…2c44               Head {h00=0x0022, h01=0x0050, text=» STR A1,A2 REMOVE FROM ATT:CH «, t00=0x001c, t01=0x0066}
0x2c44…2c5a               Head {h00=0x0012, h01=0x0050, text=» CF A15,FREBLK«, t00=0x001c, t01=0x008c}
0x2c5a…2c64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00a2}
0x2c64…2c7c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001c, t01=0x00ac}
0x2c7c…2c86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00c4}
0x2c86…2cb0               Head {h00=0x0026, h01=0x0050, text=»*    REMOVE TTAB FROM DEVICE QUEUE«, t00=0x001c, t01=0x00ce}
0x2cb0…2cba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00f8}
0x2cba…2ccc               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x001c, t01=0x0102}
0x2ccc…2cf6               Head {h00=0x0026, h01=0x0050, text=» ADK A1,DWTTQ QUEUE ANCHOR ADDRESS«, t00=0x001c, t01=0x0114}
0x2cf6…2d00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x013e}
0x2d00…2d1e               Head {h00=0x001a, h01=0x0050, text=»TIM:10 LDR A2,A1 SAVE «, t00=0x001c, t01=0x0148}
0x2d1e…2d40               Head {h00=0x001e, h01=0x0050, text=» LDR* A1,A1 NEXT IN QUEUE «, t00=0x001c, t01=0x0166}
0x2d40…2d62               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TIM:20 END OF QUEUE«, t00=0x001c, t01=0x0188}
0x2d62…2d76               Head {h00=0x0010, h01=0x0050, text=»  CWR A1,A5 «, t00=0x001d, t01=0x001a}
0x2d76…2d96               Head {h00=0x001c, h01=0x0050, text=» RB(NE) TIM:10 NOT FOUND«, t00=0x001d, t01=0x002e}
0x2d96…2da0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x004e}
0x2da0…2db8               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001d, t01=0x0058}
0x2db8…2dc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0070}
0x2dc2…2dec               Head {h00=0x0026, h01=0x0050, text=»*   TTAB FOUND - REMOVE FROM QUEUE«, t00=0x001d, t01=0x007a}
0x2dec…2df6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00a4}
0x2df6…2e0a               Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A1 «, t00=0x001d, t01=0x00ae}
0x2e0a…2e1c               Head {h00=0x000e, h01=0x0050, text=» STR A1,A2«, t00=0x001d, t01=0x00c2}
0x2e1c…2e26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00d4}
0x2e26…2e3a               Head {h00=0x0010, h01=0x0050, text=»TIM:20 EQU *«, t00=0x001d, t01=0x00de}
0x2e3a…2e4c               Head {h00=0x000e, h01=0x0050, text=» LDK A3,4 «, t00=0x001d, t01=0x00f2}
0x2e4c…2e7e               Head {h00=0x002e, h01=0x0050, text=» ADS A3,TTB:SA,A5 UPDATE DISPATCH ADDRESS «, t00=0x001d, t01=0x0104}
0x2e7e…2eb8               Head {h00=0x0036, h01=0x0050, text=» LD A8,TTB:SA+16,A5 ECB ADDRESS FROM A8 SAVE AREA «, t00=0x001d, t01=0x0136}
0x2eb8…2edc               Head {h00=0x0020, h01=0x0050, text=» LDK A3,/40 SET TIMEOUT BIT «, t00=0x001d, t01=0x0170}
0x2edc…2ee6 (30, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0004}
0x2ee6…2efc               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001e, t01=0x000e}
0x2efc…2f2a               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBRC,A8 INDICATE ERROR IN ECB «, t00=0x001e, t01=0x0024}
0x2f2a…2f36               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0052}
0x2f36…2f40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x005e}
0x2f40…2f56               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x001e, t01=0x0068}
0x2f56…2f6c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001e, t01=0x007e}
0x2f6c…2f9e               Head {h00=0x002e, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS FROM TTAB«, t00=0x001e, t01=0x0094}
0x2f9e…2fcc               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBRC,A8 INDICATE ERROR IN ECB «, t00=0x001e, t01=0x00c6}
0x2fcc…2ffe               Head {h00=0x002e, h01=0x0050, text=» TL MONMMU LOAD MONITOR (SYSTEM) MMU TABLE«, t00=0x001e, t01=0x00f4}
0x2ffe…300a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0126}
0x300a…3014               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0132}
0x3014…302a               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x001e, t01=0x013c}
0x302a…3054               Head {h00=0x0026, h01=0x0050, text=» RF TIORTN QUEUE TASK AND DISPATCH«, t00=0x001e, t01=0x0152}
0x3054…305e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x017c}
0x305e…3076               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001e, t01=0x0186}
0x3076…3080               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x000e}
0x3080…3096               Head {h00=0x0012, h01=0x0050, text=»* F N D B L K «, t00=0x001f, t01=0x0018}
0x3096…30a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x002e}
0x30a0…30cc               Head {h00=0x0028, h01=0x0050, text=»* SUBROUTINE TO FIND BLOCK IN ATT:CH«, t00=0x001f, t01=0x0038}
0x30cc…30d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0064}
0x30d6…30fa               Head {h00=0x0020, h01=0x0050, text=»* INPUT:  A5 = TTAB ADDRESS «, t00=0x001f, t01=0x006e}
0x30fa…3104               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0092}
0x3104…313e               Head {h00=0x0036, h01=0x0050, text=»* OUTPUT: A2 = ADDRESS TO PRECEDING BLOCK IN CHAIN«, t00=0x001f, t01=0x009c}
0x313e…3174               Head {h00=0x0032, h01=0x0050, text=»*         A4 = BLOCK ADDRESS IF FOUND, ELSE 0 «, t00=0x001f, t01=0x00d6}
0x3174…317e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x010c}
0x317e…31aa               Head {h00=0x0028, h01=0x0050, text=»FNDBLK LDKL A4,ATT:CH ANCHOR ADDRESS«, t00=0x001f, t01=0x0116}
0x31aa…31b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0142}
0x31b4…31d4               Head {h00=0x001c, h01=0x0050, text=»FND:10 LDR A2,A4 SAVE A4«, t00=0x001f, t01=0x014c}
0x31d4…31e8               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A4 «, t00=0x001f, t01=0x016c}
0x31e8…320c               Head {h00=0x0020, h01=0x0050, text=» RF(Z) FND:20 END OF ATT:CH «, t00=0x001f, t01=0x0180}
0x320c…3220               Head {h00=0x0010, h01=0x0050, text=» CW A5,4,A4 «, t00=0x0020, t01=0x0014}
0x3220…3240               Head {h00=0x001c, h01=0x0050, text=» RB(NE) FND:10 NOT FOUND«, t00=0x0020, t01=0x0028}
0x3240…324a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0048}
0x324a…325e               Head {h00=0x0010, h01=0x0050, text=»FND:20 EQU *«, t00=0x0020, t01=0x0052}
0x325e…3274               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0020, t01=0x0066}
0x3274…328e               Head {h00=0x0016, h01=0x0050, text=» ABL IHRTN RETURN «, t00=0x0020, t01=0x007c}
0x328e…329a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0096}
0x329a…32a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00a2}
0x32a4…32ba               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0020, t01=0x00ac}
0x32ba…32d0               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0020, t01=0x00c2}
0x32d0…32e8               Head {h00=0x0014, h01=0x0050, text=» RTN A15 RETURN «, t00=0x0020, t01=0x00d8}
0x32e8…32f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00f0}
0x32f4…32fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00fc}
0x32fe…3314               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0020, t01=0x0106}
0x3314…333e               Head {h00=0x0026, h01=0x0050, text=»ATT:CH DATA 0 ATTACH CHAIN ANCHOR «, t00=0x0020, t01=0x011c}
0x333e…3348               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0146}
0x3348…3360               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0020, t01=0x0150}
0x3360…336a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0168}
0x336a…3374               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0172}
0x3374…3386               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0020, t01=0x017c}
0x3386…3398               Head {h00=0x000e, h01=0x0050, text=»* ATTACH *«, t00=0x0020, t01=0x018e}
0x3398…33aa               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0021, t01=0x0010}
0x33aa…33b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0022}
0x33b4…33be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x002c}
0x33be…33ec               Head {h00=0x002a, h01=0x0050, text=»*  THIS MODULE IS CALLED FROM TIO WITH«, t00=0x0021, t01=0x0036}
0x33ec…3410               Head {h00=0x0020, h01=0x0050, text=»*  THE FOLLOWING PARAMETERS:«, t00=0x0021, t01=0x0064}
0x3410…341a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0088}
0x341a…3444               Head {h00=0x0026, h01=0x0050, text=»*   A3  /8000 (REQUEST ERROR BIT) «, t00=0x0021, t01=0x0092}
0x3444…346e               Head {h00=0x0026, h01=0x0050, text=»*   A4  I/O AND ACTIVATE INDICATOR«, t00=0x0021, t01=0x00bc}
0x346e…348a               Head {h00=0x0018, h01=0x0050, text=»*   A5  TTAB ADDRESS«, t00=0x0021, t01=0x00e6}
0x348a…34a6               Head {h00=0x0018, h01=0x0050, text=»*   A6  DWT ADDRESS «, t00=0x0021, t01=0x0102}
0x34a6…34c0               Head {h00=0x0016, h01=0x0050, text=»*   A7  ORDER CODE«, t00=0x0021, t01=0x011e}
0x34c0…34dc               Head {h00=0x0018, h01=0x0050, text=»*   A8  ECB ADDRESS «, t00=0x0021, t01=0x0138}
0x34dc…34fe               Head {h00=0x001e, h01=0x0050, text=»*  A10  /0800 (ATTACH BIT)«, t00=0x0021, t01=0x0154}
0x34fe…352e               Head {h00=0x002c, h01=0x0050, text=»*  A12  ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0021, t01=0x0176}
0x352e…3548               Head {h00=0x0016, h01=0x0050, text=»*  A13  DWT STATUS«, t00=0x0022, t01=0x0016}
0x3548…3552               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0030}
0x3552…356c               Head {h00=0x0016, h01=0x0050, text=»ATTACH EQU * ENTRY«, t00=0x0022, t01=0x003a}
0x356c…3584               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x0022, t01=0x0054}
0x3584…35b2               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TIOERR I/O AND ACTIVATE ERROR «, t00=0x0022, t01=0x006c}
0x35b2…35bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x009a}
0x35bc…35d2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0022, t01=0x00a4}
0x35d2…35f8               Head {h00=0x0022, h01=0x0050, text=» CM ECBRC,A8 RESET RETURN CODE«, t00=0x0022, t01=0x00ba}
0x35f8…3604               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00e0}
0x3604…360e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ec}
0x360e…3624               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0022, t01=0x00f6}
0x3624…363a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0022, t01=0x010c}
0x363a…3664               Head {h00=0x0026, h01=0x0050, text=» ES A4,ECBRC,A8 RESET RETURN CODE «, t00=0x0022, t01=0x0122}
0x3664…3670               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x014c}
0x3670…367a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0158}
0x367a…3692               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0022, t01=0x0162}
0x3692…369c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x017a}
0x369c…36a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0184}
0x36a6…36bc               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0022, t01=0x018e}
0x36bc…36d0               Head {h00=0x0010, h01=0x0050, text=» TM A10,A13 «, t00=0x0023, t01=0x0014}
0x36d0…36fe               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) ATT:40 DEVICE ALREADY ATTACHED«, t00=0x0023, t01=0x0028}
0x36fe…3712               Head {h00=0x0010, h01=0x0050, text=» LDR A13,A13«, t00=0x0023, t01=0x0056}
0x3712…3734               Head {h00=0x001e, h01=0x0050, text=» RF(NN) ATT:50 DEVICE BUSY«, t00=0x0023, t01=0x006a}
0x3734…373e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x008c}
0x373e…3762               Head {h00=0x0020, h01=0x0050, text=»*    ATTACH REQUESTING TASK «, t00=0x0023, t01=0x0096}
0x3762…376c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00ba}
0x376c…378c               Head {h00=0x001c, h01=0x0050, text=» ORS A10,DWTST,A6 ATTACH«, t00=0x0023, t01=0x00c4}
0x378c…37bc               Head {h00=0x002c, h01=0x0050, text=» ST A5,DWTTAB,A6 PUT TTAB ADDRESS IN DWT«, t00=0x0023, t01=0x00e4}
0x37bc…37e4               Head {h00=0x0024, h01=0x0050, text=» CF A15,FNDBLK ANY TIMERS ACTIVE«, t00=0x0023, t01=0x0114}
0x37e4…37fc               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x0023, t01=0x013c}
0x37fc…3816               Head {h00=0x0016, h01=0x0050, text=» RF(Z) ATTRTN NO! «, t00=0x0023, t01=0x0154}
0x3816…3820               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x016e}
0x3820…3838               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0023, t01=0x0178}
0x3838…3842               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0190}
0x3842…386c               Head {h00=0x0026, h01=0x0050, text=»*   FREE BLOCK AND TIMER IN ATT:CH«, t00=0x0024, t01=0x000a}
0x386c…3876               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0034}
0x3876…3892               Head {h00=0x0018, h01=0x0050, text=» CM* 2,A4 FREE TIMER«, t00=0x0024, t01=0x003e}
0x3892…38b8               Head {h00=0x0022, h01=0x0050, text=» LDR* A3,A4 REMOVE FROM ATT:CH«, t00=0x0024, t01=0x005a}
0x38b8…38ca               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0024, t01=0x0080}
0x38ca…38ee               Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RELEASE BLOCK«, t00=0x0024, t01=0x0092}
0x38ee…390c               Head {h00=0x001a, h01=0x0050, text=» RF ATTRTN END REQUEST«, t00=0x0024, t01=0x00b6}
0x390c…3916               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00d4}
0x3916…3934               Head {h00=0x001a, h01=0x0050, text=»ATT:40 CW A5,DWTTAB,A6«, t00=0x0024, t01=0x00de}
0x3934…3966               Head {h00=0x002e, h01=0x0050, text=» RF(E) TIOERR ATTACHED TO REQUESTING TASK «, t00=0x0024, t01=0x00fc}
0x3966…3970               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x012e}
0x3970…398e               Head {h00=0x001a, h01=0x0050, text=»ATT:50 CF A15,FNDBLK  «, t00=0x0024, t01=0x0138}
0x398e…39a6               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x0024, t01=0x0156}
0x39a6…39cc               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) ATT:70 IS TIMER ACTIVE«, t00=0x0024, t01=0x016e}
0x39cc…39d6 (37, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0004}
0x39d6…39ee               Head {h00=0x0014, h01=0x0050, text=»*     SET TIMER «, t00=0x0025, t01=0x000e}
0x39ee…39f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0026}
0x39f8…3a0e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0025, t01=0x0030}
0x3a0e…3a2a               Head {h00=0x0018, h01=0x0050, text=» LD A1,ECBCW,A8 TIME«, t00=0x0025, t01=0x0046}
0x3a2a…3a36               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0062}
0x3a36…3a40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x006e}
0x3a40…3a58               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0025, t01=0x0078}
0x3a58…3a62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0090}
0x3a62…3a6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x009a}
0x3a6c…3a82               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0025, t01=0x00a4}
0x3a82…3a98               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0025, t01=0x00ba}
0x3a98…3ab4               Head {h00=0x0018, h01=0x0050, text=» EL A1,ECBCW,A8 TIME«, t00=0x0025, t01=0x00d0}
0x3ab4…3ac0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x00ec}
0x3ac0…3aca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00f8}
0x3aca…3ae0               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0025, t01=0x0102}
0x3ae0…3b04               Head {h00=0x0020, h01=0x0050, text=» RF(N) TIOERR NEGATIVE TIME «, t00=0x0025, t01=0x0118}
0x3b04…3b26               Head {h00=0x001e, h01=0x0050, text=» RF(Z) ATT:80 END REQUEST «, t00=0x0025, t01=0x013c}
0x3b26…3b30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x015e}
0x3b30…3b4a               Head {h00=0x0016, h01=0x0050, text=»ATT:60 ST A1,ATTIM«, t00=0x0025, t01=0x0168}
0x3b4a…3b6a               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A5 TTAB ADDRESS «, t00=0x0025, t01=0x0182}
0x3b6a…3b86               Head {h00=0x0018, h01=0x0050, text=» LD A3,ATT:CH ANCHOR«, t00=0x0026, t01=0x0012}
0x3b86…3ba2               Head {h00=0x0018, h01=0x0050, text=» CF A15,GETBLK BLOCK«, t00=0x0026, t01=0x002e}
0x3ba2…3bc6               Head {h00=0x0020, h01=0x0050, text=» ST A4,ATT:CH UPDATE ANCHOR «, t00=0x0026, t01=0x004a}
0x3bc6…3bee               Head {h00=0x0024, h01=0x0050, text=» ADK A4,2 TIMER POINTER ADDRESS «, t00=0x0026, t01=0x006e}
0x3bee…3c0c               Head {h00=0x001a, h01=0x0050, text=» LDR A1,A6 DWT ADDRESS«, t00=0x0026, t01=0x0096}
0x3c0c…3c2c               Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIMER«, t00=0x0026, t01=0x00b4}
0x3c2c…3c40               Head {h00=0x0010, h01=0x0050, text=» DATA TIMOUT«, t00=0x0026, t01=0x00d4}
0x3c40…3c4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00e8}
0x3c4a…3c5e               Head {h00=0x0010, h01=0x0050, text=»ATTIM DATA 0«, t00=0x0026, t01=0x00f2}
0x3c5e…3c68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0106}
0x3c68…3c98               Head {h00=0x002c, h01=0x0050, text=»ATT:70 LDK A4,0 NOT ACTIVATION PARAMETER«, t00=0x0026, t01=0x0110}
0x3c98…3caa               Head {h00=0x000e, h01=0x0050, text=» RF TIOQ20«, t00=0x0026, t01=0x0140}
0x3caa…3cb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0152}
0x3cb4…3cde               Head {h00=0x0026, h01=0x0050, text=»ATT:80 LDK A3,/40 SET TIME OUT BIT«, t00=0x0026, t01=0x015c}
0x3cde…3cf8               Head {h00=0x0016, h01=0x0050, text=» RF TIOERR RETURN «, t00=0x0026, t01=0x0186}
0x3cf8…3d02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0010}
0x3d02…3d1a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0027, t01=0x001a}
0x3d1a…3d24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0032}
0x3d24…3d2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x003c}
0x3d2e…3d40               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0027, t01=0x0046}
0x3d40…3d52               Head {h00=0x000e, h01=0x0050, text=»* DETACH *«, t00=0x0027, t01=0x0058}
0x3d52…3d64               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0027, t01=0x006a}
0x3d64…3d6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x007c}
0x3d6e…3d9c               Head {h00=0x002a, h01=0x0050, text=»* THIS MODULE IS CALLED FROM TIO WITH «, t00=0x0027, t01=0x0086}
0x3d9c…3dc4               Head {h00=0x0024, h01=0x0050, text=»* THE SAME PARAMETERS AS ATTACH.«, t00=0x0027, t01=0x00b4}
0x3dc4…3dce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00dc}
0x3dce…3de2               Head {h00=0x0010, h01=0x0050, text=»DETACH EQU *«, t00=0x0027, t01=0x00e6}
0x3de2…3dfa               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x0027, t01=0x00fa}
0x3dfa…3e28               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TIOERR I/O AND ACTIVATE ERROR «, t00=0x0027, t01=0x0112}
0x3e28…3e3c               Head {h00=0x0010, h01=0x0050, text=» TM A10,A13 «, t00=0x0027, t01=0x0140}
0x3e3c…3e5e               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TIOERR NOT ATTACHED«, t00=0x0027, t01=0x0154}
0x3e5e…3e76               Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A6«, t00=0x0027, t01=0x0176}
0x3e76…3ea4               Head {h00=0x002a, h01=0x0050, text=» RF(NE) TIOERR ATTACHED TO OTHER TASK «, t00=0x0027, t01=0x018e}
0x3ea4…3ec4               Head {h00=0x001c, h01=0x0050, text=» XRS A10,DWTST,A6 DETACH«, t00=0x0028, t01=0x002c}
0x3ec4…3ee8               Head {h00=0x0020, h01=0x0050, text=» LDR A3,A5 SAVE TTAB ADDRESS«, t00=0x0028, t01=0x004c}
0x3ee8…3f0c               Head {h00=0x0020, h01=0x0050, text=» LD A5,DWTTQ,A6 QUEUE ANCHOR«, t00=0x0028, t01=0x0070}
0x3f0c…3f2e               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DET:10 QUEUE EMPTY «, t00=0x0028, t01=0x0094}
0x3f2e…3f56               Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A5 UPDATE QUEUE ANCHOR «, t00=0x0028, t01=0x00b6}
0x3f56…3f6e               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTTQ,A6 «, t00=0x0028, t01=0x00de}
0x3f6e…3f8e               Head {h00=0x001c, h01=0x0050, text=» CF A15,QTJOB QUEUE TASK«, t00=0x0028, t01=0x00f6}
0x3f8e…3f98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0116}
0x3f98…3fac               Head {h00=0x0010, h01=0x0050, text=»DET:10 EQU *«, t00=0x0028, t01=0x0120}
0x3fac…3fd4               Head {h00=0x0024, h01=0x0050, text=» LDR A5,A3 RESTORE TTAB ADDRESS «, t00=0x0028, t01=0x0134}
0x3fd4…3fde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x015c}
0x3fde…4014               Head {h00=0x0032, h01=0x0050, text=»ATTRTN EQU * COMMON ATTACH/DETACH NORMAL EXIT «, t00=0x0028, t01=0x0166}
0x4014…4038               Head {h00=0x0020, h01=0x0050, text=»DETRTN LDK A3,0 RETURN CODE «, t00=0x0029, t01=0x000c}
0x4038…4044               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x0030}
0x4044…404e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x003c}
0x404e…4066               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0029, t01=0x0046}
0x4066…4070               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x005e}
0x4070…407a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0068}
0x407a…408c               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0029, t01=0x0072}
0x408c…409e               Head {h00=0x000e, h01=0x0050, text=»* TIOERR *«, t00=0x0029, t01=0x0084}
0x409e…40b0               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0029, t01=0x0096}
0x40b0…40ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00a8}
0x40ba…40dc               Head {h00=0x001e, h01=0x0050, text=»* ERROR: FILE CODE UNKNOWN«, t00=0x0029, t01=0x00b2}
0x40dc…4108               Head {h00=0x0028, h01=0x0050, text=»* TIOERR IS ALSO USED AS COMMON EXIT«, t00=0x0029, t01=0x00d4}
0x4108…4134               Head {h00=0x0028, h01=0x0050, text=»* FOR MODULES 'ATTACH' AND 'DETACH'.«, t00=0x0029, t01=0x0100}
0x4134…413e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x012c}
0x413e…4152               Head {h00=0x0010, h01=0x0050, text=»TIOERR EQU *«, t00=0x0029, t01=0x0136}
0x4152…4168               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0029, t01=0x014a}
0x4168…4196               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBRC,A8 SET RETURN CODE IN ECB«, t00=0x0029, t01=0x0160}
0x4196…41c2               Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8 RESET EFFECTIVE LENGTH «, t00=0x0029, t01=0x018e}
0x41c2…41ce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x002a}
0x41ce…41d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0036}
0x41d8…41ee               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x002a, t01=0x0040}
0x41ee…421c               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBRC,A8 SET RETURN CODE IN ECB«, t00=0x002a, t01=0x0056}
0x421c…422e               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002a, t01=0x0084}
0x422e…425c               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBEL,A8 RESET EFFECTIVE LENGTH«, t00=0x002a, t01=0x0096}
0x425c…4268               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x00c4}
0x4268…4272               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00d0}
0x4272…4286               Head {h00=0x0010, h01=0x0050, text=»TIORTN EQU *«, t00=0x002a, t01=0x00da}
0x4286…42b2               Head {h00=0x0028, h01=0x0050, text=» ABL LKMQDI QUEUE TASK AND DISPATCH «, t00=0x002a, t01=0x00ee}
0x42b2…42bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x011a}
0x42bc…42d4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x002a, t01=0x0124}
0x42d4…42de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x013c}
0x42de…42e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0146}
0x42e8…4300               Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x002a, t01=0x0150}
0x4300…4318               Head {h00=0x0014, h01=0x0050, text=»* QUEUE DEVICE *«, t00=0x002a, t01=0x0168}
0x4318…4330               Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x002a, t01=0x0180}
0x4330…433a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0008}
0x433a…4344               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0012}
0x4344…4380               Head {h00=0x0038, h01=0x0050, text=»* THIS IS THE ROUTINE FOR QUEUEING DEVICE REQUESTS. «, t00=0x002b, t01=0x001c}
0x4380…43c2               Head {h00=0x003e, h01=0x0050, text=»* THE ROUTINE IS ENTERED AT DIFFERENT LABELS DEPENDING ON «, t00=0x002b, t01=0x0058}
0x43c2…4406               Head {h00=0x0040, h01=0x0050, text=»* WHETHER THE DEVICE IS AN ECHO DEVICE OR NOT, AND DEPENDING«, t00=0x002b, t01=0x009a}
0x4406…4442               Head {h00=0x0038, h01=0x0050, text=»* ON WHETHER THE DEVICE IS ATTACHED OR NOT, AND WHEN«, t00=0x002b, t01=0x00de}
0x4442…4488               Head {h00=0x0042, h01=0x0050, text=»* ATTACHED, WHETHER THE DEVICE IS ATTACHED TO THE TASK OR NOT.«, t00=0x002b, t01=0x011a}
0x4488…4492               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0160}
0x4492…44b4               Head {h00=0x001e, h01=0x0050, text=»* QUEUE ECHO DEVICE FIRST «, t00=0x002b, t01=0x016a}
0x44b4…44be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x018c}
0x44be…44d6               Head {h00=0x0014, h01=0x0050, text=»TIOQ00 LDR A6,A2«, t00=0x002c, t01=0x0008}
0x44d6…44e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0020}
0x44e0…44fc               Head {h00=0x0018, h01=0x0050, text=»* QUEUE DEVICE FIRST«, t00=0x002c, t01=0x002a}
0x44fc…4506               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0046}
0x4506…452e               Head {h00=0x0024, h01=0x0050, text=»TIOQ05 ADK A6,DWTTQ QUEUE ANCHOR«, t00=0x002c, t01=0x0050}
0x452e…4540               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x002c, t01=0x0078}
0x4540…4554               Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A6 «, t00=0x002c, t01=0x008a}
0x4554…457c               Head {h00=0x0024, h01=0x0050, text=» RF TIOQ40 INSERT FIRST IN QUEUE«, t00=0x002c, t01=0x009e}
0x457c…4586               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00c6}
0x4586…45b0               Head {h00=0x0026, h01=0x0050, text=»TIOQ10 LDR A6,A2 QUEUE ECHO DEVICE«, t00=0x002c, t01=0x00d0}
0x45b0…45ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00fa}
0x45ba…45ec               Head {h00=0x002e, h01=0x0050, text=»QUEDEV EQU * ENTRY USED BY FILE MANAGEMENT«, t00=0x002c, t01=0x0104}
0x45ec…4614               Head {h00=0x0024, h01=0x0050, text=»TIOQ20 ADK A6,DWTTQ QUEUE ANCHOR«, t00=0x002c, t01=0x0136}
0x4614…461e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x015e}
0x461e…4650               Head {h00=0x002e, h01=0x0050, text=»QUEFIL EQU * ENTRY USED BY FILE MANAGEMENT«, t00=0x002c, t01=0x0168}
0x4650…4670               Head {h00=0x001c, h01=0x0050, text=» LD A1,TTB:ST+1,A5 LEVEL«, t00=0x002d, t01=0x000a}
0x4670…467a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x002a}
0x467a…4692               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x002d, t01=0x0034}
0x4692…469c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x004c}
0x469c…46ca               Head {h00=0x002a, h01=0x0050, text=»* SEARCH QUEUE FOR PLACE OF INSERTION «, t00=0x002d, t01=0x0056}
0x46ca…46d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0084}
0x46d4…46ec               Head {h00=0x0014, h01=0x0050, text=»TIOQ30 LDR A2,A6«, t00=0x002d, t01=0x008e}
0x46ec…4714               Head {h00=0x0024, h01=0x0050, text=» LDR* A6,A6 FOLLOW QUEUE TO END «, t00=0x002d, t01=0x00a6}
0x4714…4734               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIOQ40 END FOUND «, t00=0x002d, t01=0x00ce}
0x4734…475e               Head {h00=0x0026, h01=0x0050, text=» CC A1,TTB:ST+1,A6 COMPARE LEVELS «, t00=0x002d, t01=0x00ee}
0x475e…477e               Head {h00=0x001c, h01=0x0050, text=» RB(NL) TIOQ30 TRY NEXT «, t00=0x002d, t01=0x0118}
0x477e…4788               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0138}
0x4788…47bc               Head {h00=0x0030, h01=0x0050, text=»* INSERT IN QUEUE AND UPDATE PROGRAM COUNTER«, t00=0x002d, t01=0x0142}
0x47bc…47c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0176}
0x47c6…47e0               Head {h00=0x0016, h01=0x0050, text=»TIOQ40 LDKL A3,-4 «, t00=0x002d, t01=0x0180}
0x47e0…4802               Head {h00=0x001e, h01=0x0050, text=» STR A6,A5 INSERT IN QUEUE«, t00=0x002e, t01=0x000a}
0x4802…4814               Head {h00=0x000e, h01=0x0050, text=» STR A5,A2«, t00=0x002e, t01=0x002c}
0x4814…482c               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x002e, t01=0x003e}
0x482c…4850               Head {h00=0x0020, h01=0x0050, text=» RF(Z) TIOQ50 NO ACTIVATION «, t00=0x002e, t01=0x0056}
0x4850…486c               Head {h00=0x0018, h01=0x0050, text=» SUK A3,2 ACTIVATION«, t00=0x002e, t01=0x007a}
0x486c…4876               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0096}
0x4876…48ae               Head {h00=0x0034, h01=0x0050, text=»TIOQ50 ADS A3,TTB:SA,A5 UPDATE PC TO REPEAT LKM «, t00=0x002e, t01=0x00a0}
0x48ae…48b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00d8}
0x48b8…48cc               Head {h00=0x0010, h01=0x0050, text=»TIOQ60 EQU *«, t00=0x002e, t01=0x00e2}
0x48cc…48f0               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x002e, t01=0x00f6}
0x48f0…48fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x011a}
0x48fa…4912               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x002e, t01=0x0124}
0x4912…491c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x013c}
0x491c…4926               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0146}
0x4926…4936               Head {h00=0x000c, h01=0x0050, text=»******* «, t00=0x002e, t01=0x0150}
0x4936…4946               Head {h00=0x000c, h01=0x0050, text=»* TIO * «, t00=0x002e, t01=0x0160}
0x4946…4956               Head {h00=0x000c, h01=0x0050, text=»******* «, t00=0x002e, t01=0x0170}
0x4956…4960               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0180}
0x4960…496a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x018a}
0x496a…499c (47, 0, 400)  Head {h00=0x002e, h01=0x0050, text=»* THIS MODULE IS ENTERED WHEN TERMINAL I/O«, t00=0x002f, t01=0x0004}
0x499c…49d2               Head {h00=0x0032, h01=0x0050, text=»* IS REQUIRED. IF A REQUEST CANNOT BE SERVICED«, t00=0x002f, t01=0x0036}
0x49d2…4a0a               Head {h00=0x0034, h01=0x0050, text=»* DUE TO E.G. BUSY DEVICE, THE REQUEST IS QUEUED«, t00=0x002f, t01=0x006c}
0x4a0a…4a40               Head {h00=0x0032, h01=0x0050, text=»* AND THE TERMINAL PROGRAM SET IN WAIT STATE. «, t00=0x002f, t01=0x00a4}
0x4a40…4a4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00da}
0x4a4a…4a80               Head {h00=0x0032, h01=0x0050, text=»* WHEN RUNNING WITH MMU OPTION SPECIAL DEVICE «, t00=0x002f, t01=0x00e4}
0x4a80…4aae               Head {h00=0x002a, h01=0x0050, text=»* DEPENDENT SUBROUTINES ARE PERFORMED.«, t00=0x002f, t01=0x011a}
0x4aae…4ab8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0148}
0x4ab8…4af2               Head {h00=0x0036, h01=0x0050, text=»* THIS MODULE IS CALLED BY THE LKM HANDLING MODULE«, t00=0x002f, t01=0x0152}
0x4af2…4b1c               Head {h00=0x0026, h01=0x0050, text=»* WITH THE FOLLOWING PARAMETERS:- «, t00=0x002f, t01=0x018c}
0x4b1c…4b26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0026}
0x4b26…4b58               Head {h00=0x002e, h01=0x0050, text=»*  A1 = PARAMETER WHEN I/O AND ACTIVATION «, t00=0x0030, t01=0x0030}
0x4b58…4b62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0062}
0x4b62…4b8a               Head {h00=0x0024, h01=0x0050, text=»*  A4 = ZERO, NORMAL I/O REQUEST«, t00=0x0030, t01=0x006c}
0x4b8a…4bb6               Head {h00=0x0028, h01=0x0050, text=»*       NOT ZERO, I/O AND ACTIVATION«, t00=0x0030, t01=0x0094}
0x4bb6…4bc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00c0}
0x4bc0…4bdc               Head {h00=0x0018, h01=0x0050, text=»*  A5 = TTAB ADDRESS«, t00=0x0030, t01=0x00ca}
0x4bdc…4be6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00e6}
0x4be6…4c00               Head {h00=0x0016, h01=0x0050, text=»*  A7 = ORDER CODE«, t00=0x0030, t01=0x00f0}
0x4c00…4c0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x010a}
0x4c0a…4c26               Head {h00=0x0018, h01=0x0050, text=»*  A8 = ECB ADDRESS «, t00=0x0030, t01=0x0114}
0x4c26…4c30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0130}
0x4c30…4c48               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0030, t01=0x013a}
0x4c48…4c52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0152}
0x4c52…4c5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x015c}
0x4c5c…4c9c               Head {h00=0x003c, h01=0x0050, text=»* THE 'TIO'-ROUTINE EXITS TO REQUESTED ACTIVATION DRIVER«, t00=0x0030, t01=0x0166}
0x4c9c…4cca               Head {h00=0x002a, h01=0x0050, text=»* WITH THE FOLLOWING REGISTER VAULES:-«, t00=0x0031, t01=0x0016}
0x4cca…4cd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0044}
0x4cd4…4cf8               Head {h00=0x0020, h01=0x0050, text=»*  A5 = STACK BASE 2 IN DWT «, t00=0x0031, t01=0x004e}
0x4cf8…4d02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0072}
0x4d02…4d1e               Head {h00=0x0018, h01=0x0050, text=»*  A6 = DWT ADDRESS «, t00=0x0031, t01=0x007c}
0x4d1e…4d28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0098}
0x4d28…4d42               Head {h00=0x0016, h01=0x0050, text=»*  A7 = ORDER CODE«, t00=0x0031, t01=0x00a2}
0x4d42…4d4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00bc}
0x4d4c…4d68               Head {h00=0x0018, h01=0x0050, text=»*  A8 = ECB ADDRESS «, t00=0x0031, t01=0x00c6}
0x4d68…4d72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00e2}
0x4d72…4da2               Head {h00=0x002c, h01=0x0050, text=»* A12 = ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0031, t01=0x00ec}
0x4da2…4dac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x011c}
0x4dac…4de0               Head {h00=0x0030, h01=0x0050, text=»* A13 = 0, IF REQUEST ISSUED IN SYSTEM MODE «, t00=0x0031, t01=0x0126}
0x4de0…4e12               Head {h00=0x002e, h01=0x0050, text=»*     = 1, "     "      "    "  USER MODE «, t00=0x0031, t01=0x015a}
0x4e12…4e1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x018c}
0x4e1c…4e26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0008}
0x4e26…4e56               Head {h00=0x002c, h01=0x0050, text=»* THE FOLLOWING DWT FIELDS ARE UPDATED:-«, t00=0x0032, t01=0x0012}
0x4e56…4e60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0042}
0x4e60…4e86               Head {h00=0x0022, h01=0x0050, text=»*  -DWTOR  DWT INDEX AND ORDER«, t00=0x0032, t01=0x004c}
0x4e86…4ea4               Head {h00=0x001a, h01=0x0050, text=»*  -DWTECB ECB ADDRESS«, t00=0x0032, t01=0x0072}
0x4ea4…4ecc               Head {h00=0x0024, h01=0x0050, text=»*  -DWTST  READY AND ECHO FIELDS«, t00=0x0032, t01=0x0090}
0x4ecc…4eec               Head {h00=0x001c, h01=0x0050, text=»*  -DWTTAB TTAB ADDRESS «, t00=0x0032, t01=0x00b8}
0x4eec…4f16               Head {h00=0x0026, h01=0x0050, text=»*  -DWTWAT WAIT/ACTIVATE INDICATOR«, t00=0x0032, t01=0x00d8}
0x4f16…4f48               Head {h00=0x002e, h01=0x0050, text=»*  -DWTUEC USER ECB ADDRESS (MMU SYSTEMS) «, t00=0x0032, t01=0x0102}
0x4f48…4f52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0134}
0x4f52…4f5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x013e}
0x4f5c…4f8a               Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ECB FIELDS ARE RESET:-«, t00=0x0032, t01=0x0148}
0x4f8a…4f94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0176}
0x4f94…4fb8               Head {h00=0x0020, h01=0x0050, text=»*  -BIT 0 IN THE FIRST WORD «, t00=0x0032, t01=0x0180}
0x4fb8…4fdc               Head {h00=0x0020, h01=0x0050, text=»*  -ECBEL  EFFECTIVE LENGTH «, t00=0x0033, t01=0x0014}
0x4fdc…4ffa               Head {h00=0x001a, h01=0x0050, text=»*  -ECBRC  RETURN CODE«, t00=0x0033, t01=0x0038}
0x4ffa…5004               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0056}
0x5004…501c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0033, t01=0x0060}
0x501c…5026               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0078}
0x5026…5058               Head {h00=0x002e, h01=0x0050, text=»* DWT ADDRESS AND CHECK IF REQUEST IS BUSY«, t00=0x0033, t01=0x0082}
0x5058…5062               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00b4}
0x5062…508e               Head {h00=0x0028, h01=0x0050, text=»TIO CF A15,FNDDWT SEARCH DWT ADDRESS«, t00=0x0033, t01=0x00be}
0x508e…5098               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00ea}
0x5098…50ca               Head {h00=0x002e, h01=0x0050, text=»TIO:FM EQU * ENTRY USED BY FILE MANAGEMENT«, t00=0x0033, t01=0x00f4}
0x50ca…50ee               Head {h00=0x0020, h01=0x0050, text=» CF A15,SWITCH SWITCH LEVEL «, t00=0x0033, t01=0x0126}
0x50ee…50fa               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0033, t01=0x014a}
0x50fa…5110               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/8000«, t00=0x0033, t01=0x0156}
0x5110…5128               Head {h00=0x0014, h01=0x0050, text=» ADK A6,0 SET CR«, t00=0x0033, t01=0x016c}
0x5128…5150               Head {h00=0x0024, h01=0x0050, text=» RB(Z) TIOERR FILE CODE UNKNOWN «, t00=0x0033, t01=0x0184}
0x5150…518a               Head {h00=0x0036, h01=0x0050, text=» LD A12,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0034, t01=0x001c}
0x518a…51ae               Head {h00=0x0020, h01=0x0050, text=» LD A13,DWTST,A6 DWT STATUS «, t00=0x0034, t01=0x0056}
0x51ae…51b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x007a}
0x51b8…51d0               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0034, t01=0x0084}
0x51d0…51da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x009c}
0x51da…521e               Head {h00=0x0040, h01=0x0050, text=»* CHECK IF ATTACH/DETACH ORDER OR IF DEVICE IS BUSY/ATTACHED«, t00=0x0034, t01=0x00a6}
0x521e…5228               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00ea}
0x5228…523e               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0034, t01=0x00f4}
0x523e…5260               Head {h00=0x001e, h01=0x0050, text=» LDKL A10,/0800 ATTACH BIT«, t00=0x0034, t01=0x010a}
0x5260…5276               Head {h00=0x0012, h01=0x0050, text=» CCK A7,/BB00 «, t00=0x0034, t01=0x012c}
0x5276…5298               Head {h00=0x001e, h01=0x0050, text=» RB(E) ATTACH ATTACH ORDER«, t00=0x0034, t01=0x0142}
0x5298…52ae               Head {h00=0x0012, h01=0x0050, text=» CCK A7,/BC00 «, t00=0x0034, t01=0x0164}
0x52ae…52d0               Head {h00=0x001e, h01=0x0050, text=» RB(E) DETACH DETACH ORDER«, t00=0x0034, t01=0x017a}
0x52d0…52e4               Head {h00=0x0010, h01=0x0050, text=» TM A10,A13 «, t00=0x0035, t01=0x000c}
0x52e4…5306               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TIO020 NOT ATTACHED«, t00=0x0035, t01=0x0020}
0x5306…531e               Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A6«, t00=0x0035, t01=0x0042}
0x531e…534c               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TIOQ20 ATTACHED TO OTHER TASK «, t00=0x0035, t01=0x005a}
0x534c…535e               Head {h00=0x000e, h01=0x0050, text=» TM A3,A13«, t00=0x0035, t01=0x0088}
0x535e…5384               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TIO030 DEVICE NOT BUSY«, t00=0x0035, t01=0x009a}
0x5384…53aa               Head {h00=0x0022, h01=0x0050, text=» RB TIOQ05 BUSY, QUEUE DEVICE «, t00=0x0035, t01=0x00c0}
0x53aa…53b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x00e6}
0x53b6…53c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00f2}
0x53c0…53d4               Head {h00=0x0010, h01=0x0050, text=»TIO020 EQU *«, t00=0x0035, t01=0x00fc}
0x53d4…53e6               Head {h00=0x000e, h01=0x0050, text=» TM A3,A13«, t00=0x0035, t01=0x0110}
0x53e6…5408               Head {h00=0x001e, h01=0x0050, text=» RB(Z) TIOQ20 DEVICE BUSY «, t00=0x0035, t01=0x0122}
0x5408…5412               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0144}
0x5412…542a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0035, t01=0x014e}
0x542a…5434               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0166}
0x5434…5480               Head {h00=0x0048, h01=0x0050, text=»* CHECK IF ECHO, AND WHEN TRUE CHECK IF ECHO DEVICE IS BUSY/ATTACHED«, t00=0x0035, t01=0x0170}
0x5480…548a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x002c}
0x548a…54b8               Head {h00=0x002a, h01=0x0050, text=»TIO030 SC A2,DWTOR,A6 STORE DWT INDEX «, t00=0x0036, t01=0x0036}
0x54b8…54da               Head {h00=0x001e, h01=0x0050, text=» LDK A2,/40 CHECK IF ECHO «, t00=0x0036, t01=0x0064}
0x54da…54ec               Head {h00=0x000e, h01=0x0050, text=» ANR A2,A7«, t00=0x0036, t01=0x0086}
0x54ec…550a               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TIO070 NOT ECHO«, t00=0x0036, t01=0x0098}
0x550a…5514               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00b6}
0x5514…553a               Head {h00=0x0022, h01=0x0050, text=» LD A2,DEVIND,A12 DEVICE INDEX«, t00=0x0036, t01=0x00c0}
0x553a…5562               Head {h00=0x0024, h01=0x0050, text=» SUK A2,KB:DIX CHECK IF KEYBOARD«, t00=0x0036, t01=0x00e6}
0x5562…559a               Head {h00=0x0034, h01=0x0050, text=» RF(NZ) TIO070 ECHO NOT ALLOWED IF NOT KEYBOARD «, t00=0x0036, t01=0x010e}
0x559a…55ca               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTECH,A6 ECHO DEVICE DWT ADDRESS«, t00=0x0036, t01=0x0146}
0x55ca…55ee               Head {h00=0x0020, h01=0x0050, text=» RF(Z) TIO070 NO ECHO DEVICE«, t00=0x0036, t01=0x0176}
0x55ee…5616               Head {h00=0x0024, h01=0x0050, text=» LD A14,DWTST,A2 ECHO DWT STATUS«, t00=0x0037, t01=0x000a}
0x5616…5620               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0032}
0x5620…5636               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0037, t01=0x003c}
0x5636…564a               Head {h00=0x0010, h01=0x0050, text=» TM A10,A14 «, t00=0x0037, t01=0x0052}
0x564a…5678               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TIO050 ECHO DEVICE NOT ATTACHED«, t00=0x0037, t01=0x0066}
0x5678…5690               Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A2«, t00=0x0037, t01=0x0094}
0x5690…56ca               Head {h00=0x0036, h01=0x0050, text=» RB(NE) TIOQ10 ECHO DEVICE ATTACHED TO OTHER TASK «, t00=0x0037, t01=0x00ac}
0x56ca…56dc               Head {h00=0x000e, h01=0x0050, text=» TM A3,A14«, t00=0x0037, t01=0x00e6}
0x56dc…5708               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TIO060 ECHO DEVICE NOT BUSY «, t00=0x0037, t01=0x00f8}
0x5708…5732               Head {h00=0x0026, h01=0x0050, text=» RB TIOQ00 BUSY, QUEUE ECHO DEVICE«, t00=0x0037, t01=0x0124}
0x5732…573e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x014e}
0x573e…5748               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x015a}
0x5748…5760               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0037, t01=0x0164}
0x5760…576a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x017c}
0x576a…5774               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0186}
0x5774…578c               Head {h00=0x0014, h01=0x0050, text=»TIO050 TM A3,A14«, t00=0x0037, t01=0x0190}
0x578c…57b2               Head {h00=0x0022, h01=0x0050, text=» RB(Z) TIOQ10 ECHO DEVICE BUSY«, t00=0x0038, t01=0x0018}
0x57b2…57bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x003e}
0x57bc…57d8               Head {h00=0x0018, h01=0x0050, text=»TIO060 LDKL A3,/A000«, t00=0x0038, t01=0x0048}
0x57d8…5816               Head {h00=0x003a, h01=0x0050, text=» XRS A3,DWTST,A2 UPDATE BUSY & ECHO BITS IN DWT STATUS«, t00=0x0038, t01=0x0064}
0x5816…5820               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00a2}
0x5820…5844               Head {h00=0x0020, h01=0x0050, text=»* UPDATE ECB AND DWT FIELDS «, t00=0x0038, t01=0x00ac}
0x5844…584e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00d0}
0x584e…5892               Head {h00=0x0040, h01=0x0050, text=»TIO070 XRS A3,DWTST,A6 UPDATE BUSY & ECHO BITS IN DWT STATUS«, t00=0x0038, t01=0x00da}
0x5892…589c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x011e}
0x589c…58b2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0038, t01=0x0128}
0x58b2…58d0               Head {h00=0x001a, h01=0x0050, text=» LD A13,TTB:PW,A5 PSW «, t00=0x0038, t01=0x013e}
0x58d0…58f8               Head {h00=0x0024, h01=0x0050, text=» ANKL A13,1 SYSTEM/USER MODE BIT«, t00=0x0038, t01=0x015c}
0x58f8…5920               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TIO100 JUMP IF USER MODE«, t00=0x0038, t01=0x0184}
0x5920…5936               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/7FFF«, t00=0x0039, t01=0x001c}
0x5936…5966               Head {h00=0x002c, h01=0x0050, text=» ANRS A2,A8 RESET BIT 0 IN ECB FILE CODE«, t00=0x0039, t01=0x0032}
0x5966…5996               Head {h00=0x002c, h01=0x0050, text=» ST A8,DWTECB,A6 SET ACTUAL ECB ADDRESS «, t00=0x0039, t01=0x0062}
0x5996…59c2               Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8  RESET EFFECTIVE LENGTH«, t00=0x0039, t01=0x0092}
0x59c2…59ea               Head {h00=0x0024, h01=0x0050, text=» CM ECBRC,A8  RESET RETURN CODE «, t00=0x0039, t01=0x00be}
0x59ea…59fc               Head {h00=0x000e, h01=0x0050, text=» RF TIO110«, t00=0x0039, t01=0x00e6}
0x59fc…5a06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00f8}
0x5a06…5a1e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0039, t01=0x0102}
0x5a1e…5a28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x011a}
0x5a28…5a4a               Head {h00=0x001e, h01=0x0050, text=»* MOVE USER ECB TO DWT ECB«, t00=0x0039, t01=0x0124}
0x5a4a…5a54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0146}
0x5a54…5a68               Head {h00=0x0010, h01=0x0050, text=»TIO100 EQU *«, t00=0x0039, t01=0x0150}
0x5a68…5a7e               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/4FFF«, t00=0x0039, t01=0x0164}
0x5a7e…5aac               Head {h00=0x002a, h01=0x0050, text=» ELR A3,A8 LOAD FIRST WORD OF USER ECB«, t00=0x0039, t01=0x017a}
0x5aac…5ae0               Head {h00=0x0030, h01=0x0050, text=» ANR A3,A2 RESET BITS 0,2,3 IN ECB FILE CODE«, t00=0x003a, t01=0x0018}
0x5ae0…5af2               Head {h00=0x000e, h01=0x0050, text=» ESR A3,A8«, t00=0x003a, t01=0x004c}
0x5af2…5b1e               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTMEC,A6 DWT MMU ECB ADDRESS«, t00=0x003a, t01=0x005e}
0x5b1e…5b4e               Head {h00=0x002c, h01=0x0050, text=» ST A2,DWTECB,A6 SET ACTUAL ECB ADDRESS «, t00=0x003a, t01=0x008a}
0x5b4e…5b60               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x003a, t01=0x00ba}
0x5b60…5b8e               Head {h00=0x002a, h01=0x0050, text=» ST A8,DWTUEC,A6 SAVE USER ECB ADDRESS«, t00=0x003a, t01=0x00cc}
0x5b8e…5ba0               Head {h00=0x000e, h01=0x0050, text=» LDR A9,A8«, t00=0x003a, t01=0x00fa}
0x5ba0…5bb2               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003a, t01=0x010c}
0x5bb2…5be0               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBEL,A8 RESET EFFECTIVE LENGTH«, t00=0x003a, t01=0x011e}
0x5be0…5c0a               Head {h00=0x0026, h01=0x0050, text=» ES A3,ECBRC,A8 RESET RETURN CODE «, t00=0x003a, t01=0x014c}
0x5c0a…5c14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0176}
0x5c14…5c36               Head {h00=0x001e, h01=0x0050, text=» LDR A10,A1 SAVE PARAMETER«, t00=0x003a, t01=0x0180}
0x5c36…5c48               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A8«, t00=0x003b, t01=0x0012}
0x5c48…5c5e               Head {h00=0x0012, h01=0x0050, text=» ADK A1,ECBRL «, t00=0x003b, t01=0x0024}
0x5c5e…5c8a               Head {h00=0x0028, h01=0x0050, text=» LDR A8,A2 SET A8 TO DWT ECB ADDRESS«, t00=0x003b, t01=0x003a}
0x5c8a…5ca0               Head {h00=0x0012, h01=0x0050, text=» ADK A2,ECBRL «, t00=0x003b, t01=0x0066}
0x5ca0…5cb2               Head {h00=0x000e, h01=0x0050, text=» LDK A3,8 «, t00=0x003b, t01=0x007c}
0x5cb2…5ce4               Head {h00=0x002e, h01=0x0050, text=» MVUS A3 MOVE PART OF USER ECB TO DWT ECB «, t00=0x003b, t01=0x008e}
0x5ce4…5d0a               Head {h00=0x0022, h01=0x0050, text=» LDR A1,A10 RESTORE PARAMETER «, t00=0x003b, t01=0x00c0}
0x5d0a…5d16               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x00e6}
0x5d16…5d20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00f2}
0x5d20…5d36               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003b, t01=0x00fc}
0x5d36…5d4c               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/7FFF«, t00=0x003b, t01=0x0112}
0x5d4c…5d7c               Head {h00=0x002c, h01=0x0050, text=» ANRS A3,A8 RESET BIT 0 IN ECB FILE CODE«, t00=0x003b, t01=0x0128}
0x5d7c…5da8               Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8  RESET EFFECTIVE LENGTH«, t00=0x003b, t01=0x0158}
0x5da8…5dd0               Head {h00=0x0024, h01=0x0050, text=» CM ECBRC,A8  RESET RETURN CODE «, t00=0x003b, t01=0x0184}
0x5dd0…5ddc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x001c}
0x5ddc…5de6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0028}
0x5de6…5dfe               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x003c, t01=0x0032}
0x5dfe…5e08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x004a}
0x5e08…5e12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0054}
0x5e12…5e26               Head {h00=0x0010, h01=0x0050, text=»TIO110 EQU *«, t00=0x003c, t01=0x005e}
0x5e26…5e38               Head {h00=0x000e, h01=0x0050, text=» ECR A3,A7«, t00=0x003c, t01=0x0072}
0x5e38…5e58               Head {h00=0x001c, h01=0x0050, text=» ANK A3,/FF ORDER OPTION«, t00=0x003c, t01=0x0084}
0x5e58…5e88               Head {h00=0x002c, h01=0x0050, text=» RF(Z) TIO120 NO SPECIAL OPTION IF ZERO «, t00=0x003c, t01=0x00a4}
0x5e88…5eb4               Head {h00=0x0028, h01=0x0050, text=» SC A3,DWTOPT,A6 STORE OPTION IN DWT«, t00=0x003c, t01=0x00d4}
0x5eb4…5ebe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0100}
0x5ebe…5ed2               Head {h00=0x0010, h01=0x0050, text=»TIO120 EQU *«, t00=0x003c, t01=0x010a}
0x5ed2…5ee4               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A7«, t00=0x003c, t01=0x011e}
0x5ee4…5ef8               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x003c, t01=0x0130}
0x5ef8…5f24               Head {h00=0x0028, h01=0x0050, text=» SC A7,DWTOR+1,A6 STORE ORDER IN DWT«, t00=0x003c, t01=0x0144}
0x5f24…5f58               Head {h00=0x0030, h01=0x0050, text=» ST A5,DWTTAB,A6 SAVE TTAB ADDRESS IN DWTTAB«, t00=0x003c, t01=0x0170}
0x5f58…5f62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0014}
0x5f62…5f76               Head {h00=0x0010, h01=0x0050, text=»TIO130 EQU *«, t00=0x003d, t01=0x001e}
0x5f76…5f8c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003d, t01=0x0032}
0x5f8c…5fb6               Head {h00=0x0026, h01=0x0050, text=» ST A8,DWTECB,A6  SET ECB ADDRESS «, t00=0x003d, t01=0x0048}
0x5fb6…5fc2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x0072}
0x5fc2…5fcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x007e}
0x5fcc…5fe4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x003d, t01=0x0088}
0x5fe4…5fee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00a0}
0x5fee…6020               Head {h00=0x002e, h01=0x0050, text=»* UPDATE DWTWAT (WAIT/ACTIVATE INDICATOR) «, t00=0x003d, t01=0x00aa}
0x6020…602a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00dc}
0x602a…604c               Head {h00=0x001e, h01=0x0050, text=» LDR A2,A4 CHECK PARAMETER«, t00=0x003d, t01=0x00e6}
0x604c…6076               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) TIO210 I/O AND ACTIVATION «, t00=0x003d, t01=0x0108}
0x6076…60ae               Head {h00=0x0034, h01=0x0050, text=» ANK A3,/80 NORMAL I/O. CHECK IF WAIT REQUESTED «, t00=0x003d, t01=0x0132}
0x60ae…60cc               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TIO220 NOT WAIT«, t00=0x003d, t01=0x016a}
0x60cc…60ec               Head {h00=0x001c, h01=0x0050, text=» LDK A4,1 INDICATE WAIT «, t00=0x003d, t01=0x0188}
0x60ec…60fe               Head {h00=0x000e, h01=0x0050, text=» RF TIO230«, t00=0x003e, t01=0x0018}
0x60fe…6108               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x002a}
0x6108…6148               Head {h00=0x003c, h01=0x0050, text=»TIO210 CF A15,GETBLK SAVE PARAMETER AND DISPATCH ADDRESS«, t00=0x003e, t01=0x0034}
0x6148…6152               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0074}
0x6152…6188               Head {h00=0x0032, h01=0x0050, text=»TIO220 CF A15,QTJOB QUEUE TASK FOR DISPATCHING«, t00=0x003e, t01=0x007e}
0x6188…6192               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00b4}
0x6192…61ce               Head {h00=0x0038, h01=0x0050, text=»TIO230 ST A4,DWTWAT,A6 STORE WAIT/ACTIVATE INDICATOR«, t00=0x003e, t01=0x00be}
0x61ce…61d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00fa}
0x61d8…61f0               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x003e, t01=0x0104}
0x61f0…61fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x011c}
0x61fa…6204               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0126}
0x6204…621a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x003e, t01=0x0130}
0x621a…6248               Head {h00=0x002a, h01=0x0050, text=» LDR A13,A13 CHECK IF SYSTEM/USER MODE«, t00=0x003e, t01=0x0146}
0x6248…6272               Head {h00=0x0026, h01=0x0050, text=» RF(Z) TIO250 JUMP IF SYSTEM MODE «, t00=0x003e, t01=0x0174}
0x6272…6298               Head {h00=0x0022, h01=0x0050, text=» LD A3,DEVIND,A12 DEVICE INDEX«, t00=0x003f, t01=0x000e}
0x6298…62c8               Head {h00=0x002c, h01=0x0050, text=» RF(N) TIO250 NO SPECIAL ACTION REQUIRED«, t00=0x003f, t01=0x0034}
0x62c8…62ee               Head {h00=0x0022, h01=0x0050, text=» RF(Z) TIO240 DATA MANAGEMENT «, t00=0x003f, t01=0x0064}
0x62ee…6312               Head {h00=0x0020, h01=0x0050, text=» CWK A3,DK:DIX CHECK IF DISC«, t00=0x003f, t01=0x008a}
0x6312…6332               Head {h00=0x001c, h01=0x0050, text=» RF(NE) TIO235 NOT DISC «, t00=0x003f, t01=0x00ae}
0x6332…635e               Head {h00=0x0028, h01=0x0050, text=» CF A15,TIOCW2 MOVE 2ND CONTROL WORD«, t00=0x003f, t01=0x00ce}
0x635e…6368               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00fa}
0x6368…638e               Head {h00=0x0022, h01=0x0050, text=»* PERFORM CHECK ON ORDER CODE «, t00=0x003f, t01=0x0104}
0x638e…6398               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x012a}
0x6398…63ac               Head {h00=0x0010, h01=0x0050, text=»TIO235 EQU *«, t00=0x003f, t01=0x0134}
0x63ac…63ca               Head {h00=0x001a, h01=0x0050, text=» LDR A4,A7 ORDER CODE «, t00=0x003f, t01=0x0148}
0x63ca…63fe               Head {h00=0x0030, h01=0x0050, text=» CF A15,RD:WR2  CHECK IF ORDER IS READ/WRITE«, t00=0x003f, t01=0x0166}
0x63fe…6430               Head {h00=0x002e, h01=0x0050, text=» RF(Z) TIO250 JUMP IF NO READ/WRITE ORDER «, t00=0x0040, t01=0x000a}
0x6430…643a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x003c}
0x643a…644e               Head {h00=0x0010, h01=0x0050, text=»TIO240 EQU *«, t00=0x0040, t01=0x0046}
0x644e…645a               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0040, t01=0x005a}
0x645a…649a               Head {h00=0x003c, h01=0x0050, text=» CFI A15,TIOTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE«, t00=0x0040, t01=0x0066}
0x649a…64a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x00a6}
0x64a6…64b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00b2}
0x64b0…64de               Head {h00=0x002a, h01=0x0050, text=»TIO250 ENB  GIVE OTHER TASKS A CHANCE «, t00=0x0040, t01=0x00bc}
0x64de…64e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00ea}
0x64e8…6516               Head {h00=0x002a, h01=0x0050, text=»TIO260 LDK A5,DWTSB2 LOAD STACK BASE 2«, t00=0x0040, t01=0x00f4}
0x6516…6528               Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0040, t01=0x0122}
0x6528…6534               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0040, t01=0x0134}
0x6534…655e               Head {h00=0x0026, h01=0x0050, text=» ABR* A12 GO TO DRIVER ACTIVATION «, t00=0x0040, t01=0x0140}
0x655e…6568               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x016a}
0x6568…6580               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0040, t01=0x0174}
0x6580…658a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x018c}
0x658a…6594               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0008}
0x6594…65a6               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0041, t01=0x0012}
0x65a6…65b8               Head {h00=0x000e, h01=0x0050, text=»* SWITCH *«, t00=0x0041, t01=0x0024}
0x65b8…65ca               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0041, t01=0x0036}
0x65ca…65d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0048}
0x65d4…65f4               Head {h00=0x001c, h01=0x0050, text=»* SWITCH PRIORITY LEVEL:«, t00=0x0041, t01=0x0052}
0x65f4…65fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0072}
0x65fe…662a               Head {h00=0x0028, h01=0x0050, text=»* IF CPU851, THEN SWITCH TO LEVEL 12«, t00=0x0041, t01=0x007c}
0x662a…6656               Head {h00=0x0028, h01=0x0050, text=»* IF CPU852,  "     "    "    "   16«, t00=0x0041, t01=0x00a8}
0x6656…6682               Head {h00=0x0028, h01=0x0050, text=»* IF CPU857,  "     "    "    "   16«, t00=0x0041, t01=0x00d4}
0x6682…668c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0100}
0x668c…66b4               Head {h00=0x0024, h01=0x0050, text=»* A3 IS DESTROYED, AND SO IS CR «, t00=0x0041, t01=0x010a}
0x66b4…66be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0132}
0x66be…66e8               Head {h00=0x0026, h01=0x0050, text=»SWITCH EQU * SWITCH LEVEL ON STACK«, t00=0x0041, t01=0x013c}
0x66e8…6704               Head {h00=0x0018, h01=0x0050, text=» IFT CPU852+CPU857=0«, t00=0x0041, t01=0x0166}
0x6704…6728               Head {h00=0x0020, h01=0x0050, text=» LDK A3,/30 CPU851: LEVEL 12«, t00=0x0041, t01=0x0182}
0x6728…6734               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0016}
0x6734…673e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0022}
0x673e…675a               Head {h00=0x0018, h01=0x0050, text=» IFF CPU852+CPU857=0«, t00=0x0042, t01=0x002c}
0x675a…6786               Head {h00=0x0028, h01=0x0050, text=» LDK A3,/40 CPU852/CPU857: LEVEL 16 «, t00=0x0042, t01=0x0048}
0x6786…6792               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0074}
0x6792…679c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0080}
0x679c…67c8               Head {h00=0x0028, h01=0x0050, text=» SC A3,2,A15 SET NEW LEVEL ON STACK «, t00=0x0042, t01=0x008a}
0x67c8…67ee               Head {h00=0x0022, h01=0x0050, text=» RTN A15 RETURN WITH NEW LEVEL«, t00=0x0042, t01=0x00b6}
0x67ee…67f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00dc}
0x67f8…6810               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0042, t01=0x00e6}
0x6810…681a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00fe}
0x681a…6824               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0108}
0x6824…683a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0042, t01=0x0112}
0x683a…6844               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0128}
0x6844…6858               Head {h00=0x0010, h01=0x0050, text=»* R D : W R «, t00=0x0042, t01=0x0132}
0x6858…6862               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0146}
0x6862…68a6               Head {h00=0x0040, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' AND 'TENDIO' FOR SELECTING «, t00=0x0042, t01=0x0150}
0x68a6…68ea (67, 0, 398)  Head {h00=0x0040, h01=0x0050, text=»* THE APPROPRIATE ROUTINE AT READ/WRITE REQUESTS, DEPENDING «, t00=0x0043, t01=0x0004}
0x68ea…692c               Head {h00=0x003e, h01=0x0050, text=»* ON THE DEVICE CONNECTION (PROGRAMMED CHANNEL, MUX ETX). «, t00=0x0043, t01=0x0048}
0x692c…696e               Head {h00=0x003e, h01=0x0050, text=»* IF NO READ/WRITE REQUEST, CONDITION REGISTER ON STACK IS«, t00=0x0043, t01=0x008a}
0x696e…699c               Head {h00=0x002a, h01=0x0050, text=»* SET TO ZERO, ELSE NOT EQUAL TO ZERO.«, t00=0x0043, t01=0x00cc}
0x699c…69a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00fa}
0x69a6…69ca               Head {h00=0x0020, h01=0x0050, text=»* INPUT:  A3 = DEVICE INDEX «, t00=0x0043, t01=0x0104}
0x69ca…69ec               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x0043, t01=0x0128}
0x69ec…69f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x014a}
0x69f6…6a34               Head {h00=0x003a, h01=0x0050, text=»* OUTPUT: A3 = INDEX FOR USE IN THE INDEXED BRANCHING «, t00=0x0043, t01=0x0154}
0x6a34…6a66 (68, 0, 400)  Head {h00=0x002e, h01=0x0050, text=»*         CR = 0 IF NO READ/WRITE REQUEST «, t00=0x0044, t01=0x0004}
0x6a66…6a96               Head {h00=0x002c, h01=0x0050, text=»*         CR <> 0 IF READ/WRITE REQUEST «, t00=0x0044, t01=0x0036}
0x6a96…6ab0               Head {h00=0x0016, h01=0x0050, text=»*  A4 IS DESTROYED«, t00=0x0044, t01=0x0066}
0x6ab0…6aba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0080}
0x6aba…6aea               Head {h00=0x002c, h01=0x0050, text=»RD:WR LD A4,DWTOR,A6 ORDER CODE FROM DWT«, t00=0x0044, t01=0x008a}
0x6aea…6afe               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/3F «, t00=0x0044, t01=0x00ba}
0x6afe…6b08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00ce}
0x6b08…6b36               Head {h00=0x002a, h01=0x0050, text=»RD:WR2 ADKL A15,4 ADJUST STACKPOINTER «, t00=0x0044, t01=0x00d8}
0x6b36…6b5a               Head {h00=0x0020, h01=0x0050, text=» LC A4,ORDTAB,A4 ORDER INDEX«, t00=0x0044, t01=0x0106}
0x6b5a…6b6e               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0044, t01=0x012a}
0x6b6e…6ba0               Head {h00=0x002e, h01=0x0050, text=» ABR(Z)* A15 RETURN IF NO READ/WRITE ORDER«, t00=0x0044, t01=0x013e}
0x6ba0…6bb2               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0044, t01=0x0170}
0x6bb2…6bda               Head {h00=0x0024, h01=0x0050, text=» ADR A3,A4 ADD READ/WRITE INDEX «, t00=0x0044, t01=0x0182}
0x6bda…6c06               Head {h00=0x0028, h01=0x0050, text=» ABR* A15 RETURN WITHOUT CHANGING CR«, t00=0x0045, t01=0x001a}
0x6c06…6c10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0046}
0x6c10…6c28               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0045, t01=0x0050}
0x6c28…6c32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0068}
0x6c32…6c3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0072}
0x6c3c…6c4e               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0045, t01=0x007c}
0x6c4e…6c60               Head {h00=0x000e, h01=0x0050, text=»* ORDTAB *«, t00=0x0045, t01=0x008e}
0x6c60…6c72               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0045, t01=0x00a0}
0x6c72…6c7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00b2}
0x6c7c…6cb2               Head {h00=0x0032, h01=0x0050, text=»* ORDTAB CONTAINS ORDER CONSTANTS AS FOLLOWS: «, t00=0x0045, t01=0x00bc}
0x6cb2…6cbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00f2}
0x6cbc…6cde               Head {h00=0x001e, h01=0x0050, text=»*  =0: NO READ/WRITE ORDER«, t00=0x0045, t01=0x00fc}
0x6cde…6cf8               Head {h00=0x0016, h01=0x0050, text=»*  =1: READ ORDER «, t00=0x0045, t01=0x011e}
0x6cf8…6d1a               Head {h00=0x001e, h01=0x0050, text=»*  =TINDEX+1: WRITE ORDER «, t00=0x0045, t01=0x0138}
0x6d1a…6d24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x015a}
0x6d24…6d48               Head {h00=0x0020, h01=0x0050, text=»ORDTAB EQU * ORDER CONSTANTS«, t00=0x0045, t01=0x0164}
0x6d48…6d64               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,1 /00, /01 «, t00=0x0045, t01=0x0188}
0x6d64…6d80               Head {h00=0x0018, h01=0x0050, text=» BYTES 1,1 /02, /03 «, t00=0x0046, t01=0x0014}
0x6d80…6da2               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /04, /05«, t00=0x0046, t01=0x0030}
0x6da2…6dcc               Head {h00=0x0026, h01=0x0050, text=» BYTES TINDEX+1,TINDEX+1 /06, /07 «, t00=0x0046, t01=0x0052}
0x6dcc…6dee               Head {h00=0x001e, h01=0x0050, text=» BYTES TINDEX+1,0 /08, /09«, t00=0x0046, t01=0x007c}
0x6dee…6e10               Head {h00=0x001e, h01=0x0050, text=» BYTES 1,TINDEX+1 /0A, /0B«, t00=0x0046, t01=0x009e}
0x6e10…6e2c               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /0C, /0D «, t00=0x0046, t01=0x00c0}
0x6e2c…6e48               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /0E, /0F «, t00=0x0046, t01=0x00dc}
0x6e48…6e64               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,1 /10, /11 «, t00=0x0046, t01=0x00f8}
0x6e64…6e80               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /12, /13 «, t00=0x0046, t01=0x0114}
0x6e80…6ea2               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /14, /15«, t00=0x0046, t01=0x0130}
0x6ea2…6ebe               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /16, /17 «, t00=0x0046, t01=0x0152}
0x6ebe…6eda               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /18, /19 «, t00=0x0046, t01=0x016e}
0x6eda…6ef6               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /1A, /1B «, t00=0x0046, t01=0x018a}
0x6ef6…6f12               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /1C, /1D «, t00=0x0047, t01=0x0016}
0x6f12…6f2e               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /1E, /1F «, t00=0x0047, t01=0x0032}
0x6f2e…6f50               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /20, /21«, t00=0x0047, t01=0x004e}
0x6f50…6f72               Head {h00=0x001e, h01=0x0050, text=» BYTES TINDEX+1,0 /22, /23«, t00=0x0047, t01=0x0070}
0x6f72…6f94               Head {h00=0x001e, h01=0x0050, text=» BYTES TINDEX+1,0 /24, /25«, t00=0x0047, t01=0x0092}
0x6f94…6fb6               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /26, /27«, t00=0x0047, t01=0x00b4}
0x6fb6…6fd2               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /28, /29 «, t00=0x0047, t01=0x00d6}
0x6fd2…6fee               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /2A, /2B «, t00=0x0047, t01=0x00f2}
0x6fee…700a               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,1 /2C, /2D «, t00=0x0047, t01=0x010e}
0x700a…702c               Head {h00=0x001e, h01=0x0050, text=» BYTES 1,TINDEX+1 /2E, /2F«, t00=0x0047, t01=0x012a}
0x702c…7048               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /30, /31 «, t00=0x0047, t01=0x014c}
0x7048…7064               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /32, /33 «, t00=0x0047, t01=0x0168}
0x7064…7080               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /34, /35 «, t00=0x0047, t01=0x0184}
0x7080…709c               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /36, /37 «, t00=0x0048, t01=0x0010}
0x709c…70b8               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /38, /39 «, t00=0x0048, t01=0x002c}
0x70b8…70d4               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /3A, /3B «, t00=0x0048, t01=0x0048}
0x70d4…70f0               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /3C, /3D «, t00=0x0048, t01=0x0064}
0x70f0…710c               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /3E, /3F «, t00=0x0048, t01=0x0080}
0x710c…7116               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x009c}
0x7116…712e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0048, t01=0x00a6}
0x712e…7138               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00be}
0x7138…714e               Head {h00=0x0012, h01=0x0050, text=»* T I O : D M «, t00=0x0048, t01=0x00c8}
0x714e…7158               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00de}
0x7158…7190               Head {h00=0x0034, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A REQUEST «, t00=0x0048, t01=0x00e8}
0x7190…71be               Head {h00=0x002a, h01=0x0050, text=»* FOR DATA MANAGEMENT HAS BEEN ISSUED.«, t00=0x0048, t01=0x0120}
0x71be…71f6               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x0048, t01=0x014e}
0x71f6…7226               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TEN:DM'.«, t00=0x0048, t01=0x0186}
0x7226…7230               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0026}
0x7230…7256               Head {h00=0x0022, h01=0x0050, text=»* INPUT:  A8 = DWT ECB ADDRESS«, t00=0x0049, t01=0x0030}
0x7256…727e               Head {h00=0x0024, h01=0x0050, text=»*         A9 = USER ECB ADDRESS «, t00=0x0049, t01=0x0056}
0x727e…7288               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x007e}
0x7288…72aa               Head {h00=0x001e, h01=0x0050, text=»* OUTPUT: A2 IS DESTROYED «, t00=0x0049, t01=0x0088}
0x72aa…72b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00aa}
0x72b4…72e6               Head {h00=0x002e, h01=0x0050, text=»TIO:DM EQU * DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x0049, t01=0x00b4}
0x72e6…7312               Head {h00=0x0028, h01=0x0050, text=» EL A2,ECBBA,A9 USER BUFFER ADDRESS «, t00=0x0049, t01=0x00e6}
0x7312…732a               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBBA,A8 «, t00=0x0049, t01=0x0112}
0x732a…7334               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x012a}
0x7334…7348               Head {h00=0x0010, h01=0x0050, text=»TIOCW2 EQU *«, t00=0x0049, t01=0x0134}
0x7348…7374               Head {h00=0x0028, h01=0x0050, text=» EL A2,ECBCW2,A9 SECOND CONTROL WORD«, t00=0x0049, t01=0x0148}
0x7374…738c               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW2,A8«, t00=0x0049, t01=0x0174}
0x738c…7396               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x018c}
0x7396…73aa               Head {h00=0x0010, h01=0x0050, text=»A15RTN EQU *«, t00=0x004a, t01=0x0008}
0x73aa…73ba               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x004a, t01=0x001c}
0x73ba…73c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x002c}
0x73c4…73dc               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x004a, t01=0x0036}
0x73dc…73e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x004e}
0x73e6…73fc               Head {h00=0x0012, h01=0x0050, text=»* T I O P C I «, t00=0x004a, t01=0x0058}
0x73fc…7406               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x006e}
0x7406…744c               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN «, t00=0x004a, t01=0x0078}
0x744c…748e               Head {h00=0x003e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. «, t00=0x004a, t01=0x00be}
0x748e…74d4               Head {h00=0x0042, h01=0x0050, text=»* TIOPCI CHECKS USER AND DWT BUFFER ADDRESSES SO THAT BOTH ARE«, t00=0x004a, t01=0x0100}
0x74d4…7514               Head {h00=0x003c, h01=0x0050, text=»* EVEN OR UNEVEN, DEPENDING ON THE USER BUFFER ADDRESS. «, t00=0x004a, t01=0x0146}
0x7514…754c               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x004a, t01=0x0186}
0x754c…757c               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENPCI'.«, t00=0x004b, t01=0x002e}
0x757c…75b4               Head {h00=0x0034, h01=0x0050, text=»* NOTICE THAT ENTRY TIPI05 IS USED BY 'TIOKBI'. «, t00=0x004b, t01=0x005e}
0x75b4…75be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0096}
0x75be…75e4               Head {h00=0x0022, h01=0x0050, text=»* INPUT:  A8 = DWT ECB ADDRESS«, t00=0x004b, t01=0x00a0}
0x75e4…760c               Head {h00=0x0024, h01=0x0050, text=»*         A9 = USER ECB ADDRESS «, t00=0x004b, t01=0x00c6}
0x760c…763c               Head {h00=0x002c, h01=0x0050, text=»* A12 = ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x004b, t01=0x00ee}
0x763c…7646               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x011e}
0x7646…7668               Head {h00=0x001e, h01=0x0050, text=»* OUTPUT: A1 IS DESTROYED «, t00=0x004b, t01=0x0128}
0x7668…7672               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x014a}
0x7672…76a0               Head {h00=0x002a, h01=0x0050, text=»TIOPCI EQU * PROGRAMMED CHANNEL, INPUT«, t00=0x004b, t01=0x0154}
0x76a0…76c8               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x004b, t01=0x0182}
0x76c8…76fe               Head {h00=0x0032, h01=0x0050, text=» CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE«, t00=0x004c, t01=0x001a}
0x76fe…7738               Head {h00=0x0036, h01=0x0050, text=» RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE «, t00=0x004c, t01=0x0050}
0x7738…7742               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x008a}
0x7742…7774               Head {h00=0x002e, h01=0x0050, text=»TIPI05 EQU * ENTRY POINT USED BY 'TIOKBI' «, t00=0x004c, t01=0x0094}
0x7774…77a0               Head {h00=0x0028, h01=0x0050, text=» EL A1,ECBBA,A9 USER BUFFER ADDRESS «, t00=0x004c, t01=0x00c6}
0x77a0…77b2               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x004c, t01=0x00f2}
0x77b2…77e0               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TIPI10 USER BUFFER ADDRESS EVEN«, t00=0x004c, t01=0x0104}
0x77e0…77f8               Head {h00=0x0014, h01=0x0050, text=» ORS A1,ECBBA,A8«, t00=0x004c, t01=0x0132}
0x77f8…7808               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x004c, t01=0x014a}
0x7808…7812               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x015a}
0x7812…7846               Head {h00=0x0030, h01=0x0050, text=»TIPI10 SUK A1,2 MAKE DWT BUFFER ADDRESS EVEN«, t00=0x004c, t01=0x0164}
0x7846…785e               Head {h00=0x0014, h01=0x0050, text=» ANS A1,ECBBA,A8«, t00=0x004d, t01=0x0008}
0x785e…786e               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x004d, t01=0x0020}
0x786e…7878               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0030}
0x7878…7890               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x004d, t01=0x003a}
0x7890…789a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0052}
0x789a…78b0               Head {h00=0x0012, h01=0x0050, text=»* T I O M X I «, t00=0x004d, t01=0x005c}
0x78b0…78ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0072}
0x78ba…7900               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN «, t00=0x004d, t01=0x007c}
0x7900…7942               Head {h00=0x003e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS RUNNING ON MULTIPLEXOR CHANNEL.«, t00=0x004d, t01=0x00c2}
0x7942…7984               Head {h00=0x003e, h01=0x0050, text=»* TIOMXI ASSEMBLES THE FULL 18 BIT BUFFER ADDRESS WHICH IS«, t00=0x004d, t01=0x0104}
0x7984…79b4               Head {h00=0x002c, h01=0x0050, text=»* TRANSFERRED TO THE MUX BY THE DRIVER. «, t00=0x004d, t01=0x0146}
0x79b4…79ec               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x004d, t01=0x0176}
0x79ec…7a1c               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENMXI'.«, t00=0x004e, t01=0x001e}
0x7a1c…7a6e               Head {h00=0x004e, h01=0x0050, text=»* NOTICE THAT MODULES 'TIOMXO', 'TIODKI' AND 'TIODKO' ARE EQUAL TO TIOMXI.«, t00=0x004e, t01=0x004e}
0x7a6e…7a78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00a0}
0x7a78…7a9c               Head {h00=0x0020, h01=0x0050, text=»* INPUT:  A5 = TTAB ADDRESS «, t00=0x004e, t01=0x00aa}
0x7a9c…7ac2               Head {h00=0x0022, h01=0x0050, text=»*         A8 = DWT ECB ADDRESS«, t00=0x004e, t01=0x00ce}
0x7ac2…7ae2               Head {h00=0x001c, h01=0x0050, text=»*  A9 = USER ECB ADDRESS«, t00=0x004e, t01=0x00f4}
0x7ae2…7aec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0114}
0x7aec…7b12               Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A2 ARE DESTROYED «, t00=0x004e, t01=0x011e}
0x7b12…7b58               Head {h00=0x0042, h01=0x0050, text=»*         18 BIT USER BUFFER ADDRESS IS TRANSFERRED TO DWT ECB«, t00=0x004e, t01=0x0144}
0x7b58…7b62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x018a}
0x7b62…7b82 (79, 0, 400)  Head {h00=0x001c, h01=0x0050, text=»TIOMXI EQU * MUX, INPUT «, t00=0x004f, t01=0x0004}
0x7b82…7bae               Head {h00=0x0028, h01=0x0050, text=» EL A1,ECBBA,A9 USER BUFFER ADDRESS «, t00=0x004f, t01=0x0024}
0x7bae…7bc0               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A1«, t00=0x004f, t01=0x0050}
0x7bc0…7bea               Head {h00=0x0026, h01=0x0050, text=» ANKL A1,/FFF SKIP 4 LEFTMOST BITS«, t00=0x004f, t01=0x0062}
0x7bea…7bfc               Head {h00=0x000e, h01=0x0050, text=» SRL A2,3 «, t00=0x004f, t01=0x008c}
0x7bfc…7c26               Head {h00=0x0026, h01=0x0050, text=» ANK A2,/1E MMUTAB INDEX (5 BITS) «, t00=0x004f, t01=0x009e}
0x7c26…7c4a               Head {h00=0x0020, h01=0x0050, text=» ADR A2,A5 ADD TTAB ADDRESS «, t00=0x004f, t01=0x00c8}
0x7c4a…7c78               Head {h00=0x002a, h01=0x0050, text=» LC A2,TTB:MT,A2 PHYSICAL PAGE ADDRESS«, t00=0x004f, t01=0x00ec}
0x7c78…7c8a               Head {h00=0x000e, h01=0x0050, text=» SRL A2,2 «, t00=0x004f, t01=0x011a}
0x7c8a…7c9e               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/3F «, t00=0x004f, t01=0x012c}
0x7c9e…7cd6               Head {h00=0x0034, h01=0x0050, text=» SCR A2,A8 STORE BITS 16-17 IN DWT ECB 1ST WORD «, t00=0x004f, t01=0x0140}
0x7cd6…7cea               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/0F «, t00=0x004f, t01=0x0178}
0x7cea…7cfc               Head {h00=0x000e, h01=0x0050, text=» SRC A2,4 «, t00=0x004f, t01=0x018c}
0x7cfc…7d0e               Head {h00=0x000e, h01=0x0050, text=» ORR A1,A2«, t00=0x0050, t01=0x000e}
0x7d0e…7d44               Head {h00=0x0032, h01=0x0050, text=» ST A1,ECBBA,A8 STORE MODIFIED BUFFER ADDRESS «, t00=0x0050, t01=0x0020}
0x7d44…7d54               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0050, t01=0x0056}
0x7d54…7d5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0066}
0x7d5e…7d76               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0050, t01=0x0070}
0x7d76…7d80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0088}
0x7d80…7d96               Head {h00=0x0012, h01=0x0050, text=»* T I O K B I «, t00=0x0050, t01=0x0092}
0x7d96…7da0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00a8}
0x7da0…7de6               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN «, t00=0x0050, t01=0x00b2}
0x7de6…7e38               Head {h00=0x004e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS KEYBOARD/CTW. TIOKBI WILL SET BUFFER ADDRESSES «, t00=0x0050, t01=0x00f8}
0x7e38…7e72               Head {h00=0x0036, h01=0x0050, text=»* AND MOVE KEYTABLE (IF ANY) BY USING ENTRY TIPI05«, t00=0x0050, t01=0x014a}
0x7e72…7ea6               Head {h00=0x0030, h01=0x0050, text=»* IN 'TIOPCI' AND ENTRY TIPO05 IN 'TIOPCO'. «, t00=0x0050, t01=0x0184}
0x7ea6…7ede               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x0051, t01=0x0028}
0x7ede…7f0e               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENKBI'.«, t00=0x0051, t01=0x0060}
0x7f0e…7f18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0090}
0x7f18…7f3a               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x0051, t01=0x009a}
0x7f3a…7f54               Head {h00=0x0016, h01=0x0050, text=»*  A7 = ORDER CODE«, t00=0x0051, t01=0x00bc}
0x7f54…7f7a               Head {h00=0x0022, h01=0x0050, text=»*         A8 = DWT ECB ADDRESS«, t00=0x0051, t01=0x00d6}
0x7f7a…7f9a               Head {h00=0x001c, h01=0x0050, text=»*  A9 = USER ECB ADDRESS«, t00=0x0051, t01=0x00fc}
0x7f9a…7fca               Head {h00=0x002c, h01=0x0050, text=»* A12 = ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0051, t01=0x011c}
0x7fca…7fd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x014c}
0x7fd4…7ffa               Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A4 ARE DESTROYED «, t00=0x0051, t01=0x0156}
0x7ffa…8004               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x017c}
0x8004…8026               Head {h00=0x001e, h01=0x0050, text=»TIOKBI EQU * KEYBOARD/CTW «, t00=0x0051, t01=0x0186}
0x8026…804e               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x0052, t01=0x0018}
0x804e…8084               Head {h00=0x0032, h01=0x0050, text=» CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE«, t00=0x0052, t01=0x0040}
0x8084…80be               Head {h00=0x0036, h01=0x0050, text=» RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE «, t00=0x0052, t01=0x0076}
0x80be…80f8               Head {h00=0x0036, h01=0x0050, text=» CF A15,TIPI05 CHECK AND CORRECT BUFFER ADDRESSES «, t00=0x0052, t01=0x00b0}
0x80f8…811a               Head {h00=0x001e, h01=0x0050, text=» CWK A7,1 CHECK ORDER CODE«, t00=0x0052, t01=0x00ea}
0x811a…814a               Head {h00=0x002c, h01=0x0050, text=» RF(E) TIKB20 NO KEYTABLE IF BASIC READ «, t00=0x0052, t01=0x010c}
0x814a…8178               Head {h00=0x002a, h01=0x0050, text=» LD A4,ECBCW,A8 USER KEYTABLE ADDRESS «, t00=0x0052, t01=0x013c}
0x8178…819a               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TIKB20 NO KEYTABLE «, t00=0x0052, t01=0x016a}
0x819a…81a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x018c}
0x81a4…81bc               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0053, t01=0x0008}
0x81bc…81c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0020}
0x81c6…81d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x002a}
0x81d0…81e2               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A9«, t00=0x0053, t01=0x0034}
0x81e2…81f4               Head {h00=0x000e, h01=0x0050, text=» ADK A1,8 «, t00=0x0053, t01=0x0046}
0x81f4…8208               Head {h00=0x0010, h01=0x0050, text=» ADKL A8,12 «, t00=0x0053, t01=0x0058}
0x8208…8236               Head {h00=0x002a, h01=0x0050, text=» ST A8,-2,A8 SET DWT KEYTABLE ADDRESS «, t00=0x0053, t01=0x006c}
0x8236…8248               Head {h00=0x000e, h01=0x0050, text=» SUKL A8,4«, t00=0x0053, t01=0x009a}
0x8248…8276               Head {h00=0x002a, h01=0x0050, text=» ELR A3,A4 FIRST WORD OF USER KEYTABLE«, t00=0x0053, t01=0x00ac}
0x8276…8288               Head {h00=0x000e, h01=0x0050, text=» ANK A4,1 «, t00=0x0053, t01=0x00da}
0x8288…82b6               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TIKB10 KEYTABLE ADDRESS UNEVEN«, t00=0x0053, t01=0x00ec}
0x82b6…82e6               Head {h00=0x002c, h01=0x0050, text=» ECR A3,A3 NO, PUT LENGTH IN RIGHT BYTE «, t00=0x0053, t01=0x011a}
0x82e6…82f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x014a}
0x82f0…831e               Head {h00=0x002a, h01=0x0050, text=»TIKB10 ANK A3,/FF SKIP LEFT CHARACTER «, t00=0x0053, t01=0x0154}
0x831e…8330               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0053, t01=0x0182}
0x8330…8364 (84, 0, 400)  Head {h00=0x0030, h01=0x0050, text=» CW A3,KEYLEN,A12 CHECK KEYTABLE BUFFER SIZE«, t00=0x0054, t01=0x0004}
0x8364…8384               Head {h00=0x001c, h01=0x0050, text=» RF(G) IO:ERR TOO SMALL «, t00=0x0054, t01=0x0038}
0x8384…839a               Head {h00=0x0012, h01=0x0050, text=» CF A15,TIPO05«, t00=0x0054, t01=0x0058}
0x839a…83c4               Head {h00=0x0026, h01=0x0050, text=» SUKL A8,8 ADJUST DWT ECB ADDRESS «, t00=0x0054, t01=0x006e}
0x83c4…83ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0098}
0x83ce…83e2               Head {h00=0x0010, h01=0x0050, text=»TIKB20 EQU *«, t00=0x0054, t01=0x00a2}
0x83e2…83f2               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0054, t01=0x00b6}
0x83f2…83fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00c6}
0x83fc…8414               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0054, t01=0x00d0}
0x8414…841e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00e8}
0x841e…8434               Head {h00=0x0012, h01=0x0050, text=»* T I O I T I «, t00=0x0054, t01=0x00f2}
0x8434…843e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0108}
0x843e…8476               Head {h00=0x0034, h01=0x0050, text=»TIOITI EQU A15RTN INTERTASK COMMUNICATION, INPUT«, t00=0x0054, t01=0x0112}
0x8476…8480               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x014a}
0x8480…8496               Head {h00=0x0012, h01=0x0050, text=»* T I O D K I «, t00=0x0054, t01=0x0154}
0x8496…84a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x016a}
0x84a0…84c6               Head {h00=0x0022, h01=0x0050, text=»TIODKI EQU TIOMXI DISC, INPUT «, t00=0x0054, t01=0x0174}
0x84c6…84d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x000a}
0x84d0…84e8               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0055, t01=0x0014}
0x84e8…84f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x002c}
0x84f2…8508               Head {h00=0x0012, h01=0x0050, text=»* T I O P C O «, t00=0x0055, t01=0x0036}
0x8508…8512               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x004c}
0x8512…8558               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A WRITE REQUEST HAS BEEN«, t00=0x0055, t01=0x0056}
0x8558…859a               Head {h00=0x003e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. «, t00=0x0055, t01=0x009c}
0x859a…85e0               Head {h00=0x0042, h01=0x0050, text=»* TIOPCO CHECKS THAT REQUESTED LENGTH DOES NOT EXCEED THE DWT «, t00=0x0055, t01=0x00de}
0x85e0…8628               Head {h00=0x0044, h01=0x0050, text=»* BUFFER LENGTH, AND PERFORMS A MOVE OF THE CONTENTS OF THE USER«, t00=0x0055, t01=0x0124}
0x8628…864c               Head {h00=0x0020, h01=0x0050, text=»* BUFFER TO THE DWT BUFFER. «, t00=0x0055, t01=0x016c}
0x864c…8684               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x0055, t01=0x0190}
0x8684…86b4               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENPCO'.«, t00=0x0056, t01=0x0038}
0x86b4…86ee               Head {h00=0x0036, h01=0x0050, text=»* NOTICE THAT MODULE 'TIOKBO' IS EQUAL TO TIOPCO. «, t00=0x0056, t01=0x0068}
0x86ee…8738               Head {h00=0x0046, h01=0x0050, text=»* NOTICE ALSO THAT ENTRY TIPO05 IS USED BY 'TIOKBI' AND 'TENITO'. «, t00=0x0056, t01=0x00a2}
0x8738…8762               Head {h00=0x0026, h01=0x0050, text=»* TIOPCO IS ALSO USED BY 'DC:MOT'.«, t00=0x0056, t01=0x00ec}
0x8762…876c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0116}
0x876c…878e               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x0056, t01=0x0120}
0x878e…87b4               Head {h00=0x0022, h01=0x0050, text=»*         A8 = DWT ECB ADDRESS«, t00=0x0056, t01=0x0142}
0x87b4…87be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0168}
0x87be…87e4               Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A4 ARE DESTROYED «, t00=0x0056, t01=0x0172}
0x87e4…87ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0008}
0x87ee…881e               Head {h00=0x002c, h01=0x0050, text=»TIOPCO EQU * PROGRAMMED CHANNEL, OUTPUT «, t00=0x0057, t01=0x0012}
0x881e…8856               Head {h00=0x0034, h01=0x0050, text=» LD A2,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK«, t00=0x0057, t01=0x0042}
0x8856…887e               Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBRL,A8 REQUESTED LENGTH«, t00=0x0057, t01=0x007a}
0x887e…88aa               Head {h00=0x0028, h01=0x0050, text=» RF(NP) TIPO20 REQUESTED LENGTH <= 0«, t00=0x0057, t01=0x00a2}
0x88aa…88e0               Head {h00=0x0032, h01=0x0050, text=» CW A3,BUFLEN,A2 COMPARE WITH DWT BUFFER SIZE «, t00=0x0057, t01=0x00ce}
0x88e0…891a               Head {h00=0x0036, h01=0x0050, text=» RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE «, t00=0x0057, t01=0x0104}
0x891a…8944               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTUEC,A6 USER ECB ADDRESS «, t00=0x0057, t01=0x013e}
0x8944…894e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0168}
0x894e…8966               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0057, t01=0x0172}
0x8966…8970               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x018a}
0x8970…897a (88, 0, 398)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0004}
0x897a…89b8               Head {h00=0x003a, h01=0x0050, text=»TIPO05 EQU * ENTRY POINT USED BY 'TIOKBI' AND 'TENITO'«, t00=0x0058, t01=0x000e}
0x89b8…89ca               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0058, t01=0x004c}
0x89ca…89fc               Head {h00=0x002e, h01=0x0050, text=» ANKL A3,/FFFE MAKE REQUESTED LENGTH EVEN «, t00=0x0058, t01=0x005e}
0x89fc…8a28               Head {h00=0x0028, h01=0x0050, text=» EL A1,ECBBA,A1 USER BUFFER ADDRESS «, t00=0x0058, t01=0x0090}
0x8a28…8a52               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBBA,A8 DWT BUFFER ADDRESS«, t00=0x0058, t01=0x00bc}
0x8a52…8a86               Head {h00=0x0030, h01=0x0050, text=» ANKL A2,/FFFE MAKE DWT BUFFER ADDRESS EVEN «, t00=0x0058, t01=0x00e6}
0x8a86…8a98               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0058, t01=0x011a}
0x8a98…8aaa               Head {h00=0x000e, h01=0x0050, text=» ANK A4,1 «, t00=0x0058, t01=0x012c}
0x8aaa…8adc               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) TIPO30 USER BUFFER ADDRESS UNEVEN «, t00=0x0058, t01=0x013e}
0x8adc…8af4               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBBA,A8 «, t00=0x0058, t01=0x0170}
0x8af4…8afe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0188}
0x8afe…8b38 (89, 0, 398)  Head {h00=0x0036, h01=0x0050, text=»TIPO10 MVUS A3 MOVE (USER BUFFER) TO SYSTEM BUFFER«, t00=0x0059, t01=0x0004}
0x8b38…8b42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x003e}
0x8b42…8b58               Head {h00=0x0012, h01=0x0050, text=»TIPO20 RTN A15«, t00=0x0059, t01=0x0048}
0x8b58…8b62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x005e}
0x8b62…8b96               Head {h00=0x0030, h01=0x0050, text=»TIPO30 EQU * USER BUFFER ADDRESS WAS UNEVEN «, t00=0x0059, t01=0x0068}
0x8b96…8bce               Head {h00=0x0034, h01=0x0050, text=» ORS A4,ECBBA,A8 MAKE DWT BUFFER ADDRESS UNEVEN «, t00=0x0059, t01=0x009c}
0x8bce…8c02               Head {h00=0x0030, h01=0x0050, text=» ELR A4,A1 FIRST CHARACTER FROM USER BUFFER «, t00=0x0059, t01=0x00d4}
0x8c02…8c38               Head {h00=0x0032, h01=0x0050, text=» STR A4,A2 STORE FIRST CHARACTER IN DWT BUFFER«, t00=0x0059, t01=0x0108}
0x8c38…8c64               Head {h00=0x0028, h01=0x0050, text=» ADK A1,1 UPDATE USER BUFFER POINTER«, t00=0x0059, t01=0x013e}
0x8c64…8c90               Head {h00=0x0028, h01=0x0050, text=» ADK A2,2 UPDATE DWT BUFFER POINTER «, t00=0x0059, t01=0x016a}
0x8c90…8cbc               Head {h00=0x0028, h01=0x0050, text=» RB TIPO10 MOVE REMAINING CHARACTERS«, t00=0x005a, t01=0x0008}
0x8cbc…8cc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0034}
0x8cc6…8cde               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x005a, t01=0x003e}
0x8cde…8ce8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0056}
0x8ce8…8cfe               Head {h00=0x0012, h01=0x0050, text=»* I O : E R R «, t00=0x005a, t01=0x0060}
0x8cfe…8d08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0076}
0x8d08…8d38               Head {h00=0x002c, h01=0x0050, text=»* DRIVER (DWT) MMU BUFFER IS TOO SMALL. «, t00=0x005a, t01=0x0080}
0x8d38…8d7e               Head {h00=0x0042, h01=0x0050, text=»* SET RETURN CODE /8008 (REQUEST ERROR AND INCORRECT LENGTH). «, t00=0x005a, t01=0x00b0}
0x8d7e…8da8               Head {h00=0x0026, h01=0x0050, text=»* BRANCH TO DISPATCHER VIA TENDIO.«, t00=0x005a, t01=0x00f6}
0x8da8…8db2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0120}
0x8db2…8dea               Head {h00=0x0034, h01=0x0050, text=»IO:ERR EQU * REQUEST ERROR EXIT FOR MMU ROUTINES«, t00=0x005a, t01=0x012a}
0x8dea…8df6               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x005a, t01=0x0162}
0x8df6…8e1e               Head {h00=0x0024, h01=0x0050, text=»  ADKL A15,4 ADJUST STACKPOINTER«, t00=0x005a, t01=0x016e}
0x8e1e…8e40               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT STATUS«, t00=0x005b, t01=0x0008}
0x8e40…8e60               Head {h00=0x001c, h01=0x0050, text=» SLL A1,2 CHECK ECHO BIT«, t00=0x005b, t01=0x002a}
0x8e60…8e80               Head {h00=0x001c, h01=0x0050, text=» RF(NN) IO:E10 NOT ECHO «, t00=0x005b, t01=0x004a}
0x8e80…8ea4               Head {h00=0x0020, h01=0x0050, text=» LDR A1,A6 SAVE DWT ADDRESS «, t00=0x005b, t01=0x006a}
0x8ea4…8ece               Head {h00=0x0026, h01=0x0050, text=» LD A6,DWTECH,A6 ECHO DWT ADDRESS «, t00=0x005b, t01=0x008e}
0x8ece…8ee4               Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x005b, t01=0x00b8}
0x8ee4…8f0a               Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 RESTORE DWT ADDRESS«, t00=0x005b, t01=0x00ce}
0x8f0a…8f14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00f4}
0x8f14…8f28               Head {h00=0x0010, h01=0x0050, text=»IO:E10 EQU *«, t00=0x005b, t01=0x00fe}
0x8f28…8f4e               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/8008 SET RETURN CODE«, t00=0x005b, t01=0x0112}
0x8f4e…8f82               Head {h00=0x0030, h01=0x0050, text=» ABL DISEND BRANCH TO DISPATCHER VIA TENDIO «, t00=0x005b, t01=0x0138}
0x8f82…8f8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x016c}
0x8f8c…8fa4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x005b, t01=0x0176}
0x8fa4…8fae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x018e}
0x8fae…8fc4               Head {h00=0x0012, h01=0x0050, text=»* T I O M X O «, t00=0x005c, t01=0x0008}
0x8fc4…8fce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x001e}
0x8fce…8ff4               Head {h00=0x0022, h01=0x0050, text=»TIOMXO EQU TIOMXI MUX, OUTPUT «, t00=0x005c, t01=0x0028}
0x8ff4…8ffe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x004e}
0x8ffe…9014               Head {h00=0x0012, h01=0x0050, text=»* T I O K B O «, t00=0x005c, t01=0x0058}
0x9014…901e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x006e}
0x901e…904c               Head {h00=0x002a, h01=0x0050, text=»TIOKBO EQU TIOPCO KEYBOARD/CTW, OUTPUT«, t00=0x005c, t01=0x0078}
0x904c…9056               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00a6}
0x9056…906c               Head {h00=0x0012, h01=0x0050, text=»* T I O I T O «, t00=0x005c, t01=0x00b0}
0x906c…9076               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00c6}
0x9076…90b0               Head {h00=0x0036, h01=0x0050, text=»TIOITO EQU A15RTN INTERTASK COMMUNICATION, OUTPUT «, t00=0x005c, t01=0x00d0}
0x90b0…90ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x010a}
0x90ba…90d0               Head {h00=0x0012, h01=0x0050, text=»* T I O D K O «, t00=0x005c, t01=0x0114}
0x90d0…90da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x012a}
0x90da…9100               Head {h00=0x0022, h01=0x0050, text=»TIODKO EQU TIODKI DISC, OUTPUT«, t00=0x005c, t01=0x0134}
0x9100…910a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x015a}
0x910a…9122               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x005c, t01=0x0164}
0x9122…912c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x017c}
0x912c…9142               Head {h00=0x0012, h01=0x0050, text=»* T E N : D M «, t00=0x005c, t01=0x0186}
0x9142…914c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x000c}
0x914c…9186               Head {h00=0x0036, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TENDIO' WHEN A REQUEST«, t00=0x005d, t01=0x0016}
0x9186…91b8               Head {h00=0x002e, h01=0x0050, text=»* FOR DATA MANAGEMENT HAS BEEN COMPLETED. «, t00=0x005d, t01=0x0050}
0x91b8…9200               Head {h00=0x0044, h01=0x0050, text=»* NOTICE THAT MODULES 'TENDKI' AND 'TENDKO' ARE EQUAL TO TEN:DM.«, t00=0x005d, t01=0x0082}
0x9200…920a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00ca}
0x920a…922c               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x005d, t01=0x00d4}
0x922c…9254               Head {h00=0x0024, h01=0x0050, text=»*         A8 = USER ECB ADDRESS «, t00=0x005d, t01=0x00f6}
0x9254…925e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x011e}
0x925e…9280               Head {h00=0x001e, h01=0x0050, text=»* OUTPUT: A1 IS DESTROYED «, t00=0x005d, t01=0x0128}
0x9280…928a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x014a}
0x928a…92bc               Head {h00=0x002e, h01=0x0050, text=»TEN:DM EQU * DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x005d, t01=0x0154}
0x92bc…92e4               Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTMEC,A6 MMU ECB ADDRESS«, t00=0x005d, t01=0x0186}
0x92e4…9310               Head {h00=0x0028, h01=0x0050, text=» LD A1,ECBCW2,A1 SECOND CONTROL WORD«, t00=0x005e, t01=0x001e}
0x9310…9328               Head {h00=0x0014, h01=0x0050, text=» ES A1,ECBCW2,A8«, t00=0x005e, t01=0x004a}
0x9328…9338               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x005e, t01=0x0062}
0x9338…9342               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0072}
0x9342…935a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x005e, t01=0x007c}
0x935a…9364               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0094}
0x9364…937a               Head {h00=0x0012, h01=0x0050, text=»* T E N P C I «, t00=0x005e, t01=0x009e}
0x937a…9384               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x00b4}
0x9384…93cc               Head {h00=0x0044, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TENDIO' WHEN A READ REQUEST HAS BEEN«, t00=0x005e, t01=0x00be}
0x93cc…9410               Head {h00=0x0040, h01=0x0050, text=»* COMPLETED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL.«, t00=0x005e, t01=0x0106}
0x9410…9452               Head {h00=0x003e, h01=0x0050, text=»* TENPCI PERFORMS A MOVE OF THE CONTENTS OF THE DWT BUFFER«, t00=0x005e, t01=0x014a}
0x9452…9470               Head {h00=0x001a, h01=0x0050, text=»* TO THE USER BUFFER. «, t00=0x005e, t01=0x018c}
0x9470…94b8               Head {h00=0x0044, h01=0x0050, text=»* NOTICE THAT MODULES 'TENKBI' AND 'TENITI' ARE EQUAL TO TENPCI.«, t00=0x005f, t01=0x001a}
0x94b8…94f4               Head {h00=0x0038, h01=0x0050, text=»* NOTICE ALSO THAT ENTRY TEN:DC IS USED BY 'DC:MIN'.«, t00=0x005f, t01=0x0062}
0x94f4…94fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x009e}
0x94fe…9520               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x005f, t01=0x00a8}
0x9520…9548               Head {h00=0x0024, h01=0x0050, text=»*         A8 = USER ECB ADDRESS «, t00=0x005f, t01=0x00ca}
0x9548…9552               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00f2}
0x9552…957c               Head {h00=0x0026, h01=0x0050, text=»* OUTPUT: A1-A4, A8 ARE DESTROYED «, t00=0x005f, t01=0x00fc}
0x957c…9586               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0126}
0x9586…95b4               Head {h00=0x002a, h01=0x0050, text=»TENPCI EQU * PROGRAMMED CHANNEL, INPUT«, t00=0x005f, t01=0x0130}
0x95b4…95dc               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTECB,A6 DWT ECB ADDRESS«, t00=0x005f, t01=0x015e}
0x95dc…9604               Head {h00=0x0024, h01=0x0050, text=» LD A4,ECBEL,A2 EFFECTIVE LENGTH«, t00=0x005f, t01=0x0186}
0x9604…962a               Head {h00=0x0022, h01=0x0050, text=» RF(NP) TEPI30 NO MOVE IF ZERO«, t00=0x0060, t01=0x001e}
0x962a…9654               Head {h00=0x0026, h01=0x0050, text=» LD A1,ECBBA,A2 DWT BUFFER ADDRESS«, t00=0x0060, t01=0x0044}
0x9654…965e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x006e}
0x965e…9690               Head {h00=0x002e, h01=0x0050, text=»TEN:DC EQU * ENTRY POINT USED BY 'DC:MIN' «, t00=0x0060, t01=0x0078}
0x9690…96bc               Head {h00=0x0028, h01=0x0050, text=» EL A2,ECBBA,A8 USER BUFFER ADDRESS «, t00=0x0060, t01=0x00aa}
0x96bc…96e4               Head {h00=0x0024, h01=0x0050, text=» LDK A3,1 CHECK BUFFER ADDRESSES«, t00=0x0060, t01=0x00d6}
0x96e4…96f6               Head {h00=0x000e, h01=0x0050, text=» TM A3,A1 «, t00=0x0060, t01=0x00fe}
0x96f6…9724               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TEPI20 DWT BUFFER ADDRESS EVEN «, t00=0x0060, t01=0x0110}
0x9724…9754               Head {h00=0x002c, h01=0x0050, text=» TM A3,A2 NO, CHECK USER BUFFER ADDRESS «, t00=0x0060, t01=0x013e}
0x9754…9782               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TEPI60 USER BUFFER ADDRESS EVEN«, t00=0x0060, t01=0x016e}
0x9782…978c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x000c}
0x978c…97a4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0061, t01=0x0016}
0x97a4…97ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x002e}
0x97ae…97b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0038}
0x97b8…97ee               Head {h00=0x0032, h01=0x0050, text=»TEPI10 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN«, t00=0x0061, t01=0x0042}
0x97ee…9822               Head {h00=0x0030, h01=0x0050, text=»  LDR* A3,A1 FIRST CHARACTER FROM DWT BUFFER«, t00=0x0061, t01=0x0078}
0x9822…9834               Head {h00=0x000e, h01=0x0050, text=» ELR A8,A2«, t00=0x0061, t01=0x00ac}
0x9834…983e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00be}
0x983e…986c               Head {h00=0x002a, h01=0x0050, text=»TEPI15 ANK A3,/FF SKIP LEFT CHARACTER «, t00=0x0061, t01=0x00c8}
0x986c…9898               Head {h00=0x0028, h01=0x0050, text=» ANKL A8,/FF00 SKIP RIGHT CHARACTER «, t00=0x0061, t01=0x00f6}
0x9898…98aa               Head {h00=0x000e, h01=0x0050, text=» ORR A8,A3«, t00=0x0061, t01=0x0122}
0x98aa…98dc               Head {h00=0x002e, h01=0x0050, text=» ESR A8,A2 STORE CHARACTER IN USER BUFFER «, t00=0x0061, t01=0x0134}
0x98dc…9904               Head {h00=0x0024, h01=0x0050, text=» ADK A1,1 UPDATE BUFFER POINTERS«, t00=0x0061, t01=0x0166}
0x9904…9916               Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0061, t01=0x018e}
0x9916…9928               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0062, t01=0x0010}
0x9928…9956               Head {h00=0x002a, h01=0x0050, text=» RF(P) TEPI25 MORE CHARACTERS TO MOVE «, t00=0x0062, t01=0x0022}
0x9956…9972               Head {h00=0x0018, h01=0x0050, text=» RTN A15 NO, RETURN «, t00=0x0062, t01=0x0050}
0x9972…997c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x006c}
0x997c…9994               Head {h00=0x0014, h01=0x0050, text=»TEPI20 TM A3,A2 «, t00=0x0062, t01=0x0076}
0x9994…99c2               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TEPI25 USER BUFFER ADDRESS EVEN«, t00=0x0062, t01=0x008e}
0x99c2…99e8               Head {h00=0x0022, h01=0x0050, text=» LDR A3,A1 DWT BUFFER ADDRESS «, t00=0x0062, t01=0x00bc}
0x99e8…9a10               Head {h00=0x0024, h01=0x0050, text=» ADR A3,A4 ADD EFFECTIVE LENGTH «, t00=0x0062, t01=0x00e2}
0x9a10…9a1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x010a}
0x9a1a…9a42               Head {h00=0x0024, h01=0x0050, text=»TEPI23 LC A8,-1,A3 ONE CHARACTER«, t00=0x0062, t01=0x0114}
0x9a42…9a7a               Head {h00=0x0034, h01=0x0050, text=» SCR A8,A3 MOVE THIS CHAR. ONE BYTE TO THE RIGHT«, t00=0x0062, t01=0x013c}
0x9a7a…9aa4               Head {h00=0x0026, h01=0x0050, text=» SUK A3,1 POINT TO NEXT CHARACTER «, t00=0x0062, t01=0x0174}
0x9aa4…9adc               Head {h00=0x0034, h01=0x0050, text=» CWR A3,A1 COMPARE WITH START ADDRESS OF BUFFER «, t00=0x0063, t01=0x000e}
0x9adc…9b0a               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TEPI23 MORE CHARACTERS TO MOVE«, t00=0x0063, t01=0x0046}
0x9b0a…9b3e               Head {h00=0x0030, h01=0x0050, text=» ADK A1,1 NO, MAKE DWT BUFFER ADDRESS UNEVEN«, t00=0x0063, t01=0x0074}
0x9b3e…9b50               Head {h00=0x000e, h01=0x0050, text=» RB TEPI10«, t00=0x0063, t01=0x00a8}
0x9b50…9b5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00ba}
0x9b5a…9b72               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0063, t01=0x00c4}
0x9b72…9b7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00dc}
0x9b7c…9b86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00e6}
0x9b86…9bb6               Head {h00=0x002c, h01=0x0050, text=»TEPI25 LDR A3,A4 CHECK REQUESTED LENGTH «, t00=0x0063, t01=0x00f0}
0x9bb6…9bc8               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0063, t01=0x0120}
0x9bc8…9bf6               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TEPI40 EFFECTIVE LENGTH UNEVEN«, t00=0x0063, t01=0x0132}
0x9bf6…9c2a               Head {h00=0x0030, h01=0x0050, text=» MVSU A4 MOVE (SYSTEM BUFFER) TO USER BUFFER«, t00=0x0063, t01=0x0160}
0x9c2a…9c34 (100, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0004}
0x9c34…9c4a               Head {h00=0x0012, h01=0x0050, text=»TEPI30 RTN A15«, t00=0x0064, t01=0x000e}
0x9c4a…9c54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0024}
0x9c54…9c84               Head {h00=0x002c, h01=0x0050, text=»TEPI40 EQU * EFFECTIVE LENGTH WAS UNEVEN«, t00=0x0064, t01=0x002e}
0x9c84…9cb0               Head {h00=0x0028, h01=0x0050, text=» SUK A4,1 MAKE EFFECTIVE LENGTH EVEN«, t00=0x0064, t01=0x005e}
0x9cb0…9ce0               Head {h00=0x002c, h01=0x0050, text=» RF(Z) TEPI50 ONLY ONE CHARACTER TO MOVE«, t00=0x0064, t01=0x008a}
0x9ce0…9cfe               Head {h00=0x001a, h01=0x0050, text=» LDR A8,A4 NO, SAVE A4«, t00=0x0064, t01=0x00ba}
0x9cfe…9d32               Head {h00=0x0030, h01=0x0050, text=» MVSU A4 MOVE (SYSTEM BUFFER) TO USER BUFFER«, t00=0x0064, t01=0x00d8}
0x9d32…9d5c               Head {h00=0x0026, h01=0x0050, text=» ADR A1,A8 UPDATE BUFFER POINTERS «, t00=0x0064, t01=0x010c}
0x9d5c…9d6e               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A8«, t00=0x0064, t01=0x0136}
0x9d6e…9d78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0148}
0x9d78…9d8c               Head {h00=0x0010, h01=0x0050, text=»TEPI50 EQU *«, t00=0x0064, t01=0x0152}
0x9d8c…9dbe               Head {h00=0x002e, h01=0x0050, text=» LDR* A8,A1 LAST CHARACTER FROM DWT BUFFER«, t00=0x0064, t01=0x0166}
0x9dbe…9dd0               Head {h00=0x000e, h01=0x0050, text=» ELR A3,A2«, t00=0x0065, t01=0x0008}
0x9dd0…9de2               Head {h00=0x000e, h01=0x0050, text=» RB TEPI15«, t00=0x0065, t01=0x001a}
0x9de2…9dec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x002c}
0x9dec…9e1e               Head {h00=0x002e, h01=0x0050, text=»TEPI60 EQU * DWT BUFFER ADDRESS WAS UNEVEN«, t00=0x0065, t01=0x0036}
0x9e1e…9e44               Head {h00=0x0022, h01=0x0050, text=» LDR A3,A1 DWT BUFFER ADDRESS «, t00=0x0065, t01=0x0068}
0x9e44…9e6c               Head {h00=0x0024, h01=0x0050, text=» ADR A1,A4 ADD EFFECTIVE LENGTH «, t00=0x0065, t01=0x008e}
0x9e6c…9e76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00b6}
0x9e76…9e9c               Head {h00=0x0022, h01=0x0050, text=»TEPI70 LCR A8,A3 ONE CHARACTER«, t00=0x0065, t01=0x00c0}
0x9e9c…9ed6               Head {h00=0x0036, h01=0x0050, text=» SC A8,-1,A3 MOVE THIS CHAR. ONE BYTE TO THE LEFT «, t00=0x0065, t01=0x00e6}
0x9ed6…9f00               Head {h00=0x0026, h01=0x0050, text=» ADK A3,1 POINT TO NEXT CHARACTER «, t00=0x0065, t01=0x0120}
0x9f00…9f2e               Head {h00=0x002a, h01=0x0050, text=» CWR A3,A1 COMPARE WITH ENDING ADDRESS«, t00=0x0065, t01=0x014a}
0x9f2e…9f5c               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TEPI70 MORE CHARACTERS TO MOVE«, t00=0x0065, t01=0x0178}
0x9f5c…9f8e               Head {h00=0x002e, h01=0x0050, text=» SUR A1,A4 NO, RESTORE DWT BUFFER ADDRESS «, t00=0x0066, t01=0x0016}
0x9f8e…9fbc               Head {h00=0x002a, h01=0x0050, text=» SUK A1,1 MAKE DWT BUFFER ADDRESS EVEN«, t00=0x0066, t01=0x0048}
0x9fbc…9fce               Head {h00=0x000e, h01=0x0050, text=» RB TEPI25«, t00=0x0066, t01=0x0076}
0x9fce…9fd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0088}
0x9fd8…9ff0               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0066, t01=0x0092}
0x9ff0…9ffa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00aa}
0x9ffa…a010               Head {h00=0x0012, h01=0x0050, text=»* T E N M X I «, t00=0x0066, t01=0x00b4}
0xa010…a01a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00ca}
0xa01a…a03e               Head {h00=0x0020, h01=0x0050, text=»TENMXI EQU A15RTN MUX, INPUT«, t00=0x0066, t01=0x00d4}
0xa03e…a048               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00f8}
0xa048…a05e               Head {h00=0x0012, h01=0x0050, text=»* T E N K B I «, t00=0x0066, t01=0x0102}
0xa05e…a068               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0118}
0xa068…a092               Head {h00=0x0026, h01=0x0050, text=»TENKBI EQU TENPCI KEYBOARD, INPUT «, t00=0x0066, t01=0x0122}
0xa092…a09c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x014c}
0xa09c…a0b2               Head {h00=0x0012, h01=0x0050, text=»* T E N I T I «, t00=0x0066, t01=0x0156}
0xa0b2…a0bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x016c}
0xa0bc…a0f4               Head {h00=0x0034, h01=0x0050, text=»TENITI EQU TENPCI INTERTASK COMMUNICATION, INPUT«, t00=0x0066, t01=0x0176}
0xa0f4…a0fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x001e}
0xa0fe…a114               Head {h00=0x0012, h01=0x0050, text=»* T E N D K I «, t00=0x0067, t01=0x0028}
0xa114…a11e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x003e}
0xa11e…a144               Head {h00=0x0022, h01=0x0050, text=»TENDKI EQU TEN:DM DISC, INPUT «, t00=0x0067, t01=0x0048}
0xa144…a14e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x006e}
0xa14e…a166               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0067, t01=0x0078}
0xa166…a170               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0090}
0xa170…a186               Head {h00=0x0012, h01=0x0050, text=»* T E N P C O «, t00=0x0067, t01=0x009a}
0xa186…a190               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00b0}
0xa190…a1c4               Head {h00=0x0030, h01=0x0050, text=»TENPCO EQU A15RTN PROGRAMMED CHANNEL, OUTPUT«, t00=0x0067, t01=0x00ba}
0xa1c4…a1ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00ee}
0xa1ce…a1e4               Head {h00=0x0012, h01=0x0050, text=»* T E N M X O «, t00=0x0067, t01=0x00f8}
0xa1e4…a1ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x010e}
0xa1ee…a214               Head {h00=0x0022, h01=0x0050, text=»TENMXO EQU A15RTN MUX, OUTPUT «, t00=0x0067, t01=0x0118}
0xa214…a21e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x013e}
0xa21e…a234               Head {h00=0x0012, h01=0x0050, text=»* T E N K B O «, t00=0x0067, t01=0x0148}
0xa234…a23e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x015e}
0xa23e…a26c               Head {h00=0x002a, h01=0x0050, text=»TENKBO EQU A15RTN KEYBOARD/CTW, OUTPUT«, t00=0x0067, t01=0x0168}
0xa26c…a276               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0008}
0xa276…a28c               Head {h00=0x0012, h01=0x0050, text=»* T E N D K O «, t00=0x0068, t01=0x0012}
0xa28c…a296               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0028}
0xa296…a2bc               Head {h00=0x0022, h01=0x0050, text=»TENDKO EQU TEN:DM DISC, OUTPUT«, t00=0x0068, t01=0x0032}
0xa2bc…a2c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0058}
0xa2c6…a2de               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0068, t01=0x0062}
0xa2de…a2e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x007a}
0xa2e8…a2fe               Head {h00=0x0012, h01=0x0050, text=»* T E N I T O «, t00=0x0068, t01=0x0084}
0xa2fe…a308               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x009a}
0xa308…a352               Head {h00=0x0046, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TENDIO' WHEN A WRITE REQUEST HAS BEEN «, t00=0x0068, t01=0x00a4}
0xa352…a3a2               Head {h00=0x004c, h01=0x0050, text=»* COMPLETED FOR INTERTASK COMMUNICATION, IN PURPOSE TO MOVE THE CONTENTS«, t00=0x0068, t01=0x00ee}
0xa3a2…a3f0               Head {h00=0x004a, h01=0x0050, text=»* OF THE USER BUFFER TO THE DRIVER BUFFER. THE ENTRY TIPO05 IN MODULE «, t00=0x0068, t01=0x013e}
0xa3f0…a420               Head {h00=0x002c, h01=0x0050, text=»* 'TIOPCO' IS USED FOR MOVING THE DATA. «, t00=0x0068, t01=0x018c}
0xa420…a42a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x002c}
0xa42a…a44c               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x0069, t01=0x0036}
0xa44c…a456               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0058}
0xa456…a480               Head {h00=0x0026, h01=0x0050, text=»* OUTPUT: A1-A4, A8 ARE DESTROYED «, t00=0x0069, t01=0x0062}
0xa480…a48a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x008c}
0xa48a…a4be               Head {h00=0x0030, h01=0x0050, text=»TENITO EQU * INTERTASK COMMUNICATION, OUTPUT«, t00=0x0069, t01=0x0096}
0xa4be…a4e6               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 DWT ECB ADDRESS«, t00=0x0069, t01=0x00ca}
0xa4e6…a50e               Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBEL,A8 EFFECTIVE LENGTH«, t00=0x0069, t01=0x00f2}
0xa50e…a52c               Head {h00=0x001a, h01=0x0050, text=» RF(NP) TEIO10 NO MOVE«, t00=0x0069, t01=0x011a}
0xa52c…a556               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTUEC,A6 USER ECB ADDRESS «, t00=0x0069, t01=0x0138}
0xa556…a582               Head {h00=0x0028, h01=0x0050, text=» CF A15,TIPO05 MOVE BUFFER CONTENTS «, t00=0x0069, t01=0x0162}
0xa582…a58c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x018e}
0xa58c…a5a2               Head {h00=0x0012, h01=0x0050, text=»TEIO10 RTN A15«, t00=0x006a, t01=0x0008}
0xa5a2…a5ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x001e}
0xa5ac…a5c4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x006a, t01=0x0028}
0xa5c4…a5ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0040}
0xa5ce…a5e4               Head {h00=0x0012, h01=0x0050, text=»* D C : M O T «, t00=0x006a, t01=0x004a}
0xa5e4…a5ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0060}
0xa5ee…a62e               Head {h00=0x003c, h01=0x0050, text=»* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER«, t00=0x006a, t01=0x006a}
0xa62e…a66e               Head {h00=0x003c, h01=0x0050, text=»* IN PURPOSE TO MOVE THE CONTENTS OF THE USER BUFFER TO «, t00=0x006a, t01=0x00aa}
0xa66e…a6ae               Head {h00=0x003c, h01=0x0050, text=»* THE DRIVER BUFFER. THE MOVE ROUTINE IN MODULE 'TIOPCO'«, t00=0x006a, t01=0x00ea}
0xa6ae…a6d4               Head {h00=0x0022, h01=0x0050, text=»* IS USED FOR MOVING THE DATA.«, t00=0x006a, t01=0x012a}
0xa6d4…a6de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0150}
0xa6de…a700               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x006a, t01=0x015a}
0xa700…a70a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x017c}
0xa70a…a736               Head {h00=0x0028, h01=0x0050, text=»* OUTPUT: NO REGISTERS ARE DESTROYED«, t00=0x006a, t01=0x0186}
0xa736…a740               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0022}
0xa740…a770               Head {h00=0x002c, h01=0x0050, text=»DC:MOT EQU * DATA COMMUNICATION, OUTPUT «, t00=0x006b, t01=0x002c}
0xa770…a796               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x006b, t01=0x005c}
0xa796…a7be               Head {h00=0x0024, h01=0x0050, text=» SUKL A15,32 ADJUST STACKPOINTER«, t00=0x006b, t01=0x0082}
0xa7be…a7ec               Head {h00=0x002a, h01=0x0050, text=» TS 2,A15 SAVE MMU REGISTERS ON STACK «, t00=0x006b, t01=0x00aa}
0xa7ec…a812               Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A6 TTAB ADDRESS «, t00=0x006b, t01=0x00d8}
0xa812…a83a               Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS«, t00=0x006b, t01=0x00fe}
0xa83a…a862               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTMEC,A6 DWT ECB ADDRESS«, t00=0x006b, t01=0x0126}
0xa862…a86e               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x006b, t01=0x014e}
0xa86e…a89a               Head {h00=0x0028, h01=0x0050, text=» CF A15,TIOPCO MOVE BUFFER CONTENTS «, t00=0x006b, t01=0x015a}
0xa89a…a8a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0186}
0xa8a4…a8cc               Head {h00=0x0024, h01=0x0050, text=»DC:RTN EQU * RETURN TO DC DRIVER«, t00=0x006b, t01=0x0190}
0xa8cc…a8fe               Head {h00=0x002e, h01=0x0050, text=» TL 2,A15 RESTORE MMU REGISTERS FROM STACK«, t00=0x006c, t01=0x0028}
0xa8fe…a926               Head {h00=0x0024, h01=0x0050, text=» ADKL A15,32 ADJUST STACKPOINTER«, t00=0x006c, t01=0x005a}
0xa926…a954               Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x006c, t01=0x0082}
0xa954…a972               Head {h00=0x001a, h01=0x0050, text=» RTN A15 ...AND RETURN«, t00=0x006c, t01=0x00b0}
0xa972…a97e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x00ce}
0xa97e…a988               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00da}
0xa988…a9a0               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x006c, t01=0x00e4}
0xa9a0…a9aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00fc}
0xa9aa…a9c0               Head {h00=0x0012, h01=0x0050, text=»* D C : M I N «, t00=0x006c, t01=0x0106}
0xa9c0…a9ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x011c}
0xa9ca…aa0a               Head {h00=0x003c, h01=0x0050, text=»* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER«, t00=0x006c, t01=0x0126}
0xaa0a…aa5c               Head {h00=0x004e, h01=0x0050, text=»* IN PURPOSE TO MOVE THE CONTENTS OF THE DRIVER BUFFER TO THE USER BUFFER.«, t00=0x006c, t01=0x0166}
0xaa5c…aa66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0028}
0xaa66…aa88               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A1 = RETURN CODE«, t00=0x006d, t01=0x0032}
0xaa88…aab4               Head {h00=0x0028, h01=0x0050, text=»*         A4 = DRIVER BUFFER ADDRESS«, t00=0x006d, t01=0x0054}
0xaab4…aad6               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x006d, t01=0x0080}
0xaad6…aae0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00a2}
0xaae0…ab0c               Head {h00=0x0028, h01=0x0050, text=»* OUTPUT: NO REGISTERS ARE DESTROYED«, t00=0x006d, t01=0x00ac}
0xab0c…ab16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00d8}
0xab16…ab2a               Head {h00=0x0010, h01=0x0050, text=»DC:MIN EQU *«, t00=0x006d, t01=0x00e2}
0xab2a…ab40               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x006d, t01=0x00f6}
0xab40…ab56               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x006d, t01=0x010c}
0xab56…ab80               Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x006d, t01=0x0122}
0xab80…ab8c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x014c}
0xab8c…ab96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0158}
0xab96…abac               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x006d, t01=0x0162}
0xabac…abd2               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x006d, t01=0x0178}
0xabd2…abdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x000e}
0xabdc…abf2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x006e, t01=0x0018}
0xabf2…ac1a               Head {h00=0x0024, h01=0x0050, text=» SUKL A15,32 ADJUST STACKPOINTER«, t00=0x006e, t01=0x002e}
0xac1a…ac48               Head {h00=0x002a, h01=0x0050, text=» TS 2,A15 SAVE MMU REGISTERS ON STACK «, t00=0x006e, t01=0x0056}
0xac48…ac6e               Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A6 TTAB ADDRESS «, t00=0x006e, t01=0x0084}
0xac6e…ac96               Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS«, t00=0x006e, t01=0x00aa}
0xac96…aca2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x00d2}
0xaca2…acac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00de}
0xacac…acc4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x006e, t01=0x00e8}
0xacc4…acce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0100}
0xacce…ace4               Head {h00=0x0012, h01=0x0050, text=»* M I N M O V «, t00=0x006e, t01=0x010a}
0xace4…acee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0120}
0xacee…ad10               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A1 = RETURN CODE«, t00=0x006e, t01=0x012a}
0xad10…ad3c               Head {h00=0x0028, h01=0x0050, text=»*         A4 = DRIVER BUFFER ADDRESS«, t00=0x006e, t01=0x014c}
0xad3c…ad5e               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x006e, t01=0x0178}
0xad5e…ad68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x000a}
0xad68…ad8e               Head {h00=0x0022, h01=0x0050, text=»MINMOV EQU * DC:MIN MOVE ENTRY«, t00=0x006f, t01=0x0014}
0xad8e…ad9a               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x006f, t01=0x003a}
0xad9a…adbe               Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTECB,A6 ECB ADDRESS«, t00=0x006f, t01=0x0046}
0xadbe…adec               Head {h00=0x002a, h01=0x0050, text=» LDR A7,A4 SAVE DRIVER BUFFER ADDRESS «, t00=0x006f, t01=0x006a}
0xadec…ae14               Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBEL,A3 EFFECTIVE LENGTH«, t00=0x006f, t01=0x0098}
0xae14…ae3a               Head {h00=0x0022, h01=0x0050, text=» RF(NP) MIN:40 NOTHING TO MOVE«, t00=0x006f, t01=0x00c0}
0xae3a…ae76               Head {h00=0x0038, h01=0x0050, text=» CW A2,ECBRL,A3 CHECK IF USER BUFFER IS LARGE ENOUGH«, t00=0x006f, t01=0x00e6}
0xae76…ae9e               Head {h00=0x0024, h01=0x0050, text=» RF(G) MIN:70 NO, REQUEST ERROR «, t00=0x006f, t01=0x0122}
0xae9e…aea8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x014a}
0xaea8…aebe               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x006f, t01=0x0154}
0xaebe…aeea               Head {h00=0x0028, h01=0x0050, text=» LD A5,ECBBA,A3 USER BUFFER ADDRESS «, t00=0x006f, t01=0x016a}
0xaeea…aefc               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A5«, t00=0x0070, t01=0x0008}
0xaefc…af28               Head {h00=0x0028, h01=0x0050, text=» ANK A3,1 CHECK USER BUFFER ADDRESS «, t00=0x0070, t01=0x001a}
0xaf28…af5a               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) MIN:30 USER BUFFER ADDRESS UNEVEN «, t00=0x0070, t01=0x0046}
0xaf5a…af6c               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0070, t01=0x0078}
0xaf6c…af9c               Head {h00=0x002c, h01=0x0050, text=» RF(N) MIN:30 ONLY ONE CHARACTER TO MOVE«, t00=0x0070, t01=0x008a}
0xaf9c…afa6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x00ba}
0xafa6…afbe               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0070, t01=0x00c4}
0xafbe…afc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x00dc}
0xafc8…afdc               Head {h00=0x0010, h01=0x0050, text=»* WORD MOVE «, t00=0x0070, t01=0x00e6}
0xafdc…afe6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x00fa}
0xafe6…affa               Head {h00=0x0010, h01=0x0050, text=»MIN:10 EQU *«, t00=0x0070, t01=0x0104}
0xaffa…b01c               Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A7 MOVE ONE WORD «, t00=0x0070, t01=0x0118}
0xb01c…b02e               Head {h00=0x000e, h01=0x0050, text=» STR A3,A5«, t00=0x0070, t01=0x013a}
0xb02e…b05a               Head {h00=0x0028, h01=0x0050, text=» ADK A7,2 INCREMENT BUFFER POINTERS «, t00=0x0070, t01=0x014c}
0xb05a…b06c               Head {h00=0x000e, h01=0x0050, text=» ADK A5,2 «, t00=0x0070, t01=0x0178}
0xb06c…b094               Head {h00=0x0024, h01=0x0050, text=» SUK A2,2 DECREMENT LOOP COUNTER«, t00=0x0070, t01=0x018a}
0xb094…b0ca               Head {h00=0x0032, h01=0x0050, text=» RB(NN) MIN:10 AT LEAST ONE MORE WORD TO MOVE «, t00=0x0071, t01=0x0022}
0xb0ca…b0d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0058}
0xb0d4…b0e8               Head {h00=0x0010, h01=0x0050, text=»MIN:20 EQU *«, t00=0x0071, t01=0x0062}
0xb0e8…b0fa               Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0071, t01=0x0076}
0xb0fa…b11e               Head {h00=0x0020, h01=0x0050, text=» RF(N) MIN:40 MOVE FINISHED «, t00=0x0071, t01=0x0088}
0xb11e…b128               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00ac}
0xb128…b140               Head {h00=0x0014, h01=0x0050, text=»* CHARACTER MOVE«, t00=0x0071, t01=0x00b6}
0xb140…b14a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00ce}
0xb14a…b15e               Head {h00=0x0010, h01=0x0050, text=»MIN:30 EQU *«, t00=0x0071, t01=0x00d8}
0xb15e…b184               Head {h00=0x0022, h01=0x0050, text=» LCR A3,A7 MOVE ONE CHARACTER «, t00=0x0071, t01=0x00ec}
0xb184…b196               Head {h00=0x000e, h01=0x0050, text=» SCR A3,A5«, t00=0x0071, t01=0x0112}
0xb196…b1c2               Head {h00=0x0028, h01=0x0050, text=» ADK A7,1 INCREMENT BUFFER POINTERS «, t00=0x0071, t01=0x0124}
0xb1c2…b1d4               Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x0071, t01=0x0150}
0xb1d4…b1fc               Head {h00=0x0024, h01=0x0050, text=» SUK A2,1 DECREMENT LOOP COUNTER«, t00=0x0071, t01=0x0162}
0xb1fc…b236               Head {h00=0x0036, h01=0x0050, text=» RB(P) MIN:30 AT LEAST ONE MORE CHARACTER TO MOVE «, t00=0x0071, t01=0x018a}
0xb236…b242               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x0034}
0xb242…b24c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0040}
0xb24c…b262               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0072, t01=0x004a}
0xb262…b290               Head {h00=0x002a, h01=0x0050, text=» ST A1,ECBRC,A3 SET RETURN CODE IN ECB«, t00=0x0072, t01=0x0060}
0xb290…b2b8               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A4 DRIVER BUFFER ADDRESS«, t00=0x0072, t01=0x008e}
0xb2b8…b2dc               Head {h00=0x0020, h01=0x0050, text=» LDR A4,A2 EFFECTIVE LENGTH «, t00=0x0072, t01=0x00b6}
0xb2dc…b306               Head {h00=0x0026, h01=0x0050, text=» LD A8,DWTUEC,A6 USER ECB ADDRESS «, t00=0x0072, t01=0x00da}
0xb306…b332               Head {h00=0x0028, h01=0x0050, text=» CF A15,TEN:DC MOVE BUFFER CONTENTS «, t00=0x0072, t01=0x0104}
0xb332…b35c               Head {h00=0x0026, h01=0x0050, text=» LDR A4,A7 RESTORE BUFFER ADDRESS «, t00=0x0072, t01=0x0130}
0xb35c…b36e               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0072, t01=0x015a}
0xb36e…b37a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x016c}
0xb37a…b384               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0178}
0xb384…b39c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0072, t01=0x0182}
0xb39c…b3a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x000a}
0xb3a6…b3b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0014}
0xb3b0…b3c4               Head {h00=0x0010, h01=0x0050, text=»MIN:40 EQU *«, t00=0x0073, t01=0x001e}
0xb3c4…b3d0               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0073, t01=0x0032}
0xb3d0…b3f6               Head {h00=0x0022, h01=0x0050, text=» CF A15,TENDIO PERFORM TENDIO «, t00=0x0073, t01=0x003e}
0xb3f6…b400               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0064}
0xb400…b418               Head {h00=0x0014, h01=0x0050, text=»* RELEASE BUFFER«, t00=0x0073, t01=0x006e}
0xb418…b422               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0086}
0xb422…b450               Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTADR,A6 DRIVER ADDRESS BLOCK «, t00=0x0073, t01=0x0090}
0xb450…b480               Head {h00=0x002c, h01=0x0050, text=» SU A4,HDRLEN,A1 REAL BUFFER ADDRESS =1 «, t00=0x0073, t01=0x00be}
0xb480…b4ac               Head {h00=0x0028, h01=0x0050, text=» LD A1,POLADR,A1 BUFFER POOL ADDRESS«, t00=0x0073, t01=0x00ee}
0xb4ac…b4d6               Head {h00=0x0026, h01=0x0050, text=» RF(Z) MIN:60 NO RELEASE OF BUFFER«, t00=0x0073, t01=0x011a}
0xb4d6…b4e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0144}
0xb4e0…b4f4               Head {h00=0x0010, h01=0x0050, text=»MIN:50 EQU *«, t00=0x0073, t01=0x014e}
0xb4f4…b51a               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A1 SAVE BUFFER ADDRESS«, t00=0x0073, t01=0x0162}
0xb51a…b542               Head {h00=0x0024, h01=0x0050, text=» LDR* A1,A2 NEXT BUFFER ADDRESS «, t00=0x0073, t01=0x0188}
0xb542…b572               Head {h00=0x002c, h01=0x0050, text=» RB(NZ) MIN:50 NOT LAST BUFFER IN CHAIN «, t00=0x0074, t01=0x0020}
0xb572…b57c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0050}
0xb57c…b5a4               Head {h00=0x0024, h01=0x0050, text=»* INSERT BUFFER AT END OF CHAIN «, t00=0x0074, t01=0x005a}
0xb5a4…b5ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0082}
0xb5ae…b5d4               Head {h00=0x0022, h01=0x0050, text=» STR A4,A2 UPDATE QUEUE LINKS «, t00=0x0074, t01=0x008c}
0xb5d4…b5e4               Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x0074, t01=0x00b2}
0xb5e4…b5ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00c2}
0xb5ee…b602               Head {h00=0x0010, h01=0x0050, text=»MIN:60 EQU *«, t00=0x0074, t01=0x00cc}
0xb602…b618               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0074, t01=0x00e0}
0xb618…b644               Head {h00=0x0028, h01=0x0050, text=» ABL IHRET8 RESTORE A1-A8 AND RETURN«, t00=0x0074, t01=0x00f6}
0xb644…b650               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x0122}
0xb650…b65a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x012e}
0xb65a…b672               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0074, t01=0x0138}
0xb672…b67c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0150}
0xb67c…b686               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x015a}
0xb686…b69c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0074, t01=0x0164}
0xb69c…b6b2               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0074, t01=0x017a}
0xb6b2…b6e0               Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x0074, t01=0x0190}
0xb6e0…b6ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x002e}
0xb6ea…b70e               Head {h00=0x0020, h01=0x0050, text=»DC:MOT RTN A15 ...AND RETURN«, t00=0x0075, t01=0x0038}
0xb70e…b71a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x005c}
0xb71a…b724               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0068}
0xb724…b73a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0075, t01=0x0072}
0xb73a…b760               Head {h00=0x0022, h01=0x0050, text=» RB DC:RTN RETURN TO DC DRIVER«, t00=0x0075, t01=0x0088}
0xb760…b76c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x00ae}
0xb76c…b776               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00ba}
0xb776…b78a               Head {h00=0x0010, h01=0x0050, text=»* ERROR EXIT«, t00=0x0075, t01=0x00c4}
0xb78a…b794               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00d8}
0xb794…b7ba               Head {h00=0x0022, h01=0x0050, text=»MIN:70 EQU * DC:MIN ERROR EXIT«, t00=0x0075, t01=0x00e2}
0xb7ba…b7f0               Head {h00=0x0032, h01=0x0050, text=» LDKL A1,/8008 REQUEST ERROR/INCORRECT LENGTH «, t00=0x0075, t01=0x0108}
0xb7f0…b818               Head {h00=0x0024, h01=0x0050, text=» RB MIN:40 RETURN VIA TENDIO ETC«, t00=0x0075, t01=0x013e}
0xb818…b822               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0166}
0xb822…b83a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0075, t01=0x0170}
0xb83a…b844               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0188}
0xb844…b84e (118, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0004}
0xb84e…b864               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0076, t01=0x000e}
0xb864…b87a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0076, t01=0x0024}
0xb87a…b88e               Head {h00=0x0010, h01=0x0050, text=»DC:MOT EQU *«, t00=0x0076, t01=0x003a}
0xb88e…b8c4               Head {h00=0x0032, h01=0x0050, text=»  ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS«, t00=0x0076, t01=0x004e}
0xb8c4…b8d0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x0084}
0xb8d0…b8da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0090}
0xb8da…b8f2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0076, t01=0x009a}
0xb8f2…b8fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00b2}
0xb8fc…b906               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00bc}
0xb906…b918               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0076, t01=0x00c6}
0xb918…b92a               Head {h00=0x000e, h01=0x0050, text=»* TENDIO *«, t00=0x0076, t01=0x00d8}
0xb92a…b93c               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0076, t01=0x00ea}
0xb93c…b946               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00fc}
0xb946…b950               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0106}
0xb950…b982               Head {h00=0x002e, h01=0x0050, text=»* THIS MODULE IS CALLED WHEN COMPLETION OF«, t00=0x0076, t01=0x0110}
0xb982…b998               Head {h00=0x0012, h01=0x0050, text=»* I/O OCCURS. «, t00=0x0076, t01=0x0142}
0xb998…b9a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0158}
0xb9a2…b9ce               Head {h00=0x0028, h01=0x0050, text=»* - IF I/O AND ACTIVATION REQUEST:- «, t00=0x0076, t01=0x0162}
0xb9ce…b9d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x018e}
0xb9d8…ba06               Head {h00=0x002a, h01=0x0050, text=»*   ACTOTP IS CALLED TO START THE TASK«, t00=0x0077, t01=0x0008}
0xba06…ba10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0036}
0xba10…ba34               Head {h00=0x0020, h01=0x0050, text=»* -IF NORMAL I/O WITH WAIT:-«, t00=0x0077, t01=0x0040}
0xba34…ba3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0064}
0xba3e…ba6c               Head {h00=0x002a, h01=0x0050, text=»*   QTJOB IS CALLED TO QUEUE THE TASK «, t00=0x0077, t01=0x006e}
0xba6c…baa8               Head {h00=0x0038, h01=0x0050, text=»*   FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- «, t00=0x0077, t01=0x009c}
0xbaa8…bab2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x00d8}
0xbab2…bad0               Head {h00=0x001a, h01=0x0050, text=»*   A5 = TTAB ADDRESS «, t00=0x0077, t01=0x00e2}
0xbad0…bada               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0100}
0xbada…bb02               Head {h00=0x0024, h01=0x0050, text=»* -IF NORMAL I/O WITH NO WAIT:- «, t00=0x0077, t01=0x010a}
0xbb02…bb0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0132}
0xbb0c…bb2a               Head {h00=0x001a, h01=0x0050, text=»*   NO ACTION REQUIRED«, t00=0x0077, t01=0x013c}
0xbb2a…bb34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x015a}
0xbb34…bb76               Head {h00=0x003e, h01=0x0050, text=»* IF AN EVENT WAS QUEUED FOR THIS DEVICE (DWTTQ NOT ZERO) «, t00=0x0077, t01=0x0164}
0xbb76…bbc4               Head {h00=0x004a, h01=0x0050, text=»* THAT TASK IS PUT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION. «, t00=0x0078, t01=0x0016}
0xbbc4…bbce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0064}
0xbbce…bbe6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0078, t01=0x006e}
0xbbe6…bbf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0086}
0xbbf0…bbfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0090}
0xbbfa…bc2e               Head {h00=0x0030, h01=0x0050, text=»* ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- «, t00=0x0078, t01=0x009a}
0xbc2e…bc38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x00ce}
0xbc38…bc54               Head {h00=0x0018, h01=0x0050, text=»*   A1 = RETURN CODE«, t00=0x0078, t01=0x00d8}
0xbc54…bc5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x00f4}
0xbc5e…bc7a               Head {h00=0x0018, h01=0x0050, text=»*   A6 = DWT ADDRESS«, t00=0x0078, t01=0x00fe}
0xbc7a…bc84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x011a}
0xbc84…bca8               Head {h00=0x0020, h01=0x0050, text=»* NO REGISTERS ARE DESTROYED«, t00=0x0078, t01=0x0124}
0xbca8…bcb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0148}
0xbcb2…bce8               Head {h00=0x0032, h01=0x0050, text=»* WHEN RUNNING WITH MMU OPTION SPECIAL DEVICE «, t00=0x0078, t01=0x0152}
0xbce8…bd16               Head {h00=0x002a, h01=0x0050, text=»* DEPENDENT SUBROUTINES ARE PERFORMED.«, t00=0x0078, t01=0x0188}
0xbd16…bd20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0026}
0xbd20…bd38               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0079, t01=0x0030}
0xbd38…bd42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0048}
0xbd42…bd5a               Head {h00=0x0014, h01=0x0050, text=»* END I/O ENTRY «, t00=0x0079, t01=0x0052}
0xbd5a…bd64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x006a}
0xbd64…bd78               Head {h00=0x0010, h01=0x0050, text=»TENDIO EQU *«, t00=0x0079, t01=0x0074}
0xbd78…bd8e               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0079, t01=0x0088}
0xbd8e…bdb8               Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0079, t01=0x009e}
0xbdb8…bdc4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x00c8}
0xbdc4…bdce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00d4}
0xbdce…bde4               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0079, t01=0x00de}
0xbde4…bdf0               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0079, t01=0x00f4}
0xbdf0…be16               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0079, t01=0x0100}
0xbe16…be22               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0126}
0xbe22…be2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0132}
0xbe2c…be40               Head {h00=0x0010, h01=0x0050, text=»TEN090 EQU *«, t00=0x0079, t01=0x013c}
0xbe40…be4c               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0079, t01=0x0150}
0xbe4c…be6a               Head {h00=0x001a, h01=0x0050, text=» LDR A4,A6 DWT ADDRESS«, t00=0x0079, t01=0x015c}
0xbe6a…be94               Head {h00=0x0026, h01=0x0050, text=» ADK A4,DWTST POINT TO DWT STATUS «, t00=0x0079, t01=0x017a}
0xbe94…bea0               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x007a, t01=0x0014}
0xbea0…becc               Head {h00=0x0028, h01=0x0050, text=» LD A5,DWTTQ,A6 TERMINAL QUEUE LINK «, t00=0x007a, t01=0x0020}
0xbecc…bef0               Head {h00=0x0020, h01=0x0050, text=» RF(Z) TEN110 NO TASK QUEUED«, t00=0x007a, t01=0x004c}
0xbef0…bf10               Head {h00=0x001c, h01=0x0050, text=» LDKL A2,/800 ATTACH BIT«, t00=0x007a, t01=0x0070}
0xbf10…bf24               Head {h00=0x0010, h01=0x0050, text=» ANR* A2,A4 «, t00=0x007a, t01=0x0090}
0xbf24…bf4e               Head {h00=0x0026, h01=0x0050, text=» RF(Z) TEN100 DEVICE NOT ATTACHED «, t00=0x007a, t01=0x00a4}
0xbf4e…bf7e               Head {h00=0x002c, h01=0x0050, text=» CW A5,DWTTAB,A6 ATTACHED TO OTHER TASK «, t00=0x007a, t01=0x00ce}
0xbf7e…bfaa               Head {h00=0x0028, h01=0x0050, text=» RF(NE) TEN110 YES, DON'T QUEUE TASK«, t00=0x007a, t01=0x00fe}
0xbfaa…bfb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x012a}
0xbfb4…bfcc               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007a, t01=0x0134}
0xbfcc…bfd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x014c}
0xbfd6…bfe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0156}
0xbfe0…bff4               Head {h00=0x0010, h01=0x0050, text=»TEN100 EQU *«, t00=0x007a, t01=0x0160}
0xbff4…c024               Head {h00=0x002c, h01=0x0050, text=» LDR* A3,A5 UPDATE QUEUE ANCHOR ADDRESS «, t00=0x007a, t01=0x0174}
0xc024…c03c               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTTQ,A6 «, t00=0x007b, t01=0x0014}
0xc03c…c06e               Head {h00=0x002e, h01=0x0050, text=» CF A15,QTJOB QUEUE TASK TO REPEAT REQUEST«, t00=0x007b, t01=0x002c}
0xc06e…c078               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x005e}
0xc078…c094               Head {h00=0x0018, h01=0x0050, text=»* UPDATE ECB AND DWT«, t00=0x007b, t01=0x0068}
0xc094…c09e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0084}
0xc09e…c0d2               Head {h00=0x0030, h01=0x0050, text=»TEN110 LD A5,DWTTAB,A6 TTAB ADDRESS FROM DWT«, t00=0x007b, t01=0x008e}
0xc0d2…c0dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00c2}
0xc0dc…c0f8               Head {h00=0x0018, h01=0x0050, text=»TEN120 LDKL A2,/8000«, t00=0x007b, t01=0x00cc}
0xc0f8…c128               Head {h00=0x002c, h01=0x0050, text=» ORRS A2,A4 INDICATE DEVICE READY IN DWT«, t00=0x007b, t01=0x00e8}
0xc128…c13e               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/DBFF«, t00=0x007b, t01=0x0118}
0xc13e…c16a               Head {h00=0x0028, h01=0x0050, text=» ANRS A3,A4 RESET ECHO BIT AND BIT 5«, t00=0x007b, t01=0x012e}
0xc16a…c18e               Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTECB,A6 ECB ADDRESS«, t00=0x007b, t01=0x015a}
0xc18e…c1cc               Head {h00=0x003a, h01=0x0050, text=» RF(Z) TEN260 BRANCH IF ENTERED FROM ECHO OR RECOVERY «, t00=0x007b, t01=0x017e}
0xc1cc…c1d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x002c}
0xc1d6…c1ee               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007c, t01=0x0036}
0xc1ee…c1f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x004e}
0xc1f8…c202               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0058}
0xc202…c230               Head {h00=0x002a, h01=0x0050, text=» ORRS A2,A3 SET EVENT COMPLETED IN ECB«, t00=0x007c, t01=0x0062}
0xc230…c260               Head {h00=0x002c, h01=0x0050, text=» ORS A1,ECBRC,A3 SET RETURN CODE IN ECB «, t00=0x007c, t01=0x0090}
0xc260…c26a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00c0}
0xc26a…c280               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x007c, t01=0x00ca}
0xc280…c29c               Head {h00=0x0018, h01=0x0050, text=» LD A4,TTB:PW,A5 PSW«, t00=0x007c, t01=0x00e0}
0xc29c…c2c2               Head {h00=0x0022, h01=0x0050, text=» ANK A4,1 SYSTEM/USER MODE BIT«, t00=0x007c, t01=0x00fc}
0xc2c2…c2e4               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TEN200 SYSTEM MODE «, t00=0x007c, t01=0x0122}
0xc2e4…c2ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0144}
0xc2ee…c30a               Head {h00=0x0018, h01=0x0050, text=»* LOAD MMU REGISTERS«, t00=0x007c, t01=0x014e}
0xc30a…c314               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x016a}
0xc314…c328               Head {h00=0x0010, h01=0x0050, text=»TEN130 EQU *«, t00=0x007c, t01=0x0174}
0xc328…c350               Head {h00=0x0024, h01=0x0050, text=» SUKL A15,32 ADJUST STACKPOINTER«, t00=0x007c, t01=0x0188}
0xc350…c37e               Head {h00=0x002a, h01=0x0050, text=» TS 2,A15 SAVE MMU REGISTERS ON STACK «, t00=0x007d, t01=0x0020}
0xc37e…c3b0               Head {h00=0x002e, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS FROM TTAB«, t00=0x007d, t01=0x004e}
0xc3b0…c3ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0080}
0xc3ba…c3d2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007d, t01=0x008a}
0xc3d2…c3dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00a2}
0xc3dc…c3fe               Head {h00=0x001e, h01=0x0050, text=»* MOVE DWT ECB TO USER ECB«, t00=0x007d, t01=0x00ac}
0xc3fe…c408               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00ce}
0xc408…c432               Head {h00=0x0026, h01=0x0050, text=» LD A8,DWTUEC,A6 USER ECB ADDRESS «, t00=0x007d, t01=0x00d8}
0xc432…c444               Head {h00=0x000e, h01=0x0050, text=» ELR A4,A8«, t00=0x007d, t01=0x0102}
0xc444…c472               Head {h00=0x002a, h01=0x0050, text=» ORR A4,A2 SET EVENT COMPLETED IN ECB «, t00=0x007d, t01=0x0114}
0xc472…c484               Head {h00=0x000e, h01=0x0050, text=» ESR A4,A8«, t00=0x007d, t01=0x0142}
0xc484…c496               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x007d, t01=0x0154}
0xc496…c4ac               Head {h00=0x0012, h01=0x0050, text=» ADK A1,ECBEL «, t00=0x007d, t01=0x0166}
0xc4ac…c4be               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x007d, t01=0x017c}
0xc4be…c4d4               Head {h00=0x0012, h01=0x0050, text=» ADK A2,ECBEL «, t00=0x007d, t01=0x018e}
0xc4d4…c4e6               Head {h00=0x000e, h01=0x0050, text=» LDK A4,6 «, t00=0x007e, t01=0x0014}
0xc4e6…c51e               Head {h00=0x0034, h01=0x0050, text=» MVSU A4 MOVE EFF. LENGTH, RTN CODE & CNTRL WORD«, t00=0x007e, t01=0x0026}
0xc51e…c528               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x005e}
0xc528…c560               Head {h00=0x0034, h01=0x0050, text=» LD A3,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK«, t00=0x007e, t01=0x0068}
0xc560…c586               Head {h00=0x0022, h01=0x0050, text=» LD A3,DEVIND,A3 DEVICE INDEX «, t00=0x007e, t01=0x00a0}
0xc586…c5b6               Head {h00=0x002c, h01=0x0050, text=» RF(N) TEN160 NO SPECIAL ACTION REQUIRED«, t00=0x007e, t01=0x00c6}
0xc5b6…c5dc               Head {h00=0x0022, h01=0x0050, text=» RF(Z) TEN140 DATA MANAGEMENT «, t00=0x007e, t01=0x00f6}
0xc5dc…c600               Head {h00=0x0020, h01=0x0050, text=» CWK A3,DK:DIX CHECK IF DISC«, t00=0x007e, t01=0x011c}
0xc600…c61a               Head {h00=0x0016, h01=0x0050, text=» RF(E) TEN140 DISC«, t00=0x007e, t01=0x0140}
0xc61a…c624               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x015a}
0xc624…c64a               Head {h00=0x0022, h01=0x0050, text=»* PERFORM CHECK ON ORDER CODE «, t00=0x007e, t01=0x0164}
0xc64a…c654               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x018a}
0xc654…c684 (127, 0, 398) Head {h00=0x002c, h01=0x0050, text=» CF A15,RD:WR CHECK IF IT WAS READ/WRITE«, t00=0x007f, t01=0x0004}
0xc684…c6b6               Head {h00=0x002e, h01=0x0050, text=» RF(Z) TEN160 JUMP IF NO READ/WRITE ORDER «, t00=0x007f, t01=0x0034}
0xc6b6…c6c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0066}
0xc6c0…c6d4               Head {h00=0x0010, h01=0x0050, text=»TEN140 EQU *«, t00=0x007f, t01=0x0070}
0xc6d4…c6e0               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x007f, t01=0x0084}
0xc6e0…c720               Head {h00=0x003c, h01=0x0050, text=» CFI A15,TENTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE«, t00=0x007f, t01=0x0090}
0xc720…c72a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00d0}
0xc72a…c742               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007f, t01=0x00da}
0xc742…c74c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00f2}
0xc74c…c76c               Head {h00=0x001c, h01=0x0050, text=»* RESTORE MMU REGISTERS «, t00=0x007f, t01=0x00fc}
0xc76c…c776               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x011c}
0xc776…c78a               Head {h00=0x0010, h01=0x0050, text=»TEN150 EQU *«, t00=0x007f, t01=0x0126}
0xc78a…c796               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x007f, t01=0x013a}
0xc796…c7a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0146}
0xc7a0…c7b4               Head {h00=0x0010, h01=0x0050, text=»TEN160 EQU *«, t00=0x007f, t01=0x0150}
0xc7b4…c7e6               Head {h00=0x002e, h01=0x0050, text=» TL 2,A15 RESTORE MMU REGISTERS FROM STACK«, t00=0x007f, t01=0x0164}
0xc7e6…c80e               Head {h00=0x0024, h01=0x0050, text=» ADKL A15,32 ADJUST STACKPOINTER«, t00=0x0080, t01=0x0008}
0xc80e…c81a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x0030}
0xc81a…c824               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x003c}
0xc824…c83c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0080, t01=0x0046}
0xc83c…c846               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x005e}
0xc846…c884               Head {h00=0x003a, h01=0x0050, text=»* CHECK IF NO WAIT, WAIT, MULTIPLE WAIT OR ACTIVATION «, t00=0x0080, t01=0x0068}
0xc884…c88e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00a6}
0xc88e…c8a2               Head {h00=0x0010, h01=0x0050, text=»TEN200 EQU *«, t00=0x0080, t01=0x00b0}
0xc8a2…c8d2               Head {h00=0x002c, h01=0x0050, text=» LD A4,DWTWAT,A6 WAIT/ACTIVATE INDICATOR«, t00=0x0080, t01=0x00c4}
0xc8d2…c8fe               Head {h00=0x0028, h01=0x0050, text=» RF(Z) TEN250 NOT WAIT OR ACTIVATION«, t00=0x0080, t01=0x00f4}
0xc8fe…c910               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0080, t01=0x0120}
0xc910…c92a               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TEN240 WAIT«, t00=0x0080, t01=0x0132}
0xc92a…c93c               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0080, t01=0x014c}
0xc93c…c94e               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A4«, t00=0x0080, t01=0x015e}
0xc94e…c960               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0080, t01=0x0170}
0xc960…c980               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TEN230 ACTIVATION«, t00=0x0080, t01=0x0182}
0xc980…c9a4               Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x0081, t01=0x0012}
0xc9a4…c9ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0036}
0xc9ae…c9c4               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0081, t01=0x0040}
0xc9c4…c9f2               Head {h00=0x002a, h01=0x0050, text=» AN A3,TTB:PW,A5 SYSTEM/USER MODE BIT «, t00=0x0081, t01=0x0056}
0xc9f2…ca14               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TEN210 SYSTEM MODE «, t00=0x0081, t01=0x0084}
0xca14…ca46               Head {h00=0x002e, h01=0x0050, text=» LD A8,DWTUEC,A6 NO, GET USER ECB ADDRESS «, t00=0x0081, t01=0x00a6}
0xca46…ca52               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x00d8}
0xca52…ca5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00e4}
0xca5c…ca70               Head {h00=0x0010, h01=0x0050, text=»TEN210 EQU *«, t00=0x0081, t01=0x00ee}
0xca70…caa8               Head {h00=0x0034, h01=0x0050, text=» ST A8,TTB:SA+16,A5 SET TO A8 IN TTAB SAVE AREA «, t00=0x0081, t01=0x0102}
0xcaa8…cab2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x013a}
0xcab2…caf0               Head {h00=0x003a, h01=0x0050, text=»TEN220 ADK A4,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR «, t00=0x0081, t01=0x0144}
0xcaf0…cb14               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 NEXT DWT ADDRESS«, t00=0x0081, t01=0x0182}
0xcb14…cb38               Head {h00=0x0020, h01=0x0050, text=» RF(Z) TEN240 NO MORE DWT:S «, t00=0x0082, t01=0x0016}
0xcb38…cb5c               Head {h00=0x0020, h01=0x0050, text=» CMR A4 SET TO NO WAIT AGAIN«, t00=0x0082, t01=0x003a}
0xcb5c…cb6e               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0082, t01=0x005e}
0xcb6e…cb80               Head {h00=0x000e, h01=0x0050, text=» RB TEN220«, t00=0x0082, t01=0x0070}
0xcb80…cb8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0082}
0xcb8a…cba2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0082, t01=0x008c}
0xcba2…cbac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00a4}
0xcbac…cbb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00ae}
0xcbb6…cbca               Head {h00=0x0010, h01=0x0050, text=»TEN230 EQU *«, t00=0x0082, t01=0x00b8}
0xcbca…cc06               Head {h00=0x0038, h01=0x0050, text=» CF A15,FREBLK ACTIVATE: GET PARAMETER AND DISP ADDR«, t00=0x0082, t01=0x00cc}
0xcc06…cc38               Head {h00=0x002e, h01=0x0050, text=» CF A15,ACTOTP ACTIVATE TASK ON LIFO BASIS«, t00=0x0082, t01=0x0108}
0xcc38…cc4a               Head {h00=0x000e, h01=0x0050, text=» RF TEN250«, t00=0x0082, t01=0x013a}
0xcc4a…cc54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x014c}
0xcc54…cc68               Head {h00=0x0010, h01=0x0050, text=»TEN240 EQU *«, t00=0x0082, t01=0x0156}
0xcc68…cc9e               Head {h00=0x0032, h01=0x0050, text=» CF A15,QTJOB WAIT: QUEUE TASK FOR DISPATCHING«, t00=0x0082, t01=0x016a}
0xcc9e…cca8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0010}
0xcca8…ccbc               Head {h00=0x0010, h01=0x0050, text=»TEN250 EQU *«, t00=0x0083, t01=0x001a}
0xccbc…cce4               Head {h00=0x0024, h01=0x0050, text=» CM DWTECB,A6 RESET ECB ADDRESS «, t00=0x0083, t01=0x002e}
0xcce4…ccee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0056}
0xccee…cd02               Head {h00=0x0010, h01=0x0050, text=»TEN260 EQU *«, t00=0x0083, t01=0x0060}
0xcd02…cd18               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0083, t01=0x0074}
0xcd18…cd2c               Head {h00=0x0010, h01=0x0050, text=» ABL IHRET8 «, t00=0x0083, t01=0x008a}
0xcd2c…cd38               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x009e}
0xcd38…cd42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x00aa}
0xcd42…cd58               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0083, t01=0x00b4}
0xcd58…cd86               Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x0083, t01=0x00ca}
0xcd86…cda4               Head {h00=0x001a, h01=0x0050, text=» RTN A15 ...AND RETURN«, t00=0x0083, t01=0x00f8}
0xcda4…cdb0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x0116}
0xcdb0…cdba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0122}
0xcdba…cdc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x012c}
0xcdc4…cdce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0136}
0xcdce…cdda               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0083, t01=0x0140}
0xcdda…cdde               Head {h00=0x4004, h01=0x0000}
0xcdde…cde2               00 83 01 4c                                                                                                                                                                                                                                       ┆   L┆
0xcde2…cdea (132, 1, 8)   20 04 00 00 00 84 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view