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

⟦6797c69c0⟧

    Length: 33080 (0x8138)
    Notes: pts_type(SC)
    Names: »DRLT01.SC«

Derivation

└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
    └─⟦this⟧ »TOSSWORK/DRLT01.SC« 

PTS(SC)

	IDENT DRLT01 	REL 8.2 78-09-15  870105040820 

* 
**************************************************
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   DRLT01 = DRIVER CHANNEL UNIT
*            FOR LOCAL TERMINALS
* 
* 
* 
* 
* 
********************************************* 
* 
*   THIS IS THE CHANNEL UNIT DRIVER FOR LOCAL TERMINALS.
*   AT INTERRUPT AN INPUT WORD IS READ TO REGISTER A2. IF DATA
*   INPUT OR DATA REQUEST A BRANCH IS MADE TO INTERRUPT HANDLER 
*   FOR ACTUAL DEVICE.
*   IF CONTROL CHARACTER, THIS IS EXAMINED AND NECESSARY ACTIONS
*   ARE CARRIED OUT.
* 
*   THE DRIVER ALSO INCLUDES THE FOLLOWING SUBROUTINES:-
* 
*   - OUTLIN   SEND ONE CHARACTER VIA CHLT
* 
*   - CHLTON   EXECUTE CIO-START ON EVERY CHLT IN SYSTEM
* 
*   - GETCHR   GET ONE CHARACTER FROM ECB-BUFFER
* 
*    CONTROL WORK TABLES FOR THE CHANNELS ARE 
*    INCLUDED IN THE DRIVER.
	EJECT
* 
* 
* 
*   THE FOLLOWING FUNCTIONS ARE ALSO INCLUDED IN THE DRIVER:- 
* 
*   - OUTPUT   SEND ONE CHARACTER, SAVE A3-A5 AND RETURN TO DISPATCHER
* 
*   - STREG    SAVE A3-A5 AND RETURN TO DISPATCHER
* 
*   - LDREG    IF INTERRUPT IS ALLOWED, RESTORE A3-A5 AND RETURN
*              TO USER VIA A5 
* 
*   - LDREGE   RESTORE A3-A5 AND RETURN TO USER VIA A5
* 
* 
* 
*   NORMAL REGISTER USAGE IN THE DRIVER:- 
* 
*   A1 = RETURN CODE
*   A2 = INPUT WORD 
*   A3 = LINE NUMBER * 2
*   A4 = DEVICE NUMBER * 2
*   A5 = CWT-ADDRESS
*   A6 = DWT-ADDRESS
*   A7 = ORDER
*   A8 = ECB-ADDRESS
* 
* 
* 
	EJECT
* 
*********** 
* ENTRIES * 
*********** 
* 
* 
	ENTRY	CHLT1	INTERRUPT FROM CHLT01
	ENTRY	CHLT2	INTERRUPT FROM CHLT2 
	ENTRY	CHLT3	INTERRUPT FROM CHLT3 
	ENTRY	CHLT4	INTERRUP FROM CHLT4
	ENTRY	OUTLIN	SEND ONE CHARACTER
	ENTRY	CHLTON	START OF CHLT 
	ENTRY	OUTPUT	SAVE REGISTERS, SEND CHAR. AND DISPATCH 
	ENTRY	LDREG	RESTORE A3-A5 ANDRETURN
	ENTRY	LDREGE	WAY BACK FROM ECHO HANDLING 
	ENTRY	LDREGF	RETURN
	ENTRY	STREG	SAVE REGISTERS A3-A5 IN DWT
	ENTRY	GETCHR	GET ONE CHARACTER FROM ECB-BUFFER 
	ENTRY	LOCHAN	NUMBER OF LOCAL CHANNEL UNITS 
	ENTRY	RECHAN	NUMBER OF REMOTE CHANNEL UNITS
	ENTRY	CWTLT1	CONTROL WORK TABLE CHLT1
	ENTRY	CWTLT2	CONTROL WORK TABLE CHLT2
	ENTRY	CWTLT3	CONTROL WORK TABLE CHLT3
	ENTRY	CWTLT4	CONTROL WORK TABLE CHLT4
	ENTRY	CWTRT1	DUMMY ENTRIES FOR REMOTE
	ENTRY	CWTRT2 
	ENTRY	CWTRT3 
	ENTRY	CWTRT4 
	ENTRY	CWTRT5 
	ENTRY	CWTRT6 
	ENTRY	CWTRT7 
	ENTRY	CWTRT8 
	ENTRY	REMFC	DUMMY ENTRY
	ENTRY	DWREMU	DUMMY ENTRY 
	ENTRY	ECHRTN	RETURN FROM ECHO
	ENTRY	ECHO	ECHO ROUTINE
	ENTRY	ECHEND	END OF ECHO 
* 
	EJECT
* 
******************************************
*    EXTERNAL TOSS MODULE ENTRIES        *
******************************************
* 
* 
	EXTRN	SAVE8	SAVE REGISTERS A1-A8 
	EXTRN	TDISP	DISPATCHER 
	EXTRN	IHRET8	RESTORE A1-A8 
	EXTRN	INTLT1	INTERRUPT TABLE 
	EXTRN	INTLT2	INTERRUPT TABLE 
	EXTRN	INTLT3	INTERRUPT TABLE 
	EXTRN	INTLT4	INTERRUPT TABLE 
	EXTRN	SETIME	GET TIMER BLOCK 
	EXTRN	SETIMP	GET TIMER BLOCK 
	EXTRN	INTSAV	SAVE AREA LAST INTERRUPT
	EXTRN	TENDIO 
	EXTRN	RTNA15	RETURN AND ENB
* 
* 
*********************************** 
*    DWT PARAMETERS               * 
*********************************** 
	EXTRN	DWTST	STATUS 
	EXTRN	DWTOR	ORDER
	EXTRN	DWTECB	ECB-ADDRESS 
	EXTRN	DWTADR	ADDRESS TO ADDRESS-BLOCK
	EXTRN	DWTWAT 
* 
	EJECT

* 
************* 
* CONSTANTS * 
************* 
* 
* 
NOERR	EQU	1	RETURN CODE. NOT OPERABLE 
DUMMSP	EQU	/03	SPECIAL DUMMY
DRQTIM	EQU	30 
* 
* 
*    DISPLACMENT IN DEVICE WORK TABLE DWT 
* 
DWTOCH	EQU	/6	LAST OUTPUT CHARACTER 
DWTOTQ	EQU	/10	OUTPUT QUEUE LINK
DWTA3	EQU	/12	SAVE AREA A3
DWTA4	EQU	/14	          A4
DWTA5	EQU	/16	          A5
DWTSB2	EQU	/1E	STACK BASE 2 
DWTTP	EQU	/20	TIMER POINTER 
DWTECH	EQU	/22	ECHO DEVICE
* 
	EJECT
* 
************************
* CONDITIONAL ASSEMBLY *
************************
* 
*   A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHARACTER 
*   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 FOUR LOCAL
*    CHANNELS BY SETTING X:B TO 1,2,3 OR 4
* 
X:B	EQU	1 
LOCHAN	EQU	X:B
* 
*    ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND 
*    UNDEFINED CONTROL CHARACTERS ARE UPDATED IN
*    THE DRIVER. THIS FUNCTION CAN BE EXCLUDED FROM 
*    DRIVER BY SETTING X:C = 0. 
* 
X:C	EQU	1 
ACKMUL	EQU	X:C
* 
*    BY SETTING X:D = 1 A SOFTWARE TIME OUT HANDLING
*    MISSING DATA REQUESTS FROM PRINTERS CAN BE INCLUDED
*    IN THE DRIVER. 
*    AN ACKUMULATOR TO BE UPDATED EVERY TIME A SOFTWARE 
*    TIME OUT OCCURS IS ALSO INCLUDED.
* 
X:D	EQU	1 
SOFTIM	EQU	X:D
* 
* 
*     ECHO FONCTION CAN BE EXCLODED 
*     BY SETTING X:E = 0
X:E	EQU	1 
CECHO	EQU	X:E 
* 
	EJECT


RECHAN	EQU	0
REMFC	EQU	0 
CWTRT1	EQU	*
CWTRT2	EQU	*
CWTRT3	EQU	*
CWTRT4	EQU	*
CWTRT5	EQU	*
CWTRT6	EQU	*
CWTRT7	EQU	*
CWTRT8	EQU	*
DWREMU	EQU	*
	EJECT
* 
* 
***************************************************** 
*    C W T L T 1                                    * 
***************************************************** 
* 
*    CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 1
* 
* 
DWA1	EQU	/03	DEVICEADDRESS
* 
CWTLT1	EQU	*	TABLE ENTRY
CWTLDW	EQU	*-CWTLT1	LAST OUTPUT DWT-ADDRESS 
	DATA	0 
CWTLOW	EQU	*-CWTLT1 
	DATA	0	LAST OUTPUT WORD
CWTITA	EQU	*-CWTLT1	ADDRESS TO INTLT1 
	DATA	INTLT1
CWTINR	EQU	*-CWTLT1	INR 
	INR	A2,0,DWA1
CWTOTR	EQU	*-CWTLT1	OTR 
	OTR	A2,0,DWA1
CWTCIS	EQU	*-CWTLT1	CIO-START 
	CIO	A2,1,DWA1
CWTRTC	EQU	*-CWTLT1 
	DATA	0	RETRANSMISSION COUNTER
CWTEQ	EQU	*-CWTLT1	END OF QUEUE 
	DATA	0 
CWTADD	EQU	*-CWTLT1 
* 
	IFT	ACKMUL=1 
* 
	DATA	0	NAK-ACKUMULATOR 
	DATA	0	RETR. FAULT-ACKUMULATOR 
	DATA	0	UNDEFINED-INTERRUPT-ACKUMULATOR 
ACKTIM	EQU	*-CWTLT1 
	DATA	0	PRINTER TIMEOUT ACKUMULATOR 
* 
	XIF
	EJECT
* 
* 
***************************************************** 
*    C W T L T 2                                    * 
***************************************************** 
* 
*    CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 2
* 
CWTLT2	EQU	*
* 
	IFT	LOCHAN=2 
DWA2	EQU	/13	DEVICE ADDRESS 
* 
	DATA	0	LAST OUTPUT DWT-ADDRESS 
	DATA	0	LAST OUTPUT WORD
	DATA	INTLT2	INTERRUPT TABLE
	INR	A2,0,DWA2	INR
	OTR	A2,0,DWA2	OTR
	CIO	A2,1,DWA2	CIO-START
	DATA	0	RETRANSMISSION COUNTER
	DATA	0	END OF QUEUE
* 
	IFT	ACKMUL=1 
* 
	DATA	0	NAK-ACKUMULATOR 
	DATA	0	RETR. FAULT-ACKUMULATOR 
	DATA	0	UNDEFINED- INTERRUPT-ACKUMULATOR
	DATA	0	PRINTER TIMEOUT ACKUMULATOR 
* 
	XIF
* 
	IFT	LOCHAN=2 
* 
	EJECT
	XIF
	IFT	LOCHAN=3 
DWA2	EQU	/13	DEVICE ADDRESS 
* 
	DATA	0	LAST OUTPUT DWT-ADDRESS 
	DATA	0	LAST OUTPUT WORD
	DATA	INTLT2	INTERRUPT TABLE
	INR	A2,0,DWA2	INR
	OTR	A2,0,DWA2	OTR
	CIO	A2,1,DWA2	CIO-START
	DATA	0	RETRANSMISSION COUNTER
	DATA	0	END OF QUEUE
* 
	IFT	ACKMUL=1 
* 
	DATA	0	NAK-ACKUMULATOR 
	DATA	0	RETR. FAULT-ACKUMULATOR 
	DATA	0	UNDEFINED- INTERRUPT-ACKUMULATOR
	DATA	0	PRINTER TIMEOUT ACKUMULATOR 
* 
	XIF
* 
* 
	XIF
	IFT	LOCHAN=4 
* 
* 
*  CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.2
* 
DWA2	EQU	/13	DEVICE ADDRESS 
* 
	DATA	0	LAST OUTPUT DWT-ADDRESS 
	DATA	0	LAST OUTPUT WORD
	DATA	INTLT2	INTERRUPT TABLE
	INR	A2,0,DWA2	INR
	OTR	A2,0,DWA2	OTR
	CIO	A2,1,DWA2	CIO-START
	DATA	0	RETRANSMISSION COUNTER
	DATA	0	END OF QUEUE
* 
	IFT	ACKMUL=1 
* 
	DATA	0	NAK-ACKUMULATOR 
	DATA	0	RETR. FAULT-ACKUMULATOR 
	DATA	0	UNDEFINED- INTERRUPT-ACKUMULATOR
	DATA	0	PRINTER TIMEOUT ACKUMULATOR 
* 
	XIF
	EJECT
* 
* 
*  CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.3
* 
CWTLT3	EQU	*
	IFT	LOCHAN=3 
DWA3	EQU	/23	DEVICE ADDRESS 
* 
	DATA	0	LAST OUTPUT DWT-ADDRESS 
	DATA	0	LAST OUTPUT WORD
	DATA	INTLT3	INTERRUPT TABLE
	INR	A2,0,DWA3	INR
	OTR	A2,0,DWA3	OTR
	CIO	A2,1,DWA3	CIO-START
	DATA	0	RETRANSMISSION COUNTER
	DATA	0	END OF QUEUE
* 
	IFT	ACKMUL=1 
* 
	DATA	0	NAK-ACKUMULATOR 
	DATA	0	RETR. FAULT-ACKUMULATOR 
	DATA	0	UNDEFINED- INTERRUPT-ACKUMULATOR
	DATA	0	PRINTER TIMEOUT ACKUMULATOR 
* 
	XIF
* 
* 
	IFT	LOCHAN=4 
DWA3	EQU	/23	DEVICE ADDRESS 
* 
	DATA	0	LAST OUTPUT DWT-ADDRESS 
	DATA	0	LAST OUTPUT WORD
	DATA	INTLT3	INTERRUPT TABLE
	INR	A2,0,DWA3	INR
	OTR	A2,0,DWA3	OTR
	CIO	A2,1,DWA3	CIO-START
	DATA	0	RETRANSMISSION COUNTER
	DATA	0	END OF QUEUE
* 
	IFT	ACKMUL=1 
* 
	DATA	0	NAK-ACKUMULATOR 
	DATA	0	RETR. FAULT-ACKUMULATOR 
	DATA	0	UNDEFINED- INTERRUPT-ACKUMULATOR
	DATA	0	PRINTER TIMEOUT ACKUMULATOR 
* 
	XIF
	EJECT
* 
*    CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 4
* 
CWTLT4	EQU	*
* 
* 
	IFT	LOCHAN=4 
DWA4	EQU	/33	DEVICE ADDRESS 
* 
	DATA	0	LAST OUTPUT DWT-ADDRESS 
	DATA	0	LAST OUTPUT WORD
	DATA	INTLT4	INTERRUPT TABLE
	INR	A2,0,DWA4	INR
	OTR	A2,0,DWA4	OTR
	CIO	A2,1,DWA4	CIO-START
	DATA	0	RETRANSMISSION COUNTER
	DATA	0	END OF QUEUE
* 
	IFT	ACKMUL=1 
* 
	DATA	0	NAK-ACKUMULATOR 
	DATA	0	RETR. FAULT-ACKUMULATOR 
	DATA	0	UNDEFINED- INTERRUPT-ACKUMULATOR
	DATA	0	PRINTER TIMEOUT ACKUMULATOR 
* 
	XIF
* 
	EJECT
* 
**********************************************
*    C H T A B                               *
**********************************************
* 
*   THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK 
*   TABLES CWT TO CHANNEL UNITS FOR LOCAL AND REMOTE
*   TERMINALS.
* 
* 
CHTAB	EQU	* 
	DATA	CHTABE-*	TABLE LENGTH 
	DATA	CWTLT1	 
	DATA	CWTLT2
	IFT	LOCHAN=3 
	DATA	CWTLT3
	XIF
	IFT	LOCHAN=4 
	DATA	CWTLT3
	DATA	CWTLT4
	XIF
CHTABE	EQU	*	END OF TABLE 
* 
* 
* 
* 
* 
	EJECT
* 
	IFF	LOCHAN=1 
* 
*   C H L T 1 / C H L T 2 
*   THIS IS THE INTERRUPT HANDLER FOR CHLT
* 
*   C H L T 1 
*   INTERRUPT FROM CHLT1
* 
	XIF
	IFT	LOCHAN=2 
CHLT3	EQU	* 
CHLT4	EQU	* 
	XIF
	IFF	LOCHAN=1 
CHLT1	EQU	* 
	ST	P,INTSAV	SAVE LAST INTERRUPT
	CF	A15,SAVE8	SAVE REGISTERS A1-A8
	LDKL	A5,CWTLT1	SET CWT-ADDRESS FOR CHLT1 
	RF	CLT010
* 
*   C H L T 2 
*   INTERRUPT FROM CHLT2
* 
CHLT2	EQU	* 
	ST	P,INTSAV	SAVE LAST INTERRUPT
	CF	A15,SAVE8	SAVE REGISTERS A1-A8
	LDKL	A5,CWTLT2	SET CWT-ADDRESS FOR CHLT2 
	XIF
	IFT	LOCHAN=2 
CLT010	EX	CWTINR,A5	EXECUTE INR-INSTRUCTION 
* 
	XIF
* 
	IFT	LOCHAN=3 
	RF	CLT010
* 
*   C H L T 3 
*   INTERRUPT FROM CHLT3
* 
CHLT3	EQU	* 
CHLT4	EQU	* 
	ST	P,INTSAV	SAVE LAST INTERRUPT
	CF	A15,SAVE8	SAVE REGISTERS A1-A8
	LDKL	A5,CWTLT3	SET CWT-ADDRESS FOR CHLT3 
CLT010	EX	CWTINR,A5	EXECUTE INR 
* 
	XIF
	IFT	LOCHAN=4 
	RF	CLT010
* 
* 
*   C H L T 2 
*   INTERRUPT FROM CHLT3
* 
CHLT3	EQU	* 
	ST	P,INTSAV	SAVE LAST INTERRUPT
	CF	A15,SAVE8	SAVE REGISTERS A1-A8
	LDKL	A5,CWTLT3	SET CWT-ADDRESS FOR CHLT3 
	RF	CLT010
*   C H L T 4 
*   INTERRUPT FROM CHLT4
* 
CHLT4	EQU	* 
	ST	P,INTSAV	SAVE LAST INTERRUPT
	CF	A15,SAVE8	SAVE REGISTERS A1-A8
	LDKL	A5,CWTLT4	SET CWT-ADDRESS FOR CHLT4 
CLT010	EX	CWTINR,A5	EXECUTE INR 
	XIF
* 
	IFT	LOCHAN=1 
* 
* 
*    C H L T 1
* 
*    INTERRUPT FROM CHLT1 
* 
CHLT1	EQU	* 
CHLT2	EQU	* 
CHLT3	EQU	* 
CHLT4	EQU	* 
	CF	A15,SAVE8	SAVE REGISTERS ON STACK 
	LDKL	A5,CWTLT1	GET CWT-ADDRESS 
	ST	P,INTSAV	SAVE LAST INTERRUPT
	INR	A2,0,DWA1
* 
	XIF
* 
	IFT	LOGING=1 
	CF	A15,LOGG	** LOGG OF INPUT CHARACTER **
	XIF
	EJECT
* 
* 
*   DETERMINE LINE- AND DEVICE NUMBER 
* 
	LDK	A1,0	RESET RETURN CODE 
	LDR	A3,A2	INPUT WORD IN A3 
	SRL	A3,8 
	LDR	A4,A3
	ANK	A3,/E	2 * LINE NUMBER IN A3
	SRL	A4,3 
	ANK	A4,/E	2 * DEVICE NUMBER IN A4
	ABL(NE)	CLT100	INPUT IS A DATA CHARACTER 
	ANK	A2,/7F 
	SUK	A2,3	POWER ON ?
	RF(E)	CHPOWO 
* 
* 
*    CHECK QUEUE AND SEND IF SOMETHING THERE
* 
	LDR*	A7,A5	LAST OUTPUT DWT IN A7 
	CMR	A5	RESET LAST OUTPUT 
	LD	A6,CWTEQ,A5	OUTPUT QUEUE
	RF(E)	CLT020 
	STR	A2,A15	SAVE A2 
	LD	A2,DWTOTQ,A6	GET QUEUE LINK 
	ST	A2,CWTEQ,A5	STORE IT IN CWT 
	LC	A2,DWTOCH,A6	GET CHARACTER
	CF	A15,OUTLIN	SEND CHARACTER 
	LDR*	A2,A15	RELOAD A2
	EJECT
* 
* 
*    CHECK CONTROL CHARACTER AND UPDATE ERROR-
*    ACKUMULATORS IF NAK, RETRANSMISSION FAULT
*    OR UNDEFINED CONTROL CHARACTER 
* 
CLT020	EQU	*
	LDR	A6,A7	GET LAST OUTPUT
	RF(E)	CLT062 
	SUK	A2,4	ACK ? 
	RF(Z)	CLT040 
	ADK	A2,7	TIME-OUT ?
	RF(E)	CLT028 
* 
	IFT	ACKMUL=1 
* 
	SUK	A2,5	NAK ? 
	RF(E)	CLT035 
	LDK	A7,2 
	SUK	A2,/16	RETRANSMISSION FAULT
	RF(E)	CLT025 
	ADK	A7,2	UNDEFINED INTERRUPT 
CLT025	ADR	A7,A5
	IM	CWTADD,A7	INCREMENT ACKUMULATOR FOR THIS
			TYPE OF INTERRUPT
* 
	XIF
* 
	EJECT
* 
* 
*    NAK, TIME-OUT, RETRANSMISSION FAULT OR 
*    UNDEFINED CONTROL CHARACTER
* 
*    CHECK LAST OUTPUT AND TRY RECOVERY OF THAT DEVICE
*    ONE TIME. IF NOT SUCCESS GO TO DRIVER WITH 
*    MESSAGE NOT OPERABLE.
* 
CLT028	EQU	*
	LDKL	A2,/3000	ECHO MODE AND RECOVERY BIT 
	AN	A2,DWTST,A6	AT LEAST ONE OF THE BITS SET ?
	RF(NE)	CLT032
	LDKL	A2,/1000	INDICATE RECOVERY TRIAL DONE 
	XRS	A2,DWTST,A6	SET BIT IN STATUS WORD 
