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

⟦8ec3a198b⟧

    Length: 65352 (0xff48)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«

Derivation

└─⟦fcfed1ed9⟧ Bits:30009706 Philips computer tape "M_167"
    └─⟦this⟧ »M:167D/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	300 
X:B	EQU	1000	TRANSMIT BUFFER LENGTH 
TBUFL	EQU	260 
X:C	EQU	/60	DCTASK FILE CODE
DC15FC	EQU	/60
X:D	EQU	1	IF 1 INTERRUPT LOGGING
LOGG	EQU	0
X:E	EQU	600	POLL TIMEOUT VALUE
TIMPOL	EQU	600
X:F	EQU	1	STATUS AND RVI HANDLING IF=1
STAT	EQU	1
X:G	EQU	1	READ COMMAND HANDLING IF=1
RCOM	EQU	1
X:H	EQU	254	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	252 
X:I	EQU	1	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	1
X:J	EQU	0	IF 1 SPECIFIC POLL HANDLING 
SPECP	EQU	0 
X:K	EQU	1	IF = 1  LINE SPEED SET TO HIGH
			IF = 0  LINE SPEED IS SET TO LOW 
SPEED	EQU	1 
X:L	EQU	0	IF 1 SIEMENS MSV1 PROCEDURE 
MSV1	EQU	0
X:M	EQU	2	NUMBER OF RECEIVE BUFFERS (2-5) 
RBUFNR	EQU	2
X:N	EQU	0	IF = 1  PTS 6805 ADAPTION	SALCUZ
P6805	EQU	00
X:O	EQU	/02 
	IFT	P6805=0
LCUIN	EQU	02	DEVICE ADDRESS OF RECEIVER 
	XIF
	IFT	P6805=1
LCUIN	EQU	/0A	DEVICE ADDRESS OF RECEIVER
	XIF
