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

⟦5562129f7⟧ 

    Length: 65378 (0xff62)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«

Derivation

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

PTS(SC)

	IDENT DRDC15 	REL 9.1 78-09-15  870106440911 

			IBM-3270 EMULATION 
			REL 8.1 78-08-25 
			MESSAGE QUEUING ON TERMINALS 
			REL 8.1 78-06-21 
			PTS 6805 ADAPTION
			MSV1. UNDEFINED ADDRESS
			REL 8.1 78-06-16 
			TRANSFER PARAM WHEN POLL ON
			REL 8.1 78-05-18 
			BINARY TRANSMISSION
			REL 8.1 78-04-21 

********************************************* 
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   DRDC15: DRIVER DATA COMMUNICATION 
*           BSC MULTIPOINT LINE PROCEDURE 
*           OR SIEMENS MSV1 
* 
* 
* 
* 
* 
****************************************************
	EJECT
* 
* 
*	ENTRY POINTS
* 
* 
	ENTRY	DC15AD	ADDRESS BLOCK TERMINAL REQUESTS 
	ENTRY	IH1501	INPUT INTERRUPT 
	ENTRY	IH1502	OUTPUT INTERRUPT
	ENTRY	DC15ON	POWER ON ROUTINE
	ENTRY	DW1500	DWT FOR DC TASK 
* 
* 
*	EXTERNAL REFERENCES 
* 
* 
	EXTRN	TDISP	DISPATCHER ENTRY 
	EXTRN	SAVE8	SAVE A1-A8 ON A15 STACK
	EXTRN	TENDIO	COMPLETE I/O EVENT
	EXTRN	DISIOE	REQUEST ERROR 
	EXTRN	SETIME	SET TIMER 
	EXTRN	DWTST	DWT STATUS 
	EXTRN	DWTOR	DWT ORDER
	EXTRN	DWTECB	DWT ECB 
	EXTRN	INTSAV	SAVE AREA LAST INTERRUPT
	EXTRN	TEBCDIC	ASCII TO EBCDIC TABLE
	EXTRN	TASCII	EBCDIC TO ASCII TABLE 
	EJECT
* 
* 
* 
* 
*   STANDARD INTERFACE PART FOR DATA COMMUNICATION
* 
* 
* 
* 
*	DWT CONTENTS
* 
*	DWTCHP	TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)
* 
*	DWT DISPLACEMENTS 
* 
DWTTP	EQU	/10	TIMER POINTER ORDER PROCESS 
DWTWQ	EQU	/12	WRITE/GET BUFFER QUEUE
DWTSQ	EQU	/14	STATUS QUEUE
DWTRQ	EQU	/16	RECEIVE QUEUE 
DWTBUF	EQU	/18	DEVICE BUFFER ADDRESS
DWTCUR	EQU	/1A	CURSOR ADDRESS 
* 
*	ECB DISPLACEMENTS 
* 
ECBBA	EQU	2	BUFFER ADDRESS
ECBRL	EQU	4	REQUESTED LENGTH
ECBEL	EQU	6	EFFECTIVE LENGTH
ECBRC	EQU	8	RETURN CODE 
ECBCW	EQU	10	CONTROL WORD 
* 
	EJECT
******************************************************* 
* 
*	PARAMETERS FOR CONDITIONAL ASSEMBLY 
* 
* 
X:A	EQU	2000	RECEIVE BUFFER LENGTH
RBUFL	EQU	X:A 
X:B	EQU	1000	TRANSMIT BUFFER LENGTH 
TBUFL	EQU	X:B 
X:C	EQU	/60	DCTASK FILE CODE
DC15FC	EQU	/60
X:D	EQU	1	IF 1 INTERRUPT LOGGING
LOGG	EQU	X:D
X:E	EQU	600	POLL TIMEOUT VALUE
TIMPOL	EQU	X:E
X:F	EQU	1	STATUS AND RVI HANDLING IF=1
STAT	EQU	X:F
X:G	EQU	1	READ COMMAND HANDLING IF=1
RCOM	EQU	X:G
X:H	EQU	254	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	X:H 
X:I	EQU	1	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	X:I
X:J	EQU	0	IF 1 SPECIFIC POLL HANDLING 
SPECP	EQU	X:J 
X:K	EQU	1	IF = 1  LINE SPEED SET TO HIGH
			IF = 0  LINE SPEED IS SET TO LOW 
SPEED	EQU	X:K 
X:L	EQU	0	IF 1 SIEMENS MSV1 PROCEDURE 
MSV1	EQU	X:L
X:M	EQU	2	NUMBER OF RECEIVE BUFFERS (2-5) 
RBUFNR	EQU	X:M
X:N	EQU	0	IF = 1  PTS 6805 ADAPTION	SALCUZ
P6805	EQU	X:N 
X:O	EQU	/02 
	IFT	P6805=0
LCUIN	EQU	X:O	DEVICE ADDRESS OF RECEIVER
	XIF
	IFT	P6805=1
LCUIN	EQU	/0A	DEVICE ADDRESS OF RECEIVER
	XIF
X:P	EQU	0 
IBMCHR	EQU	X:P	IF 1 IBM CHARACTER HANDLING
X:Q	EQU	0	IF 1 MESSAGE PASSING TO DC TASK 
MESPAS	EQU	X:Q
X:R	EQU	0	IBM-3270 EMULATION PACKAGE, IF NOT = 0
EM3270	EQU	X:R
BINTRM	EQU	0	IF 1 BINARY TRANSMISSION 
TSTREQ	EQU	0	IF 1 TEST REQUEST HANDLING 
DMRK	EQU	1	SPECIAL CONDITION FOR DENMARK
NOWACK	EQU	0	WHEN WORKING WITH A MAIN-FRAME THAT
			DOESN'T ACCEPT WACK RESPONSE TO A SELECT 
			SEQUENCE, NOWACK SHOULD BE SET TO "ONE". 
			ONLY WORKING IF STAT IS SET TO "ONE".
	IFT	P6805=0		SALCUZ
LCUUT	EQU	LCUIN+/10	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
	IFT	P6805=1
LCUUT	EQU	LCUIN+/01	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
	EJECT
* 
*	REQUEST HANDLING
* 
* 
* 
*	A7=ORDER
* 
*	/02: READ 
*	/06: WRITE
*	/08: EXCHANGE 
*	/22: RELEASE READ BUFFER
*	/31: GET WRITE BUFFER 
*	/37: TRANSFER PARAMETERS
*	/38: SET STATUS 
* 
* 
*	CONSTANTS AND WORK AREAS
* 
* 
DCONOF	DATA	0	ON- / OFFLINESWITCH 
DCSTOL	DATA	0	OLD DC EQUIPMENT STATUS 
DCSTCU	DATA	0	CURRENT STATUS
DCWRQ	DATA	0	WRITE REQUEST QUEUE
	IFF	TBUFL=0
DCGWQ	DATA	0	GET BUFFER REQUEST QUEUE 
	XIF
DCTPGP	DATA	0	TIMER POINTER GENERAL POLL
DC15DC	DATA	DCACTD	ADDRESS BLOCK DC TASK
DC15AD	DATA	DCACT	ADDRESS BLOCK 
	RES	15	SUBROUTINE STACK FOR INTERRUPTS 
STB	RES	1 
	RES	1	AND FOR TRANSFER PARAM 
STB2	RES	1

	IFT	SPEED=1
LSPEED	EQU	/0200
	XIF
	IFT	SPEED=0
LSPEED	EQU	0
	XIF
	EJECT
* 
* 
*	ACTIVATION FROM TERMINAL TASKS
* 
DCACT	EQU	* 
	LDK	A1,0	PRESET RETURN CODE
	SUK	A7,/02 
	RF(Z)	DCRD	READ SPECIFIC 
	SUK	A7,/06-/02 
	RF(Z)	DCWR 
	SUK	A7,/08-/06 
	RF(Z)	DCEX	EXCHANGE
	SUK	A7,/22-/08 
	RF(Z)	DCRR	RELEASE READ BUFFER 
	SUK	A7,/37-/22 
	RF(Z)	DCTP	TRANSFER PARAMETERS 
	SUK	A7,/38-/37 
	IFF	STAT=0 
	RF(Z)	DCSS	SET STATUS
	XIF
	IFF	TBUFL=0
	ADK	A7,/38-/31 
	RF(Z)	DCGW	GET WRITE BUFFER
	XIF
	RF	DCA100
	EJECT
* 
* 
*	ACTIVATION FROM DCTASK
* 
* 
DCACTD	EQU	*
	SUK	A7,/02 
	RF(E)	DCRDDC	READ
	SUK	A7,/22-/02 
	RF(E)	DCRR	RELEASE READ BUFFER 
	SUK	A7,/37-/22 
	RF(E)	DCTP	TRANSFER PARAMETERS 
DCA100	EQU	*	REQUEST ERROR
	ABL	DISIOE	INVALID ORDER 
* 
* 
*	READ FROM DCTASK
* 
* 
*	REQUEST FROM DC-TASK
*	COMPLETE WHEN:
*	  STATUS CHANGE ON DC EQUIPMENT 
*	  SPONTANOUS MESSAGE RECEPTION
* 
DCRDDC	EQU	*
	CF	A15,CKMESS	CHECK IF MESSAGE RECEIVED
DCRTN	EQU	* 
	ABL	TDISP	GO TO DISPATCHER 
	EJECT
* 
* 
*	TRANSFER PARAMETERS 
* 
* 
*	REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS
*	        FROM TERMINALS: TRANSFER TERMINAL ADDRESSES 
* 
* 
	IFF	CODE=1 
DCTP	LD	A2,ECBCW,A8	GET PARAMETER 
	XIF
	IFT	CODE=1 
DCTP	LC	A2,ECBCW,A8	GET TCS IF ANY
	ANK	A2,/FF 
	RF(Z)	DCTP10 
	LC	A2,TASCII,A2	TRANSLATE TO ASCII 
	SLL	A2,8 
DCTP10	EQU	*
	LC	A3,ECBCW+1,A8	GET TCP OR DV 
	ANK	A3,/FF 
	LC	A2,TASCII,A3	TRANSLATE TO ASCII 
	XIF
	STR	A2,A6	SAVE IN FIRST WORD OF DWT

	IFT	RCOM=1 
	LD	A3,ECBBA,A8	DEVICE BUFFER ADDRESS 
	ST	A3,DWTBUF,A6
	LD	A3,ECBRL,A8	CURSOR ADDRESS WORD 
	ST	A3,DWTCUR,A6
	XIF
	CWK	A6,DW1500	DCTASK DWT ??? 
	RF(E)	DCTP30	YES!!!  SHOULD NOT BE IN DC:TAB 
	LD	A1,DC:IN	GET DC:TAB INPUT POINTER 
	CWK	A1,DC:END	TABLE ALREADY FULL ????
	ABL(E)	DISIOE	YES!! REQUEST ERROR
	EJECT


DCTP20	EQU	*
	IFT	EM3270=0 
	LDKL	A5,STB2	LOAD STACK BASE 
	CF	A5,FINTER	DWT ALREADY IN DC:TAB ??? 
	LDR	A3,A3
	RF(NZ)	DCTP30	YES!!! 
	XIF
	STR	A6,A1	INSERT DWT IN DC:TAB 
	LDK	A1,2 
	ADS	A1,DC:IN	UPDATE DC:TAB IN POINTER

	ADS	A1,DC:TAB	INCREMENT DC:TAB LENGTH
	IFT	STAT=1 
	LDK	A1,4	DEVICE END
	ORS	A1,DWTST,A6
	CF	A15,INSSQ	INSERT IN STATUS QUEUE
	XIF
DCTP30	EQU	*
	SUR	A1,A1	RETURN CODE ::= 0
ENDIO	EQU	* 
	CF	A15,TENDIO	COMPLETE REQUEST 
	RB	DCRTN 
	EJECT
* 
* 
*	WRITE 
* 
* 
*	COMPLETE WHEN:
*	  SUCCESFUL TRANSMISSION
*	  TIME OUT
* 
* 
DCWR	EQU	*
	CF	A15,TIMEWR	SET TIMER
	CF	A15,INSWQ 	QUEUE REQUEST
	RB	DCRTN 
* 
* 
* 
*	READ
* 
* 
*	COMPLETE WHEN:
*	  MESSAGE RECEIVED
*	  TIME OUT
* 
* 
DCRD	EQU	*
	LD	A8,DWTECB,A6	GET ECB
	LD	A3,DWTRQ,A6	AND RECEIVE MESSAGE QUEUE 
	RF(Z)	DCRD10	NOTHING IN QUEUE

	LDR*	A2,A3	TAKE THE FIRST IN QUEUE 
	ST	A2,DWTRQ,A6 
	ADK	A3,6 
	ST	A3,ECBBA,A8 
	LD	A4,-4,A3	AND EFFECTIVE LENGTH 
	ST	A4,ECBEL,A8 
	LDK	A1,0 
	CF	A15,TENDIO
	RB	DCRTN 

DCRD10	CF	A15,TIMERE	START TIMER
	RB	DCRTN 
	EJECT
* 
* 
*	GET WRITE BUFFER
* 
* 
	IFF	TBUFL=0
*	COMPLETE WHEN:
*	  BUFFER BEEN ALOCATED
*	  TIME OUT
* 
* 
DCGW	EQU	*
	CF	A15,GTBUF	GET TRANSMIT BUFFER 
	LDR	A4,A4
	RF(Z)	DCGW10	NO FREE BUFFER
	ST	A4,ECBBA,A8 
	LDKL	A1,TBUFL+TBUFL
	ST	A1,ECBEL,A8	STORE BUFFER LENGTH 
	LDK	A1,0 
	RB	ENDIO	COMPLETE REQUEST
DCGW10	EQU	*
	CF	A15,TIMERE	START TIMER
	CF	A15,INSGWQ	QUEUE REQUEST
	RB	DCRTN 
	XIF
	EJECT
* 
* 
*	RELEASE READ BUFFER 
* 
* 
DCRR	LD	A4,ECBBA,A8 
	SUK	A4,6 
	CF	A15,RRBUF 
DCRR10	EQU	*
	LDK	A1,0 
	CF	A15,TENDIO	COMPLETE RRBUF REQUEST 
	RB	DCRTN 
	EJECT
* 
* 
*	EXCHANGE
* 
* 
* 
*	COMPLETE WHEN:
*	  MESSAGE PASSED TO TERMINAL
*	  TIME OUT
* 
DCEX	EQU	*
	RB	DCWR	SAME INITIALIZATION AS WRITE 
* 
* 
*	SET STATUS
* 
* 
	IFF	STAT=0 
DCSS	EQU	*
	LD	A1,ECBCW,A8	GET STATUS INFORMATION
	ANK	A1,3	MASK DB,IR
	RF(Z)	DCSS20	DEVICE END
DCSS10	EQU	*
	ST	A1,DWTST,A6 
	RB	DCRR10	COMPLETE REQUEST 
DCSS20	EQU	*
	LD	A1,DWTST,A6 
	ANK	A1,9 
	RB(Z)	DCSS10	WACK HAS NOT BEEN SENT
DCSS30	EQU	*
	CF	A15,INSSQ	INSERT DWT IN STATUS QUEUE
	LDK	A1,4	SET DE
	RB	DCSS10
	XIF
	EJECT
* 
* 
* 
*	TIMER HANDLING PART 
* 
* 
* 
*	READ TIMER=TIMERR 
* 
TIMERE	EQU	*
	LDR	A1,A6
	LD	A2,ECBCW,A8	GET TIMEOUT VALUE 
	RF(Z)	TIME10	NO TIMING 
	ST	A2,TIMERR 
	CF	A15,SETIME
	DATA	TOUTRE
TIMERR	DATA	0 
	ST	A4,DWTTP,A6	STORE TIMER POINTER 
TIME10	EQU	*
	RF	GBUF10	RETURN 
* 
*	TIMEOUT READ TIMER
* 
TOUTRE	EQU	*
	LDR	A6,A1	FETCH DWT
	CM	DWTTP,A6
	IFF	TBUFL=0
	CF	A15,REMOVG	REMOVE FROM QUEUE
	XIF
TOUTR1	EQU	*
	LDK	A1,/40	INDICATE TIME OUT 
	LD	A2,DWTOR,A6	CHECK IF EXCHANGE ORDER 
	SUK	A2,8 
	RF(NZ)	TOUTR2	NOT EXCHANGE 
	ORK	A1,2	RETURN CODE /42 AT EXCHANGE TIME OUT
TOUTR2	RB	ENDIO	COMPLETE REQUEST
* 
*	WRITE TIMER=TIMWR 
* 
TIMEWR	LDR	A1,A6
	LD	A2,ECBCW,A8	GET TIMEOUT VALUE 
	RB(Z)	TIME10	NO TIMING 
	ST	A2,TIMWR
	CF	A15,SETIME
	DATA	TOUTWR
TIMWR	DATA	0
	ST	A4,DWTTP,A6 
	RB	TIME10
	EJECT
* 
*	TIMEOUT WRITE TIMER 
* 
TOUTWR	EQU	*
	LDR	A6,A1	FETCH DWT
	CM	DWTTP,A6
	LD	A1,DWTOR,A6	GET ORDER 
	SUK	A1,6 
	RF(Z)	TOUT10	WRITE 
	SUK	A1,2 
	RB(NZ)	TOUTR1	ORDER IS NOT EXCHANGE
TOUT10	LD	A2,DWTECB,A6
	LD	A4,ECBBA,A2	FETCH BUFFER
	IFF	TBUFL=0
	CF	A15,RTBUF	RELEASE TRANSMITBUFFER
	CF	A15,CKGBQ	CHECK GET BUFFER QUEUE
	XIF
	CF	A15,REMOVW	REMOVE FROM WRITE QUEUE
* 
*	THIS INSTRUCTION DOES NOT BELONG
*	TO THE STANDARD INTERFACE 
	CM	XACK	INDICATE 'ACK NOT EXPECTED'
	LD	A2,FDWTUT 
	CWR	A2,A6
	RB(NE)	TOUTR1	THIS DWT NOT WRITING 
	CM	FDWTUT
* 
* 
	RB	TOUTR1
	EJECT
* 
* 
*	STOP REQUEST TIMING 
* 
*	REMAINING TIME IS RETURNED IN A2
* 
* 
CTIME	EQU	* 
	LD	A2,DWTTP,A6	GET TIMER POINTER 
	RF(Z)	CTIM10	NOT RUNNING 
	LDR*	A2,A2 
	NGR	A2,A2	GET REMAINING TIME 
	CM*	DWTTP,A6	STOP TIMER
	CM	DWTTP,A6
CTIM10	EQU	*
	RF	GBUF10
	EJECT
* 
*	GET RECEIVE BUFFER
* 
*	CALLING SEQUENCE: CF A15,GRBUF
*	A4=0 IF NO BUFFER IS FREE 
*	ELSE A4 CONTAINS BUFFER ADDRESS 
*	A2 AND A3 ARE DESTROYED 
* 
* 
GRBUF	LDKL	A2,DCRBUF	RECEIVE BUFFERS
GBUF	INH
	LDR*	A4,A2 
	RF(Z)	GBUF10	NO BUFFER FREE
	LDR*	A3,A4	REMOVE BUFFER FROM FREE CHAIN 
	STR	A3,A2
GBUF10	ADKL	A15,4	ADJUST STACK POINTER
	ABR*	A15	RETURN TO CALLER
* 
* 
*	GET TRANSMIT BUFFER 
* 
	IFF	TBUFL=0
*	CALLING SEQUENCE: CF A15,GTBUF
*	A4=0 IF NO BUFFER IS FREE 
*	ELSE A4 CONTAINS BUFFER ADDRESS 
*	A2 AND A3 ARE DESTROYED 
* 
* 
GTBUF	LDKL	A2,DCTBUF	TRANSMIT BUFFERS 
	RB	GBUF
	EJECT
* 
* 
*	CHECK GET BUFFER QUEUE
* 
* 
CKGBQ	EQU	* 
	LDR	A7,A6	SAVE A6
	LD	A6,DCGWQ	GET QUEUE ANCHOR 
	RF(Z)	CKG110	NO ONE ON QUEUE 
	SUK	A6,DWTWQ 
	LD	A2,DWTST,A6 
	RF(N)	CKG100	NO REQUEST
	LD	A2,DWTOR,A6 
	SUK	A2,/31 
	RF(NZ)	CKG100	NO GET BUFFER REQUEST
	CF	A15,GTBUF	GET TRANSMIT BUFFER 
	LDR	A4,A4
	RF(Z)	CKG110	NO BUFFER FREE
	LD	A3,DWTECB,A6
	ST	A4,ECBBA,A3	STORE BUFFER ADDRESS
	LDKL	A1,TBUFL+TBUFL
	ST	A1,ECBEL,A3	STORE BUFFER LENGTH 
	CF	A15,CTIME	STOP REQUEST TIMING 
	ST	A2,ECBCW,A3	STORE REMAINING TIME
	LDK	A1,0 
	CF	A15,TENDIO	COMPLETE REQUEST 
CKG100	EQU	*
	CF	A15,REMOVG	REMOVE FROM QUEUE
CKG110	LDR	A6,A7	RESTORE A6 
	RB	GBUF10	RETURN 
	XIF
	EJECT
* 
* 
*	RELEASE RECEIVE BUFFER
* 
*	A4 CONTAINS BUFFER ADDRESS
*	CALLING SEQUENCE: CF A15,RRBUF
*	A2 AND A3 ARE DESTROYED 
* 
* 
RRBUF	LDKL	A2,DCRBUF	RECEIVE BUFFERS
RBUF	INH
RBUF10	EQU	*
	LDR*	A3,A2 
	RF(Z)	RBUF20 
	LDR	A2,A3
	RB	RBUF10
RBUF20	EQU	*
	STR	A4,A2
	CMR	A4 
	RB	GBUF10	RETURN TO CALLER 
* 
* 
*	RELEASE TRANSMIT BUFFER 
* 
	IFF	TBUFL=0
*	A4 CONTAINS BUFFER ADDRESS
*	CALLING SEQUENCE: CF A15,RTBUF
*	A2 AND A3 ARE DESTROYED 
* 
* 
RTBUF	LDKL	A2,DCTBUF	TRANSMIT BUFFERS 
	CWK	A4,TBUF1 
	RB(E)	RBUF	DRIVER BUFFER 
	CWK	A4,TBUF2 
	RB(E)	RBUF	DRIVER BUFFER 
	RB	GBUF10	APPLICATION BUFFER 
	XIF
	EJECT
* 
* 
*	INSERT DWT IN WRITE REQUEST QUEUE 
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSWQ	LDKL	A2,DCWRQ	GET QUEUE ANCHOR
INSWQ1	LDK	A4,DWTWQ 
INSWQ2	LDR*	A3,A2 
	RF(Z)	INSWQ3	END OF QUEUE FOUND
	LDR	A2,A3
	RB	INSWQ2
INSWQ3	ADR	A4,A6
	STR	A4,A2	INSERT IN QUEUE
	CMR	A4	INDICATE END OF QUEUE 
	RB	GBUF10	RETURN 
* 
* 
*	REMOVE DWT FROM WRITE REQUEST QUEUE 
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
REMOVW	LDKL	A2,DCWRQ	GET QUEUE ANCHOR 
REM05	LDK	A4,DWTWQ	GET DWT-LINK TO BE REMOVED 
REM06	EQU	* 
	ADR	A4,A6	 
REM10	LDR*	A3,A2
	RB(Z)	GBUF10	NOT ON QUEUE: RETURN
	CWR	A3,A4
	RF(E)	REM15
	LDR	A2,A3	GET NEXT 
	RB	REM10 
REM15	LDR*	A3,A4	REMOVE 
	STR	A3,A2
	RB	GBUF10	RETURN 
	EJECT
* 
* 
* 
*	INSERT DWT IN GET WRITE BUFFER QUEUE
* 
	IFF	TBUFL=0
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSGWQ	LDKL	A2,DCGWQ	GET QUEUE ANCHOR 
	RB	INSWQ1
* 
* 
*	REMOVE DWT FROM GET WRITE BUFFER QUEUE
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
REMOVG	LDKL	A2,DCGWQ	GET QUEUE ANCHOR 
	RB	REM05 
	XIF
	EJECT
* 
* 
*	INSERT DWT IN STATUS QUEUE
* 
	IFF	STAT=0 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSSQ	LDKL	A2,DCSTQ	GET QUEUE ANCHOR
	LDK	A4,DWTSQ 
	RB	INSWQ2
* 
* 
*	REMOVE DWT FROM STATUS QUEUE
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
REMOVS	LDKL	A2,DCSTQ	GET QUEUE ANCHOR 
	LDK	A4,DWTSQ 
	RB	REM06 
	XIF
	EJECT
* 
* 
*	QUEUE ALLOCATED RECEIVE BUFFER
* 
*	A4=BUFFER ADDR
*	A2,A3 DESTROYED 
* 
QRBUF	EQU	* 
	IFT	MESPAS=1 
	LDKL	A2,DW1500	QUEUE ON DC-TASK DWT
	XIF
	IFT	MESPAS=0 
	LDR	A2,A6	QUEUE ON TERMINAL DWT
	XIF
	ADK	A2,DWTRQ	BEGINNING OF RECEIVE QUEUE
QR100	EQU	* 
	LDR*	A3,A2 
	RF(Z)	QR200	END OF QUEUE FOUND 
	LDR	A2,A3
	RB	QR100 
QR200	STR	A4,A2	INSERT INTO QUEUE 
	CMR	A4	INDICATE END OF QUEUE 
	RTN	A5 
	EJECT
* 
* 
*	CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE
* 
*	REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED 
* 
CKMESS	LDKL	A6,DW1500 
	LD	A1,DWTST,A6 
	RF(N)	CKM110	NO REQUEST
	LDK	A1,2	READ REQUEST ?
	CW	A1,DWTOR,A6 
	RF(NE)	CKM110	NO 
	LD	A8,DWTECB,A6	ECB ADDR TO A8 
	LD	A3,DWTRQ,A6	A3=ADDR TO READ QUEUE 
	RF(Z)	CKM200	NO READ IN QUEUE
	LDR*	A2,A3	A2=ADDR TO NEXT READ BUFFER 
	ST	A2,DWTRQ,A6	STORE THIS ADDR INTO QUEUE
	ADK	A3,6	MOVE POINTER TO TEXT
	ST	A3,ECBBA,A8	SAVE THIS ADDR IN ECB 
	LD	A4,-4,A3
	ST	A4,ECBEL,A8	STORE NUMBERS OF CHARACTERS 
	LD	A4,-2,A3
	ST	A4,ECBCW,A8	STORE LINE DEVICE ADDRESS 
	LDK	A1,0	PARAMETER=OK
CKM100	CF	A15,TENDIO	COMPLETE READ GENERAL REQUEST
CKM110	ADKL	A15,4	ADJUST STACK POINTER
	ABR*	A15	RETURN
CKM200	LD	A1,DCSTCU	NO MESSAGE RECEIVED,CHECK STATUS
	OR	A1,DCONOF	TAKE CARE OF POLL TIME OUT
	CW	A1,DCSTOL 
	ST	A1,DCSTOL 
	RB(E)	CKM110	NO CHANGE OF STATUS 
	ORKL	A1,/2000	INDICATE STATUS CHANGE 
	RB	CKM100
	EJECT
* 
* 
*	STORE REGISTER A3-A8
*	CALLING SEQUENSE: CF A15,STREG
* 
*	RESTORE 
*	CALLING SEQUENCE: CF A15,LDREG
* 
* 
STREG	ST	A3,LCA3
	ST	A4,LCA4 
	ST	A5,LCA5 
	ST	A6,LCA6 
	ST	A7,LCA7 
	ST	A8,LCA8 
	RF	RTNA15	RETURN 
	EJECT
LDREG	LDKL	A3,0 
LCA3	EQU	*-2
	LDKL	A4,0
LCA4	EQU	*-2
	LDKL	A5,0
LCA5	EQU	*-2
	LDKL	A6,0
LCA6	EQU	*-2
	LDKL	A7,0
LCA7	EQU	*-2
	LDKL	A8,0
LCA8	EQU	*-2
RTNA15	EQU	*
	ADKL	A15,4 
	ABR*	A15 
	EJECT
* 
* 
*	TIMER VALUES
* 
* 
TIMPRO	EQU	30	PROCEDURE TIMER 3 SEC 
* 
* 
*	CHARACTER EQUATES 
* 
SF	EQU	X'1D'	START FIELD CHARACTER
SYN	EQU	/16 
STX	EQU	/02 
ETX	EQU	/03 
ETB	EQU	/17 
ITB	EQU	/1F 
SOH	EQU	/01 
ENQ	EQU	/05 
DLE	EQU	/10 
EOT	EQU	/04 
NAK	EQU	/15 
ESC	EQU	/1B 
SBA	EQU	/11 
GP	EQU	/22
RDBCOM	EQU	/32
RDMCOM	EQU	/36
	IFT	CODE=0 
PAR	EQU	/80 
RVI	EQU	/3C 
ACK0	EQU	/30
ACK1	EQU	/31
DC1	EQU	/11 
	IFT	MSV1=0 
WACK	EQU	/3B
	XIF
	IFT	CODE=0 
	IFT	MSV1=1 
WACK	EQU	/BF	=WABT - SIEMENS MSV1 PROCEDURE 
	XIF
	IFT	CODE=1 
PAR	EQU	/00 
WACK	EQU	/2C
RVI	EQU	/40 
ACK0	EQU	/18
ACK1	EQU	/2F
SYNEBC	EQU	/32
	XIF
	EJECT
* 
* 
*	PROCEDURE WORK AREAS
* 
* 
FDWTIN	RES	1	CURRENT DWT FOR RECEPTION
FDWTUT	RES	1	CURRENT DWT FOR TRANSMISSION 
XACK	DATA	0	ACK EXPECTED
XSEL	DATA	0	SELECTED
XETX	DATA	0	ETX SENT
XSTA	DATA	0	STATUS SENT / MESSAGE INPUT RESULT
XRB	DATA	0	READ BUFFER SWITCH 
CACK	DATA	0	ACK COUNTER 
SYNSW	DATA	0	0=SKIP SYNS, 1=DON'T SKIP
* 
FECB	RES	1	WRITING ECB
FECBBA	RES	1	WRITING BUFFER ADDRESS 
FECBRL	RES	1	WRITING BUFFER LENGTH
FBAX	DATA	0	BUFFER INDEX
FBLST	DATA	0	START OF LAST TRANSMITTED BLOCK
DCSTQ	DATA	0	STATUS QUEUE ANCHOR
DCTPP	DATA	0	POINTER FOR PROCEDURE TIMING 
RESEND	DATA	0	CONTROL SEQUENCE SAVE AREA
* 
* 
*	3270 SENSE/STATUS INFORMATION 
* 
* 
	IFF	STAT=0 
SSTAB	EQU	*	S/S 0 : NO STATUS,DB,DE,DB+DE 
* 
* 
	DATA	/4248 
	DATA	/4242 
* 
NOIR	EQU	/20	S/S 1 : NO INTERVENTION REQUIRED 
IR	EQU	/26	S/S 1 : INTERVENTION REQUIRED
	XIF
	EJECT
* 
* 
*	BASIC RECEIVE MODE
* 
*	ENTERED EVERY TIME A MESSAGE
*	IS EXPECTED FROM THE MASTER SIDE
* 
* 
	IFT	P6805=1		SALCUZ
BRMHLT	CF	A5,HALTIN	HALT RECEIVER	SALCUZ
	XIF			SALCUZ 