CLT030	LDK	A3,2	INDICATE RECOVERY OF DEVICE 
	LDK	A4,0 
	RF	CPO025
CLT032	LDK	A1,NOERR	INDICATE NOT OPERABLE 
	ABL	CLT110 
	EJECT
* 
* 
*    N A K
* 
*    ERROR ACKUMULATOR AND RETRANSMISSION COUNTER IS UPDATED. 
*    LAST OUTPUT CHARACTER IS RETRANSMITTED BY CHANNEL DRIVER 
*    UP TO SIX TIMES AND IF STILL NO SUCCESS RETURN CODE NOT
*    OPERABLE IS SENT TO DEVICE DRIVER. 
* 
CLT035	EQU	*
	IFT	ACKMUL=1 
* 
	IM	CWTADD,A5	UPDATE ERROR ACKUMULATOR
	XIF
* 
	IM	CWTRTC,A5	INCREMENT RETRANSMISSION COUNTER
	LD	A4,CWTRTC,A5	GET COUNTER
	SUK	A4,7	SEVEN TIMES ? 
	RB(E)	CLT032 
	LD	A2,CWTLOW,A5	GET LAST OUTPUT WORD 
	LDR	A1,A5
	EX	CWTOTR,A1	EXECUTE OTR-INSTRUCTION 
	STR	A6,A1	STORE LAST DWT IN CWT
	IFT	LOGING=1 
	CF	A15,LOGG	**  LOGG OUTPUT CHARACTER  **
	XIF
	SC	A2,DWTOCH,A6	STORE OUTPUT CHARACTER IN DWT
	ABL	TDISP
	EJECT
* 
* 
*    ACK      DATA = 07 
* 
*    SIMULATE DATA REQUEST IF RETURN CODE FROM
*    CHLT OR DEVICE WITHOUT DATA REQUEST, 
*    ELSE GO TO DISPATCHER
* 
CLT040	EQU	*
	LDKL	A7,/EFFF
	ANS	A7,DWTST,A6	RESET RECOVERY BIT IN STATUS WORD
	LDR	A1,A1
	RF(NZ)	CLT110	RETURN CODE,SIMULATE DATA REQUEST
	LDR*	A7,A6	DEVICE WITHOUT DATA REQUEST?
	RF(N)	CLT110	YES. SIMULATE DATA REQUEST
* 
	IFF	SOFTIM=1 
* 
CLT062	EQU	*
	RF	EXIT
* 
	XIF
* 
* 
	IFT	SOFTIM=1 
* 
	EJECT
* 
* 
*    PRINTER TIMING 
* 
	INH
	LC	A3,DWTOCH,A6	GET LAST CHARACTER 
	ANK	A3,/7F 
	SUK	A3,DUMMSP	SPECIAL DUMMY
	RF(E)	CLT070	YES 
	LD	A3,DWTTP,A6	ADDRESS TO TIMER BLOCK
	RF(E)	CLT060 
* 
*    RESTART TIMER
* 
	LDKL	A3,-DRQTIM	RESTART TIMER
	ST*	A3,DWTTP,A6
	RF	EXIT
* 
*    START TIMER
* 
CLT060	LDR	A1,A6	PARAMETER
	LDK	A4,DWTTP	TIMER POINTER 
	ADR	A4,A6	ADD WITH DWT-ADDRESS 
	CF	A15,SETIMP	GET TIMER BLOCK
	DATA	DRQTUT,DRQTIM	ADDRESS TO TIME-OUT ROUTINE AND DELAY 
CLT062	EQU	*
	RF	EXIT

	EJECT
* 
* 
*    RESET TIMER IF STARTED 
* 
CLT070	LD	A3,DWTTP,A6	ADDRESS ? 
	RF(E)	EXIT	NO
	CM*	DWTTP,A6	RESET TIMER 
	CM	DWTTP,A6	RESET ADDRESSPOINTER TO TIMER
	RF	EXIT
	EJECT
* 
*    TIME-OUT ROUTINE HANDLING MISSING INTERRUPTS 
*    FROM PRINTERS
* 
DRQTUT	EQU	*
	LDR	A6,A1	GET DWT-ADDRESS
	CM	DWTTP,A6	RESET POINTER TO TIMER BLOCK 
	LD	A3,DWTST,A6 
	SLL	A3,2	ECHO MODE ? 
	RF(N)	CLT110	YES 
* 
	IFT	ACKMUL=1 
	IFF	LOCHAN=1 
* 
	LDR*	A5,A6	CHANNEL PARAMETER 
	ANK	A5,/F
	SLL	A5,1	2 * INDEX 
	ADK	A5,2	JUST TO AVOID TABLE LENGTH
	LD	A5,CHTAB,A5	GET CWT-ADDRESS 
	IM	ACKTIM,A5	INCREMENT ACKUMULATOR 
* 
	XIF
	IFT	SOFTIM=1 
	IFT	ACKMUL=1 
	IFT	LOCHAN=1 
* 
	LDKL	A5,CWTLT1	GET CWT-ADDRESS 
	IM	ACKTIM,A5	INCREMENT ACKUMULATOR 
* 
	XIF
	IFT	SOFTIM=1 
* 
	RB	CLT030
* 
	XIF
* 
	EJECT
* 
*   POWER ON    DATA = 03 
* 
*   RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE
*    ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL
*    UNIT OR THOSE IN ECHO MODE.
* 
* 
*     ON EXIT TO RECOVERY ROUTINE:
* 
*     A5 = STACKBASE 2 IN DWT 
*     A6 = DWT-ADDRESS
*     A7 = ORDER
* 
CHPOWO	EQU	*
	CF	A15,GETLIN
	LDR*	A2,A5	GET LAST OUTPUT DWT 
	CM	CWTRTC,A5	RESET RETRANSMISSION COUNTER
	LDK	A4,0 
	LDR	A3,A6	DEVICE COUNTER 
	LDR	A1,A8	ADDRESS POINTER
	RF(Z)	EXIT	EXIT IF NOT DEFINED 
CPO020	ADK	A1,2 
	LDR*	A6,A1	GET DWT-ADDRESS 
	RF(E)	CPO030	NO DWT
	SRC	A6,1 
	RF(N)	CPO030 
	SLC	A6,1 
	LCR	A7,A6	LEFT BYTE OF DWTCHP
	ANK	A7,1	INPUT DEVICE ?
	RF(NE)	CPO025	YES
	LDKL	A7,/EFFF
	ANS	A7,DWTST,A6	RESET RECOVERY BIT 
	LC	A7,DWTST,A6 
	ANK	A7,/20	ECHO MODE ? 
	RF(NE)	CPO030	YES
	CWR	A6,A2	DEVICE WAITING FOR CHANNEL ANSWER ?
	RF(E)	CPO030	YES 
CPO025	LD	A7,DWTADR,A6	ADDRESS TO ADDRESSBLOCK IN A7
	LD	A7,4,A7	ADDRESS TO RECOVERY IN A7 
	RF(E)	CPO030	NO RECOVERY 
	LDKL	A5,DWTSB2	STACKBASE 
	ADR	A5,A6
	CFR	A15,A7	GO TO RECOVERY ROUTINE
CPO030	SUK	A3,2	ALL DEVICES THREATED

	RB(NE)	CPO020	NO TAKE NEXT 
EXIT	ABL	TDISP
	EJECT
* 
* 
*     DATA-REQUEST
* 
CLT100	CF	A15,GETLIN	GET DWT-ADDRESS
	SUR	A6,A4	VALID INTERRUPT ?
	RB(N)	EXIT 
	LDR	A8,A8
	RB(Z)	EXIT	EXIT NOT DEFINED
	LDR*	A6,A8	GET DWT 
	RB(E)	EXIT 
	ANKL	A6,/FFFE
	LCR	A7,A6	LEFT BYTE IN CHANNEL PARAMETER 
	ANK	A7,1	DATA INPUT ?
	RF(NE)	CLT110	YES
	LDR*	A7,A6	GET CHANNEL PARAMETER 
	RB(N)	EXIT 
CLT110	LD	A7,DWTOR,A6	SET ORDER IN A7 
	ANK	A7,/FF 
	LD	A8,DWTECB,A6	AND ECB-ADDRESS IN A8
	LD	A3,DWTADR,A6	ADDRESS TO ADDRESS-BLOCK IN A3 
	ENB
	ABI	2,A3	GO TO INTERRUPT HANDLER 
* 
*   THE FOLLOWING REGISTER VAULES ARE VALID WHEN ENTERING 
*   THE DEVICE DEPENDANT INTERRUPT HANDLER:-
* 
*   A1 = ERROR CODE  (A1=0  NOERROR)
*                    (A1=1  NOT OPERABLE , HARDWARE TIME-OUT) 
*   A6 = DWT-ADDRESS
* 
*   A7 = ORDER
* 
*   A8 = ECB-ADDRESS
	EJECT
* 
*   G E T L I N 
* 
*   SUBROUTINE TO GET ADDRESS IN INTERRUPT TABLE 'INTLTX' 
*   FOR A GIVEN LINE- AND DEVICE NUMBER 
* 
*   ON ENTRY:-
* 
*   A3 = LINE NUMBER * 2
*   A4 = DEVICE NUMBER * 2
* 
*   ON EXIT:- 
* 
*   A6 = TOTAL NUMBER OF DEVICES*2 ON ACTUAL LINE 
*   A8 = ADDRESS IN 'INTLTX' WHERE DWT-ADDRESS IS FOUND 
* 
* 
GETLIN	EQU	*
	LD	A8,CWTITA,A5	ADDRESS TO INTERRUPT TABLE 

	ADR	A8,A3	POSITION IN TABLE
	LDR*	A8,A8	ADDRESS TO TERMINAL SECTION 
	RF(Z)	GTL010	RETURN IF NOT DEFINED 
	LDR*	A6,A8	GET ID-WORD 
	ANK	A6,/FF	TWO TIMES NUMBER OF DEVICES 
	ADR	A8,A4	ADDRESS TO DEVICE WORK TABLE POSITION
GTL010	ABL	RTNA15	RETURN AND ENB
	EJECT
* 
*   O U T L I N 
* 
*   SUBROUTINE TO SEND ONE CHARACTER VIA CHANNEL UNIT.
* 
*     CHARACTER GIVEN IN A2 IS SENT VIA CHLT IF CONTROL 
*     UNIT IS FREE. IN OTHER CASE DWT IS QUEUED ON A
*     OUTPUT QUEUE THREAD.
* 
*     ON ENTRY: 
* 
*     A2 = OUTPUT CHARACTER IN RIGHT BYTE 
*     A6 = DWT-ADDRESS
* 
OUTLIN	EQU	*
	CF	A15,SAVE8	SAVE REGS A1-A8 
* 
	IFF	LOCHAN=1 
* 
	LDR*	A1,A6	CHANNEL PARAMETER 
	ANK	A1,/F	CHANNEL INDEX
	SLL	A1,1 
	ADK	A1,2 
	LD	A1,CHTAB,A1	GET CWT-ADDRESS IN A1 
* 
	XIF
* 
* 
	IFT	LOCHAN=1 
* 
	LDKL	A1,CWTLT1 
* 
	XIF
* 
	INH		INHIBIT INTERRUPT 
	LDR*	A4,A1	IS UNIT FREE ?
	RF(E)	OUL050	YES 
	EJECT
* 
*    QUEUE OUTPUT 
* 
OUL005	LD	A4,CWTEQ,A1	OUTPUT QUEUE
	RF(E)	OUL020 
OUL010	CWR	A6,A4
	RF(E)	OUL060	THIS DWT IS ALREADY IN QUEUE
	LD	A3,DWTOTQ,A4
	RF(E)	OUL030	END OF THREAD FOUND 
	LDR	A4,A3	FOLLOW THE THREAD
	RB	OUL010
OUL020	ST	A6,CWTEQ,A1	QUEUE DWT 
	RF	OUL040
OUL030	ST	A6,DWTOTQ,A4	QUEUE DWT
OUL040	CM	DWTOTQ,A6	SET END OF THREAD 
	RF	OUL060
	EJECT
* 
*    SEND CHARACTER 
* 
OUL050	LDR*	A3,A6	GET CHANNEL PARAMETERS
	ANKL	A3,/7F00
	ANK	A2,/FF 
	ORR	A2,A3
OUL055	EQU	*
	EX	CWTOTR,A1	EXECUTE OTR-INSTRUCTION 
	RB(NA)	OUL005
	STR	A6,A1	STORE LAST DWT IN CWT
	IFT	LOGING=1 
	CF	A15,LOGG	** LOGG OF OUTPUT CHARACTER ** 
	XIF
OUL060	SC	A2,DWTOCH,A6	STORE OUTPUT CHARACTER IN DWT
OUL070	ABL	IHRET8	RESTORE A1-A8 AND RTN A15 
	EJECT
* 
*   C H L T O N 
* 
*   SUBROUTINE TO RESET CWT AND PERFORM CIO-START OF EVERY
*   CHLT IN SYSTEM. THE SUBROUTINE IS ENTERED FROM 'PFINIT' 
* 
CHLTON	EQU	*
* 
	IFF	LOCHAN=1 
* 
	LD	A1,CHTAB
CON010	SUK	A1,2	ALL TREATED ? 
	RF(NZ)	CON020	NO TAKE NEXT 
	ABL	RTNA15	RETURN AND ENB
CON020	LD	A5,CHTAB,A1	LOAD CWT-ADDRESS
	RB(Z)	CON010 
	EX	CWTCIS,A5	EXECUTE CIO-START 
	LDR*	A6,A5	GET LAST DWT
	RB(Z)	CON010 
	CMR	A5	RESET LAST OUTPUT 
	LDK	A2,0 
	CF	A15,OUTLIN	SEND CHARACTER 
	RB	CON010
* 
* 
	XIF
* 
* 
	IFT	LOCHAN=1 
* 
	CIO	A2,1,DWA1	CIO-START
	LD	A6,CWTLT1	GET LAST DWT
	RF(Z)	CON010 
	CM	CWTLT1	RESET LAST OUTPUT
	LDK	A2,0 
	CF	A15,OUTLIN	SEND CHARACTER 
CON010	ABL	RTNA15	RETURN AND ENB
* 
	XIF
* 
	EJECT
* 
*   O U T P U T 
* 
*   SEND ONE CHARACTER VIA 'OUTLIN' INDICATE INTERRUPTS 
*   ALLOWED AND SAVE A3-A5 IN DWT.
* 
* 
OUTPUT	EQU	*
	ANK	A2,/FF 
	LDR	A1,A2
	SUK	A1,/82	STX ? 
	RF(E)	LDRE10 
	SUK	A1,/15	ETB ? 
	RF(E)	LDRE10 
	CF	A15,OUTLIN	SEND ONE CHARACTER VIA CHANNEL UNIT
* 
* 
*   S T R E G 
* 
*   INDICATE INTERRUPTS ALLOWED AND SAVE A3-A5 IN DWT 
* 
* 
STREG	EQU	* 
	INH
	LDKL	A1,/100 
	ORS	A1,DWTST,A6	INDICATE INTERRUPTS ALLOWED
	ST	A3,DWTA3,A6	SAVE REGISTER A3
	ST	A4,DWTA4,A6	              A4
	ST	A5,DWTA5,A6	              A5
	RB	EXIT
	EJECT
* 
*   L D R E G 
* 
*   IF INTERRUPT ALLOWED RESTORE A3-A5 FROM DWT AND RETURN
*   VIA A5. ELSE GO TO DISPATCHER.
* 
* 
LDREG	EQU	* 
	LD	A3,DWTST,A6 
	ANKL	A3,/100 
	RB(Z)	EXIT 
	XRS	A3,DWTST,A6
* 
* 
*   L D R E G E 
* 
*   RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5
* 
* 
LDREGF	EQU	*
	LD	A5,DWTA5,A6	                A5
LDREGE	EQU	*
	LD	A3,DWTA3,A6	RELOAD REGISTER A3
	LD	A4,DWTA4,A6	                A4
LDRE10	LD	A7,DWTOR,A6	GET ORDER 
	ANK	A7,/FF 
	LD	A8,DWTECB,A6
	RTN	A5	RETURN VIA A5-STACK 
	EJECT
* 
* 
*    G E T C H R
* 
*    SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER
* 
*    ON ENTRY:
* 
*    A3 = BUFFER INDEX
*    A8 = ECB-ADDRESS 
* 
*    ON EXIT: 
* 
*    A2 = CHARACTER 
*    A1 = 0 IF LAST CHARACTER ELSE # 0
* 
*    IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH
* 
* 
GETCHR	EQU	*
	LD	A1,4,A8	REQUESTED LENGTH
	SUR	A1,A3
	RF(NP)	GCH010	LAST CHARACTER REACHED 
	LD	A2,2,A8	GET BUFFER ADDRESS
	ADR	A2,A3
	LCR	A2,A2	CHAR. TO A2
	ANK	A2,/FF 
	ADK	A3,1	INCREMENT BUFFER INDEX
	RF	GCH020
GCH010	ST	A3,6,A8	STORE EFFECTIVE LENGTH
GCH020	ABL	RTNA15	RETURN AND ENABLE 
	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	63	LOGG AREA
BUFE	EQU	*
* 
	XIF
	EJECT
* 
* 
*    E C H O , E C H E N D
* 
*    SUBROUTINE TO ECHO CHARACTER CONTAINING TWO PARTS, 
*    ONE GENERAL AND ONE DEVICE-DEPENDENT 
* 
*    PART ONE: FIND DWT-ADDRESS OF ECHO-DEVICE, 
*              LOAD STACKBASE AND FIND ADDRESS
*              TO DEVICE-DEPENDENT ECHO-ROUTINE 
* 
*    PART TWO: ECHO ONE OR MORE CHARACTERS
*              CORRESPONDING TO ONE CHARACTER 
*              TO BE STORED IN INPUT ECB-BUFFER 
* 
* 
*    PART ONE FOLLOWS AND PART TWO CAN BE FOUND 
*    IN THE DRIVER MODULE CORRESPONDING TO ECHO 
*    OUTPUT DEVICE
* 
*    RESTRICTIONS IN DEVICE DEPENDENT ECHO DRIVER 
* 
*    A7 MUST NOT BE DESTROYED 
*    THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A 
*    JUMP TO 'ECHRTN'.
* 
ECHEND	EQU	*
* 
	IFT	CECHO=1
* 
	LDKL	A7,/8000	INDICATE END I/O 
	XIF
ECHO	EQU	*
	IFT	CECHO=1
	ST	A3,DWTA3,A6	SAVE A3-A5 IN DWT 
	ST	A4,DWTA4,A6 
	ST	A5,DWTA5,A6 
	LD	A1,DWTST,A6	STATUS
	SLL	A1,2 
	RF(NN)	RETUR	NO ECHO REQUESTED 
	LDR	A4,A6	SAVE DWT-ADDRESS OF INPUT DEVICE 
	LD	A6,DWTECH,A6	DWT-ADDRESS OF OUTPUT DEVICE 
	ST	A4,DWTWAT,A6	SAVE DWT-ADDRESS OF INPUT DEVICE 
	LDKL	A5,DWTSB2 
	ADR	A5,A6	STACKBASE-ADDRESS IN A5
	LD	A1,DWTADR,A6	ADDRESS TO ADDRESS-BLOCK 
	ABI	6,A1	GO TO ECHO-ROUTINE DEVICE-DEPENDENT 
	XIF
ECHRTN	EQU	*
	IFT	CECHO=1
	LDR	A7,A7	END? 
	RF(NN)	ERETUR	NO 
	CF	A15,TENDIO	END I/O OUTPUT DEVICE
