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

⟦65f9960f4⟧ 

    Length: 43232 (0xa8e0)
    Notes: pts_type(SC)
    Names: »DRND01.SC«

Derivation

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

PTS(SC)

	IDENT DRND01 	REL 11.0 81-05-27 870105041100 

			=2, INTERRUPT TABLES INCLUDED
			REL 11.0 81-05-25
			=1, COND. ASS. FOR ONLY SUM-CONN.
			REL 11.0 81-01-26
* 
* 
* 
************************************************************
* 
*   PHILIPS TERMINAL SYSTEM  PTS
* 
*   DRND01  =  TERMINAL NETWORK DISTRIBUTOR 
* 
* 
* 
************************************************************
* 
* 
*   THIS PROGRAM CONTAINS INPUT AND OUTPUT ENTRIES
*   CALLED BY TERMINAL DEVICE DRIVERS. AT CALL, IT
*   CHECKS CHANNEL PARAMETERS IN DWT, AND BRANCHES
*   TO THE APPROPRIATE LINE DRIVER FOR EXECUTION OF 
*   THE I/O REQUEST. THIS CONSTRUCTION MAKES IT 
*   POSSIBLE TO HAVE ONLY ONE TERMINAL DEVICE DRIVER
*   FOR EACH TERMINAL DEVICE, IRRESPECTIVE OF 
*   CONNECTION TYPE. IT IS ALSO POSSIBLE TO USE 
*   SEVERAL TERMINAL DEVICE CHANNEL UNITS TOGETHER
*   IN THE SAME SYSTEM. 
* 
*   THE PROGRAM ALSO CONTAINS A NUMBER OF SERVICE 
*   SUBROUTINES TO BE USED BY TERMINAL DEVICE DRIVERS 
*   AND LINE DRIVERS. 
* 
	EJECT
* 
*   THE PROGRAM IS DIVIDED INTO A NUMBER OF SECTIONS. 
*   SECTIONS CONTAINING PROGRAM CODE ARE DIVIDED
*   INTO ROUTINES. THE ROUTINES ARE LISTED AT 
*   BEGINNING OF EACH SECTION. THE SECTIONS, IN 
*   ORDER OF APPEARANCE IN LIST, ARE: 
* 
*	NAME	   FUNCTION
* 
*	ENTRIES	   DECLARE ENTRY POINTS 
*	EXTERNALS   DECLARE EXTERNAL REFERENCES 
*	CONDITION   SET CONDITIONAL ASSEMBLY PARAMETERS 
*	CONSTANTS   SET CONSTANT VALUES 
*	DATA	   DATA AREAS
* 
*	DEVICE DR   ROUTINES CALLED BY DEVICE DRIVERS 
*	LINE DR	   ROUTINES CALLED BY LINE DRIVERS
* 
	EJECT
* 
*********** 
* ENTRIES * 
*********** 
* 
*    TERMINAL DEVICE DRIVER REQUESTS
* 
	ENTRY	INPUT	INPUT OF ONE CHARACTER 
	ENTRY	STABLK	DEFINE START OF BLOCK 
	ENTRY	OUTPUT	OUTPUT OF ONE CHARACTER 
	ENTRY	ENDBLK	DEFINE END OF BLOCK 
	ENTRY	ECHRTN	RETURN FROM ECHO
	ENTRY	ECHO	ECHO ROUTINE
	ENTRY	ECHEND	END OF ECHO 
	ENTRY	GETCHR	GET ONE CHARACTER FROM ECB-BUFFER 
	ENTRY	ABORT	ABORT INPUT REQUEST
* 
* 
*    TERMINAL DEVICE DRIVER EXIT ROUTINES 
* 
	ENTRY	LENDER	REQUEST ERR, END I/O & DISPATCH 
	ENTRY	LENDIS	END I/O & DISPATCH
	ENTRY	LDISP	DISPATCH 
* 
* 
*    LINE DRIVER EXIT ROUTINES
* 
	ENTRY	NDREPO	POP, OK & RETURN
	ENTRY	NDRETO	OK & RETURN 
	ENTRY	NDREP	POP & RETURN 
	ENTRY	NDRET	RETURN 
* 
	EJECT
* 
*    LINE DRIVER SERVICE ROUTINES 
* 
	ENTRY	NDSAV8	SAVE A3-A5, A7-A8 IN DWT
	ENTRY	NDGET8	GET A3-A5, A7-A8 FROM DWT 
	ENTRY	NDREWS	CALL RECOVERY FOR WORK STATION
	ENTRY	NDREDW	CALL RECOVERY FOR DEVICE
	ENTRY	NDGEDN	GET HIGEST DWT NUMBER ON WS 
	ENTRY	NDGEDW	CALCULATE DWT ADDRESS 
* 
	EJECT
* 
*    INTERRUPT TABLE FOR CHLT 
* 
	ENTRY	INTLT1,INTLT2,INTLT3,INTLT4
* 
*    INTERRUPT TABLE FOR CHRT 
* 
	ENTRY	INTRT1,INTRT2,INTRT3,INTRT4
* 
*    INTERRUPT TABLE FOR SALCUZ 
* 
	ENTRY	INTSL1,INTSL2,INTSL3,INTSL4
	ENTRY	INTSL5,INTSL6,INTSL7,INTSL8
* 
*    INTERRUPT TABLE FOR ASCU4Z 
* 
	ENTRY	INTAS1,INTAS2,INTAS3,INTAS4
	ENTRY	INTAS5,INTAS6,INTAS7,INTAS8
* 
*    INTERRUPT TABLE FOR PLC - LOCAL
* 
	ENTRY	INTPL1,INTPL2,INTPL3,INTPL4
* 
*    INTERRUPT TABLE FOR PLC - REMOTE 
* 
	ENTRY	INTPR1,INTPR2,INTPR3,INTPR4
* 
*    INTERRUPT TABLE FOR VIDEO
* 
	ENTRY	INTVU1,INTVU2,INTVU3,INTVU4
	ENTRY	INTVU5,INTVU6,INTVU7,INTVU8
* 
	EJECT
* 
************* 
* EXTERNALS * 
************* 
* 
*    TOSS ROUTINES
* 
	EXTRN	SAVE8	SAVE A1-A8 ON A15 STACK
	EXTRN	TDISP	TOSS DISPATCHER
	EXTRN	DISEND	END I/O & DISPATCH
	EXTRN	TENDIO	END I/O REQUEST 
* 
* 
*    REQUEST ROUTINES IN LINE DRIVERS 
* 
*      CHLT 
* 
	EXTRN	LTCHRI	CHARACTER INPUT 
	EXTRN	LTSTBL	START OF BLOCK
	EXTRN	LTCHRO	CHARACTER OUTPUT
	EXTRN	LTENBL	END OF BLOCK
	EXTRN	LTDISP	DISPATCH
* 
*      CHRT 
* 
	EXTRN	RTCHRI	CHARACTER INPUT 
	EXTRN	RTSTBL	START OF BLOCK
	EXTRN	RTCHRO	CHARACTER OUTPUT
	EXTRN	RTENBL	END OF BLOCK
	EXTRN	RTDISP	DISPATCH
* 
	EJECT
* 
*      SALCUZ 
* 
	EXTRN	SLCHRI	CHARACTER INPUT 
	EXTRN	SLSTBL	START OF BLOCK
	EXTRN	SLCHRO	CHARACTER OUTPUT
	EXTRN	SLENBL	END OF BLOCK
	EXTRN	SLDISP	DISPATCH
* 
*      ASCU4Z 
* 
	EXTRN	ASCHRI	CHARACTER INPUT 
	EXTRN	ASSTBL	START OF BLOCK
	EXTRN	ASCHRO	CHARACTER OUTPUT
	EXTRN	ASENBL	END OF BLOCK
	EXTRN	ASDISP	DISPATCH
* 
*      FT80 
* 
	EXTRN	FTCHRI	CHARACTER INPUT 
	EXTRN	FTSTBL	START OF BLOCK
	EXTRN	FTCHRO	CHARACTER OUTPUT
	EXTRN	FTENBL	END OF BLOCK
	EXTRN	FTDISP	DISPATCH
* 
*      PLC - LOCAL
* 
	EXTRN	PLCHRI	CHARACTER INPUT 
	EXTRN	PLSTBL	START OF BLOCK
	EXTRN	PLCHRO	CHARACTER OUTPUT
	EXTRN	PLENBL	END OF BLOCK
	EXTRN	PLDISP	DISPATCH
* 
	EJECT
* 
*      PLC - REMOTE 
* 
	EXTRN	PRCHRI	CHARACTER INPUT 
	EXTRN	PRSTBL	START OF BLOCK
	EXTRN	PRCHRO	CHARACTER OUTPUT
	EXTRN	PRENBL	END OF BLOCK
	EXTRN	PRDISP	DISPATCH
* 
*      VIDEO
* 
	EXTRN	VUCHRI	CHARACTER INPUT 
	EXTRN	VUSTBL	START OF BLOCK
	EXTRN	VUCHRO	CHARACTER OUTPUT
	EXTRN	VUENBL	END OF BLOCK
	EXTRN	VUDISP	DISPATCH
* 
	EJECT
* 
*    DWT DISPLACEMENTS
* 
	EXTRN	DWTCHP	CHANNEL PARAMETERS
	EXTRN	DWTST	STATUS 
	EXTRN	DWTECB	ECB ADDRESS 
	EXTRN	DWTOR	INDEX AND ORDER
	EXTRN	DWTADR	DRIVER ADDRESS BLOCK ADDRESS
	EXTRN	DWTWAT	WAIT/ACTIVATE INDICATOR 
	EXTRN	DWTA3	SAVE AREA FOR A3 
	EXTRN	DWTA4	SAVE AREA FOR A4 
	EXTRN	DWTA5	SAVE AREA FOR A5 
	EXTRN	DWTSB2	STACK BASE
	EXTRN	DWTA7	SAVE AREA FOR A7 
	EXTRN	DWTA8	SAVE AREA FOR A8 
	EXTRN	DWTECH	DWT ADDRESS OF ECHO OUTPUT DEVICE 
* 
* 
*    ECB DISPLACEMENTS
* 
	EXTRN	ECBBA	BUFFER ADDRESS 
	EXTRN	ECBRL	REQUESTED LENGTH 
	EXTRN	ECBEL	EFFECTIVE LENGTH 
* 
* 
*    MISCELLANEOUS
* 
	EXTRN	RECADR	RECOVERY ADDR IN DRIVER ADDR BLOCK
	EXTRN	ECHADR	ECHO ADDRESS IN DRIVER ADDRESS BLOCK
* 
	EJECT
* 
************************
* CONDITIONAL ASSEMBLY *
************************
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	1
* 
* 
*	THE FOLLOWING CONDITIONS DEFINE WHICH CHANNEL UNITS 
*	FOR TERMINAL DEVICES THAT ARE USED IN THE SYSTEM. 
*	0 MEANS CHANNEL UNIT IS NOT USED. 
*	1 MEANS CHANNEL UNIT IS USED. 
* 
X:A	EQU	0 
LT	EQU	X:A	CHLT 
* 
X:B	EQU	0 
RT	EQU	X:B	CHRT 
* 
X:C	EQU	0 
SL	EQU	X:C	SALCUZ 
* 
X:D	EQU	0 
AS	EQU	X:D	ASCU4Z 
* 
X:E	EQU	0 
FT	EQU	X:E	FT80 
* 
X:F	EQU	0 
PL	EQU	X:F	PLC - LOCAL
* 
	EJECT
* 
X:G	EQU	0 
PR	EQU	X:G	PLC - REMOTE 
* 
X:H	EQU	0 
VU	EQU	X:H	VIDEO
* 
* 
*	ECHO FUNCTION IS INCLUDED IF CECHO=1
* 
X:I	EQU	1 
CECHO	EQU	X:I 
* 
* 
*	CONDITIONAL ASSEMBLY PARAMETER FOR ONLY SUM-CONNECTION
*	NTONSU = 0 MEANS ONLY SUM-CONNECTION
* 
S1	EQU	SL+AS	U	=1 
S2	EQU	S1+FT	U	=1 
S3	EQU	S2+PL	U	=1 
S4	EQU	S3+PR	U	=1 
S5	EQU	S4+VU	U	=1 
* 
NTONSU	EQU	S5	U	=1
* 
	EJECT
* 
************* 
* CONSTANTS * 
************* 
* 
*    DWT STATUS FLAGS (DWTST) 
* 
DWFBSY	EQU	/8000	DEVICE BUSY
DWFECH	EQU	/2000	ECHO MODE
DWFINP	EQU	/0020	INPUT REQUESTED
* 
* 
*    MISCELLANEOUS
* 
NOTOPR	EQU	/0001	RETURN CODE "NOT OPERABLE" 
CONFER	EQU	/0001	RETURN CODE "CONFIGURATION ERROR"
REQERR	EQU	/8000	RETURN CODE "REQUEST ERROR"
MASKCT	EQU	/0F	MASK FOR CONNECTION TYPE (DWTCHP)
* 
	EJECT
* 
**************
* DATA AREAS *
**************
* 
	IFF	NTONSU=0	U	=1
* 
*    DISPATCH TABLES
* 
*      CHARACTER INPUT
INPTAB	EQU	*
	IFT	LT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	LT=1 
	DATA	LTCHRI
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	RT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	RT=1 
	DATA	RTCHRI
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	SL=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	SL=1 
	DATA	SLCHRI
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	AS=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	AS=1 
	DATA	ASCHRI
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	FT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	FT=1 
	DATA	FTCHRI
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	PL=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	PL=1 
	DATA	PLCHRI
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	PR=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	PR=1 
	DATA	PRCHRI
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	VU=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	VU=1 
	DATA	VUCHRI
	XIF
	IFF	NTONSU=0	U	=1
DTABLN	EQU	*-INPTAB 
* 
* 
*      START OF BLOCK 
STBTAB	EQU	*
	IFT	LT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	LT=1 
	DATA	LTSTBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	RT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	RT=1 
	DATA	RTSTBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	SL=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	SL=1 
	DATA	SLSTBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	AS=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	AS=1 
	DATA	ASSTBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	FT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	FT=1 
	DATA	FTSTBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	PL=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	PL=1 
	DATA	PLSTBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	PR=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	PR=1 
	DATA	PRSTBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	VU=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	VU=1 
	DATA	VUSTBL
	XIF
	IFF	NTONSU=0	U	=1
* 
* 
*      CHARACTER OUTPUT 
OUPTAB	EQU	*
	IFT	LT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	LT=1 
	DATA	LTCHRO
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	RT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	RT=1 
	DATA	RTCHRO
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	SL=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	SL=1 
	DATA	SLCHRO
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	AS=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	AS=1 
	DATA	ASCHRO
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	FT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	FT=1 
	DATA	FTCHRO
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	PL=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	PL=1 
	DATA	PLCHRO
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	PR=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	PR=1 
	DATA	PRCHRO
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	VU=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	VU=1 
	DATA	VUCHRO
	XIF
	IFF	NTONSU=0	U	=1
* 
* 
*      END OF BLOCK 
ENBTAB	EQU	*
	IFT	LT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	LT=1 
	DATA	LTENBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	RT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	RT=1 
	DATA	RTENBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	SL=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	SL=1 
	DATA	SLENBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	AS=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	AS=1 
	DATA	ASENBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	FT=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	FT=1 
	DATA	FTENBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	PL=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	PL=1 
	DATA	PLENBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	PR=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	PR=1 
	DATA	PRENBL
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	VU=0 
	DATA	NDRETE
	XIF
	IFF	NTONSU=0	U	=1
	IFT	VU=1 
	DATA	VUENBL
	XIF
	IFF	NTONSU=0	U	=1
* 
* 
*      END OF REQUEST 
ENRTAB	EQU	*
	IFT	LT=0 
	DATA	TDISP 
	XIF
	IFF	NTONSU=0	U	=1
	IFT	LT=1 
	DATA	LTDISP
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	RT=0 
	DATA	TDISP 
	XIF
	IFF	NTONSU=0	U	=1
	IFT	RT=1 
	DATA	RTDISP
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	SL=0 
	DATA	TDISP 
	XIF
	IFF	NTONSU=0	U	=1
	IFT	SL=1 
	DATA	SLDISP
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	AS=0 
	DATA	TDISP 
	XIF
	IFF	NTONSU=0	U	=1
	IFT	AS=1 
	DATA	ASDISP
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	FT=0 
	DATA	TDISP 
	XIF
	IFF	NTONSU=0	U	=1
	IFT	FT=1 
	DATA	FTDISP
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	PL=0 
	DATA	TDISP 
	XIF
	IFF	NTONSU=0	U	=1
	IFT	PL=1 
	DATA	PLDISP
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	PR=0 
	DATA	TDISP 
	XIF
	IFF	NTONSU=0	U	=1
	IFT	PR=1 
	DATA	PRDISP
	XIF
	IFF	NTONSU=0	U	=1
* 
	IFT	VU=0 
	DATA	TDISP 
	XIF
	IFF	NTONSU=0	U	=1
	IFT	VU=1 
	DATA	VUDISP
	XIF
* 
	EJECT
* 
*    INTERRUPT TABLES 
* 
	IFT	LT=0	U	=2
*    DUMMY ENTRIES CHLT 
INTLT1	EQU	*	U	=2 
INTLT2	EQU	*	U	=2 
INTLT3	EQU	*	U	=2 
INTLT4	EQU	*	U	=2 
	XIF		U	=2
* 
	IFT	LT=1	U	=2
*   CHLT
INTLT1	DATA	0	U	=2
INTLT2	DATA	0	U	=2
INTLT3	DATA	0	U	=2
INTLT4	DATA	0	U	=2
	XIF		U	=2
* 
	IFT	RT=0	U	=2
*    DUMMY ENTRIES CHRT 
INTRT1	EQU	*	U	=2 
INTRT2	EQU	*	U	=2 
INTRT3	EQU	*	U	=2 
INTRT4	EQU	*	U	=2 
	XIF		U	=2
* 
	IFT	RT=1	U	=2
*    CHRT 
INTRT1	DATA	0	U	=2
INTRT2	DATA	0	U	=2
INTRT3	DATA	0	U	=2
INTRT4	DATA	0	U	=2
	XIF		U	=2
* 
	IFT	SL=0	U	=2
*   DUMMY ENTRIES SALCUZ
INTSL1	EQU	*
INTSL2	EQU	*	U	=2 
INTSL3	EQU	*	U	=2 
INTSL4	EQU	*	U	=2 
INTSL5	EQU	*	U	=2 
INTSL6	EQU	*	U	=2 
INTSL7	EQU	*	U	=2 
INTSL8	EQU	*	U	=2 
	XIF		U	=2
* 
	IFT	SL=1	U	=2
*    SALCUZ 
INTSL1	DATA	0	U	=2
INTSL2	DATA	0	U	=2
INTSL3	DATA	0	U	=2
INTSL4	DATA	0	U	=2
INTSL5	DATA	0	U	=2
INTSL6	DATA	0	U	=2
INTSL7	DATA	0	U	=2
INTSL8	DATA	0	U	=2
	XIF		U	=2
* 
	IFT	AS=0	U	=2
*   DUMMY ENTRIES ASCU4Z
INTAS1	EQU	*	U	=2 
INTAS2	EQU	*	U	=2 
INTAS3	EQU	*	U	=2 
INTAS4	EQU	*	U	=2 
INTAS5	EQU	*	U	=2 
INTAS6	EQU	*	U	=2 
INTAS7	EQU	*	U	=2 
INTAS8	EQU	*	U	=2 
	XIF		U	=2
* 
	IFT	AS=1	U	=2
*    ASCU4Z 
INTAS1	DATA	0	U	=2
INTAS2	DATA	0	U	=2
INTAS3	DATA	0	U	=2
INTAS4	DATA	0	U	=2
INTAS5	DATA	0	U	=2
INTAS6	DATA	0	U	=2
INTAS7	DATA	0	U	=2
INTAS8	DATA	0	U	=2
	XIF		U	=2
* 
	IFT	PL=0	U	=2
*    DUMMY ENTRIES PLC - LOCAL
INTPL1	EQU	*	U	=2 
INTPL2	EQU	*	U	=2 
INTPL3	EQU	*	U	=2 
INTPL4	EQU	*	U	=2 
	XIF		U	=2
* 
	IFT	PL=1	U	=2
*   PLC - LOCAL 
INTPL1	DATA	0	U	=2
INTPL2	DATA	0	U	=2
INTPL3	DATA	0	U	=2
INTPL4	DATA	0	U	=2
	XIF		U	=2
* 
	IFT	PR=0	U	=2
*    DUMMY ENTRIES PLC - REMOTE 
INTPR1	EQU	*	U	=2 
INTPR2	EQU	*	U	=2 
INTPR3	EQU	*	U	=2 
INTPR4	EQU	*	U	=2 
	XIF		U	=2
* 
	IFT	PR=1	U	=2
*    PLC - REMOTE 
INTPR1	DATA	0	U	=2
INTPR2	DATA	0	U	=2
INTPR3	DATA	0	U	=2
INTPR4	DATA	0	U	=2
	XIF		U	=2
* 
	IFT	VU=0	U	=2
*    DUMMY ENTRIES VIDEO
INTVU1	EQU	*	U	=2 
INTVU2	EQU	*	U	=2 
INTVU3	EQU	*	U	=2 
INTVU4	EQU	*	U	=2 
INTVU5	EQU	*	U	=2 
INTVU6	EQU	*	U	=2 
INTVU7	EQU	*	U	=2 
INTVU8	EQU	*	U	=2 
	XIF		U	=2
* 
	IFT	VU=1	U	=2
*    VIDEO
INTVU1	DATA	0	U	=2
INTVU2	DATA	0	U	=2
INTVU3	DATA	0	U	=2
INTVU4	DATA	0	U	=2
INTVU5	DATA	0	U	=2
INTVU6	DATA	0	U	=2
INTVU7	DATA	0	U	=2
INTVU8	DATA	0	U	=2
	XIF		U	=2
* 
	EJECT
* 
**************************
* DEVICE DRIVER ROUTINES *
**************************
* 
*   THIS SECTION CONTAINS SUBROUTINES CALLED FROM THE TERMINAL
*   DEVICE DRIVERS. THE ROUTINE CAN EITHER PERFORM THE REQUESTED
*   ACTION ITSELF, OR SWITCH CONTROL TO THE LINE DRIVER TO WHICH
*   THE DEVICE IS CONNECTED. WHEN THE LINE DRIVER HAS PERFORMED 
*   THE REQUESTED ACTIONS, IT WILL RETURN TO THE DEVICE DRIVER, 
*   EITHER DIRECTLY OR THROUGH THE TERMINAL NETWORK DISTRIBUTOR 
*   DRIVER. 
*   THE SECTION ALSO CONTAINS AN EXIT ROUTINE FOR THE TERMINAL
*   DEVICE DRIVERS. IT WILL OF COURSE NOT RETURN TO THE DEVICE
*   DRIVER. 
* 
* 
*   ROUTINES IN ORDER OF APPEARANCE IN CODE:
* 
*	NAME	FUNCTION 
* 
*	INPUT	FETCH ONE CHARACTER FROM INPUT DEVICE 
*	STABLK	DEFINE START OF OUTPUT BLOCK 
*	OUTPUT	SEND ONE CHARACTER TO OUTPUT DEVICE
*	ENDBLK	DEFINE END OF OUTPUT BLOCK 
*	ECHO	SWITCH CONTROL AT CHARACTER ECHO 
*	ECHRTN	RETURN FROM ECHO OUTPUT
*	GETCHR	GET CHARACTER FROM ECB BUFFER
*	ABORT	SET INPUT NO LONGER REQUESTED 
*	LDISP	DISPATCH AT I/O REQUEST COMPLETED 
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	INPUT 
* 
* FUNCTION: 
*	THIS ROUTINE HANDLES INPUT OF ONE CHARACTER 
*	FROM A DEVICE TO A TERMINAL DEVICE DRIVER.
* 
* CALL: 
*	CF	A5,INPUT 
* 
* INPUT:
*	A5  =	LOCAL STACK POINTER 
*	A6  =	DWT ADDRESS 
* 
* OUTPUT: 
*	A1  =	BITS 0-14  NOT SIGNIFICANT
*                 BIT 15  1 IF MORE CHARACTERS
*	A2  =	BITS 0-7  ZERO
*		BITS 8-15  CHARACTER 
* 
************************************************************
* 
INPUT	EQU	* 
	IFF	NTONSU=0	U	=1
	LC	A1,DWTCHP,A6	CHANNEL PARAMETER
	ANK	A1,MASKCT	CLEAN CONNECTION TYPE
	SLA	A1,1	MAKE INDEX
	CWK	A1,DTABLN	INSIDE LIMIT?
	ABI(L)	INPTAB,A1	YES, ACTIVATE LINE DRIVER 
	RF	NDRETE	NO, ERROR
	XIF		U	=1
	IFT	NTONSU=0	U	=1
	ABL	LTCHRI	ACTIVATE SUM-DRIVER	=1
	XIF		U	=1
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	STABLK
* 
* FUNCTION: 
*	THIS ROUTINE IS CALLED FROM THE TERMINAL DEVICE 
*	DRIVERS TO DEFINE START OF AN OUTPUT BLOCK. 
*	THE ACTIONS TAKEN AT START OF BLOCK VARIES FOR
*	DIFFERENT LINE DRIVERS. 
* 
* CALL: 
*	CF	A5,STABLK
* 
* INPUT:
*	A2  =	MAXIMAL NR OF CHARACTERS IN BLOCK 
*	A5  =	LOCAL STACK POINTER 
*	A6  =	DWT ADDRESS 
* 
* OUTPUT: 
*	A1  =	RETURN CODE 
*		0 IF OK
*		NOT 0 IF ERROR 
*	A2  =	DEVICE STATUS (IF RELEVANT, IE A1=0)
*	CR  =	CONTENTS OF A1
* 
************************************************************
* 
STABLK	EQU	*
	LC	A1,DWTCHP,A6	CHANNEL PARAMETER
	IFF	NTONSU=0	U	=1
	ANK	A1,MASKCT	CLEAN CONNECTION TYPE
	SLA	A1,1	MAKE INDEX
	CWK	A1,DTABLN	INSIDE LIMIT?
	ABI(L)	STBTAB,A1	YES, ACTIVATE LINE DRIVER 
	RF	NDRETE	NO, ERROR
	XIF		U	=1
	IFT	NTONSU=0	U	=1
	ANK	A1,1	LOCAL OR REMOTE ?	=1
	ABL(Z)	LTSTBL	LOCAL	=1 
	ABL	RTSTBL	REMOTE	=1 
	XIF		U	=1
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	OUTPUT
* 
* FUNCTION: 
*	THIS ROUTINE HANDLES OUTPUT OF ONE CHARACTER
*	FROM A TERMINAL DEVICE DRIVER TO A DEVICE.
* 
* CALL: 
*	CF	A5,OUTPUT
* 
* INPUT:
*	A2  =	BITS 0-7  IRRELEVANT
*		BITS 8-15  CHARACTER 
*	A5  =	LOCAL STACK POINTER 
*	A6  =	DWT ADDRESS 
* 
* OUTPUT: 
*	A1  =	RETURN CODE 
*		0 IF OK
*		NOT 0 IF ERROR 
*	A2  =	DEVICE STATUS (IF RELEVANT, IE A1=0)
*	CR  =	CONTENTS OF A1
* 
************************************************************
* 
OUTPUT	EQU	*
	IFF	NTONSU=0	U	=1
	LC	A1,DWTCHP,A6	CHANNEL PARAMETER
	ANK	A1,MASKCT	CLEAN CONNECTION TYPE
	SLA	A1,1	MAKE INDEX
	CWK	A1,DTABLN	INSIDE LIMIT?
	ABI(L)	OUPTAB,A1	YES, ACTIVATE LINE DRIVER 
	RF	NDRETE	NO, ERROR
	XIF		U	=1
	IFT	NTONSU=0	U	=1
	ABL	LTCHRO	ACTIVATE SUM-DRIVER	=1
	XIF		U	=1
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	ENDBLK
* 
* FUNCTION: 
*	THIS ROUTINE IS CALLED FROM THE TERMINAL DEVICE 
*	DRIVERS TO DEFINE END OF AN OUTPUT BLOCK. 
*	THE ACTIONS TAKEN AT END OF BLOCK VARIES FOR
*	DIFFERENT LINE DRIVERS. 
* 
* CALL: 
*	CF	A5,ENDBLK
* 
* INPUT:
*	A5  =	LOCAL STACK POINTER 
*	A6  =	DWT ADDRESS 
* 
* OUTPUT: 
*	A1  =	RETURN CODE 
*		0 IF OK
*		NOT 0 IF ERROR 
*	A2  =	DEVICE STATUS (IF RELEVANT, IE A1=0)
*	CR  =	CONTENTS OF A1
* 
************************************************************
* 
ENDBLK	EQU	*
	LC	A1,DWTCHP,A6	CHANNEL PARAMETER
	IFF	NTONSU=0	U	=1
	ANK	A1,MASKCT	CLEAN CONNECTION TYPE
	SLA	A1,1	MAKE INDEX
	CWK	A1,DTABLN	INSIDE LIMIT?
	ABI(L)	ENBTAB,A1	YES, ACTIVATE LINE DRIVER 
	RF	NDRETE	NO, ERROR
	XIF		U	=1
	IFT	NTONSU=0	U	=1
	ANK	A1,1	LOCAL OR REMOTE ?	=1
	ABL(Z)	LTENBL	LOCAL	=1 
	ABL	RTENBL	REMOTE	=1 
	XIF		U	=1
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	ECHO
* 
* FUNCTION: 
*    SUBROUTINE TO ECHO CHARACTER CONTAINING TWO PARTS, 
*    ONE GENERAL AND ONE DEVICE-DEPENDENT 
*    PART ONE: FIND DWT-ADDRESS OF ECHO-DEVICE, 
*              LOAD STACKBASE AND FIND ADDRESS
*              TO DEVICE-DEPENDENT ECHO-ROUTINE 
*    PART TWO: ECHO ONE OR MORE CHARACTERS
*              CORRESPONDING TO ONE CHARACTER 
*              TO BE STORED IN INPUT ECB-BUFFER 
*    PART ONE FOLLOWS AND PART TWO CAN BE FOUND 
*    IN THE DRIVER MODULE CORRESPONDING TO ECHO 
*    OUTPUT DEVICE
* 
*	ECHO IS USED WHEN A CHARACTER SHOULD BE ECHOED
*	ECHEND IS USED AT END OF INPUT REQUEST
*    THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A 
*    JUMP TO 'ECHRTN'.
* 
* CALL: 
*	CF	A5,ECHO
*	CF	A5,ECHEND
* 
* INPUT:
*        A1  =    BITS 0-14  NOT SIGNIFICANT
*                  BIT 15  1 IF MORE CHARACTERS 
*	A2  =	BITS 0-7  NOT SIGNIFICANT 
*		 BITS 8-17  CHARACTER (IF ECHO)
*	A5  =	LOCAL STACK POINTER 
*	A6  =	DWT ADDRESS 
* 
	EJECT