BRM	EQU	* 
	LDKL	A5,STB	LOAD STACKBASE 
	IFT	P6805=0		SALCUZ
	CF	A5,HALTIN	HALT RECEIVER AND UPDATE STATUS 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	CF	A15,CKMESS	CHECK IF STATUS CHANGE	SALCUZ
	XIF			SALCUZ 
BRM010	EQU	*
	IFT	CODE+P6805=0		SALCUZ 
	LDKL	A2,/100+LSPEED+SYN	SPECIFY SYN PATTERN
	XIF			SALCUZ 
	IFT	P6805=0		SALCUZ
	IFT	CODE=1 
	LDKL	A2,/100+LSPEED+SYNEBC	SPECIFY SYN PATTERN 
	XIF			SALCUZ 
	IFT	P6805=0		SALCUZ
	CIO	A2,1,LCUIN	START RECEIVER
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	IFF	CODE=1		SALCUZ 
	LDK	A2,/0C		SALCUZ 
	CIO	A2,1,LCUIN	START RECEIVER	SALCUZ 
	LDK	A2,SYN		SALCUZ 
	OTR	A2,1,LCUIN	SPECIFY SYNC CHARACTER	SALCUZ 
	RB(NA)	BRMHLT		SALCUZ
	XIF			SALCUZ 
	IFT	CODE+P6805=2		SALCUZ 
	LDK	A2,0		SALCUZ 
	CIO	A2,1,LCUIN	START RECEIVER	SALCUZ 
	LDK	A2,SYNEBC		SALCUZ
	OTR	A2,1,LCUIN	SPECIFY SYNC CHARACTER	SALCUZ 
	RB(NA)	BRMHLT		SALCUZ
	XIF			SALCUZ 
BRM100	EQU	*
	CF	A5,READP	READ ONE CHARACTER 
	RF(NZ)	BRM150	PARITY ERROR 
	LDR	A1,A2
	SUK	A1,STX 
	RF(Z)	BRM300	STX RECEIVED
	SUK	A1,EOT-STX 
	RF(Z)	BRM200	EOT RECEIVED
	SUK	A1,ENQ-EOT 
	ABL(Z)	BRM400	ENQ RECEIVED 
	SUK	A1,DLE-ENQ 
	ABL(Z)	BRM600	DLE RECEIVED 
	SUK	A1,NAK-DLE 
	ABL(Z)	BRM500	NAK RECEIVED 
	IFT	MSV1=0 
	LDR	A8,A2
	CF	A5,READP	READ ONE CHARACTER 
	RF(NZ)	BRM150	PARITY ERROR 
	CWR	A2,A8
	RF(NE)	BRM150	INVALID ADDRESSING 
	XIF
	LDK	A3,0 
	CC	A2,DW1500+1 
	RF(E)	BRM110	POLLING 
	LDK	A3,2 
	CC	A2,DW1500 
	RF(NE)	BRM150	NOT THIS TCU 
BRM110	EQU	*
	CF	A5,READP	READ 1:ST STA
	RF(NZ)	BRM150	PARITY ERROR 
	LDR	A8,A2
	IFT	MSV1=0 
	CF	A5,READP	READ 2:ND STA
	RF(NZ)	BRM150	PARITY ERROR 
	CWR	A2,A8
	RF(NE)	BRM150	INVALID ADDRESS SEQUENCE 
	XIF
	CF	A5,READ	READ ONE CHARACTER
	IFT	P6805=0		SALCUZ
	SUK	A2,ENQ+PAR 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	SUK	A2,ENQ		SALCUZ 
	XIF			SALCUZ 
	RF(NZ)	BRM150	NOT ENQ
	IFT	P6805=0		SALCUZ
	CF	A5,READ	READ LAST CHARACTER 

*	TRAILING PAD CAN BE CHECKED 

	CIO	A1,0,LCUIN	HALT INPUT
	SST	A1,LCUIN 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	CF	A5,HALTIN	HALT INPUT	SALCUZ 
	RB(NZ)	BRM010	PARITY ERROR	SALCUZ		SALCUZ
	XIF			SALCUZ 
	LDK	A1,1 
	ST	A1,CACK	LOAD ACK COUNTER
	LDR	A2,A8
	SUK	A3,2 
	RF(Z)	BRM120	SELECTING 
	CWK	A8,GP
	ABL(E)	GPOLL	GENERAL POLL
	IFT	MSV1=1 
	CF	A5,FINTEP	CHECK IF STA PRESENT (POLL ADDRESS) 
	XIF
	IFT	MSV1=0 
	CF	A5,FINTER	CHECK IF STA PRESENT
	XIF
	IFF	EM3270=0 
	CF	A5,FINT10	CONTINUE SEARCHING IN DC:TAB
	XIF
	LDR	A6,A3	LOAD DWT TO A6 
	ABL(NZ)	SPOLL	SPECIFIC POLL
	RB	BRM	INVALID POLL
BRM120	EQU	*
	CF	A5,FINTER	CHECK IF STA PRESENT
	LDR	A6,A3	LOAD DWT TO A6 
	RF(NZ)	BRM130	STA FOUND
	IFT	MSV1=0		 
	LDKL	A6,DW1500	SELECT TO DCTASK
BRM130	EQU	*
	ABL	SELECT 
	XIF			 
	IFT	MSV1=1		 
	ABL	BRM	INVALID ADDRESS
	XIF			 
* 
*   WAIT FOR MARK HOLD TO RESYNCHRONIZE 
* 
BRM150	EQU	*
	ANK	A2,/7F 
	SUK	A2,/7F 
	RB(Z)	BRM	RESYNCHRONIZE
	CF	A5,READ	READ ANOTHER CHARACTER
	RB	BRM150
	EJECT
* 
* 
*	EOT HAS BEEN RECEIVED 
* 
* 
BRM200	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	IFT	RCOM=1 
	CM	XRB	RESET READ BUFFER 
	XIF
	LD	A1,XACK 
	RF(Z)	BRM220	ACK IS NOT EXPECTED 
	LD	A6,FDWTUT	GET WRITING DWT 
	RF(Z)	BRM210	NO ONE WRITING
	LDK	A1,2	SET RC=2
	CF	A5,CWRITE	COMPLETE WRITE REQUEST
BRM210	EQU	*
	CM	XACK	RESET 'ACK EXPECTED' 
BRM220	EQU	*
	CM	XSEL	RESET 'SELECTED' 
	RB	BRM 
	EJECT
* 
* 
*	STX HAS BEEN RECEIVED 
* 
* 
BRM300	EQU	*
	CF	A5,HPTIM
	LD	A1,XSEL 
	RF(Z)	BRM315	NOT SELECTED
	LD	A1,DCRBUF 
*********************CHAINED COMMAND
	RB(Z)	BRM150	NO BUFFER AVAILABLE 
********************* 
BRM305	EQU	*
	CF	A5,RDMESS	READ MESSAGE
	SUK	A7,1 
	RF(NZ)	BRM320	MESSAGE OK 
BRM310	EQU	*
	CM	XSTA	INDICATE 'INVALID MESSAGE' 
BRM312	EQU	*
	CF	A5,TRNAK	SEND NAK 
	ABL	BRM
BRM315	EQU	*
	IFT	RCOM=1 
	LD	A1,XACK 
	RF(Z)	BRM316	ACK IS NOT EXPECTED 
	LD	A1,DCRBUF 
	RF(Z)	BRM316	NO BUFFER AVAILABLE 
	LD	A6,FDWTUT	GET WRITING DWT 
	ABL(Z)	BRM150	NO ONE WRITING. RESYNCHRONIZE
	LDR*	A2,A6	GET STA 
	XIF
	IFF	EM3270=0 
	CF	A5,FINTER	GET RECEIVING DWT 
	LDR	A6,A3	DWT-ADDRESS
	LDR*	A2,A6	STA 
	XIF
	IFT	RCOM=1 
	CF	A5,PRREC	PREPARE FOR TEXT RECEPTION 
	LDK	A1,0	SET RC=0
	CF	A5,CWRITE	COMPLETE WRITE REQUEST
	LDK	A1,1 
	XRS	A1,CACK	INCREASE ACK COUNTER 
	RB	BRM305	READ THE MESSAGE 
	XIF
BRM316	CF	A5,READ	READ ONE CHARACTER
	SUK	A2,ENQ+PAR 
	RB(Z)	BRM312	FORWARD ABORT SEQUENCE
	RB	BRM220
BRM320	EQU	*
	IM	XSTA	INDICATE MESSAGE OK
	LD	A4,DCRBUF	GET BUFFER ADDRESS
	ADK	A4,6 
	CW	A4,FBLST
	RF(NE)	BRM325	NOT FIRST BLOCK
	IFF	RCOM=0 
	LDK	A1,ESC 
	CCR	A1,A4
	RB(NE)	BRM310	ESC NOT FOUND
	ADK	A4,1 
	LCR	A1,A4	GET COMMAND CODE 
	SUK	A4,1 
	SUK	A1,RDBCOM
	RF(Z)	RDBUF	READ MODIFIED RECEIVED 
	SUK	A1,RDMCOM-RDBCOM 
	RF(Z)	RDMOD	READ BUFFER RECEIVED 
	XIF
BRM325	EQU	*
	SUK	A7,1 
	RF(Z)	BRM340	MESSAGE ENDED BY ETB
	CM	FBAX
	CF	A15,GRBUF	ALLOCATE RECEIVE BUFFER 
	ADK	A4,6 
	LD	A6,FDWTIN	GET INPUT DWT 
* 
*	PREPARE FOR CHAINED COMMAND 
* 
	IFT	RCOM=1 
	LDR*	A2,A6 
	LC	A2,TEBCDIC,A2 
	LD	A1,DCRBUF 
	RF(Z)	BRM326 
	ST	A2,+4,A1
	XIF
BRM326	EQU	*
	CWK	A6,DW1500
	RF(E)	BRM330	MESSAGE IS MENT FOR DCTASK
	LD	A2,DWTST,A6	GET STATUS
	RF(N)	BRM330	NO REQUEST
	LDK	A2,2 
	CW	A2,DWTOR,A6 
	RF(NE)	BRM330	NO READ REQUEST
BRM327	EQU	*
	LDK	A1,0	SET RC=0
	LD	A8,DWTECB,A6	GET ECB ADDRESS
	ST	A4,ECBBA,A8	STORE BUFFER ADDRESS
	LD	A3,-4,A4	GET LENGTH 
	ST	A3,ECBEL,A8	STORE EFFECTIVE LENGTH
	CF	A15,CTIME	STOP REQUEST TIMING 
	ST	A2,ECBCW,A8	STORE REMAINING TIME
	EJECT
* 
* 
*	CHECK IF START PRINTER BIT SET IN CCC/WCC 
* 
* 
	IFT	STAT=1 
	LC	A2,+2,A4	GET WCC/CCC
	ANK	A2,/FF 
	LC	A2,TEBCDI,A2	TRANSLATE
	ANK	A2,8 
	RF(Z)	BRM328 
	LD	A2,DWTST,A6	GET STATUS
	ORK	A2,/A
	ST	A2,DWTST,A6 
BRM328	EQU	*
	XIF
	CF	A15,TENDIO	COMPLETE REQUEST 
	RF	BRM345
	EJECT
BRM330	EQU	*
	SUK	A4,6	GET BUFFER BASE 
	CF	A5,QRBUF	QUEUE BUFFER FOR DCTASK
	CF	A15,CKMESS	COMPLETE DCTASK READ IF ANY
BRM340	EQU	*
	CF	A5,TRACK	SEND ACK 0/1 
	ABL	BRM
BRM345	EQU	*
	IFT	STAT=1 
	LD	A1,DWTST,A6 
	ANK	A1,8 
	RB(Z)	BRM340	ACK SHOULD BE SENT
	CF	A5,TRWACK	SEND WACK 
	RF	BRM410
	XIF
	IFF	STAT=1 
	RB	BRM340
	XIF
	EJECT
* 
* 
*	READ MODIFIED OR READ BUFFER RECEIVED 
* 
* 
	IFF	RCOM=0 
RDBUF	EQU	*	READ BUFFER COMMAND 
RDMOD	EQU	* 
	CM	XSEL	RESET SELECT EXPECTED
	LD	A6,FDWTIN	DWT-ADDRESS FOR ADDRESSED TERMINAL
	LD	A4,DWTBUF,A6	BUFFER ADDRESS 
	SUK	A4,2	SDJUST BUFFER ADDRESS 
	LDKL	A3,1922	REQUESTED LENGTH
	IM	XRB	SET READ BUFFER SWITCH
	CM	FDWTUT
	LDK	A1,1 
	XRS	A1,CACK	INCREMENT ACK COUNTER
	ABL	POL127 
	XIF
* 
* 
*	ENQ HAS BEEN RECEIVED 
* 
* 
BRM400	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	OR	A1,XSEL 
	RF(Z)	BRM410	IN CONTROL STATE
	CF	A5,TRREP	REPEAT LAST CONTROL SEQUENCE 
BRM410	EQU	*
	ABL	BRM
	EJECT
* 
* 
*	NAK HAS BEEN RECEIVED 
* 
* 
BRM500	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RF(NZ)	BRM510	ACK EXPECTED 
	OR	A1,XSEL 
	RB(Z)	BRM410	IN CONTROL STATE
	RF	BRM636
BRM510	EQU	*
	LD	A6,FDWTUT	GET WRITING DWT 
	IFF	STAT=0 
	LD	A1,XSTA 
	ABL(NZ)	POL050	STATUS HAS BEEN TRANSMITTED 
	XIF
	LD	A1,FBLST	GET START POINT FOR LAST BLOCK 
	SU	A1,FECBBA	COMPUTE BUFFER INDEX
	ST	A1,FBAX 
	ABL	POL130 
* 
* 
*	DLE HAS BEEN RECEIVED 
* 
* 
BRM600	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RB(Z)	BRM410	ACK NOT EXPECTED
	CF	A5,READ	READ SECOND CHARACTER 
	CWK	A2,ACK0+PAR
	RF(NE)	BRM620
* 
*	ACK , 0 RECEIVED
* 
	LD	A1,CACK	GET ACKCOUNTER
	RF(Z)	BRM630	ACK,0 EXPECTED
BRM610	EQU	*
	CF	A5,TRENQ	SEND ENQ 
	CF	A5,SPTIM	START PROCEDURE TIMER
	RB	BRM410
BRM620	EQU	*
	CWK	A2,ACK1
	RF(NE)	BRM650
* 
*	ACK , 1 RECEIVED
* 
	LD	A1,CACK	GET ACK COUNTER 
	RB(Z)	BRM610	ACK,1 NOT EXPECTED
BRM630	EQU	*
	LD	A1,XETX 
	RF(Z)	BRM640	ETX NOT SENT
	EJECT
* 
*	ACK HAS BEEN RECEIVED TO AN ETX BLOCK 
* 
	LDK	A1,0	SET RC=0
BRM635	EQU	*
	IFF	STAT=0 
	LD	A2,XSTA 
	RF(NZ)	BRM670	STATUS HAS BEEN TRANSMITTED
	XIF
	CF	A5,CWRITE	COMPLETE WRITE REQUEST
BRM636	EQU	*
	CF	A5,TREOT	SEND EOT 
	IFT	RCOM=1 

	CM	XRB	RESET READ BUFFER 
	XIF
	RB	BRM410
BRM640	EQU	*
	LDK	A1,1 
	XRS	A1,CACK	INCREMENT ACK COUNTER
	ABL	POL130 
BRM650	EQU	*
	CWK	A2,RVI+PAR 
	RB(NE)	BRM610	INVALID DLE SEQUENCE 
	CM	XACK	RESET 'EXPECTING ACK'
	LD	A1,XETX 
	RF(NZ)	BRM660	ETX HAS BEEN SENT
	LDK	A1,2	SET RC=2
	RB	BRM635
BRM660	EQU	*
	LDK	A1,0	SET RC=0
	RB	BRM635
	IFF	STAT=0 
	EJECT
* 
* 
*	STATUS HAS BEEN TRANSMITTED 
* 
* 
BRM670	EQU	*
	LD	A6,FDWTUT	GET DWT ADDRESS 
	CF	A15,REMOVS	REMOVE FROM STATUS QUEUE 
	CM	XSTA	CLEAR 'STATUS SENT'
	CM	XACK	CLEAR 'ACK EXPECTED' 
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,4 
	RB(Z)	BRM636	NOT DE
	LDKL	A1,/8000
	ANS	A1,DWTST,A6	CLEAR STATUS 
	RB	BRM636
	XIF
	EJECT
* 
* 
*	SELECT HAS BEEN RECEIVED
* 
* 
SELECT	EQU	*
	IFF	STAT=0 
	LD	A1,DWTST,A6	GET STATUS
	LDR	A3,A1
	ANK	A1,1 
	RF(Z)	SEL110	NO PENDING STATUS 
	CF	A5,TRRVI	SEND RVI 
	XIF
	IFF	STAT=1 
	RF	SEL110
	XIF
SEL100	EQU	*
	ABL	BRM
SEL110	EQU	*
	IFT	STAT+NOWACK=1
	ANK	A3,8 
	RF(NZ)	SEL115	BUSY 
	XIF
	IFT	STAT+NOWACK=2
	ANK	A3,8 
	RF(Z)	SEL111	DEVICE NOT BUSY 
	CF	A5,TRWACK	TRANSMIT WACK 
	ABL	BRM
SEL111	EQU	*
	XIF
	LD	A1,DCRBUF 
	RF(NZ)	SEL120	BUFFER AVAILABLE 
SEL115	EQU	*
	IFF	STAT+NOWACK=2
	CF	A5,TRWACK	SEND WACK 
	XIF
	RB	SEL100
SEL120	EQU	*
	CF	A5,PRREC	PREPARE FOR TEXT RECEPTION 
	CF	A5,TRACK	SEND ACK,0 
	RB	SEL100
	EJECT
* 
* 
*	PREPARE FOR TEXT RECEPTION
* 
* 
PRREC	EQU	* 
	IM	XSEL	SET 'SELECTED' 
	CM	FBAX	RESET BUFFER INDEX 
	IFT	CODE=1 
	LC	A2,TEBCDIC,A2	TRANSLATE STA TO EBCDIC 
	XIF
	ST	A2,+4,A1	SAVE STA IN BUFFER 
	IM	XSTA
	ST	A6,FDWTIN	STORE INPUT DWT 
	RTN	A5 
	EJECT
* 
* 
*	GENERAL POLL HAS BEEN RECEIVED
* 
* 
GPOLL	EQU	* 
	CF	A5,CPTIM	CHECK POLL TIMER 
	IFF	STAT=0 
	LD	A6,DCSTQ	 
	RF(Z)	POL110	NO STATUS TO BE SENT
	SUK	A6,DWTSQ	GET DWT ADDRESS 
POL050	EQU	*
	CF	A5,TRSTA	SEND STATUS
	CF	A5,SPTIM	START PROCEDURE TIMER
	IM	XACK	SET 'ACK EXPECTED' 
	XIF
	IFF	STAT=1 
	RF	POL110
	XIF
POL100	EQU	*
	ABL	BRM
POL110	EQU	*
	LD	A6,DCWRQ
	RF(NZ)	POL120	WRITE ON QUEUE 
POL115	EQU	*
	CF	A5,TREOT	SEND EOT 
	RB	POL100
POL120	EQU	*
	SUK	A6,DWTWQ	GET DWT ADDRESS 
POL125	EQU	*
	LD	A8,DWTECB,A6	GET ECB ADDRESS
	RF(NZ)	POL126
	CF	A15,REMOVW
	RB	POL115
POL126	EQU	*
	ST	A8,FECB	SAVE ECB ADDRESS
	ST	A6,FDWTUT	SAVE A6 
	LD	A4,ECBBA,A8	GET BUFFER ADDRESS
	LD	A3,ECBRL,A8	GET LENGTH
POL127	EQU	*
	ST	A4,FECBBA	SAVE BUFFER ADDRESS 
	SUK	A3,2	SKIP FIRST WORD OF BUFFER 
	ST	A3,FECBRL	SAVE LENGTH 
	CM	FBAX	RESET BUFFER INDEX 
POL130	EQU	*
	CM	XETX	RESET 'ETX SENT' 
	CM	XSTA
	CF	A5,TRTEXT	SEND ONE BLOCK
	CF	A5,SPTIM	START PROCEDURE TIMER
	IM	XACK	SET 'ACK EXPECTED' 
	RB	POL100
	EJECT
* 
* 
*	SPECIFIC POLL HAS BEEN RECEIVED 
* 
* 
SPOLL	EQU	* 
	IFF	STAT+SPECP=0 
	LDR	A7,A6	SAVE A6
	CF	A5,CPTIM	CHECK POLLTIMER
	LDR	A6,A7	RESTORE A6 
	IFT	STAT=1 
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,7 
	RB(NZ)	POL050	PENDING STATUS 
	XIF
	IFF	STAT+SPECP=0 
	LD	A1,DWTST,A6 
	RB(N)	POL115	NO REQUEST
	LD	A1,DWTOR,A6	GET ORDER 
	SUK	A1,6 
	RB(Z)	POL125	WRITE REQUEST 
	SUK	A1,2 
	RB(Z)	POL125	EXCHANGE REQUEST
	XIF
	RB	POL115	SEND EOT 
	EJECT
* 
* 
*	CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED 
* 
*	A1 CONTAINS RETURN CODE 
* 
* 
CWRITE	LD	A6,FDWTUT 
	RF(Z)	CWR900	NO WRITE GOING ON 
	LD	A2,DWTST,A6 
	RF(N)	CWR900	NO REQUEST
	LD	A2,DWTOR,A6	GET ORDER 
	SUK	A2,6 
	RF(Z)	CWR100	WRITE REQUEST 
	SUK	A2,2 
	RF(NZ)	CWR900	NOT EXCHANGE REQUEST 
	LDR	A1,A1
	RF(NZ)	CWR100	TRANSMISSION ERROR, RC NOT ZERO
	LDK	A2,2	TRANMISSION OK
	ST	A2,DWTOR,A6	INDICATE READ ORDER 
	RF	CWR150
CWR100	LD	A8,FECB	GET ECB ADDRESS 
	CF	A15,CTIME	STOP TIMING 
	LDR	A8,A8
	RF(Z)	CWR150 
	ST	A2,ECBCW,A8 
	CF	A15,TENDIO	COMPLETE REQUEST 
CWR150	EQU	*
	CF	A15,REMOVW	REMOVE FROM WRITE QUEUE
CWR200	EQU	*
	IFF	TBUFL=0
	LD	A4,FECBBA	GET BUFFER ADDRESS
	CF	A15,RTBUF	RELEASE TRANSMIT BUFFER 
	CF	A15,CKGBQ	CHECK GET BUFFER QUEUE
	XIF
CWR900	EQU	*
	CM	XACK	RESET 'ACK EXPECTED' 
	CM	FDWTUT
	RTN	A5 
	EJECT
* 
* 
*	READ ONE TEXT BLOCK 
* 
*	ON EXIT A3 CONTAINS : 
*	0 : IF CORRECT ETX BLOCK RECEIVED 
*	1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW
*	2 : IF CORRECT ETB BLOCK RECEIVED 
* 
RDMESS	EQU	*
	LD	A4,DCRBUF	GET BUFFER ADDRESS
	ADK	A4,6	RESERVE HEADER
	LDK	A3,0 
	LD	A1,XSTA 
	RF(NZ)	RDM050	LAST INPUT WAS OK
	LD	A1,FBLST	COMPUTE NEW INDEX
	SUR	A1,A4
	ST	A1,FBAX 
RDM050	EQU	*
	AD	A4,FBAX	ADD BUFFER INDEX
	ST	A4,FBLST	REMEMBER START OF BLOCK
RDM075	EQU	*
	CM	XSTA
	LDK	A7,0	RESET LRC 

	IFT	IBMCHR=1 
	LD	A1,FBAX 
	RF(NZ)	RDM100	NOT FIRST BLOCK
	CF	A5,READP
	RF(NZ)	RDM120	PARITY ERROR 
	CWK	A2,ESC 
	RF(NE)	RDM110
	CF	A5,READP	SKIP NEXT TWO CHARACTERS 
	CF	A5,READP
	XIF
RDM100	EQU	*
	CF	A5,READP	READ ONE CHARACTER 
	RF(NZ)	RDM120	PARITY ERROR 
RDM110	EQU	*
	CWK	A2,ETX 
	RF(E)	RDM130	ETX RECEIVED
	CWK	A2,ETB 
	RF(E)	RDM160	ETB RECEIVED
	CWK	A2,ITB 
	RF(E)	RDM170	ITB RECEIVED
	CWK	A2,ENQ 
	RF(E)	RDM140	ENQ IN TEXT RECEIVED
	CWK	A2,/FF 
	RF(E)	RDM140	MARK HOLD RECEIVED

	IFT	CODE=0 
	IFT	BINTRM=1 

	LDR	A1,A2
	SUK	A1,DC1+3 
	RF(P)	RDM115	NOT DC1-DC3 
	ADK	A1,3 
	RF(N)	RDM115	NOT DC1-DC3 
	SLL	A1,6 
	LDR	A8,A1
	CF	A5,READP	8-BIT CHAR GET NEXT PART 
	RF(NZ)	RDM120	PARITY ERROR 
	SUK	A2,/20	ASSEMBLE TO ONE CHARACTER 
	ORR	A2,A8
RDM115	EQU	*
	XIF

	SCR	A2,A4	STORE CHARACTER
	ADK	A4,1	INCREMENT POINTER 
	IM	FBAX	INCREMENT BUFFER INDEX 
	LD	A1,FBAX 
	CWK	A1,RBUFL+RBUFL 
	RB(NG)	RDM100	NOT OVERFLOW 
* 
*	BUFFER OVERFLOW 
* 
	RF	RDM140	ABORT INPUT
RDM120	EQU	*
	LDK	A3,1	INDICATE INVALID MESSAGE
	SUK	A2,/7F 
	RF(Z)	RDM150	MARK HOLD RECEIVED
	RB	RDM100
* 
*	ETX RECEIVED
* 
RDM130	EQU	*
	LD	A1,DCRBUF	GET BUFFER ADDRESS
	LD	A2,FBAX	GET BUFFER INDEX
	ST	A2,+2,A1	STORE EFFECTIVE LENGTH IN HEADER 
	IFF	CODE=1 
	CF	A5,RDLRC
	RF(Z)	RDM150	LRC WAS OK
	XIF
	IFT	CODE=1 
	CF	A5,RDCRC	READ CRC AND CHECK IT
	RF(E)	RDM150	CRC WAS OK
	XIF
RDM140	EQU	*
	LDK	A3,1	INDICATE INVALID MESSAGE
RDM150	EQU	*
	LDR	A7,A3	SAVE RESULT REGISTER 
	CF	A5,HALTIN	HALT INPUT
	IFT	P6805=1
	ORR	A7,A1	PARITY ERROR	SALCUZ
	XIF			SALCUZ 
	RTN	A5 
* 
*	ETB RECEIVED
* 
RDM160	EQU	*
	LDR	A3,A3
	RB(NZ)	RDM130	ALREADY INVALID
	LDK	A3,2	INDICATE CORRECT ETB
	RB	RDM130
* 
*	ITB RECEIVED
* 
RDM170	EQU	*
	IFF	CODE=1 
	CF	A5,RDLRC
	RB(NZ)	RDM120	LRC WAS NOT OK 
	XIF
	IFT	CODE=1 
	CF	A5,RDCRC	READ CRC AND CHECK IT
	RB(NE)	RDM120	CRC WAS NOT OK 
	XIF
	RB	RDM100
	EJECT
* 
*	TRANSMIT ACK 0 OR 1 
* 
TRACK	LDK	A2,1
	LDK	A3,ACK1	PRELOAD ACK1 
	XRS	A2,CACK	INCREMENT ACK COUNTER
	RF(NZ)	TRDLE 
	LDK	A3,ACK0	LOAD ACK0
	RF	TRDLE 
* 
*	TRANSMIT WACK 
* 
TRWACK	LDK	A3,WACK	LOAD WACK
	RF	TRDLE 
* 
*	TRANSMIT RVI
* 
	IFF	STAT=0 
TRRVI	LDK	A3,RVI	LOAD RVI 
	XIF
* 
*	TRANSMIT DLE
* 
TRDLE	LDK	A2,DLE	LOAD DLE 
	SC	A2,RESEND	PUT INSAVE AREA 
	SC	A3,RESEND+1	
	RF	TRREP 
	EJECT
* 
*	TRANSMIT NAK
* 
TRNAK	LDK	A3,NAK	LOAD NAK 
	RF	TREN10
* 
*	TRANSMIT EOT
* 
TREOT	LDK	A3,EOT	LOAD EOT 
	RF	TREN10
* 
*	TRANSMIT ENQ
* 
TRENQ	LDK	A3,ENQ	LOAD ENQ 
* 
TREN10	SC	A3,RESEND	PUT IN SAVE AREA
	LDK	A2,/FF 
	SC	A2,RESEND+1 
TRREP	CF	A5,TRSYNC	START OUTPUT 
	LC	A2,RESEND	GET FIRST CHARACTER 
	CF	A5,WRITEP	SEND IT 
	LC	A2,RESEND+1	GET NEXT CHARACTER
	CF	A5,WRITEP	SEND IT 
TRRE10	LDK	A2,/FF 
	CF	A5,WRIT05	SEND PAD
	LDK	A2,/FF 
	CF	A5,WRIT05 
	LDK	A2,0		SALCUZ 
	CIO	A2,0,LCUUT	STOP TRANSMITTER
	IFT	P6805=1		SALCUZ
	CF	A5,READ	WAIT FOR END	SALCUZ 
	XIF			SALCUZ 
	SST	A2,LCUUT	PERFORM SST AT ONCE 
	IFF	LOGG=0 
	CF	A5,LOGSST	LOG TRANSMITTER STATUS
	XIF
	RTN	A5 
	EJECT
* 
* 
*	TRANSMIT ONE TEXT BLOCK 
* 
* 
TRTEXT	EQU	*
	CF	A5,TRSYNC	START OUTPUT
	IFT	TSTREQ=1 
* 
* 
*	TEST REQUEST HANDLING 
* 
* 
	LD	A4,FBAX 
	RF(NZ)	TRT050	NOT START OF MESSAGE 

	LD	A1,XRB	READ BUFFER COMMAND IN PROCESS ??? 
	RF(NZ)	TRT050	YES !! 

	LD	A4,FECBBA 
	LC	A3,+2,A4	GET AID CHARACTER
	SUK	A3,/30 
	RF(NZ)	TRT050	NOT TEST REQUEST 
	LDK	A2,SOH 
	CF	A5,WRITE	SEND SOH 
	LDK	A7,0	RESET BCC 
	LDK	A2,'%' 
	CF	A5,WRITE	SEND % 
	LDK	A2,'/' 
	CF	A5,WRITE	SEND / 
	LDK	A2,STX 
	CF	A5,WRITE	SEND STX 
	ST	A4,FBLST	REMEMBER START OF BLOCK
	ADK	A4,5	SKIP AID + CURSOR ADDRESS 
	LDK	A3,5	ADJUST LENGTH 
	LDK	A2,3 
	ST	A2,FBAX 
	RF	TRT100