ERETUR	LD	A6,DWTWAT,A6	RELOAD DWT-ADDRESS OF INPUT DEVICE 
RETUR	ABL	LDREGF	RELOAD A3-A5 AND RETURN VIA A5 
* 
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT DRLT01  REL 8.2 78-09-15  870105040820 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…0082              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x004c}
0x0082…008c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0086}
0x008c…00b4              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0090}
0x00b4…00be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b8}
0x00be…00e6              Head {h00=0x0024, h01=0x0050, text=»*   DRLT01 = DRIVER CHANNEL UNIT«, t00=0x0000, t01=0x00c2}
0x00e6…010e              Head {h00=0x0024, h01=0x0050, text=»*            FOR LOCAL TERMINALS«, t00=0x0000, t01=0x00ea}
0x010e…0118              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0112}
0x0118…0122              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011c}
0x0122…012c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0126}
0x012c…0136              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0130}
0x0136…0140              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013a}
0x0140…0176              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0000, t01=0x0144}
0x0176…0180              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x017a}
0x0180…01c0              Head {h00=0x003c, h01=0x0050, text=»*   THIS IS THE CHANNEL UNIT DRIVER FOR LOCAL TERMINALS.«, t00=0x0000, t01=0x0184}
0x01c0…0206              Head {h00=0x0042, h01=0x0050, text=»*   AT INTERRUPT AN INPUT WORD IS READ TO REGISTER A2. IF DATA«, t00=0x0001, t01=0x0034}
0x0206…024e              Head {h00=0x0044, h01=0x0050, text=»*   INPUT OR DATA REQUEST A BRANCH IS MADE TO INTERRUPT HANDLER «, t00=0x0001, t01=0x007a}
0x024e…026c              Head {h00=0x001a, h01=0x0050, text=»*   FOR ACTUAL DEVICE.«, t00=0x0001, t01=0x00c2}
0x026c…02b4              Head {h00=0x0044, h01=0x0050, text=»*   IF CONTROL CHARACTER, THIS IS EXAMINED AND NECESSARY ACTIONS«, t00=0x0001, t01=0x00e0}
0x02b4…02d0              Head {h00=0x0018, h01=0x0050, text=»*   ARE CARRIED OUT.«, t00=0x0001, t01=0x0128}
0x02d0…02da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0144}
0x02da…031a              Head {h00=0x003c, h01=0x0050, text=»*   THE DRIVER ALSO INCLUDES THE FOLLOWING SUBROUTINES:-«, t00=0x0001, t01=0x014e}
0x031a…0324              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x018e}
0x0324…0356              Head {h00=0x002e, h01=0x0050, text=»*   - OUTLIN   SEND ONE CHARACTER VIA CHLT«, t00=0x0002, t01=0x0008}
0x0356…0360              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x003a}
0x0360…03a0              Head {h00=0x003c, h01=0x0050, text=»*   - CHLTON   EXECUTE CIO-START ON EVERY CHLT IN SYSTEM«, t00=0x0002, t01=0x0044}
0x03a0…03aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0084}
0x03aa…03e2              Head {h00=0x0034, h01=0x0050, text=»*   - GETCHR   GET ONE CHARACTER FROM ECB-BUFFER«, t00=0x0002, t01=0x008e}
0x03e2…03ec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c6}
0x03ec…0422              Head {h00=0x0032, h01=0x0050, text=»*    CONTROL WORK TABLES FOR THE CHANNELS ARE «, t00=0x0002, t01=0x00d0}
0x0422…0446              Head {h00=0x0020, h01=0x0050, text=»*    INCLUDED IN THE DRIVER.«, t00=0x0002, t01=0x0106}
0x0446…0454              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x012a}
0x0454…045e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0138}
0x045e…0468              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0142}
0x0468…0472              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014c}
0x0472…04b8              Head {h00=0x0042, h01=0x0050, text=»*   THE FOLLOWING FUNCTIONS ARE ALSO INCLUDED IN THE DRIVER:- «, t00=0x0002, t01=0x0156}
0x04b8…04c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x000c}
0x04c2…0510              Head {h00=0x004a, h01=0x0050, text=»*   - OUTPUT   SEND ONE CHARACTER, SAVE A3-A5 AND RETURN TO DISPATCHER«, t00=0x0003, t01=0x0016}
0x0510…051a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0064}
0x051a…0554              Head {h00=0x0036, h01=0x0050, text=»*   - STREG    SAVE A3-A5 AND RETURN TO DISPATCHER«, t00=0x0003, t01=0x006e}
0x0554…055e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00a8}
0x055e…05a6              Head {h00=0x0044, h01=0x0050, text=»*   - LDREG    IF INTERRUPT IS ALLOWED, RESTORE A3-A5 AND RETURN«, t00=0x0003, t01=0x00b2}
0x05a6…05cc              Head {h00=0x0022, h01=0x0050, text=»*              TO USER VIA A5 «, t00=0x0003, t01=0x00fa}
0x05cc…05d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0120}
0x05d6…0614              Head {h00=0x003a, h01=0x0050, text=»*   - LDREGE   RESTORE A3-A5 AND RETURN TO USER VIA A5«, t00=0x0003, t01=0x012a}
0x0614…061e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0168}
0x061e…0628              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0172}
0x0628…0632              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x017c}
0x0632…0664              Head {h00=0x002e, h01=0x0050, text=»*   NORMAL REGISTER USAGE IN THE DRIVER:- «, t00=0x0003, t01=0x0186}
0x0664…066e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0028}
0x066e…068a              Head {h00=0x0018, h01=0x0050, text=»*   A1 = RETURN CODE«, t00=0x0004, t01=0x0032}
0x068a…06a6              Head {h00=0x0018, h01=0x0050, text=»*   A2 = INPUT WORD «, t00=0x0004, t01=0x004e}
0x06a6…06c6              Head {h00=0x001c, h01=0x0050, text=»*   A3 = LINE NUMBER * 2«, t00=0x0004, t01=0x006a}
0x06c6…06e8              Head {h00=0x001e, h01=0x0050, text=»*   A4 = DEVICE NUMBER * 2«, t00=0x0004, t01=0x008a}
0x06e8…0704              Head {h00=0x0018, h01=0x0050, text=»*   A5 = CWT-ADDRESS«, t00=0x0004, t01=0x00ac}
0x0704…0720              Head {h00=0x0018, h01=0x0050, text=»*   A6 = DWT-ADDRESS«, t00=0x0004, t01=0x00c8}
0x0720…0736              Head {h00=0x0012, h01=0x0050, text=»*   A7 = ORDER«, t00=0x0004, t01=0x00e4}
0x0736…0752              Head {h00=0x0018, h01=0x0050, text=»*   A8 = ECB-ADDRESS«, t00=0x0004, t01=0x00fa}
0x0752…075c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0116}
0x075c…0766              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0120}
0x0766…0770              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x012a}
0x0770…077e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0134}
0x077e…0788              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0142}
0x0788…079c              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0004, t01=0x014c}
0x079c…07b0              Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0004, t01=0x0160}
0x07b0…07c4              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0004, t01=0x0174}
0x07c4…07ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0188}
0x07ce…07d8 (5, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0004}
0x07d8…0802              Head {h00=0x0026, h01=0x0050, text=» ENTRY CHLT1 INTERRUPT FROM CHLT01«, t00=0x0005, t01=0x000e}
0x0802…082c              Head {h00=0x0026, h01=0x0050, text=» ENTRY CHLT2 INTERRUPT FROM CHLT2 «, t00=0x0005, t01=0x0038}
0x082c…0856              Head {h00=0x0026, h01=0x0050, text=» ENTRY CHLT3 INTERRUPT FROM CHLT3 «, t00=0x0005, t01=0x0062}
0x0856…087e              Head {h00=0x0024, h01=0x0050, text=» ENTRY CHLT4 INTERRUP FROM CHLT4«, t00=0x0005, t01=0x008c}
0x087e…08a6              Head {h00=0x0024, h01=0x0050, text=» ENTRY OUTLIN SEND ONE CHARACTER«, t00=0x0005, t01=0x00b4}
0x08a6…08ca              Head {h00=0x0020, h01=0x0050, text=» ENTRY CHLTON START OF CHLT «, t00=0x0005, t01=0x00dc}
0x08ca…0908              Head {h00=0x003a, h01=0x0050, text=» ENTRY OUTPUT SAVE REGISTERS, SEND CHAR. AND DISPATCH «, t00=0x0005, t01=0x0100}
0x0908…0934              Head {h00=0x0028, h01=0x0050, text=» ENTRY LDREG RESTORE A3-A5 ANDRETURN«, t00=0x0005, t01=0x013e}
0x0934…0966              Head {h00=0x002e, h01=0x0050, text=» ENTRY LDREGE WAY BACK FROM ECHO HANDLING «, t00=0x0005, t01=0x016a}
0x0966…0982              Head {h00=0x0018, h01=0x0050, text=» ENTRY LDREGF RETURN«, t00=0x0006, t01=0x000c}
0x0982…09b2              Head {h00=0x002c, h01=0x0050, text=» ENTRY STREG SAVE REGISTERS A3-A5 IN DWT«, t00=0x0006, t01=0x0028}
0x09b2…09ea              Head {h00=0x0034, h01=0x0050, text=» ENTRY GETCHR GET ONE CHARACTER FROM ECB-BUFFER «, t00=0x0006, t01=0x0058}
0x09ea…0a1e              Head {h00=0x0030, h01=0x0050, text=» ENTRY LOCHAN NUMBER OF LOCAL CHANNEL UNITS «, t00=0x0006, t01=0x0090}
0x0a1e…0a52              Head {h00=0x0030, h01=0x0050, text=» ENTRY RECHAN NUMBER OF REMOTE CHANNEL UNITS«, t00=0x0006, t01=0x00c4}
0x0a52…0a80              Head {h00=0x002a, h01=0x0050, text=» ENTRY CWTLT1 CONTROL WORK TABLE CHLT1«, t00=0x0006, t01=0x00f8}
0x0a80…0aae              Head {h00=0x002a, h01=0x0050, text=» ENTRY CWTLT2 CONTROL WORK TABLE CHLT2«, t00=0x0006, t01=0x0126}
0x0aae…0adc              Head {h00=0x002a, h01=0x0050, text=» ENTRY CWTLT3 CONTROL WORK TABLE CHLT3«, t00=0x0006, t01=0x0154}
0x0adc…0b0a              Head {h00=0x002a, h01=0x0050, text=» ENTRY CWTLT4 CONTROL WORK TABLE CHLT4«, t00=0x0006, t01=0x0182}
0x0b0a…0b38              Head {h00=0x002a, h01=0x0050, text=» ENTRY CWTRT1 DUMMY ENTRIES FOR REMOTE«, t00=0x0007, t01=0x0020}
0x0b38…0b4e              Head {h00=0x0012, h01=0x0050, text=» ENTRY CWTRT2 «, t00=0x0007, t01=0x004e}
0x0b4e…0b64              Head {h00=0x0012, h01=0x0050, text=» ENTRY CWTRT3 «, t00=0x0007, t01=0x0064}
0x0b64…0b7a              Head {h00=0x0012, h01=0x0050, text=» ENTRY CWTRT4 «, t00=0x0007, t01=0x007a}
0x0b7a…0b90              Head {h00=0x0012, h01=0x0050, text=» ENTRY CWTRT5 «, t00=0x0007, t01=0x0090}
0x0b90…0ba6              Head {h00=0x0012, h01=0x0050, text=» ENTRY CWTRT6 «, t00=0x0007, t01=0x00a6}
0x0ba6…0bbc              Head {h00=0x0012, h01=0x0050, text=» ENTRY CWTRT7 «, t00=0x0007, t01=0x00bc}
0x0bbc…0bd2              Head {h00=0x0012, h01=0x0050, text=» ENTRY CWTRT8 «, t00=0x0007, t01=0x00d2}
0x0bd2…0bf2              Head {h00=0x001c, h01=0x0050, text=» ENTRY REMFC DUMMY ENTRY«, t00=0x0007, t01=0x00e8}
0x0bf2…0c14              Head {h00=0x001e, h01=0x0050, text=» ENTRY DWREMU DUMMY ENTRY «, t00=0x0007, t01=0x0108}
0x0c14…0c3a              Head {h00=0x0022, h01=0x0050, text=» ENTRY ECHRTN RETURN FROM ECHO«, t00=0x0007, t01=0x012a}
0x0c3a…0c5a              Head {h00=0x001c, h01=0x0050, text=» ENTRY ECHO ECHO ROUTINE«, t00=0x0007, t01=0x0150}
0x0c5a…0c7c              Head {h00=0x001e, h01=0x0050, text=» ENTRY ECHEND END OF ECHO «, t00=0x0007, t01=0x0170}
0x0c7c…0c86 (8, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0004}
0x0c86…0c94              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x000e}
0x0c94…0c9e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x001c}
0x0c9e…0cd0              Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0008, t01=0x0026}
0x0cd0…0d02              Head {h00=0x002e, h01=0x0050, text=»*    EXTERNAL TOSS MODULE ENTRIES        *«, t00=0x0008, t01=0x0058}
0x0d02…0d34              Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0008, t01=0x008a}
0x0d34…0d3e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00bc}
0x0d3e…0d48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00c6}
0x0d48…0d72              Head {h00=0x0026, h01=0x0050, text=» EXTRN SAVE8 SAVE REGISTERS A1-A8 «, t00=0x0008, t01=0x00d0}
0x0d72…0d92              Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0008, t01=0x00fa}
0x0d92…0db6              Head {h00=0x0020, h01=0x0050, text=» EXTRN IHRET8 RESTORE A1-A8 «, t00=0x0008, t01=0x011a}
0x0db6…0ddc              Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT1 INTERRUPT TABLE «, t00=0x0008, t01=0x013e}
0x0ddc…0e02              Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT2 INTERRUPT TABLE «, t00=0x0008, t01=0x0164}
0x0e02…0e28              Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT3 INTERRUPT TABLE «, t00=0x0008, t01=0x018a}
0x0e28…0e4e              Head {h00=0x0022, h01=0x0050, text=» EXTRN INTLT4 INTERRUPT TABLE «, t00=0x0009, t01=0x0020}
0x0e4e…0e74              Head {h00=0x0022, h01=0x0050, text=» EXTRN SETIME GET TIMER BLOCK «, t00=0x0009, t01=0x0046}
0x0e74…0e9a              Head {h00=0x0022, h01=0x0050, text=» EXTRN SETIMP GET TIMER BLOCK «, t00=0x0009, t01=0x006c}
0x0e9a…0ec8              Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0009, t01=0x0092}
0x0ec8…0ede              Head {h00=0x0012, h01=0x0050, text=» EXTRN TENDIO «, t00=0x0009, t01=0x00c0}
0x0ede…0f02              Head {h00=0x0020, h01=0x0050, text=» EXTRN RTNA15 RETURN AND ENB«, t00=0x0009, t01=0x00d6}
0x0f02…0f0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00fa}
0x0f0c…0f16              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0104}
0x0f16…0f42              Head {h00=0x0028, h01=0x0050, text=»*********************************** «, t00=0x0009, t01=0x010e}
0x0f42…0f6e              Head {h00=0x0028, h01=0x0050, text=»*    DWT PARAMETERS               * «, t00=0x0009, t01=0x013a}
0x0f6e…0f9a              Head {h00=0x0028, h01=0x0050, text=»*********************************** «, t00=0x0009, t01=0x0166}
0x0f9a…0fb6 (10, 0, 398) Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x000a, t01=0x0004}
0x0fb6…0fd0              Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x000a, t01=0x0020}
0x0fd0…0ff2              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB-ADDRESS «, t00=0x000a, t01=0x003a}
0x0ff2…1020              Head {h00=0x002a, h01=0x0050, text=» EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK«, t00=0x000a, t01=0x005c}
0x1020…1036              Head {h00=0x0012, h01=0x0050, text=» EXTRN DWTWAT «, t00=0x000a, t01=0x008a}
0x1036…1040              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00a0}
0x1040…104e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x00aa}
0x104e…1056              Head {h00=0x0004, h01=0x0050, t00=0x000a, t01=0x00b8}
0x1056…1060              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00c0}
0x1060…1076              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x00ca}
0x1076…108c              Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x000a, t01=0x00e0}
0x108c…10a2              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x00f6}
0x10a2…10ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x010c}
0x10ac…10b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0116}
0x10b6…10e4              Head {h00=0x002a, h01=0x0050, text=»NOERR EQU 1 RETURN CODE. NOT OPERABLE «, t00=0x000a, t01=0x0120}
0x10e4…1108              Head {h00=0x0020, h01=0x0050, text=»DUMMSP EQU /03 SPECIAL DUMMY«, t00=0x000a, t01=0x014e}
0x1108…111e              Head {h00=0x0012, h01=0x0050, text=»DRQTIM EQU 30 «, t00=0x000a, t01=0x0172}
0x111e…1128              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0188}
0x1128…1132 (11, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0004}
0x1132…1164              Head {h00=0x002e, h01=0x0050, text=»*    DISPLACMENT IN DEVICE WORK TABLE DWT «, t00=0x000b, t01=0x000e}
0x1164…116e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0040}
0x116e…119a              Head {h00=0x0028, h01=0x0050, text=»DWTOCH EQU /6 LAST OUTPUT CHARACTER «, t00=0x000b, t01=0x004a}
0x119a…11c2              Head {h00=0x0024, h01=0x0050, text=»DWTOTQ EQU /10 OUTPUT QUEUE LINK«, t00=0x000b, t01=0x0076}
0x11c2…11e4              Head {h00=0x001e, h01=0x0050, text=»DWTA3 EQU /12 SAVE AREA A3«, t00=0x000b, t01=0x009e}
0x11e4…1206              Head {h00=0x001e, h01=0x0050, text=»DWTA4 EQU /14           A4«, t00=0x000b, t01=0x00c0}
0x1206…1228              Head {h00=0x001e, h01=0x0050, text=»DWTA5 EQU /16           A5«, t00=0x000b, t01=0x00e2}
0x1228…124c              Head {h00=0x0020, h01=0x0050, text=»DWTSB2 EQU /1E STACK BASE 2 «, t00=0x000b, t01=0x0104}
0x124c…1270              Head {h00=0x0020, h01=0x0050, text=»DWTTP EQU /20 TIMER POINTER «, t00=0x000b, t01=0x0128}
0x1270…1292              Head {h00=0x001e, h01=0x0050, text=»DWTECH EQU /22 ECHO DEVICE«, t00=0x000b, t01=0x014c}
0x1292…129c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x016e}
0x129c…12aa              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0178}
0x12aa…12b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0186}
0x12b4…12d4              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000b, t01=0x0190}
0x12d4…12f4              Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000c, t01=0x0020}
0x12f4…1314              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000c, t01=0x0040}
0x1314…131e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0060}
0x131e…135e              Head {h00=0x003c, h01=0x0050, text=»*   A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHARACTER «, t00=0x000c, t01=0x006a}
0x135e…139a              Head {h00=0x0038, h01=0x0050, text=»*   MAY BE INCLUDED TO THE DRIVER  BY SETTING X:A=1 «, t00=0x000c, t01=0x00aa}
0x139a…13a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e6}
0x13a4…13b6              Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x000c, t01=0x00f0}
0x13b6…13cc              Head {h00=0x0012, h01=0x0050, text=»LOGING EQU X:A«, t00=0x000c, t01=0x0102}
0x13cc…13d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0118}
0x13d6…140e              Head {h00=0x0034, h01=0x0050, text=»*    THIS DRIVER HANDLES ONE OR UP TO FOUR LOCAL«, t00=0x000c, t01=0x0122}
0x140e…1440              Head {h00=0x002e, h01=0x0050, text=»*    CHANNELS BY SETTING X:B TO 1,2,3 OR 4«, t00=0x000c, t01=0x015a}
0x1440…144a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x018c}
0x144a…145c              Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x000d, t01=0x0008}
0x145c…1472              Head {h00=0x0012, h01=0x0050, text=»LOCHAN EQU X:B«, t00=0x000d, t01=0x001a}
0x1472…147c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0030}
0x147c…14b8              Head {h00=0x0038, h01=0x0050, text=»*    ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND «, t00=0x000d, t01=0x003a}
0x14b8…14f0              Head {h00=0x0034, h01=0x0050, text=»*    UNDEFINED CONTROL CHARACTERS ARE UPDATED IN«, t00=0x000d, t01=0x0076}
0x14f0…152c              Head {h00=0x0038, h01=0x0050, text=»*    THE DRIVER. THIS FUNCTION CAN BE EXCLUDED FROM «, t00=0x000d, t01=0x00ae}
0x152c…1554              Head {h00=0x0024, h01=0x0050, text=»*    DRIVER BY SETTING X:C = 0. «, t00=0x000d, t01=0x00ea}
0x1554…155e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0112}
0x155e…1570              Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x000d, t01=0x011c}
0x1570…1586              Head {h00=0x0012, h01=0x0050, text=»ACKMUL EQU X:C«, t00=0x000d, t01=0x012e}
0x1586…1590              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0144}
0x1590…15cc              Head {h00=0x0038, h01=0x0050, text=»*    BY SETTING X:D = 1 A SOFTWARE TIME OUT HANDLING«, t00=0x000d, t01=0x014e}
0x15cc…160c              Head {h00=0x003c, h01=0x0050, text=»*    MISSING DATA REQUESTS FROM PRINTERS CAN BE INCLUDED«, t00=0x000d, t01=0x018a}
0x160c…1628              Head {h00=0x0018, h01=0x0050, text=»*    IN THE DRIVER. «, t00=0x000e, t01=0x003a}
0x1628…1668              Head {h00=0x003c, h01=0x0050, text=»*    AN ACKUMULATOR TO BE UPDATED EVERY TIME A SOFTWARE «, t00=0x000e, t01=0x0056}
0x1668…1696              Head {h00=0x002a, h01=0x0050, text=»*    TIME OUT OCCURS IS ALSO INCLUDED.«, t00=0x000e, t01=0x0096}
0x1696…16a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00c4}
0x16a0…16b2              Head {h00=0x000e, h01=0x0050, text=»X:D EQU 1 «, t00=0x000e, t01=0x00ce}
0x16b2…16c8              Head {h00=0x0012, h01=0x0050, text=»SOFTIM EQU X:D«, t00=0x000e, t01=0x00e0}
0x16c8…16d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f6}
0x16d2…16dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0100}
0x16dc…1708              Head {h00=0x0028, h01=0x0050, text=»*     ECHO FONCTION CAN BE EXCLODED «, t00=0x000e, t01=0x010a}
0x1708…1728              Head {h00=0x001c, h01=0x0050, text=»*     BY SETTING X:E = 0«, t00=0x000e, t01=0x0136}
0x1728…173a              Head {h00=0x000e, h01=0x0050, text=»X:E EQU 1 «, t00=0x000e, t01=0x0156}
0x173a…1750              Head {h00=0x0012, h01=0x0050, text=»CECHO EQU X:E «, t00=0x000e, t01=0x0168}
0x1750…175a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x017e}
0x175a…1768              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0188}
0x1768…1770              Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x0008}
0x1770…1778              Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x0010}
0x1778…178c              Head {h00=0x0010, h01=0x0050, text=»RECHAN EQU 0«, t00=0x000f, t01=0x0018}
0x178c…17a0              Head {h00=0x0010, h01=0x0050, text=»REMFC EQU 0 «, t00=0x000f, t01=0x002c}
0x17a0…17b4              Head {h00=0x0010, h01=0x0050, text=»CWTRT1 EQU *«, t00=0x000f, t01=0x0040}
0x17b4…17c8              Head {h00=0x0010, h01=0x0050, text=»CWTRT2 EQU *«, t00=0x000f, t01=0x0054}
0x17c8…17dc              Head {h00=0x0010, h01=0x0050, text=»CWTRT3 EQU *«, t00=0x000f, t01=0x0068}
0x17dc…17f0              Head {h00=0x0010, h01=0x0050, text=»CWTRT4 EQU *«, t00=0x000f, t01=0x007c}
0x17f0…1804              Head {h00=0x0010, h01=0x0050, text=»CWTRT5 EQU *«, t00=0x000f, t01=0x0090}
0x1804…1818              Head {h00=0x0010, h01=0x0050, text=»CWTRT6 EQU *«, t00=0x000f, t01=0x00a4}
0x1818…182c              Head {h00=0x0010, h01=0x0050, text=»CWTRT7 EQU *«, t00=0x000f, t01=0x00b8}
0x182c…1840              Head {h00=0x0010, h01=0x0050, text=»CWTRT8 EQU *«, t00=0x000f, t01=0x00cc}
0x1840…1854              Head {h00=0x0010, h01=0x0050, text=»DWREMU EQU *«, t00=0x000f, t01=0x00e0}
0x1854…1862              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x00f4}
0x1862…186c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0102}
0x186c…1876              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x010c}
0x1876…18b4              Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x000f, t01=0x0116}
0x18b4…18f2              Head {h00=0x003a, h01=0x0050, text=»*    C W T L T 1                                    * «, t00=0x000f, t01=0x0154}
0x18f2…1930 (16, 0, 398) Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0010, t01=0x0004}
0x1930…193a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0042}
0x193a…1972              Head {h00=0x0034, h01=0x0050, text=»*    CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 1«, t00=0x0010, t01=0x004c}
0x1972…197c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0084}
0x197c…1986              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x008e}
0x1986…19a8              Head {h00=0x001e, h01=0x0050, text=»DWA1 EQU /03 DEVICEADDRESS«, t00=0x0010, t01=0x0098}
0x19a8…19b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ba}
0x19b2…19d2              Head {h00=0x001c, h01=0x0050, text=»CWTLT1 EQU * TABLE ENTRY«, t00=0x0010, t01=0x00c4}
0x19d2…1a06              Head {h00=0x0030, h01=0x0050, text=»CWTLDW EQU *-CWTLT1 LAST OUTPUT DWT-ADDRESS «, t00=0x0010, t01=0x00e4}
0x1a06…1a16              Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0010, t01=0x0118}
0x1a16…1a32              Head {h00=0x0018, h01=0x0050, text=»CWTLOW EQU *-CWTLT1 «, t00=0x0010, t01=0x0128}
0x1a32…1a52              Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0010, t01=0x0144}
0x1a52…1a80              Head {h00=0x002a, h01=0x0050, text=»CWTITA EQU *-CWTLT1 ADDRESS TO INTLT1 «, t00=0x0010, t01=0x0164}
0x1a80…1a94 (17, 0, 400) Head {h00=0x0010, h01=0x0050, text=» DATA INTLT1«, t00=0x0011, t01=0x0004}
0x1a94…1ab4              Head {h00=0x001c, h01=0x0050, text=»CWTINR EQU *-CWTLT1 INR «, t00=0x0011, t01=0x0018}
0x1ab4…1aca              Head {h00=0x0012, h01=0x0050, text=» INR A2,0,DWA1«, t00=0x0011, t01=0x0038}
0x1aca…1aea              Head {h00=0x001c, h01=0x0050, text=»CWTOTR EQU *-CWTLT1 OTR «, t00=0x0011, t01=0x004e}
0x1aea…1b00              Head {h00=0x0012, h01=0x0050, text=» OTR A2,0,DWA1«, t00=0x0011, t01=0x006e}
0x1b00…1b26              Head {h00=0x0022, h01=0x0050, text=»CWTCIS EQU *-CWTLT1 CIO-START «, t00=0x0011, t01=0x0084}
0x1b26…1b3c              Head {h00=0x0012, h01=0x0050, text=» CIO A2,1,DWA1«, t00=0x0011, t01=0x00aa}
0x1b3c…1b58              Head {h00=0x0018, h01=0x0050, text=»CWTRTC EQU *-CWTLT1 «, t00=0x0011, t01=0x00c0}
0x1b58…1b7e              Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0011, t01=0x00dc}
0x1b7e…1ba6              Head {h00=0x0024, h01=0x0050, text=»CWTEQ EQU *-CWTLT1 END OF QUEUE «, t00=0x0011, t01=0x0102}
0x1ba6…1bb6              Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0011, t01=0x012a}
0x1bb6…1bd2              Head {h00=0x0018, h01=0x0050, text=»CWTADD EQU *-CWTLT1 «, t00=0x0011, t01=0x013a}
0x1bd2…1bdc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0156}
0x1bdc…1bf2              Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0011, t01=0x0160}
0x1bf2…1bfc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0176}
0x1bfc…1c1c              Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0011, t01=0x0180}
0x1c1c…1c44              Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0012, t01=0x0010}
0x1c44…1c74              Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR «, t00=0x0012, t01=0x0038}
0x1c74…1c90              Head {h00=0x0018, h01=0x0050, text=»ACKTIM EQU *-CWTLT1 «, t00=0x0012, t01=0x0068}
0x1c90…1cbc              Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0012, t01=0x0084}
0x1cbc…1cc6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b0}
0x1cc6…1cd2              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00ba}
0x1cd2…1ce0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x00c6}
0x1ce0…1cea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00d4}
0x1cea…1cf4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00de}
0x1cf4…1d32              Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0012, t01=0x00e8}
0x1d32…1d70              Head {h00=0x003a, h01=0x0050, text=»*    C W T L T 2                                    * «, t00=0x0012, t01=0x0126}
0x1d70…1dae              Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0012, t01=0x0164}
0x1dae…1db8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0012}
0x1db8…1df0              Head {h00=0x0034, h01=0x0050, text=»*    CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 2«, t00=0x0013, t01=0x001c}
0x1df0…1dfa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0054}
0x1dfa…1e0e              Head {h00=0x0010, h01=0x0050, text=»CWTLT2 EQU *«, t00=0x0013, t01=0x005e}
0x1e0e…1e18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0072}
0x1e18…1e2e              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x0013, t01=0x007c}
0x1e2e…1e52              Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0013, t01=0x0092}
0x1e52…1e5c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00b6}
0x1e5c…1e84              Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0013, t01=0x00c0}
0x1e84…1ea4              Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0013, t01=0x00e8}
0x1ea4…1ec8              Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0013, t01=0x0108}
0x1ec8…1ee2              Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0013, t01=0x012c}
0x1ee2…1efc              Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0013, t01=0x0146}
0x1efc…1f1c              Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0013, t01=0x0160}
0x1f1c…1f42              Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0013, t01=0x0180}
0x1f42…1f5e              Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0014, t01=0x0016}
0x1f5e…1f68              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0032}
0x1f68…1f7e              Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0014, t01=0x003c}
0x1f7e…1f88              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0052}
0x1f88…1fa8              Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0014, t01=0x005c}
0x1fa8…1fd0              Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0014, t01=0x007c}
0x1fd0…2000              Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0014, t01=0x00a4}
0x2000…202c              Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0014, t01=0x00d4}
0x202c…2036              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0100}
0x2036…2042              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x010a}
0x2042…204c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0116}
0x204c…2062              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x0014, t01=0x0120}
0x2062…206c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0136}
0x206c…207a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0140}
0x207a…2086              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x014e}
0x2086…209c              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0014, t01=0x015a}
0x209c…20c0              Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0014, t01=0x0170}
0x20c0…20ca (21, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0004}
0x20ca…20f2              Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0015, t01=0x000e}
0x20f2…2112              Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0015, t01=0x0036}
0x2112…2136              Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0015, t01=0x0056}
0x2136…2150              Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0015, t01=0x007a}
0x2150…216a              Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0015, t01=0x0094}
0x216a…218a              Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0015, t01=0x00ae}
0x218a…21b0              Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0015, t01=0x00ce}
0x21b0…21cc              Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0015, t01=0x00f4}
0x21cc…21d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0110}
0x21d6…21ec              Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0015, t01=0x011a}
0x21ec…21f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0130}
0x21f6…2216              Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0015, t01=0x013a}
0x2216…223e              Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0015, t01=0x015a}
0x223e…226e              Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0015, t01=0x0182}
0x226e…229a              Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0016, t01=0x0022}
0x229a…22a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x004e}
0x22a4…22b0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0058}
0x22b0…22ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0064}
0x22ba…22c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x006e}
0x22c4…22d0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0078}
0x22d0…22e6              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0016, t01=0x0084}
0x22e6…22f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x009a}
0x22f0…22fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00a4}
0x22fa…2334              Head {h00=0x0036, h01=0x0050, text=»*  CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.2«, t00=0x0016, t01=0x00ae}
0x2334…233e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00e8}
0x233e…2362              Head {h00=0x0020, h01=0x0050, text=»DWA2 EQU /13 DEVICE ADDRESS «, t00=0x0016, t01=0x00f2}
0x2362…236c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0116}
0x236c…2394              Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0016, t01=0x0120}
0x2394…23b4              Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0016, t01=0x0148}
0x23b4…23d8              Head {h00=0x0020, h01=0x0050, text=» DATA INTLT2 INTERRUPT TABLE«, t00=0x0016, t01=0x0168}
0x23d8…23f2              Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA2 INR«, t00=0x0016, t01=0x018c}
0x23f2…240c              Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA2 OTR«, t00=0x0017, t01=0x0016}
0x240c…242c              Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA2 CIO-START«, t00=0x0017, t01=0x0030}
0x242c…2452              Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0017, t01=0x0050}
0x2452…246e              Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0017, t01=0x0076}
0x246e…2478              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0092}
0x2478…248e              Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0017, t01=0x009c}
0x248e…2498              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b2}
0x2498…24b8              Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0017, t01=0x00bc}
0x24b8…24e0              Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0017, t01=0x00dc}
0x24e0…2510              Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0017, t01=0x0104}
0x2510…253c              Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0017, t01=0x0134}
0x253c…2546              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0160}
0x2546…2552              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x016a}
0x2552…2560              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0176}
0x2560…256a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0184}
0x256a…2574              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x018e}
0x2574…25ae              Head {h00=0x0036, h01=0x0050, text=»*  CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.3«, t00=0x0018, t01=0x0008}
0x25ae…25b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0042}
0x25b8…25cc              Head {h00=0x0010, h01=0x0050, text=»CWTLT3 EQU *«, t00=0x0018, t01=0x004c}
0x25cc…25e2              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0018, t01=0x0060}
0x25e2…2606              Head {h00=0x0020, h01=0x0050, text=»DWA3 EQU /23 DEVICE ADDRESS «, t00=0x0018, t01=0x0076}
0x2606…2610              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x009a}
0x2610…2638              Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0018, t01=0x00a4}
0x2638…2658              Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0018, t01=0x00cc}
0x2658…267c              Head {h00=0x0020, h01=0x0050, text=» DATA INTLT3 INTERRUPT TABLE«, t00=0x0018, t01=0x00ec}
0x267c…2696              Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA3 INR«, t00=0x0018, t01=0x0110}
0x2696…26b0              Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA3 OTR«, t00=0x0018, t01=0x012a}
0x26b0…26d0              Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA3 CIO-START«, t00=0x0018, t01=0x0144}
0x26d0…26f6              Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x0018, t01=0x0164}
0x26f6…2712              Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0018, t01=0x018a}
0x2712…271c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0016}
0x271c…2732              Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0019, t01=0x0020}
0x2732…273c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0036}
0x273c…275c              Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x0019, t01=0x0040}
0x275c…2784              Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x0019, t01=0x0060}
0x2784…27b4              Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x0019, t01=0x0088}
0x27b4…27e0              Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x0019, t01=0x00b8}
0x27e0…27ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e4}
0x27ea…27f6              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00ee}
0x27f6…2800              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00fa}
0x2800…280a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0104}
0x280a…2820              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0019, t01=0x010e}
0x2820…2844              Head {h00=0x0020, h01=0x0050, text=»DWA3 EQU /23 DEVICE ADDRESS «, t00=0x0019, t01=0x0124}
0x2844…284e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0148}
0x284e…2876              Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x0019, t01=0x0152}
0x2876…2896              Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x0019, t01=0x017a}
0x2896…28ba              Head {h00=0x0020, h01=0x0050, text=» DATA INTLT3 INTERRUPT TABLE«, t00=0x001a, t01=0x000a}
0x28ba…28d4              Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA3 INR«, t00=0x001a, t01=0x002e}
0x28d4…28ee              Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA3 OTR«, t00=0x001a, t01=0x0048}
0x28ee…290e              Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA3 CIO-START«, t00=0x001a, t01=0x0062}
0x290e…2934              Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x001a, t01=0x0082}
0x2934…2950              Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x001a, t01=0x00a8}
0x2950…295a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00c4}
0x295a…2970              Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x001a, t01=0x00ce}
0x2970…297a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00e4}
0x297a…299a              Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x001a, t01=0x00ee}
0x299a…29c2              Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x001a, t01=0x010e}
0x29c2…29f2              Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x001a, t01=0x0136}
0x29f2…2a1e              Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x001a, t01=0x0166}
0x2a1e…2a28 (27, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0004}
0x2a28…2a34              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x000e}
0x2a34…2a42              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x001a}
0x2a42…2a4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0028}
0x2a4c…2a84              Head {h00=0x0034, h01=0x0050, text=»*    CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 4«, t00=0x001b, t01=0x0032}
0x2a84…2a8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x006a}
0x2a8e…2aa2              Head {h00=0x0010, h01=0x0050, text=»CWTLT4 EQU *«, t00=0x001b, t01=0x0074}
0x2aa2…2aac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0088}
0x2aac…2ab6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0092}
0x2ab6…2acc              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x001b, t01=0x009c}
0x2acc…2af0              Head {h00=0x0020, h01=0x0050, text=»DWA4 EQU /33 DEVICE ADDRESS «, t00=0x001b, t01=0x00b2}
0x2af0…2afa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00d6}
0x2afa…2b22              Head {h00=0x0024, h01=0x0050, text=» DATA 0 LAST OUTPUT DWT-ADDRESS «, t00=0x001b, t01=0x00e0}
0x2b22…2b42              Head {h00=0x001c, h01=0x0050, text=» DATA 0 LAST OUTPUT WORD«, t00=0x001b, t01=0x0108}
0x2b42…2b66              Head {h00=0x0020, h01=0x0050, text=» DATA INTLT4 INTERRUPT TABLE«, t00=0x001b, t01=0x0128}
0x2b66…2b80              Head {h00=0x0016, h01=0x0050, text=» INR A2,0,DWA4 INR«, t00=0x001b, t01=0x014c}
0x2b80…2b9a              Head {h00=0x0016, h01=0x0050, text=» OTR A2,0,DWA4 OTR«, t00=0x001b, t01=0x0166}
0x2b9a…2bba              Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA4 CIO-START«, t00=0x001b, t01=0x0180}
0x2bba…2be0              Head {h00=0x0022, h01=0x0050, text=» DATA 0 RETRANSMISSION COUNTER«, t00=0x001c, t01=0x0010}
0x2be0…2bfc              Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x001c, t01=0x0036}
0x2bfc…2c06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0052}
0x2c06…2c1c              Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x001c, t01=0x005c}
0x2c1c…2c26              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0072}
0x2c26…2c46              Head {h00=0x001c, h01=0x0050, text=» DATA 0 NAK-ACKUMULATOR «, t00=0x001c, t01=0x007c}
0x2c46…2c6e              Head {h00=0x0024, h01=0x0050, text=» DATA 0 RETR. FAULT-ACKUMULATOR «, t00=0x001c, t01=0x009c}
0x2c6e…2c9e              Head {h00=0x002c, h01=0x0050, text=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR«, t00=0x001c, t01=0x00c4}
0x2c9e…2cca              Head {h00=0x0028, h01=0x0050, text=» DATA 0 PRINTER TIMEOUT ACKUMULATOR «, t00=0x001c, t01=0x00f4}
0x2cca…2cd4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0120}
0x2cd4…2ce0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x012a}
0x2ce0…2cea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0136}
0x2cea…2cf8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x0140}
0x2cf8…2d02              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x014e}
0x2d02…2d38              Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x001c, t01=0x0158}
0x2d38…2d6e              Head {h00=0x0032, h01=0x0050, text=»*    C H T A B                               *«, t00=0x001c, t01=0x018e}
0x2d6e…2da4              Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x001d, t01=0x0034}
0x2da4…2dae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x006a}
0x2dae…2de8              Head {h00=0x0036, h01=0x0050, text=»*   THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK «, t00=0x001d, t01=0x0074}
0x2de8…2e24              Head {h00=0x0038, h01=0x0050, text=»*   TABLES CWT TO CHANNEL UNITS FOR LOCAL AND REMOTE«, t00=0x001d, t01=0x00ae}
0x2e24…2e3a              Head {h00=0x0012, h01=0x0050, text=»*   TERMINALS.«, t00=0x001d, t01=0x00ea}
0x2e3a…2e44              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0100}
0x2e44…2e4e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x010a}
0x2e4e…2e62              Head {h00=0x0010, h01=0x0050, text=»CHTAB EQU * «, t00=0x001d, t01=0x0114}
0x2e62…2e86              Head {h00=0x0020, h01=0x0050, text=» DATA CHTABE-* TABLE LENGTH «, t00=0x001d, t01=0x0128}
0x2e86…2e9c              Head {h00=0x0012, h01=0x0050, text=» DATA CWTLT1  «, t00=0x001d, t01=0x014c}
0x2e9c…2eb0              Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT2«, t00=0x001d, t01=0x0162}
0x2eb0…2ec6              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x001d, t01=0x0176}
0x2ec6…2eda              Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT3«, t00=0x001d, t01=0x018c}
0x2eda…2ee6              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0010}
0x2ee6…2efc              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x001e, t01=0x001c}
0x2efc…2f10              Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT3«, t00=0x001e, t01=0x0032}
0x2f10…2f24              Head {h00=0x0010, h01=0x0050, text=» DATA CWTLT4«, t00=0x001e, t01=0x0046}
0x2f24…2f30              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x005a}
0x2f30…2f52              Head {h00=0x001e, h01=0x0050, text=»CHTABE EQU * END OF TABLE «, t00=0x001e, t01=0x0066}
0x2f52…2f5c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0088}
0x2f5c…2f66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0092}
0x2f66…2f70              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x009c}
0x2f70…2f7a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00a6}
0x2f7a…2f84              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00b0}
0x2f84…2f92              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x00ba}
0x2f92…2f9c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00c8}
0x2f9c…2fb2              Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001e, t01=0x00d2}
0x2fb2…2fbc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00e8}
0x2fbc…2fde              Head {h00=0x001e, h01=0x0050, text=»*   C H L T 1 / C H L T 2 «, t00=0x001e, t01=0x00f2}
0x2fde…3010              Head {h00=0x002e, h01=0x0050, text=»*   THIS IS THE INTERRUPT HANDLER FOR CHLT«, t00=0x001e, t01=0x0114}
0x3010…301a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0146}
0x301a…3030              Head {h00=0x0012, h01=0x0050, text=»*   C H L T 1 «, t00=0x001e, t01=0x0150}
0x3030…3050              Head {h00=0x001c, h01=0x0050, text=»*   INTERRUPT FROM CHLT1«, t00=0x001e, t01=0x0166}
0x3050…305a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0186}
0x305a…3066              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0190}
0x3066…307c              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x001f, t01=0x000c}
0x307c…3090              Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x001f, t01=0x0022}
0x3090…30a4              Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x001f, t01=0x0036}
0x30a4…30b0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x004a}
0x30b0…30c6              Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x001f, t01=0x0056}
0x30c6…30da              Head {h00=0x0010, h01=0x0050, text=»CHLT1 EQU * «, t00=0x001f, t01=0x006c}
0x30da…3102              Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x001f, t01=0x0080}
0x3102…312c              Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE REGISTERS A1-A8«, t00=0x001f, t01=0x00a8}
0x312c…315e              Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT1 SET CWT-ADDRESS FOR CHLT1 «, t00=0x001f, t01=0x00d2}
0x315e…3170              Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x001f, t01=0x0104}
0x3170…317a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0116}
0x317a…3190              Head {h00=0x0012, h01=0x0050, text=»*   C H L T 2 «, t00=0x001f, t01=0x0120}
0x3190…31b0              Head {h00=0x001c, h01=0x0050, text=»*   INTERRUPT FROM CHLT2«, t00=0x001f, t01=0x0136}
0x31b0…31ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0156}
0x31ba…31ce              Head {h00=0x0010, h01=0x0050, text=»CHLT2 EQU * «, t00=0x001f, t01=0x0160}
0x31ce…31f6              Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x001f, t01=0x0174}
0x31f6…3220              Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE REGISTERS A1-A8«, t00=0x0020, t01=0x000c}
0x3220…3252              Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT2 SET CWT-ADDRESS FOR CHLT2 «, t00=0x0020, t01=0x0036}
0x3252…325e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0068}
0x325e…3274              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=2 «, t00=0x0020, t01=0x0074}
0x3274…32a8              Head {h00=0x0030, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR-INSTRUCTION «, t00=0x0020, t01=0x008a}
0x32a8…32b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00be}
0x32b2…32be              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00c8}
0x32be…32c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00d4}
0x32c8…32de              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=3 «, t00=0x0020, t01=0x00de}
0x32de…32f0              Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x0020, t01=0x00f4}
0x32f0…32fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0106}
0x32fa…3310              Head {h00=0x0012, h01=0x0050, text=»*   C H L T 3 «, t00=0x0020, t01=0x0110}
0x3310…3330              Head {h00=0x001c, h01=0x0050, text=»*   INTERRUPT FROM CHLT3«, t00=0x0020, t01=0x0126}
0x3330…333a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0146}
0x333a…334e              Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x0020, t01=0x0150}
0x334e…3362              Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x0020, t01=0x0164}
0x3362…338a              Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0020, t01=0x0178}
0x338a…33b4              Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE REGISTERS A1-A8«, t00=0x0021, t01=0x0010}
0x33b4…33e6              Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 «, t00=0x0021, t01=0x003a}
0x33e6…340e              Head {h00=0x0024, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR «, t00=0x0021, t01=0x006c}
0x340e…3418              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0094}
0x3418…3424              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x009e}
0x3424…343a              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=4 «, t00=0x0021, t01=0x00aa}
0x343a…344c              Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x0021, t01=0x00c0}
0x344c…3456              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00d2}
0x3456…3460              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00dc}
0x3460…3476              Head {h00=0x0012, h01=0x0050, text=»*   C H L T 2 «, t00=0x0021, t01=0x00e6}
0x3476…3496              Head {h00=0x001c, h01=0x0050, text=»*   INTERRUPT FROM CHLT3«, t00=0x0021, t01=0x00fc}
0x3496…34a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x011c}
0x34a0…34b4              Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x0021, t01=0x0126}
0x34b4…34dc              Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0021, t01=0x013a}
0x34dc…3506              Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE REGISTERS A1-A8«, t00=0x0021, t01=0x0162}
0x3506…3538              Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT3 SET CWT-ADDRESS FOR CHLT3 «, t00=0x0021, t01=0x018c}
0x3538…354a              Head {h00=0x000e, h01=0x0050, text=» RF CLT010«, t00=0x0022, t01=0x002e}
0x354a…3560              Head {h00=0x0012, h01=0x0050, text=»*   C H L T 4 «, t00=0x0022, t01=0x0040}
0x3560…3580              Head {h00=0x001c, h01=0x0050, text=»*   INTERRUPT FROM CHLT4«, t00=0x0022, t01=0x0056}
0x3580…358a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0076}
0x358a…359e              Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x0022, t01=0x0080}
0x359e…35c6              Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0022, t01=0x0094}
0x35c6…35f0              Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE REGISTERS A1-A8«, t00=0x0022, t01=0x00bc}
0x35f0…3622              Head {h00=0x002e, h01=0x0050, text=» LDKL A5,CWTLT4 SET CWT-ADDRESS FOR CHLT4 «, t00=0x0022, t01=0x00e6}
0x3622…364a              Head {h00=0x0024, h01=0x0050, text=»CLT010 EX CWTINR,A5 EXECUTE INR «, t00=0x0022, t01=0x0118}
0x364a…3656              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0140}
0x3656…3660              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x014c}
0x3660…3676              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0022, t01=0x0156}
0x3676…3680              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x016c}
0x3680…368a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0176}
0x368a…36a0              Head {h00=0x0012, h01=0x0050, text=»*    C H L T 1«, t00=0x0022, t01=0x0180}
0x36a0…36aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0008}
0x36aa…36cc              Head {h00=0x001e, h01=0x0050, text=»*    INTERRUPT FROM CHLT1 «, t00=0x0023, t01=0x0012}
0x36cc…36d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0034}
0x36d6…36ea              Head {h00=0x0010, h01=0x0050, text=»CHLT1 EQU * «, t00=0x0023, t01=0x003e}
0x36ea…36fe              Head {h00=0x0010, h01=0x0050, text=»CHLT2 EQU * «, t00=0x0023, t01=0x0052}
0x36fe…3712              Head {h00=0x0010, h01=0x0050, text=»CHLT3 EQU * «, t00=0x0023, t01=0x0066}
0x3712…3726              Head {h00=0x0010, h01=0x0050, text=»CHLT4 EQU * «, t00=0x0023, t01=0x007a}
0x3726…3754              Head {h00=0x002a, h01=0x0050, text=» CF A15,SAVE8 SAVE REGISTERS ON STACK «, t00=0x0023, t01=0x008e}
0x3754…377c              Head {h00=0x0024, h01=0x0050, text=» LDKL A5,CWTLT1 GET CWT-ADDRESS «, t00=0x0023, t01=0x00bc}
0x377c…37a4              Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0023, t01=0x00e4}
0x37a4…37ba              Head {h00=0x0012, h01=0x0050, text=» INR A2,0,DWA1«, t00=0x0023, t01=0x010c}
0x37ba…37c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0122}
0x37c4…37d0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x012c}
0x37d0…37da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0138}
0x37da…37f0              Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0023, t01=0x0142}
0x37f0…3822              Head {h00=0x002e, h01=0x0050, text=» CF A15,LOGG ** LOGG OF INPUT CHARACTER **«, t00=0x0023, t01=0x0158}
0x3822…382e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x018a}
0x382e…383c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x0008}
0x383c…3846              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0016}
0x3846…3850              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0020}
0x3850…387e              Head {h00=0x002a, h01=0x0050, text=»*   DETERMINE LINE- AND DEVICE NUMBER «, t00=0x0024, t01=0x002a}
0x387e…3888              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0058}
0x3888…38ac              Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0024, t01=0x0062}
0x38ac…38d0              Head {h00=0x0020, h01=0x0050, text=» LDR A3,A2 INPUT WORD IN A3 «, t00=0x0024, t01=0x0086}
0x38d0…38e2              Head {h00=0x000e, h01=0x0050, text=» SRL A3,8 «, t00=0x0024, t01=0x00aa}
0x38e2…38f4              Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0024, t01=0x00bc}
0x38f4…391c              Head {h00=0x0024, h01=0x0050, text=» ANK A3,/E 2 * LINE NUMBER IN A3«, t00=0x0024, t01=0x00ce}
0x391c…392e              Head {h00=0x000e, h01=0x0050, text=» SRL A4,3 «, t00=0x0024, t01=0x00f6}
0x392e…3958              Head {h00=0x0026, h01=0x0050, text=» ANK A4,/E 2 * DEVICE NUMBER IN A4«, t00=0x0024, t01=0x0108}
0x3958…398a              Head {h00=0x002e, h01=0x0050, text=» ABL(NE) CLT100 INPUT IS A DATA CHARACTER «, t00=0x0024, t01=0x0132}
0x398a…399e              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0024, t01=0x0164}
0x399e…39ba              Head {h00=0x0018, h01=0x0050, text=» SUK A2,3 POWER ON ?«, t00=0x0024, t01=0x0178}
0x39ba…39d0 (37, 0, 400) Head {h00=0x0012, h01=0x0050, text=» RF(E) CHPOWO «, t00=0x0025, t01=0x0004}
0x39d0…39da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x001a}
0x39da…39e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0024}
0x39e4…3a18              Head {h00=0x0030, h01=0x0050, text=»*    CHECK QUEUE AND SEND IF SOMETHING THERE«, t00=0x0025, t01=0x002e}
0x3a18…3a22              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0062}
0x3a22…3a4c              Head {h00=0x0026, h01=0x0050, text=» LDR* A7,A5 LAST OUTPUT DWT IN A7 «, t00=0x0025, t01=0x006c}
0x3a4c…3a6e              Head {h00=0x001e, h01=0x0050, text=» CMR A5 RESET LAST OUTPUT «, t00=0x0025, t01=0x0096}
0x3a6e…3a92              Head {h00=0x0020, h01=0x0050, text=» LD A6,CWTEQ,A5 OUTPUT QUEUE«, t00=0x0025, t01=0x00b8}
0x3a92…3aa8              Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT020 «, t00=0x0025, t01=0x00dc}
0x3aa8…3ac4              Head {h00=0x0018, h01=0x0050, text=» STR A2,A15 SAVE A2 «, t00=0x0025, t01=0x00f2}
0x3ac4…3aec              Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTOTQ,A6 GET QUEUE LINK «, t00=0x0025, t01=0x010e}
0x3aec…3b14              Head {h00=0x0024, h01=0x0050, text=» ST A2,CWTEQ,A5 STORE IT IN CWT «, t00=0x0025, t01=0x0136}
0x3b14…3b3a              Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOCH,A6 GET CHARACTER«, t00=0x0025, t01=0x015e}
0x3b3a…3b60              Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0025, t01=0x0184}
0x3b60…3b7e              Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 RELOAD A2«, t00=0x0026, t01=0x001a}
0x3b7e…3b8c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x0038}
0x3b8c…3b96              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0046}
0x3b96…3ba0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0050}
0x3ba0…3bd6              Head {h00=0x0032, h01=0x0050, text=»*    CHECK CONTROL CHARACTER AND UPDATE ERROR-«, t00=0x0026, t01=0x005a}
0x3bd6…3c0c              Head {h00=0x0032, h01=0x0050, text=»*    ACKUMULATORS IF NAK, RETRANSMISSION FAULT«, t00=0x0026, t01=0x0090}
0x3c0c…3c38              Head {h00=0x0028, h01=0x0050, text=»*    OR UNDEFINED CONTROL CHARACTER «, t00=0x0026, t01=0x00c6}
0x3c38…3c42              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00f2}
0x3c42…3c56              Head {h00=0x0010, h01=0x0050, text=»CLT020 EQU *«, t00=0x0026, t01=0x00fc}
0x3c56…3c78              Head {h00=0x001e, h01=0x0050, text=» LDR A6,A7 GET LAST OUTPUT«, t00=0x0026, t01=0x0110}
0x3c78…3c8e              Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT062 «, t00=0x0026, t01=0x0132}
0x3c8e…3ca6              Head {h00=0x0014, h01=0x0050, text=» SUK A2,4 ACK ? «, t00=0x0026, t01=0x0148}
0x3ca6…3cbc              Head {h00=0x0012, h01=0x0050, text=» RF(Z) CLT040 «, t00=0x0026, t01=0x0160}
0x3cbc…3cd8              Head {h00=0x0018, h01=0x0050, text=» ADK A2,7 TIME-OUT ?«, t00=0x0026, t01=0x0176}
0x3cd8…3cee (39, 0, 398) Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT028 «, t00=0x0027, t01=0x0004}
0x3cee…3cf8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x001a}
0x3cf8…3d0e              Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0027, t01=0x0024}
0x3d0e…3d18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x003a}
0x3d18…3d30              Head {h00=0x0014, h01=0x0050, text=» SUK A2,5 NAK ? «, t00=0x0027, t01=0x0044}
0x3d30…3d46              Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT035 «, t00=0x0027, t01=0x005c}
0x3d46…3d58              Head {h00=0x000e, h01=0x0050, text=» LDK A7,2 «, t00=0x0027, t01=0x0072}
0x3d58…3d80              Head {h00=0x0024, h01=0x0050, text=» SUK A2,/16 RETRANSMISSION FAULT«, t00=0x0027, t01=0x0084}
0x3d80…3d96              Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT025 «, t00=0x0027, t01=0x00ac}
0x3d96…3dbc              Head {h00=0x0022, h01=0x0050, text=» ADK A7,2 UNDEFINED INTERRUPT «, t00=0x0027, t01=0x00c2}
0x3dbc…3dd4              Head {h00=0x0014, h01=0x0050, text=»CLT025 ADR A7,A5«, t00=0x0027, t01=0x00e8}
0x3dd4…3e08              Head {h00=0x0030, h01=0x0050, text=» IM CWTADD,A7 INCREMENT ACKUMULATOR FOR THIS«, t00=0x0027, t01=0x0100}
0x3e08…3e24              Head {h00=0x0018, h01=0x0050, text=»   TYPE OF INTERRUPT«, t00=0x0027, t01=0x0134}
0x3e24…3e2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0150}
0x3e2e…3e3a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x015a}
0x3e3a…3e44              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0166}
0x3e44…3e52              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0170}
0x3e52…3e5c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x017e}
0x3e5c…3e66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0188}
0x3e66…3e9a (40, 0, 400) Head {h00=0x0030, h01=0x0050, text=»*    NAK, TIME-OUT, RETRANSMISSION FAULT OR «, t00=0x0028, t01=0x0004}
0x3e9a…3ec2              Head {h00=0x0024, h01=0x0050, text=»*    UNDEFINED CONTROL CHARACTER«, t00=0x0028, t01=0x0038}
0x3ec2…3ecc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0060}
0x3ecc…3f0a              Head {h00=0x003a, h01=0x0050, text=»*    CHECK LAST OUTPUT AND TRY RECOVERY OF THAT DEVICE«, t00=0x0028, t01=0x006a}
0x3f0a…3f42              Head {h00=0x0034, h01=0x0050, text=»*    ONE TIME. IF NOT SUCCESS GO TO DRIVER WITH «, t00=0x0028, t01=0x00a8}
0x3f42…3f64              Head {h00=0x001e, h01=0x0050, text=»*    MESSAGE NOT OPERABLE.«, t00=0x0028, t01=0x00e0}
0x3f64…3f6e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0102}
0x3f6e…3f82              Head {h00=0x0010, h01=0x0050, text=»CLT028 EQU *«, t00=0x0028, t01=0x010c}
0x3f82…3fb4              Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/3000 ECHO MODE AND RECOVERY BIT «, t00=0x0028, t01=0x0120}
0x3fb4…3fea              Head {h00=0x0032, h01=0x0050, text=» AN A2,DWTST,A6 AT LEAST ONE OF THE BITS SET ?«, t00=0x0028, t01=0x0152}
0x3fea…4000              Head {h00=0x0012, h01=0x0050, text=» RF(NE) CLT032«, t00=0x0028, t01=0x0188}
0x4000…4034              Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/1000 INDICATE RECOVERY TRIAL DONE «, t00=0x0029, t01=0x000e}
0x4034…4064              Head {h00=0x002c, h01=0x0050, text=» XRS A2,DWTST,A6 SET BIT IN STATUS WORD «, t00=0x0029, t01=0x0042}
0x4064…4098              Head {h00=0x0030, h01=0x0050, text=»CLT030 LDK A3,2 INDICATE RECOVERY OF DEVICE «, t00=0x0029, t01=0x0072}
0x4098…40aa              Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0029, t01=0x00a6}
0x40aa…40bc              Head {h00=0x000e, h01=0x0050, text=» RF CPO025«, t00=0x0029, t01=0x00b8}
0x40bc…40ee              Head {h00=0x002e, h01=0x0050, text=»CLT032 LDK A1,NOERR INDICATE NOT OPERABLE «, t00=0x0029, t01=0x00ca}
0x40ee…4102              Head {h00=0x0010, h01=0x0050, text=» ABL CLT110 «, t00=0x0029, t01=0x00fc}
0x4102…4110              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0110}
0x4110…411a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x011e}
0x411a…4124              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0128}
0x4124…4136              Head {h00=0x000e, h01=0x0050, text=»*    N A K«, t00=0x0029, t01=0x0132}
0x4136…4140              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0144}
0x4140…4186              Head {h00=0x0042, h01=0x0050, text=»*    ERROR ACKUMULATOR AND RETRANSMISSION COUNTER IS UPDATED. «, t00=0x0029, t01=0x014e}
0x4186…41cc (42, 0, 400) Head {h00=0x0042, h01=0x0050, text=»*    LAST OUTPUT CHARACTER IS RETRANSMITTED BY CHANNEL DRIVER «, t00=0x002a, t01=0x0004}
0x41cc…4210              Head {h00=0x0040, h01=0x0050, text=»*    UP TO SIX TIMES AND IF STILL NO SUCCESS RETURN CODE NOT«, t00=0x002a, t01=0x004a}
0x4210…4240              Head {h00=0x002c, h01=0x0050, text=»*    OPERABLE IS SENT TO DEVICE DRIVER. «, t00=0x002a, t01=0x008e}
0x4240…424a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00be}
0x424a…425e              Head {h00=0x0010, h01=0x0050, text=»CLT035 EQU *«, t00=0x002a, t01=0x00c8}
0x425e…4274              Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x002a, t01=0x00dc}
0x4274…427e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00f2}
0x427e…42ac              Head {h00=0x002a, h01=0x0050, text=» IM CWTADD,A5 UPDATE ERROR ACKUMULATOR«, t00=0x002a, t01=0x00fc}
0x42ac…42b8              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x012a}
0x42b8…42c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0136}
0x42c2…42f8              Head {h00=0x0032, h01=0x0050, text=» IM CWTRTC,A5 INCREMENT RETRANSMISSION COUNTER«, t00=0x002a, t01=0x0140}
0x42f8…431c              Head {h00=0x0020, h01=0x0050, text=» LD A4,CWTRTC,A5 GET COUNTER«, t00=0x002a, t01=0x0176}
0x431c…433c              Head {h00=0x001c, h01=0x0050, text=» SUK A4,7 SEVEN TIMES ? «, t00=0x002b, t01=0x000a}
0x433c…4352              Head {h00=0x0012, h01=0x0050, text=» RB(E) CLT032 «, t00=0x002b, t01=0x002a}
0x4352…4380              Head {h00=0x002a, h01=0x0050, text=» LD A2,CWTLOW,A5 GET LAST OUTPUT WORD «, t00=0x002b, t01=0x0040}
0x4380…4392              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A5«, t00=0x002b, t01=0x006e}
0x4392…43c0              Head {h00=0x002a, h01=0x0050, text=» EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION «, t00=0x002b, t01=0x0080}
0x43c0…43e8              Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 STORE LAST DWT IN CWT«, t00=0x002b, t01=0x00ae}
0x43e8…43fe              Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x002b, t01=0x00d6}
0x43fe…4430              Head {h00=0x002e, h01=0x0050, text=» CF A15,LOGG **  LOGG OUTPUT CHARACTER  **«, t00=0x002b, t01=0x00ec}
0x4430…443c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x011e}
0x443c…4472              Head {h00=0x0032, h01=0x0050, text=» SC A2,DWTOCH,A6 STORE OUTPUT CHARACTER IN DWT«, t00=0x002b, t01=0x012a}
0x4472…4484              Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x002b, t01=0x0160}
0x4484…4492              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0172}
0x4492…449c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0180}
0x449c…44a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x018a}
0x44a6…44c6 (44, 0, 400) Head {h00=0x001c, h01=0x0050, text=»*    ACK      DATA = 07 «, t00=0x002c, t01=0x0004}
0x44c6…44d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0024}
0x44d0…4506              Head {h00=0x0032, h01=0x0050, text=»*    SIMULATE DATA REQUEST IF RETURN CODE FROM«, t00=0x002c, t01=0x002e}
0x4506…4538              Head {h00=0x002e, h01=0x0050, text=»*    CHLT OR DEVICE WITHOUT DATA REQUEST, «, t00=0x002c, t01=0x0064}
0x4538…455a              Head {h00=0x001e, h01=0x0050, text=»*    ELSE GO TO DISPATCHER«, t00=0x002c, t01=0x0096}
0x455a…4564              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00b8}
0x4564…4578              Head {h00=0x0010, h01=0x0050, text=»CLT040 EQU *«, t00=0x002c, t01=0x00c2}
0x4578…458e              Head {h00=0x0012, h01=0x0050, text=» LDKL A7,/EFFF«, t00=0x002c, t01=0x00d6}
0x458e…45c8              Head {h00=0x0036, h01=0x0050, text=» ANS A7,DWTST,A6 RESET RECOVERY BIT IN STATUS WORD«, t00=0x002c, t01=0x00ec}
0x45c8…45da              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x002c, t01=0x0126}
0x45da…4612              Head {h00=0x0034, h01=0x0050, text=» RF(NZ) CLT110 RETURN CODE,SIMULATE DATA REQUEST«, t00=0x002c, t01=0x0138}
0x4612…4642              Head {h00=0x002c, h01=0x0050, text=» LDR* A7,A6 DEVICE WITHOUT DATA REQUEST?«, t00=0x002c, t01=0x0170}
0x4642…4672              Head {h00=0x002c, h01=0x0050, text=» RF(N) CLT110 YES. SIMULATE DATA REQUEST«, t00=0x002d, t01=0x0010}
0x4672…467c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0040}
0x467c…4692              Head {h00=0x0012, h01=0x0050, text=» IFF SOFTIM=1 «, t00=0x002d, t01=0x004a}
0x4692…469c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0060}
0x469c…46b0              Head {h00=0x0010, h01=0x0050, text=»CLT062 EQU *«, t00=0x002d, t01=0x006a}
0x46b0…46c0              Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x002d, t01=0x007e}
0x46c0…46ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x008e}
0x46ca…46d6              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0098}
0x46d6…46e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00a4}
0x46e0…46ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00ae}
0x46ea…4700              Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x002d, t01=0x00b8}
0x4700…470a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00ce}
0x470a…4718              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x00d8}
0x4718…4722              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00e6}
0x4722…472c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00f0}
0x472c…4748              Head {h00=0x0018, h01=0x0050, text=»*    PRINTER TIMING «, t00=0x002d, t01=0x00fa}
0x4748…4752              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0116}
0x4752…475e              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x002d, t01=0x0120}
0x475e…478a              Head {h00=0x0028, h01=0x0050, text=» LC A3,DWTOCH,A6 GET LAST CHARACTER «, t00=0x002d, t01=0x012c}
0x478a…479e              Head {h00=0x0010, h01=0x0050, text=» ANK A3,/7F «, t00=0x002d, t01=0x0158}
0x479e…47c2              Head {h00=0x0020, h01=0x0050, text=» SUK A3,DUMMSP SPECIAL DUMMY«, t00=0x002d, t01=0x016c}
0x47c2…47dc              Head {h00=0x0016, h01=0x0050, text=» RF(E) CLT070 YES «, t00=0x002d, t01=0x0190}
0x47dc…480a              Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTTP,A6 ADDRESS TO TIMER BLOCK«, t00=0x002e, t01=0x001a}
0x480a…4820              Head {h00=0x0012, h01=0x0050, text=» RF(E) CLT060 «, t00=0x002e, t01=0x0048}
0x4820…482a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x005e}
0x482a…4844              Head {h00=0x0016, h01=0x0050, text=»*    RESTART TIMER«, t00=0x002e, t01=0x0068}
0x4844…484e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0082}
0x484e…4874              Head {h00=0x0022, h01=0x0050, text=» LDKL A3,-DRQTIM RESTART TIMER«, t00=0x002e, t01=0x008c}
0x4874…488c              Head {h00=0x0014, h01=0x0050, text=» ST* A3,DWTTP,A6«, t00=0x002e, t01=0x00b2}
0x488c…489c              Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x002e, t01=0x00ca}
0x489c…48a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00da}
0x48a6…48be              Head {h00=0x0014, h01=0x0050, text=»*    START TIMER«, t00=0x002e, t01=0x00e4}
0x48be…48c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00fc}
0x48c8…48ea              Head {h00=0x001e, h01=0x0050, text=»CLT060 LDR A1,A6 PARAMETER«, t00=0x002e, t01=0x0106}
0x48ea…490e              Head {h00=0x0020, h01=0x0050, text=» LDK A4,DWTTP TIMER POINTER «, t00=0x002e, t01=0x0128}
0x490e…4936              Head {h00=0x0024, h01=0x0050, text=» ADR A4,A6 ADD WITH DWT-ADDRESS «, t00=0x002e, t01=0x014c}
0x4936…495c              Head {h00=0x0022, h01=0x0050, text=» CF A15,SETIMP GET TIMER BLOCK«, t00=0x002e, t01=0x0174}
0x495c…499e              Head {h00=0x003e, h01=0x0050, text=» DATA DRQTUT,DRQTIM ADDRESS TO TIME-OUT ROUTINE AND DELAY «, t00=0x002f, t01=0x000a}
0x499e…49b2              Head {h00=0x0010, h01=0x0050, text=»CLT062 EQU *«, t00=0x002f, t01=0x004c}
0x49b2…49c2              Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x002f, t01=0x0060}
0x49c2…49ca              Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0070}
0x49ca…49d8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x0078}
0x49d8…49e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0086}
0x49e2…49ec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0090}
0x49ec…4a10              Head {h00=0x0020, h01=0x0050, text=»*    RESET TIMER IF STARTED «, t00=0x002f, t01=0x009a}
0x4a10…4a1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00be}
0x4a1a…4a42              Head {h00=0x0024, h01=0x0050, text=»CLT070 LD A3,DWTTP,A6 ADDRESS ? «, t00=0x002f, t01=0x00c8}
0x4a42…4a58              Head {h00=0x0012, h01=0x0050, text=» RF(E) EXIT NO«, t00=0x002f, t01=0x00f0}
0x4a58…4a7a              Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x002f, t01=0x0106}
0x4a7a…4aac              Head {h00=0x002e, h01=0x0050, text=» CM DWTTP,A6 RESET ADDRESSPOINTER TO TIMER«, t00=0x002f, t01=0x0128}
0x4aac…4abc              Head {h00=0x000c, h01=0x0050, text=» RF EXIT«, t00=0x002f, t01=0x015a}
0x4abc…4aca              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x016a}
0x4aca…4ad4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0178}
0x4ad4…4b0e              Head {h00=0x0036, h01=0x0050, text=»*    TIME-OUT ROUTINE HANDLING MISSING INTERRUPTS «, t00=0x002f, t01=0x0182}
0x4b0e…4b28              Head {h00=0x0016, h01=0x0050, text=»*    FROM PRINTERS«, t00=0x0030, t01=0x002c}
0x4b28…4b32              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0046}
0x4b32…4b46              Head {h00=0x0010, h01=0x0050, text=»DRQTUT EQU *«, t00=0x0030, t01=0x0050}
0x4b46…4b68              Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 GET DWT-ADDRESS«, t00=0x0030, t01=0x0064}
0x4b68…4b9a              Head {h00=0x002e, h01=0x0050, text=» CM DWTTP,A6 RESET POINTER TO TIMER BLOCK «, t00=0x0030, t01=0x0086}
0x4b9a…4bb2              Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x0030, t01=0x00b8}
0x4bb2…4bd0              Head {h00=0x001a, h01=0x0050, text=» SLL A3,2 ECHO MODE ? «, t00=0x0030, t01=0x00d0}
0x4bd0…4bea              Head {h00=0x0016, h01=0x0050, text=» RF(N) CLT110 YES «, t00=0x0030, t01=0x00ee}
0x4bea…4bf4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0108}
0x4bf4…4c0a              Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0030, t01=0x0112}
0x4c0a…4c20              Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x0030, t01=0x0128}
0x4c20…4c2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x013e}
0x4c2a…4c50              Head {h00=0x0022, h01=0x0050, text=» LDR* A5,A6 CHANNEL PARAMETER «, t00=0x0030, t01=0x0148}
0x4c50…4c62              Head {h00=0x000e, h01=0x0050, text=» ANK A5,/F«, t00=0x0030, t01=0x016e}
0x4c62…4c7e              Head {h00=0x0018, h01=0x0050, text=» SLL A5,1 2 * INDEX «, t00=0x0030, t01=0x0180}
0x4c7e…4caa              Head {h00=0x0028, h01=0x0050, text=» ADK A5,2 JUST TO AVOID TABLE LENGTH«, t00=0x0031, t01=0x000c}
0x4caa…4cd2              Head {h00=0x0024, h01=0x0050, text=» LD A5,CHTAB,A5 GET CWT-ADDRESS «, t00=0x0031, t01=0x0038}
0x4cd2…4cfe              Head {h00=0x0028, h01=0x0050, text=» IM ACKTIM,A5 INCREMENT ACKUMULATOR «, t00=0x0031, t01=0x0060}
0x4cfe…4d08              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x008c}
0x4d08…4d14              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0096}
0x4d14…4d2a              Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x0031, t01=0x00a2}
0x4d2a…4d40              Head {h00=0x0012, h01=0x0050, text=» IFT ACKMUL=1 «, t00=0x0031, t01=0x00b8}
0x4d40…4d56              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0031, t01=0x00ce}
0x4d56…4d60              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00e4}
0x4d60…4d88              Head {h00=0x0024, h01=0x0050, text=» LDKL A5,CWTLT1 GET CWT-ADDRESS «, t00=0x0031, t01=0x00ee}
0x4d88…4db4              Head {h00=0x0028, h01=0x0050, text=» IM ACKTIM,A5 INCREMENT ACKUMULATOR «, t00=0x0031, t01=0x0116}
0x4db4…4dbe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0142}
0x4dbe…4dca              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x014c}
0x4dca…4de0              Head {h00=0x0012, h01=0x0050, text=» IFT SOFTIM=1 «, t00=0x0031, t01=0x0158}
0x4de0…4dea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x016e}
0x4dea…4dfc              Head {h00=0x000e, h01=0x0050, text=» RB CLT030«, t00=0x0031, t01=0x0178}
0x4dfc…4e06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x018a}
0x4e06…4e12 (50, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x0004}
0x4e12…4e1c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0010}
0x4e1c…4e2a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x001a}
0x4e2a…4e34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0028}
0x4e34…4e56              Head {h00=0x001e, h01=0x0050, text=»*   POWER ON    DATA = 03 «, t00=0x0032, t01=0x0032}
0x4e56…4e60              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0054}
0x4e60…4e9a              Head {h00=0x0036, h01=0x0050, text=»*   RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE«, t00=0x0032, t01=0x005e}
0x4e9a…4ed4              Head {h00=0x0036, h01=0x0050, text=»*    ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL«, t00=0x0032, t01=0x0098}
0x4ed4…4efc              Head {h00=0x0024, h01=0x0050, text=»*    UNIT OR THOSE IN ECHO MODE.«, t00=0x0032, t01=0x00d2}
0x4efc…4f06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00fa}
0x4f06…4f10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0104}
0x4f10…4f3a              Head {h00=0x0026, h01=0x0050, text=»*     ON EXIT TO RECOVERY ROUTINE:«, t00=0x0032, t01=0x010e}
0x4f3a…4f44              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0138}
0x4f44…4f6a              Head {h00=0x0022, h01=0x0050, text=»*     A5 = STACKBASE 2 IN DWT «, t00=0x0032, t01=0x0142}
0x4f6a…4f88              Head {h00=0x001a, h01=0x0050, text=»*     A6 = DWT-ADDRESS«, t00=0x0032, t01=0x0168}
0x4f88…4fa0              Head {h00=0x0014, h01=0x0050, text=»*     A7 = ORDER«, t00=0x0032, t01=0x0186}
0x4fa0…4faa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x000e}
0x4faa…4fbe              Head {h00=0x0010, h01=0x0050, text=»CHPOWO EQU *«, t00=0x0033, t01=0x0018}
0x4fbe…4fd4              Head {h00=0x0012, h01=0x0050, text=» CF A15,GETLIN«, t00=0x0033, t01=0x002c}
0x4fd4…4ffc              Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A5 GET LAST OUTPUT DWT «, t00=0x0033, t01=0x0042}
0x4ffc…502e              Head {h00=0x002e, h01=0x0050, text=» CM CWTRTC,A5 RESET RETRANSMISSION COUNTER«, t00=0x0033, t01=0x006a}
0x502e…5040              Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0033, t01=0x009c}
0x5040…5062              Head {h00=0x001e, h01=0x0050, text=» LDR A3,A6 DEVICE COUNTER «, t00=0x0033, t01=0x00ae}
0x5062…5084              Head {h00=0x001e, h01=0x0050, text=» LDR A1,A8 ADDRESS POINTER«, t00=0x0033, t01=0x00d0}
0x5084…50ac              Head {h00=0x0024, h01=0x0050, text=» RF(Z) EXIT EXIT IF NOT DEFINED «, t00=0x0033, t01=0x00f2}
0x50ac…50c4              Head {h00=0x0014, h01=0x0050, text=»CPO020 ADK A1,2 «, t00=0x0033, t01=0x011a}
0x50c4…50e8              Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT-ADDRESS «, t00=0x0033, t01=0x0132}
0x50e8…5104              Head {h00=0x0018, h01=0x0050, text=» RF(E) CPO030 NO DWT«, t00=0x0033, t01=0x0156}
0x5104…5116              Head {h00=0x000e, h01=0x0050, text=» SRC A6,1 «, t00=0x0033, t01=0x0172}
0x5116…512c              Head {h00=0x0012, h01=0x0050, text=» RF(N) CPO030 «, t00=0x0033, t01=0x0184}
0x512c…513e              Head {h00=0x000e, h01=0x0050, text=» SLC A6,1 «, t00=0x0034, t01=0x000a}
0x513e…5164              Head {h00=0x0022, h01=0x0050, text=» LCR A7,A6 LEFT BYTE OF DWTCHP«, t00=0x0034, t01=0x001c}
0x5164…5184              Head {h00=0x001c, h01=0x0050, text=» ANK A7,1 INPUT DEVICE ?«, t00=0x0034, t01=0x0042}
0x5184…519e              Head {h00=0x0016, h01=0x0050, text=» RF(NE) CPO025 YES«, t00=0x0034, t01=0x0062}
0x519e…51b4              Head {h00=0x0012, h01=0x0050, text=» LDKL A7,/EFFF«, t00=0x0034, t01=0x007c}
0x51b4…51e0              Head {h00=0x0028, h01=0x0050, text=» ANS A7,DWTST,A6 RESET RECOVERY BIT «, t00=0x0034, t01=0x0092}
0x51e0…51f8              Head {h00=0x0014, h01=0x0050, text=» LC A7,DWTST,A6 «, t00=0x0034, t01=0x00be}
0x51f8…5218              Head {h00=0x001c, h01=0x0050, text=» ANK A7,/20 ECHO MODE ? «, t00=0x0034, t01=0x00d6}
0x5218…5232              Head {h00=0x0016, h01=0x0050, text=» RF(NE) CPO030 YES«, t00=0x0034, t01=0x00f6}
0x5232…5268              Head {h00=0x0032, h01=0x0050, text=» CWR A6,A2 DEVICE WAITING FOR CHANNEL ANSWER ?«, t00=0x0034, t01=0x0110}
0x5268…5282              Head {h00=0x0016, h01=0x0050, text=» RF(E) CPO030 YES «, t00=0x0034, t01=0x0146}
0x5282…52be              Head {h00=0x0038, h01=0x0050, text=»CPO025 LD A7,DWTADR,A6 ADDRESS TO ADDRESSBLOCK IN A7«, t00=0x0034, t01=0x0160}
0x52be…52ec              Head {h00=0x002a, h01=0x0050, text=» LD A7,4,A7 ADDRESS TO RECOVERY IN A7 «, t00=0x0035, t01=0x000c}
0x52ec…530e              Head {h00=0x001e, h01=0x0050, text=» RF(E) CPO030 NO RECOVERY «, t00=0x0035, t01=0x003a}
0x530e…5330              Head {h00=0x001e, h01=0x0050, text=» LDKL A5,DWTSB2 STACKBASE «, t00=0x0035, t01=0x005c}
0x5330…5342              Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0035, t01=0x007e}
0x5342…536c              Head {h00=0x0026, h01=0x0050, text=» CFR A15,A7 GO TO RECOVERY ROUTINE«, t00=0x0035, t01=0x0090}
0x536c…5398              Head {h00=0x0028, h01=0x0050, text=»CPO030 SUK A3,2 ALL DEVICES THREATED«, t00=0x0035, t01=0x00ba}
0x5398…53a0              Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x00e6}
0x53a0…53c4              Head {h00=0x0020, h01=0x0050, text=» RB(NE) CPO020 NO TAKE NEXT «, t00=0x0035, t01=0x00ee}
0x53c4…53da              Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0035, t01=0x0112}
0x53da…53e8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x0128}
0x53e8…53f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0136}
0x53f2…53fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0140}
0x53fc…5416              Head {h00=0x0016, h01=0x0050, text=»*     DATA-REQUEST«, t00=0x0035, t01=0x014a}
0x5416…5420              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0164}
0x5420…544c              Head {h00=0x0028, h01=0x0050, text=»CLT100 CF A15,GETLIN GET DWT-ADDRESS«, t00=0x0035, t01=0x016e}
0x544c…5470              Head {h00=0x0020, h01=0x0050, text=» SUR A6,A4 VALID INTERRUPT ?«, t00=0x0036, t01=0x000a}
0x5470…5484              Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x0036, t01=0x002e}
0x5484…5496              Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0036, t01=0x0042}
0x5496…54ba              Head {h00=0x0020, h01=0x0050, text=» RB(Z) EXIT EXIT NOT DEFINED«, t00=0x0036, t01=0x0054}
0x54ba…54d6              Head {h00=0x0018, h01=0x0050, text=» LDR* A6,A8 GET DWT «, t00=0x0036, t01=0x0078}
0x54d6…54ea              Head {h00=0x0010, h01=0x0050, text=» RB(E) EXIT «, t00=0x0036, t01=0x0094}
0x54ea…5500              Head {h00=0x0012, h01=0x0050, text=» ANKL A6,/FFFE«, t00=0x0036, t01=0x00a8}
0x5500…5532              Head {h00=0x002e, h01=0x0050, text=» LCR A7,A6 LEFT BYTE IN CHANNEL PARAMETER «, t00=0x0036, t01=0x00be}
0x5532…5550              Head {h00=0x001a, h01=0x0050, text=» ANK A7,1 DATA INPUT ?«, t00=0x0036, t01=0x00f0}
0x5550…556a              Head {h00=0x0016, h01=0x0050, text=» RF(NE) CLT110 YES«, t00=0x0036, t01=0x010e}
0x556a…5594              Head {h00=0x0026, h01=0x0050, text=» LDR* A7,A6 GET CHANNEL PARAMETER «, t00=0x0036, t01=0x0128}
0x5594…55a8              Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x0036, t01=0x0152}
0x55a8…55d6              Head {h00=0x002a, h01=0x0050, text=»CLT110 LD A7,DWTOR,A6 SET ORDER IN A7 «, t00=0x0036, t01=0x0166}
0x55d6…55ea (55, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0037, t01=0x0004}
0x55ea…5618              Head {h00=0x002a, h01=0x0050, text=» LD A8,DWTECB,A6 AND ECB-ADDRESS IN A8«, t00=0x0037, t01=0x0018}
0x5618…5650              Head {h00=0x0034, h01=0x0050, text=» LD A3,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A3 «, t00=0x0037, t01=0x0046}
0x5650…565c              Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0037, t01=0x007e}
0x565c…5686              Head {h00=0x0026, h01=0x0050, text=» ABI 2,A3 GO TO INTERRUPT HANDLER «, t00=0x0037, t01=0x008a}
0x5686…5690              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00b4}
0x5690…56d2              Head {h00=0x003e, h01=0x0050, text=»*   THE FOLLOWING REGISTER VAULES ARE VALID WHEN ENTERING «, t00=0x0037, t01=0x00be}
0x56d2…5706              Head {h00=0x0030, h01=0x0050, text=»*   THE DEVICE DEPENDANT INTERRUPT HANDLER:-«, t00=0x0037, t01=0x0100}
0x5706…5710              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0134}
0x5710…573c              Head {h00=0x0028, h01=0x0050, text=»*   A1 = ERROR CODE  (A1=0  NOERROR)«, t00=0x0037, t01=0x013e}
0x573c…5782              Head {h00=0x0042, h01=0x0050, text=»*                    (A1=1  NOT OPERABLE , HARDWARE TIME-OUT) «, t00=0x0037, t01=0x016a}
0x5782…579e              Head {h00=0x0018, h01=0x0050, text=»*   A6 = DWT-ADDRESS«, t00=0x0038, t01=0x0020}
0x579e…57a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x003c}
0x57a8…57be              Head {h00=0x0012, h01=0x0050, text=»*   A7 = ORDER«, t00=0x0038, t01=0x0046}
0x57be…57c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x005c}
0x57c8…57e4              Head {h00=0x0018, h01=0x0050, text=»*   A8 = ECB-ADDRESS«, t00=0x0038, t01=0x0066}
0x57e4…57f2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x0082}
0x57f2…57fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0090}
0x57fc…5814              Head {h00=0x0014, h01=0x0050, text=»*   G E T L I N «, t00=0x0038, t01=0x009a}
0x5814…581e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00b2}
0x581e…5860              Head {h00=0x003e, h01=0x0050, text=»*   SUBROUTINE TO GET ADDRESS IN INTERRUPT TABLE 'INTLTX' «, t00=0x0038, t01=0x00bc}
0x5860…5890              Head {h00=0x002c, h01=0x0050, text=»*   FOR A GIVEN LINE- AND DEVICE NUMBER «, t00=0x0038, t01=0x00fe}
0x5890…589a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x012e}
0x589a…58b0              Head {h00=0x0012, h01=0x0050, text=»*   ON ENTRY:-«, t00=0x0038, t01=0x0138}
0x58b0…58ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x014e}
0x58ba…58da              Head {h00=0x001c, h01=0x0050, text=»*   A3 = LINE NUMBER * 2«, t00=0x0038, t01=0x0158}
0x58da…58fc              Head {h00=0x001e, h01=0x0050, text=»*   A4 = DEVICE NUMBER * 2«, t00=0x0038, t01=0x0178}
0x58fc…5906              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x000a}
0x5906…591c              Head {h00=0x0012, h01=0x0050, text=»*   ON EXIT:- «, t00=0x0039, t01=0x0014}
0x591c…5926              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x002a}
0x5926…5960              Head {h00=0x0036, h01=0x0050, text=»*   A6 = TOTAL NUMBER OF DEVICES*2 ON ACTUAL LINE «, t00=0x0039, t01=0x0034}
0x5960…59a0              Head {h00=0x003c, h01=0x0050, text=»*   A8 = ADDRESS IN 'INTLTX' WHERE DWT-ADDRESS IS FOUND «, t00=0x0039, t01=0x006e}
0x59a0…59aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00ae}
0x59aa…59b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00b8}
0x59b4…59c8              Head {h00=0x0010, h01=0x0050, text=»GETLIN EQU *«, t00=0x0039, t01=0x00c2}
0x59c8…59fc              Head {h00=0x0030, h01=0x0050, text=» LD A8,CWTITA,A5 ADDRESS TO INTERRUPT TABLE «, t00=0x0039, t01=0x00d6}
0x59fc…5a04              Head {h00=0x0004, h01=0x0050, t00=0x0039, t01=0x010a}
0x5a04…5a28              Head {h00=0x0020, h01=0x0050, text=» ADR A8,A3 POSITION IN TABLE«, t00=0x0039, t01=0x0112}
0x5a28…5a58              Head {h00=0x002c, h01=0x0050, text=» LDR* A8,A8 ADDRESS TO TERMINAL SECTION «, t00=0x0039, t01=0x0136}
0x5a58…5a84              Head {h00=0x0028, h01=0x0050, text=» RF(Z) GTL010 RETURN IF NOT DEFINED «, t00=0x0039, t01=0x0166}
0x5a84…5aa4 (58, 0, 400) Head {h00=0x001c, h01=0x0050, text=» LDR* A6,A8 GET ID-WORD «, t00=0x003a, t01=0x0004}
0x5aa4…5ad4              Head {h00=0x002c, h01=0x0050, text=» ANK A6,/FF TWO TIMES NUMBER OF DEVICES «, t00=0x003a, t01=0x0024}
0x5ad4…5b0c              Head {h00=0x0034, h01=0x0050, text=» ADR A8,A4 ADDRESS TO DEVICE WORK TABLE POSITION«, t00=0x003a, t01=0x0054}
0x5b0c…5b34              Head {h00=0x0024, h01=0x0050, text=»GTL010 ABL RTNA15 RETURN AND ENB«, t00=0x003a, t01=0x008c}
0x5b34…5b42              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003a, t01=0x00b4}
0x5b42…5b4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00c2}
0x5b4c…5b64              Head {h00=0x0014, h01=0x0050, text=»*   O U T L I N «, t00=0x003a, t01=0x00cc}
0x5b64…5b6e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00e4}
0x5b6e…5bac              Head {h00=0x003a, h01=0x0050, text=»*   SUBROUTINE TO SEND ONE CHARACTER VIA CHANNEL UNIT.«, t00=0x003a, t01=0x00ee}
0x5bac…5bb6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x012c}
0x5bb6…5bf6              Head {h00=0x003c, h01=0x0050, text=»*     CHARACTER GIVEN IN A2 IS SENT VIA CHLT IF CONTROL «, t00=0x003a, t01=0x0136}
0x5bf6…5c32              Head {h00=0x0038, h01=0x0050, text=»*     UNIT IS FREE. IN OTHER CASE DWT IS QUEUED ON A«, t00=0x003a, t01=0x0176}
0x5c32…5c54              Head {h00=0x001e, h01=0x0050, text=»*     OUTPUT QUEUE THREAD.«, t00=0x003b, t01=0x0022}
0x5c54…5c5e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0044}
0x5c5e…5c76              Head {h00=0x0014, h01=0x0050, text=»*     ON ENTRY: «, t00=0x003b, t01=0x004e}
0x5c76…5c80              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0066}
0x5c80…5cb2              Head {h00=0x002e, h01=0x0050, text=»*     A2 = OUTPUT CHARACTER IN RIGHT BYTE «, t00=0x003b, t01=0x0070}
0x5cb2…5cd0              Head {h00=0x001a, h01=0x0050, text=»*     A6 = DWT-ADDRESS«, t00=0x003b, t01=0x00a2}
0x5cd0…5cda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00c0}
0x5cda…5cee              Head {h00=0x0010, h01=0x0050, text=»OUTLIN EQU *«, t00=0x003b, t01=0x00ca}
0x5cee…5d14              Head {h00=0x0022, h01=0x0050, text=» CF A15,SAVE8 SAVE REGS A1-A8 «, t00=0x003b, t01=0x00de}
0x5d14…5d1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0104}
0x5d1e…5d34              Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x003b, t01=0x010e}
0x5d34…5d3e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0124}
0x5d3e…5d64              Head {h00=0x0022, h01=0x0050, text=» LDR* A1,A6 CHANNEL PARAMETER «, t00=0x003b, t01=0x012e}
0x5d64…5d84              Head {h00=0x001c, h01=0x0050, text=» ANK A1,/F CHANNEL INDEX«, t00=0x003b, t01=0x0154}
0x5d84…5d96              Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x003b, t01=0x0174}
0x5d96…5da8              Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x003b, t01=0x0186}
0x5da8…5dd6              Head {h00=0x002a, h01=0x0050, text=» LD A1,CHTAB,A1 GET CWT-ADDRESS IN A1 «, t00=0x003c, t01=0x0008}
0x5dd6…5de0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0036}
0x5de0…5dec              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0040}
0x5dec…5df6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x004c}
0x5df6…5e00              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0056}
0x5e00…5e16              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x003c, t01=0x0060}
0x5e16…5e20              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0076}
0x5e20…5e38              Head {h00=0x0014, h01=0x0050, text=» LDKL A1,CWTLT1 «, t00=0x003c, t01=0x0080}
0x5e38…5e42              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0098}
0x5e42…5e4e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x00a2}
0x5e4e…5e58              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00ae}
0x5e58…5e78              Head {h00=0x001c, h01=0x0050, text=» INH  INHIBIT INTERRUPT «, t00=0x003c, t01=0x00b8}
0x5e78…5e9a              Head {h00=0x001e, h01=0x0050, text=» LDR* A4,A1 IS UNIT FREE ?«, t00=0x003c, t01=0x00d8}
0x5e9a…5eb4              Head {h00=0x0016, h01=0x0050, text=» RF(E) OUL050 YES «, t00=0x003c, t01=0x00fa}
0x5eb4…5ec2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x0114}
0x5ec2…5ecc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0122}
0x5ecc…5ee6              Head {h00=0x0016, h01=0x0050, text=»*    QUEUE OUTPUT «, t00=0x003c, t01=0x012c}
0x5ee6…5ef0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0146}
0x5ef0…5f1a              Head {h00=0x0026, h01=0x0050, text=»OUL005 LD A4,CWTEQ,A1 OUTPUT QUEUE«, t00=0x003c, t01=0x0150}
0x5f1a…5f30              Head {h00=0x0012, h01=0x0050, text=» RF(E) OUL020 «, t00=0x003c, t01=0x017a}
0x5f30…5f48              Head {h00=0x0014, h01=0x0050, text=»OUL010 CWR A6,A4«, t00=0x003c, t01=0x0190}
0x5f48…5f7a              Head {h00=0x002e, h01=0x0050, text=» RF(E) OUL060 THIS DWT IS ALREADY IN QUEUE«, t00=0x003d, t01=0x0018}
0x5f7a…5f92              Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTOTQ,A4«, t00=0x003d, t01=0x004a}
0x5f92…5fbc              Head {h00=0x0026, h01=0x0050, text=» RF(E) OUL030 END OF THREAD FOUND «, t00=0x003d, t01=0x0062}
0x5fbc…5fe0              Head {h00=0x0020, h01=0x0050, text=» LDR A4,A3 FOLLOW THE THREAD«, t00=0x003d, t01=0x008c}
0x5fe0…5ff2              Head {h00=0x000e, h01=0x0050, text=» RB OUL010«, t00=0x003d, t01=0x00b0}
0x5ff2…601a              Head {h00=0x0024, h01=0x0050, text=»OUL020 ST A6,CWTEQ,A1 QUEUE DWT «, t00=0x003d, t01=0x00c2}
0x601a…602c              Head {h00=0x000e, h01=0x0050, text=» RF OUL040«, t00=0x003d, t01=0x00ea}
0x602c…6054              Head {h00=0x0024, h01=0x0050, text=»OUL030 ST A6,DWTOTQ,A4 QUEUE DWT«, t00=0x003d, t01=0x00fc}
0x6054…6082              Head {h00=0x002a, h01=0x0050, text=»OUL040 CM DWTOTQ,A6 SET END OF THREAD «, t00=0x003d, t01=0x0124}
0x6082…6094              Head {h00=0x000e, h01=0x0050, text=» RF OUL060«, t00=0x003d, t01=0x0152}
0x6094…60a2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003d, t01=0x0164}
0x60a2…60ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0172}
0x60ac…60c8              Head {h00=0x0018, h01=0x0050, text=»*    SEND CHARACTER «, t00=0x003d, t01=0x017c}
0x60c8…60d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0008}
0x60d2…6102              Head {h00=0x002c, h01=0x0050, text=»OUL050 LDR* A3,A6 GET CHANNEL PARAMETERS«, t00=0x003e, t01=0x0012}
0x6102…6118              Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/7F00«, t00=0x003e, t01=0x0042}
0x6118…612c              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x003e, t01=0x0058}
0x612c…613e              Head {h00=0x000e, h01=0x0050, text=» ORR A2,A3«, t00=0x003e, t01=0x006c}
0x613e…6152              Head {h00=0x0010, h01=0x0050, text=»OUL055 EQU *«, t00=0x003e, t01=0x007e}
0x6152…6180              Head {h00=0x002a, h01=0x0050, text=» EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION «, t00=0x003e, t01=0x0092}
0x6180…6196              Head {h00=0x0012, h01=0x0050, text=» RB(NA) OUL005«, t00=0x003e, t01=0x00c0}
0x6196…61be              Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 STORE LAST DWT IN CWT«, t00=0x003e, t01=0x00d6}
0x61be…61d4              Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x003e, t01=0x00fe}
0x61d4…6208              Head {h00=0x0030, h01=0x0050, text=» CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** «, t00=0x003e, t01=0x0114}
0x6208…6214              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0148}
0x6214…6250              Head {h00=0x0038, h01=0x0050, text=»OUL060 SC A2,DWTOCH,A6 STORE OUTPUT CHARACTER IN DWT«, t00=0x003e, t01=0x0154}
0x6250…6284              Head {h00=0x0030, h01=0x0050, text=»OUL070 ABL IHRET8 RESTORE A1-A8 AND RTN A15 «, t00=0x003e, t01=0x0190}
0x6284…6292              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003f, t01=0x0034}
0x6292…629c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0042}
0x629c…62b4              Head {h00=0x0014, h01=0x0050, text=»*   C H L T O N «, t00=0x003f, t01=0x004c}
0x62b4…62be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0064}
0x62be…6300              Head {h00=0x003e, h01=0x0050, text=»*   SUBROUTINE TO RESET CWT AND PERFORM CIO-START OF EVERY«, t00=0x003f, t01=0x006e}
0x6300…6344              Head {h00=0x0040, h01=0x0050, text=»*   CHLT IN SYSTEM. THE SUBROUTINE IS ENTERED FROM 'PFINIT' «, t00=0x003f, t01=0x00b0}
0x6344…634e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00f4}
0x634e…6362              Head {h00=0x0010, h01=0x0050, text=»CHLTON EQU *«, t00=0x003f, t01=0x00fe}
0x6362…636c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0112}
0x636c…6382              Head {h00=0x0012, h01=0x0050, text=» IFF LOCHAN=1 «, t00=0x003f, t01=0x011c}
0x6382…638c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0132}
0x638c…63a0              Head {h00=0x0010, h01=0x0050, text=» LD A1,CHTAB«, t00=0x003f, t01=0x013c}
0x63a0…63c6              Head {h00=0x0022, h01=0x0050, text=»CON010 SUK A1,2 ALL TREATED ? «, t00=0x003f, t01=0x0150}
0x63c6…63ea              Head {h00=0x0020, h01=0x0050, text=» RF(NZ) CON020 NO TAKE NEXT «, t00=0x003f, t01=0x0176}
0x63ea…640c              Head {h00=0x001e, h01=0x0050, text=» ABL RTNA15 RETURN AND ENB«, t00=0x0040, t01=0x000a}
0x640c…643a              Head {h00=0x002a, h01=0x0050, text=»CON020 LD A5,CHTAB,A1 LOAD CWT-ADDRESS«, t00=0x0040, t01=0x002c}
0x643a…6450              Head {h00=0x0012, h01=0x0050, text=» RB(Z) CON010 «, t00=0x0040, t01=0x005a}
0x6450…6478              Head {h00=0x0024, h01=0x0050, text=» EX CWTCIS,A5 EXECUTE CIO-START «, t00=0x0040, t01=0x0070}
0x6478…6498              Head {h00=0x001c, h01=0x0050, text=» LDR* A6,A5 GET LAST DWT«, t00=0x0040, t01=0x0098}
0x6498…64ae              Head {h00=0x0012, h01=0x0050, text=» RB(Z) CON010 «, t00=0x0040, t01=0x00b8}
0x64ae…64d0              Head {h00=0x001e, h01=0x0050, text=» CMR A5 RESET LAST OUTPUT «, t00=0x0040, t01=0x00ce}
0x64d0…64e2              Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0040, t01=0x00f0}
0x64e2…6508              Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0040, t01=0x0102}
0x6508…651a              Head {h00=0x000e, h01=0x0050, text=» RB CON010«, t00=0x0040, t01=0x0128}
0x651a…6524              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x013a}
0x6524…652e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0144}
0x652e…653a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x014e}
0x653a…6544              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x015a}
0x6544…654e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0164}
0x654e…6564              Head {h00=0x0012, h01=0x0050, text=» IFT LOCHAN=1 «, t00=0x0040, t01=0x016e}
0x6564…656e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0184}
0x656e…658e              Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,DWA1 CIO-START«, t00=0x0040, t01=0x018e}
0x658e…65b0              Head {h00=0x001e, h01=0x0050, text=» LD A6,CWTLT1 GET LAST DWT«, t00=0x0041, t01=0x001e}
0x65b0…65c6              Head {h00=0x0012, h01=0x0050, text=» RF(Z) CON010 «, t00=0x0041, t01=0x0040}
0x65c6…65ea              Head {h00=0x0020, h01=0x0050, text=» CM CWTLT1 RESET LAST OUTPUT«, t00=0x0041, t01=0x0056}
0x65ea…65fc              Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0041, t01=0x007a}
0x65fc…6622              Head {h00=0x0022, h01=0x0050, text=» CF A15,OUTLIN SEND CHARACTER «, t00=0x0041, t01=0x008c}
0x6622…664a              Head {h00=0x0024, h01=0x0050, text=»CON010 ABL RTNA15 RETURN AND ENB«, t00=0x0041, t01=0x00b2}
0x664a…6654              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00da}
0x6654…6660              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x00e4}
0x6660…666a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00f0}
0x666a…6678              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x00fa}
0x6678…6682              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0108}
0x6682…669a              Head {h00=0x0014, h01=0x0050, text=»*   O U T P U T «, t00=0x0041, t01=0x0112}
0x669a…66a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x012a}
0x66a4…66e4              Head {h00=0x003c, h01=0x0050, text=»*   SEND ONE CHARACTER VIA 'OUTLIN' INDICATE INTERRUPTS «, t00=0x0041, t01=0x0134}
0x66e4…670e              Head {h00=0x0026, h01=0x0050, text=»*   ALLOWED AND SAVE A3-A5 IN DWT.«, t00=0x0041, t01=0x0174}
0x670e…6718              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x000e}
0x6718…6722              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0018}
0x6722…6736              Head {h00=0x0010, h01=0x0050, text=»OUTPUT EQU *«, t00=0x0042, t01=0x0022}
0x6736…674a              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0042, t01=0x0036}
0x674a…675c              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0042, t01=0x004a}
0x675c…6776              Head {h00=0x0016, h01=0x0050, text=» SUK A1,/82 STX ? «, t00=0x0042, t01=0x005c}
0x6776…678c              Head {h00=0x0012, h01=0x0050, text=» RF(E) LDRE10 «, t00=0x0042, t01=0x0076}
0x678c…67a6              Head {h00=0x0016, h01=0x0050, text=» SUK A1,/15 ETB ? «, t00=0x0042, t01=0x008c}
0x67a6…67bc              Head {h00=0x0012, h01=0x0050, text=» RF(E) LDRE10 «, t00=0x0042, t01=0x00a6}
0x67bc…67f6              Head {h00=0x0036, h01=0x0050, text=» CF A15,OUTLIN SEND ONE CHARACTER VIA CHANNEL UNIT«, t00=0x0042, t01=0x00bc}
0x67f6…6800              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00f6}
0x6800…680a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0100}
0x680a…6820              Head {h00=0x0012, h01=0x0050, text=»*   S T R E G «, t00=0x0042, t01=0x010a}
0x6820…682a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0120}
0x682a…6868              Head {h00=0x003a, h01=0x0050, text=»*   INDICATE INTERRUPTS ALLOWED AND SAVE A3-A5 IN DWT «, t00=0x0042, t01=0x012a}
0x6868…6872              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0168}
0x6872…687c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0172}
0x687c…6890              Head {h00=0x0010, h01=0x0050, text=»STREG EQU * «, t00=0x0042, t01=0x017c}
0x6890…689c              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0042, t01=0x0190}
0x689c…68b2              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/100 «, t00=0x0043, t01=0x000c}
0x68b2…68e6              Head {h00=0x0030, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED«, t00=0x0043, t01=0x0022}
0x68e6…690e              Head {h00=0x0024, h01=0x0050, text=» ST A3,DWTA3,A6 SAVE REGISTER A3«, t00=0x0043, t01=0x0056}
0x690e…6936              Head {h00=0x0024, h01=0x0050, text=» ST A4,DWTA4,A6               A4«, t00=0x0043, t01=0x007e}
0x6936…695e              Head {h00=0x0024, h01=0x0050, text=» ST A5,DWTA5,A6               A5«, t00=0x0043, t01=0x00a6}
0x695e…696e              Head {h00=0x000c, h01=0x0050, text=» RB EXIT«, t00=0x0043, t01=0x00ce}
0x696e…697c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0043, t01=0x00de}
0x697c…6986              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00ec}
0x6986…699c              Head {h00=0x0012, h01=0x0050, text=»*   L D R E G «, t00=0x0043, t01=0x00f6}
0x699c…69a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x010c}
0x69a6…69e8              Head {h00=0x003e, h01=0x0050, text=»*   IF INTERRUPT ALLOWED RESTORE A3-A5 FROM DWT AND RETURN«, t00=0x0043, t01=0x0116}
0x69e8…6a12              Head {h00=0x0026, h01=0x0050, text=»*   VIA A5. ELSE GO TO DISPATCHER.«, t00=0x0043, t01=0x0158}
0x6a12…6a1c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0182}
0x6a1c…6a26              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x018c}
0x6a26…6a3a              Head {h00=0x0010, h01=0x0050, text=»LDREG EQU * «, t00=0x0044, t01=0x0008}
0x6a3a…6a52              Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x0044, t01=0x001c}
0x6a52…6a68              Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/100 «, t00=0x0044, t01=0x0034}
0x6a68…6a7c              Head {h00=0x0010, h01=0x0050, text=» RB(Z) EXIT «, t00=0x0044, t01=0x004a}
0x6a7c…6a94              Head {h00=0x0014, h01=0x0050, text=» XRS A3,DWTST,A6«, t00=0x0044, t01=0x005e}
0x6a94…6a9e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0076}
0x6a9e…6aa8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0080}
0x6aa8…6ac0              Head {h00=0x0014, h01=0x0050, text=»*   L D R E G E «, t00=0x0044, t01=0x008a}
0x6ac0…6aca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00a2}
0x6aca…6b06              Head {h00=0x0038, h01=0x0050, text=»*   RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5«, t00=0x0044, t01=0x00ac}
0x6b06…6b10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00e8}
0x6b10…6b1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00f2}
0x6b1a…6b2e              Head {h00=0x0010, h01=0x0050, text=»LDREGF EQU *«, t00=0x0044, t01=0x00fc}
0x6b2e…6b58              Head {h00=0x0026, h01=0x0050, text=» LD A5,DWTA5,A6                 A5«, t00=0x0044, t01=0x0110}
0x6b58…6b6c              Head {h00=0x0010, h01=0x0050, text=»LDREGE EQU *«, t00=0x0044, t01=0x013a}
0x6b6c…6b96              Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTA3,A6 RELOAD REGISTER A3«, t00=0x0044, t01=0x014e}
0x6b96…6bc0              Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTA4,A6                 A4«, t00=0x0044, t01=0x0178}
0x6bc0…6be8              Head {h00=0x0024, h01=0x0050, text=»LDRE10 LD A7,DWTOR,A6 GET ORDER «, t00=0x0045, t01=0x0012}
0x6be8…6bfc              Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0045, t01=0x003a}
0x6bfc…6c14              Head {h00=0x0014, h01=0x0050, text=» LD A8,DWTECB,A6«, t00=0x0045, t01=0x004e}
0x6c14…6c38              Head {h00=0x0020, h01=0x0050, text=» RTN A5 RETURN VIA A5-STACK «, t00=0x0045, t01=0x0066}
0x6c38…6c46              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x008a}
0x6c46…6c50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0098}
0x6c50…6c5a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00a2}
0x6c5a…6c72              Head {h00=0x0014, h01=0x0050, text=»*    G E T C H R«, t00=0x0045, t01=0x00ac}
0x6c72…6c7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00c4}
0x6c7c…6cb8              Head {h00=0x0038, h01=0x0050, text=»*    SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER«, t00=0x0045, t01=0x00ce}
0x6cb8…6cc2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x010a}
0x6cc2…6cd8              Head {h00=0x0012, h01=0x0050, text=»*    ON ENTRY:«, t00=0x0045, t01=0x0114}
0x6cd8…6ce2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x012a}
0x6ce2…6d00              Head {h00=0x001a, h01=0x0050, text=»*    A3 = BUFFER INDEX«, t00=0x0045, t01=0x0134}
0x6d00…6d1e              Head {h00=0x001a, h01=0x0050, text=»*    A8 = ECB-ADDRESS «, t00=0x0045, t01=0x0152}
0x6d1e…6d28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0170}
0x6d28…6d3e              Head {h00=0x0012, h01=0x0050, text=»*    ON EXIT: «, t00=0x0045, t01=0x017a}
0x6d3e…6d48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0190}
0x6d48…6d64              Head {h00=0x0018, h01=0x0050, text=»*    A2 = CHARACTER «, t00=0x0046, t01=0x000a}
0x6d64…6d92              Head {h00=0x002a, h01=0x0050, text=»*    A1 = 0 IF LAST CHARACTER ELSE # 0«, t00=0x0046, t01=0x0026}
0x6d92…6d9c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0054}
0x6d9c…6dea              Head {h00=0x004a, h01=0x0050, text=»*    IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH«, t00=0x0046, t01=0x005e}
0x6dea…6df4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00ac}
0x6df4…6dfe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00b6}
0x6dfe…6e12              Head {h00=0x0010, h01=0x0050, text=»GETCHR EQU *«, t00=0x0046, t01=0x00c0}
0x6e12…6e36              Head {h00=0x0020, h01=0x0050, text=» LD A1,4,A8 REQUESTED LENGTH«, t00=0x0046, t01=0x00d4}
0x6e36…6e48              Head {h00=0x000e, h01=0x0050, text=» SUR A1,A3«, t00=0x0046, t01=0x00f8}
0x6e48…6e76              Head {h00=0x002a, h01=0x0050, text=» RF(NP) GCH010 LAST CHARACTER REACHED «, t00=0x0046, t01=0x010a}
0x6e76…6e9c              Head {h00=0x0022, h01=0x0050, text=» LD A2,2,A8 GET BUFFER ADDRESS«, t00=0x0046, t01=0x0138}
0x6e9c…6eae              Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x0046, t01=0x015e}
0x6eae…6ecc              Head {h00=0x001a, h01=0x0050, text=» LCR A2,A2 CHAR. TO A2«, t00=0x0046, t01=0x0170}
0x6ecc…6ee0              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0046, t01=0x018e}
0x6ee0…6f08              Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0047, t01=0x0012}
0x6f08…6f1a              Head {h00=0x000e, h01=0x0050, text=» RF GCH020«, t00=0x0047, t01=0x003a}
0x6f1a…6f4a              Head {h00=0x002c, h01=0x0050, text=»GCH010 ST A3,6,A8 STORE EFFECTIVE LENGTH«, t00=0x0047, t01=0x004c}
0x6f4a…6f76              Head {h00=0x0028, h01=0x0050, text=»GCH020 ABL RTNA15 RETURN AND ENABLE «, t00=0x0047, t01=0x007c}
0x6f76…6f84              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x00a8}
0x6f84…6f8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00b6}
0x6f8e…6f98              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00c0}
0x6f98…6fac              Head {h00=0x0010, h01=0x0050, text=»*   L O G G «, t00=0x0047, t01=0x00ca}
0x6fac…6fb6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00de}
0x6fb6…6ff2              Head {h00=0x0038, h01=0x0050, text=»*   IF CONDITIONALY ASSEMBLY IS SET EVERY INPUT AND «, t00=0x0047, t01=0x00e8}
0x6ff2…701a              Head {h00=0x0024, h01=0x0050, text=»*   OUTPUT CHARACTER ARE LOGGED «, t00=0x0047, t01=0x0124}
0x701a…7024              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x014c}
0x7024…702e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0156}
0x702e…7038              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0160}
0x7038…704e              Head {h00=0x0012, h01=0x0050, text=» IFT LOGING=1 «, t00=0x0047, t01=0x016a}
0x704e…7058              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0180}
0x7058…7070              Head {h00=0x0014, h01=0x0050, text=»LOGG STR A1,A15 «, t00=0x0047, t01=0x018a}
0x7070…7084              Head {h00=0x0010, h01=0x0050, text=» LD A1,POINT«, t00=0x0048, t01=0x0012}
0x7084…7096              Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0048, t01=0x0026}
0x7096…70c0              Head {h00=0x0026, h01=0x0050, text=» CWK A1,BUFE BUFE IS MAX LOGG AREA«, t00=0x0048, t01=0x0038}
0x70c0…70d2              Head {h00=0x000e, h01=0x0050, text=» RF(NE) L1«, t00=0x0048, t01=0x0062}
0x70d2…70fe              Head {h00=0x0028, h01=0x0050, text=» LDKL A1,BUF SET FIRST LOGG ADDRESS «, t00=0x0048, t01=0x0074}
0x70fe…7114              Head {h00=0x0012, h01=0x0050, text=»L1 ST A1,POINT«, t00=0x0048, t01=0x00a0}
0x7114…7146              Head {h00=0x002e, h01=0x0050, text=» STR A2,A1 LOGG OF INR OR OTR INSTRUCTION «, t00=0x0048, t01=0x00b6}
0x7146…715a              Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0048, t01=0x00e8}
0x715a…716e              Head {h00=0x0010, h01=0x0050, text=» ADKL A15,2 «, t00=0x0048, t01=0x00fc}
0x716e…7188              Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0048, t01=0x0110}
0x7188…7192              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x012a}
0x7192…719c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0134}
0x719c…71c0              Head {h00=0x0020, h01=0x0050, text=»POINT DATA BUF LOGG POINTER «, t00=0x0048, t01=0x013e}
0x71c0…71ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0162}
0x71ca…71e6              Head {h00=0x0018, h01=0x0050, text=»BUF RES 63 LOGG AREA«, t00=0x0048, t01=0x016c}
0x71e6…71f8              Head {h00=0x000e, h01=0x0050, text=»BUFE EQU *«, t00=0x0048, t01=0x0188}
0x71f8…7202              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x000a}
0x7202…720e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0014}
0x720e…721c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x0020}
0x721c…7226              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x002e}
0x7226…7230              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0038}
0x7230…7252              Head {h00=0x001e, h01=0x0050, text=»*    E C H O , E C H E N D«, t00=0x0049, t01=0x0042}
0x7252…725c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0064}
0x725c…729c              Head {h00=0x003c, h01=0x0050, text=»*    SUBROUTINE TO ECHO CHARACTER CONTAINING TWO PARTS, «, t00=0x0049, t01=0x006e}
0x729c…72ce              Head {h00=0x002e, h01=0x0050, text=»*    ONE GENERAL AND ONE DEVICE-DEPENDENT «, t00=0x0049, t01=0x00ae}
0x72ce…72d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00e0}
0x72d8…7310              Head {h00=0x0034, h01=0x0050, text=»*    PART ONE: FIND DWT-ADDRESS OF ECHO-DEVICE, «, t00=0x0049, t01=0x00ea}
0x7310…7346              Head {h00=0x0032, h01=0x0050, text=»*              LOAD STACKBASE AND FIND ADDRESS«, t00=0x0049, t01=0x0122}
0x7346…737e              Head {h00=0x0034, h01=0x0050, text=»*              TO DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0049, t01=0x0158}
0x737e…7388              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0190}
0x7388…73ba              Head {h00=0x002e, h01=0x0050, text=»*    PART TWO: ECHO ONE OR MORE CHARACTERS«, t00=0x004a, t01=0x000a}
0x73ba…73f0              Head {h00=0x0032, h01=0x0050, text=»*              CORRESPONDING TO ONE CHARACTER «, t00=0x004a, t01=0x003c}
0x73f0…7428              Head {h00=0x0034, h01=0x0050, text=»*              TO BE STORED IN INPUT ECB-BUFFER «, t00=0x004a, t01=0x0072}
0x7428…7432              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00aa}
0x7432…743c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00b4}
0x743c…7474              Head {h00=0x0034, h01=0x0050, text=»*    PART ONE FOLLOWS AND PART TWO CAN BE FOUND «, t00=0x004a, t01=0x00be}
0x7474…74ac              Head {h00=0x0034, h01=0x0050, text=»*    IN THE DRIVER MODULE CORRESPONDING TO ECHO «, t00=0x004a, t01=0x00f6}
0x74ac…74c6              Head {h00=0x0016, h01=0x0050, text=»*    OUTPUT DEVICE«, t00=0x004a, t01=0x012e}
0x74c6…74d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0148}
0x74d0…750a              Head {h00=0x0036, h01=0x0050, text=»*    RESTRICTIONS IN DEVICE DEPENDENT ECHO DRIVER «, t00=0x004a, t01=0x0152}
0x750a…7514              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x018c}
0x7514…753a              Head {h00=0x0022, h01=0x0050, text=»*    A7 MUST NOT BE DESTROYED «, t00=0x004b, t01=0x0008}
0x753a…7574              Head {h00=0x0036, h01=0x0050, text=»*    THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A «, t00=0x004b, t01=0x002e}
0x7574…7592              Head {h00=0x001a, h01=0x0050, text=»*    JUMP TO 'ECHRTN'.«, t00=0x004b, t01=0x0068}
0x7592…759c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0086}
0x759c…75b0              Head {h00=0x0010, h01=0x0050, text=»ECHEND EQU *«, t00=0x004b, t01=0x0090}
0x75b0…75ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00a4}
0x75ba…75ce              Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x004b, t01=0x00ae}
0x75ce…75d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00c2}
0x75d8…7600              Head {h00=0x0024, h01=0x0050, text=» LDKL A7,/8000 INDICATE END I/O «, t00=0x004b, t01=0x00cc}
0x7600…760c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x00f4}
0x760c…761e              Head {h00=0x000e, h01=0x0050, text=»ECHO EQU *«, t00=0x004b, t01=0x0100}
0x761e…7632              Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x004b, t01=0x0112}
0x7632…765c              Head {h00=0x0026, h01=0x0050, text=» ST A3,DWTA3,A6 SAVE A3-A5 IN DWT «, t00=0x004b, t01=0x0126}
0x765c…7674              Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTA4,A6 «, t00=0x004b, t01=0x0150}
0x7674…768c              Head {h00=0x0014, h01=0x0050, text=» ST A5,DWTA5,A6 «, t00=0x004b, t01=0x0168}
0x768c…76aa              Head {h00=0x001a, h01=0x0050, text=» LD A1,DWTST,A6 STATUS«, t00=0x004b, t01=0x0180}
0x76aa…76bc              Head {h00=0x000e, h01=0x0050, text=» SLL A1,2 «, t00=0x004c, t01=0x000e}
0x76bc…76e4              Head {h00=0x0024, h01=0x0050, text=» RF(NN) RETUR NO ECHO REQUESTED «, t00=0x004c, t01=0x0020}
0x76e4…7718              Head {h00=0x0030, h01=0x0050, text=» LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE «, t00=0x004c, t01=0x0048}
0x7718…774e              Head {h00=0x0032, h01=0x0050, text=» LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEVICE «, t00=0x004c, t01=0x007c}
0x774e…7788              Head {h00=0x0036, h01=0x0050, text=» ST A4,DWTWAT,A6 SAVE DWT-ADDRESS OF INPUT DEVICE «, t00=0x004c, t01=0x00b2}
0x7788…77a0              Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB2 «, t00=0x004c, t01=0x00ec}
0x77a0…77ca              Head {h00=0x0026, h01=0x0050, text=» ADR A5,A6 STACKBASE-ADDRESS IN A5«, t00=0x004c, t01=0x0104}
0x77ca…77fc              Head {h00=0x002e, h01=0x0050, text=» LD A1,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK «, t00=0x004c, t01=0x012e}
0x77fc…7832              Head {h00=0x0032, h01=0x0050, text=» ABI 6,A1 GO TO ECHO-ROUTINE DEVICE-DEPENDENT «, t00=0x004c, t01=0x0160}
0x7832…783e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x0008}
0x783e…7852              Head {h00=0x0010, h01=0x0050, text=»ECHRTN EQU *«, t00=0x004d, t01=0x0014}
0x7852…7866              Head {h00=0x0010, h01=0x0050, text=» IFT CECHO=1«, t00=0x004d, t01=0x0028}
0x7866…787e              Head {h00=0x0014, h01=0x0050, text=» LDR A7,A7 END? «, t00=0x004d, t01=0x003c}
0x787e…7898              Head {h00=0x0016, h01=0x0050, text=» RF(NN) ERETUR NO «, t00=0x004d, t01=0x0054}
0x7898…78c4              Head {h00=0x0028, h01=0x0050, text=» CF A15,TENDIO END I/O OUTPUT DEVICE«, t00=0x004d, t01=0x006e}
0x78c4…7906              Head {h00=0x003e, h01=0x0050, text=»ERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDRESS OF INPUT DEVICE «, t00=0x004d, t01=0x009a}
0x7906…793e              Head {h00=0x0034, h01=0x0050, text=»RETUR ABL LDREGF RELOAD A3-A5 AND RETURN VIA A5 «, t00=0x004d, t01=0x00dc}
0x793e…7948              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0114}
0x7948…7954              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x004d, t01=0x011e}
0x7954…7958              Head {h00=0x4004, h01=0x0000}
0x7958…795c              00 4d 01 2a                                                                                                                                                                                                                                       ┆ M *┆
0x795c…7964 (78, 1, 8)   20 04 00 00 00 4e 00 04                                                                                                                                                                                                                           ┆     N  ┆
0x7964…796c (79, 0, 8)   0c a8 10 40 11 30 11 40                                                                                                                                                                                                                           ┆   @ 0 @┆
0x796c…79bc (80, 0, 400) 00 30 00 50 5c 49 44 45 4e 54 20 54 50 52 4f 43 20 5c 52 45 4c 20 38 2e 32 20 37 38 2d 30 39 2d 31 35 20 20 38 37 30 31 30 35 30 34 30 38 32 30 00 00 00 04 00 04 00 50 00 00 00 38 00 06 00 50 2a 20 00 00 00 40 00 36 00 50 2a 2a 2a 2a 2a 2a   ┆ 0 P IDENT TPROC  REL 8.2 78-09-15  870105040820       P   8   P*    @ 6 P******┆
0x79bc…7a0c              2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 00 00 4a 00 06 00 50 2a 20 00 00 00 84 00 24 00 50 2a 20 20 20 50 48 49 4c 49 50 53 20 54 45 52 4d 49 4e   ┆********************************************   J   P*      $ P*   PHILIPS TERMIN┆
0x7a0c…7a5c              41 4c 20 53 59 53 54 45 4d 20 50 54 53 20 00 00 00 8e 00 06 00 50 2a 20 00 00 00 b6 00 24 00 50 2a 20 20 20 54 50 52 4f 43 20 3d 20 54 4f 53 53 20 4c 4b 4d 20 50 52 4f 43 45 53 53 4f 52 53 20 00 00 00 c0 00 2e 00 50 2a 20 20 20 20 20 20 20   ┆AL SYSTEM PTS        P*      $ P*   TPROC = TOSS LKM PROCESSORS      . P*       ┆
0x7a5c…7aac              20 20 20 20 54 49 4f 2c 54 57 41 49 54 2c 54 45 58 49 54 2c 54 41 43 54 4f 54 2c 54 50 41 55 53 45 20 00 00 00 e8 00 06 00 50 2a 20 00 00 01 1a 00 06 00 50 2a 20 00 00 01 24 00 06 00 50 2a 20 00 00 01 2e 00 06 00 50 2a 20 00 00 01 38 00 06   ┆    TIO,TWAIT,TEXIT,TACTOT,TPAUSE        P*        P*    $   P*    .   P*    8  ┆
0x7aac…7afc              00 50 2a 20 00 00 01 42 00 36 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 00 01 4c 00 06 00 50 2a 20 00 00 01 86 00 06 00 50   ┆ P*    B 6 P**************************************************   L   P*        P┆
0x7afc…7b4c (81, 0, 398) 2a 20 00 00 01 90 00 06 00 50 2a 20 00 01 00 0a 00 36 00 50 2a 20 20 20 54 48 49 53 20 4d 4f 44 55 4c 45 20 43 4f 4e 54 41 49 4e 53 20 4d 41 4e 44 41 54 4f 52 59 20 4c 4b 4d 20 50 52 4f 43 45 53 53 4f 52 53 20 00 01 00 14 00 1c 00 50 2a 20   ┆*        P*      6 P*   THIS MODULE CONTAINS MANDATORY LKM PROCESSORS        P* ┆
0x7b4c…7b9c              20 20 46 4f 52 20 54 4f 53 53 2e 20 54 48 45 53 45 20 41 52 45 3a 00 01 00 4e 00 06 00 50 2a 20 00 01 00 6e 00 1e 00 50 2a 20 20 20 2d 54 49 4f 20 20 20 20 20 49 4e 50 55 54 2f 4f 55 54 50 55 54 20 00 01 00 78 00 06 00 50 2a 20 00 01 00 9a   ┆  FOR TOSS. THESE ARE:   N   P*    n   P*   -TIO     INPUT/OUTPUT    x   P*     ┆
0x7b9c…7bec              00 16 00 50 2a 20 20 20 2d 54 57 41 49 54 20 20 20 57 41 49 54 20 00 01 00 a4 00 06 00 50 2a 20 00 01 00 be 00 16 00 50 2a 20 20 20 2d 54 45 58 49 54 20 20 20 45 58 49 54 20 00 01 00 c8 00 06 00 50 2a 20 00 01 00 e2 00 2a 00 50 2a 20 20 20   ┆   P*   -TWAIT   WAIT        P*        P*   -TEXIT   EXIT        P*      * P*   ┆
0x7bec…7c3c              2d 54 41 43 54 4f 54 20 20 41 43 54 49 56 41 54 45 2f 52 45 53 54 41 52 54 20 54 45 52 4d 49 4e 41 4c 00 01 00 ec 00 06 00 50 2a 2a 00 01 01 1a 00 20 00 50 2a 20 20 20 2d 54 50 41 55 53 45 20 20 50 41 55 53 45 20 54 45 52 4d 49 4e 41 4c 20   ┆-TACTOT  ACTIVATE/RESTART TERMINAL       P**       P*   -TPAUSE  PAUSE TERMINAL ┆
0x7c3c…7c8a              00 01 01 24 00 06 00 50 2a 20 00 01 01 48 00 0a 00 50 5c 45 4a 45 43 54 00 01 01 52 00 06 00 50 2a 20 00 01 01 60 00 10 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 01 01 6a 00 10 00 50 2a 20 45 4e 54 52 49 45 53 20 2a 20 00 01 01 7e         ┆   $   P*    H   P EJECT   R   P*    `   P***********    j   P* ENTRIES *    ~┆
0x7c8a…7cda (82, 0, 398) 00 10 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 02 00 04 00 06 00 50 2a 20 00 02 00 18 00 06 00 50 2a 20 00 02 00 22 00 1c 00 50 5c 45 4e 54 52 59 5c 54 49 4f 5c 49 2f 4f 20 50 52 4f 43 45 53 53 4f 52 00 02 00 2c 00 06 00 50 2a 20 00 02   ┆   P***********        P*        P*    "   P ENTRY TIO I/O PROCESSOR   ,   P*   ┆
0x7cda…7d2a              00 4c 00 20 00 50 5c 45 4e 54 52 59 5c 54 57 41 49 54 5c 57 41 49 54 20 50 52 4f 43 45 53 53 4f 52 20 00 02 00 56 00 06 00 50 2a 20 00 02 00 7a 00 20 00 50 5c 45 4e 54 52 59 5c 54 45 58 49 54 5c 45 58 49 54 20 50 52 4f 43 45 53 53 4f 52 20   ┆ L   P ENTRY TWAIT WAIT PROCESSOR    V   P*    z   P ENTRY TEXIT EXIT PROCESSOR ┆
0x7d2a…7d7a              00 02 00 84 00 06 00 50 2a 20 00 02 00 a8 00 2c 00 50 5c 45 4e 54 52 59 5c 54 41 43 54 4f 54 5c 41 43 54 49 56 41 54 45 2f 52 45 53 54 41 52 54 20 50 52 4f 43 45 53 53 4f 52 00 02 00 b2 00 06 00 50 2a 20 00 02 00 e2 00 22 00 50 5c 45 4e 54   ┆       P*      , P ENTRY TACTOT ACTIVATE/RESTART PROCESSOR       P*      " P ENT┆
0x7d7a…7dca              52 59 5c 54 50 41 55 53 45 5c 50 41 55 53 45 20 50 52 4f 43 45 53 53 4f 52 20 00 02 00 ec 00 06 00 50 2a 20 00 02 01 12 00 1e 00 50 5c 45 4e 54 52 59 5c 54 49 4f 51 32 30 5c 51 55 45 55 45 20 44 45 56 49 43 45 00 02 01 1c 00 1e 00 50 5c 45   ┆RY TPAUSE PAUSE PROCESSOR        P*        P ENTRY TIOQ20 QUEUE DEVICE       P E┆
0x7dca…7e18              4e 54 52 59 5c 54 49 4f 45 52 52 5c 45 4e 44 20 52 45 51 55 45 53 54 20 00 02 01 3e 00 28 00 50 5c 45 4e 54 52 59 5c 54 50 51 55 45 5c 51 55 45 55 45 20 4a 4f 42 20 41 4e 44 20 44 49 53 50 41 54 43 48 20 00 02 01 60 00 06 00 50 2a 20         ┆NTRY TIOERR END REQUEST    > ( P ENTRY TPQUE QUEUE JOB AND DISPATCH    `   P* ┆
0x7e18…7e68 (83, 0, 400) 00 02 01 8c 00 0a 00 50 5c 45 4a 45 43 54 00 03 00 08 00 06 00 50 2a 20 00 03 00 16 00 12 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 03 00 20 00 12 00 50 2a 20 45 58 54 45 52 4e 41 4c 53 20 2a 20 00 03 00 36 00 12 00 50 2a 2a 2a 2a   ┆       P EJECT       P*        P*************        P* EXTERNALS *    6   P****┆
0x7e68…7eb8              2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 03 00 4c 00 06 00 50 2a 20 00 03 00 62 00 06 00 50 2a 20 00 03 00 6c 00 2c 00 50 5c 45 58 54 52 4e 5c 44 57 54 41 44 52 5c 44 57 54 20 41 44 44 52 45 53 53 20 42 4c 4f 43 4b 20 50 4f 49 4e 54 45 52 20 00 03   ┆*********    L   P*    b   P*    l , P EXTRN DWTADR DWT ADDRESS BLOCK POINTER   ┆
0x7eb8…7f08              00 76 00 22 00 50 5c 45 58 54 52 4e 5c 44 57 54 54 41 42 5c 44 57 54 20 54 54 41 42 20 41 44 44 52 45 53 53 00 03 00 a6 00 2a 00 50 5c 45 58 54 52 4e 5c 44 57 54 57 41 54 5c 57 41 49 54 2f 41 43 54 49 56 41 54 45 20 49 4e 44 49 43 41 54 4f   ┆ v " P EXTRN DWTTAB DWT TTAB ADDRESS     * P EXTRN DWTWAT WAIT/ACTIVATE INDICATO┆
0x7f08…7f58              52 20 00 03 00 cc 00 26 00 50 5c 45 58 54 52 4e 5c 44 57 54 54 44 4d 5c 44 4d 20 54 41 53 4b 20 54 54 41 42 20 41 44 44 52 45 53 53 00 03 00 fa 00 1c 00 50 5c 45 58 54 52 4e 5c 46 4e 44 44 57 54 5c 53 45 41 52 43 48 20 44 57 54 00 03 01 24   ┆R      & P EXTRN DWTTDM DM TASK TTAB ADDRESS       P EXTRN FNDDWT SEARCH DWT   $┆
0x7f58…7fa8              00 2c 00 50 5c 45 58 54 52 4e 5c 51 54 4a 4f 42 5c 51 55 45 55 45 20 54 45 52 4d 2e 50 52 4f 47 2e 20 46 4f 52 20 44 49 53 50 2e 20 00 03 01 44 00 16 00 50 5c 45 58 54 52 4e 5c 44 57 54 4f 52 5c 4f 52 44 45 52 00 03 01 74 00 1e 00 50 5c 45   ┆ , P EXTRN QTJOB QUEUE TERM.PROG. FOR DISP.    D   P EXTRN DWTOR ORDER   t   P E┆
0x7fa8…7ff8 (84, 0, 400) 58 54 52 4e 5c 44 57 54 45 43 42 5c 45 43 42 20 41 44 44 52 45 53 53 20 00 03 01 8e 00 18 00 50 5c 45 58 54 52 4e 5c 44 57 54 53 54 5c 53 54 41 54 55 53 20 00 04 00 20 00 1c 00 50 5c 45 58 54 52 4e 5c 54 44 49 53 50 5c 44 49 53 50 41 54 43   ┆XTRN DWTECB ECB ADDRESS        P EXTRN DWTST STATUS        P EXTRN TDISP DISPATC┆
0x7ff8…8048              48 45 52 20 00 04 00 3c 00 32 00 50 5c 45 58 54 52 4e 5c 53 52 55 4e 5c 50 4f 49 4e 54 45 52 20 54 4f 20 52 55 4e 4e 49 4e 47 20 53 45 47 4d 45 4e 54 20 49 4e 20 4c 53 42 54 00 04 00 5c 00 24 00 50 5c 45 58 54 52 4e 5c 4c 4b 4d 52 51 45 5c   ┆HER    < 2 P EXTRN SRUN POINTER TO RUNNING SEGMENT IN LSBT     $ P EXTRN LKMRQE ┆
0x8048…8098              4c 4b 4d 20 52 45 51 55 45 53 54 20 45 52 52 4f 52 20 00 04 00 92 00 2c 00 50 5c 45 58 54 52 4e 5c 47 45 54 42 4c 4b 5c 50 55 54 20 42 4c 4f 43 4b 20 49 4e 20 50 45 4e 44 49 4e 47 20 51 55 45 55 45 00 04 00 ba 00 32 00 50 5c 45 58 54 52 4e   ┆LKM REQUEST ERROR      , P EXTRN GETBLK PUT BLOCK IN PENDING QUEUE     2 P EXTRN┆
0x8098…80e8              5c 46 52 45 42 4c 4b 5c 52 45 4c 45 41 53 45 20 42 4c 4f 43 4b 20 46 52 4f 4d 20 50 45 4e 44 49 4e 47 20 51 55 45 55 45 00 04 00 ea 00 1c 00 50 5c 45 58 54 52 4e 5c 45 58 49 54 5c 50 52 4f 47 52 41 4d 20 45 58 49 54 00 04 01 20 00 28 00 50   ┆ FREBLK RELEASE BLOCK FROM PENDING QUEUE       P EXTRN EXIT PROGRAM EXIT     ( P┆
0x80e8…8138              5c 45 58 54 52 4e 5c 54 54 4d 4a 4f 42 5c 54 54 41 42 2d 41 44 44 52 45 53 53 20 4f 46 20 4d 4a 4f 42 53 20 00 04 01 40 00 2a 00 50 5c 45 58 54 52 4e 5c 54 54 42 3a 50 50 5c 50 45 4e 44 49 4e 47 20 50 52 4f 47 52 41 4d 20 50 4f 49 4e 54 45   ┆ EXTRN TTMJOB TTAB-ADDRESS OF MJOBS    @ * P EXTRN TTB:PP PENDING PROGRAM POINTE┆

Reduced view