X:P	EQU	0 
IBMCHR	EQU	0	IF 1 IBM CHARACTER HANDLING
X:Q	EQU	0	IF 1 MESSAGE PASSING TO DC TASK 
MESPAS	EQU	1
X:R	EQU	0	IBM-3270 EMULATION PACKAGE, IF NOT = 0
EM3270	EQU	1
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 300 «, 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 260 «, 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…0aa0               Head {h00=0x000e, h01=0x0050, text=»LOGG EQU 0«, t00=0x0006, t01=0x0138}
0x0aa0…0ac6               Head {h00=0x0022, h01=0x0050, text=»X:E EQU 600 POLL TIMEOUT VALUE«, t00=0x0006, t01=0x014a}
0x0ac6…0adc               Head {h00=0x0012, h01=0x0050, text=»TIMPOL EQU 600«, t00=0x0006, t01=0x0170}
0x0adc…0b0a               Head {h00=0x002a, h01=0x0050, text=»X:F EQU 1 STATUS AND RVI HANDLING IF=1«, t00=0x0006, t01=0x0186}
0x0b0a…0b1c               Head {h00=0x000e, h01=0x0050, text=»STAT EQU 1«, t00=0x0007, t01=0x0024}
0x0b1c…0b48               Head {h00=0x0028, h01=0x0050, text=»X:G EQU 1 READ COMMAND HANDLING IF=1«, t00=0x0007, t01=0x0036}
0x0b48…0b5a               Head {h00=0x000e, h01=0x0050, text=»RCOM EQU 1«, t00=0x0007, t01=0x0062}
0x0b5a…0b84               Head {h00=0x0026, h01=0x0050, text=»X:H EQU 254 TRANSMIT BLOCK LENGTH «, t00=0x0007, t01=0x0074}
0x0b84…0b9a               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU 252 «, t00=0x0007, t01=0x009e}
0x0b9a…0bc6               Head {h00=0x0028, h01=0x0050, text=»X:I EQU 1 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0007, t01=0x00b4}
0x0bc6…0bd8               Head {h00=0x000e, h01=0x0050, text=»CODE EQU 1«, t00=0x0007, t01=0x00e0}
0x0bd8…0c06               Head {h00=0x002a, h01=0x0050, text=»X:J EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0007, t01=0x00f2}
0x0c06…0c1a               Head {h00=0x0010, h01=0x0050, text=»SPECP EQU 0 «, t00=0x0007, t01=0x0120}
0x0c1a…0c4a               Head {h00=0x002c, h01=0x0050, text=»X:K EQU 1 IF = 1  LINE SPEED SET TO HIGH«, t00=0x0007, t01=0x0134}
0x0c4a…0c76               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0007, t01=0x0164}
0x0c76…0c8a               Head {h00=0x0010, h01=0x0050, text=»SPEED EQU 1 «, t00=0x0007, t01=0x0190}
0x0c8a…0cb8               Head {h00=0x002a, h01=0x0050, text=»X:L EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0008, t01=0x0014}
0x0cb8…0cca               Head {h00=0x000e, h01=0x0050, text=»MSV1 EQU 0«, t00=0x0008, t01=0x0042}
0x0cca…0cfc               Head {h00=0x002e, h01=0x0050, text=»X:M EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0008, t01=0x0054}
0x0cfc…0d10               Head {h00=0x0010, h01=0x0050, text=»RBUFNR EQU 2«, t00=0x0008, t01=0x0086}
0x0d10…0d42               Head {h00=0x002e, h01=0x0050, text=»X:N EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x0008, t01=0x009a}
0x0d42…0d56               Head {h00=0x0010, h01=0x0050, text=»P6805 EQU 00«, t00=0x0008, t01=0x00cc}
0x0d56…0d6a               Head {h00=0x0010, h01=0x0050, text=»X:O EQU /02 «, t00=0x0008, t01=0x00e0}
0x0d6a…0d7e               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0008, t01=0x00f4}
0x0d7e…0dae               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU 02 DEVICE ADDRESS OF RECEIVER «, t00=0x0008, t01=0x0108}
0x0dae…0dba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0008, t01=0x0138}
0x0dba…0dce               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0008, t01=0x0144}
0x0dce…0dfe               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0008, t01=0x0158}
0x0dfe…0e0a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0008, t01=0x0188}
0x0e0a…0e1c (9, 0, 400)   Head {h00=0x000e, h01=0x0050, text=»X:P EQU 0 «, t00=0x0009, t01=0x0004}
0x0e1c…0e4c               Head {h00=0x002c, h01=0x0050, text=»IBMCHR EQU 0 IF 1 IBM CHARACTER HANDLING«, t00=0x0009, t01=0x0016}
0x0e4c…0e7e               Head {h00=0x002e, h01=0x0050, text=»X:Q EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x0009, t01=0x0046}
0x0e7e…0e92               Head {h00=0x0010, h01=0x0050, text=»MESPAS EQU 1«, t00=0x0009, t01=0x0078}
0x0e92…0eca               Head {h00=0x0034, h01=0x0050, text=»X:R EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x0009, t01=0x008c}
0x0eca…0ede               Head {h00=0x0010, h01=0x0050, text=»EM3270 EQU 1«, t00=0x0009, t01=0x00c4}
0x0ede…0f0c               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x0009, t01=0x00d8}
0x0f0c…0f3c               Head {h00=0x002c, h01=0x0050, text=»TSTREQ EQU 0 IF 1 TEST REQUEST HANDLING «, t00=0x0009, t01=0x0106}
0x0f3c…0f6c               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 1 SPECIAL CONDITION FOR DENMARK«, t00=0x0009, t01=0x0136}
0x0f6c…0fa4               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x0009, t01=0x0166}
0x0fa4…0fd8               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000a, t01=0x000e}
0x0fd8…100c               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000a, t01=0x0042}
0x100c…103c               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000a, t01=0x0076}
0x103c…1058               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000a, t01=0x00a6}
0x1058…1098               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000a, t01=0x00c2}
0x1098…10ae               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000a, t01=0x0102}
0x10ae…10c2               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000a, t01=0x0118}
0x10c2…1102               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000a, t01=0x012c}
0x1102…1118               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000a, t01=0x016c}
0x1118…1126               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0182}
0x1126…1130               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0190}
0x1130…114a               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000b, t01=0x000a}
0x114a…1154               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0024}
0x1154…115e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x002e}
0x115e…1168               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0038}
0x1168…117a               Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000b, t01=0x0042}
0x117a…1184               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0054}
0x1184…1198               Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000b, t01=0x005e}
0x1198…11ac               Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x000b, t01=0x0072}
0x11ac…11c4               Head {h00=0x0014, h01=0x0050, text=»* /08: EXCHANGE «, t00=0x000b, t01=0x0086}
0x11c4…11e6               Head {h00=0x001e, h01=0x0050, text=»* /22: RELEASE READ BUFFER«, t00=0x000b, t01=0x009e}
0x11e6…1206               Head {h00=0x001c, h01=0x0050, text=»* /31: GET WRITE BUFFER «, t00=0x000b, t01=0x00c0}
0x1206…1228               Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x000b, t01=0x00e0}
0x1228…1242               Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x000b, t01=0x0102}
0x1242…124c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x011c}
0x124c…1256               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0126}
0x1256…1278               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x000b, t01=0x0130}
0x1278…1282               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0152}
0x1282…128c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x015c}
0x128c…12b6               Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x000b, t01=0x0166}
0x12b6…12e4               Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x000b, t01=0x0190}
0x12e4…1308               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x000c, t01=0x002e}
0x1308…1330               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x000c, t01=0x0052}
0x1330…1344               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x000c, t01=0x007a}
0x1344…1372               Head {h00=0x002a, h01=0x0050, text=»DCGWQ DATA 0 GET BUFFER REQUEST QUEUE «, t00=0x000c, t01=0x008e}
0x1372…137e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x00bc}
0x137e…13ae               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x000c, t01=0x00c8}
0x13ae…13de               Head {h00=0x002c, h01=0x0050, text=»DC15DC DATA DCACTD ADDRESS BLOCK DC TASK«, t00=0x000c, t01=0x00f8}
0x13de…1406               Head {h00=0x0024, h01=0x0050, text=»DC15AD DATA DCACT ADDRESS BLOCK «, t00=0x000c, t01=0x0128}
0x1406…1436               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x000c, t01=0x0150}
0x1436…1448               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x000c, t01=0x0180}
0x1448…146e (13, 0, 400)  Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x000d, t01=0x0004}
0x146e…1480               Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x000d, t01=0x002a}
0x1480…1488               Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x003c}
0x1488…149c               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x000d, t01=0x0044}
0x149c…14b4               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x000d, t01=0x0058}
0x14b4…14c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0070}
0x14c0…14d4               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x000d, t01=0x007c}
0x14d4…14e8               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x000d, t01=0x0090}
0x14e8…14f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x00a4}
0x14f4…1502               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x00b0}
0x1502…150c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00be}
0x150c…1516               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c8}
0x1516…153e               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x000d, t01=0x00d2}
0x153e…1548               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00fa}
0x1548…155c               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x000d, t01=0x0104}
0x155c…1580               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x000d, t01=0x0118}
0x1580…1594               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x000d, t01=0x013c}
0x1594…15b6               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DCRD READ SPECIFIC «, t00=0x000d, t01=0x0150}
0x15b6…15ce               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x000d, t01=0x0172}
0x15ce…15e2               Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x000d, t01=0x018a}
0x15e2…15fa               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/08-/06 «, t00=0x000e, t01=0x000e}
0x15fa…1616               Head {h00=0x0018, h01=0x0050, text=» RF(Z) DCEX EXCHANGE«, t00=0x000e, t01=0x0026}
0x1616…162e               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/22-/08 «, t00=0x000e, t01=0x0042}
0x162e…1656               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCRR RELEASE READ BUFFER «, t00=0x000e, t01=0x005a}
0x1656…166e               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/22 «, t00=0x000e, t01=0x0082}
0x166e…1696               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x000e, t01=0x009a}
0x1696…16ae               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x000e, t01=0x00c2}
0x16ae…16c2               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x000e, t01=0x00da}
0x16c2…16e0               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCSS SET STATUS«, t00=0x000e, t01=0x00ee}
0x16e0…16ec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x010c}
0x16ec…1700               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x000e, t01=0x0118}
0x1700…1718               Head {h00=0x0014, h01=0x0050, text=» ADK A7,/38-/31 «, t00=0x000e, t01=0x012c}
0x1718…173c               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DCGW GET WRITE BUFFER«, t00=0x000e, t01=0x0144}
0x173c…1748               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0168}
0x1748…175a               Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x000e, t01=0x0174}
0x175a…1768               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0186}
0x1768…1772 (15, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0004}
0x1772…177c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x000e}
0x177c…179c               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x000f, t01=0x0018}
0x179c…17a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0038}
0x17a6…17b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0042}
0x17b0…17c4               Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x000f, t01=0x004c}
0x17c4…17d8               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x000f, t01=0x0060}
0x17d8…17f2               Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x000f, t01=0x0074}
0x17f2…180a               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/22-/02 «, t00=0x000f, t01=0x008e}
0x180a…1832               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCRR RELEASE READ BUFFER «, t00=0x000f, t01=0x00a6}
0x1832…184a               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/22 «, t00=0x000f, t01=0x00ce}
0x184a…1872               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x000f, t01=0x00e6}
0x1872…1894               Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x000f, t01=0x010e}
0x1894…18b6               Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x000f, t01=0x0130}
0x18b6…18c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0152}
0x18c0…18ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x015c}
0x18ca…18e4               Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x000f, t01=0x0166}
0x18e4…18ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0180}
0x18ee…18f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x018a}
0x18f8…1916 (16, 0, 400)  Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0010, t01=0x0004}
0x1916…192e               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0010, t01=0x0022}
0x192e…1958               Head {h00=0x0026, h01=0x0050, text=»*   STATUS CHANGE ON DC EQUIPMENT «, t00=0x0010, t01=0x003a}
0x1958…1980               Head {h00=0x0024, h01=0x0050, text=»*   SPONTANOUS MESSAGE RECEPTION«, t00=0x0010, t01=0x0064}
0x1980…198a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x008c}
0x198a…199e               Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0010, t01=0x0096}
0x199e…19ce               Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0010, t01=0x00aa}
0x19ce…19e2               Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0010, t01=0x00da}
0x19e2…1a06               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0010, t01=0x00ee}
0x1a06…1a14               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0112}
0x1a14…1a1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0120}
0x1a1e…1a28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x012a}
0x1a28…1a46               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0010, t01=0x0134}
0x1a46…1a50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0152}
0x1a50…1a5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x015c}
0x1a5a…1a9c               Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0010, t01=0x0166}
0x1a9c…1ada               Head {h00=0x003a, h01=0x0050, text=»*         FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0011, t01=0x0018}
0x1ada…1ae4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0056}
0x1ae4…1aee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0060}
0x1aee…1b02               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0011, t01=0x006a}
0x1b02…1b2c               Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0011, t01=0x007e}
0x1b2c…1b38               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x00a8}
0x1b38…1b4c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0011, t01=0x00b4}
0x1b4c…1b76               Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0011, t01=0x00c8}
0x1b76…1b8a               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0011, t01=0x00f2}
0x1b8a…1ba0               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x0011, t01=0x0106}
0x1ba0…1bcc               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0011, t01=0x011c}
0x1bcc…1bde               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0011, t01=0x0148}
0x1bde…1bf2               Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x0011, t01=0x015a}
0x1bf2…1c1a               Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x0011, t01=0x016e}
0x1c1a…1c2e               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0012, t01=0x0008}
0x1c2e…1c5a               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x0012, t01=0x001c}
0x1c5a…1c66               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0048}
0x1c66…1c92               Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x0012, t01=0x0054}
0x1c92…1c9a               Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x0080}
0x1c9a…1cae               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0012, t01=0x0088}
0x1cae…1cdc               Head {h00=0x002a, h01=0x0050, text=» LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS «, t00=0x0012, t01=0x009c}
0x1cdc…1cf4               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTBUF,A6«, t00=0x0012, t01=0x00ca}
0x1cf4…1d20               Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBRL,A8 CURSOR ADDRESS WORD «, t00=0x0012, t01=0x00e2}
0x1d20…1d38               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTCUR,A6«, t00=0x0012, t01=0x010e}
0x1d38…1d44               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0126}
0x1d44…1d6a               Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x0012, t01=0x0132}
0x1d6a…1da0               Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!!  SHOULD NOT BE IN DC:TAB «, t00=0x0012, t01=0x0158}
0x1da0…1dce               Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x0012, t01=0x018e}
0x1dce…1dfc               Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x0013, t01=0x002c}
0x1dfc…1e26               Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x0013, t01=0x005a}
0x1e26…1e34               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0084}
0x1e34…1e3c               Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0092}
0x1e3c…1e44               Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x009a}
0x1e44…1e58               Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x0013, t01=0x00a2}
0x1e58…1e6e               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=0 «, t00=0x0013, t01=0x00b6}
0x1e6e…1e94               Head {h00=0x0022, h01=0x0050, text=» LDKL A5,STB2 LOAD STACK BASE «, t00=0x0013, t01=0x00cc}
0x1e94…1ec4               Head {h00=0x002c, h01=0x0050, text=» CF A5,FINTER DWT ALREADY IN DC:TAB ??? «, t00=0x0013, t01=0x00f2}
0x1ec4…1ed6               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0013, t01=0x0122}
0x1ed6…1ef4               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) DCTP30 YES!!! «, t00=0x0013, t01=0x0134}
0x1ef4…1f00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0152}
0x1f00…1f28               Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x0013, t01=0x015e}
0x1f28…1f3a               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0013, t01=0x0186}
0x1f3a…1f68               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x0014, t01=0x0008}
0x1f68…1f70               Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0036}
0x1f70…1f9e               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x0014, t01=0x003e}
0x1f9e…1fb2               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0014, t01=0x006c}
0x1fb2…1fce               Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x0014, t01=0x0080}
0x1fce…1fe6               Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x0014, t01=0x009c}
0x1fe6…2012               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x0014, t01=0x00b4}
0x2012…201e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x00e0}
0x201e…2032               Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x0014, t01=0x00ec}
0x2032…2056               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x0014, t01=0x0100}
0x2056…206a               Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0014, t01=0x0124}
0x206a…2092               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0014, t01=0x0138}
0x2092…20a4               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0014, t01=0x0160}
0x20a4…20b2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0172}
0x20b2…20bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0180}
0x20bc…20c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x018a}
0x20c6…20d6 (21, 0, 400)  Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x0015, t01=0x0004}
0x20d6…20e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0014}
0x20e0…20ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x001e}
0x20ea…2102               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0015, t01=0x0028}
0x2102…2124               Head {h00=0x001e, h01=0x0050, text=»*   SUCCESFUL TRANSMISSION«, t00=0x0015, t01=0x0040}
0x2124…2138               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0015, t01=0x0062}
0x2138…2142               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0076}
0x2142…214c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0080}
0x214c…215e               Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x0015, t01=0x008a}
0x215e…217e               Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x0015, t01=0x009c}
0x217e…21a2               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ  QUEUE REQUEST«, t00=0x0015, t01=0x00bc}
0x21a2…21b4               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0015, t01=0x00e0}
0x21b4…21be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f2}
0x21be…21c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00fc}
0x21c8…21d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0106}
0x21d2…21e0               Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x0015, t01=0x0110}
0x21e0…21ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x011e}
0x21ea…21f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0128}
0x21f4…220c               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0015, t01=0x0132}
0x220c…2228               Head {h00=0x0018, h01=0x0050, text=»*   MESSAGE RECEIVED«, t00=0x0015, t01=0x014a}
0x2228…223c               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0015, t01=0x0166}
0x223c…2246               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x017a}
0x2246…2250               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0184}
0x2250…2262               Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x0015, t01=0x018e}
0x2262…2282               Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x0016, t01=0x0010}
0x2282…22b4               Head {h00=0x002e, h01=0x0050, text=» LD A3,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x0016, t01=0x0030}
0x22b4…22da               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x0016, t01=0x0062}
0x22da…22e2               Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0088}
0x22e2…230e               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A3 TAKE THE FIRST IN QUEUE «, t00=0x0016, t01=0x0090}
0x230e…2326               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x0016, t01=0x00bc}
0x2326…2338               Head {h00=0x000e, h01=0x0050, text=» ADK A3,6 «, t00=0x0016, t01=0x00d4}
0x2338…2350               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBBA,A8 «, t00=0x0016, t01=0x00e6}
0x2350…237a               Head {h00=0x0026, h01=0x0050, text=» LD A4,-4,A3 AND EFFECTIVE LENGTH «, t00=0x0016, t01=0x00fe}
0x237a…2392               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBEL,A8 «, t00=0x0016, t01=0x0128}
0x2392…23a4               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0016, t01=0x0140}
0x23a4…23ba               Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x0016, t01=0x0152}
0x23ba…23cc               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0016, t01=0x0168}
0x23cc…23d4               Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x017a}
0x23d4…23fc               Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x0016, t01=0x0182}
0x23fc…240e               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0017, t01=0x001a}
0x240e…241c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x002c}
0x241c…2426               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x003a}
0x2426…2430               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0044}
0x2430…244a               Head {h00=0x0016, h01=0x0050, text=»* GET WRITE BUFFER«, t00=0x0017, t01=0x004e}
0x244a…2454               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0068}
0x2454…245e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0072}
0x245e…2472               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0017, t01=0x007c}
0x2472…248a               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0017, t01=0x0090}
0x248a…24aa               Head {h00=0x001c, h01=0x0050, text=»*   BUFFER BEEN ALOCATED«, t00=0x0017, t01=0x00a8}
0x24aa…24be               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0017, t01=0x00c8}
0x24be…24c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00dc}
0x24c8…24d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00e6}
0x24d2…24e4               Head {h00=0x000e, h01=0x0050, text=»DCGW EQU *«, t00=0x0017, t01=0x00f0}
0x24e4…250e               Head {h00=0x0026, h01=0x0050, text=» CF A15,GTBUF GET TRANSMIT BUFFER «, t00=0x0017, t01=0x0102}
0x250e…2520               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0017, t01=0x012c}
0x2520…2544               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DCGW10 NO FREE BUFFER«, t00=0x0017, t01=0x013e}
0x2544…255c               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x0017, t01=0x0162}
0x255c…2578               Head {h00=0x0018, h01=0x0050, text=» LDKL A1,TBUFL+TBUFL«, t00=0x0017, t01=0x017a}
0x2578…25a4               Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBEL,A8 STORE BUFFER LENGTH «, t00=0x0018, t01=0x0008}
0x25a4…25b6               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0018, t01=0x0034}
0x25b6…25d8               Head {h00=0x001e, h01=0x0050, text=» RB ENDIO COMPLETE REQUEST«, t00=0x0018, t01=0x0046}
0x25d8…25ec               Head {h00=0x0010, h01=0x0050, text=»DCGW10 EQU *«, t00=0x0018, t01=0x0068}
0x25ec…260e               Head {h00=0x001e, h01=0x0050, text=» CF A15,TIMERE START TIMER«, t00=0x0018, t01=0x007c}
0x260e…2632               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSGWQ QUEUE REQUEST«, t00=0x0018, t01=0x009e}
0x2632…2644               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0018, t01=0x00c2}
0x2644…2650               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00d4}
0x2650…265e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x00e0}
0x265e…2668               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00ee}
0x2668…2672               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f8}
0x2672…2690               Head {h00=0x001a, h01=0x0050, text=»* RELEASE READ BUFFER «, t00=0x0018, t01=0x0102}
0x2690…269a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0120}
0x269a…26a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x012a}
0x26a4…26c0               Head {h00=0x0018, h01=0x0050, text=»DCRR LD A4,ECBBA,A8 «, t00=0x0018, t01=0x0134}
0x26c0…26d2               Head {h00=0x000e, h01=0x0050, text=» SUK A4,6 «, t00=0x0018, t01=0x0150}
0x26d2…26e8               Head {h00=0x0012, h01=0x0050, text=» CF A15,RRBUF «, t00=0x0018, t01=0x0162}
0x26e8…26fc               Head {h00=0x0010, h01=0x0050, text=»DCRR10 EQU *«, t00=0x0018, t01=0x0178}
0x26fc…270e               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0018, t01=0x018c}
0x270e…273c               Head {h00=0x002a, h01=0x0050, text=» CF A15,TENDIO COMPLETE RRBUF REQUEST «, t00=0x0019, t01=0x000e}
0x273c…274e               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0019, t01=0x003c}
0x274e…275c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x004e}
0x275c…2766               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x005c}
0x2766…2770               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0066}
0x2770…2782               Head {h00=0x000e, h01=0x0050, text=»* EXCHANGE«, t00=0x0019, t01=0x0070}
0x2782…278c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0082}
0x278c…2796               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x008c}
0x2796…27a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0096}
0x27a0…27b8               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0019, t01=0x00a0}
0x27b8…27de               Head {h00=0x0022, h01=0x0050, text=»*   MESSAGE PASSED TO TERMINAL«, t00=0x0019, t01=0x00b8}
0x27de…27f2               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0019, t01=0x00de}
0x27f2…27fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00f2}
0x27fc…280e               Head {h00=0x000e, h01=0x0050, text=»DCEX EQU *«, t00=0x0019, t01=0x00fc}
0x280e…283c               Head {h00=0x002a, h01=0x0050, text=» RB DCWR SAME INITIALIZATION AS WRITE «, t00=0x0019, t01=0x010e}
0x283c…2846               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x013c}
0x2846…2850               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0146}
0x2850…2864               Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x0019, t01=0x0150}
0x2864…286e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0164}
0x286e…2878               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x016e}
0x2878…288c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0019, t01=0x0178}
0x288c…289e               Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x0019, t01=0x018c}
0x289e…28cc               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x001a, t01=0x000e}
0x28cc…28e8               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x001a, t01=0x003c}
0x28e8…2908               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x001a, t01=0x0058}
0x2908…291c               Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x001a, t01=0x0078}
0x291c…2934               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x001a, t01=0x008c}
0x2934…2958               Head {h00=0x0020, h01=0x0050, text=» RB DCRR10 COMPLETE REQUEST «, t00=0x001a, t01=0x00a4}
0x2958…296c               Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x001a, t01=0x00c8}
0x296c…2984               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x001a, t01=0x00dc}
0x2984…2996               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x001a, t01=0x00f4}
0x2996…29c2               Head {h00=0x0028, h01=0x0050, text=» RB(Z) DCSS10 WACK HAS NOT BEEN SENT«, t00=0x001a, t01=0x0106}
0x29c2…29d6               Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x001a, t01=0x0132}
0x29d6…2a06               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x001a, t01=0x0146}
0x2a06…2a1e               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x001a, t01=0x0176}
0x2a1e…2a30               Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x001a, t01=0x018e}
0x2a30…2a3c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0010}
0x2a3c…2a4a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x001c}
0x2a4a…2a54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x002a}
0x2a54…2a5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0034}
0x2a5e…2a68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x003e}
0x2a68…2a86               Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x001b, t01=0x0048}
0x2a86…2a90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0066}
0x2a90…2a9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0070}
0x2a9a…2aa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x007a}
0x2aa4…2ac0               Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x001b, t01=0x0084}
0x2ac0…2aca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00a0}
0x2aca…2ade               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x001b, t01=0x00aa}
0x2ade…2af0               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x001b, t01=0x00be}
0x2af0…2b1a               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBCW,A8 GET TIMEOUT VALUE «, t00=0x001b, t01=0x00d0}
0x2b1a…2b3a               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x001b, t01=0x00fa}
0x2b3a…2b50               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x001b, t01=0x011a}
0x2b50…2b66               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x001b, t01=0x0130}
0x2b66…2b7a               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x001b, t01=0x0146}
0x2b7a…2b90               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x001b, t01=0x015a}
0x2b90…2bbc               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x001b, t01=0x0170}
0x2bbc…2bd0               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x001c, t01=0x000c}
0x2bd0…2bea               Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x001c, t01=0x0020}
0x2bea…2bf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x003a}
0x2bf4…2c10               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x001c, t01=0x0044}
0x2c10…2c1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0060}
0x2c1a…2c2e               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x001c, t01=0x006a}
0x2c2e…2c4a               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x001c, t01=0x007e}
0x2c4a…2c5e               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x001c, t01=0x009a}
0x2c5e…2c72               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x001c, t01=0x00ae}
0x2c72…2c9a               Head {h00=0x0024, h01=0x0050, text=» CF A15,REMOVG REMOVE FROM QUEUE«, t00=0x001c, t01=0x00c2}
0x2c9a…2ca6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00ea}
0x2ca6…2cba               Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x001c, t01=0x00f6}
0x2cba…2ce0               Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x001c, t01=0x010a}
0x2ce0…2d10               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTOR,A6 CHECK IF EXCHANGE ORDER «, t00=0x001c, t01=0x0130}
0x2d10…2d22               Head {h00=0x000e, h01=0x0050, text=» SUK A2,8 «, t00=0x001c, t01=0x0160}
0x2d22…2d46               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TOUTR2 NOT EXCHANGE «, t00=0x001c, t01=0x0172}
0x2d46…2d7c               Head {h00=0x0032, h01=0x0050, text=» ORK A1,2 RETURN CODE /42 AT EXCHANGE TIME OUT«, t00=0x001d, t01=0x0008}
0x2d7c…2da4               Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x001d, t01=0x003e}
0x2da4…2dae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0066}
0x2dae…2dca               Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x001d, t01=0x0070}
0x2dca…2dd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x008c}
0x2dd4…2dec               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x001d, t01=0x0096}
0x2dec…2e16               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBCW,A8 GET TIMEOUT VALUE «, t00=0x001d, t01=0x00ae}
0x2e16…2e36               Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x001d, t01=0x00d8}
0x2e36…2e4a               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x001d, t01=0x00f8}
0x2e4a…2e60               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x001d, t01=0x010c}
0x2e60…2e74               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x001d, t01=0x0122}
0x2e74…2e88               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x001d, t01=0x0136}
0x2e88…2ea0               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x001d, t01=0x014a}
0x2ea0…2eb2               Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x001d, t01=0x0162}
0x2eb2…2ec0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x0174}
0x2ec0…2eca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0182}
0x2eca…2ee8               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x001d, t01=0x018c}
0x2ee8…2ef2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x001a}
0x2ef2…2f06               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x001e, t01=0x0024}
0x2f06…2f22               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x001e, t01=0x0038}
0x2f22…2f36               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x001e, t01=0x0054}
0x2f36…2f58               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x001e, t01=0x0068}
0x2f58…2f6a               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x001e, t01=0x008a}
0x2f6a…2f86               Head {h00=0x0018, h01=0x0050, text=» RF(Z) TOUT10 WRITE «, t00=0x001e, t01=0x009c}
0x2f86…2f98               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x001e, t01=0x00b8}
0x2f98…2fc4               Head {h00=0x0028, h01=0x0050, text=» RB(NZ) TOUTR1 ORDER IS NOT EXCHANGE«, t00=0x001e, t01=0x00ca}
0x2fc4…2fe2               Head {h00=0x001a, h01=0x0050, text=»TOUT10 LD A2,DWTECB,A6«, t00=0x001e, t01=0x00f6}
0x2fe2…3006               Head {h00=0x0020, h01=0x0050, text=» LD A4,ECBBA,A2 FETCH BUFFER«, t00=0x001e, t01=0x0114}
0x3006…301a               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x001e, t01=0x0138}
0x301a…3046               Head {h00=0x0028, h01=0x0050, text=» CF A15,RTBUF RELEASE TRANSMITBUFFER«, t00=0x001e, t01=0x014c}
0x3046…3072               Head {h00=0x0028, h01=0x0050, text=» CF A15,CKGBQ CHECK GET BUFFER QUEUE«, t00=0x001e, t01=0x0178}
0x3072…307e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0014}
0x307e…30ac               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x001f, t01=0x0020}
0x30ac…30b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x004e}
0x30b6…30e0               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x001f, t01=0x0058}
0x30e0…3104               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x001f, t01=0x0082}
0x3104…3130               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x001f, t01=0x00a6}
0x3130…3146               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x001f, t01=0x00d2}
0x3146…3158               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x001f, t01=0x00e8}
0x3158…3184               Head {h00=0x0028, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT NOT WRITING «, t00=0x001f, t01=0x00fa}
0x3184…3196               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x001f, t01=0x0126}
0x3196…31a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0138}
0x31a0…31aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0142}
0x31aa…31bc               Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x001f, t01=0x014c}
0x31bc…31ca               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x015e}
0x31ca…31d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x016c}
0x31d4…31de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0176}
0x31de…31fc               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x001f, t01=0x0180}
0x31fc…3206               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x000e}
0x3206…3230               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0020, t01=0x0018}
0x3230…323a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0042}
0x323a…3244               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x004c}
0x3244…3258               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0020, t01=0x0056}
0x3258…3282               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0020, t01=0x006a}
0x3282…32a4               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0020, t01=0x0094}
0x32a4…32b8               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0020, t01=0x00b6}
0x32b8…32de               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0020, t01=0x00ca}
0x32de…32fe               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0020, t01=0x00f0}
0x32fe…3312               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0020, t01=0x0110}
0x3312…3326               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0020, t01=0x0124}
0x3326…3338               Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0020, t01=0x0138}
0x3338…3346               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x014a}
0x3346…3350               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0158}
0x3350…336c               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0020, t01=0x0162}
0x336c…3376               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x017e}
0x3376…339e               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0020, t01=0x0188}
0x339e…33c2               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0021, t01=0x0020}
0x33c2…33ec               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0021, t01=0x0044}
0x33ec…340e               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0021, t01=0x006e}
0x340e…3418               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0090}
0x3418…3422               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x009a}
0x3422…344e               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0021, t01=0x00a4}
0x344e…345e               Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x0021, t01=0x00d0}
0x345e…3472               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x0021, t01=0x00e0}
0x3472…3496               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x0021, t01=0x00f4}
0x3496…34c8               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x0021, t01=0x0118}
0x34c8…34da               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0021, t01=0x014a}
0x34da…3508               Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0021, t01=0x015c}
0x3508…352a               Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x0021, t01=0x018a}
0x352a…3534               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x001c}
0x3534…353e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0026}
0x353e…355c               Head {h00=0x001a, h01=0x0050, text=»* GET TRANSMIT BUFFER «, t00=0x0022, t01=0x0030}
0x355c…3566               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x004e}
0x3566…357a               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0022, t01=0x0058}
0x357a…35a2               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GTBUF«, t00=0x0022, t01=0x006c}
0x35a2…35c6               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0022, t01=0x0094}
0x35c6…35f0               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0022, t01=0x00b8}
0x35f0…3612               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0022, t01=0x00e2}
0x3612…361c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0104}
0x361c…3626               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x010e}
0x3626…3654               Head {h00=0x002a, h01=0x0050, text=»GTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS «, t00=0x0022, t01=0x0118}
0x3654…3664               Head {h00=0x000c, h01=0x0050, text=» RB GBUF«, t00=0x0022, t01=0x0146}
0x3664…3672               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x0156}
0x3672…367c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0164}
0x367c…3686               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x016e}
0x3686…36a6               Head {h00=0x001c, h01=0x0050, text=»* CHECK GET BUFFER QUEUE«, t00=0x0022, t01=0x0178}
0x36a6…36b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0008}
0x36b0…36ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0012}
0x36ba…36ce               Head {h00=0x0010, h01=0x0050, text=»CKGBQ EQU * «, t00=0x0023, t01=0x001c}
0x36ce…36e8               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x0023, t01=0x0030}
0x36e8…370e               Head {h00=0x0022, h01=0x0050, text=» LD A6,DCGWQ GET QUEUE ANCHOR «, t00=0x0023, t01=0x004a}
0x370e…3734               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKG110 NO ONE ON QUEUE «, t00=0x0023, t01=0x0070}
0x3734…374a               Head {h00=0x0012, h01=0x0050, text=» SUK A6,DWTWQ «, t00=0x0023, t01=0x0096}
0x374a…3762               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0023, t01=0x00ac}
0x3762…3782               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKG100 NO REQUEST«, t00=0x0023, t01=0x00c4}
0x3782…379a               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTOR,A6 «, t00=0x0023, t01=0x00e4}
0x379a…37ae               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/31 «, t00=0x0023, t01=0x00fc}
0x37ae…37da               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CKG100 NO GET BUFFER REQUEST«, t00=0x0023, t01=0x0110}
0x37da…3804               Head {h00=0x0026, h01=0x0050, text=» CF A15,GTBUF GET TRANSMIT BUFFER «, t00=0x0023, t01=0x013c}
0x3804…3816               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0023, t01=0x0166}
0x3816…383a               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CKG110 NO BUFFER FREE«, t00=0x0023, t01=0x0178}
0x383a…3852               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTECB,A6«, t00=0x0024, t01=0x000c}
0x3852…387e               Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBBA,A3 STORE BUFFER ADDRESS«, t00=0x0024, t01=0x0024}
0x387e…389a               Head {h00=0x0018, h01=0x0050, text=» LDKL A1,TBUFL+TBUFL«, t00=0x0024, t01=0x0050}
0x389a…38c6               Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBEL,A3 STORE BUFFER LENGTH «, t00=0x0024, t01=0x006c}
0x38c6…38f0               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x0024, t01=0x0098}
0x38f0…391c               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A3 STORE REMAINING TIME«, t00=0x0024, t01=0x00c2}
0x391c…392e               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0024, t01=0x00ee}
0x392e…3956               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0024, t01=0x0100}
0x3956…396a               Head {h00=0x0010, h01=0x0050, text=»CKG100 EQU *«, t00=0x0024, t01=0x0128}
0x396a…3992               Head {h00=0x0024, h01=0x0050, text=» CF A15,REMOVG REMOVE FROM QUEUE«, t00=0x0024, t01=0x013c}
0x3992…39b6               Head {h00=0x0020, h01=0x0050, text=»CKG110 LDR A6,A7 RESTORE A6 «, t00=0x0024, t01=0x0164}
0x39b6…39d0               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0024, t01=0x0188}
0x39d0…39dc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0012}
0x39dc…39ea               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x001e}
0x39ea…39f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x002c}
0x39f4…39fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0036}
0x39fe…3a1e               Head {h00=0x001c, h01=0x0050, text=»* RELEASE RECEIVE BUFFER«, t00=0x0025, t01=0x0040}
0x3a1e…3a28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0060}
0x3a28…3a4c               Head {h00=0x0020, h01=0x0050, text=»* A4 CONTAINS BUFFER ADDRESS«, t00=0x0025, t01=0x006a}
0x3a4c…3a74               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,RRBUF«, t00=0x0025, t01=0x008e}
0x3a74…3a96               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0025, t01=0x00b6}
0x3a96…3aa0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00d8}
0x3aa0…3aaa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00e2}
0x3aaa…3ad6               Head {h00=0x0028, h01=0x0050, text=»RRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0025, t01=0x00ec}
0x3ad6…3ae6               Head {h00=0x000c, h01=0x0050, text=»RBUF INH«, t00=0x0025, t01=0x0118}
0x3ae6…3afa               Head {h00=0x0010, h01=0x0050, text=»RBUF10 EQU *«, t00=0x0025, t01=0x0128}
0x3afa…3b0e               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x0025, t01=0x013c}
0x3b0e…3b24               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RBUF20 «, t00=0x0025, t01=0x0150}
0x3b24…3b36               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0025, t01=0x0166}
0x3b36…3b48               Head {h00=0x000e, h01=0x0050, text=» RB RBUF10«, t00=0x0025, t01=0x0178}
0x3b48…3b5c               Head {h00=0x0010, h01=0x0050, text=»RBUF20 EQU *«, t00=0x0025, t01=0x018a}
0x3b5c…3b6e               Head {h00=0x000e, h01=0x0050, text=» STR A4,A2«, t00=0x0026, t01=0x000e}
0x3b6e…3b7e               Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x0026, t01=0x0020}
0x3b7e…3ba2               Head {h00=0x0020, h01=0x0050, text=» RB GBUF10 RETURN TO CALLER «, t00=0x0026, t01=0x0030}
0x3ba2…3bac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0054}
0x3bac…3bb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x005e}
0x3bb6…3bd8               Head {h00=0x001e, h01=0x0050, text=»* RELEASE TRANSMIT BUFFER «, t00=0x0026, t01=0x0068}
0x3bd8…3be2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x008a}
0x3be2…3bf6               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0026, t01=0x0094}
0x3bf6…3c1a               Head {h00=0x0020, h01=0x0050, text=»* A4 CONTAINS BUFFER ADDRESS«, t00=0x0026, t01=0x00a8}
0x3c1a…3c42               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,RTBUF«, t00=0x0026, t01=0x00cc}
0x3c42…3c64               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0026, t01=0x00f4}
0x3c64…3c6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0116}
0x3c6e…3c78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0120}
0x3c78…3ca6               Head {h00=0x002a, h01=0x0050, text=»RTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS «, t00=0x0026, t01=0x012a}
0x3ca6…3cbc               Head {h00=0x0012, h01=0x0050, text=» CWK A4,TBUF1 «, t00=0x0026, t01=0x0158}
0x3cbc…3cde               Head {h00=0x001e, h01=0x0050, text=» RB(E) RBUF DRIVER BUFFER «, t00=0x0026, t01=0x016e}
0x3cde…3cf4               Head {h00=0x0012, h01=0x0050, text=» CWK A4,TBUF2 «, t00=0x0026, t01=0x0190}
0x3cf4…3d16               Head {h00=0x001e, h01=0x0050, text=» RB(E) RBUF DRIVER BUFFER «, t00=0x0027, t01=0x0016}
0x3d16…3d3c               Head {h00=0x0022, h01=0x0050, text=» RB GBUF10 APPLICATION BUFFER «, t00=0x0027, t01=0x0038}
0x3d3c…3d48               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x005e}
0x3d48…3d56               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x006a}
0x3d56…3d60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0078}
0x3d60…3d6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0082}
0x3d6a…3d96               Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x0027, t01=0x008c}
0x3d96…3da0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00b8}
0x3da0…3dbc               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0027, t01=0x00c2}
0x3dbc…3dcc               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0027, t01=0x00de}
0x3dcc…3dd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00ee}
0x3dd6…3e02               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0027, t01=0x00f8}
0x3e02…3e1e               Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x0027, t01=0x0124}
0x3e1e…3e38               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0027, t01=0x0140}
0x3e38…3e60               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0027, t01=0x015a}
0x3e60…3e72               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0027, t01=0x0182}
0x3e72…3e84 (40, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0028, t01=0x0004}
0x3e84…3e9c               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0028, t01=0x0016}
0x3e9c…3ebe               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0028, t01=0x002e}
0x3ebe…3ee4               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0028, t01=0x0050}
0x3ee4…3efe               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0028, t01=0x0076}
0x3efe…3f08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0090}
0x3f08…3f12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x009a}
0x3f12…3f40               Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x0028, t01=0x00a4}
0x3f40…3f4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00d2}
0x3f4a…3f66               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0028, t01=0x00dc}
0x3f66…3f76               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0028, t01=0x00f8}
0x3f76…3f80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0108}
0x3f80…3fae               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x0028, t01=0x0112}
0x3fae…3fe4               Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x0028, t01=0x0140}
0x3fe4…3ff8               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x0028, t01=0x0176}
0x3ff8…400c               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x0028, t01=0x018a}
0x400c…4024               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x0029, t01=0x000e}
0x4024…404e               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x0029, t01=0x0026}
0x404e…4060               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x0029, t01=0x0050}
0x4060…4074               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x0029, t01=0x0062}
0x4074…4090               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x0029, t01=0x0076}
0x4090…40a2               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x0029, t01=0x0092}
0x40a2…40c2               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x0029, t01=0x00a4}
0x40c2…40d4               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0029, t01=0x00c4}
0x40d4…40ee               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0029, t01=0x00d6}
0x40ee…40fc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x00f0}
0x40fc…4106               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00fe}
0x4106…4110               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0108}
0x4110…411a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0112}
0x411a…4148               Head {h00=0x002a, h01=0x0050, text=»* INSERT DWT IN GET WRITE BUFFER QUEUE«, t00=0x0029, t01=0x011c}
0x4148…4152               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x014a}
0x4152…4166               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0029, t01=0x0154}
0x4166…4182               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0029, t01=0x0168}
0x4182…4192               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0029, t01=0x0184}
0x4192…419c (42, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0004}
0x419c…41ca               Head {h00=0x002a, h01=0x0050, text=»INSGWQ LDKL A2,DCGWQ GET QUEUE ANCHOR «, t00=0x002a, t01=0x000e}
0x41ca…41dc               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ1«, t00=0x002a, t01=0x003c}
0x41dc…41e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x004e}
0x41e6…41f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0058}
0x41f0…4220               Head {h00=0x002c, h01=0x0050, text=»* REMOVE DWT FROM GET WRITE BUFFER QUEUE«, t00=0x002a, t01=0x0062}
0x4220…422a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0092}
0x422a…4246               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002a, t01=0x009c}
0x4246…4256               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002a, t01=0x00b8}
0x4256…4260               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00c8}
0x4260…428e               Head {h00=0x002a, h01=0x0050, text=»REMOVG LDKL A2,DCGWQ GET QUEUE ANCHOR «, t00=0x002a, t01=0x00d2}
0x428e…42a0               Head {h00=0x000e, h01=0x0050, text=» RB REM05 «, t00=0x002a, t01=0x0100}
0x42a0…42ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0112}
0x42ac…42ba               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x011e}
0x42ba…42c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x012c}
0x42c4…42ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0136}
0x42ce…42f2               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x002a, t01=0x0140}
0x42f2…42fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0164}
0x42fc…4310               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x002a, t01=0x016e}
0x4310…432c               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002a, t01=0x0182}
0x432c…433c               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x000e}
0x433c…4346               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x001e}
0x4346…4372               Head {h00=0x0028, h01=0x0050, text=»INSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR«, t00=0x002b, t01=0x0028}
0x4372…4388               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002b, t01=0x0054}
0x4388…439a               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002b, t01=0x006a}
0x439a…43a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x007c}
0x43a4…43ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0086}
0x43ae…43d4               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x002b, t01=0x0090}
0x43d4…43de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00b6}
0x43de…43fa               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x00c0}
0x43fa…440a               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x00dc}
0x440a…4414               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00ec}
0x4414…4442               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002b, t01=0x00f6}
0x4442…4458               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002b, t01=0x0124}
0x4458…446a               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x002b, t01=0x013a}
0x446a…4476               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x014c}
0x4476…4484               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0158}
0x4484…448e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0166}
0x448e…4498               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0170}
0x4498…44c0               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x002b, t01=0x017a}
0x44c0…44ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0012}
0x44ca…44e2               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x002c, t01=0x001c}
0x44e2…44fc               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002c, t01=0x0034}
0x44fc…4506               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x004e}
0x4506…451a               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002c, t01=0x0058}
0x451a…4530               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002c, t01=0x006c}
0x4530…455c               Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002c, t01=0x0082}
0x455c…4568               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x00ae}
0x4568…457e               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002c, t01=0x00ba}
0x457e…45a6               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002c, t01=0x00d0}
0x45a6…45b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x00f8}
0x45b2…45e2               Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002c, t01=0x0104}
0x45e2…45f6               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002c, t01=0x0134}
0x45f6…460a               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002c, t01=0x0148}
0x460a…4632               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002c, t01=0x015c}
0x4632…4644               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002c, t01=0x0184}
0x4644…4656               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002d, t01=0x0008}
0x4656…4680               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002d, t01=0x001a}
0x4680…46a6               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002d, t01=0x0044}
0x46a6…46b6               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002d, t01=0x006a}
0x46b6…46c4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x007a}
0x46c4…46ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0088}
0x46ce…46d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0092}
0x46d8…470e               Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x002d, t01=0x009c}
0x470e…4718               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00d2}
0x4718…4750               Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x002d, t01=0x00dc}
0x4750…475a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0114}
0x475a…4778               Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x002d, t01=0x011e}
0x4778…4790               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x002d, t01=0x013c}
0x4790…47b0               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x002d, t01=0x0154}
0x47b0…47d0               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x002d, t01=0x0174}
0x47d0…47e8 (46, 0, 400)  Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x002e, t01=0x0004}
0x47e8…4802               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x002e, t01=0x001c}
0x4802…482a               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x002e, t01=0x0036}
0x482a…4858               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x002e, t01=0x005e}
0x4858…487e               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x002e, t01=0x008c}
0x487e…48ae               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x002e, t01=0x00b2}
0x48ae…48e0               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x002e, t01=0x00e2}
0x48e0…4906               Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x002e, t01=0x0114}
0x4906…4934               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBBA,A8 SAVE THIS ADDR IN ECB «, t00=0x002e, t01=0x013a}
0x4934…4948               Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x002e, t01=0x0168}
0x4948…497c               Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x002e, t01=0x017c}
0x497c…4990               Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x002f, t01=0x0020}
0x4990…49c2               Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x002f, t01=0x0034}
0x49c2…49e0               Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 PARAMETER=OK«, t00=0x002f, t01=0x0066}
0x49e0…4a1a               Head {h00=0x0036, h01=0x0050, text=»CKM100 CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x002f, t01=0x0084}
0x4a1a…4a48               Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x002f, t01=0x00be}
0x4a48…4a60               Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x002f, t01=0x00ec}
0x4a60…4a9c               Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x002f, t01=0x0104}
0x4a9c…4acc               Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x002f, t01=0x0140}
0x4acc…4ae2               Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x002f, t01=0x0170}
0x4ae2…4af8               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x002f, t01=0x0186}
0x4af8…4b22               Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x0030, t01=0x000c}
0x4b22…4b50               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x0030, t01=0x0036}
0x4b50…4b62               Head {h00=0x000e, h01=0x0050, text=» RB CKM100«, t00=0x0030, t01=0x0064}
0x4b62…4b70               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0076}
0x4b70…4b7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0084}
0x4b7a…4b84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x008e}
0x4b84…4ba2               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0030, t01=0x0098}
0x4ba2…4bca               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0030, t01=0x00b6}
0x4bca…4bd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00de}
0x4bd4…4be6               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0030, t01=0x00e8}
0x4be6…4c0e               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0030, t01=0x00fa}
0x4c0e…4c18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0122}
0x4c18…4c22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x012c}
0x4c22…4c3a               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0030, t01=0x0136}
0x4c3a…4c4e               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0030, t01=0x014e}
0x4c4e…4c62               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0030, t01=0x0162}
0x4c62…4c76               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0030, t01=0x0176}
0x4c76…4c8a               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0030, t01=0x018a}
0x4c8a…4c9e               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0031, t01=0x000e}
0x4c9e…4cb8               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0031, t01=0x0022}
0x4cb8…4cc6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x003c}
0x4cc6…4cde               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0031, t01=0x004a}
0x4cde…4cf2               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0031, t01=0x0062}
0x4cf2…4d04               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0031, t01=0x0076}
0x4d04…4d18               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0031, t01=0x0088}
0x4d18…4d2a               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0031, t01=0x009c}
0x4d2a…4d3e               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0031, t01=0x00ae}
0x4d3e…4d50               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0031, t01=0x00c2}
0x4d50…4d64               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0031, t01=0x00d4}
0x4d64…4d76               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0031, t01=0x00e8}
0x4d76…4d8a               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0031, t01=0x00fa}
0x4d8a…4d9c               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0031, t01=0x010e}
0x4d9c…4db0               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0031, t01=0x0120}
0x4db0…4dc4               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0031, t01=0x0134}
0x4dc4…4dd8               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0031, t01=0x0148}
0x4dd8…4dea               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0031, t01=0x015c}
0x4dea…4df8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x016e}
0x4df8…4e02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x017c}
0x4e02…4e0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0186}
0x4e0c…4e22               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0031, t01=0x0190}
0x4e22…4e2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0016}
0x4e2c…4e36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0020}
0x4e36…4e62               Head {h00=0x0028, h01=0x0050, text=»TIMPRO EQU 30 PROCEDURE TIMER 3 SEC «, t00=0x0032, t01=0x002a}
0x4e62…4e6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0056}
0x4e6c…4e76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0060}
0x4e76…4e92               Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0032, t01=0x006a}
0x4e92…4e9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0086}
0x4e9c…4ec6               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0032, t01=0x0090}
0x4ec6…4eda               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0032, t01=0x00ba}
0x4eda…4eee               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0032, t01=0x00ce}
0x4eee…4f02               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0032, t01=0x00e2}
0x4f02…4f16               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0032, t01=0x00f6}
0x4f16…4f2a               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0032, t01=0x010a}
0x4f2a…4f3e               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0032, t01=0x011e}
0x4f3e…4f52               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0032, t01=0x0132}
0x4f52…4f66               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0032, t01=0x0146}
0x4f66…4f7a               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0032, t01=0x015a}
0x4f7a…4f8e               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0032, t01=0x016e}
0x4f8e…4fa2               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0032, t01=0x0182}
0x4fa2…4fb6               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0033, t01=0x0008}
0x4fb6…4fc8               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0033, t01=0x001c}
0x4fc8…4fde               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0033, t01=0x002e}
0x4fde…4ff4               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0033, t01=0x0044}
0x4ff4…5008               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0033, t01=0x005a}
0x5008…501c               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0033, t01=0x006e}
0x501c…5030               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0033, t01=0x0082}
0x5030…5044               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0033, t01=0x0096}
0x5044…5058               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0033, t01=0x00aa}
0x5058…506c               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0033, t01=0x00be}
0x506c…5080               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0033, t01=0x00d2}
0x5080…5094               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0033, t01=0x00e6}
0x5094…50a0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x00fa}
0x50a0…50b4               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0033, t01=0x0106}
0x50b4…50c8               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0033, t01=0x011a}
0x50c8…50fc               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0033, t01=0x012e}
0x50fc…5108               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0162}
0x5108…511c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0033, t01=0x016e}
0x511c…5130               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0033, t01=0x0182}
0x5130…5144               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0034, t01=0x0008}
0x5144…5158               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /40 «, t00=0x0034, t01=0x001c}
0x5158…516c               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0034, t01=0x0030}
0x516c…5180               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0034, t01=0x0044}
0x5180…5196               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0034, t01=0x0058}
0x5196…51a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x006e}
0x51a2…51b0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x007a}
0x51b0…51ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0088}
0x51ba…51c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0092}
0x51c4…51e2               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0034, t01=0x009c}
0x51e2…51ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00ba}
0x51ec…51f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00c4}
0x51f6…5224               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0034, t01=0x00ce}
0x5224…5256               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0034, t01=0x00fc}
0x5256…5276               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x0034, t01=0x012e}
0x5276…5292               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x0034, t01=0x014e}
0x5292…52ae               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x0034, t01=0x016a}
0x52ae…52e4               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x0034, t01=0x0186}
0x52e4…530a               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x0035, t01=0x002c}
0x530a…532a               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x0035, t01=0x0052}
0x532a…5358               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x0035, t01=0x0072}
0x5358…5362               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00a0}
0x5362…5380               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x0035, t01=0x00aa}
0x5380…53ac               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x0035, t01=0x00c8}
0x53ac…53d6               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x0035, t01=0x00f4}
0x53d6…53f6               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x0035, t01=0x011e}
0x53f6…542a               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x0035, t01=0x013e}
0x542a…5452               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x0035, t01=0x0172}
0x5452…5484               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x0036, t01=0x000a}
0x5484…54b4               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x0036, t01=0x003c}
0x54b4…54be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x006c}
0x54be…54c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0076}
0x54c8…54f0               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x0036, t01=0x0080}
0x54f0…54fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00a8}
0x54fa…5504               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00b2}
0x5504…5518               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0036, t01=0x00bc}
0x5518…554a               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x0036, t01=0x00d0}
0x554a…5554               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0102}
0x5554…555e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x010c}
0x555e…5572               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x0036, t01=0x0116}
0x5572…5586               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x0036, t01=0x012a}
0x5586…5590               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x013e}
0x5590…55c6               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x0036, t01=0x0148}
0x55c6…55f6               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x0036, t01=0x017e}
0x55f6…5602               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x001e}
0x5602…5610               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x002a}
0x5610…561a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0038}
0x561a…5624               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0042}
0x5624…5640               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x0037, t01=0x004c}
0x5640…564a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0068}
0x564a…5670               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x0037, t01=0x0072}
0x5670…569a               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x0037, t01=0x0098}
0x569a…56a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00c2}
0x56a4…56ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00cc}
0x56ae…56ca               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0037, t01=0x00d6}
0x56ca…56fa               Head {h00=0x002c, h01=0x0050, text=»BRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ«, t00=0x0037, t01=0x00f2}
0x56fa…5710               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0037, t01=0x0122}
0x5710…5722               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x0037, t01=0x0138}
0x5722…5746               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x0037, t01=0x014a}
0x5746…5762               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0037, t01=0x016e}
0x5762…5798               Head {h00=0x0032, h01=0x0050, text=» CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS «, t00=0x0037, t01=0x018a}
0x5798…57ae               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0038, t01=0x0030}
0x57ae…57ca               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0038, t01=0x0046}
0x57ca…57fe               Head {h00=0x0030, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ«, t00=0x0038, t01=0x0062}
0x57fe…5814               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0038, t01=0x0096}
0x5814…5828               Head {h00=0x0010, h01=0x0050, text=»BRM010 EQU *«, t00=0x0038, t01=0x00ac}
0x5828…584a               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0038, t01=0x00c0}
0x584a…587e               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN«, t00=0x0038, t01=0x00e2}
0x587e…5894               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0038, t01=0x0116}
0x5894…58b0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0038, t01=0x012c}
0x58b0…58c4               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0038, t01=0x0148}
0x58c4…58fc               Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN «, t00=0x0038, t01=0x015c}
0x58fc…5912 (57, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x0004}
0x5912…592e               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0039, t01=0x001a}
0x592e…5954               Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x0039, t01=0x0036}
0x5954…596a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x005c}
0x596a…5986               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0039, t01=0x0072}
0x5986…59a2               Head {h00=0x0018, h01=0x0050, text=» IFF CODE=1  SALCUZ «, t00=0x0039, t01=0x008e}
0x59a2…59be               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x0039, t01=0x00aa}
0x59be…59ec               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x0039, t01=0x00c6}
0x59ec…5a08               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x0039, t01=0x00f4}
0x5a08…5a3e               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0039, t01=0x0110}
0x5a3e…5a5c               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x0039, t01=0x0146}
0x5a5c…5a72               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x0164}
0x5a72…5a94               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=2  SALCUZ «, t00=0x0039, t01=0x017a}
0x5a94…5aae               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x003a, t01=0x000c}
0x5aae…5adc               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003a, t01=0x0026}
0x5adc…5afa               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x003a, t01=0x0054}
0x5afa…5b30               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003a, t01=0x0072}
0x5b30…5b4e               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003a, t01=0x00a8}
0x5b4e…5b64               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003a, t01=0x00c6}
0x5b64…5b78               Head {h00=0x0010, h01=0x0050, text=»BRM100 EQU *«, t00=0x003a, t01=0x00dc}
0x5b78…5ba0               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003a, t01=0x00f0}
0x5ba0…5bc4               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003a, t01=0x0118}
0x5bc4…5bd6               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003a, t01=0x013c}
0x5bd6…5bea               Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x003a, t01=0x014e}
0x5bea…5c0c               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x003a, t01=0x0162}
0x5c0c…5c24               Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x003a, t01=0x0184}
0x5c24…5c46               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x003b, t01=0x000c}
0x5c46…5c5e               Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x003b, t01=0x002e}
0x5c5e…5c82               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x003b, t01=0x0046}
0x5c82…5c9a               Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x003b, t01=0x006a}
0x5c9a…5cbe               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x003b, t01=0x0082}
0x5cbe…5cd6               Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x003b, t01=0x00a6}
0x5cd6…5cfa               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x003b, t01=0x00be}
0x5cfa…5d0e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003b, t01=0x00e2}
0x5d0e…5d20               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003b, t01=0x00f6}
0x5d20…5d48               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003b, t01=0x0108}
0x5d48…5d6c               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003b, t01=0x0130}
0x5d6c…5d7e               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003b, t01=0x0154}
0x5d7e…5da8               Head {h00=0x0026, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESSING «, t00=0x003b, t01=0x0166}
0x5da8…5db4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x0190}
0x5db4…5dc6               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003c, t01=0x000c}
0x5dc6…5dde               Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x003c, t01=0x001e}
0x5dde…5dfc               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x003c, t01=0x0036}
0x5dfc…5e0e               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x003c, t01=0x0054}
0x5e0e…5e24               Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x003c, t01=0x0066}
0x5e24…5e48               Head {h00=0x0020, h01=0x0050, text=» RF(NE) BRM150 NOT THIS TCU «, t00=0x003c, t01=0x007c}
0x5e48…5e5c               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x003c, t01=0x00a0}
0x5e5c…5e7e               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x003c, t01=0x00b4}
0x5e7e…5ea2               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003c, t01=0x00d6}
0x5ea2…5eb4               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003c, t01=0x00fa}
0x5eb4…5ec8               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003c, t01=0x010c}
0x5ec8…5eea               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x003c, t01=0x0120}
0x5eea…5f0e               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003c, t01=0x0142}
0x5f0e…5f20               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003c, t01=0x0166}
0x5f20…5f50               Head {h00=0x002c, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESS SEQUENCE «, t00=0x003c, t01=0x0178}
0x5f50…5f5c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x0018}
0x5f5c…5f82               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ READ ONE CHARACTER«, t00=0x003d, t01=0x0024}
0x5f82…5f9e               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003d, t01=0x004a}
0x5f9e…5fb6               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x003d, t01=0x0066}
0x5fb6…5fcc               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x007e}
0x5fcc…5fe8               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003d, t01=0x0094}
0x5fe8…6004               Head {h00=0x0018, h01=0x0050, text=» SUK A2,ENQ  SALCUZ «, t00=0x003d, t01=0x00b0}
0x6004…601a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x00cc}
0x601a…6038               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) BRM150 NOT ENQ«, t00=0x003d, t01=0x00e2}
0x6038…6054               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003d, t01=0x0100}
0x6054…607c               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ READ LAST CHARACTER «, t00=0x003d, t01=0x011c}
0x607c…6084               Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x0144}
0x6084…60aa               Head {h00=0x0022, h01=0x0050, text=»* TRAILING PAD CAN BE CHECKED «, t00=0x003d, t01=0x014c}
0x60aa…60b2               Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x0172}
0x60b2…60d4               Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,LCUIN HALT INPUT«, t00=0x003d, t01=0x017a}
0x60d4…60ea               Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUIN «, t00=0x003e, t01=0x000c}
0x60ea…6100               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x0022}
0x6100…611c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003e, t01=0x0038}
0x611c…6144               Head {h00=0x0024, h01=0x0050, text=» CF A5,HALTIN HALT INPUT SALCUZ «, t00=0x003e, t01=0x0054}
0x6144…6176               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) BRM010 PARITY ERROR SALCUZ  SALCUZ«, t00=0x003e, t01=0x007c}
0x6176…618c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x00ae}
0x618c…619e               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x003e, t01=0x00c4}
0x619e…61c2               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK COUNTER«, t00=0x003e, t01=0x00d6}
0x61c2…61d4               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x003e, t01=0x00fa}
0x61d4…61e6               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x003e, t01=0x010c}
0x61e6…6206               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x003e, t01=0x011e}
0x6206…6218               Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x003e, t01=0x013e}
0x6218…623a               Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x003e, t01=0x0150}
0x623a…624e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x003e, t01=0x0172}
0x624e…6288               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x003e, t01=0x0186}
0x6288…6294               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x0030}
0x6294…62a8               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003f, t01=0x003c}
0x62a8…62d2               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x003f, t01=0x0050}
0x62d2…62de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x007a}
0x62de…62f4               Head {h00=0x0012, h01=0x0050, text=» IFF EM3270=0 «, t00=0x003f, t01=0x0086}
0x62f4…6326               Head {h00=0x002e, h01=0x0050, text=» CF A5,FINT10 CONTINUE SEARCHING IN DC:TAB«, t00=0x003f, t01=0x009c}
0x6326…6332               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x00ce}
0x6332…6354               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x003f, t01=0x00da}
0x6354…6378               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x003f, t01=0x00fc}
0x6378…6394               Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x003f, t01=0x0120}
0x6394…63a8               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x003f, t01=0x013c}
0x63a8…63d2               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x003f, t01=0x0150}
0x63d2…63f4               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x003f, t01=0x017a}
0x63f4…6414               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x0040, t01=0x000c}
0x6414…642a               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=0   «, t00=0x0040, t01=0x002c}
0x642a…6452               Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x0040, t01=0x0042}
0x6452…6466               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0040, t01=0x006a}
0x6466…647a               Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x0040, t01=0x007e}
0x647a…648a               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0040, t01=0x0092}
0x648a…64a0               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=1   «, t00=0x0040, t01=0x00a2}
0x64a0…64c0               Head {h00=0x001c, h01=0x0050, text=» ABL BRM INVALID ADDRESS«, t00=0x0040, t01=0x00b8}
0x64c0…64d0               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0040, t01=0x00d8}
0x64d0…64da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00e8}
0x64da…650a               Head {h00=0x002c, h01=0x0050, text=»*   WAIT FOR MARK HOLD TO RESYNCHRONIZE «, t00=0x0040, t01=0x00f2}
0x650a…6514               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0122}
0x6514…6528               Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0040, t01=0x012c}
0x6528…653c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0040, t01=0x0140}
0x653c…6550               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0040, t01=0x0154}
0x6550…6570               Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM RESYNCHRONIZE«, t00=0x0040, t01=0x0168}
0x6570…659a               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ ANOTHER CHARACTER«, t00=0x0040, t01=0x0188}
0x659a…65ac               Head {h00=0x000e, h01=0x0050, text=» RB BRM150«, t00=0x0041, t01=0x0022}
0x65ac…65ba               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x0034}
0x65ba…65c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0042}
0x65c4…65ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x004c}
0x65ce…65ee               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0041, t01=0x0056}
0x65ee…65f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0076}
0x65f8…6602               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0080}
0x6602…6616               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0041, t01=0x008a}
0x6616…6640               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0041, t01=0x009e}
0x6640…6654               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0041, t01=0x00c8}
0x6654…6676               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0041, t01=0x00dc}
0x6676…6682               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x00fe}
0x6682…6696               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0041, t01=0x010a}
0x6696…66c0               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0041, t01=0x011e}
0x66c0…66e6               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0041, t01=0x0148}
0x66e6…670a               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0041, t01=0x016e}
0x670a…6724 (66, 0, 400)  Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0042, t01=0x0004}
0x6724…6750               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0042, t01=0x001e}
0x6750…6764               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0042, t01=0x004a}
0x6764…678a               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0042, t01=0x005e}
0x678a…679e               Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0042, t01=0x0084}
0x679e…67c0               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0042, t01=0x0098}
0x67c0…67d0               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0042, t01=0x00ba}
0x67d0…67de               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x00ca}
0x67de…67e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00d8}
0x67e8…67f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00e2}
0x67f2…6812               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0042, t01=0x00ec}
0x6812…681c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x010c}
0x681c…6826               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0116}
0x6826…683a               Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0042, t01=0x0120}
0x683a…684e               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0042, t01=0x0134}
0x684e…6862               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0042, t01=0x0148}
0x6862…6884               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0042, t01=0x015c}
0x6884…689a               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0042, t01=0x017e}
0x689a…68c6 (67, 0, 400)  Head {h00=0x0028, h01=0x0050, text=»*********************CHAINED COMMAND«, t00=0x0043, t01=0x0004}
0x68c6…68f0               Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0043, t01=0x0030}
0x68f0…690e               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0043, t01=0x005a}
0x690e…6922               Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0043, t01=0x0078}
0x6922…6944               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0043, t01=0x008c}
0x6944…6956               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0043, t01=0x00ae}
0x6956…6978               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0043, t01=0x00c0}
0x6978…698c               Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0043, t01=0x00e2}
0x698c…69b8               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0043, t01=0x00f6}
0x69b8…69cc               Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0043, t01=0x0122}
0x69cc…69ea               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0043, t01=0x0136}
0x69ea…69fa               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0043, t01=0x0154}
0x69fa…6a0e               Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0043, t01=0x0164}
0x6a0e…6a22               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0043, t01=0x0178}
0x6a22…6a36               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0043, t01=0x018c}
0x6a36…6a60               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0044, t01=0x0010}
0x6a60…6a76               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0044, t01=0x003a}
0x6a76…6aa0               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0044, t01=0x0050}
0x6aa0…6ac6               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0044, t01=0x007a}
0x6ac6…6afa               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0044, t01=0x00a0}
0x6afa…6b16               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0044, t01=0x00d4}
0x6b16…6b22               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x00f0}
0x6b22…6b38               Head {h00=0x0012, h01=0x0050, text=» IFF EM3270=0 «, t00=0x0044, t01=0x00fc}
0x6b38…6b60               Head {h00=0x0024, h01=0x0050, text=» CF A5,FINTER GET RECEIVING DWT «, t00=0x0044, t01=0x0112}
0x6b60…6b7e               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A3 DWT-ADDRESS«, t00=0x0044, t01=0x013a}
0x6b7e…6b96               Head {h00=0x0014, h01=0x0050, text=» LDR* A2,A6 STA «, t00=0x0044, t01=0x0158}
0x6b96…6ba2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x0170}
0x6ba2…6bb6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0044, t01=0x017c}
0x6bb6…6be6               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0044, t01=0x0190}
0x6be6…6c00               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0045, t01=0x0030}
0x6c00…6c2c               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0045, t01=0x004a}
0x6c2c…6c3e               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0045, t01=0x0076}
0x6c3e…6c68               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREASE ACK COUNTER «, t00=0x0045, t01=0x0088}
0x6c68…6c8c               Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x0045, t01=0x00b2}
0x6c8c…6c98               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x00d6}
0x6c98…6cc4               Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x0045, t01=0x00e2}
0x6cc4…6cdc               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0045, t01=0x010e}
0x6cdc…6d08               Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x0045, t01=0x0126}
0x6d08…6d1a               Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x0045, t01=0x0152}
0x6d1a…6d2e               Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x0045, t01=0x0164}
0x6d2e…6d52               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0045, t01=0x0178}
0x6d52…6d7a               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0046, t01=0x000c}
0x6d7a…6d8c               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0046, t01=0x0034}
0x6d8c…6da0               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0046, t01=0x0046}
0x6da0…6dc6               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x0046, t01=0x005a}
0x6dc6…6dda               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0046, t01=0x0080}
0x6dda…6dee               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x0046, t01=0x0094}
0x6dee…6e00               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x0046, t01=0x00a8}
0x6e00…6e24               Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x0046, t01=0x00ba}
0x6e24…6e36               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0046, t01=0x00de}
0x6e36…6e5a               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x0046, t01=0x00f0}
0x6e5a…6e6c               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0046, t01=0x0114}
0x6e6c…6e82               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x0046, t01=0x0126}
0x6e82…6eae               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x0046, t01=0x013c}
0x6eae…6ecc               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x0046, t01=0x0168}
0x6ecc…6ef6               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x0046, t01=0x0186}
0x6ef6…6f02               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0020}
0x6f02…6f16               Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x0047, t01=0x002c}
0x6f16…6f28               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0047, t01=0x0040}
0x6f28…6f52               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x0047, t01=0x0052}
0x6f52…6f62               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0047, t01=0x007c}
0x6f62…6f90               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0047, t01=0x008c}
0x6f90…6fa2               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0047, t01=0x00ba}
0x6fa2…6fc6               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x0047, t01=0x00cc}
0x6fc6…6fd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00f0}
0x6fd0…6ff6               Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x0047, t01=0x00fa}
0x6ff6…7000               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0120}
0x7000…7014               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0047, t01=0x012a}
0x7014…7028               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0047, t01=0x013e}
0x7028…7042               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x0047, t01=0x0152}
0x7042…7058               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0047, t01=0x016c}
0x7058…706e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x0047, t01=0x0182}
0x706e…7082               Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x0048, t01=0x0008}
0x7082…708e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x001c}
0x708e…70a2               Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x0048, t01=0x0028}
0x70a2…70b8               Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x0048, t01=0x003c}
0x70b8…70e8               Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x0048, t01=0x0052}
0x70e8…710a               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x0048, t01=0x0082}
0x710a…712a               Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x0048, t01=0x00a4}
0x712a…713c               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x0048, t01=0x00c4}
0x713c…7154               Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x0048, t01=0x00d6}
0x7154…717a               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x0048, t01=0x00ee}
0x717a…718e               Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x0048, t01=0x0114}
0x718e…71a8               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0048, t01=0x0128}
0x71a8…71d0               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0048, t01=0x0142}
0x71d0…71fc               Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBBA,A8 STORE BUFFER ADDRESS«, t00=0x0048, t01=0x016a}
0x71fc…721c               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x0049, t01=0x0008}
0x721c…724a               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x0049, t01=0x0028}
0x724a…7274               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x0049, t01=0x0056}
0x7274…72a0               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x0049, t01=0x0080}
0x72a0…72ae               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x00ac}
0x72ae…72b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00ba}
0x72b8…72c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00c4}
0x72c2…72f6               Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x0049, t01=0x00ce}
0x72f6…7300               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0102}
0x7300…730a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x010c}
0x730a…731e               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0049, t01=0x0116}
0x731e…733e               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x0049, t01=0x012a}
0x733e…7352               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0049, t01=0x014a}
0x7352…7374               Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x0049, t01=0x015e}
0x7374…7386               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x0049, t01=0x0180}
0x7386…739c (74, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004a, t01=0x0004}
0x739c…73be               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004a, t01=0x001a}
0x73be…73d0               Head {h00=0x000e, h01=0x0050, text=» ORK A2,/A«, t00=0x004a, t01=0x003c}
0x73d0…73e8               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004a, t01=0x004e}
0x73e8…73fc               Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004a, t01=0x0066}
0x73fc…7408               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x007a}
0x7408…7430               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004a, t01=0x0086}
0x7430…7442               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004a, t01=0x00ae}
0x7442…7450               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004a, t01=0x00c0}
0x7450…7464               Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x004a, t01=0x00ce}
0x7464…7486               Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x004a, t01=0x00e2}
0x7486…74b2               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x004a, t01=0x0104}
0x74b2…74e4               Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x004a, t01=0x0130}
0x74e4…74f8               Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x004a, t01=0x0162}
0x74f8…751a               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x004a, t01=0x0176}
0x751a…752a               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004b, t01=0x0008}
0x752a…753e               Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x004b, t01=0x0018}
0x753e…7552               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004b, t01=0x002c}
0x7552…756a               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x004b, t01=0x0040}
0x756a…757c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x004b, t01=0x0058}
0x757c…75a4               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x004b, t01=0x006a}
0x75a4…75c4               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x004b, t01=0x0092}
0x75c4…75d6               Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x004b, t01=0x00b2}
0x75d6…75e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x00c4}
0x75e2…75f6               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x004b, t01=0x00d0}
0x75f6…7608               Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x004b, t01=0x00e4}
0x7608…7614               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x00f6}
0x7614…7622               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004b, t01=0x0102}
0x7622…762c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0110}
0x762c…7636               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x011a}
0x7636…7666               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x004b, t01=0x0124}
0x7666…7670               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0154}
0x7670…767a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x015e}
0x767a…768e               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x004b, t01=0x0168}
0x768e…76b6               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x004b, t01=0x017c}
0x76b6…76ca               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x004c, t01=0x0014}
0x76ca…76f0               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x004c, t01=0x0028}
0x76f0…7728               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x004c, t01=0x004e}
0x7728…7750               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x004c, t01=0x0086}
0x7750…7778               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x004c, t01=0x00ae}
0x7778…779e               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x004c, t01=0x00d6}
0x779e…77c4               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x004c, t01=0x00fc}
0x77c4…77d6               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x004c, t01=0x0122}
0x77d6…77e8               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x004c, t01=0x0134}
0x77e8…7812               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x004c, t01=0x0146}
0x7812…7826               Head {h00=0x0010, h01=0x0050, text=» ABL POL127 «, t00=0x004c, t01=0x0170}
0x7826…7832               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x0184}
0x7832…783c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0190}
0x783c…7846               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x000a}
0x7846…7866               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x004d, t01=0x0014}
0x7866…7870               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0034}
0x7870…787a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x003e}
0x787a…788e               Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x004d, t01=0x0048}
0x788e…78b8               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004d, t01=0x005c}
0x78b8…78cc               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004d, t01=0x0086}
0x78cc…78e0               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x004d, t01=0x009a}
0x78e0…7906               Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x004d, t01=0x00ae}
0x7906…7938               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x004d, t01=0x00d4}
0x7938…794c               Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x004d, t01=0x0106}
0x794c…795c               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004d, t01=0x011a}
0x795c…796a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004d, t01=0x012a}
0x796a…7974               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0138}
0x7974…797e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0142}
0x797e…799e               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x004d, t01=0x014c}
0x799e…79a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x016c}
0x79a8…79b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0176}
0x79b2…79c6               Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x004d, t01=0x0180}
0x79c6…79f0 (78, 0, 400)  Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004e, t01=0x0004}
0x79f0…7a04               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004e, t01=0x002e}
0x7a04…7a28               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x004e, t01=0x0042}
0x7a28…7a3c               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x004e, t01=0x0066}
0x7a3c…7a62               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x004e, t01=0x007a}
0x7a62…7a74               Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x004e, t01=0x00a0}
0x7a74…7a88               Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x004e, t01=0x00b2}
0x7a88…7aae               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x004e, t01=0x00c6}
0x7aae…7ac2               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x004e, t01=0x00ec}
0x7ac2…7ad6               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x004e, t01=0x0100}
0x7ad6…7b0a               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x004e, t01=0x0114}
0x7b0a…7b16               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x0148}
0x7b16…7b4a               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x004e, t01=0x0154}
0x7b4a…7b74               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x004e, t01=0x0188}
0x7b74…7b88               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x004f, t01=0x0022}
0x7b88…7b9c               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x004f, t01=0x0036}
0x7b9c…7ba6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x004a}
0x7ba6…7bb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0054}
0x7bb0…7bd0               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x004f, t01=0x005e}
0x7bd0…7bda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x007e}
0x7bda…7be4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0088}
0x7be4…7bf8               Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x004f, t01=0x0092}
0x7bf8…7c22               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004f, t01=0x00a6}
0x7c22…7c36               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004f, t01=0x00d0}
0x7c36…7c5c               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 ACK NOT EXPECTED«, t00=0x004f, t01=0x00e4}
0x7c5c…7c86               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x004f, t01=0x010a}
0x7c86…7c9e               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x004f, t01=0x0134}
0x7c9e…7cb4               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x004f, t01=0x014c}
0x7cb4…7cbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0162}
0x7cbe…7cd8               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x004f, t01=0x016c}
0x7cd8…7ce2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0186}
0x7ce2…7d04               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x004f, t01=0x0190}
0x7d04…7d28               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0050, t01=0x0022}
0x7d28…7d3c               Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0050, t01=0x0046}
0x7d3c…7d5a               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0050, t01=0x005a}
0x7d5a…7d84               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0050, t01=0x0078}
0x7d84…7d96               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0050, t01=0x00a2}
0x7d96…7daa               Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0050, t01=0x00b4}
0x7daa…7dbe               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0050, t01=0x00c8}
0x7dbe…7dd4               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0050, t01=0x00dc}
0x7dd4…7dde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00f2}
0x7dde…7df8               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0050, t01=0x00fc}
0x7df8…7e02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0116}
0x7e02…7e26               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0050, t01=0x0120}
0x7e26…7e4e               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0050, t01=0x0144}
0x7e4e…7e62               Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0050, t01=0x016c}
0x7e62…7e76               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0050, t01=0x0180}
0x7e76…7e98 (81, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0051, t01=0x0004}
0x7e98…7ea6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0051, t01=0x0026}
0x7ea6…7eb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0034}
0x7eb0…7ee0               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0051, t01=0x003e}
0x7ee0…7eea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x006e}
0x7eea…7f04               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0051, t01=0x0078}
0x7f04…7f18               Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0051, t01=0x0092}
0x7f18…7f2c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0051, t01=0x00a6}
0x7f2c…7f40               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x0051, t01=0x00ba}
0x7f40…7f72               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x0051, t01=0x00ce}
0x7f72…7f7e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x0100}
0x7f7e…7faa               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0051, t01=0x010c}
0x7faa…7fbe               Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x0051, t01=0x0138}
0x7fbe…7fdc               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0051, t01=0x014c}
0x7fdc…7ff0               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0051, t01=0x016a}
0x7ff0…7ff8               Head {h00=0x0004, h01=0x0050, t00=0x0051, t01=0x017e}
0x7ff8…801a               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0051, t01=0x0186}
0x801a…8026               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x0018}
0x8026…8038               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0052, t01=0x0024}
0x8038…804c               Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x0052, t01=0x0036}
0x804c…805e               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0052, t01=0x004a}
0x805e…8088               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0052, t01=0x005c}
0x8088…809c               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0052, t01=0x0086}
0x809c…80b0               Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x0052, t01=0x009a}
0x80b0…80c8               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x0052, t01=0x00ae}
0x80c8…80f4               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x0052, t01=0x00c6}
0x80f4…811a               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x0052, t01=0x00f2}
0x811a…812e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0052, t01=0x0118}
0x812e…8156               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x0052, t01=0x012c}
0x8156…8170               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0052, t01=0x0154}
0x8170…8182               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0052, t01=0x016e}
0x8182…8196               Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x0052, t01=0x0180}
0x8196…81b0 (83, 0, 400)  Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0053, t01=0x0004}
0x81b0…81c2               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0053, t01=0x001e}
0x81c2…81d6               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0053, t01=0x0030}
0x81d6…81e4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0053, t01=0x0044}
0x81e4…81ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0052}
0x81ee…81f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x005c}
0x81f8…821e               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x0053, t01=0x0066}
0x821e…8228               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x008c}
0x8228…8232               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0096}
0x8232…8246               Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x0053, t01=0x00a0}
0x8246…826c               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x0053, t01=0x00b4}
0x826c…829c               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x0053, t01=0x00da}
0x829c…82c0               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x0053, t01=0x010a}
0x82c0…82e6               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x0053, t01=0x012e}
0x82e6…8308               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0053, t01=0x0154}
0x8308…831a               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0053, t01=0x0176}
0x831a…8336               Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x0053, t01=0x0188}
0x8336…834c               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x0054, t01=0x0014}
0x834c…8372               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x0054, t01=0x002a}
0x8372…8384               Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x0054, t01=0x0050}
0x8384…8390               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x0062}
0x8390…839e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0054, t01=0x006e}
0x839e…83a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x007c}
0x83a8…83b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0086}
0x83b2…83d4               Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x0054, t01=0x0090}
0x83d4…83de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00b2}
0x83de…83e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00bc}
0x83e8…83fc               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x0054, t01=0x00c6}
0x83fc…8410               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0054, t01=0x00da}
0x8410…8432               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0054, t01=0x00ee}
0x8432…8444               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0054, t01=0x0110}
0x8444…8456               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0054, t01=0x0122}
0x8456…847e               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x0054, t01=0x0134}
0x847e…849c               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x0054, t01=0x015c}
0x849c…84a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x017a}
0x84a8…84bc               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0054, t01=0x0186}
0x84bc…84ce               Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x0055, t01=0x000a}
0x84ce…84da               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x001c}
0x84da…84ee               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x0055, t01=0x0028}
0x84ee…84fe               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0055, t01=0x003c}
0x84fe…8512               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x0055, t01=0x004c}
0x8512…852c               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x0055, t01=0x0060}
0x852c…853e               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0055, t01=0x007a}
0x853e…855a               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x0055, t01=0x008c}
0x855a…8566               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x00a8}
0x8566…8580               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x0055, t01=0x00b4}
0x8580…8592               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0055, t01=0x00ce}
0x8592…85b8               Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x0055, t01=0x00e0}
0x85b8…85dc               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x0055, t01=0x0106}
0x85dc…85ec               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0055, t01=0x012a}
0x85ec…8600               Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x0055, t01=0x013a}
0x8600…860c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x014e}
0x860c…8622               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0055, t01=0x015a}
0x8622…864a               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x0055, t01=0x0170}
0x864a…865e               Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x0056, t01=0x0008}
0x865e…8678               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x0056, t01=0x001c}
0x8678…8698               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x0056, t01=0x0036}
0x8698…86a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x0056}
0x86a4…86b6               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x0056, t01=0x0062}
0x86b6…86ca               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x0056, t01=0x0074}
0x86ca…86fa               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0056, t01=0x0088}
0x86fa…871a               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x0056, t01=0x00b8}
0x871a…872c               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x0056, t01=0x00d8}
0x872c…873a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0056, t01=0x00ea}
0x873a…8744               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00f8}
0x8744…874e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0102}
0x874e…8772               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x0056, t01=0x010c}
0x8772…877c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0130}
0x877c…8786               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x013a}
0x8786…879a               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x0056, t01=0x0144}
0x879a…87ba               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x0056, t01=0x0158}
0x87ba…87de               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x0056, t01=0x0178}
0x87de…87f2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0057, t01=0x000c}
0x87f2…8824               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x0057, t01=0x0020}
0x8824…8830               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x0052}
0x8830…8858               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x0057, t01=0x005e}
0x8858…8868               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x0057, t01=0x0086}
0x8868…888e               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x0057, t01=0x0096}
0x888e…889e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0057, t01=0x00bc}
0x889e…88ac               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0057, t01=0x00cc}
0x88ac…88b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00da}
0x88b6…88c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00e4}
0x88c0…88e8               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x0057, t01=0x00ee}
0x88e8…88f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0116}
0x88f2…88fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0120}
0x88fc…8910               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x0057, t01=0x012a}
0x8910…8936               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x0057, t01=0x013e}
0x8936…894a               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0057, t01=0x0164}
0x894a…8960               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x0057, t01=0x0178}
0x8960…898a               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x0057, t01=0x018e}
0x898a…89b0               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x0058, t01=0x0028}
0x89b0…89c4               Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x0058, t01=0x004e}
0x89c4…89e4               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x0058, t01=0x0062}
0x89e4…8a0e               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0058, t01=0x0082}
0x8a0e…8a32               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0058, t01=0x00ac}
0x8a32…8a3e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x00d0}
0x8a3e…8a52               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0058, t01=0x00dc}
0x8a52…8a64               Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x0058, t01=0x00f0}
0x8a64…8a70               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0102}
0x8a70…8a84               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x0058, t01=0x010e}
0x8a84…8a94               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0058, t01=0x0122}
0x8a94…8aa8               Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x0058, t01=0x0132}
0x8aa8…8abc               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x0058, t01=0x0146}
0x8abc…8ae2               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x0058, t01=0x015a}
0x8ae2…8af6               Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x0058, t01=0x0180}
0x8af6…8b14 (89, 0, 400)  Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0059, t01=0x0004}
0x8b14…8b26               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x0059, t01=0x0022}
0x8b26…8b3a               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x0059, t01=0x0034}
0x8b3a…8b60               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x0059, t01=0x0048}
0x8b60…8b74               Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x0059, t01=0x006e}
0x8b74…8b9c               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0059, t01=0x0082}
0x8b9c…8bb2               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x0059, t01=0x00aa}
0x8bb2…8bc8               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x0059, t01=0x00c0}
0x8bc8…8bda               Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x0059, t01=0x00d6}
0x8bda…8bee               Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x0059, t01=0x00e8}
0x8bee…8c12               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x0059, t01=0x00fc}
0x8c12…8c30               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0059, t01=0x0120}
0x8c30…8c5a               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0059, t01=0x013e}
0x8c5a…8c7c               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x0059, t01=0x0168}
0x8c7c…8c90               Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x0059, t01=0x018a}
0x8c90…8cba               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x005a, t01=0x000e}
0x8cba…8ce6               Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x005a, t01=0x0038}
0x8ce6…8d08               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x005a, t01=0x0064}
0x8d08…8d2c               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005a, t01=0x0086}
0x8d2c…8d40               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x005a, t01=0x00aa}
0x8d40…8d62               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x005a, t01=0x00be}
0x8d62…8d72               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x005a, t01=0x00e0}
0x8d72…8d96               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x005a, t01=0x00f0}
0x8d96…8dc0               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005a, t01=0x0114}
0x8dc0…8de4               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005a, t01=0x013e}
0x8de4…8df6               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005a, t01=0x0162}
0x8df6…8e04               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005a, t01=0x0174}
0x8e04…8e0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0182}
0x8e0e…8e18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x018c}
0x8e18…8e42               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x005b, t01=0x0008}
0x8e42…8e4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0032}
0x8e4c…8e56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x003c}
0x8e56…8e6a               Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x005b, t01=0x0046}
0x8e6a…8e84               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x005b, t01=0x005a}
0x8e84…8e9e               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x005b, t01=0x0074}
0x8e9e…8ec2               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x005b, t01=0x008e}
0x8ec2…8ee0               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x005b, t01=0x00b2}
0x8ee0…8ef4               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x005b, t01=0x00d0}
0x8ef4…8f16               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005b, t01=0x00e4}
0x8f16…8f28               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x005b, t01=0x0106}
0x8f28…8f4e               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x005b, t01=0x0118}
0x8f4e…8f5a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x013e}
0x8f5a…8f74               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x005b, t01=0x014a}
0x8f74…8f8c               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x005b, t01=0x0164}
0x8f8c…8fac               Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x005b, t01=0x017c}
0x8fac…8fce               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x005c, t01=0x000c}
0x8fce…8fe0               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x005c, t01=0x002e}
0x8fe0…9004               Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x005c, t01=0x0040}
0x9004…9016               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x005c, t01=0x0064}
0x9016…903c               Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x005c, t01=0x0076}
0x903c…9048               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x009c}
0x9048…9064               Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x005c, t01=0x00a8}
0x9064…9072               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005c, t01=0x00c4}
0x9072…907c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00d2}
0x907c…9086               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00dc}
0x9086…90c2               Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x005c, t01=0x00e6}
0x90c2…90cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0122}
0x90cc…90ee               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x005c, t01=0x012c}
0x90ee…90f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x014e}
0x90f8…9102               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0158}
0x9102…911e               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x005c, t01=0x0162}
0x911e…9146               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x005c, t01=0x017e}
0x9146…915e               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x005d, t01=0x0016}
0x915e…917e               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x005d, t01=0x002e}
0x917e…91a0               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x005d, t01=0x004e}
0x91a0…91b2               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x005d, t01=0x0070}
0x91b2…91d6               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x005d, t01=0x0082}
0x91d6…91e8               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x005d, t01=0x00a6}
0x91e8…9214               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x005d, t01=0x00b8}
0x9214…9226               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x005d, t01=0x00e4}
0x9226…925c               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x005d, t01=0x00f6}
0x925c…927c               Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x005d, t01=0x012c}
0x927c…92a8               Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x005d, t01=0x014c}
0x92a8…92ba               Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x005d, t01=0x0178}
0x92ba…92e4               Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x005d, t01=0x018a}
0x92e4…9306               Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x005e, t01=0x0024}
0x9306…9318               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x005e, t01=0x0046}
0x9318…932e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x005e, t01=0x0058}
0x932e…9346               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x005e, t01=0x006e}
0x9346…936e               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x005e, t01=0x0086}
0x936e…9382               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x005e, t01=0x00ae}
0x9382…93b0               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x005e, t01=0x00c2}
0x93b0…93c4               Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x005e, t01=0x00f0}
0x93c4…93d8               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x005e, t01=0x0104}
0x93d8…9400               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x005e, t01=0x0118}
0x9400…942e               Head {h00=0x002a, h01=0x0050, text=» CF A15,RTBUF RELEASE TRANSMIT BUFFER «, t00=0x005e, t01=0x0140}
0x942e…945a               Head {h00=0x0028, h01=0x0050, text=» CF A15,CKGBQ CHECK GET BUFFER QUEUE«, t00=0x005e, t01=0x016e}
0x945a…9466               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x000a}
0x9466…947a               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x005f, t01=0x0016}
0x947a…94a0               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x005f, t01=0x002a}
0x94a0…94b2               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x005f, t01=0x0050}
0x94b2…94c2               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x005f, t01=0x0062}
0x94c2…94d0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x0072}
0x94d0…94da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0080}
0x94da…94e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x008a}
0x94e4…9502               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x005f, t01=0x0094}
0x9502…950c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00b2}
0x950c…952c               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x005f, t01=0x00bc}
0x952c…9558               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x005f, t01=0x00dc}
0x9558…958e               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x005f, t01=0x0108}
0x958e…95ba               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x005f, t01=0x013e}
0x95ba…95c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x016a}
0x95c4…95d8               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x005f, t01=0x0174}
0x95d8…9600               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x005f, t01=0x0188}
0x9600…9620               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x0060, t01=0x0020}
0x9620…9632               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0060, t01=0x0040}
0x9632…9646               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0060, t01=0x0052}
0x9646…966e               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x0060, t01=0x0066}
0x966e…9694               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x0060, t01=0x008e}
0x9694…96a6               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x0060, t01=0x00b4}
0x96a6…96ba               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0060, t01=0x00c6}
0x96ba…96ce               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x0060, t01=0x00da}
0x96ce…96f2               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0060, t01=0x00ee}
0x96f2…971e               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0060, t01=0x0112}
0x971e…9732               Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x0060, t01=0x013e}
0x9732…9742               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0060, t01=0x0152}
0x9742…975e               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0060, t01=0x0162}
0x975e…9766               Head {h00=0x0004, h01=0x0050, t00=0x0060, t01=0x017e}
0x9766…977c               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0060, t01=0x0186}
0x977c…9790               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0061, t01=0x000c}
0x9790…97b6               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x0061, t01=0x0020}
0x97b6…97ca               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0061, t01=0x0046}
0x97ca…97ee               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0061, t01=0x005a}
0x97ee…9802               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x0061, t01=0x007e}
0x9802…9818               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x0061, t01=0x0092}
0x9818…9846               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x0061, t01=0x00a8}
0x9846…985a               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0061, t01=0x00d6}
0x985a…9866               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x00ea}
0x9866…987a               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x0061, t01=0x00f6}
0x987a…98a2               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0061, t01=0x010a}
0x98a2…98c6               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0061, t01=0x0132}
0x98c6…98da               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x0061, t01=0x0156}
0x98da…98ee               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x0061, t01=0x016a}
0x98ee…9910               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x0061, t01=0x017e}
0x9910…9924               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x0062, t01=0x0010}
0x9924…9946               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x0062, t01=0x0024}
0x9946…995a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x0062, t01=0x0046}
0x995a…997c               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x0062, t01=0x005a}
0x997c…9990               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x0062, t01=0x007c}
0x9990…99ba               Head {h00=0x0026, h01=0x0050, text=» RF(E) RDM140 ENQ IN TEXT RECEIVED«, t00=0x0062, t01=0x0090}
0x99ba…99ce               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0062, t01=0x00ba}
0x99ce…99f6               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x0062, t01=0x00ce}
0x99f6…99fe               Head {h00=0x0004, h01=0x0050, t00=0x0062, t01=0x00f6}
0x99fe…9a12               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0062, t01=0x00fe}
0x9a12…9a28               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x0062, t01=0x0112}
0x9a28…9a30               Head {h00=0x0004, h01=0x0050, t00=0x0062, t01=0x0128}
0x9a30…9a42               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0062, t01=0x0130}
0x9a42…9a58               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x0062, t01=0x0142}
0x9a58…9a7a               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x0062, t01=0x0158}
0x9a7a…9a8c               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x0062, t01=0x017a}
0x9a8c…9aae               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x0062, t01=0x018c}
0x9aae…9ac0               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x0063, t01=0x001e}
0x9ac0…9ad2               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0063, t01=0x0030}
0x9ad2…9b00               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x0063, t01=0x0042}
0x9b00…9b24               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0063, t01=0x0070}
0x9b24…9b52               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x0063, t01=0x0094}
0x9b52…9b64               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x0063, t01=0x00c2}
0x9b64…9b78               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x0063, t01=0x00d4}
0x9b78…9b84               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x00e8}
0x9b84…9b8c               Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x00f4}
0x9b8c…9bae               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x0063, t01=0x00fc}
0x9bae…9bd2               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0063, t01=0x011e}
0x9bd2…9bfa               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x0063, t01=0x0142}
0x9bfa…9c0e               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0063, t01=0x016a}
0x9c0e…9c2a               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x0063, t01=0x017e}
0x9c2a…9c4e               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x0064, t01=0x000a}
0x9c4e…9c58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x002e}
0x9c58…9c72               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x0064, t01=0x0038}
0x9c72…9c7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0052}
0x9c7c…9c9a               Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x0064, t01=0x005c}
0x9c9a…9cae               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x0064, t01=0x007a}
0x9cae…9cd8               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x0064, t01=0x008e}
0x9cd8…9cec               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0064, t01=0x00b8}
0x9cec…9d14               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x0064, t01=0x00cc}
0x9d14…9d26               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0064, t01=0x00f4}
0x9d26…9d30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0106}
0x9d30…9d46               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x0064, t01=0x0110}
0x9d46…9d50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0126}
0x9d50…9d64               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x0064, t01=0x0130}
0x9d64…9d8c               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x0064, t01=0x0144}
0x9d8c…9db0               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x0064, t01=0x016c}
0x9db0…9de6               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x0064, t01=0x0190}
0x9de6…9dfa               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0065, t01=0x0036}
0x9dfa…9e0e               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0065, t01=0x004a}
0x9e0e…9e2e               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x0065, t01=0x005e}
0x9e2e…9e3a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0065, t01=0x007e}
0x9e3a…9e4e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0065, t01=0x008a}
0x9e4e…9e78               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x0065, t01=0x009e}
0x9e78…9e98               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x0065, t01=0x00c8}
0x9e98…9ea4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0065, t01=0x00e8}
0x9ea4…9eb8               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x0065, t01=0x00f4}
0x9eb8…9ee2               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x0065, t01=0x0108}
0x9ee2…9ef6               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x0065, t01=0x0132}
0x9ef6…9f1e               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x0065, t01=0x0146}
0x9f1e…9f3e               Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x0065, t01=0x016e}
0x9f3e…9f52               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0065, t01=0x018e}
0x9f52…9f78               Head {h00=0x0022, h01=0x0050, text=» ORR A7,A1 PARITY ERROR SALCUZ«, t00=0x0066, t01=0x0012}
0x9f78…9f8e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0066, t01=0x0038}
0x9f8e…9f9e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0066, t01=0x004e}
0x9f9e…9fa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x005e}
0x9fa8…9fbe               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x0066, t01=0x0068}
0x9fbe…9fc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x007e}
0x9fc8…9fdc               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x0066, t01=0x0088}
0x9fdc…9fee               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0066, t01=0x009c}
0x9fee…a014               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x0066, t01=0x00ae}
0xa014…a03a               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x0066, t01=0x00d4}
0xa03a…a04c               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x0066, t01=0x00fa}
0xa04c…a056               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x010c}
0xa056…a06c               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x0066, t01=0x0116}
0xa06c…a076               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x012c}
0xa076…a08a               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x0066, t01=0x0136}
0xa08a…a09e               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0066, t01=0x014a}
0xa09e…a0b2               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0066, t01=0x015e}
0xa0b2…a0d8               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x0066, t01=0x0172}
0xa0d8…a0e4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0067, t01=0x0008}
0xa0e4…a0f8               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0067, t01=0x0014}
0xa0f8…a122               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x0067, t01=0x0028}
0xa122…a148               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x0067, t01=0x0052}
0xa148…a154               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0067, t01=0x0078}
0xa154…a166               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0067, t01=0x0084}
0xa166…a174               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0067, t01=0x0096}
0xa174…a17e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00a4}
0xa17e…a19c               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x0067, t01=0x00ae}
0xa19c…a1a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00cc}
0xa1a6…a1bc               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x0067, t01=0x00d6}
0xa1bc…a1de               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x0067, t01=0x00ec}
0xa1de…a208               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x0067, t01=0x010e}
0xa208…a21e               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x0067, t01=0x0138}
0xa21e…a23c               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x0067, t01=0x014e}
0xa23c…a24e               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0067, t01=0x016c}
0xa24e…a258               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x017e}
0xa258…a270               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x0067, t01=0x0188}
0xa270…a27a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0010}
0xa27a…a29e               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x0068, t01=0x001a}
0xa29e…a2b0               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0068, t01=0x003e}
0xa2b0…a2ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0050}
0xa2ba…a2d0               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x0068, t01=0x005a}
0xa2d0…a2da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0070}
0xa2da…a2ee               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0068, t01=0x007a}
0xa2ee…a310               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x0068, t01=0x008e}
0xa310…a31c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0068, t01=0x00b0}
0xa31c…a326               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00bc}
0xa326…a33c               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x0068, t01=0x00c6}
0xa33c…a346               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00dc}
0xa346…a368               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x0068, t01=0x00e6}
0xa368…a38e               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x0068, t01=0x0108}
0xa38e…a3a6               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x0068, t01=0x012e}
0xa3a6…a3b8               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x0068, t01=0x0146}
0xa3b8…a3c6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0068, t01=0x0158}
0xa3c6…a3d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0166}
0xa3d0…a3e6               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x0068, t01=0x0170}
0xa3e6…a3f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0186}
0xa3f0…a412               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x0068, t01=0x0190}
0xa412…a424               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0069, t01=0x0022}
0xa424…a42e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0034}
0xa42e…a444               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x0069, t01=0x003e}
0xa444…a44e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0054}
0xa44e…a470               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x0069, t01=0x005e}
0xa470…a482               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0069, t01=0x0080}
0xa482…a48c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0092}
0xa48c…a4a2               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x0069, t01=0x009c}
0xa4a2…a4ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00b2}
0xa4ac…a4ce               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x0069, t01=0x00bc}
0xa4ce…a4d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00de}
0xa4d8…a504               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x0069, t01=0x00e8}
0xa504…a518               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0069, t01=0x0114}
0xa518…a530               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x0069, t01=0x0128}
0xa530…a558               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x0069, t01=0x0140}
0xa558…a582               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x0069, t01=0x0168}
0xa582…a5a0 (106, 0, 398) Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x006a, t01=0x0004}
0xa5a0…a5ca               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x006a, t01=0x0022}
0xa5ca…a5e8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x006a, t01=0x004c}
0xa5e8…a602               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x006a, t01=0x006a}
0xa602…a620               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x006a, t01=0x0084}
0xa620…a634               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x006a, t01=0x00a2}
0xa634…a64a               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x006a, t01=0x00b6}
0xa64a…a664               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x006a, t01=0x00cc}
0xa664…a68c               Head {h00=0x0024, h01=0x0050, text=» CIO A2,0,LCUUT STOP TRANSMITTER«, t00=0x006a, t01=0x00e6}
0xa68c…a6a8               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x006a, t01=0x010e}
0xa6a8…a6d0               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ WAIT FOR END SALCUZ «, t00=0x006a, t01=0x012a}
0xa6d0…a6e6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x006a, t01=0x0152}
0xa6e6…a710               Head {h00=0x0026, h01=0x0050, text=» SST A2,LCUUT PERFORM SST AT ONCE «, t00=0x006a, t01=0x0168}
0xa710…a724 (107, 0, 400) Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x006b, t01=0x0004}
0xa724…a750               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x006b, t01=0x0018}
0xa750…a75c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x0044}
0xa75c…a76c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006b, t01=0x0050}
0xa76c…a77a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006b, t01=0x0060}
0xa77a…a784               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x006e}
0xa784…a78e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0078}
0xa78e…a7b0               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x006b, t01=0x0082}
0xa7b0…a7ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00a4}
0xa7ba…a7c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00ae}
0xa7c4…a7d8               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x006b, t01=0x00b8}
0xa7d8…a7fa               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x006b, t01=0x00cc}
0xa7fa…a810               Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x006b, t01=0x00ee}
0xa810…a81a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0104}
0xa81a…a824               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x010e}
0xa824…a844               Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x006b, t01=0x0118}
0xa844…a84e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0138}
0xa84e…a858               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0142}
0xa858…a86c               Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x006b, t01=0x014c}
0xa86c…a898               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x006b, t01=0x0160}
0xa898…a8a0               Head {h00=0x0004, h01=0x0050, t00=0x006b, t01=0x018c}
0xa8a0…a8d6 (108, 0, 400) Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x006c, t01=0x0004}
0xa8d6…a8f4               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x006c, t01=0x003a}
0xa8f4…a8fc               Head {h00=0x0004, h01=0x0050, t00=0x006c, t01=0x0058}
0xa8fc…a912               Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x006c, t01=0x0060}
0xa912…a938               Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x006c, t01=0x0076}
0xa938…a94c               Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x006c, t01=0x009c}
0xa94c…a974               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x006c, t01=0x00b0}
0xa974…a988               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x006c, t01=0x00d8}
0xa988…a9a6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x006c, t01=0x00ec}
0xa9a6…a9c2               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x006c, t01=0x010a}
0xa9c2…a9d6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x006c, t01=0x0126}
0xa9d6…a9f2               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x006c, t01=0x013a}
0xa9f2…aa06               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x006c, t01=0x0156}
0xaa06…aa22               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x006c, t01=0x016a}
0xaa22…aa36               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x006c, t01=0x0186}
0xaa36…aa54               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x006d, t01=0x000a}
0xaa54…aa80               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x006d, t01=0x0028}
0xaa80…aaac               Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x006d, t01=0x0054}
0xaaac…aacc               Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x006d, t01=0x0080}
0xaacc…aade               Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x006d, t01=0x00a0}
0xaade…aaf2               Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x006d, t01=0x00b2}
0xaaf2…ab04               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x006d, t01=0x00c6}
0xab04…ab18               Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x006d, t01=0x00d8}
0xab18…ab22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00ec}
0xab22…ab2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00f6}
0xab2c…ab36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0100}
0xab36…ab42               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x010a}
0xab42…ab56               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x006d, t01=0x0116}
0xab56…ab74               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x006d, t01=0x012a}
0xab74…ab90               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x006d, t01=0x0148}
0xab90…abb8               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x006d, t01=0x0164}
0xabb8…abdc               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x006d, t01=0x018c}
0xabdc…ac08               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x006e, t01=0x0020}
0xac08…ac34               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x006e, t01=0x004c}
0xac34…ac5e               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x006e, t01=0x0078}
0xac5e…ac82               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x006e, t01=0x00a2}
0xac82…aca8               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x006e, t01=0x00c6}
0xaca8…acc8               Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x006e, t01=0x00ec}
0xacc8…ace6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x006e, t01=0x010c}
0xace6…ad02               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x006e, t01=0x012a}
0xad02…ad20               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x006e, t01=0x0146}
0xad20…ad36               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x006e, t01=0x0164}
0xad36…ad4a               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x006e, t01=0x017a}
0xad4a…ad70               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x006e, t01=0x018e}
0xad70…ad86               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x006f, t01=0x0024}
0xad86…adac               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x006f, t01=0x003a}
0xadac…adc2               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x006f, t01=0x0060}
0xadc2…add6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x006f, t01=0x0076}
0xadd6…adec               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x006f, t01=0x008a}
0xadec…adf8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x00a0}
0xadf8…ae0c               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x006f, t01=0x00ac}
0xae0c…ae14               Head {h00=0x0004, h01=0x0050, t00=0x006f, t01=0x00c0}
0xae14…ae3e               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x006f, t01=0x00c8}
0xae3e…ae58               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x006f, t01=0x00f2}
0xae58…ae60               Head {h00=0x0004, h01=0x0050, t00=0x006f, t01=0x010c}
0xae60…ae80               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x006f, t01=0x0114}
0xae80…aea6               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x006f, t01=0x0134}
0xaea6…aeca               Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x006f, t01=0x015a}
0xaeca…aed2               Head {h00=0x0004, h01=0x0050, t00=0x006f, t01=0x017e}
0xaed2…aefa               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x006f, t01=0x0186}
0xaefa…af2c               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x0070, t01=0x001e}
0xaf2c…af4e               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x0070, t01=0x0050}
0xaf4e…af60               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0070, t01=0x0072}
0xaf60…af74               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x0070, t01=0x0084}
0xaf74…af80               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x0098}
0xaf80…af88               Head {h00=0x0004, h01=0x0050, t00=0x0070, t01=0x00a4}
0xaf88…af9a               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0070, t01=0x00ac}
0xaf9a…afae               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x0070, t01=0x00be}
0xafae…afd2               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x0070, t01=0x00d2}
0xafd2…aff6               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0070, t01=0x00f6}
0xaff6…b00a               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0070, t01=0x011a}
0xb00a…b01e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0070, t01=0x012e}
0xb01e…b048               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0070, t01=0x0142}
0xb048…b062               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x0070, t01=0x016c}
0xb062…b06a               Head {h00=0x0004, h01=0x0050, t00=0x0070, t01=0x0186}
0xb06a…b0ae               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0070, t01=0x018e}
0xb0ae…b0b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0042}
0xb0b8…b0e8               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x0071, t01=0x004c}
0xb0e8…b0f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x007c}
0xb0f2…b12a               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0071, t01=0x0086}
0xb12a…b132               Head {h00=0x0004, h01=0x0050, t00=0x0071, t01=0x00be}
0xb132…b15c               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x0071, t01=0x00c6}
0xb15c…b178               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x0071, t01=0x00f0}
0xb178…b184               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x010c}
0xb184…b198               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x0071, t01=0x0118}
0xb198…b1b8               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x0071, t01=0x012c}
0xb1b8…b1de               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x0071, t01=0x014c}
0xb1de…b1f2               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x0071, t01=0x0172}
0xb1f2…b206               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x0071, t01=0x0186}
0xb206…b22a               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x0072, t01=0x000a}
0xb22a…b250               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x0072, t01=0x002e}
0xb250…b264               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x0072, t01=0x0054}
0xb264…b278               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x0072, t01=0x0068}
0xb278…b296               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x0072, t01=0x007c}
0xb296…b2ac               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x0072, t01=0x009a}
0xb2ac…b2be               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0072, t01=0x00b0}
0xb2be…b2ca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x00c2}
0xb2ca…b2de               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0072, t01=0x00ce}
0xb2de…b2f0               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x0072, t01=0x00e2}
0xb2f0…b2f8               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x00f4}
0xb2f8…b30c               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x0072, t01=0x00fc}
0xb30c…b314               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x0110}
0xb314…b326               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x0072, t01=0x0118}
0xb326…b34c               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x0072, t01=0x012a}
0xb34c…b354               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x0150}
0xb354…b380               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x0072, t01=0x0158}
0xb380…b396               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x0072, t01=0x0184}
0xb396…b3c2               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x0073, t01=0x000a}
0xb3c2…b3d4               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0073, t01=0x0036}
0xb3d4…b3ec               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x0073, t01=0x0048}
0xb3ec…b3fe               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0073, t01=0x0060}
0xb3fe…b428               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x0073, t01=0x0072}
0xb428…b44e               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x0073, t01=0x009c}
0xb44e…b466               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x0073, t01=0x00c2}
0xb466…b490               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x0073, t01=0x00da}
0xb490…b4a6               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x0073, t01=0x0104}
0xb4a6…b4ba               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x0073, t01=0x011a}
0xb4ba…b4ce               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x0073, t01=0x012e}
0xb4ce…b4f2               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x0073, t01=0x0142}
0xb4f2…b504               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0073, t01=0x0166}
0xb504…b516               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x0073, t01=0x0178}
0xb516…b52a               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x0073, t01=0x018a}
0xb52a…b536               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x000e}
0xb536…b544               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x001a}
0xb544…b558               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x0074, t01=0x0028}
0xb558…b584               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x0074, t01=0x003c}
0xb584…b5a8               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x0074, t01=0x0068}
0xb5a8…b5bc               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x0074, t01=0x008c}
0xb5bc…b5e4               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x0074, t01=0x00a0}
0xb5e4…b60e               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x0074, t01=0x00c8}
0xb60e…b622               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x0074, t01=0x00f2}
0xb622…b648               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x0074, t01=0x0106}
0xb648…b676               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x0074, t01=0x012c}
0xb676…b68c               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x0074, t01=0x015a}
0xb68c…b6b0               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x0074, t01=0x0170}
0xb6b0…b6c4 (117, 0, 400) Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0075, t01=0x0004}
0xb6c4…b6f4               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x0075, t01=0x0018}
0xb6f4…b708               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x0075, t01=0x0048}
0xb708…b722               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x0075, t01=0x005c}
0xb722…b736               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x0075, t01=0x0076}
0xb736…b758               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x0075, t01=0x008a}
0xb758…b784               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x0075, t01=0x00ac}
0xb784…b7a6               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x0075, t01=0x00d8}
0xb7a6…b7c4               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0075, t01=0x00fa}
0xb7c4…b7e4               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x0075, t01=0x0118}
0xb7e4…b816               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x0075, t01=0x0138}
0xb816…b834               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0075, t01=0x016a}
0xb834…b854               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x0075, t01=0x0188}
0xb854…b860               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x0018}
0xb860…b874               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x0076, t01=0x0024}
0xb874…b890               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x0076, t01=0x0038}
0xb890…b8a4               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x0076, t01=0x0054}
0xb8a4…b8c2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0076, t01=0x0068}
0xb8c2…b8d6               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0076, t01=0x0086}
0xb8d6…b8f0               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x0076, t01=0x009a}
0xb8f0…b90e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x0076, t01=0x00b4}
0xb90e…b91a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x00d2}
0xb91a…b92e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0076, t01=0x00de}
0xb92e…b952               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x0076, t01=0x00f2}
0xb952…b964               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0076, t01=0x0116}
0xb964…b978               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0076, t01=0x0128}
0xb978…b99e               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x0076, t01=0x013c}
0xb99e…b9b0               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x0076, t01=0x0162}
0xb9b0…b9c4               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0076, t01=0x0174}
0xb9c4…b9ea               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x0076, t01=0x0188}
0xb9ea…b9f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x001e}
0xb9f6…ba16               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x0077, t01=0x002a}
0xba16…ba2a               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x0077, t01=0x004a}
0xba2a…ba4e               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x0077, t01=0x005e}
0xba4e…ba62               Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x0077, t01=0x0082}
0xba62…ba7e               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x0077, t01=0x0096}
0xba7e…baa2               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x0077, t01=0x00b2}
0xbaa2…bab0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0077, t01=0x00d6}
0xbab0…baba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x00e4}
0xbaba…bac4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x00ee}
0xbac4…bae6               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x0077, t01=0x00f8}
0xbae6…baf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x011a}
0xbaf0…bafa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0124}
0xbafa…bb0e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0077, t01=0x012e}
0xbb0e…bb22               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x0077, t01=0x0142}
0xbb22…bb4a               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x0077, t01=0x0156}
0xbb4a…bb68               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0077, t01=0x017e}
0xbb68…bb8a               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0078, t01=0x000c}
0xbb8a…bb9e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0078, t01=0x002e}
0xbb9e…bbbc               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0078, t01=0x0042}
0xbbbc…bbd6               Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x0078, t01=0x0060}
0xbbd6…bbea               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0078, t01=0x007a}
0xbbea…bc08               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x0078, t01=0x008e}
0xbc08…bc1c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x0078, t01=0x00ac}
0xbc1c…bc3a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x0078, t01=0x00c0}
0xbc3a…bc4e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0078, t01=0x00de}
0xbc4e…bc6c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0078, t01=0x00f2}
0xbc6c…bc84               Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x0078, t01=0x0110}
0xbc84…bca2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0078, t01=0x0128}
0xbca2…bcb6               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0078, t01=0x0146}
0xbcb6…bcd4               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0078, t01=0x015a}
0xbcd4…bcf6               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0078, t01=0x0178}
0xbcf6…bd18               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x0079, t01=0x000a}
0xbd18…bd2a               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0079, t01=0x002c}
0xbd2a…bd52               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x0079, t01=0x003e}
0xbd52…bd72               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x0079, t01=0x0066}
0xbd72…bd94               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x0079, t01=0x0086}
0xbd94…bdb6               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0079, t01=0x00a8}
0xbdb6…bdc8               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x0079, t01=0x00ca}
0xbdc8…bde6               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x0079, t01=0x00dc}
0xbde6…bdf8               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0079, t01=0x00fa}
0xbdf8…be1a               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x0079, t01=0x010c}
0xbe1a…be2c               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x0079, t01=0x012e}
0xbe2c…be40               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x0079, t01=0x0140}
0xbe40…be60               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x0079, t01=0x0154}
0xbe60…be84               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x0079, t01=0x0174}
0xbe84…be90               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x0008}
0xbe90…be9e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007a, t01=0x0014}
0xbe9e…bea8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0022}
0xbea8…beb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x002c}
0xbeb2…bed2               Head {h00=0x001c, h01=0x0050, text=»* TRANSMIT SYNC SEQUENCE«, t00=0x007a, t01=0x0036}
0xbed2…bedc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0056}
0xbedc…bee6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0060}
0xbee6…befa               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x007a, t01=0x006a}
0xbefa…bf14               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x007a, t01=0x007e}
0xbf14…bf42               Head {h00=0x002a, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT IF NOT DONE«, t00=0x007a, t01=0x0098}
0xbf42…bf64               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN PERFORM SST «, t00=0x007a, t01=0x00c6}
0xbf64…bf80               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x007a, t01=0x00e8}
0xbf80…bfaa               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x007a, t01=0x0104}
0xbfaa…bfc0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007a, t01=0x012e}
0xbfc0…bfdc               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x007a, t01=0x0144}
0xbfdc…bff8               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=1  SALCUZ «, t00=0x007a, t01=0x0160}
0xbff8…c012               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x007a, t01=0x017c}
0xc012…c042               Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER SALCUZ«, t00=0x007b, t01=0x0008}
0xc042…c060               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x007b, t01=0x0038}
0xc060…c07e               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x007b, t01=0x0056}
0xc07e…c09c               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x007b, t01=0x0074}
0xc09c…c0b4               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x007b, t01=0x0092}
0xc0b4…c0da               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x007b, t01=0x00aa}
0xc0da…c0f6               Head {h00=0x0018, h01=0x0050, text=»TRS010 EQU *  SALCUZ«, t00=0x007b, t01=0x00d0}
0xc0f6…c114               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x007b, t01=0x00ec}
0xc114…c14a               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x007b, t01=0x010a}
0xc14a…c160               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007b, t01=0x0140}
0xc160…c17c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x007b, t01=0x0156}
0xc17c…c198               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=0  SALCUZ «, t00=0x007b, t01=0x0172}
0xc198…c1b4               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x007b, t01=0x018e}
0xc1b4…c1d4               Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,LCUUT  SALCUZ «, t00=0x007c, t01=0x001a}
0xc1d4…c1f2               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x007c, t01=0x003a}
0xc1f2…c210               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x007c, t01=0x0058}
0xc210…c22e               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x007c, t01=0x0076}
0xc22e…c246               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x007c, t01=0x0094}
0xc246…c26c               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x007c, t01=0x00ac}
0xc26c…c280               Head {h00=0x0010, h01=0x0050, text=»TRS010 EQU *«, t00=0x007c, t01=0x00d2}
0xc280…c29c               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x007c, t01=0x00e6}
0xc29c…c2d2               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x007c, t01=0x0102}
0xc2d2…c2e8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007c, t01=0x0138}
0xc2e8…c316               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x007c, t01=0x014e}
0xc316…c32e               Head {h00=0x0014, h01=0x0050, text=» LDK A3,4 4 SYNS«, t00=0x007c, t01=0x017c}
0xc32e…c348 (125, 0, 400) Head {h00=0x0016, h01=0x0050, text=»TRS100 LDK A2,SYN «, t00=0x007d, t01=0x0004}
0xc348…c366               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SYN «, t00=0x007d, t01=0x001e}
0xc366…c378               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x007d, t01=0x003c}
0xc378…c38e               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x007d, t01=0x004e}
0xc38e…c39e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007d, t01=0x0064}
0xc39e…c3ac               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007d, t01=0x0074}
0xc3ac…c3b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0082}
0xc3b6…c3c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x008c}
0xc3c0…c3de               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x007d, t01=0x0096}
0xc3de…c3e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00b4}
0xc3e8…c3f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00be}
0xc3f2…c406               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x007d, t01=0x00c8}
0xc406…c41a               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x007d, t01=0x00dc}
0xc41a…c43a               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x007d, t01=0x00f0}
0xc43a…c468               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x007d, t01=0x0110}
0xc468…c48a               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x007d, t01=0x013e}
0xc48a…c4ba               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x007d, t01=0x0160}
0xc4ba…c4ce               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x007d, t01=0x0190}
0xc4ce…c4fa               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x007e, t01=0x0014}
0xc4fa…c506               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x0040}
0xc506…c51a               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x007e, t01=0x004c}
0xc51a…c52c               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x007e, t01=0x0060}
0xc52c…c542               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHLCI2«, t00=0x007e, t01=0x0072}
0xc542…c560               Head {h00=0x001a, h01=0x0050, text=» CWK A2,SYN SKIP SYNS «, t00=0x007e, t01=0x0088}
0xc560…c574               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x007e, t01=0x00a6}
0xc574…c59a               Head {h00=0x0022, h01=0x0050, text=»IHLCI2 XRR A7,A2 CALCULATE LRC«, t00=0x007e, t01=0x00ba}
0xc59a…c5a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x00e0}
0xc5a6…c5ba               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x007e, t01=0x00ec}
0xc5ba…c5cc               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x007e, t01=0x0100}
0xc5cc…c602               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME «, t00=0x007e, t01=0x0112}
0xc602…c618               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x007e, t01=0x0148}
0xc618…c63c               Head {h00=0x0020, h01=0x0050, text=» RF(E) READ SKIP EBCDIC SYN «, t00=0x007e, t01=0x015e}
0xc63c…c650               Head {h00=0x0010, h01=0x0050, text=»IHLCI1 EQU *«, t00=0x007e, t01=0x0182}
0xc650…c674               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x007f, t01=0x0008}
0xc674…c6a0               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x007f, t01=0x002c}
0xc6a0…c6ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007f, t01=0x0058}
0xc6ac…c6c2               Head {h00=0x0012, h01=0x0050, text=»IHIN10 RTN A5 «, t00=0x007f, t01=0x0064}
0xc6c2…c6de               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x007f, t01=0x007a}
0xc6de…c702               Head {h00=0x0020, h01=0x0050, text=»IHIN20 CF A5,SST PERFORM SST«, t00=0x007f, t01=0x0096}
0xc702…c712               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x007f, t01=0x00ba}
0xc712…c728               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007f, t01=0x00ca}
0xc728…c744               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x007f, t01=0x00e0}
0xc744…c76c               Head {h00=0x0024, h01=0x0050, text=»IHIN20 RF SST PERFORM SST SALCUZ«, t00=0x007f, t01=0x00fc}
0xc76c…c782               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007f, t01=0x0124}
0xc782…c790               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007f, t01=0x013a}
0xc790…c79a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0148}
0xc79a…c7a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0152}
0xc7a4…c7c6               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x007f, t01=0x015c}
0xc7c6…c7d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x017e}
0xc7d0…c7da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0188}
0xc7da…c7ee (128, 0, 400) Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x0080, t01=0x0004}
0xc7ee…c802               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0080, t01=0x0018}
0xc802…c824               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0080, t01=0x002c}
0xc824…c852               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0080, t01=0x004e}
0xc852…c864               Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x0080, t01=0x007c}
0xc864…c872               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0080, t01=0x008e}
0xc872…c87c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x009c}
0xc87c…c886               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00a6}
0xc886…c8b0               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x0080, t01=0x00b0}
0xc8b0…c8ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00da}
0xc8ba…c8e6               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x0080, t01=0x00e4}
0xc8e6…c918               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x0080, t01=0x0110}
0xc918…c948               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x0080, t01=0x0142}
0xc948…c978               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x0080, t01=0x0172}
0xc978…c982               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0012}
0xc982…c99a               Head {h00=0x0014, h01=0x0050, text=»SST SST A1,LCUIN«, t00=0x0081, t01=0x001c}
0xc99a…c9b6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0081, t01=0x0034}
0xc9b6…c9ec               Head {h00=0x0032, h01=0x0050, text=» RF(NA) SST200 ALREADY INACTIVE SALCUZ  SALCUZ«, t00=0x0081, t01=0x0050}
0xc9ec…ca02               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0081, t01=0x0086}
0xca02…ca14               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0081, t01=0x009c}
0xca14…ca28               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0081, t01=0x00ae}
0xca28…ca52               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOG SST INFORMATION «, t00=0x0081, t01=0x00c2}
0xca52…ca5e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x00ec}
0xca5e…ca7a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0081, t01=0x00f8}
0xca7a…ca8c               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0081, t01=0x0114}
0xca8c…caa2               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x0081, t01=0x0126}
0xcaa2…cab8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0081, t01=0x013c}
0xcab8…cad4               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0081, t01=0x0152}
0xcad4…caee               Head {h00=0x0016, h01=0x0050, text=» ANK A2,6  SALCUZ «, t00=0x0081, t01=0x016e}
0xcaee…cb0c               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST100  SALCUZ «, t00=0x0081, t01=0x0188}
0xcb0c…cb26               Head {h00=0x0016, h01=0x0050, text=» ANK A2,2  SALCUZ «, t00=0x0082, t01=0x0016}
0xcb26…cb50               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SST050 THROUGH PUT SALCUZ «, t00=0x0082, t01=0x0030}
0xcb50…cb7a               Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 SET PARITY ERROR SALCUZ «, t00=0x0082, t01=0x005a}
0xcb7a…cb94               Head {h00=0x0016, h01=0x0050, text=» RF SSTRET  SALCUZ«, t00=0x0082, t01=0x0084}
0xcb94…cbaa               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0082, t01=0x009e}
0xcbaa…cbc6               Head {h00=0x0018, h01=0x0050, text=»SST050 EQU *  SALCUZ«, t00=0x0082, t01=0x00b4}
0xcbc6…cbe6               Head {h00=0x001c, h01=0x0050, text=» CM XSTA TROUHHPUT ERROR«, t00=0x0082, t01=0x00d0}
0xcbe6…cbfa               Head {h00=0x0010, h01=0x0050, text=» LDKL A5,STB«, t00=0x0082, t01=0x00f0}
0xcbfa…cc0e               Head {h00=0x0010, h01=0x0050, text=» ABL BRM010 «, t00=0x0082, t01=0x0104}
0xcc0e…cc22               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x0082, t01=0x0118}
0xcc22…cc38               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTCU «, t00=0x0082, t01=0x012c}
0xcc38…cc54               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0082, t01=0x0142}
0xcc54…cc82               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0082, t01=0x015e}
0xcc82…cc92               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0082, t01=0x018c}
0xcc92…cca8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0083, t01=0x000c}
0xcca8…ccc4               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0083, t01=0x0022}
0xccc4…cce0               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/21  SALCUZ «, t00=0x0083, t01=0x003e}
0xcce0…ccfe               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST200 LSALCUZ «, t00=0x0083, t01=0x005a}
0xccfe…cd38               Head {h00=0x0036, h01=0x0050, text=» CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ«, t00=0x0083, t01=0x0078}
0xcd38…cd58               Head {h00=0x001c, h01=0x0050, text=» DATA BRM RESTART SALCUZ«, t00=0x0083, t01=0x00b2}
0xcd58…cd78               Head {h00=0x001c, h01=0x0050, text=» DATA 2 WAIT TIME SALCUZ«, t00=0x0083, t01=0x00d2}
0xcd78…cd90               Head {h00=0x0014, h01=0x0050, text=» RF READ  SALCUZ«, t00=0x0083, t01=0x00f2}
0xcd90…cd9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x010a}
0xcd9a…cdba               Head {h00=0x001c, h01=0x0050, text=»SST200 LDK A1,0  SALCUZ «, t00=0x0083, t01=0x0114}
0xcdba…cdda               Head {h00=0x001c, h01=0x0050, text=»SSTRET ADK A5,4  SALCUZ «, t00=0x0083, t01=0x0134}
0xcdda…cdfa               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 SET CR SALCUZ«, t00=0x0083, t01=0x0154}
0xcdfa…ce18               Head {h00=0x001a, h01=0x0050, text=» ABR* A5 RETURN SALCUZ«, t00=0x0083, t01=0x0174}
0xce18…ce2e (132, 0, 400) Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x0004}
0xce2e…ce38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x001a}
0xce38…ce42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0024}
0xce42…ce56               Head {h00=0x0010, h01=0x0050, text=»* HALT INPUT«, t00=0x0084, t01=0x002e}
0xce56…ce60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0042}
0xce60…ce6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x004c}
0xce6a…ce8a               Head {h00=0x001c, h01=0x0050, text=»HALTIN LDK A1,0  SALCUZ «, t00=0x0084, t01=0x0056}
0xce8a…cea2               Head {h00=0x0014, h01=0x0050, text=» CIO A1,0,LCUIN «, t00=0x0084, t01=0x0076}
0xcea2…cebe               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0084, t01=0x008e}
0xcebe…cef6               Head {h00=0x0034, h01=0x0050, text=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK«, t00=0x0084, t01=0x00aa}
0xcef6…cf0c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x00e2}
0xcf0c…cf28               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0084, t01=0x00f8}
0xcf28…cf56               Head {h00=0x002a, h01=0x0050, text=» RF READ WAIT FOR SST INTERRUPT SALCUZ«, t00=0x0084, t01=0x0114}
0xcf56…cf6c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x0142}
0xcf6c…cf7a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0084, t01=0x0158}
0xcf7a…cf84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0166}
0xcf84…cf8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0170}
0xcf8e…cfbe               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x0084, t01=0x017a}
0xcfbe…cfc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x001a}
0xcfc8…cfd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0024}
0xcfd2…cfe6               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0085, t01=0x002e}
0xcfe6…cffa               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0085, t01=0x0042}
0xcffa…d00e               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0085, t01=0x0056}
0xd00e…d022               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0085, t01=0x006a}
0xd022…d056               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x0085, t01=0x007e}
0xd056…d084               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x0085, t01=0x00b2}
0xd084…d090               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x00e0}
0xd090…d0a4               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x0085, t01=0x00ec}
0xd0a4…d0ca               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x0085, t01=0x0100}
0xd0ca…d0e0               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x0085, t01=0x0126}
0xd0e0…d102               Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x0085, t01=0x013c}
0xd102…d116               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0085, t01=0x015e}
0xd116…d13e               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x0085, t01=0x0172}
0xd13e…d14a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x000a}
0xd14a…d15e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0086, t01=0x0016}
0xd15e…d188               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x0086, t01=0x002a}
0xd188…d194               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x0054}
0xd194…d1a8               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0086, t01=0x0060}
0xd1a8…d1d2               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x0086, t01=0x0074}
0xd1d2…d1de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x009e}
0xd1de…d1e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00aa}
0xd1e8…d202               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x0086, t01=0x00b4}
0xd202…d214               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0086, t01=0x00ce}
0xd214…d222               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0086, t01=0x00e0}
0xd222…d22c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00ee}
0xd22c…d236               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00f8}
0xd236…d248               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x0086, t01=0x0102}
0xd248…d252               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0114}
0xd252…d272               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x0086, t01=0x011e}
0xd272…d27c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x013e}
0xd27c…d286               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0148}
0xd286…d2a8               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0086, t01=0x0152}
0xd2a8…d2c2               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x0086, t01=0x0174}
0xd2c2…d2d4               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0086, t01=0x018e}
0xd2d4…d2e8               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x0087, t01=0x0010}
0xd2e8…d300               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x0087, t01=0x0024}
0xd300…d316               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x0087, t01=0x003c}
0xd316…d330               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x0087, t01=0x0052}
0xd330…d344               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0087, t01=0x006c}
0xd344…d356               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x0087, t01=0x0080}
0xd356…d362               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x0092}
0xd362…d384               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x0087, t01=0x009e}
0xd384…d39c               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x0087, t01=0x00c0}
0xd39c…d3a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x00d8}
0xd3a8…d3b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00e4}
0xd3b2…d3bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00ee}
0xd3bc…d3c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00f8}
0xd3c6…d3d8               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x0087, t01=0x0102}
0xd3d8…d3e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0114}
0xd3e2…d414               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x0087, t01=0x011e}
0xd414…d41e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0150}
0xd41e…d428               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x015a}
0xd428…d440               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x0087, t01=0x0164}
0xd440…d462               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0087, t01=0x017c}
0xd462…d474               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0088, t01=0x000e}
0xd474…d48a               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x0088, t01=0x0020}
0xd48a…d49e               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x0088, t01=0x0036}
0xd49e…d4b4               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x0088, t01=0x004a}
0xd4b4…d4c8               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0088, t01=0x0060}
0xd4c8…d4da               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x0088, t01=0x0074}
0xd4da…d4f2               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x0088, t01=0x0086}
0xd4f2…d506               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0088, t01=0x009e}
0xd506…d512               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x00b2}
0xd512…d534               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x0088, t01=0x00be}
0xd534…d548               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x0088, t01=0x00e0}
0xd548…d554               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x00f4}
0xd554…d566               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0088, t01=0x0100}
0xd566…d57a               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x0088, t01=0x0112}
0xd57a…d58e               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x0088, t01=0x0126}
0xd58e…d59e               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0088, t01=0x013a}
0xd59e…d5a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x014a}
0xd5a8…d5b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0154}
0xd5b2…d5c0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0088, t01=0x015e}
0xd5c0…d5ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x016c}
0xd5ca…d60a               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x0088, t01=0x0176}
0xd60a…d614               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0026}
0xd614…d63c               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x0089, t01=0x0030}
0xd63c…d65c               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x0089, t01=0x0058}
0xd65c…d672               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x0089, t01=0x0078}
0xd672…d698               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x0089, t01=0x008e}
0xd698…d6a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00b4}
0xd6a2…d6e8               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x0089, t01=0x00be}
0xd6e8…d716               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x0089, t01=0x0104}
0xd716…d746               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x0089, t01=0x0132}
0xd746…d750               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0162}
0xd750…d782               Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x0089, t01=0x016c}
0xd782…d78c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x000e}
0xd78c…d796               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0018}
0xd796…d7aa               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x008a, t01=0x0022}
0xd7aa…d7be               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x008a, t01=0x0036}
0xd7be…d7d2               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x008a, t01=0x004a}
0xd7d2…d7de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x005e}
0xd7de…d7f0               Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x008a, t01=0x006a}
0xd7f0…d804               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x008a, t01=0x007c}
0xd804…d818               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x008a, t01=0x0090}
0xd818…d824               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x00a4}
0xd824…d84e               Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x008a, t01=0x00b0}
0xd84e…d87c               Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x008a, t01=0x00da}
0xd87c…d894               Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x008a, t01=0x0108}
0xd894…d8b4               Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x008a, t01=0x0120}
0xd8b4…d8d6               Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x008a, t01=0x0140}
0xd8d6…d902               Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x008a, t01=0x0162}
0xd902…d926               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x008a, t01=0x018e}
0xd926…d93a               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x008b, t01=0x0022}
0xd93a…d962               Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x008b, t01=0x0036}
0xd962…d990               Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x008b, t01=0x005e}
0xd990…d99c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x008c}
0xd99c…d9b0               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x008b, t01=0x0098}
0xd9b0…d9e2               Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x008b, t01=0x00ac}
0xd9e2…d9ee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x00de}
0xd9ee…da18               Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x008b, t01=0x00ea}
0xda18…da30               Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x008b, t01=0x0114}
0xda30…da46               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x008b, t01=0x012c}
0xda46…da56               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008b, t01=0x0142}
0xda56…da64               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008b, t01=0x0152}
0xda64…da6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0160}
0xda6e…da78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x016a}
0xda78…da94               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x008b, t01=0x0174}
0xda94…da9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0190}
0xda9e…daa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x000a}
0xdaa8…dad0               Head {h00=0x0024, h01=0x0050, text=»DC15ON CF A15,SAVE8 SAVE A1 - A8«, t00=0x008c, t01=0x0014}
0xdad0…dae4               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x008c, t01=0x003c}
0xdae4…db04               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x008c, t01=0x0050}
0xdb04…db18               Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x008c, t01=0x0070}
0xdb18…db4a               Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x008c, t01=0x0084}
0xdb4a…db62               Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x008c, t01=0x00b6}
0xdb62…db76               Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x008c, t01=0x00ce}
0xdb76…db98               Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x008c, t01=0x00e2}
0xdb98…dbbc               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x008c, t01=0x0104}
0xdbbc…dbf0               Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x008c, t01=0x0128}
0xdbf0…dc1c               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x008c, t01=0x015c}
0xdc1c…dc2e               Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x008c, t01=0x0188}
0xdc2e…dc42               Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x008d, t01=0x000a}
0xdc42…dc4e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x001e}
0xdc4e…dc7a               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x008d, t01=0x002a}
0xdc7a…dca0               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x008d, t01=0x0056}
0xdca0…dcce               Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x008d, t01=0x007c}
0xdcce…dce4               Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x008d, t01=0x00aa}
0xdce4…dcf2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008d, t01=0x00c0}
0xdcf2…dcfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00ce}
0xdcfc…dd14               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x008d, t01=0x00d8}
0xdd14…dd1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00f0}
0xdd1e…dd4a               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x008d, t01=0x00fa}
0xdd4a…dd5e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x008d, t01=0x0126}
0xdd5e…dd8a               Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x008d, t01=0x013a}
0xdd8a…ddb8               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x008d, t01=0x0166}
0xddb8…dde0 (142, 0, 400) Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x008e, t01=0x0004}
0xdde0…ddf2               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x008e, t01=0x002c}
0xddf2…ddfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x003e}
0xddfc…de34               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x008e, t01=0x0048}
0xde34…de3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0080}
0xde3e…de66               Head {h00=0x0024, h01=0x0050, text=»CPTIM CM DCONOF INDICATE POLLING«, t00=0x008e, t01=0x008a}
0xde66…de7e               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x008e, t01=0x00b2}
0xde7e…dea2               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x008e, t01=0x00ca}
0xdea2…ded0               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x008e, t01=0x00ee}
0xded0…dee0               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008e, t01=0x011c}
0xdee0…deea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x012c}
0xdeea…df04               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x008e, t01=0x0136}
0xdf04…df0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0150}
0xdf0e…df36               Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x008e, t01=0x015a}
0xdf36…df50               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x008e, t01=0x0182}
0xdf50…df7a               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x008f, t01=0x000c}
0xdf7a…df8e               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x008f, t01=0x0036}
0xdf8e…dfa0               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x008f, t01=0x004a}
0xdfa0…dfae               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008f, t01=0x005c}
0xdfae…dfb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x006a}
0xdfb8…dfd8               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x008f, t01=0x0074}
0xdfd8…dfe2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0094}
0xdfe2…dff6               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x008f, t01=0x009e}
0xdff6…e01e               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x008f, t01=0x00b2}
0xe01e…e034               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x008f, t01=0x00da}
0xe034…e050               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x008f, t01=0x00f0}
0xe050…e078               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x008f, t01=0x010c}
0xe078…e088               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008f, t01=0x0134}
0xe088…e092               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0144}
0xe092…e0ae               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x008f, t01=0x014e}
0xe0ae…e0b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x016a}
0xe0b8…e0d0               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x008f, t01=0x0174}
0xe0d0…e0ec               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x008f, t01=0x018c}
0xe0ec…e110               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x0090, t01=0x0018}
0xe110…e140               Head {h00=0x002c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT IF OPEN SALCUZ «, t00=0x0090, t01=0x003c}
0xe140…e154               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0090, t01=0x006c}
0xe154…e17a               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x0090, t01=0x0080}
0xe17a…e198               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0090, t01=0x00a6}
0xe198…e1c2               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0090, t01=0x00c4}
0xe1c2…e1d8               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x0090, t01=0x00ee}
0xe1d8…e1e6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0090, t01=0x0104}
0xe1e6…e1f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0112}
0xe1f0…e20e               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x0090, t01=0x011c}
0xe20e…e218               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x013a}
0xe218…e244               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x0090, t01=0x0144}
0xe244…e264               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x0090, t01=0x0170}
0xe264…e282               Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x0090, t01=0x0190}
0xe282…e294               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x0091, t01=0x001e}
0xe294…e2a8               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x0091, t01=0x0030}
0xe2a8…e2b6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0091, t01=0x0044}
0xe2b6…e2ca               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0091, t01=0x0052}
0xe2ca…e2d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0066}
0xe2d4…e2de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0070}
0xe2de…e2fa               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x0091, t01=0x007a}
0xe2fa…e304               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0096}
0xe304…e31c               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x0091, t01=0x00a0}
0xe31c…e33a               Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x0091, t01=0x00b8}
0xe33a…e344               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00d6}
0xe344…e34e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00e0}
0xe34e…e362               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x0091, t01=0x00ea}
0xe362…e378               Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x0091, t01=0x00fe}
0xe378…e390               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x0091, t01=0x0114}
0xe390…e3a8               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x0091, t01=0x012c}
0xe3a8…e3ba               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x0091, t01=0x0144}
0xe3ba…e3d2               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x0091, t01=0x0156}
0xe3d2…e3e4               Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x0091, t01=0x016e}
0xe3e4…e3f6               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x0091, t01=0x0180}
0xe3f6…e408 (146, 0, 398) Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x0092, t01=0x0004}
0xe408…e41a               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0092, t01=0x0016}
0xe41a…e430               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x0092, t01=0x0028}
0xe430…e446               Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x0092, t01=0x003e}
0xe446…e45e               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x0092, t01=0x0054}
0xe45e…e474               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x0092, t01=0x006c}
0xe474…e48a               Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x0092, t01=0x0082}
0xe48a…e4a2               Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x0092, t01=0x0098}
0xe4a2…e4ba               Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x0092, t01=0x00b0}
0xe4ba…e4ca               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0092, t01=0x00c8}
0xe4ca…e4de               Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x0092, t01=0x00d8}
0xe4de…e4ec               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0092, t01=0x00ec}
0xe4ec…e4f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x00fa}
0xe4f6…e500               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0104}
0xe500…e52c               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x0092, t01=0x010e}
0xe52c…e54c               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x0092, t01=0x013a}
0xe54c…e556               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x015a}
0xe556…e560               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0164}
0xe560…e588               Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x0092, t01=0x016e}
0xe588…e5b0               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x0093, t01=0x0008}
0xe5b0…e5d0               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x0093, t01=0x0030}
0xe5d0…e5f0               Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x0093, t01=0x0050}
0xe5f0…e610               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x0093, t01=0x0070}
0xe610…e63c               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x0093, t01=0x0090}
0xe63c…e65c               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x0093, t01=0x00bc}
0xe65c…e66e               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0093, t01=0x00dc}
0xe66e…e680               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x0093, t01=0x00ee}
0xe680…e692               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0093, t01=0x0100}
0xe692…e6c4               Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x0093, t01=0x0112}
0xe6c4…e6d4               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0093, t01=0x0144}
0xe6d4…e6e0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x0154}
0xe6e0…e6f4               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0093, t01=0x0160}
0xe6f4…e6fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0174}
0xe6fe…e728               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x0093, t01=0x017e}
0xe728…e74e               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x0094, t01=0x0018}
0xe74e…e758               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x003e}
0xe758…e76e               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x0094, t01=0x0048}
0xe76e…e782               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0094, t01=0x005e}
0xe782…e794               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0094, t01=0x0072}
0xe794…e7a6               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0094, t01=0x0084}
0xe7a6…e7bc               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x0094, t01=0x0096}
0xe7bc…e7d0               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x0094, t01=0x00ac}
0xe7d0…e7e4               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x0094, t01=0x00c0}
0xe7e4…e7f6               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x0094, t01=0x00d4}
0xe7f6…e806               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0094, t01=0x00e6}
0xe806…e80e               Head {h00=0x0004, h01=0x0050, t00=0x0094, t01=0x00f6}
0xe80e…e81a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x00fe}
0xe81a…e828               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0094, t01=0x010a}
0xe828…e832               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0118}
0xe832…e83c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0122}
0xe83c…e862               Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x0094, t01=0x012c}
0xe862…e86c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0152}
0xe86c…e876               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x015c}
0xe876…e896               Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x0094, t01=0x0166}
0xe896…e8b6               Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x0094, t01=0x0186}
0xe8b6…e8d0               Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x0095, t01=0x0016}
0xe8d0…e8ec               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0095, t01=0x0030}
0xe8ec…e902               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0095, t01=0x004c}
0xe902…e930               Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x0095, t01=0x0062}
0xe930…e94c               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x0095, t01=0x0090}
0xe94c…e974               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0095, t01=0x00ac}
0xe974…e98e               Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x0095, t01=0x00d4}
0xe98e…e9ac               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x0095, t01=0x00ee}
0xe9ac…e9d8               Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x0095, t01=0x010c}
0xe9d8…ea0a               Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x0095, t01=0x0138}
0xea0a…ea30               Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x0095, t01=0x016a}
0xea30…ea60               Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x0095, t01=0x0190}
0xea60…ea7e               Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x0096, t01=0x0030}
0xea7e…ea8c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0096, t01=0x004e}
0xea8c…ea96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x005c}
0xea96…eaa0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0066}
0xeaa0…eac0               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x0096, t01=0x0070}
0xeac0…eaca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0090}
0xeaca…eaea               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x0096, t01=0x009a}
0xeaea…eaf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00ba}
0xeaf4…eb08               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x0096, t01=0x00c4}
0xeb08…eb2c               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x0096, t01=0x00d8}
0xeb2c…eb42               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x0096, t01=0x00fc}
0xeb42…eb58               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0096, t01=0x0112}
0xeb58…eb6c               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0096, t01=0x0128}
0xeb6c…eb82               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x0096, t01=0x013c}
0xeb82…eb98               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0096, t01=0x0152}
0xeb98…ebac               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0096, t01=0x0168}
0xebac…ebc2               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x0096, t01=0x017c}
0xebc2…ebd8 (151, 0, 400) Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0097, t01=0x0004}
0xebd8…ebec               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0097, t01=0x001a}
0xebec…ebf8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0097, t01=0x002e}
0xebf8…ec0e               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0097, t01=0x003a}
0xec0e…ec22               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0097, t01=0x0050}
0xec22…ec3e               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x0097, t01=0x0064}
0xec3e…ec52               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0097, t01=0x0080}
0xec52…ec5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0094}
0xec5c…ec66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x009e}
0xec66…ec88               Head {h00=0x001e, h01=0x0050, text=»* DC TRANSMIT BUFFER POOL «, t00=0x0097, t01=0x00a8}
0xec88…ec92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00ca}
0xec92…ec9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00d4}
0xec9c…ecb0               Head {h00=0x0010, h01=0x0050, text=»DCTBUF EQU *«, t00=0x0097, t01=0x00de}
0xecb0…ecba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00f2}
0xecba…ecc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00fc}
0xecc4…ecd8               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0097, t01=0x0106}
0xecd8…ed08               Head {h00=0x002c, h01=0x0050, text=» DATA TBUF1 POINTER TO FIRST FREE BUFFER«, t00=0x0097, t01=0x011a}
0xed08…ed3c               Head {h00=0x0030, h01=0x0050, text=»TBUF1 DATA TBUF2 POINTER TO NEXT FREE BUFFER«, t00=0x0097, t01=0x014a}
0xed3c…ed5c               Head {h00=0x001c, h01=0x0050, text=» RES TBUFL BUFFER AREA 1«, t00=0x0097, t01=0x017e}
0xed5c…ed7e               Head {h00=0x001e, h01=0x0050, text=»TBUF2 DATA 0 END OF CHAIN «, t00=0x0098, t01=0x000e}
0xed7e…ed9e               Head {h00=0x001c, h01=0x0050, text=» RES TBUFL BUFFER AREA 2«, t00=0x0098, t01=0x0030}
0xed9e…edaa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0098, t01=0x0050}
0xedaa…edb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x005c}
0xedb4…edc2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0098, t01=0x0066}
0xedc2…edcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0074}
0xedcc…edd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x007e}
0xedd6…edfa               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x0098, t01=0x0088}
0xedfa…ee04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x00ac}
0xee04…ee0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x00b6}
0xee0e…ee22               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0098, t01=0x00c0}
0xee22…ee3c               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x0098, t01=0x00d4}
0xee3c…ee52               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x0098, t01=0x00ee}
0xee52…ee64               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x0098, t01=0x0104}
0xee64…ee7e               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x0098, t01=0x0116}
0xee7e…ee94               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x0098, t01=0x0130}
0xee94…eea6               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x0098, t01=0x0146}
0xeea6…eebe               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x0098, t01=0x0158}
0xeebe…eed4               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x0098, t01=0x0170}
0xeed4…eee8               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x0098, t01=0x0186}
0xeee8…ef02               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x0099, t01=0x000a}
0xef02…ef18               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x0099, t01=0x0024}
0xef18…ef2a               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x0099, t01=0x003a}
0xef2a…ef3c               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x0099, t01=0x004c}
0xef3c…ef52               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x0099, t01=0x005e}
0xef52…ef68               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x0099, t01=0x0074}
0xef68…ef80               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x0099, t01=0x008a}
0xef80…ef9c               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x0099, t01=0x00a2}
0xef9c…efb0               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x0099, t01=0x00be}
0xefb0…efc4               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x0099, t01=0x00d2}
0xefc4…efda               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x0099, t01=0x00e6}
0xefda…efe8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0099, t01=0x00fc}
0xefe8…eff2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x010a}
0xeff2…effc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0114}
0xeffc…f016               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x0099, t01=0x011e}
0xf016…f02a               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x0099, t01=0x0138}
0xf02a…f03a               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x0099, t01=0x014c}
0xf03a…f050               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x0099, t01=0x015c}
0xf050…f064               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x0099, t01=0x0172}
0xf064…f078               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x0099, t01=0x0186}
0xf078…f084               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x000a}
0xf084…f08e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0016}
0xf08e…f098               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0020}
0xf098…f0a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x002a}
0xf0a2…f0b6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x009a, t01=0x0034}
0xf0b6…f0c4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009a, t01=0x0048}
0xf0c4…f104               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x009a, t01=0x0056}
0xf104…f10e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0096}
0xf10e…f128               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x009a, t01=0x00a0}
0xf128…f132               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00ba}
0xf132…f170               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x009a, t01=0x00c4}
0xf170…f17a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0102}
0xf17a…f1bc               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x009a, t01=0x010c}
0xf1bc…f1c4               Head {h00=0x0004, h01=0x0050, t00=0x009a, t01=0x014e}
0xf1c4…f1d8               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x009a, t01=0x0156}
0xf1d8…f1fe               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x009a, t01=0x016a}
0xf1fe…f210               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x009a, t01=0x0190}
0xf210…f226               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x009b, t01=0x0012}
0xf226…f250               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x009b, t01=0x0028}
0xf250…f276               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x009b, t01=0x0052}
0xf276…f27e               Head {h00=0x0004, h01=0x0050, t00=0x009b, t01=0x0078}
0xf27e…f290               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x009b, t01=0x0080}
0xf290…f2a6               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x009b, t01=0x0092}
0xf2a6…f2d2               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x009b, t01=0x00a8}
0xf2d2…f2fa               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x009b, t01=0x00d4}
0xf2fa…f310               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x009b, t01=0x00fc}
0xf310…f31a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0112}
0xf31a…f324               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x011c}
0xf324…f32e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0126}
0xf32e…f33c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009b, t01=0x0130}
0xf33c…f344               Head {h00=0x0004, h01=0x0050, t00=0x009b, t01=0x013e}
0xf344…f34c               Head {h00=0x0004, h01=0x0050, t00=0x009b, t01=0x0146}
0xf34c…f360               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x009b, t01=0x014e}
0xf360…f38e               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x009b, t01=0x0162}
0xf38e…f3bc               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 /08-/0F «, t00=0x009b, t01=0x0190}
0xf3bc…f3ea               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x009c, t01=0x002e}
0xf3ea…f418               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E /18-/1F «, t00=0x009c, t01=0x005c}
0xf418…f446               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x009c, t01=0x008a}
0xf446…f474               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F /28-/2F «, t00=0x009c, t01=0x00b8}
0xf474…f4a0               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x009c, t01=0x00e6}
0xf4a0…f4cc               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 /38-3F«, t00=0x009c, t01=0x0112}
0xf4cc…f4d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x013e}
0xf4d8…f4e6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x014a}
0xf4e6…f4ee               Head {h00=0x0004, h01=0x0050, t00=0x009c, t01=0x0158}
0xf4ee…f50a               Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x009c, t01=0x0160}
0xf50a…f524               Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x009c, t01=0x017c}
0xf524…f54a               Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x009d, t01=0x0008}
0xf54a…f578               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=0x002e}
0xf578…f5a6               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=0x005c}
0xf5a6…f5ba               Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x009d, t01=0x008a}
0xf5ba…f5c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x009e}
0xf5c4…f5ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00a8}
0xf5ce…f5da               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x009d, t01=0x00b2}
0xf5da…f5de               Head {h00=0x4004, h01=0x0000}
0xf5de…f5e2               00 9d 00 be                                                                                                                                                                                                                                       ┆    ┆
0xf5e2…f5ea (158, 1, 8)   20 04 00 00 00 9e 00 04                                                                                                                                                                                                                           ┆        ┆
0xf5ea…f63a (159, 0, 400) 44 45 58 20 00 56 01 78 00 10 00 50 5c 49 46 54 5c 43 4f 44 45 3d 31 20 00 57 00 0c 00 2e 00 50 5c 4c 43 5c 41 32 2c 54 45 42 43 44 49 43 2c 41 32 5c 54 52 41 4e 53 4c 41 54 45 20 53 54 41 20 54 4f 20 45 42 43 44 49 43 20 00 57 00 20 00 08   ┆DEX  V x   P IFT CODE=1  W   . P LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC  W    ┆
0xf63a…f68a               00 50 5c 58 49 46 00 57 00 52 00 24 00 50 5c 53 54 5c 41 32 2c 2b 34 2c 41 31 5c 53 41 56 45 20 53 54 41 20 49 4e 20 42 55 46 46 45 52 20 00 57 00 5e 00 0c 00 50 5c 49 4d 5c 58 53 54 41 00 57 00 86 00 22 00 50 5c 53 54 5c 41 36 2c 46 44 57   ┆ P XIF W R $ P ST A2,+4,A1 SAVE STA IN BUFFER  W ^   P IM XSTA W   " P ST A6,FDW┆
0xf68a…f6da               54 49 4e 5c 53 54 4f 52 45 20 49 4e 50 55 54 20 44 57 54 20 00 57 00 96 00 0c 00 50 5c 52 54 4e 5c 41 35 20 00 57 00 bc 00 0a 00 50 5c 45 4a 45 43 54 00 57 00 cc 00 06 00 50 2a 20 00 57 00 da 00 06 00 50 2a 20 00 57 00 e4 00 24 00 50 2a 5c   ┆TIN STORE INPUT DWT  W     P RTN A5  W     P EJECT W     P*  W     P*  W   $ P* ┆
0xf6da…f72a               47 45 4e 45 52 41 4c 20 50 4f 4c 4c 20 48 41 53 20 42 45 45 4e 20 52 45 43 45 49 56 45 44 00 57 00 ee 00 06 00 50 2a 20 00 57 01 16 00 06 00 50 2a 20 00 57 01 20 00 10 00 50 47 50 4f 4c 4c 5c 45 51 55 5c 2a 20 00 57 01 2a 00 22 00 50 5c 43   ┆GENERAL POLL HAS BEEN RECEIVED W     P*  W     P*  W     PGPOLL EQU *  W * " P C┆
0xf72a…f77a               46 5c 41 35 2c 43 50 54 49 4d 5c 43 48 45 43 4b 20 50 4f 4c 4c 20 54 49 4d 45 52 20 00 57 01 3e 00 10 00 50 5c 49 46 46 5c 53 54 41 54 3d 30 20 00 57 01 64 00 12 00 50 5c 4c 44 5c 41 36 2c 44 43 53 54 51 5c 20 00 57 01 78 00 26 00 50 5c 52   ┆F A5,CPTIM CHECK POLL TIMER  W >   P IFF STAT=0  W d   P LD A6,DCSTQ   W x & P R┆
0xf77a…f7ca (160, 0, 400) 46 28 5a 29 5c 50 4f 4c 31 31 30 5c 4e 4f 20 53 54 41 54 55 53 20 54 4f 20 42 45 20 53 45 4e 54 00 57 01 8e 00 22 00 50 5c 53 55 4b 5c 41 36 2c 44 57 54 53 51 5c 47 45 54 20 44 57 54 20 41 44 44 52 45 53 53 20 00 58 00 28 00 10 00 50 50 4f   ┆F(Z) POL110 NO STATUS TO BE SENT W   " P SUK A6,DWTSQ GET DWT ADDRESS  X (   PPO┆
0xf7ca…f81a               4c 30 35 30 5c 45 51 55 5c 2a 00 58 00 4e 00 1c 00 50 5c 43 46 5c 41 35 2c 54 52 53 54 41 5c 53 45 4e 44 20 53 54 41 54 55 53 00 58 00 62 00 26 00 50 5c 43 46 5c 41 35 2c 53 50 54 49 4d 5c 53 54 41 52 54 20 50 52 4f 43 45 44 55 52 45 20 54   ┆L050 EQU * X N   P CF A5,TRSTA SEND STATUS X b & P CF A5,SPTIM START PROCEDURE T┆
0xf81a…f86a               49 4d 45 52 00 58 00 82 00 20 00 50 5c 49 4d 5c 58 41 43 4b 5c 53 45 54 20 27 41 43 4b 20 45 58 50 45 43 54 45 44 27 20 00 58 00 ac 00 08 00 50 5c 58 49 46 00 58 00 d0 00 10 00 50 5c 49 46 46 5c 53 54 41 54 3d 31 20 00 58 00 dc 00 0e 00 50   ┆IMER X     P IM XACK SET 'ACK EXPECTED'  X     P XIF X     P IFF STAT=1  X     P┆
0xf86a…f8ba               5c 52 46 5c 50 4f 4c 31 31 30 00 58 00 f0 00 08 00 50 5c 58 49 46 00 58 01 02 00 10 00 50 50 4f 4c 31 30 30 5c 45 51 55 5c 2a 00 58 01 0e 00 0c 00 50 5c 41 42 4c 5c 42 52 4d 00 58 01 22 00 10 00 50 50 4f 4c 31 31 30 5c 45 51 55 5c 2a 00 58   ┆ RF POL110 X     P XIF X     PPOL100 EQU * X     P ABL BRM X "   PPOL110 EQU * X┆
0xf8ba…f90a               01 32 00 10 00 50 5c 4c 44 5c 41 36 2c 44 43 57 52 51 00 58 01 46 00 22 00 50 5c 52 46 28 4e 5a 29 5c 50 4f 4c 31 32 30 5c 57 52 49 54 45 20 4f 4e 20 51 55 45 55 45 20 00 58 01 5a 00 10 00 50 50 4f 4c 31 31 35 5c 45 51 55 5c 2a 00 58 01 80   ┆ 2   P LD A6,DCWRQ X F " P RF(NZ) POL120 WRITE ON QUEUE  X Z   PPOL115 EQU * X  ┆
0xf90a…f95a (161, 0, 400) 00 1a 00 50 5c 43 46 5c 41 35 2c 54 52 45 4f 54 5c 53 45 4e 44 20 45 4f 54 20 00 59 00 04 00 0e 00 50 5c 52 42 5c 50 4f 4c 31 30 30 00 59 00 22 00 10 00 50 50 4f 4c 31 32 30 5c 45 51 55 5c 2a 00 59 00 34 00 22 00 50 5c 53 55 4b 5c 41 36 2c   ┆   P CF A5,TREOT SEND EOT  Y     P RB POL100 Y "   PPOL120 EQU * Y 4 " P SUK A6,┆
0xf95a…f9aa               44 57 54 57 51 5c 47 45 54 20 44 57 54 20 41 44 44 52 45 53 53 20 00 59 00 48 00 10 00 50 50 4f 4c 31 32 35 5c 45 51 55 5c 2a 00 59 00 6e 00 24 00 50 5c 4c 44 5c 41 38 2c 44 57 54 45 43 42 2c 41 36 5c 47 45 54 20 45 43 42 20 41 44 44 52 45   ┆DWTWQ GET DWT ADDRESS  Y H   PPOL125 EQU * Y n $ P LD A8,DWTECB,A6 GET ECB ADDRE┆
0xf9aa…f9fa               53 53 00 59 00 82 00 12 00 50 5c 52 46 28 4e 5a 29 5c 50 4f 4c 31 32 36 00 59 00 aa 00 12 00 50 5c 43 46 5c 41 31 35 2c 52 45 4d 4f 56 57 00 59 00 c0 00 0e 00 50 5c 52 42 5c 50 4f 4c 31 31 35 00 59 00 d6 00 10 00 50 50 4f 4c 31 32 36 5c 45   ┆SS Y     P RF(NZ) POL126 Y     P CF A15,REMOVW Y     P RB POL115 Y     PPOL126 E┆
0xf9fa…fa4a               51 55 5c 2a 00 59 00 e8 00 20 00 50 5c 53 54 5c 41 38 2c 46 45 43 42 5c 53 41 56 45 20 45 43 42 20 41 44 44 52 45 53 53 00 59 00 fc 00 1a 00 50 5c 53 54 5c 41 36 2c 46 44 57 54 55 54 5c 53 41 56 45 20 41 36 20 00 59 01 20 00 26 00 50 5c 4c   ┆QU * Y     P ST A8,FECB SAVE ECB ADDRESS Y     P ST A6,FDWTUT SAVE A6  Y   & P L┆
0xfa4a…fa9a               44 5c 41 34 2c 45 43 42 42 41 2c 41 38 5c 47 45 54 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 00 59 01 3e 00 1e 00 50 5c 4c 44 5c 41 33 2c 45 43 42 52 4c 2c 41 38 5c 47 45 54 20 4c 45 4e 47 54 48 00 59 01 68 00 10 00 50 50 4f 4c 31 32 37   ┆D A4,ECBBA,A8 GET BUFFER ADDRESS Y >   P LD A3,ECBRL,A8 GET LENGTH Y h   PPOL127┆
0xfa9a…faea (162, 0, 398) 5c 45 51 55 5c 2a 00 59 01 8a 00 26 00 50 5c 53 54 5c 41 34 2c 46 45 43 42 42 41 5c 53 41 56 45 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 20 00 5a 00 0e 00 28 00 50 5c 53 55 4b 5c 41 33 2c 32 5c 53 4b 49 50 20 46 49 52 53 54 20 57 4f 52   ┆ EQU * Y   & P ST A4,FECBBA SAVE BUFFER ADDRESS  Z   ( P SUK A3,2 SKIP FIRST WOR┆
0xfaea…fb3a               44 20 4f 46 20 42 55 46 46 45 52 20 00 5a 00 38 00 1e 00 50 5c 53 54 5c 41 33 2c 46 45 43 42 52 4c 5c 53 41 56 45 20 4c 45 4e 47 54 48 20 00 5a 00 64 00 20 00 50 5c 43 4d 5c 46 42 41 58 5c 52 45 53 45 54 20 42 55 46 46 45 52 20 49 4e 44 45   ┆D OF BUFFER  Z 8   P ST A3,FECBRL SAVE LENGTH  Z d   P CM FBAX RESET BUFFER INDE┆
0xfb3a…fb8a               58 20 00 5a 00 86 00 10 00 50 50 4f 4c 31 33 30 5c 45 51 55 5c 2a 00 5a 00 aa 00 1e 00 50 5c 43 4d 5c 58 45 54 58 5c 52 45 53 45 54 20 27 45 54 58 20 53 45 4e 54 27 20 00 5a 00 be 00 0c 00 50 5c 43 4d 5c 58 53 54 41 00 5a 00 e0 00 20 00 50   ┆X  Z     PPOL130 EQU * Z     P CM XETX RESET 'ETX SENT'  Z     P CM XSTA Z     P┆
0xfb8a…fbda               5c 43 46 5c 41 35 2c 54 52 54 45 58 54 5c 53 45 4e 44 20 4f 4e 45 20 42 4c 4f 43 4b 00 5a 00 f0 00 26 00 50 5c 43 46 5c 41 35 2c 53 50 54 49 4d 5c 53 54 41 52 54 20 50 52 4f 43 45 44 55 52 45 20 54 49 4d 45 52 00 5a 01 14 00 20 00 50 5c 49   ┆ CF A5,TRTEXT SEND ONE BLOCK Z   & P CF A5,SPTIM START PROCEDURE TIMER Z     P I┆
0xfbda…fc28               4d 5c 58 41 43 4b 5c 53 45 54 20 27 41 43 4b 20 45 58 50 45 43 54 45 44 27 20 00 5a 01 3e 00 0e 00 50 5c 52 42 5c 50 4f 4c 31 30 30 00 5a 01 62 00 0a 00 50 5c 45 4a 45 43 54 00 5a 01 74 00 06 00 50 2a 20 00 5a 01 82 00 06 00 50 2a 20         ┆M XACK SET 'ACK EXPECTED'  Z >   P RB POL100 Z b   P EJECT Z t   P*  Z     P* ┆
0xfc28…fc78 (163, 0, 400) 00 5a 01 8c 00 26 00 50 2a 5c 53 50 45 43 49 46 49 43 20 50 4f 4c 4c 20 48 41 53 20 42 45 45 4e 20 52 45 43 45 49 56 45 44 20 00 5b 00 08 00 06 00 50 2a 20 00 5b 00 32 00 06 00 50 2a 20 00 5b 00 3c 00 10 00 50 53 50 4f 4c 4c 5c 45 51 55 5c   ┆ Z   & P* SPECIFIC POLL HAS BEEN RECEIVED  [     P*  [ 2   P*  [ <   PSPOLL EQU ┆
0xfc78…fcc8               2a 20 00 5b 00 46 00 16 00 50 5c 49 46 46 5c 53 54 41 54 2b 53 50 45 43 50 3d 30 20 00 5b 00 5a 00 16 00 50 5c 4c 44 52 5c 41 37 2c 41 36 5c 53 41 56 45 20 41 36 00 5b 00 74 00 20 00 50 5c 43 46 5c 41 35 2c 43 50 54 49 4d 5c 43 48 45 43 4b   ┆*  [ F   P IFF STAT+SPECP=0  [ Z   P LDR A7,A6 SAVE A6 [ t   P CF A5,CPTIM CHECK┆
0xfcc8…fd18               20 50 4f 4c 4c 54 49 4d 45 52 00 5b 00 8e 00 1a 00 50 5c 4c 44 52 5c 41 36 2c 41 37 5c 52 45 53 54 4f 52 45 20 41 36 20 00 5b 00 b2 00 10 00 50 5c 49 46 54 5c 53 54 41 54 3d 31 20 00 5b 00 d0 00 1e 00 50 5c 4c 44 5c 41 31 2c 44 57 54 53 54   ┆ POLLTIMER [     P LDR A6,A7 RESTORE A6  [     P IFT STAT=1  [     P LD A1,DWTST┆
0xfd18…fd68               2c 41 36 5c 47 45 54 20 53 54 41 54 55 53 00 5b 00 e4 00 0e 00 50 5c 41 4e 4b 5c 41 31 2c 37 20 00 5b 01 06 00 22 00 50 5c 52 42 28 4e 5a 29 5c 50 4f 4c 30 35 30 5c 50 45 4e 44 49 4e 47 20 53 54 41 54 55 53 20 00 5b 01 18 00 08 00 50 5c 58   ┆,A6 GET STATUS [     P ANK A1,7  [   " P RB(NZ) POL050 PENDING STATUS  [     P X┆
0xfd68…fdb8               49 46 00 5b 01 3e 00 16 00 50 5c 49 46 46 5c 53 54 41 54 2b 53 50 45 43 50 3d 30 20 00 5b 01 4a 00 14 00 50 5c 4c 44 5c 41 31 2c 44 57 54 53 54 2c 41 36 20 00 5b 01 64 00 1c 00 50 5c 52 42 28 4e 29 5c 50 4f 4c 31 31 35 5c 4e 4f 20 52 45 51   ┆IF [ >   P IFF STAT+SPECP=0  [ J   P LD A1,DWTST,A6  [ d   P RB(N) POL115 NO REQ┆
0xfdb8…fe08 (164, 0, 400) 55 45 53 54 00 5b 01 7c 00 1e 00 50 5c 4c 44 5c 41 31 2c 44 57 54 4f 52 2c 41 36 5c 47 45 54 20 4f 52 44 45 52 20 00 5c 00 0c 00 0e 00 50 5c 53 55 4b 5c 41 31 2c 36 20 00 5c 00 2e 00 20 00 50 5c 52 42 28 5a 29 5c 50 4f 4c 31 32 35 5c 57 52   ┆UEST [ |   P LD A1,DWTOR,A6 GET ORDER        P SUK A1,6    .   P RB(Z) POL125 WR┆
0xfe08…fe58               49 54 45 20 52 45 51 55 45 53 54 20 00 5c 00 40 00 0e 00 50 5c 53 55 4b 5c 41 31 2c 32 20 00 5c 00 64 00 22 00 50 5c 52 42 28 5a 29 5c 50 4f 4c 31 32 35 5c 45 58 43 48 41 4e 47 45 20 52 45 51 55 45 53 54 00 5c 00 76 00 08 00 50 5c 58 49 46   ┆ITE REQUEST    @   P SUK A1,2    d " P RB(Z) POL125 EXCHANGE REQUEST   v   P XIF┆
0xfe58…fea8               00 5c 00 9c 00 18 00 50 5c 52 42 5c 50 4f 4c 31 31 35 5c 53 45 4e 44 20 45 4f 54 20 00 5c 00 a8 00 0a 00 50 5c 45 4a 45 43 54 00 5c 00 c4 00 06 00 50 2a 20 00 5c 00 d2 00 06 00 50 2a 20 00 5c 00 dc 00 38 00 50 2a 5c 43 48 45 43 4b 20 49 46   ┆       P RB POL115 SEND EOT        P EJECT       P*        P*      8 P* CHECK IF┆
0xfea8…fef8               20 54 48 45 52 45 20 49 53 20 41 20 57 52 49 54 45 20 52 45 51 55 45 53 54 20 54 4f 20 42 45 20 43 4f 4d 50 4c 45 54 45 44 20 00 5c 00 e6 00 06 00 50 2a 20 00 5c 01 22 00 1e 00 50 2a 5c 41 31 20 43 4f 4e 54 41 49 4e 53 20 52 45 54 55 52 4e   ┆ THERE IS A WRITE REQUEST TO BE COMPLETED        P*    "   P* A1 CONTAINS RETURN┆
0xfef8…ff48               20 43 4f 44 45 20 00 5c 01 2c 00 06 00 50 2a 20 00 5c 01 4e 00 06 00 50 2a 20 00 5c 01 58 00 18 00 50 43 57 52 49 54 45 5c 4c 44 5c 41 36 2c 46 44 57 54 55 54 20 00 5c 01 62 00 24 00 50 5c 52 46 28 5a 29 5c 43 57 52 39 30 30 5c 4e 4f 20 57   ┆ CODE    ,   P*    N   P*    X   PCWRITE LD A6,FDWTUT    b $ P RF(Z) CWR900 NO W┆

Reduced view