* 
* OUTPUT: 
*      AT ENTRY TO ECHO OUTPUT ROUTINE: 
*        A1  =    BITS 0-14  NOT SIGNIFICANT
*                  BIT 15  1 IF MORE CHARACTERS 
*	A2  =	BITS 0-7  ZERO (IF ECHO)
*		 BITS 8-15  CHARACTER (IF ECHO)
*	A5  =	LOCAL STACK POINTER 
*	A6  =	ADDRESS OF OUTPUT DEVICE DWT
*	A7  =	BIT 0  0 IF ECHO, 1 IF ECHEND 
*		 BITS 1-15  NOT SIGNIFICANT
*      AT SUBROUTINE RETURN:
*	A1  =	CHANGED 
*	A2  =	CHANGED 
*	CR  =	CHANGED 
* 
************************************************************
* 
ECHEND	EQU	*
* 
	IFT	CECHO=1
	CF	A15,NDSAV8	SAVE A3-A5, A7-A8 IN DWT 
	LDKL	A7,/8000	INDICATE END OF ECHO 
	RF	ECHO10
* 
	EJECT
* 
	XIF
* 
ECHO	EQU	*
	IFT	CECHO=1
	CF	A15,NDSAV8	SAVE A3-A5, A7-A8 IN DWT 
	LDK	A7,0	INDICATE NOT END OF ECHO
* 
* 
ECHO10	EQU	*
	LD	A3,DWTST,A6	STATUS
	ANKL	A3,DWFECH	ECHO REQUESTED? 
	RF(Z)	NDREP	NO, RETURN 
* 
	LDR	A4,A6	SAVE DWT-ADDRESS OF INPUT DEVICE 
	LD	A6,DWTECH,A6	DWT-ADDRESS OF OUTPUT DEVICE 
	ST	A4,DWTWAT,A6	SAVE DWT-ADDRESS OF INPUT DEVICE 
	LDKL	A5,DWTSB2 
	ADR	A5,A6	STACKBASE-ADDRESS IN A5
	ANK	A2,/FF	CLEAN CHARACTER 
	LD	A3,DWTADR,A6	ADDRESS TO ADDRESS-BLOCK 
	ABI	ECHADR,A3	GO TO ECHO-ROUTINE DEVICE-DEPENDENT
	XIF
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	ECHRTN
* 
* FUNCTION: 
*	THIS ROUTINE IS USED WHEN OUTPUT DEVICE ECHO ROUTINE
*	IS READY WITH ECHOING ACTIONS, AND WANTS TO LEAVE 
*	CONTROL BACK TO INPUT DEVICE DRIVER.
* 
* CALL: 
*	ABL	ECHRTN
* 
* INPUT:
*	A6  =	DWT ADDRESS OF OUTPUT DEVICE
* 
* OUTPUT: 
*      AT ENTRY TO INPUT DRIVER:
*	SEE ECHO ROUTINE
* 
************************************************************
* 
ECHRTN	EQU	*
	IFT	CECHO=1
	LD	A6,DWTWAT,A6	DWT-ADDRESS OF INPUT DEVICE
	RF	NDREP	RELOAD A3-A5, A7-A8 AND RETURN
	XIF
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	GETCHR
* 
* FUNCTION: 
*	THIS ROUTINE WILL FETCH ONE CHARACTER FROM THE
*	ECB BUFFER AND INCREMENT THE BUFFER INDEX.
*	IF NO CHARACTER IS LEFT, INDEX IS STORED IN 
*	ECB REQUESTED LENGTH. 
* 
* CALL: 
*	CF	A15,GETCHR 
* 
* INPUT:
*	A3  =	BUFFER INDEX
*	A8  =	ECB ADDRESS 
* 
* OUTPUT: 
*	A1  =	>0 IF CHARACTER LEFT
*		 =<0 IF NO CHARACTER LEFT
*	A2  =	BITS 0-7  ZERO (IF A1>0)
*		 BITS 8-15  CHARACTER (IF A1>0)
*	A3  =	UPDATED BYTE INDEX (IF A1>0)
*	CR  =	CHANGED 
*	INTERR.	ENABLED 
* 
************************************************************
* 
GETCHR	EQU	*
	LD	A1,ECBRL,A8	REQUESTED LENGTH
	SUR	A1,A3
	RF(NP)	GCH010	LAST CHARACTER REACHED 
* 
	EJECT
* 
	LD	A2,ECBBA,A8	GET BUFFER ADDRESS
	ADR	A2,A3
	LCR	A2,A2	CHAR. TO A2
	ANK	A2,/FF 
	ADK	A3,1	INCREMENT BUFFER INDEX
	RF	GCH020
* 
* 
GCH010	EQU	*
	ST	A3,ECBEL,A8	STORE EFFECTIVE LENGTH
GCH020	EQU	*
	ADKL	A15,2	RETURN AND ENABLE 
	ENB
	LDR*	P,A15 
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	ABORT 
* 
* FUNCTION: 
*	THIS ROUTINE RESETS THE INPUT REQUESTED FLAG IN DWT.
*	IT IS USED AT ABORT REQUESTS, WHEN A REQUESTED INPUT
*	IS NO LONGER WANTED.
* 
* CALL: 
*	CF	A15,ABORT
* 
* INPUT:
*	A6  =	DWT ADDRESS 
* 
* OUTPUT: 
*	A1  =	CHANGED 
*	CR  =	CHANGED 
* 
************************************************************
* 
ABORT	EQU	* 
	LDKL	A1,/FFFF-DWFINP	MASK FOR INPUT REQUESTED
	ANS	A1,DWTST,A6	RESET FLAG 
	IFT	CPU852=1 
	RF	RTNP15	RETURN 
	XIF
	IFF	CPU852=1 
	RTN	A15
	XIF
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	LDISP 
* 
* FUNCTION: 
*	THIS ROUTINE PERFORMS DISPATCHING FOR THE TERMINAL
*	DEVICE DRIVERS. IT ALSO PROVIDES QUICK EXITS FROM 
*	DEVICE DRIVERS THAT INCLUDES TENDIO CALL. 
* 
* CALL: 
*	ABL	LENDER
*	ABL	LENDIS
*	ABL	LDISP 
* 
* INPUT:
*	A1  =	RETURN CODE (IF LENDIS) 
*	A6  =	DWT ADDRESS 
* 
* OUTPUT: 
*      AT ENTRY TO LINE DRIVER DISPATCH ENTRY:
*	A6  =	DWT ADDRESS 
* 
************************************************************
* 
LENDER	EQU	*
	LDKL	A1,REQERR	REQUEST ERROR 
* 
LENDIS	EQU	*
	CF	A15,TENDIO	END I/O REQUEST
* 
	EJECT
* 
LDISP	EQU	* 
	IFF	NTONSU=0	U	=1
	LC	A1,DWTCHP,A6	CHANNEL PARAMETER
	ANK	A1,MASKCT	CLEAN CONNECTION TYPE
	SLA	A1,1	MAKE INDEX
	CWK	A1,DTABLN	INSIDE LIMIT?
	ABI(L)	ENRTAB,A1	YES, ACTIVATE LINE DRIVER 
	XIF		U	=1
	ABL	TDISP	NO, ERROR
* 
	EJECT
* 
************************
* LINE DRIVER ROUTINES *
************************
* 
*   THIS SECTION CONTAINS AN EXIT ROUTINE THAT CAN BE USED BY THE 
*   LINE DRIVERS WHEN RETURNING TO THE DEVICE DRIVER. 
*   IT ALSO CONTAINES A NUMBER OF SERVICE SUBROUTINES THAT
*   CAN BE CALLED BY THE LINE DRIVERS.
* 
* 
*   ROUTINES IN ORDER OF APPEARANCE IN CODE:
* 
*	NAME	FUNCTION 
* 
*	NDRET	RETURN TO DEVICE DRIVER 
*	NDSAV8	SAVE A3-A5, A7-A8 IN DWT 
*	NDGET8	GET A3-A5, A7-A8 FROM DWT
*	NDREWS	CALL RECOVERY FOR ALL DWT:S ON WORK STATION
*	NDREDW	CALL RECOVERY ROUTINE FOR DWT
*	NDGEDN	GET HIGEST DWT NUMBER FOR WORK STATION 
*	NDGEDW	GET DWT ADDRESS
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	NDRET 
* 
* FUNCTION: 
*	THIS ROUTINE CONTAINS A NUMBER OF ENTRIES FOR 
*	RETURNING TO THE TERMINAL DEVICE DRIVERS. 
*	THEY CAN BE CALLED EITHER FROM OTHER ROUTINES 
*	IN THE NETWORK DISTRIBUTOR, OR FROM THE LINE
*	DRIVERS.
*	FOR CPU 852 IT ALSO CONTAINS A "RTN  A15" 
*	SIMULATION THAT DOESN'T PERFORM ENABLE. 
* 
* CALL: 
*	RF	"NAME" 
*	RB	"NAME" 
*	ABL	"NAME"
* 
* INPUT:
*	A5  =	LOCAL STACK POINTER (IF NDRETX) 
*	A6  =	DWT ADDRESS (IF NDREPX) 
* 
* OUTPUT: 
*      AT RETURN TO TERMINAL DEVICE DRIVER: 
*	SEE HEADING OF CALLED REQUEST HANDLING ROUTINE
* 
************************************************************
* 
NDRETE	EQU	*
	LDK	A1,CONFER	CONFIGURATION ERROR
	RF	NDRET	RETURN
* 
	EJECT
* 
NDREPO	EQU	*
	CF	A15,NDGET8	GET A3-A5, A7-A8 FROM DWT
NDRETO	EQU	*
	LDK	A1,0	RETURN CODE OK
	LDK	A2,0	DEVICE STATUS OK
	RF	NDRET	RETURN
* 
NDREP	EQU	* 
	CF	A15,NDGET8	GET A3-A5, A7-A8 FROM DWT
NDRET	EQU	* 
	ENB
	ADK	A5,4	ADJUST STACK FOR RETURN 
	LDR	A1,A1	SET CR 
	ABR*	A5	RETURN TO DEVICE DRIVER
* 
* 
	IFT	CPU852=1 
RTNP15	EQU	*
	ADKL	A15,2	ADJUST STACK
	LDR*	P,A15	RETURN
	XIF
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	NDSAV8
* 
* FUNCTION: 
*	THIS ROUTINE SAVES REGISTERS A3, A4, A5, A7 AND 
*	A8 IN A SAVE AREA IN DWT. 
* 
* CALL: 
*	CF	A15,NDSAV8 
* 
* INPUT:
*	A6  =	DWT ADDRESS 
* 
* OUTPUT: 
*	CR  =	CHANGED 
* 
************************************************************
* 
NDSAV8	EQU	*
*    SAVE A3-A5, A7-A8 IN DWT 
	ST	A3,DWTA3,A6 
	ST	A4,DWTA4,A6 
	ST	A5,DWTA5,A6 
	ST	A7,DWTA7,A6 
	ST	A8,DWTA8,A6 
* 
	IFT	CPU852=1 
	RB	RTNP15	RETURN 
	XIF
	IFF	CPU852=1 
	RTN	A15
	XIF
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	NDGET8
* 
* FUNCTION: 
*	THIS ROUTINE FETCHES REGISTERS A3, A4, A5, A7 AND 
*	A8 FROM A SAVE AREA IN DWT. 
* 
* CALL: 
*	CF	A15,NDGET8 
* 
* INPUT:
*	A6  =	DWT ADDRESS 
* 
* OUTPUT: 
*	CR  =	CHANGED 
* 
************************************************************
* 
NDGET8	EQU	*
*    GET A3-A5, A7-A8 FROM DWT
	LD	A3,DWTA3,A6 
	LD	A4,DWTA4,A6 
	LD	A5,DWTA5,A6 
	LD	A7,DWTA7,A6 
	LD	A8,DWTA8,A6 
* 
	IFT	CPU852=1 
	RB	RTNP15	RETURN 
	XIF
	IFF	CPU852=1 
	RTN	A15
	XIF
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	NDREWS
* 
* FUNCTION: 
*	THIS ROUTINE CALLS RECOVERY ROUTINES FOR ALL DWT:S
*	ON A WORK STATION, EXEPT FOR THOSE OF OUTPUT DEVICES
*	IN ECHO MODE. 
* 
* CALL: 
*	CF	A15,NDREWS 
* 
* INPUT:
*	A3  =	WORK STATION TABLE ADDRESS
*	A4  =	RECOVERY CAUSE
*	A6  =	WORK STATION NUMBER 
* 
* OUTPUT: 
*      AT ENTRY TO RECOVERY ROUTINE:
*	SEE NDREDW
*      AT SUBROUTINE RETURN:
*	CR  =	CHANGED 
*	INTERR.	CHANGED 
* 
************************************************************
* 
NDREWS	EQU	*
	IFF	NTONSU=0	U	=1
	IFT	CPU852=1 
	CF	A15,SAVE8	PUSH A1-A8
	XIF
	IFF	NTONSU=0	U	=1
	IFF	CPU852=1 
	MSR	8,A15	PUSH A1-A8 
	XIF
	IFF	NTONSU=0	U	=1
* 
	EJECT
* 
	LDR	A8,A6	SAVE WS NUMBER 
	LDR	A1,A3	WORK STATION TABLE ADDRESS 
	CF	A15,NDGEDN	GET HIGEST DWT NUMBER
	ADK	A7,1	PREPARE FOR SUK 
* 
RW100	EQU	* 
	SUK	A7,1	NEXT DWT
	RF(N)	RW120	EXIT IF ALL DONE 
	LDR	A6,A8	WORK STATION NUMBER
	LDR	A1,A3	WORK STATION TABLE ADDRESS 
	CF	A15,NDGEDW	A6 := DWT ADDRESS
* 
	LDR	A6,A6	DWT DEFINED? 
	RB(Z)	RW100	NO, TAKE NEXT
	LDK	A1,1 
	TM	A6,A1	DWT WITH >1 DEVICE ADDRESS? 
	RB(NZ)	RW100	YES, ONLY ONE CALL / DWT
* 
*      CHECK IF OUTPUT ECHO DEVICE
	LD	A1,DWTST,A6	DWT STATUS
	LDR	A2,A1	SAVE 
	ANKL	A1,DWFECH	ECHO MODE?
	RF(Z)	RW110	NO, CONTINUE 
	ANKL	A2,DWFINP	INPUT DEVICE? 
	RB(Z)	RW100	NO, ECHO OUTPUT. TAKE NEXT 
* 
RW110	EQU	* 
	CF	A15,NDREDW	CALL RECOVERY ROUTINE
	RB	RW100	NEXT DWT
* 
* 
RW120	EQU	* 
*    ALL DWT:S HANDLED
	ABL	TDISP	RETURN 
	XIF		U	=1
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	NDREDW
* 
* FUNCTION: 
*	THIS ROUTINE CALLS THE RECOVERY ROUTINE OF A TERMINAL 
*	DEVICE DRIVER, IF THE RECOVERY ENTRY IS DEFINED.
*	IF NO RECOVERY IS DEFINED, DWT IS BUSY BUT NO REQUEST 
*	IS ON, TENDIO IS CALLED TO ACTIVATE TERMINAL QUEUE. 
* 
* CALL: 
*	CF	A15,NDREDW 
* 
* INPUT:
*	A4  =	RECOVERY CAUSE
*	A6  =	DWT ADDRESS 
* 
* OUTPUT: 
*      AT ENTRY TO RECOVERY ROUTINE:
*	A4  =	RECOVERY CAUSE
*	A5  =	DWT STACK BASE
*	A6  =	DWT ADDRESS 
*	A7  =	BITS 0-9  ZERO
*		BITS 10-15  ORDER (IF REQUEST ON)
*	A8  =	ECB ADDRESS IF REQUEST ON,
*		 ELSE ZERO 
*	INTERR.	ENABLED 
*      AT SUBROUTINE RETURN:
*	CR  =	CHANGED 
*	INTERR.	CHANGED 
* 
************************************************************
* 
	EJECT
* 
NDREDW	EQU	*
	IFT	CPU852=1 
	CF	A15,SAVE8	PUSH A1-A8
	XIF
	IFF	CPU852=1 
	MSR	8,A15	PUSH A1-A8 
	XIF
	ENB
* 
	LDR	A5,A6	DWT ADDRESS
	ADKL	A5,DWTSB2	STACK BASE
	LC	A7,DWTOR+1,A6	ORDER 
	ANK	A7,/3F	CLEAN 
	LD	A8,DWTECB,A6	ECB ADDRESS
* 
	LD	A1,DWTADR,A6	ADDRESS BLOCK
	LD	A1,RECADR,A1	RECOVERY ENTRY 
	ABR(NZ)	A1	CALL RECOVERY IF DEFINED
* 
* 
*      NO RECOVERY. CALL TENDIO IF BUSY BUT NO REQUEST
	LD	A2,DWTST,A6	DWT STATUS
	ANKL	A2,DWFBSY	BUSY? 
	RF(NZ)	RD100	NO, EXIT
	LDR	A8,A8	REQUEST ON?
	ABL(Z)	DISEND	NO, TENDIO & RETURN
RD100	EQU	* 
	ABL	TDISP	RETURN 
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	NDGEDN
* 
* FUNCTION: 
*	THIS ROUTINE CALCULATES THE HIGEST DWT NUMBER 
*	(POSITION NUMBER IN DWT TABLE) FOR A WORK STATION.
* 
* CALL: 
*	CF	A15,NDGEDN 
* 
* INPUT:
*	A1  =	ADDRESS OF WORK STATION TABLE 
*	A6  =	WORK STATION NUMBER 
* 
* OUTPUT: 
*	A7  =	HIGEST DWT NUMBER (0-7) 
*		 -1 IF NO DWT:S FOUND
*	CR  =	CHANGED 
* 
************************************************************
* 
NDGEDN	EQU	*
	IFF	NTONSU=0	U	=1
	STR	A6,A15	PUSH WS NUMBER
	LDR	A1,A1	WS TABLE DEFINED?
	RF(Z)	GN100	NO, EXIT 
	SLL	A6,1	MAKE INDEX
	CW	A6,-2,A1	INDEX TOO HIGH?
	RF(NL)	GN100	YES, EXIT 
* 
	EJECT
* 
	ADR	A6,A1
	LDR*	A6,A6	DWT ADDRESS TABLE 
	RF(Z)	GN100	NOT DEFINED, EXIT
	LD	A7,-2,A6	TABLE LENGTH 
	SUK	A7,2	OFFSET TO LAST DWT
	SRA	A7,1	NUMBER OF LAST DWT
	RF	GN110	EXIT
* 
GN100	EQU	* 
	LDKL	A7,-1	NO DWT:S DEFINED
GN110	EQU	* 
	LDR*	A6,A15	POP WS NUMBER
	IFT	CPU852=1 
	RB	RTNP15	RETURN 
	XIF
	IFF	NTONSU=0	U	=1
	IFF	CPU852=1 
	RTN	A15
	XIF
* 
	EJECT
* 
************************************************************
* 
* ROUTINE NAME: 
*	NDGEDW
* 
* FUNCTION: 
*	THIS ROUTINE CALCULATES THE DWT ADDRESS FOR 
*	A DEVICE. 
* 
* CALL: 
*	CF	A15,NDGEDW 
* 
* INPUT:
*	A1  =	ADDRESS OF WORK STATION TABLE (INTXXN)
*	A6  =	WORK STATION NUMBER 
*	A7  =	DEVICE ADDRESS
* 
* OUTPUT: 
*	A6  =	DWT ADDRESS IF FOUND
*		 ELSE 0
*	CR  =	CHANGED 
* 
************************************************************
* 
NDGEDW	EQU	*
	IFF	NTONSU=0	U	=1
	SLL	A7,1	MAKE INDEX OF DEVICE ADDRESS
	LDR	A1,A1	WS TABLE DEFINED?
	RF(Z)	GD100	NO, EXIT 
	SLL	A6,1	INDEX IN WORK STATION TABLE 
	CW	A6,-2,A1	INSIDE TABLE?
	RF(NL)	GD100	NO, ERROR 
* 
	EJECT
* 
	ADR	A6,A1
	LDR*	A6,A6	DWT ADDRESS TABLE 
	RF(Z)	GD100	WS NOT DEFINED, EXIT 
	CW	A7,-2,A6	INDEX TOO HIGH?
	RF(NL)	GD100	YES, EXIT 
	ADR	A6,A7
	LDR*	A6,A6	DWT ADDRESS OR 0
	RF	GD110	EXIT
* 
GD100	EQU	* 
	LDK	A6,0	DWT NOT FOUND 
GD110	EQU	* 
	SRL	A7,1	RESTORE DEVICE ADDRESS
	IFT	CPU852=1 
	RB	RTNP15	RETURN 
	XIF
	IFF	NTONSU=0	U	=1
	IFF	CPU852=1 
	RTN	A15
	XIF
* 
* 
* 
	END

HexDump

