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

⟦4cae37efa⟧

    Length: 36660 (0x8f34)
    Notes: pts_type(SC)
    Names: »DRAS01.SC«

Derivation

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

	IDENT DRAS01 	REL 11.0 81-01-26 870105041100 

			=6, ETX-CHECK REMOVED
			PRR 11.0 80-03-06
			=5, CORR. OF FLASHING LIGHTS PROBLEM 
			DEV ADDR. CHAN. UNIT 5 AND 6 
			PRR 11.0 80-02-05
			NEW DEVICE DRIVER INTERFACE
			PRR 10.0 79-12-07
			=4, RTN FROM OUTASC IN INH MODE
			PRR 10.1 79-11-20
			=3, CHECK IF PFINIT PENDING
			PRR 10.1 79-10-04
			=2, CORR. OF RECOV.;ST. INP. IF THRP. ERR. 
			PRR 10.1 79-10-03
			=1, CHANGE TO EVEN PARITY
			PRR 10.1 79-09-18




* 
* 
********************************************************************* 
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   DRAS01 = DRIVER CHANNEL UNIT
* 
*            ASCU4Z 
* 
* 
* 
* 
* 
**********************************************************************
* 
*   THIS IS A CHANNEL UNIT DRIVER FOR TERMINALS 
*   CONNECTED TO CPU VIA ASCU4Z.
* 
*   AT INPUT INTERRUPT A CHARACTER IS READ TO REGISTER A2 
*   AND A BRANCH IS MADE TO INTERRUPT HANDLER FOR ACTUAL
*   DEVICE. 
* 
*   AFTER AN OUTPUT IS ENDED AN INTERRUPT IS
*   GENERATED FROM ASCU4Z. THE DRIVER CHECKS THE INTERRUPT
*   AND A BRANCH IS MADE TO INTERRUPT HANDLER.
* 
* 
	EJECT
* 
*   THE DRIVER ALSO INCLUDES THE FOLLOWING SUBROUTINES: 
* 
*   -ASCUON   EXECUTE CIO START ON EVERY ASCU4Z LINE AT POWER ON
* 
*   -OUTASC   SEND ONE CHARACTER
* 
*   CONTROL WORK TABLES ARE INCLUDED IN THE DRIVER
* 
*   NORMAL REGISTER USAGE IN THE DRIVER:
* 
*   A1 = RETURN CODE
*   A2 = INPUT CHARACTER
*   A3 = WORK REGISTER
*   A4 = DEVICE NUMBER * 2
*   A5 = CWT-ADDRESS
*   A6 = DWT-ADDRESS
*   A7 = ORDER
*   A8 = ECB ADDRESS
* 
* 
* 
	EJECT
* 
*********** 
* ENTRIES * 
*********** 
* 
* 
	ENTRY	IASCUZ	INTERRUPT FROM ASCU4Z 
	ENTRY	ASCUON	START AT POWER ON 
	ENTRY	ASCHAN	NUMBER OF CHANNEL UNITS 
* 
	ENTRY	ASCHRI	CHARACTER INPUT 
	ENTRY	ASSTBL	DEFINE START OF OUTPUT BLOCK
	ENTRY	ASCHRO	CHARACTER OUTPUT
	ENTRY	ASENBL	DEFINE END OF OUTPUT BLOCK
	ENTRY	ASDISP	LOCAL DISPATCHER
* 
	EJECT
* 
* 
********************************
* EXTERNAL TOSS MODULE ENTRIES *
********************************
* 
	EXTRN	TDISP	DISPATCHER 
	EXTRN	INTSAV	SAVE AREA LAST INTERRUPT
	EXTRN	PFPOST	PWF POST PROCESSING FLAG	=3 
* 
	EXTRN	INTAS1	WS TABLE ADDRESS ASCU4Z 1 
	EXTRN	INTAS2	WS TABLE ADDRESS ASCU4Z 2 
	EXTRN	INTAS3	WS TABLE ADDRESS ASCU4Z 3 
	EXTRN	INTAS4	WS TABLE ADDRESS ASCU4Z 4 
	EXTRN	INTAS5	WS TABLE ADDRESS ASCU4Z 5 
	EXTRN	INTAS6	WS TABLE ADDRESS ASCU4Z 6 
	EXTRN	INTAS7	WS TABLE ADDRESS ASCU4Z 7 
	EXTRN	INTAS8	WS TABLE ADDRESS ASCU4Z 8 
* 
	EXTRN	NDSAV8	SAVE A3-A5, A7-A8 IN DWT
	EXTRN	NDGET8	GET A3-A5, A7-A8 FROM DWT 
	EXTRN	NDREDW	CALL RECOVERY FOR DEVICE
	EXTRN	NDRETO	OK & RETURN TO DEV. DRIVER
	EXTRN	NDREP	POP & RETURN TO DEV. DRIVER
	EXTRN	NDREPO	POP, OK & RETURN TO DEV. DRIVER 
* 
	EJECT
* 
******************
* DWT PARAMETERS *
******************
* 
* 
	EXTRN	DWTST	STATUS 
	EXTRN	DWTOR	ORDER
	EXTRN	DWTOCH	LAST OUTPUT CHARACTER 
	EXTRN	DWTECB	ECB-ADDRESS 
	EXTRN	DWTADR	ADDRESS TO ADDRESSBLOCK 
	EXTRN	DWTOTQ	OUTPUT QUEUE LINK 
	EXTRN	DWTSB2	STACK BASE 2
	EXTRN	DWTCP2	CHANNEL PARAMETERS 2
* 
	EXTRN	INTADR	INTERRUPT ADDRESS DISPLACEMENT
	EXTRN	RECADR	RECOVERY ADDRESS DISPLACEMENT 
* 
	EJECT
* 
* 
************* 
* CONSTANTS * 
************* 
* 
* 
KB	EQU	1	DEVICE ADDRESS FOR KEYBOARD
DI	EQU	2	DEVICE ADDRESS FOR KEYBOARD LAMPS
* 
	EJECT
* 
************************
* CONDITIONAL ASSEMBLY *
************************
* 
*   A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHARACTER 
*   AND STATUS MAY BE INCLUDED TO THE DRIVER BY SETTING X:A=1 
* 
X:A	EQU	1 
LOGING	EQU	X:A
* 
*   THIS DRIVER HANDLES ONE OR UP TO SIX
*   CHANNELS BY SETTING X:B TO 1, 2, 3,...,6
* 
X:B	EQU	1 
ASCHAN	EQU	X:B
* 
	EJECT
* 
****************************************
*   CONTROL WORK TABLES FOR ASCU4Z 1   *
****************************************
* 
* 
*   L I N E  1
* 
DWA11	EQU	/1C	DEVICE ADDRESS
* 
* 
CWTA11	EQU	*	TABLE ENTRY
CWTLDW	EQU	*-CWTA11 
	DATA	0	LAST OUTPUT DWT 
CWTLON	EQU	*-CWTA11 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
CWTITA	EQU	*-CWTA11 
	DATA	INTAS1	WS TABLE ADDRESS 
CWTINR	EQU	*-CWTA11 
	INR	A2,0,DWA11	INR 
CWTOTR	EQU	*-CWTA11 
	OTR	A2,0,DWA11	OTR 
CWTCIS	EQU	*-CWTA11 
	CIO	A1,1,DWA11	CIO START 
CWTEQ	EQU	*-CWTA11
	DATA	0	QUEUE 
CWTCIH	EQU	*-CWTA11 
	CIO	A1,0,DWA11	CIO HALT
CWTSST	EQU	*-CWTA11 
	SST	A2,DWA11	SEND STATUS 
CWTST	EQU	*-CWTA11
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  2
* 
DWA12	EQU	DWA11+1	DEVICE ADDRESS
* 
* 
CWTA12	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS1	WS TABLE ADDRESS 
	INR	A2,0,DWA12	INR 
	OTR	A2,0,DWA12	OTR 
	CIO	A1,1,DWA12	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA12	CIO HALT
	SST	A2,DWA12	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  3
* 
DWA13	EQU	DWA11+2	DEVICE ADDRESS
* 
* 
CWTA13	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS1	WS TABLE ADDRESS 
	INR	A2,0,DWA13	INR 
	OTR	A2,0,DWA13	OTR 
	CIO	A1,1,DWA13	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA13	CIO HALT
	SST	A2,DWA13	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  4
* 
DWA14	EQU	DWA11+3	DEVICE ADDRESS
* 
* 
CWTA14	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS1	WS TABLE ADDRESS 
	INR	A2,0,DWA14	INR 
	OTR	A2,0,DWA14	OTR 
	CIO	A1,1,DWA14	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA14	CIO HALT
	SST	A2,DWA14	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
****************************************
*   CONTROL WORK TABLES FOR ASCU4Z 2   *
****************************************
* 
	IFF	ASCHAN=1 
* 
*   L I N E  1
* 
DWA21	EQU	/3C	DEVICE ADDRESS
* 
* 
CWTA21	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS2	WS TABLE ADDRESS 
	INR	A2,0,DWA21	INR 
	OTR	A2,0,DWA21	OTR 
	CIO	A1,1,DWA21	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA21	CIO HALT
	SST	A2,DWA21	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  2
* 
DWA22	EQU	DWA21+1	DEVICE ADDRESS
* 
* 
CWTA22	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS2	WS TABLE ADDRESS 
	INR	A2,0,DWA22	INR 
	OTR	A2,0,DWA22	OTR 
	CIO	A1,1,DWA22	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA22	CIO HALT
	SST	A2,DWA22	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  3
* 
DWA23	EQU	DWA21+2	DEVICE ADDRESS
* 
* 
CWTA23	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS2	WS TABLE ADDRESS 
	INR	A2,0,DWA23	INR 
	OTR	A2,0,DWA23	OTR 
	CIO	A1,1,DWA23	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA23	CIO HALT
	SST	A2,DWA23	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  4
* 
DWA24	EQU	DWA21+3	DEVICE ADDRESS
* 
* 
CWTA24	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS2	WS TABLE ADDRESS 
	INR	A2,0,DWA24	INR 
	OTR	A2,0,DWA24	OTR 
	CIO	A1,1,DWA24	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA24	CIO HALT
	SST	A2,DWA24	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	XIF
	EJECT
* 
****************************************
*   CONTROL WORK TABLES FOR ASCU4Z 3   *
****************************************
* 
	IFF	ASCHAN=1 
	IFF	ASCHAN=2 
* 
*   L I N E  1
* 
DWA31	EQU	/20	DEVICE ADDRESS
* 
* 
CWTA31	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS3	WS TABLE ADDRESS 
	INR	A2,0,DWA31	INR 
	OTR	A2,0,DWA31	OTR 
	CIO	A1,1,DWA31	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA31	CIO HALT
	SST	A2,DWA31	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  2
* 
DWA32	EQU	DWA31+1	DEVICE ADDRESS
* 
* 
CWTA32	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS3	WS TABLE ADDRESS 
	INR	A2,0,DWA32	INR 
	OTR	A2,0,DWA32	OTR 
	CIO	A1,1,DWA32	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA32	CIO HALT
	SST	A2,DWA32	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  3
* 
DWA33	EQU	DWA31+2	DEVICE ADDRESS
* 
* 
CWTA33	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS3	WS TABLE ADDRESS 
	INR	A2,0,DWA33	INR 
	OTR	A2,0,DWA33	OTR 
	CIO	A1,1,DWA33	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA33	CIO HALT
	SST	A2,DWA33	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  4
* 
DWA34	EQU	DWA31+3	DEVICE ADDRESS
* 
* 
CWTA34	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS3	WS TABLE ADDRESS 
	INR	A2,0,DWA34	INR 
	OTR	A2,0,DWA34	OTR 
	CIO	A1,1,DWA34	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA34	CIO HALT
	SST	A2,DWA34	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	XIF
	EJECT
* 
****************************************
*   CONTROL WORK TABLES FOR ASCU4Z 4   *
****************************************
* 
	IFF	ASCHAN=1 
	IFF	ASCHAN=2 
	IFF	ASCHAN=3 
* 
*   L I N E  1
* 
DWA41	EQU	/30	DEVICE ADDRESS
* 
* 
CWTA41	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS4	WS TABLE ADDRESS 
	INR	A2,0,DWA41	INR 
	OTR	A2,0,DWA41	OTR 
	CIO	A1,1,DWA41	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA41	CIO HALT
	SST	A2,DWA41	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  2
* 
DWA42	EQU	DWA41+1	DEVICE ADDRESS
* 
* 
CWTA42	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS4	WS TABLE ADDRESS 
	INR	A2,0,DWA42	INR 
	OTR	A2,0,DWA42	OTR 
	CIO	A1,1,DWA42	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA42	CIO HALT
	SST	A2,DWA42	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  3
* 
DWA43	EQU	DWA41+2	DEVICE ADDRESS
* 
* 
CWTA43	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS4	WS TABLE ADDRESS 
	INR	A2,0,DWA43	INR 
	OTR	A2,0,DWA43	OTR 
	CIO	A1,1,DWA43	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA43	CIO HALT
	SST	A2,DWA43	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  4
* 
DWA44	EQU	DWA41+3	DEVICE ADDRESS
* 
* 
CWTA44	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS4	WS TABLE ADDRESS 
	INR	A2,0,DWA44	INR 
	OTR	A2,0,DWA44	OTR 
	CIO	A1,1,DWA44	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA44	CIO HALT
	SST	A2,DWA44	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	XIF
	EJECT
* 
****************************************
*   CONTROL WORK TABLES FOR ASCU4Z 5   *
****************************************
* 
	IFF	ASCHAN=1 
	IFF	ASCHAN=2 
	IFF	ASCHAN=3 
	IFF	ASCHAN=4 
* 
*   L I N E  1
* 
DWA51	EQU	/0C	DEVICE ADDRESS	=5 
* 
* 
CWTA51	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS5	WS TABLE ADDRESS 
	INR	A2,0,DWA51	INR 
	OTR	A2,0,DWA51	OTR 
	CIO	A1,1,DWA51	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA51	CIO HALT
	SST	A2,DWA51	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  2
* 
DWA52	EQU	DWA51+1	DEVICE ADDRESS
* 
* 
CWTA52	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS5	WS TABLE ADDRESS 
	INR	A2,0,DWA52	INR 
	OTR	A2,0,DWA52	OTR 
	CIO	A1,1,DWA52	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA52	CIO HALT
	SST	A2,DWA52	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  3
* 
DWA53	EQU	DWA51+2	DEVICE ADDRESS
* 
* 
CWTA53	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS5	WS TABLE ADDRESS 
	INR	A2,0,DWA53	INR 
	OTR	A2,0,DWA53	OTR 
	CIO	A1,1,DWA53	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA53	CIO HALT
	SST	A2,DWA53	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  4
* 
DWA54	EQU	DWA51+3	DEVICE ADDRESS
* 
* 
CWTA54	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS5	WS TABLE ADDRESS 
	INR	A2,0,DWA54	INR 
	OTR	A2,0,DWA54	OTR 
	CIO	A1,1,DWA54	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA54	CIO HALT
	SST	A2,DWA54	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	XIF
	EJECT
* 
****************************************
*   CONTROL WORK TABLES FOR ASCU4Z 6   *
****************************************
* 
	IFF	ASCHAN=1 
	IFF	ASCHAN=2 
	IFF	ASCHAN=3 
	IFF	ASCHAN=4 
	IFF	ASCHAN=5 
* 
*   L I N E  1
* 
DWA61	EQU	/00	DEVICE ADDRESS	=5 
* 
* 
CWTA61	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS6	WS TABLE ADDRESS 
	INR	A2,0,DWA61	INR 
	OTR	A2,0,DWA61	OTR 
	CIO	A1,1,DWA61	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA61	CIO HALT
	SST	A2,DWA61	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  2
* 
DWA62	EQU	DWA61+1	DEVICE ADDRESS
* 
* 
CWTA62	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS6	WS TABLE ADDRESS 
	INR	A2,0,DWA62	INR 
	OTR	A2,0,DWA62	OTR 
	CIO	A1,1,DWA62	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA62	CIO HALT
	SST	A2,DWA62	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  3
* 
DWA63	EQU	DWA61+2	DEVICE ADDRESS
* 
* 
CWTA63	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS6	WS TABLE ADDRESS 
	INR	A2,0,DWA63	INR 
	OTR	A2,0,DWA63	OTR 
	CIO	A1,1,DWA63	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA63	CIO HALT
	SST	A2,DWA63	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	EJECT
* 
* 
*   L I N E  4
* 
DWA64	EQU	DWA61+3	DEVICE ADDRESS
* 
* 
CWTA64	EQU	*	TABLE ENTRY
	DATA	0	LAST OUTPUT DWT 
	DATA	0	LAST OUTPUT CH./ NEXT OUTPUT CH.
	DATA	INTAS6	WS TABLE ADDRESS 
	INR	A2,0,DWA64	INR 
	OTR	A2,0,DWA64	OTR 
	CIO	A1,1,DWA64	CIO START 
	DATA	0	QUEUE 
	CIO	A1,0,DWA64	CIO HALT
	SST	A2,DWA64	SEND STATUS 
	DATA	0	CHANNEL STATUS
* 
* 
	XIF
	EJECT
* 
* 
***************** 
*   C H T A B   * 
***************** 
* 
*   THIS TABLE HOLDS ADDRESSES OF CONTROL WORK
*   TABLES CWT TO CHANNEL UNITS.
* 
* 
CHTAB	EQU	* 
	DATA	CHTABE-*	TABLE LENGTH 
	DATA	CWTA11
	DATA	CWTA12
	DATA	CWTA13
	DATA	CWTA14
	IFF	ASCHAN=1 
	DATA	CWTA21
	DATA	CWTA22
	DATA	CWTA23
	DATA	CWTA24
	XIF
	IFF	ASCHAN=1 
	IFF	ASCHAN=2 
	DATA	CWTA31
	DATA	CWTA32
	DATA	CWTA33
	DATA	CWTA34
	XIF
	IFF	ASCHAN=1 
	IFF	ASCHAN=2 
	IFF	ASCHAN=3 
	DATA	CWTA41
	DATA	CWTA42
	DATA	CWTA43
	DATA	CWTA44
	XIF
	IFF	ASCHAN=1 
	IFF	ASCHAN=2 
	IFF	ASCHAN=3 
	IFF	ASCHAN=4 
	DATA	CWTA51
	DATA	CWTA52
	DATA	CWTA53
	DATA	CWTA54
	XIF
	IFF	ASCHAN=1 
	IFF	ASCHAN=2 
	IFF	ASCHAN=3 
	IFF	ASCHAN=4 
	IFF	ASCHAN=5 
	DATA	CWTA61
	DATA	CWTA62
	DATA	CWTA63
	DATA	CWTA64
	XIF
CHTABE	EQU	*	END OF TABLE 
* 
* 
	EJECT
* 
* 
*   A S C U O N 
* 
*   SUBROUTINE TO RESET CWT AND PERFORM CIO START 
*   OF EVERY ASCU4Z INPUT CHANNEL AT SYSTEM LOAD
* 
* 
ASCUON	EQU	*
	LD	A4,CHTAB	TABLE LENGTH 
	LDK	A3,0 
AON010	SUK	A4,2	ALL TREATED?
	ABL(Z)	RTNA15	YES
AON020	EQU	*
	LD	A5,CHTAB+2,A3	LOAD CWT-ADDRESS
	RB(Z)	AON010 
	LDKL	A1,/8000
	ORS	A1,CWTST,A5	SET INITIATION BIT 
	CMR	A5	RESET LAST OUTPUT	=2
	CM	CWTLON,A5	CLEAR LOC AND NOC	=2
	CM	CWTEQ,A5	RESET OUTPUT QUEUE	=3
	INH
	LDK	A1,/4	EVEN PARITY	=1 
	EX	CWTCIS,A5	CIO START OUTPUT
	LDK	A1,0 
	EX	CWTCIH,A5	CIO STOP OUTPUT 
	ENB
	ADK	A3,2 
	RB	AON010
	EJECT
* 
* 
********************************************
*   INTERRUPT ENTRY FROM ASCU4Z            *
********************************************
* 
* 
*    I A S C U Z
* 
*    INTERRUPT FROM ASCU4Z
* 
IASCUZ	EQU	*
	ST	P,INTSAV	SAVE LAST INTERRUPT
	MSR	8,A15	SAVE A1-A8 ON STACK
	LDK	A7,0	RESET ASCU4Z-COUNTER
	LD	A3,CHTAB
	SUK	A3,2	NUMBER OF LINES 
	RF	IAS007
* 
	EJECT
* 
*   GET CWT-ADDRESS FOR LINE 1. EXECUTE INR.
* 
IAS005	EQU	*
	ADK	A7,8	NEXT ASCU4Z 
IAS007	EQU	*
	CWR	A7,A3
	RF(NL)	EXITL	NOT VALID INTERRUPT 
	LD	A5,CHTAB+2,A7	GET CWT-ADDRESS FOR LINE 1
	EX	CWTINR,A5	INR 
	RF(NA)	IAS080
* 
*   CORRECT CWT-ADDRESS WITH RESPECT TO LINE NUMBER 
* 
IAS010	EQU	*
	LDR	A5,A2	INPUT WORD 
	SRL	A5,7 
	ANK	A5,/6	LINE NUMBER * 2
	LDR	A3,A5
	ADR	A7,A5
	LD	A5,CHTAB+2,A7	CORRECT CWT-ADDRESS 
* 
*   CHECK IF EXPECTED COMMAND IS INPUT
* 
IAS015	EQU	*
	ECR	A1,A2
	ANK	A1,/30 
	SUK	A1,/30	EXPECTED COMMAND
	RF(NZ)	IAS040	NOT INPUT
* 
	EJECT
* 
*   GET DWT-ADDRESS 
* 
IAS020	EQU	*
	LDK	A4,0	DEV NR * 2
	CF	A15,GETADR	GET ADDRESS POINTER AND
*			NUMBER OF DEVICES 
	LDR	A4,A6	DEVICE COUNTER 
	LDR	A8,A8	ADDRESS POINTER
	RF(Z)	IAS032	NOT DEFINED 
IAS025	EQU	*
	LDR*	A6,A8	GET DWT-ADDRESS 
	RF(Z)	IAS030	NOT DEFINED 
	LD	A1,DWTST,A6	DEVICE STATUS 
	ANK	A1,/40	INPUT DEVICE? 
	RF(NZ)	IAS035	YES
IAS030	EQU	*
	ADKL	A8,2	NEXT DWT 
	SUK	A4,2	LAST DWT? 
	RB(P)	IAS025	NO
IAS032	EQU	*
	LDR	A1,A3	LINE NR * 2
	ANK	A1,2	HIGH LINE NR ?
	RF(NZ)	EXITL	YES, SKIP INTERRUPT 
	ADK	A3,2	INCREMENT LINE NR 
	RB	IAS020
* 
EXITL	EQU	* 
	IFT	LOGING=1 
	CF	A15,INFLG1	GET LINE INFORMATION 
	CF	A15,LOGG	**LOGG INPUT** 
	XIF
EXIT	EQU	*
	ABL	TDISP
* 
	EJECT
* 
*   RETURN TO DEVICE DRIVER 
* 
IAS035	EQU	*
	LDK	A1,0	RESET RETURN CODE 
* 
	IFT	LOGING=1 
	CF	A15,INFLG2	GET LINE INFORMATION 
	CF	A15,LOGG	**LOGG INPUT CHARACTER** 
	XIF
* 
IAS038	EQU	*
	ANK	A2,/FF	CLEAN CHARACTER 
	LD	A7,DWTST,A6	DEVICE STATUS 
	ANK	A7,/20	INPUT REQUESTED?
	RF(Z)	IAS039	NO
	LDKL	A7,/FFDF
	ANS	A7,DWTST,A6	RESET FLAG 'INPUT REQUESTED' 
	ABL	NDREP	RETURN TO DEVICE DRIVER
* 
	EJECT
* 
*   GO TO INTERRUPT ROUTINE OF DEVICE DRIVER
* 
IAS039	EQU	*
	LD	A1,DWTADR,A6	ADDRESS BLOCK
	LD	A1,INTADR,A1	INTERRUPT ENTRY DEFINED? 
	RB(Z)	EXIT	NO, SKIP CHARACTER
	LDR	A5,A6	DWT ADDRESS
	ADKL	A5,DWTSB2	STACK BASE
	ABR	A1	DEVICE DRIVER INTERRUPT ENTRY 
* 
	EJECT