TRT050	EQU	*
* 
* 
* 
	XIF
	LDK	A2,STX 
	CF	A5,WRITE	SEND STX 
	LDK	A7,0	RESET LRC 
	LD	A4,FECBBA	GET BUFFER ADDRESS
	AD	A4,FBAX	ADD BUFFER INDEX
	ST	A4,FBLST	REMEMBER START OF BLOCK
	ADK	A4,2	SKIP FIRST WORD OF BUFFER 
	LDK	A3,0	RESET CHARACTER COUNTER 
	LD	A1,FBAX	GET BUFFER INDEX
	RF(NZ)	TRT100	NOT FIRST BLOCK
	LC	A2,DW1500+1	GET TCA 
	CF	A5,WRITEP	SEND TCA
	LDR*	A2,A6	GET STA 
	CF	A5,WRITEP	SEND STA
	IFT	IBMCHR=1 
	IFF	RCOM=1 
	LDK	A2,/27	SEND ENTER AS AID 
	CF	A5,WRITEP 
	LDK	A2,/20	AND CURSOR ADDRESS
	CF	A5,WRITEP 
	LDK	A2,/20 
	CF	A5,WRITEP 
	XIF
	IFT	RCOM=1 

	LD	A1,XRB	READ BUFFER COMMAND ???
	RF(Z)	TRT070	NO!!

			******************** 
	LDK	A2,X'2D'	AID FOR DISPLAY 
TRT060	CF	A5,WRITEP	SEND AID

	LD*	A3,DWTCUR,A6	CURSOR ADDRESS
	CF	A5,LINCOL	SEND LINE AND COLUMN NUMBER 
	LDK	A3,5	SET BLOCK COUNT 
	RF	TRT100
TRT070	EQU	*
	XIF

	LDK	A3,2 
TRT100	EQU	*
	LCR	A2,A4	GET ONE CHARACTER
	ADK	A4,1	INCREMENT POINTER 
	ANK	A2,/7F 
	IFT	RCOM=1 
	LD	A1,XRB	READ BUFFER COMMAND ???
	RF(Z)	TRT105	NO!!

************************************************************
* 
*   CHECK IF ATTRIBUTE CHARACTER OR NULL
* 
*********************************************** 

	CWK	A2,X'20'	ATTRIBUTE CHARACTER 
	RF(L)	TRT101	YES!!!
	XIF
	IFT	DMRK=1 
	CWK	A2,/7E	LINE FEED ? 
	RF(NE)	TRT102	NO,GO TO TRT102
	LDK	A2,/0A 
TRT102	EQU	*
	CWK	A2,/7D	END OF MESSAGE ?
	RF(NE)	TRT103	NO,GO TO TRT103
	LDK	A2,/19 
TRT103	EQU	*
	CWK	A2,X'7F'	NULL ?? 
	RF(NE)	TRT105
	SUK	A2,1 
	XIF
	IFT	RCOM=1 
	RF	TRT105

TRT101	EQU	*

	LDK	A2,SF
	CF	A5,WRITEP	SEND START FIELD

	LC	A2,-1,A4	GET ATTRIBUTE CHARACTER
	ANK	A2,X'7F' 
	LDR	A1,A2	CONVERT TO IBM ATTRIBUTE 
	ANK	A1,1 
	ANK	A2,/1E	MASK
	SLL	A2,1 
	ORR	A2,A1	IBM ATTRIBUTE COMPOSED 
	ORK	A2,/40	BIT ALWAYS SET ONE
	LC	A2,TASCII,A2
	CWK	A2,/18	CHECK SPECIAL ATTRIBUT
	RF(NE)	TRT104
	LDK	A2,/30 
TRT104	EQU	*
	CF	A5,WRITEP	SEND ATTRIBUTE
	ADK	A3,1 
	RF	TRT110
TRT105	EQU	*
	XIF
	EJECT
	CWK	A2,/07 
	RF(L)	TRT110	ILLEGAL CODE : SKIP IT
	CF	A5,WRITEP	SEND CHARACTER
TRT110	EQU	*
	IM	FBAX	INCREMENT BUFFER INDEX 
	LD	A1,FECBRL	GET REQUESTED LENGTH
	CW	A1,FBAX 
	RF(NG)	TRT130	END OF MESSAGE 
	ADK	A3,1	INCREMENT CHARACTER COUNTER 
	CWK	A3,TBLEN 
	RB(L)	TRT100	NOT FULL BLOCK
	IFT	RCOM=1 
	LDK	A1,SBA	CHECK IF SBA AT END OF BLOCK
	CC	A1,-2,A4
	RF(E)	TRT115	YES 
	CC	A1,-1,A4
	RF(NE)	TRT116	NO SEND ETB
	LCR	A2,A4	GET FIRST BYTE AFTER SBA 
	ADK	A4,1	INREMENT POINTER
	CF	A5,WRITEP	SEND IT 
	IM	FBAX	INCREMENT INDEX
TRT115	LCR	A2,A4	GET SECOND BYTE AFTER SBA
	CF	A5,WRITEP	SEND IT 
	IM	FBAX	INCREMENT INDEX
	XIF
TRT116	EQU	*
	LDK	A2,ETB	LOAD ETB
TRT120	EQU	*
	CF	A5,WRITEP	SEND IT 
	IFF	CODE=1 
	LDR	A2,A7	GET LRC
	CF	A5,WRITEP	SEND LRC
	XIF
	IFT	CODE=1 
	LDR	A8,A7	SAVE CURRENT CRC 
	LDR	A2,A7
	ANK	A2,/FF 
	CF	A5,WRIT05	SEND CRC BYTE 1 
	ECR	A2,A8
	ANK	A2,/FF 
	CF	A5,WRIT05	SEND CRC BYTE 2 
	XIF
	ABL	TRRE10	HALT OUTPUT 
TRT130	EQU	*
	IM	XETX	INDICATE 'ETX SENT'
TRT140	EQU	*
	LDK	A2,ETX	LOAD ETX
	RB	TRT120	SEND ETX AND LRC 
	EJECT
* 
* 
*	TRANSMIT STATUS MESSAGE 
* 
* 
	IFF	STAT=0 
TRSTA	EQU	* 
	IM	XSTA	INDICATE 'STATUS SENT' 
	ST	A6,FDWTUT	SAVE A6 
	CF	A5,TRSYNC	START OUTPUT
	LDK	A2,SOH 
	CF	A5,WRITE	SEND SOH 
	LDK	A7,0	REST LRC
	LDK	A2,'%' 
	CF	A5,WRITEP	SEND '%'
	LDK	A2,'R' 
	CF	A5,WRITEP	SEND 'R'
	LDK	A2,STX 
	CF	A5,WRITE	SEND STX 
	LC	A2,DW1500+1 
	CF	A5,WRITEP	SEND TCA
	LDR*	A2,A6 
	CF	A5,WRITEP	SEND STA
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,/06	MASK FOR S/S 0
	SRL	A1,1 
	LC	A2,SSTAB,A1	GET STATUS BYTE 
	CF	A5,WRITEP	SEND S/S 0
	LDK	A2,NOIR	PRELOAD S/S 1
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,5 
	RF(Z)	TRST10	NOT 'IR'
	ANK	A1,4 
	RF(NZ)	TRST10	NO IR IF DE
	LDK	A2,IR
TRST10	EQU	*
	CF	A5,WRITEP	SEND S/S 1
	RB	TRT130	SEND ETX AND LRC 
	XIF
	EJECT
* 
* 
*	TRANSMIT SYNC SEQUENCE
* 
* 
TRSYNC	EQU	*
	LDK	A2,0		SALCUZ 
	CIO	A2,0,LCUIN	HALT INPUT IF NOT DONE
	SST	A2,LCUIN	PERFORM SST 
	IFT	P6805=0		SALCUZ
	CIO	A2,1,LCUUT	START TRANSMITTER 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	IFT	CODE=1		SALCUZ 
	LDK	A2,0		SALCUZ 
	CIO	A2,1,LCUUT	START TRANSMITTER	SALCUZ
	RF(A)	TRS010		SALCUZ 
	SST	A1,LCUUT		SALCUZ 
	RF(A)	TRS005		SALCUZ 
	ABL	BRM		SALCUZ
TRS005	CIO	A2,1,LCUUT		SALCUZ 
TRS010	EQU	*		SALCUZ
	LDK	A2,SYNEBC		SALCUZ
	OTR	A2,1,LCUUT	SPECIFY SYNC CHARACTER	SALCUZ 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	IFT	CODE=0		SALCUZ 
	LDK	A2,/0C		SALCUZ 
	CIO	A2,1,LCUUT		SALCUZ 
	RF(A)	TRS010		SALCUZ 
	SST	A1,LCUUT		SALCUZ 
	RF(A)	TRS005		SALCUZ 
	ABL	BRM		SALCUZ
TRS005	CIO	A2,1,LCUUT		SALCUZ 
TRS010	EQU	*
	LDK	A2,SYN		SALCUZ 
	OTR	A2,1,LCUUT	SPECIFY SYNC CHARACTER	SALCUZ 
	XIF			SALCUZ 
	CF	A5,READ	WAIT FOR OUTPUT INTERRUPT 
	LDK	A3,4	4 SYNS
TRS100	LDK	A2,SYN 
	CF	A5,WRITE	SEND SYN 
	SUK	A3,1 
	RB(NZ)	TRS100
	RTN	A5 
	EJECT
* 
* 
*   RECEIVER INTERRUPT
* 
* 
IH1501	EQU	*
	ST	P,INTSAV
	CF	A15,SAVE8	SAVE A1-A8
	CF	A15,LDREG	RESTORE DC REGS A3 - A8 
	INR	A2,0,LCUIN	READ CHAR 
	RF(NA)	IHIN20	NOT ACCEPTED,CHECK STATUS
	IFF	LOGG=0 
	CF	A5,LOGIN	LOG RECEIVED CHARACTER 
	XIF
	IFF	CODE=1 
	C2	SYNSW 
	RF(NZ)	IHLCI2
	CWK	A2,SYN	SKIP SYNS 
	RF(E)	READ 
IHLCI2	XRR	A7,A2	CALCULATE LRC
	XIF
	IFT	CODE=1 
	C2	SYNSW 
	RF(NZ)	IHLCI1	DO NOT SKIP SYNCS IN BCC FRAME 
	CWK	A2,SYNEBC
	RF(E)	READ	SKIP EBCDIC SYN 
IHLCI1	EQU	*
	CF	A5,CRCCAL	CALCULATE CRC 
	LC	A2,TASCII,A2	TRANSLATE TO ASCII 
	XIF
IHIN10	RTN	A5 
	IFT	P6805=0		SALCUZ
IHIN20	CF	A5,SST	PERFORM SST
	ABL	BRM
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
IHIN20	RF	SST	PERFORM SST	SALCUZ
	XIF			SALCUZ 
	EJECT
* 
* 
*   TRANSMITTER INTERRUPT 
* 
* 
IH1502	EQU	*
	ST	P,INTSAV
	CF	A15,SAVE8	SAVE A1 - A8
	CF	A15,LDREG	RESTORE DC REGS A3 - A8 
	RB	IHIN10
	EJECT
* 
* 
*	SST INSTRUCTION AND STATUS CHECK
* 
*   LCU STATUS : BIT 10=CARRIER OFF 
*		BIT 13=PARITY ERROR (6805 ONLY)	SALCUZ 
*                BIT 14=THROUGHPUT ERROR
*                BIT 15=MODEM NOT READY 
* 
SST	SST	A1,LCUIN
	IFT	P6805=1		SALCUZ
	RF(NA)	SST200	ALREADY INACTIVE	SALCUZ		SALCUZ
	XIF			SALCUZ 
	LDR	A2,A1
	IFF	LOGG=0 
	CF	A5,LOGSST	LOG SST INFORMATION 
	XIF
	IFT	P6805=0		SALCUZ
	ANK	A2,2 
	RF(Z)	SST100 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	ANK	A2,6		SALCUZ 
	RF(Z)	SST100		SALCUZ 
	ANK	A2,2		SALCUZ 
	RF(NZ)	SST050	THROUGH PUT	SALCUZ 
	LDK	A1,1	SET PARITY ERROR	SALCUZ 
	RF	SSTRET		SALCUZ
	XIF			SALCUZ 
SST050	EQU	*		SALCUZ
	CM	XSTA	TROUHHPUT ERROR
	LDKL	A5,STB
	ABL	BRM010 
SST100	EQU	*
	ST	A1,DCSTCU 
	IFT	P6805=0		SALCUZ
	CF	A15,CKMESS	CHECK IF STATUS CHANGE 
	RTN	A5 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	ANK	A1,/21		SALCUZ 
	RF(Z)	SST200	LSALCUZ 
	CF	A15,SETIME	LINE ERROR, WAIT 0.2 SECONDS	SALCUZ
	DATA	BRM	RESTART	SALCUZ
	DATA	2	WAIT TIME	SALCUZ
	RF	READ		SALCUZ
* 
SST200	LDK	A1,0		SALCUZ 
SSTRET	ADK	A5,4		SALCUZ 
	LDR	A1,A1	SET CR	SALCUZ
	ABR*	A5	RETURN	SALCUZ
	XIF			SALCUZ 
* 
* 
*	HALT INPUT
* 
* 
HALTIN	LDK	A1,0		SALCUZ 
	CIO	A1,0,LCUIN 
	IFT	P6805=0		SALCUZ
	RB	SST	PERFORM SST INSTRUCTION AND STATUS CHECK
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	RF	READ	WAIT FOR SST INTERRUPT	SALCUZ
	XIF			SALCUZ 
	EJECT
* 
* 
*	WRITE FROM OR READ ONE CHARACTER TO A2
* 
* 
WRITE	EQU	* 
	IFT	CODE=1 
	ANK	A2,/FF 
	CWK	A2,/FF 
	RF(E)	WRIT05	NO TRANSLATION OF TRAILING PAD
	LC	A2,TEBCDIC,A2	TRANSLATE TO EBCDIC 
	XIF
WRIT05	EQU	*
	OTR	A2,0,LCUUT	SEND CHARACTER
	RF(A)	WRIT10 
	RF	READ	THROUGHPUT ERROR 
	IFF	CODE=1 
WRIT10	XRR	A7,A2	ACCUMULATE BCC 
	XIF
	IFT	CODE=1 
WRIT10	CF	A5,CRCCAL	CALCULATE CRC 
	XIF
	IFF	LOGG=0 
	CF	A5,LOGOUT	LOG OUTPUT CHARACTER
	XIF
* 
READ	CF	A15,STREG 
	ABL	TDISP
	EJECT
* 
* 
***	WRITEP
* 
*   WRITE A2 WITH PARITY
* 
* 
	IFT	CODE+P6805=0		SALCUZ 
WRITEP	ANK	A2,/FF 
	ECR	A1,A2
	ORK	A2,/80 
WRI100	SLL	A1,1 
	RB(P)	WRI100 
	RB(Z)	WRITE	WRITE
	XRK	A2,/80 
	RB	WRI100
	XIF
	IFF	CODE+P6805=0		SALCUZ 
WRITEP	RB	WRITE 
	XIF
* 
* 
* 
***	READP 
* 
*   READ CHARACTER TO A2 AND CHECK PARITY 
* 
* 
READP	CF	A5,READ
	IFT	CODE+P6805=0		SALCUZ 
	ECR	A1,A2
RE100	SLL	A1,1
	RF(Z)	RE110
	RB(NN)	RE100 
	XRK	A2,/80 
	RB	RE100 
RE110	LDR	A1,A2 
	ANK	A2,/7F 
	XIF
	IFF	CODE+P6805=0		SALCUZ 
	LDK	A1,/80 
	XIF
	ADK	A5,4 
	ANK	A1,/80 
	XRK	A1,/80 
	ABR*	A5
* 
* 
	EJECT
* 
*	FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2
* 
*	CALLING SEQUENCE: CF A5,FINTER
*	A2=SUBTERMINAL ADDRESS
*	A4 DESTROYED
*	A3#0: DWT TO FOUND TERMINAL 
* 
* NOTE:	FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES 
*	ENTRY:	FINTER - CHECK SELECT ADDRESS
*		FINTEP - CHECK SPECIFIC POLL ADDRESS 
* 
RBYTE	DATA	0	IF 1 COMPARE WITH RIGTH BYTE 
* 
* 
FINTEP	EQU	*
	IFT	MSV1=0 
FINTER	EQU	*
	XIF
	IM	RBYTE 
	IFT	MSV1=1 
FINTER	EQU	*
	XIF
	LD	A4,DCTAB	GET ADDRESS TO DC:TAB
	AD*	A4,DCTAB	ADDRESS TO END OF DC:TAB
FINT10	SUK	A4,2 
	LDK	A3,0	DEFAULT VALUE 
	CW	A4,DCTAB	END OF TABLE 
	RF(E)	FINT20	SUBTERMINAL NOT FOUND 
	LDR*	A3,A4	LOAD DWT ADDRESS
	IFT	MSV1=1 
	AD	A3,RBYTE	CHOOSE ADDRESS TYPE
	CCR	A2,A3	COMPARE SUBTERMINAL ADDRESS
	XIF
	IFT	MSV1=0 
	CC	A2,1,A3	COMPARE TO SUBTERMINAL ADDRESS
	XIF
	RB(NE)	FINT10	TAKE NEXT TERMINAL 
FINT20	CM	RBYTE 
	ANKL	A3,/FFFE
	RTN	A5 
	EJECT
* 
* 
*	POWER ON FUNCTIONS
* 
* 
DC15ON	CF	A15,SAVE8	SAVE A1 - A8
	IFT	STAT=1 
	LDK	A5,4	SET DEVICE END
	LD	A1,DCTAB
	AD*	A1,DCTAB	GET ADDRESS TO END OF TABLE 
DRDC05	SUK	A1,2 
	CW	A1,DCTAB
	RF(E)	DRDC06	END OF TABLE
	LDR*	A6,A1	GET DWT ADDRESS 
	ORS	A5,DWTST,A6	STORE DEVICE END FOR DEVICE
	CF	A15,INSSQ	INSERT IN STATUS QUEUE
	RB	DRDC05
DRDC06	EQU	*
	XIF
	LD	A2,DCTPGP	GET POLL TIMER POINTER
	RF(NZ)	DRDC20	ALREADY STARTED
DRDC10	CF	A15,SPOTIM	START POLL TIMER 
DRDC20	ABL	BRM
	EJECT
* 
*	POLL TIME OUT 
* 
PTOUT	LDKL	A5,STB	LOAD A5 STACK BASE
	LDK	A2,/40 
	ST	A2,DCONOF	INDICATE POLL TIME OUT
	CF	A15,CKMESS	CHECK IF STATUS CHANGE 
	CF	A15,SPOTIM	START POLL TIMER 
	ABL	TDISP
* 
*	RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED
* 
CPTIM	CM	DCONOF	INDICATE POLLING
	LDKL	A2,-TIMPOL
	ST*	A2,DCTPGP	RESTART TIMER
	CF	A15,CKMESS	CHECK IF STATUS CHANGE 
	RTN	A5 
* 
*	START POLL TIMER
* 
SPOTIM	CF	A15,SETIME	START TIMER
	DATA	PTOUT,TIMPOL
	ST	A4,DCTPGP	STORE TIMER POINTER 
	ADKL	A15,4 
	ABR*	A15 
	EJECT
* 
*	START PROCEDURE TIMER 
* 
SPTIM	EQU	* 
	LDR	A1,A6	LOAD DWT AS PARAMETER
	CF	A15,SETIME
	DATA	PRTOUT,TIMPRO 
	ST	A4,DCTPP	SAVE TIMER POINTER 
	RTN	A5 
* 
*	PROCEDURE TIMEOUT 
* 
PRTOUT	CM	DCTPP 
	LDR	A6,A1	RELOAD A6
	LDKL	A5,STB	LOAD STACK BASE
	CF	A5,HALTIN	HALT INPUT IF OPEN	SALCUZ 
	LD	A1,XACK 
	RF(Z)	PRT10	ACK NOT EXPECTED 
	CF	A5,TRENQ	SEND ENQ 
	CF	A5,SPTIM	START PROCEDURE TIMER
PRT10	ABL	BRM 
	EJECT
* 
*	STOP PROCEDURE TIMER
* 
HPTIM	LD	A1,DCTPP	GET TIMER POINTER 
	RF(Z)	HPT10	NOT RUNNING
	CM*	DCTPP	STOP TIMER 
	CM	DCTPP 
HPT10	RTN	A5
	EJECT
	IFT	CODE=1 
* 
* 
*	CALCULATION OF CRC
* 
*	A2 = CHARACTER
*	A7 = ACCUMULATED CRC
* 
* 
CRCCAL	EQU	*
	ST	A1,CRCSAV 
	ST	A2,CRCSAV+2 
	ST	A3,CRCSAV+4 
	LDK	A1,8 
CRC100	LDR	A3,A7
	SRL	A7,1 
	XRR	A3,A2
	SRL	A2,1 
	ANK	A3,1 
	RF(Z)	CRC110 
	XRKL	A7,/A001
CRC110	SUK	A1,1 
	RB(NZ)	CRC100
	LD	A1,CRCSAV 
	LD	A2,CRCSAV+2 
	LD	A3,CRCSAV+4 
	RTN	A5 
CRCSAV	RES	3
	EJECT
* 
* 
*	READ CRC CHARACTERS AND CHECK THEM
*	CR = (E) IF CRC WAS OK
* 
* 
RDCRC	LDR	A6,A7	SAVE CURRENT CRC
	IM	SYNSW	DO NOT SKIP SYNCS NOW 
	CF	A5,READ	READ BYTE 1 
	LD	A8,CRCSAV+2	SAVE IT 
	CF	A5,READ	READ BYTE 2 
	CM	SYNSW	SYNCS CAN BE SKIPPED AGAIN
	LD	A2,CRCSAV+2	SAVE IT 
	SLL	A2,8 
	XRR	A2,A8
	ADK	A5,4 
	CWR	A2,A6	COMPARE RECEIVED WITH COMPUTED 
	ABR*	A5
	XIF
	IFT	CODE=0 
* 
*   RDLRC      READ LRC CHARACTER 
*              CR=0 IF LRC OK 
* 
RDLRC	IM	SYNSW
	CF	A5,READP
	ADK	A5,4 
	LDR	A1,A1
	RF(NZ)	LRCEND
	ANK	A7,/7F 
LRCEND	EQU	*
	CM	SYNSW 
	ABR*	A5

	XIF
	EJECT
* 
* 
*	DEVICE WORK TABLE FOR DCTASK
* 
* 
DW1500	EQU	*	TABLE ENTRY
	DATA	0	CU LINE ADDRESS 
	DATA	/8000	STATUS
	DATA	0	ECB ADDRESS 
	DATA	0	ORDER 
	DATA	DC15DC	POINTER TO ADDRESS BLOCK 
	DATA	0	TTAB ADDRESS
	DATA	0	WAIT/ACTIVATE INDICATOR 
	DATA	0	TASK QUEUE
	DATA	0	TIMER POINTER 
	DATA	0	WRITE QUEUE OR BUFFER QUEUE 
	DATA	0	STATUS QUEUE (NOT USED BY DC-TASK)
	DATA	0	RECEIVE MESSAGE QUEUE 
	DATA	0	SIMULATED DEVICE BUFFER ADDRESS 
	DATA	0	CURSOR ADDRESS
	EJECT
* 
* 
*	DC RECEIVE BUFFER POOL
* 
RLINK	EQU	RBUFL+RBUFL+8 
* 
DCRBUF	EQU	*
	DATA	*+2	FREE BUFFER ANCHOR
	IFF	RBUFNR=2 
	DATA	*+RLINK 
	RES	RBUFL+3
	IFF	RBUFNR=3 
	DATA	*+RLINK 
	RES	RBUFL+3
	IFF	RBUFNR=4 
	DATA	*+RLINK 
	RES	RBUFL+3
	XIF
	DATA	*+RLINK 
	RES	RBUFL+3
	DATA	0	END OF CHAIN
	RES	RBUFL+3
* 
* 
*	DC TRANSMIT BUFFER POOL 
* 
* 
DCTBUF	EQU	*
* 
* 
	IFF	TBUFL=0
	DATA	TBUF1	POINTER TO FIRST FREE BUFFER
TBUF1	DATA	TBUF2	POINTER TO NEXT FREE BUFFER
	RES	TBUFL	BUFFER AREA 1
TBUF2	DATA	0	END OF CHAIN 
	RES	TBUFL	BUFFER AREA 2
	XIF
* 
	EJECT
* 
* 
*	INTERRUPT LOGGING ROUTINE 
* 
* 
	IFF	LOGG=0 
LOGSST	ST	A2,SAVE2
	ORKL	A2,/F000
	RF	LOG10 
LOGOUT	ST	A2,SAVE2
	ORKL	A2,/0F00
	RF	LOG10 
LOGIN	CWK	A2,/FF
	RF(E)	LOGE10 
	ST	A2,SAVE2
LOG10	ST	A3,SAVE3 
	LD	A3,LOGPNT 
	STR	A2,A3
	ADK	A3,2 
	CWK	A3,LOGEND
	RF(L)	LOGEXI 
	LDKL	A3,LOGSTA 
LOGEXI	ST	A3,LOGPNT 
	LD	A2,SAVE2
	LD	A3,SAVE3
LOGE10	RTN	A5 
	EJECT
* 
* 
LOGPNT	DATA	LOGSTA
LOGSTA	EQU	*
	RES	300
LOGEND	EQU	*-4
SAVE2	DATA	0
SAVE3	DATA	0
	XIF
* 
* 
* 
	IFT	RCOM=1 
	EJECT
******************************************************* 
* 
*     L I N C O L 
* 
*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER
* 
**********************************************************

LINCOL	EQU	*
	LDR	A2,A3	COPY CURSOR ADDRESS
	SRL	A2,6 
	ANK	A2,X'3F'	
	LC	A2,LICO:T,A2	ASCII LINE NUMBER
	CF	A5,WRITEP	SEND LINE NUMBER

	LDR	A2,A3
	ANK	A2,X'3F' 
	LC	A2,LICO:T,A2	ASCII COLUMN NUMBER
	CF	A5,WRITEP	SEND COLUMN NUMBER
	RTN	A5	RETURN
* 
* 
* 
	EJECT


LICO:T	EQU	*
	DATA	/2041,/4243,/4445,/4647	/00-/07 
	DATA	/4849,/5B2E,/3C28,/2B21	/08-/0F 
	DATA	/264A,/4B4C,/4D4E,/4F50	/10-/17 
	DATA	/5152,/5D24,/2A29,/3B5E	/18-/1F 
	DATA	/2D2F,/5354,/5556,/5758	/20-/27 
	DATA	/595A,/7C2C,/255F,/3E3F	/28-/2F 
	DATA	/3031,/3233,/3435,/3637	/30-37
	DATA	/3839,/3A23,/4027,/3D22	/38-3F
	XIF
	EJECT

DC:IN	DATA	DC:TAB+2 
DCTAB	DATA	DC:TAB 
DC:TAB	DATA	2	LENGTH OF DC:TAB
	DATA	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
	DATA	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
DC:END	EQU	*
* 
* 
	END

HexDump