0x0000…0036 (0, 0, 400)   Head {h00=0x0032, h01=0x0050, text=» IDENT DRND01  REL 11.0 81-05-27 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0066               Head {h00=0x0024, h01=0x0050, text=»   =2, INTERRUPT TABLES INCLUDED«, t00=0x0000, t01=0x0042}
0x0066…0082               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-05-25«, t00=0x0000, t01=0x006a}
0x0082…00ae               Head {h00=0x0028, h01=0x0050, text=»   =1, COND. ASS. FOR ONLY SUM-CONN.«, t00=0x0000, t01=0x0086}
0x00ae…00ca               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-01-26«, t00=0x0000, t01=0x00b2}
0x00ca…00d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ce}
0x00d4…00de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00d8}
0x00de…00e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e2}
0x00e8…012c               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0000, t01=0x00ec}
0x012c…0136               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0130}
0x0136…015e               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM  PTS«, t00=0x0000, t01=0x013a}
0x015e…0168               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0162}
0x0168…019c               Head {h00=0x0030, h01=0x0050, text=»*   DRND01  =  TERMINAL NETWORK DISTRIBUTOR «, t00=0x0000, t01=0x016c}
0x019c…01a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0010}
0x01a6…01b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x001a}
0x01b0…01ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0024}
0x01ba…01fe               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0001, t01=0x002e}
0x01fe…0208               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0072}
0x0208…0212               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x007c}
0x0212…024c               Head {h00=0x0036, h01=0x0050, text=»*   THIS PROGRAM CONTAINS INPUT AND OUTPUT ENTRIES«, t00=0x0001, t01=0x0086}
0x024c…0286               Head {h00=0x0036, h01=0x0050, text=»*   CALLED BY TERMINAL DEVICE DRIVERS. AT CALL, IT«, t00=0x0001, t01=0x00c0}
0x0286…02c0               Head {h00=0x0036, h01=0x0050, text=»*   CHECKS CHANNEL PARAMETERS IN DWT, AND BRANCHES«, t00=0x0001, t01=0x00fa}
0x02c0…02fc               Head {h00=0x0038, h01=0x0050, text=»*   TO THE APPROPRIATE LINE DRIVER FOR EXECUTION OF «, t00=0x0001, t01=0x0134}
0x02fc…0334               Head {h00=0x0034, h01=0x0050, text=»*   THE I/O REQUEST. THIS CONSTRUCTION MAKES IT «, t00=0x0001, t01=0x0170}
0x0334…0370               Head {h00=0x0038, h01=0x0050, text=»*   POSSIBLE TO HAVE ONLY ONE TERMINAL DEVICE DRIVER«, t00=0x0002, t01=0x0018}
0x0370…03a6               Head {h00=0x0032, h01=0x0050, text=»*   FOR EACH TERMINAL DEVICE, IRRESPECTIVE OF «, t00=0x0002, t01=0x0054}
0x03a6…03de               Head {h00=0x0034, h01=0x0050, text=»*   CONNECTION TYPE. IT IS ALSO POSSIBLE TO USE «, t00=0x0002, t01=0x008a}
0x03de…0418               Head {h00=0x0036, h01=0x0050, text=»*   SEVERAL TERMINAL DEVICE CHANNEL UNITS TOGETHER«, t00=0x0002, t01=0x00c2}
0x0418…0438               Head {h00=0x001c, h01=0x0050, text=»*   IN THE SAME SYSTEM. «, t00=0x0002, t01=0x00fc}
0x0438…0442               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x011c}
0x0442…047c               Head {h00=0x0036, h01=0x0050, text=»*   THE PROGRAM ALSO CONTAINS A NUMBER OF SERVICE «, t00=0x0002, t01=0x0126}
0x047c…04ba               Head {h00=0x003a, h01=0x0050, text=»*   SUBROUTINES TO BE USED BY TERMINAL DEVICE DRIVERS «, t00=0x0002, t01=0x0160}
0x04ba…04d8               Head {h00=0x001a, h01=0x0050, text=»*   AND LINE DRIVERS. «, t00=0x0003, t01=0x000e}
0x04d8…04e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002c}
0x04e2…04f0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0036}
0x04f0…04fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0044}
0x04fa…0538               Head {h00=0x003a, h01=0x0050, text=»*   THE PROGRAM IS DIVIDED INTO A NUMBER OF SECTIONS. «, t00=0x0003, t01=0x004e}
0x0538…0570               Head {h00=0x0034, h01=0x0050, text=»*   SECTIONS CONTAINING PROGRAM CODE ARE DIVIDED«, t00=0x0003, t01=0x008c}
0x0570…05a6               Head {h00=0x0032, h01=0x0050, text=»*   INTO ROUTINES. THE ROUTINES ARE LISTED AT «, t00=0x0003, t01=0x00c4}
0x05a6…05de               Head {h00=0x0034, h01=0x0050, text=»*   BEGINNING OF EACH SECTION. THE SECTIONS, IN «, t00=0x0003, t01=0x00fa}
0x05de…060c               Head {h00=0x002a, h01=0x0050, text=»*   ORDER OF APPEARANCE IN LIST, ARE: «, t00=0x0003, t01=0x0132}
0x060c…0616               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0160}
0x0616…0630               Head {h00=0x0016, h01=0x0050, text=»* NAME    FUNCTION«, t00=0x0003, t01=0x016a}
0x0630…063a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0184}
0x063a…0664               Head {h00=0x0026, h01=0x0050, text=»* ENTRIES    DECLARE ENTRY POINTS «, t00=0x0003, t01=0x018e}
0x0664…0696               Head {h00=0x002e, h01=0x0050, text=»* EXTERNALS   DECLARE EXTERNAL REFERENCES «, t00=0x0004, t01=0x0028}
0x0696…06d0               Head {h00=0x0036, h01=0x0050, text=»* CONDITION   SET CONDITIONAL ASSEMBLY PARAMETERS «, t00=0x0004, t01=0x005a}
0x06d0…06fa               Head {h00=0x0026, h01=0x0050, text=»* CONSTANTS   SET CONSTANT VALUES «, t00=0x0004, t01=0x0094}
0x06fa…0716               Head {h00=0x0018, h01=0x0050, text=»* DATA    DATA AREAS«, t00=0x0004, t01=0x00be}
0x0716…0720               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00da}
0x0720…0758               Head {h00=0x0034, h01=0x0050, text=»* DEVICE DR   ROUTINES CALLED BY DEVICE DRIVERS «, t00=0x0004, t01=0x00e4}
0x0758…078c               Head {h00=0x0030, h01=0x0050, text=»* LINE DR    ROUTINES CALLED BY LINE DRIVERS«, t00=0x0004, t01=0x011c}
0x078c…0796               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0150}
0x0796…07a4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x015a}
0x07a4…07ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0168}
0x07ae…07c2               Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0004, t01=0x0172}
0x07c2…07d6               Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0004, t01=0x0186}
0x07d6…07ea               Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0005, t01=0x000a}
0x07ea…07f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x001e}
0x07f4…0820               Head {h00=0x0028, h01=0x0050, text=»*    TERMINAL DEVICE DRIVER REQUESTS«, t00=0x0005, t01=0x0028}
0x0820…082a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0054}
0x082a…0856               Head {h00=0x0028, h01=0x0050, text=» ENTRY INPUT INPUT OF ONE CHARACTER «, t00=0x0005, t01=0x005e}
0x0856…0882               Head {h00=0x0028, h01=0x0050, text=» ENTRY STABLK DEFINE START OF BLOCK «, t00=0x0005, t01=0x008a}
0x0882…08b0               Head {h00=0x002a, h01=0x0050, text=» ENTRY OUTPUT OUTPUT OF ONE CHARACTER «, t00=0x0005, t01=0x00b6}
0x08b0…08da               Head {h00=0x0026, h01=0x0050, text=» ENTRY ENDBLK DEFINE END OF BLOCK «, t00=0x0005, t01=0x00e4}
0x08da…0900               Head {h00=0x0022, h01=0x0050, text=» ENTRY ECHRTN RETURN FROM ECHO«, t00=0x0005, t01=0x010e}
0x0900…0920               Head {h00=0x001c, h01=0x0050, text=» ENTRY ECHO ECHO ROUTINE«, t00=0x0005, t01=0x0134}
0x0920…0942               Head {h00=0x001e, h01=0x0050, text=» ENTRY ECHEND END OF ECHO «, t00=0x0005, t01=0x0154}
0x0942…097a               Head {h00=0x0034, h01=0x0050, text=» ENTRY GETCHR GET ONE CHARACTER FROM ECB-BUFFER «, t00=0x0005, t01=0x0176}
0x097a…09a2               Head {h00=0x0024, h01=0x0050, text=» ENTRY ABORT ABORT INPUT REQUEST«, t00=0x0006, t01=0x001e}
0x09a2…09ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0046}
0x09ac…09b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0050}
0x09b6…09e8               Head {h00=0x002e, h01=0x0050, text=»*    TERMINAL DEVICE DRIVER EXIT ROUTINES «, t00=0x0006, t01=0x005a}
0x09e8…09f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x008c}
0x09f2…0a28               Head {h00=0x0032, h01=0x0050, text=» ENTRY LENDER REQUEST ERR, END I/O & DISPATCH «, t00=0x0006, t01=0x0096}
0x0a28…0a50               Head {h00=0x0024, h01=0x0050, text=» ENTRY LENDIS END I/O & DISPATCH«, t00=0x0006, t01=0x00cc}
0x0a50…0a6e               Head {h00=0x001a, h01=0x0050, text=» ENTRY LDISP DISPATCH «, t00=0x0006, t01=0x00f4}
0x0a6e…0a78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0112}
0x0a78…0a82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x011c}
0x0a82…0aa8               Head {h00=0x0022, h01=0x0050, text=»*    LINE DRIVER EXIT ROUTINES«, t00=0x0006, t01=0x0126}
0x0aa8…0ab2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014c}
0x0ab2…0ad8               Head {h00=0x0022, h01=0x0050, text=» ENTRY NDREPO POP, OK & RETURN«, t00=0x0006, t01=0x0156}
0x0ad8…0afa               Head {h00=0x001e, h01=0x0050, text=» ENTRY NDRETO OK & RETURN «, t00=0x0006, t01=0x017c}
0x0afa…0b1c               Head {h00=0x001e, h01=0x0050, text=» ENTRY NDREP POP & RETURN «, t00=0x0007, t01=0x000e}
0x0b1c…0b38               Head {h00=0x0018, h01=0x0050, text=» ENTRY NDRET RETURN «, t00=0x0007, t01=0x0030}
0x0b38…0b42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x004c}
0x0b42…0b50               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0056}
0x0b50…0b5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0064}
0x0b5a…0b84               Head {h00=0x0026, h01=0x0050, text=»*    LINE DRIVER SERVICE ROUTINES «, t00=0x0007, t01=0x006e}
0x0b84…0b8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0098}
0x0b8e…0bbc               Head {h00=0x002a, h01=0x0050, text=» ENTRY NDSAV8 SAVE A3-A5, A7-A8 IN DWT«, t00=0x0007, t01=0x00a2}
0x0bbc…0bec               Head {h00=0x002c, h01=0x0050, text=» ENTRY NDGET8 GET A3-A5, A7-A8 FROM DWT «, t00=0x0007, t01=0x00d0}
0x0bec…0c20               Head {h00=0x0030, h01=0x0050, text=» ENTRY NDREWS CALL RECOVERY FOR WORK STATION«, t00=0x0007, t01=0x0100}
0x0c20…0c4e               Head {h00=0x002a, h01=0x0050, text=» ENTRY NDREDW CALL RECOVERY FOR DEVICE«, t00=0x0007, t01=0x0134}
0x0c4e…0c80               Head {h00=0x002e, h01=0x0050, text=» ENTRY NDGEDN GET HIGEST DWT NUMBER ON WS «, t00=0x0007, t01=0x0162}
0x0c80…0cac (8, 0, 400)   Head {h00=0x0028, h01=0x0050, text=» ENTRY NDGEDW CALCULATE DWT ADDRESS «, t00=0x0008, t01=0x0004}
0x0cac…0cb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0030}
0x0cb6…0cc4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x003a}
0x0cc4…0cce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0048}
0x0cce…0cf4               Head {h00=0x0022, h01=0x0050, text=»*    INTERRUPT TABLE FOR CHLT «, t00=0x0008, t01=0x0052}
0x0cf4…0cfe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0078}
0x0cfe…0d28               Head {h00=0x0026, h01=0x0050, text=» ENTRY INTLT1,INTLT2,INTLT3,INTLT4«, t00=0x0008, t01=0x0082}
0x0d28…0d32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ac}
0x0d32…0d58               Head {h00=0x0022, h01=0x0050, text=»*    INTERRUPT TABLE FOR CHRT «, t00=0x0008, t01=0x00b6}
0x0d58…0d62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00dc}
0x0d62…0d8c               Head {h00=0x0026, h01=0x0050, text=» ENTRY INTRT1,INTRT2,INTRT3,INTRT4«, t00=0x0008, t01=0x00e6}
0x0d8c…0d96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0110}
0x0d96…0dbe               Head {h00=0x0024, h01=0x0050, text=»*    INTERRUPT TABLE FOR SALCUZ «, t00=0x0008, t01=0x011a}
0x0dbe…0dc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0142}
0x0dc8…0df2               Head {h00=0x0026, h01=0x0050, text=» ENTRY INTSL1,INTSL2,INTSL3,INTSL4«, t00=0x0008, t01=0x014c}
0x0df2…0e1c               Head {h00=0x0026, h01=0x0050, text=» ENTRY INTSL5,INTSL6,INTSL7,INTSL8«, t00=0x0008, t01=0x0176}
0x0e1c…0e26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0010}
0x0e26…0e4e               Head {h00=0x0024, h01=0x0050, text=»*    INTERRUPT TABLE FOR ASCU4Z «, t00=0x0009, t01=0x001a}
0x0e4e…0e58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0042}
0x0e58…0e82               Head {h00=0x0026, h01=0x0050, text=» ENTRY INTAS1,INTAS2,INTAS3,INTAS4«, t00=0x0009, t01=0x004c}
0x0e82…0eac               Head {h00=0x0026, h01=0x0050, text=» ENTRY INTAS5,INTAS6,INTAS7,INTAS8«, t00=0x0009, t01=0x0076}
0x0eac…0eb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00a0}
0x0eb6…0ee2               Head {h00=0x0028, h01=0x0050, text=»*    INTERRUPT TABLE FOR PLC - LOCAL«, t00=0x0009, t01=0x00aa}
0x0ee2…0eec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d6}
0x0eec…0f16               Head {h00=0x0026, h01=0x0050, text=» ENTRY INTPL1,INTPL2,INTPL3,INTPL4«, t00=0x0009, t01=0x00e0}
0x0f16…0f20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x010a}
0x0f20…0f4e               Head {h00=0x002a, h01=0x0050, text=»*    INTERRUPT TABLE FOR PLC - REMOTE «, t00=0x0009, t01=0x0114}
0x0f4e…0f58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0142}
0x0f58…0f82               Head {h00=0x0026, h01=0x0050, text=» ENTRY INTPR1,INTPR2,INTPR3,INTPR4«, t00=0x0009, t01=0x014c}
0x0f82…0f8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0176}
0x0f8c…0fb2               Head {h00=0x0022, h01=0x0050, text=»*    INTERRUPT TABLE FOR VIDEO«, t00=0x0009, t01=0x0180}
0x0fb2…0fbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0016}
0x0fbc…0fe6               Head {h00=0x0026, h01=0x0050, text=» ENTRY INTVU1,INTVU2,INTVU3,INTVU4«, t00=0x000a, t01=0x0020}
0x0fe6…1010               Head {h00=0x0026, h01=0x0050, text=» ENTRY INTVU5,INTVU6,INTVU7,INTVU8«, t00=0x000a, t01=0x004a}
0x1010…101a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0074}
0x101a…1028               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x007e}
0x1028…1032               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x008c}
0x1032…1048               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x0096}
0x1048…105e               Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x000a, t01=0x00ac}
0x105e…1074               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x00c2}
0x1074…107e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d8}
0x107e…1098               Head {h00=0x0016, h01=0x0050, text=»*    TOSS ROUTINES«, t00=0x000a, t01=0x00e2}
0x1098…10a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00fc}
0x10a2…10ce               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x000a, t01=0x0106}
0x10ce…10f2               Head {h00=0x0020, h01=0x0050, text=» EXTRN TDISP TOSS DISPATCHER«, t00=0x000a, t01=0x0132}
0x10f2…111a               Head {h00=0x0024, h01=0x0050, text=» EXTRN DISEND END I/O & DISPATCH«, t00=0x000a, t01=0x0156}
0x111a…1140               Head {h00=0x0022, h01=0x0050, text=» EXTRN TENDIO END I/O REQUEST «, t00=0x000a, t01=0x017e}
0x1140…114a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0014}
0x114a…1154               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x001e}
0x1154…1182               Head {h00=0x002a, h01=0x0050, text=»*    REQUEST ROUTINES IN LINE DRIVERS «, t00=0x000b, t01=0x0028}
0x1182…118c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0056}
0x118c…11a0               Head {h00=0x0010, h01=0x0050, text=»*      CHLT «, t00=0x000b, t01=0x0060}
0x11a0…11aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0074}
0x11aa…11d0               Head {h00=0x0022, h01=0x0050, text=» EXTRN LTCHRI CHARACTER INPUT «, t00=0x000b, t01=0x007e}
0x11d0…11f4               Head {h00=0x0020, h01=0x0050, text=» EXTRN LTSTBL START OF BLOCK«, t00=0x000b, t01=0x00a4}
0x11f4…121a               Head {h00=0x0022, h01=0x0050, text=» EXTRN LTCHRO CHARACTER OUTPUT«, t00=0x000b, t01=0x00c8}
0x121a…123c               Head {h00=0x001e, h01=0x0050, text=» EXTRN LTENBL END OF BLOCK«, t00=0x000b, t01=0x00ee}
0x123c…125a               Head {h00=0x001a, h01=0x0050, text=» EXTRN LTDISP DISPATCH«, t00=0x000b, t01=0x0110}
0x125a…1264               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x012e}
0x1264…1278               Head {h00=0x0010, h01=0x0050, text=»*      CHRT «, t00=0x000b, t01=0x0138}
0x1278…1282               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x014c}
0x1282…12a8               Head {h00=0x0022, h01=0x0050, text=» EXTRN RTCHRI CHARACTER INPUT «, t00=0x000b, t01=0x0156}
0x12a8…12cc               Head {h00=0x0020, h01=0x0050, text=» EXTRN RTSTBL START OF BLOCK«, t00=0x000b, t01=0x017c}
0x12cc…12f2               Head {h00=0x0022, h01=0x0050, text=» EXTRN RTCHRO CHARACTER OUTPUT«, t00=0x000c, t01=0x0010}
0x12f2…1314               Head {h00=0x001e, h01=0x0050, text=» EXTRN RTENBL END OF BLOCK«, t00=0x000c, t01=0x0036}
0x1314…1332               Head {h00=0x001a, h01=0x0050, text=» EXTRN RTDISP DISPATCH«, t00=0x000c, t01=0x0058}
0x1332…133c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0076}
0x133c…134a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0080}
0x134a…1354               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x008e}
0x1354…136a               Head {h00=0x0012, h01=0x0050, text=»*      SALCUZ «, t00=0x000c, t01=0x0098}
0x136a…1374               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ae}
0x1374…139a               Head {h00=0x0022, h01=0x0050, text=» EXTRN SLCHRI CHARACTER INPUT «, t00=0x000c, t01=0x00b8}
0x139a…13be               Head {h00=0x0020, h01=0x0050, text=» EXTRN SLSTBL START OF BLOCK«, t00=0x000c, t01=0x00de}
0x13be…13e4               Head {h00=0x0022, h01=0x0050, text=» EXTRN SLCHRO CHARACTER OUTPUT«, t00=0x000c, t01=0x0102}
0x13e4…1406               Head {h00=0x001e, h01=0x0050, text=» EXTRN SLENBL END OF BLOCK«, t00=0x000c, t01=0x0128}
0x1406…1424               Head {h00=0x001a, h01=0x0050, text=» EXTRN SLDISP DISPATCH«, t00=0x000c, t01=0x014a}
0x1424…142e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0168}
0x142e…1444               Head {h00=0x0012, h01=0x0050, text=»*      ASCU4Z «, t00=0x000c, t01=0x0172}
0x1444…144e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0188}
0x144e…1474 (13, 0, 398)  Head {h00=0x0022, h01=0x0050, text=» EXTRN ASCHRI CHARACTER INPUT «, t00=0x000d, t01=0x0004}
0x1474…1498               Head {h00=0x0020, h01=0x0050, text=» EXTRN ASSTBL START OF BLOCK«, t00=0x000d, t01=0x002a}
0x1498…14be               Head {h00=0x0022, h01=0x0050, text=» EXTRN ASCHRO CHARACTER OUTPUT«, t00=0x000d, t01=0x004e}
0x14be…14e0               Head {h00=0x001e, h01=0x0050, text=» EXTRN ASENBL END OF BLOCK«, t00=0x000d, t01=0x0074}
0x14e0…14fe               Head {h00=0x001a, h01=0x0050, text=» EXTRN ASDISP DISPATCH«, t00=0x000d, t01=0x0096}
0x14fe…1508               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00b4}
0x1508…151c               Head {h00=0x0010, h01=0x0050, text=»*      FT80 «, t00=0x000d, t01=0x00be}
0x151c…1526               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00d2}
0x1526…154c               Head {h00=0x0022, h01=0x0050, text=» EXTRN FTCHRI CHARACTER INPUT «, t00=0x000d, t01=0x00dc}
0x154c…1570               Head {h00=0x0020, h01=0x0050, text=» EXTRN FTSTBL START OF BLOCK«, t00=0x000d, t01=0x0102}
0x1570…1596               Head {h00=0x0022, h01=0x0050, text=» EXTRN FTCHRO CHARACTER OUTPUT«, t00=0x000d, t01=0x0126}
0x1596…15b8               Head {h00=0x001e, h01=0x0050, text=» EXTRN FTENBL END OF BLOCK«, t00=0x000d, t01=0x014c}
0x15b8…15d6               Head {h00=0x001a, h01=0x0050, text=» EXTRN FTDISP DISPATCH«, t00=0x000d, t01=0x016e}
0x15d6…15e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x018c}
0x15e0…15fa               Head {h00=0x0016, h01=0x0050, text=»*      PLC - LOCAL«, t00=0x000e, t01=0x0008}
0x15fa…1604               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0022}
0x1604…162a               Head {h00=0x0022, h01=0x0050, text=» EXTRN PLCHRI CHARACTER INPUT «, t00=0x000e, t01=0x002c}
0x162a…164e               Head {h00=0x0020, h01=0x0050, text=» EXTRN PLSTBL START OF BLOCK«, t00=0x000e, t01=0x0052}
0x164e…1674               Head {h00=0x0022, h01=0x0050, text=» EXTRN PLCHRO CHARACTER OUTPUT«, t00=0x000e, t01=0x0076}
0x1674…1696               Head {h00=0x001e, h01=0x0050, text=» EXTRN PLENBL END OF BLOCK«, t00=0x000e, t01=0x009c}
0x1696…16b4               Head {h00=0x001a, h01=0x0050, text=» EXTRN PLDISP DISPATCH«, t00=0x000e, t01=0x00be}
0x16b4…16be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00dc}
0x16be…16cc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x00e6}
0x16cc…16d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f4}
0x16d6…16f2               Head {h00=0x0018, h01=0x0050, text=»*      PLC - REMOTE «, t00=0x000e, t01=0x00fe}
0x16f2…16fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x011a}
0x16fc…1722               Head {h00=0x0022, h01=0x0050, text=» EXTRN PRCHRI CHARACTER INPUT «, t00=0x000e, t01=0x0124}
0x1722…1746               Head {h00=0x0020, h01=0x0050, text=» EXTRN PRSTBL START OF BLOCK«, t00=0x000e, t01=0x014a}
0x1746…176c               Head {h00=0x0022, h01=0x0050, text=» EXTRN PRCHRO CHARACTER OUTPUT«, t00=0x000e, t01=0x016e}
0x176c…178e (15, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» EXTRN PRENBL END OF BLOCK«, t00=0x000f, t01=0x0004}
0x178e…17ac               Head {h00=0x001a, h01=0x0050, text=» EXTRN PRDISP DISPATCH«, t00=0x000f, t01=0x0026}
0x17ac…17b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0044}
0x17b6…17ca               Head {h00=0x0010, h01=0x0050, text=»*      VIDEO«, t00=0x000f, t01=0x004e}
0x17ca…17d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0062}
0x17d4…17fa               Head {h00=0x0022, h01=0x0050, text=» EXTRN VUCHRI CHARACTER INPUT «, t00=0x000f, t01=0x006c}
0x17fa…181e               Head {h00=0x0020, h01=0x0050, text=» EXTRN VUSTBL START OF BLOCK«, t00=0x000f, t01=0x0092}
0x181e…1844               Head {h00=0x0022, h01=0x0050, text=» EXTRN VUCHRO CHARACTER OUTPUT«, t00=0x000f, t01=0x00b6}
0x1844…1866               Head {h00=0x001e, h01=0x0050, text=» EXTRN VUENBL END OF BLOCK«, t00=0x000f, t01=0x00dc}
0x1866…1884               Head {h00=0x001a, h01=0x0050, text=» EXTRN VUDISP DISPATCH«, t00=0x000f, t01=0x00fe}
0x1884…188e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x011c}
0x188e…189c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0126}
0x189c…18a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0134}
0x18a6…18c4               Head {h00=0x001a, h01=0x0050, text=»*    DWT DISPLACEMENTS«, t00=0x000f, t01=0x013e}
0x18c4…18ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x015c}
0x18ce…18f6               Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTCHP CHANNEL PARAMETERS«, t00=0x000f, t01=0x0166}
0x18f6…1912               Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x000f, t01=0x018e}
0x1912…1934               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB ADDRESS «, t00=0x0010, t01=0x001a}
0x1934…1958               Head {h00=0x0020, h01=0x0050, text=» EXTRN DWTOR INDEX AND ORDER«, t00=0x0010, t01=0x003c}
0x1958…198a               Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTADR DRIVER ADDRESS BLOCK ADDRESS«, t00=0x0010, t01=0x0060}
0x198a…19b8               Head {h00=0x002a, h01=0x0050, text=» EXTRN DWTWAT WAIT/ACTIVATE INDICATOR «, t00=0x0010, t01=0x0092}
0x19b8…19de               Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTA3 SAVE AREA FOR A3 «, t00=0x0010, t01=0x00c0}
0x19de…1a04               Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTA4 SAVE AREA FOR A4 «, t00=0x0010, t01=0x00e6}
0x1a04…1a2a               Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTA5 SAVE AREA FOR A5 «, t00=0x0010, t01=0x010c}
0x1a2a…1a4a               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTSB2 STACK BASE«, t00=0x0010, t01=0x0132}
0x1a4a…1a70               Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTA7 SAVE AREA FOR A7 «, t00=0x0010, t01=0x0152}
0x1a70…1a96               Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTA8 SAVE AREA FOR A8 «, t00=0x0010, t01=0x0178}
0x1a96…1ace               Head {h00=0x0034, h01=0x0050, text=» EXTRN DWTECH DWT ADDRESS OF ECHO OUTPUT DEVICE «, t00=0x0011, t01=0x000e}
0x1ace…1ad8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0046}
0x1ad8…1ae2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0050}
0x1ae2…1b00               Head {h00=0x001a, h01=0x0050, text=»*    ECB DISPLACEMENTS«, t00=0x0011, t01=0x005a}
0x1b00…1b0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0078}
0x1b0a…1b2e               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBBA BUFFER ADDRESS «, t00=0x0011, t01=0x0082}
0x1b2e…1b54               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBRL REQUESTED LENGTH «, t00=0x0011, t01=0x00a6}
0x1b54…1b7a               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBEL EFFECTIVE LENGTH «, t00=0x0011, t01=0x00cc}
0x1b7a…1b84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f2}
0x1b84…1b8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00fc}
0x1b8e…1ba8               Head {h00=0x0016, h01=0x0050, text=»*    MISCELLANEOUS«, t00=0x0011, t01=0x0106}
0x1ba8…1bb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0120}
0x1bb2…1bea               Head {h00=0x0034, h01=0x0050, text=» EXTRN RECADR RECOVERY ADDR IN DRIVER ADDR BLOCK«, t00=0x0011, t01=0x012a}
0x1bea…1c24               Head {h00=0x0036, h01=0x0050, text=» EXTRN ECHADR ECHO ADDRESS IN DRIVER ADDRESS BLOCK«, t00=0x0011, t01=0x0162}
0x1c24…1c2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x000c}
0x1c2e…1c3c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0016}
0x1c3c…1c46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0024}
0x1c46…1c66               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0012, t01=0x002e}
0x1c66…1c86               Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x0012, t01=0x004e}
0x1c86…1ca6               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0012, t01=0x006e}
0x1ca6…1cb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x008e}
0x1cb0…1cea               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0012, t01=0x0098}
0x1cea…1d1c               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0012, t01=0x00d2}
0x1d1c…1d26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0104}
0x1d26…1d3a               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0012, t01=0x010e}
0x1d3a…1d44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0122}
0x1d44…1d4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x012c}
0x1d4e…1d8c               Head {h00=0x003a, h01=0x0050, text=»* THE FOLLOWING CONDITIONS DEFINE WHICH CHANNEL UNITS «, t00=0x0012, t01=0x0136}
0x1d8c…1dc8               Head {h00=0x0038, h01=0x0050, text=»* FOR TERMINAL DEVICES THAT ARE USED IN THE SYSTEM. «, t00=0x0012, t01=0x0174}
0x1dc8…1df4               Head {h00=0x0028, h01=0x0050, text=»* 0 MEANS CHANNEL UNIT IS NOT USED. «, t00=0x0013, t01=0x0020}
0x1df4…1e1c               Head {h00=0x0024, h01=0x0050, text=»* 1 MEANS CHANNEL UNIT IS USED. «, t00=0x0013, t01=0x004c}
0x1e1c…1e26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0074}
0x1e26…1e38               Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0013, t01=0x007e}
0x1e38…1e50               Head {h00=0x0014, h01=0x0050, text=»LT EQU X:A CHLT «, t00=0x0013, t01=0x0090}
0x1e50…1e5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a8}
0x1e5a…1e6c               Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0013, t01=0x00b2}
0x1e6c…1e84               Head {h00=0x0014, h01=0x0050, text=»RT EQU X:B CHRT «, t00=0x0013, t01=0x00c4}
0x1e84…1e8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00dc}
0x1e8e…1ea0               Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x0013, t01=0x00e6}
0x1ea0…1eba               Head {h00=0x0016, h01=0x0050, text=»SL EQU X:C SALCUZ «, t00=0x0013, t01=0x00f8}
0x1eba…1ec4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0112}
0x1ec4…1ed6               Head {h00=0x000e, h01=0x0050, text=»X:D EQU 0 «, t00=0x0013, t01=0x011c}
0x1ed6…1ef0               Head {h00=0x0016, h01=0x0050, text=»AS EQU X:D ASCU4Z «, t00=0x0013, t01=0x012e}
0x1ef0…1efa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0148}
0x1efa…1f0c               Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x0013, t01=0x0152}
0x1f0c…1f24               Head {h00=0x0014, h01=0x0050, text=»FT EQU X:E FT80 «, t00=0x0013, t01=0x0164}
0x1f24…1f2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x017c}
0x1f2e…1f40               Head {h00=0x000e, h01=0x0050, text=»X:F EQU 0 «, t00=0x0013, t01=0x0186}
0x1f40…1f5e               Head {h00=0x001a, h01=0x0050, text=»PL EQU X:F PLC - LOCAL«, t00=0x0014, t01=0x0008}
0x1f5e…1f68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0026}
0x1f68…1f76               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0030}
0x1f76…1f80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x003e}
0x1f80…1f92               Head {h00=0x000e, h01=0x0050, text=»X:G EQU 0 «, t00=0x0014, t01=0x0048}
0x1f92…1fb2               Head {h00=0x001c, h01=0x0050, text=»PR EQU X:G PLC - REMOTE «, t00=0x0014, t01=0x005a}
0x1fb2…1fbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x007a}
0x1fbc…1fce               Head {h00=0x000e, h01=0x0050, text=»X:H EQU 0 «, t00=0x0014, t01=0x0084}
0x1fce…1fe6               Head {h00=0x0014, h01=0x0050, text=»VU EQU X:H VIDEO«, t00=0x0014, t01=0x0096}
0x1fe6…1ff0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00ae}
0x1ff0…1ffa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00b8}
0x1ffa…2028               Head {h00=0x002a, h01=0x0050, text=»* ECHO FUNCTION IS INCLUDED IF CECHO=1«, t00=0x0014, t01=0x00c2}
0x2028…2032               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00f0}
0x2032…2044               Head {h00=0x000e, h01=0x0050, text=»X:I EQU 1 «, t00=0x0014, t01=0x00fa}
0x2044…205a               Head {h00=0x0012, h01=0x0050, text=»CECHO EQU X:I «, t00=0x0014, t01=0x010c}
0x205a…2064               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0122}
0x2064…206e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x012c}
0x206e…20ae               Head {h00=0x003c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY PARAMETER FOR ONLY SUM-CONNECTION«, t00=0x0014, t01=0x0136}
0x20ae…20dc               Head {h00=0x002a, h01=0x0050, text=»* NTONSU = 0 MEANS ONLY SUM-CONNECTION«, t00=0x0014, t01=0x0176}
0x20dc…20e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0014}
0x20e6…2100               Head {h00=0x0016, h01=0x0050, text=»S1 EQU SL+AS U =1 «, t00=0x0015, t01=0x001e}
0x2100…211a               Head {h00=0x0016, h01=0x0050, text=»S2 EQU S1+FT U =1 «, t00=0x0015, t01=0x0038}
0x211a…2134               Head {h00=0x0016, h01=0x0050, text=»S3 EQU S2+PL U =1 «, t00=0x0015, t01=0x0052}
0x2134…214e               Head {h00=0x0016, h01=0x0050, text=»S4 EQU S3+PR U =1 «, t00=0x0015, t01=0x006c}
0x214e…2168               Head {h00=0x0016, h01=0x0050, text=»S5 EQU S4+VU U =1 «, t00=0x0015, t01=0x0086}
0x2168…2172               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a0}
0x2172…218c               Head {h00=0x0016, h01=0x0050, text=»NTONSU EQU S5 U =1«, t00=0x0015, t01=0x00aa}
0x218c…2196               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00c4}
0x2196…21a4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x00ce}
0x21a4…21ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00dc}
0x21ae…21c4               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0015, t01=0x00e6}
0x21c4…21da               Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0015, t01=0x00fc}
0x21da…21f0               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0015, t01=0x0112}
0x21f0…21fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0128}
0x21fa…2220               Head {h00=0x0022, h01=0x0050, text=»*    DWT STATUS FLAGS (DWTST) «, t00=0x0015, t01=0x0132}
0x2220…222a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0158}
0x222a…224e               Head {h00=0x0020, h01=0x0050, text=»DWFBSY EQU /8000 DEVICE BUSY«, t00=0x0015, t01=0x0162}
0x224e…2270               Head {h00=0x001e, h01=0x0050, text=»DWFECH EQU /2000 ECHO MODE«, t00=0x0015, t01=0x0186}
0x2270…2298               Head {h00=0x0024, h01=0x0050, text=»DWFINP EQU /0020 INPUT REQUESTED«, t00=0x0016, t01=0x0018}
0x2298…22a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0040}
0x22a2…22ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x004a}
0x22ac…22c6               Head {h00=0x0016, h01=0x0050, text=»*    MISCELLANEOUS«, t00=0x0016, t01=0x0054}
0x22c6…22d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x006e}
0x22d0…2304               Head {h00=0x0030, h01=0x0050, text=»NOTOPR EQU /0001 RETURN CODE "NOT OPERABLE" «, t00=0x0016, t01=0x0078}
0x2304…233e               Head {h00=0x0036, h01=0x0050, text=»CONFER EQU /0001 RETURN CODE "CONFIGURATION ERROR"«, t00=0x0016, t01=0x00ac}
0x233e…2372               Head {h00=0x0030, h01=0x0050, text=»REQERR EQU /8000 RETURN CODE "REQUEST ERROR"«, t00=0x0016, t01=0x00e6}
0x2372…23aa               Head {h00=0x0034, h01=0x0050, text=»MASKCT EQU /0F MASK FOR CONNECTION TYPE (DWTCHP)«, t00=0x0016, t01=0x011a}
0x23aa…23b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0152}
0x23b4…23c2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x015c}
0x23c2…23cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x016a}
0x23cc…23e2               Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0016, t01=0x0174}
0x23e2…23f8               Head {h00=0x0012, h01=0x0050, text=»* DATA AREAS *«, t00=0x0016, t01=0x018a}
0x23f8…240e               Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0017, t01=0x0010}
0x240e…2418               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0026}
0x2418…2432               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0017, t01=0x0030}
0x2432…243c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x004a}
0x243c…2458               Head {h00=0x0018, h01=0x0050, text=»*    DISPATCH TABLES«, t00=0x0017, t01=0x0054}
0x2458…2462               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0070}
0x2462…2480               Head {h00=0x001a, h01=0x0050, text=»*      CHARACTER INPUT«, t00=0x0017, t01=0x007a}
0x2480…2494               Head {h00=0x0010, h01=0x0050, text=»INPTAB EQU *«, t00=0x0017, t01=0x0098}
0x2494…24a6               Head {h00=0x000e, h01=0x0050, text=» IFT LT=0 «, t00=0x0017, t01=0x00ac}
0x24a6…24ba               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0017, t01=0x00be}
0x24ba…24c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00d2}
0x24c6…24e0               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0017, t01=0x00de}
0x24e0…24f2               Head {h00=0x000e, h01=0x0050, text=» IFT LT=1 «, t00=0x0017, t01=0x00f8}
0x24f2…2506               Head {h00=0x0010, h01=0x0050, text=» DATA LTCHRI«, t00=0x0017, t01=0x010a}
0x2506…2512               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x011e}
0x2512…252c               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0017, t01=0x012a}
0x252c…2536               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0144}
0x2536…2548               Head {h00=0x000e, h01=0x0050, text=» IFT RT=0 «, t00=0x0017, t01=0x014e}
0x2548…255c               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0017, t01=0x0160}
0x255c…2568               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0174}
0x2568…2582               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0017, t01=0x0180}
0x2582…2594               Head {h00=0x000e, h01=0x0050, text=» IFT RT=1 «, t00=0x0018, t01=0x000a}
0x2594…25a8               Head {h00=0x0010, h01=0x0050, text=» DATA RTCHRI«, t00=0x0018, t01=0x001c}
0x25a8…25b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0030}
0x25b4…25ce               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0018, t01=0x003c}
0x25ce…25d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0056}
0x25d8…25ea               Head {h00=0x000e, h01=0x0050, text=» IFT SL=0 «, t00=0x0018, t01=0x0060}
0x25ea…25fe               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0018, t01=0x0072}
0x25fe…260a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0086}
0x260a…2624               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0018, t01=0x0092}
0x2624…2636               Head {h00=0x000e, h01=0x0050, text=» IFT SL=1 «, t00=0x0018, t01=0x00ac}
0x2636…264a               Head {h00=0x0010, h01=0x0050, text=» DATA SLCHRI«, t00=0x0018, t01=0x00be}
0x264a…2656               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00d2}
0x2656…2670               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0018, t01=0x00de}
0x2670…267a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f8}
0x267a…268c               Head {h00=0x000e, h01=0x0050, text=» IFT AS=0 «, t00=0x0018, t01=0x0102}
0x268c…26a0               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0018, t01=0x0114}
0x26a0…26ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0128}
0x26ac…26c6               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0018, t01=0x0134}
0x26c6…26d8               Head {h00=0x000e, h01=0x0050, text=» IFT AS=1 «, t00=0x0018, t01=0x014e}
0x26d8…26ec               Head {h00=0x0010, h01=0x0050, text=» DATA ASCHRI«, t00=0x0018, t01=0x0160}
0x26ec…26f8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0174}
0x26f8…2712               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0018, t01=0x0180}
0x2712…271c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x000a}
0x271c…272e               Head {h00=0x000e, h01=0x0050, text=» IFT FT=0 «, t00=0x0019, t01=0x0014}
0x272e…2742               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0019, t01=0x0026}
0x2742…274e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x003a}
0x274e…2768               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0019, t01=0x0046}
0x2768…277a               Head {h00=0x000e, h01=0x0050, text=» IFT FT=1 «, t00=0x0019, t01=0x0060}
0x277a…278e               Head {h00=0x0010, h01=0x0050, text=» DATA FTCHRI«, t00=0x0019, t01=0x0072}
0x278e…279a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0086}
0x279a…27b4               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0019, t01=0x0092}
0x27b4…27be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00ac}
0x27be…27d0               Head {h00=0x000e, h01=0x0050, text=» IFT PL=0 «, t00=0x0019, t01=0x00b6}
0x27d0…27e4               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0019, t01=0x00c8}
0x27e4…27f0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00dc}
0x27f0…280a               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0019, t01=0x00e8}
0x280a…281c               Head {h00=0x000e, h01=0x0050, text=» IFT PL=1 «, t00=0x0019, t01=0x0102}
0x281c…2830               Head {h00=0x0010, h01=0x0050, text=» DATA PLCHRI«, t00=0x0019, t01=0x0114}
0x2830…283c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0128}
0x283c…2856               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0019, t01=0x0134}
0x2856…2860               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x014e}
0x2860…2872               Head {h00=0x000e, h01=0x0050, text=» IFT PR=0 «, t00=0x0019, t01=0x0158}
0x2872…2886               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0019, t01=0x016a}
0x2886…2892               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x017e}
0x2892…28ac               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0019, t01=0x018a}
0x28ac…28be               Head {h00=0x000e, h01=0x0050, text=» IFT PR=1 «, t00=0x001a, t01=0x0014}
0x28be…28d2               Head {h00=0x0010, h01=0x0050, text=» DATA PRCHRI«, t00=0x001a, t01=0x0026}
0x28d2…28de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x003a}
0x28de…28f8               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001a, t01=0x0046}
0x28f8…2902               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0060}
0x2902…2914               Head {h00=0x000e, h01=0x0050, text=» IFT VU=0 «, t00=0x001a, t01=0x006a}
0x2914…2928               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001a, t01=0x007c}
0x2928…2934               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0090}
0x2934…294e               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001a, t01=0x009c}
0x294e…2960               Head {h00=0x000e, h01=0x0050, text=» IFT VU=1 «, t00=0x001a, t01=0x00b6}
0x2960…2974               Head {h00=0x0010, h01=0x0050, text=» DATA VUCHRI«, t00=0x001a, t01=0x00c8}
0x2974…2980               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x00dc}
0x2980…299a               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001a, t01=0x00e8}
0x299a…29b6               Head {h00=0x0018, h01=0x0050, text=»DTABLN EQU *-INPTAB «, t00=0x001a, t01=0x0102}
0x29b6…29c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x011e}
0x29c0…29ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0128}
0x29ca…29e8               Head {h00=0x001a, h01=0x0050, text=»*      START OF BLOCK «, t00=0x001a, t01=0x0132}
0x29e8…29fc               Head {h00=0x0010, h01=0x0050, text=»STBTAB EQU *«, t00=0x001a, t01=0x0150}
0x29fc…2a0e               Head {h00=0x000e, h01=0x0050, text=» IFT LT=0 «, t00=0x001a, t01=0x0164}
0x2a0e…2a22               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001a, t01=0x0176}
0x2a22…2a2e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x018a}
0x2a2e…2a48               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001b, t01=0x0008}
0x2a48…2a5a               Head {h00=0x000e, h01=0x0050, text=» IFT LT=1 «, t00=0x001b, t01=0x0022}
0x2a5a…2a6e               Head {h00=0x0010, h01=0x0050, text=» DATA LTSTBL«, t00=0x001b, t01=0x0034}
0x2a6e…2a7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0048}
0x2a7a…2a94               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001b, t01=0x0054}
0x2a94…2a9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x006e}
0x2a9e…2ab0               Head {h00=0x000e, h01=0x0050, text=» IFT RT=0 «, t00=0x001b, t01=0x0078}
0x2ab0…2ac4               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001b, t01=0x008a}
0x2ac4…2ad0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x009e}
0x2ad0…2aea               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001b, t01=0x00aa}
0x2aea…2afc               Head {h00=0x000e, h01=0x0050, text=» IFT RT=1 «, t00=0x001b, t01=0x00c4}
0x2afc…2b10               Head {h00=0x0010, h01=0x0050, text=» DATA RTSTBL«, t00=0x001b, t01=0x00d6}
0x2b10…2b1c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00ea}
0x2b1c…2b36               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001b, t01=0x00f6}
0x2b36…2b40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0110}
0x2b40…2b52               Head {h00=0x000e, h01=0x0050, text=» IFT SL=0 «, t00=0x001b, t01=0x011a}
0x2b52…2b66               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001b, t01=0x012c}
0x2b66…2b72               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0140}
0x2b72…2b8c               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001b, t01=0x014c}
0x2b8c…2b9e               Head {h00=0x000e, h01=0x0050, text=» IFT SL=1 «, t00=0x001b, t01=0x0166}
0x2b9e…2bb2               Head {h00=0x0010, h01=0x0050, text=» DATA SLSTBL«, t00=0x001b, t01=0x0178}
0x2bb2…2bbe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x018c}
0x2bbe…2bd8               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001c, t01=0x0008}
0x2bd8…2be2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0022}
0x2be2…2bf4               Head {h00=0x000e, h01=0x0050, text=» IFT AS=0 «, t00=0x001c, t01=0x002c}
0x2bf4…2c08               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001c, t01=0x003e}
0x2c08…2c14               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0052}
0x2c14…2c2e               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001c, t01=0x005e}
0x2c2e…2c40               Head {h00=0x000e, h01=0x0050, text=» IFT AS=1 «, t00=0x001c, t01=0x0078}
0x2c40…2c54               Head {h00=0x0010, h01=0x0050, text=» DATA ASSTBL«, t00=0x001c, t01=0x008a}
0x2c54…2c60               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x009e}
0x2c60…2c7a               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001c, t01=0x00aa}
0x2c7a…2c84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00c4}
0x2c84…2c96               Head {h00=0x000e, h01=0x0050, text=» IFT FT=0 «, t00=0x001c, t01=0x00ce}
0x2c96…2caa               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001c, t01=0x00e0}
0x2caa…2cb6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00f4}
0x2cb6…2cd0               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001c, t01=0x0100}
0x2cd0…2ce2               Head {h00=0x000e, h01=0x0050, text=» IFT FT=1 «, t00=0x001c, t01=0x011a}
0x2ce2…2cf6               Head {h00=0x0010, h01=0x0050, text=» DATA FTSTBL«, t00=0x001c, t01=0x012c}
0x2cf6…2d02               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0140}
0x2d02…2d1c               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001c, t01=0x014c}
0x2d1c…2d26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0166}
0x2d26…2d38               Head {h00=0x000e, h01=0x0050, text=» IFT PL=0 «, t00=0x001c, t01=0x0170}
0x2d38…2d4c               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001c, t01=0x0182}
0x2d4c…2d58               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0008}
0x2d58…2d72               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001d, t01=0x0014}
0x2d72…2d84               Head {h00=0x000e, h01=0x0050, text=» IFT PL=1 «, t00=0x001d, t01=0x002e}
0x2d84…2d98               Head {h00=0x0010, h01=0x0050, text=» DATA PLSTBL«, t00=0x001d, t01=0x0040}
0x2d98…2da4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0054}
0x2da4…2dbe               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001d, t01=0x0060}
0x2dbe…2dc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x007a}
0x2dc8…2dda               Head {h00=0x000e, h01=0x0050, text=» IFT PR=0 «, t00=0x001d, t01=0x0084}
0x2dda…2dee               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001d, t01=0x0096}
0x2dee…2dfa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00aa}
0x2dfa…2e14               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001d, t01=0x00b6}
0x2e14…2e26               Head {h00=0x000e, h01=0x0050, text=» IFT PR=1 «, t00=0x001d, t01=0x00d0}
0x2e26…2e3a               Head {h00=0x0010, h01=0x0050, text=» DATA PRSTBL«, t00=0x001d, t01=0x00e2}
0x2e3a…2e46               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00f6}
0x2e46…2e60               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001d, t01=0x0102}
0x2e60…2e6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x011c}
0x2e6a…2e7c               Head {h00=0x000e, h01=0x0050, text=» IFT VU=0 «, t00=0x001d, t01=0x0126}
0x2e7c…2e90               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001d, t01=0x0138}
0x2e90…2e9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x014c}
0x2e9c…2eb6               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001d, t01=0x0158}
0x2eb6…2ec8               Head {h00=0x000e, h01=0x0050, text=» IFT VU=1 «, t00=0x001d, t01=0x0172}
0x2ec8…2edc               Head {h00=0x0010, h01=0x0050, text=» DATA VUSTBL«, t00=0x001d, t01=0x0184}
0x2edc…2ee8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0008}
0x2ee8…2f02               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001e, t01=0x0014}
0x2f02…2f0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x002e}
0x2f0c…2f16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0038}
0x2f16…2f36               Head {h00=0x001c, h01=0x0050, text=»*      CHARACTER OUTPUT «, t00=0x001e, t01=0x0042}
0x2f36…2f4a               Head {h00=0x0010, h01=0x0050, text=»OUPTAB EQU *«, t00=0x001e, t01=0x0062}
0x2f4a…2f5c               Head {h00=0x000e, h01=0x0050, text=» IFT LT=0 «, t00=0x001e, t01=0x0076}
0x2f5c…2f70               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001e, t01=0x0088}
0x2f70…2f7c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x009c}
0x2f7c…2f96               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001e, t01=0x00a8}
0x2f96…2fa8               Head {h00=0x000e, h01=0x0050, text=» IFT LT=1 «, t00=0x001e, t01=0x00c2}
0x2fa8…2fbc               Head {h00=0x0010, h01=0x0050, text=» DATA LTCHRO«, t00=0x001e, t01=0x00d4}
0x2fbc…2fc8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00e8}
0x2fc8…2fe2               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001e, t01=0x00f4}
0x2fe2…2fec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x010e}
0x2fec…2ffe               Head {h00=0x000e, h01=0x0050, text=» IFT RT=0 «, t00=0x001e, t01=0x0118}
0x2ffe…3012               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001e, t01=0x012a}
0x3012…301e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x013e}
0x301e…3038               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001e, t01=0x014a}
0x3038…304a               Head {h00=0x000e, h01=0x0050, text=» IFT RT=1 «, t00=0x001e, t01=0x0164}
0x304a…305e               Head {h00=0x0010, h01=0x0050, text=» DATA RTCHRO«, t00=0x001e, t01=0x0176}
0x305e…306a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x018a}
0x306a…3084               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001f, t01=0x0008}
0x3084…308e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0022}
0x308e…30a0               Head {h00=0x000e, h01=0x0050, text=» IFT SL=0 «, t00=0x001f, t01=0x002c}
0x30a0…30b4               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001f, t01=0x003e}
0x30b4…30c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0052}
0x30c0…30da               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001f, t01=0x005e}
0x30da…30ec               Head {h00=0x000e, h01=0x0050, text=» IFT SL=1 «, t00=0x001f, t01=0x0078}
0x30ec…3100               Head {h00=0x0010, h01=0x0050, text=» DATA SLCHRO«, t00=0x001f, t01=0x008a}
0x3100…310c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x009e}
0x310c…3126               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001f, t01=0x00aa}
0x3126…3130               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00c4}
0x3130…3142               Head {h00=0x000e, h01=0x0050, text=» IFT AS=0 «, t00=0x001f, t01=0x00ce}
0x3142…3156               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001f, t01=0x00e0}
0x3156…3162               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x00f4}
0x3162…317c               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001f, t01=0x0100}
0x317c…318e               Head {h00=0x000e, h01=0x0050, text=» IFT AS=1 «, t00=0x001f, t01=0x011a}
0x318e…31a2               Head {h00=0x0010, h01=0x0050, text=» DATA ASCHRO«, t00=0x001f, t01=0x012c}
0x31a2…31ae               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0140}
0x31ae…31c8               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x001f, t01=0x014c}
0x31c8…31d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0166}
0x31d2…31e4               Head {h00=0x000e, h01=0x0050, text=» IFT FT=0 «, t00=0x001f, t01=0x0170}
0x31e4…31f8               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x001f, t01=0x0182}
0x31f8…3204               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0008}
0x3204…321e               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0020, t01=0x0014}
0x321e…3230               Head {h00=0x000e, h01=0x0050, text=» IFT FT=1 «, t00=0x0020, t01=0x002e}
0x3230…3244               Head {h00=0x0010, h01=0x0050, text=» DATA FTCHRO«, t00=0x0020, t01=0x0040}
0x3244…3250               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0054}
0x3250…326a               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0020, t01=0x0060}
0x326a…3274               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x007a}
0x3274…3286               Head {h00=0x000e, h01=0x0050, text=» IFT PL=0 «, t00=0x0020, t01=0x0084}
0x3286…329a               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0020, t01=0x0096}
0x329a…32a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00aa}
0x32a6…32c0               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0020, t01=0x00b6}
0x32c0…32d2               Head {h00=0x000e, h01=0x0050, text=» IFT PL=1 «, t00=0x0020, t01=0x00d0}
0x32d2…32e6               Head {h00=0x0010, h01=0x0050, text=» DATA PLCHRO«, t00=0x0020, t01=0x00e2}
0x32e6…32f2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00f6}
0x32f2…330c               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0020, t01=0x0102}
0x330c…3316               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x011c}
0x3316…3328               Head {h00=0x000e, h01=0x0050, text=» IFT PR=0 «, t00=0x0020, t01=0x0126}
0x3328…333c               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0020, t01=0x0138}
0x333c…3348               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x014c}
0x3348…3362               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0020, t01=0x0158}
0x3362…3374               Head {h00=0x000e, h01=0x0050, text=» IFT PR=1 «, t00=0x0020, t01=0x0172}
0x3374…3388               Head {h00=0x0010, h01=0x0050, text=» DATA PRCHRO«, t00=0x0020, t01=0x0184}
0x3388…3394               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0008}
0x3394…33ae               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0021, t01=0x0014}
0x33ae…33b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x002e}
0x33b8…33ca               Head {h00=0x000e, h01=0x0050, text=» IFT VU=0 «, t00=0x0021, t01=0x0038}
0x33ca…33de               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0021, t01=0x004a}
0x33de…33ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x005e}
0x33ea…3404               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0021, t01=0x006a}
0x3404…3416               Head {h00=0x000e, h01=0x0050, text=» IFT VU=1 «, t00=0x0021, t01=0x0084}
0x3416…342a               Head {h00=0x0010, h01=0x0050, text=» DATA VUCHRO«, t00=0x0021, t01=0x0096}
0x342a…3436               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x00aa}
0x3436…3450               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0021, t01=0x00b6}
0x3450…345a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00d0}
0x345a…3464               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00da}
0x3464…3480               Head {h00=0x0018, h01=0x0050, text=»*      END OF BLOCK «, t00=0x0021, t01=0x00e4}
0x3480…3494               Head {h00=0x0010, h01=0x0050, text=»ENBTAB EQU *«, t00=0x0021, t01=0x0100}
0x3494…34a6               Head {h00=0x000e, h01=0x0050, text=» IFT LT=0 «, t00=0x0021, t01=0x0114}
0x34a6…34ba               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0021, t01=0x0126}
0x34ba…34c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x013a}
0x34c6…34e0               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0021, t01=0x0146}
0x34e0…34f2               Head {h00=0x000e, h01=0x0050, text=» IFT LT=1 «, t00=0x0021, t01=0x0160}
0x34f2…3506               Head {h00=0x0010, h01=0x0050, text=» DATA LTENBL«, t00=0x0021, t01=0x0172}
0x3506…3512               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0186}
0x3512…352c (34, 0, 398)  Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0022, t01=0x0004}
0x352c…3536               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x001e}
0x3536…3548               Head {h00=0x000e, h01=0x0050, text=» IFT RT=0 «, t00=0x0022, t01=0x0028}
0x3548…355c               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0022, t01=0x003a}
0x355c…3568               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x004e}
0x3568…3582               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0022, t01=0x005a}
0x3582…3594               Head {h00=0x000e, h01=0x0050, text=» IFT RT=1 «, t00=0x0022, t01=0x0074}
0x3594…35a8               Head {h00=0x0010, h01=0x0050, text=» DATA RTENBL«, t00=0x0022, t01=0x0086}
0x35a8…35b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x009a}
0x35b4…35ce               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0022, t01=0x00a6}
0x35ce…35d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00c0}
0x35d8…35ea               Head {h00=0x000e, h01=0x0050, text=» IFT SL=0 «, t00=0x0022, t01=0x00ca}
0x35ea…35fe               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0022, t01=0x00dc}
0x35fe…360a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00f0}
0x360a…3624               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0022, t01=0x00fc}
0x3624…3636               Head {h00=0x000e, h01=0x0050, text=» IFT SL=1 «, t00=0x0022, t01=0x0116}
0x3636…364a               Head {h00=0x0010, h01=0x0050, text=» DATA SLENBL«, t00=0x0022, t01=0x0128}
0x364a…3656               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x013c}
0x3656…3670               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0022, t01=0x0148}
0x3670…367a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0162}
0x367a…368c               Head {h00=0x000e, h01=0x0050, text=» IFT AS=0 «, t00=0x0022, t01=0x016c}
0x368c…36a0               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0022, t01=0x017e}
0x36a0…36ac (35, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0004}
0x36ac…36c6               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0023, t01=0x0010}
0x36c6…36d8               Head {h00=0x000e, h01=0x0050, text=» IFT AS=1 «, t00=0x0023, t01=0x002a}
0x36d8…36ec               Head {h00=0x0010, h01=0x0050, text=» DATA ASENBL«, t00=0x0023, t01=0x003c}
0x36ec…36f8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0050}
0x36f8…3712               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0023, t01=0x005c}
0x3712…371c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0076}
0x371c…372e               Head {h00=0x000e, h01=0x0050, text=» IFT FT=0 «, t00=0x0023, t01=0x0080}
0x372e…3742               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0023, t01=0x0092}
0x3742…374e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x00a6}
0x374e…3768               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0023, t01=0x00b2}
0x3768…377a               Head {h00=0x000e, h01=0x0050, text=» IFT FT=1 «, t00=0x0023, t01=0x00cc}
0x377a…378e               Head {h00=0x0010, h01=0x0050, text=» DATA FTENBL«, t00=0x0023, t01=0x00de}
0x378e…379a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x00f2}
0x379a…37b4               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0023, t01=0x00fe}
0x37b4…37be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0118}
0x37be…37d0               Head {h00=0x000e, h01=0x0050, text=» IFT PL=0 «, t00=0x0023, t01=0x0122}
0x37d0…37e4               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0023, t01=0x0134}
0x37e4…37f0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0148}
0x37f0…380a               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0023, t01=0x0154}
0x380a…381c               Head {h00=0x000e, h01=0x0050, text=» IFT PL=1 «, t00=0x0023, t01=0x016e}
0x381c…3830               Head {h00=0x0010, h01=0x0050, text=» DATA PLENBL«, t00=0x0023, t01=0x0180}
0x3830…383c (36, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0004}
0x383c…3856               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0024, t01=0x0010}
0x3856…3860               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x002a}
0x3860…3872               Head {h00=0x000e, h01=0x0050, text=» IFT PR=0 «, t00=0x0024, t01=0x0034}
0x3872…3886               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0024, t01=0x0046}
0x3886…3892               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x005a}
0x3892…38ac               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0024, t01=0x0066}
0x38ac…38be               Head {h00=0x000e, h01=0x0050, text=» IFT PR=1 «, t00=0x0024, t01=0x0080}
0x38be…38d2               Head {h00=0x0010, h01=0x0050, text=» DATA PRENBL«, t00=0x0024, t01=0x0092}
0x38d2…38de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x00a6}
0x38de…38f8               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0024, t01=0x00b2}
0x38f8…3902               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00cc}
0x3902…3914               Head {h00=0x000e, h01=0x0050, text=» IFT VU=0 «, t00=0x0024, t01=0x00d6}
0x3914…3928               Head {h00=0x0010, h01=0x0050, text=» DATA NDRETE«, t00=0x0024, t01=0x00e8}
0x3928…3934               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x00fc}
0x3934…394e               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0024, t01=0x0108}
0x394e…3960               Head {h00=0x000e, h01=0x0050, text=» IFT VU=1 «, t00=0x0024, t01=0x0122}
0x3960…3974               Head {h00=0x0010, h01=0x0050, text=» DATA VUENBL«, t00=0x0024, t01=0x0134}
0x3974…3980               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0148}
0x3980…399a               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0024, t01=0x0154}
0x399a…39a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x016e}
0x39a4…39ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0178}
0x39ae…39cc               Head {h00=0x001a, h01=0x0050, text=»*      END OF REQUEST «, t00=0x0024, t01=0x0182}
0x39cc…39e0               Head {h00=0x0010, h01=0x0050, text=»ENRTAB EQU *«, t00=0x0025, t01=0x0010}
0x39e0…39f2               Head {h00=0x000e, h01=0x0050, text=» IFT LT=0 «, t00=0x0025, t01=0x0024}
0x39f2…3a06               Head {h00=0x0010, h01=0x0050, text=» DATA TDISP «, t00=0x0025, t01=0x0036}
0x3a06…3a12               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x004a}
0x3a12…3a2c               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0025, t01=0x0056}
0x3a2c…3a3e               Head {h00=0x000e, h01=0x0050, text=» IFT LT=1 «, t00=0x0025, t01=0x0070}
0x3a3e…3a52               Head {h00=0x0010, h01=0x0050, text=» DATA LTDISP«, t00=0x0025, t01=0x0082}
0x3a52…3a5e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0096}
0x3a5e…3a78               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0025, t01=0x00a2}
0x3a78…3a82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00bc}
0x3a82…3a94               Head {h00=0x000e, h01=0x0050, text=» IFT RT=0 «, t00=0x0025, t01=0x00c6}
0x3a94…3aa8               Head {h00=0x0010, h01=0x0050, text=» DATA TDISP «, t00=0x0025, t01=0x00d8}
0x3aa8…3ab4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x00ec}
0x3ab4…3ace               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0025, t01=0x00f8}
0x3ace…3ae0               Head {h00=0x000e, h01=0x0050, text=» IFT RT=1 «, t00=0x0025, t01=0x0112}
0x3ae0…3af4               Head {h00=0x0010, h01=0x0050, text=» DATA RTDISP«, t00=0x0025, t01=0x0124}
0x3af4…3b00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0138}
0x3b00…3b1a               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0025, t01=0x0144}
0x3b1a…3b24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x015e}
0x3b24…3b36               Head {h00=0x000e, h01=0x0050, text=» IFT SL=0 «, t00=0x0025, t01=0x0168}
0x3b36…3b4a               Head {h00=0x0010, h01=0x0050, text=» DATA TDISP «, t00=0x0025, t01=0x017a}
0x3b4a…3b56               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x018e}
0x3b56…3b70               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0026, t01=0x000a}
0x3b70…3b82               Head {h00=0x000e, h01=0x0050, text=» IFT SL=1 «, t00=0x0026, t01=0x0024}
0x3b82…3b96               Head {h00=0x0010, h01=0x0050, text=» DATA SLDISP«, t00=0x0026, t01=0x0036}
0x3b96…3ba2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x004a}
0x3ba2…3bbc               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0026, t01=0x0056}
0x3bbc…3bc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0070}
0x3bc6…3bd8               Head {h00=0x000e, h01=0x0050, text=» IFT AS=0 «, t00=0x0026, t01=0x007a}
0x3bd8…3bec               Head {h00=0x0010, h01=0x0050, text=» DATA TDISP «, t00=0x0026, t01=0x008c}
0x3bec…3bf8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x00a0}
0x3bf8…3c12               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0026, t01=0x00ac}
0x3c12…3c24               Head {h00=0x000e, h01=0x0050, text=» IFT AS=1 «, t00=0x0026, t01=0x00c6}
0x3c24…3c38               Head {h00=0x0010, h01=0x0050, text=» DATA ASDISP«, t00=0x0026, t01=0x00d8}
0x3c38…3c44               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x00ec}
0x3c44…3c5e               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0026, t01=0x00f8}
0x3c5e…3c68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0112}
0x3c68…3c7a               Head {h00=0x000e, h01=0x0050, text=» IFT FT=0 «, t00=0x0026, t01=0x011c}
0x3c7a…3c8e               Head {h00=0x0010, h01=0x0050, text=» DATA TDISP «, t00=0x0026, t01=0x012e}
0x3c8e…3c9a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x0142}
0x3c9a…3cb4               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0026, t01=0x014e}
0x3cb4…3cc6               Head {h00=0x000e, h01=0x0050, text=» IFT FT=1 «, t00=0x0026, t01=0x0168}
0x3cc6…3cda               Head {h00=0x0010, h01=0x0050, text=» DATA FTDISP«, t00=0x0026, t01=0x017a}
0x3cda…3ce6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x018e}
0x3ce6…3d00               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0027, t01=0x000a}
0x3d00…3d0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0024}
0x3d0a…3d1c               Head {h00=0x000e, h01=0x0050, text=» IFT PL=0 «, t00=0x0027, t01=0x002e}
0x3d1c…3d30               Head {h00=0x0010, h01=0x0050, text=» DATA TDISP «, t00=0x0027, t01=0x0040}
0x3d30…3d3c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0054}
0x3d3c…3d56               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0027, t01=0x0060}
0x3d56…3d68               Head {h00=0x000e, h01=0x0050, text=» IFT PL=1 «, t00=0x0027, t01=0x007a}
0x3d68…3d7c               Head {h00=0x0010, h01=0x0050, text=» DATA PLDISP«, t00=0x0027, t01=0x008c}
0x3d7c…3d88               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x00a0}
0x3d88…3da2               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0027, t01=0x00ac}
0x3da2…3dac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00c6}
0x3dac…3dbe               Head {h00=0x000e, h01=0x0050, text=» IFT PR=0 «, t00=0x0027, t01=0x00d0}
0x3dbe…3dd2               Head {h00=0x0010, h01=0x0050, text=» DATA TDISP «, t00=0x0027, t01=0x00e2}
0x3dd2…3dde               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x00f6}
0x3dde…3df8               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0027, t01=0x0102}
0x3df8…3e0a               Head {h00=0x000e, h01=0x0050, text=» IFT PR=1 «, t00=0x0027, t01=0x011c}
0x3e0a…3e1e               Head {h00=0x0010, h01=0x0050, text=» DATA PRDISP«, t00=0x0027, t01=0x012e}
0x3e1e…3e2a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0142}
0x3e2a…3e44               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0027, t01=0x014e}
0x3e44…3e4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0168}
0x3e4e…3e60               Head {h00=0x000e, h01=0x0050, text=» IFT VU=0 «, t00=0x0027, t01=0x0172}
0x3e60…3e74               Head {h00=0x0010, h01=0x0050, text=» DATA TDISP «, t00=0x0027, t01=0x0184}
0x3e74…3e80               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0008}
0x3e80…3e9a               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0028, t01=0x0014}
0x3e9a…3eac               Head {h00=0x000e, h01=0x0050, text=» IFT VU=1 «, t00=0x0028, t01=0x002e}
0x3eac…3ec0               Head {h00=0x0010, h01=0x0050, text=» DATA VUDISP«, t00=0x0028, t01=0x0040}
0x3ec0…3ecc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0054}
0x3ecc…3ed6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0060}
0x3ed6…3ee4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x006a}
0x3ee4…3eee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0078}
0x3eee…3f0c               Head {h00=0x001a, h01=0x0050, text=»*    INTERRUPT TABLES «, t00=0x0028, t01=0x0082}
0x3f0c…3f16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00a0}
0x3f16…3f2c               Head {h00=0x0012, h01=0x0050, text=» IFT LT=0 U =2«, t00=0x0028, t01=0x00aa}
0x3f2c…3f4c               Head {h00=0x001c, h01=0x0050, text=»*    DUMMY ENTRIES CHLT «, t00=0x0028, t01=0x00c0}
0x3f4c…3f66               Head {h00=0x0016, h01=0x0050, text=»INTLT1 EQU * U =2 «, t00=0x0028, t01=0x00e0}
0x3f66…3f80               Head {h00=0x0016, h01=0x0050, text=»INTLT2 EQU * U =2 «, t00=0x0028, t01=0x00fa}
0x3f80…3f9a               Head {h00=0x0016, h01=0x0050, text=»INTLT3 EQU * U =2 «, t00=0x0028, t01=0x0114}
0x3f9a…3fb4               Head {h00=0x0016, h01=0x0050, text=»INTLT4 EQU * U =2 «, t00=0x0028, t01=0x012e}
0x3fb4…3fc6               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x0028, t01=0x0148}
0x3fc6…3fd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x015a}
0x3fd0…3fe6               Head {h00=0x0012, h01=0x0050, text=» IFT LT=1 U =2«, t00=0x0028, t01=0x0164}
0x3fe6…3ff6               Head {h00=0x000c, h01=0x0050, text=»*   CHLT«, t00=0x0028, t01=0x017a}
0x3ff6…4010               Head {h00=0x0016, h01=0x0050, text=»INTLT1 DATA 0 U =2«, t00=0x0028, t01=0x018a}
0x4010…402a               Head {h00=0x0016, h01=0x0050, text=»INTLT2 DATA 0 U =2«, t00=0x0029, t01=0x0014}
0x402a…4044               Head {h00=0x0016, h01=0x0050, text=»INTLT3 DATA 0 U =2«, t00=0x0029, t01=0x002e}
0x4044…405e               Head {h00=0x0016, h01=0x0050, text=»INTLT4 DATA 0 U =2«, t00=0x0029, t01=0x0048}
0x405e…4070               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x0029, t01=0x0062}
0x4070…407a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0074}
0x407a…4090               Head {h00=0x0012, h01=0x0050, text=» IFT RT=0 U =2«, t00=0x0029, t01=0x007e}
0x4090…40b0               Head {h00=0x001c, h01=0x0050, text=»*    DUMMY ENTRIES CHRT «, t00=0x0029, t01=0x0094}
0x40b0…40ca               Head {h00=0x0016, h01=0x0050, text=»INTRT1 EQU * U =2 «, t00=0x0029, t01=0x00b4}
0x40ca…40e4               Head {h00=0x0016, h01=0x0050, text=»INTRT2 EQU * U =2 «, t00=0x0029, t01=0x00ce}
0x40e4…40fe               Head {h00=0x0016, h01=0x0050, text=»INTRT3 EQU * U =2 «, t00=0x0029, t01=0x00e8}
0x40fe…4118               Head {h00=0x0016, h01=0x0050, text=»INTRT4 EQU * U =2 «, t00=0x0029, t01=0x0102}
0x4118…412a               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x0029, t01=0x011c}
0x412a…4134               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x012e}
0x4134…414a               Head {h00=0x0012, h01=0x0050, text=» IFT RT=1 U =2«, t00=0x0029, t01=0x0138}
0x414a…415c               Head {h00=0x000e, h01=0x0050, text=»*    CHRT «, t00=0x0029, t01=0x014e}
0x415c…4176               Head {h00=0x0016, h01=0x0050, text=»INTRT1 DATA 0 U =2«, t00=0x0029, t01=0x0160}
0x4176…4190               Head {h00=0x0016, h01=0x0050, text=»INTRT2 DATA 0 U =2«, t00=0x0029, t01=0x017a}
0x4190…41aa (42, 0, 400)  Head {h00=0x0016, h01=0x0050, text=»INTRT3 DATA 0 U =2«, t00=0x002a, t01=0x0004}
0x41aa…41c4               Head {h00=0x0016, h01=0x0050, text=»INTRT4 DATA 0 U =2«, t00=0x002a, t01=0x001e}
0x41c4…41d6               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x002a, t01=0x0038}
0x41d6…41e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x004a}
0x41e0…41f6               Head {h00=0x0012, h01=0x0050, text=» IFT SL=0 U =2«, t00=0x002a, t01=0x0054}
0x41f6…4216               Head {h00=0x001c, h01=0x0050, text=»*   DUMMY ENTRIES SALCUZ«, t00=0x002a, t01=0x006a}
0x4216…422a               Head {h00=0x0010, h01=0x0050, text=»INTSL1 EQU *«, t00=0x002a, t01=0x008a}
0x422a…4244               Head {h00=0x0016, h01=0x0050, text=»INTSL2 EQU * U =2 «, t00=0x002a, t01=0x009e}
0x4244…425e               Head {h00=0x0016, h01=0x0050, text=»INTSL3 EQU * U =2 «, t00=0x002a, t01=0x00b8}
0x425e…4278               Head {h00=0x0016, h01=0x0050, text=»INTSL4 EQU * U =2 «, t00=0x002a, t01=0x00d2}
0x4278…4292               Head {h00=0x0016, h01=0x0050, text=»INTSL5 EQU * U =2 «, t00=0x002a, t01=0x00ec}
0x4292…42ac               Head {h00=0x0016, h01=0x0050, text=»INTSL6 EQU * U =2 «, t00=0x002a, t01=0x0106}
0x42ac…42c6               Head {h00=0x0016, h01=0x0050, text=»INTSL7 EQU * U =2 «, t00=0x002a, t01=0x0120}
0x42c6…42e0               Head {h00=0x0016, h01=0x0050, text=»INTSL8 EQU * U =2 «, t00=0x002a, t01=0x013a}
0x42e0…42f2               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x002a, t01=0x0154}
0x42f2…42fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0166}
0x42fc…4312               Head {h00=0x0012, h01=0x0050, text=» IFT SL=1 U =2«, t00=0x002a, t01=0x0170}
0x4312…4326               Head {h00=0x0010, h01=0x0050, text=»*    SALCUZ «, t00=0x002a, t01=0x0186}
0x4326…4340               Head {h00=0x0016, h01=0x0050, text=»INTSL1 DATA 0 U =2«, t00=0x002b, t01=0x000a}
0x4340…435a               Head {h00=0x0016, h01=0x0050, text=»INTSL2 DATA 0 U =2«, t00=0x002b, t01=0x0024}
0x435a…4374               Head {h00=0x0016, h01=0x0050, text=»INTSL3 DATA 0 U =2«, t00=0x002b, t01=0x003e}
0x4374…438e               Head {h00=0x0016, h01=0x0050, text=»INTSL4 DATA 0 U =2«, t00=0x002b, t01=0x0058}
0x438e…43a8               Head {h00=0x0016, h01=0x0050, text=»INTSL5 DATA 0 U =2«, t00=0x002b, t01=0x0072}
0x43a8…43c2               Head {h00=0x0016, h01=0x0050, text=»INTSL6 DATA 0 U =2«, t00=0x002b, t01=0x008c}
0x43c2…43dc               Head {h00=0x0016, h01=0x0050, text=»INTSL7 DATA 0 U =2«, t00=0x002b, t01=0x00a6}
0x43dc…43f6               Head {h00=0x0016, h01=0x0050, text=»INTSL8 DATA 0 U =2«, t00=0x002b, t01=0x00c0}
0x43f6…4408               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x002b, t01=0x00da}
0x4408…4412               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00ec}
0x4412…4428               Head {h00=0x0012, h01=0x0050, text=» IFT AS=0 U =2«, t00=0x002b, t01=0x00f6}
0x4428…4448               Head {h00=0x001c, h01=0x0050, text=»*   DUMMY ENTRIES ASCU4Z«, t00=0x002b, t01=0x010c}
0x4448…4462               Head {h00=0x0016, h01=0x0050, text=»INTAS1 EQU * U =2 «, t00=0x002b, t01=0x012c}
0x4462…447c               Head {h00=0x0016, h01=0x0050, text=»INTAS2 EQU * U =2 «, t00=0x002b, t01=0x0146}
0x447c…4496               Head {h00=0x0016, h01=0x0050, text=»INTAS3 EQU * U =2 «, t00=0x002b, t01=0x0160}
0x4496…44b0               Head {h00=0x0016, h01=0x0050, text=»INTAS4 EQU * U =2 «, t00=0x002b, t01=0x017a}
0x44b0…44ca (44, 0, 400)  Head {h00=0x0016, h01=0x0050, text=»INTAS5 EQU * U =2 «, t00=0x002c, t01=0x0004}
0x44ca…44e4               Head {h00=0x0016, h01=0x0050, text=»INTAS6 EQU * U =2 «, t00=0x002c, t01=0x001e}
0x44e4…44fe               Head {h00=0x0016, h01=0x0050, text=»INTAS7 EQU * U =2 «, t00=0x002c, t01=0x0038}
0x44fe…4518               Head {h00=0x0016, h01=0x0050, text=»INTAS8 EQU * U =2 «, t00=0x002c, t01=0x0052}
0x4518…452a               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x002c, t01=0x006c}
0x452a…4534               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x007e}
0x4534…454a               Head {h00=0x0012, h01=0x0050, text=» IFT AS=1 U =2«, t00=0x002c, t01=0x0088}
0x454a…455e               Head {h00=0x0010, h01=0x0050, text=»*    ASCU4Z «, t00=0x002c, t01=0x009e}
0x455e…4578               Head {h00=0x0016, h01=0x0050, text=»INTAS1 DATA 0 U =2«, t00=0x002c, t01=0x00b2}
0x4578…4592               Head {h00=0x0016, h01=0x0050, text=»INTAS2 DATA 0 U =2«, t00=0x002c, t01=0x00cc}
0x4592…45ac               Head {h00=0x0016, h01=0x0050, text=»INTAS3 DATA 0 U =2«, t00=0x002c, t01=0x00e6}
0x45ac…45c6               Head {h00=0x0016, h01=0x0050, text=»INTAS4 DATA 0 U =2«, t00=0x002c, t01=0x0100}
0x45c6…45e0               Head {h00=0x0016, h01=0x0050, text=»INTAS5 DATA 0 U =2«, t00=0x002c, t01=0x011a}
0x45e0…45fa               Head {h00=0x0016, h01=0x0050, text=»INTAS6 DATA 0 U =2«, t00=0x002c, t01=0x0134}
0x45fa…4614               Head {h00=0x0016, h01=0x0050, text=»INTAS7 DATA 0 U =2«, t00=0x002c, t01=0x014e}
0x4614…462e               Head {h00=0x0016, h01=0x0050, text=»INTAS8 DATA 0 U =2«, t00=0x002c, t01=0x0168}
0x462e…4640               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x002c, t01=0x0182}
0x4640…464a (45, 0, 398)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0004}
0x464a…4660               Head {h00=0x0012, h01=0x0050, text=» IFT PL=0 U =2«, t00=0x002d, t01=0x000e}
0x4660…4686               Head {h00=0x0022, h01=0x0050, text=»*    DUMMY ENTRIES PLC - LOCAL«, t00=0x002d, t01=0x0024}
0x4686…46a0               Head {h00=0x0016, h01=0x0050, text=»INTPL1 EQU * U =2 «, t00=0x002d, t01=0x004a}
0x46a0…46ba               Head {h00=0x0016, h01=0x0050, text=»INTPL2 EQU * U =2 «, t00=0x002d, t01=0x0064}
0x46ba…46d4               Head {h00=0x0016, h01=0x0050, text=»INTPL3 EQU * U =2 «, t00=0x002d, t01=0x007e}
0x46d4…46ee               Head {h00=0x0016, h01=0x0050, text=»INTPL4 EQU * U =2 «, t00=0x002d, t01=0x0098}
0x46ee…4700               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x002d, t01=0x00b2}
0x4700…470a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00c4}
0x470a…4720               Head {h00=0x0012, h01=0x0050, text=» IFT PL=1 U =2«, t00=0x002d, t01=0x00ce}
0x4720…4738               Head {h00=0x0014, h01=0x0050, text=»*   PLC - LOCAL «, t00=0x002d, t01=0x00e4}
0x4738…4752               Head {h00=0x0016, h01=0x0050, text=»INTPL1 DATA 0 U =2«, t00=0x002d, t01=0x00fc}
0x4752…476c               Head {h00=0x0016, h01=0x0050, text=»INTPL2 DATA 0 U =2«, t00=0x002d, t01=0x0116}
0x476c…4786               Head {h00=0x0016, h01=0x0050, text=»INTPL3 DATA 0 U =2«, t00=0x002d, t01=0x0130}
0x4786…47a0               Head {h00=0x0016, h01=0x0050, text=»INTPL4 DATA 0 U =2«, t00=0x002d, t01=0x014a}
0x47a0…47b2               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x002d, t01=0x0164}
0x47b2…47bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0176}
0x47bc…47d2               Head {h00=0x0012, h01=0x0050, text=» IFT PR=0 U =2«, t00=0x002d, t01=0x0180}
0x47d2…47fa               Head {h00=0x0024, h01=0x0050, text=»*    DUMMY ENTRIES PLC - REMOTE «, t00=0x002e, t01=0x0008}
0x47fa…4814               Head {h00=0x0016, h01=0x0050, text=»INTPR1 EQU * U =2 «, t00=0x002e, t01=0x0030}
0x4814…482e               Head {h00=0x0016, h01=0x0050, text=»INTPR2 EQU * U =2 «, t00=0x002e, t01=0x004a}
0x482e…4848               Head {h00=0x0016, h01=0x0050, text=»INTPR3 EQU * U =2 «, t00=0x002e, t01=0x0064}
0x4848…4862               Head {h00=0x0016, h01=0x0050, text=»INTPR4 EQU * U =2 «, t00=0x002e, t01=0x007e}
0x4862…4874               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x002e, t01=0x0098}
0x4874…487e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00aa}
0x487e…4894               Head {h00=0x0012, h01=0x0050, text=» IFT PR=1 U =2«, t00=0x002e, t01=0x00b4}
0x4894…48ae               Head {h00=0x0016, h01=0x0050, text=»*    PLC - REMOTE «, t00=0x002e, t01=0x00ca}
0x48ae…48c8               Head {h00=0x0016, h01=0x0050, text=»INTPR1 DATA 0 U =2«, t00=0x002e, t01=0x00e4}
0x48c8…48e2               Head {h00=0x0016, h01=0x0050, text=»INTPR2 DATA 0 U =2«, t00=0x002e, t01=0x00fe}
0x48e2…48fc               Head {h00=0x0016, h01=0x0050, text=»INTPR3 DATA 0 U =2«, t00=0x002e, t01=0x0118}
0x48fc…4916               Head {h00=0x0016, h01=0x0050, text=»INTPR4 DATA 0 U =2«, t00=0x002e, t01=0x0132}
0x4916…4928               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x002e, t01=0x014c}
0x4928…4932               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x015e}
0x4932…4948               Head {h00=0x0012, h01=0x0050, text=» IFT VU=0 U =2«, t00=0x002e, t01=0x0168}
0x4948…4968               Head {h00=0x001c, h01=0x0050, text=»*    DUMMY ENTRIES VIDEO«, t00=0x002e, t01=0x017e}
0x4968…4982               Head {h00=0x0016, h01=0x0050, text=»INTVU1 EQU * U =2 «, t00=0x002f, t01=0x000e}
0x4982…499c               Head {h00=0x0016, h01=0x0050, text=»INTVU2 EQU * U =2 «, t00=0x002f, t01=0x0028}
0x499c…49b6               Head {h00=0x0016, h01=0x0050, text=»INTVU3 EQU * U =2 «, t00=0x002f, t01=0x0042}
0x49b6…49d0               Head {h00=0x0016, h01=0x0050, text=»INTVU4 EQU * U =2 «, t00=0x002f, t01=0x005c}
0x49d0…49ea               Head {h00=0x0016, h01=0x0050, text=»INTVU5 EQU * U =2 «, t00=0x002f, t01=0x0076}
0x49ea…4a04               Head {h00=0x0016, h01=0x0050, text=»INTVU6 EQU * U =2 «, t00=0x002f, t01=0x0090}
0x4a04…4a1e               Head {h00=0x0016, h01=0x0050, text=»INTVU7 EQU * U =2 «, t00=0x002f, t01=0x00aa}
0x4a1e…4a38               Head {h00=0x0016, h01=0x0050, text=»INTVU8 EQU * U =2 «, t00=0x002f, t01=0x00c4}
0x4a38…4a4a               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x002f, t01=0x00de}
0x4a4a…4a54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00f0}
0x4a54…4a6a               Head {h00=0x0012, h01=0x0050, text=» IFT VU=1 U =2«, t00=0x002f, t01=0x00fa}
0x4a6a…4a7c               Head {h00=0x000e, h01=0x0050, text=»*    VIDEO«, t00=0x002f, t01=0x0110}
0x4a7c…4a96               Head {h00=0x0016, h01=0x0050, text=»INTVU1 DATA 0 U =2«, t00=0x002f, t01=0x0122}
0x4a96…4ab0               Head {h00=0x0016, h01=0x0050, text=»INTVU2 DATA 0 U =2«, t00=0x002f, t01=0x013c}
0x4ab0…4aca               Head {h00=0x0016, h01=0x0050, text=»INTVU3 DATA 0 U =2«, t00=0x002f, t01=0x0156}
0x4aca…4ae4               Head {h00=0x0016, h01=0x0050, text=»INTVU4 DATA 0 U =2«, t00=0x002f, t01=0x0170}
0x4ae4…4afe               Head {h00=0x0016, h01=0x0050, text=»INTVU5 DATA 0 U =2«, t00=0x002f, t01=0x018a}
0x4afe…4b18               Head {h00=0x0016, h01=0x0050, text=»INTVU6 DATA 0 U =2«, t00=0x0030, t01=0x0014}
0x4b18…4b32               Head {h00=0x0016, h01=0x0050, text=»INTVU7 DATA 0 U =2«, t00=0x0030, t01=0x002e}
0x4b32…4b4c               Head {h00=0x0016, h01=0x0050, text=»INTVU8 DATA 0 U =2«, t00=0x0030, t01=0x0048}
0x4b4c…4b5e               Head {h00=0x000e, h01=0x0050, text=» XIF  U =2«, t00=0x0030, t01=0x0062}
0x4b5e…4b68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0074}
0x4b68…4b76               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x007e}
0x4b76…4b80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x008c}
0x4b80…4ba2               Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0030, t01=0x0096}
0x4ba2…4bc4               Head {h00=0x001e, h01=0x0050, text=»* DEVICE DRIVER ROUTINES *«, t00=0x0030, t01=0x00b8}
0x4bc4…4be6               Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0030, t01=0x00da}
0x4be6…4bf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00fc}
0x4bf0…4c36               Head {h00=0x0042, h01=0x0050, text=»*   THIS SECTION CONTAINS SUBROUTINES CALLED FROM THE TERMINAL«, t00=0x0030, t01=0x0106}
0x4c36…4c7e               Head {h00=0x0044, h01=0x0050, text=»*   DEVICE DRIVERS. THE ROUTINE CAN EITHER PERFORM THE REQUESTED«, t00=0x0030, t01=0x014c}
0x4c7e…4cc6 (49, 0, 400)  Head {h00=0x0044, h01=0x0050, text=»*   ACTION ITSELF, OR SWITCH CONTROL TO THE LINE DRIVER TO WHICH«, t00=0x0031, t01=0x0004}
0x4cc6…4d0e               Head {h00=0x0044, h01=0x0050, text=»*   THE DEVICE IS CONNECTED. WHEN THE LINE DRIVER HAS PERFORMED «, t00=0x0031, t01=0x004c}
0x4d0e…4d56               Head {h00=0x0044, h01=0x0050, text=»*   THE REQUESTED ACTIONS, IT WILL RETURN TO THE DEVICE DRIVER, «, t00=0x0031, t01=0x0094}
0x4d56…4d9e               Head {h00=0x0044, h01=0x0050, text=»*   EITHER DIRECTLY OR THROUGH THE TERMINAL NETWORK DISTRIBUTOR «, t00=0x0031, t01=0x00dc}
0x4d9e…4db2               Head {h00=0x0010, h01=0x0050, text=»*   DRIVER. «, t00=0x0031, t01=0x0124}
0x4db2…4df8               Head {h00=0x0042, h01=0x0050, text=»*   THE SECTION ALSO CONTAINS AN EXIT ROUTINE FOR THE TERMINAL«, t00=0x0031, t01=0x0138}
0x4df8…4e3e               Head {h00=0x0042, h01=0x0050, text=»*   DEVICE DRIVERS. IT WILL OF COURSE NOT RETURN TO THE DEVICE«, t00=0x0031, t01=0x017e}
0x4e3e…4e52               Head {h00=0x0010, h01=0x0050, text=»*   DRIVER. «, t00=0x0032, t01=0x0034}
0x4e52…4e5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0048}
0x4e5c…4e66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0052}
0x4e66…4e9a               Head {h00=0x0030, h01=0x0050, text=»*   ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x0032, t01=0x005c}
0x4e9a…4ea4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0090}
0x4ea4…4ebc               Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x0032, t01=0x009a}
0x4ebc…4ec6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00b2}
0x4ec6…4efc               Head {h00=0x0032, h01=0x0050, text=»* INPUT FETCH ONE CHARACTER FROM INPUT DEVICE «, t00=0x0032, t01=0x00bc}
0x4efc…4f2a               Head {h00=0x002a, h01=0x0050, text=»* STABLK DEFINE START OF OUTPUT BLOCK «, t00=0x0032, t01=0x00f2}
0x4f2a…4f5e               Head {h00=0x0030, h01=0x0050, text=»* OUTPUT SEND ONE CHARACTER TO OUTPUT DEVICE«, t00=0x0032, t01=0x0120}
0x4f5e…4f8a               Head {h00=0x0028, h01=0x0050, text=»* ENDBLK DEFINE END OF OUTPUT BLOCK «, t00=0x0032, t01=0x0154}
0x4f8a…4fba               Head {h00=0x002c, h01=0x0050, text=»* ECHO SWITCH CONTROL AT CHARACTER ECHO «, t00=0x0032, t01=0x0180}
0x4fba…4fe2               Head {h00=0x0024, h01=0x0050, text=»* ECHRTN RETURN FROM ECHO OUTPUT«, t00=0x0033, t01=0x0020}
0x4fe2…5010               Head {h00=0x002a, h01=0x0050, text=»* GETCHR GET CHARACTER FROM ECB BUFFER«, t00=0x0033, t01=0x0048}
0x5010…503e               Head {h00=0x002a, h01=0x0050, text=»* ABORT SET INPUT NO LONGER REQUESTED «, t00=0x0033, t01=0x0076}
0x503e…5070               Head {h00=0x002e, h01=0x0050, text=»* LDISP DISPATCH AT I/O REQUEST COMPLETED «, t00=0x0033, t01=0x00a4}
0x5070…507a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00d6}
0x507a…5088               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x00e0}
0x5088…5092               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00ee}
0x5092…50d6               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0033, t01=0x00f8}
0x50d6…50e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x013c}
0x50e0…50f8               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0033, t01=0x0146}
0x50f8…5108               Head {h00=0x000c, h01=0x0050, text=»* INPUT «, t00=0x0033, t01=0x015e}
0x5108…5112               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x016e}
0x5112…5126               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0033, t01=0x0178}
0x5126…515c               Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES INPUT OF ONE CHARACTER «, t00=0x0033, t01=0x018c}
0x515c…5190               Head {h00=0x0030, h01=0x0050, text=»* FROM A DEVICE TO A TERMINAL DEVICE DRIVER.«, t00=0x0034, t01=0x0032}
0x5190…519a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0066}
0x519a…51aa               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0034, t01=0x0070}
0x51aa…51c0               Head {h00=0x0012, h01=0x0050, text=»* CF A5,INPUT «, t00=0x0034, t01=0x0080}
0x51c0…51ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0096}
0x51ca…51da               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0034, t01=0x00a0}
0x51da…51fe               Head {h00=0x0020, h01=0x0050, text=»* A5  = LOCAL STACK POINTER «, t00=0x0034, t01=0x00b0}
0x51fe…521a               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x0034, t01=0x00d4}
0x521a…5224               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00f0}
0x5224…5236               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0034, t01=0x00fa}
0x5236…5260               Head {h00=0x0026, h01=0x0050, text=»* A1  = BITS 0-14  NOT SIGNIFICANT«, t00=0x0034, t01=0x010c}
0x5260…5296               Head {h00=0x0032, h01=0x0050, text=»*                 BIT 15  1 IF MORE CHARACTERS«, t00=0x0034, t01=0x0136}
0x5296…52b4               Head {h00=0x001a, h01=0x0050, text=»* A2  = BITS 0-7  ZERO«, t00=0x0034, t01=0x016c}
0x52b4…52d4               Head {h00=0x001c, h01=0x0050, text=»*  BITS 8-15  CHARACTER «, t00=0x0034, t01=0x018a}
0x52d4…52de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x001a}
0x52de…5322               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0035, t01=0x0024}
0x5322…532c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0068}
0x532c…5340               Head {h00=0x0010, h01=0x0050, text=»INPUT EQU * «, t00=0x0035, t01=0x0072}
0x5340…535a               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0035, t01=0x0086}
0x535a…5384               Head {h00=0x0026, h01=0x0050, text=» LC A1,DWTCHP,A6 CHANNEL PARAMETER«, t00=0x0035, t01=0x00a0}
0x5384…53b0               Head {h00=0x0028, h01=0x0050, text=» ANK A1,MASKCT CLEAN CONNECTION TYPE«, t00=0x0035, t01=0x00ca}
0x53b0…53cc               Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0035, t01=0x00f6}
0x53cc…53f0               Head {h00=0x0020, h01=0x0050, text=» CWK A1,DTABLN INSIDE LIMIT?«, t00=0x0035, t01=0x0112}
0x53f0…5424               Head {h00=0x0030, h01=0x0050, text=» ABI(L) INPTAB,A1 YES, ACTIVATE LINE DRIVER «, t00=0x0035, t01=0x0136}
0x5424…5440               Head {h00=0x0018, h01=0x0050, text=» RF NDRETE NO, ERROR«, t00=0x0035, t01=0x016a}
0x5440…5452               Head {h00=0x000e, h01=0x0050, text=» XIF  U =1«, t00=0x0035, t01=0x0186}
0x5452…546c               Head {h00=0x0016, h01=0x0050, text=» IFT NTONSU=0 U =1«, t00=0x0036, t01=0x0008}
0x546c…5496               Head {h00=0x0026, h01=0x0050, text=» ABL LTCHRI ACTIVATE SUM-DRIVER =1«, t00=0x0036, t01=0x0022}
0x5496…54a8               Head {h00=0x000e, h01=0x0050, text=» XIF  U =1«, t00=0x0036, t01=0x004c}
0x54a8…54b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x005e}
0x54b2…54c0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x0068}
0x54c0…54ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0076}
0x54ca…550e               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0036, t01=0x0080}
0x550e…5518               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00c4}
0x5518…5530               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0036, t01=0x00ce}
0x5530…5540               Head {h00=0x000c, h01=0x0050, text=»* STABLK«, t00=0x0036, t01=0x00e6}
0x5540…554a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00f6}
0x554a…555e               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0036, t01=0x0100}
0x555e…5598               Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE IS CALLED FROM THE TERMINAL DEVICE «, t00=0x0036, t01=0x0114}
0x5598…55ce               Head {h00=0x0032, h01=0x0050, text=»* DRIVERS TO DEFINE START OF AN OUTPUT BLOCK. «, t00=0x0036, t01=0x014e}
0x55ce…5606               Head {h00=0x0034, h01=0x0050, text=»* THE ACTIONS TAKEN AT START OF BLOCK VARIES FOR«, t00=0x0036, t01=0x0184}
0x5606…5628               Head {h00=0x001e, h01=0x0050, text=»* DIFFERENT LINE DRIVERS. «, t00=0x0037, t01=0x002c}
0x5628…5632               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x004e}
0x5632…5642               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0037, t01=0x0058}
0x5642…5658               Head {h00=0x0012, h01=0x0050, text=»* CF A5,STABLK«, t00=0x0037, t01=0x0068}
0x5658…5662               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x007e}
0x5662…5672               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0037, t01=0x0088}
0x5672…56a4               Head {h00=0x002e, h01=0x0050, text=»* A2  = MAXIMAL NR OF CHARACTERS IN BLOCK «, t00=0x0037, t01=0x0098}
0x56a4…56c8               Head {h00=0x0020, h01=0x0050, text=»* A5  = LOCAL STACK POINTER «, t00=0x0037, t01=0x00ca}
0x56c8…56e4               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x0037, t01=0x00ee}
0x56e4…56ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x010a}
0x56ee…5700               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0037, t01=0x0114}
0x5700…571c               Head {h00=0x0018, h01=0x0050, text=»* A1  = RETURN CODE «, t00=0x0037, t01=0x0126}
0x571c…572e               Head {h00=0x000e, h01=0x0050, text=»*  0 IF OK«, t00=0x0037, t01=0x0142}
0x572e…5748               Head {h00=0x0016, h01=0x0050, text=»*  NOT 0 IF ERROR «, t00=0x0037, t01=0x0154}
0x5748…577c               Head {h00=0x0030, h01=0x0050, text=»* A2  = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x0037, t01=0x016e}
0x577c…579a               Head {h00=0x001a, h01=0x0050, text=»* CR  = CONTENTS OF A1«, t00=0x0038, t01=0x0012}
0x579a…57a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0030}
0x57a4…57e8               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0038, t01=0x003a}
0x57e8…57f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x007e}
0x57f2…5806               Head {h00=0x0010, h01=0x0050, text=»STABLK EQU *«, t00=0x0038, t01=0x0088}
0x5806…5830               Head {h00=0x0026, h01=0x0050, text=» LC A1,DWTCHP,A6 CHANNEL PARAMETER«, t00=0x0038, t01=0x009c}
0x5830…584a               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0038, t01=0x00c6}
0x584a…5876               Head {h00=0x0028, h01=0x0050, text=» ANK A1,MASKCT CLEAN CONNECTION TYPE«, t00=0x0038, t01=0x00e0}
0x5876…5892               Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0038, t01=0x010c}
0x5892…58b6               Head {h00=0x0020, h01=0x0050, text=» CWK A1,DTABLN INSIDE LIMIT?«, t00=0x0038, t01=0x0128}
0x58b6…58ea               Head {h00=0x0030, h01=0x0050, text=» ABI(L) STBTAB,A1 YES, ACTIVATE LINE DRIVER «, t00=0x0038, t01=0x014c}
0x58ea…5906               Head {h00=0x0018, h01=0x0050, text=» RF NDRETE NO, ERROR«, t00=0x0038, t01=0x0180}
0x5906…5918               Head {h00=0x000e, h01=0x0050, text=» XIF  U =1«, t00=0x0039, t01=0x000c}
0x5918…5932               Head {h00=0x0016, h01=0x0050, text=» IFT NTONSU=0 U =1«, t00=0x0039, t01=0x001e}
0x5932…5958               Head {h00=0x0022, h01=0x0050, text=» ANK A1,1 LOCAL OR REMOTE ? =1«, t00=0x0039, t01=0x0038}
0x5958…5978               Head {h00=0x001c, h01=0x0050, text=» ABL(Z) LTSTBL LOCAL =1 «, t00=0x0039, t01=0x005e}
0x5978…5996               Head {h00=0x001a, h01=0x0050, text=» ABL RTSTBL REMOTE =1 «, t00=0x0039, t01=0x007e}
0x5996…59a8               Head {h00=0x000e, h01=0x0050, text=» XIF  U =1«, t00=0x0039, t01=0x009c}
0x59a8…59b6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x00ae}
0x59b6…59c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00bc}
0x59c0…5a04               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0039, t01=0x00c6}
0x5a04…5a0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x010a}
0x5a0e…5a26               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0039, t01=0x0114}
0x5a26…5a36               Head {h00=0x000c, h01=0x0050, text=»* OUTPUT«, t00=0x0039, t01=0x012c}
0x5a36…5a40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x013c}
0x5a40…5a54               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0039, t01=0x0146}
0x5a54…5a8a               Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES OUTPUT OF ONE CHARACTER«, t00=0x0039, t01=0x015a}
0x5a8a…5abe               Head {h00=0x0030, h01=0x0050, text=»* FROM A TERMINAL DEVICE DRIVER TO A DEVICE.«, t00=0x0039, t01=0x0190}
0x5abe…5ac8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0034}
0x5ac8…5ad8               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x003a, t01=0x003e}
0x5ad8…5aee               Head {h00=0x0012, h01=0x0050, text=»* CF A5,OUTPUT«, t00=0x003a, t01=0x004e}
0x5aee…5af8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0064}
0x5af8…5b08               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x003a, t01=0x006e}
0x5b08…5b2c               Head {h00=0x0020, h01=0x0050, text=»* A2  = BITS 0-7  IRRELEVANT«, t00=0x003a, t01=0x007e}
0x5b2c…5b4c               Head {h00=0x001c, h01=0x0050, text=»*  BITS 8-15  CHARACTER «, t00=0x003a, t01=0x00a2}
0x5b4c…5b70               Head {h00=0x0020, h01=0x0050, text=»* A5  = LOCAL STACK POINTER «, t00=0x003a, t01=0x00c2}
0x5b70…5b8c               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x003a, t01=0x00e6}
0x5b8c…5b96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0102}
0x5b96…5ba8               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x003a, t01=0x010c}
0x5ba8…5bc4               Head {h00=0x0018, h01=0x0050, text=»* A1  = RETURN CODE «, t00=0x003a, t01=0x011e}
0x5bc4…5bd6               Head {h00=0x000e, h01=0x0050, text=»*  0 IF OK«, t00=0x003a, t01=0x013a}
0x5bd6…5bf0               Head {h00=0x0016, h01=0x0050, text=»*  NOT 0 IF ERROR «, t00=0x003a, t01=0x014c}
0x5bf0…5c24               Head {h00=0x0030, h01=0x0050, text=»* A2  = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x003a, t01=0x0166}
0x5c24…5c42               Head {h00=0x001a, h01=0x0050, text=»* CR  = CONTENTS OF A1«, t00=0x003b, t01=0x000a}
0x5c42…5c4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0028}
0x5c4c…5c90               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x003b, t01=0x0032}
0x5c90…5c9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0076}
0x5c9a…5cae               Head {h00=0x0010, h01=0x0050, text=»OUTPUT EQU *«, t00=0x003b, t01=0x0080}
0x5cae…5cc8               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x003b, t01=0x0094}
0x5cc8…5cf2               Head {h00=0x0026, h01=0x0050, text=» LC A1,DWTCHP,A6 CHANNEL PARAMETER«, t00=0x003b, t01=0x00ae}
0x5cf2…5d1e               Head {h00=0x0028, h01=0x0050, text=» ANK A1,MASKCT CLEAN CONNECTION TYPE«, t00=0x003b, t01=0x00d8}
0x5d1e…5d3a               Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x003b, t01=0x0104}
0x5d3a…5d5e               Head {h00=0x0020, h01=0x0050, text=» CWK A1,DTABLN INSIDE LIMIT?«, t00=0x003b, t01=0x0120}
0x5d5e…5d92               Head {h00=0x0030, h01=0x0050, text=» ABI(L) OUPTAB,A1 YES, ACTIVATE LINE DRIVER «, t00=0x003b, t01=0x0144}
0x5d92…5dae               Head {h00=0x0018, h01=0x0050, text=» RF NDRETE NO, ERROR«, t00=0x003b, t01=0x0178}
0x5dae…5dc0 (60, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» XIF  U =1«, t00=0x003c, t01=0x0004}
0x5dc0…5dda               Head {h00=0x0016, h01=0x0050, text=» IFT NTONSU=0 U =1«, t00=0x003c, t01=0x0016}
0x5dda…5e04               Head {h00=0x0026, h01=0x0050, text=» ABL LTCHRO ACTIVATE SUM-DRIVER =1«, t00=0x003c, t01=0x0030}
0x5e04…5e16               Head {h00=0x000e, h01=0x0050, text=» XIF  U =1«, t00=0x003c, t01=0x005a}
0x5e16…5e20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x006c}
0x5e20…5e2e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x0076}
0x5e2e…5e38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0084}
0x5e38…5e7c               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x003c, t01=0x008e}
0x5e7c…5e86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00d2}
0x5e86…5e9e               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x003c, t01=0x00dc}
0x5e9e…5eae               Head {h00=0x000c, h01=0x0050, text=»* ENDBLK«, t00=0x003c, t01=0x00f4}
0x5eae…5eb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0104}
0x5eb8…5ecc               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x003c, t01=0x010e}
0x5ecc…5f06               Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE IS CALLED FROM THE TERMINAL DEVICE «, t00=0x003c, t01=0x0122}
0x5f06…5f3a               Head {h00=0x0030, h01=0x0050, text=»* DRIVERS TO DEFINE END OF AN OUTPUT BLOCK. «, t00=0x003c, t01=0x015c}
0x5f3a…5f70               Head {h00=0x0032, h01=0x0050, text=»* THE ACTIONS TAKEN AT END OF BLOCK VARIES FOR«, t00=0x003c, t01=0x0190}
0x5f70…5f92               Head {h00=0x001e, h01=0x0050, text=»* DIFFERENT LINE DRIVERS. «, t00=0x003d, t01=0x0036}
0x5f92…5f9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0058}
0x5f9c…5fac               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x003d, t01=0x0062}
0x5fac…5fc2               Head {h00=0x0012, h01=0x0050, text=»* CF A5,ENDBLK«, t00=0x003d, t01=0x0072}
0x5fc2…5fcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0088}
0x5fcc…5fdc               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x003d, t01=0x0092}
0x5fdc…6000               Head {h00=0x0020, h01=0x0050, text=»* A5  = LOCAL STACK POINTER «, t00=0x003d, t01=0x00a2}
0x6000…601c               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x003d, t01=0x00c6}
0x601c…6026               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00e2}
0x6026…6038               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x003d, t01=0x00ec}
0x6038…6054               Head {h00=0x0018, h01=0x0050, text=»* A1  = RETURN CODE «, t00=0x003d, t01=0x00fe}
0x6054…6066               Head {h00=0x000e, h01=0x0050, text=»*  0 IF OK«, t00=0x003d, t01=0x011a}
0x6066…6080               Head {h00=0x0016, h01=0x0050, text=»*  NOT 0 IF ERROR «, t00=0x003d, t01=0x012c}
0x6080…60b4               Head {h00=0x0030, h01=0x0050, text=»* A2  = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x003d, t01=0x0146}
0x60b4…60d2               Head {h00=0x001a, h01=0x0050, text=»* CR  = CONTENTS OF A1«, t00=0x003d, t01=0x017a}
0x60d2…60dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0008}
0x60dc…6120               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x003e, t01=0x0012}
0x6120…612a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0056}
0x612a…613e               Head {h00=0x0010, h01=0x0050, text=»ENDBLK EQU *«, t00=0x003e, t01=0x0060}
0x613e…6168               Head {h00=0x0026, h01=0x0050, text=» LC A1,DWTCHP,A6 CHANNEL PARAMETER«, t00=0x003e, t01=0x0074}
0x6168…6182               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x003e, t01=0x009e}
0x6182…61ae               Head {h00=0x0028, h01=0x0050, text=» ANK A1,MASKCT CLEAN CONNECTION TYPE«, t00=0x003e, t01=0x00b8}
0x61ae…61ca               Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x003e, t01=0x00e4}
0x61ca…61ee               Head {h00=0x0020, h01=0x0050, text=» CWK A1,DTABLN INSIDE LIMIT?«, t00=0x003e, t01=0x0100}
0x61ee…6222               Head {h00=0x0030, h01=0x0050, text=» ABI(L) ENBTAB,A1 YES, ACTIVATE LINE DRIVER «, t00=0x003e, t01=0x0124}
0x6222…623e               Head {h00=0x0018, h01=0x0050, text=» RF NDRETE NO, ERROR«, t00=0x003e, t01=0x0158}
0x623e…6250               Head {h00=0x000e, h01=0x0050, text=» XIF  U =1«, t00=0x003e, t01=0x0174}
0x6250…626a               Head {h00=0x0016, h01=0x0050, text=» IFT NTONSU=0 U =1«, t00=0x003e, t01=0x0186}
0x626a…6290               Head {h00=0x0022, h01=0x0050, text=» ANK A1,1 LOCAL OR REMOTE ? =1«, t00=0x003f, t01=0x0010}
0x6290…62b0               Head {h00=0x001c, h01=0x0050, text=» ABL(Z) LTENBL LOCAL =1 «, t00=0x003f, t01=0x0036}
0x62b0…62ce               Head {h00=0x001a, h01=0x0050, text=» ABL RTENBL REMOTE =1 «, t00=0x003f, t01=0x0056}
0x62ce…62e0               Head {h00=0x000e, h01=0x0050, text=» XIF  U =1«, t00=0x003f, t01=0x0074}
0x62e0…62ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0086}
0x62ea…62f8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003f, t01=0x0090}
0x62f8…6302               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x009e}
0x6302…6346               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x003f, t01=0x00a8}
0x6346…6350               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00ec}
0x6350…6368               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x003f, t01=0x00f6}
0x6368…6376               Head {h00=0x000a, h01=0x0050, text=»* ECHO«, t00=0x003f, t01=0x010e}
0x6376…6380               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x011c}
0x6380…6394               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x003f, t01=0x0126}
0x6394…63d4               Head {h00=0x003c, h01=0x0050, text=»*    SUBROUTINE TO ECHO CHARACTER CONTAINING TWO PARTS, «, t00=0x003f, t01=0x013a}
0x63d4…6406               Head {h00=0x002e, h01=0x0050, text=»*    ONE GENERAL AND ONE DEVICE-DEPENDENT «, t00=0x003f, t01=0x017a}
0x6406…643e               Head {h00=0x0034, h01=0x0050, text=»*    PART ONE: FIND DWT-ADDRESS OF ECHO-DEVICE, «, t00=0x0040, t01=0x001c}
0x643e…6474               Head {h00=0x0032, h01=0x0050, text=»*              LOAD STACKBASE AND FIND ADDRESS«, t00=0x0040, t01=0x0054}
0x6474…64ac               Head {h00=0x0034, h01=0x0050, text=»*              TO DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0040, t01=0x008a}
0x64ac…64de               Head {h00=0x002e, h01=0x0050, text=»*    PART TWO: ECHO ONE OR MORE CHARACTERS«, t00=0x0040, t01=0x00c2}
0x64de…6514               Head {h00=0x0032, h01=0x0050, text=»*              CORRESPONDING TO ONE CHARACTER «, t00=0x0040, t01=0x00f4}
0x6514…654c               Head {h00=0x0034, h01=0x0050, text=»*              TO BE STORED IN INPUT ECB-BUFFER «, t00=0x0040, t01=0x012a}
0x654c…6584               Head {h00=0x0034, h01=0x0050, text=»*    PART ONE FOLLOWS AND PART TWO CAN BE FOUND «, t00=0x0040, t01=0x0162}
0x6584…65bc               Head {h00=0x0034, h01=0x0050, text=»*    IN THE DRIVER MODULE CORRESPONDING TO ECHO «, t00=0x0041, t01=0x000a}
0x65bc…65d6               Head {h00=0x0016, h01=0x0050, text=»*    OUTPUT DEVICE«, t00=0x0041, t01=0x0042}
0x65d6…65e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x005c}
0x65e0…6618               Head {h00=0x0034, h01=0x0050, text=»* ECHO IS USED WHEN A CHARACTER SHOULD BE ECHOED«, t00=0x0041, t01=0x0066}
0x6618…6648               Head {h00=0x002c, h01=0x0050, text=»* ECHEND IS USED AT END OF INPUT REQUEST«, t00=0x0041, t01=0x009e}
0x6648…6682               Head {h00=0x0036, h01=0x0050, text=»*    THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A «, t00=0x0041, t01=0x00ce}
0x6682…66a0               Head {h00=0x001a, h01=0x0050, text=»*    JUMP TO 'ECHRTN'.«, t00=0x0041, t01=0x0108}
0x66a0…66aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0126}
0x66aa…66ba               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0041, t01=0x0130}
0x66ba…66ce               Head {h00=0x0010, h01=0x0050, text=»* CF A5,ECHO«, t00=0x0041, t01=0x0140}
0x66ce…66e4               Head {h00=0x0012, h01=0x0050, text=»* CF A5,ECHEND«, t00=0x0041, t01=0x0154}
0x66e4…66ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x016a}
0x66ee…66fe               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0041, t01=0x0174}
0x66fe…6732               Head {h00=0x0030, h01=0x0050, text=»*        A1  =    BITS 0-14  NOT SIGNIFICANT«, t00=0x0041, t01=0x0184}
0x6732…676a               Head {h00=0x0034, h01=0x0050, text=»*                  BIT 15  1 IF MORE CHARACTERS «, t00=0x0042, t01=0x0028}
0x676a…6794               Head {h00=0x0026, h01=0x0050, text=»* A2  = BITS 0-7  NOT SIGNIFICANT «, t00=0x0042, t01=0x0060}
0x6794…67be               Head {h00=0x0026, h01=0x0050, text=»*   BITS 8-17  CHARACTER (IF ECHO)«, t00=0x0042, t01=0x008a}
0x67be…67e2               Head {h00=0x0020, h01=0x0050, text=»* A5  = LOCAL STACK POINTER «, t00=0x0042, t01=0x00b4}
0x67e2…67fe               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x0042, t01=0x00d8}
0x67fe…6808               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00f4}
0x6808…6816               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x00fe}
0x6816…6820               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x010c}
0x6820…6832               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0042, t01=0x0116}
0x6832…6862               Head {h00=0x002c, h01=0x0050, text=»*      AT ENTRY TO ECHO OUTPUT ROUTINE: «, t00=0x0042, t01=0x0128}
0x6862…6896               Head {h00=0x0030, h01=0x0050, text=»*        A1  =    BITS 0-14  NOT SIGNIFICANT«, t00=0x0042, t01=0x0158}
0x6896…68ce               Head {h00=0x0034, h01=0x0050, text=»*                  BIT 15  1 IF MORE CHARACTERS «, t00=0x0042, t01=0x018c}
0x68ce…68f6               Head {h00=0x0024, h01=0x0050, text=»* A2  = BITS 0-7  ZERO (IF ECHO)«, t00=0x0043, t01=0x0034}
0x68f6…6920               Head {h00=0x0026, h01=0x0050, text=»*   BITS 8-15  CHARACTER (IF ECHO)«, t00=0x0043, t01=0x005c}
0x6920…6944               Head {h00=0x0020, h01=0x0050, text=»* A5  = LOCAL STACK POINTER «, t00=0x0043, t01=0x0086}
0x6944…6970               Head {h00=0x0028, h01=0x0050, text=»* A6  = ADDRESS OF OUTPUT DEVICE DWT«, t00=0x0043, t01=0x00aa}
0x6970…699e               Head {h00=0x002a, h01=0x0050, text=»* A7  = BIT 0  0 IF ECHO, 1 IF ECHEND «, t00=0x0043, t01=0x00d6}
0x699e…69c4               Head {h00=0x0022, h01=0x0050, text=»*   BITS 1-15  NOT SIGNIFICANT«, t00=0x0043, t01=0x0104}
0x69c4…69e8               Head {h00=0x0020, h01=0x0050, text=»*      AT SUBROUTINE RETURN:«, t00=0x0043, t01=0x012a}
0x69e8…6a00               Head {h00=0x0014, h01=0x0050, text=»* A1  = CHANGED «, t00=0x0043, t01=0x014e}
0x6a00…6a18               Head {h00=0x0014, h01=0x0050, text=»* A2  = CHANGED «, t00=0x0043, t01=0x0166}
0x6a18…6a30               Head {h00=0x0014, h01=0x0050, text=»* CR  = CHANGED «, t00=0x0043, t01=0x017e}
0x6a30…6a3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0008}
0x6a3a…6a7e               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0044, t01=0x0012}
0x6a7e…6a88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0056}
0x6a88…6a9c               Head {h00=0x0010, h01=0x0050, text=»ECHEND EQU *«, t00=0x0044, t01=0x0060}
0x6a9c…6aa6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0074}
0x6aa6…6aba               Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0044, t01=0x007e}
0x6aba…6aea               Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x0044, t01=0x0092}
0x6aea…6b16               Head {h00=0x0028, h01=0x0050, text=» LDKL A7,/8000 INDICATE END OF ECHO «, t00=0x0044, t01=0x00c2}
0x6b16…6b28               Head {h00=0x000e, h01=0x0050, text=» RF ECHO10«, t00=0x0044, t01=0x00ee}
0x6b28…6b32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0100}
0x6b32…6b40               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0044, t01=0x010a}
0x6b40…6b4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0118}
0x6b4a…6b56               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x0122}
0x6b56…6b60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x012e}
0x6b60…6b72               Head {h00=0x000e, h01=0x0050, text=»ECHO EQU *«, t00=0x0044, t01=0x0138}
0x6b72…6b86               Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0044, t01=0x014a}
0x6b86…6bb6               Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x0044, t01=0x015e}
0x6bb6…6be0               Head {h00=0x0026, h01=0x0050, text=» LDK A7,0 INDICATE NOT END OF ECHO«, t00=0x0044, t01=0x018e}
0x6be0…6bea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0028}
0x6bea…6bf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0032}
0x6bf4…6c08               Head {h00=0x0010, h01=0x0050, text=»ECHO10 EQU *«, t00=0x0045, t01=0x003c}
0x6c08…6c26               Head {h00=0x001a, h01=0x0050, text=» LD A3,DWTST,A6 STATUS«, t00=0x0045, t01=0x0050}
0x6c26…6c4e               Head {h00=0x0024, h01=0x0050, text=» ANKL A3,DWFECH ECHO REQUESTED? «, t00=0x0045, t01=0x006e}
0x6c4e…6c6e               Head {h00=0x001c, h01=0x0050, text=» RF(Z) NDREP NO, RETURN «, t00=0x0045, t01=0x0096}
0x6c6e…6c78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00b6}
0x6c78…6cac               Head {h00=0x0030, h01=0x0050, text=» LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE «, t00=0x0045, t01=0x00c0}
0x6cac…6ce2               Head {h00=0x0032, h01=0x0050, text=» LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEVICE «, t00=0x0045, t01=0x00f4}
0x6ce2…6d1c               Head {h00=0x0036, h01=0x0050, text=» ST A4,DWTWAT,A6 SAVE DWT-ADDRESS OF INPUT DEVICE «, t00=0x0045, t01=0x012a}
0x6d1c…6d34               Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB2 «, t00=0x0045, t01=0x0164}
0x6d34…6d5e               Head {h00=0x0026, h01=0x0050, text=» ADR A5,A6 STACKBASE-ADDRESS IN A5«, t00=0x0045, t01=0x017c}
0x6d5e…6d82               Head {h00=0x0020, h01=0x0050, text=» ANK A2,/FF CLEAN CHARACTER «, t00=0x0046, t01=0x0016}
0x6d82…6db4               Head {h00=0x002e, h01=0x0050, text=» LD A3,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK «, t00=0x0046, t01=0x003a}
0x6db4…6dee               Head {h00=0x0036, h01=0x0050, text=» ABI ECHADR,A3 GO TO ECHO-ROUTINE DEVICE-DEPENDENT«, t00=0x0046, t01=0x006c}
0x6dee…6dfa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x00a6}
0x6dfa…6e04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00b2}
0x6e04…6e12               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0046, t01=0x00bc}
0x6e12…6e1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00ca}
0x6e1c…6e60               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0046, t01=0x00d4}
0x6e60…6e6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0118}
0x6e6a…6e82               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0046, t01=0x0122}
0x6e82…6e92               Head {h00=0x000c, h01=0x0050, text=»* ECHRTN«, t00=0x0046, t01=0x013a}
0x6e92…6e9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x014a}
0x6e9c…6eb0               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0046, t01=0x0154}
0x6eb0…6eee               Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE IS USED WHEN OUTPUT DEVICE ECHO ROUTINE«, t00=0x0046, t01=0x0168}
0x6eee…6f2a               Head {h00=0x0038, h01=0x0050, text=»* IS READY WITH ECHOING ACTIONS, AND WANTS TO LEAVE «, t00=0x0047, t01=0x0016}
0x6f2a…6f58               Head {h00=0x002a, h01=0x0050, text=»* CONTROL BACK TO INPUT DEVICE DRIVER.«, t00=0x0047, t01=0x0052}
0x6f58…6f62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0080}
0x6f62…6f72               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0047, t01=0x008a}
0x6f72…6f86               Head {h00=0x0010, h01=0x0050, text=»* ABL ECHRTN«, t00=0x0047, t01=0x009a}
0x6f86…6f90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00ae}
0x6f90…6fa0               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0047, t01=0x00b8}
0x6fa0…6fcc               Head {h00=0x0028, h01=0x0050, text=»* A6  = DWT ADDRESS OF OUTPUT DEVICE«, t00=0x0047, t01=0x00c8}
0x6fcc…6fd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00f4}
0x6fd6…6fe8               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0047, t01=0x00fe}
0x6fe8…7010               Head {h00=0x0024, h01=0x0050, text=»*      AT ENTRY TO INPUT DRIVER:«, t00=0x0047, t01=0x0110}
0x7010…702a               Head {h00=0x0016, h01=0x0050, text=»* SEE ECHO ROUTINE«, t00=0x0047, t01=0x0138}
0x702a…7034               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0152}
0x7034…7078               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0047, t01=0x015c}
0x7078…7082               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0010}
0x7082…7096               Head {h00=0x0010, h01=0x0050, text=»ECHRTN EQU *«, t00=0x0048, t01=0x001a}
0x7096…70aa               Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x0048, t01=0x002e}
0x70aa…70de               Head {h00=0x0030, h01=0x0050, text=» LD A6,DWTWAT,A6 DWT-ADDRESS OF INPUT DEVICE«, t00=0x0048, t01=0x0042}
0x70de…710e               Head {h00=0x002c, h01=0x0050, text=» RF NDREP RELOAD A3-A5, A7-A8 AND RETURN«, t00=0x0048, t01=0x0076}
0x710e…711a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x00a6}
0x711a…7124               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00b2}
0x7124…7132               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0048, t01=0x00bc}
0x7132…713c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00ca}
0x713c…7180               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0048, t01=0x00d4}
0x7180…718a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0118}
0x718a…71a2               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0048, t01=0x0122}
0x71a2…71b2               Head {h00=0x000c, h01=0x0050, text=»* GETCHR«, t00=0x0048, t01=0x013a}
0x71b2…71bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x014a}
0x71bc…71d0               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0048, t01=0x0154}
0x71d0…7208               Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE WILL FETCH ONE CHARACTER FROM THE«, t00=0x0048, t01=0x0168}
0x7208…723c               Head {h00=0x0030, h01=0x0050, text=»* ECB BUFFER AND INCREMENT THE BUFFER INDEX.«, t00=0x0049, t01=0x0010}
0x723c…7272               Head {h00=0x0032, h01=0x0050, text=»* IF NO CHARACTER IS LEFT, INDEX IS STORED IN «, t00=0x0049, t01=0x0044}
0x7272…7292               Head {h00=0x001c, h01=0x0050, text=»* ECB REQUESTED LENGTH. «, t00=0x0049, t01=0x007a}
0x7292…729c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x009a}
0x729c…72ac               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0049, t01=0x00a4}
0x72ac…72c4               Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETCHR «, t00=0x0049, t01=0x00b4}
0x72c4…72ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00cc}
0x72ce…72de               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0049, t01=0x00d6}
0x72de…72fa               Head {h00=0x0018, h01=0x0050, text=»* A3  = BUFFER INDEX«, t00=0x0049, t01=0x00e6}
0x72fa…7316               Head {h00=0x0018, h01=0x0050, text=»* A8  = ECB ADDRESS «, t00=0x0049, t01=0x0102}
0x7316…7320               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x011e}
0x7320…7332               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0049, t01=0x0128}
0x7332…7356               Head {h00=0x0020, h01=0x0050, text=»* A1  = >0 IF CHARACTER LEFT«, t00=0x0049, t01=0x013a}
0x7356…737a               Head {h00=0x0020, h01=0x0050, text=»*   =<0 IF NO CHARACTER LEFT«, t00=0x0049, t01=0x015e}
0x737a…73a2               Head {h00=0x0024, h01=0x0050, text=»* A2  = BITS 0-7  ZERO (IF A1>0)«, t00=0x0049, t01=0x0182}
0x73a2…73cc               Head {h00=0x0026, h01=0x0050, text=»*   BITS 8-15  CHARACTER (IF A1>0)«, t00=0x004a, t01=0x001a}
0x73cc…73f8               Head {h00=0x0028, h01=0x0050, text=»* A3  = UPDATED BYTE INDEX (IF A1>0)«, t00=0x004a, t01=0x0044}
0x73f8…7410               Head {h00=0x0014, h01=0x0050, text=»* CR  = CHANGED «, t00=0x004a, t01=0x0070}
0x7410…742a               Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x004a, t01=0x0088}
0x742a…7434               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00a2}
0x7434…7478               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004a, t01=0x00ac}
0x7478…7482               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00f0}
0x7482…7496               Head {h00=0x0010, h01=0x0050, text=»GETCHR EQU *«, t00=0x004a, t01=0x00fa}
0x7496…74be               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x004a, t01=0x010e}
0x74be…74d0               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A3«, t00=0x004a, t01=0x0136}
0x74d0…74fe               Head {h00=0x002a, h01=0x0050, text=» RF(NP) GCH010 LAST CHARACTER REACHED «, t00=0x004a, t01=0x0148}
0x74fe…7508               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0176}
0x7508…7516               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004a, t01=0x0180}
0x7516…7520               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x018e}
0x7520…754a               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x004b, t01=0x0008}
0x754a…755c               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x004b, t01=0x0032}
0x755c…757a               Head {h00=0x001a, h01=0x0050, text=» LCR A2,A2 CHAR. TO A2«, t00=0x004b, t01=0x0044}
0x757a…758e               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004b, t01=0x0062}
0x758e…75b6               Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x004b, t01=0x0076}
0x75b6…75c8               Head {h00=0x000e, h01=0x0050, text=» RF GCH020«, t00=0x004b, t01=0x009e}
0x75c8…75d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00b0}
0x75d2…75dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00ba}
0x75dc…75f0               Head {h00=0x0010, h01=0x0050, text=»GCH010 EQU *«, t00=0x004b, t01=0x00c4}
0x75f0…761e               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x004b, t01=0x00d8}
0x761e…7632               Head {h00=0x0010, h01=0x0050, text=»GCH020 EQU *«, t00=0x004b, t01=0x0106}
0x7632…7658               Head {h00=0x0022, h01=0x0050, text=» ADKL A15,2 RETURN AND ENABLE «, t00=0x004b, t01=0x011a}
0x7658…7664               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x004b, t01=0x0140}
0x7664…7678               Head {h00=0x0010, h01=0x0050, text=» LDR* P,A15 «, t00=0x004b, t01=0x014c}
0x7678…7682               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0160}
0x7682…7690               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004b, t01=0x016a}
0x7690…769a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0178}
0x769a…76de               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004b, t01=0x0182}
0x76de…76e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0036}
0x76e8…7700               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x004c, t01=0x0040}
0x7700…7710               Head {h00=0x000c, h01=0x0050, text=»* ABORT «, t00=0x004c, t01=0x0058}
0x7710…771a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0068}
0x771a…772e               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x004c, t01=0x0072}
0x772e…776c               Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE RESETS THE INPUT REQUESTED FLAG IN DWT.«, t00=0x004c, t01=0x0086}
0x776c…77aa               Head {h00=0x003a, h01=0x0050, text=»* IT IS USED AT ABORT REQUESTS, WHEN A REQUESTED INPUT«, t00=0x004c, t01=0x00c4}
0x77aa…77c8               Head {h00=0x001a, h01=0x0050, text=»* IS NO LONGER WANTED.«, t00=0x004c, t01=0x0102}
0x77c8…77d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0120}
0x77d2…77e2               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x004c, t01=0x012a}
0x77e2…77f8               Head {h00=0x0012, h01=0x0050, text=»* CF A15,ABORT«, t00=0x004c, t01=0x013a}
0x77f8…7802               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0150}
0x7802…7812               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x004c, t01=0x015a}
0x7812…782e               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x004c, t01=0x016a}
0x782e…7838               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0186}
0x7838…784a               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x004c, t01=0x0190}
0x784a…7862               Head {h00=0x0014, h01=0x0050, text=»* A1  = CHANGED «, t00=0x004d, t01=0x0012}
0x7862…787a               Head {h00=0x0014, h01=0x0050, text=»* CR  = CHANGED «, t00=0x004d, t01=0x002a}
0x787a…7884               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0042}
0x7884…78c8               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004d, t01=0x004c}
0x78c8…78d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0090}
0x78d2…78e6               Head {h00=0x0010, h01=0x0050, text=»ABORT EQU * «, t00=0x004d, t01=0x009a}
0x78e6…791c               Head {h00=0x0032, h01=0x0050, text=» LDKL A1,/FFFF-DWFINP MASK FOR INPUT REQUESTED«, t00=0x004d, t01=0x00ae}
0x791c…7940               Head {h00=0x0020, h01=0x0050, text=» ANS A1,DWTST,A6 RESET FLAG «, t00=0x004d, t01=0x00e4}
0x7940…7956               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x004d, t01=0x0108}
0x7956…7970               Head {h00=0x0016, h01=0x0050, text=» RF RTNP15 RETURN «, t00=0x004d, t01=0x011e}
0x7970…797c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x0138}
0x797c…7992               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x004d, t01=0x0144}
0x7992…79a2               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x004d, t01=0x015a}
0x79a2…79ae               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x016a}
0x79ae…79b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0176}
0x79b8…79c6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004d, t01=0x0180}
0x79c6…79d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x018e}
0x79d0…7a14               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004e, t01=0x0008}
0x7a14…7a1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x004c}
0x7a1e…7a36               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x004e, t01=0x0056}
0x7a36…7a46               Head {h00=0x000c, h01=0x0050, text=»* LDISP «, t00=0x004e, t01=0x006e}
0x7a46…7a50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x007e}
0x7a50…7a64               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x004e, t01=0x0088}
0x7a64…7aa0               Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE PERFORMS DISPATCHING FOR THE TERMINAL«, t00=0x004e, t01=0x009c}
0x7aa0…7adc               Head {h00=0x0038, h01=0x0050, text=»* DEVICE DRIVERS. IT ALSO PROVIDES QUICK EXITS FROM «, t00=0x004e, t01=0x00d8}
0x7adc…7b10               Head {h00=0x0030, h01=0x0050, text=»* DEVICE DRIVERS THAT INCLUDES TENDIO CALL. «, t00=0x004e, t01=0x0114}
0x7b10…7b1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0148}
0x7b1a…7b2a               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x004e, t01=0x0152}
0x7b2a…7b3e               Head {h00=0x0010, h01=0x0050, text=»* ABL LENDER«, t00=0x004e, t01=0x0162}
0x7b3e…7b52               Head {h00=0x0010, h01=0x0050, text=»* ABL LENDIS«, t00=0x004e, t01=0x0176}
0x7b52…7b66               Head {h00=0x0010, h01=0x0050, text=»* ABL LDISP «, t00=0x004e, t01=0x018a}
0x7b66…7b70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x000e}
0x7b70…7b80               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x004f, t01=0x0018}
0x7b80…7ba8               Head {h00=0x0024, h01=0x0050, text=»* A1  = RETURN CODE (IF LENDIS) «, t00=0x004f, t01=0x0028}
0x7ba8…7bc4               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x004f, t01=0x0050}
0x7bc4…7bce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x006c}
0x7bce…7be0               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x004f, t01=0x0076}
0x7be0…7c16               Head {h00=0x0032, h01=0x0050, text=»*      AT ENTRY TO LINE DRIVER DISPATCH ENTRY:«, t00=0x004f, t01=0x0088}
0x7c16…7c32               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x004f, t01=0x00be}
0x7c32…7c3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00da}
0x7c3c…7c80               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004f, t01=0x00e4}
0x7c80…7c8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0128}
0x7c8a…7c9e               Head {h00=0x0010, h01=0x0050, text=»LENDER EQU *«, t00=0x004f, t01=0x0132}
0x7c9e…7cc4               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,REQERR REQUEST ERROR «, t00=0x004f, t01=0x0146}
0x7cc4…7cce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x016c}
0x7cce…7ce2               Head {h00=0x0010, h01=0x0050, text=»LENDIS EQU *«, t00=0x004f, t01=0x0176}
0x7ce2…7d08               Head {h00=0x0022, h01=0x0050, text=» CF A15,TENDIO END I/O REQUEST«, t00=0x004f, t01=0x018a}
0x7d08…7d12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0020}
0x7d12…7d20               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0050, t01=0x002a}
0x7d20…7d2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0038}
0x7d2a…7d3e               Head {h00=0x0010, h01=0x0050, text=»LDISP EQU * «, t00=0x0050, t01=0x0042}
0x7d3e…7d58               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0050, t01=0x0056}
0x7d58…7d82               Head {h00=0x0026, h01=0x0050, text=» LC A1,DWTCHP,A6 CHANNEL PARAMETER«, t00=0x0050, t01=0x0070}
0x7d82…7dae               Head {h00=0x0028, h01=0x0050, text=» ANK A1,MASKCT CLEAN CONNECTION TYPE«, t00=0x0050, t01=0x009a}
0x7dae…7dca               Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0050, t01=0x00c6}
0x7dca…7dee               Head {h00=0x0020, h01=0x0050, text=» CWK A1,DTABLN INSIDE LIMIT?«, t00=0x0050, t01=0x00e2}
0x7dee…7e22               Head {h00=0x0030, h01=0x0050, text=» ABI(L) ENRTAB,A1 YES, ACTIVATE LINE DRIVER «, t00=0x0050, t01=0x0106}
0x7e22…7e34               Head {h00=0x000e, h01=0x0050, text=» XIF  U =1«, t00=0x0050, t01=0x013a}
0x7e34…7e50               Head {h00=0x0018, h01=0x0050, text=» ABL TDISP NO, ERROR«, t00=0x0050, t01=0x014c}
0x7e50…7e5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0168}
0x7e5a…7e68               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0050, t01=0x0172}
0x7e68…7e72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0180}
0x7e72…7e92               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0050, t01=0x018a}
0x7e92…7eb2               Head {h00=0x001c, h01=0x0050, text=»* LINE DRIVER ROUTINES *«, t00=0x0051, t01=0x001a}
0x7eb2…7ed2               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0051, t01=0x003a}
0x7ed2…7edc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x005a}
0x7edc…7f26               Head {h00=0x0046, h01=0x0050, text=»*   THIS SECTION CONTAINS AN EXIT ROUTINE THAT CAN BE USED BY THE «, t00=0x0051, t01=0x0064}
0x7f26…7f64               Head {h00=0x003a, h01=0x0050, text=»*   LINE DRIVERS WHEN RETURNING TO THE DEVICE DRIVER. «, t00=0x0051, t01=0x00ae}
0x7f64…7fa6               Head {h00=0x003e, h01=0x0050, text=»*   IT ALSO CONTAINES A NUMBER OF SERVICE SUBROUTINES THAT«, t00=0x0051, t01=0x00ec}
0x7fa6…7fd4               Head {h00=0x002a, h01=0x0050, text=»*   CAN BE CALLED BY THE LINE DRIVERS.«, t00=0x0051, t01=0x012e}
0x7fd4…7fde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x015c}
0x7fde…7fe8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0166}
0x7fe8…801c               Head {h00=0x0030, h01=0x0050, text=»*   ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x0051, t01=0x0170}
0x801c…8026               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0014}
0x8026…803e               Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x0052, t01=0x001e}
0x803e…8048               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0036}
0x8048…8070               Head {h00=0x0024, h01=0x0050, text=»* NDRET RETURN TO DEVICE DRIVER «, t00=0x0052, t01=0x0040}
0x8070…809a               Head {h00=0x0026, h01=0x0050, text=»* NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x0052, t01=0x0068}
0x809a…80c4               Head {h00=0x0026, h01=0x0050, text=»* NDGET8 GET A3-A5, A7-A8 FROM DWT«, t00=0x0052, t01=0x0092}
0x80c4…8100               Head {h00=0x0038, h01=0x0050, text=»* NDREWS CALL RECOVERY FOR ALL DWT:S ON WORK STATION«, t00=0x0052, t01=0x00bc}
0x8100…812e               Head {h00=0x002a, h01=0x0050, text=»* NDREDW CALL RECOVERY ROUTINE FOR DWT«, t00=0x0052, t01=0x00f8}
0x812e…8166               Head {h00=0x0034, h01=0x0050, text=»* NDGEDN GET HIGEST DWT NUMBER FOR WORK STATION «, t00=0x0052, t01=0x0126}
0x8166…8186               Head {h00=0x001c, h01=0x0050, text=»* NDGEDW GET DWT ADDRESS«, t00=0x0052, t01=0x015e}
0x8186…8190               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x017e}
0x8190…819e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x0188}
0x819e…81a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0008}
0x81a8…81ec               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0053, t01=0x0012}
0x81ec…81f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0056}
0x81f6…820e               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0053, t01=0x0060}
0x820e…821e               Head {h00=0x000c, h01=0x0050, text=»* NDRET «, t00=0x0053, t01=0x0078}
0x821e…8228               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0088}
0x8228…823c               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0053, t01=0x0092}
0x823c…8274               Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE CONTAINS A NUMBER OF ENTRIES FOR «, t00=0x0053, t01=0x00a6}
0x8274…82a8               Head {h00=0x0030, h01=0x0050, text=»* RETURNING TO THE TERMINAL DEVICE DRIVERS. «, t00=0x0053, t01=0x00de}
0x82a8…82e0               Head {h00=0x0034, h01=0x0050, text=»* THEY CAN BE CALLED EITHER FROM OTHER ROUTINES «, t00=0x0053, t01=0x0112}
0x82e0…8316               Head {h00=0x0032, h01=0x0050, text=»* IN THE NETWORK DISTRIBUTOR, OR FROM THE LINE«, t00=0x0053, t01=0x014a}
0x8316…8328               Head {h00=0x000e, h01=0x0050, text=»* DRIVERS.«, t00=0x0053, t01=0x0180}
0x8328…835c (84, 0, 400)  Head {h00=0x0030, h01=0x0050, text=»* FOR CPU 852 IT ALSO CONTAINS A "RTN  A15" «, t00=0x0054, t01=0x0004}
0x835c…838e               Head {h00=0x002e, h01=0x0050, text=»* SIMULATION THAT DOESN'T PERFORM ENABLE. «, t00=0x0054, t01=0x0038}
0x838e…8398               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x006a}
0x8398…83a8               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0054, t01=0x0074}
0x83a8…83bc               Head {h00=0x0010, h01=0x0050, text=»* RF "NAME" «, t00=0x0054, t01=0x0084}
0x83bc…83d0               Head {h00=0x0010, h01=0x0050, text=»* RB "NAME" «, t00=0x0054, t01=0x0098}
0x83d0…83e4               Head {h00=0x0010, h01=0x0050, text=»* ABL "NAME"«, t00=0x0054, t01=0x00ac}
0x83e4…83ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00c0}
0x83ee…83fe               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0054, t01=0x00ca}
0x83fe…842e               Head {h00=0x002c, h01=0x0050, text=»* A5  = LOCAL STACK POINTER (IF NDRETX) «, t00=0x0054, t01=0x00da}
0x842e…8456               Head {h00=0x0024, h01=0x0050, text=»* A6  = DWT ADDRESS (IF NDREPX) «, t00=0x0054, t01=0x010a}
0x8456…8460               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0132}
0x8460…8472               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0054, t01=0x013c}
0x8472…84a6               Head {h00=0x0030, h01=0x0050, text=»*      AT RETURN TO TERMINAL DEVICE DRIVER: «, t00=0x0054, t01=0x014e}
0x84a6…84de               Head {h00=0x0034, h01=0x0050, text=»* SEE HEADING OF CALLED REQUEST HANDLING ROUTINE«, t00=0x0054, t01=0x0182}
0x84de…84e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x002a}
0x84e8…852c               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0055, t01=0x0034}
0x852c…8536               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0078}
0x8536…854a               Head {h00=0x0010, h01=0x0050, text=»NDRETE EQU *«, t00=0x0055, t01=0x0082}
0x854a…8574               Head {h00=0x0026, h01=0x0050, text=» LDK A1,CONFER CONFIGURATION ERROR«, t00=0x0055, t01=0x0096}
0x8574…858c               Head {h00=0x0014, h01=0x0050, text=» RF NDRET RETURN«, t00=0x0055, t01=0x00c0}
0x858c…8596               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00d8}
0x8596…85a4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0055, t01=0x00e2}
0x85a4…85ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00f0}
0x85ae…85c2               Head {h00=0x0010, h01=0x0050, text=»NDREPO EQU *«, t00=0x0055, t01=0x00fa}
0x85c2…85f2               Head {h00=0x002c, h01=0x0050, text=» CF A15,NDGET8 GET A3-A5, A7-A8 FROM DWT«, t00=0x0055, t01=0x010e}
0x85f2…8606               Head {h00=0x0010, h01=0x0050, text=»NDRETO EQU *«, t00=0x0055, t01=0x013e}
0x8606…8626               Head {h00=0x001c, h01=0x0050, text=» LDK A1,0 RETURN CODE OK«, t00=0x0055, t01=0x0152}
0x8626…8648               Head {h00=0x001e, h01=0x0050, text=» LDK A2,0 DEVICE STATUS OK«, t00=0x0055, t01=0x0172}
0x8648…8660 (86, 0, 398)  Head {h00=0x0014, h01=0x0050, text=» RF NDRET RETURN«, t00=0x0056, t01=0x0004}
0x8660…866a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x001c}
0x866a…867e               Head {h00=0x0010, h01=0x0050, text=»NDREP EQU * «, t00=0x0056, t01=0x0026}
0x867e…86ae               Head {h00=0x002c, h01=0x0050, text=» CF A15,NDGET8 GET A3-A5, A7-A8 FROM DWT«, t00=0x0056, t01=0x003a}
0x86ae…86c2               Head {h00=0x0010, h01=0x0050, text=»NDRET EQU * «, t00=0x0056, t01=0x006a}
0x86c2…86ce               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0056, t01=0x007e}
0x86ce…86f8               Head {h00=0x0026, h01=0x0050, text=» ADK A5,4 ADJUST STACK FOR RETURN «, t00=0x0056, t01=0x008a}
0x86f8…8712               Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 SET CR «, t00=0x0056, t01=0x00b4}
0x8712…873a               Head {h00=0x0024, h01=0x0050, text=» ABR* A5 RETURN TO DEVICE DRIVER«, t00=0x0056, t01=0x00ce}
0x873a…8744               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00f6}
0x8744…874e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0100}
0x874e…8764               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0056, t01=0x010a}
0x8764…8778               Head {h00=0x0010, h01=0x0050, text=»RTNP15 EQU *«, t00=0x0056, t01=0x0120}
0x8778…8798               Head {h00=0x001c, h01=0x0050, text=» ADKL A15,2 ADJUST STACK«, t00=0x0056, t01=0x0134}
0x8798…87b2               Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0056, t01=0x0154}
0x87b2…87be               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x016e}
0x87be…87cc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0056, t01=0x017a}
0x87cc…87d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0188}
0x87d6…881a (87, 0, 398)  Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0057, t01=0x0004}
0x881a…8824               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0048}
0x8824…883c               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0057, t01=0x0052}
0x883c…884c               Head {h00=0x000c, h01=0x0050, text=»* NDSAV8«, t00=0x0057, t01=0x006a}
0x884c…8856               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x007a}
0x8856…886a               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0057, t01=0x0084}
0x886a…88a4               Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE SAVES REGISTERS A3, A4, A5, A7 AND «, t00=0x0057, t01=0x0098}
0x88a4…88c8               Head {h00=0x0020, h01=0x0050, text=»* A8 IN A SAVE AREA IN DWT. «, t00=0x0057, t01=0x00d2}
0x88c8…88d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00f6}
0x88d2…88e2               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0057, t01=0x0100}
0x88e2…88fa               Head {h00=0x0014, h01=0x0050, text=»* CF A15,NDSAV8 «, t00=0x0057, t01=0x0110}
0x88fa…8904               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0128}
0x8904…8914               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0057, t01=0x0132}
0x8914…8930               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x0057, t01=0x0142}
0x8930…893a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x015e}
0x893a…894c               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0057, t01=0x0168}
0x894c…8964               Head {h00=0x0014, h01=0x0050, text=»* CR  = CHANGED «, t00=0x0057, t01=0x017a}
0x8964…896e (88, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0004}
0x896e…89b2               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0058, t01=0x000e}
0x89b2…89bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0052}
0x89bc…89d0               Head {h00=0x0010, h01=0x0050, text=»NDSAV8 EQU *«, t00=0x0058, t01=0x005c}
0x89d0…89f6               Head {h00=0x0022, h01=0x0050, text=»*    SAVE A3-A5, A7-A8 IN DWT «, t00=0x0058, t01=0x0070}
0x89f6…8a0e               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTA3,A6 «, t00=0x0058, t01=0x0096}
0x8a0e…8a26               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTA4,A6 «, t00=0x0058, t01=0x00ae}
0x8a26…8a3e               Head {h00=0x0014, h01=0x0050, text=» ST A5,DWTA5,A6 «, t00=0x0058, t01=0x00c6}
0x8a3e…8a56               Head {h00=0x0014, h01=0x0050, text=» ST A7,DWTA7,A6 «, t00=0x0058, t01=0x00de}
0x8a56…8a6e               Head {h00=0x0014, h01=0x0050, text=» ST A8,DWTA8,A6 «, t00=0x0058, t01=0x00f6}
0x8a6e…8a78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x010e}
0x8a78…8a8e               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0058, t01=0x0118}
0x8a8e…8aa8               Head {h00=0x0016, h01=0x0050, text=» RB RTNP15 RETURN «, t00=0x0058, t01=0x012e}
0x8aa8…8ab4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0148}
0x8ab4…8aca               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0058, t01=0x0154}
0x8aca…8ada               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0058, t01=0x016a}
0x8ada…8ae6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x017a}
0x8ae6…8af0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0186}
0x8af0…8afe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0058, t01=0x0190}
0x8afe…8b08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x000e}
0x8b08…8b4c               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0059, t01=0x0018}
0x8b4c…8b56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x005c}
0x8b56…8b6e               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0059, t01=0x0066}
0x8b6e…8b7e               Head {h00=0x000c, h01=0x0050, text=»* NDGET8«, t00=0x0059, t01=0x007e}
0x8b7e…8b88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x008e}
0x8b88…8b9c               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0059, t01=0x0098}
0x8b9c…8bd8               Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE FETCHES REGISTERS A3, A4, A5, A7 AND «, t00=0x0059, t01=0x00ac}
0x8bd8…8bfe               Head {h00=0x0022, h01=0x0050, text=»* A8 FROM A SAVE AREA IN DWT. «, t00=0x0059, t01=0x00e8}
0x8bfe…8c08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x010e}
0x8c08…8c18               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0059, t01=0x0118}
0x8c18…8c30               Head {h00=0x0014, h01=0x0050, text=»* CF A15,NDGET8 «, t00=0x0059, t01=0x0128}
0x8c30…8c3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0140}
0x8c3a…8c4a               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0059, t01=0x014a}
0x8c4a…8c66               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x0059, t01=0x015a}
0x8c66…8c70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0176}
0x8c70…8c82               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0059, t01=0x0180}
0x8c82…8c9a (90, 0, 398)  Head {h00=0x0014, h01=0x0050, text=»* CR  = CHANGED «, t00=0x005a, t01=0x0004}
0x8c9a…8ca4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x001c}
0x8ca4…8ce8               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x005a, t01=0x0026}
0x8ce8…8cf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x006a}
0x8cf2…8d06               Head {h00=0x0010, h01=0x0050, text=»NDGET8 EQU *«, t00=0x005a, t01=0x0074}
0x8d06…8d2c               Head {h00=0x0022, h01=0x0050, text=»*    GET A3-A5, A7-A8 FROM DWT«, t00=0x005a, t01=0x0088}
0x8d2c…8d44               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTA3,A6 «, t00=0x005a, t01=0x00ae}
0x8d44…8d5c               Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTA4,A6 «, t00=0x005a, t01=0x00c6}
0x8d5c…8d74               Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTA5,A6 «, t00=0x005a, t01=0x00de}
0x8d74…8d8c               Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTA7,A6 «, t00=0x005a, t01=0x00f6}
0x8d8c…8da4               Head {h00=0x0014, h01=0x0050, text=» LD A8,DWTA8,A6 «, t00=0x005a, t01=0x010e}
0x8da4…8dae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0126}
0x8dae…8dc4               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x005a, t01=0x0130}
0x8dc4…8dde               Head {h00=0x0016, h01=0x0050, text=» RB RTNP15 RETURN «, t00=0x005a, t01=0x0146}
0x8dde…8dea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x0160}
0x8dea…8e00               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x005a, t01=0x016c}
0x8e00…8e10               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x005a, t01=0x0182}
0x8e10…8e1c (91, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0004}
0x8e1c…8e26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0010}
0x8e26…8e34               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005b, t01=0x001a}
0x8e34…8e3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0028}
0x8e3e…8e82               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x005b, t01=0x0032}
0x8e82…8e8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0076}
0x8e8c…8ea4               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x005b, t01=0x0080}
0x8ea4…8eb4               Head {h00=0x000c, h01=0x0050, text=»* NDREWS«, t00=0x005b, t01=0x0098}
0x8eb4…8ebe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00a8}
0x8ebe…8ed2               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x005b, t01=0x00b2}
0x8ed2…8f0e               Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE CALLS RECOVERY ROUTINES FOR ALL DWT:S«, t00=0x005b, t01=0x00c6}
0x8f0e…8f4c               Head {h00=0x003a, h01=0x0050, text=»* ON A WORK STATION, EXEPT FOR THOSE OF OUTPUT DEVICES«, t00=0x005b, t01=0x0102}
0x8f4c…8f64               Head {h00=0x0014, h01=0x0050, text=»* IN ECHO MODE. «, t00=0x005b, t01=0x0140}
0x8f64…8f6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0158}
0x8f6e…8f7e               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x005b, t01=0x0162}
0x8f7e…8f96               Head {h00=0x0014, h01=0x0050, text=»* CF A15,NDREWS «, t00=0x005b, t01=0x0172}
0x8f96…8fa0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x018a}
0x8fa0…8fb0 (92, 0, 400)  Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x005c, t01=0x0004}
0x8fb0…8fda               Head {h00=0x0026, h01=0x0050, text=»* A3  = WORK STATION TABLE ADDRESS«, t00=0x005c, t01=0x0014}
0x8fda…8ff8               Head {h00=0x001a, h01=0x0050, text=»* A4  = RECOVERY CAUSE«, t00=0x005c, t01=0x003e}
0x8ff8…901c               Head {h00=0x0020, h01=0x0050, text=»* A6  = WORK STATION NUMBER «, t00=0x005c, t01=0x005c}
0x901c…9026               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0080}
0x9026…9038               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x005c, t01=0x008a}
0x9038…9064               Head {h00=0x0028, h01=0x0050, text=»*      AT ENTRY TO RECOVERY ROUTINE:«, t00=0x005c, t01=0x009c}
0x9064…9078               Head {h00=0x0010, h01=0x0050, text=»* SEE NDREDW«, t00=0x005c, t01=0x00c8}
0x9078…909c               Head {h00=0x0020, h01=0x0050, text=»*      AT SUBROUTINE RETURN:«, t00=0x005c, t01=0x00dc}
0x909c…90b4               Head {h00=0x0014, h01=0x0050, text=»* CR  = CHANGED «, t00=0x005c, t01=0x0100}
0x90b4…90ce               Head {h00=0x0016, h01=0x0050, text=»* INTERR. CHANGED «, t00=0x005c, t01=0x0118}
0x90ce…90d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0132}
0x90d8…911c               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x005c, t01=0x013c}
0x911c…9126               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0180}
0x9126…913a               Head {h00=0x0010, h01=0x0050, text=»NDREWS EQU *«, t00=0x005c, t01=0x018a}
0x913a…9154               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x005d, t01=0x000e}
0x9154…916a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x005d, t01=0x0028}
0x916a…918a               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x005d, t01=0x003e}
0x918a…9196               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x005e}
0x9196…91b0               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x005d, t01=0x006a}
0x91b0…91c6               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x005d, t01=0x0084}
0x91c6…91e4               Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x005d, t01=0x009a}
0x91e4…91f0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x00b8}
0x91f0…920a               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x005d, t01=0x00c4}
0x920a…9214               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00de}
0x9214…9222               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005d, t01=0x00e8}
0x9222…922c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00f6}
0x922c…924e               Head {h00=0x001e, h01=0x0050, text=» LDR A8,A6 SAVE WS NUMBER «, t00=0x005d, t01=0x0100}
0x924e…927c               Head {h00=0x002a, h01=0x0050, text=» LDR A1,A3 WORK STATION TABLE ADDRESS «, t00=0x005d, t01=0x0122}
0x927c…92a8               Head {h00=0x0028, h01=0x0050, text=» CF A15,NDGEDN GET HIGEST DWT NUMBER«, t00=0x005d, t01=0x0150}
0x92a8…92ca               Head {h00=0x001e, h01=0x0050, text=» ADK A7,1 PREPARE FOR SUK «, t00=0x005d, t01=0x017c}
0x92ca…92d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x000e}
0x92d4…92e8               Head {h00=0x0010, h01=0x0050, text=»RW100 EQU * «, t00=0x005e, t01=0x0018}
0x92e8…9302               Head {h00=0x0016, h01=0x0050, text=» SUK A7,1 NEXT DWT«, t00=0x005e, t01=0x002c}
0x9302…9328               Head {h00=0x0022, h01=0x0050, text=» RF(N) RW120 EXIT IF ALL DONE «, t00=0x005e, t01=0x0046}
0x9328…934e               Head {h00=0x0022, h01=0x0050, text=» LDR A6,A8 WORK STATION NUMBER«, t00=0x005e, t01=0x006c}
0x934e…937c               Head {h00=0x002a, h01=0x0050, text=» LDR A1,A3 WORK STATION TABLE ADDRESS «, t00=0x005e, t01=0x0092}
0x937c…93a4               Head {h00=0x0024, h01=0x0050, text=» CF A15,NDGEDW A6 := DWT ADDRESS«, t00=0x005e, t01=0x00c0}
0x93a4…93ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x00e8}
0x93ae…93ce               Head {h00=0x001c, h01=0x0050, text=» LDR A6,A6 DWT DEFINED? «, t00=0x005e, t01=0x00f2}
0x93ce…93f0               Head {h00=0x001e, h01=0x0050, text=» RB(Z) RW100 NO, TAKE NEXT«, t00=0x005e, t01=0x0112}
0x93f0…9402               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x005e, t01=0x0134}
0x9402…9430               Head {h00=0x002a, h01=0x0050, text=» TM A6,A1 DWT WITH >1 DEVICE ADDRESS? «, t00=0x005e, t01=0x0146}
0x9430…945e               Head {h00=0x002a, h01=0x0050, text=» RB(NZ) RW100 YES, ONLY ONE CALL / DWT«, t00=0x005e, t01=0x0174}
0x945e…9468               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0012}
0x9468…9492               Head {h00=0x0026, h01=0x0050, text=»*      CHECK IF OUTPUT ECHO DEVICE«, t00=0x005f, t01=0x001c}
0x9492…94b4               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT STATUS«, t00=0x005f, t01=0x0046}
0x94b4…94cc               Head {h00=0x0014, h01=0x0050, text=» LDR A2,A1 SAVE «, t00=0x005f, t01=0x0068}
0x94cc…94ee               Head {h00=0x001e, h01=0x0050, text=» ANKL A1,DWFECH ECHO MODE?«, t00=0x005f, t01=0x0080}
0x94ee…9510               Head {h00=0x001e, h01=0x0050, text=» RF(Z) RW110 NO, CONTINUE «, t00=0x005f, t01=0x00a2}
0x9510…9536               Head {h00=0x0022, h01=0x0050, text=» ANKL A2,DWFINP INPUT DEVICE? «, t00=0x005f, t01=0x00c4}
0x9536…9566               Head {h00=0x002c, h01=0x0050, text=» RB(Z) RW100 NO, ECHO OUTPUT. TAKE NEXT «, t00=0x005f, t01=0x00ea}
0x9566…9570               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x011a}
0x9570…9584               Head {h00=0x0010, h01=0x0050, text=»RW110 EQU * «, t00=0x005f, t01=0x0124}
0x9584…95b0               Head {h00=0x0028, h01=0x0050, text=» CF A15,NDREDW CALL RECOVERY ROUTINE«, t00=0x005f, t01=0x0138}
0x95b0…95ca               Head {h00=0x0016, h01=0x0050, text=» RB RW100 NEXT DWT«, t00=0x005f, t01=0x0164}
0x95ca…95d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x017e}
0x95d4…95de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0188}
0x95de…95f2 (96, 0, 398)  Head {h00=0x0010, h01=0x0050, text=»RW120 EQU * «, t00=0x0060, t01=0x0004}
0x95f2…9610               Head {h00=0x001a, h01=0x0050, text=»*    ALL DWT:S HANDLED«, t00=0x0060, t01=0x0018}
0x9610…962a               Head {h00=0x0016, h01=0x0050, text=» ABL TDISP RETURN «, t00=0x0060, t01=0x0036}
0x962a…963c               Head {h00=0x000e, h01=0x0050, text=» XIF  U =1«, t00=0x0060, t01=0x0050}
0x963c…9646               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0062}
0x9646…9654               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0060, t01=0x006c}
0x9654…965e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x007a}
0x965e…96a2               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0060, t01=0x0084}
0x96a2…96ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00c8}
0x96ac…96c4               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0060, t01=0x00d2}
0x96c4…96d4               Head {h00=0x000c, h01=0x0050, text=»* NDREDW«, t00=0x0060, t01=0x00ea}
0x96d4…96de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00fa}
0x96de…96f2               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0060, t01=0x0104}
0x96f2…9732               Head {h00=0x003c, h01=0x0050, text=»* THIS ROUTINE CALLS THE RECOVERY ROUTINE OF A TERMINAL «, t00=0x0060, t01=0x0118}
0x9732…976c               Head {h00=0x0036, h01=0x0050, text=»* DEVICE DRIVER, IF THE RECOVERY ENTRY IS DEFINED.«, t00=0x0060, t01=0x0158}
0x976c…97ac (97, 0, 400)  Head {h00=0x003c, h01=0x0050, text=»* IF NO RECOVERY IS DEFINED, DWT IS BUSY BUT NO REQUEST «, t00=0x0061, t01=0x0004}
0x97ac…97ea               Head {h00=0x003a, h01=0x0050, text=»* IS ON, TENDIO IS CALLED TO ACTIVATE TERMINAL QUEUE. «, t00=0x0061, t01=0x0044}
0x97ea…97f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0082}
0x97f4…9804               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0061, t01=0x008c}
0x9804…981c               Head {h00=0x0014, h01=0x0050, text=»* CF A15,NDREDW «, t00=0x0061, t01=0x009c}
0x981c…9826               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00b4}
0x9826…9836               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0061, t01=0x00be}
0x9836…9854               Head {h00=0x001a, h01=0x0050, text=»* A4  = RECOVERY CAUSE«, t00=0x0061, t01=0x00ce}
0x9854…9870               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x0061, t01=0x00ec}
0x9870…987a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0108}
0x987a…988c               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0061, t01=0x0112}
0x988c…98b8               Head {h00=0x0028, h01=0x0050, text=»*      AT ENTRY TO RECOVERY ROUTINE:«, t00=0x0061, t01=0x0124}
0x98b8…98d6               Head {h00=0x001a, h01=0x0050, text=»* A4  = RECOVERY CAUSE«, t00=0x0061, t01=0x0150}
0x98d6…98f4               Head {h00=0x001a, h01=0x0050, text=»* A5  = DWT STACK BASE«, t00=0x0061, t01=0x016e}
0x98f4…9910               Head {h00=0x0018, h01=0x0050, text=»* A6  = DWT ADDRESS «, t00=0x0061, t01=0x018c}
0x9910…992e               Head {h00=0x001a, h01=0x0050, text=»* A7  = BITS 0-9  ZERO«, t00=0x0062, t01=0x0018}
0x992e…995a               Head {h00=0x0028, h01=0x0050, text=»*  BITS 10-15  ORDER (IF REQUEST ON)«, t00=0x0062, t01=0x0036}
0x995a…9984               Head {h00=0x0026, h01=0x0050, text=»* A8  = ECB ADDRESS IF REQUEST ON,«, t00=0x0062, t01=0x0062}
0x9984…999a               Head {h00=0x0012, h01=0x0050, text=»*   ELSE ZERO «, t00=0x0062, t01=0x008c}
0x999a…99b4               Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x0062, t01=0x00a2}
0x99b4…99d8               Head {h00=0x0020, h01=0x0050, text=»*      AT SUBROUTINE RETURN:«, t00=0x0062, t01=0x00bc}
0x99d8…99f0               Head {h00=0x0014, h01=0x0050, text=»* CR  = CHANGED «, t00=0x0062, t01=0x00e0}
0x99f0…9a0a               Head {h00=0x0016, h01=0x0050, text=»* INTERR. CHANGED «, t00=0x0062, t01=0x00f8}
0x9a0a…9a14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0112}
0x9a14…9a58               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0062, t01=0x011c}
0x9a58…9a62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0160}
0x9a62…9a70               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0062, t01=0x016a}
0x9a70…9a7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0178}
0x9a7a…9a8e               Head {h00=0x0010, h01=0x0050, text=»NDREDW EQU *«, t00=0x0062, t01=0x0182}
0x9a8e…9aa4               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0063, t01=0x0008}
0x9aa4…9ac4               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x0063, t01=0x001e}
0x9ac4…9ad0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x003e}
0x9ad0…9ae6               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0063, t01=0x004a}
0x9ae6…9b04               Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x0063, t01=0x0060}
0x9b04…9b10               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x007e}
0x9b10…9b1c               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0063, t01=0x008a}
0x9b1c…9b26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0096}
0x9b26…9b44               Head {h00=0x001a, h01=0x0050, text=» LDR A5,A6 DWT ADDRESS«, t00=0x0063, t01=0x00a0}
0x9b44…9b66               Head {h00=0x001e, h01=0x0050, text=» ADKL A5,DWTSB2 STACK BASE«, t00=0x0063, t01=0x00be}
0x9b66…9b86               Head {h00=0x001c, h01=0x0050, text=» LC A7,DWTOR+1,A6 ORDER «, t00=0x0063, t01=0x00e0}
0x9b86…9ba0               Head {h00=0x0016, h01=0x0050, text=» ANK A7,/3F CLEAN «, t00=0x0063, t01=0x0100}
0x9ba0…9bc4               Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x0063, t01=0x011a}
0x9bc4…9bce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x013e}
0x9bce…9bf4               Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTADR,A6 ADDRESS BLOCK«, t00=0x0063, t01=0x0148}
0x9bf4…9c1c               Head {h00=0x0024, h01=0x0050, text=» LD A1,RECADR,A1 RECOVERY ENTRY «, t00=0x0063, t01=0x016e}
0x9c1c…9c48               Head {h00=0x0028, h01=0x0050, text=» ABR(NZ) A1 CALL RECOVERY IF DEFINED«, t00=0x0064, t01=0x0008}
0x9c48…9c52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0034}
0x9c52…9c5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x003e}
0x9c5c…9c9a               Head {h00=0x003a, h01=0x0050, text=»*      NO RECOVERY. CALL TENDIO IF BUSY BUT NO REQUEST«, t00=0x0064, t01=0x0048}
0x9c9a…9cbc               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x0064, t01=0x0086}
0x9cbc…9cda               Head {h00=0x001a, h01=0x0050, text=» ANKL A2,DWFBSY BUSY? «, t00=0x0064, t01=0x00a8}
0x9cda…9cf8               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) RD100 NO, EXIT«, t00=0x0064, t01=0x00c6}
0x9cf8…9d16               Head {h00=0x001a, h01=0x0050, text=» LDR A8,A8 REQUEST ON?«, t00=0x0064, t01=0x00e4}
0x9d16…9d40               Head {h00=0x0026, h01=0x0050, text=» ABL(Z) DISEND NO, TENDIO & RETURN«, t00=0x0064, t01=0x0102}
0x9d40…9d54               Head {h00=0x0010, h01=0x0050, text=»RD100 EQU * «, t00=0x0064, t01=0x012c}
0x9d54…9d6e               Head {h00=0x0016, h01=0x0050, text=» ABL TDISP RETURN «, t00=0x0064, t01=0x0140}
0x9d6e…9d78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x015a}
0x9d78…9d86               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0064, t01=0x0164}
0x9d86…9d90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0172}
0x9d90…9dd4               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0064, t01=0x017c}
0x9dd4…9dde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0030}
0x9dde…9df6               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0065, t01=0x003a}
0x9df6…9e06               Head {h00=0x000c, h01=0x0050, text=»* NDGEDN«, t00=0x0065, t01=0x0052}
0x9e06…9e10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0062}
0x9e10…9e24               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0065, t01=0x006c}
0x9e24…9e5c               Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE CALCULATES THE HIGEST DWT NUMBER «, t00=0x0065, t01=0x0080}
0x9e5c…9e98               Head {h00=0x0038, h01=0x0050, text=»* (POSITION NUMBER IN DWT TABLE) FOR A WORK STATION.«, t00=0x0065, t01=0x00b8}
0x9e98…9ea2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00f4}
0x9ea2…9eb2               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0065, t01=0x00fe}
0x9eb2…9eca               Head {h00=0x0014, h01=0x0050, text=»* CF A15,NDGEDN «, t00=0x0065, t01=0x010e}
0x9eca…9ed4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0126}
0x9ed4…9ee4               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0065, t01=0x0130}
0x9ee4…9f12               Head {h00=0x002a, h01=0x0050, text=»* A1  = ADDRESS OF WORK STATION TABLE «, t00=0x0065, t01=0x0140}
0x9f12…9f36               Head {h00=0x0020, h01=0x0050, text=»* A6  = WORK STATION NUMBER «, t00=0x0065, t01=0x016e}
0x9f36…9f40 (102, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0004}
0x9f40…9f52               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0066, t01=0x000e}
0x9f52…9f7a               Head {h00=0x0024, h01=0x0050, text=»* A7  = HIGEST DWT NUMBER (0-7) «, t00=0x0066, t01=0x0020}
0x9f7a…9f9a               Head {h00=0x001c, h01=0x0050, text=»*   -1 IF NO DWT:S FOUND«, t00=0x0066, t01=0x0048}
0x9f9a…9fb2               Head {h00=0x0014, h01=0x0050, text=»* CR  = CHANGED «, t00=0x0066, t01=0x0068}
0x9fb2…9fbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0080}
0x9fbc…a000               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0066, t01=0x008a}
0xa000…a00a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00ce}
0xa00a…a01e               Head {h00=0x0010, h01=0x0050, text=»NDGEDN EQU *«, t00=0x0066, t01=0x00d8}
0xa01e…a038               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0066, t01=0x00ec}
0xa038…a05a               Head {h00=0x001e, h01=0x0050, text=» STR A6,A15 PUSH WS NUMBER«, t00=0x0066, t01=0x0106}
0xa05a…a07e               Head {h00=0x0020, h01=0x0050, text=» LDR A1,A1 WS TABLE DEFINED?«, t00=0x0066, t01=0x0128}
0xa07e…a09c               Head {h00=0x001a, h01=0x0050, text=» RF(Z) GN100 NO, EXIT «, t00=0x0066, t01=0x014c}
0xa09c…a0b8               Head {h00=0x0018, h01=0x0050, text=» SLL A6,1 MAKE INDEX«, t00=0x0066, t01=0x016a}
0xa0b8…a0dc               Head {h00=0x0020, h01=0x0050, text=» CW A6,-2,A1 INDEX TOO HIGH?«, t00=0x0066, t01=0x0186}
0xa0dc…a0fc               Head {h00=0x001c, h01=0x0050, text=» RF(NL) GN100 YES, EXIT «, t00=0x0067, t01=0x001a}
0xa0fc…a106               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x003a}
0xa106…a114               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0067, t01=0x0044}
0xa114…a11e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0052}
0xa11e…a130               Head {h00=0x000e, h01=0x0050, text=» ADR A6,A1«, t00=0x0067, t01=0x005c}
0xa130…a156               Head {h00=0x0022, h01=0x0050, text=» LDR* A6,A6 DWT ADDRESS TABLE «, t00=0x0067, t01=0x006e}
0xa156…a17c               Head {h00=0x0022, h01=0x0050, text=» RF(Z) GN100 NOT DEFINED, EXIT«, t00=0x0067, t01=0x0094}
0xa17c…a19e               Head {h00=0x001e, h01=0x0050, text=» LD A7,-2,A6 TABLE LENGTH «, t00=0x0067, t01=0x00ba}
0xa19e…a1c2               Head {h00=0x0020, h01=0x0050, text=» SUK A7,2 OFFSET TO LAST DWT«, t00=0x0067, t01=0x00dc}
0xa1c2…a1e6               Head {h00=0x0020, h01=0x0050, text=» SRA A7,1 NUMBER OF LAST DWT«, t00=0x0067, t01=0x0100}
0xa1e6…a1fc               Head {h00=0x0012, h01=0x0050, text=» RF GN110 EXIT«, t00=0x0067, t01=0x0124}
0xa1fc…a206               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x013a}
0xa206…a21a               Head {h00=0x0010, h01=0x0050, text=»GN100 EQU * «, t00=0x0067, t01=0x0144}
0xa21a…a23e               Head {h00=0x0020, h01=0x0050, text=» LDKL A7,-1 NO DWT:S DEFINED«, t00=0x0067, t01=0x0158}
0xa23e…a252               Head {h00=0x0010, h01=0x0050, text=»GN110 EQU * «, t00=0x0067, t01=0x017c}
0xa252…a274               Head {h00=0x001e, h01=0x0050, text=» LDR* A6,A15 POP WS NUMBER«, t00=0x0067, t01=0x0190}
0xa274…a28a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0068, t01=0x0022}
0xa28a…a2a4               Head {h00=0x0016, h01=0x0050, text=» RB RTNP15 RETURN «, t00=0x0068, t01=0x0038}
0xa2a4…a2b0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0068, t01=0x0052}
0xa2b0…a2ca               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x0068, t01=0x005e}
0xa2ca…a2e0               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0068, t01=0x0078}
0xa2e0…a2f0               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0068, t01=0x008e}
0xa2f0…a2fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0068, t01=0x009e}
0xa2fc…a306               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00aa}
0xa306…a314               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0068, t01=0x00b4}
0xa314…a31e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00c2}
0xa31e…a362               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0068, t01=0x00cc}
0xa362…a36c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0110}
0xa36c…a384               Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0068, t01=0x011a}
0xa384…a394               Head {h00=0x000c, h01=0x0050, text=»* NDGEDW«, t00=0x0068, t01=0x0132}
0xa394…a39e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0142}
0xa39e…a3b2               Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0068, t01=0x014c}
0xa3b2…a3e8               Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE CALCULATES THE DWT ADDRESS FOR «, t00=0x0068, t01=0x0160}
0xa3e8…a3fc               Head {h00=0x0010, h01=0x0050, text=»* A DEVICE. «, t00=0x0069, t01=0x0008}
0xa3fc…a406               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x001c}
0xa406…a416               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0069, t01=0x0026}
0xa416…a42e               Head {h00=0x0014, h01=0x0050, text=»* CF A15,NDGEDW «, t00=0x0069, t01=0x0036}
0xa42e…a438               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x004e}
0xa438…a448               Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0069, t01=0x0058}
0xa448…a47e               Head {h00=0x0032, h01=0x0050, text=»* A1  = ADDRESS OF WORK STATION TABLE (INTXXN)«, t00=0x0069, t01=0x0068}
0xa47e…a4a2               Head {h00=0x0020, h01=0x0050, text=»* A6  = WORK STATION NUMBER «, t00=0x0069, t01=0x009e}
0xa4a2…a4c0               Head {h00=0x001a, h01=0x0050, text=»* A7  = DEVICE ADDRESS«, t00=0x0069, t01=0x00c2}
0xa4c0…a4ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00e0}
0xa4ca…a4dc               Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0069, t01=0x00ea}
0xa4dc…a500               Head {h00=0x0020, h01=0x0050, text=»* A6  = DWT ADDRESS IF FOUND«, t00=0x0069, t01=0x00fc}
0xa500…a512               Head {h00=0x000e, h01=0x0050, text=»*   ELSE 0«, t00=0x0069, t01=0x0120}
0xa512…a52a               Head {h00=0x0014, h01=0x0050, text=»* CR  = CHANGED «, t00=0x0069, t01=0x0132}
0xa52a…a534               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x014a}
0xa534…a578               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0069, t01=0x0154}
0xa578…a582               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0008}
0xa582…a596               Head {h00=0x0010, h01=0x0050, text=»NDGEDW EQU *«, t00=0x006a, t01=0x0012}
0xa596…a5b0               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x006a, t01=0x0026}
0xa5b0…a5de               Head {h00=0x002a, h01=0x0050, text=» SLL A7,1 MAKE INDEX OF DEVICE ADDRESS«, t00=0x006a, t01=0x0040}
0xa5de…a602               Head {h00=0x0020, h01=0x0050, text=» LDR A1,A1 WS TABLE DEFINED?«, t00=0x006a, t01=0x006e}
0xa602…a620               Head {h00=0x001a, h01=0x0050, text=» RF(Z) GD100 NO, EXIT «, t00=0x006a, t01=0x0092}
0xa620…a64e               Head {h00=0x002a, h01=0x0050, text=» SLL A6,1 INDEX IN WORK STATION TABLE «, t00=0x006a, t01=0x00b0}
0xa64e…a670               Head {h00=0x001e, h01=0x0050, text=» CW A6,-2,A1 INSIDE TABLE?«, t00=0x006a, t01=0x00de}
0xa670…a690               Head {h00=0x001c, h01=0x0050, text=» RF(NL) GD100 NO, ERROR «, t00=0x006a, t01=0x0100}
0xa690…a69a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0120}
0xa69a…a6a8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006a, t01=0x012a}
0xa6a8…a6b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0138}
0xa6b2…a6c4               Head {h00=0x000e, h01=0x0050, text=» ADR A6,A1«, t00=0x006a, t01=0x0142}
0xa6c4…a6ea               Head {h00=0x0022, h01=0x0050, text=» LDR* A6,A6 DWT ADDRESS TABLE «, t00=0x006a, t01=0x0154}
0xa6ea…a714               Head {h00=0x0026, h01=0x0050, text=» RF(Z) GD100 WS NOT DEFINED, EXIT «, t00=0x006a, t01=0x017a}
0xa714…a738               Head {h00=0x0020, h01=0x0050, text=» CW A7,-2,A6 INDEX TOO HIGH?«, t00=0x006b, t01=0x0014}
0xa738…a758               Head {h00=0x001c, h01=0x0050, text=» RF(NL) GD100 YES, EXIT «, t00=0x006b, t01=0x0038}
0xa758…a76a               Head {h00=0x000e, h01=0x0050, text=» ADR A6,A7«, t00=0x006b, t01=0x0058}
0xa76a…a78e               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A6 DWT ADDRESS OR 0«, t00=0x006b, t01=0x006a}
0xa78e…a7a4               Head {h00=0x0012, h01=0x0050, text=» RF GD110 EXIT«, t00=0x006b, t01=0x008e}
0xa7a4…a7ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00a4}
0xa7ae…a7c2               Head {h00=0x0010, h01=0x0050, text=»GD100 EQU * «, t00=0x006b, t01=0x00ae}
0xa7c2…a7e2               Head {h00=0x001c, h01=0x0050, text=» LDK A6,0 DWT NOT FOUND «, t00=0x006b, t01=0x00c2}
0xa7e2…a7f6               Head {h00=0x0010, h01=0x0050, text=»GD110 EQU * «, t00=0x006b, t01=0x00e2}
0xa7f6…a81e               Head {h00=0x0024, h01=0x0050, text=» SRL A7,1 RESTORE DEVICE ADDRESS«, t00=0x006b, t01=0x00f6}
0xa81e…a834               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x006b, t01=0x011e}
0xa834…a84e               Head {h00=0x0016, h01=0x0050, text=» RB RTNP15 RETURN «, t00=0x006b, t01=0x0134}
0xa84e…a85a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x014e}
0xa85a…a874               Head {h00=0x0016, h01=0x0050, text=» IFF NTONSU=0 U =1«, t00=0x006b, t01=0x015a}
0xa874…a88a               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x006b, t01=0x0174}
0xa88a…a89a               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x006b, t01=0x018a}
0xa89a…a8a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x000a}
0xa8a6…a8b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0016}
0xa8b0…a8ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0020}
0xa8ba…a8c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x002a}
0xa8c4…a8d0               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x006c, t01=0x0034}
0xa8d0…a8d4               Head {h00=0x4004, h01=0x0000}
0xa8d4…a8d8               00 6c 00 40                                                                                                                                                                                                                                       ┆ l @┆
0xa8d8…a8e0 (109, 1, 8)   20 04 00 00 00 6d 00 04                                                                                                                                                                                                                           ┆     m  ┆

Reduced view