* 
*   CHECK IF ANY CHARACTER TO SEND
* 
IAS040	EQU	*
	LDR*	A6,A5	LAST OUTPUT DWT 
	LC	A2,CWTLON+1,A5
	ANK	A2,/FF 
	LD	A7,DWTCP2,A6	CHANNEL PARAMETERS 2 
	ANK	A7,/3F	DEVICE ADDRESS
	SUK	A7,DI	OUTPUT TO KEYBOARD LAMPS ? 
	RF(Z)	IAS050	YES 
* 
			U	=6 
IAS045	EQU	*
	LDR	A2,A2	SAVED CHARACTER
	RF(Z)	IAS060	NO CHARACTER SAVED
* 
	EJECT
* 
*   OUTPUT SAVED CHARACTER AND RETURN TO DEVICE DRIVER
* 
IAS050	EQU	*
	ANK	A2,/7F	CLEAN CHARACTER	=5
	EX	CWTOTR,A5	OTR 
	RB(NA)	EXIT
* 
	IFT	LOGING=1 
	CF	A15,INFLG2	GET LINE INFORMATION 
	CF	A15,LOGG	**LOGG OF OUTPUT CHARACTER** 
	XIF
* 
	LDR	A7,A7	OUTPUT TO KEYBOARD LAMPS?
	RF(Z)	IAS055	YES 
* 
	SC	A2,DWTOCH,A6	STORE OUTPUT CHARACTER IN DWT
	SLL	A2,8 
	ST	A2,CWTLON,A5	UPDATE LOC AND NOC 
IAS052	EQU	*
	ABL	NDREPO	RETURN TO DEV. DRIVER 
*			WITH RET. CODE = OK 
	EJECT
* 
*   OUTPUT TO KEYBOARD LAMPS
* 
IAS055	EQU	*
	LC	A4,CWTLON,A5
	ANK	A4,/FF	LAST OUTPUT CHARACTER = 0?
	RF(NE)	IAS060	NO, CODE /1C SENT
* 
	LC	A4,DWTOCH,A6	DATA TO KEYBOARD 
	SC	A4,CWTLON+1,A5	STORE FOR NEXT OTR 
	SC	A2,CWTLON,A5	STORE CODE /1C IN LOC
	RB	EXIT
* 
*   HALT OUTPUT IF NO CHARACTER TO SEND 
* 
IAS060	EQU	*
	LDK	A1,0 
	EX	CWTCIH,A5	CIO HALT OUTPUT 
				=5
	CM	CWTLON,A5	CLEAR LOC AND NOC 
				=5
	LDR	A7,A7	OUTPUT TO KEYBOARD LAMPS ? 
	RB(Z)	IAS052	YES, RETURN TO DEVICE DRIVER
* 
			U	=6 
	RB	EXIT	GO TO DISPATCHER 
* 
	EJECT
* 
*   CHECK STATUS
* 
IAS080	EQU	*
	EX	CWTSST,A5	SEND STATUS 
	ABL(NA)	IAS005 
* 
*   CORRECT CWT-ADDRESS WITH RESPECT TO LINE NUMBER 
* 
IAS085	EQU	*
	LDR	A5,A2	INPUT WORD 
	SRL	A5,7 
	ANK	A5,/6	LINE NUMBER * 2
	LDR	A3,A5
	ADR	A7,A5
	LD	A5,CHTAB+2,A7	CORRECT CWT-ADDRESS 
* 
	IFT	LOGING=1 
	CF	A15,INFLG1	GET LINE INFORMATION 
	CF	A15,LOGG	**LOGG STATUS**
	XIF
* 
	LD	A1,CWTST,A5	CHANNEL STATUS
	RF(N)	IAS130	INITIATION ON CHANNEL 
* 
	LDR*	A6,A5	LAST OUTPUT DWT 
	RF(NZ)	IAS087	*	=2 
	ANK	A2,2	THROUGPUT ERROR?	=2 
	RB(Z)	EXIT	NO	=2 
	LDK	A1,/5	EVEN PARITY	=2 
	EX	CWTCIS,A5	CIO START INPUT	=2
	RB	EXIT	*	=2 
IAS087	EQU	*	*	=2 
	CMR	A5	SET LINE FREE 
* 
	EJECT
* 
*   CHECK IF CHARACTER SAVED
* 
IAS090	EQU	*
	LC	A2,CWTLON+1,A5
	ANK	A2,/FF	SAVED CHARACTER?
	RF(NZ)	IAS105	YES
* 
*   CHECK IF QUEUE EMPTY
* 
IAS100	EQU	*
	LD	A6,CWTEQ,A5	OUTPUT QUEUE
	RF(Z)	IAS110	QUEUE EMPTY 
	LD	A2,DWTOTQ,A6	GET QUEUE LINK 
	ST	A2,CWTEQ,A5	STORE IT IN CWT 
	LC	A2,DWTOCH,A6	GET CHARACTER
* 
*   SEND CHARACTER AND GO TO DISPATCHER 
* 
IAS105	EQU	*
	CF	A15,OUTASC	SEND CHARACTER 
IAS110	EQU	*
	RB	EXIT	GO TO DISPATCHER 
	EJECT
* 
*   RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE
*    ON ACTUAL LINE EXCEPT THOSE IN ECHO MODE 
* 
* 
IAS130	EQU	*
	LDKL	A1,/3FFF	RESET BIT 'INPUT ON THIS LINE'	=2
	ANS	A1,CWTST,A5	RESET INITIATION BIT 
	LDK	A4,0 
	CF	A15,GETADR
	LDR	A4,A7	CHTAB DISPLACEMENT 
	LDR	A3,A6	DEVICE COUNTER 
	LDR	A7,A8	ADDRESS POINTER
	RB(Z)	IAS100	EXIT IF NOT DEFINED 
IAS140	EQU	*
	LDR*	A6,A7	GET DWT-ADDRESS 
	RF(E)	IAS160	NO DWT
	SRC	A6,1 
	RF(N)	IAS160 
	SLC	A6,1 
	LD	A1,DWTST,A6	DEVICE STATUS 
	ANK	A1,/40	INPUT DEVICE ?
	RF(Z)	IAS148	NO
	EJECT
* 
*   INPUT DEVICE. START INPUT. SET MARKBIT FOR INPUT ON THIS LINE.
* 
IAS143	EQU	*
	LDR	A1,A4	CHTAB DISPLACEMENT 
	ANK	A1,2 
	RF(Z)	IAS145	LOW LINE NUMBER 
	SUK	A4,2	ADJUST TO LOW LINE NUMBER 
IAS145	EQU	*
	LD	A5,CHTAB+2,A4	GET CWT-ADDRESS 
	LD	A1,CWTST,A5	CHANNEL STATUS
	SLL	A1,1 
	RF(N)	IAS150	INPUT ON THIS LINE ALREADY SET
	LDKL	A1,/4000
	ORS	A1,CWTST,A5	SET BIT 'INPUT ON THIS LINE' 
	LDK	A1,/5	EVEN PARITY	=1 
	EX	CWTCIS,A5	CIO START INPUT 
	LD	A1,DWTCP2,A6	CHANNEL PARAMETERS 2 
	ANK	A1,/3F	DEVICE ADDRESS
	SUK	A1,KB	KEYBOARD ? 
	RF(Z)	IAS150	YES 
	EJECT
* 
* 
*   OUTPUT DEVICE. CHECK IF ECHO MODE.
* 
IAS148	EQU	*
				=5
	LC	A1,DWTST,A6 
	ANK	A1,/20	ECHO MODE ? 
	RF(NE)	IAS160	YES
* 
*   GO TO RECOVERY ROUTINE
* 
IAS150	EQU	*
	LDK	A4,1	RECOVERY CAUSE
	CF	A15,NDREDW	CALL RECOVERY ROUTINE
IAS160	EQU	*
	ADK	A7,2 
	SUK	A3,2	ALL DEVICES TREATED?
	RB(NE)	IAS140	NO TAKE NEXT 
	RB	IAS100	CHECK QUEUE AND GO TO DISPATCHER 
	EJECT
* 
*    O U T A S C
* 
*   SUBROUTINE TO SEND A CHARACTER VIA ASCU4Z 
*   ON ENTRY: 
* 
*      A2 = OUTPUT CHARACTER IN RIGHT BYTE
*      A6 = DWT ADDRESS 
* 
OUTASC	EQU	*
	ANK	A2,/FF 
	CF	A15,GETCWT	GET CWT-ADDRESS
* 
*   CHECK IF LINE FREE OR OCCUPIED WITH SAME DEVICE 
* 
OUA010	EQU	*
	INH			=5 
	LD	A1,CWTST,A5	CHANNEL STATUS
	RF(N)	OUA020	INITIATION ON CHANNEL 
* 
	LDR*	A4,A5	LINE FREE?
	RF(Z)	OUA030	YES 
* 
	CWR	A4,A6	SAME DEVICE? 
	RF(E)	OUA045	YES 
* 
OUA020	EQU	*
	CF	A15,QUEUE 
	SC	A2,DWTOCH,A6	STORE OUTPUT CHARACTER IN DWT
	RF	OUA050
* 
	EJECT
* 
*   START OUTPUT ON LINE
* 
OUA030	EQU	*
	LD	A1,PFPOST	PWF POST PROCESSING FLAG	=3 
	RF(NZ)	OUA035	PFINIT PENDING	=3
				=5
	LDK	A1,/4	EVEN PARITY	=1 
	EX	CWTCIS,A5	CIO START OUTPUT
OUA035	EQU	*
	STR	A6,A5	STORE LAST DWT IN CWT
* 
*   SAVE CHARACTER FOR OUTPUT 
* 
OUA040	EQU	*
	LD	A1,DWTCP2,A6	CHANNEL PARAMETERS 2 
	ANK	A1,/3F	DEVICE ADDRESS
	SUK	A1,DI	OUTPUT TO KEYBOARD LAMPS ? 
	RF(NZ)	OUA045	NO 
* 
	SC	A2,DWTOCH,A6	STORE DATA FOR KEYBOARD IN DWT 
	LDK	A2,/1C	CODE FOR DATA TO KEYBOARD 
* 
OUA045	EQU	*
	ORK	A2,/80	INDICATE SOMETHING FOR OUTPUT	=5
	SC	A2,CWTLON+1,A5
OUA050	EQU	*
			*	=4 
	INH		*	=4
	ADKL	A15,2	ADJUST STACK POINTER	=4 
	LDR*	P,A15	RETURN	=4 
	EJECT
* 
*   G E T C W T 
* 
*   SUBROUTINE TO GET CWT-ADDRESS TO CURRENT OUTPUT LINE
* 
*   ON ENTRY: 
* 
*      A6 = DWT-ADDRESS 
* 
*   ON EXIT:
* 
*      A5 = CWT-ADDRESS 
*      A1,A4 ARE DESTROYED
* 
GETCWT	EQU	*
	LDR*	A1,A6	CHANNEL PARAMETERS 1
	ANK	A1,/7	CHANNEL UNIT INDEX 
	SLL	A1,2 
	LC	A5,DWTCP2,A6	LEFT BYTE OF CH. PAR. 2
	ANK	A5,/3	WS-ADDRESS 
	ORR	A1,A5	COMBINE CH.UN. INDEX AND WS-ADDR 
	SLL	A1,1	MAKE INDEX FOR CHTAB
	LD	A5,CHTAB+2,A1	GET CWT-ADDRESS 
	LDR	A4,A1	LINE NUMBER * 2
	ANK	A4,2 
	RF(NZ)	GTC010	HIGH LINE NUMBER 
	LD	A4,CWTST,A5	CHANNEL STATUS
	SLL	A4,1 
	RF(NN)	GTC010	NO INPUT ON THIS LINE
	LD	A5,CHTAB+4,A1	GET CWT-ADDRESS ON HIGH LINE
GTC010	EQU	*
	RTN	A15
* 
	EJECT
* 
* 
*   Q U E U E 
* 
*   SUBROUTINE TO QUEUE AN OUTPUT DWT 
* 
*   ON ENTRY: 
*      A5 = CWT ADDRESS 
*      A6 = DWT ADDRESS 
* 
* 
QUEUE	EQU	* 
	LD	A4,CWTEQ,A5	OUTPUT QUEUE
	RF(E)	QUE020 
QUE010	EQU	*
	CWR	A6,A4
	RF(E)	QUE050	THIS DWT IS ALREADY IN QUEUE
	LD	A3,DWTOTQ,A4
	RF(E)	QUE030	END OF THREAD FOUND 
	LDR	A4,A3	FOLLOW THE THREAD
	RB	QUE010
QUE020	EQU	*
	ST	A6,CWTEQ,A5	QUEUE DWT 
	RF	QUE040
QUE030	EQU	*
	ST	A6,DWTOTQ,A4	QUEUE DWT
QUE040	CM	DWTOTQ,A6	SET END OF THREAD 
QUE050	EQU	*
	ADKL	A15,2 
	LDR*	P,A15	RETURN
	EJECT
* 
* 
*   L O G G 
* 
*   IF CONDITIONALY ASSEMBLY IS SET EVERY INPUT AND 
*   OUTPUT CHARACTER ARE LOGGED 
* 
* 
* 
	IFT	LOGING=1 
* 
LOGG	STR	A1,A15 
	LD	A1,POINT
	ADK	A1,2 
	CWK	A1,BUFE	BUFE IS MAX LOGG AREA
	RF(NE)	L1
	LDKL	A1,BUF	SET FIRST LOGG ADDRESS 
L1	ST	A1,POINT
	STR	A2,A1	LOGG OF INR OR OTR INSTRUCTION 
	LDR*	A1,A15
	ADKL	A15,2 
	LDR*	P,A15	RETURN
* 
* 
POINT	DATA	BUF	LOGG POINTER 
* 
BUF	RES	250	LOGG AREA 
BUFE	EQU	*
* 
	XIF
	EJECT
* 
*   I N F L G 1 
* 
*   SUBROUTINE TO GET INFORMATION ABOUT CHANNEL UNIT INDEX AND
*   WORK STATION ADDRESS FOR USE IN LOGG. 
*   THE INFORMATION IS ADDED TO REGISTER A2 
* 
*   CH. UNIT INDEX IS STORED IN BITS 3-5
*   WORK ST. ADDR. IS STORED IN BITS 6-7
*   BITS 0-2 ARE SET TO ZERO
* 
*   ON ENTRY: 
* 
*      A2 = INPUT CHARACTER 
*      A7 = LINE NR * 2 
* 
*   ON EXIT:
* 
*      A2 = INPUT WORD WITH ADDED INFORMATION 
* 
	IFT	LOGING=1 
* 
INFLG1	EQU	*
	ANK	A2,/FF 
	SLL	A7,7 
	ORR	A2,A7	COMBINE WITH CHARACTER 
	SRL	A7,7 
	RTN	A15
* 
	XIF
	EJECT
* 
*   I N F L G 2 
* 
*   SUBROUTINE TO GET INFORMATION ABOUT CHANNEL UNIT INDEX, 
*   WORK STATION ADDRESS AND DEVICE ADDRESS FOR USE IN LOGG.
*   THE INFORMATION IS TAKEN FROM CHANNEL PARAMETERS AND ADDED
*   TO REGISTER A2. 
*   DEVICE ADDRESS IS STORED IN BITS 0-2
*   CH. UNIT INDEX IS STORED IN BITS 3-5
*   WORK ST. ADDR. IS STORED IN BITS 6-7
* 
*   ON ENTRY: 
* 
*      A2 = INPUT CHARACTER 
*      A6 =DWT ADDRESS
* 
*   ON EXIT:
* 
*      A2 = INPUT WORD WITH ADDED INFORMATION 
*      A4 IS DESTROYED
* 
	IFT	LOGING=1 
INFLG2	EQU	*
	ANK	A2,/FF	CLEAN 
	LDR*	A4,A6	GET CHANNEL PARAMETERS 1
	ANK	A4,/7	CHANNEL UNIT INDEX 
	SRC	A4,3 
	LC	A4,DWTCP2+1,A6	RIGHT BYTE OF CH. PAR. 2 
	SRC	A4,3 
	ANKL	A4,/FC00	DEV.ADDR AND CH. UNIT INDEX
	ORR	A2,A4	COMBINE WITH CHARACTER 
	LD	A4,DWTCP2,A6	CHANNEL PARAMETERS 2 
	ANKL	A4,/300	WORK STATION ADDRESS
	ORR	A2,A4	COMBINE WITH CHARACTER 
	RTN	A15
	XIF
	EJECT
* 
*   G E T A D R 
* 
*   SUBROUTINE TO GET ADDRESS IN INTERRUPT TABLE
*   FOR A GIVEN LINE- AND DEVICE NUMBER 
* 
*   ON ENTRY: 
* 
*      A3 = LINE NUMBER *  2
*      A4 = DEVICE NUMBER * 2 
*      A5 = CWT-ADDRESS 
* 
*   ON EXIT:
* 
*      A6 = TOTAL NUMBER OF DEVICES * 2 ON ACTUAL LINE
*      A8 = ADDRESS WHERE DWT-ADDRESS IS FOUND
* 
GETADR	EQU	*
	LD*	A8,CWTITA,A5	ADDRESS OF WORK STATION TABLE 
	RF(Z)	GET010	NOT DEFINED 
	CW	A3,-2,A8	WITHIN TABLE ? 
	RF(L)	GET005	YES 
	LDKL	A8,0	INDICATE NOT DEFINED 
	RF	GET010
GET005	EQU	*
	ADR	A8,A3	POSITION IN TABLE
	LDR*	A8,A8	POINTER TO DEVICE TABLE 
	RF(Z)	GET010	NOT DEFINED 
	LD	A6,-2,A8	GET TABLE LENGTH 
	ADR	A8,A4	ADDRESS TO DWT-ADDRESS 
GET010	EQU	*
* 
* 
*   RETURN AND ENABLE 
* 
RTNA15	EQU	*
	ADKL	A15,2 
	ENB
	LDR*	P,A15 
* 
	EJECT
* 
*   CHARACTER INPUT 
* 
ASCHRI	EQU	*
	LDK	A2,/20 
	ORS	A2,DWTST,A6	SET INPUT REQUESTED IN DWT 
	CF	A15,NDSAV8	SAVE A3-A5, A7-A8 IN DWT 
	RF	ASDISP	LOCAL DISPATCHER 
* 
*   START OF A BLOCK
* 
ASSTBL	EQU	*
* 
*   END OF A BLOCK
* 
ASENBL	EQU	*
	ABL	NDRETO	RETURN TO DEVICE DRIVER 
* 
*   CHARACTER OUTPUT
* 
ASCHRO	EQU	*
	CF	A15,NDSAV8	SAVE A3-A5, A7-A8 IN DWT 
	CF	A15,OUTASC	SEND CHARACTER 
