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

⟦732246272⟧

    Length: 52716 (0xcdec)
    Notes: pts_type(SC)
    Names: »TOSSIO.SC«

Derivation

└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »M:DE10/TOSSIO.SC« 
    └─⟦this⟧ »M:TU10/TOSSIO.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »M:DE10/TOSSIO.SC« 
    └─⟦this⟧ »M:TU10/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	1
* 
* 
*	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	X:B
* 
	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 1«, 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…1504               Head {h00=0x0012, h01=0x0050, text=»CPU857 EQU X:B«, t00=0x000d, t01=0x00a4}
0x1504…150e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ba}
0x150e…1526               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x000d, t01=0x00c4}
0x1526…1530               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00dc}
0x1530…153a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00e6}
0x153a…1556               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x000d, t01=0x00f0}
0x1556…1572               Head {h00=0x0018, h01=0x0050, text=»* FORM STATEMENTS * «, t00=0x000d, t01=0x010c}
0x1572…158e               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x000d, t01=0x0128}
0x158e…1598               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0144}
0x1598…15a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x014e}
0x15a2…15b8               Head {h00=0x0012, h01=0x0050, text=»BYTES FORM 8,8«, t00=0x000d, t01=0x0158}
0x15b8…15c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x016e}
0x15c2…15da               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x000d, t01=0x0178}
0x15da…15e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0190}
0x15e4…15ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x000a}
0x15ee…160c               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000e, t01=0x0014}
0x160c…162a               Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS * «, t00=0x000e, t01=0x0032}
0x162a…1648               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000e, t01=0x0050}
0x1648…1652               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x006e}
0x1652…1688               Head {h00=0x0032, h01=0x0050, text=»* DEVICE WORK TABLE DISPLACEMENTS: FIXED PART «, t00=0x000e, t01=0x0078}
0x1688…1692               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ae}
0x1692…16bc               Head {h00=0x0026, h01=0x0050, text=»DWTCHP EQU /00 CHANNEL PARAMETERS «, t00=0x000e, t01=0x00b8}
0x16bc…16d8               Head {h00=0x0018, h01=0x0050, text=»DWTST EQU /02 STATUS«, t00=0x000e, t01=0x00e2}
0x16d8…16fa               Head {h00=0x001e, h01=0x0050, text=»DWTBC EQU /03 BYTE COUNTER«, t00=0x000e, t01=0x00fe}
0x16fa…171c               Head {h00=0x001e, h01=0x0050, text=»DWTECB EQU /04 ECB ADDRESS«, t00=0x000e, t01=0x0120}
0x171c…1740               Head {h00=0x0020, h01=0x0050, text=»DWTOPT EQU /06 ORDER OPTION «, t00=0x000e, t01=0x0142}
0x1740…1766               Head {h00=0x0022, h01=0x0050, text=»DWTOR EQU /06 INDEX AND ORDER «, t00=0x000e, t01=0x0166}
0x1766…1792               Head {h00=0x0028, h01=0x0050, text=»DWTOCH EQU /06 LAST OUTPUT CHARACTER«, t00=0x000e, t01=0x018c}
0x1792…17be               Head {h00=0x0028, h01=0x0050, text=»DWTADR EQU /08 DRIVER ADDRESS BLOCK «, t00=0x000f, t01=0x0028}
0x17be…17e2               Head {h00=0x0020, h01=0x0050, text=»DWTTAB EQU /0A TTAB ADDRESS «, t00=0x000f, t01=0x0054}
0x17e2…1810               Head {h00=0x002a, h01=0x0050, text=»DWTWAT EQU /0C WAIT/ACTIVATE INDICATOR«, t00=0x000f, t01=0x0078}
0x1810…1834               Head {h00=0x0020, h01=0x0050, text=»DWTTQ EQU /0E TERMINAL QUEUE«, t00=0x000f, t01=0x00a6}
0x1834…185c               Head {h00=0x0024, h01=0x0050, text=»DWTUEC EQU /10 USER ECB ADDRESS «, t00=0x000f, t01=0x00ca}
0x185c…1882               Head {h00=0x0022, h01=0x0050, text=»DWTMEC EQU /12 MMU ECB ADDRESS«, t00=0x000f, t01=0x00f2}
0x1882…188c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0118}
0x188c…18a2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000f, t01=0x0122}
0x18a2…18da               Head {h00=0x0034, h01=0x0050, text=»DWTDRD EQU DWTTQ+2 START OF DRIVER DEFINED PART «, t00=0x000f, t01=0x0138}
0x18da…18e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0170}
0x18e6…18f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x017c}
0x18f0…1906               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000f, t01=0x0186}
0x1906…193e               Head {h00=0x0034, h01=0x0050, text=»DWTDRD EQU DWTMEC+2 START OF DRIVER DEFINED PART«, t00=0x0010, t01=0x000c}
0x193e…194a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0044}
0x194a…1954               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0050}
0x1954…196c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0010, t01=0x005a}
0x196c…1976               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0072}
0x1976…19a6               Head {h00=0x002c, h01=0x0050, text=»* DWT DISPLACEMENTS: DRIVER DEFINED PART«, t00=0x0010, t01=0x007c}
0x19a6…19b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ac}
0x19b0…19e0               Head {h00=0x002c, h01=0x0050, text=»DWTOTQ EQU DWTDRD+/00 OUTPUT QUEUE LINK «, t00=0x0010, t01=0x00b6}
0x19e0…1a0a               Head {h00=0x0026, h01=0x0050, text=»DWTA2 EQU DWTDRD+/02 SAVE AREA A2 «, t00=0x0010, t01=0x00e6}
0x1a0a…1a34               Head {h00=0x0026, h01=0x0050, text=»DWTA3 EQU DWTDRD+/02 SAVE AREA A3 «, t00=0x0010, t01=0x0110}
0x1a34…1a5e               Head {h00=0x0026, h01=0x0050, text=»DWTA4 EQU DWTDRD+/04 SAVE AREA A4 «, t00=0x0010, t01=0x013a}
0x1a5e…1a88               Head {h00=0x0026, h01=0x0050, text=»DWTA5 EQU DWTDRD+/06 SAVE AREA A5 «, t00=0x0010, t01=0x0164}
0x1a88…1aba               Head {h00=0x002e, h01=0x0050, text=»DWTSB1 EQU DWTDRD+/0A STACK BASE 1 IN DWT «, t00=0x0010, t01=0x018e}
0x1aba…1aec               Head {h00=0x002e, h01=0x0050, text=»DWTSB2 EQU DWTDRD+/0E STACK BASE 2 IN DWT «, t00=0x0011, t01=0x0030}
0x1aec…1b16               Head {h00=0x0026, h01=0x0050, text=»DWTTP EQU DWTDRD+/10 TIMER POINTER«, t00=0x0011, t01=0x0062}
0x1b16…1b4e               Head {h00=0x0034, h01=0x0050, text=»DWTORD EQU DWTDRD+/10 SAVE AREA INDEX AND ORDER «, t00=0x0011, t01=0x008c}
0x1b4e…1b84               Head {h00=0x0032, h01=0x0050, text=»DWTNVL EQU DWTDRD+/12 NEW VOLUME LOADED FLAGS «, t00=0x0011, t01=0x00c4}
0x1b84…1bb2               Head {h00=0x002a, h01=0x0050, text=»DWTECH EQU DWTDRD+/12 ECHO DEVICE DWT «, t00=0x0011, t01=0x00fa}
0x1bb2…1be0               Head {h00=0x002a, h01=0x0050, text=»DWTVOL EQU DWTDRD+/1A DISC VOLUME NAME«, t00=0x0011, t01=0x0128}
0x1be0…1c0c               Head {h00=0x0028, h01=0x0050, text=»DWTSQ EQU DWTDRD+/1C START OF QUEUE «, t00=0x0011, t01=0x0156}
0x1c0c…1c16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0182}
0x1c16…1c2e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0011, t01=0x018c}
0x1c2e…1c38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0014}
0x1c38…1c42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x001e}
0x1c42…1c60               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0012, t01=0x0028}
0x1c60…1c7e               Head {h00=0x001a, h01=0x0050, text=»* DAB DISPLACEMENTS * «, t00=0x0012, t01=0x0046}
0x1c7e…1c9c               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0012, t01=0x0064}
0x1c9c…1ca6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0082}
0x1ca6…1cd2               Head {h00=0x0028, h01=0x0050, text=»* DRIVER ADDRESS BLOCK DISPLACEMENTS«, t00=0x0012, t01=0x008c}
0x1cd2…1cdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b8}
0x1cdc…1d06               Head {h00=0x0026, h01=0x0050, text=»KEYLEN EQU -6 DWT KEYTABLE LENGTH «, t00=0x0012, t01=0x00c2}
0x1d06…1d2e               Head {h00=0x0024, h01=0x0050, text=»BUFLEN EQU -4 DWT BUFFER LENGTH «, t00=0x0012, t01=0x00ec}
0x1d2e…1d50               Head {h00=0x001e, h01=0x0050, text=»DEVIND EQU -2 DEVICE INDEX«, t00=0x0012, t01=0x0114}
0x1d50…1d78               Head {h00=0x0024, h01=0x0050, text=»ACTADR EQU 0 ACTIVATION ADDRESS «, t00=0x0012, t01=0x0136}
0x1d78…1d9a               Head {h00=0x001e, h01=0x0050, text=»ABTADR EQU 2 ABORT ADDRESS«, t00=0x0012, t01=0x015e}
0x1d9a…1dc0               Head {h00=0x0022, h01=0x0050, text=»INTADR EQU 4 INTERRUPT ADDRESS«, t00=0x0012, t01=0x0180}
0x1dc0…1df6               Head {h00=0x0032, h01=0x0050, text=»POLADR EQU 4 BUFFER POOL ADDRESS (DC DRIVERS) «, t00=0x0013, t01=0x0016}
0x1df6…1e2c               Head {h00=0x0032, h01=0x0050, text=»HDRLEN EQU 6 BUFFER HEADER LENGTH (DC DRIVERS)«, t00=0x0013, t01=0x004c}
0x1e2c…1e52               Head {h00=0x0022, h01=0x0050, text=»RECADR EQU 6 RECOVERY ADDRESS «, t00=0x0013, t01=0x0082}
0x1e52…1e74               Head {h00=0x001e, h01=0x0050, text=»ECHADR EQU 8 ECHO ADDRESS «, t00=0x0013, t01=0x00a8}
0x1e74…1e7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ca}
0x1e7e…1e88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d4}
0x1e88…1ea8               Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0013, t01=0x00de}
0x1ea8…1ec8               Head {h00=0x001c, h01=0x0050, text=»* DEVICE INDEX VALUES * «, t00=0x0013, t01=0x00fe}
0x1ec8…1ee8               Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0013, t01=0x011e}
0x1ee8…1ef2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x013e}
0x1ef2…1efc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0148}
0x1efc…1f4a               Head {h00=0x004a, h01=0x0050, text=»*   THE VALUES ARE USED IN MMU SYSTEMS FOR SELECTING A SPECIAL ROUTINE«, t00=0x0013, t01=0x0152}
0x1f4a…1f94               Head {h00=0x0046, h01=0x0050, text=»*   FROM ADDRESS TABLES TIOTAB AND TENTAB AT READ/WRITE REQUESTS. «, t00=0x0014, t01=0x0010}
0x1f94…1f9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x005a}
0x1f9e…1fc6               Head {h00=0x0024, h01=0x0050, text=»DC:DIX EQU -2 DATA COMMUNICATION«, t00=0x0014, t01=0x0064}
0x1fc6…1fea               Head {h00=0x0020, h01=0x0050, text=»DM:DIX EQU 0 DATA MANAGEMENT«, t00=0x0014, t01=0x008c}
0x1fea…2012               Head {h00=0x0024, h01=0x0050, text=»PC:DIX EQU 2 PROGRAMMED CHANNEL «, t00=0x0014, t01=0x00b0}
0x2012…2038               Head {h00=0x0022, h01=0x0050, text=»MX:DIX EQU 4 MULTIPLEX CHANNEL«, t00=0x0014, t01=0x00d8}
0x2038…205a               Head {h00=0x001e, h01=0x0050, text=»KB:DIX EQU 6 KEYBOARD/CTW «, t00=0x0014, t01=0x00fe}
0x205a…2086               Head {h00=0x0028, h01=0x0050, text=»IT:DIX EQU 8 INTERTASK COMMUNICATION«, t00=0x0014, t01=0x0120}
0x2086…20a0               Head {h00=0x0016, h01=0x0050, text=»DK:DIX EQU 10 DISC«, t00=0x0014, t01=0x014c}
0x20a0…20aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0166}
0x20aa…20c2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0014, t01=0x0170}
0x20c2…20cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0188}
0x20cc…20d6 (21, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0004}
0x20d6…20f4               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0015, t01=0x000e}
0x20f4…2112               Head {h00=0x001a, h01=0x0050, text=»* ECB DISPLACEMENTS * «, t00=0x0015, t01=0x002c}
0x2112…2130               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0015, t01=0x004a}
0x2130…213a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0068}
0x213a…2166               Head {h00=0x0028, h01=0x0050, text=»* EVENT CONTROL BLOCK DISPLACEMENTS «, t00=0x0015, t01=0x0072}
0x2166…2170               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x009e}
0x2170…2190               Head {h00=0x001c, h01=0x0050, text=»ECBFC EQU /01 FILE CODE «, t00=0x0015, t01=0x00a8}
0x2190…21b4               Head {h00=0x0020, h01=0x0050, text=»ECBBA EQU /02 BUFFER ADDRESS«, t00=0x0015, t01=0x00c8}
0x21b4…21da               Head {h00=0x0022, h01=0x0050, text=»ECBRL EQU /04 REQUESTED LENGTH«, t00=0x0015, t01=0x00ec}
0x21da…2200               Head {h00=0x0022, h01=0x0050, text=»ECBEL EQU /06 EFFECTIVE LENGTH«, t00=0x0015, t01=0x0112}
0x2200…2222               Head {h00=0x001e, h01=0x0050, text=»ECBRC EQU /08 RETURN CODE «, t00=0x0015, t01=0x0138}
0x2222…2244               Head {h00=0x001e, h01=0x0050, text=»ECBCW EQU /0A CONTROL WORD«, t00=0x0015, t01=0x015a}
0x2244…226a               Head {h00=0x0022, h01=0x0050, text=»ECBCW1 EQU /0A CONTROL WORD 1 «, t00=0x0015, t01=0x017c}
0x226a…2290               Head {h00=0x0022, h01=0x0050, text=»ECBCW2 EQU /0C CONTROL WORD 2 «, t00=0x0016, t01=0x0012}
0x2290…229a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0038}
0x229a…22b2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0016, t01=0x0042}
0x22b2…22bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x005a}
0x22bc…22c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0064}
0x22c6…22dc               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0016, t01=0x006e}
0x22dc…22e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0084}
0x22e6…22f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x008e}
0x22f0…2302               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0016, t01=0x0098}
0x2302…2314               Head {h00=0x000e, h01=0x0050, text=»* TIOTAB *«, t00=0x0016, t01=0x00aa}
0x2314…2326               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0016, t01=0x00bc}
0x2326…2330               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ce}
0x2330…2370               Head {h00=0x003c, h01=0x0050, text=»* TIOTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TIO«, t00=0x0016, t01=0x00d8}
0x2370…237a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0118}
0x237a…23b0               Head {h00=0x0032, h01=0x0050, text=»TIOTAB EQU * DEVICE TYPE/ROUTINE ADDRESS TABLE«, t00=0x0016, t01=0x0122}
0x23b0…23e2               Head {h00=0x002e, h01=0x0050, text=» DATA TIO:DM DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x0016, t01=0x0158}
0x23e2…2410               Head {h00=0x002a, h01=0x0050, text=» DATA TIOPCI PROGRAMMED CHANNEL, INPUT«, t00=0x0016, t01=0x018a}
0x2410…2430               Head {h00=0x001c, h01=0x0050, text=» DATA TIOMXI MUX, INPUT «, t00=0x0017, t01=0x0028}
0x2430…2458               Head {h00=0x0024, h01=0x0050, text=» DATA TIOKBI KEYBOARD/CTW, INPUT«, t00=0x0017, t01=0x0048}
0x2458…248c               Head {h00=0x0030, h01=0x0050, text=» DATA TIOITI INTERTASK COMMUNICATION, INPUT «, t00=0x0017, t01=0x0070}
0x248c…2496               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00a4}
0x2496…24b2               Head {h00=0x0018, h01=0x0050, text=»TINDEX EQU *-TIOTAB «, t00=0x0017, t01=0x00ae}
0x24b2…24d2               Head {h00=0x001c, h01=0x0050, text=» DATA TIODKI DISC, INPUT«, t00=0x0017, t01=0x00ca}
0x24d2…2502               Head {h00=0x002c, h01=0x0050, text=» DATA TIOPCO PROGRAMMED CHANNEL, OUTPUT «, t00=0x0017, t01=0x00ea}
0x2502…2522               Head {h00=0x001c, h01=0x0050, text=» DATA TIOMXO MUX, OUTPUT«, t00=0x0017, t01=0x011a}
0x2522…254c               Head {h00=0x0026, h01=0x0050, text=» DATA TIOKBO KEYBOARD/CTW, OUTPUT «, t00=0x0017, t01=0x013a}
0x254c…2580               Head {h00=0x0030, h01=0x0050, text=» DATA TIOITO INTERTASK COMMUNICATION, OUTPUT«, t00=0x0017, t01=0x0164}
0x2580…25a2               Head {h00=0x001e, h01=0x0050, text=» DATA TIODKO DISC, OUTPUT «, t00=0x0018, t01=0x0008}
0x25a2…25ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x002a}
0x25ac…25c4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0018, t01=0x0034}
0x25c4…25ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x004c}
0x25ce…25d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0056}
0x25d8…25ea               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0018, t01=0x0060}
0x25ea…25fc               Head {h00=0x000e, h01=0x0050, text=»* TENTAB *«, t00=0x0018, t01=0x0072}
0x25fc…260e               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0018, t01=0x0084}
0x260e…2618               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0096}
0x2618…265c               Head {h00=0x0040, h01=0x0050, text=»* TENTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TENDIO «, t00=0x0018, t01=0x00a0}
0x265c…2666               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00e4}
0x2666…269c               Head {h00=0x0032, h01=0x0050, text=»TENTAB EQU * DEVICE TYPE/ROUTINE ADDRESS TABLE«, t00=0x0018, t01=0x00ee}
0x269c…26ce               Head {h00=0x002e, h01=0x0050, text=» DATA TEN:DM DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x0018, t01=0x0124}
0x26ce…26fc               Head {h00=0x002a, h01=0x0050, text=» DATA TENPCI PROGRAMMED CHANNEL, INPUT«, t00=0x0018, t01=0x0156}
0x26fc…271c               Head {h00=0x001c, h01=0x0050, text=» DATA TENMXI MUX, INPUT «, t00=0x0018, t01=0x0184}
0x271c…2744               Head {h00=0x0024, h01=0x0050, text=» DATA TENKBI KEYBOARD/CTW, INPUT«, t00=0x0019, t01=0x0014}
0x2744…2778               Head {h00=0x0030, h01=0x0050, text=» DATA TENITI INTERTASK COMMUNICATION, INPUT «, t00=0x0019, t01=0x003c}
0x2778…2798               Head {h00=0x001c, h01=0x0050, text=» DATA TENDKI DISC, INPUT«, t00=0x0019, t01=0x0070}
0x2798…27c8               Head {h00=0x002c, h01=0x0050, text=» DATA TENPCO PROGRAMMED CHANNEL, OUTPUT «, t00=0x0019, t01=0x0090}
0x27c8…27e8               Head {h00=0x001c, h01=0x0050, text=» DATA TENMXO MUX, OUTPUT«, t00=0x0019, t01=0x00c0}
0x27e8…2812               Head {h00=0x0026, h01=0x0050, text=» DATA TENKBO KEYBOARD/CTW, OUTPUT «, t00=0x0019, t01=0x00e0}
0x2812…2846               Head {h00=0x0030, h01=0x0050, text=» DATA TENITO INTERTASK COMMUNICATION, OUTPUT«, t00=0x0019, t01=0x010a}
0x2846…2868               Head {h00=0x001e, h01=0x0050, text=» DATA TENDKO DISC, OUTPUT «, t00=0x0019, t01=0x013e}
0x2868…2874               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0160}
0x2874…287e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x016c}
0x287e…2896               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0019, t01=0x0176}
0x2896…28a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x018e}
0x28a0…28aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0008}
0x28aa…28bc               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001a, t01=0x0012}
0x28bc…28ce               Head {h00=0x000e, h01=0x0050, text=»* MONMMU *«, t00=0x001a, t01=0x0024}
0x28ce…28e0               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001a, t01=0x0036}
0x28e0…28ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0048}
0x28ea…290e               Head {h00=0x0020, h01=0x0050, text=»* MONITOR (SYSTEM) MMU TABLE«, t00=0x001a, t01=0x0052}
0x290e…2918               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0076}
0x2918…292c               Head {h00=0x0010, h01=0x0050, text=»MONMMU EQU *«, t00=0x001a, t01=0x0080}
0x292c…2942               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001a, t01=0x0094}
0x2942…2968               Head {h00=0x0022, h01=0x0050, text=» DATA /0000,/0400,/0800,/0C00 «, t00=0x001a, t01=0x00aa}
0x2968…298e               Head {h00=0x0022, h01=0x0050, text=» DATA /1000,/1400,/1800,/1C00 «, t00=0x001a, t01=0x00d0}
0x298e…29b4               Head {h00=0x0022, h01=0x0050, text=» DATA /2000,/2400,/2800,/2C00 «, t00=0x001a, t01=0x00f6}
0x29b4…29da               Head {h00=0x0022, h01=0x0050, text=» DATA /3000,/3400,/3800,/3C00 «, t00=0x001a, t01=0x011c}
0x29da…29e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0142}
0x29e6…29f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x014e}
0x29f0…2a08               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001a, t01=0x0158}
0x2a08…2a12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0170}
0x2a12…2a1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x017a}
0x2a1c…2a32               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x001a, t01=0x0184}
0x2a32…2a3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x000a}
0x2a3c…2a72               Head {h00=0x0032, h01=0x0050, text=»* SUBROUTINES BELOW ARE USED BY ATTACH/DETACH «, t00=0x001b, t01=0x0014}
0x2a72…2a7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x004a}
0x2a7c…2a92               Head {h00=0x0012, h01=0x0050, text=»* T I M O U T «, t00=0x001b, t01=0x0054}
0x2a92…2a9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x006a}
0x2a9c…2abe               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A1 = DWT ADDRESS«, t00=0x001b, t01=0x0074}
0x2abe…2af0               Head {h00=0x002e, h01=0x0050, text=»*         A2 = ADDRESS TO 2ND TIMER BLOCK «, t00=0x001b, t01=0x0096}
0x2af0…2afa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00c8}
0x2afa…2b1e               Head {h00=0x0020, h01=0x0050, text=»* OUTPUT: A4 = BLOCK ADDRESS«, t00=0x001b, t01=0x00d2}
0x2b1e…2b42               Head {h00=0x0020, h01=0x0050, text=»*         A5 = TTAB ADDRESS «, t00=0x001b, t01=0x00f6}
0x2b42…2b64               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x001b, t01=0x011a}
0x2b64…2b8a               Head {h00=0x0022, h01=0x0050, text=»*         A1-A3 ARE DESTROYED «, t00=0x001b, t01=0x013c}
0x2b8a…2b94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0162}
0x2b94…2bac               Head {h00=0x0014, h01=0x0050, text=»TIMOUT LDR A6,A1«, t00=0x001b, t01=0x016c}
0x2bac…2bd6               Head {h00=0x0026, h01=0x0050, text=» LDR* A2,A2 TIMER POINTER ADDRESS «, t00=0x001b, t01=0x0184}
0x2bd6…2bf6               Head {h00=0x001c, h01=0x0050, text=» LD A5,2,A2 TTAB ADDRESS«, t00=0x001c, t01=0x001e}
0x2bf6…2c0c               Head {h00=0x0012, h01=0x0050, text=» CF A15,FNDBLK«, t00=0x001c, t01=0x003e}
0x2c0c…2c20               Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A4 «, t00=0x001c, t01=0x0054}
0x2c20…2c46               Head {h00=0x0022, h01=0x0050, text=» STR A1,A2 REMOVE FROM ATT:CH «, t00=0x001c, t01=0x0068}
0x2c46…2c5c               Head {h00=0x0012, h01=0x0050, text=» CF A15,FREBLK«, t00=0x001c, t01=0x008e}
0x2c5c…2c66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00a4}
0x2c66…2c7e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001c, t01=0x00ae}
0x2c7e…2c88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00c6}
0x2c88…2cb2               Head {h00=0x0026, h01=0x0050, text=»*    REMOVE TTAB FROM DEVICE QUEUE«, t00=0x001c, t01=0x00d0}
0x2cb2…2cbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00fa}
0x2cbc…2cce               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x001c, t01=0x0104}
0x2cce…2cf8               Head {h00=0x0026, h01=0x0050, text=» ADK A1,DWTTQ QUEUE ANCHOR ADDRESS«, t00=0x001c, t01=0x0116}
0x2cf8…2d02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0140}
0x2d02…2d20               Head {h00=0x001a, h01=0x0050, text=»TIM:10 LDR A2,A1 SAVE «, t00=0x001c, t01=0x014a}
0x2d20…2d42               Head {h00=0x001e, h01=0x0050, text=» LDR* A1,A1 NEXT IN QUEUE «, t00=0x001c, t01=0x0168}
0x2d42…2d64               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TIM:20 END OF QUEUE«, t00=0x001c, t01=0x018a}
0x2d64…2d78               Head {h00=0x0010, h01=0x0050, text=»  CWR A1,A5 «, t00=0x001d, t01=0x001c}
0x2d78…2d98               Head {h00=0x001c, h01=0x0050, text=» RB(NE) TIM:10 NOT FOUND«, t00=0x001d, t01=0x0030}
0x2d98…2da2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0050}
0x2da2…2dba               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001d, t01=0x005a}
0x2dba…2dc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0072}
0x2dc4…2dee               Head {h00=0x0026, h01=0x0050, text=»*   TTAB FOUND - REMOVE FROM QUEUE«, t00=0x001d, t01=0x007c}
0x2dee…2df8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00a6}
0x2df8…2e0c               Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A1 «, t00=0x001d, t01=0x00b0}
0x2e0c…2e1e               Head {h00=0x000e, h01=0x0050, text=» STR A1,A2«, t00=0x001d, t01=0x00c4}
0x2e1e…2e28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00d6}
0x2e28…2e3c               Head {h00=0x0010, h01=0x0050, text=»TIM:20 EQU *«, t00=0x001d, t01=0x00e0}
0x2e3c…2e4e               Head {h00=0x000e, h01=0x0050, text=» LDK A3,4 «, t00=0x001d, t01=0x00f4}
0x2e4e…2e80               Head {h00=0x002e, h01=0x0050, text=» ADS A3,TTB:SA,A5 UPDATE DISPATCH ADDRESS «, t00=0x001d, t01=0x0106}
0x2e80…2eba               Head {h00=0x0036, h01=0x0050, text=» LD A8,TTB:SA+16,A5 ECB ADDRESS FROM A8 SAVE AREA «, t00=0x001d, t01=0x0138}
0x2eba…2ede               Head {h00=0x0020, h01=0x0050, text=» LDK A3,/40 SET TIMEOUT BIT «, t00=0x001d, t01=0x0172}
0x2ede…2ee8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0008}
0x2ee8…2efe               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001e, t01=0x0012}
0x2efe…2f2c               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBRC,A8 INDICATE ERROR IN ECB «, t00=0x001e, t01=0x0028}
0x2f2c…2f38               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0056}
0x2f38…2f42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0062}
0x2f42…2f58               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x001e, t01=0x006c}
0x2f58…2f6e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001e, t01=0x0082}
0x2f6e…2fa0               Head {h00=0x002e, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS FROM TTAB«, t00=0x001e, t01=0x0098}
0x2fa0…2fce               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBRC,A8 INDICATE ERROR IN ECB «, t00=0x001e, t01=0x00ca}
0x2fce…3000               Head {h00=0x002e, h01=0x0050, text=» TL MONMMU LOAD MONITOR (SYSTEM) MMU TABLE«, t00=0x001e, t01=0x00f8}
0x3000…300c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x012a}
0x300c…3016               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0136}
0x3016…302c               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x001e, t01=0x0140}
0x302c…3056               Head {h00=0x0026, h01=0x0050, text=» RF TIORTN QUEUE TASK AND DISPATCH«, t00=0x001e, t01=0x0156}
0x3056…3060               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0180}
0x3060…3078               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x001e, t01=0x018a}
0x3078…3082               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0012}
0x3082…3098               Head {h00=0x0012, h01=0x0050, text=»* F N D B L K «, t00=0x001f, t01=0x001c}
0x3098…30a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0032}
0x30a2…30ce               Head {h00=0x0028, h01=0x0050, text=»* SUBROUTINE TO FIND BLOCK IN ATT:CH«, t00=0x001f, t01=0x003c}
0x30ce…30d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0068}
0x30d8…30fc               Head {h00=0x0020, h01=0x0050, text=»* INPUT:  A5 = TTAB ADDRESS «, t00=0x001f, t01=0x0072}
0x30fc…3106               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0096}
0x3106…3140               Head {h00=0x0036, h01=0x0050, text=»* OUTPUT: A2 = ADDRESS TO PRECEDING BLOCK IN CHAIN«, t00=0x001f, t01=0x00a0}
0x3140…3176               Head {h00=0x0032, h01=0x0050, text=»*         A4 = BLOCK ADDRESS IF FOUND, ELSE 0 «, t00=0x001f, t01=0x00da}
0x3176…3180               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0110}
0x3180…31ac               Head {h00=0x0028, h01=0x0050, text=»FNDBLK LDKL A4,ATT:CH ANCHOR ADDRESS«, t00=0x001f, t01=0x011a}
0x31ac…31b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0146}
0x31b6…31d6               Head {h00=0x001c, h01=0x0050, text=»FND:10 LDR A2,A4 SAVE A4«, t00=0x001f, t01=0x0150}
0x31d6…31ea               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A4 «, t00=0x001f, t01=0x0170}
0x31ea…320e               Head {h00=0x0020, h01=0x0050, text=» RF(Z) FND:20 END OF ATT:CH «, t00=0x001f, t01=0x0184}
0x320e…3222               Head {h00=0x0010, h01=0x0050, text=» CW A5,4,A4 «, t00=0x0020, t01=0x0018}
0x3222…3242               Head {h00=0x001c, h01=0x0050, text=» RB(NE) FND:10 NOT FOUND«, t00=0x0020, t01=0x002c}
0x3242…324c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x004c}
0x324c…3260               Head {h00=0x0010, h01=0x0050, text=»FND:20 EQU *«, t00=0x0020, t01=0x0056}
0x3260…3276               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0020, t01=0x006a}
0x3276…3290               Head {h00=0x0016, h01=0x0050, text=» ABL IHRTN RETURN «, t00=0x0020, t01=0x0080}
0x3290…329c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x009a}
0x329c…32a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00a6}
0x32a6…32bc               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0020, t01=0x00b0}
0x32bc…32d2               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0020, t01=0x00c6}
0x32d2…32ea               Head {h00=0x0014, h01=0x0050, text=» RTN A15 RETURN «, t00=0x0020, t01=0x00dc}
0x32ea…32f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00f4}
0x32f6…3300               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0100}
0x3300…3316               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0020, t01=0x010a}
0x3316…3340               Head {h00=0x0026, h01=0x0050, text=»ATT:CH DATA 0 ATTACH CHAIN ANCHOR «, t00=0x0020, t01=0x0120}
0x3340…334a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x014a}
0x334a…3362               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0020, t01=0x0154}
0x3362…336c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x016c}
0x336c…3376               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0176}
0x3376…3388               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0020, t01=0x0180}
0x3388…339a (33, 0, 400)  Head {h00=0x000e, h01=0x0050, text=»* ATTACH *«, t00=0x0021, t01=0x0004}
0x339a…33ac               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0021, t01=0x0016}
0x33ac…33b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0028}
0x33b6…33c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0032}
0x33c0…33ee               Head {h00=0x002a, h01=0x0050, text=»*  THIS MODULE IS CALLED FROM TIO WITH«, t00=0x0021, t01=0x003c}
0x33ee…3412               Head {h00=0x0020, h01=0x0050, text=»*  THE FOLLOWING PARAMETERS:«, t00=0x0021, t01=0x006a}
0x3412…341c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x008e}
0x341c…3446               Head {h00=0x0026, h01=0x0050, text=»*   A3  /8000 (REQUEST ERROR BIT) «, t00=0x0021, t01=0x0098}
0x3446…3470               Head {h00=0x0026, h01=0x0050, text=»*   A4  I/O AND ACTIVATE INDICATOR«, t00=0x0021, t01=0x00c2}
0x3470…348c               Head {h00=0x0018, h01=0x0050, text=»*   A5  TTAB ADDRESS«, t00=0x0021, t01=0x00ec}
0x348c…34a8               Head {h00=0x0018, h01=0x0050, text=»*   A6  DWT ADDRESS «, t00=0x0021, t01=0x0108}
0x34a8…34c2               Head {h00=0x0016, h01=0x0050, text=»*   A7  ORDER CODE«, t00=0x0021, t01=0x0124}
0x34c2…34de               Head {h00=0x0018, h01=0x0050, text=»*   A8  ECB ADDRESS «, t00=0x0021, t01=0x013e}
0x34de…3500               Head {h00=0x001e, h01=0x0050, text=»*  A10  /0800 (ATTACH BIT)«, t00=0x0021, t01=0x015a}
0x3500…3530               Head {h00=0x002c, h01=0x0050, text=»*  A12  ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0021, t01=0x017c}
0x3530…354a               Head {h00=0x0016, h01=0x0050, text=»*  A13  DWT STATUS«, t00=0x0022, t01=0x001c}
0x354a…3554               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0036}
0x3554…356e               Head {h00=0x0016, h01=0x0050, text=»ATTACH EQU * ENTRY«, t00=0x0022, t01=0x0040}
0x356e…3586               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x0022, t01=0x005a}
0x3586…35b4               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TIOERR I/O AND ACTIVATE ERROR «, t00=0x0022, t01=0x0072}
0x35b4…35be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00a0}
0x35be…35d4               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0022, t01=0x00aa}
0x35d4…35fa               Head {h00=0x0022, h01=0x0050, text=» CM ECBRC,A8 RESET RETURN CODE«, t00=0x0022, t01=0x00c0}
0x35fa…3606               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00e6}
0x3606…3610               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00f2}
0x3610…3626               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0022, t01=0x00fc}
0x3626…363c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0022, t01=0x0112}
0x363c…3666               Head {h00=0x0026, h01=0x0050, text=» ES A4,ECBRC,A8 RESET RETURN CODE «, t00=0x0022, t01=0x0128}
0x3666…3672               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0152}
0x3672…367c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x015e}
0x367c…3694               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0022, t01=0x0168}
0x3694…369e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0180}
0x369e…36a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x018a}
0x36a8…36be (35, 0, 398)  Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0023, t01=0x0004}
0x36be…36d2               Head {h00=0x0010, h01=0x0050, text=» TM A10,A13 «, t00=0x0023, t01=0x001a}
0x36d2…3700               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) ATT:40 DEVICE ALREADY ATTACHED«, t00=0x0023, t01=0x002e}
0x3700…3714               Head {h00=0x0010, h01=0x0050, text=» LDR A13,A13«, t00=0x0023, t01=0x005c}
0x3714…3736               Head {h00=0x001e, h01=0x0050, text=» RF(NN) ATT:50 DEVICE BUSY«, t00=0x0023, t01=0x0070}
0x3736…3740               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0092}
0x3740…3764               Head {h00=0x0020, h01=0x0050, text=»*    ATTACH REQUESTING TASK «, t00=0x0023, t01=0x009c}
0x3764…376e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00c0}
0x376e…378e               Head {h00=0x001c, h01=0x0050, text=» ORS A10,DWTST,A6 ATTACH«, t00=0x0023, t01=0x00ca}
0x378e…37be               Head {h00=0x002c, h01=0x0050, text=» ST A5,DWTTAB,A6 PUT TTAB ADDRESS IN DWT«, t00=0x0023, t01=0x00ea}
0x37be…37e6               Head {h00=0x0024, h01=0x0050, text=» CF A15,FNDBLK ANY TIMERS ACTIVE«, t00=0x0023, t01=0x011a}
0x37e6…37fe               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x0023, t01=0x0142}
0x37fe…3818               Head {h00=0x0016, h01=0x0050, text=» RF(Z) ATTRTN NO! «, t00=0x0023, t01=0x015a}
0x3818…3822               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0174}
0x3822…383a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0023, t01=0x017e}
0x383a…3844               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0008}
0x3844…386e               Head {h00=0x0026, h01=0x0050, text=»*   FREE BLOCK AND TIMER IN ATT:CH«, t00=0x0024, t01=0x0012}
0x386e…3878               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x003c}
0x3878…3894               Head {h00=0x0018, h01=0x0050, text=» CM* 2,A4 FREE TIMER«, t00=0x0024, t01=0x0046}
0x3894…38ba               Head {h00=0x0022, h01=0x0050, text=» LDR* A3,A4 REMOVE FROM ATT:CH«, t00=0x0024, t01=0x0062}
0x38ba…38cc               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0024, t01=0x0088}
0x38cc…38f0               Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RELEASE BLOCK«, t00=0x0024, t01=0x009a}
0x38f0…390e               Head {h00=0x001a, h01=0x0050, text=» RF ATTRTN END REQUEST«, t00=0x0024, t01=0x00be}
0x390e…3918               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00dc}
0x3918…3936               Head {h00=0x001a, h01=0x0050, text=»ATT:40 CW A5,DWTTAB,A6«, t00=0x0024, t01=0x00e6}
0x3936…3968               Head {h00=0x002e, h01=0x0050, text=» RF(E) TIOERR ATTACHED TO REQUESTING TASK «, t00=0x0024, t01=0x0104}
0x3968…3972               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0136}
0x3972…3990               Head {h00=0x001a, h01=0x0050, text=»ATT:50 CF A15,FNDBLK  «, t00=0x0024, t01=0x0140}
0x3990…39a8               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x0024, t01=0x015e}
0x39a8…39ce               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) ATT:70 IS TIMER ACTIVE«, t00=0x0024, t01=0x0176}
0x39ce…39d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x000c}
0x39d8…39f0               Head {h00=0x0014, h01=0x0050, text=»*     SET TIMER «, t00=0x0025, t01=0x0016}
0x39f0…39fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x002e}
0x39fa…3a10               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0025, t01=0x0038}
0x3a10…3a2c               Head {h00=0x0018, h01=0x0050, text=» LD A1,ECBCW,A8 TIME«, t00=0x0025, t01=0x004e}
0x3a2c…3a38               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x006a}
0x3a38…3a42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0076}
0x3a42…3a5a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0025, t01=0x0080}
0x3a5a…3a64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0098}
0x3a64…3a6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00a2}
0x3a6e…3a84               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0025, t01=0x00ac}
0x3a84…3a9a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0025, t01=0x00c2}
0x3a9a…3ab6               Head {h00=0x0018, h01=0x0050, text=» EL A1,ECBCW,A8 TIME«, t00=0x0025, t01=0x00d8}
0x3ab6…3ac2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x00f4}
0x3ac2…3acc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0100}
0x3acc…3ae2               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0025, t01=0x010a}
0x3ae2…3b06               Head {h00=0x0020, h01=0x0050, text=» RF(N) TIOERR NEGATIVE TIME «, t00=0x0025, t01=0x0120}
0x3b06…3b28               Head {h00=0x001e, h01=0x0050, text=» RF(Z) ATT:80 END REQUEST «, t00=0x0025, t01=0x0144}
0x3b28…3b32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0166}
0x3b32…3b4c               Head {h00=0x0016, h01=0x0050, text=»ATT:60 ST A1,ATTIM«, t00=0x0025, t01=0x0170}
0x3b4c…3b6c               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A5 TTAB ADDRESS «, t00=0x0025, t01=0x018a}
0x3b6c…3b88               Head {h00=0x0018, h01=0x0050, text=» LD A3,ATT:CH ANCHOR«, t00=0x0026, t01=0x001a}
0x3b88…3ba4               Head {h00=0x0018, h01=0x0050, text=» CF A15,GETBLK BLOCK«, t00=0x0026, t01=0x0036}
0x3ba4…3bc8               Head {h00=0x0020, h01=0x0050, text=» ST A4,ATT:CH UPDATE ANCHOR «, t00=0x0026, t01=0x0052}
0x3bc8…3bf0               Head {h00=0x0024, h01=0x0050, text=» ADK A4,2 TIMER POINTER ADDRESS «, t00=0x0026, t01=0x0076}
0x3bf0…3c0e               Head {h00=0x001a, h01=0x0050, text=» LDR A1,A6 DWT ADDRESS«, t00=0x0026, t01=0x009e}
0x3c0e…3c2e               Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIMER«, t00=0x0026, t01=0x00bc}
0x3c2e…3c42               Head {h00=0x0010, h01=0x0050, text=» DATA TIMOUT«, t00=0x0026, t01=0x00dc}
0x3c42…3c4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00f0}
0x3c4c…3c60               Head {h00=0x0010, h01=0x0050, text=»ATTIM DATA 0«, t00=0x0026, t01=0x00fa}
0x3c60…3c6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x010e}
0x3c6a…3c9a               Head {h00=0x002c, h01=0x0050, text=»ATT:70 LDK A4,0 NOT ACTIVATION PARAMETER«, t00=0x0026, t01=0x0118}
0x3c9a…3cac               Head {h00=0x000e, h01=0x0050, text=» RF TIOQ20«, t00=0x0026, t01=0x0148}
0x3cac…3cb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x015a}
0x3cb6…3ce0               Head {h00=0x0026, h01=0x0050, text=»ATT:80 LDK A3,/40 SET TIME OUT BIT«, t00=0x0026, t01=0x0164}
0x3ce0…3cfa               Head {h00=0x0016, h01=0x0050, text=» RF TIOERR RETURN «, t00=0x0026, t01=0x018e}
0x3cfa…3d04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0018}
0x3d04…3d1c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0027, t01=0x0022}
0x3d1c…3d26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x003a}
0x3d26…3d30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0044}
0x3d30…3d42               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0027, t01=0x004e}
0x3d42…3d54               Head {h00=0x000e, h01=0x0050, text=»* DETACH *«, t00=0x0027, t01=0x0060}
0x3d54…3d66               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0027, t01=0x0072}
0x3d66…3d70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0084}
0x3d70…3d9e               Head {h00=0x002a, h01=0x0050, text=»* THIS MODULE IS CALLED FROM TIO WITH «, t00=0x0027, t01=0x008e}
0x3d9e…3dc6               Head {h00=0x0024, h01=0x0050, text=»* THE SAME PARAMETERS AS ATTACH.«, t00=0x0027, t01=0x00bc}
0x3dc6…3dd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00e4}
0x3dd0…3de4               Head {h00=0x0010, h01=0x0050, text=»DETACH EQU *«, t00=0x0027, t01=0x00ee}
0x3de4…3dfc               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x0027, t01=0x0102}
0x3dfc…3e2a               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TIOERR I/O AND ACTIVATE ERROR «, t00=0x0027, t01=0x011a}
0x3e2a…3e3e               Head {h00=0x0010, h01=0x0050, text=» TM A10,A13 «, t00=0x0027, t01=0x0148}
0x3e3e…3e60               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TIOERR NOT ATTACHED«, t00=0x0027, t01=0x015c}
0x3e60…3e78               Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A6«, t00=0x0027, t01=0x017e}
0x3e78…3ea6               Head {h00=0x002a, h01=0x0050, text=» RF(NE) TIOERR ATTACHED TO OTHER TASK «, t00=0x0028, t01=0x0008}
0x3ea6…3ec6               Head {h00=0x001c, h01=0x0050, text=» XRS A10,DWTST,A6 DETACH«, t00=0x0028, t01=0x0036}
0x3ec6…3eea               Head {h00=0x0020, h01=0x0050, text=» LDR A3,A5 SAVE TTAB ADDRESS«, t00=0x0028, t01=0x0056}
0x3eea…3f0e               Head {h00=0x0020, h01=0x0050, text=» LD A5,DWTTQ,A6 QUEUE ANCHOR«, t00=0x0028, t01=0x007a}
0x3f0e…3f30               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DET:10 QUEUE EMPTY «, t00=0x0028, t01=0x009e}
0x3f30…3f58               Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A5 UPDATE QUEUE ANCHOR «, t00=0x0028, t01=0x00c0}
0x3f58…3f70               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTTQ,A6 «, t00=0x0028, t01=0x00e8}
0x3f70…3f90               Head {h00=0x001c, h01=0x0050, text=» CF A15,QTJOB QUEUE TASK«, t00=0x0028, t01=0x0100}
0x3f90…3f9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0120}
0x3f9a…3fae               Head {h00=0x0010, h01=0x0050, text=»DET:10 EQU *«, t00=0x0028, t01=0x012a}
0x3fae…3fd6               Head {h00=0x0024, h01=0x0050, text=» LDR A5,A3 RESTORE TTAB ADDRESS «, t00=0x0028, t01=0x013e}
0x3fd6…3fe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0166}
0x3fe0…4016               Head {h00=0x0032, h01=0x0050, text=»ATTRTN EQU * COMMON ATTACH/DETACH NORMAL EXIT «, t00=0x0028, t01=0x0170}
0x4016…403a               Head {h00=0x0020, h01=0x0050, text=»DETRTN LDK A3,0 RETURN CODE «, t00=0x0029, t01=0x0016}
0x403a…4046               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x003a}
0x4046…4050               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0046}
0x4050…4068               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0029, t01=0x0050}
0x4068…4072               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0068}
0x4072…407c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0072}
0x407c…408e               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0029, t01=0x007c}
0x408e…40a0               Head {h00=0x000e, h01=0x0050, text=»* TIOERR *«, t00=0x0029, t01=0x008e}
0x40a0…40b2               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0029, t01=0x00a0}
0x40b2…40bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00b2}
0x40bc…40de               Head {h00=0x001e, h01=0x0050, text=»* ERROR: FILE CODE UNKNOWN«, t00=0x0029, t01=0x00bc}
0x40de…410a               Head {h00=0x0028, h01=0x0050, text=»* TIOERR IS ALSO USED AS COMMON EXIT«, t00=0x0029, t01=0x00de}
0x410a…4136               Head {h00=0x0028, h01=0x0050, text=»* FOR MODULES 'ATTACH' AND 'DETACH'.«, t00=0x0029, t01=0x010a}
0x4136…4140               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0136}
0x4140…4154               Head {h00=0x0010, h01=0x0050, text=»TIOERR EQU *«, t00=0x0029, t01=0x0140}
0x4154…416a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0029, t01=0x0154}
0x416a…4198               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBRC,A8 SET RETURN CODE IN ECB«, t00=0x0029, t01=0x016a}
0x4198…41c4               Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8 RESET EFFECTIVE LENGTH «, t00=0x002a, t01=0x0008}
0x41c4…41d0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0034}
0x41d0…41da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0040}
0x41da…41f0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x002a, t01=0x004a}
0x41f0…421e               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBRC,A8 SET RETURN CODE IN ECB«, t00=0x002a, t01=0x0060}
0x421e…4230               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002a, t01=0x008e}
0x4230…425e               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBEL,A8 RESET EFFECTIVE LENGTH«, t00=0x002a, t01=0x00a0}
0x425e…426a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x00ce}
0x426a…4274               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00da}
0x4274…4288               Head {h00=0x0010, h01=0x0050, text=»TIORTN EQU *«, t00=0x002a, t01=0x00e4}
0x4288…42b4               Head {h00=0x0028, h01=0x0050, text=» ABL LKMQDI QUEUE TASK AND DISPATCH «, t00=0x002a, t01=0x00f8}
0x42b4…42be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0124}
0x42be…42d6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x002a, t01=0x012e}
0x42d6…42e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0146}
0x42e0…42ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0150}
0x42ea…4302               Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x002a, t01=0x015a}
0x4302…431a               Head {h00=0x0014, h01=0x0050, text=»* QUEUE DEVICE *«, t00=0x002a, t01=0x0172}
0x431a…4332               Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x002a, t01=0x018a}
0x4332…433c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0012}
0x433c…4346               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x001c}
0x4346…4382               Head {h00=0x0038, h01=0x0050, text=»* THIS IS THE ROUTINE FOR QUEUEING DEVICE REQUESTS. «, t00=0x002b, t01=0x0026}
0x4382…43c4               Head {h00=0x003e, h01=0x0050, text=»* THE ROUTINE IS ENTERED AT DIFFERENT LABELS DEPENDING ON «, t00=0x002b, t01=0x0062}
0x43c4…4408               Head {h00=0x0040, h01=0x0050, text=»* WHETHER THE DEVICE IS AN ECHO DEVICE OR NOT, AND DEPENDING«, t00=0x002b, t01=0x00a4}
0x4408…4444               Head {h00=0x0038, h01=0x0050, text=»* ON WHETHER THE DEVICE IS ATTACHED OR NOT, AND WHEN«, t00=0x002b, t01=0x00e8}
0x4444…448a               Head {h00=0x0042, h01=0x0050, text=»* ATTACHED, WHETHER THE DEVICE IS ATTACHED TO THE TASK OR NOT.«, t00=0x002b, t01=0x0124}
0x448a…4494               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x016a}
0x4494…44b6               Head {h00=0x001e, h01=0x0050, text=»* QUEUE ECHO DEVICE FIRST «, t00=0x002b, t01=0x0174}
0x44b6…44c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0008}
0x44c0…44d8               Head {h00=0x0014, h01=0x0050, text=»TIOQ00 LDR A6,A2«, t00=0x002c, t01=0x0012}
0x44d8…44e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x002a}
0x44e2…44fe               Head {h00=0x0018, h01=0x0050, text=»* QUEUE DEVICE FIRST«, t00=0x002c, t01=0x0034}
0x44fe…4508               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0050}
0x4508…4530               Head {h00=0x0024, h01=0x0050, text=»TIOQ05 ADK A6,DWTTQ QUEUE ANCHOR«, t00=0x002c, t01=0x005a}
0x4530…4542               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x002c, t01=0x0082}
0x4542…4556               Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A6 «, t00=0x002c, t01=0x0094}
0x4556…457e               Head {h00=0x0024, h01=0x0050, text=» RF TIOQ40 INSERT FIRST IN QUEUE«, t00=0x002c, t01=0x00a8}
0x457e…4588               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00d0}
0x4588…45b2               Head {h00=0x0026, h01=0x0050, text=»TIOQ10 LDR A6,A2 QUEUE ECHO DEVICE«, t00=0x002c, t01=0x00da}
0x45b2…45bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0104}
0x45bc…45ee               Head {h00=0x002e, h01=0x0050, text=»QUEDEV EQU * ENTRY USED BY FILE MANAGEMENT«, t00=0x002c, t01=0x010e}
0x45ee…4616               Head {h00=0x0024, h01=0x0050, text=»TIOQ20 ADK A6,DWTTQ QUEUE ANCHOR«, t00=0x002c, t01=0x0140}
0x4616…4620               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0168}
0x4620…4652               Head {h00=0x002e, h01=0x0050, text=»QUEFIL EQU * ENTRY USED BY FILE MANAGEMENT«, t00=0x002c, t01=0x0172}
0x4652…4672               Head {h00=0x001c, h01=0x0050, text=» LD A1,TTB:ST+1,A5 LEVEL«, t00=0x002d, t01=0x0014}
0x4672…467c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0034}
0x467c…4694               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x002d, t01=0x003e}
0x4694…469e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0056}
0x469e…46cc               Head {h00=0x002a, h01=0x0050, text=»* SEARCH QUEUE FOR PLACE OF INSERTION «, t00=0x002d, t01=0x0060}
0x46cc…46d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x008e}
0x46d6…46ee               Head {h00=0x0014, h01=0x0050, text=»TIOQ30 LDR A2,A6«, t00=0x002d, t01=0x0098}
0x46ee…4716               Head {h00=0x0024, h01=0x0050, text=» LDR* A6,A6 FOLLOW QUEUE TO END «, t00=0x002d, t01=0x00b0}
0x4716…4736               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIOQ40 END FOUND «, t00=0x002d, t01=0x00d8}
0x4736…4760               Head {h00=0x0026, h01=0x0050, text=» CC A1,TTB:ST+1,A6 COMPARE LEVELS «, t00=0x002d, t01=0x00f8}
0x4760…4780               Head {h00=0x001c, h01=0x0050, text=» RB(NL) TIOQ30 TRY NEXT «, t00=0x002d, t01=0x0122}
0x4780…478a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0142}
0x478a…47be               Head {h00=0x0030, h01=0x0050, text=»* INSERT IN QUEUE AND UPDATE PROGRAM COUNTER«, t00=0x002d, t01=0x014c}
0x47be…47c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0180}
0x47c8…47e2               Head {h00=0x0016, h01=0x0050, text=»TIOQ40 LDKL A3,-4 «, t00=0x002d, t01=0x018a}
0x47e2…4804               Head {h00=0x001e, h01=0x0050, text=» STR A6,A5 INSERT IN QUEUE«, t00=0x002e, t01=0x0014}
0x4804…4816               Head {h00=0x000e, h01=0x0050, text=» STR A5,A2«, t00=0x002e, t01=0x0036}
0x4816…482e               Head {h00=0x0014, h01=0x0050, text=» ADK A4,0 SET CR«, t00=0x002e, t01=0x0048}
0x482e…4852               Head {h00=0x0020, h01=0x0050, text=» RF(Z) TIOQ50 NO ACTIVATION «, t00=0x002e, t01=0x0060}
0x4852…486e               Head {h00=0x0018, h01=0x0050, text=» SUK A3,2 ACTIVATION«, t00=0x002e, t01=0x0084}
0x486e…4878               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00a0}
0x4878…48b0               Head {h00=0x0034, h01=0x0050, text=»TIOQ50 ADS A3,TTB:SA,A5 UPDATE PC TO REPEAT LKM «, t00=0x002e, t01=0x00aa}
0x48b0…48ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00e2}
0x48ba…48ce               Head {h00=0x0010, h01=0x0050, text=»TIOQ60 EQU *«, t00=0x002e, t01=0x00ec}
0x48ce…48f2               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x002e, t01=0x0100}
0x48f2…48fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0124}
0x48fc…4914               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x002e, t01=0x012e}
0x4914…491e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0146}
0x491e…4928               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0150}
0x4928…4938               Head {h00=0x000c, h01=0x0050, text=»******* «, t00=0x002e, t01=0x015a}
0x4938…4948               Head {h00=0x000c, h01=0x0050, text=»* TIO * «, t00=0x002e, t01=0x016a}
0x4948…4958               Head {h00=0x000c, h01=0x0050, text=»******* «, t00=0x002e, t01=0x017a}
0x4958…4962               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x018a}
0x4962…496c (47, 0, 398)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0004}
0x496c…499e               Head {h00=0x002e, h01=0x0050, text=»* THIS MODULE IS ENTERED WHEN TERMINAL I/O«, t00=0x002f, t01=0x000e}
0x499e…49d4               Head {h00=0x0032, h01=0x0050, text=»* IS REQUIRED. IF A REQUEST CANNOT BE SERVICED«, t00=0x002f, t01=0x0040}
0x49d4…4a0c               Head {h00=0x0034, h01=0x0050, text=»* DUE TO E.G. BUSY DEVICE, THE REQUEST IS QUEUED«, t00=0x002f, t01=0x0076}
0x4a0c…4a42               Head {h00=0x0032, h01=0x0050, text=»* AND THE TERMINAL PROGRAM SET IN WAIT STATE. «, t00=0x002f, t01=0x00ae}
0x4a42…4a4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00e4}
0x4a4c…4a82               Head {h00=0x0032, h01=0x0050, text=»* WHEN RUNNING WITH MMU OPTION SPECIAL DEVICE «, t00=0x002f, t01=0x00ee}
0x4a82…4ab0               Head {h00=0x002a, h01=0x0050, text=»* DEPENDENT SUBROUTINES ARE PERFORMED.«, t00=0x002f, t01=0x0124}
0x4ab0…4aba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0152}
0x4aba…4af4               Head {h00=0x0036, h01=0x0050, text=»* THIS MODULE IS CALLED BY THE LKM HANDLING MODULE«, t00=0x002f, t01=0x015c}
0x4af4…4b1e               Head {h00=0x0026, h01=0x0050, text=»* WITH THE FOLLOWING PARAMETERS:- «, t00=0x0030, t01=0x0008}
0x4b1e…4b28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0032}
0x4b28…4b5a               Head {h00=0x002e, h01=0x0050, text=»*  A1 = PARAMETER WHEN I/O AND ACTIVATION «, t00=0x0030, t01=0x003c}
0x4b5a…4b64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x006e}
0x4b64…4b8c               Head {h00=0x0024, h01=0x0050, text=»*  A4 = ZERO, NORMAL I/O REQUEST«, t00=0x0030, t01=0x0078}
0x4b8c…4bb8               Head {h00=0x0028, h01=0x0050, text=»*       NOT ZERO, I/O AND ACTIVATION«, t00=0x0030, t01=0x00a0}
0x4bb8…4bc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00cc}
0x4bc2…4bde               Head {h00=0x0018, h01=0x0050, text=»*  A5 = TTAB ADDRESS«, t00=0x0030, t01=0x00d6}
0x4bde…4be8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00f2}
0x4be8…4c02               Head {h00=0x0016, h01=0x0050, text=»*  A7 = ORDER CODE«, t00=0x0030, t01=0x00fc}
0x4c02…4c0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0116}
0x4c0c…4c28               Head {h00=0x0018, h01=0x0050, text=»*  A8 = ECB ADDRESS «, t00=0x0030, t01=0x0120}
0x4c28…4c32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x013c}
0x4c32…4c4a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0030, t01=0x0146}
0x4c4a…4c54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x015e}
0x4c54…4c5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0168}
0x4c5e…4c9e               Head {h00=0x003c, h01=0x0050, text=»* THE 'TIO'-ROUTINE EXITS TO REQUESTED ACTIVATION DRIVER«, t00=0x0030, t01=0x0172}
0x4c9e…4ccc               Head {h00=0x002a, h01=0x0050, text=»* WITH THE FOLLOWING REGISTER VAULES:-«, t00=0x0031, t01=0x0022}
0x4ccc…4cd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0050}
0x4cd6…4cfa               Head {h00=0x0020, h01=0x0050, text=»*  A5 = STACK BASE 2 IN DWT «, t00=0x0031, t01=0x005a}
0x4cfa…4d04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x007e}
0x4d04…4d20               Head {h00=0x0018, h01=0x0050, text=»*  A6 = DWT ADDRESS «, t00=0x0031, t01=0x0088}
0x4d20…4d2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00a4}
0x4d2a…4d44               Head {h00=0x0016, h01=0x0050, text=»*  A7 = ORDER CODE«, t00=0x0031, t01=0x00ae}
0x4d44…4d4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00c8}
0x4d4e…4d6a               Head {h00=0x0018, h01=0x0050, text=»*  A8 = ECB ADDRESS «, t00=0x0031, t01=0x00d2}
0x4d6a…4d74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00ee}
0x4d74…4da4               Head {h00=0x002c, h01=0x0050, text=»* A12 = ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0031, t01=0x00f8}
0x4da4…4dae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0128}
0x4dae…4de2               Head {h00=0x0030, h01=0x0050, text=»* A13 = 0, IF REQUEST ISSUED IN SYSTEM MODE «, t00=0x0031, t01=0x0132}
0x4de2…4e14               Head {h00=0x002e, h01=0x0050, text=»*     = 1, "     "      "    "  USER MODE «, t00=0x0031, t01=0x0166}
0x4e14…4e1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0008}
0x4e1e…4e28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0012}
0x4e28…4e58               Head {h00=0x002c, h01=0x0050, text=»* THE FOLLOWING DWT FIELDS ARE UPDATED:-«, t00=0x0032, t01=0x001c}
0x4e58…4e62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x004c}
0x4e62…4e88               Head {h00=0x0022, h01=0x0050, text=»*  -DWTOR  DWT INDEX AND ORDER«, t00=0x0032, t01=0x0056}
0x4e88…4ea6               Head {h00=0x001a, h01=0x0050, text=»*  -DWTECB ECB ADDRESS«, t00=0x0032, t01=0x007c}
0x4ea6…4ece               Head {h00=0x0024, h01=0x0050, text=»*  -DWTST  READY AND ECHO FIELDS«, t00=0x0032, t01=0x009a}
0x4ece…4eee               Head {h00=0x001c, h01=0x0050, text=»*  -DWTTAB TTAB ADDRESS «, t00=0x0032, t01=0x00c2}
0x4eee…4f18               Head {h00=0x0026, h01=0x0050, text=»*  -DWTWAT WAIT/ACTIVATE INDICATOR«, t00=0x0032, t01=0x00e2}
0x4f18…4f4a               Head {h00=0x002e, h01=0x0050, text=»*  -DWTUEC USER ECB ADDRESS (MMU SYSTEMS) «, t00=0x0032, t01=0x010c}
0x4f4a…4f54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x013e}
0x4f54…4f5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0148}
0x4f5e…4f8c               Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ECB FIELDS ARE RESET:-«, t00=0x0032, t01=0x0152}
0x4f8c…4f96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0180}
0x4f96…4fba               Head {h00=0x0020, h01=0x0050, text=»*  -BIT 0 IN THE FIRST WORD «, t00=0x0032, t01=0x018a}
0x4fba…4fde               Head {h00=0x0020, h01=0x0050, text=»*  -ECBEL  EFFECTIVE LENGTH «, t00=0x0033, t01=0x001e}
0x4fde…4ffc               Head {h00=0x001a, h01=0x0050, text=»*  -ECBRC  RETURN CODE«, t00=0x0033, t01=0x0042}
0x4ffc…5006               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0060}
0x5006…501e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0033, t01=0x006a}
0x501e…5028               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0082}
0x5028…505a               Head {h00=0x002e, h01=0x0050, text=»* DWT ADDRESS AND CHECK IF REQUEST IS BUSY«, t00=0x0033, t01=0x008c}
0x505a…5064               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00be}
0x5064…5090               Head {h00=0x0028, h01=0x0050, text=»TIO CF A15,FNDDWT SEARCH DWT ADDRESS«, t00=0x0033, t01=0x00c8}
0x5090…509a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00f4}
0x509a…50cc               Head {h00=0x002e, h01=0x0050, text=»TIO:FM EQU * ENTRY USED BY FILE MANAGEMENT«, t00=0x0033, t01=0x00fe}
0x50cc…50f0               Head {h00=0x0020, h01=0x0050, text=» CF A15,SWITCH SWITCH LEVEL «, t00=0x0033, t01=0x0130}
0x50f0…50fc               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0033, t01=0x0154}
0x50fc…5112               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/8000«, t00=0x0033, t01=0x0160}
0x5112…512a               Head {h00=0x0014, h01=0x0050, text=» ADK A6,0 SET CR«, t00=0x0033, t01=0x0176}
0x512a…5152               Head {h00=0x0024, h01=0x0050, text=» RB(Z) TIOERR FILE CODE UNKNOWN «, t00=0x0033, t01=0x018e}
0x5152…518c               Head {h00=0x0036, h01=0x0050, text=» LD A12,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0034, t01=0x0026}
0x518c…51b0               Head {h00=0x0020, h01=0x0050, text=» LD A13,DWTST,A6 DWT STATUS «, t00=0x0034, t01=0x0060}
0x51b0…51ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0084}
0x51ba…51d2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0034, t01=0x008e}
0x51d2…51dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00a6}
0x51dc…5220               Head {h00=0x0040, h01=0x0050, text=»* CHECK IF ATTACH/DETACH ORDER OR IF DEVICE IS BUSY/ATTACHED«, t00=0x0034, t01=0x00b0}
0x5220…522a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00f4}
0x522a…5240               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0034, t01=0x00fe}
0x5240…5262               Head {h00=0x001e, h01=0x0050, text=» LDKL A10,/0800 ATTACH BIT«, t00=0x0034, t01=0x0114}
0x5262…5278               Head {h00=0x0012, h01=0x0050, text=» CCK A7,/BB00 «, t00=0x0034, t01=0x0136}
0x5278…529a               Head {h00=0x001e, h01=0x0050, text=» RB(E) ATTACH ATTACH ORDER«, t00=0x0034, t01=0x014c}
0x529a…52b0               Head {h00=0x0012, h01=0x0050, text=» CCK A7,/BC00 «, t00=0x0034, t01=0x016e}
0x52b0…52d2               Head {h00=0x001e, h01=0x0050, text=» RB(E) DETACH DETACH ORDER«, t00=0x0034, t01=0x0184}
0x52d2…52e6               Head {h00=0x0010, h01=0x0050, text=» TM A10,A13 «, t00=0x0035, t01=0x0016}
0x52e6…5308               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TIO020 NOT ATTACHED«, t00=0x0035, t01=0x002a}
0x5308…5320               Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A6«, t00=0x0035, t01=0x004c}
0x5320…534e               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TIOQ20 ATTACHED TO OTHER TASK «, t00=0x0035, t01=0x0064}
0x534e…5360               Head {h00=0x000e, h01=0x0050, text=» TM A3,A13«, t00=0x0035, t01=0x0092}
0x5360…5386               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TIO030 DEVICE NOT BUSY«, t00=0x0035, t01=0x00a4}
0x5386…53ac               Head {h00=0x0022, h01=0x0050, text=» RB TIOQ05 BUSY, QUEUE DEVICE «, t00=0x0035, t01=0x00ca}
0x53ac…53b8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x00f0}
0x53b8…53c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00fc}
0x53c2…53d6               Head {h00=0x0010, h01=0x0050, text=»TIO020 EQU *«, t00=0x0035, t01=0x0106}
0x53d6…53e8               Head {h00=0x000e, h01=0x0050, text=» TM A3,A13«, t00=0x0035, t01=0x011a}
0x53e8…540a               Head {h00=0x001e, h01=0x0050, text=» RB(Z) TIOQ20 DEVICE BUSY «, t00=0x0035, t01=0x012c}
0x540a…5414               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x014e}
0x5414…542c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0035, t01=0x0158}
0x542c…5436               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0170}
0x5436…5482               Head {h00=0x0048, h01=0x0050, text=»* CHECK IF ECHO, AND WHEN TRUE CHECK IF ECHO DEVICE IS BUSY/ATTACHED«, t00=0x0035, t01=0x017a}
0x5482…548c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0036}
0x548c…54ba               Head {h00=0x002a, h01=0x0050, text=»TIO030 SC A2,DWTOR,A6 STORE DWT INDEX «, t00=0x0036, t01=0x0040}
0x54ba…54dc               Head {h00=0x001e, h01=0x0050, text=» LDK A2,/40 CHECK IF ECHO «, t00=0x0036, t01=0x006e}
0x54dc…54ee               Head {h00=0x000e, h01=0x0050, text=» ANR A2,A7«, t00=0x0036, t01=0x0090}
0x54ee…550c               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TIO070 NOT ECHO«, t00=0x0036, t01=0x00a2}
0x550c…5516               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00c0}
0x5516…553c               Head {h00=0x0022, h01=0x0050, text=» LD A2,DEVIND,A12 DEVICE INDEX«, t00=0x0036, t01=0x00ca}
0x553c…5564               Head {h00=0x0024, h01=0x0050, text=» SUK A2,KB:DIX CHECK IF KEYBOARD«, t00=0x0036, t01=0x00f0}
0x5564…559c               Head {h00=0x0034, h01=0x0050, text=» RF(NZ) TIO070 ECHO NOT ALLOWED IF NOT KEYBOARD «, t00=0x0036, t01=0x0118}
0x559c…55cc               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTECH,A6 ECHO DEVICE DWT ADDRESS«, t00=0x0036, t01=0x0150}
0x55cc…55f0               Head {h00=0x0020, h01=0x0050, text=» RF(Z) TIO070 NO ECHO DEVICE«, t00=0x0036, t01=0x0180}
0x55f0…5618               Head {h00=0x0024, h01=0x0050, text=» LD A14,DWTST,A2 ECHO DWT STATUS«, t00=0x0037, t01=0x0014}
0x5618…5622               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x003c}
0x5622…5638               Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0037, t01=0x0046}
0x5638…564c               Head {h00=0x0010, h01=0x0050, text=» TM A10,A14 «, t00=0x0037, t01=0x005c}
0x564c…567a               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TIO050 ECHO DEVICE NOT ATTACHED«, t00=0x0037, t01=0x0070}
0x567a…5692               Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A2«, t00=0x0037, t01=0x009e}
0x5692…56cc               Head {h00=0x0036, h01=0x0050, text=» RB(NE) TIOQ10 ECHO DEVICE ATTACHED TO OTHER TASK «, t00=0x0037, t01=0x00b6}
0x56cc…56de               Head {h00=0x000e, h01=0x0050, text=» TM A3,A14«, t00=0x0037, t01=0x00f0}
0x56de…570a               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TIO060 ECHO DEVICE NOT BUSY «, t00=0x0037, t01=0x0102}
0x570a…5734               Head {h00=0x0026, h01=0x0050, text=» RB TIOQ00 BUSY, QUEUE ECHO DEVICE«, t00=0x0037, t01=0x012e}
0x5734…5740               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0158}
0x5740…574a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0164}
0x574a…5762               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0037, t01=0x016e}
0x5762…576c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0186}
0x576c…5776               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0190}
0x5776…578e               Head {h00=0x0014, h01=0x0050, text=»TIO050 TM A3,A14«, t00=0x0038, t01=0x000a}
0x578e…57b4               Head {h00=0x0022, h01=0x0050, text=» RB(Z) TIOQ10 ECHO DEVICE BUSY«, t00=0x0038, t01=0x0022}
0x57b4…57be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0048}
0x57be…57da               Head {h00=0x0018, h01=0x0050, text=»TIO060 LDKL A3,/A000«, t00=0x0038, t01=0x0052}
0x57da…5818               Head {h00=0x003a, h01=0x0050, text=» XRS A3,DWTST,A2 UPDATE BUSY & ECHO BITS IN DWT STATUS«, t00=0x0038, t01=0x006e}
0x5818…5822               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00ac}
0x5822…5846               Head {h00=0x0020, h01=0x0050, text=»* UPDATE ECB AND DWT FIELDS «, t00=0x0038, t01=0x00b6}
0x5846…5850               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00da}
0x5850…5894               Head {h00=0x0040, h01=0x0050, text=»TIO070 XRS A3,DWTST,A6 UPDATE BUSY & ECHO BITS IN DWT STATUS«, t00=0x0038, t01=0x00e4}
0x5894…589e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0128}
0x589e…58b4               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0038, t01=0x0132}
0x58b4…58d2               Head {h00=0x001a, h01=0x0050, text=» LD A13,TTB:PW,A5 PSW «, t00=0x0038, t01=0x0148}
0x58d2…58fa               Head {h00=0x0024, h01=0x0050, text=» ANKL A13,1 SYSTEM/USER MODE BIT«, t00=0x0038, t01=0x0166}
0x58fa…5922               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TIO100 JUMP IF USER MODE«, t00=0x0038, t01=0x018e}
0x5922…5938               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/7FFF«, t00=0x0039, t01=0x0026}
0x5938…5968               Head {h00=0x002c, h01=0x0050, text=» ANRS A2,A8 RESET BIT 0 IN ECB FILE CODE«, t00=0x0039, t01=0x003c}
0x5968…5998               Head {h00=0x002c, h01=0x0050, text=» ST A8,DWTECB,A6 SET ACTUAL ECB ADDRESS «, t00=0x0039, t01=0x006c}
0x5998…59c4               Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8  RESET EFFECTIVE LENGTH«, t00=0x0039, t01=0x009c}
0x59c4…59ec               Head {h00=0x0024, h01=0x0050, text=» CM ECBRC,A8  RESET RETURN CODE «, t00=0x0039, t01=0x00c8}
0x59ec…59fe               Head {h00=0x000e, h01=0x0050, text=» RF TIO110«, t00=0x0039, t01=0x00f0}
0x59fe…5a08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0102}
0x5a08…5a20               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0039, t01=0x010c}
0x5a20…5a2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0124}
0x5a2a…5a4c               Head {h00=0x001e, h01=0x0050, text=»* MOVE USER ECB TO DWT ECB«, t00=0x0039, t01=0x012e}
0x5a4c…5a56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0150}
0x5a56…5a6a               Head {h00=0x0010, h01=0x0050, text=»TIO100 EQU *«, t00=0x0039, t01=0x015a}
0x5a6a…5a80               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/4FFF«, t00=0x0039, t01=0x016e}
0x5a80…5aae               Head {h00=0x002a, h01=0x0050, text=» ELR A3,A8 LOAD FIRST WORD OF USER ECB«, t00=0x0039, t01=0x0184}
0x5aae…5ae2               Head {h00=0x0030, h01=0x0050, text=» ANR A3,A2 RESET BITS 0,2,3 IN ECB FILE CODE«, t00=0x003a, t01=0x0022}
0x5ae2…5af4               Head {h00=0x000e, h01=0x0050, text=» ESR A3,A8«, t00=0x003a, t01=0x0056}
0x5af4…5b20               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTMEC,A6 DWT MMU ECB ADDRESS«, t00=0x003a, t01=0x0068}
0x5b20…5b50               Head {h00=0x002c, h01=0x0050, text=» ST A2,DWTECB,A6 SET ACTUAL ECB ADDRESS «, t00=0x003a, t01=0x0094}
0x5b50…5b62               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x003a, t01=0x00c4}
0x5b62…5b90               Head {h00=0x002a, h01=0x0050, text=» ST A8,DWTUEC,A6 SAVE USER ECB ADDRESS«, t00=0x003a, t01=0x00d6}
0x5b90…5ba2               Head {h00=0x000e, h01=0x0050, text=» LDR A9,A8«, t00=0x003a, t01=0x0104}
0x5ba2…5bb4               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003a, t01=0x0116}
0x5bb4…5be2               Head {h00=0x002a, h01=0x0050, text=» ES A3,ECBEL,A8 RESET EFFECTIVE LENGTH«, t00=0x003a, t01=0x0128}
0x5be2…5c0c               Head {h00=0x0026, h01=0x0050, text=» ES A3,ECBRC,A8 RESET RETURN CODE «, t00=0x003a, t01=0x0156}
0x5c0c…5c16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0180}
0x5c16…5c38               Head {h00=0x001e, h01=0x0050, text=» LDR A10,A1 SAVE PARAMETER«, t00=0x003a, t01=0x018a}
0x5c38…5c4a               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A8«, t00=0x003b, t01=0x001c}
0x5c4a…5c60               Head {h00=0x0012, h01=0x0050, text=» ADK A1,ECBRL «, t00=0x003b, t01=0x002e}
0x5c60…5c8c               Head {h00=0x0028, h01=0x0050, text=» LDR A8,A2 SET A8 TO DWT ECB ADDRESS«, t00=0x003b, t01=0x0044}
0x5c8c…5ca2               Head {h00=0x0012, h01=0x0050, text=» ADK A2,ECBRL «, t00=0x003b, t01=0x0070}
0x5ca2…5cb4               Head {h00=0x000e, h01=0x0050, text=» LDK A3,8 «, t00=0x003b, t01=0x0086}
0x5cb4…5ce6               Head {h00=0x002e, h01=0x0050, text=» MVUS A3 MOVE PART OF USER ECB TO DWT ECB «, t00=0x003b, t01=0x0098}
0x5ce6…5d0c               Head {h00=0x0022, h01=0x0050, text=» LDR A1,A10 RESTORE PARAMETER «, t00=0x003b, t01=0x00ca}
0x5d0c…5d18               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x00f0}
0x5d18…5d22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00fc}
0x5d22…5d38               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003b, t01=0x0106}
0x5d38…5d4e               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/7FFF«, t00=0x003b, t01=0x011c}
0x5d4e…5d7e               Head {h00=0x002c, h01=0x0050, text=» ANRS A3,A8 RESET BIT 0 IN ECB FILE CODE«, t00=0x003b, t01=0x0132}
0x5d7e…5daa               Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8  RESET EFFECTIVE LENGTH«, t00=0x003b, t01=0x0162}
0x5daa…5dd2               Head {h00=0x0024, h01=0x0050, text=» CM ECBRC,A8  RESET RETURN CODE «, t00=0x003b, t01=0x018e}
0x5dd2…5dde               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0026}
0x5dde…5de8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0032}
0x5de8…5e00               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x003c, t01=0x003c}
0x5e00…5e0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0054}
0x5e0a…5e14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x005e}
0x5e14…5e28               Head {h00=0x0010, h01=0x0050, text=»TIO110 EQU *«, t00=0x003c, t01=0x0068}
0x5e28…5e3a               Head {h00=0x000e, h01=0x0050, text=» ECR A3,A7«, t00=0x003c, t01=0x007c}
0x5e3a…5e5a               Head {h00=0x001c, h01=0x0050, text=» ANK A3,/FF ORDER OPTION«, t00=0x003c, t01=0x008e}
0x5e5a…5e8a               Head {h00=0x002c, h01=0x0050, text=» RF(Z) TIO120 NO SPECIAL OPTION IF ZERO «, t00=0x003c, t01=0x00ae}
0x5e8a…5eb6               Head {h00=0x0028, h01=0x0050, text=» SC A3,DWTOPT,A6 STORE OPTION IN DWT«, t00=0x003c, t01=0x00de}
0x5eb6…5ec0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x010a}
0x5ec0…5ed4               Head {h00=0x0010, h01=0x0050, text=»TIO120 EQU *«, t00=0x003c, t01=0x0114}
0x5ed4…5ee6               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A7«, t00=0x003c, t01=0x0128}
0x5ee6…5efa               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x003c, t01=0x013a}
0x5efa…5f26               Head {h00=0x0028, h01=0x0050, text=» SC A7,DWTOR+1,A6 STORE ORDER IN DWT«, t00=0x003c, t01=0x014e}
0x5f26…5f5a               Head {h00=0x0030, h01=0x0050, text=» ST A5,DWTTAB,A6 SAVE TTAB ADDRESS IN DWTTAB«, t00=0x003c, t01=0x017a}
0x5f5a…5f64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x001e}
0x5f64…5f78               Head {h00=0x0010, h01=0x0050, text=»TIO130 EQU *«, t00=0x003d, t01=0x0028}
0x5f78…5f8e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003d, t01=0x003c}
0x5f8e…5fb8               Head {h00=0x0026, h01=0x0050, text=» ST A8,DWTECB,A6  SET ECB ADDRESS «, t00=0x003d, t01=0x0052}
0x5fb8…5fc4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x007c}
0x5fc4…5fce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0088}
0x5fce…5fe6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x003d, t01=0x0092}
0x5fe6…5ff0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00aa}
0x5ff0…6022               Head {h00=0x002e, h01=0x0050, text=»* UPDATE DWTWAT (WAIT/ACTIVATE INDICATOR) «, t00=0x003d, t01=0x00b4}
0x6022…602c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00e6}
0x602c…604e               Head {h00=0x001e, h01=0x0050, text=» LDR A2,A4 CHECK PARAMETER«, t00=0x003d, t01=0x00f0}
0x604e…6078               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) TIO210 I/O AND ACTIVATION «, t00=0x003d, t01=0x0112}
0x6078…60b0               Head {h00=0x0034, h01=0x0050, text=» ANK A3,/80 NORMAL I/O. CHECK IF WAIT REQUESTED «, t00=0x003d, t01=0x013c}
0x60b0…60ce               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TIO220 NOT WAIT«, t00=0x003d, t01=0x0174}
0x60ce…60ee (62, 0, 400)  Head {h00=0x001c, h01=0x0050, text=» LDK A4,1 INDICATE WAIT «, t00=0x003e, t01=0x0004}
0x60ee…6100               Head {h00=0x000e, h01=0x0050, text=» RF TIO230«, t00=0x003e, t01=0x0024}
0x6100…610a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0036}
0x610a…614a               Head {h00=0x003c, h01=0x0050, text=»TIO210 CF A15,GETBLK SAVE PARAMETER AND DISPATCH ADDRESS«, t00=0x003e, t01=0x0040}
0x614a…6154               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0080}
0x6154…618a               Head {h00=0x0032, h01=0x0050, text=»TIO220 CF A15,QTJOB QUEUE TASK FOR DISPATCHING«, t00=0x003e, t01=0x008a}
0x618a…6194               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00c0}
0x6194…61d0               Head {h00=0x0038, h01=0x0050, text=»TIO230 ST A4,DWTWAT,A6 STORE WAIT/ACTIVATE INDICATOR«, t00=0x003e, t01=0x00ca}
0x61d0…61da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0106}
0x61da…61f2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x003e, t01=0x0110}
0x61f2…61fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0128}
0x61fc…6206               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0132}
0x6206…621c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x003e, t01=0x013c}
0x621c…624a               Head {h00=0x002a, h01=0x0050, text=» LDR A13,A13 CHECK IF SYSTEM/USER MODE«, t00=0x003e, t01=0x0152}
0x624a…6274               Head {h00=0x0026, h01=0x0050, text=» RF(Z) TIO250 JUMP IF SYSTEM MODE «, t00=0x003e, t01=0x0180}
0x6274…629a               Head {h00=0x0022, h01=0x0050, text=» LD A3,DEVIND,A12 DEVICE INDEX«, t00=0x003f, t01=0x001a}
0x629a…62ca               Head {h00=0x002c, h01=0x0050, text=» RF(N) TIO250 NO SPECIAL ACTION REQUIRED«, t00=0x003f, t01=0x0040}
0x62ca…62f0               Head {h00=0x0022, h01=0x0050, text=» RF(Z) TIO240 DATA MANAGEMENT «, t00=0x003f, t01=0x0070}
0x62f0…6314               Head {h00=0x0020, h01=0x0050, text=» CWK A3,DK:DIX CHECK IF DISC«, t00=0x003f, t01=0x0096}
0x6314…6334               Head {h00=0x001c, h01=0x0050, text=» RF(NE) TIO235 NOT DISC «, t00=0x003f, t01=0x00ba}
0x6334…6360               Head {h00=0x0028, h01=0x0050, text=» CF A15,TIOCW2 MOVE 2ND CONTROL WORD«, t00=0x003f, t01=0x00da}
0x6360…636a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0106}
0x636a…6390               Head {h00=0x0022, h01=0x0050, text=»* PERFORM CHECK ON ORDER CODE «, t00=0x003f, t01=0x0110}
0x6390…639a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0136}
0x639a…63ae               Head {h00=0x0010, h01=0x0050, text=»TIO235 EQU *«, t00=0x003f, t01=0x0140}
0x63ae…63cc               Head {h00=0x001a, h01=0x0050, text=» LDR A4,A7 ORDER CODE «, t00=0x003f, t01=0x0154}
0x63cc…6400               Head {h00=0x0030, h01=0x0050, text=» CF A15,RD:WR2  CHECK IF ORDER IS READ/WRITE«, t00=0x003f, t01=0x0172}
0x6400…6432               Head {h00=0x002e, h01=0x0050, text=» RF(Z) TIO250 JUMP IF NO READ/WRITE ORDER «, t00=0x0040, t01=0x0016}
0x6432…643c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0048}
0x643c…6450               Head {h00=0x0010, h01=0x0050, text=»TIO240 EQU *«, t00=0x0040, t01=0x0052}
0x6450…645c               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0040, t01=0x0066}
0x645c…649c               Head {h00=0x003c, h01=0x0050, text=» CFI A15,TIOTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE«, t00=0x0040, t01=0x0072}
0x649c…64a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x00b2}
0x64a8…64b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00be}
0x64b2…64e0               Head {h00=0x002a, h01=0x0050, text=»TIO250 ENB  GIVE OTHER TASKS A CHANCE «, t00=0x0040, t01=0x00c8}
0x64e0…64ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00f6}
0x64ea…6518               Head {h00=0x002a, h01=0x0050, text=»TIO260 LDK A5,DWTSB2 LOAD STACK BASE 2«, t00=0x0040, t01=0x0100}
0x6518…652a               Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0040, t01=0x012e}
0x652a…6536               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0040, t01=0x0140}
0x6536…6560               Head {h00=0x0026, h01=0x0050, text=» ABR* A12 GO TO DRIVER ACTIVATION «, t00=0x0040, t01=0x014c}
0x6560…656a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0176}
0x656a…6582               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0040, t01=0x0180}
0x6582…658c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0008}
0x658c…6596               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0012}
0x6596…65a8               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0041, t01=0x001c}
0x65a8…65ba               Head {h00=0x000e, h01=0x0050, text=»* SWITCH *«, t00=0x0041, t01=0x002e}
0x65ba…65cc               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0041, t01=0x0040}
0x65cc…65d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0052}
0x65d6…65f6               Head {h00=0x001c, h01=0x0050, text=»* SWITCH PRIORITY LEVEL:«, t00=0x0041, t01=0x005c}
0x65f6…6600               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x007c}
0x6600…662c               Head {h00=0x0028, h01=0x0050, text=»* IF CPU851, THEN SWITCH TO LEVEL 12«, t00=0x0041, t01=0x0086}
0x662c…6658               Head {h00=0x0028, h01=0x0050, text=»* IF CPU852,  "     "    "    "   16«, t00=0x0041, t01=0x00b2}
0x6658…6684               Head {h00=0x0028, h01=0x0050, text=»* IF CPU857,  "     "    "    "   16«, t00=0x0041, t01=0x00de}
0x6684…668e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x010a}
0x668e…66b6               Head {h00=0x0024, h01=0x0050, text=»* A3 IS DESTROYED, AND SO IS CR «, t00=0x0041, t01=0x0114}
0x66b6…66c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x013c}
0x66c0…66ea               Head {h00=0x0026, h01=0x0050, text=»SWITCH EQU * SWITCH LEVEL ON STACK«, t00=0x0041, t01=0x0146}
0x66ea…6706               Head {h00=0x0018, h01=0x0050, text=» IFT CPU852+CPU857=0«, t00=0x0041, t01=0x0170}
0x6706…672a               Head {h00=0x0020, h01=0x0050, text=» LDK A3,/30 CPU851: LEVEL 12«, t00=0x0041, t01=0x018c}
0x672a…6736               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0020}
0x6736…6740               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x002c}
0x6740…675c               Head {h00=0x0018, h01=0x0050, text=» IFF CPU852+CPU857=0«, t00=0x0042, t01=0x0036}
0x675c…6788               Head {h00=0x0028, h01=0x0050, text=» LDK A3,/40 CPU852/CPU857: LEVEL 16 «, t00=0x0042, t01=0x0052}
0x6788…6794               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x007e}
0x6794…679e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x008a}
0x679e…67ca               Head {h00=0x0028, h01=0x0050, text=» SC A3,2,A15 SET NEW LEVEL ON STACK «, t00=0x0042, t01=0x0094}
0x67ca…67f0               Head {h00=0x0022, h01=0x0050, text=» RTN A15 RETURN WITH NEW LEVEL«, t00=0x0042, t01=0x00c0}
0x67f0…67fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00e6}
0x67fa…6812               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0042, t01=0x00f0}
0x6812…681c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0108}
0x681c…6826               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0112}
0x6826…683c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0042, t01=0x011c}
0x683c…6846               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0132}
0x6846…685a               Head {h00=0x0010, h01=0x0050, text=»* R D : W R «, t00=0x0042, t01=0x013c}
0x685a…6864               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0150}
0x6864…68a8               Head {h00=0x0040, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' AND 'TENDIO' FOR SELECTING «, t00=0x0042, t01=0x015a}
0x68a8…68ec               Head {h00=0x0040, h01=0x0050, text=»* THE APPROPRIATE ROUTINE AT READ/WRITE REQUESTS, DEPENDING «, t00=0x0043, t01=0x000e}
0x68ec…692e               Head {h00=0x003e, h01=0x0050, text=»* ON THE DEVICE CONNECTION (PROGRAMMED CHANNEL, MUX ETX). «, t00=0x0043, t01=0x0052}
0x692e…6970               Head {h00=0x003e, h01=0x0050, text=»* IF NO READ/WRITE REQUEST, CONDITION REGISTER ON STACK IS«, t00=0x0043, t01=0x0094}
0x6970…699e               Head {h00=0x002a, h01=0x0050, text=»* SET TO ZERO, ELSE NOT EQUAL TO ZERO.«, t00=0x0043, t01=0x00d6}
0x699e…69a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0104}
0x69a8…69cc               Head {h00=0x0020, h01=0x0050, text=»* INPUT:  A3 = DEVICE INDEX «, t00=0x0043, t01=0x010e}
0x69cc…69ee               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x0043, t01=0x0132}
0x69ee…69f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0154}
0x69f8…6a36               Head {h00=0x003a, h01=0x0050, text=»* OUTPUT: A3 = INDEX FOR USE IN THE INDEXED BRANCHING «, t00=0x0043, t01=0x015e}
0x6a36…6a68               Head {h00=0x002e, h01=0x0050, text=»*         CR = 0 IF NO READ/WRITE REQUEST «, t00=0x0044, t01=0x000c}
0x6a68…6a98               Head {h00=0x002c, h01=0x0050, text=»*         CR <> 0 IF READ/WRITE REQUEST «, t00=0x0044, t01=0x003e}
0x6a98…6ab2               Head {h00=0x0016, h01=0x0050, text=»*  A4 IS DESTROYED«, t00=0x0044, t01=0x006e}
0x6ab2…6abc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0088}
0x6abc…6aec               Head {h00=0x002c, h01=0x0050, text=»RD:WR LD A4,DWTOR,A6 ORDER CODE FROM DWT«, t00=0x0044, t01=0x0092}
0x6aec…6b00               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/3F «, t00=0x0044, t01=0x00c2}
0x6b00…6b0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00d6}
0x6b0a…6b38               Head {h00=0x002a, h01=0x0050, text=»RD:WR2 ADKL A15,4 ADJUST STACKPOINTER «, t00=0x0044, t01=0x00e0}
0x6b38…6b5c               Head {h00=0x0020, h01=0x0050, text=» LC A4,ORDTAB,A4 ORDER INDEX«, t00=0x0044, t01=0x010e}
0x6b5c…6b70               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0044, t01=0x0132}
0x6b70…6ba2               Head {h00=0x002e, h01=0x0050, text=» ABR(Z)* A15 RETURN IF NO READ/WRITE ORDER«, t00=0x0044, t01=0x0146}
0x6ba2…6bb4               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0044, t01=0x0178}
0x6bb4…6bdc               Head {h00=0x0024, h01=0x0050, text=» ADR A3,A4 ADD READ/WRITE INDEX «, t00=0x0044, t01=0x018a}
0x6bdc…6c08               Head {h00=0x0028, h01=0x0050, text=» ABR* A15 RETURN WITHOUT CHANGING CR«, t00=0x0045, t01=0x0022}
0x6c08…6c12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x004e}
0x6c12…6c2a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0045, t01=0x0058}
0x6c2a…6c34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0070}
0x6c34…6c3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x007a}
0x6c3e…6c50               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0045, t01=0x0084}
0x6c50…6c62               Head {h00=0x000e, h01=0x0050, text=»* ORDTAB *«, t00=0x0045, t01=0x0096}
0x6c62…6c74               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0045, t01=0x00a8}
0x6c74…6c7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00ba}
0x6c7e…6cb4               Head {h00=0x0032, h01=0x0050, text=»* ORDTAB CONTAINS ORDER CONSTANTS AS FOLLOWS: «, t00=0x0045, t01=0x00c4}
0x6cb4…6cbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00fa}
0x6cbe…6ce0               Head {h00=0x001e, h01=0x0050, text=»*  =0: NO READ/WRITE ORDER«, t00=0x0045, t01=0x0104}
0x6ce0…6cfa               Head {h00=0x0016, h01=0x0050, text=»*  =1: READ ORDER «, t00=0x0045, t01=0x0126}
0x6cfa…6d1c               Head {h00=0x001e, h01=0x0050, text=»*  =TINDEX+1: WRITE ORDER «, t00=0x0045, t01=0x0140}
0x6d1c…6d26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0162}
0x6d26…6d4a               Head {h00=0x0020, h01=0x0050, text=»ORDTAB EQU * ORDER CONSTANTS«, t00=0x0045, t01=0x016c}
0x6d4a…6d66               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,1 /00, /01 «, t00=0x0045, t01=0x0190}
0x6d66…6d82               Head {h00=0x0018, h01=0x0050, text=» BYTES 1,1 /02, /03 «, t00=0x0046, t01=0x001c}
0x6d82…6da4               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /04, /05«, t00=0x0046, t01=0x0038}
0x6da4…6dce               Head {h00=0x0026, h01=0x0050, text=» BYTES TINDEX+1,TINDEX+1 /06, /07 «, t00=0x0046, t01=0x005a}
0x6dce…6df0               Head {h00=0x001e, h01=0x0050, text=» BYTES TINDEX+1,0 /08, /09«, t00=0x0046, t01=0x0084}
0x6df0…6e12               Head {h00=0x001e, h01=0x0050, text=» BYTES 1,TINDEX+1 /0A, /0B«, t00=0x0046, t01=0x00a6}
0x6e12…6e2e               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /0C, /0D «, t00=0x0046, t01=0x00c8}
0x6e2e…6e4a               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /0E, /0F «, t00=0x0046, t01=0x00e4}
0x6e4a…6e66               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,1 /10, /11 «, t00=0x0046, t01=0x0100}
0x6e66…6e82               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /12, /13 «, t00=0x0046, t01=0x011c}
0x6e82…6ea4               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /14, /15«, t00=0x0046, t01=0x0138}
0x6ea4…6ec0               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /16, /17 «, t00=0x0046, t01=0x015a}
0x6ec0…6edc               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /18, /19 «, t00=0x0046, t01=0x0176}
0x6edc…6ef8 (71, 0, 400)  Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /1A, /1B «, t00=0x0047, t01=0x0004}
0x6ef8…6f14               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /1C, /1D «, t00=0x0047, t01=0x0020}
0x6f14…6f30               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /1E, /1F «, t00=0x0047, t01=0x003c}
0x6f30…6f52               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /20, /21«, t00=0x0047, t01=0x0058}
0x6f52…6f74               Head {h00=0x001e, h01=0x0050, text=» BYTES TINDEX+1,0 /22, /23«, t00=0x0047, t01=0x007a}
0x6f74…6f96               Head {h00=0x001e, h01=0x0050, text=» BYTES TINDEX+1,0 /24, /25«, t00=0x0047, t01=0x009c}
0x6f96…6fb8               Head {h00=0x001e, h01=0x0050, text=» BYTES 0,TINDEX+1 /26, /27«, t00=0x0047, t01=0x00be}
0x6fb8…6fd4               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /28, /29 «, t00=0x0047, t01=0x00e0}
0x6fd4…6ff0               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /2A, /2B «, t00=0x0047, t01=0x00fc}
0x6ff0…700c               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,1 /2C, /2D «, t00=0x0047, t01=0x0118}
0x700c…702e               Head {h00=0x001e, h01=0x0050, text=» BYTES 1,TINDEX+1 /2E, /2F«, t00=0x0047, t01=0x0134}
0x702e…704a               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /30, /31 «, t00=0x0047, t01=0x0156}
0x704a…7066               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /32, /33 «, t00=0x0047, t01=0x0172}
0x7066…7082               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /34, /35 «, t00=0x0047, t01=0x018e}
0x7082…709e               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /36, /37 «, t00=0x0048, t01=0x001a}
0x709e…70ba               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /38, /39 «, t00=0x0048, t01=0x0036}
0x70ba…70d6               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /3A, /3B «, t00=0x0048, t01=0x0052}
0x70d6…70f2               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /3C, /3D «, t00=0x0048, t01=0x006e}
0x70f2…710e               Head {h00=0x0018, h01=0x0050, text=» BYTES 0,0 /3E, /3F «, t00=0x0048, t01=0x008a}
0x710e…7118               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00a6}
0x7118…7130               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0048, t01=0x00b0}
0x7130…713a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00c8}
0x713a…7150               Head {h00=0x0012, h01=0x0050, text=»* T I O : D M «, t00=0x0048, t01=0x00d2}
0x7150…715a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00e8}
0x715a…7192               Head {h00=0x0034, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A REQUEST «, t00=0x0048, t01=0x00f2}
0x7192…71c0               Head {h00=0x002a, h01=0x0050, text=»* FOR DATA MANAGEMENT HAS BEEN ISSUED.«, t00=0x0048, t01=0x012a}
0x71c0…71f8               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x0048, t01=0x0158}
0x71f8…7228               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TEN:DM'.«, t00=0x0048, t01=0x0190}
0x7228…7232               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0030}
0x7232…7258               Head {h00=0x0022, h01=0x0050, text=»* INPUT:  A8 = DWT ECB ADDRESS«, t00=0x0049, t01=0x003a}
0x7258…7280               Head {h00=0x0024, h01=0x0050, text=»*         A9 = USER ECB ADDRESS «, t00=0x0049, t01=0x0060}
0x7280…728a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0088}
0x728a…72ac               Head {h00=0x001e, h01=0x0050, text=»* OUTPUT: A2 IS DESTROYED «, t00=0x0049, t01=0x0092}
0x72ac…72b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00b4}
0x72b6…72e8               Head {h00=0x002e, h01=0x0050, text=»TIO:DM EQU * DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x0049, t01=0x00be}
0x72e8…7314               Head {h00=0x0028, h01=0x0050, text=» EL A2,ECBBA,A9 USER BUFFER ADDRESS «, t00=0x0049, t01=0x00f0}
0x7314…732c               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBBA,A8 «, t00=0x0049, t01=0x011c}
0x732c…7336               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0134}
0x7336…734a               Head {h00=0x0010, h01=0x0050, text=»TIOCW2 EQU *«, t00=0x0049, t01=0x013e}
0x734a…7376               Head {h00=0x0028, h01=0x0050, text=» EL A2,ECBCW2,A9 SECOND CONTROL WORD«, t00=0x0049, t01=0x0152}
0x7376…738e               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW2,A8«, t00=0x0049, t01=0x017e}
0x738e…7398               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0008}
0x7398…73ac               Head {h00=0x0010, h01=0x0050, text=»A15RTN EQU *«, t00=0x004a, t01=0x0012}
0x73ac…73bc               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x004a, t01=0x0026}
0x73bc…73c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0036}
0x73c6…73de               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x004a, t01=0x0040}
0x73de…73e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0058}
0x73e8…73fe               Head {h00=0x0012, h01=0x0050, text=»* T I O P C I «, t00=0x004a, t01=0x0062}
0x73fe…7408               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0078}
0x7408…744e               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN «, t00=0x004a, t01=0x0082}
0x744e…7490               Head {h00=0x003e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. «, t00=0x004a, t01=0x00c8}
0x7490…74d6               Head {h00=0x0042, h01=0x0050, text=»* TIOPCI CHECKS USER AND DWT BUFFER ADDRESSES SO THAT BOTH ARE«, t00=0x004a, t01=0x010a}
0x74d6…7516               Head {h00=0x003c, h01=0x0050, text=»* EVEN OR UNEVEN, DEPENDING ON THE USER BUFFER ADDRESS. «, t00=0x004a, t01=0x0150}
0x7516…754e               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x004a, t01=0x0190}
0x754e…757e               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENPCI'.«, t00=0x004b, t01=0x0038}
0x757e…75b6               Head {h00=0x0034, h01=0x0050, text=»* NOTICE THAT ENTRY TIPI05 IS USED BY 'TIOKBI'. «, t00=0x004b, t01=0x0068}
0x75b6…75c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00a0}
0x75c0…75e6               Head {h00=0x0022, h01=0x0050, text=»* INPUT:  A8 = DWT ECB ADDRESS«, t00=0x004b, t01=0x00aa}
0x75e6…760e               Head {h00=0x0024, h01=0x0050, text=»*         A9 = USER ECB ADDRESS «, t00=0x004b, t01=0x00d0}
0x760e…763e               Head {h00=0x002c, h01=0x0050, text=»* A12 = ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x004b, t01=0x00f8}
0x763e…7648               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0128}
0x7648…766a               Head {h00=0x001e, h01=0x0050, text=»* OUTPUT: A1 IS DESTROYED «, t00=0x004b, t01=0x0132}
0x766a…7674               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0154}
0x7674…76a2               Head {h00=0x002a, h01=0x0050, text=»TIOPCI EQU * PROGRAMMED CHANNEL, INPUT«, t00=0x004b, t01=0x015e}
0x76a2…76ca               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x004b, t01=0x018c}
0x76ca…7700               Head {h00=0x0032, h01=0x0050, text=» CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE«, t00=0x004c, t01=0x0024}
0x7700…773a               Head {h00=0x0036, h01=0x0050, text=» RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE «, t00=0x004c, t01=0x005a}
0x773a…7744               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0094}
0x7744…7776               Head {h00=0x002e, h01=0x0050, text=»TIPI05 EQU * ENTRY POINT USED BY 'TIOKBI' «, t00=0x004c, t01=0x009e}
0x7776…77a2               Head {h00=0x0028, h01=0x0050, text=» EL A1,ECBBA,A9 USER BUFFER ADDRESS «, t00=0x004c, t01=0x00d0}
0x77a2…77b4               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x004c, t01=0x00fc}
0x77b4…77e2               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TIPI10 USER BUFFER ADDRESS EVEN«, t00=0x004c, t01=0x010e}
0x77e2…77fa               Head {h00=0x0014, h01=0x0050, text=» ORS A1,ECBBA,A8«, t00=0x004c, t01=0x013c}
0x77fa…780a               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x004c, t01=0x0154}
0x780a…7814               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0164}
0x7814…7848               Head {h00=0x0030, h01=0x0050, text=»TIPI10 SUK A1,2 MAKE DWT BUFFER ADDRESS EVEN«, t00=0x004c, t01=0x016e}
0x7848…7860               Head {h00=0x0014, h01=0x0050, text=» ANS A1,ECBBA,A8«, t00=0x004d, t01=0x0012}
0x7860…7870               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x004d, t01=0x002a}
0x7870…787a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x003a}
0x787a…7892               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x004d, t01=0x0044}
0x7892…789c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x005c}
0x789c…78b2               Head {h00=0x0012, h01=0x0050, text=»* T I O M X I «, t00=0x004d, t01=0x0066}
0x78b2…78bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x007c}
0x78bc…7902               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN «, t00=0x004d, t01=0x0086}
0x7902…7944               Head {h00=0x003e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS RUNNING ON MULTIPLEXOR CHANNEL.«, t00=0x004d, t01=0x00cc}
0x7944…7986               Head {h00=0x003e, h01=0x0050, text=»* TIOMXI ASSEMBLES THE FULL 18 BIT BUFFER ADDRESS WHICH IS«, t00=0x004d, t01=0x010e}
0x7986…79b6               Head {h00=0x002c, h01=0x0050, text=»* TRANSFERRED TO THE MUX BY THE DRIVER. «, t00=0x004d, t01=0x0150}
0x79b6…79ee               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x004d, t01=0x0180}
0x79ee…7a1e               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENMXI'.«, t00=0x004e, t01=0x0028}
0x7a1e…7a70               Head {h00=0x004e, h01=0x0050, text=»* NOTICE THAT MODULES 'TIOMXO', 'TIODKI' AND 'TIODKO' ARE EQUAL TO TIOMXI.«, t00=0x004e, t01=0x0058}
0x7a70…7a7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00aa}
0x7a7a…7a9e               Head {h00=0x0020, h01=0x0050, text=»* INPUT:  A5 = TTAB ADDRESS «, t00=0x004e, t01=0x00b4}
0x7a9e…7ac4               Head {h00=0x0022, h01=0x0050, text=»*         A8 = DWT ECB ADDRESS«, t00=0x004e, t01=0x00d8}
0x7ac4…7ae4               Head {h00=0x001c, h01=0x0050, text=»*  A9 = USER ECB ADDRESS«, t00=0x004e, t01=0x00fe}
0x7ae4…7aee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x011e}
0x7aee…7b14               Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A2 ARE DESTROYED «, t00=0x004e, t01=0x0128}
0x7b14…7b5a               Head {h00=0x0042, h01=0x0050, text=»*         18 BIT USER BUFFER ADDRESS IS TRANSFERRED TO DWT ECB«, t00=0x004e, t01=0x014e}
0x7b5a…7b64 (79, 0, 398)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0004}
0x7b64…7b84               Head {h00=0x001c, h01=0x0050, text=»TIOMXI EQU * MUX, INPUT «, t00=0x004f, t01=0x000e}
0x7b84…7bb0               Head {h00=0x0028, h01=0x0050, text=» EL A1,ECBBA,A9 USER BUFFER ADDRESS «, t00=0x004f, t01=0x002e}
0x7bb0…7bc2               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A1«, t00=0x004f, t01=0x005a}
0x7bc2…7bec               Head {h00=0x0026, h01=0x0050, text=» ANKL A1,/FFF SKIP 4 LEFTMOST BITS«, t00=0x004f, t01=0x006c}
0x7bec…7bfe               Head {h00=0x000e, h01=0x0050, text=» SRL A2,3 «, t00=0x004f, t01=0x0096}
0x7bfe…7c28               Head {h00=0x0026, h01=0x0050, text=» ANK A2,/1E MMUTAB INDEX (5 BITS) «, t00=0x004f, t01=0x00a8}
0x7c28…7c4c               Head {h00=0x0020, h01=0x0050, text=» ADR A2,A5 ADD TTAB ADDRESS «, t00=0x004f, t01=0x00d2}
0x7c4c…7c7a               Head {h00=0x002a, h01=0x0050, text=» LC A2,TTB:MT,A2 PHYSICAL PAGE ADDRESS«, t00=0x004f, t01=0x00f6}
0x7c7a…7c8c               Head {h00=0x000e, h01=0x0050, text=» SRL A2,2 «, t00=0x004f, t01=0x0124}
0x7c8c…7ca0               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/3F «, t00=0x004f, t01=0x0136}
0x7ca0…7cd8               Head {h00=0x0034, h01=0x0050, text=» SCR A2,A8 STORE BITS 16-17 IN DWT ECB 1ST WORD «, t00=0x004f, t01=0x014a}
0x7cd8…7cec               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/0F «, t00=0x004f, t01=0x0182}
0x7cec…7cfe               Head {h00=0x000e, h01=0x0050, text=» SRC A2,4 «, t00=0x0050, t01=0x0008}
0x7cfe…7d10               Head {h00=0x000e, h01=0x0050, text=» ORR A1,A2«, t00=0x0050, t01=0x001a}
0x7d10…7d46               Head {h00=0x0032, h01=0x0050, text=» ST A1,ECBBA,A8 STORE MODIFIED BUFFER ADDRESS «, t00=0x0050, t01=0x002c}
0x7d46…7d56               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0050, t01=0x0062}
0x7d56…7d60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0072}
0x7d60…7d78               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0050, t01=0x007c}
0x7d78…7d82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0094}
0x7d82…7d98               Head {h00=0x0012, h01=0x0050, text=»* T I O K B I «, t00=0x0050, t01=0x009e}
0x7d98…7da2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00b4}
0x7da2…7de8               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN «, t00=0x0050, t01=0x00be}
0x7de8…7e3a               Head {h00=0x004e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS KEYBOARD/CTW. TIOKBI WILL SET BUFFER ADDRESSES «, t00=0x0050, t01=0x0104}
0x7e3a…7e74               Head {h00=0x0036, h01=0x0050, text=»* AND MOVE KEYTABLE (IF ANY) BY USING ENTRY TIPI05«, t00=0x0050, t01=0x0156}
0x7e74…7ea8               Head {h00=0x0030, h01=0x0050, text=»* IN 'TIOPCI' AND ENTRY TIPO05 IN 'TIOPCO'. «, t00=0x0050, t01=0x0190}
0x7ea8…7ee0               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x0051, t01=0x0034}
0x7ee0…7f10               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENKBI'.«, t00=0x0051, t01=0x006c}
0x7f10…7f1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x009c}
0x7f1a…7f3c               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x0051, t01=0x00a6}
0x7f3c…7f56               Head {h00=0x0016, h01=0x0050, text=»*  A7 = ORDER CODE«, t00=0x0051, t01=0x00c8}
0x7f56…7f7c               Head {h00=0x0022, h01=0x0050, text=»*         A8 = DWT ECB ADDRESS«, t00=0x0051, t01=0x00e2}
0x7f7c…7f9c               Head {h00=0x001c, h01=0x0050, text=»*  A9 = USER ECB ADDRESS«, t00=0x0051, t01=0x0108}
0x7f9c…7fcc               Head {h00=0x002c, h01=0x0050, text=»* A12 = ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0051, t01=0x0128}
0x7fcc…7fd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0158}
0x7fd6…7ffc               Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A4 ARE DESTROYED «, t00=0x0051, t01=0x0162}
0x7ffc…8006               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0188}
0x8006…8028 (82, 0, 400)  Head {h00=0x001e, h01=0x0050, text=»TIOKBI EQU * KEYBOARD/CTW «, t00=0x0052, t01=0x0004}
0x8028…8050               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x0052, t01=0x0026}
0x8050…8086               Head {h00=0x0032, h01=0x0050, text=» CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE«, t00=0x0052, t01=0x004e}
0x8086…80c0               Head {h00=0x0036, h01=0x0050, text=» RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE «, t00=0x0052, t01=0x0084}
0x80c0…80fa               Head {h00=0x0036, h01=0x0050, text=» CF A15,TIPI05 CHECK AND CORRECT BUFFER ADDRESSES «, t00=0x0052, t01=0x00be}
0x80fa…811c               Head {h00=0x001e, h01=0x0050, text=» CWK A7,1 CHECK ORDER CODE«, t00=0x0052, t01=0x00f8}
0x811c…814c               Head {h00=0x002c, h01=0x0050, text=» RF(E) TIKB20 NO KEYTABLE IF BASIC READ «, t00=0x0052, t01=0x011a}
0x814c…817a               Head {h00=0x002a, h01=0x0050, text=» LD A4,ECBCW,A8 USER KEYTABLE ADDRESS «, t00=0x0052, t01=0x014a}
0x817a…819c               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TIKB20 NO KEYTABLE «, t00=0x0052, t01=0x0178}
0x819c…81a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x000a}
0x81a6…81be               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0053, t01=0x0014}
0x81be…81c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x002c}
0x81c8…81d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0036}
0x81d2…81e4               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A9«, t00=0x0053, t01=0x0040}
0x81e4…81f6               Head {h00=0x000e, h01=0x0050, text=» ADK A1,8 «, t00=0x0053, t01=0x0052}
0x81f6…820a               Head {h00=0x0010, h01=0x0050, text=» ADKL A8,12 «, t00=0x0053, t01=0x0064}
0x820a…8238               Head {h00=0x002a, h01=0x0050, text=» ST A8,-2,A8 SET DWT KEYTABLE ADDRESS «, t00=0x0053, t01=0x0078}
0x8238…824a               Head {h00=0x000e, h01=0x0050, text=» SUKL A8,4«, t00=0x0053, t01=0x00a6}
0x824a…8278               Head {h00=0x002a, h01=0x0050, text=» ELR A3,A4 FIRST WORD OF USER KEYTABLE«, t00=0x0053, t01=0x00b8}
0x8278…828a               Head {h00=0x000e, h01=0x0050, text=» ANK A4,1 «, t00=0x0053, t01=0x00e6}
0x828a…82b8               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TIKB10 KEYTABLE ADDRESS UNEVEN«, t00=0x0053, t01=0x00f8}
0x82b8…82e8               Head {h00=0x002c, h01=0x0050, text=» ECR A3,A3 NO, PUT LENGTH IN RIGHT BYTE «, t00=0x0053, t01=0x0126}
0x82e8…82f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0156}
0x82f2…8320               Head {h00=0x002a, h01=0x0050, text=»TIKB10 ANK A3,/FF SKIP LEFT CHARACTER «, t00=0x0053, t01=0x0160}
0x8320…8332               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0053, t01=0x018e}
0x8332…8366               Head {h00=0x0030, h01=0x0050, text=» CW A3,KEYLEN,A12 CHECK KEYTABLE BUFFER SIZE«, t00=0x0054, t01=0x0010}
0x8366…8386               Head {h00=0x001c, h01=0x0050, text=» RF(G) IO:ERR TOO SMALL «, t00=0x0054, t01=0x0044}
0x8386…839c               Head {h00=0x0012, h01=0x0050, text=» CF A15,TIPO05«, t00=0x0054, t01=0x0064}
0x839c…83c6               Head {h00=0x0026, h01=0x0050, text=» SUKL A8,8 ADJUST DWT ECB ADDRESS «, t00=0x0054, t01=0x007a}
0x83c6…83d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00a4}
0x83d0…83e4               Head {h00=0x0010, h01=0x0050, text=»TIKB20 EQU *«, t00=0x0054, t01=0x00ae}
0x83e4…83f4               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0054, t01=0x00c2}
0x83f4…83fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00d2}
0x83fe…8416               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0054, t01=0x00dc}
0x8416…8420               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00f4}
0x8420…8436               Head {h00=0x0012, h01=0x0050, text=»* T I O I T I «, t00=0x0054, t01=0x00fe}
0x8436…8440               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0114}
0x8440…8478               Head {h00=0x0034, h01=0x0050, text=»TIOITI EQU A15RTN INTERTASK COMMUNICATION, INPUT«, t00=0x0054, t01=0x011e}
0x8478…8482               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0156}
0x8482…8498               Head {h00=0x0012, h01=0x0050, text=»* T I O D K I «, t00=0x0054, t01=0x0160}
0x8498…84a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0176}
0x84a2…84c8               Head {h00=0x0022, h01=0x0050, text=»TIODKI EQU TIOMXI DISC, INPUT «, t00=0x0054, t01=0x0180}
0x84c8…84d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0016}
0x84d2…84ea               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0055, t01=0x0020}
0x84ea…84f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0038}
0x84f4…850a               Head {h00=0x0012, h01=0x0050, text=»* T I O P C O «, t00=0x0055, t01=0x0042}
0x850a…8514               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0058}
0x8514…855a               Head {h00=0x0042, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TIO' WHEN A WRITE REQUEST HAS BEEN«, t00=0x0055, t01=0x0062}
0x855a…859c               Head {h00=0x003e, h01=0x0050, text=»* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. «, t00=0x0055, t01=0x00a8}
0x859c…85e2               Head {h00=0x0042, h01=0x0050, text=»* TIOPCO CHECKS THAT REQUESTED LENGTH DOES NOT EXCEED THE DWT «, t00=0x0055, t01=0x00ea}
0x85e2…862a               Head {h00=0x0044, h01=0x0050, text=»* BUFFER LENGTH, AND PERFORMS A MOVE OF THE CONTENTS OF THE USER«, t00=0x0055, t01=0x0130}
0x862a…864e               Head {h00=0x0020, h01=0x0050, text=»* BUFFER TO THE DWT BUFFER. «, t00=0x0055, t01=0x0178}
0x864e…8686               Head {h00=0x0034, h01=0x0050, text=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT«, t00=0x0056, t01=0x000c}
0x8686…86b6               Head {h00=0x002c, h01=0x0050, text=»* COMPLETION OF THE REQUEST IS 'TENPCO'.«, t00=0x0056, t01=0x0044}
0x86b6…86f0               Head {h00=0x0036, h01=0x0050, text=»* NOTICE THAT MODULE 'TIOKBO' IS EQUAL TO TIOPCO. «, t00=0x0056, t01=0x0074}
0x86f0…873a               Head {h00=0x0046, h01=0x0050, text=»* NOTICE ALSO THAT ENTRY TIPO05 IS USED BY 'TIOKBI' AND 'TENITO'. «, t00=0x0056, t01=0x00ae}
0x873a…8764               Head {h00=0x0026, h01=0x0050, text=»* TIOPCO IS ALSO USED BY 'DC:MOT'.«, t00=0x0056, t01=0x00f8}
0x8764…876e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0122}
0x876e…8790               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x0056, t01=0x012c}
0x8790…87b6               Head {h00=0x0022, h01=0x0050, text=»*         A8 = DWT ECB ADDRESS«, t00=0x0056, t01=0x014e}
0x87b6…87c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0174}
0x87c0…87e6               Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A4 ARE DESTROYED «, t00=0x0056, t01=0x017e}
0x87e6…87f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0014}
0x87f0…8820               Head {h00=0x002c, h01=0x0050, text=»TIOPCO EQU * PROGRAMMED CHANNEL, OUTPUT «, t00=0x0057, t01=0x001e}
0x8820…8858               Head {h00=0x0034, h01=0x0050, text=» LD A2,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK«, t00=0x0057, t01=0x004e}
0x8858…8880               Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBRL,A8 REQUESTED LENGTH«, t00=0x0057, t01=0x0086}
0x8880…88ac               Head {h00=0x0028, h01=0x0050, text=» RF(NP) TIPO20 REQUESTED LENGTH <= 0«, t00=0x0057, t01=0x00ae}
0x88ac…88e2               Head {h00=0x0032, h01=0x0050, text=» CW A3,BUFLEN,A2 COMPARE WITH DWT BUFFER SIZE «, t00=0x0057, t01=0x00da}
0x88e2…891c               Head {h00=0x0036, h01=0x0050, text=» RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE «, t00=0x0057, t01=0x0110}
0x891c…8946               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTUEC,A6 USER ECB ADDRESS «, t00=0x0057, t01=0x014a}
0x8946…8950               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0174}
0x8950…8968               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0057, t01=0x017e}
0x8968…8972               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0008}
0x8972…897c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0012}
0x897c…89ba               Head {h00=0x003a, h01=0x0050, text=»TIPO05 EQU * ENTRY POINT USED BY 'TIOKBI' AND 'TENITO'«, t00=0x0058, t01=0x001c}
0x89ba…89cc               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0058, t01=0x005a}
0x89cc…89fe               Head {h00=0x002e, h01=0x0050, text=» ANKL A3,/FFFE MAKE REQUESTED LENGTH EVEN «, t00=0x0058, t01=0x006c}
0x89fe…8a2a               Head {h00=0x0028, h01=0x0050, text=» EL A1,ECBBA,A1 USER BUFFER ADDRESS «, t00=0x0058, t01=0x009e}
0x8a2a…8a54               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBBA,A8 DWT BUFFER ADDRESS«, t00=0x0058, t01=0x00ca}
0x8a54…8a88               Head {h00=0x0030, h01=0x0050, text=» ANKL A2,/FFFE MAKE DWT BUFFER ADDRESS EVEN «, t00=0x0058, t01=0x00f4}
0x8a88…8a9a               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0058, t01=0x0128}
0x8a9a…8aac               Head {h00=0x000e, h01=0x0050, text=» ANK A4,1 «, t00=0x0058, t01=0x013a}
0x8aac…8ade               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) TIPO30 USER BUFFER ADDRESS UNEVEN «, t00=0x0058, t01=0x014c}
0x8ade…8af6               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBBA,A8 «, t00=0x0058, t01=0x017e}
0x8af6…8b00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0008}
0x8b00…8b3a               Head {h00=0x0036, h01=0x0050, text=»TIPO10 MVUS A3 MOVE (USER BUFFER) TO SYSTEM BUFFER«, t00=0x0059, t01=0x0012}
0x8b3a…8b44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x004c}
0x8b44…8b5a               Head {h00=0x0012, h01=0x0050, text=»TIPO20 RTN A15«, t00=0x0059, t01=0x0056}
0x8b5a…8b64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x006c}
0x8b64…8b98               Head {h00=0x0030, h01=0x0050, text=»TIPO30 EQU * USER BUFFER ADDRESS WAS UNEVEN «, t00=0x0059, t01=0x0076}
0x8b98…8bd0               Head {h00=0x0034, h01=0x0050, text=» ORS A4,ECBBA,A8 MAKE DWT BUFFER ADDRESS UNEVEN «, t00=0x0059, t01=0x00aa}
0x8bd0…8c04               Head {h00=0x0030, h01=0x0050, text=» ELR A4,A1 FIRST CHARACTER FROM USER BUFFER «, t00=0x0059, t01=0x00e2}
0x8c04…8c3a               Head {h00=0x0032, h01=0x0050, text=» STR A4,A2 STORE FIRST CHARACTER IN DWT BUFFER«, t00=0x0059, t01=0x0116}
0x8c3a…8c66               Head {h00=0x0028, h01=0x0050, text=» ADK A1,1 UPDATE USER BUFFER POINTER«, t00=0x0059, t01=0x014c}
0x8c66…8c92               Head {h00=0x0028, h01=0x0050, text=» ADK A2,2 UPDATE DWT BUFFER POINTER «, t00=0x0059, t01=0x0178}
0x8c92…8cbe               Head {h00=0x0028, h01=0x0050, text=» RB TIPO10 MOVE REMAINING CHARACTERS«, t00=0x005a, t01=0x0014}
0x8cbe…8cc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0040}
0x8cc8…8ce0               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x005a, t01=0x004a}
0x8ce0…8cea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0062}
0x8cea…8d00               Head {h00=0x0012, h01=0x0050, text=»* I O : E R R «, t00=0x005a, t01=0x006c}
0x8d00…8d0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0082}
0x8d0a…8d3a               Head {h00=0x002c, h01=0x0050, text=»* DRIVER (DWT) MMU BUFFER IS TOO SMALL. «, t00=0x005a, t01=0x008c}
0x8d3a…8d80               Head {h00=0x0042, h01=0x0050, text=»* SET RETURN CODE /8008 (REQUEST ERROR AND INCORRECT LENGTH). «, t00=0x005a, t01=0x00bc}
0x8d80…8daa               Head {h00=0x0026, h01=0x0050, text=»* BRANCH TO DISPATCHER VIA TENDIO.«, t00=0x005a, t01=0x0102}
0x8daa…8db4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x012c}
0x8db4…8dec               Head {h00=0x0034, h01=0x0050, text=»IO:ERR EQU * REQUEST ERROR EXIT FOR MMU ROUTINES«, t00=0x005a, t01=0x0136}
0x8dec…8df8               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x005a, t01=0x016e}
0x8df8…8e20               Head {h00=0x0024, h01=0x0050, text=»  ADKL A15,4 ADJUST STACKPOINTER«, t00=0x005a, t01=0x017a}
0x8e20…8e42               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT STATUS«, t00=0x005b, t01=0x0012}
0x8e42…8e62               Head {h00=0x001c, h01=0x0050, text=» SLL A1,2 CHECK ECHO BIT«, t00=0x005b, t01=0x0034}
0x8e62…8e82               Head {h00=0x001c, h01=0x0050, text=» RF(NN) IO:E10 NOT ECHO «, t00=0x005b, t01=0x0054}
0x8e82…8ea6               Head {h00=0x0020, h01=0x0050, text=» LDR A1,A6 SAVE DWT ADDRESS «, t00=0x005b, t01=0x0074}
0x8ea6…8ed0               Head {h00=0x0026, h01=0x0050, text=» LD A6,DWTECH,A6 ECHO DWT ADDRESS «, t00=0x005b, t01=0x0098}
0x8ed0…8ee6               Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x005b, t01=0x00c2}
0x8ee6…8f0c               Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 RESTORE DWT ADDRESS«, t00=0x005b, t01=0x00d8}
0x8f0c…8f16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00fe}
0x8f16…8f2a               Head {h00=0x0010, h01=0x0050, text=»IO:E10 EQU *«, t00=0x005b, t01=0x0108}
0x8f2a…8f50               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/8008 SET RETURN CODE«, t00=0x005b, t01=0x011c}
0x8f50…8f84               Head {h00=0x0030, h01=0x0050, text=» ABL DISEND BRANCH TO DISPATCHER VIA TENDIO «, t00=0x005b, t01=0x0142}
0x8f84…8f8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0176}
0x8f8e…8fa6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x005b, t01=0x0180}
0x8fa6…8fb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0008}
0x8fb0…8fc6               Head {h00=0x0012, h01=0x0050, text=»* T I O M X O «, t00=0x005c, t01=0x0012}
0x8fc6…8fd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0028}
0x8fd0…8ff6               Head {h00=0x0022, h01=0x0050, text=»TIOMXO EQU TIOMXI MUX, OUTPUT «, t00=0x005c, t01=0x0032}
0x8ff6…9000               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0058}
0x9000…9016               Head {h00=0x0012, h01=0x0050, text=»* T I O K B O «, t00=0x005c, t01=0x0062}
0x9016…9020               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0078}
0x9020…904e               Head {h00=0x002a, h01=0x0050, text=»TIOKBO EQU TIOPCO KEYBOARD/CTW, OUTPUT«, t00=0x005c, t01=0x0082}
0x904e…9058               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00b0}
0x9058…906e               Head {h00=0x0012, h01=0x0050, text=»* T I O I T O «, t00=0x005c, t01=0x00ba}
0x906e…9078               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00d0}
0x9078…90b2               Head {h00=0x0036, h01=0x0050, text=»TIOITO EQU A15RTN INTERTASK COMMUNICATION, OUTPUT «, t00=0x005c, t01=0x00da}
0x90b2…90bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0114}
0x90bc…90d2               Head {h00=0x0012, h01=0x0050, text=»* T I O D K O «, t00=0x005c, t01=0x011e}
0x90d2…90dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0134}
0x90dc…9102               Head {h00=0x0022, h01=0x0050, text=»TIODKO EQU TIODKI DISC, OUTPUT«, t00=0x005c, t01=0x013e}
0x9102…910c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0164}
0x910c…9124               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x005c, t01=0x016e}
0x9124…912e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0186}
0x912e…9144               Head {h00=0x0012, h01=0x0050, text=»* T E N : D M «, t00=0x005c, t01=0x0190}
0x9144…914e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0016}
0x914e…9188               Head {h00=0x0036, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TENDIO' WHEN A REQUEST«, t00=0x005d, t01=0x0020}
0x9188…91ba               Head {h00=0x002e, h01=0x0050, text=»* FOR DATA MANAGEMENT HAS BEEN COMPLETED. «, t00=0x005d, t01=0x005a}
0x91ba…9202               Head {h00=0x0044, h01=0x0050, text=»* NOTICE THAT MODULES 'TENDKI' AND 'TENDKO' ARE EQUAL TO TEN:DM.«, t00=0x005d, t01=0x008c}
0x9202…920c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00d4}
0x920c…922e               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x005d, t01=0x00de}
0x922e…9256               Head {h00=0x0024, h01=0x0050, text=»*         A8 = USER ECB ADDRESS «, t00=0x005d, t01=0x0100}
0x9256…9260               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0128}
0x9260…9282               Head {h00=0x001e, h01=0x0050, text=»* OUTPUT: A1 IS DESTROYED «, t00=0x005d, t01=0x0132}
0x9282…928c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0154}
0x928c…92be               Head {h00=0x002e, h01=0x0050, text=»TEN:DM EQU * DATA MANAGEMENT, INPUT/OUTPUT«, t00=0x005d, t01=0x015e}
0x92be…92e6               Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTMEC,A6 MMU ECB ADDRESS«, t00=0x005d, t01=0x0190}
0x92e6…9312               Head {h00=0x0028, h01=0x0050, text=» LD A1,ECBCW2,A1 SECOND CONTROL WORD«, t00=0x005e, t01=0x0028}
0x9312…932a               Head {h00=0x0014, h01=0x0050, text=» ES A1,ECBCW2,A8«, t00=0x005e, t01=0x0054}
0x932a…933a               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x005e, t01=0x006c}
0x933a…9344               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x007c}
0x9344…935c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x005e, t01=0x0086}
0x935c…9366               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x009e}
0x9366…937c               Head {h00=0x0012, h01=0x0050, text=»* T E N P C I «, t00=0x005e, t01=0x00a8}
0x937c…9386               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x00be}
0x9386…93ce               Head {h00=0x0044, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TENDIO' WHEN A READ REQUEST HAS BEEN«, t00=0x005e, t01=0x00c8}
0x93ce…9412               Head {h00=0x0040, h01=0x0050, text=»* COMPLETED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL.«, t00=0x005e, t01=0x0110}
0x9412…9454               Head {h00=0x003e, h01=0x0050, text=»* TENPCI PERFORMS A MOVE OF THE CONTENTS OF THE DWT BUFFER«, t00=0x005e, t01=0x0154}
0x9454…9472               Head {h00=0x001a, h01=0x0050, text=»* TO THE USER BUFFER. «, t00=0x005f, t01=0x0008}
0x9472…94ba               Head {h00=0x0044, h01=0x0050, text=»* NOTICE THAT MODULES 'TENKBI' AND 'TENITI' ARE EQUAL TO TENPCI.«, t00=0x005f, t01=0x0026}
0x94ba…94f6               Head {h00=0x0038, h01=0x0050, text=»* NOTICE ALSO THAT ENTRY TEN:DC IS USED BY 'DC:MIN'.«, t00=0x005f, t01=0x006e}
0x94f6…9500               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00aa}
0x9500…9522               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x005f, t01=0x00b4}
0x9522…954a               Head {h00=0x0024, h01=0x0050, text=»*         A8 = USER ECB ADDRESS «, t00=0x005f, t01=0x00d6}
0x954a…9554               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00fe}
0x9554…957e               Head {h00=0x0026, h01=0x0050, text=»* OUTPUT: A1-A4, A8 ARE DESTROYED «, t00=0x005f, t01=0x0108}
0x957e…9588               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0132}
0x9588…95b6               Head {h00=0x002a, h01=0x0050, text=»TENPCI EQU * PROGRAMMED CHANNEL, INPUT«, t00=0x005f, t01=0x013c}
0x95b6…95de               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTECB,A6 DWT ECB ADDRESS«, t00=0x005f, t01=0x016a}
0x95de…9606 (96, 0, 400)  Head {h00=0x0024, h01=0x0050, text=» LD A4,ECBEL,A2 EFFECTIVE LENGTH«, t00=0x0060, t01=0x0004}
0x9606…962c               Head {h00=0x0022, h01=0x0050, text=» RF(NP) TEPI30 NO MOVE IF ZERO«, t00=0x0060, t01=0x002c}
0x962c…9656               Head {h00=0x0026, h01=0x0050, text=» LD A1,ECBBA,A2 DWT BUFFER ADDRESS«, t00=0x0060, t01=0x0052}
0x9656…9660               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x007c}
0x9660…9692               Head {h00=0x002e, h01=0x0050, text=»TEN:DC EQU * ENTRY POINT USED BY 'DC:MIN' «, t00=0x0060, t01=0x0086}
0x9692…96be               Head {h00=0x0028, h01=0x0050, text=» EL A2,ECBBA,A8 USER BUFFER ADDRESS «, t00=0x0060, t01=0x00b8}
0x96be…96e6               Head {h00=0x0024, h01=0x0050, text=» LDK A3,1 CHECK BUFFER ADDRESSES«, t00=0x0060, t01=0x00e4}
0x96e6…96f8               Head {h00=0x000e, h01=0x0050, text=» TM A3,A1 «, t00=0x0060, t01=0x010c}
0x96f8…9726               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TEPI20 DWT BUFFER ADDRESS EVEN «, t00=0x0060, t01=0x011e}
0x9726…9756               Head {h00=0x002c, h01=0x0050, text=» TM A3,A2 NO, CHECK USER BUFFER ADDRESS «, t00=0x0060, t01=0x014c}
0x9756…9784               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TEPI60 USER BUFFER ADDRESS EVEN«, t00=0x0060, t01=0x017c}
0x9784…978e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x001a}
0x978e…97a6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0061, t01=0x0024}
0x97a6…97b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x003c}
0x97b0…97ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0046}
0x97ba…97f0               Head {h00=0x0032, h01=0x0050, text=»TEPI10 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN«, t00=0x0061, t01=0x0050}
0x97f0…9824               Head {h00=0x0030, h01=0x0050, text=»  LDR* A3,A1 FIRST CHARACTER FROM DWT BUFFER«, t00=0x0061, t01=0x0086}
0x9824…9836               Head {h00=0x000e, h01=0x0050, text=» ELR A8,A2«, t00=0x0061, t01=0x00ba}
0x9836…9840               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00cc}
0x9840…986e               Head {h00=0x002a, h01=0x0050, text=»TEPI15 ANK A3,/FF SKIP LEFT CHARACTER «, t00=0x0061, t01=0x00d6}
0x986e…989a               Head {h00=0x0028, h01=0x0050, text=» ANKL A8,/FF00 SKIP RIGHT CHARACTER «, t00=0x0061, t01=0x0104}
0x989a…98ac               Head {h00=0x000e, h01=0x0050, text=» ORR A8,A3«, t00=0x0061, t01=0x0130}
0x98ac…98de               Head {h00=0x002e, h01=0x0050, text=» ESR A8,A2 STORE CHARACTER IN USER BUFFER «, t00=0x0061, t01=0x0142}
0x98de…9906               Head {h00=0x0024, h01=0x0050, text=» ADK A1,1 UPDATE BUFFER POINTERS«, t00=0x0061, t01=0x0174}
0x9906…9918               Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0062, t01=0x000c}
0x9918…992a               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0062, t01=0x001e}
0x992a…9958               Head {h00=0x002a, h01=0x0050, text=» RF(P) TEPI25 MORE CHARACTERS TO MOVE «, t00=0x0062, t01=0x0030}
0x9958…9974               Head {h00=0x0018, h01=0x0050, text=» RTN A15 NO, RETURN «, t00=0x0062, t01=0x005e}
0x9974…997e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x007a}
0x997e…9996               Head {h00=0x0014, h01=0x0050, text=»TEPI20 TM A3,A2 «, t00=0x0062, t01=0x0084}
0x9996…99c4               Head {h00=0x002a, h01=0x0050, text=» RF(Z) TEPI25 USER BUFFER ADDRESS EVEN«, t00=0x0062, t01=0x009c}
0x99c4…99ea               Head {h00=0x0022, h01=0x0050, text=» LDR A3,A1 DWT BUFFER ADDRESS «, t00=0x0062, t01=0x00ca}
0x99ea…9a12               Head {h00=0x0024, h01=0x0050, text=» ADR A3,A4 ADD EFFECTIVE LENGTH «, t00=0x0062, t01=0x00f0}
0x9a12…9a1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0118}
0x9a1c…9a44               Head {h00=0x0024, h01=0x0050, text=»TEPI23 LC A8,-1,A3 ONE CHARACTER«, t00=0x0062, t01=0x0122}
0x9a44…9a7c               Head {h00=0x0034, h01=0x0050, text=» SCR A8,A3 MOVE THIS CHAR. ONE BYTE TO THE RIGHT«, t00=0x0062, t01=0x014a}
0x9a7c…9aa6               Head {h00=0x0026, h01=0x0050, text=» SUK A3,1 POINT TO NEXT CHARACTER «, t00=0x0062, t01=0x0182}
0x9aa6…9ade               Head {h00=0x0034, h01=0x0050, text=» CWR A3,A1 COMPARE WITH START ADDRESS OF BUFFER «, t00=0x0063, t01=0x001c}
0x9ade…9b0c               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TEPI23 MORE CHARACTERS TO MOVE«, t00=0x0063, t01=0x0054}
0x9b0c…9b40               Head {h00=0x0030, h01=0x0050, text=» ADK A1,1 NO, MAKE DWT BUFFER ADDRESS UNEVEN«, t00=0x0063, t01=0x0082}
0x9b40…9b52               Head {h00=0x000e, h01=0x0050, text=» RB TEPI10«, t00=0x0063, t01=0x00b6}
0x9b52…9b5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00c8}
0x9b5c…9b74               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0063, t01=0x00d2}
0x9b74…9b7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00ea}
0x9b7e…9b88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00f4}
0x9b88…9bb8               Head {h00=0x002c, h01=0x0050, text=»TEPI25 LDR A3,A4 CHECK REQUESTED LENGTH «, t00=0x0063, t01=0x00fe}
0x9bb8…9bca               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0063, t01=0x012e}
0x9bca…9bf8               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) TEPI40 EFFECTIVE LENGTH UNEVEN«, t00=0x0063, t01=0x0140}
0x9bf8…9c2c               Head {h00=0x0030, h01=0x0050, text=» MVSU A4 MOVE (SYSTEM BUFFER) TO USER BUFFER«, t00=0x0063, t01=0x016e}
0x9c2c…9c36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0012}
0x9c36…9c4c               Head {h00=0x0012, h01=0x0050, text=»TEPI30 RTN A15«, t00=0x0064, t01=0x001c}
0x9c4c…9c56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0032}
0x9c56…9c86               Head {h00=0x002c, h01=0x0050, text=»TEPI40 EQU * EFFECTIVE LENGTH WAS UNEVEN«, t00=0x0064, t01=0x003c}
0x9c86…9cb2               Head {h00=0x0028, h01=0x0050, text=» SUK A4,1 MAKE EFFECTIVE LENGTH EVEN«, t00=0x0064, t01=0x006c}
0x9cb2…9ce2               Head {h00=0x002c, h01=0x0050, text=» RF(Z) TEPI50 ONLY ONE CHARACTER TO MOVE«, t00=0x0064, t01=0x0098}
0x9ce2…9d00               Head {h00=0x001a, h01=0x0050, text=» LDR A8,A4 NO, SAVE A4«, t00=0x0064, t01=0x00c8}
0x9d00…9d34               Head {h00=0x0030, h01=0x0050, text=» MVSU A4 MOVE (SYSTEM BUFFER) TO USER BUFFER«, t00=0x0064, t01=0x00e6}
0x9d34…9d5e               Head {h00=0x0026, h01=0x0050, text=» ADR A1,A8 UPDATE BUFFER POINTERS «, t00=0x0064, t01=0x011a}
0x9d5e…9d70               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A8«, t00=0x0064, t01=0x0144}
0x9d70…9d7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0156}
0x9d7a…9d8e               Head {h00=0x0010, h01=0x0050, text=»TEPI50 EQU *«, t00=0x0064, t01=0x0160}
0x9d8e…9dc0               Head {h00=0x002e, h01=0x0050, text=» LDR* A8,A1 LAST CHARACTER FROM DWT BUFFER«, t00=0x0064, t01=0x0174}
0x9dc0…9dd2               Head {h00=0x000e, h01=0x0050, text=» ELR A3,A2«, t00=0x0065, t01=0x0016}
0x9dd2…9de4               Head {h00=0x000e, h01=0x0050, text=» RB TEPI15«, t00=0x0065, t01=0x0028}
0x9de4…9dee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x003a}
0x9dee…9e20               Head {h00=0x002e, h01=0x0050, text=»TEPI60 EQU * DWT BUFFER ADDRESS WAS UNEVEN«, t00=0x0065, t01=0x0044}
0x9e20…9e46               Head {h00=0x0022, h01=0x0050, text=» LDR A3,A1 DWT BUFFER ADDRESS «, t00=0x0065, t01=0x0076}
0x9e46…9e6e               Head {h00=0x0024, h01=0x0050, text=» ADR A1,A4 ADD EFFECTIVE LENGTH «, t00=0x0065, t01=0x009c}
0x9e6e…9e78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00c4}
0x9e78…9e9e               Head {h00=0x0022, h01=0x0050, text=»TEPI70 LCR A8,A3 ONE CHARACTER«, t00=0x0065, t01=0x00ce}
0x9e9e…9ed8               Head {h00=0x0036, h01=0x0050, text=» SC A8,-1,A3 MOVE THIS CHAR. ONE BYTE TO THE LEFT «, t00=0x0065, t01=0x00f4}
0x9ed8…9f02               Head {h00=0x0026, h01=0x0050, text=» ADK A3,1 POINT TO NEXT CHARACTER «, t00=0x0065, t01=0x012e}
0x9f02…9f30               Head {h00=0x002a, h01=0x0050, text=» CWR A3,A1 COMPARE WITH ENDING ADDRESS«, t00=0x0065, t01=0x0158}
0x9f30…9f5e               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TEPI70 MORE CHARACTERS TO MOVE«, t00=0x0065, t01=0x0186}
0x9f5e…9f90               Head {h00=0x002e, h01=0x0050, text=» SUR A1,A4 NO, RESTORE DWT BUFFER ADDRESS «, t00=0x0066, t01=0x0024}
0x9f90…9fbe               Head {h00=0x002a, h01=0x0050, text=» SUK A1,1 MAKE DWT BUFFER ADDRESS EVEN«, t00=0x0066, t01=0x0056}
0x9fbe…9fd0               Head {h00=0x000e, h01=0x0050, text=» RB TEPI25«, t00=0x0066, t01=0x0084}
0x9fd0…9fda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0096}
0x9fda…9ff2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0066, t01=0x00a0}
0x9ff2…9ffc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00b8}
0x9ffc…a012               Head {h00=0x0012, h01=0x0050, text=»* T E N M X I «, t00=0x0066, t01=0x00c2}
0xa012…a01c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00d8}
0xa01c…a040               Head {h00=0x0020, h01=0x0050, text=»TENMXI EQU A15RTN MUX, INPUT«, t00=0x0066, t01=0x00e2}
0xa040…a04a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0106}
0xa04a…a060               Head {h00=0x0012, h01=0x0050, text=»* T E N K B I «, t00=0x0066, t01=0x0110}
0xa060…a06a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0126}
0xa06a…a094               Head {h00=0x0026, h01=0x0050, text=»TENKBI EQU TENPCI KEYBOARD, INPUT «, t00=0x0066, t01=0x0130}
0xa094…a09e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x015a}
0xa09e…a0b4               Head {h00=0x0012, h01=0x0050, text=»* T E N I T I «, t00=0x0066, t01=0x0164}
0xa0b4…a0be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x017a}
0xa0be…a0f6               Head {h00=0x0034, h01=0x0050, text=»TENITI EQU TENPCI INTERTASK COMMUNICATION, INPUT«, t00=0x0066, t01=0x0184}
0xa0f6…a100               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x002c}
0xa100…a116               Head {h00=0x0012, h01=0x0050, text=»* T E N D K I «, t00=0x0067, t01=0x0036}
0xa116…a120               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x004c}
0xa120…a146               Head {h00=0x0022, h01=0x0050, text=»TENDKI EQU TEN:DM DISC, INPUT «, t00=0x0067, t01=0x0056}
0xa146…a150               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x007c}
0xa150…a168               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0067, t01=0x0086}
0xa168…a172               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x009e}
0xa172…a188               Head {h00=0x0012, h01=0x0050, text=»* T E N P C O «, t00=0x0067, t01=0x00a8}
0xa188…a192               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00be}
0xa192…a1c6               Head {h00=0x0030, h01=0x0050, text=»TENPCO EQU A15RTN PROGRAMMED CHANNEL, OUTPUT«, t00=0x0067, t01=0x00c8}
0xa1c6…a1d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00fc}
0xa1d0…a1e6               Head {h00=0x0012, h01=0x0050, text=»* T E N M X O «, t00=0x0067, t01=0x0106}
0xa1e6…a1f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x011c}
0xa1f0…a216               Head {h00=0x0022, h01=0x0050, text=»TENMXO EQU A15RTN MUX, OUTPUT «, t00=0x0067, t01=0x0126}
0xa216…a220               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x014c}
0xa220…a236               Head {h00=0x0012, h01=0x0050, text=»* T E N K B O «, t00=0x0067, t01=0x0156}
0xa236…a240               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x016c}
0xa240…a26e               Head {h00=0x002a, h01=0x0050, text=»TENKBO EQU A15RTN KEYBOARD/CTW, OUTPUT«, t00=0x0067, t01=0x0176}
0xa26e…a278               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0014}
0xa278…a28e               Head {h00=0x0012, h01=0x0050, text=»* T E N D K O «, t00=0x0068, t01=0x001e}
0xa28e…a298               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0034}
0xa298…a2be               Head {h00=0x0022, h01=0x0050, text=»TENDKO EQU TEN:DM DISC, OUTPUT«, t00=0x0068, t01=0x003e}
0xa2be…a2c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0064}
0xa2c8…a2e0               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0068, t01=0x006e}
0xa2e0…a2ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0086}
0xa2ea…a300               Head {h00=0x0012, h01=0x0050, text=»* T E N I T O «, t00=0x0068, t01=0x0090}
0xa300…a30a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00a6}
0xa30a…a354               Head {h00=0x0046, h01=0x0050, text=»* THIS MODULE IS CALLED BY 'TENDIO' WHEN A WRITE REQUEST HAS BEEN «, t00=0x0068, t01=0x00b0}
0xa354…a3a4               Head {h00=0x004c, h01=0x0050, text=»* COMPLETED FOR INTERTASK COMMUNICATION, IN PURPOSE TO MOVE THE CONTENTS«, t00=0x0068, t01=0x00fa}
0xa3a4…a3f2               Head {h00=0x004a, h01=0x0050, text=»* OF THE USER BUFFER TO THE DRIVER BUFFER. THE ENTRY TIPO05 IN MODULE «, t00=0x0068, t01=0x014a}
0xa3f2…a422               Head {h00=0x002c, h01=0x0050, text=»* 'TIOPCO' IS USED FOR MOVING THE DATA. «, t00=0x0069, t01=0x0008}
0xa422…a42c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0038}
0xa42c…a44e               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x0069, t01=0x0042}
0xa44e…a458               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0064}
0xa458…a482               Head {h00=0x0026, h01=0x0050, text=»* OUTPUT: A1-A4, A8 ARE DESTROYED «, t00=0x0069, t01=0x006e}
0xa482…a48c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0098}
0xa48c…a4c0               Head {h00=0x0030, h01=0x0050, text=»TENITO EQU * INTERTASK COMMUNICATION, OUTPUT«, t00=0x0069, t01=0x00a2}
0xa4c0…a4e8               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 DWT ECB ADDRESS«, t00=0x0069, t01=0x00d6}
0xa4e8…a510               Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBEL,A8 EFFECTIVE LENGTH«, t00=0x0069, t01=0x00fe}
0xa510…a52e               Head {h00=0x001a, h01=0x0050, text=» RF(NP) TEIO10 NO MOVE«, t00=0x0069, t01=0x0126}
0xa52e…a558               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTUEC,A6 USER ECB ADDRESS «, t00=0x0069, t01=0x0144}
0xa558…a584               Head {h00=0x0028, h01=0x0050, text=» CF A15,TIPO05 MOVE BUFFER CONTENTS «, t00=0x0069, t01=0x016e}
0xa584…a58e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x000a}
0xa58e…a5a4               Head {h00=0x0012, h01=0x0050, text=»TEIO10 RTN A15«, t00=0x006a, t01=0x0014}
0xa5a4…a5ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x002a}
0xa5ae…a5c6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x006a, t01=0x0034}
0xa5c6…a5d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x004c}
0xa5d0…a5e6               Head {h00=0x0012, h01=0x0050, text=»* D C : M O T «, t00=0x006a, t01=0x0056}
0xa5e6…a5f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x006c}
0xa5f0…a630               Head {h00=0x003c, h01=0x0050, text=»* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER«, t00=0x006a, t01=0x0076}
0xa630…a670               Head {h00=0x003c, h01=0x0050, text=»* IN PURPOSE TO MOVE THE CONTENTS OF THE USER BUFFER TO «, t00=0x006a, t01=0x00b6}
0xa670…a6b0               Head {h00=0x003c, h01=0x0050, text=»* THE DRIVER BUFFER. THE MOVE ROUTINE IN MODULE 'TIOPCO'«, t00=0x006a, t01=0x00f6}
0xa6b0…a6d6               Head {h00=0x0022, h01=0x0050, text=»* IS USED FOR MOVING THE DATA.«, t00=0x006a, t01=0x0136}
0xa6d6…a6e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x015c}
0xa6e0…a702               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A6 = DWT ADDRESS«, t00=0x006a, t01=0x0166}
0xa702…a70c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0188}
0xa70c…a738 (107, 0, 400) Head {h00=0x0028, h01=0x0050, text=»* OUTPUT: NO REGISTERS ARE DESTROYED«, t00=0x006b, t01=0x0004}
0xa738…a742               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0030}
0xa742…a772               Head {h00=0x002c, h01=0x0050, text=»DC:MOT EQU * DATA COMMUNICATION, OUTPUT «, t00=0x006b, t01=0x003a}
0xa772…a798               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x006b, t01=0x006a}
0xa798…a7c0               Head {h00=0x0024, h01=0x0050, text=» SUKL A15,32 ADJUST STACKPOINTER«, t00=0x006b, t01=0x0090}
0xa7c0…a7ee               Head {h00=0x002a, h01=0x0050, text=» TS 2,A15 SAVE MMU REGISTERS ON STACK «, t00=0x006b, t01=0x00b8}
0xa7ee…a814               Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A6 TTAB ADDRESS «, t00=0x006b, t01=0x00e6}
0xa814…a83c               Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS«, t00=0x006b, t01=0x010c}
0xa83c…a864               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTMEC,A6 DWT ECB ADDRESS«, t00=0x006b, t01=0x0134}
0xa864…a870               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x006b, t01=0x015c}
0xa870…a89c               Head {h00=0x0028, h01=0x0050, text=» CF A15,TIOPCO MOVE BUFFER CONTENTS «, t00=0x006b, t01=0x0168}
0xa89c…a8a6 (108, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0004}
0xa8a6…a8ce               Head {h00=0x0024, h01=0x0050, text=»DC:RTN EQU * RETURN TO DC DRIVER«, t00=0x006c, t01=0x000e}
0xa8ce…a900               Head {h00=0x002e, h01=0x0050, text=» TL 2,A15 RESTORE MMU REGISTERS FROM STACK«, t00=0x006c, t01=0x0036}
0xa900…a928               Head {h00=0x0024, h01=0x0050, text=» ADKL A15,32 ADJUST STACKPOINTER«, t00=0x006c, t01=0x0068}
0xa928…a956               Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x006c, t01=0x0090}
0xa956…a974               Head {h00=0x001a, h01=0x0050, text=» RTN A15 ...AND RETURN«, t00=0x006c, t01=0x00be}
0xa974…a980               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x00dc}
0xa980…a98a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00e8}
0xa98a…a9a2               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x006c, t01=0x00f2}
0xa9a2…a9ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x010a}
0xa9ac…a9c2               Head {h00=0x0012, h01=0x0050, text=»* D C : M I N «, t00=0x006c, t01=0x0114}
0xa9c2…a9cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x012a}
0xa9cc…aa0c               Head {h00=0x003c, h01=0x0050, text=»* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER«, t00=0x006c, t01=0x0134}
0xaa0c…aa5e               Head {h00=0x004e, h01=0x0050, text=»* IN PURPOSE TO MOVE THE CONTENTS OF THE DRIVER BUFFER TO THE USER BUFFER.«, t00=0x006c, t01=0x0174}
0xaa5e…aa68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0036}
0xaa68…aa8a               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A1 = RETURN CODE«, t00=0x006d, t01=0x0040}
0xaa8a…aab6               Head {h00=0x0028, h01=0x0050, text=»*         A4 = DRIVER BUFFER ADDRESS«, t00=0x006d, t01=0x0062}
0xaab6…aad8               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x006d, t01=0x008e}
0xaad8…aae2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00b0}
0xaae2…ab0e               Head {h00=0x0028, h01=0x0050, text=»* OUTPUT: NO REGISTERS ARE DESTROYED«, t00=0x006d, t01=0x00ba}
0xab0e…ab18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00e6}
0xab18…ab2c               Head {h00=0x0010, h01=0x0050, text=»DC:MIN EQU *«, t00=0x006d, t01=0x00f0}
0xab2c…ab42               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x006d, t01=0x0104}
0xab42…ab58               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x006d, t01=0x011a}
0xab58…ab82               Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x006d, t01=0x0130}
0xab82…ab8e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x015a}
0xab8e…ab98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0166}
0xab98…abae               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x006d, t01=0x0170}
0xabae…abd4               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x006d, t01=0x0186}
0xabd4…abde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x001c}
0xabde…abf4               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x006e, t01=0x0026}
0xabf4…ac1c               Head {h00=0x0024, h01=0x0050, text=» SUKL A15,32 ADJUST STACKPOINTER«, t00=0x006e, t01=0x003c}
0xac1c…ac4a               Head {h00=0x002a, h01=0x0050, text=» TS 2,A15 SAVE MMU REGISTERS ON STACK «, t00=0x006e, t01=0x0064}
0xac4a…ac70               Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A6 TTAB ADDRESS «, t00=0x006e, t01=0x0092}
0xac70…ac98               Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS«, t00=0x006e, t01=0x00b8}
0xac98…aca4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x00e0}
0xaca4…acae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00ec}
0xacae…acc6               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x006e, t01=0x00f6}
0xacc6…acd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x010e}
0xacd0…ace6               Head {h00=0x0012, h01=0x0050, text=»* M I N M O V «, t00=0x006e, t01=0x0118}
0xace6…acf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x012e}
0xacf0…ad12               Head {h00=0x001e, h01=0x0050, text=»* INPUT:  A1 = RETURN CODE«, t00=0x006e, t01=0x0138}
0xad12…ad3e               Head {h00=0x0028, h01=0x0050, text=»*         A4 = DRIVER BUFFER ADDRESS«, t00=0x006e, t01=0x015a}
0xad3e…ad60               Head {h00=0x001e, h01=0x0050, text=»*         A6 = DWT ADDRESS«, t00=0x006e, t01=0x0186}
0xad60…ad6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0018}
0xad6a…ad90               Head {h00=0x0022, h01=0x0050, text=»MINMOV EQU * DC:MIN MOVE ENTRY«, t00=0x006f, t01=0x0022}
0xad90…ad9c               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x006f, t01=0x0048}
0xad9c…adc0               Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTECB,A6 ECB ADDRESS«, t00=0x006f, t01=0x0054}
0xadc0…adee               Head {h00=0x002a, h01=0x0050, text=» LDR A7,A4 SAVE DRIVER BUFFER ADDRESS «, t00=0x006f, t01=0x0078}
0xadee…ae16               Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBEL,A3 EFFECTIVE LENGTH«, t00=0x006f, t01=0x00a6}
0xae16…ae3c               Head {h00=0x0022, h01=0x0050, text=» RF(NP) MIN:40 NOTHING TO MOVE«, t00=0x006f, t01=0x00ce}
0xae3c…ae78               Head {h00=0x0038, h01=0x0050, text=» CW A2,ECBRL,A3 CHECK IF USER BUFFER IS LARGE ENOUGH«, t00=0x006f, t01=0x00f4}
0xae78…aea0               Head {h00=0x0024, h01=0x0050, text=» RF(G) MIN:70 NO, REQUEST ERROR «, t00=0x006f, t01=0x0130}
0xaea0…aeaa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0158}
0xaeaa…aec0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x006f, t01=0x0162}
0xaec0…aeec               Head {h00=0x0028, h01=0x0050, text=» LD A5,ECBBA,A3 USER BUFFER ADDRESS «, t00=0x006f, t01=0x0178}
0xaeec…aefe               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A5«, t00=0x0070, t01=0x0014}
0xaefe…af2a               Head {h00=0x0028, h01=0x0050, text=» ANK A3,1 CHECK USER BUFFER ADDRESS «, t00=0x0070, t01=0x0026}
0xaf2a…af5c               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) MIN:30 USER BUFFER ADDRESS UNEVEN «, t00=0x0070, t01=0x0052}
0xaf5c…af6e               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0070, t01=0x0084}
0xaf6e…af9e               Head {h00=0x002c, h01=0x0050, text=» RF(N) MIN:30 ONLY ONE CHARACTER TO MOVE«, t00=0x0070, t01=0x0096}
0xaf9e…afa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x00c6}
0xafa8…afc0               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0070, t01=0x00d0}
0xafc0…afca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x00e8}
0xafca…afde               Head {h00=0x0010, h01=0x0050, text=»* WORD MOVE «, t00=0x0070, t01=0x00f2}
0xafde…afe8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0106}
0xafe8…affc               Head {h00=0x0010, h01=0x0050, text=»MIN:10 EQU *«, t00=0x0070, t01=0x0110}
0xaffc…b01e               Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A7 MOVE ONE WORD «, t00=0x0070, t01=0x0124}
0xb01e…b030               Head {h00=0x000e, h01=0x0050, text=» STR A3,A5«, t00=0x0070, t01=0x0146}
0xb030…b05c               Head {h00=0x0028, h01=0x0050, text=» ADK A7,2 INCREMENT BUFFER POINTERS «, t00=0x0070, t01=0x0158}
0xb05c…b06e               Head {h00=0x000e, h01=0x0050, text=» ADK A5,2 «, t00=0x0070, t01=0x0184}
0xb06e…b096               Head {h00=0x0024, h01=0x0050, text=» SUK A2,2 DECREMENT LOOP COUNTER«, t00=0x0071, t01=0x0008}
0xb096…b0cc               Head {h00=0x0032, h01=0x0050, text=» RB(NN) MIN:10 AT LEAST ONE MORE WORD TO MOVE «, t00=0x0071, t01=0x0030}
0xb0cc…b0d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0066}
0xb0d6…b0ea               Head {h00=0x0010, h01=0x0050, text=»MIN:20 EQU *«, t00=0x0071, t01=0x0070}
0xb0ea…b0fc               Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0071, t01=0x0084}
0xb0fc…b120               Head {h00=0x0020, h01=0x0050, text=» RF(N) MIN:40 MOVE FINISHED «, t00=0x0071, t01=0x0096}
0xb120…b12a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00ba}
0xb12a…b142               Head {h00=0x0014, h01=0x0050, text=»* CHARACTER MOVE«, t00=0x0071, t01=0x00c4}
0xb142…b14c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00dc}
0xb14c…b160               Head {h00=0x0010, h01=0x0050, text=»MIN:30 EQU *«, t00=0x0071, t01=0x00e6}
0xb160…b186               Head {h00=0x0022, h01=0x0050, text=» LCR A3,A7 MOVE ONE CHARACTER «, t00=0x0071, t01=0x00fa}
0xb186…b198               Head {h00=0x000e, h01=0x0050, text=» SCR A3,A5«, t00=0x0071, t01=0x0120}
0xb198…b1c4               Head {h00=0x0028, h01=0x0050, text=» ADK A7,1 INCREMENT BUFFER POINTERS «, t00=0x0071, t01=0x0132}
0xb1c4…b1d6               Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x0071, t01=0x015e}
0xb1d6…b1fe               Head {h00=0x0024, h01=0x0050, text=» SUK A2,1 DECREMENT LOOP COUNTER«, t00=0x0071, t01=0x0170}
0xb1fe…b238               Head {h00=0x0036, h01=0x0050, text=» RB(P) MIN:30 AT LEAST ONE MORE CHARACTER TO MOVE «, t00=0x0072, t01=0x0008}
0xb238…b244               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x0042}
0xb244…b24e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x004e}
0xb24e…b264               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0072, t01=0x0058}
0xb264…b292               Head {h00=0x002a, h01=0x0050, text=» ST A1,ECBRC,A3 SET RETURN CODE IN ECB«, t00=0x0072, t01=0x006e}
0xb292…b2ba               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A4 DRIVER BUFFER ADDRESS«, t00=0x0072, t01=0x009c}
0xb2ba…b2de               Head {h00=0x0020, h01=0x0050, text=» LDR A4,A2 EFFECTIVE LENGTH «, t00=0x0072, t01=0x00c4}
0xb2de…b308               Head {h00=0x0026, h01=0x0050, text=» LD A8,DWTUEC,A6 USER ECB ADDRESS «, t00=0x0072, t01=0x00e8}
0xb308…b334               Head {h00=0x0028, h01=0x0050, text=» CF A15,TEN:DC MOVE BUFFER CONTENTS «, t00=0x0072, t01=0x0112}
0xb334…b35e               Head {h00=0x0026, h01=0x0050, text=» LDR A4,A7 RESTORE BUFFER ADDRESS «, t00=0x0072, t01=0x013e}
0xb35e…b370               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0072, t01=0x0168}
0xb370…b37c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x017a}
0xb37c…b386               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0186}
0xb386…b39e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0072, t01=0x0190}
0xb39e…b3a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0018}
0xb3a8…b3b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0022}
0xb3b2…b3c6               Head {h00=0x0010, h01=0x0050, text=»MIN:40 EQU *«, t00=0x0073, t01=0x002c}
0xb3c6…b3d2               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0073, t01=0x0040}
0xb3d2…b3f8               Head {h00=0x0022, h01=0x0050, text=» CF A15,TENDIO PERFORM TENDIO «, t00=0x0073, t01=0x004c}
0xb3f8…b402               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0072}
0xb402…b41a               Head {h00=0x0014, h01=0x0050, text=»* RELEASE BUFFER«, t00=0x0073, t01=0x007c}
0xb41a…b424               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0094}
0xb424…b452               Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTADR,A6 DRIVER ADDRESS BLOCK «, t00=0x0073, t01=0x009e}
0xb452…b482               Head {h00=0x002c, h01=0x0050, text=» SU A4,HDRLEN,A1 REAL BUFFER ADDRESS =1 «, t00=0x0073, t01=0x00cc}
0xb482…b4ae               Head {h00=0x0028, h01=0x0050, text=» LD A1,POLADR,A1 BUFFER POOL ADDRESS«, t00=0x0073, t01=0x00fc}
0xb4ae…b4d8               Head {h00=0x0026, h01=0x0050, text=» RF(Z) MIN:60 NO RELEASE OF BUFFER«, t00=0x0073, t01=0x0128}
0xb4d8…b4e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0152}
0xb4e2…b4f6               Head {h00=0x0010, h01=0x0050, text=»MIN:50 EQU *«, t00=0x0073, t01=0x015c}
0xb4f6…b51c               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A1 SAVE BUFFER ADDRESS«, t00=0x0073, t01=0x0170}
0xb51c…b544               Head {h00=0x0024, h01=0x0050, text=» LDR* A1,A2 NEXT BUFFER ADDRESS «, t00=0x0074, t01=0x0008}
0xb544…b574               Head {h00=0x002c, h01=0x0050, text=» RB(NZ) MIN:50 NOT LAST BUFFER IN CHAIN «, t00=0x0074, t01=0x0030}
0xb574…b57e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0060}
0xb57e…b5a6               Head {h00=0x0024, h01=0x0050, text=»* INSERT BUFFER AT END OF CHAIN «, t00=0x0074, t01=0x006a}
0xb5a6…b5b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0092}
0xb5b0…b5d6               Head {h00=0x0022, h01=0x0050, text=» STR A4,A2 UPDATE QUEUE LINKS «, t00=0x0074, t01=0x009c}
0xb5d6…b5e6               Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x0074, t01=0x00c2}
0xb5e6…b5f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00d2}
0xb5f0…b604               Head {h00=0x0010, h01=0x0050, text=»MIN:60 EQU *«, t00=0x0074, t01=0x00dc}
0xb604…b61a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0074, t01=0x00f0}
0xb61a…b646               Head {h00=0x0028, h01=0x0050, text=» ABL IHRET8 RESTORE A1-A8 AND RETURN«, t00=0x0074, t01=0x0106}
0xb646…b652               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x0132}
0xb652…b65c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x013e}
0xb65c…b674               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0074, t01=0x0148}
0xb674…b67e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0160}
0xb67e…b688               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x016a}
0xb688…b69e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0074, t01=0x0174}
0xb69e…b6b4               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0074, t01=0x018a}
0xb6b4…b6e2               Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x0075, t01=0x0010}
0xb6e2…b6ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x003e}
0xb6ec…b710               Head {h00=0x0020, h01=0x0050, text=»DC:MOT RTN A15 ...AND RETURN«, t00=0x0075, t01=0x0048}
0xb710…b71c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x006c}
0xb71c…b726               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0078}
0xb726…b73c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0075, t01=0x0082}
0xb73c…b762               Head {h00=0x0022, h01=0x0050, text=» RB DC:RTN RETURN TO DC DRIVER«, t00=0x0075, t01=0x0098}
0xb762…b76e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x00be}
0xb76e…b778               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00ca}
0xb778…b78c               Head {h00=0x0010, h01=0x0050, text=»* ERROR EXIT«, t00=0x0075, t01=0x00d4}
0xb78c…b796               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00e8}
0xb796…b7bc               Head {h00=0x0022, h01=0x0050, text=»MIN:70 EQU * DC:MIN ERROR EXIT«, t00=0x0075, t01=0x00f2}
0xb7bc…b7f2               Head {h00=0x0032, h01=0x0050, text=» LDKL A1,/8008 REQUEST ERROR/INCORRECT LENGTH «, t00=0x0075, t01=0x0118}
0xb7f2…b81a               Head {h00=0x0024, h01=0x0050, text=» RB MIN:40 RETURN VIA TENDIO ETC«, t00=0x0075, t01=0x014e}
0xb81a…b824               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0176}
0xb824…b83c               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0075, t01=0x0180}
0xb83c…b846               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0008}
0xb846…b850               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0012}
0xb850…b866               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0076, t01=0x001c}
0xb866…b87c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0076, t01=0x0032}
0xb87c…b890               Head {h00=0x0010, h01=0x0050, text=»DC:MOT EQU *«, t00=0x0076, t01=0x0048}
0xb890…b8c6               Head {h00=0x0032, h01=0x0050, text=»  ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS«, t00=0x0076, t01=0x005c}
0xb8c6…b8d2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x0092}
0xb8d2…b8dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x009e}
0xb8dc…b8f4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0076, t01=0x00a8}
0xb8f4…b8fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00c0}
0xb8fe…b908               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00ca}
0xb908…b91a               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0076, t01=0x00d4}
0xb91a…b92c               Head {h00=0x000e, h01=0x0050, text=»* TENDIO *«, t00=0x0076, t01=0x00e6}
0xb92c…b93e               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0076, t01=0x00f8}
0xb93e…b948               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x010a}
0xb948…b952               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0114}
0xb952…b984               Head {h00=0x002e, h01=0x0050, text=»* THIS MODULE IS CALLED WHEN COMPLETION OF«, t00=0x0076, t01=0x011e}
0xb984…b99a               Head {h00=0x0012, h01=0x0050, text=»* I/O OCCURS. «, t00=0x0076, t01=0x0150}
0xb99a…b9a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0166}
0xb9a4…b9d0               Head {h00=0x0028, h01=0x0050, text=»* - IF I/O AND ACTIVATION REQUEST:- «, t00=0x0076, t01=0x0170}
0xb9d0…b9da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x000c}
0xb9da…ba08               Head {h00=0x002a, h01=0x0050, text=»*   ACTOTP IS CALLED TO START THE TASK«, t00=0x0077, t01=0x0016}
0xba08…ba12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0044}
0xba12…ba36               Head {h00=0x0020, h01=0x0050, text=»* -IF NORMAL I/O WITH WAIT:-«, t00=0x0077, t01=0x004e}
0xba36…ba40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0072}
0xba40…ba6e               Head {h00=0x002a, h01=0x0050, text=»*   QTJOB IS CALLED TO QUEUE THE TASK «, t00=0x0077, t01=0x007c}
0xba6e…baaa               Head {h00=0x0038, h01=0x0050, text=»*   FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- «, t00=0x0077, t01=0x00aa}
0xbaaa…bab4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x00e6}
0xbab4…bad2               Head {h00=0x001a, h01=0x0050, text=»*   A5 = TTAB ADDRESS «, t00=0x0077, t01=0x00f0}
0xbad2…badc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x010e}
0xbadc…bb04               Head {h00=0x0024, h01=0x0050, text=»* -IF NORMAL I/O WITH NO WAIT:- «, t00=0x0077, t01=0x0118}
0xbb04…bb0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0140}
0xbb0e…bb2c               Head {h00=0x001a, h01=0x0050, text=»*   NO ACTION REQUIRED«, t00=0x0077, t01=0x014a}
0xbb2c…bb36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0168}
0xbb36…bb78               Head {h00=0x003e, h01=0x0050, text=»* IF AN EVENT WAS QUEUED FOR THIS DEVICE (DWTTQ NOT ZERO) «, t00=0x0077, t01=0x0172}
0xbb78…bbc6               Head {h00=0x004a, h01=0x0050, text=»* THAT TASK IS PUT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION. «, t00=0x0078, t01=0x0024}
0xbbc6…bbd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0072}
0xbbd0…bbe8               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0078, t01=0x007c}
0xbbe8…bbf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0094}
0xbbf2…bbfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x009e}
0xbbfc…bc30               Head {h00=0x0030, h01=0x0050, text=»* ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- «, t00=0x0078, t01=0x00a8}
0xbc30…bc3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x00dc}
0xbc3a…bc56               Head {h00=0x0018, h01=0x0050, text=»*   A1 = RETURN CODE«, t00=0x0078, t01=0x00e6}
0xbc56…bc60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0102}
0xbc60…bc7c               Head {h00=0x0018, h01=0x0050, text=»*   A6 = DWT ADDRESS«, t00=0x0078, t01=0x010c}
0xbc7c…bc86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0128}
0xbc86…bcaa               Head {h00=0x0020, h01=0x0050, text=»* NO REGISTERS ARE DESTROYED«, t00=0x0078, t01=0x0132}
0xbcaa…bcb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0156}
0xbcb4…bcea               Head {h00=0x0032, h01=0x0050, text=»* WHEN RUNNING WITH MMU OPTION SPECIAL DEVICE «, t00=0x0078, t01=0x0160}
0xbcea…bd18               Head {h00=0x002a, h01=0x0050, text=»* DEPENDENT SUBROUTINES ARE PERFORMED.«, t00=0x0079, t01=0x0008}
0xbd18…bd22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0036}
0xbd22…bd3a               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0079, t01=0x0040}
0xbd3a…bd44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0058}
0xbd44…bd5c               Head {h00=0x0014, h01=0x0050, text=»* END I/O ENTRY «, t00=0x0079, t01=0x0062}
0xbd5c…bd66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x007a}
0xbd66…bd7a               Head {h00=0x0010, h01=0x0050, text=»TENDIO EQU *«, t00=0x0079, t01=0x0084}
0xbd7a…bd90               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0079, t01=0x0098}
0xbd90…bdba               Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0079, t01=0x00ae}
0xbdba…bdc6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x00d8}
0xbdc6…bdd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00e4}
0xbdd0…bde6               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0079, t01=0x00ee}
0xbde6…bdf2               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0079, t01=0x0104}
0xbdf2…be18               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0079, t01=0x0110}
0xbe18…be24               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0136}
0xbe24…be2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0142}
0xbe2e…be42               Head {h00=0x0010, h01=0x0050, text=»TEN090 EQU *«, t00=0x0079, t01=0x014c}
0xbe42…be4e               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0079, t01=0x0160}
0xbe4e…be6c               Head {h00=0x001a, h01=0x0050, text=» LDR A4,A6 DWT ADDRESS«, t00=0x0079, t01=0x016c}
0xbe6c…be96               Head {h00=0x0026, h01=0x0050, text=» ADK A4,DWTST POINT TO DWT STATUS «, t00=0x0079, t01=0x018a}
0xbe96…bea2               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x007a, t01=0x0024}
0xbea2…bece               Head {h00=0x0028, h01=0x0050, text=» LD A5,DWTTQ,A6 TERMINAL QUEUE LINK «, t00=0x007a, t01=0x0030}
0xbece…bef2               Head {h00=0x0020, h01=0x0050, text=» RF(Z) TEN110 NO TASK QUEUED«, t00=0x007a, t01=0x005c}
0xbef2…bf12               Head {h00=0x001c, h01=0x0050, text=» LDKL A2,/800 ATTACH BIT«, t00=0x007a, t01=0x0080}
0xbf12…bf26               Head {h00=0x0010, h01=0x0050, text=» ANR* A2,A4 «, t00=0x007a, t01=0x00a0}
0xbf26…bf50               Head {h00=0x0026, h01=0x0050, text=» RF(Z) TEN100 DEVICE NOT ATTACHED «, t00=0x007a, t01=0x00b4}
0xbf50…bf80               Head {h00=0x002c, h01=0x0050, text=» CW A5,DWTTAB,A6 ATTACHED TO OTHER TASK «, t00=0x007a, t01=0x00de}
0xbf80…bfac               Head {h00=0x0028, h01=0x0050, text=» RF(NE) TEN110 YES, DON'T QUEUE TASK«, t00=0x007a, t01=0x010e}
0xbfac…bfb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x013a}
0xbfb6…bfce               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007a, t01=0x0144}
0xbfce…bfd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x015c}
0xbfd8…bfe2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0166}
0xbfe2…bff6               Head {h00=0x0010, h01=0x0050, text=»TEN100 EQU *«, t00=0x007a, t01=0x0170}
0xbff6…c026               Head {h00=0x002c, h01=0x0050, text=» LDR* A3,A5 UPDATE QUEUE ANCHOR ADDRESS «, t00=0x007a, t01=0x0184}
0xc026…c03e               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTTQ,A6 «, t00=0x007b, t01=0x0024}
0xc03e…c070               Head {h00=0x002e, h01=0x0050, text=» CF A15,QTJOB QUEUE TASK TO REPEAT REQUEST«, t00=0x007b, t01=0x003c}
0xc070…c07a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x006e}
0xc07a…c096               Head {h00=0x0018, h01=0x0050, text=»* UPDATE ECB AND DWT«, t00=0x007b, t01=0x0078}
0xc096…c0a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0094}
0xc0a0…c0d4               Head {h00=0x0030, h01=0x0050, text=»TEN110 LD A5,DWTTAB,A6 TTAB ADDRESS FROM DWT«, t00=0x007b, t01=0x009e}
0xc0d4…c0de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00d2}
0xc0de…c0fa               Head {h00=0x0018, h01=0x0050, text=»TEN120 LDKL A2,/8000«, t00=0x007b, t01=0x00dc}
0xc0fa…c12a               Head {h00=0x002c, h01=0x0050, text=» ORRS A2,A4 INDICATE DEVICE READY IN DWT«, t00=0x007b, t01=0x00f8}
0xc12a…c140               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/DBFF«, t00=0x007b, t01=0x0128}
0xc140…c16c               Head {h00=0x0028, h01=0x0050, text=» ANRS A3,A4 RESET ECHO BIT AND BIT 5«, t00=0x007b, t01=0x013e}
0xc16c…c190               Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTECB,A6 ECB ADDRESS«, t00=0x007b, t01=0x016a}
0xc190…c1ce               Head {h00=0x003a, h01=0x0050, text=» RF(Z) TEN260 BRANCH IF ENTERED FROM ECHO OR RECOVERY «, t00=0x007b, t01=0x018e}
0xc1ce…c1d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x003c}
0xc1d8…c1f0               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007c, t01=0x0046}
0xc1f0…c1fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x005e}
0xc1fa…c204               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0068}
0xc204…c232               Head {h00=0x002a, h01=0x0050, text=» ORRS A2,A3 SET EVENT COMPLETED IN ECB«, t00=0x007c, t01=0x0072}
0xc232…c262               Head {h00=0x002c, h01=0x0050, text=» ORS A1,ECBRC,A3 SET RETURN CODE IN ECB «, t00=0x007c, t01=0x00a0}
0xc262…c26c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00d0}
0xc26c…c282               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x007c, t01=0x00da}
0xc282…c29e               Head {h00=0x0018, h01=0x0050, text=» LD A4,TTB:PW,A5 PSW«, t00=0x007c, t01=0x00f0}
0xc29e…c2c4               Head {h00=0x0022, h01=0x0050, text=» ANK A4,1 SYSTEM/USER MODE BIT«, t00=0x007c, t01=0x010c}
0xc2c4…c2e6               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TEN200 SYSTEM MODE «, t00=0x007c, t01=0x0132}
0xc2e6…c2f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0154}
0xc2f0…c30c               Head {h00=0x0018, h01=0x0050, text=»* LOAD MMU REGISTERS«, t00=0x007c, t01=0x015e}
0xc30c…c316               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x017a}
0xc316…c32a               Head {h00=0x0010, h01=0x0050, text=»TEN130 EQU *«, t00=0x007c, t01=0x0184}
0xc32a…c352               Head {h00=0x0024, h01=0x0050, text=» SUKL A15,32 ADJUST STACKPOINTER«, t00=0x007d, t01=0x0008}
0xc352…c380               Head {h00=0x002a, h01=0x0050, text=» TS 2,A15 SAVE MMU REGISTERS ON STACK «, t00=0x007d, t01=0x0030}
0xc380…c3b2               Head {h00=0x002e, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS FROM TTAB«, t00=0x007d, t01=0x005e}
0xc3b2…c3bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0090}
0xc3bc…c3d4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007d, t01=0x009a}
0xc3d4…c3de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00b2}
0xc3de…c400               Head {h00=0x001e, h01=0x0050, text=»* MOVE DWT ECB TO USER ECB«, t00=0x007d, t01=0x00bc}
0xc400…c40a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00de}
0xc40a…c434               Head {h00=0x0026, h01=0x0050, text=» LD A8,DWTUEC,A6 USER ECB ADDRESS «, t00=0x007d, t01=0x00e8}
0xc434…c446               Head {h00=0x000e, h01=0x0050, text=» ELR A4,A8«, t00=0x007d, t01=0x0112}
0xc446…c474               Head {h00=0x002a, h01=0x0050, text=» ORR A4,A2 SET EVENT COMPLETED IN ECB «, t00=0x007d, t01=0x0124}
0xc474…c486               Head {h00=0x000e, h01=0x0050, text=» ESR A4,A8«, t00=0x007d, t01=0x0152}
0xc486…c498               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x007d, t01=0x0164}
0xc498…c4ae               Head {h00=0x0012, h01=0x0050, text=» ADK A1,ECBEL «, t00=0x007d, t01=0x0176}
0xc4ae…c4c0               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x007d, t01=0x018c}
0xc4c0…c4d6               Head {h00=0x0012, h01=0x0050, text=» ADK A2,ECBEL «, t00=0x007e, t01=0x000e}
0xc4d6…c4e8               Head {h00=0x000e, h01=0x0050, text=» LDK A4,6 «, t00=0x007e, t01=0x0024}
0xc4e8…c520               Head {h00=0x0034, h01=0x0050, text=» MVSU A4 MOVE EFF. LENGTH, RTN CODE & CNTRL WORD«, t00=0x007e, t01=0x0036}
0xc520…c52a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x006e}
0xc52a…c562               Head {h00=0x0034, h01=0x0050, text=» LD A3,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK«, t00=0x007e, t01=0x0078}
0xc562…c588               Head {h00=0x0022, h01=0x0050, text=» LD A3,DEVIND,A3 DEVICE INDEX «, t00=0x007e, t01=0x00b0}
0xc588…c5b8               Head {h00=0x002c, h01=0x0050, text=» RF(N) TEN160 NO SPECIAL ACTION REQUIRED«, t00=0x007e, t01=0x00d6}
0xc5b8…c5de               Head {h00=0x0022, h01=0x0050, text=» RF(Z) TEN140 DATA MANAGEMENT «, t00=0x007e, t01=0x0106}
0xc5de…c602               Head {h00=0x0020, h01=0x0050, text=» CWK A3,DK:DIX CHECK IF DISC«, t00=0x007e, t01=0x012c}
0xc602…c61c               Head {h00=0x0016, h01=0x0050, text=» RF(E) TEN140 DISC«, t00=0x007e, t01=0x0150}
0xc61c…c626               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x016a}
0xc626…c64c               Head {h00=0x0022, h01=0x0050, text=»* PERFORM CHECK ON ORDER CODE «, t00=0x007e, t01=0x0174}
0xc64c…c656               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x000a}
0xc656…c686               Head {h00=0x002c, h01=0x0050, text=» CF A15,RD:WR CHECK IF IT WAS READ/WRITE«, t00=0x007f, t01=0x0014}
0xc686…c6b8               Head {h00=0x002e, h01=0x0050, text=» RF(Z) TEN160 JUMP IF NO READ/WRITE ORDER «, t00=0x007f, t01=0x0044}
0xc6b8…c6c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0076}
0xc6c2…c6d6               Head {h00=0x0010, h01=0x0050, text=»TEN140 EQU *«, t00=0x007f, t01=0x0080}
0xc6d6…c6e2               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x007f, t01=0x0094}
0xc6e2…c722               Head {h00=0x003c, h01=0x0050, text=» CFI A15,TENTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE«, t00=0x007f, t01=0x00a0}
0xc722…c72c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00e0}
0xc72c…c744               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x007f, t01=0x00ea}
0xc744…c74e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0102}
0xc74e…c76e               Head {h00=0x001c, h01=0x0050, text=»* RESTORE MMU REGISTERS «, t00=0x007f, t01=0x010c}
0xc76e…c778               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x012c}
0xc778…c78c               Head {h00=0x0010, h01=0x0050, text=»TEN150 EQU *«, t00=0x007f, t01=0x0136}
0xc78c…c798               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x007f, t01=0x014a}
0xc798…c7a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0156}
0xc7a2…c7b6               Head {h00=0x0010, h01=0x0050, text=»TEN160 EQU *«, t00=0x007f, t01=0x0160}
0xc7b6…c7e8               Head {h00=0x002e, h01=0x0050, text=» TL 2,A15 RESTORE MMU REGISTERS FROM STACK«, t00=0x007f, t01=0x0174}
0xc7e8…c810               Head {h00=0x0024, h01=0x0050, text=» ADKL A15,32 ADJUST STACKPOINTER«, t00=0x0080, t01=0x0016}
0xc810…c81c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x003e}
0xc81c…c826               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x004a}
0xc826…c83e               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0080, t01=0x0054}
0xc83e…c848               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x006c}
0xc848…c886               Head {h00=0x003a, h01=0x0050, text=»* CHECK IF NO WAIT, WAIT, MULTIPLE WAIT OR ACTIVATION «, t00=0x0080, t01=0x0076}
0xc886…c890               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00b4}
0xc890…c8a4               Head {h00=0x0010, h01=0x0050, text=»TEN200 EQU *«, t00=0x0080, t01=0x00be}
0xc8a4…c8d4               Head {h00=0x002c, h01=0x0050, text=» LD A4,DWTWAT,A6 WAIT/ACTIVATE INDICATOR«, t00=0x0080, t01=0x00d2}
0xc8d4…c900               Head {h00=0x0028, h01=0x0050, text=» RF(Z) TEN250 NOT WAIT OR ACTIVATION«, t00=0x0080, t01=0x0102}
0xc900…c912               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0080, t01=0x012e}
0xc912…c92c               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TEN240 WAIT«, t00=0x0080, t01=0x0140}
0xc92c…c93e               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0080, t01=0x015a}
0xc93e…c950               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A4«, t00=0x0080, t01=0x016c}
0xc950…c962               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0080, t01=0x017e}
0xc962…c982               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TEN230 ACTIVATION«, t00=0x0080, t01=0x0190}
0xc982…c9a6               Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x0081, t01=0x0020}
0xc9a6…c9b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0044}
0xc9b0…c9c6               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0081, t01=0x004e}
0xc9c6…c9f4               Head {h00=0x002a, h01=0x0050, text=» AN A3,TTB:PW,A5 SYSTEM/USER MODE BIT «, t00=0x0081, t01=0x0064}
0xc9f4…ca16               Head {h00=0x001e, h01=0x0050, text=» RF(Z) TEN210 SYSTEM MODE «, t00=0x0081, t01=0x0092}
0xca16…ca48               Head {h00=0x002e, h01=0x0050, text=» LD A8,DWTUEC,A6 NO, GET USER ECB ADDRESS «, t00=0x0081, t01=0x00b4}
0xca48…ca54               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x00e6}
0xca54…ca5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00f2}
0xca5e…ca72               Head {h00=0x0010, h01=0x0050, text=»TEN210 EQU *«, t00=0x0081, t01=0x00fc}
0xca72…caaa               Head {h00=0x0034, h01=0x0050, text=» ST A8,TTB:SA+16,A5 SET TO A8 IN TTAB SAVE AREA «, t00=0x0081, t01=0x0110}
0xcaaa…cab4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0148}
0xcab4…caf2               Head {h00=0x003a, h01=0x0050, text=»TEN220 ADK A4,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR «, t00=0x0081, t01=0x0152}
0xcaf2…cb16               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 NEXT DWT ADDRESS«, t00=0x0081, t01=0x0190}
0xcb16…cb3a               Head {h00=0x0020, h01=0x0050, text=» RF(Z) TEN240 NO MORE DWT:S «, t00=0x0082, t01=0x0024}
0xcb3a…cb5e               Head {h00=0x0020, h01=0x0050, text=» CMR A4 SET TO NO WAIT AGAIN«, t00=0x0082, t01=0x0048}
0xcb5e…cb70               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0082, t01=0x006c}
0xcb70…cb82               Head {h00=0x000e, h01=0x0050, text=» RB TEN220«, t00=0x0082, t01=0x007e}
0xcb82…cb8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0090}
0xcb8c…cba4               Head {h00=0x0014, h01=0x0050, text=» EJECT   TOSSIO «, t00=0x0082, t01=0x009a}
0xcba4…cbae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00b2}
0xcbae…cbb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00bc}
0xcbb8…cbcc               Head {h00=0x0010, h01=0x0050, text=»TEN230 EQU *«, t00=0x0082, t01=0x00c6}
0xcbcc…cc08               Head {h00=0x0038, h01=0x0050, text=» CF A15,FREBLK ACTIVATE: GET PARAMETER AND DISP ADDR«, t00=0x0082, t01=0x00da}
0xcc08…cc3a               Head {h00=0x002e, h01=0x0050, text=» CF A15,ACTOTP ACTIVATE TASK ON LIFO BASIS«, t00=0x0082, t01=0x0116}
0xcc3a…cc4c               Head {h00=0x000e, h01=0x0050, text=» RF TEN250«, t00=0x0082, t01=0x0148}
0xcc4c…cc56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x015a}
0xcc56…cc6a               Head {h00=0x0010, h01=0x0050, text=»TEN240 EQU *«, t00=0x0082, t01=0x0164}
0xcc6a…cca0               Head {h00=0x0032, h01=0x0050, text=» CF A15,QTJOB WAIT: QUEUE TASK FOR DISPATCHING«, t00=0x0082, t01=0x0178}
0xcca0…ccaa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x001e}
0xccaa…ccbe               Head {h00=0x0010, h01=0x0050, text=»TEN250 EQU *«, t00=0x0083, t01=0x0028}
0xccbe…cce6               Head {h00=0x0024, h01=0x0050, text=» CM DWTECB,A6 RESET ECB ADDRESS «, t00=0x0083, t01=0x003c}
0xcce6…ccf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0064}
0xccf0…cd04               Head {h00=0x0010, h01=0x0050, text=»TEN260 EQU *«, t00=0x0083, t01=0x006e}
0xcd04…cd1a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0083, t01=0x0082}
0xcd1a…cd2e               Head {h00=0x0010, h01=0x0050, text=» ABL IHRET8 «, t00=0x0083, t01=0x0098}
0xcd2e…cd3a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x00ac}
0xcd3a…cd44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x00b8}
0xcd44…cd5a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0083, t01=0x00c2}
0xcd5a…cd88               Head {h00=0x002a, h01=0x0050, text=» MLR 8,A15 RESTORE A1-A8 FROM STACK...«, t00=0x0083, t01=0x00d8}
0xcd88…cda6               Head {h00=0x001a, h01=0x0050, text=» RTN A15 ...AND RETURN«, t00=0x0083, t01=0x0106}
0xcda6…cdb2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x0124}
0xcdb2…cdbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0130}
0xcdbc…cdc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x013a}
0xcdc6…cdd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0144}
0xcdd0…cddc               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0083, t01=0x014e}
0xcddc…cde0               Head {h00=0x4004, h01=0x0000}
0xcde0…cde4               00 83 01 5a                                                                                                                                                                                                                                       ┆   Z┆
0xcde4…cdec (132, 1, 8)   20 04 00 00 00 84 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view