0x0000…0036 (0, 0, 398)   Head {h00=0x0032, h01=0x0050, text=» IDENT DRDC15  REL 9.1 78-09-15  870106440911 «, t00=0x0000, t01=0x0004}
0x0036…003e               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…005c               Head {h00=0x001a, h01=0x0050, text=»   IBM-3270 EMULATION «, t00=0x0000, t01=0x0042}
0x005c…0078               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-08-25 «, t00=0x0000, t01=0x0060}
0x0078…00a0               Head {h00=0x0024, h01=0x0050, text=»   MESSAGE QUEUING ON TERMINALS «, t00=0x0000, t01=0x007c}
0x00a0…00bc               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-06-21 «, t00=0x0000, t01=0x00a4}
0x00bc…00d8               Head {h00=0x0018, h01=0x0050, text=»   PTS 6805 ADAPTION«, t00=0x0000, t01=0x00c0}
0x00d8…00fa               Head {h00=0x001e, h01=0x0050, text=»   MSV1. UNDEFINED ADDRESS«, t00=0x0000, t01=0x00dc}
0x00fa…0116               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-06-16 «, t00=0x0000, t01=0x00fe}
0x0116…013c               Head {h00=0x0022, h01=0x0050, text=»   TRANSFER PARAM WHEN POLL ON«, t00=0x0000, t01=0x011a}
0x013c…0158               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-05-18 «, t00=0x0000, t01=0x0140}
0x0158…0176               Head {h00=0x001a, h01=0x0050, text=»   BINARY TRANSMISSION«, t00=0x0000, t01=0x015c}
0x0176…0192               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-04-21 «, t00=0x0000, t01=0x017a}
0x0192…019a               Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0008}
0x019a…01d0               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0001, t01=0x0010}
0x01d0…01da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0046}
0x01da…0202               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0001, t01=0x0050}
0x0202…020c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0078}
0x020c…023a               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0001, t01=0x0082}
0x023a…026c               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0001, t01=0x00b0}
0x026c…0290               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0001, t01=0x00e2}
0x0290…029a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0106}
0x029a…02a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0110}
0x02a4…02ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x011a}
0x02ae…02b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0124}
0x02b8…02c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x012e}
0x02c2…02fe               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0001, t01=0x0138}
0x02fe…030c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0174}
0x030c…0316               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0182}
0x0316…0320               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x018c}
0x0320…0336               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0002, t01=0x0008}
0x0336…0340               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001e}
0x0340…034a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0028}
0x034a…0380               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0002, t01=0x0032}
0x0380…03a6               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0002, t01=0x0068}
0x03a6…03cc               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0002, t01=0x008e}
0x03cc…03f2               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0002, t01=0x00b4}
0x03f2…0418               Head {h00=0x0022, h01=0x0050, text=» ENTRY DW1500 DWT FOR DC TASK «, t00=0x0002, t01=0x00da}
0x0418…0422               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0100}
0x0422…042c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x010a}
0x042c…044a               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0002, t01=0x0114}
0x044a…0454               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0132}
0x0454…045e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x013c}
0x045e…0484               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0002, t01=0x0146}
0x0484…04b0               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0002, t01=0x016c}
0x04b0…04d8               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0003, t01=0x0008}
0x04d8…04fc               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0003, t01=0x0030}
0x04fc…051c               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0003, t01=0x0054}
0x051c…053c               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0003, t01=0x0074}
0x053c…055a               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0003, t01=0x0094}
0x055a…0578               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0003, t01=0x00b2}
0x0578…05a6               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0003, t01=0x00d0}
0x05a6…05d2               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0003, t01=0x00fe}
0x05d2…05fe               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0003, t01=0x012a}
0x05fe…060c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0156}
0x060c…0616               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0164}
0x0616…0620               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x016e}
0x0620…062a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0178}
0x062a…0634               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0182}
0x0634…066e               Head {h00=0x0036, h01=0x0050, text=»*   STANDARD INTERFACE PART FOR DATA COMMUNICATION«, t00=0x0003, t01=0x018c}
0x066e…0678               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0036}
0x0678…0682               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0040}
0x0682…068c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x004a}
0x068c…0696               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0054}
0x0696…06ac               Head {h00=0x0012, h01=0x0050, text=»* DWT CONTENTS«, t00=0x0004, t01=0x005e}
0x06ac…06b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0074}
0x06b6…0704               Head {h00=0x004a, h01=0x0050, text=»* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)«, t00=0x0004, t01=0x007e}
0x0704…070e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00cc}
0x070e…072a               Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x0004, t01=0x00d6}
0x072a…0734               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00f2}
0x0734…0766               Head {h00=0x002e, h01=0x0050, text=»DWTTP EQU /10 TIMER POINTER ORDER PROCESS «, t00=0x0004, t01=0x00fc}
0x0766…0792               Head {h00=0x0028, h01=0x0050, text=»DWTWQ EQU /12 WRITE/GET BUFFER QUEUE«, t00=0x0004, t01=0x012e}
0x0792…07b4               Head {h00=0x001e, h01=0x0050, text=»DWTSQ EQU /14 STATUS QUEUE«, t00=0x0004, t01=0x015a}
0x07b4…07d8               Head {h00=0x0020, h01=0x0050, text=»DWTRQ EQU /16 RECEIVE QUEUE «, t00=0x0004, t01=0x017c}
0x07d8…0804               Head {h00=0x0028, h01=0x0050, text=»DWTBUF EQU /18 DEVICE BUFFER ADDRESS«, t00=0x0005, t01=0x0010}
0x0804…082a               Head {h00=0x0022, h01=0x0050, text=»DWTCUR EQU /1A CURSOR ADDRESS «, t00=0x0005, t01=0x003c}
0x082a…0834               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0062}
0x0834…0850               Head {h00=0x0018, h01=0x0050, text=»* ECB DISPLACEMENTS «, t00=0x0005, t01=0x006c}
0x0850…085a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0088}
0x085a…087c               Head {h00=0x001e, h01=0x0050, text=»ECBBA EQU 2 BUFFER ADDRESS«, t00=0x0005, t01=0x0092}
0x087c…08a0               Head {h00=0x0020, h01=0x0050, text=»ECBRL EQU 4 REQUESTED LENGTH«, t00=0x0005, t01=0x00b4}
0x08a0…08c4               Head {h00=0x0020, h01=0x0050, text=»ECBEL EQU 6 EFFECTIVE LENGTH«, t00=0x0005, t01=0x00d8}
0x08c4…08e4               Head {h00=0x001c, h01=0x0050, text=»ECBRC EQU 8 RETURN CODE «, t00=0x0005, t01=0x00fc}
0x08e4…0906               Head {h00=0x001e, h01=0x0050, text=»ECBCW EQU 10 CONTROL WORD «, t00=0x0005, t01=0x011c}
0x0906…0910               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013e}
0x0910…091e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0148}
0x091e…095e               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0005, t01=0x0156}
0x095e…0968               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0008}
0x0968…0996               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x0012}
0x0996…09a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0040}
0x09a0…09aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x004a}
0x09aa…09d4               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 2000 RECEIVE BUFFER LENGTH«, t00=0x0006, t01=0x0054}
0x09d4…09ea               Head {h00=0x0012, h01=0x0050, text=»RBUFL EQU X:A «, t00=0x0006, t01=0x007e}
0x09ea…0a16               Head {h00=0x0028, h01=0x0050, text=»X:B EQU 1000 TRANSMIT BUFFER LENGTH «, t00=0x0006, t01=0x0094}
0x0a16…0a2c               Head {h00=0x0012, h01=0x0050, text=»TBUFL EQU X:B «, t00=0x0006, t01=0x00c0}
0x0a2c…0a50               Head {h00=0x0020, h01=0x0050, text=»X:C EQU /60 DCTASK FILE CODE«, t00=0x0006, t01=0x00d6}
0x0a50…0a66               Head {h00=0x0012, h01=0x0050, text=»DC15FC EQU /60«, t00=0x0006, t01=0x00fa}
0x0a66…0a8e               Head {h00=0x0024, h01=0x0050, text=»X:D EQU 1 IF 1 INTERRUPT LOGGING«, t00=0x0006, t01=0x0110}
0x0a8e…0aa2               Head {h00=0x0010, h01=0x0050, text=»LOGG EQU X:D«, t00=0x0006, t01=0x0138}
0x0aa2…0ac8               Head {h00=0x0022, h01=0x0050, text=»X:E EQU 600 POLL TIMEOUT VALUE«, t00=0x0006, t01=0x014c}
0x0ac8…0ade               Head {h00=0x0012, h01=0x0050, text=»TIMPOL EQU X:E«, t00=0x0006, t01=0x0172}
0x0ade…0b0c               Head {h00=0x002a, h01=0x0050, text=»X:F EQU 1 STATUS AND RVI HANDLING IF=1«, t00=0x0006, t01=0x0188}
0x0b0c…0b20               Head {h00=0x0010, h01=0x0050, text=»STAT EQU X:F«, t00=0x0007, t01=0x0026}
0x0b20…0b4c               Head {h00=0x0028, h01=0x0050, text=»X:G EQU 1 READ COMMAND HANDLING IF=1«, t00=0x0007, t01=0x003a}
0x0b4c…0b60               Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:G«, t00=0x0007, t01=0x0066}
0x0b60…0b8a               Head {h00=0x0026, h01=0x0050, text=»X:H EQU 254 TRANSMIT BLOCK LENGTH «, t00=0x0007, t01=0x007a}
0x0b8a…0ba0               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU X:H «, t00=0x0007, t01=0x00a4}
0x0ba0…0bcc               Head {h00=0x0028, h01=0x0050, text=»X:I EQU 1 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0007, t01=0x00ba}
0x0bcc…0be0               Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:I«, t00=0x0007, t01=0x00e6}
0x0be0…0c0e               Head {h00=0x002a, h01=0x0050, text=»X:J EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0007, t01=0x00fa}
0x0c0e…0c24               Head {h00=0x0012, h01=0x0050, text=»SPECP EQU X:J «, t00=0x0007, t01=0x0128}
0x0c24…0c54               Head {h00=0x002c, h01=0x0050, text=»X:K EQU 1 IF = 1  LINE SPEED SET TO HIGH«, t00=0x0007, t01=0x013e}
0x0c54…0c80               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0007, t01=0x016e}
0x0c80…0c96               Head {h00=0x0012, h01=0x0050, text=»SPEED EQU X:K «, t00=0x0008, t01=0x000a}
0x0c96…0cc4               Head {h00=0x002a, h01=0x0050, text=»X:L EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0008, t01=0x0020}
0x0cc4…0cd8               Head {h00=0x0010, h01=0x0050, text=»MSV1 EQU X:L«, t00=0x0008, t01=0x004e}
0x0cd8…0d0a               Head {h00=0x002e, h01=0x0050, text=»X:M EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0008, t01=0x0062}
0x0d0a…0d20               Head {h00=0x0012, h01=0x0050, text=»RBUFNR EQU X:M«, t00=0x0008, t01=0x0094}
0x0d20…0d52               Head {h00=0x002e, h01=0x0050, text=»X:N EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x0008, t01=0x00aa}
0x0d52…0d68               Head {h00=0x0012, h01=0x0050, text=»P6805 EQU X:N «, t00=0x0008, t01=0x00dc}
0x0d68…0d7c               Head {h00=0x0010, h01=0x0050, text=»X:O EQU /02 «, t00=0x0008, t01=0x00f2}
0x0d7c…0d90               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0008, t01=0x0106}
0x0d90…0dc0               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU X:O DEVICE ADDRESS OF RECEIVER«, t00=0x0008, t01=0x011a}
0x0dc0…0dcc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0008, t01=0x014a}
0x0dcc…0de0               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0008, t01=0x0156}
0x0de0…0e10               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0008, t01=0x016a}
0x0e10…0e1c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x000a}
0x0e1c…0e2e               Head {h00=0x000e, h01=0x0050, text=»X:P EQU 0 «, t00=0x0009, t01=0x0016}
0x0e2e…0e60               Head {h00=0x002e, h01=0x0050, text=»IBMCHR EQU X:P IF 1 IBM CHARACTER HANDLING«, t00=0x0009, t01=0x0028}
0x0e60…0e92               Head {h00=0x002e, h01=0x0050, text=»X:Q EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x0009, t01=0x005a}
0x0e92…0ea8               Head {h00=0x0012, h01=0x0050, text=»MESPAS EQU X:Q«, t00=0x0009, t01=0x008c}
0x0ea8…0ee0               Head {h00=0x0034, h01=0x0050, text=»X:R EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x0009, t01=0x00a2}
0x0ee0…0ef6               Head {h00=0x0012, h01=0x0050, text=»EM3270 EQU X:R«, t00=0x0009, t01=0x00da}
0x0ef6…0f24               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x0009, t01=0x00f0}
0x0f24…0f54               Head {h00=0x002c, h01=0x0050, text=»TSTREQ EQU 0 IF 1 TEST REQUEST HANDLING «, t00=0x0009, t01=0x011e}
0x0f54…0f84               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 1 SPECIAL CONDITION FOR DENMARK«, t00=0x0009, t01=0x014e}
0x0f84…0fbc               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x0009, t01=0x017e}
0x0fbc…0ff0               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000a, t01=0x0026}
0x0ff0…1024               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000a, t01=0x005a}
0x1024…1054               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000a, t01=0x008e}
0x1054…1070               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000a, t01=0x00be}
0x1070…10b0               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000a, t01=0x00da}
0x10b0…10c6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000a, t01=0x011a}
0x10c6…10da               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000a, t01=0x0130}
0x10da…111a               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000a, t01=0x0144}
0x111a…1130               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000a, t01=0x0184}
0x1130…113e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x000a}
0x113e…1148               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0018}
0x1148…1162               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000b, t01=0x0022}
0x1162…116c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003c}
0x116c…1176               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0046}
0x1176…1180               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0050}
0x1180…1192               Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000b, t01=0x005a}
0x1192…119c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x006c}
0x119c…11b0               Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000b, t01=0x0076}
0x11b0…11c4               Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x000b, t01=0x008a}
0x11c4…11dc               Head {h00=0x0014, h01=0x0050, text=»* /08: EXCHANGE «, t00=0x000b, t01=0x009e}
0x11dc…11fe               Head {h00=0x001e, h01=0x0050, text=»* /22: RELEASE READ BUFFER«, t00=0x000b, t01=0x00b6}
0x11fe…121e               Head {h00=0x001c, h01=0x0050, text=»* /31: GET WRITE BUFFER «, t00=0x000b, t01=0x00d8}
0x121e…1240               Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x000b, t01=0x00f8}
0x1240…125a               Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x000b, t01=0x011a}
0x125a…1264               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0134}
0x1264…126e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x013e}
0x126e…1290               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x000b, t01=0x0148}
0x1290…129a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x016a}
0x129a…12a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0174}
0x12a4…12ce               Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x000b, t01=0x017e}
0x12ce…12fc               Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x000c, t01=0x0018}
0x12fc…1320               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x000c, t01=0x0046}
0x1320…1348               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x000c, t01=0x006a}
0x1348…135c               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x000c, t01=0x0092}
0x135c…138a               Head {h00=0x002a, h01=0x0050, text=»DCGWQ DATA 0 GET BUFFER REQUEST QUEUE «, t00=0x000c, t01=0x00a6}
0x138a…1396               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x00d4}
0x1396…13c6               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x000c, t01=0x00e0}
0x13c6…13f6               Head {h00=0x002c, h01=0x0050, text=»DC15DC DATA DCACTD ADDRESS BLOCK DC TASK«, t00=0x000c, t01=0x0110}
0x13f6…141e               Head {h00=0x0024, h01=0x0050, text=»DC15AD DATA DCACT ADDRESS BLOCK «, t00=0x000c, t01=0x0140}
0x141e…144e               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x000c, t01=0x0168}
0x144e…1460               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x000d, t01=0x0008}
0x1460…1486               Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x000d, t01=0x001a}
0x1486…1498               Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x000d, t01=0x0040}
0x1498…14a0               Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0052}
0x14a0…14b4               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x000d, t01=0x005a}
0x14b4…14cc               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x000d, t01=0x006e}
0x14cc…14d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0086}
0x14d8…14ec               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x000d, t01=0x0092}
0x14ec…1500               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x000d, t01=0x00a6}
0x1500…150c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x00ba}
0x150c…151a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x00c6}
0x151a…1524               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00d4}
0x1524…152e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00de}
0x152e…1556               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x000d, t01=0x00e8}
0x1556…1560               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0110}
0x1560…1574               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x000d, t01=0x011a}
0x1574…1598               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x000d, t01=0x012e}
0x1598…15ac               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x000d, t01=0x0152}
0x15ac…15ce               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DCRD READ SPECIFIC «, t00=0x000d, t01=0x0166}
0x15ce…15e6               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x000d, t01=0x0188}
0x15e6…15fa               Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x000e, t01=0x0010}
0x15fa…1612               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/08-/06 «, t00=0x000e, t01=0x0024}
0x1612…162e               Head {h00=0x0018, h01=0x0050, text=» RF(Z) DCEX EXCHANGE«, t00=0x000e, t01=0x003c}
0x162e…1646               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/22-/08 «, t00=0x000e, t01=0x0058}
0x1646…166e               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCRR RELEASE READ BUFFER «, t00=0x000e, t01=0x0070}
0x166e…1686               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/22 «, t00=0x000e, t01=0x0098}
0x1686…16ae               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x000e, t01=0x00b0}
0x16ae…16c6               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x000e, t01=0x00d8}
0x16c6…16da               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x000e, t01=0x00f0}
0x16da…16f8               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCSS SET STATUS«, t00=0x000e, t01=0x0104}
0x16f8…1704               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0122}
0x1704…1718               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x000e, t01=0x012e}
0x1718…1730               Head {h00=0x0014, h01=0x0050, text=» ADK A7,/38-/31 «, t00=0x000e, t01=0x0142}
0x1730…1754               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DCGW GET WRITE BUFFER«, t00=0x000e, t01=0x015a}
0x1754…1760               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x017e}
0x1760…1772               Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x000e, t01=0x018a}
0x1772…1780               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x000c}
0x1780…178a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x001a}
0x178a…1794               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0024}
0x1794…17b4               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x000f, t01=0x002e}
0x17b4…17be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x004e}
0x17be…17c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0058}
0x17c8…17dc               Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x000f, t01=0x0062}
0x17dc…17f0               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x000f, t01=0x0076}
0x17f0…180a               Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x000f, t01=0x008a}
0x180a…1822               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/22-/02 «, t00=0x000f, t01=0x00a4}
0x1822…184a               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCRR RELEASE READ BUFFER «, t00=0x000f, t01=0x00bc}
0x184a…1862               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/22 «, t00=0x000f, t01=0x00e4}
0x1862…188a               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x000f, t01=0x00fc}
0x188a…18ac               Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x000f, t01=0x0124}
0x18ac…18ce               Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x000f, t01=0x0146}
0x18ce…18d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0168}
0x18d8…18e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0172}
0x18e2…18fc               Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x000f, t01=0x017c}
0x18fc…1906               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0008}
0x1906…1910               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0012}
0x1910…192e               Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0010, t01=0x001c}
0x192e…1946               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0010, t01=0x003a}
0x1946…1970               Head {h00=0x0026, h01=0x0050, text=»*   STATUS CHANGE ON DC EQUIPMENT «, t00=0x0010, t01=0x0052}
0x1970…1998               Head {h00=0x0024, h01=0x0050, text=»*   SPONTANOUS MESSAGE RECEPTION«, t00=0x0010, t01=0x007c}
0x1998…19a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a4}
0x19a2…19b6               Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0010, t01=0x00ae}
0x19b6…19e6               Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0010, t01=0x00c2}
0x19e6…19fa               Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0010, t01=0x00f2}
0x19fa…1a1e               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0010, t01=0x0106}
0x1a1e…1a2c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x012a}
0x1a2c…1a36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0138}
0x1a36…1a40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0142}
0x1a40…1a5e               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0010, t01=0x014c}
0x1a5e…1a68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x016a}
0x1a68…1a72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0174}
0x1a72…1ab4               Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0010, t01=0x017e}
0x1ab4…1af2               Head {h00=0x003a, h01=0x0050, text=»*         FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0011, t01=0x0030}
0x1af2…1afc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x006e}
0x1afc…1b06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0078}
0x1b06…1b1a               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0011, t01=0x0082}
0x1b1a…1b44               Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0011, t01=0x0096}
0x1b44…1b50               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x00c0}
0x1b50…1b64               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0011, t01=0x00cc}
0x1b64…1b8e               Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0011, t01=0x00e0}
0x1b8e…1ba2               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0011, t01=0x010a}
0x1ba2…1bb8               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x0011, t01=0x011e}
0x1bb8…1be4               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0011, t01=0x0134}
0x1be4…1bf6               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0011, t01=0x0160}
0x1bf6…1c0a               Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x0011, t01=0x0172}
0x1c0a…1c32               Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x0011, t01=0x0186}
0x1c32…1c46               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0012, t01=0x001e}
0x1c46…1c72               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x0012, t01=0x0032}
0x1c72…1c7e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x005e}
0x1c7e…1caa               Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x0012, t01=0x006a}
0x1caa…1cb2               Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x0096}
0x1cb2…1cc6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0012, t01=0x009e}
0x1cc6…1cf4               Head {h00=0x002a, h01=0x0050, text=» LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS «, t00=0x0012, t01=0x00b2}
0x1cf4…1d0c               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTBUF,A6«, t00=0x0012, t01=0x00e0}
0x1d0c…1d38               Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBRL,A8 CURSOR ADDRESS WORD «, t00=0x0012, t01=0x00f8}
0x1d38…1d50               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTCUR,A6«, t00=0x0012, t01=0x0124}
0x1d50…1d5c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x013c}
0x1d5c…1d82               Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x0012, t01=0x0148}
0x1d82…1db8               Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!!  SHOULD NOT BE IN DC:TAB «, t00=0x0012, t01=0x016e}
0x1db8…1de6               Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x0013, t01=0x0014}
0x1de6…1e14               Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x0013, t01=0x0042}
0x1e14…1e3e               Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x0013, t01=0x0070}
0x1e3e…1e4c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x009a}
0x1e4c…1e54               Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x00a8}
0x1e54…1e5c               Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x00b0}
0x1e5c…1e70               Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x0013, t01=0x00b8}
0x1e70…1e86               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=0 «, t00=0x0013, t01=0x00cc}
0x1e86…1eac               Head {h00=0x0022, h01=0x0050, text=» LDKL A5,STB2 LOAD STACK BASE «, t00=0x0013, t01=0x00e2}
0x1eac…1edc               Head {h00=0x002c, h01=0x0050, text=» CF A5,FINTER DWT ALREADY IN DC:TAB ??? «, t00=0x0013, t01=0x0108}
0x1edc…1eee               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0013, t01=0x0138}
0x1eee…1f0c               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) DCTP30 YES!!! «, t00=0x0013, t01=0x014a}
0x1f0c…1f18               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0168}
0x1f18…1f40               Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x0013, t01=0x0174}
0x1f40…1f52               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0014, t01=0x000c}
0x1f52…1f80               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x0014, t01=0x001e}
0x1f80…1f88               Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x004c}
0x1f88…1fb6               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x0014, t01=0x0054}
0x1fb6…1fca               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0014, t01=0x0082}
0x1fca…1fe6               Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x0014, t01=0x0096}
0x1fe6…1ffe               Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x0014, t01=0x00b2}
0x1ffe…202a               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x0014, t01=0x00ca}
0x202a…2036               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x00f6}
0x2036…204a               Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x0014, t01=0x0102}
0x204a…206e               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x0014, t01=0x0116}
0x206e…2082               Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0014, t01=0x013a}
0x2082…20aa               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0014, t01=0x014e}
0x20aa…20bc               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0014, t01=0x0176}
0x20bc…20ca               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0188}
0x20ca…20d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0008}
0x20d4…20de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0012}
0x20de…20ee               Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x0015, t01=0x001c}
0x20ee…20f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x002c}
0x20f8…2102               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0036}
0x2102…211a               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0015, t01=0x0040}
0x211a…213c               Head {h00=0x001e, h01=0x0050, text=»*   SUCCESFUL TRANSMISSION«, t00=0x0015, t01=0x0058}
0x213c…2150               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0015, t01=0x007a}
0x2150…215a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x008e}
0x215a…2164               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0098}
0x2164…2176               Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x0015, t01=0x00a2}
0x2176…2196               Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x0015, t01=0x00b4}
0x2196…21ba               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ  QUEUE REQUEST«, t00=0x0015, t01=0x00d4}
0x21ba…21cc               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0015, t01=0x00f8}
0x21cc…21d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x010a}
0x21d6…21e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0114}
0x21e0…21ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x011e}
0x21ea…21f8               Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x0015, t01=0x0128}
0x21f8…2202               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0136}
0x2202…220c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0140}
0x220c…2224               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0015, t01=0x014a}
0x2224…2240               Head {h00=0x0018, h01=0x0050, text=»*   MESSAGE RECEIVED«, t00=0x0015, t01=0x0162}
0x2240…2254               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0015, t01=0x017e}
0x2254…225e (22, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0004}
0x225e…2268               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x000e}
0x2268…227a               Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x0016, t01=0x0018}
0x227a…229a               Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x0016, t01=0x002a}
0x229a…22cc               Head {h00=0x002e, h01=0x0050, text=» LD A3,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x0016, t01=0x004a}
0x22cc…22f2               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x0016, t01=0x007c}
0x22f2…22fa               Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00a2}
0x22fa…2326               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A3 TAKE THE FIRST IN QUEUE «, t00=0x0016, t01=0x00aa}
0x2326…233e               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x0016, t01=0x00d6}
0x233e…2350               Head {h00=0x000e, h01=0x0050, text=» ADK A3,6 «, t00=0x0016, t01=0x00ee}
0x2350…2368               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBBA,A8 «, t00=0x0016, t01=0x0100}
0x2368…2392               Head {h00=0x0026, h01=0x0050, text=» LD A4,-4,A3 AND EFFECTIVE LENGTH «, t00=0x0016, t01=0x0118}
0x2392…23aa               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBEL,A8 «, t00=0x0016, t01=0x0142}
0x23aa…23bc               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0016, t01=0x015a}
0x23bc…23d2               Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x0016, t01=0x016c}
0x23d2…23e4               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0016, t01=0x0182}
0x23e4…23ec (23, 0, 400)  Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0004}
0x23ec…2414               Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x0017, t01=0x000c}
0x2414…2426               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0017, t01=0x0034}
0x2426…2434               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0046}
0x2434…243e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0054}
0x243e…2448               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x005e}
0x2448…2462               Head {h00=0x0016, h01=0x0050, text=»* GET WRITE BUFFER«, t00=0x0017, t01=0x0068}
0x2462…246c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0082}
0x246c…2476               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x008c}
0x2476…248a               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0017, t01=0x0096}
0x248a…24a2               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0017, t01=0x00aa}
0x24a2…24c2               Head {h00=0x001c, h01=0x0050, text=»*   BUFFER BEEN ALOCATED«, t00=0x0017, t01=0x00c2}
0x24c2…24d6               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0017, t01=0x00e2}
0x24d6…24e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00f6}
0x24e0…24ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0100}
0x24ea…24fc               Head {h00=0x000e, h01=0x0050, text=»DCGW EQU *«, t00=0x0017, t01=0x010a}
0x24fc…2526               Head {h00=0x0026, h01=0x0050, text=» CF A15,GTBUF GET TRANSMIT BUFFER «, t00=0x0017, t01=0x011c}
0x2526…2538               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0017, t01=0x0146}
0x2538…255c               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DCGW10 NO FREE BUFFER«, t00=0x0017, t01=0x0158}
0x255c…2574               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x0017, t01=0x017c}
0x2574…2590 (24, 0, 400)  Head {h00=0x0018, h01=0x0050, text=» LDKL A1,TBUFL+TBUFL«, t00=0x0018, t01=0x0004}
0x2590…25bc               Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBEL,A8 STORE BUFFER LENGTH «, t00=0x0018, t01=0x0020}
0x25bc…25ce               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0018, t01=0x004c}
0x25ce…25f0               Head {h00=0x001e, h01=0x0050, text=» RB ENDIO COMPLETE REQUEST«, t00=0x0018, t01=0x005e}
0x25f0…2604               Head {h00=0x0010, h01=0x0050, text=»DCGW10 EQU *«, t00=0x0018, t01=0x0080}
0x2604…2626               Head {h00=0x001e, h01=0x0050, text=» CF A15,TIMERE START TIMER«, t00=0x0018, t01=0x0094}
0x2626…264a               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSGWQ QUEUE REQUEST«, t00=0x0018, t01=0x00b6}
0x264a…265c               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0018, t01=0x00da}
0x265c…2668               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00ec}
0x2668…2676               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x00f8}
0x2676…2680               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0106}
0x2680…268a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0110}
0x268a…26a8               Head {h00=0x001a, h01=0x0050, text=»* RELEASE READ BUFFER «, t00=0x0018, t01=0x011a}
0x26a8…26b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0138}
0x26b2…26bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0142}
0x26bc…26d8               Head {h00=0x0018, h01=0x0050, text=»DCRR LD A4,ECBBA,A8 «, t00=0x0018, t01=0x014c}
0x26d8…26ea               Head {h00=0x000e, h01=0x0050, text=» SUK A4,6 «, t00=0x0018, t01=0x0168}
0x26ea…2700               Head {h00=0x0012, h01=0x0050, text=» CF A15,RRBUF «, t00=0x0018, t01=0x017a}
0x2700…2714               Head {h00=0x0010, h01=0x0050, text=»DCRR10 EQU *«, t00=0x0018, t01=0x0190}
0x2714…2726               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0019, t01=0x0014}
0x2726…2754               Head {h00=0x002a, h01=0x0050, text=» CF A15,TENDIO COMPLETE RRBUF REQUEST «, t00=0x0019, t01=0x0026}
0x2754…2766               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0019, t01=0x0054}
0x2766…2774               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0066}
0x2774…277e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0074}
0x277e…2788               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x007e}
0x2788…279a               Head {h00=0x000e, h01=0x0050, text=»* EXCHANGE«, t00=0x0019, t01=0x0088}
0x279a…27a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x009a}
0x27a4…27ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00a4}
0x27ae…27b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00ae}
0x27b8…27d0               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0019, t01=0x00b8}
0x27d0…27f6               Head {h00=0x0022, h01=0x0050, text=»*   MESSAGE PASSED TO TERMINAL«, t00=0x0019, t01=0x00d0}
0x27f6…280a               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0019, t01=0x00f6}
0x280a…2814               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x010a}
0x2814…2826               Head {h00=0x000e, h01=0x0050, text=»DCEX EQU *«, t00=0x0019, t01=0x0114}
0x2826…2854               Head {h00=0x002a, h01=0x0050, text=» RB DCWR SAME INITIALIZATION AS WRITE «, t00=0x0019, t01=0x0126}
0x2854…285e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0154}
0x285e…2868               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x015e}
0x2868…287c               Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x0019, t01=0x0168}
0x287c…2886               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x017c}
0x2886…2890               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0186}
0x2890…28a4               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0019, t01=0x0190}
0x28a4…28b6               Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x001a, t01=0x0014}
0x28b6…28e4               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x001a, t01=0x0026}
0x28e4…2900               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x001a, t01=0x0054}
0x2900…2920               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x001a, t01=0x0070}
0x2920…2934               Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x001a, t01=0x0090}
0x2934…294c               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x001a, t01=0x00a4}
0x294c…2970               Head {h00=0x0020, h01=0x0050, text=» RB DCRR10 COMPLETE REQUEST «, t00=0x001a, t01=0x00bc}
0x2970…2984               Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x001a, t01=0x00e0}
0x2984…299c               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x001a, t01=0x00f4}
0x299c…29ae               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x001a, t01=0x010c}
0x29ae…29da               Head {h00=0x0028, h01=0x0050, text=» RB(Z) DCSS10 WACK HAS NOT BEEN SENT«, t00=0x001a, t01=0x011e}
0x29da…29ee               Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x001a, t01=0x014a}
0x29ee…2a1e               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x001a, t01=0x015e}
0x2a1e…2a36               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x001a, t01=0x018e}
0x2a36…2a48               Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x001b, t01=0x0016}
0x2a48…2a54               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0028}
0x2a54…2a62               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0034}
0x2a62…2a6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0042}
0x2a6c…2a76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x004c}
0x2a76…2a80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0056}
0x2a80…2a9e               Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x001b, t01=0x0060}
0x2a9e…2aa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x007e}
0x2aa8…2ab2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0088}
0x2ab2…2abc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0092}
0x2abc…2ad8               Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x001b, t01=0x009c}
0x2ad8…2ae2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00b8}
0x2ae2…2af6               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x001b, t01=0x00c2}
0x2af6…2b08               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x001b, t01=0x00d6}
0x2b08…2b32               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBCW,A8 GET TIMEOUT VALUE «, t00=0x001b, t01=0x00e8}
0x2b32…2b52               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x001b, t01=0x0112}
0x2b52…2b68               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x001b, t01=0x0132}
0x2b68…2b7e               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x001b, t01=0x0148}
0x2b7e…2b92               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x001b, t01=0x015e}
0x2b92…2ba8               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x001b, t01=0x0172}
0x2ba8…2bd4               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x001b, t01=0x0188}
0x2bd4…2be8               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x001c, t01=0x0024}
0x2be8…2c02               Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x001c, t01=0x0038}
0x2c02…2c0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0052}
0x2c0c…2c28               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x001c, t01=0x005c}
0x2c28…2c32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0078}
0x2c32…2c46               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x001c, t01=0x0082}
0x2c46…2c62               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x001c, t01=0x0096}
0x2c62…2c76               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x001c, t01=0x00b2}
0x2c76…2c8a               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x001c, t01=0x00c6}
0x2c8a…2cb2               Head {h00=0x0024, h01=0x0050, text=» CF A15,REMOVG REMOVE FROM QUEUE«, t00=0x001c, t01=0x00da}
0x2cb2…2cbe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0102}
0x2cbe…2cd2               Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x001c, t01=0x010e}
0x2cd2…2cf8               Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x001c, t01=0x0122}
0x2cf8…2d28               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTOR,A6 CHECK IF EXCHANGE ORDER «, t00=0x001c, t01=0x0148}
0x2d28…2d3a               Head {h00=0x000e, h01=0x0050, text=» SUK A2,8 «, t00=0x001c, t01=0x0178}
0x2d3a…2d5e               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TOUTR2 NOT EXCHANGE «, t00=0x001c, t01=0x018a}
0x2d5e…2d94               Head {h00=0x0032, h01=0x0050, text=» ORK A1,2 RETURN CODE /42 AT EXCHANGE TIME OUT«, t00=0x001d, t01=0x001e}
0x2d94…2dbc               Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x001d, t01=0x0054}
0x2dbc…2dc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x007c}
0x2dc6…2de2               Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x001d, t01=0x0086}
0x2de2…2dec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00a2}
0x2dec…2e04               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x001d, t01=0x00ac}
0x2e04…2e2e               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBCW,A8 GET TIMEOUT VALUE «, t00=0x001d, t01=0x00c4}
0x2e2e…2e4e               Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x001d, t01=0x00ee}
0x2e4e…2e62               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x001d, t01=0x010e}
0x2e62…2e78               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x001d, t01=0x0122}
0x2e78…2e8c               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x001d, t01=0x0138}
0x2e8c…2ea0               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x001d, t01=0x014c}
0x2ea0…2eb8               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x001d, t01=0x0160}
0x2eb8…2eca               Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x001d, t01=0x0178}
0x2eca…2ed8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x018a}
0x2ed8…2ee2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0008}
0x2ee2…2f00               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x001e, t01=0x0012}
0x2f00…2f0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0030}
0x2f0a…2f1e               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x001e, t01=0x003a}
0x2f1e…2f3a               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x001e, t01=0x004e}
0x2f3a…2f4e               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x001e, t01=0x006a}
0x2f4e…2f70               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x001e, t01=0x007e}
0x2f70…2f82               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x001e, t01=0x00a0}
0x2f82…2f9e               Head {h00=0x0018, h01=0x0050, text=» RF(Z) TOUT10 WRITE «, t00=0x001e, t01=0x00b2}
0x2f9e…2fb0               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x001e, t01=0x00ce}
0x2fb0…2fdc               Head {h00=0x0028, h01=0x0050, text=» RB(NZ) TOUTR1 ORDER IS NOT EXCHANGE«, t00=0x001e, t01=0x00e0}
0x2fdc…2ffa               Head {h00=0x001a, h01=0x0050, text=»TOUT10 LD A2,DWTECB,A6«, t00=0x001e, t01=0x010c}
0x2ffa…301e               Head {h00=0x0020, h01=0x0050, text=» LD A4,ECBBA,A2 FETCH BUFFER«, t00=0x001e, t01=0x012a}
0x301e…3032               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x001e, t01=0x014e}
0x3032…305e               Head {h00=0x0028, h01=0x0050, text=» CF A15,RTBUF RELEASE TRANSMITBUFFER«, t00=0x001e, t01=0x0162}
0x305e…308a               Head {h00=0x0028, h01=0x0050, text=» CF A15,CKGBQ CHECK GET BUFFER QUEUE«, t00=0x001e, t01=0x018e}
0x308a…3096               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x002a}
0x3096…30c4               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x001f, t01=0x0036}
0x30c4…30ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0064}
0x30ce…30f8               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x001f, t01=0x006e}
0x30f8…311c               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x001f, t01=0x0098}
0x311c…3148               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x001f, t01=0x00bc}
0x3148…315e               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x001f, t01=0x00e8}
0x315e…3170               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x001f, t01=0x00fe}
0x3170…319c               Head {h00=0x0028, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT NOT WRITING «, t00=0x001f, t01=0x0110}
0x319c…31ae               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x001f, t01=0x013c}
0x31ae…31b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x014e}
0x31b8…31c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0158}
0x31c2…31d4               Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x001f, t01=0x0162}
0x31d4…31e2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0174}
0x31e2…31ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0182}
0x31ec…31f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x018c}
0x31f6…3214               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0020, t01=0x0008}
0x3214…321e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0026}
0x321e…3248               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0020, t01=0x0030}
0x3248…3252               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x005a}
0x3252…325c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0064}
0x325c…3270               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0020, t01=0x006e}
0x3270…329a               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0020, t01=0x0082}
0x329a…32bc               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0020, t01=0x00ac}
0x32bc…32d0               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0020, t01=0x00ce}
0x32d0…32f6               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0020, t01=0x00e2}
0x32f6…3316               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0020, t01=0x0108}
0x3316…332a               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0020, t01=0x0128}
0x332a…333e               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0020, t01=0x013c}
0x333e…3350               Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0020, t01=0x0150}
0x3350…335e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x0162}
0x335e…3368               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0170}
0x3368…3384               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0020, t01=0x017a}
0x3384…338e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0008}
0x338e…33b6               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0021, t01=0x0012}
0x33b6…33da               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0021, t01=0x003a}
0x33da…3404               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0021, t01=0x005e}
0x3404…3426               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0021, t01=0x0088}
0x3426…3430               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00aa}
0x3430…343a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00b4}
0x343a…3466               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0021, t01=0x00be}
0x3466…3476               Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x0021, t01=0x00ea}
0x3476…348a               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x0021, t01=0x00fa}
0x348a…34ae               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x0021, t01=0x010e}
0x34ae…34e0               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x0021, t01=0x0132}
0x34e0…34f2               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0021, t01=0x0164}
0x34f2…3520               Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0021, t01=0x0176}
0x3520…3542               Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x0022, t01=0x0014}
0x3542…354c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0036}
0x354c…3556               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0040}
0x3556…3574               Head {h00=0x001a, h01=0x0050, text=»* GET TRANSMIT BUFFER «, t00=0x0022, t01=0x004a}
0x3574…357e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0068}
0x357e…3592               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0022, t01=0x0072}
0x3592…35ba               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GTBUF«, t00=0x0022, t01=0x0086}
0x35ba…35de               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0022, t01=0x00ae}
0x35de…3608               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0022, t01=0x00d2}
0x3608…362a               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0022, t01=0x00fc}
0x362a…3634               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x011e}
0x3634…363e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0128}
0x363e…366c               Head {h00=0x002a, h01=0x0050, text=»GTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS «, t00=0x0022, t01=0x0132}
0x366c…367c               Head {h00=0x000c, h01=0x0050, text=» RB GBUF«, t00=0x0022, t01=0x0160}
0x367c…368a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x0170}
0x368a…3694               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x017e}
0x3694…369e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0188}
0x369e…36be (35, 0, 400)  Head {h00=0x001c, h01=0x0050, text=»* CHECK GET BUFFER QUEUE«, t00=0x0023, t01=0x0004}
0x36be…36c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0024}
0x36c8…36d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x002e}
0x36d2…36e6               Head {h00=0x0010, h01=0x0050, text=»CKGBQ EQU * «, t00=0x0023, t01=0x0038}
0x36e6…3700               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x0023, t01=0x004c}
0x3700…3726               Head {h00=0x0022, h01=0x0050, text=» LD A6,DCGWQ GET QUEUE ANCHOR «, t00=0x0023, t01=0x0066}
0x3726…374c               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKG110 NO ONE ON QUEUE «, t00=0x0023, t01=0x008c}
0x374c…3762               Head {h00=0x0012, h01=0x0050, text=» SUK A6,DWTWQ «, t00=0x0023, t01=0x00b2}
0x3762…377a               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0023, t01=0x00c8}
0x377a…379a               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKG100 NO REQUEST«, t00=0x0023, t01=0x00e0}
0x379a…37b2               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTOR,A6 «, t00=0x0023, t01=0x0100}
0x37b2…37c6               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/31 «, t00=0x0023, t01=0x0118}
0x37c6…37f2               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CKG100 NO GET BUFFER REQUEST«, t00=0x0023, t01=0x012c}
0x37f2…381c               Head {h00=0x0026, h01=0x0050, text=» CF A15,GTBUF GET TRANSMIT BUFFER «, t00=0x0023, t01=0x0158}
0x381c…382e               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0023, t01=0x0182}
0x382e…3852 (36, 0, 400)  Head {h00=0x0020, h01=0x0050, text=» RF(Z) CKG110 NO BUFFER FREE«, t00=0x0024, t01=0x0004}
0x3852…386a               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTECB,A6«, t00=0x0024, t01=0x0028}
0x386a…3896               Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBBA,A3 STORE BUFFER ADDRESS«, t00=0x0024, t01=0x0040}
0x3896…38b2               Head {h00=0x0018, h01=0x0050, text=» LDKL A1,TBUFL+TBUFL«, t00=0x0024, t01=0x006c}
0x38b2…38de               Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBEL,A3 STORE BUFFER LENGTH «, t00=0x0024, t01=0x0088}
0x38de…3908               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x0024, t01=0x00b4}
0x3908…3934               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A3 STORE REMAINING TIME«, t00=0x0024, t01=0x00de}
0x3934…3946               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0024, t01=0x010a}
0x3946…396e               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0024, t01=0x011c}
0x396e…3982               Head {h00=0x0010, h01=0x0050, text=»CKG100 EQU *«, t00=0x0024, t01=0x0144}
0x3982…39aa               Head {h00=0x0024, h01=0x0050, text=» CF A15,REMOVG REMOVE FROM QUEUE«, t00=0x0024, t01=0x0158}
0x39aa…39ce               Head {h00=0x0020, h01=0x0050, text=»CKG110 LDR A6,A7 RESTORE A6 «, t00=0x0024, t01=0x0180}
0x39ce…39e8               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0025, t01=0x0014}
0x39e8…39f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x002e}
0x39f4…3a02               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x003a}
0x3a02…3a0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0048}
0x3a0c…3a16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0052}
0x3a16…3a36               Head {h00=0x001c, h01=0x0050, text=»* RELEASE RECEIVE BUFFER«, t00=0x0025, t01=0x005c}
0x3a36…3a40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x007c}
0x3a40…3a64               Head {h00=0x0020, h01=0x0050, text=»* A4 CONTAINS BUFFER ADDRESS«, t00=0x0025, t01=0x0086}
0x3a64…3a8c               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,RRBUF«, t00=0x0025, t01=0x00aa}
0x3a8c…3aae               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0025, t01=0x00d2}
0x3aae…3ab8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00f4}
0x3ab8…3ac2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00fe}
0x3ac2…3aee               Head {h00=0x0028, h01=0x0050, text=»RRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0025, t01=0x0108}
0x3aee…3afe               Head {h00=0x000c, h01=0x0050, text=»RBUF INH«, t00=0x0025, t01=0x0134}
0x3afe…3b12               Head {h00=0x0010, h01=0x0050, text=»RBUF10 EQU *«, t00=0x0025, t01=0x0144}
0x3b12…3b26               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x0025, t01=0x0158}
0x3b26…3b3c               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RBUF20 «, t00=0x0025, t01=0x016c}
0x3b3c…3b4e               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0025, t01=0x0182}
0x3b4e…3b60 (38, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» RB RBUF10«, t00=0x0026, t01=0x0004}
0x3b60…3b74               Head {h00=0x0010, h01=0x0050, text=»RBUF20 EQU *«, t00=0x0026, t01=0x0016}
0x3b74…3b86               Head {h00=0x000e, h01=0x0050, text=» STR A4,A2«, t00=0x0026, t01=0x002a}
0x3b86…3b96               Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x0026, t01=0x003c}
0x3b96…3bba               Head {h00=0x0020, h01=0x0050, text=» RB GBUF10 RETURN TO CALLER «, t00=0x0026, t01=0x004c}
0x3bba…3bc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0070}
0x3bc4…3bce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x007a}
0x3bce…3bf0               Head {h00=0x001e, h01=0x0050, text=»* RELEASE TRANSMIT BUFFER «, t00=0x0026, t01=0x0084}
0x3bf0…3bfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00a6}
0x3bfa…3c0e               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0026, t01=0x00b0}
0x3c0e…3c32               Head {h00=0x0020, h01=0x0050, text=»* A4 CONTAINS BUFFER ADDRESS«, t00=0x0026, t01=0x00c4}
0x3c32…3c5a               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,RTBUF«, t00=0x0026, t01=0x00e8}
0x3c5a…3c7c               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0026, t01=0x0110}
0x3c7c…3c86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0132}
0x3c86…3c90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x013c}
0x3c90…3cbe               Head {h00=0x002a, h01=0x0050, text=»RTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS «, t00=0x0026, t01=0x0146}
0x3cbe…3cd4               Head {h00=0x0012, h01=0x0050, text=» CWK A4,TBUF1 «, t00=0x0026, t01=0x0174}
0x3cd4…3cf6               Head {h00=0x001e, h01=0x0050, text=» RB(E) RBUF DRIVER BUFFER «, t00=0x0026, t01=0x018a}
0x3cf6…3d0c               Head {h00=0x0012, h01=0x0050, text=» CWK A4,TBUF2 «, t00=0x0027, t01=0x001c}
0x3d0c…3d2e               Head {h00=0x001e, h01=0x0050, text=» RB(E) RBUF DRIVER BUFFER «, t00=0x0027, t01=0x0032}
0x3d2e…3d54               Head {h00=0x0022, h01=0x0050, text=» RB GBUF10 APPLICATION BUFFER «, t00=0x0027, t01=0x0054}
0x3d54…3d60               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x007a}
0x3d60…3d6e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0086}
0x3d6e…3d78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0094}
0x3d78…3d82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x009e}
0x3d82…3dae               Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x0027, t01=0x00a8}
0x3dae…3db8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00d4}
0x3db8…3dd4               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0027, t01=0x00de}
0x3dd4…3de4               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0027, t01=0x00fa}
0x3de4…3dee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x010a}
0x3dee…3e1a               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0027, t01=0x0114}
0x3e1a…3e36               Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x0027, t01=0x0140}
0x3e36…3e50               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0027, t01=0x015c}
0x3e50…3e78               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0027, t01=0x0176}
0x3e78…3e8a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0028, t01=0x000e}
0x3e8a…3e9c               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0028, t01=0x0020}
0x3e9c…3eb4               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0028, t01=0x0032}
0x3eb4…3ed6               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0028, t01=0x004a}
0x3ed6…3efc               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0028, t01=0x006c}
0x3efc…3f16               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0028, t01=0x0092}
0x3f16…3f20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00ac}
0x3f20…3f2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00b6}
0x3f2a…3f58               Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x0028, t01=0x00c0}
0x3f58…3f62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00ee}
0x3f62…3f7e               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0028, t01=0x00f8}
0x3f7e…3f8e               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0028, t01=0x0114}
0x3f8e…3f98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0124}
0x3f98…3fc6               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x0028, t01=0x012e}
0x3fc6…3ffc               Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x0028, t01=0x015c}
0x3ffc…4010 (41, 0, 400)  Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x0029, t01=0x0004}
0x4010…4024               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x0029, t01=0x0018}
0x4024…403c               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x0029, t01=0x002c}
0x403c…4066               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x0029, t01=0x0044}
0x4066…4078               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x0029, t01=0x006e}
0x4078…408c               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x0029, t01=0x0080}
0x408c…40a8               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x0029, t01=0x0094}
0x40a8…40ba               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x0029, t01=0x00b0}
0x40ba…40da               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x0029, t01=0x00c2}
0x40da…40ec               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0029, t01=0x00e2}
0x40ec…4106               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0029, t01=0x00f4}
0x4106…4114               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x010e}
0x4114…411e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x011c}
0x411e…4128               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0126}
0x4128…4132               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0130}
0x4132…4160               Head {h00=0x002a, h01=0x0050, text=»* INSERT DWT IN GET WRITE BUFFER QUEUE«, t00=0x0029, t01=0x013a}
0x4160…416a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0168}
0x416a…417e               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0029, t01=0x0172}
0x417e…419a               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0029, t01=0x0186}
0x419a…41aa               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002a, t01=0x0012}
0x41aa…41b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0022}
0x41b4…41e2               Head {h00=0x002a, h01=0x0050, text=»INSGWQ LDKL A2,DCGWQ GET QUEUE ANCHOR «, t00=0x002a, t01=0x002c}
0x41e2…41f4               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ1«, t00=0x002a, t01=0x005a}
0x41f4…41fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x006c}
0x41fe…4208               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0076}
0x4208…4238               Head {h00=0x002c, h01=0x0050, text=»* REMOVE DWT FROM GET WRITE BUFFER QUEUE«, t00=0x002a, t01=0x0080}
0x4238…4242               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00b0}
0x4242…425e               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002a, t01=0x00ba}
0x425e…426e               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002a, t01=0x00d6}
0x426e…4278               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00e6}
0x4278…42a6               Head {h00=0x002a, h01=0x0050, text=»REMOVG LDKL A2,DCGWQ GET QUEUE ANCHOR «, t00=0x002a, t01=0x00f0}
0x42a6…42b8               Head {h00=0x000e, h01=0x0050, text=» RB REM05 «, t00=0x002a, t01=0x011e}
0x42b8…42c4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0130}
0x42c4…42d2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x013c}
0x42d2…42dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x014a}
0x42dc…42e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0154}
0x42e6…430a               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x002a, t01=0x015e}
0x430a…4314               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0182}
0x4314…4328               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x002a, t01=0x018c}
0x4328…4344               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x0010}
0x4344…4354               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x002c}
0x4354…435e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x003c}
0x435e…438a               Head {h00=0x0028, h01=0x0050, text=»INSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR«, t00=0x002b, t01=0x0046}
0x438a…43a0               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002b, t01=0x0072}
0x43a0…43b2               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002b, t01=0x0088}
0x43b2…43bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x009a}
0x43bc…43c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00a4}
0x43c6…43ec               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x002b, t01=0x00ae}
0x43ec…43f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00d4}
0x43f6…4412               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x00de}
0x4412…4422               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x00fa}
0x4422…442c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x010a}
0x442c…445a               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002b, t01=0x0114}
0x445a…4470               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002b, t01=0x0142}
0x4470…4482               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x002b, t01=0x0158}
0x4482…448e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x016a}
0x448e…449c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0176}
0x449c…44a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0184}
0x44a6…44b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x018e}
0x44b0…44d8               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x002c, t01=0x0008}
0x44d8…44e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0030}
0x44e2…44fa               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x002c, t01=0x003a}
0x44fa…4514               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002c, t01=0x0052}
0x4514…451e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x006c}
0x451e…4532               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002c, t01=0x0076}
0x4532…4548               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002c, t01=0x008a}
0x4548…4574               Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002c, t01=0x00a0}
0x4574…4580               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x00cc}
0x4580…4596               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002c, t01=0x00d8}
0x4596…45be               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002c, t01=0x00ee}
0x45be…45ca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0116}
0x45ca…45fa               Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002c, t01=0x0122}
0x45fa…460e               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002c, t01=0x0152}
0x460e…4622               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002c, t01=0x0166}
0x4622…464a               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002c, t01=0x017a}
0x464a…465c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002d, t01=0x0012}
0x465c…466e               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002d, t01=0x0024}
0x466e…4698               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002d, t01=0x0036}
0x4698…46be               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002d, t01=0x0060}
0x46be…46ce               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002d, t01=0x0086}
0x46ce…46dc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0096}
0x46dc…46e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00a4}
0x46e6…46f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00ae}
0x46f0…4726               Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x002d, t01=0x00b8}
0x4726…4730               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00ee}
0x4730…4768               Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x002d, t01=0x00f8}
0x4768…4772               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0130}
0x4772…4790               Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x002d, t01=0x013a}
0x4790…47a8               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x002d, t01=0x0158}
0x47a8…47c8               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x002d, t01=0x0170}
0x47c8…47e8               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x002d, t01=0x0190}
0x47e8…4800               Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x002e, t01=0x0020}
0x4800…481a               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x002e, t01=0x0038}
0x481a…4842               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x002e, t01=0x0052}
0x4842…4870               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x002e, t01=0x007a}
0x4870…4896               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x002e, t01=0x00a8}
0x4896…48c6               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x002e, t01=0x00ce}
0x48c6…48f8               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x002e, t01=0x00fe}
0x48f8…491e               Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x002e, t01=0x0130}
0x491e…494c               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBBA,A8 SAVE THIS ADDR IN ECB «, t00=0x002e, t01=0x0156}
0x494c…4960               Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x002e, t01=0x0184}
0x4960…4994               Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x002f, t01=0x0008}
0x4994…49a8               Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x002f, t01=0x003c}
0x49a8…49da               Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x002f, t01=0x0050}
0x49da…49f8               Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 PARAMETER=OK«, t00=0x002f, t01=0x0082}
0x49f8…4a32               Head {h00=0x0036, h01=0x0050, text=»CKM100 CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x002f, t01=0x00a0}
0x4a32…4a60               Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x002f, t01=0x00da}
0x4a60…4a78               Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x002f, t01=0x0108}
0x4a78…4ab4               Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x002f, t01=0x0120}
0x4ab4…4ae4               Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x002f, t01=0x015c}
0x4ae4…4afa               Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x002f, t01=0x018c}
0x4afa…4b10               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x0030, t01=0x0012}
0x4b10…4b3a               Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x0030, t01=0x0028}
0x4b3a…4b68               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x0030, t01=0x0052}
0x4b68…4b7a               Head {h00=0x000e, h01=0x0050, text=» RB CKM100«, t00=0x0030, t01=0x0080}
0x4b7a…4b88               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0092}
0x4b88…4b92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00a0}
0x4b92…4b9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00aa}
0x4b9c…4bba               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0030, t01=0x00b4}
0x4bba…4be2               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0030, t01=0x00d2}
0x4be2…4bec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00fa}
0x4bec…4bfe               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0030, t01=0x0104}
0x4bfe…4c26               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0030, t01=0x0116}
0x4c26…4c30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x013e}
0x4c30…4c3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0148}
0x4c3a…4c52               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0030, t01=0x0152}
0x4c52…4c66               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0030, t01=0x016a}
0x4c66…4c7a               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0030, t01=0x017e}
0x4c7a…4c8e (49, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0031, t01=0x0004}
0x4c8e…4ca2               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0031, t01=0x0018}
0x4ca2…4cb6               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0031, t01=0x002c}
0x4cb6…4cd0               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0031, t01=0x0040}
0x4cd0…4cde               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x005a}
0x4cde…4cf6               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0031, t01=0x0068}
0x4cf6…4d0a               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0031, t01=0x0080}
0x4d0a…4d1c               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0031, t01=0x0094}
0x4d1c…4d30               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0031, t01=0x00a6}
0x4d30…4d42               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0031, t01=0x00ba}
0x4d42…4d56               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0031, t01=0x00cc}
0x4d56…4d68               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0031, t01=0x00e0}
0x4d68…4d7c               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0031, t01=0x00f2}
0x4d7c…4d8e               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0031, t01=0x0106}
0x4d8e…4da2               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0031, t01=0x0118}
0x4da2…4db4               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0031, t01=0x012c}
0x4db4…4dc8               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0031, t01=0x013e}
0x4dc8…4ddc               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0031, t01=0x0152}
0x4ddc…4df0               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0031, t01=0x0166}
0x4df0…4e02               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0031, t01=0x017a}
0x4e02…4e10               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x018c}
0x4e10…4e1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x000a}
0x4e1a…4e24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0014}
0x4e24…4e3a               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0032, t01=0x001e}
0x4e3a…4e44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0034}
0x4e44…4e4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x003e}
0x4e4e…4e7a               Head {h00=0x0028, h01=0x0050, text=»TIMPRO EQU 30 PROCEDURE TIMER 3 SEC «, t00=0x0032, t01=0x0048}
0x4e7a…4e84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0074}
0x4e84…4e8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x007e}
0x4e8e…4eaa               Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0032, t01=0x0088}
0x4eaa…4eb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00a4}
0x4eb4…4ede               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0032, t01=0x00ae}
0x4ede…4ef2               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0032, t01=0x00d8}
0x4ef2…4f06               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0032, t01=0x00ec}
0x4f06…4f1a               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0032, t01=0x0100}
0x4f1a…4f2e               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0032, t01=0x0114}
0x4f2e…4f42               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0032, t01=0x0128}
0x4f42…4f56               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0032, t01=0x013c}
0x4f56…4f6a               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0032, t01=0x0150}
0x4f6a…4f7e               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0032, t01=0x0164}
0x4f7e…4f92               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0032, t01=0x0178}
0x4f92…4fa6               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0032, t01=0x018c}
0x4fa6…4fba               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0033, t01=0x0010}
0x4fba…4fce               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0033, t01=0x0024}
0x4fce…4fe0               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0033, t01=0x0038}
0x4fe0…4ff6               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0033, t01=0x004a}
0x4ff6…500c               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0033, t01=0x0060}
0x500c…5020               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0033, t01=0x0076}
0x5020…5034               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0033, t01=0x008a}
0x5034…5048               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0033, t01=0x009e}
0x5048…505c               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0033, t01=0x00b2}
0x505c…5070               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0033, t01=0x00c6}
0x5070…5084               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0033, t01=0x00da}
0x5084…5098               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0033, t01=0x00ee}
0x5098…50ac               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0033, t01=0x0102}
0x50ac…50b8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0116}
0x50b8…50cc               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0033, t01=0x0122}
0x50cc…50e0               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0033, t01=0x0136}
0x50e0…5114               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0033, t01=0x014a}
0x5114…5120               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x017e}
0x5120…5134               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0033, t01=0x018a}
0x5134…5148               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0034, t01=0x000e}
0x5148…515c               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0034, t01=0x0022}
0x515c…5170               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /40 «, t00=0x0034, t01=0x0036}
0x5170…5184               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0034, t01=0x004a}
0x5184…5198               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0034, t01=0x005e}
0x5198…51ae               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0034, t01=0x0072}
0x51ae…51ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0088}
0x51ba…51c8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x0094}
0x51c8…51d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00a2}
0x51d2…51dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00ac}
0x51dc…51fa               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0034, t01=0x00b6}
0x51fa…5204               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00d4}
0x5204…520e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00de}
0x520e…523c               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0034, t01=0x00e8}
0x523c…526e               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0034, t01=0x0116}
0x526e…528e               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x0034, t01=0x0148}
0x528e…52aa               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x0034, t01=0x0168}
0x52aa…52c6               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x0034, t01=0x0184}
0x52c6…52fc               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x0035, t01=0x0010}
0x52fc…5322               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x0035, t01=0x0046}
0x5322…5342               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x0035, t01=0x006c}
0x5342…5370               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x0035, t01=0x008c}
0x5370…537a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00ba}
0x537a…5398               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x0035, t01=0x00c4}
0x5398…53c4               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x0035, t01=0x00e2}
0x53c4…53ee               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x0035, t01=0x010e}
0x53ee…540e               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x0035, t01=0x0138}
0x540e…5442               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x0035, t01=0x0158}
0x5442…546a               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x0035, t01=0x018c}
0x546a…549c               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x0036, t01=0x0024}
0x549c…54cc               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x0036, t01=0x0056}
0x54cc…54d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0086}
0x54d6…54e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0090}
0x54e0…5508               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x0036, t01=0x009a}
0x5508…5512               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00c2}
0x5512…551c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00cc}
0x551c…5530               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0036, t01=0x00d6}
0x5530…5562               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x0036, t01=0x00ea}
0x5562…556c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x011c}
0x556c…5576               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0126}
0x5576…558a               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x0036, t01=0x0130}
0x558a…559e               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x0036, t01=0x0144}
0x559e…55a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0158}
0x55a8…55de               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x0036, t01=0x0162}
0x55de…560e               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x0037, t01=0x0008}
0x560e…561a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0038}
0x561a…5628               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0044}
0x5628…5632               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0052}
0x5632…563c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x005c}
0x563c…5658               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x0037, t01=0x0066}
0x5658…5662               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0082}
0x5662…5688               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x0037, t01=0x008c}
0x5688…56b2               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x0037, t01=0x00b2}
0x56b2…56bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00dc}
0x56bc…56c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00e6}
0x56c6…56e2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0037, t01=0x00f0}
0x56e2…5712               Head {h00=0x002c, h01=0x0050, text=»BRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ«, t00=0x0037, t01=0x010c}
0x5712…5728               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0037, t01=0x013c}
0x5728…573a               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x0037, t01=0x0152}
0x573a…575e               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x0037, t01=0x0164}
0x575e…577a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0037, t01=0x0188}
0x577a…57b0               Head {h00=0x0032, h01=0x0050, text=» CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS «, t00=0x0038, t01=0x0014}
0x57b0…57c6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0038, t01=0x004a}
0x57c6…57e2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0038, t01=0x0060}
0x57e2…5816               Head {h00=0x0030, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ«, t00=0x0038, t01=0x007c}
0x5816…582c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0038, t01=0x00b0}
0x582c…5840               Head {h00=0x0010, h01=0x0050, text=»BRM010 EQU *«, t00=0x0038, t01=0x00c6}
0x5840…5862               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0038, t01=0x00da}
0x5862…5896               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN«, t00=0x0038, t01=0x00fc}
0x5896…58ac               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0038, t01=0x0130}
0x58ac…58c8               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0038, t01=0x0146}
0x58c8…58dc               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0038, t01=0x0162}
0x58dc…5914               Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN «, t00=0x0038, t01=0x0176}
0x5914…592a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x001e}
0x592a…5946               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0039, t01=0x0034}
0x5946…596c               Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x0039, t01=0x0050}
0x596c…5982               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x0076}
0x5982…599e               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0039, t01=0x008c}
0x599e…59ba               Head {h00=0x0018, h01=0x0050, text=» IFF CODE=1  SALCUZ «, t00=0x0039, t01=0x00a8}
0x59ba…59d6               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x0039, t01=0x00c4}
0x59d6…5a04               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x0039, t01=0x00e0}
0x5a04…5a20               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x0039, t01=0x010e}
0x5a20…5a56               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0039, t01=0x012a}
0x5a56…5a74               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x0039, t01=0x0160}
0x5a74…5a8a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x017e}
0x5a8a…5aac (58, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=2  SALCUZ «, t00=0x003a, t01=0x0004}
0x5aac…5ac6               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x003a, t01=0x0026}
0x5ac6…5af4               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003a, t01=0x0040}
0x5af4…5b12               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x003a, t01=0x006e}
0x5b12…5b48               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003a, t01=0x008c}
0x5b48…5b66               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003a, t01=0x00c2}
0x5b66…5b7c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003a, t01=0x00e0}
0x5b7c…5b90               Head {h00=0x0010, h01=0x0050, text=»BRM100 EQU *«, t00=0x003a, t01=0x00f6}
0x5b90…5bb8               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003a, t01=0x010a}
0x5bb8…5bdc               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003a, t01=0x0132}
0x5bdc…5bee               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003a, t01=0x0156}
0x5bee…5c02               Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x003a, t01=0x0168}
0x5c02…5c24               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x003a, t01=0x017c}
0x5c24…5c3c               Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x003b, t01=0x000e}
0x5c3c…5c5e               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x003b, t01=0x0026}
0x5c5e…5c76               Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x003b, t01=0x0048}
0x5c76…5c9a               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x003b, t01=0x0060}
0x5c9a…5cb2               Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x003b, t01=0x0084}
0x5cb2…5cd6               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x003b, t01=0x009c}
0x5cd6…5cee               Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x003b, t01=0x00c0}
0x5cee…5d12               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x003b, t01=0x00d8}
0x5d12…5d26               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003b, t01=0x00fc}
0x5d26…5d38               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003b, t01=0x0110}
0x5d38…5d60               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003b, t01=0x0122}
0x5d60…5d84               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003b, t01=0x014a}
0x5d84…5d96               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003b, t01=0x016e}
0x5d96…5dc0               Head {h00=0x0026, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESSING «, t00=0x003b, t01=0x0180}
0x5dc0…5dcc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x001a}
0x5dcc…5dde               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003c, t01=0x0026}
0x5dde…5df6               Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x003c, t01=0x0038}
0x5df6…5e14               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x003c, t01=0x0050}
0x5e14…5e26               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x003c, t01=0x006e}
0x5e26…5e3c               Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x003c, t01=0x0080}
0x5e3c…5e60               Head {h00=0x0020, h01=0x0050, text=» RF(NE) BRM150 NOT THIS TCU «, t00=0x003c, t01=0x0096}
0x5e60…5e74               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x003c, t01=0x00ba}
0x5e74…5e96               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x003c, t01=0x00ce}
0x5e96…5eba               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003c, t01=0x00f0}
0x5eba…5ecc               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003c, t01=0x0114}
0x5ecc…5ee0               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003c, t01=0x0126}
0x5ee0…5f02               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x003c, t01=0x013a}
0x5f02…5f26               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003c, t01=0x015c}
0x5f26…5f38               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003c, t01=0x0180}
0x5f38…5f68 (61, 0, 398)  Head {h00=0x002c, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESS SEQUENCE «, t00=0x003d, t01=0x0004}
0x5f68…5f74               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x0034}
0x5f74…5f9a               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ READ ONE CHARACTER«, t00=0x003d, t01=0x0040}
0x5f9a…5fb6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003d, t01=0x0066}
0x5fb6…5fce               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x003d, t01=0x0082}
0x5fce…5fe4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x009a}
0x5fe4…6000               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003d, t01=0x00b0}
0x6000…601c               Head {h00=0x0018, h01=0x0050, text=» SUK A2,ENQ  SALCUZ «, t00=0x003d, t01=0x00cc}
0x601c…6032               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x00e8}
0x6032…6050               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) BRM150 NOT ENQ«, t00=0x003d, t01=0x00fe}
0x6050…606c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003d, t01=0x011c}
0x606c…6094               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ READ LAST CHARACTER «, t00=0x003d, t01=0x0138}
0x6094…609c               Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x0160}
0x609c…60c2               Head {h00=0x0022, h01=0x0050, text=»* TRAILING PAD CAN BE CHECKED «, t00=0x003d, t01=0x0168}
0x60c2…60ca               Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x018e}
0x60ca…60ec               Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,LCUIN HALT INPUT«, t00=0x003e, t01=0x0008}
0x60ec…6102               Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUIN «, t00=0x003e, t01=0x002a}
0x6102…6118               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x0040}
0x6118…6134               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003e, t01=0x0056}
0x6134…615c               Head {h00=0x0024, h01=0x0050, text=» CF A5,HALTIN HALT INPUT SALCUZ «, t00=0x003e, t01=0x0072}
0x615c…618e               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) BRM010 PARITY ERROR SALCUZ  SALCUZ«, t00=0x003e, t01=0x009a}
0x618e…61a4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x00cc}
0x61a4…61b6               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x003e, t01=0x00e2}
0x61b6…61da               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK COUNTER«, t00=0x003e, t01=0x00f4}
0x61da…61ec               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x003e, t01=0x0118}
0x61ec…61fe               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x003e, t01=0x012a}
0x61fe…621e               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x003e, t01=0x013c}
0x621e…6230               Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x003e, t01=0x015c}
0x6230…6252               Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x003e, t01=0x016e}
0x6252…6266               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x003e, t01=0x0190}
0x6266…62a0               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x003f, t01=0x0014}
0x62a0…62ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x004e}
0x62ac…62c0               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003f, t01=0x005a}
0x62c0…62ea               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x003f, t01=0x006e}
0x62ea…62f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x0098}
0x62f6…630c               Head {h00=0x0012, h01=0x0050, text=» IFF EM3270=0 «, t00=0x003f, t01=0x00a4}
0x630c…633e               Head {h00=0x002e, h01=0x0050, text=» CF A5,FINT10 CONTINUE SEARCHING IN DC:TAB«, t00=0x003f, t01=0x00ba}
0x633e…634a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x00ec}
0x634a…636c               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x003f, t01=0x00f8}
0x636c…6390               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x003f, t01=0x011a}
0x6390…63ac               Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x003f, t01=0x013e}
0x63ac…63c0               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x003f, t01=0x015a}
0x63c0…63ea               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x003f, t01=0x016e}
0x63ea…640c               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0040, t01=0x0008}
0x640c…642c               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x0040, t01=0x002a}
0x642c…6442               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=0   «, t00=0x0040, t01=0x004a}
0x6442…646a               Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x0040, t01=0x0060}
0x646a…647e               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0040, t01=0x0088}
0x647e…6492               Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x0040, t01=0x009c}
0x6492…64a2               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0040, t01=0x00b0}
0x64a2…64b8               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=1   «, t00=0x0040, t01=0x00c0}
0x64b8…64d8               Head {h00=0x001c, h01=0x0050, text=» ABL BRM INVALID ADDRESS«, t00=0x0040, t01=0x00d6}
0x64d8…64e8               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0040, t01=0x00f6}
0x64e8…64f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0106}
0x64f2…6522               Head {h00=0x002c, h01=0x0050, text=»*   WAIT FOR MARK HOLD TO RESYNCHRONIZE «, t00=0x0040, t01=0x0110}
0x6522…652c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0140}
0x652c…6540               Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0040, t01=0x014a}
0x6540…6554               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0040, t01=0x015e}
0x6554…6568               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0040, t01=0x0172}
0x6568…6588               Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM RESYNCHRONIZE«, t00=0x0040, t01=0x0186}
0x6588…65b2               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ ANOTHER CHARACTER«, t00=0x0041, t01=0x0016}
0x65b2…65c4               Head {h00=0x000e, h01=0x0050, text=» RB BRM150«, t00=0x0041, t01=0x0040}
0x65c4…65d2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x0052}
0x65d2…65dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0060}
0x65dc…65e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x006a}
0x65e6…6606               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0041, t01=0x0074}
0x6606…6610               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0094}
0x6610…661a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x009e}
0x661a…662e               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0041, t01=0x00a8}
0x662e…6658               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0041, t01=0x00bc}
0x6658…666c               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0041, t01=0x00e6}
0x666c…668e               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0041, t01=0x00fa}
0x668e…669a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x011c}
0x669a…66ae               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0041, t01=0x0128}
0x66ae…66d8               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0041, t01=0x013c}
0x66d8…66fe               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0041, t01=0x0166}
0x66fe…6722               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0041, t01=0x018c}
0x6722…673c               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0042, t01=0x0020}
0x673c…6768               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0042, t01=0x003a}
0x6768…677c               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0042, t01=0x0066}
0x677c…67a2               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0042, t01=0x007a}
0x67a2…67b6               Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0042, t01=0x00a0}
0x67b6…67d8               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0042, t01=0x00b4}
0x67d8…67e8               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0042, t01=0x00d6}
0x67e8…67f6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x00e6}
0x67f6…6800               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00f4}
0x6800…680a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00fe}
0x680a…682a               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0042, t01=0x0108}
0x682a…6834               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0128}
0x6834…683e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0132}
0x683e…6852               Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0042, t01=0x013c}
0x6852…6866               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0042, t01=0x0150}
0x6866…687a               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0042, t01=0x0164}
0x687a…689c               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0042, t01=0x0178}
0x689c…68b2               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0043, t01=0x000a}
0x68b2…68de               Head {h00=0x0028, h01=0x0050, text=»*********************CHAINED COMMAND«, t00=0x0043, t01=0x0020}
0x68de…6908               Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0043, t01=0x004c}
0x6908…6926               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0043, t01=0x0076}
0x6926…693a               Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0043, t01=0x0094}
0x693a…695c               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0043, t01=0x00a8}
0x695c…696e               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0043, t01=0x00ca}
0x696e…6990               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0043, t01=0x00dc}
0x6990…69a4               Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0043, t01=0x00fe}
0x69a4…69d0               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0043, t01=0x0112}
0x69d0…69e4               Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0043, t01=0x013e}
0x69e4…6a02               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0043, t01=0x0152}
0x6a02…6a12               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0043, t01=0x0170}
0x6a12…6a26               Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0043, t01=0x0180}
0x6a26…6a3a (68, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0044, t01=0x0004}
0x6a3a…6a4e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0044, t01=0x0018}
0x6a4e…6a78               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0044, t01=0x002c}
0x6a78…6a8e               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0044, t01=0x0056}
0x6a8e…6ab8               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0044, t01=0x006c}
0x6ab8…6ade               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0044, t01=0x0096}
0x6ade…6b12               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0044, t01=0x00bc}
0x6b12…6b2e               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0044, t01=0x00f0}
0x6b2e…6b3a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x010c}
0x6b3a…6b50               Head {h00=0x0012, h01=0x0050, text=» IFF EM3270=0 «, t00=0x0044, t01=0x0118}
0x6b50…6b78               Head {h00=0x0024, h01=0x0050, text=» CF A5,FINTER GET RECEIVING DWT «, t00=0x0044, t01=0x012e}
0x6b78…6b96               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A3 DWT-ADDRESS«, t00=0x0044, t01=0x0156}
0x6b96…6bae               Head {h00=0x0014, h01=0x0050, text=» LDR* A2,A6 STA «, t00=0x0044, t01=0x0174}
0x6bae…6bba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x018c}
0x6bba…6bce               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0045, t01=0x0008}
0x6bce…6bfe               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0045, t01=0x001c}
0x6bfe…6c18               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0045, t01=0x004c}
0x6c18…6c44               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0045, t01=0x0066}
0x6c44…6c56               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0045, t01=0x0092}
0x6c56…6c80               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREASE ACK COUNTER «, t00=0x0045, t01=0x00a4}
0x6c80…6ca4               Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x0045, t01=0x00ce}
0x6ca4…6cb0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x00f2}
0x6cb0…6cdc               Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x0045, t01=0x00fe}
0x6cdc…6cf4               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0045, t01=0x012a}
0x6cf4…6d20               Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x0045, t01=0x0142}
0x6d20…6d32               Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x0045, t01=0x016e}
0x6d32…6d46               Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x0045, t01=0x0180}
0x6d46…6d6a (70, 0, 400)  Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0046, t01=0x0004}
0x6d6a…6d92               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0046, t01=0x0028}
0x6d92…6da4               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0046, t01=0x0050}
0x6da4…6db8               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0046, t01=0x0062}
0x6db8…6dde               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x0046, t01=0x0076}
0x6dde…6df2               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0046, t01=0x009c}
0x6df2…6e06               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x0046, t01=0x00b0}
0x6e06…6e18               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x0046, t01=0x00c4}
0x6e18…6e3c               Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x0046, t01=0x00d6}
0x6e3c…6e4e               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0046, t01=0x00fa}
0x6e4e…6e72               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x0046, t01=0x010c}
0x6e72…6e84               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0046, t01=0x0130}
0x6e84…6e9a               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x0046, t01=0x0142}
0x6e9a…6ec6               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x0046, t01=0x0158}
0x6ec6…6ee4               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x0046, t01=0x0184}
0x6ee4…6f0e               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x0047, t01=0x0012}
0x6f0e…6f1a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x003c}
0x6f1a…6f2e               Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x0047, t01=0x0048}
0x6f2e…6f40               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0047, t01=0x005c}
0x6f40…6f6a               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x0047, t01=0x006e}
0x6f6a…6f7a               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0047, t01=0x0098}
0x6f7a…6fa8               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0047, t01=0x00a8}
0x6fa8…6fba               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0047, t01=0x00d6}
0x6fba…6fde               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x0047, t01=0x00e8}
0x6fde…6fe8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x010c}
0x6fe8…700e               Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x0047, t01=0x0116}
0x700e…7018               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x013c}
0x7018…702c               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0047, t01=0x0146}
0x702c…7040               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0047, t01=0x015a}
0x7040…705a               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x0047, t01=0x016e}
0x705a…7070               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0047, t01=0x0188}
0x7070…7086               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x0048, t01=0x000e}
0x7086…709a               Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x0048, t01=0x0024}
0x709a…70a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x0038}
0x70a6…70ba               Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x0048, t01=0x0044}
0x70ba…70d0               Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x0048, t01=0x0058}
0x70d0…7100               Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x0048, t01=0x006e}
0x7100…7122               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x0048, t01=0x009e}
0x7122…7142               Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x0048, t01=0x00c0}
0x7142…7154               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x0048, t01=0x00e0}
0x7154…716c               Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x0048, t01=0x00f2}
0x716c…7192               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x0048, t01=0x010a}
0x7192…71a6               Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x0048, t01=0x0130}
0x71a6…71c0               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0048, t01=0x0144}
0x71c0…71e8               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0048, t01=0x015e}
0x71e8…7214               Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBBA,A8 STORE BUFFER ADDRESS«, t00=0x0048, t01=0x0186}
0x7214…7234               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x0049, t01=0x0022}
0x7234…7262               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x0049, t01=0x0042}
0x7262…728c               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x0049, t01=0x0070}
0x728c…72b8               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x0049, t01=0x009a}
0x72b8…72c6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x00c6}
0x72c6…72d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00d4}
0x72d0…72da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00de}
0x72da…730e               Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x0049, t01=0x00e8}
0x730e…7318               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x011c}
0x7318…7322               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0126}
0x7322…7336               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0049, t01=0x0130}
0x7336…7356               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x0049, t01=0x0144}
0x7356…736a               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0049, t01=0x0164}
0x736a…738c               Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x0049, t01=0x0178}
0x738c…739e               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x004a, t01=0x000a}
0x739e…73b4               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004a, t01=0x001c}
0x73b4…73d6               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004a, t01=0x0032}
0x73d6…73e8               Head {h00=0x000e, h01=0x0050, text=» ORK A2,/A«, t00=0x004a, t01=0x0054}
0x73e8…7400               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004a, t01=0x0066}
0x7400…7414               Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004a, t01=0x007e}
0x7414…7420               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x0092}
0x7420…7448               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004a, t01=0x009e}
0x7448…745a               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004a, t01=0x00c6}
0x745a…7468               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004a, t01=0x00d8}
0x7468…747c               Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x004a, t01=0x00e6}
0x747c…749e               Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x004a, t01=0x00fa}
0x749e…74ca               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x004a, t01=0x011c}
0x74ca…74fc               Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x004a, t01=0x0148}
0x74fc…7510               Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x004a, t01=0x017a}
0x7510…7532               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x004a, t01=0x018e}
0x7532…7542               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004b, t01=0x0020}
0x7542…7556               Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x004b, t01=0x0030}
0x7556…756a               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004b, t01=0x0044}
0x756a…7582               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x004b, t01=0x0058}
0x7582…7594               Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x004b, t01=0x0070}
0x7594…75bc               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x004b, t01=0x0082}
0x75bc…75dc               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x004b, t01=0x00aa}
0x75dc…75ee               Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x004b, t01=0x00ca}
0x75ee…75fa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x00dc}
0x75fa…760e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x004b, t01=0x00e8}
0x760e…7620               Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x004b, t01=0x00fc}
0x7620…762c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x010e}
0x762c…763a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004b, t01=0x011a}
0x763a…7644               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0128}
0x7644…764e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0132}
0x764e…767e               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x004b, t01=0x013c}
0x767e…7688               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x016c}
0x7688…7692               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0176}
0x7692…76a6               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x004b, t01=0x0180}
0x76a6…76ce (76, 0, 400)  Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x004c, t01=0x0004}
0x76ce…76e2               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x004c, t01=0x002c}
0x76e2…7708               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x004c, t01=0x0040}
0x7708…7740               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x004c, t01=0x0066}
0x7740…7768               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x004c, t01=0x009e}
0x7768…7790               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x004c, t01=0x00c6}
0x7790…77b6               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x004c, t01=0x00ee}
0x77b6…77dc               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x004c, t01=0x0114}
0x77dc…77ee               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x004c, t01=0x013a}
0x77ee…7800               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x004c, t01=0x014c}
0x7800…782a               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x004c, t01=0x015e}
0x782a…783e               Head {h00=0x0010, h01=0x0050, text=» ABL POL127 «, t00=0x004c, t01=0x0188}
0x783e…784a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x000c}
0x784a…7854               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0018}
0x7854…785e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0022}
0x785e…787e               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x004d, t01=0x002c}
0x787e…7888               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x004c}
0x7888…7892               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0056}
0x7892…78a6               Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x004d, t01=0x0060}
0x78a6…78d0               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004d, t01=0x0074}
0x78d0…78e4               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004d, t01=0x009e}
0x78e4…78f8               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x004d, t01=0x00b2}
0x78f8…791e               Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x004d, t01=0x00c6}
0x791e…7950               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x004d, t01=0x00ec}
0x7950…7964               Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x004d, t01=0x011e}
0x7964…7974               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004d, t01=0x0132}
0x7974…7982               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004d, t01=0x0142}
0x7982…798c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0150}
0x798c…7996               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x015a}
0x7996…79b6               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x004d, t01=0x0164}
0x79b6…79c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0184}
0x79c0…79ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x018e}
0x79ca…79de               Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x004e, t01=0x0008}
0x79de…7a08               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004e, t01=0x001c}
0x7a08…7a1c               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004e, t01=0x0046}
0x7a1c…7a40               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x004e, t01=0x005a}
0x7a40…7a54               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x004e, t01=0x007e}
0x7a54…7a7a               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x004e, t01=0x0092}
0x7a7a…7a8c               Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x004e, t01=0x00b8}
0x7a8c…7aa0               Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x004e, t01=0x00ca}
0x7aa0…7ac6               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x004e, t01=0x00de}
0x7ac6…7ada               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x004e, t01=0x0104}
0x7ada…7aee               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x004e, t01=0x0118}
0x7aee…7b22               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x004e, t01=0x012c}
0x7b22…7b2e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x0160}
0x7b2e…7b62               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x004e, t01=0x016c}
0x7b62…7b8c               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x004f, t01=0x0010}
0x7b8c…7ba0               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x004f, t01=0x003a}
0x7ba0…7bb4               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x004f, t01=0x004e}
0x7bb4…7bbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0062}
0x7bbe…7bc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x006c}
0x7bc8…7be8               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x004f, t01=0x0076}
0x7be8…7bf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0096}
0x7bf2…7bfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00a0}
0x7bfc…7c10               Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x004f, t01=0x00aa}
0x7c10…7c3a               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004f, t01=0x00be}
0x7c3a…7c4e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004f, t01=0x00e8}
0x7c4e…7c74               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 ACK NOT EXPECTED«, t00=0x004f, t01=0x00fc}
0x7c74…7c9e               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x004f, t01=0x0122}
0x7c9e…7cb6               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x004f, t01=0x014c}
0x7cb6…7ccc               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x004f, t01=0x0164}
0x7ccc…7cd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x017a}
0x7cd6…7cf0               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x004f, t01=0x0184}
0x7cf0…7cfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x000e}
0x7cfa…7d1c               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x0050, t01=0x0018}
0x7d1c…7d40               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0050, t01=0x003a}
0x7d40…7d54               Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0050, t01=0x005e}
0x7d54…7d72               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0050, t01=0x0072}
0x7d72…7d9c               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0050, t01=0x0090}
0x7d9c…7dae               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0050, t01=0x00ba}
0x7dae…7dc2               Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0050, t01=0x00cc}
0x7dc2…7dd6               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0050, t01=0x00e0}
0x7dd6…7dec               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0050, t01=0x00f4}
0x7dec…7df6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x010a}
0x7df6…7e10               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0050, t01=0x0114}
0x7e10…7e1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x012e}
0x7e1a…7e3e               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0050, t01=0x0138}
0x7e3e…7e66               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0050, t01=0x015c}
0x7e66…7e7a               Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0050, t01=0x0184}
0x7e7a…7e8e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0051, t01=0x0008}
0x7e8e…7eb0               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0051, t01=0x001c}
0x7eb0…7ebe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0051, t01=0x003e}
0x7ebe…7ec8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x004c}
0x7ec8…7ef8               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0051, t01=0x0056}
0x7ef8…7f02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0086}
0x7f02…7f1c               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0051, t01=0x0090}
0x7f1c…7f30               Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0051, t01=0x00aa}
0x7f30…7f44               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0051, t01=0x00be}
0x7f44…7f58               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x0051, t01=0x00d2}
0x7f58…7f8a               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x0051, t01=0x00e6}
0x7f8a…7f96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x0118}
0x7f96…7fc2               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0051, t01=0x0124}
0x7fc2…7fd6               Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x0051, t01=0x0150}
0x7fd6…7ff4               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0051, t01=0x0164}
0x7ff4…8008               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0051, t01=0x0182}
0x8008…8010               Head {h00=0x0004, h01=0x0050, t00=0x0052, t01=0x0008}
0x8010…8032               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0052, t01=0x0010}
0x8032…803e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x0032}
0x803e…8050               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0052, t01=0x003e}
0x8050…8064               Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x0052, t01=0x0050}
0x8064…8076               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0052, t01=0x0064}
0x8076…80a0               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0052, t01=0x0076}
0x80a0…80b4               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0052, t01=0x00a0}
0x80b4…80c8               Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x0052, t01=0x00b4}
0x80c8…80e0               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x0052, t01=0x00c8}
0x80e0…810c               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x0052, t01=0x00e0}
0x810c…8132               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x0052, t01=0x010c}
0x8132…8146               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0052, t01=0x0132}
0x8146…816e               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x0052, t01=0x0146}
0x816e…8188               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0052, t01=0x016e}
0x8188…819a               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0052, t01=0x0188}
0x819a…81ae               Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x0053, t01=0x000a}
0x81ae…81c8               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0053, t01=0x001e}
0x81c8…81da               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0053, t01=0x0038}
0x81da…81ee               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0053, t01=0x004a}
0x81ee…81fc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0053, t01=0x005e}
0x81fc…8206               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x006c}
0x8206…8210               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0076}
0x8210…8236               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x0053, t01=0x0080}
0x8236…8240               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00a6}
0x8240…824a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00b0}
0x824a…825e               Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x0053, t01=0x00ba}
0x825e…8284               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x0053, t01=0x00ce}
0x8284…82b4               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x0053, t01=0x00f4}
0x82b4…82d8               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x0053, t01=0x0124}
0x82d8…82fe               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x0053, t01=0x0148}
0x82fe…8320               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0053, t01=0x016e}
0x8320…8332               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0053, t01=0x0190}
0x8332…834e               Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x0054, t01=0x0012}
0x834e…8364               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x0054, t01=0x002e}
0x8364…838a               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x0054, t01=0x0044}
0x838a…839c               Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x0054, t01=0x006a}
0x839c…83a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x007c}
0x83a8…83b6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0054, t01=0x0088}
0x83b6…83c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0096}
0x83c0…83ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00a0}
0x83ca…83ec               Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x0054, t01=0x00aa}
0x83ec…83f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00cc}
0x83f6…8400               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00d6}
0x8400…8414               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x0054, t01=0x00e0}
0x8414…8428               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0054, t01=0x00f4}
0x8428…844a               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0054, t01=0x0108}
0x844a…845c               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0054, t01=0x012a}
0x845c…846e               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0054, t01=0x013c}
0x846e…8496               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x0054, t01=0x014e}
0x8496…84b4               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x0054, t01=0x0176}
0x84b4…84c0 (85, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x0004}
0x84c0…84d4               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0055, t01=0x0010}
0x84d4…84e6               Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x0055, t01=0x0024}
0x84e6…84f2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x0036}
0x84f2…8506               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x0055, t01=0x0042}
0x8506…8516               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0055, t01=0x0056}
0x8516…852a               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x0055, t01=0x0066}
0x852a…8544               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x0055, t01=0x007a}
0x8544…8556               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0055, t01=0x0094}
0x8556…8572               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x0055, t01=0x00a6}
0x8572…857e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x00c2}
0x857e…8598               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x0055, t01=0x00ce}
0x8598…85aa               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0055, t01=0x00e8}
0x85aa…85d0               Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x0055, t01=0x00fa}
0x85d0…85f4               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x0055, t01=0x0120}
0x85f4…8604               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0055, t01=0x0144}
0x8604…8618               Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x0055, t01=0x0154}
0x8618…8624               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x0168}
0x8624…863a               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0055, t01=0x0174}
0x863a…8662               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x0055, t01=0x018a}
0x8662…8676               Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x0056, t01=0x0022}
0x8676…8690               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x0056, t01=0x0036}
0x8690…86b0               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x0056, t01=0x0050}
0x86b0…86bc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x0070}
0x86bc…86ce               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x0056, t01=0x007c}
0x86ce…86e2               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x0056, t01=0x008e}
0x86e2…8712               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0056, t01=0x00a2}
0x8712…8732               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x0056, t01=0x00d2}
0x8732…8744               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x0056, t01=0x00f2}
0x8744…8752               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0056, t01=0x0104}
0x8752…875c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0112}
0x875c…8766               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x011c}
0x8766…878a               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x0056, t01=0x0126}
0x878a…8794               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x014a}
0x8794…879e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0154}
0x879e…87b2               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x0056, t01=0x015e}
0x87b2…87d2               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x0056, t01=0x0172}
0x87d2…87f6 (87, 0, 400)  Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x0057, t01=0x0004}
0x87f6…880a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0057, t01=0x0028}
0x880a…883c               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x0057, t01=0x003c}
0x883c…8848               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x006e}
0x8848…8870               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x0057, t01=0x007a}
0x8870…8880               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x0057, t01=0x00a2}
0x8880…88a6               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x0057, t01=0x00b2}
0x88a6…88b6               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0057, t01=0x00d8}
0x88b6…88c4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0057, t01=0x00e8}
0x88c4…88ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00f6}
0x88ce…88d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0100}
0x88d8…8900               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x0057, t01=0x010a}
0x8900…890a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0132}
0x890a…8914               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x013c}
0x8914…8928               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x0057, t01=0x0146}
0x8928…894e               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x0057, t01=0x015a}
0x894e…8962               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0057, t01=0x0180}
0x8962…8978 (88, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x0058, t01=0x0004}
0x8978…89a2               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x0058, t01=0x001a}
0x89a2…89c8               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x0058, t01=0x0044}
0x89c8…89dc               Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x0058, t01=0x006a}
0x89dc…89fc               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x0058, t01=0x007e}
0x89fc…8a26               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0058, t01=0x009e}
0x8a26…8a4a               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0058, t01=0x00c8}
0x8a4a…8a56               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x00ec}
0x8a56…8a6a               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0058, t01=0x00f8}
0x8a6a…8a7c               Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x0058, t01=0x010c}
0x8a7c…8a88               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x011e}
0x8a88…8a9c               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x0058, t01=0x012a}
0x8a9c…8aac               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0058, t01=0x013e}
0x8aac…8ac0               Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x0058, t01=0x014e}
0x8ac0…8ad4               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x0058, t01=0x0162}
0x8ad4…8afa               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x0058, t01=0x0176}
0x8afa…8b0e               Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x0059, t01=0x000c}
0x8b0e…8b2c               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0059, t01=0x0020}
0x8b2c…8b3e               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x0059, t01=0x003e}
0x8b3e…8b52               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x0059, t01=0x0050}
0x8b52…8b78               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x0059, t01=0x0064}
0x8b78…8b8c               Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x0059, t01=0x008a}
0x8b8c…8bb4               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0059, t01=0x009e}
0x8bb4…8bca               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x0059, t01=0x00c6}
0x8bca…8be0               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x0059, t01=0x00dc}
0x8be0…8bf2               Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x0059, t01=0x00f2}
0x8bf2…8c06               Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x0059, t01=0x0104}
0x8c06…8c2a               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x0059, t01=0x0118}
0x8c2a…8c48               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0059, t01=0x013c}
0x8c48…8c72               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0059, t01=0x015a}
0x8c72…8c94               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x0059, t01=0x0184}
0x8c94…8ca8               Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x005a, t01=0x0016}
0x8ca8…8cd2               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x005a, t01=0x002a}
0x8cd2…8cfe               Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x005a, t01=0x0054}
0x8cfe…8d20               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x005a, t01=0x0080}
0x8d20…8d44               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005a, t01=0x00a2}
0x8d44…8d58               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x005a, t01=0x00c6}
0x8d58…8d7a               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x005a, t01=0x00da}
0x8d7a…8d8a               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x005a, t01=0x00fc}
0x8d8a…8dae               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x005a, t01=0x010c}
0x8dae…8dd8               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005a, t01=0x0130}
0x8dd8…8dfc               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005a, t01=0x015a}
0x8dfc…8e0e               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005a, t01=0x017e}
0x8e0e…8e1c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005a, t01=0x0190}
0x8e1c…8e26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x000e}
0x8e26…8e30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0018}
0x8e30…8e5a               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x005b, t01=0x0022}
0x8e5a…8e64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x004c}
0x8e64…8e6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0056}
0x8e6e…8e82               Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x005b, t01=0x0060}
0x8e82…8e9c               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x005b, t01=0x0074}
0x8e9c…8eb6               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x005b, t01=0x008e}
0x8eb6…8eda               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x005b, t01=0x00a8}
0x8eda…8ef8               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x005b, t01=0x00cc}
0x8ef8…8f0c               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x005b, t01=0x00ea}
0x8f0c…8f2e               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005b, t01=0x00fe}
0x8f2e…8f40               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x005b, t01=0x0120}
0x8f40…8f66               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x005b, t01=0x0132}
0x8f66…8f72               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0158}
0x8f72…8f8c               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x005b, t01=0x0164}
0x8f8c…8fa4               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x005b, t01=0x017e}
0x8fa4…8fc4               Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x005c, t01=0x0008}
0x8fc4…8fe6               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x005c, t01=0x0028}
0x8fe6…8ff8               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x005c, t01=0x004a}
0x8ff8…901c               Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x005c, t01=0x005c}
0x901c…902e               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x005c, t01=0x0080}
0x902e…9054               Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x005c, t01=0x0092}
0x9054…9060               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x00b8}
0x9060…907c               Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x005c, t01=0x00c4}
0x907c…908a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005c, t01=0x00e0}
0x908a…9094               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00ee}
0x9094…909e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00f8}
0x909e…90da               Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x005c, t01=0x0102}
0x90da…90e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x013e}
0x90e4…9106               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x005c, t01=0x0148}
0x9106…9110               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x016a}
0x9110…911a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0174}
0x911a…9136               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x005c, t01=0x017e}
0x9136…915e               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x005d, t01=0x000a}
0x915e…9176               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x005d, t01=0x0032}
0x9176…9196               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x005d, t01=0x004a}
0x9196…91b8               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x005d, t01=0x006a}
0x91b8…91ca               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x005d, t01=0x008c}
0x91ca…91ee               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x005d, t01=0x009e}
0x91ee…9200               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x005d, t01=0x00c2}
0x9200…922c               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x005d, t01=0x00d4}
0x922c…923e               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x005d, t01=0x0100}
0x923e…9274               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x005d, t01=0x0112}
0x9274…9294               Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x005d, t01=0x0148}
0x9294…92c0               Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x005d, t01=0x0168}
0x92c0…92d2 (94, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x005e, t01=0x0004}
0x92d2…92fc               Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x005e, t01=0x0016}
0x92fc…931e               Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x005e, t01=0x0040}
0x931e…9330               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x005e, t01=0x0062}
0x9330…9346               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x005e, t01=0x0074}
0x9346…935e               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x005e, t01=0x008a}
0x935e…9386               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x005e, t01=0x00a2}
0x9386…939a               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x005e, t01=0x00ca}
0x939a…93c8               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x005e, t01=0x00de}
0x93c8…93dc               Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x005e, t01=0x010c}
0x93dc…93f0               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x005e, t01=0x0120}
0x93f0…9418               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x005e, t01=0x0134}
0x9418…9446               Head {h00=0x002a, h01=0x0050, text=» CF A15,RTBUF RELEASE TRANSMIT BUFFER «, t00=0x005e, t01=0x015c}
0x9446…9472               Head {h00=0x0028, h01=0x0050, text=» CF A15,CKGBQ CHECK GET BUFFER QUEUE«, t00=0x005e, t01=0x018a}
0x9472…947e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x0026}
0x947e…9492               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x005f, t01=0x0032}
0x9492…94b8               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x005f, t01=0x0046}
0x94b8…94ca               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x005f, t01=0x006c}
0x94ca…94da               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x005f, t01=0x007e}
0x94da…94e8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x008e}
0x94e8…94f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x009c}
0x94f2…94fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00a6}
0x94fc…951a               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x005f, t01=0x00b0}
0x951a…9524               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00ce}
0x9524…9544               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x005f, t01=0x00d8}
0x9544…9570               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x005f, t01=0x00f8}
0x9570…95a6               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x005f, t01=0x0124}
0x95a6…95d2               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x005f, t01=0x015a}
0x95d2…95dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0186}
0x95dc…95f0               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x005f, t01=0x0190}
0x95f0…9618               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0060, t01=0x0014}
0x9618…9638               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x0060, t01=0x003c}
0x9638…964a               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0060, t01=0x005c}
0x964a…965e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0060, t01=0x006e}
0x965e…9686               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x0060, t01=0x0082}
0x9686…96ac               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x0060, t01=0x00aa}
0x96ac…96be               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x0060, t01=0x00d0}
0x96be…96d2               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0060, t01=0x00e2}
0x96d2…96e6               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x0060, t01=0x00f6}
0x96e6…970a               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0060, t01=0x010a}
0x970a…9736               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0060, t01=0x012e}
0x9736…974a               Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x0060, t01=0x015a}
0x974a…975a               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0060, t01=0x016e}
0x975a…9776               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0060, t01=0x017e}
0x9776…977e               Head {h00=0x0004, h01=0x0050, t00=0x0061, t01=0x000a}
0x977e…9794               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0061, t01=0x0012}
0x9794…97a8               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0061, t01=0x0028}
0x97a8…97ce               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x0061, t01=0x003c}
0x97ce…97e2               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0061, t01=0x0062}
0x97e2…9806               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0061, t01=0x0076}
0x9806…981a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x0061, t01=0x009a}
0x981a…9830               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x0061, t01=0x00ae}
0x9830…985e               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x0061, t01=0x00c4}
0x985e…9872               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0061, t01=0x00f2}
0x9872…987e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0106}
0x987e…9892               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x0061, t01=0x0112}
0x9892…98ba               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0061, t01=0x0126}
0x98ba…98de               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0061, t01=0x014e}
0x98de…98f2               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x0061, t01=0x0172}
0x98f2…9906               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x0061, t01=0x0186}
0x9906…9928               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x0062, t01=0x000a}
0x9928…993c               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x0062, t01=0x002c}
0x993c…995e               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x0062, t01=0x0040}
0x995e…9972               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x0062, t01=0x0062}
0x9972…9994               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x0062, t01=0x0076}
0x9994…99a8               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x0062, t01=0x0098}
0x99a8…99d2               Head {h00=0x0026, h01=0x0050, text=» RF(E) RDM140 ENQ IN TEXT RECEIVED«, t00=0x0062, t01=0x00ac}
0x99d2…99e6               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0062, t01=0x00d6}
0x99e6…9a0e               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x0062, t01=0x00ea}
0x9a0e…9a16               Head {h00=0x0004, h01=0x0050, t00=0x0062, t01=0x0112}
0x9a16…9a2a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0062, t01=0x011a}
0x9a2a…9a40               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x0062, t01=0x012e}
0x9a40…9a48               Head {h00=0x0004, h01=0x0050, t00=0x0062, t01=0x0144}
0x9a48…9a5a               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0062, t01=0x014c}
0x9a5a…9a70               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x0062, t01=0x015e}
0x9a70…9a92               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x0062, t01=0x0174}
0x9a92…9aa4               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x0063, t01=0x0008}
0x9aa4…9ac6               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x0063, t01=0x001a}
0x9ac6…9ad8               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x0063, t01=0x003c}
0x9ad8…9aea               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0063, t01=0x004e}
0x9aea…9b18               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x0063, t01=0x0060}
0x9b18…9b3c               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0063, t01=0x008e}
0x9b3c…9b6a               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x0063, t01=0x00b2}
0x9b6a…9b7c               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x0063, t01=0x00e0}
0x9b7c…9b90               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x0063, t01=0x00f2}
0x9b90…9b9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x0106}
0x9b9c…9ba4               Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x0112}
0x9ba4…9bc6               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x0063, t01=0x011a}
0x9bc6…9bea               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0063, t01=0x013c}
0x9bea…9c12               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x0063, t01=0x0160}
0x9c12…9c26               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0063, t01=0x0188}
0x9c26…9c42               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x0064, t01=0x000c}
0x9c42…9c66               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x0064, t01=0x0028}
0x9c66…9c70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x004c}
0x9c70…9c8a               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x0064, t01=0x0056}
0x9c8a…9c94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0070}
0x9c94…9cb2               Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x0064, t01=0x007a}
0x9cb2…9cc6               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x0064, t01=0x0098}
0x9cc6…9cf0               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x0064, t01=0x00ac}
0x9cf0…9d04               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0064, t01=0x00d6}
0x9d04…9d2c               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x0064, t01=0x00ea}
0x9d2c…9d3e               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0064, t01=0x0112}
0x9d3e…9d48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0124}
0x9d48…9d5e               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x0064, t01=0x012e}
0x9d5e…9d68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0144}
0x9d68…9d7c               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x0064, t01=0x014e}
0x9d7c…9da4               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x0064, t01=0x0162}
0x9da4…9dc8               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x0064, t01=0x018a}
0x9dc8…9dfe               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x0065, t01=0x001e}
0x9dfe…9e12               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0065, t01=0x0054}
0x9e12…9e26               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0065, t01=0x0068}
0x9e26…9e46               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x0065, t01=0x007c}
0x9e46…9e52               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0065, t01=0x009c}
0x9e52…9e66               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0065, t01=0x00a8}
0x9e66…9e90               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x0065, t01=0x00bc}
0x9e90…9eb0               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x0065, t01=0x00e6}
0x9eb0…9ebc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0065, t01=0x0106}
0x9ebc…9ed0               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x0065, t01=0x0112}
0x9ed0…9efa               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x0065, t01=0x0126}
0x9efa…9f0e               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x0065, t01=0x0150}
0x9f0e…9f36               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x0065, t01=0x0164}
0x9f36…9f56               Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x0065, t01=0x018c}
0x9f56…9f6a               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0066, t01=0x001c}
0x9f6a…9f90               Head {h00=0x0022, h01=0x0050, text=» ORR A7,A1 PARITY ERROR SALCUZ«, t00=0x0066, t01=0x0030}
0x9f90…9fa6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0066, t01=0x0056}
0x9fa6…9fb6               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0066, t01=0x006c}
0x9fb6…9fc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x007c}
0x9fc0…9fd6               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x0066, t01=0x0086}
0x9fd6…9fe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x009c}
0x9fe0…9ff4               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x0066, t01=0x00a6}
0x9ff4…a006               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0066, t01=0x00ba}
0xa006…a02c               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x0066, t01=0x00cc}
0xa02c…a052               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x0066, t01=0x00f2}
0xa052…a064               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x0066, t01=0x0118}
0xa064…a06e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x012a}
0xa06e…a084               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x0066, t01=0x0134}
0xa084…a08e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x014a}
0xa08e…a0a2               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x0066, t01=0x0154}
0xa0a2…a0b6               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0066, t01=0x0168}
0xa0b6…a0ca               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0066, t01=0x017c}
0xa0ca…a0f0               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x0066, t01=0x0190}
0xa0f0…a0fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0067, t01=0x0026}
0xa0fc…a110               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0067, t01=0x0032}
0xa110…a13a               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x0067, t01=0x0046}
0xa13a…a160               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x0067, t01=0x0070}
0xa160…a16c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0067, t01=0x0096}
0xa16c…a17e               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0067, t01=0x00a2}
0xa17e…a18c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0067, t01=0x00b4}
0xa18c…a196               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00c2}
0xa196…a1b4               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x0067, t01=0x00cc}
0xa1b4…a1be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00ea}
0xa1be…a1d4               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x0067, t01=0x00f4}
0xa1d4…a1f6               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x0067, t01=0x010a}
0xa1f6…a220               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x0067, t01=0x012c}
0xa220…a236               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x0067, t01=0x0156}
0xa236…a254               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x0067, t01=0x016c}
0xa254…a266               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0067, t01=0x018a}
0xa266…a270               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x000c}
0xa270…a288               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x0068, t01=0x0016}
0xa288…a292               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x002e}
0xa292…a2b6               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x0068, t01=0x0038}
0xa2b6…a2c8               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0068, t01=0x005c}
0xa2c8…a2d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x006e}
0xa2d2…a2e8               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x0068, t01=0x0078}
0xa2e8…a2f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x008e}
0xa2f2…a306               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0068, t01=0x0098}
0xa306…a328               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x0068, t01=0x00ac}
0xa328…a334               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0068, t01=0x00ce}
0xa334…a33e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00da}
0xa33e…a354               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x0068, t01=0x00e4}
0xa354…a35e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00fa}
0xa35e…a380               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x0068, t01=0x0104}
0xa380…a3a6               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x0068, t01=0x0126}
0xa3a6…a3be               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x0068, t01=0x014c}
0xa3be…a3d0               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x0068, t01=0x0164}
0xa3d0…a3de               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0068, t01=0x0176}
0xa3de…a3e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0184}
0xa3e8…a3fe               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x0068, t01=0x018e}
0xa3fe…a408               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0014}
0xa408…a42a               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x0069, t01=0x001e}
0xa42a…a43c               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0069, t01=0x0040}
0xa43c…a446               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0052}
0xa446…a45c               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x0069, t01=0x005c}
0xa45c…a466               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0072}
0xa466…a488               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x0069, t01=0x007c}
0xa488…a49a               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0069, t01=0x009e}
0xa49a…a4a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00b0}
0xa4a4…a4ba               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x0069, t01=0x00ba}
0xa4ba…a4c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00d0}
0xa4c4…a4e6               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x0069, t01=0x00da}
0xa4e6…a4f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00fc}
0xa4f0…a51c               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x0069, t01=0x0106}
0xa51c…a530               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0069, t01=0x0132}
0xa530…a548               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x0069, t01=0x0146}
0xa548…a570               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x0069, t01=0x015e}
0xa570…a59a               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x0069, t01=0x0186}
0xa59a…a5b8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x006a, t01=0x0020}
0xa5b8…a5e2               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x006a, t01=0x003e}
0xa5e2…a600               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x006a, t01=0x0068}
0xa600…a61a               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x006a, t01=0x0086}
0xa61a…a638               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x006a, t01=0x00a0}
0xa638…a64c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x006a, t01=0x00be}
0xa64c…a662               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x006a, t01=0x00d2}
0xa662…a67c               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x006a, t01=0x00e8}
0xa67c…a6a4               Head {h00=0x0024, h01=0x0050, text=» CIO A2,0,LCUUT STOP TRANSMITTER«, t00=0x006a, t01=0x0102}
0xa6a4…a6c0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x006a, t01=0x012a}
0xa6c0…a6e8               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ WAIT FOR END SALCUZ «, t00=0x006a, t01=0x0146}
0xa6e8…a6fe               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x006a, t01=0x016e}
0xa6fe…a728               Head {h00=0x0026, h01=0x0050, text=» SST A2,LCUUT PERFORM SST AT ONCE «, t00=0x006a, t01=0x0184}
0xa728…a73c               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x006b, t01=0x001e}
0xa73c…a768               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x006b, t01=0x0032}
0xa768…a774               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x005e}
0xa774…a784               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006b, t01=0x006a}
0xa784…a792               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006b, t01=0x007a}
0xa792…a79c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0088}
0xa79c…a7a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0092}
0xa7a6…a7c8               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x006b, t01=0x009c}
0xa7c8…a7d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00be}
0xa7d2…a7dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00c8}
0xa7dc…a7f0               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x006b, t01=0x00d2}
0xa7f0…a812               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x006b, t01=0x00e6}
0xa812…a828               Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x006b, t01=0x0108}
0xa828…a832               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x011e}
0xa832…a83c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0128}
0xa83c…a85c               Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x006b, t01=0x0132}
0xa85c…a866               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0152}
0xa866…a870               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x015c}
0xa870…a884               Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x006b, t01=0x0166}
0xa884…a8b0               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x006b, t01=0x017a}
0xa8b0…a8b8               Head {h00=0x0004, h01=0x0050, t00=0x006c, t01=0x0016}
0xa8b8…a8ee               Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x006c, t01=0x001e}
0xa8ee…a90c               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x006c, t01=0x0054}
0xa90c…a914               Head {h00=0x0004, h01=0x0050, t00=0x006c, t01=0x0072}
0xa914…a92a               Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x006c, t01=0x007a}
0xa92a…a950               Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x006c, t01=0x0090}
0xa950…a964               Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x006c, t01=0x00b6}
0xa964…a98c               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x006c, t01=0x00ca}
0xa98c…a9a0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x006c, t01=0x00f2}
0xa9a0…a9be               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x006c, t01=0x0106}
0xa9be…a9da               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x006c, t01=0x0124}
0xa9da…a9ee               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x006c, t01=0x0140}
0xa9ee…aa0a               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x006c, t01=0x0154}
0xaa0a…aa1e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x006c, t01=0x0170}
0xaa1e…aa3a               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x006c, t01=0x0184}
0xaa3a…aa4e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x006d, t01=0x0010}
0xaa4e…aa6c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x006d, t01=0x0024}
0xaa6c…aa98               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x006d, t01=0x0042}
0xaa98…aac4               Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x006d, t01=0x006e}
0xaac4…aae4               Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x006d, t01=0x009a}
0xaae4…aaf6               Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x006d, t01=0x00ba}
0xaaf6…ab0a               Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x006d, t01=0x00cc}
0xab0a…ab1c               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x006d, t01=0x00e0}
0xab1c…ab30               Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x006d, t01=0x00f2}
0xab30…ab3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0106}
0xab3a…ab44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0110}
0xab44…ab4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x011a}
0xab4e…ab5a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x0124}
0xab5a…ab6e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x006d, t01=0x0130}
0xab6e…ab8c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x006d, t01=0x0144}
0xab8c…aba8               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x006d, t01=0x0162}
0xaba8…abd0               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x006d, t01=0x017e}
0xabd0…abf4               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x006e, t01=0x0016}
0xabf4…ac20               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x006e, t01=0x003a}
0xac20…ac4c               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x006e, t01=0x0066}
0xac4c…ac76               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x006e, t01=0x0092}
0xac76…ac9a               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x006e, t01=0x00bc}
0xac9a…acc0               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x006e, t01=0x00e0}
0xacc0…ace0               Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x006e, t01=0x0106}
0xace0…acfe               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x006e, t01=0x0126}
0xacfe…ad1a               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x006e, t01=0x0144}
0xad1a…ad38               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x006e, t01=0x0160}
0xad38…ad4e               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x006e, t01=0x017e}
0xad4e…ad62 (111, 0, 400) Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x006f, t01=0x0004}
0xad62…ad88               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x006f, t01=0x0018}
0xad88…ad9e               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x006f, t01=0x003e}
0xad9e…adc4               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x006f, t01=0x0054}
0xadc4…adda               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x006f, t01=0x007a}
0xadda…adee               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x006f, t01=0x0090}
0xadee…ae04               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x006f, t01=0x00a4}
0xae04…ae10               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x00ba}
0xae10…ae24               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x006f, t01=0x00c6}
0xae24…ae2c               Head {h00=0x0004, h01=0x0050, t00=0x006f, t01=0x00da}
0xae2c…ae56               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x006f, t01=0x00e2}
0xae56…ae70               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x006f, t01=0x010c}
0xae70…ae78               Head {h00=0x0004, h01=0x0050, t00=0x006f, t01=0x0126}
0xae78…ae98               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x006f, t01=0x012e}
0xae98…aebe               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x006f, t01=0x014e}
0xaebe…aee2               Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x006f, t01=0x0174}
0xaee2…aeea               Head {h00=0x0004, h01=0x0050, t00=0x0070, t01=0x0008}
0xaeea…af12               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x0070, t01=0x0010}
0xaf12…af44               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x0070, t01=0x0038}
0xaf44…af66               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x0070, t01=0x006a}
0xaf66…af78               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0070, t01=0x008c}
0xaf78…af8c               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x0070, t01=0x009e}
0xaf8c…af98               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x00b2}
0xaf98…afa0               Head {h00=0x0004, h01=0x0050, t00=0x0070, t01=0x00be}
0xafa0…afb2               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0070, t01=0x00c6}
0xafb2…afc6               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x0070, t01=0x00d8}
0xafc6…afea               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x0070, t01=0x00ec}
0xafea…b00e               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0070, t01=0x0110}
0xb00e…b022               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0070, t01=0x0134}
0xb022…b036               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0070, t01=0x0148}
0xb036…b060               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0070, t01=0x015c}
0xb060…b07a               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x0070, t01=0x0186}
0xb07a…b082               Head {h00=0x0004, h01=0x0050, t00=0x0071, t01=0x0010}
0xb082…b0c6               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0071, t01=0x0018}
0xb0c6…b0d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x005c}
0xb0d0…b100               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x0071, t01=0x0066}
0xb100…b10a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0096}
0xb10a…b142               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0071, t01=0x00a0}
0xb142…b14a               Head {h00=0x0004, h01=0x0050, t00=0x0071, t01=0x00d8}
0xb14a…b174               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x0071, t01=0x00e0}
0xb174…b190               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x0071, t01=0x010a}
0xb190…b19c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x0126}
0xb19c…b1b0               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x0071, t01=0x0132}
0xb1b0…b1d0               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x0071, t01=0x0146}
0xb1d0…b1f6               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x0071, t01=0x0166}
0xb1f6…b20a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x0071, t01=0x018c}
0xb20a…b21e               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x0072, t01=0x0010}
0xb21e…b242               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x0072, t01=0x0024}
0xb242…b268               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x0072, t01=0x0048}
0xb268…b27c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x0072, t01=0x006e}
0xb27c…b290               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x0072, t01=0x0082}
0xb290…b2ae               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x0072, t01=0x0096}
0xb2ae…b2c4               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x0072, t01=0x00b4}
0xb2c4…b2d6               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0072, t01=0x00ca}
0xb2d6…b2e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x00dc}
0xb2e2…b2f6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0072, t01=0x00e8}
0xb2f6…b308               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x0072, t01=0x00fc}
0xb308…b310               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x010e}
0xb310…b324               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x0072, t01=0x0116}
0xb324…b32c               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x012a}
0xb32c…b33e               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x0072, t01=0x0132}
0xb33e…b364               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x0072, t01=0x0144}
0xb364…b36c               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x016a}
0xb36c…b398               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x0072, t01=0x0172}
0xb398…b3ae               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x0073, t01=0x000e}
0xb3ae…b3da               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x0073, t01=0x0024}
0xb3da…b3ec               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0073, t01=0x0050}
0xb3ec…b404               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x0073, t01=0x0062}
0xb404…b416               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0073, t01=0x007a}
0xb416…b440               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x0073, t01=0x008c}
0xb440…b466               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x0073, t01=0x00b6}
0xb466…b47e               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x0073, t01=0x00dc}
0xb47e…b4a8               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x0073, t01=0x00f4}
0xb4a8…b4be               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x0073, t01=0x011e}
0xb4be…b4d2               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x0073, t01=0x0134}
0xb4d2…b4e6               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x0073, t01=0x0148}
0xb4e6…b50a               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x0073, t01=0x015c}
0xb50a…b51c               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0073, t01=0x0180}
0xb51c…b52e (116, 0, 400) Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x0074, t01=0x0004}
0xb52e…b542               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x0074, t01=0x0016}
0xb542…b54e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x002a}
0xb54e…b55c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x0036}
0xb55c…b570               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x0074, t01=0x0044}
0xb570…b59c               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x0074, t01=0x0058}
0xb59c…b5c0               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x0074, t01=0x0084}
0xb5c0…b5d4               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x0074, t01=0x00a8}
0xb5d4…b5fc               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x0074, t01=0x00bc}
0xb5fc…b626               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x0074, t01=0x00e4}
0xb626…b63a               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x0074, t01=0x010e}
0xb63a…b660               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x0074, t01=0x0122}
0xb660…b68e               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x0074, t01=0x0148}
0xb68e…b6a4               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x0074, t01=0x0176}
0xb6a4…b6c8               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x0074, t01=0x018c}
0xb6c8…b6dc               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0075, t01=0x0020}
0xb6dc…b70c               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x0075, t01=0x0034}
0xb70c…b720               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x0075, t01=0x0064}
0xb720…b73a               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x0075, t01=0x0078}
0xb73a…b74e               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x0075, t01=0x0092}
0xb74e…b770               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x0075, t01=0x00a6}
0xb770…b79c               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x0075, t01=0x00c8}
0xb79c…b7be               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x0075, t01=0x00f4}
0xb7be…b7dc               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0075, t01=0x0116}
0xb7dc…b7fc               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x0075, t01=0x0134}
0xb7fc…b82e               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x0075, t01=0x0154}
0xb82e…b84c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0075, t01=0x0186}
0xb84c…b86c               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x0076, t01=0x0014}
0xb86c…b878               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x0034}
0xb878…b88c               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x0076, t01=0x0040}
0xb88c…b8a8               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x0076, t01=0x0054}
0xb8a8…b8bc               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x0076, t01=0x0070}
0xb8bc…b8da               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0076, t01=0x0084}
0xb8da…b8ee               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0076, t01=0x00a2}
0xb8ee…b908               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x0076, t01=0x00b6}
0xb908…b926               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x0076, t01=0x00d0}
0xb926…b932               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x00ee}
0xb932…b946               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0076, t01=0x00fa}
0xb946…b96a               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x0076, t01=0x010e}
0xb96a…b97c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0076, t01=0x0132}
0xb97c…b990               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0076, t01=0x0144}
0xb990…b9b6               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x0076, t01=0x0158}
0xb9b6…b9c8               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x0076, t01=0x017e}
0xb9c8…b9dc               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0076, t01=0x0190}
0xb9dc…ba02               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x0077, t01=0x0014}
0xba02…ba0e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x003a}
0xba0e…ba2e               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x0077, t01=0x0046}
0xba2e…ba42               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x0077, t01=0x0066}
0xba42…ba66               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x0077, t01=0x007a}
0xba66…ba7a               Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x0077, t01=0x009e}
0xba7a…ba96               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x0077, t01=0x00b2}
0xba96…baba               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x0077, t01=0x00ce}
0xbaba…bac8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0077, t01=0x00f2}
0xbac8…bad2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0100}
0xbad2…badc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x010a}
0xbadc…bafe               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x0077, t01=0x0114}
0xbafe…bb08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0136}
0xbb08…bb12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0140}
0xbb12…bb26               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0077, t01=0x014a}
0xbb26…bb3a               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x0077, t01=0x015e}
0xbb3a…bb62               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x0077, t01=0x0172}
0xbb62…bb80               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0078, t01=0x000a}
0xbb80…bba2               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0078, t01=0x0028}
0xbba2…bbb6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0078, t01=0x004a}
0xbbb6…bbd4               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0078, t01=0x005e}
0xbbd4…bbee               Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x0078, t01=0x007c}
0xbbee…bc02               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0078, t01=0x0096}
0xbc02…bc20               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x0078, t01=0x00aa}
0xbc20…bc34               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x0078, t01=0x00c8}
0xbc34…bc52               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x0078, t01=0x00dc}
0xbc52…bc66               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0078, t01=0x00fa}
0xbc66…bc84               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0078, t01=0x010e}
0xbc84…bc9c               Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x0078, t01=0x012c}
0xbc9c…bcba               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0078, t01=0x0144}
0xbcba…bcce               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0078, t01=0x0162}
0xbcce…bcec               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0078, t01=0x0176}
0xbcec…bd0e (121, 0, 400) Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0079, t01=0x0004}
0xbd0e…bd30               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x0079, t01=0x0026}
0xbd30…bd42               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0079, t01=0x0048}
0xbd42…bd6a               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x0079, t01=0x005a}
0xbd6a…bd8a               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x0079, t01=0x0082}
0xbd8a…bdac               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x0079, t01=0x00a2}
0xbdac…bdce               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0079, t01=0x00c4}
0xbdce…bde0               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x0079, t01=0x00e6}
0xbde0…bdfe               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x0079, t01=0x00f8}
0xbdfe…be10               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0079, t01=0x0116}
0xbe10…be32               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x0079, t01=0x0128}
0xbe32…be44               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x0079, t01=0x014a}
0xbe44…be58               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x0079, t01=0x015c}
0xbe58…be78               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x0079, t01=0x0170}
0xbe78…be9c               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x0079, t01=0x0190}
0xbe9c…bea8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x0024}
0xbea8…beb6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007a, t01=0x0030}
0xbeb6…bec0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x003e}
0xbec0…beca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0048}
0xbeca…beea               Head {h00=0x001c, h01=0x0050, text=»* TRANSMIT SYNC SEQUENCE«, t00=0x007a, t01=0x0052}
0xbeea…bef4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0072}
0xbef4…befe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x007c}
0xbefe…bf12               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x007a, t01=0x0086}
0xbf12…bf2c               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x007a, t01=0x009a}
0xbf2c…bf5a               Head {h00=0x002a, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT IF NOT DONE«, t00=0x007a, t01=0x00b4}
0xbf5a…bf7c               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN PERFORM SST «, t00=0x007a, t01=0x00e2}
0xbf7c…bf98               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x007a, t01=0x0104}
0xbf98…bfc2               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x007a, t01=0x0120}
0xbfc2…bfd8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007a, t01=0x014a}
0xbfd8…bff4               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x007a, t01=0x0160}
0xbff4…c010               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=1  SALCUZ «, t00=0x007a, t01=0x017c}
0xc010…c02a               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x007b, t01=0x0008}
0xc02a…c05a               Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER SALCUZ«, t00=0x007b, t01=0x0022}
0xc05a…c078               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x007b, t01=0x0052}
0xc078…c096               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x007b, t01=0x0070}
0xc096…c0b4               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x007b, t01=0x008e}
0xc0b4…c0cc               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x007b, t01=0x00ac}
0xc0cc…c0f2               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x007b, t01=0x00c4}
0xc0f2…c10e               Head {h00=0x0018, h01=0x0050, text=»TRS010 EQU *  SALCUZ«, t00=0x007b, t01=0x00ea}
0xc10e…c12c               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x007b, t01=0x0106}
0xc12c…c162               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x007b, t01=0x0124}
0xc162…c178               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007b, t01=0x015a}
0xc178…c194               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x007b, t01=0x0170}
0xc194…c1b0               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=0  SALCUZ «, t00=0x007b, t01=0x018c}
0xc1b0…c1cc               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x007c, t01=0x0018}
0xc1cc…c1ec               Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,LCUUT  SALCUZ «, t00=0x007c, t01=0x0034}
0xc1ec…c20a               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x007c, t01=0x0054}
0xc20a…c228               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x007c, t01=0x0072}
0xc228…c246               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x007c, t01=0x0090}
0xc246…c25e               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x007c, t01=0x00ae}
0xc25e…c284               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x007c, t01=0x00c6}
0xc284…c298               Head {h00=0x0010, h01=0x0050, text=»TRS010 EQU *«, t00=0x007c, t01=0x00ec}
0xc298…c2b4               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x007c, t01=0x0100}
0xc2b4…c2ea               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x007c, t01=0x011c}
0xc2ea…c300               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007c, t01=0x0152}
0xc300…c32e               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x007c, t01=0x0168}
0xc32e…c346               Head {h00=0x0014, h01=0x0050, text=» LDK A3,4 4 SYNS«, t00=0x007d, t01=0x0008}
0xc346…c360               Head {h00=0x0016, h01=0x0050, text=»TRS100 LDK A2,SYN «, t00=0x007d, t01=0x0020}
0xc360…c37e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SYN «, t00=0x007d, t01=0x003a}
0xc37e…c390               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x007d, t01=0x0058}
0xc390…c3a6               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x007d, t01=0x006a}
0xc3a6…c3b6               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007d, t01=0x0080}
0xc3b6…c3c4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007d, t01=0x0090}
0xc3c4…c3ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x009e}
0xc3ce…c3d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00a8}
0xc3d8…c3f6               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x007d, t01=0x00b2}
0xc3f6…c400               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00d0}
0xc400…c40a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00da}
0xc40a…c41e               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x007d, t01=0x00e4}
0xc41e…c432               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x007d, t01=0x00f8}
0xc432…c452               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x007d, t01=0x010c}
0xc452…c480               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x007d, t01=0x012c}
0xc480…c4a2               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x007d, t01=0x015a}
0xc4a2…c4d2               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x007d, t01=0x017c}
0xc4d2…c4e6               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x007e, t01=0x001c}
0xc4e6…c512               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x007e, t01=0x0030}
0xc512…c51e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x005c}
0xc51e…c532               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x007e, t01=0x0068}
0xc532…c544               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x007e, t01=0x007c}
0xc544…c55a               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHLCI2«, t00=0x007e, t01=0x008e}
0xc55a…c578               Head {h00=0x001a, h01=0x0050, text=» CWK A2,SYN SKIP SYNS «, t00=0x007e, t01=0x00a4}
0xc578…c58c               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x007e, t01=0x00c2}
0xc58c…c5b2               Head {h00=0x0022, h01=0x0050, text=»IHLCI2 XRR A7,A2 CALCULATE LRC«, t00=0x007e, t01=0x00d6}
0xc5b2…c5be               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x00fc}
0xc5be…c5d2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x007e, t01=0x0108}
0xc5d2…c5e4               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x007e, t01=0x011c}
0xc5e4…c61a               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME «, t00=0x007e, t01=0x012e}
0xc61a…c630               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x007e, t01=0x0164}
0xc630…c654               Head {h00=0x0020, h01=0x0050, text=» RF(E) READ SKIP EBCDIC SYN «, t00=0x007e, t01=0x017a}
0xc654…c668               Head {h00=0x0010, h01=0x0050, text=»IHLCI1 EQU *«, t00=0x007f, t01=0x000e}
0xc668…c68c               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x007f, t01=0x0022}
0xc68c…c6b8               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x007f, t01=0x0046}
0xc6b8…c6c4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007f, t01=0x0072}
0xc6c4…c6da               Head {h00=0x0012, h01=0x0050, text=»IHIN10 RTN A5 «, t00=0x007f, t01=0x007e}
0xc6da…c6f6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x007f, t01=0x0094}
0xc6f6…c71a               Head {h00=0x0020, h01=0x0050, text=»IHIN20 CF A5,SST PERFORM SST«, t00=0x007f, t01=0x00b0}
0xc71a…c72a               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x007f, t01=0x00d4}
0xc72a…c740               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007f, t01=0x00e4}
0xc740…c75c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x007f, t01=0x00fa}
0xc75c…c784               Head {h00=0x0024, h01=0x0050, text=»IHIN20 RF SST PERFORM SST SALCUZ«, t00=0x007f, t01=0x0116}
0xc784…c79a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007f, t01=0x013e}
0xc79a…c7a8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007f, t01=0x0154}
0xc7a8…c7b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0162}
0xc7b2…c7bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x016c}
0xc7bc…c7de               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x007f, t01=0x0176}
0xc7de…c7e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0008}
0xc7e8…c7f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0012}
0xc7f2…c806               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x0080, t01=0x001c}
0xc806…c81a               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0080, t01=0x0030}
0xc81a…c83c               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0080, t01=0x0044}
0xc83c…c86a               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0080, t01=0x0066}
0xc86a…c87c               Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x0080, t01=0x0094}
0xc87c…c88a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0080, t01=0x00a6}
0xc88a…c894               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00b4}
0xc894…c89e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00be}
0xc89e…c8c8               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x0080, t01=0x00c8}
0xc8c8…c8d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00f2}
0xc8d2…c8fe               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x0080, t01=0x00fc}
0xc8fe…c930               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x0080, t01=0x0128}
0xc930…c960               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x0080, t01=0x015a}
0xc960…c990               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x0080, t01=0x018a}
0xc990…c99a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x002a}
0xc99a…c9b2               Head {h00=0x0014, h01=0x0050, text=»SST SST A1,LCUIN«, t00=0x0081, t01=0x0034}
0xc9b2…c9ce               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0081, t01=0x004c}
0xc9ce…ca04               Head {h00=0x0032, h01=0x0050, text=» RF(NA) SST200 ALREADY INACTIVE SALCUZ  SALCUZ«, t00=0x0081, t01=0x0068}
0xca04…ca1a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0081, t01=0x009e}
0xca1a…ca2c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0081, t01=0x00b4}
0xca2c…ca40               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0081, t01=0x00c6}
0xca40…ca6a               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOG SST INFORMATION «, t00=0x0081, t01=0x00da}
0xca6a…ca76               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x0104}
0xca76…ca92               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0081, t01=0x0110}
0xca92…caa4               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0081, t01=0x012c}
0xcaa4…caba               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x0081, t01=0x013e}
0xcaba…cad0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0081, t01=0x0154}
0xcad0…caec               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0081, t01=0x016a}
0xcaec…cb06               Head {h00=0x0016, h01=0x0050, text=» ANK A2,6  SALCUZ «, t00=0x0081, t01=0x0186}
0xcb06…cb24               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST100  SALCUZ «, t00=0x0082, t01=0x0010}
0xcb24…cb3e               Head {h00=0x0016, h01=0x0050, text=» ANK A2,2  SALCUZ «, t00=0x0082, t01=0x002e}
0xcb3e…cb68               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SST050 THROUGH PUT SALCUZ «, t00=0x0082, t01=0x0048}
0xcb68…cb92               Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 SET PARITY ERROR SALCUZ «, t00=0x0082, t01=0x0072}
0xcb92…cbac               Head {h00=0x0016, h01=0x0050, text=» RF SSTRET  SALCUZ«, t00=0x0082, t01=0x009c}
0xcbac…cbc2               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0082, t01=0x00b6}
0xcbc2…cbde               Head {h00=0x0018, h01=0x0050, text=»SST050 EQU *  SALCUZ«, t00=0x0082, t01=0x00cc}
0xcbde…cbfe               Head {h00=0x001c, h01=0x0050, text=» CM XSTA TROUHHPUT ERROR«, t00=0x0082, t01=0x00e8}
0xcbfe…cc12               Head {h00=0x0010, h01=0x0050, text=» LDKL A5,STB«, t00=0x0082, t01=0x0108}
0xcc12…cc26               Head {h00=0x0010, h01=0x0050, text=» ABL BRM010 «, t00=0x0082, t01=0x011c}
0xcc26…cc3a               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x0082, t01=0x0130}
0xcc3a…cc50               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTCU «, t00=0x0082, t01=0x0144}
0xcc50…cc6c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0082, t01=0x015a}
0xcc6c…cc9a               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0082, t01=0x0176}
0xcc9a…ccaa               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0083, t01=0x0014}
0xccaa…ccc0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0083, t01=0x0024}
0xccc0…ccdc               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0083, t01=0x003a}
0xccdc…ccf8               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/21  SALCUZ «, t00=0x0083, t01=0x0056}
0xccf8…cd16               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST200 LSALCUZ «, t00=0x0083, t01=0x0072}
0xcd16…cd50               Head {h00=0x0036, h01=0x0050, text=» CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ«, t00=0x0083, t01=0x0090}
0xcd50…cd70               Head {h00=0x001c, h01=0x0050, text=» DATA BRM RESTART SALCUZ«, t00=0x0083, t01=0x00ca}
0xcd70…cd90               Head {h00=0x001c, h01=0x0050, text=» DATA 2 WAIT TIME SALCUZ«, t00=0x0083, t01=0x00ea}
0xcd90…cda8               Head {h00=0x0014, h01=0x0050, text=» RF READ  SALCUZ«, t00=0x0083, t01=0x010a}
0xcda8…cdb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0122}
0xcdb2…cdd2               Head {h00=0x001c, h01=0x0050, text=»SST200 LDK A1,0  SALCUZ «, t00=0x0083, t01=0x012c}
0xcdd2…cdf2               Head {h00=0x001c, h01=0x0050, text=»SSTRET ADK A5,4  SALCUZ «, t00=0x0083, t01=0x014c}
0xcdf2…ce12               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 SET CR SALCUZ«, t00=0x0083, t01=0x016c}
0xce12…ce30               Head {h00=0x001a, h01=0x0050, text=» ABR* A5 RETURN SALCUZ«, t00=0x0083, t01=0x018c}
0xce30…ce46               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x001a}
0xce46…ce50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0030}
0xce50…ce5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x003a}
0xce5a…ce6e               Head {h00=0x0010, h01=0x0050, text=»* HALT INPUT«, t00=0x0084, t01=0x0044}
0xce6e…ce78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0058}
0xce78…ce82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0062}
0xce82…cea2               Head {h00=0x001c, h01=0x0050, text=»HALTIN LDK A1,0  SALCUZ «, t00=0x0084, t01=0x006c}
0xcea2…ceba               Head {h00=0x0014, h01=0x0050, text=» CIO A1,0,LCUIN «, t00=0x0084, t01=0x008c}
0xceba…ced6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0084, t01=0x00a4}
0xced6…cf0e               Head {h00=0x0034, h01=0x0050, text=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK«, t00=0x0084, t01=0x00c0}
0xcf0e…cf24               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x00f8}
0xcf24…cf40               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0084, t01=0x010e}
0xcf40…cf6e               Head {h00=0x002a, h01=0x0050, text=» RF READ WAIT FOR SST INTERRUPT SALCUZ«, t00=0x0084, t01=0x012a}
0xcf6e…cf84               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x0158}
0xcf84…cf92               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0084, t01=0x016e}
0xcf92…cf9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x017c}
0xcf9c…cfa6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0186}
0xcfa6…cfd6               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x0084, t01=0x0190}
0xcfd6…cfe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0030}
0xcfe0…cfea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x003a}
0xcfea…cffe               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0085, t01=0x0044}
0xcffe…d012               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0085, t01=0x0058}
0xd012…d026               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0085, t01=0x006c}
0xd026…d03a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0085, t01=0x0080}
0xd03a…d06e               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x0085, t01=0x0094}
0xd06e…d09c               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x0085, t01=0x00c8}
0xd09c…d0a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x00f6}
0xd0a8…d0bc               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x0085, t01=0x0102}
0xd0bc…d0e2               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x0085, t01=0x0116}
0xd0e2…d0f8               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x0085, t01=0x013c}
0xd0f8…d11a               Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x0085, t01=0x0152}
0xd11a…d12e               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0085, t01=0x0174}
0xd12e…d156               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x0085, t01=0x0188}
0xd156…d162               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x0020}
0xd162…d176               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0086, t01=0x002c}
0xd176…d1a0               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x0086, t01=0x0040}
0xd1a0…d1ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x006a}
0xd1ac…d1c0               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0086, t01=0x0076}
0xd1c0…d1ea               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x0086, t01=0x008a}
0xd1ea…d1f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x00b4}
0xd1f6…d200               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00c0}
0xd200…d21a               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x0086, t01=0x00ca}
0xd21a…d22c               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0086, t01=0x00e4}
0xd22c…d23a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0086, t01=0x00f6}
0xd23a…d244               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0104}
0xd244…d24e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x010e}
0xd24e…d260               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x0086, t01=0x0118}
0xd260…d26a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x012a}
0xd26a…d28a               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x0086, t01=0x0134}
0xd28a…d294               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0154}
0xd294…d29e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x015e}
0xd29e…d2c0               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0086, t01=0x0168}
0xd2c0…d2da               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x0086, t01=0x018a}
0xd2da…d2ec               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0087, t01=0x0014}
0xd2ec…d300               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x0087, t01=0x0026}
0xd300…d318               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x0087, t01=0x003a}
0xd318…d32e               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x0087, t01=0x0052}
0xd32e…d348               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x0087, t01=0x0068}
0xd348…d35c               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0087, t01=0x0082}
0xd35c…d36e               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x0087, t01=0x0096}
0xd36e…d37a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x00a8}
0xd37a…d39c               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x0087, t01=0x00b4}
0xd39c…d3b4               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x0087, t01=0x00d6}
0xd3b4…d3c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x00ee}
0xd3c0…d3ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00fa}
0xd3ca…d3d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0104}
0xd3d4…d3de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x010e}
0xd3de…d3f0               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x0087, t01=0x0118}
0xd3f0…d3fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x012a}
0xd3fa…d42c               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x0087, t01=0x0134}
0xd42c…d436               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0166}
0xd436…d440               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0170}
0xd440…d458               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x0087, t01=0x017a}
0xd458…d47a (136, 0, 400) Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0088, t01=0x0004}
0xd47a…d48c               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0088, t01=0x0026}
0xd48c…d4a2               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x0088, t01=0x0038}
0xd4a2…d4b6               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x0088, t01=0x004e}
0xd4b6…d4cc               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x0088, t01=0x0062}
0xd4cc…d4e0               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0088, t01=0x0078}
0xd4e0…d4f2               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x0088, t01=0x008c}
0xd4f2…d50a               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x0088, t01=0x009e}
0xd50a…d51e               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0088, t01=0x00b6}
0xd51e…d52a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x00ca}
0xd52a…d54c               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x0088, t01=0x00d6}
0xd54c…d560               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x0088, t01=0x00f8}
0xd560…d56c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x010c}
0xd56c…d57e               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0088, t01=0x0118}
0xd57e…d592               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x0088, t01=0x012a}
0xd592…d5a6               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x0088, t01=0x013e}
0xd5a6…d5b6               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0088, t01=0x0152}
0xd5b6…d5c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0162}
0xd5c0…d5ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x016c}
0xd5ca…d5d8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0088, t01=0x0176}
0xd5d8…d5e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0184}
0xd5e2…d622               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x0088, t01=0x018e}
0xd622…d62c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x003e}
0xd62c…d654               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x0089, t01=0x0048}
0xd654…d674               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x0089, t01=0x0070}
0xd674…d68a               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x0089, t01=0x0090}
0xd68a…d6b0               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x0089, t01=0x00a6}
0xd6b0…d6ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00cc}
0xd6ba…d700               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x0089, t01=0x00d6}
0xd700…d72e               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x0089, t01=0x011c}
0xd72e…d75e               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x0089, t01=0x014a}
0xd75e…d768               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x017a}
0xd768…d79a               Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x0089, t01=0x0184}
0xd79a…d7a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0026}
0xd7a4…d7ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0030}
0xd7ae…d7c2               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x008a, t01=0x003a}
0xd7c2…d7d6               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x008a, t01=0x004e}
0xd7d6…d7ea               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x008a, t01=0x0062}
0xd7ea…d7f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x0076}
0xd7f6…d808               Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x008a, t01=0x0082}
0xd808…d81c               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x008a, t01=0x0094}
0xd81c…d830               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x008a, t01=0x00a8}
0xd830…d83c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x00bc}
0xd83c…d866               Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x008a, t01=0x00c8}
0xd866…d894               Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x008a, t01=0x00f2}
0xd894…d8ac               Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x008a, t01=0x0120}
0xd8ac…d8cc               Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x008a, t01=0x0138}
0xd8cc…d8ee               Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x008a, t01=0x0158}
0xd8ee…d91a               Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x008a, t01=0x017a}
0xd91a…d93e               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x008b, t01=0x0016}
0xd93e…d952               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x008b, t01=0x003a}
0xd952…d97a               Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x008b, t01=0x004e}
0xd97a…d9a8               Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x008b, t01=0x0076}
0xd9a8…d9b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x00a4}
0xd9b4…d9c8               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x008b, t01=0x00b0}
0xd9c8…d9fa               Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x008b, t01=0x00c4}
0xd9fa…da06               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x00f6}
0xda06…da30               Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x008b, t01=0x0102}
0xda30…da48               Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x008b, t01=0x012c}
0xda48…da5e               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x008b, t01=0x0144}
0xda5e…da6e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008b, t01=0x015a}
0xda6e…da7c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008b, t01=0x016a}
0xda7c…da86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0178}
0xda86…da90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0182}
0xda90…daac               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x008b, t01=0x018c}
0xdaac…dab6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0018}
0xdab6…dac0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0022}
0xdac0…dae8               Head {h00=0x0024, h01=0x0050, text=»DC15ON CF A15,SAVE8 SAVE A1 - A8«, t00=0x008c, t01=0x002c}
0xdae8…dafc               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x008c, t01=0x0054}
0xdafc…db1c               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x008c, t01=0x0068}
0xdb1c…db30               Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x008c, t01=0x0088}
0xdb30…db62               Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x008c, t01=0x009c}
0xdb62…db7a               Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x008c, t01=0x00ce}
0xdb7a…db8e               Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x008c, t01=0x00e6}
0xdb8e…dbb0               Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x008c, t01=0x00fa}
0xdbb0…dbd4               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x008c, t01=0x011c}
0xdbd4…dc08               Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x008c, t01=0x0140}
0xdc08…dc34               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x008c, t01=0x0174}
0xdc34…dc46               Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x008d, t01=0x0010}
0xdc46…dc5a               Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x008d, t01=0x0022}
0xdc5a…dc66               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0036}
0xdc66…dc92               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x008d, t01=0x0042}
0xdc92…dcb8               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x008d, t01=0x006e}
0xdcb8…dce6               Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x008d, t01=0x0094}
0xdce6…dcfc               Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x008d, t01=0x00c2}
0xdcfc…dd0a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008d, t01=0x00d8}
0xdd0a…dd14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00e6}
0xdd14…dd2c               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x008d, t01=0x00f0}
0xdd2c…dd36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0108}
0xdd36…dd62               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x008d, t01=0x0112}
0xdd62…dd76               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x008d, t01=0x013e}
0xdd76…dda2               Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x008d, t01=0x0152}
0xdda2…ddd0               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x008d, t01=0x017e}
0xddd0…ddf8               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x008e, t01=0x001c}
0xddf8…de0a               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x008e, t01=0x0044}
0xde0a…de14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0056}
0xde14…de4c               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x008e, t01=0x0060}
0xde4c…de56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0098}
0xde56…de7e               Head {h00=0x0024, h01=0x0050, text=»CPTIM CM DCONOF INDICATE POLLING«, t00=0x008e, t01=0x00a2}
0xde7e…de96               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x008e, t01=0x00ca}
0xde96…deba               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x008e, t01=0x00e2}
0xdeba…dee8               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x008e, t01=0x0106}
0xdee8…def8               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008e, t01=0x0134}
0xdef8…df02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0144}
0xdf02…df1c               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x008e, t01=0x014e}
0xdf1c…df26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0168}
0xdf26…df4e               Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x008e, t01=0x0172}
0xdf4e…df68               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x008f, t01=0x000a}
0xdf68…df92               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x008f, t01=0x0024}
0xdf92…dfa6               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x008f, t01=0x004e}
0xdfa6…dfb8               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x008f, t01=0x0062}
0xdfb8…dfc6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008f, t01=0x0074}
0xdfc6…dfd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0082}
0xdfd0…dff0               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x008f, t01=0x008c}
0xdff0…dffa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x00ac}
0xdffa…e00e               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x008f, t01=0x00b6}
0xe00e…e036               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x008f, t01=0x00ca}
0xe036…e04c               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x008f, t01=0x00f2}
0xe04c…e068               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x008f, t01=0x0108}
0xe068…e090               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x008f, t01=0x0124}
0xe090…e0a0               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008f, t01=0x014c}
0xe0a0…e0aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x015c}
0xe0aa…e0c6               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x008f, t01=0x0166}
0xe0c6…e0d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0182}
0xe0d0…e0e8               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x008f, t01=0x018c}
0xe0e8…e104               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x0090, t01=0x0014}
0xe104…e128               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x0090, t01=0x0030}
0xe128…e158               Head {h00=0x002c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT IF OPEN SALCUZ «, t00=0x0090, t01=0x0054}
0xe158…e16c               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0090, t01=0x0084}
0xe16c…e192               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x0090, t01=0x0098}
0xe192…e1b0               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0090, t01=0x00be}
0xe1b0…e1da               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0090, t01=0x00dc}
0xe1da…e1f0               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x0090, t01=0x0106}
0xe1f0…e1fe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0090, t01=0x011c}
0xe1fe…e208               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x012a}
0xe208…e226               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x0090, t01=0x0134}
0xe226…e230               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0152}
0xe230…e25c               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x0090, t01=0x015c}
0xe25c…e27c               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x0090, t01=0x0188}
0xe27c…e29a               Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x0091, t01=0x0018}
0xe29a…e2ac               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x0091, t01=0x0036}
0xe2ac…e2c0               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x0091, t01=0x0048}
0xe2c0…e2ce               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0091, t01=0x005c}
0xe2ce…e2e2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0091, t01=0x006a}
0xe2e2…e2ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x007e}
0xe2ec…e2f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0088}
0xe2f6…e312               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x0091, t01=0x0092}
0xe312…e31c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00ae}
0xe31c…e334               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x0091, t01=0x00b8}
0xe334…e352               Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x0091, t01=0x00d0}
0xe352…e35c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00ee}
0xe35c…e366               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00f8}
0xe366…e37a               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x0091, t01=0x0102}
0xe37a…e390               Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x0091, t01=0x0116}
0xe390…e3a8               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x0091, t01=0x012c}
0xe3a8…e3c0               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x0091, t01=0x0144}
0xe3c0…e3d2               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x0091, t01=0x015c}
0xe3d2…e3ea               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x0091, t01=0x016e}
0xe3ea…e3fc               Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x0091, t01=0x0186}
0xe3fc…e40e               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x0092, t01=0x0008}
0xe40e…e420               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x0092, t01=0x001a}
0xe420…e432               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0092, t01=0x002c}
0xe432…e448               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x0092, t01=0x003e}
0xe448…e45e               Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x0092, t01=0x0054}
0xe45e…e476               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x0092, t01=0x006a}
0xe476…e48c               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x0092, t01=0x0082}
0xe48c…e4a2               Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x0092, t01=0x0098}
0xe4a2…e4ba               Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x0092, t01=0x00ae}
0xe4ba…e4d2               Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x0092, t01=0x00c6}
0xe4d2…e4e2               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0092, t01=0x00de}
0xe4e2…e4f6               Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x0092, t01=0x00ee}
0xe4f6…e504               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0092, t01=0x0102}
0xe504…e50e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0110}
0xe50e…e518               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x011a}
0xe518…e544               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x0092, t01=0x0124}
0xe544…e564               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x0092, t01=0x0150}
0xe564…e56e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0170}
0xe56e…e578               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x017a}
0xe578…e5a0               Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x0092, t01=0x0184}
0xe5a0…e5c8               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x0093, t01=0x001c}
0xe5c8…e5e8               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x0093, t01=0x0044}
0xe5e8…e608               Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x0093, t01=0x0064}
0xe608…e628               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x0093, t01=0x0084}
0xe628…e654               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x0093, t01=0x00a4}
0xe654…e674               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x0093, t01=0x00d0}
0xe674…e686               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0093, t01=0x00f0}
0xe686…e698               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x0093, t01=0x0102}
0xe698…e6aa               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0093, t01=0x0114}
0xe6aa…e6dc               Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x0093, t01=0x0126}
0xe6dc…e6ec               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0093, t01=0x0158}
0xe6ec…e6f8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x0168}
0xe6f8…e70c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0093, t01=0x0174}
0xe70c…e716               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0188}
0xe716…e740 (148, 0, 400) Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x0094, t01=0x0004}
0xe740…e766               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x0094, t01=0x002e}
0xe766…e770               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0054}
0xe770…e786               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x0094, t01=0x005e}
0xe786…e79a               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0094, t01=0x0074}
0xe79a…e7ac               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0094, t01=0x0088}
0xe7ac…e7be               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0094, t01=0x009a}
0xe7be…e7d4               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x0094, t01=0x00ac}
0xe7d4…e7e8               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x0094, t01=0x00c2}
0xe7e8…e7fc               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x0094, t01=0x00d6}
0xe7fc…e80e               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x0094, t01=0x00ea}
0xe80e…e81e               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0094, t01=0x00fc}
0xe81e…e826               Head {h00=0x0004, h01=0x0050, t00=0x0094, t01=0x010c}
0xe826…e832               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x0114}
0xe832…e840               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0094, t01=0x0120}
0xe840…e84a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x012e}
0xe84a…e854               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0138}
0xe854…e87a               Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x0094, t01=0x0142}
0xe87a…e884               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0168}
0xe884…e88e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0172}
0xe88e…e8ae               Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x0094, t01=0x017c}
0xe8ae…e8ce               Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x0095, t01=0x000c}
0xe8ce…e8e8               Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x0095, t01=0x002c}
0xe8e8…e904               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0095, t01=0x0046}
0xe904…e91a               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0095, t01=0x0062}
0xe91a…e948               Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x0095, t01=0x0078}
0xe948…e964               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x0095, t01=0x00a6}
0xe964…e98c               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0095, t01=0x00c2}
0xe98c…e9a6               Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x0095, t01=0x00ea}
0xe9a6…e9c4               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x0095, t01=0x0104}
0xe9c4…e9f0               Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x0095, t01=0x0122}
0xe9f0…ea22               Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x0095, t01=0x014e}
0xea22…ea48               Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x0095, t01=0x0180}
0xea48…ea78               Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x0096, t01=0x0016}
0xea78…ea96               Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x0096, t01=0x0046}
0xea96…eaa4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0096, t01=0x0064}
0xeaa4…eaae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0072}
0xeaae…eab8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x007c}
0xeab8…ead8               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x0096, t01=0x0086}
0xead8…eae2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00a6}
0xeae2…eb02               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x0096, t01=0x00b0}
0xeb02…eb0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00d0}
0xeb0c…eb20               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x0096, t01=0x00da}
0xeb20…eb44               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x0096, t01=0x00ee}
0xeb44…eb5a               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x0096, t01=0x0112}
0xeb5a…eb70               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0096, t01=0x0128}
0xeb70…eb84               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0096, t01=0x013e}
0xeb84…eb9a               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x0096, t01=0x0152}
0xeb9a…ebb0               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0096, t01=0x0168}
0xebb0…ebc4               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0096, t01=0x017e}
0xebc4…ebda (151, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x0097, t01=0x0004}
0xebda…ebf0               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0097, t01=0x001a}
0xebf0…ec04               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0097, t01=0x0030}
0xec04…ec10               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0097, t01=0x0044}
0xec10…ec26               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0097, t01=0x0050}
0xec26…ec3a               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0097, t01=0x0066}
0xec3a…ec56               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x0097, t01=0x007a}
0xec56…ec6a               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0097, t01=0x0096}
0xec6a…ec74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00aa}
0xec74…ec7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00b4}
0xec7e…eca0               Head {h00=0x001e, h01=0x0050, text=»* DC TRANSMIT BUFFER POOL «, t00=0x0097, t01=0x00be}
0xeca0…ecaa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00e0}
0xecaa…ecb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00ea}
0xecb4…ecc8               Head {h00=0x0010, h01=0x0050, text=»DCTBUF EQU *«, t00=0x0097, t01=0x00f4}
0xecc8…ecd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0108}
0xecd2…ecdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0112}
0xecdc…ecf0               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0097, t01=0x011c}
0xecf0…ed20               Head {h00=0x002c, h01=0x0050, text=» DATA TBUF1 POINTER TO FIRST FREE BUFFER«, t00=0x0097, t01=0x0130}
0xed20…ed54               Head {h00=0x0030, h01=0x0050, text=»TBUF1 DATA TBUF2 POINTER TO NEXT FREE BUFFER«, t00=0x0097, t01=0x0160}
0xed54…ed74 (152, 0, 400) Head {h00=0x001c, h01=0x0050, text=» RES TBUFL BUFFER AREA 1«, t00=0x0098, t01=0x0004}
0xed74…ed96               Head {h00=0x001e, h01=0x0050, text=»TBUF2 DATA 0 END OF CHAIN «, t00=0x0098, t01=0x0024}
0xed96…edb6               Head {h00=0x001c, h01=0x0050, text=» RES TBUFL BUFFER AREA 2«, t00=0x0098, t01=0x0046}
0xedb6…edc2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0098, t01=0x0066}
0xedc2…edcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0072}
0xedcc…edda               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0098, t01=0x007c}
0xedda…ede4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x008a}
0xede4…edee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0094}
0xedee…ee12               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x0098, t01=0x009e}
0xee12…ee1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x00c2}
0xee1c…ee26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x00cc}
0xee26…ee3a               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0098, t01=0x00d6}
0xee3a…ee54               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x0098, t01=0x00ea}
0xee54…ee6a               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x0098, t01=0x0104}
0xee6a…ee7c               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x0098, t01=0x011a}
0xee7c…ee96               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x0098, t01=0x012c}
0xee96…eeac               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x0098, t01=0x0146}
0xeeac…eebe               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x0098, t01=0x015c}
0xeebe…eed6               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x0098, t01=0x016e}
0xeed6…eeec               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x0098, t01=0x0186}
0xeeec…ef00               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x0099, t01=0x000c}
0xef00…ef1a               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x0099, t01=0x0020}
0xef1a…ef30               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x0099, t01=0x003a}
0xef30…ef42               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x0099, t01=0x0050}
0xef42…ef54               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x0099, t01=0x0062}
0xef54…ef6a               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x0099, t01=0x0074}
0xef6a…ef80               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x0099, t01=0x008a}
0xef80…ef98               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x0099, t01=0x00a0}
0xef98…efb4               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x0099, t01=0x00b8}
0xefb4…efc8               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x0099, t01=0x00d4}
0xefc8…efdc               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x0099, t01=0x00e8}
0xefdc…eff2               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x0099, t01=0x00fc}
0xeff2…f000               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0099, t01=0x0112}
0xf000…f00a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0120}
0xf00a…f014               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x012a}
0xf014…f02e               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x0099, t01=0x0134}
0xf02e…f042               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x0099, t01=0x014e}
0xf042…f052               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x0099, t01=0x0162}
0xf052…f068               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x0099, t01=0x0172}
0xf068…f07c               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x0099, t01=0x0188}
0xf07c…f090               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x009a, t01=0x000c}
0xf090…f09c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x0020}
0xf09c…f0a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x002c}
0xf0a6…f0b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0036}
0xf0b0…f0ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0040}
0xf0ba…f0ce               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x009a, t01=0x004a}
0xf0ce…f0dc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009a, t01=0x005e}
0xf0dc…f11c               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x009a, t01=0x006c}
0xf11c…f126               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00ac}
0xf126…f140               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x009a, t01=0x00b6}
0xf140…f14a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00d0}
0xf14a…f188               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x009a, t01=0x00da}
0xf188…f192               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0118}
0xf192…f1d4               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x009a, t01=0x0122}
0xf1d4…f1dc               Head {h00=0x0004, h01=0x0050, t00=0x009a, t01=0x0164}
0xf1dc…f1f0               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x009a, t01=0x016c}
0xf1f0…f216               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x009a, t01=0x0180}
0xf216…f228               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x009b, t01=0x0016}
0xf228…f23e               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x009b, t01=0x0028}
0xf23e…f268               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x009b, t01=0x003e}
0xf268…f28e               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x009b, t01=0x0068}
0xf28e…f296               Head {h00=0x0004, h01=0x0050, t00=0x009b, t01=0x008e}
0xf296…f2a8               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x009b, t01=0x0096}
0xf2a8…f2be               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x009b, t01=0x00a8}
0xf2be…f2ea               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x009b, t01=0x00be}
0xf2ea…f312               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x009b, t01=0x00ea}
0xf312…f328               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x009b, t01=0x0112}
0xf328…f332               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0128}
0xf332…f33c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0132}
0xf33c…f346               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x013c}
0xf346…f354               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009b, t01=0x0146}
0xf354…f35c               Head {h00=0x0004, h01=0x0050, t00=0x009b, t01=0x0154}
0xf35c…f364               Head {h00=0x0004, h01=0x0050, t00=0x009b, t01=0x015c}
0xf364…f378               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x009b, t01=0x0164}
0xf378…f3a6               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x009b, t01=0x0178}
0xf3a6…f3d4               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 /08-/0F «, t00=0x009c, t01=0x0016}
0xf3d4…f402               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x009c, t01=0x0044}
0xf402…f430               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E /18-/1F «, t00=0x009c, t01=0x0072}
0xf430…f45e               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x009c, t01=0x00a0}
0xf45e…f48c               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F /28-/2F «, t00=0x009c, t01=0x00ce}
0xf48c…f4b8               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x009c, t01=0x00fc}
0xf4b8…f4e4               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 /38-3F«, t00=0x009c, t01=0x0128}
0xf4e4…f4f0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x0154}
0xf4f0…f4fe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x0160}
0xf4fe…f506               Head {h00=0x0004, h01=0x0050, t00=0x009c, t01=0x016e}
0xf506…f522               Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x009c, t01=0x0176}
0xf522…f53c (157, 2, 216) Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x009d, t01=0x0004}
0xf53c…f562               Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x009d, t01=0x001e}
0xf562…f590               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x009d, t01=0x0044}
0xf590…f5be               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x009d, t01=0x0072}
0xf5be…f5d2               Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x009d, t01=0x00a0}
0xf5d2…f5dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00b4}
0xf5dc…f5e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00be}
0xf5e6…f5f2               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x009d, t01=0x00c8}
0xf5f2…f5f6               Head {h00=0x4004, h01=0x0000}
0xf5f6…f5fa               00 9d 00 d4                                                                                                                                                                                                                                       ┆    ┆
0xf5fa…f602 (158, 1, 8)   20 04 00 00 00 9e 00 04                                                                                                                                                                                                                           ┆        ┆
0xf602…f652 (159, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 46 49 58 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 37 39 31 32 32 37 20 20 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 31 20 20 20 20 20 20 20 20 20 20 20   ┆    LABEL = FIX1              DATE =  791227          PACK NBR =  001           ┆
0xf652…f6a2               00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 01 50 00 9d a0 00 01 59 1a 5f 28 1c 01 59 a2 8f 12 1f d4 4d c0 5c 04 a5 20 00 1f   ┆ f                                                    P     Y _(  Y     M       ┆
0xf6a2…f6f2               f0 3a 85 5c 00 00 15 08 85 5d 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ :       ]    =IR   E                                                           ┆
0xf6f2…f742               20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                          […0x1…]
0xf792…f7e2 (160, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 46 49 58 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 37 39 31 32 32 37 20 20 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 31 20 20 20 20 20 20 20 20 20 20 20   ┆    LABEL = FIX1              DATE =  791227          PACK NBR =  001           ┆
0xf7e2…f832               00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 01 50 00 9d a0 00 01 59 1a 5f 28 1c 01 59 a2 8f 12 1f d4 4d c0 5c 04 a5 20 00 1f   ┆ f                                                    P     Y _(  Y     M       ┆
0xf832…f882               f0 3a 85 5c 00 00 15 08 85 5d 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 02 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ :       ]    =IR   E                                                           ┆
0xf882…f8d2               20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                          […0x1…]
0xf922…f972 (161, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 46 49 58 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 37 39 31 32 32 37 20 20 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 31 20 20 20 20 20 20 20 20 20 20 20   ┆    LABEL = FIX1              DATE =  791227          PACK NBR =  001           ┆
0xf972…f9c2               00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 01 50 00 9d a0 00 01 59 1a 5f 28 1c 01 59 a2 8f 12 1f d4 4d c0 5c 04 a5 20 00 1f   ┆ f                                                    P     Y _(  Y     M       ┆
0xf9c2…fa12               f0 3a 85 5c 00 00 15 08 85 5d 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ :       ]    =IR   E                                                           ┆
0xfa12…fa62               20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                          […0x1…]
0xfab2…fb02 (162, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 46 49 58 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 37 39 31 32 32 37 20 20 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 31 20 20 20 20 20 20 20 20 20 20 20   ┆    LABEL = FIX1              DATE =  791227          PACK NBR =  001           ┆
0xfb02…fb52               00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 01 50 00 9d a0 00 01 59 1a 5f 28 1c 01 59 a2 8f 12 1f d4 4d c0 5c 04 a5 20 00 1f   ┆ f                                                    P     Y _(  Y     M       ┆
0xfb52…fba2               f0 3a 85 5c 00 00 15 08 85 5d 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ :       ]    =IR   E                                                           ┆
0xfba2…fbf2               20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                          […0x1…]
0xfc42…fc92 (163, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 46 49 58 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 37 39 31 32 32 37 20 20 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 31 20 20 20 20 20 20 20 20 20 20 20   ┆    LABEL = FIX1              DATE =  791227          PACK NBR =  001           ┆
0xfc92…fce2               00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 01 50 00 9d a0 00 01 59 1a 5f 28 1c 01 59 a2 8f 12 1f d4 4d c0 5c 04 a5 20 00 1f   ┆ f                                                    P     Y _(  Y     M       ┆
0xfce2…fd32               f0 3a 85 5c 00 00 15 08 85 5d 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ :       ]    =IR   E                                                           ┆
0xfd32…fd82               20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                          […0x1…]
0xfdd2…fe22 (164, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 46 49 58 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 37 39 31 32 32 37 20 20 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 31 20 20 20 20 20 20 20 20 20 20 20   ┆    LABEL = FIX1              DATE =  791227          PACK NBR =  001           ┆
0xfe22…fe72               00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 01 50 00 9d a0 00 01 59 1a 5f 28 1c 01 59 a2 8f 12 1f d4 4d c0 5c 04 a5 20 00 1f   ┆ f                                                    P     Y _(  Y     M       ┆
0xfe72…fec2               f0 3a 85 5c 00 00 15 08 85 5d 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ :       ]    =IR   E                                                           ┆
0xfec2…ff12               20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                          […0x1…]

Reduced view