* 
*   LOCAL DISPATCHER
* 
ASDISP	EQU	*
	ABL	TDISP	GO TO DISPATCHER 
	END

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT DRAS01  REL 11.0 81-01-26 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…005e              Head {h00=0x001c, h01=0x0050, text=»   =6, ETX-CHECK REMOVED«, t00=0x0000, t01=0x0042}
0x005e…007a              Head {h00=0x0018, h01=0x0050, text=»   PRR 11.0 80-03-06«, t00=0x0000, t01=0x0062}
0x007a…00aa              Head {h00=0x002c, h01=0x0050, text=»   =5, CORR. OF FLASHING LIGHTS PROBLEM «, t00=0x0000, t01=0x007e}
0x00aa…00d2              Head {h00=0x0024, h01=0x0050, text=»   DEV ADDR. CHAN. UNIT 5 AND 6 «, t00=0x0000, t01=0x00ae}
0x00d2…00ee              Head {h00=0x0018, h01=0x0050, text=»   PRR 11.0 80-02-05«, t00=0x0000, t01=0x00d6}
0x00ee…0114              Head {h00=0x0022, h01=0x0050, text=»   NEW DEVICE DRIVER INTERFACE«, t00=0x0000, t01=0x00f2}
0x0114…0130              Head {h00=0x0018, h01=0x0050, text=»   PRR 10.0 79-12-07«, t00=0x0000, t01=0x0118}
0x0130…015a              Head {h00=0x0026, h01=0x0050, text=»   =4, RTN FROM OUTASC IN INH MODE«, t00=0x0000, t01=0x0134}
0x015a…0176              Head {h00=0x0018, h01=0x0050, text=»   PRR 10.1 79-11-20«, t00=0x0000, t01=0x015e}
0x0176…019c              Head {h00=0x0022, h01=0x0050, text=»   =3, CHECK IF PFINIT PENDING«, t00=0x0000, t01=0x017a}
0x019c…01b8              Head {h00=0x0018, h01=0x0050, text=»   PRR 10.1 79-10-04«, t00=0x0001, t01=0x0010}
0x01b8…01ee              Head {h00=0x0032, h01=0x0050, text=»   =2, CORR. OF RECOV.;ST. INP. IF THRP. ERR. «, t00=0x0001, t01=0x002c}
0x01ee…020a              Head {h00=0x0018, h01=0x0050, text=»   PRR 10.1 79-10-03«, t00=0x0001, t01=0x0062}
0x020a…022e              Head {h00=0x0020, h01=0x0050, text=»   =1, CHANGE TO EVEN PARITY«, t00=0x0001, t01=0x007e}
0x022e…024a              Head {h00=0x0018, h01=0x0050, text=»   PRR 10.1 79-09-18«, t00=0x0001, t01=0x00a2}
0x024a…0252              Head {h00=0x0004, h01=0x0002, t00=0x0001, t01=0x00be}
0x0252…025a              Head {h00=0x0004, h01=0x0002, t00=0x0001, t01=0x00c6}
0x025a…0262              Head {h00=0x0004, h01=0x0002, t00=0x0001, t01=0x00ce}
0x0262…026a              Head {h00=0x0004, h01=0x0002, t00=0x0001, t01=0x00d6}
0x026a…0274              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x00de}
0x0274…027e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x00e8}
0x027e…02cc              Head {h00=0x004a, h01=0x0045, text=»********************************************************************* «, t00=0x0001, t01=0x00f2}
0x02cc…02d6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x0140}
0x02d6…02fe              Head {h00=0x0024, h01=0x001f, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0001, t01=0x014a}
0x02fe…0308              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x0172}
0x0308…0330              Head {h00=0x0024, h01=0x0050, text=»*   DRAS01 = DRIVER CHANNEL UNIT«, t00=0x0001, t01=0x017c}
0x0330…033a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0014}
0x033a…0356              Head {h00=0x0018, h01=0x0050, text=»*            ASCU4Z «, t00=0x0002, t01=0x001e}
0x0356…0360              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x003a}
0x0360…036a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0044}
0x036a…0374              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x004e}
0x0374…037e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0058}
0x037e…0388              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0062}
0x0388…03d6              Head {h00=0x004a, h01=0x0046, text=»**********************************************************************«, t00=0x0002, t01=0x006c}
0x03d6…03e0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x00ba}
0x03e0…0418              Head {h00=0x0034, h01=0x002f, text=»*   THIS IS A CHANNEL UNIT DRIVER FOR TERMINALS «, t00=0x0002, t01=0x00c4}
0x0418…0440              Head {h00=0x0024, h01=0x0050, text=»*   CONNECTED TO CPU VIA ASCU4Z.«, t00=0x0002, t01=0x00fc}
0x0440…044a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0124}
0x044a…048c              Head {h00=0x003e, h01=0x0050, text=»*   AT INPUT INTERRUPT A CHARACTER IS READ TO REGISTER A2 «, t00=0x0002, t01=0x012e}
0x048c…04cc              Head {h00=0x003c, h01=0x0038, text=»*   AND A BRANCH IS MADE TO INTERRUPT HANDLER FOR ACTUAL«, t00=0x0002, t01=0x0170}
0x04cc…04e0              Head {h00=0x0010, h01=0x000b, text=»*   DEVICE. «, t00=0x0003, t01=0x0020}
0x04e0…04ea              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0003, t01=0x0034}
0x04ea…051e              Head {h00=0x0030, h01=0x0050, text=»*   AFTER AN OUTPUT IS ENDED AN INTERRUPT IS«, t00=0x0003, t01=0x003e}
0x051e…0560              Head {h00=0x003e, h01=0x0050, text=»*   GENERATED FROM ASCU4Z. THE DRIVER CHECKS THE INTERRUPT«, t00=0x0003, t01=0x0072}
0x0560…0596              Head {h00=0x0032, h01=0x002e, text=»*   AND A BRANCH IS MADE TO INTERRUPT HANDLER.«, t00=0x0003, t01=0x00b4}
0x0596…05a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ea}
0x05a0…05aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f4}
0x05aa…05b8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x00fe}
0x05b8…05c2              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0003, t01=0x010c}
0x05c2…0602              Head {h00=0x003c, h01=0x0037, text=»*   THE DRIVER ALSO INCLUDES THE FOLLOWING SUBROUTINES: «, t00=0x0003, t01=0x0116}
0x0602…060c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0003, t01=0x0156}
0x060c…0654              Head {h00=0x0044, h01=0x0050, text=»*   -ASCUON   EXECUTE CIO START ON EVERY ASCU4Z LINE AT POWER ON«, t00=0x0003, t01=0x0160}
0x0654…065e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x0018}
0x065e…0686              Head {h00=0x0024, h01=0x0050, text=»*   -OUTASC   SEND ONE CHARACTER«, t00=0x0004, t01=0x0022}
0x0686…0690              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x004a}
0x0690…06ca              Head {h00=0x0036, h01=0x0032, text=»*   CONTROL WORK TABLES ARE INCLUDED IN THE DRIVER«, t00=0x0004, t01=0x0054}
0x06ca…06d4              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x008e}
0x06d4…0704              Head {h00=0x002c, h01=0x0028, text=»*   NORMAL REGISTER USAGE IN THE DRIVER:«, t00=0x0004, t01=0x0098}
0x0704…070e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x00c8}
0x070e…072a              Head {h00=0x0018, h01=0x0014, text=»*   A1 = RETURN CODE«, t00=0x0004, t01=0x00d2}
0x072a…074a              Head {h00=0x001c, h01=0x0018, text=»*   A2 = INPUT CHARACTER«, t00=0x0004, t01=0x00ee}
0x074a…0768              Head {h00=0x001a, h01=0x0016, text=»*   A3 = WORK REGISTER«, t00=0x0004, t01=0x010e}
0x0768…078a              Head {h00=0x001e, h01=0x001a, text=»*   A4 = DEVICE NUMBER * 2«, t00=0x0004, t01=0x012c}
0x078a…07a6              Head {h00=0x0018, h01=0x0014, text=»*   A5 = CWT-ADDRESS«, t00=0x0004, t01=0x014e}
0x07a6…07c2              Head {h00=0x0018, h01=0x0014, text=»*   A6 = DWT-ADDRESS«, t00=0x0004, t01=0x016a}
0x07c2…07d8              Head {h00=0x0012, h01=0x000e, text=»*   A7 = ORDER«, t00=0x0004, t01=0x0186}
0x07d8…07f4              Head {h00=0x0018, h01=0x0014, text=»*   A8 = ECB ADDRESS«, t00=0x0005, t01=0x000c}
0x07f4…07fe              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0005, t01=0x0028}
0x07fe…0808              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0005, t01=0x0032}
0x0808…0812              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0005, t01=0x003c}
0x0812…0820              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0005, t01=0x0046}
0x0820…082a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0005, t01=0x0054}
0x082a…083e              Head {h00=0x0010, h01=0x000b, text=»*********** «, t00=0x0005, t01=0x005e}
0x083e…0852              Head {h00=0x0010, h01=0x000b, text=»* ENTRIES * «, t00=0x0005, t01=0x0072}
0x0852…0866              Head {h00=0x0010, h01=0x000b, text=»*********** «, t00=0x0005, t01=0x0086}
0x0866…0870              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0005, t01=0x009a}
0x0870…087a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0005, t01=0x00a4}
0x087a…08a6              Head {h00=0x0028, h01=0x0050, text=» ENTRY IASCUZ INTERRUPT FROM ASCU4Z «, t00=0x0005, t01=0x00ae}
0x08a6…08ce              Head {h00=0x0024, h01=0x0050, text=» ENTRY ASCUON START AT POWER ON «, t00=0x0005, t01=0x00da}
0x08ce…08fc              Head {h00=0x002a, h01=0x0050, text=» ENTRY ASCHAN NUMBER OF CHANNEL UNITS «, t00=0x0005, t01=0x0102}
0x08fc…0906              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0130}
0x0906…092c              Head {h00=0x0022, h01=0x0050, text=» ENTRY ASCHRI CHARACTER INPUT «, t00=0x0005, t01=0x013a}
0x092c…095e              Head {h00=0x002e, h01=0x0050, text=» ENTRY ASSTBL DEFINE START OF OUTPUT BLOCK«, t00=0x0005, t01=0x0160}
0x095e…0984 (6, 0, 400)  Head {h00=0x0022, h01=0x0050, text=» ENTRY ASCHRO CHARACTER OUTPUT«, t00=0x0006, t01=0x0004}
0x0984…09b4              Head {h00=0x002c, h01=0x0050, text=» ENTRY ASENBL DEFINE END OF OUTPUT BLOCK«, t00=0x0006, t01=0x002a}
0x09b4…09da              Head {h00=0x0022, h01=0x0050, text=» ENTRY ASDISP LOCAL DISPATCHER«, t00=0x0006, t01=0x005a}
0x09da…09e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0080}
0x09e4…09f2              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0006, t01=0x008a}
0x09f2…09fc              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x0098}
0x09fc…0a06              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x00a2}
0x0a06…0a2e              Head {h00=0x0024, h01=0x0020, text=»********************************«, t00=0x0006, t01=0x00ac}
0x0a2e…0a56              Head {h00=0x0024, h01=0x0020, text=»* EXTERNAL TOSS MODULE ENTRIES *«, t00=0x0006, t01=0x00d4}
0x0a56…0a7e              Head {h00=0x0024, h01=0x0020, text=»********************************«, t00=0x0006, t01=0x00fc}
0x0a7e…0a88              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x0124}
0x0a88…0aa8              Head {h00=0x001c, h01=0x0017, text=» EXTRN TDISP DISPATCHER «, t00=0x0006, t01=0x012e}
0x0aa8…0ad6              Head {h00=0x002a, h01=0x0026, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0006, t01=0x014e}
0x0ad6…0b08              Head {h00=0x002e, h01=0x0050, text=» EXTRN PFPOST PWF POST PROCESSING FLAG =3 «, t00=0x0006, t01=0x017c}
0x0b08…0b12              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x001e}
0x0b12…0b42              Head {h00=0x002c, h01=0x0050, text=» EXTRN INTAS1 WS TABLE ADDRESS ASCU4Z 1 «, t00=0x0007, t01=0x0028}
0x0b42…0b72              Head {h00=0x002c, h01=0x0050, text=» EXTRN INTAS2 WS TABLE ADDRESS ASCU4Z 2 «, t00=0x0007, t01=0x0058}
0x0b72…0ba2              Head {h00=0x002c, h01=0x0050, text=» EXTRN INTAS3 WS TABLE ADDRESS ASCU4Z 3 «, t00=0x0007, t01=0x0088}
0x0ba2…0bd2              Head {h00=0x002c, h01=0x0050, text=» EXTRN INTAS4 WS TABLE ADDRESS ASCU4Z 4 «, t00=0x0007, t01=0x00b8}
0x0bd2…0c02              Head {h00=0x002c, h01=0x0050, text=» EXTRN INTAS5 WS TABLE ADDRESS ASCU4Z 5 «, t00=0x0007, t01=0x00e8}
0x0c02…0c32              Head {h00=0x002c, h01=0x0050, text=» EXTRN INTAS6 WS TABLE ADDRESS ASCU4Z 6 «, t00=0x0007, t01=0x0118}
0x0c32…0c62              Head {h00=0x002c, h01=0x0050, text=» EXTRN INTAS7 WS TABLE ADDRESS ASCU4Z 7 «, t00=0x0007, t01=0x0148}
0x0c62…0c92              Head {h00=0x002c, h01=0x0050, text=» EXTRN INTAS8 WS TABLE ADDRESS ASCU4Z 8 «, t00=0x0007, t01=0x0178}
0x0c92…0c9c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0018}
0x0c9c…0cca              Head {h00=0x002a, h01=0x0050, text=» EXTRN NDSAV8 SAVE A3-A5, A7-A8 IN DWT«, t00=0x0008, t01=0x0022}
0x0cca…0cfa              Head {h00=0x002c, h01=0x0050, text=» EXTRN NDGET8 GET A3-A5, A7-A8 FROM DWT «, t00=0x0008, t01=0x0050}
0x0cfa…0d28              Head {h00=0x002a, h01=0x0050, text=» EXTRN NDREDW CALL RECOVERY FOR DEVICE«, t00=0x0008, t01=0x0080}
0x0d28…0d58              Head {h00=0x002c, h01=0x0050, text=» EXTRN NDRETO OK & RETURN TO DEV. DRIVER«, t00=0x0008, t01=0x00ae}
0x0d58…0d88              Head {h00=0x002c, h01=0x0050, text=» EXTRN NDREP POP & RETURN TO DEV. DRIVER«, t00=0x0008, t01=0x00de}
0x0d88…0dbe              Head {h00=0x0032, h01=0x0050, text=» EXTRN NDREPO POP, OK & RETURN TO DEV. DRIVER «, t00=0x0008, t01=0x010e}
0x0dbe…0dc8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0144}
0x0dc8…0dd6              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0008, t01=0x014e}
0x0dd6…0de0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0008, t01=0x015c}
0x0de0…0dfa              Head {h00=0x0016, h01=0x0012, text=»******************«, t00=0x0008, t01=0x0166}
0x0dfa…0e14              Head {h00=0x0016, h01=0x0012, text=»* DWT PARAMETERS *«, t00=0x0008, t01=0x0180}
0x0e14…0e2e              Head {h00=0x0016, h01=0x0012, text=»******************«, t00=0x0009, t01=0x000a}
0x0e2e…0e38              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0009, t01=0x0024}
0x0e38…0e42              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0009, t01=0x002e}
0x0e42…0e5e              Head {h00=0x0018, h01=0x0013, text=» EXTRN DWTST STATUS «, t00=0x0009, t01=0x0038}
0x0e5e…0e78              Head {h00=0x0016, h01=0x0012, text=» EXTRN DWTOR ORDER«, t00=0x0009, t01=0x0054}
0x0e78…0ea4              Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTOCH LAST OUTPUT CHARACTER «, t00=0x0009, t01=0x006e}
0x0ea4…0ec6              Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTECB ECB-ADDRESS «, t00=0x0009, t01=0x009a}
0x0ec6…0ef4              Head {h00=0x002a, h01=0x0025, text=» EXTRN DWTADR ADDRESS TO ADDRESSBLOCK «, t00=0x0009, t01=0x00bc}
0x0ef4…0f1c              Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTOTQ OUTPUT QUEUE LINK «, t00=0x0009, t01=0x00ea}
0x0f1c…0f3e              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTSB2 STACK BASE 2«, t00=0x0009, t01=0x0112}
0x0f3e…0f68              Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTCP2 CHANNEL PARAMETERS 2«, t00=0x0009, t01=0x0134}
0x0f68…0f72              Head {h00=0x0006, h01=0x0004, text=»* «, t00=0x0009, t01=0x015e}
0x0f72…0fa6              Head {h00=0x0030, h01=0x0050, text=» EXTRN INTADR INTERRUPT ADDRESS DISPLACEMENT«, t00=0x0009, t01=0x0168}
0x0fa6…0fda              Head {h00=0x0030, h01=0x0050, text=» EXTRN RECADR RECOVERY ADDRESS DISPLACEMENT «, t00=0x000a, t01=0x000c}
0x0fda…0fe4              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x0040}
0x0fe4…0ff2              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x000a, t01=0x004a}
0x0ff2…0ffc              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x0058}
0x0ffc…1006              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x0062}
0x1006…101c              Head {h00=0x0012, h01=0x000d, text=»************* «, t00=0x000a, t01=0x006c}
0x101c…1032              Head {h00=0x0012, h01=0x000d, text=»* CONSTANTS * «, t00=0x000a, t01=0x0082}
0x1032…1048              Head {h00=0x0012, h01=0x000d, text=»************* «, t00=0x000a, t01=0x0098}
0x1048…1052              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x00ae}
0x1052…105c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x00b8}
0x105c…1088              Head {h00=0x0028, h01=0x0050, text=»KB EQU 1 DEVICE ADDRESS FOR KEYBOARD«, t00=0x000a, t01=0x00c2}
0x1088…10ba              Head {h00=0x002e, h01=0x0050, text=»DI EQU 2 DEVICE ADDRESS FOR KEYBOARD LAMPS«, t00=0x000a, t01=0x00ee}
0x10ba…10c4              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x0120}
0x10c4…10d2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x012a}
0x10d2…10dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0138}
0x10dc…10fc              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000a, t01=0x0142}
0x10fc…111c              Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000a, t01=0x0162}
0x111c…113c              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000a, t01=0x0182}
0x113c…1146              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0012}
0x1146…1186              Head {h00=0x003c, h01=0x0050, text=»*   A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHARACTER «, t00=0x000b, t01=0x001c}
0x1186…11cc              Head {h00=0x0042, h01=0x0050, text=»*   AND STATUS MAY BE INCLUDED TO THE DRIVER BY SETTING X:A=1 «, t00=0x000b, t01=0x005c}
0x11cc…11d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00a2}
0x11d6…11e8              Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x000b, t01=0x00ac}
0x11e8…11fe              Head {h00=0x0012, h01=0x0050, text=»LOGING EQU X:A«, t00=0x000b, t01=0x00be}
0x11fe…1208              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00d4}
0x1208…1238              Head {h00=0x002c, h01=0x0050, text=»*   THIS DRIVER HANDLES ONE OR UP TO SIX«, t00=0x000b, t01=0x00de}
0x1238…126c              Head {h00=0x0030, h01=0x0050, text=»*   CHANNELS BY SETTING X:B TO 1, 2, 3,...,6«, t00=0x000b, t01=0x010e}
0x126c…1276              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0142}
0x1276…1288              Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x000b, t01=0x014c}
0x1288…129e              Head {h00=0x0012, h01=0x0050, text=»ASCHAN EQU X:B«, t00=0x000b, t01=0x015e}
0x129e…12a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0174}
0x12a8…12b6              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x000b, t01=0x017e}
0x12b6…12c0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000b, t01=0x018c}
0x12c0…12f0              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x000c, t01=0x0008}
0x12f0…1320              Head {h00=0x002c, h01=0x0028, text=»*   CONTROL WORK TABLES FOR ASCU4Z 1   *«, t00=0x000c, t01=0x0038}
0x1320…1350              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x000c, t01=0x0068}
0x1350…135a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000c, t01=0x0098}
0x135a…1364              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000c, t01=0x00a2}
0x1364…137a              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  1«, t00=0x000c, t01=0x00ac}
0x137a…1384              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000c, t01=0x00c2}
0x1384…13a8              Head {h00=0x0020, h01=0x0050, text=»DWA11 EQU /1C DEVICE ADDRESS«, t00=0x000c, t01=0x00cc}
0x13a8…13b2              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000c, t01=0x00f0}
0x13b2…13bc              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000c, t01=0x00fa}
0x13bc…13dc              Head {h00=0x001c, h01=0x0018, text=»CWTA11 EQU * TABLE ENTRY«, t00=0x000c, t01=0x0104}
0x13dc…13f8              Head {h00=0x0018, h01=0x0013, text=»CWTLDW EQU *-CWTA11 «, t00=0x000c, t01=0x0124}
0x13f8…1418              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x000c, t01=0x0140}
0x1418…1434              Head {h00=0x0018, h01=0x0050, text=»CWTLON EQU *-CWTA11 «, t00=0x000c, t01=0x0160}
0x1434…1464              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x000c, t01=0x017c}
0x1464…1480              Head {h00=0x0018, h01=0x0050, text=»CWTITA EQU *-CWTA11 «, t00=0x000d, t01=0x001c}
0x1480…14a6              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS1 WS TABLE ADDRESS «, t00=0x000d, t01=0x0038}
0x14a6…14c2              Head {h00=0x0018, h01=0x0013, text=»CWTINR EQU *-CWTA11 «, t00=0x000d, t01=0x005e}
0x14c2…14de              Head {h00=0x0018, h01=0x0013, text=» INR A2,0,DWA11 INR «, t00=0x000d, t01=0x007a}
0x14de…14fa              Head {h00=0x0018, h01=0x0013, text=»CWTOTR EQU *-CWTA11 «, t00=0x000d, t01=0x0096}
0x14fa…1516              Head {h00=0x0018, h01=0x0013, text=» OTR A2,0,DWA11 OTR «, t00=0x000d, t01=0x00b2}
0x1516…1532              Head {h00=0x0018, h01=0x0013, text=»CWTCIS EQU *-CWTA11 «, t00=0x000d, t01=0x00ce}
0x1532…1554              Head {h00=0x001e, h01=0x0019, text=» CIO A1,1,DWA11 CIO START «, t00=0x000d, t01=0x00ea}
0x1554…156e              Head {h00=0x0016, h01=0x0012, text=»CWTEQ EQU *-CWTA11«, t00=0x000d, t01=0x010c}
0x156e…1584              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x000d, t01=0x0126}
0x1584…15a0              Head {h00=0x0018, h01=0x0013, text=»CWTCIH EQU *-CWTA11 «, t00=0x000d, t01=0x013c}
0x15a0…15c0              Head {h00=0x001c, h01=0x0018, text=» CIO A1,0,DWA11 CIO HALT«, t00=0x000d, t01=0x0158}
0x15c0…15dc              Head {h00=0x0018, h01=0x0013, text=»CWTSST EQU *-CWTA11 «, t00=0x000d, t01=0x0178}
0x15dc…15fe (14, 0, 400) Head {h00=0x001e, h01=0x0019, text=» SST A2,DWA11 SEND STATUS «, t00=0x000e, t01=0x0004}
0x15fe…1618              Head {h00=0x0016, h01=0x0012, text=»CWTST EQU *-CWTA11«, t00=0x000e, t01=0x0026}
0x1618…1636              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x000e, t01=0x0040}
0x1636…1640              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000e, t01=0x005e}
0x1640…164a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000e, t01=0x0068}
0x164a…1658              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x000e, t01=0x0072}
0x1658…1662              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000e, t01=0x0080}
0x1662…166c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000e, t01=0x008a}
0x166c…1682              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  2«, t00=0x000e, t01=0x0094}
0x1682…168c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000e, t01=0x00aa}
0x168c…16b4              Head {h00=0x0024, h01=0x0020, text=»DWA12 EQU DWA11+1 DEVICE ADDRESS«, t00=0x000e, t01=0x00b4}
0x16b4…16be              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000e, t01=0x00dc}
0x16be…16c8              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000e, t01=0x00e6}
0x16c8…16e8              Head {h00=0x001c, h01=0x0018, text=»CWTA12 EQU * TABLE ENTRY«, t00=0x000e, t01=0x00f0}
0x16e8…1708              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x000e, t01=0x0110}
0x1708…1738              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x000e, t01=0x0130}
0x1738…175e              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS1 WS TABLE ADDRESS «, t00=0x000e, t01=0x0160}
0x175e…177a              Head {h00=0x0018, h01=0x0013, text=» INR A2,0,DWA12 INR «, t00=0x000e, t01=0x0186}
0x177a…1796              Head {h00=0x0018, h01=0x0013, text=» OTR A2,0,DWA12 OTR «, t00=0x000f, t01=0x0012}
0x1796…17b8              Head {h00=0x001e, h01=0x0019, text=» CIO A1,1,DWA12 CIO START «, t00=0x000f, t01=0x002e}
0x17b8…17ce              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x000f, t01=0x0050}
0x17ce…17ee              Head {h00=0x001c, h01=0x0018, text=» CIO A1,0,DWA12 CIO HALT«, t00=0x000f, t01=0x0066}
0x17ee…1810              Head {h00=0x001e, h01=0x0019, text=» SST A2,DWA12 SEND STATUS «, t00=0x000f, t01=0x0086}
0x1810…182e              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x000f, t01=0x00a8}
0x182e…1838              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000f, t01=0x00c6}
0x1838…1842              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000f, t01=0x00d0}
0x1842…1850              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x000f, t01=0x00da}
0x1850…185a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000f, t01=0x00e8}
0x185a…1864              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000f, t01=0x00f2}
0x1864…187a              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  3«, t00=0x000f, t01=0x00fc}
0x187a…1884              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000f, t01=0x0112}
0x1884…18ac              Head {h00=0x0024, h01=0x0020, text=»DWA13 EQU DWA11+2 DEVICE ADDRESS«, t00=0x000f, t01=0x011c}
0x18ac…18b6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000f, t01=0x0144}
0x18b6…18c0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000f, t01=0x014e}
0x18c0…18e0              Head {h00=0x001c, h01=0x0018, text=»CWTA13 EQU * TABLE ENTRY«, t00=0x000f, t01=0x0158}
0x18e0…1900              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x000f, t01=0x0178}
0x1900…1930              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0010, t01=0x0008}
0x1930…1956              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS1 WS TABLE ADDRESS «, t00=0x0010, t01=0x0038}
0x1956…1972              Head {h00=0x0018, h01=0x0013, text=» INR A2,0,DWA13 INR «, t00=0x0010, t01=0x005e}
0x1972…198e              Head {h00=0x0018, h01=0x0013, text=» OTR A2,0,DWA13 OTR «, t00=0x0010, t01=0x007a}
0x198e…19b0              Head {h00=0x001e, h01=0x0019, text=» CIO A1,1,DWA13 CIO START «, t00=0x0010, t01=0x0096}
0x19b0…19c6              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0010, t01=0x00b8}
0x19c6…19e6              Head {h00=0x001c, h01=0x0018, text=» CIO A1,0,DWA13 CIO HALT«, t00=0x0010, t01=0x00ce}
0x19e6…1a08              Head {h00=0x001e, h01=0x0019, text=» SST A2,DWA13 SEND STATUS «, t00=0x0010, t01=0x00ee}
0x1a08…1a26              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0010, t01=0x0110}
0x1a26…1a30              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x012e}
0x1a30…1a3a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x0138}
0x1a3a…1a48              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0010, t01=0x0142}
0x1a48…1a52              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x0150}
0x1a52…1a5c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x015a}
0x1a5c…1a72              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  4«, t00=0x0010, t01=0x0164}
0x1a72…1a7c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x017a}
0x1a7c…1aa4              Head {h00=0x0024, h01=0x0020, text=»DWA14 EQU DWA11+3 DEVICE ADDRESS«, t00=0x0010, t01=0x0184}
0x1aa4…1aae              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0011, t01=0x001c}
0x1aae…1ab8              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0011, t01=0x0026}
0x1ab8…1ad8              Head {h00=0x001c, h01=0x0018, text=»CWTA14 EQU * TABLE ENTRY«, t00=0x0011, t01=0x0030}
0x1ad8…1af8              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0011, t01=0x0050}
0x1af8…1b28              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0011, t01=0x0070}
0x1b28…1b4e              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS1 WS TABLE ADDRESS «, t00=0x0011, t01=0x00a0}
0x1b4e…1b6a              Head {h00=0x0018, h01=0x0013, text=» INR A2,0,DWA14 INR «, t00=0x0011, t01=0x00c6}
0x1b6a…1b86              Head {h00=0x0018, h01=0x0013, text=» OTR A2,0,DWA14 OTR «, t00=0x0011, t01=0x00e2}
0x1b86…1ba8              Head {h00=0x001e, h01=0x0019, text=» CIO A1,1,DWA14 CIO START «, t00=0x0011, t01=0x00fe}
0x1ba8…1bbe              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0011, t01=0x0120}
0x1bbe…1bde              Head {h00=0x001c, h01=0x0018, text=» CIO A1,0,DWA14 CIO HALT«, t00=0x0011, t01=0x0136}
0x1bde…1c00              Head {h00=0x001e, h01=0x0019, text=» SST A2,DWA14 SEND STATUS «, t00=0x0011, t01=0x0156}
0x1c00…1c1e              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0011, t01=0x0178}
0x1c1e…1c28              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0012, t01=0x0008}
0x1c28…1c32              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0012, t01=0x0012}
0x1c32…1c40              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0012, t01=0x001c}
0x1c40…1c4a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0012, t01=0x002a}
0x1c4a…1c7a              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x0012, t01=0x0034}
0x1c7a…1caa              Head {h00=0x002c, h01=0x0028, text=»*   CONTROL WORK TABLES FOR ASCU4Z 2   *«, t00=0x0012, t01=0x0064}
0x1caa…1cda              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x0012, t01=0x0094}
0x1cda…1ce4              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0012, t01=0x00c4}
0x1ce4…1cfa              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=1 «, t00=0x0012, t01=0x00ce}
0x1cfa…1d04              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0012, t01=0x00e4}
0x1d04…1d1a              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  1«, t00=0x0012, t01=0x00ee}
0x1d1a…1d24              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0012, t01=0x0104}
0x1d24…1d48              Head {h00=0x0020, h01=0x0050, text=»DWA21 EQU /3C DEVICE ADDRESS«, t00=0x0012, t01=0x010e}
0x1d48…1d52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0132}
0x1d52…1d5c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x013c}
0x1d5c…1d7c              Head {h00=0x001c, h01=0x0050, text=»CWTA21 EQU * TABLE ENTRY«, t00=0x0012, t01=0x0146}
0x1d7c…1d9c              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0012, t01=0x0166}
0x1d9c…1dcc              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0012, t01=0x0186}
0x1dcc…1df2              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS2 WS TABLE ADDRESS «, t00=0x0013, t01=0x0026}
0x1df2…1e0e              Head {h00=0x0018, h01=0x0013, text=» INR A2,0,DWA21 INR «, t00=0x0013, t01=0x004c}
0x1e0e…1e2a              Head {h00=0x0018, h01=0x0013, text=» OTR A2,0,DWA21 OTR «, t00=0x0013, t01=0x0068}
0x1e2a…1e4c              Head {h00=0x001e, h01=0x0019, text=» CIO A1,1,DWA21 CIO START «, t00=0x0013, t01=0x0084}
0x1e4c…1e62              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0013, t01=0x00a6}
0x1e62…1e82              Head {h00=0x001c, h01=0x0018, text=» CIO A1,0,DWA21 CIO HALT«, t00=0x0013, t01=0x00bc}
0x1e82…1ea4              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA21 SEND STATUS «, t00=0x0013, t01=0x00dc}
0x1ea4…1ec2              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0013, t01=0x00fe}
0x1ec2…1ecc              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0013, t01=0x011c}
0x1ecc…1ed6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0013, t01=0x0126}
0x1ed6…1ee4              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0013, t01=0x0130}
0x1ee4…1eee              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0013, t01=0x013e}
0x1eee…1ef8              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0013, t01=0x0148}
0x1ef8…1f0e              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  2«, t00=0x0013, t01=0x0152}
0x1f0e…1f18              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0013, t01=0x0168}
0x1f18…1f40              Head {h00=0x0024, h01=0x0050, text=»DWA22 EQU DWA21+1 DEVICE ADDRESS«, t00=0x0013, t01=0x0172}
0x1f40…1f4a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0014, t01=0x000a}
0x1f4a…1f54              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0014, t01=0x0014}
0x1f54…1f74              Head {h00=0x001c, h01=0x0050, text=»CWTA22 EQU * TABLE ENTRY«, t00=0x0014, t01=0x001e}
0x1f74…1f94              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0014, t01=0x003e}
0x1f94…1fc4              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0014, t01=0x005e}
0x1fc4…1fea              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS2 WS TABLE ADDRESS «, t00=0x0014, t01=0x008e}
0x1fea…2006              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA22 INR «, t00=0x0014, t01=0x00b4}
0x2006…2022              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA22 OTR «, t00=0x0014, t01=0x00d0}
0x2022…2044              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA22 CIO START «, t00=0x0014, t01=0x00ec}
0x2044…205a              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0014, t01=0x010e}
0x205a…207a              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA22 CIO HALT«, t00=0x0014, t01=0x0124}
0x207a…209c              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA22 SEND STATUS «, t00=0x0014, t01=0x0144}
0x209c…20ba              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0014, t01=0x0166}
0x20ba…20c4              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0014, t01=0x0184}
0x20c4…20ce              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0014, t01=0x018e}
0x20ce…20dc              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0015, t01=0x0008}
0x20dc…20e6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0015, t01=0x0016}
0x20e6…20f0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0015, t01=0x0020}
0x20f0…2106              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  3«, t00=0x0015, t01=0x002a}
0x2106…2110              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0015, t01=0x0040}
0x2110…2138              Head {h00=0x0024, h01=0x0050, text=»DWA23 EQU DWA21+2 DEVICE ADDRESS«, t00=0x0015, t01=0x004a}
0x2138…2142              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0015, t01=0x0072}
0x2142…214c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0015, t01=0x007c}
0x214c…216c              Head {h00=0x001c, h01=0x0050, text=»CWTA23 EQU * TABLE ENTRY«, t00=0x0015, t01=0x0086}
0x216c…218c              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0015, t01=0x00a6}
0x218c…21bc              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0015, t01=0x00c6}
0x21bc…21e2              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS2 WS TABLE ADDRESS «, t00=0x0015, t01=0x00f6}
0x21e2…21fe              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA23 INR «, t00=0x0015, t01=0x011c}
0x21fe…221a              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA23 OTR «, t00=0x0015, t01=0x0138}
0x221a…223c              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA23 CIO START «, t00=0x0015, t01=0x0154}
0x223c…2252              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0015, t01=0x0176}
0x2252…2272              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA23 CIO HALT«, t00=0x0015, t01=0x018c}
0x2272…2294              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA23 SEND STATUS «, t00=0x0016, t01=0x001c}
0x2294…22b2              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0016, t01=0x003e}
0x22b2…22bc              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0016, t01=0x005c}
0x22bc…22c6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0016, t01=0x0066}
0x22c6…22d4              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0016, t01=0x0070}
0x22d4…22de              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0016, t01=0x007e}
0x22de…22e8              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0016, t01=0x0088}
0x22e8…22fe              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  4«, t00=0x0016, t01=0x0092}
0x22fe…2308              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0016, t01=0x00a8}
0x2308…2330              Head {h00=0x0024, h01=0x0050, text=»DWA24 EQU DWA21+3 DEVICE ADDRESS«, t00=0x0016, t01=0x00b2}
0x2330…233a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0016, t01=0x00da}
0x233a…2344              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0016, t01=0x00e4}
0x2344…2364              Head {h00=0x001c, h01=0x0050, text=»CWTA24 EQU * TABLE ENTRY«, t00=0x0016, t01=0x00ee}
0x2364…2384              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0016, t01=0x010e}
0x2384…23b4              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0016, t01=0x012e}
0x23b4…23da              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS2 WS TABLE ADDRESS «, t00=0x0016, t01=0x015e}
0x23da…23f6              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA24 INR «, t00=0x0016, t01=0x0184}
0x23f6…2412              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA24 OTR «, t00=0x0017, t01=0x0010}
0x2412…2434              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA24 CIO START «, t00=0x0017, t01=0x002c}
0x2434…244a              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0017, t01=0x004e}
0x244a…246a              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA24 CIO HALT«, t00=0x0017, t01=0x0064}
0x246a…248c              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA24 SEND STATUS «, t00=0x0017, t01=0x0084}
0x248c…24aa              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0017, t01=0x00a6}
0x24aa…24b4              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0017, t01=0x00c4}
0x24b4…24be              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0017, t01=0x00ce}
0x24be…24ca              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00d8}
0x24ca…24d8              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0017, t01=0x00e4}
0x24d8…24e2              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0017, t01=0x00f2}
0x24e2…2512              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x0017, t01=0x00fc}
0x2512…2542              Head {h00=0x002c, h01=0x0050, text=»*   CONTROL WORK TABLES FOR ASCU4Z 3   *«, t00=0x0017, t01=0x012c}
0x2542…2572              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x0017, t01=0x015c}
0x2572…257c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0017, t01=0x018c}
0x257c…2592              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=1 «, t00=0x0018, t01=0x0008}
0x2592…25a8              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=2 «, t00=0x0018, t01=0x001e}
0x25a8…25b2              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0018, t01=0x0034}
0x25b2…25c8              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  1«, t00=0x0018, t01=0x003e}
0x25c8…25d2              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0018, t01=0x0054}
0x25d2…25f6              Head {h00=0x0020, h01=0x0050, text=»DWA31 EQU /20 DEVICE ADDRESS«, t00=0x0018, t01=0x005e}
0x25f6…2600              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0082}
0x2600…260a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x008c}
0x260a…262a              Head {h00=0x001c, h01=0x0050, text=»CWTA31 EQU * TABLE ENTRY«, t00=0x0018, t01=0x0096}
0x262a…264a              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0018, t01=0x00b6}
0x264a…267a              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0018, t01=0x00d6}
0x267a…26a0              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS3 WS TABLE ADDRESS «, t00=0x0018, t01=0x0106}
0x26a0…26bc              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA31 INR «, t00=0x0018, t01=0x012c}
0x26bc…26d8              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA31 OTR «, t00=0x0018, t01=0x0148}
0x26d8…26fa              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA31 CIO START «, t00=0x0018, t01=0x0164}
0x26fa…2710              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0018, t01=0x0186}
0x2710…2730              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA31 CIO HALT«, t00=0x0019, t01=0x000c}
0x2730…2752              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA31 SEND STATUS «, t00=0x0019, t01=0x002c}
0x2752…2770              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0019, t01=0x004e}
0x2770…277a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x006c}
0x277a…2784              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x0076}
0x2784…2792              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0019, t01=0x0080}
0x2792…279c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x008e}
0x279c…27a6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x0098}
0x27a6…27bc              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  2«, t00=0x0019, t01=0x00a2}
0x27bc…27c6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x00b8}
0x27c6…27ee              Head {h00=0x0024, h01=0x0050, text=»DWA32 EQU DWA31+1 DEVICE ADDRESS«, t00=0x0019, t01=0x00c2}
0x27ee…27f8              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x00ea}
0x27f8…2802              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0019, t01=0x00f4}
0x2802…2822              Head {h00=0x001c, h01=0x0050, text=»CWTA32 EQU * TABLE ENTRY«, t00=0x0019, t01=0x00fe}
0x2822…2842              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0019, t01=0x011e}
0x2842…2872              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0019, t01=0x013e}
0x2872…2898              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS3 WS TABLE ADDRESS «, t00=0x0019, t01=0x016e}
0x2898…28b4 (26, 0, 400) Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA32 INR «, t00=0x001a, t01=0x0004}
0x28b4…28d0              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA32 OTR «, t00=0x001a, t01=0x0020}
0x28d0…28f2              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA32 CIO START «, t00=0x001a, t01=0x003c}
0x28f2…2908              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x001a, t01=0x005e}
0x2908…2928              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA32 CIO HALT«, t00=0x001a, t01=0x0074}
0x2928…294a              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA32 SEND STATUS «, t00=0x001a, t01=0x0094}
0x294a…2968              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x001a, t01=0x00b6}
0x2968…2972              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x00d4}
0x2972…297c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x00de}
0x297c…298a              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x001a, t01=0x00e8}
0x298a…2994              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x00f6}
0x2994…299e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x0100}
0x299e…29b4              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  3«, t00=0x001a, t01=0x010a}
0x29b4…29be              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x0120}
0x29be…29e6              Head {h00=0x0024, h01=0x0050, text=»DWA33 EQU DWA31+2 DEVICE ADDRESS«, t00=0x001a, t01=0x012a}
0x29e6…29f0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x0152}
0x29f0…29fa              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001a, t01=0x015c}
0x29fa…2a1a              Head {h00=0x001c, h01=0x0050, text=»CWTA33 EQU * TABLE ENTRY«, t00=0x001a, t01=0x0166}
0x2a1a…2a3a              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x001a, t01=0x0186}
0x2a3a…2a6a              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x001b, t01=0x0016}
0x2a6a…2a90              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS3 WS TABLE ADDRESS «, t00=0x001b, t01=0x0046}
0x2a90…2aac              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA33 INR «, t00=0x001b, t01=0x006c}
0x2aac…2ac8              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA33 OTR «, t00=0x001b, t01=0x0088}
0x2ac8…2aea              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA33 CIO START «, t00=0x001b, t01=0x00a4}
0x2aea…2b00              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x001b, t01=0x00c6}
0x2b00…2b20              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA33 CIO HALT«, t00=0x001b, t01=0x00dc}
0x2b20…2b42              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA33 SEND STATUS «, t00=0x001b, t01=0x00fc}
0x2b42…2b60              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x001b, t01=0x011e}
0x2b60…2b6a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001b, t01=0x013c}
0x2b6a…2b74              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001b, t01=0x0146}
0x2b74…2b82              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x001b, t01=0x0150}
0x2b82…2b8c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001b, t01=0x015e}
0x2b8c…2b96              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001b, t01=0x0168}
0x2b96…2bac              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  4«, t00=0x001b, t01=0x0172}
0x2bac…2bb6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001b, t01=0x0188}
0x2bb6…2bde (28, 0, 400) Head {h00=0x0024, h01=0x0050, text=»DWA34 EQU DWA31+3 DEVICE ADDRESS«, t00=0x001c, t01=0x0004}
0x2bde…2be8              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001c, t01=0x002c}
0x2be8…2bf2              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001c, t01=0x0036}
0x2bf2…2c12              Head {h00=0x001c, h01=0x0050, text=»CWTA34 EQU * TABLE ENTRY«, t00=0x001c, t01=0x0040}
0x2c12…2c32              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x001c, t01=0x0060}
0x2c32…2c62              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x001c, t01=0x0080}
0x2c62…2c88              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS3 WS TABLE ADDRESS «, t00=0x001c, t01=0x00b0}
0x2c88…2ca4              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA34 INR «, t00=0x001c, t01=0x00d6}
0x2ca4…2cc0              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA34 OTR «, t00=0x001c, t01=0x00f2}
0x2cc0…2ce2              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA34 CIO START «, t00=0x001c, t01=0x010e}
0x2ce2…2cf8              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x001c, t01=0x0130}
0x2cf8…2d18              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA34 CIO HALT«, t00=0x001c, t01=0x0146}
0x2d18…2d3a              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA34 SEND STATUS «, t00=0x001c, t01=0x0166}
0x2d3a…2d58              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x001c, t01=0x0188}
0x2d58…2d62              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001d, t01=0x0016}
0x2d62…2d6c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001d, t01=0x0020}
0x2d6c…2d78              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x002a}
0x2d78…2d86              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x001d, t01=0x0036}
0x2d86…2d90              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001d, t01=0x0044}
0x2d90…2dc0              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x001d, t01=0x004e}
0x2dc0…2df0              Head {h00=0x002c, h01=0x0050, text=»*   CONTROL WORK TABLES FOR ASCU4Z 4   *«, t00=0x001d, t01=0x007e}
0x2df0…2e20              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x001d, t01=0x00ae}
0x2e20…2e2a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001d, t01=0x00de}
0x2e2a…2e40              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=1 «, t00=0x001d, t01=0x00e8}
0x2e40…2e56              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=2 «, t00=0x001d, t01=0x00fe}
0x2e56…2e6c              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=3 «, t00=0x001d, t01=0x0114}
0x2e6c…2e76              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001d, t01=0x012a}
0x2e76…2e8c              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  1«, t00=0x001d, t01=0x0134}
0x2e8c…2e96              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001d, t01=0x014a}
0x2e96…2eba              Head {h00=0x0020, h01=0x0050, text=»DWA41 EQU /30 DEVICE ADDRESS«, t00=0x001d, t01=0x0154}
0x2eba…2ec4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0178}
0x2ec4…2ece              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0182}
0x2ece…2eee              Head {h00=0x001c, h01=0x0050, text=»CWTA41 EQU * TABLE ENTRY«, t00=0x001d, t01=0x018c}
0x2eee…2f0e              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x001e, t01=0x001c}
0x2f0e…2f3e              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x001e, t01=0x003c}
0x2f3e…2f64              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS4 WS TABLE ADDRESS «, t00=0x001e, t01=0x006c}
0x2f64…2f80              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA41 INR «, t00=0x001e, t01=0x0092}
0x2f80…2f9c              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA41 OTR «, t00=0x001e, t01=0x00ae}
0x2f9c…2fbe              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA41 CIO START «, t00=0x001e, t01=0x00ca}
0x2fbe…2fd4              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x001e, t01=0x00ec}
0x2fd4…2ff4              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA41 CIO HALT«, t00=0x001e, t01=0x0102}
0x2ff4…3016              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA41 SEND STATUS «, t00=0x001e, t01=0x0122}
0x3016…3034              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x001e, t01=0x0144}
0x3034…303e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001e, t01=0x0162}
0x303e…3048              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001e, t01=0x016c}
0x3048…3056              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x001e, t01=0x0176}
0x3056…3060              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001e, t01=0x0184}
0x3060…306a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001e, t01=0x018e}
0x306a…3080              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  2«, t00=0x001f, t01=0x0008}
0x3080…308a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001f, t01=0x001e}
0x308a…30b2              Head {h00=0x0024, h01=0x0050, text=»DWA42 EQU DWA41+1 DEVICE ADDRESS«, t00=0x001f, t01=0x0028}
0x30b2…30bc              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001f, t01=0x0050}
0x30bc…30c6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x001f, t01=0x005a}
0x30c6…30e6              Head {h00=0x001c, h01=0x0050, text=»CWTA42 EQU * TABLE ENTRY«, t00=0x001f, t01=0x0064}
0x30e6…3106              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x001f, t01=0x0084}
0x3106…3136              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x001f, t01=0x00a4}
0x3136…315c              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS4 WS TABLE ADDRESS «, t00=0x001f, t01=0x00d4}
0x315c…3178              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA42 INR «, t00=0x001f, t01=0x00fa}
0x3178…3194              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA42 OTR «, t00=0x001f, t01=0x0116}
0x3194…31b6              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA42 CIO START «, t00=0x001f, t01=0x0132}
0x31b6…31cc              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x001f, t01=0x0154}
0x31cc…31ec              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA42 CIO HALT«, t00=0x001f, t01=0x016a}
0x31ec…320e              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA42 SEND STATUS «, t00=0x001f, t01=0x018a}
0x320e…322c              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0020, t01=0x001c}
0x322c…3236              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0020, t01=0x003a}
0x3236…3240              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0020, t01=0x0044}
0x3240…324e              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0020, t01=0x004e}
0x324e…3258              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0020, t01=0x005c}
0x3258…3262              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0020, t01=0x0066}
0x3262…3278              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  3«, t00=0x0020, t01=0x0070}
0x3278…3282              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0020, t01=0x0086}
0x3282…32aa              Head {h00=0x0024, h01=0x0050, text=»DWA43 EQU DWA41+2 DEVICE ADDRESS«, t00=0x0020, t01=0x0090}
0x32aa…32b4              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0020, t01=0x00b8}
0x32b4…32be              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0020, t01=0x00c2}
0x32be…32de              Head {h00=0x001c, h01=0x0050, text=»CWTA43 EQU * TABLE ENTRY«, t00=0x0020, t01=0x00cc}
0x32de…32fe              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0020, t01=0x00ec}
0x32fe…332e              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0020, t01=0x010c}
0x332e…3354              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS4 WS TABLE ADDRESS «, t00=0x0020, t01=0x013c}
0x3354…3370              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA43 INR «, t00=0x0020, t01=0x0162}
0x3370…338c              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA43 OTR «, t00=0x0020, t01=0x017e}
0x338c…33ae              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA43 CIO START «, t00=0x0021, t01=0x000a}
0x33ae…33c4              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0021, t01=0x002c}
0x33c4…33e4              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA43 CIO HALT«, t00=0x0021, t01=0x0042}
0x33e4…3406              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA43 SEND STATUS «, t00=0x0021, t01=0x0062}
0x3406…3424              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0021, t01=0x0084}
0x3424…342e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0021, t01=0x00a2}
0x342e…3438              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0021, t01=0x00ac}
0x3438…3446              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0021, t01=0x00b6}
0x3446…3450              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0021, t01=0x00c4}
0x3450…345a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0021, t01=0x00ce}
0x345a…3470              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  4«, t00=0x0021, t01=0x00d8}
0x3470…347a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0021, t01=0x00ee}
0x347a…34a2              Head {h00=0x0024, h01=0x0050, text=»DWA44 EQU DWA41+3 DEVICE ADDRESS«, t00=0x0021, t01=0x00f8}
0x34a2…34ac              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0021, t01=0x0120}
0x34ac…34b6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0021, t01=0x012a}
0x34b6…34d6              Head {h00=0x001c, h01=0x0050, text=»CWTA44 EQU * TABLE ENTRY«, t00=0x0021, t01=0x0134}
0x34d6…34f6              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0021, t01=0x0154}
0x34f6…3526              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0021, t01=0x0174}
0x3526…354c              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS4 WS TABLE ADDRESS «, t00=0x0022, t01=0x0014}
0x354c…3568              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA44 INR «, t00=0x0022, t01=0x003a}
0x3568…3584              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA44 OTR «, t00=0x0022, t01=0x0056}
0x3584…35a6              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA44 CIO START «, t00=0x0022, t01=0x0072}
0x35a6…35bc              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0022, t01=0x0094}
0x35bc…35dc              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA44 CIO HALT«, t00=0x0022, t01=0x00aa}
0x35dc…35fe              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA44 SEND STATUS «, t00=0x0022, t01=0x00ca}
0x35fe…361c              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0022, t01=0x00ec}
0x361c…3626              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0022, t01=0x010a}
0x3626…3630              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0114}
0x3630…363c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x011e}
0x363c…364a              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0022, t01=0x012a}
0x364a…3654              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0022, t01=0x0138}
0x3654…3684              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x0022, t01=0x0142}
0x3684…36b4              Head {h00=0x002c, h01=0x0050, text=»*   CONTROL WORK TABLES FOR ASCU4Z 5   *«, t00=0x0022, t01=0x0172}
0x36b4…36e4              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x0023, t01=0x0012}
0x36e4…36ee              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0023, t01=0x0042}
0x36ee…3704              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=1 «, t00=0x0023, t01=0x004c}
0x3704…371a              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=2 «, t00=0x0023, t01=0x0062}
0x371a…3730              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=3 «, t00=0x0023, t01=0x0078}
0x3730…3746              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=4 «, t00=0x0023, t01=0x008e}
0x3746…3750              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0023, t01=0x00a4}
0x3750…3766              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  1«, t00=0x0023, t01=0x00ae}
0x3766…3770              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0023, t01=0x00c4}
0x3770…3798              Head {h00=0x0024, h01=0x0050, text=»DWA51 EQU /0C DEVICE ADDRESS =5 «, t00=0x0023, t01=0x00ce}
0x3798…37a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00f6}
0x37a2…37ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0100}
0x37ac…37cc              Head {h00=0x001c, h01=0x0050, text=»CWTA51 EQU * TABLE ENTRY«, t00=0x0023, t01=0x010a}
0x37cc…37ec              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0023, t01=0x012a}
0x37ec…381c              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0023, t01=0x014a}
0x381c…3842              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS5 WS TABLE ADDRESS «, t00=0x0023, t01=0x017a}
0x3842…385e              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA51 INR «, t00=0x0024, t01=0x0010}
0x385e…387a              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA51 OTR «, t00=0x0024, t01=0x002c}
0x387a…389c              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA51 CIO START «, t00=0x0024, t01=0x0048}
0x389c…38b2              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0024, t01=0x006a}
0x38b2…38d2              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA51 CIO HALT«, t00=0x0024, t01=0x0080}
0x38d2…38f4              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA51 SEND STATUS «, t00=0x0024, t01=0x00a0}
0x38f4…3912              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0024, t01=0x00c2}
0x3912…391c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x00e0}
0x391c…3926              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x00ea}
0x3926…3934              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0024, t01=0x00f4}
0x3934…393e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x0102}
0x393e…3948              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x010c}
0x3948…395e              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  2«, t00=0x0024, t01=0x0116}
0x395e…3968              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x012c}
0x3968…3990              Head {h00=0x0024, h01=0x0050, text=»DWA52 EQU DWA51+1 DEVICE ADDRESS«, t00=0x0024, t01=0x0136}
0x3990…399a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x015e}
0x399a…39a4              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x0168}
0x39a4…39c4              Head {h00=0x001c, h01=0x0050, text=»CWTA52 EQU * TABLE ENTRY«, t00=0x0024, t01=0x0172}
0x39c4…39e4 (37, 0, 398) Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0025, t01=0x0004}
0x39e4…3a14              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0025, t01=0x0024}
0x3a14…3a3a              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS5 WS TABLE ADDRESS «, t00=0x0025, t01=0x0054}
0x3a3a…3a56              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA52 INR «, t00=0x0025, t01=0x007a}
0x3a56…3a72              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA52 OTR «, t00=0x0025, t01=0x0096}
0x3a72…3a94              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA52 CIO START «, t00=0x0025, t01=0x00b2}
0x3a94…3aaa              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0025, t01=0x00d4}
0x3aaa…3aca              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA52 CIO HALT«, t00=0x0025, t01=0x00ea}
0x3aca…3aec              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA52 SEND STATUS «, t00=0x0025, t01=0x010a}
0x3aec…3b0a              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0025, t01=0x012c}
0x3b0a…3b14              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0025, t01=0x014a}
0x3b14…3b1e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0025, t01=0x0154}
0x3b1e…3b2c              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0025, t01=0x015e}
0x3b2c…3b36              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0025, t01=0x016c}
0x3b36…3b40              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0025, t01=0x0176}
0x3b40…3b56              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  3«, t00=0x0025, t01=0x0180}
0x3b56…3b60              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0026, t01=0x0008}
0x3b60…3b88              Head {h00=0x0024, h01=0x0050, text=»DWA53 EQU DWA51+2 DEVICE ADDRESS«, t00=0x0026, t01=0x0012}
0x3b88…3b92              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0026, t01=0x003a}
0x3b92…3b9c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0026, t01=0x0044}
0x3b9c…3bbc              Head {h00=0x001c, h01=0x0050, text=»CWTA53 EQU * TABLE ENTRY«, t00=0x0026, t01=0x004e}
0x3bbc…3bdc              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0026, t01=0x006e}
0x3bdc…3c0c              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0026, t01=0x008e}
0x3c0c…3c32              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS5 WS TABLE ADDRESS «, t00=0x0026, t01=0x00be}
0x3c32…3c4e              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA53 INR «, t00=0x0026, t01=0x00e4}
0x3c4e…3c6a              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA53 OTR «, t00=0x0026, t01=0x0100}
0x3c6a…3c8c              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA53 CIO START «, t00=0x0026, t01=0x011c}
0x3c8c…3ca2              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0026, t01=0x013e}
0x3ca2…3cc2              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA53 CIO HALT«, t00=0x0026, t01=0x0154}
0x3cc2…3ce4              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA53 SEND STATUS «, t00=0x0026, t01=0x0174}
0x3ce4…3d02              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0027, t01=0x0008}
0x3d02…3d0c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0027, t01=0x0026}
0x3d0c…3d16              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0027, t01=0x0030}
0x3d16…3d24              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0027, t01=0x003a}
0x3d24…3d2e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0027, t01=0x0048}
0x3d2e…3d38              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0027, t01=0x0052}
0x3d38…3d4e              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  4«, t00=0x0027, t01=0x005c}
0x3d4e…3d58              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0027, t01=0x0072}
0x3d58…3d80              Head {h00=0x0024, h01=0x0050, text=»DWA54 EQU DWA51+3 DEVICE ADDRESS«, t00=0x0027, t01=0x007c}
0x3d80…3d8a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0027, t01=0x00a4}
0x3d8a…3d94              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0027, t01=0x00ae}
0x3d94…3db4              Head {h00=0x001c, h01=0x0050, text=»CWTA54 EQU * TABLE ENTRY«, t00=0x0027, t01=0x00b8}
0x3db4…3dd4              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0027, t01=0x00d8}
0x3dd4…3e04              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0027, t01=0x00f8}
0x3e04…3e2a              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS5 WS TABLE ADDRESS «, t00=0x0027, t01=0x0128}
0x3e2a…3e46              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA54 INR «, t00=0x0027, t01=0x014e}
0x3e46…3e62              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA54 OTR «, t00=0x0027, t01=0x016a}
0x3e62…3e84              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA54 CIO START «, t00=0x0027, t01=0x0186}
0x3e84…3e9a              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x0028, t01=0x0018}
0x3e9a…3eba              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA54 CIO HALT«, t00=0x0028, t01=0x002e}
0x3eba…3edc              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA54 SEND STATUS «, t00=0x0028, t01=0x004e}
0x3edc…3efa              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x0028, t01=0x0070}
0x3efa…3f04              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0028, t01=0x008e}
0x3f04…3f0e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0028, t01=0x0098}
0x3f0e…3f1a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x00a2}
0x3f1a…3f28              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0028, t01=0x00ae}
0x3f28…3f32              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0028, t01=0x00bc}
0x3f32…3f62              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x0028, t01=0x00c6}
0x3f62…3f92              Head {h00=0x002c, h01=0x0050, text=»*   CONTROL WORK TABLES FOR ASCU4Z 6   *«, t00=0x0028, t01=0x00f6}
0x3f92…3fc2              Head {h00=0x002c, h01=0x0028, text=»****************************************«, t00=0x0028, t01=0x0126}
0x3fc2…3fcc              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0028, t01=0x0156}
0x3fcc…3fe2              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=1 «, t00=0x0028, t01=0x0160}
0x3fe2…3ff8              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=2 «, t00=0x0028, t01=0x0176}
0x3ff8…400e              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=3 «, t00=0x0028, t01=0x018c}
0x400e…4024              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=4 «, t00=0x0029, t01=0x0012}
0x4024…403a              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=5 «, t00=0x0029, t01=0x0028}
0x403a…4044              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0029, t01=0x003e}
0x4044…405a              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  1«, t00=0x0029, t01=0x0048}
0x405a…4064              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0029, t01=0x005e}
0x4064…408c              Head {h00=0x0024, h01=0x0050, text=»DWA61 EQU /00 DEVICE ADDRESS =5 «, t00=0x0029, t01=0x0068}
0x408c…4096              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0090}
0x4096…40a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x009a}
0x40a0…40c0              Head {h00=0x001c, h01=0x0050, text=»CWTA61 EQU * TABLE ENTRY«, t00=0x0029, t01=0x00a4}
0x40c0…40e0              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x0029, t01=0x00c4}
0x40e0…4110              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x0029, t01=0x00e4}
0x4110…4136              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS6 WS TABLE ADDRESS «, t00=0x0029, t01=0x0114}
0x4136…4152              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA61 INR «, t00=0x0029, t01=0x013a}
0x4152…416e              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA61 OTR «, t00=0x0029, t01=0x0156}
0x416e…4190              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA61 CIO START «, t00=0x0029, t01=0x0172}
0x4190…41a6 (42, 0, 400) Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x002a, t01=0x0004}
0x41a6…41c6              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA61 CIO HALT«, t00=0x002a, t01=0x001a}
0x41c6…41e8              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA61 SEND STATUS «, t00=0x002a, t01=0x003a}
0x41e8…4206              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x002a, t01=0x005c}
0x4206…4210              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002a, t01=0x007a}
0x4210…421a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002a, t01=0x0084}
0x421a…4228              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x002a, t01=0x008e}
0x4228…4232              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002a, t01=0x009c}
0x4232…423c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002a, t01=0x00a6}
0x423c…4252              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  2«, t00=0x002a, t01=0x00b0}
0x4252…425c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002a, t01=0x00c6}
0x425c…4284              Head {h00=0x0024, h01=0x0050, text=»DWA62 EQU DWA61+1 DEVICE ADDRESS«, t00=0x002a, t01=0x00d0}
0x4284…428e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002a, t01=0x00f8}
0x428e…4298              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002a, t01=0x0102}
0x4298…42b8              Head {h00=0x001c, h01=0x0050, text=»CWTA62 EQU * TABLE ENTRY«, t00=0x002a, t01=0x010c}
0x42b8…42d8              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x002a, t01=0x012c}
0x42d8…4308              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x002a, t01=0x014c}
0x4308…432e              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS6 WS TABLE ADDRESS «, t00=0x002a, t01=0x017c}
0x432e…434a              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA62 INR «, t00=0x002b, t01=0x0012}
0x434a…4366              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA62 OTR «, t00=0x002b, t01=0x002e}
0x4366…4388              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA62 CIO START «, t00=0x002b, t01=0x004a}
0x4388…439e              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x002b, t01=0x006c}
0x439e…43be              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA62 CIO HALT«, t00=0x002b, t01=0x0082}
0x43be…43e0              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA62 SEND STATUS «, t00=0x002b, t01=0x00a2}
0x43e0…43fe              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x002b, t01=0x00c4}
0x43fe…4408              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002b, t01=0x00e2}
0x4408…4412              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002b, t01=0x00ec}
0x4412…4420              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x002b, t01=0x00f6}
0x4420…442a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002b, t01=0x0104}
0x442a…4434              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002b, t01=0x010e}
0x4434…444a              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  3«, t00=0x002b, t01=0x0118}
0x444a…4454              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002b, t01=0x012e}
0x4454…447c              Head {h00=0x0024, h01=0x0050, text=»DWA63 EQU DWA61+2 DEVICE ADDRESS«, t00=0x002b, t01=0x0138}
0x447c…4486              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002b, t01=0x0160}
0x4486…4490              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002b, t01=0x016a}
0x4490…44b0              Head {h00=0x001c, h01=0x0050, text=»CWTA63 EQU * TABLE ENTRY«, t00=0x002b, t01=0x0174}
0x44b0…44d0 (44, 0, 398) Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x002c, t01=0x0004}
0x44d0…4500              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x002c, t01=0x0024}
0x4500…4526              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS6 WS TABLE ADDRESS «, t00=0x002c, t01=0x0054}
0x4526…4542              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA63 INR «, t00=0x002c, t01=0x007a}
0x4542…455e              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA63 OTR «, t00=0x002c, t01=0x0096}
0x455e…4580              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA63 CIO START «, t00=0x002c, t01=0x00b2}
0x4580…4596              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x002c, t01=0x00d4}
0x4596…45b6              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA63 CIO HALT«, t00=0x002c, t01=0x00ea}
0x45b6…45d8              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA63 SEND STATUS «, t00=0x002c, t01=0x010a}
0x45d8…45f6              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x002c, t01=0x012c}
0x45f6…4600              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002c, t01=0x014a}
0x4600…460a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002c, t01=0x0154}
0x460a…4618              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x002c, t01=0x015e}
0x4618…4622              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002c, t01=0x016c}
0x4622…462c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002c, t01=0x0176}
0x462c…4642              Head {h00=0x0012, h01=0x000e, text=»*   L I N E  4«, t00=0x002c, t01=0x0180}
0x4642…464c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002d, t01=0x0008}
0x464c…4674              Head {h00=0x0024, h01=0x0050, text=»DWA64 EQU DWA61+3 DEVICE ADDRESS«, t00=0x002d, t01=0x0012}
0x4674…467e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002d, t01=0x003a}
0x467e…4688              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002d, t01=0x0044}
0x4688…46a8              Head {h00=0x001c, h01=0x0050, text=»CWTA64 EQU * TABLE ENTRY«, t00=0x002d, t01=0x004e}
0x46a8…46c8              Head {h00=0x001c, h01=0x0017, text=» DATA 0 LAST OUTPUT DWT «, t00=0x002d, t01=0x006e}
0x46c8…46f8              Head {h00=0x002c, h01=0x0050, text=» DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH.«, t00=0x002d, t01=0x008e}
0x46f8…471e              Head {h00=0x0022, h01=0x0050, text=» DATA INTAS6 WS TABLE ADDRESS «, t00=0x002d, t01=0x00be}
0x471e…473a              Head {h00=0x0018, h01=0x0050, text=» INR A2,0,DWA64 INR «, t00=0x002d, t01=0x00e4}
0x473a…4756              Head {h00=0x0018, h01=0x0050, text=» OTR A2,0,DWA64 OTR «, t00=0x002d, t01=0x0100}
0x4756…4778              Head {h00=0x001e, h01=0x0050, text=» CIO A1,1,DWA64 CIO START «, t00=0x002d, t01=0x011c}
0x4778…478e              Head {h00=0x0012, h01=0x000d, text=» DATA 0 QUEUE «, t00=0x002d, t01=0x013e}
0x478e…47ae              Head {h00=0x001c, h01=0x0050, text=» CIO A1,0,DWA64 CIO HALT«, t00=0x002d, t01=0x0154}
0x47ae…47d0              Head {h00=0x001e, h01=0x0050, text=» SST A2,DWA64 SEND STATUS «, t00=0x002d, t01=0x0174}
0x47d0…47ee              Head {h00=0x001a, h01=0x0016, text=» DATA 0 CHANNEL STATUS«, t00=0x002e, t01=0x0008}
0x47ee…47f8              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x0026}
0x47f8…4802              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x0030}
0x4802…480e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x003a}
0x480e…481c              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x002e, t01=0x0046}
0x481c…4826              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x0054}
0x4826…4830              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x005e}
0x4830…484a              Head {h00=0x0016, h01=0x0011, text=»***************** «, t00=0x002e, t01=0x0068}
0x484a…4864              Head {h00=0x0016, h01=0x0011, text=»*   C H T A B   * «, t00=0x002e, t01=0x0082}
0x4864…487e              Head {h00=0x0016, h01=0x0011, text=»***************** «, t00=0x002e, t01=0x009c}
0x487e…4888              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x00b6}
0x4888…48be              Head {h00=0x0032, h01=0x002e, text=»*   THIS TABLE HOLDS ADDRESSES OF CONTROL WORK«, t00=0x002e, t01=0x00c0}
0x48be…48e6              Head {h00=0x0024, h01=0x0020, text=»*   TABLES CWT TO CHANNEL UNITS.«, t00=0x002e, t01=0x00f6}
0x48e6…48f0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x011e}
0x48f0…48fa              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x002e, t01=0x0128}
0x48fa…490e              Head {h00=0x0010, h01=0x000b, text=»CHTAB EQU * «, t00=0x002e, t01=0x0132}
0x490e…4932              Head {h00=0x0020, h01=0x001b, text=» DATA CHTABE-* TABLE LENGTH «, t00=0x002e, t01=0x0146}
0x4932…4946              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA11«, t00=0x002e, t01=0x016a}
0x4946…495a              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA12«, t00=0x002e, t01=0x017e}
0x495a…496e (47, 0, 400) Head {h00=0x0010, h01=0x000c, text=» DATA CWTA13«, t00=0x002f, t01=0x0004}
0x496e…4982              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA14«, t00=0x002f, t01=0x0018}
0x4982…4998              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=1 «, t00=0x002f, t01=0x002c}
0x4998…49ac              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA21«, t00=0x002f, t01=0x0042}
0x49ac…49c0              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA22«, t00=0x002f, t01=0x0056}
0x49c0…49d4              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA23«, t00=0x002f, t01=0x006a}
0x49d4…49e8              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA24«, t00=0x002f, t01=0x007e}
0x49e8…49f4              Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x002f, t01=0x0092}
0x49f4…4a0a              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=1 «, t00=0x002f, t01=0x009e}
0x4a0a…4a20              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=2 «, t00=0x002f, t01=0x00b4}
0x4a20…4a34              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA31«, t00=0x002f, t01=0x00ca}
0x4a34…4a48              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA32«, t00=0x002f, t01=0x00de}
0x4a48…4a5c              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA33«, t00=0x002f, t01=0x00f2}
0x4a5c…4a70              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA34«, t00=0x002f, t01=0x0106}
0x4a70…4a7c              Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x002f, t01=0x011a}
0x4a7c…4a92              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=1 «, t00=0x002f, t01=0x0126}
0x4a92…4aa8              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=2 «, t00=0x002f, t01=0x013c}
0x4aa8…4abe              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=3 «, t00=0x002f, t01=0x0152}
0x4abe…4ad2              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA41«, t00=0x002f, t01=0x0168}
0x4ad2…4ae6              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA42«, t00=0x002f, t01=0x017c}
0x4ae6…4afa              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA43«, t00=0x002f, t01=0x0190}
0x4afa…4b0e              Head {h00=0x0010, h01=0x000c, text=» DATA CWTA44«, t00=0x0030, t01=0x0014}
0x4b0e…4b1a              Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0030, t01=0x0028}
0x4b1a…4b30              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=1 «, t00=0x0030, t01=0x0034}
0x4b30…4b46              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=2 «, t00=0x0030, t01=0x004a}
0x4b46…4b5c              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=3 «, t00=0x0030, t01=0x0060}
0x4b5c…4b72              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=4 «, t00=0x0030, t01=0x0076}
0x4b72…4b86              Head {h00=0x0010, h01=0x0050, text=» DATA CWTA51«, t00=0x0030, t01=0x008c}
0x4b86…4b9a              Head {h00=0x0010, h01=0x0050, text=» DATA CWTA52«, t00=0x0030, t01=0x00a0}
0x4b9a…4bae              Head {h00=0x0010, h01=0x0050, text=» DATA CWTA53«, t00=0x0030, t01=0x00b4}
0x4bae…4bc2              Head {h00=0x0010, h01=0x0050, text=» DATA CWTA54«, t00=0x0030, t01=0x00c8}
0x4bc2…4bce              Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0030, t01=0x00dc}
0x4bce…4be4              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=1 «, t00=0x0030, t01=0x00e8}
0x4be4…4bfa              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=2 «, t00=0x0030, t01=0x00fe}
0x4bfa…4c10              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=3 «, t00=0x0030, t01=0x0114}
0x4c10…4c26              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=4 «, t00=0x0030, t01=0x012a}
0x4c26…4c3c              Head {h00=0x0012, h01=0x0050, text=» IFF ASCHAN=5 «, t00=0x0030, t01=0x0140}
0x4c3c…4c50              Head {h00=0x0010, h01=0x0050, text=» DATA CWTA61«, t00=0x0030, t01=0x0156}
0x4c50…4c64              Head {h00=0x0010, h01=0x0050, text=» DATA CWTA62«, t00=0x0030, t01=0x016a}
0x4c64…4c78              Head {h00=0x0010, h01=0x0050, text=» DATA CWTA63«, t00=0x0030, t01=0x017e}
0x4c78…4c8c (49, 0, 400) Head {h00=0x0010, h01=0x0050, text=» DATA CWTA64«, t00=0x0031, t01=0x0004}
0x4c8c…4c98              Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0031, t01=0x0018}
0x4c98…4cba              Head {h00=0x001e, h01=0x0019, text=»CHTABE EQU * END OF TABLE «, t00=0x0031, t01=0x0024}
0x4cba…4cc4              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0031, t01=0x0046}
0x4cc4…4cce              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0031, t01=0x0050}
0x4cce…4cdc              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0031, t01=0x005a}
0x4cdc…4ce6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0031, t01=0x0068}
0x4ce6…4cf0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0031, t01=0x0072}
0x4cf0…4d08              Head {h00=0x0014, h01=0x0050, text=»*   A S C U O N «, t00=0x0031, t01=0x007c}
0x4d08…4d12              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0031, t01=0x0094}
0x4d12…4d4c              Head {h00=0x0036, h01=0x0031, text=»*   SUBROUTINE TO RESET CWT AND PERFORM CIO START «, t00=0x0031, t01=0x009e}
0x4d4c…4d84              Head {h00=0x0034, h01=0x0050, text=»*   OF EVERY ASCU4Z INPUT CHANNEL AT SYSTEM LOAD«, t00=0x0031, t01=0x00d8}
0x4d84…4d8e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0031, t01=0x0110}
0x4d8e…4d98              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0031, t01=0x011a}
0x4d98…4dac              Head {h00=0x0010, h01=0x0050, text=»ASCUON EQU *«, t00=0x0031, t01=0x0124}
0x4dac…4dce              Head {h00=0x001e, h01=0x0019, text=» LD A4,CHTAB TABLE LENGTH «, t00=0x0031, t01=0x0138}
0x4dce…4de0              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0031, t01=0x015a}
0x4de0…4e04              Head {h00=0x0020, h01=0x0050, text=»AON010 SUK A4,2 ALL TREATED?«, t00=0x0031, t01=0x016c}
0x4e04…4e1e              Head {h00=0x0016, h01=0x0012, text=» ABL(Z) RTNA15 YES«, t00=0x0031, t01=0x0190}
0x4e1e…4e32              Head {h00=0x0010, h01=0x0050, text=»AON020 EQU *«, t00=0x0032, t01=0x001a}
0x4e32…4e5c              Head {h00=0x0026, h01=0x0050, text=» LD A5,CHTAB+2,A3 LOAD CWT-ADDRESS«, t00=0x0032, t01=0x002e}
0x4e5c…4e72              Head {h00=0x0012, h01=0x0050, text=» RB(Z) AON010 «, t00=0x0032, t01=0x0058}
0x4e72…4e88              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x0032, t01=0x006e}
0x4e88…4eb4              Head {h00=0x0028, h01=0x0050, text=» ORS A1,CWTST,A5 SET INITIATION BIT «, t00=0x0032, t01=0x0084}
0x4eb4…4ed8              Head {h00=0x0020, h01=0x0050, text=» CMR A5 RESET LAST OUTPUT =2«, t00=0x0032, t01=0x00b0}
0x4ed8…4f02              Head {h00=0x0026, h01=0x0050, text=» CM CWTLON,A5 CLEAR LOC AND NOC =2«, t00=0x0032, t01=0x00d4}
0x4f02…4f2c              Head {h00=0x0026, h01=0x0050, text=» CM CWTEQ,A5 RESET OUTPUT QUEUE =3«, t00=0x0032, t01=0x00fe}
0x4f2c…4f38              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0032, t01=0x0128}
0x4f38…4f5a              Head {h00=0x001e, h01=0x0050, text=» LDK A1,/4 EVEN PARITY =1 «, t00=0x0032, t01=0x0134}
0x4f5a…4f80              Head {h00=0x0022, h01=0x0050, text=» EX CWTCIS,A5 CIO START OUTPUT«, t00=0x0032, t01=0x0156}
0x4f80…4f92              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0032, t01=0x017c}
0x4f92…4fb8              Head {h00=0x0022, h01=0x0050, text=» EX CWTCIH,A5 CIO STOP OUTPUT «, t00=0x0032, t01=0x018e}
0x4fb8…4fc4              Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0033, t01=0x0024}
0x4fc4…4fd6              Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x0033, t01=0x0030}
0x4fd6…4fe8              Head {h00=0x000e, h01=0x0050, text=» RB AON010«, t00=0x0033, t01=0x0042}
0x4fe8…4ff6              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0033, t01=0x0054}
0x4ff6…5000              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0033, t01=0x0062}
0x5000…500a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0033, t01=0x006c}
0x500a…503e              Head {h00=0x0030, h01=0x002c, text=»********************************************«, t00=0x0033, t01=0x0076}
0x503e…5072              Head {h00=0x0030, h01=0x0050, text=»*   INTERRUPT ENTRY FROM ASCU4Z            *«, t00=0x0033, t01=0x00aa}
0x5072…50a6              Head {h00=0x0030, h01=0x002c, text=»********************************************«, t00=0x0033, t01=0x00de}
0x50a6…50b0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0033, t01=0x0112}
0x50b0…50ba              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0033, t01=0x011c}
0x50ba…50d2              Head {h00=0x0014, h01=0x0050, text=»*    I A S C U Z«, t00=0x0033, t01=0x0126}
0x50d2…50dc              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0033, t01=0x013e}
0x50dc…50fe              Head {h00=0x001e, h01=0x0050, text=»*    INTERRUPT FROM ASCU4Z«, t00=0x0033, t01=0x0148}
0x50fe…5108              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0033, t01=0x016a}
0x5108…511c              Head {h00=0x0010, h01=0x0050, text=»IASCUZ EQU *«, t00=0x0033, t01=0x0174}
0x511c…5144              Head {h00=0x0024, h01=0x0020, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0033, t01=0x0188}
0x5144…516a              Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0034, t01=0x0020}
0x516a…5190              Head {h00=0x0022, h01=0x0050, text=» LDK A7,0 RESET ASCU4Z-COUNTER«, t00=0x0034, t01=0x0046}
0x5190…51a4              Head {h00=0x0010, h01=0x0050, text=» LD A3,CHTAB«, t00=0x0034, t01=0x006c}
0x51a4…51c6              Head {h00=0x001e, h01=0x0050, text=» SUK A3,2 NUMBER OF LINES «, t00=0x0034, t01=0x0080}
0x51c6…51d8              Head {h00=0x000e, h01=0x0050, text=» RF IAS007«, t00=0x0034, t01=0x00a2}
0x51d8…51e2              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0034, t01=0x00b4}
0x51e2…51f0              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0034, t01=0x00be}
0x51f0…51fa              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0034, t01=0x00cc}
0x51fa…522e              Head {h00=0x0030, h01=0x002c, text=»*   GET CWT-ADDRESS FOR LINE 1. EXECUTE INR.«, t00=0x0034, t01=0x00d6}
0x522e…5238              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0034, t01=0x010a}
0x5238…524c              Head {h00=0x0010, h01=0x0050, text=»IAS005 EQU *«, t00=0x0034, t01=0x0114}
0x524c…526a              Head {h00=0x001a, h01=0x0050, text=» ADK A7,8 NEXT ASCU4Z «, t00=0x0034, t01=0x0128}
0x526a…527e              Head {h00=0x0010, h01=0x0050, text=»IAS007 EQU *«, t00=0x0034, t01=0x0146}
0x527e…5290              Head {h00=0x000e, h01=0x0050, text=» CWR A7,A3«, t00=0x0034, t01=0x015a}
0x5290…52ba              Head {h00=0x0026, h01=0x0050, text=» RF(NL) EXITL NOT VALID INTERRUPT «, t00=0x0034, t01=0x016c}
0x52ba…52ee              Head {h00=0x0030, h01=0x0050, text=» LD A5,CHTAB+2,A7 GET CWT-ADDRESS FOR LINE 1«, t00=0x0035, t01=0x0008}
0x52ee…5308              Head {h00=0x0016, h01=0x0011, text=» EX CWTINR,A5 INR «, t00=0x0035, t01=0x003c}
0x5308…531e              Head {h00=0x0012, h01=0x000e, text=» RF(NA) IAS080«, t00=0x0035, t01=0x0056}
0x531e…5328              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0035, t01=0x006c}
0x5328…5364              Head {h00=0x0038, h01=0x0033, text=»*   CORRECT CWT-ADDRESS WITH RESPECT TO LINE NUMBER «, t00=0x0035, t01=0x0076}
0x5364…536e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0035, t01=0x00b2}
0x536e…5382              Head {h00=0x0010, h01=0x000c, text=»IAS010 EQU *«, t00=0x0035, t01=0x00bc}
0x5382…53a0              Head {h00=0x001a, h01=0x0050, text=» LDR A5,A2 INPUT WORD «, t00=0x0035, t01=0x00d0}
0x53a0…53b2              Head {h00=0x000e, h01=0x0050, text=» SRL A5,7 «, t00=0x0035, t01=0x00ee}
0x53b2…53d4              Head {h00=0x001e, h01=0x001a, text=» ANK A5,/6 LINE NUMBER * 2«, t00=0x0035, t01=0x0100}
0x53d4…53e6              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A5«, t00=0x0035, t01=0x0122}
0x53e6…53f8              Head {h00=0x000e, h01=0x000a, text=» ADR A7,A5«, t00=0x0035, t01=0x0134}
0x53f8…5426              Head {h00=0x002a, h01=0x0050, text=» LD A5,CHTAB+2,A7 CORRECT CWT-ADDRESS «, t00=0x0035, t01=0x0146}
0x5426…5430              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0035, t01=0x0174}
0x5430…545e              Head {h00=0x002a, h01=0x0026, text=»*   CHECK IF EXPECTED COMMAND IS INPUT«, t00=0x0035, t01=0x017e}
0x545e…5468              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0036, t01=0x001c}
0x5468…547c              Head {h00=0x0010, h01=0x000c, text=»IAS015 EQU *«, t00=0x0036, t01=0x0026}
0x547c…548e              Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0036, t01=0x003a}
0x548e…54a2              Head {h00=0x0010, h01=0x0050, text=» ANK A1,/30 «, t00=0x0036, t01=0x004c}
0x54a2…54c6              Head {h00=0x0020, h01=0x0050, text=» SUK A1,/30 EXPECTED COMMAND«, t00=0x0036, t01=0x0060}
0x54c6…54e6              Head {h00=0x001c, h01=0x0050, text=» RF(NZ) IAS040 NOT INPUT«, t00=0x0036, t01=0x0084}
0x54e6…54f0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0036, t01=0x00a4}
0x54f0…54fe              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0036, t01=0x00ae}
0x54fe…5508              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0036, t01=0x00bc}
0x5508…5524              Head {h00=0x0018, h01=0x0013, text=»*   GET DWT-ADDRESS «, t00=0x0036, t01=0x00c6}
0x5524…552e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0036, t01=0x00e2}
0x552e…5542              Head {h00=0x0010, h01=0x000c, text=»IAS020 EQU *«, t00=0x0036, t01=0x00ec}
0x5542…555e              Head {h00=0x0018, h01=0x0050, text=» LDK A4,0 DEV NR * 2«, t00=0x0036, t01=0x0100}
0x555e…558c              Head {h00=0x002a, h01=0x0050, text=» CF A15,GETADR GET ADDRESS POINTER AND«, t00=0x0036, t01=0x011c}
0x558c…55aa              Head {h00=0x001a, h01=0x0050, text=»*   NUMBER OF DEVICES «, t00=0x0036, t01=0x014a}
0x55aa…55cc              Head {h00=0x001e, h01=0x0050, text=» LDR A4,A6 DEVICE COUNTER «, t00=0x0036, t01=0x0168}
0x55cc…55ee              Head {h00=0x001e, h01=0x0050, text=» LDR A8,A8 ADDRESS POINTER«, t00=0x0036, t01=0x018a}
0x55ee…5610              Head {h00=0x001e, h01=0x0050, text=» RF(Z) IAS032 NOT DEFINED «, t00=0x0037, t01=0x001c}
0x5610…5624              Head {h00=0x0010, h01=0x0050, text=»IAS025 EQU *«, t00=0x0037, t01=0x003e}
0x5624…5648              Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A8 GET DWT-ADDRESS «, t00=0x0037, t01=0x0052}
0x5648…566a              Head {h00=0x001e, h01=0x0050, text=» RF(Z) IAS030 NOT DEFINED «, t00=0x0037, t01=0x0076}
0x566a…5690              Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTST,A6 DEVICE STATUS «, t00=0x0037, t01=0x0098}
0x5690…56b2              Head {h00=0x001e, h01=0x0050, text=» ANK A1,/40 INPUT DEVICE? «, t00=0x0037, t01=0x00be}
0x56b2…56cc              Head {h00=0x0016, h01=0x0050, text=» RF(NZ) IAS035 YES«, t00=0x0037, t01=0x00e0}
0x56cc…56e0              Head {h00=0x0010, h01=0x0050, text=»IAS030 EQU *«, t00=0x0037, t01=0x00fa}
0x56e0…56fc              Head {h00=0x0018, h01=0x0050, text=» ADKL A8,2 NEXT DWT «, t00=0x0037, t01=0x010e}
0x56fc…5718              Head {h00=0x0018, h01=0x0050, text=» SUK A4,2 LAST DWT? «, t00=0x0037, t01=0x012a}
0x5718…5730              Head {h00=0x0014, h01=0x0050, text=» RB(P) IAS025 NO«, t00=0x0037, t01=0x0146}
0x5730…5744              Head {h00=0x0010, h01=0x0050, text=»IAS032 EQU *«, t00=0x0037, t01=0x015e}
0x5744…5762              Head {h00=0x001a, h01=0x0050, text=» LDR A1,A3 LINE NR * 2«, t00=0x0037, t01=0x0172}
0x5762…5782              Head {h00=0x001c, h01=0x0050, text=» ANK A1,2 HIGH LINE NR ?«, t00=0x0037, t01=0x0190}
0x5782…57ac              Head {h00=0x0026, h01=0x0050, text=» RF(NZ) EXITL YES, SKIP INTERRUPT «, t00=0x0038, t01=0x0020}
0x57ac…57d0              Head {h00=0x0020, h01=0x0050, text=» ADK A3,2 INCREMENT LINE NR «, t00=0x0038, t01=0x004a}
0x57d0…57e2              Head {h00=0x000e, h01=0x0050, text=» RB IAS020«, t00=0x0038, t01=0x006e}
0x57e2…57ec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0080}
0x57ec…5800              Head {h00=0x0010, h01=0x0050, text=»EXITL EQU * «, t00=0x0038, t01=0x008a}
0x5800…5816              Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0038, t01=0x009e}
0x5816…5842              Head {h00=0x0028, h01=0x0050, text=» CF A15,INFLG1 GET LINE INFORMATION «, t00=0x0038, t01=0x00b4}
0x5842…5866              Head {h00=0x0020, h01=0x0050, text=» CF A15,LOGG **LOGG INPUT** «, t00=0x0038, t01=0x00e0}
0x5866…5872              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0104}
0x5872…5884              Head {h00=0x000e, h01=0x0050, text=»EXIT EQU *«, t00=0x0038, t01=0x0110}
0x5884…5896              Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0038, t01=0x0122}
0x5896…58a0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0038, t01=0x0134}
0x58a0…58ae              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x013e}
0x58ae…58b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x014c}
0x58b8…58dc              Head {h00=0x0020, h01=0x0050, text=»*   RETURN TO DEVICE DRIVER «, t00=0x0038, t01=0x0156}
0x58dc…58e6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0038, t01=0x017a}
0x58e6…58fa              Head {h00=0x0010, h01=0x0050, text=»IAS035 EQU *«, t00=0x0038, t01=0x0184}
0x58fa…591e              Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0039, t01=0x0008}
0x591e…5928              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x002c}
0x5928…593e              Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0039, t01=0x0036}
0x593e…596a              Head {h00=0x0028, h01=0x0050, text=» CF A15,INFLG2 GET LINE INFORMATION «, t00=0x0039, t01=0x004c}
0x596a…5998              Head {h00=0x002a, h01=0x0050, text=» CF A15,LOGG **LOGG INPUT CHARACTER** «, t00=0x0039, t01=0x0078}
0x5998…59a4              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x00a6}
0x59a4…59ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00b2}
0x59ae…59c2              Head {h00=0x0010, h01=0x0050, text=»IAS038 EQU *«, t00=0x0039, t01=0x00bc}
0x59c2…59e6              Head {h00=0x0020, h01=0x0050, text=» ANK A2,/FF CLEAN CHARACTER «, t00=0x0039, t01=0x00d0}
0x59e6…5a0c              Head {h00=0x0022, h01=0x0050, text=» LD A7,DWTST,A6 DEVICE STATUS «, t00=0x0039, t01=0x00f4}
0x5a0c…5a30              Head {h00=0x0020, h01=0x0050, text=» ANK A7,/20 INPUT REQUESTED?«, t00=0x0039, t01=0x011a}
0x5a30…5a48              Head {h00=0x0014, h01=0x0050, text=» RF(Z) IAS039 NO«, t00=0x0039, t01=0x013e}
0x5a48…5a5e              Head {h00=0x0012, h01=0x0050, text=» LDKL A7,/FFDF«, t00=0x0039, t01=0x0156}
0x5a5e…5a94              Head {h00=0x0032, h01=0x0050, text=» ANS A7,DWTST,A6 RESET FLAG 'INPUT REQUESTED' «, t00=0x0039, t01=0x016c}
0x5a94…5abe              Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x003a, t01=0x0012}
0x5abe…5ac8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x003c}
0x5ac8…5ad6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003a, t01=0x0046}
0x5ad6…5ae0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0054}
0x5ae0…5b14              Head {h00=0x0030, h01=0x0050, text=»*   GO TO INTERRUPT ROUTINE OF DEVICE DRIVER«, t00=0x003a, t01=0x005e}
0x5b14…5b1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0092}
0x5b1e…5b32              Head {h00=0x0010, h01=0x0050, text=»IAS039 EQU *«, t00=0x003a, t01=0x009c}
0x5b32…5b58              Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTADR,A6 ADDRESS BLOCK«, t00=0x003a, t01=0x00b0}
0x5b58…5b8a              Head {h00=0x002e, h01=0x0050, text=» LD A1,INTADR,A1 INTERRUPT ENTRY DEFINED? «, t00=0x003a, t01=0x00d6}
0x5b8a…5bb0              Head {h00=0x0022, h01=0x0050, text=» RB(Z) EXIT NO, SKIP CHARACTER«, t00=0x003a, t01=0x0108}
0x5bb0…5bce              Head {h00=0x001a, h01=0x0050, text=» LDR A5,A6 DWT ADDRESS«, t00=0x003a, t01=0x012e}
0x5bce…5bf0              Head {h00=0x001e, h01=0x0050, text=» ADKL A5,DWTSB2 STACK BASE«, t00=0x003a, t01=0x014c}
0x5bf0…5c1e              Head {h00=0x002a, h01=0x0050, text=» ABR A1 DEVICE DRIVER INTERRUPT ENTRY «, t00=0x003a, t01=0x016e}
0x5c1e…5c28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x000c}
0x5c28…5c36              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003b, t01=0x0016}
0x5c36…5c40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0024}
0x5c40…5c6a              Head {h00=0x0026, h01=0x0050, text=»*   CHECK IF ANY CHARACTER TO SEND«, t00=0x003b, t01=0x002e}
0x5c6a…5c74              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0058}
0x5c74…5c88              Head {h00=0x0010, h01=0x0050, text=»IAS040 EQU *«, t00=0x003b, t01=0x0062}
0x5c88…5cac              Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A5 LAST OUTPUT DWT «, t00=0x003b, t01=0x0076}
0x5cac…5cc6              Head {h00=0x0016, h01=0x0050, text=» LC A2,CWTLON+1,A5«, t00=0x003b, t01=0x009a}
0x5cc6…5cda              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x003b, t01=0x00b4}
0x5cda…5d08              Head {h00=0x002a, h01=0x0050, text=» LD A7,DWTCP2,A6 CHANNEL PARAMETERS 2 «, t00=0x003b, t01=0x00c8}
0x5d08…5d2a              Head {h00=0x001e, h01=0x0050, text=» ANK A7,/3F DEVICE ADDRESS«, t00=0x003b, t01=0x00f6}
0x5d2a…5d58              Head {h00=0x002a, h01=0x0050, text=» SUK A7,DI OUTPUT TO KEYBOARD LAMPS ? «, t00=0x003b, t01=0x0118}
0x5d58…5d72              Head {h00=0x0016, h01=0x0050, text=» RF(Z) IAS050 YES «, t00=0x003b, t01=0x0146}
0x5d72…5d7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0160}
0x5d7c…5d8c              Head {h00=0x000c, h01=0x0050, text=»   U =6 «, t00=0x003b, t01=0x016a}
0x5d8c…5da0              Head {h00=0x0010, h01=0x0050, text=»IAS045 EQU *«, t00=0x003b, t01=0x017a}
0x5da0…5dc2              Head {h00=0x001e, h01=0x0050, text=» LDR A2,A2 SAVED CHARACTER«, t00=0x003b, t01=0x018e}
0x5dc2…5dea              Head {h00=0x0024, h01=0x0050, text=» RF(Z) IAS060 NO CHARACTER SAVED«, t00=0x003c, t01=0x0020}
0x5dea…5df4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0048}
0x5df4…5e02              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x0052}
0x5e02…5e0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0060}
0x5e0c…5e4a              Head {h00=0x003a, h01=0x0050, text=»*   OUTPUT SAVED CHARACTER AND RETURN TO DEVICE DRIVER«, t00=0x003c, t01=0x006a}
0x5e4a…5e54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00a8}
0x5e54…5e68              Head {h00=0x0010, h01=0x0050, text=»IAS050 EQU *«, t00=0x003c, t01=0x00b2}
0x5e68…5e8e              Head {h00=0x0022, h01=0x0050, text=» ANK A2,/7F CLEAN CHARACTER =5«, t00=0x003c, t01=0x00c6}
0x5e8e…5ea8              Head {h00=0x0016, h01=0x0050, text=» EX CWTOTR,A5 OTR «, t00=0x003c, t01=0x00ec}
0x5ea8…5ebc              Head {h00=0x0010, h01=0x0050, text=» RB(NA) EXIT«, t00=0x003c, t01=0x0106}
0x5ebc…5ec6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x011a}
0x5ec6…5edc              Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x003c, t01=0x0124}
0x5edc…5f08              Head {h00=0x0028, h01=0x0050, text=» CF A15,INFLG2 GET LINE INFORMATION «, t00=0x003c, t01=0x013a}
0x5f08…5f3a              Head {h00=0x002e, h01=0x0050, text=» CF A15,LOGG **LOGG OF OUTPUT CHARACTER** «, t00=0x003c, t01=0x0166}
0x5f3a…5f46              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x0008}
0x5f46…5f50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0014}
0x5f50…5f7c              Head {h00=0x0028, h01=0x0050, text=» LDR A7,A7 OUTPUT TO KEYBOARD LAMPS?«, t00=0x003d, t01=0x001e}
0x5f7c…5f96              Head {h00=0x0016, h01=0x0050, text=» RF(Z) IAS055 YES «, t00=0x003d, t01=0x004a}
0x5f96…5fa0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0064}
0x5fa0…5fd6              Head {h00=0x0032, h01=0x0050, text=» SC A2,DWTOCH,A6 STORE OUTPUT CHARACTER IN DWT«, t00=0x003d, t01=0x006e}
0x5fd6…5fe8              Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x003d, t01=0x00a4}
0x5fe8…6014              Head {h00=0x0028, h01=0x0050, text=» ST A2,CWTLON,A5 UPDATE LOC AND NOC «, t00=0x003d, t01=0x00b6}
0x6014…6028              Head {h00=0x0010, h01=0x0050, text=»IAS052 EQU *«, t00=0x003d, t01=0x00e2}
0x6028…6052              Head {h00=0x0026, h01=0x0050, text=» ABL NDREPO RETURN TO DEV. DRIVER «, t00=0x003d, t01=0x00f6}
0x6052…6072              Head {h00=0x001c, h01=0x0050, text=»*   WITH RET. CODE = OK «, t00=0x003d, t01=0x0120}
0x6072…6080              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003d, t01=0x0140}
0x6080…608a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x014e}
0x608a…60ae              Head {h00=0x0020, h01=0x0050, text=»*   OUTPUT TO KEYBOARD LAMPS«, t00=0x003d, t01=0x0158}
0x60ae…60b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x017c}
0x60b8…60cc              Head {h00=0x0010, h01=0x0050, text=»IAS055 EQU *«, t00=0x003d, t01=0x0186}
0x60cc…60e4              Head {h00=0x0014, h01=0x0050, text=» LC A4,CWTLON,A5«, t00=0x003e, t01=0x000a}
0x60e4…6112              Head {h00=0x002a, h01=0x0050, text=» ANK A4,/FF LAST OUTPUT CHARACTER = 0?«, t00=0x003e, t01=0x0022}
0x6112…613a              Head {h00=0x0024, h01=0x0050, text=» RF(NE) IAS060 NO, CODE /1C SENT«, t00=0x003e, t01=0x0050}
0x613a…6144              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0078}
0x6144…616e              Head {h00=0x0026, h01=0x0050, text=» LC A4,DWTOCH,A6 DATA TO KEYBOARD «, t00=0x003e, t01=0x0082}
0x616e…619c              Head {h00=0x002a, h01=0x0050, text=» SC A4,CWTLON+1,A5 STORE FOR NEXT OTR «, t00=0x003e, t01=0x00ac}
0x619c…61ca              Head {h00=0x002a, h01=0x0050, text=» SC A2,CWTLON,A5 STORE CODE /1C IN LOC«, t00=0x003e, t01=0x00da}
0x61ca…61da              Head {h00=0x000c, h01=0x0050, text=» RB EXIT«, t00=0x003e, t01=0x0108}
0x61da…61e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0118}
0x61e4…6214              Head {h00=0x002c, h01=0x0050, text=»*   HALT OUTPUT IF NO CHARACTER TO SEND «, t00=0x003e, t01=0x0122}
0x6214…621e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0152}
0x621e…6232              Head {h00=0x0010, h01=0x0050, text=»IAS060 EQU *«, t00=0x003e, t01=0x015c}
0x6232…6244              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x003e, t01=0x0170}
0x6244…626a              Head {h00=0x0022, h01=0x0050, text=» EX CWTCIH,A5 CIO HALT OUTPUT «, t00=0x003e, t01=0x0182}
0x626a…6278              Head {h00=0x000a, h01=0x0050, text=»    =5«, t00=0x003f, t01=0x0018}
0x6278…62a0              Head {h00=0x0024, h01=0x0050, text=» CM CWTLON,A5 CLEAR LOC AND NOC «, t00=0x003f, t01=0x0026}
0x62a0…62ae              Head {h00=0x000a, h01=0x0050, text=»    =5«, t00=0x003f, t01=0x004e}
0x62ae…62dc              Head {h00=0x002a, h01=0x0050, text=» LDR A7,A7 OUTPUT TO KEYBOARD LAMPS ? «, t00=0x003f, t01=0x005c}
0x62dc…630e              Head {h00=0x002e, h01=0x0050, text=» RB(Z) IAS052 YES, RETURN TO DEVICE DRIVER«, t00=0x003f, t01=0x008a}
0x630e…6318              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00bc}
0x6318…6328              Head {h00=0x000c, h01=0x0050, text=»   U =6 «, t00=0x003f, t01=0x00c6}
0x6328…634a              Head {h00=0x001e, h01=0x0050, text=» RB EXIT GO TO DISPATCHER «, t00=0x003f, t01=0x00d6}
0x634a…6354              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x003f, t01=0x00f8}
0x6354…6362              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x003f, t01=0x0102}
0x6362…636c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x003f, t01=0x0110}
0x636c…6384              Head {h00=0x0014, h01=0x0010, text=»*   CHECK STATUS«, t00=0x003f, t01=0x011a}
0x6384…638e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x003f, t01=0x0132}
0x638e…63a2              Head {h00=0x0010, h01=0x000c, text=»IAS080 EQU *«, t00=0x003f, t01=0x013c}
0x63a2…63c4              Head {h00=0x001e, h01=0x0019, text=» EX CWTSST,A5 SEND STATUS «, t00=0x003f, t01=0x0150}
0x63c4…63dc              Head {h00=0x0014, h01=0x0050, text=» ABL(NA) IAS005 «, t00=0x003f, t01=0x0172}
0x63dc…63e6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x003f, t01=0x018a}
0x63e6…6422 (64, 0, 400) Head {h00=0x0038, h01=0x0033, text=»*   CORRECT CWT-ADDRESS WITH RESPECT TO LINE NUMBER «, t00=0x0040, t01=0x0004}
0x6422…642c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0040, t01=0x0040}
0x642c…6440              Head {h00=0x0010, h01=0x000c, text=»IAS085 EQU *«, t00=0x0040, t01=0x004a}
0x6440…645e              Head {h00=0x001a, h01=0x0050, text=» LDR A5,A2 INPUT WORD «, t00=0x0040, t01=0x005e}
0x645e…6470              Head {h00=0x000e, h01=0x0050, text=» SRL A5,7 «, t00=0x0040, t01=0x007c}
0x6470…6492              Head {h00=0x001e, h01=0x001a, text=» ANK A5,/6 LINE NUMBER * 2«, t00=0x0040, t01=0x008e}
0x6492…64a4              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A5«, t00=0x0040, t01=0x00b0}
0x64a4…64b6              Head {h00=0x000e, h01=0x000a, text=» ADR A7,A5«, t00=0x0040, t01=0x00c2}
0x64b6…64e4              Head {h00=0x002a, h01=0x0050, text=» LD A5,CHTAB+2,A7 CORRECT CWT-ADDRESS «, t00=0x0040, t01=0x00d4}
0x64e4…64ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0102}
0x64ee…6504              Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0040, t01=0x010c}
0x6504…6530              Head {h00=0x0028, h01=0x0050, text=» CF A15,INFLG1 GET LINE INFORMATION «, t00=0x0040, t01=0x0122}
0x6530…6554              Head {h00=0x0020, h01=0x0050, text=» CF A15,LOGG **LOGG STATUS**«, t00=0x0040, t01=0x014e}
0x6554…6560              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x0172}
0x6560…656a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x017e}
0x656a…6590              Head {h00=0x0022, h01=0x0050, text=» LD A1,CWTST,A5 CHANNEL STATUS«, t00=0x0040, t01=0x0188}
0x6590…65bc              Head {h00=0x0028, h01=0x0050, text=» RF(N) IAS130 INITIATION ON CHANNEL «, t00=0x0041, t01=0x001e}
0x65bc…65c6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0041, t01=0x004a}
0x65c6…65ea              Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A5 LAST OUTPUT DWT «, t00=0x0041, t01=0x0054}
0x65ea…6606              Head {h00=0x0018, h01=0x0050, text=» RF(NZ) IAS087 * =2 «, t00=0x0041, t01=0x0078}
0x6606…662c              Head {h00=0x0022, h01=0x0050, text=» ANK A2,2 THROUGPUT ERROR? =2 «, t00=0x0041, t01=0x0094}
0x662c…6646              Head {h00=0x0016, h01=0x0050, text=» RB(Z) EXIT NO =2 «, t00=0x0041, t01=0x00ba}
0x6646…6668              Head {h00=0x001e, h01=0x0050, text=» LDK A1,/5 EVEN PARITY =2 «, t00=0x0041, t01=0x00d4}
0x6668…6690              Head {h00=0x0024, h01=0x0050, text=» EX CWTCIS,A5 CIO START INPUT =2«, t00=0x0041, t01=0x00f6}
0x6690…66a6              Head {h00=0x0012, h01=0x0050, text=» RB EXIT * =2 «, t00=0x0041, t01=0x011e}
0x66a6…66c0              Head {h00=0x0016, h01=0x0050, text=»IAS087 EQU * * =2 «, t00=0x0041, t01=0x0134}
0x66c0…66de              Head {h00=0x001a, h01=0x0050, text=» CMR A5 SET LINE FREE «, t00=0x0041, t01=0x014e}
0x66de…66e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x016c}
0x66e8…66f6              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0041, t01=0x0176}
0x66f6…6700              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0184}
0x6700…6724              Head {h00=0x0020, h01=0x0050, text=»*   CHECK IF CHARACTER SAVED«, t00=0x0041, t01=0x018e}
0x6724…672e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0022}
0x672e…6742              Head {h00=0x0010, h01=0x0050, text=»IAS090 EQU *«, t00=0x0042, t01=0x002c}
0x6742…675c              Head {h00=0x0016, h01=0x0050, text=» LC A2,CWTLON+1,A5«, t00=0x0042, t01=0x0040}
0x675c…6780              Head {h00=0x0020, h01=0x0050, text=» ANK A2,/FF SAVED CHARACTER?«, t00=0x0042, t01=0x005a}
0x6780…679a              Head {h00=0x0016, h01=0x0050, text=» RF(NZ) IAS105 YES«, t00=0x0042, t01=0x007e}
0x679a…67a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0098}
0x67a4…67c4              Head {h00=0x001c, h01=0x0050, text=»*   CHECK IF QUEUE EMPTY«, t00=0x0042, t01=0x00a2}
0x67c4…67ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00c2}
0x67ce…67e2              Head {h00=0x0010, h01=0x0050, text=»IAS100 EQU *«, t00=0x0042, t01=0x00cc}
0x67e2…6806              Head {h00=0x0020, h01=0x0050, text=» LD A6,CWTEQ,A5 OUTPUT QUEUE«, t00=0x0042, t01=0x00e0}
0x6806…6828              Head {h00=0x001e, h01=0x0050, text=» RF(Z) IAS110 QUEUE EMPTY «, t00=0x0042, t01=0x0104}
0x6828…6850              Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTOTQ,A6 GET QUEUE LINK «, t00=0x0042, t01=0x0126}
0x6850…6878              Head {h00=0x0024, h01=0x0050, text=» ST A2,CWTEQ,A5 STORE IT IN CWT «, t00=0x0042, t01=0x014e}
0x6878…689e              Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOCH,A6 GET CHARACTER«, t00=0x0042, t01=0x0176}
0x689e…68a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x000c}
0x68a8…68d8              Head {h00=0x002c, h01=0x0050, text=»*   SEND CHARACTER AND GO TO DISPATCHER «, t00=0x0043, t01=0x0016}
0x68d8…68e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0046}
0x68e2…68f6              Head {h00=0x0010, h01=0x0050, text=»IAS105 EQU *«, t00=0x0043, t01=0x0050}
0x68f6…691c              Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTASC SEND CHARACTER «, t00=0x0043, t01=0x0064}
0x691c…6930              Head {h00=0x0010, h01=0x0050, text=»IAS110 EQU *«, t00=0x0043, t01=0x008a}
0x6930…6952              Head {h00=0x001e, h01=0x0050, text=» RB EXIT GO TO DISPATCHER «, t00=0x0043, t01=0x009e}
0x6952…6960              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0043, t01=0x00c0}
0x6960…696a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00ce}
0x696a…69a4              Head {h00=0x0036, h01=0x0050, text=»*   RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE«, t00=0x0043, t01=0x00d8}
0x69a4…69da              Head {h00=0x0032, h01=0x0050, text=»*    ON ACTUAL LINE EXCEPT THOSE IN ECHO MODE «, t00=0x0043, t01=0x0112}
0x69da…69e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0148}
0x69e4…69ee              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0043, t01=0x0152}
0x69ee…6a02              Head {h00=0x0010, h01=0x0050, text=»IAS130 EQU *«, t00=0x0043, t01=0x015c}
0x6a02…6a3a              Head {h00=0x0034, h01=0x0050, text=» LDKL A1,/3FFF RESET BIT 'INPUT ON THIS LINE' =2«, t00=0x0043, t01=0x0170}
0x6a3a…6a68              Head {h00=0x002a, h01=0x0050, text=» ANS A1,CWTST,A5 RESET INITIATION BIT «, t00=0x0044, t01=0x0018}
0x6a68…6a7a              Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0044, t01=0x0046}
0x6a7a…6a90              Head {h00=0x0012, h01=0x0050, text=» CF A15,GETADR«, t00=0x0044, t01=0x0058}
0x6a90…6ab6              Head {h00=0x0022, h01=0x0050, text=» LDR A4,A7 CHTAB DISPLACEMENT «, t00=0x0044, t01=0x006e}
0x6ab6…6ad8              Head {h00=0x001e, h01=0x0050, text=» LDR A3,A6 DEVICE COUNTER «, t00=0x0044, t01=0x0094}
0x6ad8…6afa              Head {h00=0x001e, h01=0x0050, text=» LDR A7,A8 ADDRESS POINTER«, t00=0x0044, t01=0x00b6}
0x6afa…6b24              Head {h00=0x0026, h01=0x0050, text=» RB(Z) IAS100 EXIT IF NOT DEFINED «, t00=0x0044, t01=0x00d8}
0x6b24…6b38              Head {h00=0x0010, h01=0x0050, text=»IAS140 EQU *«, t00=0x0044, t01=0x0102}
0x6b38…6b5c              Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A7 GET DWT-ADDRESS «, t00=0x0044, t01=0x0116}
0x6b5c…6b78              Head {h00=0x0018, h01=0x0050, text=» RF(E) IAS160 NO DWT«, t00=0x0044, t01=0x013a}
0x6b78…6b8a              Head {h00=0x000e, h01=0x0050, text=» SRC A6,1 «, t00=0x0044, t01=0x0156}
0x6b8a…6ba0              Head {h00=0x0012, h01=0x0050, text=» RF(N) IAS160 «, t00=0x0044, t01=0x0168}
0x6ba0…6bb2              Head {h00=0x000e, h01=0x0050, text=» SLC A6,1 «, t00=0x0044, t01=0x017e}
0x6bb2…6bd8              Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTST,A6 DEVICE STATUS «, t00=0x0044, t01=0x0190}
0x6bd8…6bfa              Head {h00=0x001e, h01=0x0050, text=» ANK A1,/40 INPUT DEVICE ?«, t00=0x0045, t01=0x0026}
0x6bfa…6c12              Head {h00=0x0014, h01=0x0050, text=» RF(Z) IAS148 NO«, t00=0x0045, t01=0x0048}
0x6c12…6c20              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x0060}
0x6c20…6c2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x006e}
0x6c2a…6c74              Head {h00=0x0046, h01=0x0050, text=»*   INPUT DEVICE. START INPUT. SET MARKBIT FOR INPUT ON THIS LINE.«, t00=0x0045, t01=0x0078}
0x6c74…6c7e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00c2}
0x6c7e…6c92              Head {h00=0x0010, h01=0x0050, text=»IAS143 EQU *«, t00=0x0045, t01=0x00cc}
0x6c92…6cb8              Head {h00=0x0022, h01=0x0050, text=» LDR A1,A4 CHTAB DISPLACEMENT «, t00=0x0045, t01=0x00e0}
0x6cb8…6cca              Head {h00=0x000e, h01=0x0050, text=» ANK A1,2 «, t00=0x0045, t01=0x0106}
0x6cca…6cf0              Head {h00=0x0022, h01=0x0050, text=» RF(Z) IAS145 LOW LINE NUMBER «, t00=0x0045, t01=0x0118}
0x6cf0…6d1c              Head {h00=0x0028, h01=0x0050, text=» SUK A4,2 ADJUST TO LOW LINE NUMBER «, t00=0x0045, t01=0x013e}
0x6d1c…6d30              Head {h00=0x0010, h01=0x0050, text=»IAS145 EQU *«, t00=0x0045, t01=0x016a}
0x6d30…6d5a              Head {h00=0x0026, h01=0x0050, text=» LD A5,CHTAB+2,A4 GET CWT-ADDRESS «, t00=0x0045, t01=0x017e}
0x6d5a…6d80              Head {h00=0x0022, h01=0x0050, text=» LD A1,CWTST,A5 CHANNEL STATUS«, t00=0x0046, t01=0x0018}
0x6d80…6d92              Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x0046, t01=0x003e}
0x6d92…6dc6              Head {h00=0x0030, h01=0x0050, text=» RF(N) IAS150 INPUT ON THIS LINE ALREADY SET«, t00=0x0046, t01=0x0050}
0x6dc6…6ddc              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/4000«, t00=0x0046, t01=0x0084}
0x6ddc…6e12              Head {h00=0x0032, h01=0x0050, text=» ORS A1,CWTST,A5 SET BIT 'INPUT ON THIS LINE' «, t00=0x0046, t01=0x009a}
0x6e12…6e34              Head {h00=0x001e, h01=0x0050, text=» LDK A1,/5 EVEN PARITY =1 «, t00=0x0046, t01=0x00d0}
0x6e34…6e5a              Head {h00=0x0022, h01=0x0050, text=» EX CWTCIS,A5 CIO START INPUT «, t00=0x0046, t01=0x00f2}
0x6e5a…6e88              Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTCP2,A6 CHANNEL PARAMETERS 2 «, t00=0x0046, t01=0x0118}
0x6e88…6eaa              Head {h00=0x001e, h01=0x0050, text=» ANK A1,/3F DEVICE ADDRESS«, t00=0x0046, t01=0x0146}
0x6eaa…6ec8              Head {h00=0x001a, h01=0x0050, text=» SUK A1,KB KEYBOARD ? «, t00=0x0046, t01=0x0168}
0x6ec8…6ee2              Head {h00=0x0016, h01=0x0050, text=» RF(Z) IAS150 YES «, t00=0x0046, t01=0x0186}
0x6ee2…6ef0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x0010}
0x6ef0…6efa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x001e}
0x6efa…6f04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0028}
0x6f04…6f32              Head {h00=0x002a, h01=0x0050, text=»*   OUTPUT DEVICE. CHECK IF ECHO MODE.«, t00=0x0047, t01=0x0032}
0x6f32…6f3c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0060}
0x6f3c…6f50              Head {h00=0x0010, h01=0x0050, text=»IAS148 EQU *«, t00=0x0047, t01=0x006a}
0x6f50…6f5e              Head {h00=0x000a, h01=0x0050, text=»    =5«, t00=0x0047, t01=0x007e}
0x6f5e…6f76              Head {h00=0x0014, h01=0x0050, text=» LC A1,DWTST,A6 «, t00=0x0047, t01=0x008c}
0x6f76…6f96              Head {h00=0x001c, h01=0x0050, text=» ANK A1,/20 ECHO MODE ? «, t00=0x0047, t01=0x00a4}
0x6f96…6fb0              Head {h00=0x0016, h01=0x0050, text=» RF(NE) IAS160 YES«, t00=0x0047, t01=0x00c4}
0x6fb0…6fba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00de}
0x6fba…6fdc              Head {h00=0x001e, h01=0x0050, text=»*   GO TO RECOVERY ROUTINE«, t00=0x0047, t01=0x00e8}
0x6fdc…6fe6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x010a}
0x6fe6…6ffa              Head {h00=0x0010, h01=0x0050, text=»IAS150 EQU *«, t00=0x0047, t01=0x0114}
0x6ffa…701a              Head {h00=0x001c, h01=0x0050, text=» LDK A4,1 RECOVERY CAUSE«, t00=0x0047, t01=0x0128}
0x701a…7046              Head {h00=0x0028, h01=0x0050, text=» CF A15,NDREDW CALL RECOVERY ROUTINE«, t00=0x0047, t01=0x0148}
0x7046…705a              Head {h00=0x0010, h01=0x0050, text=»IAS160 EQU *«, t00=0x0047, t01=0x0174}
0x705a…706c              Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0047, t01=0x0188}
0x706c…7092              Head {h00=0x0022, h01=0x0050, text=» SUK A3,2 ALL DEVICES TREATED?«, t00=0x0048, t01=0x000a}
0x7092…70b6              Head {h00=0x0020, h01=0x0050, text=» RB(NE) IAS140 NO TAKE NEXT «, t00=0x0048, t01=0x0030}
0x70b6…70ea              Head {h00=0x0030, h01=0x0050, text=» RB IAS100 CHECK QUEUE AND GO TO DISPATCHER «, t00=0x0048, t01=0x0054}
0x70ea…70f8              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0048, t01=0x0088}
0x70f8…7102              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0048, t01=0x0096}
0x7102…711a              Head {h00=0x0014, h01=0x0050, text=»*    O U T A S C«, t00=0x0048, t01=0x00a0}
0x711a…7124              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0048, t01=0x00b8}
0x7124…715a              Head {h00=0x0032, h01=0x0050, text=»*   SUBROUTINE TO SEND A CHARACTER VIA ASCU4Z «, t00=0x0048, t01=0x00c2}
0x715a…7170              Head {h00=0x0012, h01=0x000d, text=»*   ON ENTRY: «, t00=0x0048, t01=0x00f8}
0x7170…717a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x010e}
0x717a…71ac              Head {h00=0x002e, h01=0x002a, text=»*      A2 = OUTPUT CHARACTER IN RIGHT BYTE«, t00=0x0048, t01=0x0118}
0x71ac…71cc              Head {h00=0x001c, h01=0x0017, text=»*      A6 = DWT ADDRESS «, t00=0x0048, t01=0x014a}
0x71cc…71d6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0048, t01=0x016a}
0x71d6…71ea              Head {h00=0x0010, h01=0x0050, text=»OUTASC EQU *«, t00=0x0048, t01=0x0174}
0x71ea…71fe              Head {h00=0x0010, h01=0x000b, text=» ANK A2,/FF «, t00=0x0048, t01=0x0188}
0x71fe…7224              Head {h00=0x0022, h01=0x0050, text=» CF A15,GETCWT GET CWT-ADDRESS«, t00=0x0049, t01=0x000c}
0x7224…722e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0032}
0x722e…726a              Head {h00=0x0038, h01=0x0050, text=»*   CHECK IF LINE FREE OR OCCUPIED WITH SAME DEVICE «, t00=0x0049, t01=0x003c}
0x726a…7274              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0078}
0x7274…7288              Head {h00=0x0010, h01=0x0050, text=»OUA010 EQU *«, t00=0x0049, t01=0x0082}
0x7288…729a              Head {h00=0x000e, h01=0x0050, text=» INH   =5 «, t00=0x0049, t01=0x0096}
0x729a…72c0              Head {h00=0x0022, h01=0x0050, text=» LD A1,CWTST,A5 CHANNEL STATUS«, t00=0x0049, t01=0x00a8}
0x72c0…72ec              Head {h00=0x0028, h01=0x0050, text=» RF(N) OUA020 INITIATION ON CHANNEL «, t00=0x0049, t01=0x00ce}
0x72ec…72f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00fa}
0x72f6…7314              Head {h00=0x001a, h01=0x0050, text=» LDR* A4,A5 LINE FREE?«, t00=0x0049, t01=0x0104}
0x7314…732e              Head {h00=0x0016, h01=0x0050, text=» RF(Z) OUA030 YES «, t00=0x0049, t01=0x0122}
0x732e…7338              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x013c}
0x7338…7358              Head {h00=0x001c, h01=0x0050, text=» CWR A4,A6 SAME DEVICE? «, t00=0x0049, t01=0x0146}
0x7358…7372              Head {h00=0x0016, h01=0x0050, text=» RF(E) OUA045 YES «, t00=0x0049, t01=0x0166}
0x7372…737c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0180}
0x737c…7390              Head {h00=0x0010, h01=0x0050, text=»OUA020 EQU *«, t00=0x0049, t01=0x018a}
0x7390…73a6              Head {h00=0x0012, h01=0x0050, text=» CF A15,QUEUE «, t00=0x004a, t01=0x000e}
0x73a6…73dc              Head {h00=0x0032, h01=0x0050, text=» SC A2,DWTOCH,A6 STORE OUTPUT CHARACTER IN DWT«, t00=0x004a, t01=0x0024}
0x73dc…73ee              Head {h00=0x000e, h01=0x0050, text=» RF OUA050«, t00=0x004a, t01=0x005a}
0x73ee…73f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x006c}
0x73f8…7406              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004a, t01=0x0076}
0x7406…7410              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0084}
0x7410…7430              Head {h00=0x001c, h01=0x0050, text=»*   START OUTPUT ON LINE«, t00=0x004a, t01=0x008e}
0x7430…743a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00ae}
0x743a…744e              Head {h00=0x0010, h01=0x0050, text=»OUA030 EQU *«, t00=0x004a, t01=0x00b8}
0x744e…7480              Head {h00=0x002e, h01=0x0050, text=» LD A1,PFPOST PWF POST PROCESSING FLAG =3 «, t00=0x004a, t01=0x00cc}
0x7480…74a8              Head {h00=0x0024, h01=0x0050, text=» RF(NZ) OUA035 PFINIT PENDING =3«, t00=0x004a, t01=0x00fe}
0x74a8…74b6              Head {h00=0x000a, h01=0x0050, text=»    =5«, t00=0x004a, t01=0x0126}
0x74b6…74d8              Head {h00=0x001e, h01=0x0050, text=» LDK A1,/4 EVEN PARITY =1 «, t00=0x004a, t01=0x0134}
0x74d8…74fe              Head {h00=0x0022, h01=0x0050, text=» EX CWTCIS,A5 CIO START OUTPUT«, t00=0x004a, t01=0x0156}
0x74fe…7512              Head {h00=0x0010, h01=0x0050, text=»OUA035 EQU *«, t00=0x004a, t01=0x017c}
0x7512…753a              Head {h00=0x0024, h01=0x0050, text=» STR A6,A5 STORE LAST DWT IN CWT«, t00=0x004a, t01=0x0190}
0x753a…7544              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0028}
0x7544…756a              Head {h00=0x0022, h01=0x0050, text=»*   SAVE CHARACTER FOR OUTPUT «, t00=0x004b, t01=0x0032}
0x756a…7574              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0058}
0x7574…7588              Head {h00=0x0010, h01=0x0050, text=»OUA040 EQU *«, t00=0x004b, t01=0x0062}
0x7588…75b6              Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTCP2,A6 CHANNEL PARAMETERS 2 «, t00=0x004b, t01=0x0076}
0x75b6…75d8              Head {h00=0x001e, h01=0x0050, text=» ANK A1,/3F DEVICE ADDRESS«, t00=0x004b, t01=0x00a4}
0x75d8…7606              Head {h00=0x002a, h01=0x0050, text=» SUK A1,DI OUTPUT TO KEYBOARD LAMPS ? «, t00=0x004b, t01=0x00c6}
0x7606…7620              Head {h00=0x0016, h01=0x0050, text=» RF(NZ) OUA045 NO «, t00=0x004b, t01=0x00f4}
0x7620…762a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x010e}
0x762a…7662              Head {h00=0x0034, h01=0x0050, text=» SC A2,DWTOCH,A6 STORE DATA FOR KEYBOARD IN DWT «, t00=0x004b, t01=0x0118}
0x7662…7690              Head {h00=0x002a, h01=0x0050, text=» LDK A2,/1C CODE FOR DATA TO KEYBOARD «, t00=0x004b, t01=0x0150}
0x7690…769a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x017e}
0x769a…76ae              Head {h00=0x0010, h01=0x0050, text=»OUA045 EQU *«, t00=0x004b, t01=0x0188}
0x76ae…76e2              Head {h00=0x0030, h01=0x0050, text=» ORK A2,/80 INDICATE SOMETHING FOR OUTPUT =5«, t00=0x004c, t01=0x000c}
0x76e2…76fc              Head {h00=0x0016, h01=0x0050, text=» SC A2,CWTLON+1,A5«, t00=0x004c, t01=0x0040}
0x76fc…7710              Head {h00=0x0010, h01=0x0050, text=»OUA050 EQU *«, t00=0x004c, t01=0x005a}
0x7710…7720              Head {h00=0x000c, h01=0x0050, text=»   * =4 «, t00=0x004c, t01=0x006e}
0x7720…7732              Head {h00=0x000e, h01=0x0050, text=» INH  * =4«, t00=0x004c, t01=0x007e}
0x7732…775e              Head {h00=0x0028, h01=0x0050, text=» ADKL A15,2 ADJUST STACK POINTER =4 «, t00=0x004c, t01=0x0090}
0x775e…777c              Head {h00=0x001a, h01=0x0050, text=» LDR* P,A15 RETURN =4 «, t00=0x004c, t01=0x00bc}
0x777c…778a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x00da}
0x778a…7794              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x00e8}
0x7794…77ac              Head {h00=0x0014, h01=0x0050, text=»*   G E T C W T «, t00=0x004c, t01=0x00f2}
0x77ac…77b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x010a}
0x77b6…77f6              Head {h00=0x003c, h01=0x0050, text=»*   SUBROUTINE TO GET CWT-ADDRESS TO CURRENT OUTPUT LINE«, t00=0x004c, t01=0x0114}
0x77f6…7800              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0154}
0x7800…7816              Head {h00=0x0012, h01=0x0050, text=»*   ON ENTRY: «, t00=0x004c, t01=0x015e}
0x7816…7820              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0174}
0x7820…7840              Head {h00=0x001c, h01=0x0050, text=»*      A6 = DWT-ADDRESS «, t00=0x004c, t01=0x017e}
0x7840…784a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x000e}
0x784a…785e              Head {h00=0x0010, h01=0x0050, text=»*   ON EXIT:«, t00=0x004d, t01=0x0018}
0x785e…7868              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x002c}
0x7868…7888              Head {h00=0x001c, h01=0x0050, text=»*      A5 = CWT-ADDRESS «, t00=0x004d, t01=0x0036}
0x7888…78aa              Head {h00=0x001e, h01=0x0050, text=»*      A1,A4 ARE DESTROYED«, t00=0x004d, t01=0x0056}
0x78aa…78b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0078}
0x78b4…78c8              Head {h00=0x0010, h01=0x0050, text=»GETCWT EQU *«, t00=0x004d, t01=0x0082}
0x78c8…78f0              Head {h00=0x0024, h01=0x0050, text=» LDR* A1,A6 CHANNEL PARAMETERS 1«, t00=0x004d, t01=0x0096}
0x78f0…7916              Head {h00=0x0022, h01=0x0050, text=» ANK A1,/7 CHANNEL UNIT INDEX «, t00=0x004d, t01=0x00be}
0x7916…7928              Head {h00=0x000e, h01=0x0050, text=» SLL A1,2 «, t00=0x004d, t01=0x00e4}
0x7928…7958              Head {h00=0x002c, h01=0x0050, text=» LC A5,DWTCP2,A6 LEFT BYTE OF CH. PAR. 2«, t00=0x004d, t01=0x00f6}
0x7958…7976              Head {h00=0x001a, h01=0x0050, text=» ANK A5,/3 WS-ADDRESS «, t00=0x004d, t01=0x0126}
0x7976…79aa              Head {h00=0x0030, h01=0x0050, text=» ORR A1,A5 COMBINE CH.UN. INDEX AND WS-ADDR «, t00=0x004d, t01=0x0144}
0x79aa…79d0              Head {h00=0x0022, h01=0x0050, text=» SLL A1,1 MAKE INDEX FOR CHTAB«, t00=0x004d, t01=0x0178}
0x79d0…79fa              Head {h00=0x0026, h01=0x0050, text=» LD A5,CHTAB+2,A1 GET CWT-ADDRESS «, t00=0x004e, t01=0x000e}
0x79fa…7a1c              Head {h00=0x001e, h01=0x0050, text=» LDR A4,A1 LINE NUMBER * 2«, t00=0x004e, t01=0x0038}
0x7a1c…7a2e              Head {h00=0x000e, h01=0x0050, text=» ANK A4,2 «, t00=0x004e, t01=0x005a}
0x7a2e…7a56              Head {h00=0x0024, h01=0x0050, text=» RF(NZ) GTC010 HIGH LINE NUMBER «, t00=0x004e, t01=0x006c}
0x7a56…7a7c              Head {h00=0x0022, h01=0x0050, text=» LD A4,CWTST,A5 CHANNEL STATUS«, t00=0x004e, t01=0x0094}
0x7a7c…7a8e              Head {h00=0x000e, h01=0x0050, text=» SLL A4,1 «, t00=0x004e, t01=0x00ba}
0x7a8e…7aba              Head {h00=0x0028, h01=0x0050, text=» RF(NN) GTC010 NO INPUT ON THIS LINE«, t00=0x004e, t01=0x00cc}
0x7aba…7af0              Head {h00=0x0032, h01=0x0050, text=» LD A5,CHTAB+4,A1 GET CWT-ADDRESS ON HIGH LINE«, t00=0x004e, t01=0x00f8}
0x7af0…7b04              Head {h00=0x0010, h01=0x0050, text=»GTC010 EQU *«, t00=0x004e, t01=0x012e}
0x7b04…7b14              Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x004e, t01=0x0142}
0x7b14…7b1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0152}
0x7b1e…7b2c              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x004e, t01=0x015c}
0x7b2c…7b36              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x004e, t01=0x016a}
0x7b36…7b40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0174}
0x7b40…7b56              Head {h00=0x0012, h01=0x0050, text=»*   Q U E U E «, t00=0x004e, t01=0x017e}
0x7b56…7b60 (79, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0004}
0x7b60…7b8e              Head {h00=0x002a, h01=0x0050, text=»*   SUBROUTINE TO QUEUE AN OUTPUT DWT «, t00=0x004f, t01=0x000e}
0x7b8e…7b98              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x003c}
0x7b98…7bae              Head {h00=0x0012, h01=0x0050, text=»*   ON ENTRY: «, t00=0x004f, t01=0x0046}
0x7bae…7bce              Head {h00=0x001c, h01=0x0050, text=»*      A5 = CWT ADDRESS «, t00=0x004f, t01=0x005c}
0x7bce…7bee              Head {h00=0x001c, h01=0x0050, text=»*      A6 = DWT ADDRESS «, t00=0x004f, t01=0x007c}
0x7bee…7bf8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x009c}
0x7bf8…7c02              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x004f, t01=0x00a6}
0x7c02…7c16              Head {h00=0x0010, h01=0x0050, text=»QUEUE EQU * «, t00=0x004f, t01=0x00b0}
0x7c16…7c3a              Head {h00=0x0020, h01=0x001c, text=» LD A4,CWTEQ,A5 OUTPUT QUEUE«, t00=0x004f, t01=0x00c4}
0x7c3a…7c50              Head {h00=0x0012, h01=0x0050, text=» RF(E) QUE020 «, t00=0x004f, t01=0x00e8}
0x7c50…7c64              Head {h00=0x0010, h01=0x0050, text=»QUE010 EQU *«, t00=0x004f, t01=0x00fe}
0x7c64…7c76              Head {h00=0x000e, h01=0x000a, text=» CWR A6,A4«, t00=0x004f, t01=0x0112}
0x7c76…7ca8              Head {h00=0x002e, h01=0x0050, text=» RF(E) QUE050 THIS DWT IS ALREADY IN QUEUE«, t00=0x004f, t01=0x0124}
0x7ca8…7cc0              Head {h00=0x0014, h01=0x0010, text=» LD A3,DWTOTQ,A4«, t00=0x004f, t01=0x0156}
0x7cc0…7cea              Head {h00=0x0026, h01=0x0050, text=» RF(E) QUE030 END OF THREAD FOUND «, t00=0x004f, t01=0x016e}
0x7cea…7d0e              Head {h00=0x0020, h01=0x001c, text=» LDR A4,A3 FOLLOW THE THREAD«, t00=0x0050, t01=0x0008}
0x7d0e…7d20              Head {h00=0x000e, h01=0x0050, text=» RB QUE010«, t00=0x0050, t01=0x002c}
0x7d20…7d34              Head {h00=0x0010, h01=0x0050, text=»QUE020 EQU *«, t00=0x0050, t01=0x003e}
0x7d34…7d56              Head {h00=0x001e, h01=0x0019, text=» ST A6,CWTEQ,A5 QUEUE DWT «, t00=0x0050, t01=0x0052}
0x7d56…7d68              Head {h00=0x000e, h01=0x0050, text=» RF QUE040«, t00=0x0050, t01=0x0074}
0x7d68…7d7c              Head {h00=0x0010, h01=0x0050, text=»QUE030 EQU *«, t00=0x0050, t01=0x0086}
0x7d7c…7d9e              Head {h00=0x001e, h01=0x001a, text=» ST A6,DWTOTQ,A4 QUEUE DWT«, t00=0x0050, t01=0x009a}
0x7d9e…7dcc              Head {h00=0x002a, h01=0x0050, text=»QUE040 CM DWTOTQ,A6 SET END OF THREAD «, t00=0x0050, t01=0x00bc}
0x7dcc…7de0              Head {h00=0x0010, h01=0x0050, text=»QUE050 EQU *«, t00=0x0050, t01=0x00ea}
0x7de0…7df4              Head {h00=0x0010, h01=0x0050, text=» ADKL A15,2 «, t00=0x0050, t01=0x00fe}
0x7df4…7e0e              Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0050, t01=0x0112}
0x7e0e…7e1c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0050, t01=0x012c}
0x7e1c…7e26              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x013a}
0x7e26…7e30              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0144}
0x7e30…7e44              Head {h00=0x0010, h01=0x0050, text=»*   L O G G «, t00=0x0050, t01=0x014e}
0x7e44…7e4e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0162}
0x7e4e…7e8a              Head {h00=0x0038, h01=0x0050, text=»*   IF CONDITIONALY ASSEMBLY IS SET EVERY INPUT AND «, t00=0x0050, t01=0x016c}
0x7e8a…7eb2              Head {h00=0x0024, h01=0x0050, text=»*   OUTPUT CHARACTER ARE LOGGED «, t00=0x0051, t01=0x0018}
0x7eb2…7ebc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0040}
0x7ebc…7ec6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x004a}
0x7ec6…7ed0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0054}
0x7ed0…7ee6              Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0051, t01=0x005e}
0x7ee6…7ef0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0074}
0x7ef0…7f08              Head {h00=0x0014, h01=0x0050, text=»LOGG STR A1,A15 «, t00=0x0051, t01=0x007e}
0x7f08…7f1c              Head {h00=0x0010, h01=0x0050, text=» LD A1,POINT«, t00=0x0051, t01=0x0096}
0x7f1c…7f2e              Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0051, t01=0x00aa}
0x7f2e…7f58              Head {h00=0x0026, h01=0x0050, text=» CWK A1,BUFE BUFE IS MAX LOGG AREA«, t00=0x0051, t01=0x00bc}
0x7f58…7f6a              Head {h00=0x000e, h01=0x0050, text=» RF(NE) L1«, t00=0x0051, t01=0x00e6}
0x7f6a…7f96              Head {h00=0x0028, h01=0x0050, text=» LDKL A1,BUF SET FIRST LOGG ADDRESS «, t00=0x0051, t01=0x00f8}
0x7f96…7fac              Head {h00=0x0012, h01=0x0050, text=»L1 ST A1,POINT«, t00=0x0051, t01=0x0124}
0x7fac…7fde              Head {h00=0x002e, h01=0x0050, text=» STR A2,A1 LOGG OF INR OR OTR INSTRUCTION «, t00=0x0051, t01=0x013a}
0x7fde…7ff2              Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0051, t01=0x016c}
0x7ff2…8006              Head {h00=0x0010, h01=0x0050, text=» ADKL A15,2 «, t00=0x0051, t01=0x0180}
0x8006…8020 (82, 0, 398) Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0052, t01=0x0004}
0x8020…802a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x001e}
0x802a…8034              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0028}
0x8034…8058              Head {h00=0x0020, h01=0x0050, text=»POINT DATA BUF LOGG POINTER «, t00=0x0052, t01=0x0032}
0x8058…8062              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0056}
0x8062…8080              Head {h00=0x001a, h01=0x0050, text=»BUF RES 250 LOGG AREA «, t00=0x0052, t01=0x0060}
0x8080…8092              Head {h00=0x000e, h01=0x0050, text=»BUFE EQU *«, t00=0x0052, t01=0x007e}
0x8092…809c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0090}
0x809c…80a8              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x009a}
0x80a8…80b6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x00a6}
0x80b6…80c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00b4}
0x80c0…80d8              Head {h00=0x0014, h01=0x0050, text=»*   I N F L G 1 «, t00=0x0052, t01=0x00be}
0x80d8…80e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00d6}
0x80e2…8128              Head {h00=0x0042, h01=0x0050, text=»*   SUBROUTINE TO GET INFORMATION ABOUT CHANNEL UNIT INDEX AND«, t00=0x0052, t01=0x00e0}
0x8128…815a              Head {h00=0x002e, h01=0x0050, text=»*   WORK STATION ADDRESS FOR USE IN LOGG. «, t00=0x0052, t01=0x0126}
0x815a…818e              Head {h00=0x0030, h01=0x0050, text=»*   THE INFORMATION IS ADDED TO REGISTER A2 «, t00=0x0052, t01=0x0158}
0x818e…8198              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x018c}
0x8198…81c8              Head {h00=0x002c, h01=0x0050, text=»*   CH. UNIT INDEX IS STORED IN BITS 3-5«, t00=0x0053, t01=0x0008}
0x81c8…81f8              Head {h00=0x002c, h01=0x0050, text=»*   WORK ST. ADDR. IS STORED IN BITS 6-7«, t00=0x0053, t01=0x0038}
0x81f8…821c              Head {h00=0x0020, h01=0x0050, text=»*   BITS 0-2 ARE SET TO ZERO«, t00=0x0053, t01=0x0068}
0x821c…8226              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x008c}
0x8226…823c              Head {h00=0x0012, h01=0x0050, text=»*   ON ENTRY: «, t00=0x0053, t01=0x0096}
0x823c…8246              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00ac}
0x8246…826a              Head {h00=0x0020, h01=0x0050, text=»*      A2 = INPUT CHARACTER «, t00=0x0053, t01=0x00b6}
0x826a…828a              Head {h00=0x001c, h01=0x0050, text=»*      A7 = LINE NR * 2 «, t00=0x0053, t01=0x00da}
0x828a…8294              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00fa}
0x8294…82a8              Head {h00=0x0010, h01=0x0050, text=»*   ON EXIT:«, t00=0x0053, t01=0x0104}
0x82a8…82b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0118}
0x82b2…82e8              Head {h00=0x0032, h01=0x0050, text=»*      A2 = INPUT WORD WITH ADDED INFORMATION «, t00=0x0053, t01=0x0122}
0x82e8…82f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0158}
0x82f2…8308              Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0053, t01=0x0162}
0x8308…8312              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0178}
0x8312…8326              Head {h00=0x0010, h01=0x0050, text=»INFLG1 EQU *«, t00=0x0053, t01=0x0182}
0x8326…833a              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0054, t01=0x0008}
0x833a…834c              Head {h00=0x000e, h01=0x0050, text=» SLL A7,7 «, t00=0x0054, t01=0x001c}
0x834c…8376              Head {h00=0x0026, h01=0x0050, text=» ORR A2,A7 COMBINE WITH CHARACTER «, t00=0x0054, t01=0x002e}
0x8376…8388              Head {h00=0x000e, h01=0x0050, text=» SRL A7,7 «, t00=0x0054, t01=0x0058}
0x8388…8398              Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0054, t01=0x006a}
0x8398…83a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x007a}
0x83a2…83ae              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x0084}
0x83ae…83bc              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0054, t01=0x0090}
0x83bc…83c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x009e}
0x83c6…83de              Head {h00=0x0014, h01=0x0050, text=»*   I N F L G 2 «, t00=0x0054, t01=0x00a8}
0x83de…83e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00c0}
0x83e8…842c              Head {h00=0x0040, h01=0x0050, text=»*   SUBROUTINE TO GET INFORMATION ABOUT CHANNEL UNIT INDEX, «, t00=0x0054, t01=0x00ca}
0x842c…8470              Head {h00=0x0040, h01=0x0050, text=»*   WORK STATION ADDRESS AND DEVICE ADDRESS FOR USE IN LOGG.«, t00=0x0054, t01=0x010e}
0x8470…84b6              Head {h00=0x0042, h01=0x0050, text=»*   THE INFORMATION IS TAKEN FROM CHANNEL PARAMETERS AND ADDED«, t00=0x0054, t01=0x0152}
0x84b6…84d2              Head {h00=0x0018, h01=0x0050, text=»*   TO REGISTER A2. «, t00=0x0055, t01=0x0008}
0x84d2…8502              Head {h00=0x002c, h01=0x0050, text=»*   DEVICE ADDRESS IS STORED IN BITS 0-2«, t00=0x0055, t01=0x0024}
0x8502…8532              Head {h00=0x002c, h01=0x0050, text=»*   CH. UNIT INDEX IS STORED IN BITS 3-5«, t00=0x0055, t01=0x0054}
0x8532…8562              Head {h00=0x002c, h01=0x0050, text=»*   WORK ST. ADDR. IS STORED IN BITS 6-7«, t00=0x0055, t01=0x0084}
0x8562…856c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00b4}
0x856c…8582              Head {h00=0x0012, h01=0x0050, text=»*   ON ENTRY: «, t00=0x0055, t01=0x00be}
0x8582…858c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00d4}
0x858c…85b0              Head {h00=0x0020, h01=0x0050, text=»*      A2 = INPUT CHARACTER «, t00=0x0055, t01=0x00de}
0x85b0…85ce              Head {h00=0x001a, h01=0x0050, text=»*      A6 =DWT ADDRESS«, t00=0x0055, t01=0x0102}
0x85ce…85d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0120}
0x85d8…85ec              Head {h00=0x0010, h01=0x0050, text=»*   ON EXIT:«, t00=0x0055, t01=0x012a}
0x85ec…85f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x013e}
0x85f6…862c              Head {h00=0x0032, h01=0x0050, text=»*      A2 = INPUT WORD WITH ADDED INFORMATION «, t00=0x0055, t01=0x0148}
0x862c…864a              Head {h00=0x001a, h01=0x0050, text=»*      A4 IS DESTROYED«, t00=0x0055, t01=0x017e}
0x864a…8654              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x000c}
0x8654…866a              Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0056, t01=0x0016}
0x866a…867e              Head {h00=0x0010, h01=0x0050, text=»INFLG2 EQU *«, t00=0x0056, t01=0x002c}
0x867e…8698              Head {h00=0x0016, h01=0x0050, text=» ANK A2,/FF CLEAN «, t00=0x0056, t01=0x0040}
0x8698…86c4              Head {h00=0x0028, h01=0x0050, text=» LDR* A4,A6 GET CHANNEL PARAMETERS 1«, t00=0x0056, t01=0x005a}
0x86c4…86ea              Head {h00=0x0022, h01=0x0050, text=» ANK A4,/7 CHANNEL UNIT INDEX «, t00=0x0056, t01=0x0086}
0x86ea…86fc              Head {h00=0x000e, h01=0x0050, text=» SRC A4,3 «, t00=0x0056, t01=0x00ac}
0x86fc…8730              Head {h00=0x0030, h01=0x0050, text=» LC A4,DWTCP2+1,A6 RIGHT BYTE OF CH. PAR. 2 «, t00=0x0056, t01=0x00be}
0x8730…8742              Head {h00=0x000e, h01=0x0050, text=» SRC A4,3 «, t00=0x0056, t01=0x00f2}
0x8742…8774              Head {h00=0x002e, h01=0x0050, text=» ANKL A4,/FC00 DEV.ADDR AND CH. UNIT INDEX«, t00=0x0056, t01=0x0104}
0x8774…879e              Head {h00=0x0026, h01=0x0050, text=» ORR A2,A4 COMBINE WITH CHARACTER «, t00=0x0056, t01=0x0136}
0x879e…87cc              Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTCP2,A6 CHANNEL PARAMETERS 2 «, t00=0x0056, t01=0x0160}
0x87cc…87f6              Head {h00=0x0026, h01=0x0050, text=» ANKL A4,/300 WORK STATION ADDRESS«, t00=0x0056, t01=0x018e}
0x87f6…8820              Head {h00=0x0026, h01=0x0050, text=» ORR A2,A4 COMBINE WITH CHARACTER «, t00=0x0057, t01=0x0028}
0x8820…8830              Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0057, t01=0x0052}
0x8830…883c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x0062}
0x883c…884a              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0057, t01=0x006e}
0x884a…8854              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x007c}
0x8854…886c              Head {h00=0x0014, h01=0x0050, text=»*   G E T A D R «, t00=0x0057, t01=0x0086}
0x886c…8876              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x009e}
0x8876…88ae              Head {h00=0x0034, h01=0x0050, text=»*   SUBROUTINE TO GET ADDRESS IN INTERRUPT TABLE«, t00=0x0057, t01=0x00a8}
0x88ae…88de              Head {h00=0x002c, h01=0x0050, text=»*   FOR A GIVEN LINE- AND DEVICE NUMBER «, t00=0x0057, t01=0x00e0}
0x88de…88e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0110}
0x88e8…88fe              Head {h00=0x0012, h01=0x0050, text=»*   ON ENTRY: «, t00=0x0057, t01=0x011a}
0x88fe…8908              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0130}
0x8908…892c              Head {h00=0x0020, h01=0x0050, text=»*      A3 = LINE NUMBER *  2«, t00=0x0057, t01=0x013a}
0x892c…8952              Head {h00=0x0022, h01=0x0050, text=»*      A4 = DEVICE NUMBER * 2 «, t00=0x0057, t01=0x015e}
0x8952…8972              Head {h00=0x001c, h01=0x0050, text=»*      A5 = CWT-ADDRESS «, t00=0x0057, t01=0x0184}
0x8972…897c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0014}
0x897c…8990              Head {h00=0x0010, h01=0x0050, text=»*   ON EXIT:«, t00=0x0058, t01=0x001e}
0x8990…899a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0032}
0x899a…89d8              Head {h00=0x003a, h01=0x0050, text=»*      A6 = TOTAL NUMBER OF DEVICES * 2 ON ACTUAL LINE«, t00=0x0058, t01=0x003c}
0x89d8…8a0e              Head {h00=0x0032, h01=0x0050, text=»*      A8 = ADDRESS WHERE DWT-ADDRESS IS FOUND«, t00=0x0058, t01=0x007a}
0x8a0e…8a18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00b0}
0x8a18…8a2c              Head {h00=0x0010, h01=0x0050, text=»GETADR EQU *«, t00=0x0058, t01=0x00ba}
0x8a2c…8a64              Head {h00=0x0034, h01=0x0050, text=» LD* A8,CWTITA,A5 ADDRESS OF WORK STATION TABLE «, t00=0x0058, t01=0x00ce}
0x8a64…8a86              Head {h00=0x001e, h01=0x0050, text=» RF(Z) GET010 NOT DEFINED «, t00=0x0058, t01=0x0106}
0x8a86…8aaa              Head {h00=0x0020, h01=0x0050, text=» CW A3,-2,A8 WITHIN TABLE ? «, t00=0x0058, t01=0x0128}
0x8aaa…8ac4              Head {h00=0x0016, h01=0x0050, text=» RF(L) GET005 YES «, t00=0x0058, t01=0x014c}
0x8ac4…8aec              Head {h00=0x0024, h01=0x0050, text=» LDKL A8,0 INDICATE NOT DEFINED «, t00=0x0058, t01=0x0166}
0x8aec…8afe              Head {h00=0x000e, h01=0x0050, text=» RF GET010«, t00=0x0058, t01=0x018e}
0x8afe…8b12              Head {h00=0x0010, h01=0x0050, text=»GET005 EQU *«, t00=0x0059, t01=0x0010}
0x8b12…8b36              Head {h00=0x0020, h01=0x0050, text=» ADR A8,A3 POSITION IN TABLE«, t00=0x0059, t01=0x0024}
0x8b36…8b62              Head {h00=0x0028, h01=0x0050, text=» LDR* A8,A8 POINTER TO DEVICE TABLE «, t00=0x0059, t01=0x0048}
0x8b62…8b84              Head {h00=0x001e, h01=0x0050, text=» RF(Z) GET010 NOT DEFINED «, t00=0x0059, t01=0x0074}
0x8b84…8baa              Head {h00=0x0022, h01=0x0050, text=» LD A6,-2,A8 GET TABLE LENGTH «, t00=0x0059, t01=0x0096}
0x8baa…8bd4              Head {h00=0x0026, h01=0x0050, text=» ADR A8,A4 ADDRESS TO DWT-ADDRESS «, t00=0x0059, t01=0x00bc}
0x8bd4…8be8              Head {h00=0x0010, h01=0x0050, text=»GET010 EQU *«, t00=0x0059, t01=0x00e6}
0x8be8…8bf2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00fa}
0x8bf2…8bfc              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0059, t01=0x0104}
0x8bfc…8c1a              Head {h00=0x001a, h01=0x0015, text=»*   RETURN AND ENABLE «, t00=0x0059, t01=0x010e}
0x8c1a…8c24              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0059, t01=0x012c}
0x8c24…8c38              Head {h00=0x0010, h01=0x000c, text=»RTNA15 EQU *«, t00=0x0059, t01=0x0136}
0x8c38…8c4c              Head {h00=0x0010, h01=0x000b, text=» ADKL A15,2 «, t00=0x0059, t01=0x014a}
0x8c4c…8c58              Head {h00=0x0008, h01=0x0004, text=» ENB«, t00=0x0059, t01=0x015e}
0x8c58…8c6c              Head {h00=0x0010, h01=0x000b, text=» LDR* P,A15 «, t00=0x0059, t01=0x016a}
0x8c6c…8c76              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0059, t01=0x017e}
0x8c76…8c84              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0059, t01=0x0188}
0x8c84…8c8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0008}
0x8c8e…8caa              Head {h00=0x0018, h01=0x0050, text=»*   CHARACTER INPUT «, t00=0x005a, t01=0x0012}
0x8caa…8cb4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x002e}
0x8cb4…8cc8              Head {h00=0x0010, h01=0x0050, text=»ASCHRI EQU *«, t00=0x005a, t01=0x0038}
0x8cc8…8cdc              Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x005a, t01=0x004c}
0x8cdc…8d10              Head {h00=0x0030, h01=0x0050, text=» ORS A2,DWTST,A6 SET INPUT REQUESTED IN DWT «, t00=0x005a, t01=0x0060}
0x8d10…8d40              Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x005a, t01=0x0094}
0x8d40…8d64              Head {h00=0x0020, h01=0x0050, text=» RF ASDISP LOCAL DISPATCHER «, t00=0x005a, t01=0x00c4}
0x8d64…8d6e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00e8}
0x8d6e…8d8a              Head {h00=0x0018, h01=0x0050, text=»*   START OF A BLOCK«, t00=0x005a, t01=0x00f2}
0x8d8a…8d94              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x010e}
0x8d94…8da8              Head {h00=0x0010, h01=0x0050, text=»ASSTBL EQU *«, t00=0x005a, t01=0x0118}
0x8da8…8db2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x012c}
0x8db2…8dcc              Head {h00=0x0016, h01=0x0050, text=»*   END OF A BLOCK«, t00=0x005a, t01=0x0136}
0x8dcc…8dd6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0150}
0x8dd6…8dea              Head {h00=0x0010, h01=0x0050, text=»ASENBL EQU *«, t00=0x005a, t01=0x015a}
0x8dea…8e16              Head {h00=0x0028, h01=0x0050, text=» ABL NDRETO RETURN TO DEVICE DRIVER «, t00=0x005a, t01=0x016e}
0x8e16…8e20              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x000a}
0x8e20…8e3c              Head {h00=0x0018, h01=0x0050, text=»*   CHARACTER OUTPUT«, t00=0x005b, t01=0x0014}
0x8e3c…8e46              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0030}
0x8e46…8e5a              Head {h00=0x0010, h01=0x0050, text=»ASCHRO EQU *«, t00=0x005b, t01=0x003a}
0x8e5a…8e8a              Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x005b, t01=0x004e}
0x8e8a…8eb0              Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTASC SEND CHARACTER «, t00=0x005b, t01=0x007e}
0x8eb0…8eba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00a4}
0x8eba…8ed6              Head {h00=0x0018, h01=0x0050, text=»*   LOCAL DISPATCHER«, t00=0x005b, t01=0x00ae}
0x8ed6…8ee0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00ca}
0x8ee0…8ef4              Head {h00=0x0010, h01=0x0050, text=»ASDISP EQU *«, t00=0x005b, t01=0x00d4}
0x8ef4…8f18              Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x005b, t01=0x00e8}
0x8f18…8f24              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x005b, t01=0x010c}
0x8f24…8f28              Head {h00=0x4004, h01=0x0000}
0x8f28…8f2c              00 5b 01 18                                                                                                                                                                                                                                       ┆ [  ┆
0x8f2c…8f34 (92, 1, 8)   20 04 00 00 00 5c 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view