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

⟦970ca78e4⟧

    Length: 65244 (0xfedc)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«

Derivation

└─⟦18bf30ff4⟧ Bits:30009692 Philips computer tape "600409"
    └─⟦this⟧ »BDKMON/DRDC15.SC« 

PTS(SC)

	IDENT DRDC15 	REL 8.3 79-08-16  870105040830 

			=4, ASCII-MODE FOR SALCUZ
			REL 8.3 79-07-19 
			=3, ACK IN CONVERSATIONAL MODE 
			REL 8.3 79-07-19 
			=2, INCOMPLETE POLL SEQUENCE 
			REL 8.3 79-06-25 
			=1, RETRANSMISSION ON ENQ RESPONSE 
			    ENQ EMBEDDED IN RECEIVED MESSAGE 
			REL 8.2 78-09-15 
			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	1100	RECEIVE BUFFER LENGTH
RBUFL	EQU	X:A 
X:B	EQU	0	TRANSMIT BUFFER LENGTH
TBUFL	EQU	X:B 
X:C	EQU	/60	DCTASK FILE CODE
DC15FC	EQU	/60
X:D	EQU	1	IF 1 INTERRUPT LOGGING
LOGG	EQU	X:D
X:E	EQU	350	POLL TIMEOUT VALUE
TIMPOL	EQU	X:E
X:F	EQU	1	STATUS AND RVI HANDLING IF=0
STAT	EQU	X:F
X:G	EQU	1	READ COMMAND HANDLING IF=1
RCOM	EQU	X:G
X:H	EQU	254	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	X:H 
X:I	EQU	1	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	X:I
X:J	EQU	0	IF 1 SPECIFIC POLL HANDLING 
SPECP	EQU	X:J 
X:K	EQU	1	IF = 1  LINE SPEED SET TO HIGH
			IF = 0  LINE SPEED IS SET TO LOW 
SPEED	EQU	X:K 
X:L	EQU	0	IF 1 SIEMENS MSV1 PROCEDURE 
MSV1	EQU	X:L
X:M	EQU	2	NUMBER OF RECEIVE BUFFERS (2-5) 
RBUFNR	EQU	X:M
X:N	EQU	0	IF = 1  PTS 6815 ADAPTION	SALCUZ
P6805	EQU	X:N 
X:O	EQU	/0A 
	IFT	P6805=0
LCUIN	EQU	X:O	DEVICE ADDRESS OF RECEIVER
	XIF
	IFT	P6805=1
LCUIN	EQU	/0A	DEVICE ADDRESS OF RECEIVER
	XIF
X:P	EQU	0 
IBMCHR	EQU	X:P	IF 1 IBM CHARACTER HANDLING
X:Q	EQU	1	IF 1 MESSAGE PASSING TO DC TASK 
MESPAS	EQU	X:Q
X:R	EQU	0	IBM-3270 EMULATION PACKAGE, IF NOT = 0
EM3270	EQU	X:R
BINTRM	EQU	0	IF 1 BINARY TRANSMISSION 
TSTREQ	EQU	0	IF 1 TEST REQUEST HANDLING 
DMRK	EQU	0	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
	RF	DCTP30		********DK
	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	90	PROCEDURE TIMER 9 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	/5C 
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
	CM	CACK	PRESET ACK-1	=3
	RB	BRM305	READ THE MESSAGE 
	XIF
BRM316	CF	A5,READ	READ ONE CHARACTER
	IFF	P6805=1		=4
	SUK	A2,ENQ+PAR 
	XIF			=4 
	IFT	P6805=1		=4
	SUK	A2,ENQ	ENQ ??	=4 
	XIF			=4 
	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	BRM328
	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
	CM	FDWTUT
	LDK	A1,1 
	CF	A5,TREOT		********
	ABL	BRM		********
	ABL	POL127 
	XIF
* 
* 
*	ENQ HAS BEEN RECEIVED 
* 
* 
BRM400	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RF(NZ)	BRM510	TEXT RETRANSMISSION	=1 
	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 
	IFF	P6805=1		=4
	CWK	A2,ACK0+PAR
	XIF			=4 
	IFT	P6805=1		=4
	CWK	A2,ACK0		=4
	XIF			=4 
	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	*
	IFF	P6805=1		=4
	CWK	A2,RVI+PAR 
	XIF			=4 
	IFT	P6805=1		=4
	CWK	A2,RVI		=4 
	XIF			=4 
	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	*
	LD	A1,XACK		=2 
	RF(NZ)	POL010	ERROR. ACK EXPECTED	=2 
	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	* 
	LD	A1,XACK		=2 
	RF(Z)	POL020	ACK NOT EXPECTED	=2 
POL010	CF	A5,TRENQ	SEND ENQ	=2
	CF	A5,SPTIM	START PROCEDURE TIMER	=2 
	ABL	BRM	WAIT FOR RESPONSE	=2 
POL020	EQU	*		=2
	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 
	LD	A1,XACK		=2 
	RB(NZ)	POL010	ACK EXPECTED	=2
	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)	RDM120	SKIP IF ENQ IN TEXT	=1
	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
	RF	DRDC06		********
	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, 400)   Head {h00=0x0032, h01=0x0050, text=» IDENT DRDC15  REL 8.3 79-08-16  870105040830 «, t00=0x0000, t01=0x0004}
0x0036…003e               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0062               Head {h00=0x0020, h01=0x0050, text=»   =4, ASCII-MODE FOR SALCUZ«, t00=0x0000, t01=0x0042}
0x0062…007e               Head {h00=0x0018, h01=0x0050, text=»   REL 8.3 79-07-19 «, t00=0x0000, t01=0x0066}
0x007e…00a8               Head {h00=0x0026, h01=0x0050, text=»   =3, ACK IN CONVERSATIONAL MODE «, t00=0x0000, t01=0x0082}
0x00a8…00c4               Head {h00=0x0018, h01=0x0050, text=»   REL 8.3 79-07-19 «, t00=0x0000, t01=0x00ac}
0x00c4…00ec               Head {h00=0x0024, h01=0x0050, text=»   =2, INCOMPLETE POLL SEQUENCE «, t00=0x0000, t01=0x00c8}
0x00ec…0108               Head {h00=0x0018, h01=0x0050, text=»   REL 8.3 79-06-25 «, t00=0x0000, t01=0x00f0}
0x0108…0136               Head {h00=0x002a, h01=0x0050, text=»   =1, RETRANSMISSION ON ENQ RESPONSE «, t00=0x0000, t01=0x010c}
0x0136…0166               Head {h00=0x002c, h01=0x0050, text=»       ENQ EMBEDDED IN RECEIVED MESSAGE «, t00=0x0000, t01=0x013a}
0x0166…0182               Head {h00=0x0018, h01=0x0050, text=»   REL 8.2 78-09-15 «, t00=0x0000, t01=0x016a}
0x0182…01a0               Head {h00=0x001a, h01=0x0050, text=»   IBM-3270 EMULATION «, t00=0x0000, t01=0x0186}
0x01a0…01bc               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-08-25 «, t00=0x0001, t01=0x0014}
0x01bc…01e4               Head {h00=0x0024, h01=0x0050, text=»   MESSAGE QUEUING ON TERMINALS «, t00=0x0001, t01=0x0030}
0x01e4…0200               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-06-21 «, t00=0x0001, t01=0x0058}
0x0200…021c               Head {h00=0x0018, h01=0x0050, text=»   PTS 6805 ADAPTION«, t00=0x0001, t01=0x0074}
0x021c…023e               Head {h00=0x001e, h01=0x0050, text=»   MSV1. UNDEFINED ADDRESS«, t00=0x0001, t01=0x0090}
0x023e…025a               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-06-16 «, t00=0x0001, t01=0x00b2}
0x025a…0280               Head {h00=0x0022, h01=0x0050, text=»   TRANSFER PARAM WHEN POLL ON«, t00=0x0001, t01=0x00ce}
0x0280…029c               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-05-18 «, t00=0x0001, t01=0x00f4}
0x029c…02ba               Head {h00=0x001a, h01=0x0050, text=»   BINARY TRANSMISSION«, t00=0x0001, t01=0x0110}
0x02ba…02d6               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-04-21 «, t00=0x0001, t01=0x012e}
0x02d6…02de               Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x014a}
0x02de…0314               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0001, t01=0x0152}
0x0314…031e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0188}
0x031e…0346 (2, 0, 400)   Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x0004}
0x0346…0350               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002c}
0x0350…037e               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x0036}
0x037e…03b0               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0002, t01=0x0064}
0x03b0…03d4               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0002, t01=0x0096}
0x03d4…03de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ba}
0x03de…03e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c4}
0x03e8…03f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ce}
0x03f2…03fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d8}
0x03fc…0406               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e2}
0x0406…0442               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0002, t01=0x00ec}
0x0442…0450               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0128}
0x0450…045a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0136}
0x045a…0464               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0140}
0x0464…047a               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0002, t01=0x014a}
0x047a…0484               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0160}
0x0484…048e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x016a}
0x048e…04c4               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0002, t01=0x0174}
0x04c4…04ea               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x001a}
0x04ea…0510               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x0040}
0x0510…0536               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0003, t01=0x0066}
0x0536…055c               Head {h00=0x0022, h01=0x0050, text=» ENTRY DW1500 DWT FOR DC TASK «, t00=0x0003, t01=0x008c}
0x055c…0566               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00b2}
0x0566…0570               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00bc}
0x0570…058e               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0003, t01=0x00c6}
0x058e…0598               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e4}
0x0598…05a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ee}
0x05a2…05c8               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0003, t01=0x00f8}
0x05c8…05f4               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0003, t01=0x011e}
0x05f4…061c               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0003, t01=0x014a}
0x061c…0640               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0003, t01=0x0172}
0x0640…0660               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x0008}
0x0660…0680               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x0028}
0x0680…069e               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x0048}
0x069e…06bc               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0004, t01=0x0066}
0x06bc…06ea               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x0084}
0x06ea…0716               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0004, t01=0x00b2}
0x0716…0742               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0004, t01=0x00de}
0x0742…0750               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x010a}
0x0750…075a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0118}
0x075a…0764               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0122}
0x0764…076e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x012c}
0x076e…0778               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0136}
0x0778…07b2               Head {h00=0x0036, h01=0x0050, text=»*   STANDARD INTERFACE PART FOR DATA COMMUNICATION«, t00=0x0004, t01=0x0140}
0x07b2…07bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x017a}
0x07bc…07c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0184}
0x07c6…07d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x018e}
0x07d0…07da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0008}
0x07da…07f0               Head {h00=0x0012, h01=0x0050, text=»* DWT CONTENTS«, t00=0x0005, t01=0x0012}
0x07f0…07fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0028}
0x07fa…0848               Head {h00=0x004a, h01=0x0050, text=»* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)«, t00=0x0005, t01=0x0032}
0x0848…0852               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0080}
0x0852…086e               Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x0005, t01=0x008a}
0x086e…0878               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a6}
0x0878…08aa               Head {h00=0x002e, h01=0x0050, text=»DWTTP EQU /10 TIMER POINTER ORDER PROCESS «, t00=0x0005, t01=0x00b0}
0x08aa…08d6               Head {h00=0x0028, h01=0x0050, text=»DWTWQ EQU /12 WRITE/GET BUFFER QUEUE«, t00=0x0005, t01=0x00e2}
0x08d6…08f8               Head {h00=0x001e, h01=0x0050, text=»DWTSQ EQU /14 STATUS QUEUE«, t00=0x0005, t01=0x010e}
0x08f8…091c               Head {h00=0x0020, h01=0x0050, text=»DWTRQ EQU /16 RECEIVE QUEUE «, t00=0x0005, t01=0x0130}
0x091c…0948               Head {h00=0x0028, h01=0x0050, text=»DWTBUF EQU /18 DEVICE BUFFER ADDRESS«, t00=0x0005, t01=0x0154}
0x0948…096e               Head {h00=0x0022, h01=0x0050, text=»DWTCUR EQU /1A CURSOR ADDRESS «, t00=0x0005, t01=0x0180}
0x096e…0978               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0016}
0x0978…0994               Head {h00=0x0018, h01=0x0050, text=»* ECB DISPLACEMENTS «, t00=0x0006, t01=0x0020}
0x0994…099e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x003c}
0x099e…09c0               Head {h00=0x001e, h01=0x0050, text=»ECBBA EQU 2 BUFFER ADDRESS«, t00=0x0006, t01=0x0046}
0x09c0…09e4               Head {h00=0x0020, h01=0x0050, text=»ECBRL EQU 4 REQUESTED LENGTH«, t00=0x0006, t01=0x0068}
0x09e4…0a08               Head {h00=0x0020, h01=0x0050, text=»ECBEL EQU 6 EFFECTIVE LENGTH«, t00=0x0006, t01=0x008c}
0x0a08…0a28               Head {h00=0x001c, h01=0x0050, text=»ECBRC EQU 8 RETURN CODE «, t00=0x0006, t01=0x00b0}
0x0a28…0a4a               Head {h00=0x001e, h01=0x0050, text=»ECBCW EQU 10 CONTROL WORD «, t00=0x0006, t01=0x00d0}
0x0a4a…0a54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f2}
0x0a54…0a62               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x00fc}
0x0a62…0aa2               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0006, t01=0x010a}
0x0aa2…0aac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014a}
0x0aac…0ada               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x0154}
0x0ada…0ae4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0182}
0x0ae4…0aee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018c}
0x0aee…0b18               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 1100 RECEIVE BUFFER LENGTH«, t00=0x0007, t01=0x0008}
0x0b18…0b2e               Head {h00=0x0012, h01=0x0050, text=»RBUFL EQU X:A «, t00=0x0007, t01=0x0032}
0x0b2e…0b56               Head {h00=0x0024, h01=0x0050, text=»X:B EQU 0 TRANSMIT BUFFER LENGTH«, t00=0x0007, t01=0x0048}
0x0b56…0b6c               Head {h00=0x0012, h01=0x0050, text=»TBUFL EQU X:B «, t00=0x0007, t01=0x0070}
0x0b6c…0b90               Head {h00=0x0020, h01=0x0050, text=»X:C EQU /60 DCTASK FILE CODE«, t00=0x0007, t01=0x0086}
0x0b90…0ba6               Head {h00=0x0012, h01=0x0050, text=»DC15FC EQU /60«, t00=0x0007, t01=0x00aa}
0x0ba6…0bce               Head {h00=0x0024, h01=0x0050, text=»X:D EQU 1 IF 1 INTERRUPT LOGGING«, t00=0x0007, t01=0x00c0}
0x0bce…0be2               Head {h00=0x0010, h01=0x0050, text=»LOGG EQU X:D«, t00=0x0007, t01=0x00e8}
0x0be2…0c08               Head {h00=0x0022, h01=0x0050, text=»X:E EQU 350 POLL TIMEOUT VALUE«, t00=0x0007, t01=0x00fc}
0x0c08…0c1e               Head {h00=0x0012, h01=0x0050, text=»TIMPOL EQU X:E«, t00=0x0007, t01=0x0122}
0x0c1e…0c4c               Head {h00=0x002a, h01=0x0050, text=»X:F EQU 1 STATUS AND RVI HANDLING IF=0«, t00=0x0007, t01=0x0138}
0x0c4c…0c60               Head {h00=0x0010, h01=0x0050, text=»STAT EQU X:F«, t00=0x0007, t01=0x0166}
0x0c60…0c8c               Head {h00=0x0028, h01=0x0050, text=»X:G EQU 1 READ COMMAND HANDLING IF=1«, t00=0x0007, t01=0x017a}
0x0c8c…0ca0               Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:G«, t00=0x0008, t01=0x0016}
0x0ca0…0cca               Head {h00=0x0026, h01=0x0050, text=»X:H EQU 254 TRANSMIT BLOCK LENGTH «, t00=0x0008, t01=0x002a}
0x0cca…0ce0               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU X:H «, t00=0x0008, t01=0x0054}
0x0ce0…0d0c               Head {h00=0x0028, h01=0x0050, text=»X:I EQU 1 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0008, t01=0x006a}
0x0d0c…0d20               Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:I«, t00=0x0008, t01=0x0096}
0x0d20…0d4e               Head {h00=0x002a, h01=0x0050, text=»X:J EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0008, t01=0x00aa}
0x0d4e…0d64               Head {h00=0x0012, h01=0x0050, text=»SPECP EQU X:J «, t00=0x0008, t01=0x00d8}
0x0d64…0d94               Head {h00=0x002c, h01=0x0050, text=»X:K EQU 1 IF = 1  LINE SPEED SET TO HIGH«, t00=0x0008, t01=0x00ee}
0x0d94…0dc0               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0008, t01=0x011e}
0x0dc0…0dd6               Head {h00=0x0012, h01=0x0050, text=»SPEED EQU X:K «, t00=0x0008, t01=0x014a}
0x0dd6…0e04               Head {h00=0x002a, h01=0x0050, text=»X:L EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0008, t01=0x0160}
0x0e04…0e18               Head {h00=0x0010, h01=0x0050, text=»MSV1 EQU X:L«, t00=0x0008, t01=0x018e}
0x0e18…0e4a               Head {h00=0x002e, h01=0x0050, text=»X:M EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0009, t01=0x0012}
0x0e4a…0e60               Head {h00=0x0012, h01=0x0050, text=»RBUFNR EQU X:M«, t00=0x0009, t01=0x0044}
0x0e60…0e92               Head {h00=0x002e, h01=0x0050, text=»X:N EQU 0 IF = 1  PTS 6815 ADAPTION SALCUZ«, t00=0x0009, t01=0x005a}
0x0e92…0ea8               Head {h00=0x0012, h01=0x0050, text=»P6805 EQU X:N «, t00=0x0009, t01=0x008c}
0x0ea8…0ebc               Head {h00=0x0010, h01=0x0050, text=»X:O EQU /0A «, t00=0x0009, t01=0x00a2}
0x0ebc…0ed0               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0009, t01=0x00b6}
0x0ed0…0f00               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU X:O DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x00ca}
0x0f00…0f0c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x00fa}
0x0f0c…0f20               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0009, t01=0x0106}
0x0f20…0f50               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x011a}
0x0f50…0f5c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x014a}
0x0f5c…0f6e               Head {h00=0x000e, h01=0x0050, text=»X:P EQU 0 «, t00=0x0009, t01=0x0156}
0x0f6e…0fa0               Head {h00=0x002e, h01=0x0050, text=»IBMCHR EQU X:P IF 1 IBM CHARACTER HANDLING«, t00=0x0009, t01=0x0168}
0x0fa0…0fd2               Head {h00=0x002e, h01=0x0050, text=»X:Q EQU 1 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x000a, t01=0x000a}
0x0fd2…0fe8               Head {h00=0x0012, h01=0x0050, text=»MESPAS EQU X:Q«, t00=0x000a, t01=0x003c}
0x0fe8…1020               Head {h00=0x0034, h01=0x0050, text=»X:R EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000a, t01=0x0052}
0x1020…1036               Head {h00=0x0012, h01=0x0050, text=»EM3270 EQU X:R«, t00=0x000a, t01=0x008a}
0x1036…1064               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000a, t01=0x00a0}
0x1064…1094               Head {h00=0x002c, h01=0x0050, text=»TSTREQ EQU 0 IF 1 TEST REQUEST HANDLING «, t00=0x000a, t01=0x00ce}
0x1094…10c4               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 0 SPECIAL CONDITION FOR DENMARK«, t00=0x000a, t01=0x00fe}
0x10c4…10fc               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000a, t01=0x012e}
0x10fc…1130               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000a, t01=0x0166}
0x1130…1164               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000b, t01=0x000a}
0x1164…1194               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000b, t01=0x003e}
0x1194…11b0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000b, t01=0x006e}
0x11b0…11f0               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x008a}
0x11f0…1206               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x00ca}
0x1206…121a               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x00e0}
0x121a…125a               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x00f4}
0x125a…1270               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x0134}
0x1270…127e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x014a}
0x127e…1288               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0158}
0x1288…12a2               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000b, t01=0x0162}
0x12a2…12ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x017c}
0x12ac…12b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0186}
0x12b6…12c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0190}
0x12c0…12d2               Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000c, t01=0x000a}
0x12d2…12dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x001c}
0x12dc…12f0               Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000c, t01=0x0026}
0x12f0…1304               Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x000c, t01=0x003a}
0x1304…131c               Head {h00=0x0014, h01=0x0050, text=»* /08: EXCHANGE «, t00=0x000c, t01=0x004e}
0x131c…133e               Head {h00=0x001e, h01=0x0050, text=»* /22: RELEASE READ BUFFER«, t00=0x000c, t01=0x0066}
0x133e…135e               Head {h00=0x001c, h01=0x0050, text=»* /31: GET WRITE BUFFER «, t00=0x000c, t01=0x0088}
0x135e…1380               Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x000c, t01=0x00a8}
0x1380…139a               Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x000c, t01=0x00ca}
0x139a…13a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e4}
0x13a4…13ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ee}
0x13ae…13d0               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x000c, t01=0x00f8}
0x13d0…13da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x011a}
0x13da…13e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0124}
0x13e4…140e               Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x000c, t01=0x012e}
0x140e…143c               Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x000c, t01=0x0158}
0x143c…1460               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x000c, t01=0x0186}
0x1460…1488               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x000d, t01=0x001a}
0x1488…149c               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x000d, t01=0x0042}
0x149c…14ca               Head {h00=0x002a, h01=0x0050, text=»DCGWQ DATA 0 GET BUFFER REQUEST QUEUE «, t00=0x000d, t01=0x0056}
0x14ca…14d6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0084}
0x14d6…1506               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x000d, t01=0x0090}
0x1506…1536               Head {h00=0x002c, h01=0x0050, text=»DC15DC DATA DCACTD ADDRESS BLOCK DC TASK«, t00=0x000d, t01=0x00c0}
0x1536…155e               Head {h00=0x0024, h01=0x0050, text=»DC15AD DATA DCACT ADDRESS BLOCK «, t00=0x000d, t01=0x00f0}
0x155e…158e               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x000d, t01=0x0118}
0x158e…15a0               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x000d, t01=0x0148}
0x15a0…15c6               Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x000d, t01=0x015a}
0x15c6…15d8               Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x000d, t01=0x0180}
0x15d8…15e0 (14, 0, 400)  Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0004}
0x15e0…15f4               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x000e, t01=0x000c}
0x15f4…160c               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x000e, t01=0x0020}
0x160c…1618               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0038}
0x1618…162c               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x000e, t01=0x0044}
0x162c…1640               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x000e, t01=0x0058}
0x1640…164c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x006c}
0x164c…165a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0078}
0x165a…1664               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0086}
0x1664…166e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0090}
0x166e…1696               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x000e, t01=0x009a}
0x1696…16a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00c2}
0x16a0…16b4               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x000e, t01=0x00cc}
0x16b4…16d8               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x000e, t01=0x00e0}
0x16d8…16ec               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x000e, t01=0x0104}
0x16ec…170e               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DCRD READ SPECIFIC «, t00=0x000e, t01=0x0118}
0x170e…1726               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x000e, t01=0x013a}
0x1726…173a               Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x000e, t01=0x0152}
0x173a…1752               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/08-/06 «, t00=0x000e, t01=0x0166}
0x1752…176e               Head {h00=0x0018, h01=0x0050, text=» RF(Z) DCEX EXCHANGE«, t00=0x000e, t01=0x017e}
0x176e…1786               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/22-/08 «, t00=0x000f, t01=0x000a}
0x1786…17ae               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCRR RELEASE READ BUFFER «, t00=0x000f, t01=0x0022}
0x17ae…17c6               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/22 «, t00=0x000f, t01=0x004a}
0x17c6…17ee               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x000f, t01=0x0062}
0x17ee…1806               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x000f, t01=0x008a}
0x1806…181a               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x000f, t01=0x00a2}
0x181a…1838               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCSS SET STATUS«, t00=0x000f, t01=0x00b6}
0x1838…1844               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x00d4}
0x1844…1858               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x000f, t01=0x00e0}
0x1858…1870               Head {h00=0x0014, h01=0x0050, text=» ADK A7,/38-/31 «, t00=0x000f, t01=0x00f4}
0x1870…1894               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DCGW GET WRITE BUFFER«, t00=0x000f, t01=0x010c}
0x1894…18a0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0130}
0x18a0…18b2               Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x000f, t01=0x013c}
0x18b2…18c0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x014e}
0x18c0…18ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x015c}
0x18ca…18d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0166}
0x18d4…18f4               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x000f, t01=0x0170}
0x18f4…18fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0190}
0x18fe…1908               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x000a}
0x1908…191c               Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x0010, t01=0x0014}
0x191c…1930               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0010, t01=0x0028}
0x1930…194a               Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x0010, t01=0x003c}
0x194a…1962               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/22-/02 «, t00=0x0010, t01=0x0056}
0x1962…198a               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCRR RELEASE READ BUFFER «, t00=0x0010, t01=0x006e}
0x198a…19a2               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/22 «, t00=0x0010, t01=0x0096}
0x19a2…19ca               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x0010, t01=0x00ae}
0x19ca…19ec               Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x0010, t01=0x00d6}
0x19ec…1a0e               Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x0010, t01=0x00f8}
0x1a0e…1a18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x011a}
0x1a18…1a22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0124}
0x1a22…1a3c               Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x0010, t01=0x012e}
0x1a3c…1a46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0148}
0x1a46…1a50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0152}
0x1a50…1a6e               Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0010, t01=0x015c}
0x1a6e…1a86               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0010, t01=0x017a}
0x1a86…1ab0 (17, 0, 400)  Head {h00=0x0026, h01=0x0050, text=»*   STATUS CHANGE ON DC EQUIPMENT «, t00=0x0011, t01=0x0004}
0x1ab0…1ad8               Head {h00=0x0024, h01=0x0050, text=»*   SPONTANOUS MESSAGE RECEPTION«, t00=0x0011, t01=0x002e}
0x1ad8…1ae2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0056}
0x1ae2…1af6               Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0011, t01=0x0060}
0x1af6…1b26               Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0011, t01=0x0074}
0x1b26…1b3a               Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0011, t01=0x00a4}
0x1b3a…1b5e               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0011, t01=0x00b8}
0x1b5e…1b6c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x00dc}
0x1b6c…1b76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ea}
0x1b76…1b80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f4}
0x1b80…1b9e               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0011, t01=0x00fe}
0x1b9e…1ba8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x011c}
0x1ba8…1bb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0126}
0x1bb2…1bf4               Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0011, t01=0x0130}
0x1bf4…1c32               Head {h00=0x003a, h01=0x0050, text=»*         FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0011, t01=0x0172}
0x1c32…1c3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0020}
0x1c3c…1c46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x002a}
0x1c46…1c5a               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0012, t01=0x0034}
0x1c5a…1c84               Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0012, t01=0x0048}
0x1c84…1c90               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0072}
0x1c90…1ca4               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0012, t01=0x007e}
0x1ca4…1cce               Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0012, t01=0x0092}
0x1cce…1ce2               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0012, t01=0x00bc}
0x1ce2…1cf8               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x0012, t01=0x00d0}
0x1cf8…1d24               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0012, t01=0x00e6}
0x1d24…1d36               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0012, t01=0x0112}
0x1d36…1d4a               Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x0012, t01=0x0124}
0x1d4a…1d72               Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x0012, t01=0x0138}
0x1d72…1d86               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0012, t01=0x0160}
0x1d86…1db2               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x0012, t01=0x0174}
0x1db2…1dbe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0010}
0x1dbe…1dea               Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x0013, t01=0x001c}
0x1dea…1df2               Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0048}
0x1df2…1e06               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0013, t01=0x0050}
0x1e06…1e34               Head {h00=0x002a, h01=0x0050, text=» LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS «, t00=0x0013, t01=0x0064}
0x1e34…1e4c               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTBUF,A6«, t00=0x0013, t01=0x0092}
0x1e4c…1e78               Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBRL,A8 CURSOR ADDRESS WORD «, t00=0x0013, t01=0x00aa}
0x1e78…1e90               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTCUR,A6«, t00=0x0013, t01=0x00d6}
0x1e90…1e9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00ee}
0x1e9c…1ec2               Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x0013, t01=0x00fa}
0x1ec2…1ef8               Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!!  SHOULD NOT BE IN DC:TAB «, t00=0x0013, t01=0x0120}
0x1ef8…1f26               Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x0013, t01=0x0156}
0x1f26…1f54               Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x0013, t01=0x0184}
0x1f54…1f7e               Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x0014, t01=0x0022}
0x1f7e…1f8c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x004c}
0x1f8c…1f94               Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x005a}
0x1f94…1f9c               Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0062}
0x1f9c…1fb0               Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x0014, t01=0x006a}
0x1fb0…1fc6               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=0 «, t00=0x0014, t01=0x007e}
0x1fc6…1fec               Head {h00=0x0022, h01=0x0050, text=» LDKL A5,STB2 LOAD STACK BASE «, t00=0x0014, t01=0x0094}
0x1fec…201c               Head {h00=0x002c, h01=0x0050, text=» CF A5,FINTER DWT ALREADY IN DC:TAB ??? «, t00=0x0014, t01=0x00ba}
0x201c…202e               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0014, t01=0x00ea}
0x202e…204c               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) DCTP30 YES!!! «, t00=0x0014, t01=0x00fc}
0x204c…2058               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x011a}
0x2058…2080               Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x0014, t01=0x0126}
0x2080…2092               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0014, t01=0x014e}
0x2092…20c0               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x0014, t01=0x0160}
0x20c0…20c8               Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x018e}
0x20c8…20f6               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x0015, t01=0x0008}
0x20f6…2114               Head {h00=0x001a, h01=0x0050, text=» RF DCTP30  ********DK«, t00=0x0015, t01=0x0036}
0x2114…2128               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0015, t01=0x0054}
0x2128…2144               Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x0015, t01=0x0068}
0x2144…215c               Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x0015, t01=0x0084}
0x215c…2188               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x0015, t01=0x009c}
0x2188…2194               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x00c8}
0x2194…21a8               Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x0015, t01=0x00d4}
0x21a8…21cc               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x0015, t01=0x00e8}
0x21cc…21e0               Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0015, t01=0x010c}
0x21e0…2208               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0015, t01=0x0120}
0x2208…221a               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0015, t01=0x0148}
0x221a…2228               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x015a}
0x2228…2232               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0168}
0x2232…223c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0172}
0x223c…224c               Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x0015, t01=0x017c}
0x224c…2256               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x018c}
0x2256…2260               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0008}
0x2260…2278               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0016, t01=0x0012}
0x2278…229a               Head {h00=0x001e, h01=0x0050, text=»*   SUCCESFUL TRANSMISSION«, t00=0x0016, t01=0x002a}
0x229a…22ae               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0016, t01=0x004c}
0x22ae…22b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0060}
0x22b8…22c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x006a}
0x22c2…22d4               Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x0016, t01=0x0074}
0x22d4…22f4               Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x0016, t01=0x0086}
0x22f4…2318               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ  QUEUE REQUEST«, t00=0x0016, t01=0x00a6}
0x2318…232a               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0016, t01=0x00ca}
0x232a…2334               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00dc}
0x2334…233e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00e6}
0x233e…2348               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00f0}
0x2348…2356               Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x0016, t01=0x00fa}
0x2356…2360               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0108}
0x2360…236a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0112}
0x236a…2382               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0016, t01=0x011c}
0x2382…239e               Head {h00=0x0018, h01=0x0050, text=»*   MESSAGE RECEIVED«, t00=0x0016, t01=0x0134}
0x239e…23b2               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0016, t01=0x0150}
0x23b2…23bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0164}
0x23bc…23c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x016e}
0x23c6…23d8               Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x0016, t01=0x0178}
0x23d8…23f8               Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x0016, t01=0x018a}
0x23f8…242a               Head {h00=0x002e, h01=0x0050, text=» LD A3,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x0017, t01=0x001a}
0x242a…2450               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x0017, t01=0x004c}
0x2450…2458               Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0072}
0x2458…2484               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A3 TAKE THE FIRST IN QUEUE «, t00=0x0017, t01=0x007a}
0x2484…249c               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x0017, t01=0x00a6}
0x249c…24ae               Head {h00=0x000e, h01=0x0050, text=» ADK A3,6 «, t00=0x0017, t01=0x00be}
0x24ae…24c6               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBBA,A8 «, t00=0x0017, t01=0x00d0}
0x24c6…24f0               Head {h00=0x0026, h01=0x0050, text=» LD A4,-4,A3 AND EFFECTIVE LENGTH «, t00=0x0017, t01=0x00e8}
0x24f0…2508               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBEL,A8 «, t00=0x0017, t01=0x0112}
0x2508…251a               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0017, t01=0x012a}
0x251a…2530               Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x0017, t01=0x013c}
0x2530…2542               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0017, t01=0x0152}
0x2542…254a               Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0164}
0x254a…2572               Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x0017, t01=0x016c}
0x2572…2584 (24, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0018, t01=0x0004}
0x2584…2592               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x0016}
0x2592…259c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0024}
0x259c…25a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x002e}
0x25a6…25c0               Head {h00=0x0016, h01=0x0050, text=»* GET WRITE BUFFER«, t00=0x0018, t01=0x0038}
0x25c0…25ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0052}
0x25ca…25d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x005c}
0x25d4…25e8               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0018, t01=0x0066}
0x25e8…2600               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0018, t01=0x007a}
0x2600…2620               Head {h00=0x001c, h01=0x0050, text=»*   BUFFER BEEN ALOCATED«, t00=0x0018, t01=0x0092}
0x2620…2634               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0018, t01=0x00b2}
0x2634…263e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00c6}
0x263e…2648               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00d0}
0x2648…265a               Head {h00=0x000e, h01=0x0050, text=»DCGW EQU *«, t00=0x0018, t01=0x00da}
0x265a…2684               Head {h00=0x0026, h01=0x0050, text=» CF A15,GTBUF GET TRANSMIT BUFFER «, t00=0x0018, t01=0x00ec}
0x2684…2696               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0018, t01=0x0116}
0x2696…26ba               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DCGW10 NO FREE BUFFER«, t00=0x0018, t01=0x0128}
0x26ba…26d2               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x0018, t01=0x014c}
0x26d2…26ee               Head {h00=0x0018, h01=0x0050, text=» LDKL A1,TBUFL+TBUFL«, t00=0x0018, t01=0x0164}
0x26ee…271a               Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBEL,A8 STORE BUFFER LENGTH «, t00=0x0018, t01=0x0180}
0x271a…272c               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0019, t01=0x001c}
0x272c…274e               Head {h00=0x001e, h01=0x0050, text=» RB ENDIO COMPLETE REQUEST«, t00=0x0019, t01=0x002e}
0x274e…2762               Head {h00=0x0010, h01=0x0050, text=»DCGW10 EQU *«, t00=0x0019, t01=0x0050}
0x2762…2784               Head {h00=0x001e, h01=0x0050, text=» CF A15,TIMERE START TIMER«, t00=0x0019, t01=0x0064}
0x2784…27a8               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSGWQ QUEUE REQUEST«, t00=0x0019, t01=0x0086}
0x27a8…27ba               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0019, t01=0x00aa}
0x27ba…27c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00bc}
0x27c6…27d4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x00c8}
0x27d4…27de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00d6}
0x27de…27e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e0}
0x27e8…2806               Head {h00=0x001a, h01=0x0050, text=»* RELEASE READ BUFFER «, t00=0x0019, t01=0x00ea}
0x2806…2810               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0108}
0x2810…281a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0112}
0x281a…2836               Head {h00=0x0018, h01=0x0050, text=»DCRR LD A4,ECBBA,A8 «, t00=0x0019, t01=0x011c}
0x2836…2848               Head {h00=0x000e, h01=0x0050, text=» SUK A4,6 «, t00=0x0019, t01=0x0138}
0x2848…285e               Head {h00=0x0012, h01=0x0050, text=» CF A15,RRBUF «, t00=0x0019, t01=0x014a}
0x285e…2872               Head {h00=0x0010, h01=0x0050, text=»DCRR10 EQU *«, t00=0x0019, t01=0x0160}
0x2872…2884               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0019, t01=0x0174}
0x2884…28b2               Head {h00=0x002a, h01=0x0050, text=» CF A15,TENDIO COMPLETE RRBUF REQUEST «, t00=0x0019, t01=0x0186}
0x28b2…28c4               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001a, t01=0x0024}
0x28c4…28d2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0036}
0x28d2…28dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0044}
0x28dc…28e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x004e}
0x28e6…28f8               Head {h00=0x000e, h01=0x0050, text=»* EXCHANGE«, t00=0x001a, t01=0x0058}
0x28f8…2902               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x006a}
0x2902…290c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0074}
0x290c…2916               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x007e}
0x2916…292e               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001a, t01=0x0088}
0x292e…2954               Head {h00=0x0022, h01=0x0050, text=»*   MESSAGE PASSED TO TERMINAL«, t00=0x001a, t01=0x00a0}
0x2954…2968               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001a, t01=0x00c6}
0x2968…2972               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00da}
0x2972…2984               Head {h00=0x000e, h01=0x0050, text=»DCEX EQU *«, t00=0x001a, t01=0x00e4}
0x2984…29b2               Head {h00=0x002a, h01=0x0050, text=» RB DCWR SAME INITIALIZATION AS WRITE «, t00=0x001a, t01=0x00f6}
0x29b2…29bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0124}
0x29bc…29c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x012e}
0x29c6…29da               Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x001a, t01=0x0138}
0x29da…29e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x014c}
0x29e4…29ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0156}
0x29ee…2a02               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x001a, t01=0x0160}
0x2a02…2a14               Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x001a, t01=0x0174}
0x2a14…2a42               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x001a, t01=0x0186}
0x2a42…2a5e               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x001b, t01=0x0024}
0x2a5e…2a7e               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x001b, t01=0x0040}
0x2a7e…2a92               Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x001b, t01=0x0060}
0x2a92…2aaa               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x001b, t01=0x0074}
0x2aaa…2ace               Head {h00=0x0020, h01=0x0050, text=» RB DCRR10 COMPLETE REQUEST «, t00=0x001b, t01=0x008c}
0x2ace…2ae2               Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x001b, t01=0x00b0}
0x2ae2…2afa               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x001b, t01=0x00c4}
0x2afa…2b0c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x001b, t01=0x00dc}
0x2b0c…2b38               Head {h00=0x0028, h01=0x0050, text=» RB(Z) DCSS10 WACK HAS NOT BEEN SENT«, t00=0x001b, t01=0x00ee}
0x2b38…2b4c               Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x001b, t01=0x011a}
0x2b4c…2b7c               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x001b, t01=0x012e}
0x2b7c…2b94               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x001b, t01=0x015e}
0x2b94…2ba6               Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x001b, t01=0x0176}
0x2ba6…2bb2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0188}
0x2bb2…2bc0 (28, 0, 400)  Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x0004}
0x2bc0…2bca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0012}
0x2bca…2bd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x001c}
0x2bd4…2bde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0026}
0x2bde…2bfc               Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x001c, t01=0x0030}
0x2bfc…2c06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x004e}
0x2c06…2c10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0058}
0x2c10…2c1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0062}
0x2c1a…2c36               Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x001c, t01=0x006c}
0x2c36…2c40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0088}
0x2c40…2c54               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x001c, t01=0x0092}
0x2c54…2c66               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x001c, t01=0x00a6}
0x2c66…2c90               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBCW,A8 GET TIMEOUT VALUE «, t00=0x001c, t01=0x00b8}
0x2c90…2cb0               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x001c, t01=0x00e2}
0x2cb0…2cc6               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x001c, t01=0x0102}
0x2cc6…2cdc               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x001c, t01=0x0118}
0x2cdc…2cf0               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x001c, t01=0x012e}
0x2cf0…2d06               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x001c, t01=0x0142}
0x2d06…2d32               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x001c, t01=0x0158}
0x2d32…2d46               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x001c, t01=0x0184}
0x2d46…2d60               Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x001d, t01=0x0008}
0x2d60…2d6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0022}
0x2d6a…2d86               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x001d, t01=0x002c}
0x2d86…2d90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0048}
0x2d90…2da4               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x001d, t01=0x0052}
0x2da4…2dc0               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x001d, t01=0x0066}
0x2dc0…2dd4               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x001d, t01=0x0082}
0x2dd4…2de8               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x001d, t01=0x0096}
0x2de8…2e10               Head {h00=0x0024, h01=0x0050, text=» CF A15,REMOVG REMOVE FROM QUEUE«, t00=0x001d, t01=0x00aa}
0x2e10…2e1c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00d2}
0x2e1c…2e30               Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x001d, t01=0x00de}
0x2e30…2e56               Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x001d, t01=0x00f2}
0x2e56…2e86               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTOR,A6 CHECK IF EXCHANGE ORDER «, t00=0x001d, t01=0x0118}
0x2e86…2e98               Head {h00=0x000e, h01=0x0050, text=» SUK A2,8 «, t00=0x001d, t01=0x0148}
0x2e98…2ebc               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TOUTR2 NOT EXCHANGE «, t00=0x001d, t01=0x015a}
0x2ebc…2ef2               Head {h00=0x0032, h01=0x0050, text=» ORK A1,2 RETURN CODE /42 AT EXCHANGE TIME OUT«, t00=0x001d, t01=0x017e}
0x2ef2…2f1a               Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x001e, t01=0x0024}
0x2f1a…2f24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x004c}
0x2f24…2f40               Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x001e, t01=0x0056}
0x2f40…2f4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0072}
0x2f4a…2f62               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x001e, t01=0x007c}
0x2f62…2f8c               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBCW,A8 GET TIMEOUT VALUE «, t00=0x001e, t01=0x0094}
0x2f8c…2fac               Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x001e, t01=0x00be}
0x2fac…2fc0               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x001e, t01=0x00de}
0x2fc0…2fd6               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x001e, t01=0x00f2}
0x2fd6…2fea               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x001e, t01=0x0108}
0x2fea…2ffe               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x001e, t01=0x011c}
0x2ffe…3016               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x001e, t01=0x0130}
0x3016…3028               Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x001e, t01=0x0148}
0x3028…3036               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x015a}
0x3036…3040               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0168}
0x3040…305e               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x001e, t01=0x0172}
0x305e…3068               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0190}
0x3068…307c               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x001f, t01=0x000a}
0x307c…3098               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x001f, t01=0x001e}
0x3098…30ac               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x001f, t01=0x003a}
0x30ac…30ce               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x001f, t01=0x004e}
0x30ce…30e0               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x001f, t01=0x0070}
0x30e0…30fc               Head {h00=0x0018, h01=0x0050, text=» RF(Z) TOUT10 WRITE «, t00=0x001f, t01=0x0082}
0x30fc…310e               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x001f, t01=0x009e}
0x310e…313a               Head {h00=0x0028, h01=0x0050, text=» RB(NZ) TOUTR1 ORDER IS NOT EXCHANGE«, t00=0x001f, t01=0x00b0}
0x313a…3158               Head {h00=0x001a, h01=0x0050, text=»TOUT10 LD A2,DWTECB,A6«, t00=0x001f, t01=0x00dc}
0x3158…317c               Head {h00=0x0020, h01=0x0050, text=» LD A4,ECBBA,A2 FETCH BUFFER«, t00=0x001f, t01=0x00fa}
0x317c…3190               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x001f, t01=0x011e}
0x3190…31bc               Head {h00=0x0028, h01=0x0050, text=» CF A15,RTBUF RELEASE TRANSMITBUFFER«, t00=0x001f, t01=0x0132}
0x31bc…31e8               Head {h00=0x0028, h01=0x0050, text=» CF A15,CKGBQ CHECK GET BUFFER QUEUE«, t00=0x001f, t01=0x015e}
0x31e8…31f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x018a}
0x31f4…3222               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0020, t01=0x0008}
0x3222…322c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0036}
0x322c…3256               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x0020, t01=0x0040}
0x3256…327a               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x0020, t01=0x006a}
0x327a…32a6               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x0020, t01=0x008e}
0x32a6…32bc               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x0020, t01=0x00ba}
0x32bc…32ce               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0020, t01=0x00d0}
0x32ce…32fa               Head {h00=0x0028, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT NOT WRITING «, t00=0x0020, t01=0x00e2}
0x32fa…330c               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0020, t01=0x010e}
0x330c…3316               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0120}
0x3316…3320               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x012a}
0x3320…3332               Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x0020, t01=0x0134}
0x3332…3340               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x0146}
0x3340…334a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0154}
0x334a…3354               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x015e}
0x3354…3372               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0020, t01=0x0168}
0x3372…337c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0186}
0x337c…33a6               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0020, t01=0x0190}
0x33a6…33b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x002a}
0x33b0…33ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0034}
0x33ba…33ce               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0021, t01=0x003e}
0x33ce…33f8               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0021, t01=0x0052}
0x33f8…341a               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0021, t01=0x007c}
0x341a…342e               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0021, t01=0x009e}
0x342e…3454               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0021, t01=0x00b2}
0x3454…3474               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0021, t01=0x00d8}
0x3474…3488               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0021, t01=0x00f8}
0x3488…349c               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0021, t01=0x010c}
0x349c…34ae               Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0021, t01=0x0120}
0x34ae…34bc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0132}
0x34bc…34c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0140}
0x34c6…34e2               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0021, t01=0x014a}
0x34e2…34ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0166}
0x34ec…3514               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0021, t01=0x0170}
0x3514…3538               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0022, t01=0x0008}
0x3538…3562               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0022, t01=0x002c}
0x3562…3584               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0022, t01=0x0056}
0x3584…358e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0078}
0x358e…3598               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0082}
0x3598…35c4               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0022, t01=0x008c}
0x35c4…35d4               Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x0022, t01=0x00b8}
0x35d4…35e8               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x0022, t01=0x00c8}
0x35e8…360c               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x0022, t01=0x00dc}
0x360c…363e               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x0022, t01=0x0100}
0x363e…3650               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0022, t01=0x0132}
0x3650…367e               Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0022, t01=0x0144}
0x367e…36a0               Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x0022, t01=0x0172}
0x36a0…36aa (35, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0004}
0x36aa…36b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x000e}
0x36b4…36d2               Head {h00=0x001a, h01=0x0050, text=»* GET TRANSMIT BUFFER «, t00=0x0023, t01=0x0018}
0x36d2…36dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0036}
0x36dc…36f0               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0023, t01=0x0040}
0x36f0…3718               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GTBUF«, t00=0x0023, t01=0x0054}
0x3718…373c               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0023, t01=0x007c}
0x373c…3766               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0023, t01=0x00a0}
0x3766…3788               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0023, t01=0x00ca}
0x3788…3792               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00ec}
0x3792…379c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00f6}
0x379c…37ca               Head {h00=0x002a, h01=0x0050, text=»GTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS «, t00=0x0023, t01=0x0100}
0x37ca…37da               Head {h00=0x000c, h01=0x0050, text=» RB GBUF«, t00=0x0023, t01=0x012e}
0x37da…37e8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x013e}
0x37e8…37f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x014c}
0x37f2…37fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0156}
0x37fc…381c               Head {h00=0x001c, h01=0x0050, text=»* CHECK GET BUFFER QUEUE«, t00=0x0023, t01=0x0160}
0x381c…3826               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0180}
0x3826…3830               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x018a}
0x3830…3844 (36, 0, 400)  Head {h00=0x0010, h01=0x0050, text=»CKGBQ EQU * «, t00=0x0024, t01=0x0004}
0x3844…385e               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x0024, t01=0x0018}
0x385e…3884               Head {h00=0x0022, h01=0x0050, text=» LD A6,DCGWQ GET QUEUE ANCHOR «, t00=0x0024, t01=0x0032}
0x3884…38aa               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKG110 NO ONE ON QUEUE «, t00=0x0024, t01=0x0058}
0x38aa…38c0               Head {h00=0x0012, h01=0x0050, text=» SUK A6,DWTWQ «, t00=0x0024, t01=0x007e}
0x38c0…38d8               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0024, t01=0x0094}
0x38d8…38f8               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKG100 NO REQUEST«, t00=0x0024, t01=0x00ac}
0x38f8…3910               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTOR,A6 «, t00=0x0024, t01=0x00cc}
0x3910…3924               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/31 «, t00=0x0024, t01=0x00e4}
0x3924…3950               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CKG100 NO GET BUFFER REQUEST«, t00=0x0024, t01=0x00f8}
0x3950…397a               Head {h00=0x0026, h01=0x0050, text=» CF A15,GTBUF GET TRANSMIT BUFFER «, t00=0x0024, t01=0x0124}
0x397a…398c               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0024, t01=0x014e}
0x398c…39b0               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CKG110 NO BUFFER FREE«, t00=0x0024, t01=0x0160}
0x39b0…39c8               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTECB,A6«, t00=0x0024, t01=0x0184}
0x39c8…39f4               Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBBA,A3 STORE BUFFER ADDRESS«, t00=0x0025, t01=0x000c}
0x39f4…3a10               Head {h00=0x0018, h01=0x0050, text=» LDKL A1,TBUFL+TBUFL«, t00=0x0025, t01=0x0038}
0x3a10…3a3c               Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBEL,A3 STORE BUFFER LENGTH «, t00=0x0025, t01=0x0054}
0x3a3c…3a66               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x0025, t01=0x0080}
0x3a66…3a92               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A3 STORE REMAINING TIME«, t00=0x0025, t01=0x00aa}
0x3a92…3aa4               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0025, t01=0x00d6}
0x3aa4…3acc               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0025, t01=0x00e8}
0x3acc…3ae0               Head {h00=0x0010, h01=0x0050, text=»CKG100 EQU *«, t00=0x0025, t01=0x0110}
0x3ae0…3b08               Head {h00=0x0024, h01=0x0050, text=» CF A15,REMOVG REMOVE FROM QUEUE«, t00=0x0025, t01=0x0124}
0x3b08…3b2c               Head {h00=0x0020, h01=0x0050, text=»CKG110 LDR A6,A7 RESTORE A6 «, t00=0x0025, t01=0x014c}
0x3b2c…3b46               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0025, t01=0x0170}
0x3b46…3b52               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x018a}
0x3b52…3b60               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x0008}
0x3b60…3b6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0016}
0x3b6a…3b74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0020}
0x3b74…3b94               Head {h00=0x001c, h01=0x0050, text=»* RELEASE RECEIVE BUFFER«, t00=0x0026, t01=0x002a}
0x3b94…3b9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x004a}
0x3b9e…3bc2               Head {h00=0x0020, h01=0x0050, text=»* A4 CONTAINS BUFFER ADDRESS«, t00=0x0026, t01=0x0054}
0x3bc2…3bea               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,RRBUF«, t00=0x0026, t01=0x0078}
0x3bea…3c0c               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0026, t01=0x00a0}
0x3c0c…3c16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00c2}
0x3c16…3c20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00cc}
0x3c20…3c4c               Head {h00=0x0028, h01=0x0050, text=»RRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0026, t01=0x00d6}
0x3c4c…3c5c               Head {h00=0x000c, h01=0x0050, text=»RBUF INH«, t00=0x0026, t01=0x0102}
0x3c5c…3c70               Head {h00=0x0010, h01=0x0050, text=»RBUF10 EQU *«, t00=0x0026, t01=0x0112}
0x3c70…3c84               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x0026, t01=0x0126}
0x3c84…3c9a               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RBUF20 «, t00=0x0026, t01=0x013a}
0x3c9a…3cac               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0026, t01=0x0150}
0x3cac…3cbe               Head {h00=0x000e, h01=0x0050, text=» RB RBUF10«, t00=0x0026, t01=0x0162}
0x3cbe…3cd2               Head {h00=0x0010, h01=0x0050, text=»RBUF20 EQU *«, t00=0x0026, t01=0x0174}
0x3cd2…3ce4               Head {h00=0x000e, h01=0x0050, text=» STR A4,A2«, t00=0x0026, t01=0x0188}
0x3ce4…3cf4               Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x0027, t01=0x000a}
0x3cf4…3d18               Head {h00=0x0020, h01=0x0050, text=» RB GBUF10 RETURN TO CALLER «, t00=0x0027, t01=0x001a}
0x3d18…3d22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x003e}
0x3d22…3d2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0048}
0x3d2c…3d4e               Head {h00=0x001e, h01=0x0050, text=»* RELEASE TRANSMIT BUFFER «, t00=0x0027, t01=0x0052}
0x3d4e…3d58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0074}
0x3d58…3d6c               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0027, t01=0x007e}
0x3d6c…3d90               Head {h00=0x0020, h01=0x0050, text=»* A4 CONTAINS BUFFER ADDRESS«, t00=0x0027, t01=0x0092}
0x3d90…3db8               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,RTBUF«, t00=0x0027, t01=0x00b6}
0x3db8…3dda               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0027, t01=0x00de}
0x3dda…3de4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0100}
0x3de4…3dee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x010a}
0x3dee…3e1c               Head {h00=0x002a, h01=0x0050, text=»RTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS «, t00=0x0027, t01=0x0114}
0x3e1c…3e32               Head {h00=0x0012, h01=0x0050, text=» CWK A4,TBUF1 «, t00=0x0027, t01=0x0142}
0x3e32…3e54               Head {h00=0x001e, h01=0x0050, text=» RB(E) RBUF DRIVER BUFFER «, t00=0x0027, t01=0x0158}
0x3e54…3e6a               Head {h00=0x0012, h01=0x0050, text=» CWK A4,TBUF2 «, t00=0x0027, t01=0x017a}
0x3e6a…3e8c               Head {h00=0x001e, h01=0x0050, text=» RB(E) RBUF DRIVER BUFFER «, t00=0x0027, t01=0x0190}
0x3e8c…3eb2               Head {h00=0x0022, h01=0x0050, text=» RB GBUF10 APPLICATION BUFFER «, t00=0x0028, t01=0x0022}
0x3eb2…3ebe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0048}
0x3ebe…3ecc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0054}
0x3ecc…3ed6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0062}
0x3ed6…3ee0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x006c}
0x3ee0…3f0c               Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x0028, t01=0x0076}
0x3f0c…3f16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00a2}
0x3f16…3f32               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0028, t01=0x00ac}
0x3f32…3f42               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0028, t01=0x00c8}
0x3f42…3f4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00d8}
0x3f4c…3f78               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0028, t01=0x00e2}
0x3f78…3f94               Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x0028, t01=0x010e}
0x3f94…3fae               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0028, t01=0x012a}
0x3fae…3fd6               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0028, t01=0x0144}
0x3fd6…3fe8               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0028, t01=0x016c}
0x3fe8…3ffa               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0028, t01=0x017e}
0x3ffa…4012               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0028, t01=0x0190}
0x4012…4034               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0029, t01=0x0018}
0x4034…405a               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0029, t01=0x003a}
0x405a…4074               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0029, t01=0x0060}
0x4074…407e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x007a}
0x407e…4088               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0084}
0x4088…40b6               Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x0029, t01=0x008e}
0x40b6…40c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00bc}
0x40c0…40dc               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0029, t01=0x00c6}
0x40dc…40ec               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0029, t01=0x00e2}
0x40ec…40f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00f2}
0x40f6…4124               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x0029, t01=0x00fc}
0x4124…415a               Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x0029, t01=0x012a}
0x415a…416e               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x0029, t01=0x0160}
0x416e…4182               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x0029, t01=0x0174}
0x4182…419a               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x0029, t01=0x0188}
0x419a…41c4               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x002a, t01=0x0010}
0x41c4…41d6               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x002a, t01=0x003a}
0x41d6…41ea               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x002a, t01=0x004c}
0x41ea…4206               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x002a, t01=0x0060}
0x4206…4218               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x002a, t01=0x007c}
0x4218…4238               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x002a, t01=0x008e}
0x4238…424a               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x002a, t01=0x00ae}
0x424a…4264               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x002a, t01=0x00c0}
0x4264…4272               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x00da}
0x4272…427c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00e8}
0x427c…4286               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00f2}
0x4286…4290               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00fc}
0x4290…42be               Head {h00=0x002a, h01=0x0050, text=»* INSERT DWT IN GET WRITE BUFFER QUEUE«, t00=0x002a, t01=0x0106}
0x42be…42c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0134}
0x42c8…42dc               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x002a, t01=0x013e}
0x42dc…42f8               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002a, t01=0x0152}
0x42f8…4308               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002a, t01=0x016e}
0x4308…4312               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x017e}
0x4312…4340               Head {h00=0x002a, h01=0x0050, text=»INSGWQ LDKL A2,DCGWQ GET QUEUE ANCHOR «, t00=0x002a, t01=0x0188}
0x4340…4352               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ1«, t00=0x002b, t01=0x0026}
0x4352…435c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0038}
0x435c…4366               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0042}
0x4366…4396               Head {h00=0x002c, h01=0x0050, text=»* REMOVE DWT FROM GET WRITE BUFFER QUEUE«, t00=0x002b, t01=0x004c}
0x4396…43a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x007c}
0x43a0…43bc               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x0086}
0x43bc…43cc               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x00a2}
0x43cc…43d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00b2}
0x43d6…4404               Head {h00=0x002a, h01=0x0050, text=»REMOVG LDKL A2,DCGWQ GET QUEUE ANCHOR «, t00=0x002b, t01=0x00bc}
0x4404…4416               Head {h00=0x000e, h01=0x0050, text=» RB REM05 «, t00=0x002b, t01=0x00ea}
0x4416…4422               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x00fc}
0x4422…4430               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0108}
0x4430…443a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0116}
0x443a…4444               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0120}
0x4444…4468               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x002b, t01=0x012a}
0x4468…4472               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x014e}
0x4472…4486               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x002b, t01=0x0158}
0x4486…44a2               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x016c}
0x44a2…44b2               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x0188}
0x44b2…44bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0008}
0x44bc…44e8               Head {h00=0x0028, h01=0x0050, text=»INSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR«, t00=0x002c, t01=0x0012}
0x44e8…44fe               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002c, t01=0x003e}
0x44fe…4510               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002c, t01=0x0054}
0x4510…451a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0066}
0x451a…4524               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0070}
0x4524…454a               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x002c, t01=0x007a}
0x454a…4554               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00a0}
0x4554…4570               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002c, t01=0x00aa}
0x4570…4580               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002c, t01=0x00c6}
0x4580…458a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00d6}
0x458a…45b8               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002c, t01=0x00e0}
0x45b8…45ce               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002c, t01=0x010e}
0x45ce…45e0               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x002c, t01=0x0124}
0x45e0…45ec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0136}
0x45ec…45fa               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x0142}
0x45fa…4604               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0150}
0x4604…460e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x015a}
0x460e…4636               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x002c, t01=0x0164}
0x4636…4640               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x018c}
0x4640…4658               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x002d, t01=0x0008}
0x4658…4672               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002d, t01=0x0020}
0x4672…467c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x003a}
0x467c…4690               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002d, t01=0x0044}
0x4690…46a6               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002d, t01=0x0058}
0x46a6…46d2               Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002d, t01=0x006e}
0x46d2…46de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x009a}
0x46de…46f4               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002d, t01=0x00a6}
0x46f4…471c               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002d, t01=0x00bc}
0x471c…4728               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x00e4}
0x4728…4758               Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002d, t01=0x00f0}
0x4758…476c               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002d, t01=0x0120}
0x476c…4780               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002d, t01=0x0134}
0x4780…47a8               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002d, t01=0x0148}
0x47a8…47ba               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002d, t01=0x0170}
0x47ba…47cc               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002d, t01=0x0182}
0x47cc…47f6 (46, 0, 398)  Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002e, t01=0x0004}
0x47f6…481c               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002e, t01=0x002e}
0x481c…482c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002e, t01=0x0054}
0x482c…483a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0064}
0x483a…4844               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0072}
0x4844…484e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x007c}
0x484e…4884               Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x002e, t01=0x0086}
0x4884…488e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00bc}
0x488e…48c6               Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x002e, t01=0x00c6}
0x48c6…48d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00fe}
0x48d0…48ee               Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x002e, t01=0x0108}
0x48ee…4906               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x002e, t01=0x0126}
0x4906…4926               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x002e, t01=0x013e}
0x4926…4946               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x002e, t01=0x015e}
0x4946…495e               Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x002e, t01=0x017e}
0x495e…4978               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x002f, t01=0x0008}
0x4978…49a0               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x002f, t01=0x0022}
0x49a0…49ce               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x002f, t01=0x004a}
0x49ce…49f4               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x002f, t01=0x0078}
0x49f4…4a24               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x002f, t01=0x009e}
0x4a24…4a56               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x002f, t01=0x00ce}
0x4a56…4a7c               Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x002f, t01=0x0100}
0x4a7c…4aaa               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBBA,A8 SAVE THIS ADDR IN ECB «, t00=0x002f, t01=0x0126}
0x4aaa…4abe               Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x002f, t01=0x0154}
0x4abe…4af2               Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x002f, t01=0x0168}
0x4af2…4b06               Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x0030, t01=0x000c}
0x4b06…4b38               Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x0030, t01=0x0020}
0x4b38…4b56               Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 PARAMETER=OK«, t00=0x0030, t01=0x0052}
0x4b56…4b90               Head {h00=0x0036, h01=0x0050, text=»CKM100 CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x0030, t01=0x0070}
0x4b90…4bbe               Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0030, t01=0x00aa}
0x4bbe…4bd6               Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0030, t01=0x00d8}
0x4bd6…4c12               Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x0030, t01=0x00f0}
0x4c12…4c42               Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x0030, t01=0x012c}
0x4c42…4c58               Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x0030, t01=0x015c}
0x4c58…4c6e               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x0030, t01=0x0172}
0x4c6e…4c98               Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x0030, t01=0x0188}
0x4c98…4cc6               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x0031, t01=0x0022}
0x4cc6…4cd8               Head {h00=0x000e, h01=0x0050, text=» RB CKM100«, t00=0x0031, t01=0x0050}
0x4cd8…4ce6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x0062}
0x4ce6…4cf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0070}
0x4cf0…4cfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x007a}
0x4cfa…4d18               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0031, t01=0x0084}
0x4d18…4d40               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0031, t01=0x00a2}
0x4d40…4d4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00ca}
0x4d4a…4d5c               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0031, t01=0x00d4}
0x4d5c…4d84               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0031, t01=0x00e6}
0x4d84…4d8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x010e}
0x4d8e…4d98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0118}
0x4d98…4db0               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0031, t01=0x0122}
0x4db0…4dc4               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0031, t01=0x013a}
0x4dc4…4dd8               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0031, t01=0x014e}
0x4dd8…4dec               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0031, t01=0x0162}
0x4dec…4e00               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0031, t01=0x0176}
0x4e00…4e14               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0031, t01=0x018a}
0x4e14…4e2e               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0032, t01=0x000e}
0x4e2e…4e3c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x0028}
0x4e3c…4e54               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0032, t01=0x0036}
0x4e54…4e68               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0032, t01=0x004e}
0x4e68…4e7a               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0032, t01=0x0062}
0x4e7a…4e8e               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0032, t01=0x0074}
0x4e8e…4ea0               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0032, t01=0x0088}
0x4ea0…4eb4               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0032, t01=0x009a}
0x4eb4…4ec6               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0032, t01=0x00ae}
0x4ec6…4eda               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0032, t01=0x00c0}
0x4eda…4eec               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0032, t01=0x00d4}
0x4eec…4f00               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0032, t01=0x00e6}
0x4f00…4f12               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0032, t01=0x00fa}
0x4f12…4f26               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0032, t01=0x010c}
0x4f26…4f3a               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0032, t01=0x0120}
0x4f3a…4f4e               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0032, t01=0x0134}
0x4f4e…4f60               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0032, t01=0x0148}
0x4f60…4f6e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x015a}
0x4f6e…4f78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0168}
0x4f78…4f82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0172}
0x4f82…4f98               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0032, t01=0x017c}
0x4f98…4fa2 (51, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0004}
0x4fa2…4fac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x000e}
0x4fac…4fd8               Head {h00=0x0028, h01=0x0050, text=»TIMPRO EQU 90 PROCEDURE TIMER 9 SEC «, t00=0x0033, t01=0x0018}
0x4fd8…4fe2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0044}
0x4fe2…4fec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x004e}
0x4fec…5008               Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0033, t01=0x0058}
0x5008…5012               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0074}
0x5012…503c               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0033, t01=0x007e}
0x503c…5050               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0033, t01=0x00a8}
0x5050…5064               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0033, t01=0x00bc}
0x5064…5078               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0033, t01=0x00d0}
0x5078…508c               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0033, t01=0x00e4}
0x508c…50a0               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0033, t01=0x00f8}
0x50a0…50b4               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0033, t01=0x010c}
0x50b4…50c8               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0033, t01=0x0120}
0x50c8…50dc               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0033, t01=0x0134}
0x50dc…50f0               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0033, t01=0x0148}
0x50f0…5104               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0033, t01=0x015c}
0x5104…5118               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0033, t01=0x0170}
0x5118…512c               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0033, t01=0x0184}
0x512c…513e               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0034, t01=0x0008}
0x513e…5154               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0034, t01=0x001a}
0x5154…516a               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0034, t01=0x0030}
0x516a…517e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0034, t01=0x0046}
0x517e…5192               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0034, t01=0x005a}
0x5192…51a6               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0034, t01=0x006e}
0x51a6…51ba               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0034, t01=0x0082}
0x51ba…51ce               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0034, t01=0x0096}
0x51ce…51e2               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0034, t01=0x00aa}
0x51e2…51f6               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0034, t01=0x00be}
0x51f6…520a               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0034, t01=0x00d2}
0x520a…5216               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x00e6}
0x5216…522a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0034, t01=0x00f2}
0x522a…523e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0034, t01=0x0106}
0x523e…5272               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0034, t01=0x011a}
0x5272…527e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x014e}
0x527e…5292               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0034, t01=0x015a}
0x5292…52a6               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0034, t01=0x016e}
0x52a6…52ba               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0034, t01=0x0182}
0x52ba…52ce               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /5C «, t00=0x0035, t01=0x0008}
0x52ce…52e2               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0035, t01=0x001c}
0x52e2…52f6               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0035, t01=0x0030}
0x52f6…530c               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0035, t01=0x0044}
0x530c…5318               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x005a}
0x5318…5326               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x0066}
0x5326…5330               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0074}
0x5330…533a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x007e}
0x533a…5358               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0035, t01=0x0088}
0x5358…5362               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00a6}
0x5362…536c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00b0}
0x536c…539a               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0035, t01=0x00ba}
0x539a…53cc               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0035, t01=0x00e8}
0x53cc…53ec               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x0035, t01=0x011a}
0x53ec…5408               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x0035, t01=0x013a}
0x5408…5424               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x0035, t01=0x0156}
0x5424…545a               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x0035, t01=0x0172}
0x545a…5480               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x0036, t01=0x0018}
0x5480…54a0               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x0036, t01=0x003e}
0x54a0…54ce               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x0036, t01=0x005e}
0x54ce…54d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x008c}
0x54d8…54f6               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x0036, t01=0x0096}
0x54f6…5522               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x0036, t01=0x00b4}
0x5522…554c               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x0036, t01=0x00e0}
0x554c…556c               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x0036, t01=0x010a}
0x556c…55a0               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x0036, t01=0x012a}
0x55a0…55c8               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x0036, t01=0x015e}
0x55c8…55fa               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x0036, t01=0x0186}
0x55fa…562a               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x0037, t01=0x0028}
0x562a…5634               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0058}
0x5634…563e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0062}
0x563e…5666               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x0037, t01=0x006c}
0x5666…5670               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0094}
0x5670…567a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x009e}
0x567a…568e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0037, t01=0x00a8}
0x568e…56c0               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x0037, t01=0x00bc}
0x56c0…56ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00ee}
0x56ca…56d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00f8}
0x56d4…56e8               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x0037, t01=0x0102}
0x56e8…56fc               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x0037, t01=0x0116}
0x56fc…5706               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x012a}
0x5706…573c               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x0037, t01=0x0134}
0x573c…576c               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x0037, t01=0x016a}
0x576c…5778               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x000a}
0x5778…5786               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x0016}
0x5786…5790               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0024}
0x5790…579a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x002e}
0x579a…57b6               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x0038, t01=0x0038}
0x57b6…57c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0054}
0x57c0…57e6               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x0038, t01=0x005e}
0x57e6…5810               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x0038, t01=0x0084}
0x5810…581a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00ae}
0x581a…5824               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00b8}
0x5824…5840               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0038, t01=0x00c2}
0x5840…5870               Head {h00=0x002c, h01=0x0050, text=»BRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ«, t00=0x0038, t01=0x00de}
0x5870…5886               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0038, t01=0x010e}
0x5886…5898               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x0038, t01=0x0124}
0x5898…58bc               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x0038, t01=0x0136}
0x58bc…58d8               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0038, t01=0x015a}
0x58d8…590e               Head {h00=0x0032, h01=0x0050, text=» CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS «, t00=0x0038, t01=0x0176}
0x590e…5924               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x001c}
0x5924…5940               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0039, t01=0x0032}
0x5940…5974               Head {h00=0x0030, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ«, t00=0x0039, t01=0x004e}
0x5974…598a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x0082}
0x598a…599e               Head {h00=0x0010, h01=0x0050, text=»BRM010 EQU *«, t00=0x0039, t01=0x0098}
0x599e…59c0               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0039, t01=0x00ac}
0x59c0…59f4               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN«, t00=0x0039, t01=0x00ce}
0x59f4…5a0a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x0102}
0x5a0a…5a26               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0039, t01=0x0118}
0x5a26…5a3a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0039, t01=0x0134}
0x5a3a…5a72               Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN «, t00=0x0039, t01=0x0148}
0x5a72…5a88               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x0180}
0x5a88…5aa4               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003a, t01=0x0008}
0x5aa4…5aca               Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x003a, t01=0x0024}
0x5aca…5ae0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003a, t01=0x004a}
0x5ae0…5afc               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003a, t01=0x0060}
0x5afc…5b18               Head {h00=0x0018, h01=0x0050, text=» IFF CODE=1  SALCUZ «, t00=0x003a, t01=0x007c}
0x5b18…5b34               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x003a, t01=0x0098}
0x5b34…5b62               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003a, t01=0x00b4}
0x5b62…5b7e               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x003a, t01=0x00e2}
0x5b7e…5bb4               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003a, t01=0x00fe}
0x5bb4…5bd2               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003a, t01=0x0134}
0x5bd2…5be8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003a, t01=0x0152}
0x5be8…5c0a               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=2  SALCUZ «, t00=0x003a, t01=0x0168}
0x5c0a…5c24               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x003a, t01=0x018a}
0x5c24…5c52               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003b, t01=0x0014}
0x5c52…5c70               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x003b, t01=0x0042}
0x5c70…5ca6               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003b, t01=0x0060}
0x5ca6…5cc4               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003b, t01=0x0096}
0x5cc4…5cda               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x00b4}
0x5cda…5cee               Head {h00=0x0010, h01=0x0050, text=»BRM100 EQU *«, t00=0x003b, t01=0x00ca}
0x5cee…5d16               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003b, t01=0x00de}
0x5d16…5d3a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003b, t01=0x0106}
0x5d3a…5d4c               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003b, t01=0x012a}
0x5d4c…5d60               Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x003b, t01=0x013c}
0x5d60…5d82               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x003b, t01=0x0150}
0x5d82…5d9a               Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x003b, t01=0x0172}
0x5d9a…5dbc               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x003b, t01=0x018a}
0x5dbc…5dd4               Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x003c, t01=0x001c}
0x5dd4…5df8               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x003c, t01=0x0034}
0x5df8…5e10               Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x003c, t01=0x0058}
0x5e10…5e34               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x003c, t01=0x0070}
0x5e34…5e4c               Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x003c, t01=0x0094}
0x5e4c…5e70               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x003c, t01=0x00ac}
0x5e70…5e84               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003c, t01=0x00d0}
0x5e84…5e96               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003c, t01=0x00e4}
0x5e96…5ebe               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003c, t01=0x00f6}
0x5ebe…5ee2               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003c, t01=0x011e}
0x5ee2…5ef4               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003c, t01=0x0142}
0x5ef4…5f1e               Head {h00=0x0026, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESSING «, t00=0x003c, t01=0x0154}
0x5f1e…5f2a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x017e}
0x5f2a…5f3c               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003c, t01=0x018a}
0x5f3c…5f54               Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x003d, t01=0x000c}
0x5f54…5f72               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x003d, t01=0x0024}
0x5f72…5f84               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x003d, t01=0x0042}
0x5f84…5f9a               Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x003d, t01=0x0054}
0x5f9a…5fbe               Head {h00=0x0020, h01=0x0050, text=» RF(NE) BRM150 NOT THIS TCU «, t00=0x003d, t01=0x006a}
0x5fbe…5fd2               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x003d, t01=0x008e}
0x5fd2…5ff4               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x003d, t01=0x00a2}
0x5ff4…6018               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003d, t01=0x00c4}
0x6018…602a               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003d, t01=0x00e8}
0x602a…603e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003d, t01=0x00fa}
0x603e…6060               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x003d, t01=0x010e}
0x6060…6084               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003d, t01=0x0130}
0x6084…6096               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003d, t01=0x0154}
0x6096…60c6               Head {h00=0x002c, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESS SEQUENCE «, t00=0x003d, t01=0x0166}
0x60c6…60d2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0008}
0x60d2…60f8               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ READ ONE CHARACTER«, t00=0x003e, t01=0x0014}
0x60f8…6114               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003e, t01=0x003a}
0x6114…612c               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x003e, t01=0x0056}
0x612c…6142               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x006e}
0x6142…615e               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003e, t01=0x0084}
0x615e…617a               Head {h00=0x0018, h01=0x0050, text=» SUK A2,ENQ  SALCUZ «, t00=0x003e, t01=0x00a0}
0x617a…6190               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x00bc}
0x6190…61ae               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) BRM150 NOT ENQ«, t00=0x003e, t01=0x00d2}
0x61ae…61ca               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003e, t01=0x00f0}
0x61ca…61f2               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ READ LAST CHARACTER «, t00=0x003e, t01=0x010c}
0x61f2…61fa               Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x0134}
0x61fa…6220               Head {h00=0x0022, h01=0x0050, text=»* TRAILING PAD CAN BE CHECKED «, t00=0x003e, t01=0x013c}
0x6220…6228               Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x0162}
0x6228…624a               Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,LCUIN HALT INPUT«, t00=0x003e, t01=0x016a}
0x624a…6260               Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUIN «, t00=0x003e, t01=0x018c}
0x6260…6276               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003f, t01=0x0012}
0x6276…6292               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003f, t01=0x0028}
0x6292…62ba               Head {h00=0x0024, h01=0x0050, text=» CF A5,HALTIN HALT INPUT SALCUZ «, t00=0x003f, t01=0x0044}
0x62ba…62ec               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) BRM010 PARITY ERROR SALCUZ  SALCUZ«, t00=0x003f, t01=0x006c}
0x62ec…6302               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003f, t01=0x009e}
0x6302…6314               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x003f, t01=0x00b4}
0x6314…6338               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK COUNTER«, t00=0x003f, t01=0x00c6}
0x6338…634a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x003f, t01=0x00ea}
0x634a…635c               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x003f, t01=0x00fc}
0x635c…637c               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x003f, t01=0x010e}
0x637c…638e               Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x003f, t01=0x012e}
0x638e…63b0               Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x003f, t01=0x0140}
0x63b0…63c4               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x003f, t01=0x0162}
0x63c4…63fe               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x003f, t01=0x0176}
0x63fe…640a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x0020}
0x640a…641e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0040, t01=0x002c}
0x641e…6448               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0040, t01=0x0040}
0x6448…6454               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x006a}
0x6454…646a               Head {h00=0x0012, h01=0x0050, text=» IFF EM3270=0 «, t00=0x0040, t01=0x0076}
0x646a…649c               Head {h00=0x002e, h01=0x0050, text=» CF A5,FINT10 CONTINUE SEARCHING IN DC:TAB«, t00=0x0040, t01=0x008c}
0x649c…64a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x00be}
0x64a8…64ca               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0040, t01=0x00ca}
0x64ca…64ee               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x0040, t01=0x00ec}
0x64ee…650a               Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x0040, t01=0x0110}
0x650a…651e               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x0040, t01=0x012c}
0x651e…6548               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0040, t01=0x0140}
0x6548…656a               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0040, t01=0x016a}
0x656a…658a               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x0040, t01=0x018c}
0x658a…65a0               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=0   «, t00=0x0041, t01=0x001c}
0x65a0…65c8               Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x0041, t01=0x0032}
0x65c8…65dc               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0041, t01=0x005a}
0x65dc…65f0               Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x0041, t01=0x006e}
0x65f0…6600               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0041, t01=0x0082}
0x6600…6616               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=1   «, t00=0x0041, t01=0x0092}
0x6616…6636               Head {h00=0x001c, h01=0x0050, text=» ABL BRM INVALID ADDRESS«, t00=0x0041, t01=0x00a8}
0x6636…6646               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0041, t01=0x00c8}
0x6646…6650               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00d8}
0x6650…6680               Head {h00=0x002c, h01=0x0050, text=»*   WAIT FOR MARK HOLD TO RESYNCHRONIZE «, t00=0x0041, t01=0x00e2}
0x6680…668a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0112}
0x668a…669e               Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0041, t01=0x011c}
0x669e…66b2               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0041, t01=0x0130}
0x66b2…66c6               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0041, t01=0x0144}
0x66c6…66e6               Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM RESYNCHRONIZE«, t00=0x0041, t01=0x0158}
0x66e6…6710               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ ANOTHER CHARACTER«, t00=0x0041, t01=0x0178}
0x6710…6722               Head {h00=0x000e, h01=0x0050, text=» RB BRM150«, t00=0x0042, t01=0x0012}
0x6722…6730               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0024}
0x6730…673a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0032}
0x673a…6744               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x003c}
0x6744…6764               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0042, t01=0x0046}
0x6764…676e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0066}
0x676e…6778               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0070}
0x6778…678c               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0042, t01=0x007a}
0x678c…67b6               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0042, t01=0x008e}
0x67b6…67ca               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0042, t01=0x00b8}
0x67ca…67ec               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0042, t01=0x00cc}
0x67ec…67f8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x00ee}
0x67f8…680c               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0042, t01=0x00fa}
0x680c…6836               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0042, t01=0x010e}
0x6836…685c               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0042, t01=0x0138}
0x685c…6880               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0042, t01=0x015e}
0x6880…689a               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0042, t01=0x0182}
0x689a…68c6               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0043, t01=0x000c}
0x68c6…68da               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0043, t01=0x0038}
0x68da…6900               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0043, t01=0x004c}
0x6900…6914               Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0043, t01=0x0072}
0x6914…6936               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0043, t01=0x0086}
0x6936…6946               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0043, t01=0x00a8}
0x6946…6954               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0043, t01=0x00b8}
0x6954…695e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00c6}
0x695e…6968               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00d0}
0x6968…6988               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0043, t01=0x00da}
0x6988…6992               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00fa}
0x6992…699c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0104}
0x699c…69b0               Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0043, t01=0x010e}
0x69b0…69c4               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0043, t01=0x0122}
0x69c4…69d8               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0043, t01=0x0136}
0x69d8…69fa               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0043, t01=0x014a}
0x69fa…6a10               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0043, t01=0x016c}
0x6a10…6a3c               Head {h00=0x0028, h01=0x0050, text=»*********************CHAINED COMMAND«, t00=0x0043, t01=0x0182}
0x6a3c…6a66               Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0044, t01=0x001e}
0x6a66…6a84               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0044, t01=0x0048}
0x6a84…6a98               Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0044, t01=0x0066}
0x6a98…6aba               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0044, t01=0x007a}
0x6aba…6acc               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0044, t01=0x009c}
0x6acc…6aee               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0044, t01=0x00ae}
0x6aee…6b02               Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0044, t01=0x00d0}
0x6b02…6b2e               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0044, t01=0x00e4}
0x6b2e…6b42               Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0044, t01=0x0110}
0x6b42…6b60               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0044, t01=0x0124}
0x6b60…6b70               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0044, t01=0x0142}
0x6b70…6b84               Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0044, t01=0x0152}
0x6b84…6b98               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0044, t01=0x0166}
0x6b98…6bac               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0044, t01=0x017a}
0x6bac…6bd6               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0044, t01=0x018e}
0x6bd6…6bec               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0045, t01=0x0028}
0x6bec…6c16               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0045, t01=0x003e}
0x6c16…6c3c               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0045, t01=0x0068}
0x6c3c…6c70               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0045, t01=0x008e}
0x6c70…6c8c               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0045, t01=0x00c2}
0x6c8c…6c98               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x00de}
0x6c98…6cae               Head {h00=0x0012, h01=0x0050, text=» IFF EM3270=0 «, t00=0x0045, t01=0x00ea}
0x6cae…6cd6               Head {h00=0x0024, h01=0x0050, text=» CF A5,FINTER GET RECEIVING DWT «, t00=0x0045, t01=0x0100}
0x6cd6…6cf4               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A3 DWT-ADDRESS«, t00=0x0045, t01=0x0128}
0x6cf4…6d0c               Head {h00=0x0014, h01=0x0050, text=» LDR* A2,A6 STA «, t00=0x0045, t01=0x0146}
0x6d0c…6d18               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x015e}
0x6d18…6d2c               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0045, t01=0x016a}
0x6d2c…6d5c               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0045, t01=0x017e}
0x6d5c…6d76               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0046, t01=0x001e}
0x6d76…6da2               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0046, t01=0x0038}
0x6da2…6dc2               Head {h00=0x001c, h01=0x0050, text=» CM CACK PRESET ACK-1 =3«, t00=0x0046, t01=0x0064}
0x6dc2…6de6               Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x0046, t01=0x0084}
0x6de6…6df2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x00a8}
0x6df2…6e1e               Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x0046, t01=0x00b4}
0x6e1e…6e36               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =4«, t00=0x0046, t01=0x00e0}
0x6e36…6e4e               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0046, t01=0x00f8}
0x6e4e…6e60               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0046, t01=0x0110}
0x6e60…6e78               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =4«, t00=0x0046, t01=0x0122}
0x6e78…6e96               Head {h00=0x001a, h01=0x0050, text=» SUK A2,ENQ ENQ ?? =4 «, t00=0x0046, t01=0x013a}
0x6e96…6ea8               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0046, t01=0x0158}
0x6ea8…6ed4               Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x0046, t01=0x016a}
0x6ed4…6ee6               Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x0047, t01=0x0008}
0x6ee6…6efa               Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x0047, t01=0x001a}
0x6efa…6f1e               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0047, t01=0x002e}
0x6f1e…6f46               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0047, t01=0x0052}
0x6f46…6f58               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0047, t01=0x007a}
0x6f58…6f6c               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0047, t01=0x008c}
0x6f6c…6f92               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x0047, t01=0x00a0}
0x6f92…6fa6               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0047, t01=0x00c6}
0x6fa6…6fba               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x0047, t01=0x00da}
0x6fba…6fcc               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x0047, t01=0x00ee}
0x6fcc…6ff0               Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x0047, t01=0x0100}
0x6ff0…7002               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0047, t01=0x0124}
0x7002…7026               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x0047, t01=0x0136}
0x7026…7038               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0047, t01=0x015a}
0x7038…704e               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x0047, t01=0x016c}
0x704e…707a               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x0047, t01=0x0182}
0x707a…7098               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x0048, t01=0x001e}
0x7098…70c2               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x0048, t01=0x003c}
0x70c2…70ce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x0066}
0x70ce…70e2               Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x0048, t01=0x0072}
0x70e2…70f4               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0048, t01=0x0086}
0x70f4…711e               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x0048, t01=0x0098}
0x711e…712e               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0048, t01=0x00c2}
0x712e…715c               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0048, t01=0x00d2}
0x715c…716e               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0048, t01=0x0100}
0x716e…7192               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x0048, t01=0x0112}
0x7192…719c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0136}
0x719c…71c2               Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x0048, t01=0x0140}
0x71c2…71cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0166}
0x71cc…71e0               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0048, t01=0x0170}
0x71e0…71f4               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0048, t01=0x0184}
0x71f4…720e               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x0049, t01=0x0008}
0x720e…7224               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0049, t01=0x0022}
0x7224…723a               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x0049, t01=0x0038}
0x723a…724e               Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x0049, t01=0x004e}
0x724e…725a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0062}
0x725a…726e               Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x0049, t01=0x006e}
0x726e…7284               Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x0049, t01=0x0082}
0x7284…72b4               Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x0049, t01=0x0098}
0x72b4…72d6               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x0049, t01=0x00c8}
0x72d6…72f6               Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x0049, t01=0x00ea}
0x72f6…7308               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x0049, t01=0x010a}
0x7308…7320               Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x0049, t01=0x011c}
0x7320…7346               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x0049, t01=0x0134}
0x7346…735a               Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x0049, t01=0x015a}
0x735a…7374               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0049, t01=0x016e}
0x7374…739c               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0049, t01=0x0188}
0x739c…73c8               Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBBA,A8 STORE BUFFER ADDRESS«, t00=0x004a, t01=0x0020}
0x73c8…73e8               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x004a, t01=0x004c}
0x73e8…7416               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x004a, t01=0x006c}
0x7416…7440               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x004a, t01=0x009a}
0x7440…746c               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x004a, t01=0x00c4}
0x746c…747a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004a, t01=0x00f0}
0x747a…7484               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00fe}
0x7484…748e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0108}
0x748e…74c2               Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x004a, t01=0x0112}
0x74c2…74cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0146}
0x74cc…74d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0150}
0x74d6…74ea               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004a, t01=0x015a}
0x74ea…750a               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x004a, t01=0x016e}
0x750a…751e               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004a, t01=0x018e}
0x751e…7540               Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x004b, t01=0x0012}
0x7540…7552               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x004b, t01=0x0034}
0x7552…7564               Head {h00=0x000e, h01=0x0050, text=» RF BRM328«, t00=0x004b, t01=0x0046}
0x7564…757a               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004b, t01=0x0058}
0x757a…759c               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004b, t01=0x006e}
0x759c…75ae               Head {h00=0x000e, h01=0x0050, text=» ORK A2,/A«, t00=0x004b, t01=0x0090}
0x75ae…75c6               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004b, t01=0x00a2}
0x75c6…75da               Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004b, t01=0x00ba}
0x75da…75e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x00ce}
0x75e6…760e               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004b, t01=0x00da}
0x760e…7620               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004b, t01=0x0102}
0x7620…762e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004b, t01=0x0114}
0x762e…7642               Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x004b, t01=0x0122}
0x7642…7664               Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x004b, t01=0x0136}
0x7664…7690               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x004b, t01=0x0158}
0x7690…76c2               Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x004b, t01=0x0184}
0x76c2…76d6               Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x004c, t01=0x0026}
0x76d6…76f8               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x004c, t01=0x003a}
0x76f8…7708               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004c, t01=0x005c}
0x7708…771c               Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x004c, t01=0x006c}
0x771c…7730               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004c, t01=0x0080}
0x7730…7748               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x004c, t01=0x0094}
0x7748…775a               Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x004c, t01=0x00ac}
0x775a…7782               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x004c, t01=0x00be}
0x7782…77a2               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x004c, t01=0x00e6}
0x77a2…77b4               Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x004c, t01=0x0106}
0x77b4…77c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x0118}
0x77c0…77d4               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x004c, t01=0x0124}
0x77d4…77e6               Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x004c, t01=0x0138}
0x77e6…77f2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x014a}
0x77f2…7800               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x0156}
0x7800…780a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0164}
0x780a…7814               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x016e}
0x7814…7844               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x004c, t01=0x0178}
0x7844…784e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0018}
0x784e…7858               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0022}
0x7858…786c               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x004d, t01=0x002c}
0x786c…7894               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x004d, t01=0x0040}
0x7894…78a8               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x004d, t01=0x0068}
0x78a8…78ce               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x004d, t01=0x007c}
0x78ce…7906               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x004d, t01=0x00a2}
0x7906…792e               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x004d, t01=0x00da}
0x792e…7956               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x004d, t01=0x0102}
0x7956…797c               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x004d, t01=0x012a}
0x797c…798e               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x004d, t01=0x0150}
0x798e…79a0               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x004d, t01=0x0162}
0x79a0…79be               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT  ********«, t00=0x004d, t01=0x0174}
0x79be…79d8 (78, 0, 398)  Head {h00=0x0016, h01=0x0050, text=» ABL BRM  ********«, t00=0x004e, t01=0x0004}
0x79d8…79ec               Head {h00=0x0010, h01=0x0050, text=» ABL POL127 «, t00=0x004e, t01=0x001e}
0x79ec…79f8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x0032}
0x79f8…7a02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x003e}
0x7a02…7a0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0048}
0x7a0c…7a2c               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x004e, t01=0x0052}
0x7a2c…7a36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0072}
0x7a36…7a40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x007c}
0x7a40…7a54               Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x004e, t01=0x0086}
0x7a54…7a7e               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004e, t01=0x009a}
0x7a7e…7a92               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004e, t01=0x00c4}
0x7a92…7ac0               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) BRM510 TEXT RETRANSMISSION =1 «, t00=0x004e, t01=0x00d8}
0x7ac0…7ad4               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x004e, t01=0x0106}
0x7ad4…7afa               Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x004e, t01=0x011a}
0x7afa…7b2c               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x004e, t01=0x0140}
0x7b2c…7b40               Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x004e, t01=0x0172}
0x7b40…7b50               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004e, t01=0x0186}
0x7b50…7b5e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004f, t01=0x0008}
0x7b5e…7b68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0016}
0x7b68…7b72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0020}
0x7b72…7b92               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x004f, t01=0x002a}
0x7b92…7b9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x004a}
0x7b9c…7ba6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0054}
0x7ba6…7bba               Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x004f, t01=0x005e}
0x7bba…7be4               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004f, t01=0x0072}
0x7be4…7bf8               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004f, t01=0x009c}
0x7bf8…7c1c               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x004f, t01=0x00b0}
0x7c1c…7c30               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x004f, t01=0x00d4}
0x7c30…7c56               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x004f, t01=0x00e8}
0x7c56…7c68               Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x004f, t01=0x010e}
0x7c68…7c7c               Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x004f, t01=0x0120}
0x7c7c…7ca2               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x004f, t01=0x0134}
0x7ca2…7cb6               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x004f, t01=0x015a}
0x7cb6…7cca               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x004f, t01=0x016e}
0x7cca…7cfe               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x004f, t01=0x0182}
0x7cfe…7d0a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0050, t01=0x0026}
0x7d0a…7d3e               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x0050, t01=0x0032}
0x7d3e…7d68               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x0050, t01=0x0066}
0x7d68…7d7c               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0050, t01=0x0090}
0x7d7c…7d90               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0050, t01=0x00a4}
0x7d90…7d9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00b8}
0x7d9a…7da4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00c2}
0x7da4…7dc4               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x0050, t01=0x00cc}
0x7dc4…7dce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00ec}
0x7dce…7dd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00f6}
0x7dd8…7dec               Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x0050, t01=0x0100}
0x7dec…7e16               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0050, t01=0x0114}
0x7e16…7e2a               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0050, t01=0x013e}
0x7e2a…7e50               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 ACK NOT EXPECTED«, t00=0x0050, t01=0x0152}
0x7e50…7e7a               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x0050, t01=0x0178}
0x7e7a…7e92               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =4«, t00=0x0051, t01=0x0012}
0x7e92…7eaa               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x0051, t01=0x002a}
0x7eaa…7ebc               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0051, t01=0x0042}
0x7ebc…7ed4               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =4«, t00=0x0051, t01=0x0054}
0x7ed4…7eec               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0  =4«, t00=0x0051, t01=0x006c}
0x7eec…7efe               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0051, t01=0x0084}
0x7efe…7f14               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x0051, t01=0x0096}
0x7f14…7f1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00ac}
0x7f1e…7f38               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x0051, t01=0x00b6}
0x7f38…7f42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00d0}
0x7f42…7f64               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x0051, t01=0x00da}
0x7f64…7f88               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0051, t01=0x00fc}
0x7f88…7f9c               Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0051, t01=0x0120}
0x7f9c…7fba               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0051, t01=0x0134}
0x7fba…7fe4               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0051, t01=0x0152}
0x7fe4…7ff6               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0051, t01=0x017c}
0x7ff6…800a               Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0051, t01=0x018e}
0x800a…801e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0052, t01=0x0012}
0x801e…8034               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0052, t01=0x0026}
0x8034…803e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x003c}
0x803e…8058               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0052, t01=0x0046}
0x8058…8062               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0060}
0x8062…8086               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0052, t01=0x006a}
0x8086…80ae               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0052, t01=0x008e}
0x80ae…80c2               Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0052, t01=0x00b6}
0x80c2…80d6               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0052, t01=0x00ca}
0x80d6…80f8               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0052, t01=0x00de}
0x80f8…8106               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x0100}
0x8106…8110               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x010e}
0x8110…8140               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0052, t01=0x0118}
0x8140…814a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0148}
0x814a…8164               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0052, t01=0x0152}
0x8164…8178               Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0052, t01=0x016c}
0x8178…818c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0052, t01=0x0180}
0x818c…81a0 (83, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x0053, t01=0x0004}
0x81a0…81d2               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x0053, t01=0x0018}
0x81d2…81de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x004a}
0x81de…820a               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0053, t01=0x0056}
0x820a…821e               Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x0053, t01=0x0082}
0x821e…823c               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0053, t01=0x0096}
0x823c…8250               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0053, t01=0x00b4}
0x8250…8258               Head {h00=0x0004, h01=0x0050, t00=0x0053, t01=0x00c8}
0x8258…827a               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0053, t01=0x00d0}
0x827a…8286               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x00f2}
0x8286…8298               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0053, t01=0x00fe}
0x8298…82ac               Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x0053, t01=0x0110}
0x82ac…82be               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0053, t01=0x0124}
0x82be…82e8               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0053, t01=0x0136}
0x82e8…82fc               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0053, t01=0x0160}
0x82fc…8310               Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x0053, t01=0x0174}
0x8310…8328               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =4«, t00=0x0053, t01=0x0188}
0x8328…8340               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x0054, t01=0x0010}
0x8340…8352               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0054, t01=0x0028}
0x8352…836a               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =4«, t00=0x0054, t01=0x003a}
0x836a…8382               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI  =4 «, t00=0x0054, t01=0x0052}
0x8382…8394               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0054, t01=0x006a}
0x8394…83c0               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x0054, t01=0x007c}
0x83c0…83e6               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x0054, t01=0x00a8}
0x83e6…83fa               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0054, t01=0x00ce}
0x83fa…8422               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x0054, t01=0x00e2}
0x8422…843c               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0054, t01=0x010a}
0x843c…844e               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0054, t01=0x0124}
0x844e…8462               Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x0054, t01=0x0136}
0x8462…847c               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0054, t01=0x014a}
0x847c…848e               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0054, t01=0x0164}
0x848e…84a2               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0054, t01=0x0176}
0x84a2…84b0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0054, t01=0x018a}
0x84b0…84ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0008}
0x84ba…84c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0012}
0x84c4…84ea               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x0055, t01=0x001c}
0x84ea…84f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0042}
0x84f4…84fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x004c}
0x84fe…8512               Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x0055, t01=0x0056}
0x8512…8538               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x0055, t01=0x006a}
0x8538…8568               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x0055, t01=0x0090}
0x8568…858c               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x0055, t01=0x00c0}
0x858c…85b2               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x0055, t01=0x00e4}
0x85b2…85d4               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0055, t01=0x010a}
0x85d4…85e6               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0055, t01=0x012c}
0x85e6…8602               Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x0055, t01=0x013e}
0x8602…8618               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x0055, t01=0x015a}
0x8618…863e               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x0055, t01=0x0170}
0x863e…8650               Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x0056, t01=0x0008}
0x8650…865c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x001a}
0x865c…866a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0056, t01=0x0026}
0x866a…8674               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0034}
0x8674…867e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x003e}
0x867e…86a0               Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x0056, t01=0x0048}
0x86a0…86aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x006a}
0x86aa…86b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0074}
0x86b4…86c8               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x0056, t01=0x007e}
0x86c8…86e0               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =2 «, t00=0x0056, t01=0x0092}
0x86e0…870e               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) POL010 ERROR. ACK EXPECTED =2 «, t00=0x0056, t01=0x00aa}
0x870e…8722               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0056, t01=0x00d8}
0x8722…8744               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0056, t01=0x00ec}
0x8744…8756               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0056, t01=0x010e}
0x8756…8768               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0056, t01=0x0120}
0x8768…8790               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x0056, t01=0x0132}
0x8790…87ae               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x0056, t01=0x015a}
0x87ae…87ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x0178}
0x87ba…87ce               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0056, t01=0x0184}
0x87ce…87e0               Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x0057, t01=0x0008}
0x87e0…87ec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x001a}
0x87ec…8800               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x0057, t01=0x0026}
0x8800…8810               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0057, t01=0x003a}
0x8810…8824               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x0057, t01=0x004a}
0x8824…883e               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x0057, t01=0x005e}
0x883e…8850               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0057, t01=0x0078}
0x8850…886c               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x0057, t01=0x008a}
0x886c…8878               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x00a6}
0x8878…8892               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x0057, t01=0x00b2}
0x8892…88a4               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0057, t01=0x00cc}
0x88a4…88ca               Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x0057, t01=0x00de}
0x88ca…88ee               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x0057, t01=0x0104}
0x88ee…88fe               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0057, t01=0x0128}
0x88fe…8912               Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x0057, t01=0x0138}
0x8912…891e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x014c}
0x891e…8934               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0057, t01=0x0158}
0x8934…895c               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x0057, t01=0x016e}
0x895c…8970               Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x0058, t01=0x0008}
0x8970…898a               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x0058, t01=0x001c}
0x898a…89aa               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x0058, t01=0x0036}
0x89aa…89b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0056}
0x89b6…89c8               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x0058, t01=0x0062}
0x89c8…89dc               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x0058, t01=0x0074}
0x89dc…8a0c               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0058, t01=0x0088}
0x8a0c…8a2c               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x0058, t01=0x00b8}
0x8a2c…8a3e               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x0058, t01=0x00d8}
0x8a3e…8a4c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0058, t01=0x00ea}
0x8a4c…8a56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00f8}
0x8a56…8a60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0102}
0x8a60…8a84               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x0058, t01=0x010c}
0x8a84…8a8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0130}
0x8a8e…8a98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x013a}
0x8a98…8aac               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x0058, t01=0x0144}
0x8aac…8acc               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x0058, t01=0x0158}
0x8acc…8af0               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x0058, t01=0x0178}
0x8af0…8b04               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0059, t01=0x000c}
0x8b04…8b36               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x0059, t01=0x0020}
0x8b36…8b42               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x0052}
0x8b42…8b6a               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x0059, t01=0x005e}
0x8b6a…8b7a               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x0059, t01=0x0086}
0x8b7a…8ba0               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x0059, t01=0x0096}
0x8ba0…8bb0               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0059, t01=0x00bc}
0x8bb0…8bbe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0059, t01=0x00cc}
0x8bbe…8bc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00da}
0x8bc8…8bd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00e4}
0x8bd2…8bfa               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x0059, t01=0x00ee}
0x8bfa…8c04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0116}
0x8c04…8c0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0120}
0x8c0e…8c22               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x0059, t01=0x012a}
0x8c22…8c3a               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =2 «, t00=0x0059, t01=0x013e}
0x8c3a…8c64               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL020 ACK NOT EXPECTED =2 «, t00=0x0059, t01=0x0156}
0x8c64…8c8a               Head {h00=0x0022, h01=0x0050, text=»POL010 CF A5,TRENQ SEND ENQ =2«, t00=0x0059, t01=0x0180}
0x8c8a…8cb8               Head {h00=0x002a, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER =2 «, t00=0x005a, t01=0x0016}
0x8cb8…8cde               Head {h00=0x0022, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE =2 «, t00=0x005a, t01=0x0044}
0x8cde…8cf6               Head {h00=0x0014, h01=0x0050, text=»POL020 EQU *  =2«, t00=0x005a, t01=0x006a}
0x8cf6…8d1c               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x005a, t01=0x0082}
0x8d1c…8d30               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005a, t01=0x00a8}
0x8d30…8d46               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x005a, t01=0x00bc}
0x8d46…8d70               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x005a, t01=0x00d2}
0x8d70…8d96               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x005a, t01=0x00fc}
0x8d96…8daa               Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x005a, t01=0x0122}
0x8daa…8dca               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x005a, t01=0x0136}
0x8dca…8df4               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005a, t01=0x0156}
0x8df4…8e18               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005a, t01=0x0180}
0x8e18…8e24               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0014}
0x8e24…8e38               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005b, t01=0x0020}
0x8e38…8e4a               Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x005b, t01=0x0034}
0x8e4a…8e56               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0046}
0x8e56…8e6a               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x005b, t01=0x0052}
0x8e6a…8e7a               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005b, t01=0x0066}
0x8e7a…8e8e               Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x005b, t01=0x0076}
0x8e8e…8ea2               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x005b, t01=0x008a}
0x8ea2…8ec8               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x005b, t01=0x009e}
0x8ec8…8edc               Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x005b, t01=0x00c4}
0x8edc…8efa               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x005b, t01=0x00d8}
0x8efa…8f0c               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005b, t01=0x00f6}
0x8f0c…8f20               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x005b, t01=0x0108}
0x8f20…8f46               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x005b, t01=0x011c}
0x8f46…8f5a               Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x005b, t01=0x0142}
0x8f5a…8f82               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x005b, t01=0x0156}
0x8f82…8f98               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x005b, t01=0x017e}
0x8f98…8fae (92, 0, 398)  Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x005c, t01=0x0004}
0x8fae…8fc0               Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x005c, t01=0x001a}
0x8fc0…8fd4               Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x005c, t01=0x002c}
0x8fd4…8ff8               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x005c, t01=0x0040}
0x8ff8…9016               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x005c, t01=0x0064}
0x9016…9040               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x005c, t01=0x0082}
0x9040…9062               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x005c, t01=0x00ac}
0x9062…9076               Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x005c, t01=0x00ce}
0x9076…90a0               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x005c, t01=0x00e2}
0x90a0…90cc               Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x005c, t01=0x010c}
0x90cc…90ee               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x005c, t01=0x0138}
0x90ee…9112               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005c, t01=0x015a}
0x9112…9126               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x005c, t01=0x017e}
0x9126…9148 (93, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x005d, t01=0x0004}
0x9148…9158               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x005d, t01=0x0026}
0x9158…917c               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x005d, t01=0x0036}
0x917c…91a6               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005d, t01=0x005a}
0x91a6…91ca               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005d, t01=0x0084}
0x91ca…91dc               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005d, t01=0x00a8}
0x91dc…91ea               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005d, t01=0x00ba}
0x91ea…91f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00c8}
0x91f4…91fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00d2}
0x91fe…9228               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x005d, t01=0x00dc}
0x9228…9232               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0106}
0x9232…923c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0110}
0x923c…9250               Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x005d, t01=0x011a}
0x9250…926a               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x005d, t01=0x012e}
0x926a…9282               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =2 «, t00=0x005d, t01=0x0148}
0x9282…92a8               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL010 ACK EXPECTED =2«, t00=0x005d, t01=0x0160}
0x92a8…92c2               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x005d, t01=0x0186}
0x92c2…92e6               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x005e, t01=0x0010}
0x92e6…9304               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x005e, t01=0x0034}
0x9304…9318               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x005e, t01=0x0052}
0x9318…933a               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005e, t01=0x0066}
0x933a…934c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x005e, t01=0x0088}
0x934c…9372               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x005e, t01=0x009a}
0x9372…937e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x00c0}
0x937e…9398               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x005e, t01=0x00cc}
0x9398…93b0               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x005e, t01=0x00e6}
0x93b0…93d0               Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x005e, t01=0x00fe}
0x93d0…93f2               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x005e, t01=0x011e}
0x93f2…9404               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x005e, t01=0x0140}
0x9404…9428               Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x005e, t01=0x0152}
0x9428…943a               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x005e, t01=0x0176}
0x943a…9460               Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x005e, t01=0x0188}
0x9460…946c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x001e}
0x946c…9488               Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x005f, t01=0x002a}
0x9488…9496               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x0046}
0x9496…94a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0054}
0x94a0…94aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x005e}
0x94aa…94e6               Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x005f, t01=0x0068}
0x94e6…94f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00a4}
0x94f0…9512               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x005f, t01=0x00ae}
0x9512…951c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00d0}
0x951c…9526               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00da}
0x9526…9542               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x005f, t01=0x00e4}
0x9542…956a               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x005f, t01=0x0100}
0x956a…9582               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x005f, t01=0x0128}
0x9582…95a2               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x005f, t01=0x0140}
0x95a2…95c4               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x005f, t01=0x0160}
0x95c4…95d6               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x005f, t01=0x0182}
0x95d6…95fa (96, 0, 400)  Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x0060, t01=0x0004}
0x95fa…960c               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0060, t01=0x0028}
0x960c…9638               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x0060, t01=0x003a}
0x9638…964a               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0060, t01=0x0066}
0x964a…9680               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x0060, t01=0x0078}
0x9680…96a0               Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x0060, t01=0x00ae}
0x96a0…96cc               Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x0060, t01=0x00ce}
0x96cc…96de               Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x0060, t01=0x00fa}
0x96de…9708               Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x0060, t01=0x010c}
0x9708…972a               Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x0060, t01=0x0136}
0x972a…973c               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0060, t01=0x0158}
0x973c…9752               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x0060, t01=0x016a}
0x9752…976a               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0060, t01=0x0180}
0x976a…9792               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0061, t01=0x0008}
0x9792…97a6               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x0061, t01=0x0030}
0x97a6…97d4               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0061, t01=0x0044}
0x97d4…97e8               Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x0061, t01=0x0072}
0x97e8…97fc               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0061, t01=0x0086}
0x97fc…9824               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0061, t01=0x009a}
0x9824…9852               Head {h00=0x002a, h01=0x0050, text=» CF A15,RTBUF RELEASE TRANSMIT BUFFER «, t00=0x0061, t01=0x00c2}
0x9852…987e               Head {h00=0x0028, h01=0x0050, text=» CF A15,CKGBQ CHECK GET BUFFER QUEUE«, t00=0x0061, t01=0x00f0}
0x987e…988a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x011c}
0x988a…989e               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x0061, t01=0x0128}
0x989e…98c4               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0061, t01=0x013c}
0x98c4…98d6               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0061, t01=0x0162}
0x98d6…98e6               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0061, t01=0x0174}
0x98e6…98f4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0061, t01=0x0184}
0x98f4…98fe (98, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0004}
0x98fe…9908               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x000e}
0x9908…9926               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x0062, t01=0x0018}
0x9926…9930               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0036}
0x9930…9950               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x0062, t01=0x0040}
0x9950…997c               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x0062, t01=0x0060}
0x997c…99b2               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x0062, t01=0x008c}
0x99b2…99de               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x0062, t01=0x00c2}
0x99de…99e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x00ee}
0x99e8…99fc               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x0062, t01=0x00f8}
0x99fc…9a24               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0062, t01=0x010c}
0x9a24…9a44               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x0062, t01=0x0134}
0x9a44…9a56               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0062, t01=0x0154}
0x9a56…9a6a               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0062, t01=0x0166}
0x9a6a…9a92               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x0062, t01=0x017a}
0x9a92…9ab8               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x0063, t01=0x0012}
0x9ab8…9aca               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x0063, t01=0x0038}
0x9aca…9ade               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0063, t01=0x004a}
0x9ade…9af2               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x0063, t01=0x005e}
0x9af2…9b16               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0063, t01=0x0072}
0x9b16…9b42               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0063, t01=0x0096}
0x9b42…9b56               Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x0063, t01=0x00c2}
0x9b56…9b66               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0063, t01=0x00d6}
0x9b66…9b82               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0063, t01=0x00e6}
0x9b82…9b8a               Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x0102}
0x9b8a…9ba0               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0063, t01=0x010a}
0x9ba0…9bb4               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0063, t01=0x0120}
0x9bb4…9bda               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x0063, t01=0x0134}
0x9bda…9bee               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0063, t01=0x015a}
0x9bee…9c12               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0063, t01=0x016e}
0x9c12…9c26 (100, 0, 398) Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x0064, t01=0x0004}
0x9c26…9c3c               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x0064, t01=0x0018}
0x9c3c…9c6a               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x0064, t01=0x002e}
0x9c6a…9c7e               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0064, t01=0x005c}
0x9c7e…9c8a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0064, t01=0x0070}
0x9c8a…9c9e               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x0064, t01=0x007c}
0x9c9e…9cc6               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0064, t01=0x0090}
0x9cc6…9cea               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0064, t01=0x00b8}
0x9cea…9cfe               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x0064, t01=0x00dc}
0x9cfe…9d12               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x0064, t01=0x00f0}
0x9d12…9d34               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x0064, t01=0x0104}
0x9d34…9d48               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x0064, t01=0x0126}
0x9d48…9d6a               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x0064, t01=0x013a}
0x9d6a…9d7e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x0064, t01=0x015c}
0x9d7e…9da0               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x0064, t01=0x0170}
0x9da0…9db4 (101, 0, 400) Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x0065, t01=0x0004}
0x9db4…9de0               Head {h00=0x0028, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ IN TEXT =1«, t00=0x0065, t01=0x0018}
0x9de0…9df4               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0065, t01=0x0044}
0x9df4…9e1c               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x0065, t01=0x0058}
0x9e1c…9e24               Head {h00=0x0004, h01=0x0050, t00=0x0065, t01=0x0080}
0x9e24…9e38               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0065, t01=0x0088}
0x9e38…9e4e               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x0065, t01=0x009c}
0x9e4e…9e56               Head {h00=0x0004, h01=0x0050, t00=0x0065, t01=0x00b2}
0x9e56…9e68               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0065, t01=0x00ba}
0x9e68…9e7e               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x0065, t01=0x00cc}
0x9e7e…9ea0               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x0065, t01=0x00e2}
0x9ea0…9eb2               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x0065, t01=0x0104}
0x9eb2…9ed4               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x0065, t01=0x0116}
0x9ed4…9ee6               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x0065, t01=0x0138}
0x9ee6…9ef8               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0065, t01=0x014a}
0x9ef8…9f26               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x0065, t01=0x015c}
0x9f26…9f4a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0065, t01=0x018a}
0x9f4a…9f78               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x0066, t01=0x001e}
0x9f78…9f8a               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x0066, t01=0x004c}
0x9f8a…9f9e               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x0066, t01=0x005e}
0x9f9e…9faa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x0072}
0x9faa…9fb2               Head {h00=0x0004, h01=0x0050, t00=0x0066, t01=0x007e}
0x9fb2…9fd4               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x0066, t01=0x0086}
0x9fd4…9ff8               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0066, t01=0x00a8}
0x9ff8…a020               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x0066, t01=0x00cc}
0xa020…a034               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0066, t01=0x00f4}
0xa034…a050               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x0066, t01=0x0108}
0xa050…a074               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x0066, t01=0x0124}
0xa074…a07e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0148}
0xa07e…a098               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x0066, t01=0x0152}
0xa098…a0a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x016c}
0xa0a2…a0c0               Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x0066, t01=0x0176}
0xa0c0…a0d4 (103, 0, 400) Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x0067, t01=0x0004}
0xa0d4…a0fe               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x0067, t01=0x0018}
0xa0fe…a112               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0067, t01=0x0042}
0xa112…a13a               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x0067, t01=0x0056}
0xa13a…a14c               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0067, t01=0x007e}
0xa14c…a156               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0090}
0xa156…a16c               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x0067, t01=0x009a}
0xa16c…a176               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00b0}
0xa176…a18a               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x0067, t01=0x00ba}
0xa18a…a1b2               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x0067, t01=0x00ce}
0xa1b2…a1d6               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x0067, t01=0x00f6}
0xa1d6…a20c               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x0067, t01=0x011a}
0xa20c…a220               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0067, t01=0x0150}
0xa220…a234               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0067, t01=0x0164}
0xa234…a254               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x0067, t01=0x0178}
0xa254…a260               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0068, t01=0x0008}
0xa260…a274               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0068, t01=0x0014}
0xa274…a29e               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x0068, t01=0x0028}
0xa29e…a2be               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x0068, t01=0x0052}
0xa2be…a2ca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0068, t01=0x0072}
0xa2ca…a2de               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x0068, t01=0x007e}
0xa2de…a308               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x0068, t01=0x0092}
0xa308…a31c               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x0068, t01=0x00bc}
0xa31c…a344               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x0068, t01=0x00d0}
0xa344…a364               Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x0068, t01=0x00f8}
0xa364…a378               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0068, t01=0x0118}
0xa378…a39e               Head {h00=0x0022, h01=0x0050, text=» ORR A7,A1 PARITY ERROR SALCUZ«, t00=0x0068, t01=0x012c}
0xa39e…a3b4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0068, t01=0x0152}
0xa3b4…a3c4               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0068, t01=0x0168}
0xa3c4…a3ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0178}
0xa3ce…a3e4               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x0068, t01=0x0182}
0xa3e4…a3ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0008}
0xa3ee…a402               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x0069, t01=0x0012}
0xa402…a414               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0069, t01=0x0026}
0xa414…a43a               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x0069, t01=0x0038}
0xa43a…a460               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x0069, t01=0x005e}
0xa460…a472               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x0069, t01=0x0084}
0xa472…a47c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0096}
0xa47c…a492               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x0069, t01=0x00a0}
0xa492…a49c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00b6}
0xa49c…a4b0               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x0069, t01=0x00c0}
0xa4b0…a4c4               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0069, t01=0x00d4}
0xa4c4…a4d8               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0069, t01=0x00e8}
0xa4d8…a4fe               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x0069, t01=0x00fc}
0xa4fe…a50a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0069, t01=0x0122}
0xa50a…a51e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0069, t01=0x012e}
0xa51e…a548               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x0069, t01=0x0142}
0xa548…a56e               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x0069, t01=0x016c}
0xa56e…a57a (106, 0, 398) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006a, t01=0x0004}
0xa57a…a58c               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006a, t01=0x0010}
0xa58c…a59a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006a, t01=0x0022}
0xa59a…a5a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0030}
0xa5a4…a5c2               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x006a, t01=0x003a}
0xa5c2…a5cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0058}
0xa5cc…a5e2               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x006a, t01=0x0062}
0xa5e2…a604               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x006a, t01=0x0078}
0xa604…a62e               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x006a, t01=0x009a}
0xa62e…a644               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x006a, t01=0x00c4}
0xa644…a662               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x006a, t01=0x00da}
0xa662…a674               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006a, t01=0x00f8}
0xa674…a67e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x010a}
0xa67e…a696               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x006a, t01=0x0114}
0xa696…a6a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x012c}
0xa6a0…a6c4               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x006a, t01=0x0136}
0xa6c4…a6d6               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006a, t01=0x015a}
0xa6d6…a6e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x016c}
0xa6e0…a6f6               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x006a, t01=0x0176}
0xa6f6…a700               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x018c}
0xa700…a714               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x006b, t01=0x0008}
0xa714…a736               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x006b, t01=0x001c}
0xa736…a742               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x003e}
0xa742…a74c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x004a}
0xa74c…a762               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x006b, t01=0x0054}
0xa762…a76c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x006a}
0xa76c…a78e               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x006b, t01=0x0074}
0xa78e…a7b4               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x006b, t01=0x0096}
0xa7b4…a7cc               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x006b, t01=0x00bc}
0xa7cc…a7de               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x006b, t01=0x00d4}
0xa7de…a7ec               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006b, t01=0x00e6}
0xa7ec…a7f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00f4}
0xa7f6…a80c               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x006b, t01=0x00fe}
0xa80c…a816               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0114}
0xa816…a838               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x006b, t01=0x011e}
0xa838…a84a               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x006b, t01=0x0140}
0xa84a…a854               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0152}
0xa854…a86a               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x006b, t01=0x015c}
0xa86a…a874               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0172}
0xa874…a896               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x006b, t01=0x017c}
0xa896…a8a8               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x006c, t01=0x000e}
0xa8a8…a8b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0020}
0xa8b2…a8c8               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x006c, t01=0x002a}
0xa8c8…a8d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0040}
0xa8d2…a8f4               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x006c, t01=0x004a}
0xa8f4…a8fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x006c}
0xa8fe…a92a               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x006c, t01=0x0076}
0xa92a…a93e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x006c, t01=0x00a2}
0xa93e…a956               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x006c, t01=0x00b6}
0xa956…a97e               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x006c, t01=0x00ce}
0xa97e…a9a8               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x006c, t01=0x00f6}
0xa9a8…a9c6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x006c, t01=0x0120}
0xa9c6…a9f0               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x006c, t01=0x013e}
0xa9f0…aa0e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x006c, t01=0x0168}
0xaa0e…aa28               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x006c, t01=0x0186}
0xaa28…aa46               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x006d, t01=0x0010}
0xaa46…aa5a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x006d, t01=0x002e}
0xaa5a…aa70               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x006d, t01=0x0042}
0xaa70…aa8a               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x006d, t01=0x0058}
0xaa8a…aab2               Head {h00=0x0024, h01=0x0050, text=» CIO A2,0,LCUUT STOP TRANSMITTER«, t00=0x006d, t01=0x0072}
0xaab2…aace               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x006d, t01=0x009a}
0xaace…aaf6               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ WAIT FOR END SALCUZ «, t00=0x006d, t01=0x00b6}
0xaaf6…ab0c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x006d, t01=0x00de}
0xab0c…ab36               Head {h00=0x0026, h01=0x0050, text=» SST A2,LCUUT PERFORM SST AT ONCE «, t00=0x006d, t01=0x00f4}
0xab36…ab4a               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x006d, t01=0x011e}
0xab4a…ab76               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x006d, t01=0x0132}
0xab76…ab82               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x015e}
0xab82…ab92               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006d, t01=0x016a}
0xab92…aba0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006d, t01=0x017a}
0xaba0…abaa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0188}
0xabaa…abb4 (110, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0004}
0xabb4…abd6               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x006e, t01=0x000e}
0xabd6…abe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0030}
0xabe0…abea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x003a}
0xabea…abfe               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x006e, t01=0x0044}
0xabfe…ac20               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x006e, t01=0x0058}
0xac20…ac36               Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x006e, t01=0x007a}
0xac36…ac40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0090}
0xac40…ac4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x009a}
0xac4a…ac6a               Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x006e, t01=0x00a4}
0xac6a…ac74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00c4}
0xac74…ac7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00ce}
0xac7e…ac92               Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x006e, t01=0x00d8}
0xac92…acbe               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x006e, t01=0x00ec}
0xacbe…acc6               Head {h00=0x0004, h01=0x0050, t00=0x006e, t01=0x0118}
0xacc6…acfc               Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x006e, t01=0x0120}
0xacfc…ad1a               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x006e, t01=0x0156}
0xad1a…ad22               Head {h00=0x0004, h01=0x0050, t00=0x006e, t01=0x0174}
0xad22…ad38               Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x006e, t01=0x017c}
0xad38…ad5e (111, 0, 400) Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x006f, t01=0x0004}
0xad5e…ad72               Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x006f, t01=0x002a}
0xad72…ad9a               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x006f, t01=0x003e}
0xad9a…adae               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x006f, t01=0x0066}
0xadae…adcc               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x006f, t01=0x007a}
0xadcc…ade8               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x006f, t01=0x0098}
0xade8…adfc               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x006f, t01=0x00b4}
0xadfc…ae18               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x006f, t01=0x00c8}
0xae18…ae2c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x006f, t01=0x00e4}
0xae2c…ae48               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x006f, t01=0x00f8}
0xae48…ae5c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x006f, t01=0x0114}
0xae5c…ae7a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x006f, t01=0x0128}
0xae7a…aea6               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x006f, t01=0x0146}
0xaea6…aed2               Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x006f, t01=0x0172}
0xaed2…aef2               Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x0070, t01=0x000e}
0xaef2…af04               Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x0070, t01=0x002e}
0xaf04…af18               Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x0070, t01=0x0040}
0xaf18…af2a               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0070, t01=0x0054}
0xaf2a…af3e               Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x0070, t01=0x0066}
0xaf3e…af48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x007a}
0xaf48…af52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0084}
0xaf52…af5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x008e}
0xaf5c…af68               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x0098}
0xaf68…af7c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0070, t01=0x00a4}
0xaf7c…af9a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0070, t01=0x00b8}
0xaf9a…afb6               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0070, t01=0x00d6}
0xafb6…afde               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0070, t01=0x00f2}
0xafde…b002               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0070, t01=0x011a}
0xb002…b02e               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0070, t01=0x013e}
0xb02e…b05a               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x0070, t01=0x016a}
0xb05a…b084               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x0071, t01=0x0008}
0xb084…b0a8               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x0071, t01=0x0032}
0xb0a8…b0ce               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x0071, t01=0x0056}
0xb0ce…b0ee               Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x0071, t01=0x007c}
0xb0ee…b10c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0071, t01=0x009c}
0xb10c…b128               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0071, t01=0x00ba}
0xb128…b146               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0071, t01=0x00d6}
0xb146…b15c               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0071, t01=0x00f4}
0xb15c…b170               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x0071, t01=0x010a}
0xb170…b196               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x0071, t01=0x011e}
0xb196…b1ac               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0071, t01=0x0144}
0xb1ac…b1d2               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x0071, t01=0x015a}
0xb1d2…b1e8               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0071, t01=0x0180}
0xb1e8…b1fc               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x0072, t01=0x0008}
0xb1fc…b212               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0072, t01=0x001c}
0xb212…b21e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x0032}
0xb21e…b232               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0072, t01=0x003e}
0xb232…b23a               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x0052}
0xb23a…b264               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0072, t01=0x005a}
0xb264…b27e               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x0072, t01=0x0084}
0xb27e…b286               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x009e}
0xb286…b2a6               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x0072, t01=0x00a6}
0xb2a6…b2cc               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x0072, t01=0x00c6}
0xb2cc…b2f0               Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x0072, t01=0x00ec}
0xb2f0…b2f8               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x0110}
0xb2f8…b320               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x0072, t01=0x0118}
0xb320…b352               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x0072, t01=0x0140}
0xb352…b374               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x0072, t01=0x0172}
0xb374…b386 (115, 0, 400) Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0073, t01=0x0004}
0xb386…b39a               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x0073, t01=0x0016}
0xb39a…b3a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x002a}
0xb3a6…b3ae               Head {h00=0x0004, h01=0x0050, t00=0x0073, t01=0x0036}
0xb3ae…b3c0               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0073, t01=0x003e}
0xb3c0…b3d4               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x0073, t01=0x0050}
0xb3d4…b3f8               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x0073, t01=0x0064}
0xb3f8…b41c               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0073, t01=0x0088}
0xb41c…b430               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0073, t01=0x00ac}
0xb430…b444               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0073, t01=0x00c0}
0xb444…b46e               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0073, t01=0x00d4}
0xb46e…b488               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x0073, t01=0x00fe}
0xb488…b490               Head {h00=0x0004, h01=0x0050, t00=0x0073, t01=0x0118}
0xb490…b4d4               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0073, t01=0x0120}
0xb4d4…b4de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0164}
0xb4de…b50e               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x0073, t01=0x016e}
0xb50e…b518               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x000e}
0xb518…b550               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0074, t01=0x0018}
0xb550…b558               Head {h00=0x0004, h01=0x0050, t00=0x0074, t01=0x0050}
0xb558…b582               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x0074, t01=0x0058}
0xb582…b59e               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x0074, t01=0x0082}
0xb59e…b5aa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x009e}
0xb5aa…b5be               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x0074, t01=0x00aa}
0xb5be…b5de               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x0074, t01=0x00be}
0xb5de…b604               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x0074, t01=0x00de}
0xb604…b618               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x0074, t01=0x0104}
0xb618…b62c               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x0074, t01=0x0118}
0xb62c…b650               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x0074, t01=0x012c}
0xb650…b676               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x0074, t01=0x0150}
0xb676…b68a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x0074, t01=0x0176}
0xb68a…b69e               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x0074, t01=0x018a}
0xb69e…b6bc               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x0075, t01=0x000e}
0xb6bc…b6d2               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x0075, t01=0x002c}
0xb6d2…b6e4               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0075, t01=0x0042}
0xb6e4…b6f0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x0054}
0xb6f0…b704               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0075, t01=0x0060}
0xb704…b716               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x0075, t01=0x0074}
0xb716…b71e               Head {h00=0x0004, h01=0x0050, t00=0x0075, t01=0x0086}
0xb71e…b732               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x0075, t01=0x008e}
0xb732…b73a               Head {h00=0x0004, h01=0x0050, t00=0x0075, t01=0x00a2}
0xb73a…b74c               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x0075, t01=0x00aa}
0xb74c…b772               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x0075, t01=0x00bc}
0xb772…b77a               Head {h00=0x0004, h01=0x0050, t00=0x0075, t01=0x00e2}
0xb77a…b7a6               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x0075, t01=0x00ea}
0xb7a6…b7bc               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x0075, t01=0x0116}
0xb7bc…b7e8               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x0075, t01=0x012c}
0xb7e8…b7fa               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0075, t01=0x0158}
0xb7fa…b812               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x0075, t01=0x016a}
0xb812…b824               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0075, t01=0x0182}
0xb824…b84e (118, 0, 400) Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x0076, t01=0x0004}
0xb84e…b874               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x0076, t01=0x002e}
0xb874…b88c               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x0076, t01=0x0054}
0xb88c…b8b6               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x0076, t01=0x006c}
0xb8b6…b8cc               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x0076, t01=0x0096}
0xb8cc…b8e0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x0076, t01=0x00ac}
0xb8e0…b8f4               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x0076, t01=0x00c0}
0xb8f4…b918               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x0076, t01=0x00d4}
0xb918…b92a               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0076, t01=0x00f8}
0xb92a…b93c               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x0076, t01=0x010a}
0xb93c…b950               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x0076, t01=0x011c}
0xb950…b95c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x0130}
0xb95c…b96a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0076, t01=0x013c}
0xb96a…b97e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x0076, t01=0x014a}
0xb97e…b9aa               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x0076, t01=0x015e}
0xb9aa…b9ce               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x0076, t01=0x018a}
0xb9ce…b9e2               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x0077, t01=0x001e}
0xb9e2…ba0a               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x0077, t01=0x0032}
0xba0a…ba34               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x0077, t01=0x005a}
0xba34…ba48               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x0077, t01=0x0084}
0xba48…ba6e               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x0077, t01=0x0098}
0xba6e…ba9c               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x0077, t01=0x00be}
0xba9c…bab2               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x0077, t01=0x00ec}
0xbab2…bad6               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x0077, t01=0x0102}
0xbad6…baea               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0077, t01=0x0126}
0xbaea…bb1a               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x0077, t01=0x013a}
0xbb1a…bb2e               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x0077, t01=0x016a}
0xbb2e…bb48               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x0077, t01=0x017e}
0xbb48…bb5c               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x0078, t01=0x0008}
0xbb5c…bb7e               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x0078, t01=0x001c}
0xbb7e…bbaa               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x0078, t01=0x003e}
0xbbaa…bbcc               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x0078, t01=0x006a}
0xbbcc…bbea               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0078, t01=0x008c}
0xbbea…bc0a               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x0078, t01=0x00aa}
0xbc0a…bc3c               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x0078, t01=0x00ca}
0xbc3c…bc5a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0078, t01=0x00fc}
0xbc5a…bc7a               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x0078, t01=0x011a}
0xbc7a…bc86               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x013a}
0xbc86…bc9a               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x0078, t01=0x0146}
0xbc9a…bcb6               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x0078, t01=0x015a}
0xbcb6…bcca               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x0078, t01=0x0176}
0xbcca…bce8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0078, t01=0x018a}
0xbce8…bcfc               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0079, t01=0x0018}
0xbcfc…bd16               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x0079, t01=0x002c}
0xbd16…bd34               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x0079, t01=0x0046}
0xbd34…bd40               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0064}
0xbd40…bd54               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0079, t01=0x0070}
0xbd54…bd78               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x0079, t01=0x0084}
0xbd78…bd8a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0079, t01=0x00a8}
0xbd8a…bd9e               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0079, t01=0x00ba}
0xbd9e…bdc4               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x0079, t01=0x00ce}
0xbdc4…bdd6               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x0079, t01=0x00f4}
0xbdd6…bdea               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0079, t01=0x0106}
0xbdea…be10               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x0079, t01=0x011a}
0xbe10…be1c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0140}
0xbe1c…be3c               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x0079, t01=0x014c}
0xbe3c…be50               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x0079, t01=0x016c}
0xbe50…be74               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x0079, t01=0x0180}
0xbe74…be88               Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x007a, t01=0x0014}
0xbe88…bea4               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x007a, t01=0x0028}
0xbea4…bec8               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x007a, t01=0x0044}
0xbec8…bed6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007a, t01=0x0068}
0xbed6…bee0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0076}
0xbee0…beea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0080}
0xbeea…bf0c               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x007a, t01=0x008a}
0xbf0c…bf16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00ac}
0xbf16…bf20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00b6}
0xbf20…bf34               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x007a, t01=0x00c0}
0xbf34…bf48               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x007a, t01=0x00d4}
0xbf48…bf70               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x007a, t01=0x00e8}
0xbf70…bf8e               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x007a, t01=0x0110}
0xbf8e…bfb0               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x007a, t01=0x012e}
0xbfb0…bfc4               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x007a, t01=0x0150}
0xbfc4…bfe2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x007a, t01=0x0164}
0xbfe2…bffc               Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x007a, t01=0x0182}
0xbffc…c010               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x007b, t01=0x000c}
0xc010…c02e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x007b, t01=0x0020}
0xc02e…c042               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x007b, t01=0x003e}
0xc042…c060               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x007b, t01=0x0052}
0xc060…c074               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x007b, t01=0x0070}
0xc074…c092               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x007b, t01=0x0084}
0xc092…c0aa               Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x007b, t01=0x00a2}
0xc0aa…c0c8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x007b, t01=0x00ba}
0xc0c8…c0dc               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x007b, t01=0x00d8}
0xc0dc…c0fa               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x007b, t01=0x00ec}
0xc0fa…c11c               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x007b, t01=0x010a}
0xc11c…c13e               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x007b, t01=0x012c}
0xc13e…c150               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x007b, t01=0x014e}
0xc150…c178               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x007b, t01=0x0160}
0xc178…c198               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x007b, t01=0x0188}
0xc198…c1ba               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x007c, t01=0x0018}
0xc1ba…c1dc               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x007c, t01=0x003a}
0xc1dc…c1ee               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x007c, t01=0x005c}
0xc1ee…c20c               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x007c, t01=0x006e}
0xc20c…c21e               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x007c, t01=0x008c}
0xc21e…c240               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x007c, t01=0x009e}
0xc240…c252               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x007c, t01=0x00c0}
0xc252…c266               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x007c, t01=0x00d2}
0xc266…c286               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x007c, t01=0x00e6}
0xc286…c2aa               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x007c, t01=0x0106}
0xc2aa…c2b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x012a}
0xc2b6…c2c4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007c, t01=0x0136}
0xc2c4…c2ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0144}
0xc2ce…c2d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x014e}
0xc2d8…c2f8               Head {h00=0x001c, h01=0x0050, text=»* TRANSMIT SYNC SEQUENCE«, t00=0x007c, t01=0x0158}
0xc2f8…c302               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0178}
0xc302…c30c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0182}
0xc30c…c320               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x007c, t01=0x018c}
0xc320…c33a               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x007d, t01=0x0010}
0xc33a…c368               Head {h00=0x002a, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT IF NOT DONE«, t00=0x007d, t01=0x002a}
0xc368…c38a               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN PERFORM SST «, t00=0x007d, t01=0x0058}
0xc38a…c3a6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x007d, t01=0x007a}
0xc3a6…c3d0               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x007d, t01=0x0096}
0xc3d0…c3e6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007d, t01=0x00c0}
0xc3e6…c402               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x007d, t01=0x00d6}
0xc402…c41e               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=1  SALCUZ «, t00=0x007d, t01=0x00f2}
0xc41e…c438               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x007d, t01=0x010e}
0xc438…c468               Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER SALCUZ«, t00=0x007d, t01=0x0128}
0xc468…c486               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x007d, t01=0x0158}
0xc486…c4a4               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x007d, t01=0x0176}
0xc4a4…c4c2 (126, 0, 398) Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x007e, t01=0x0004}
0xc4c2…c4da               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x007e, t01=0x0022}
0xc4da…c500               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x007e, t01=0x003a}
0xc500…c51c               Head {h00=0x0018, h01=0x0050, text=»TRS010 EQU *  SALCUZ«, t00=0x007e, t01=0x0060}
0xc51c…c53a               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x007e, t01=0x007c}
0xc53a…c570               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x007e, t01=0x009a}
0xc570…c586               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007e, t01=0x00d0}
0xc586…c5a2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x007e, t01=0x00e6}
0xc5a2…c5be               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=0  SALCUZ «, t00=0x007e, t01=0x0102}
0xc5be…c5da               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x007e, t01=0x011e}
0xc5da…c5fa               Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,LCUUT  SALCUZ «, t00=0x007e, t01=0x013a}
0xc5fa…c618               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x007e, t01=0x015a}
0xc618…c636               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x007e, t01=0x0178}
0xc636…c654               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x007f, t01=0x0008}
0xc654…c66c               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x007f, t01=0x0026}
0xc66c…c692               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x007f, t01=0x003e}
0xc692…c6a6               Head {h00=0x0010, h01=0x0050, text=»TRS010 EQU *«, t00=0x007f, t01=0x0064}
0xc6a6…c6c2               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x007f, t01=0x0078}
0xc6c2…c6f8               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x007f, t01=0x0094}
0xc6f8…c70e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007f, t01=0x00ca}
0xc70e…c73c               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x007f, t01=0x00e0}
0xc73c…c754               Head {h00=0x0014, h01=0x0050, text=» LDK A3,4 4 SYNS«, t00=0x007f, t01=0x010e}
0xc754…c76e               Head {h00=0x0016, h01=0x0050, text=»TRS100 LDK A2,SYN «, t00=0x007f, t01=0x0126}
0xc76e…c78c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SYN «, t00=0x007f, t01=0x0140}
0xc78c…c79e               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x007f, t01=0x015e}
0xc79e…c7b4               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x007f, t01=0x0170}
0xc7b4…c7c4               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007f, t01=0x0186}
0xc7c4…c7d2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0080, t01=0x0008}
0xc7d2…c7dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0016}
0xc7dc…c7e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0020}
0xc7e6…c804               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x0080, t01=0x002a}
0xc804…c80e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0048}
0xc80e…c818               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0052}
0xc818…c82c               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x0080, t01=0x005c}
0xc82c…c840               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0080, t01=0x0070}
0xc840…c860               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0080, t01=0x0084}
0xc860…c88e               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0080, t01=0x00a4}
0xc88e…c8b0               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x0080, t01=0x00d2}
0xc8b0…c8e0               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x0080, t01=0x00f4}
0xc8e0…c8f4               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0080, t01=0x0124}
0xc8f4…c920               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x0080, t01=0x0138}
0xc920…c92c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x0164}
0xc92c…c940               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0080, t01=0x0170}
0xc940…c952               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0080, t01=0x0184}
0xc952…c968               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHLCI2«, t00=0x0081, t01=0x0008}
0xc968…c986               Head {h00=0x001a, h01=0x0050, text=» CWK A2,SYN SKIP SYNS «, t00=0x0081, t01=0x001e}
0xc986…c99a               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x0081, t01=0x003c}
0xc99a…c9c0               Head {h00=0x0022, h01=0x0050, text=»IHLCI2 XRR A7,A2 CALCULATE LRC«, t00=0x0081, t01=0x0050}
0xc9c0…c9cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x0076}
0xc9cc…c9e0               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0081, t01=0x0082}
0xc9e0…c9f2               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0081, t01=0x0096}
0xc9f2…ca28               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME «, t00=0x0081, t01=0x00a8}
0xca28…ca3e               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x0081, t01=0x00de}
0xca3e…ca62               Head {h00=0x0020, h01=0x0050, text=» RF(E) READ SKIP EBCDIC SYN «, t00=0x0081, t01=0x00f4}
0xca62…ca76               Head {h00=0x0010, h01=0x0050, text=»IHLCI1 EQU *«, t00=0x0081, t01=0x0118}
0xca76…ca9a               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x0081, t01=0x012c}
0xca9a…cac6               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0081, t01=0x0150}
0xcac6…cad2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x017c}
0xcad2…cae8               Head {h00=0x0012, h01=0x0050, text=»IHIN10 RTN A5 «, t00=0x0081, t01=0x0188}
0xcae8…cb04               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0082, t01=0x000e}
0xcb04…cb28               Head {h00=0x0020, h01=0x0050, text=»IHIN20 CF A5,SST PERFORM SST«, t00=0x0082, t01=0x002a}
0xcb28…cb38               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0082, t01=0x004e}
0xcb38…cb4e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0082, t01=0x005e}
0xcb4e…cb6a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0082, t01=0x0074}
0xcb6a…cb92               Head {h00=0x0024, h01=0x0050, text=»IHIN20 RF SST PERFORM SST SALCUZ«, t00=0x0082, t01=0x0090}
0xcb92…cba8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0082, t01=0x00b8}
0xcba8…cbb6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0082, t01=0x00ce}
0xcbb6…cbc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00dc}
0xcbc0…cbca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00e6}
0xcbca…cbec               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x0082, t01=0x00f0}
0xcbec…cbf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0112}
0xcbf6…cc00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x011c}
0xcc00…cc14               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x0082, t01=0x0126}
0xcc14…cc28               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0082, t01=0x013a}
0xcc28…cc4a               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0082, t01=0x014e}
0xcc4a…cc78               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0082, t01=0x0170}
0xcc78…cc8a               Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x0083, t01=0x000e}
0xcc8a…cc98               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0083, t01=0x0020}
0xcc98…cca2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x002e}
0xcca2…ccac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0038}
0xccac…ccd6               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x0083, t01=0x0042}
0xccd6…cce0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x006c}
0xcce0…cd0c               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x0083, t01=0x0076}
0xcd0c…cd3e               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x0083, t01=0x00a2}
0xcd3e…cd6e               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x0083, t01=0x00d4}
0xcd6e…cd9e               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x0083, t01=0x0104}
0xcd9e…cda8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0134}
0xcda8…cdc0               Head {h00=0x0014, h01=0x0050, text=»SST SST A1,LCUIN«, t00=0x0083, t01=0x013e}
0xcdc0…cddc               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0083, t01=0x0156}
0xcddc…ce12               Head {h00=0x0032, h01=0x0050, text=» RF(NA) SST200 ALREADY INACTIVE SALCUZ  SALCUZ«, t00=0x0083, t01=0x0172}
0xce12…ce28               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x0018}
0xce28…ce3a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0084, t01=0x002e}
0xce3a…ce4e               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0084, t01=0x0040}
0xce4e…ce78               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOG SST INFORMATION «, t00=0x0084, t01=0x0054}
0xce78…ce84               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x007e}
0xce84…cea0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0084, t01=0x008a}
0xcea0…ceb2               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0084, t01=0x00a6}
0xceb2…cec8               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x0084, t01=0x00b8}
0xcec8…cede               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x00ce}
0xcede…cefa               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0084, t01=0x00e4}
0xcefa…cf14               Head {h00=0x0016, h01=0x0050, text=» ANK A2,6  SALCUZ «, t00=0x0084, t01=0x0100}
0xcf14…cf32               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST100  SALCUZ «, t00=0x0084, t01=0x011a}
0xcf32…cf4c               Head {h00=0x0016, h01=0x0050, text=» ANK A2,2  SALCUZ «, t00=0x0084, t01=0x0138}
0xcf4c…cf76               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SST050 THROUGH PUT SALCUZ «, t00=0x0084, t01=0x0152}
0xcf76…cfa0               Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 SET PARITY ERROR SALCUZ «, t00=0x0084, t01=0x017c}
0xcfa0…cfba               Head {h00=0x0016, h01=0x0050, text=» RF SSTRET  SALCUZ«, t00=0x0085, t01=0x0016}
0xcfba…cfd0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0085, t01=0x0030}
0xcfd0…cfec               Head {h00=0x0018, h01=0x0050, text=»SST050 EQU *  SALCUZ«, t00=0x0085, t01=0x0046}
0xcfec…d00c               Head {h00=0x001c, h01=0x0050, text=» CM XSTA TROUHHPUT ERROR«, t00=0x0085, t01=0x0062}
0xd00c…d020               Head {h00=0x0010, h01=0x0050, text=» LDKL A5,STB«, t00=0x0085, t01=0x0082}
0xd020…d034               Head {h00=0x0010, h01=0x0050, text=» ABL BRM010 «, t00=0x0085, t01=0x0096}
0xd034…d048               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x0085, t01=0x00aa}
0xd048…d05e               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTCU «, t00=0x0085, t01=0x00be}
0xd05e…d07a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0085, t01=0x00d4}
0xd07a…d0a8               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0085, t01=0x00f0}
0xd0a8…d0b8               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0085, t01=0x011e}
0xd0b8…d0ce               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0085, t01=0x012e}
0xd0ce…d0ea               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0085, t01=0x0144}
0xd0ea…d106               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/21  SALCUZ «, t00=0x0085, t01=0x0160}
0xd106…d124               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST200 LSALCUZ «, t00=0x0085, t01=0x017c}
0xd124…d15e               Head {h00=0x0036, h01=0x0050, text=» CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ«, t00=0x0086, t01=0x000a}
0xd15e…d17e               Head {h00=0x001c, h01=0x0050, text=» DATA BRM RESTART SALCUZ«, t00=0x0086, t01=0x0044}
0xd17e…d19e               Head {h00=0x001c, h01=0x0050, text=» DATA 2 WAIT TIME SALCUZ«, t00=0x0086, t01=0x0064}
0xd19e…d1b6               Head {h00=0x0014, h01=0x0050, text=» RF READ  SALCUZ«, t00=0x0086, t01=0x0084}
0xd1b6…d1c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x009c}
0xd1c0…d1e0               Head {h00=0x001c, h01=0x0050, text=»SST200 LDK A1,0  SALCUZ «, t00=0x0086, t01=0x00a6}
0xd1e0…d200               Head {h00=0x001c, h01=0x0050, text=»SSTRET ADK A5,4  SALCUZ «, t00=0x0086, t01=0x00c6}
0xd200…d220               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 SET CR SALCUZ«, t00=0x0086, t01=0x00e6}
0xd220…d23e               Head {h00=0x001a, h01=0x0050, text=» ABR* A5 RETURN SALCUZ«, t00=0x0086, t01=0x0106}
0xd23e…d254               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0086, t01=0x0124}
0xd254…d25e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x013a}
0xd25e…d268               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0144}
0xd268…d27c               Head {h00=0x0010, h01=0x0050, text=»* HALT INPUT«, t00=0x0086, t01=0x014e}
0xd27c…d286               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0162}
0xd286…d290               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x016c}
0xd290…d2b0               Head {h00=0x001c, h01=0x0050, text=»HALTIN LDK A1,0  SALCUZ «, t00=0x0086, t01=0x0176}
0xd2b0…d2c8               Head {h00=0x0014, h01=0x0050, text=» CIO A1,0,LCUIN «, t00=0x0087, t01=0x0008}
0xd2c8…d2e4               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0087, t01=0x0020}
0xd2e4…d31c               Head {h00=0x0034, h01=0x0050, text=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK«, t00=0x0087, t01=0x003c}
0xd31c…d332               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0087, t01=0x0074}
0xd332…d34e               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0087, t01=0x008a}
0xd34e…d37c               Head {h00=0x002a, h01=0x0050, text=» RF READ WAIT FOR SST INTERRUPT SALCUZ«, t00=0x0087, t01=0x00a6}
0xd37c…d392               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0087, t01=0x00d4}
0xd392…d3a0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0087, t01=0x00ea}
0xd3a0…d3aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00f8}
0xd3aa…d3b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0102}
0xd3b4…d3e4               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x0087, t01=0x010c}
0xd3e4…d3ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x013c}
0xd3ee…d3f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0146}
0xd3f8…d40c               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0087, t01=0x0150}
0xd40c…d420               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0087, t01=0x0164}
0xd420…d434               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0087, t01=0x0178}
0xd434…d448               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0087, t01=0x018c}
0xd448…d47c               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x0088, t01=0x0010}
0xd47c…d4aa               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x0088, t01=0x0044}
0xd4aa…d4b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x0072}
0xd4b6…d4ca               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x0088, t01=0x007e}
0xd4ca…d4f0               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x0088, t01=0x0092}
0xd4f0…d506               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x0088, t01=0x00b8}
0xd506…d528               Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x0088, t01=0x00ce}
0xd528…d53c               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0088, t01=0x00f0}
0xd53c…d564               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x0088, t01=0x0104}
0xd564…d570               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x012c}
0xd570…d584               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0088, t01=0x0138}
0xd584…d5ae               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x0088, t01=0x014c}
0xd5ae…d5ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x0176}
0xd5ba…d5ce               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0088, t01=0x0182}
0xd5ce…d5f8               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x0089, t01=0x0008}
0xd5f8…d604               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x0032}
0xd604…d60e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x003e}
0xd60e…d628               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x0089, t01=0x0048}
0xd628…d63a               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0089, t01=0x0062}
0xd63a…d648               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0089, t01=0x0074}
0xd648…d652               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0082}
0xd652…d65c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x008c}
0xd65c…d66e               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x0089, t01=0x0096}
0xd66e…d678               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00a8}
0xd678…d698               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x0089, t01=0x00b2}
0xd698…d6a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00d2}
0xd6a2…d6ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00dc}
0xd6ac…d6ce               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0089, t01=0x00e6}
0xd6ce…d6e8               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x0089, t01=0x0108}
0xd6e8…d6fa               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0089, t01=0x0122}
0xd6fa…d70e               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x0089, t01=0x0134}
0xd70e…d726               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x0089, t01=0x0148}
0xd726…d73c               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x0089, t01=0x0160}
0xd73c…d756               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x0089, t01=0x0176}
0xd756…d76a               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0089, t01=0x0190}
0xd76a…d77c               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x008a, t01=0x0014}
0xd77c…d788               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x0026}
0xd788…d7aa               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008a, t01=0x0032}
0xd7aa…d7c2               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x008a, t01=0x0054}
0xd7c2…d7ce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x006c}
0xd7ce…d7d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0078}
0xd7d8…d7e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0082}
0xd7e2…d7ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x008c}
0xd7ec…d7fe               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x008a, t01=0x0096}
0xd7fe…d808               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x00a8}
0xd808…d83a               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x008a, t01=0x00b2}
0xd83a…d844               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x00e4}
0xd844…d84e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x00ee}
0xd84e…d866               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x008a, t01=0x00f8}
0xd866…d888               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x008a, t01=0x0110}
0xd888…d89a               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x008a, t01=0x0132}
0xd89a…d8b0               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x008a, t01=0x0144}
0xd8b0…d8c4               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x008a, t01=0x015a}
0xd8c4…d8da               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x008a, t01=0x016e}
0xd8da…d8ee               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x008a, t01=0x0184}
0xd8ee…d900               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x008b, t01=0x0008}
0xd900…d918               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x008b, t01=0x001a}
0xd918…d92c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x008b, t01=0x0032}
0xd92c…d938               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x0046}
0xd938…d95a               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008b, t01=0x0052}
0xd95a…d96e               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x008b, t01=0x0074}
0xd96e…d97a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x0088}
0xd97a…d98c               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x008b, t01=0x0094}
0xd98c…d9a0               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x008b, t01=0x00a6}
0xd9a0…d9b4               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x008b, t01=0x00ba}
0xd9b4…d9c4               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x008b, t01=0x00ce}
0xd9c4…d9ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00de}
0xd9ce…d9d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00e8}
0xd9d8…d9e6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008b, t01=0x00f2}
0xd9e6…d9f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0100}
0xd9f0…da30               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x008b, t01=0x010a}
0xda30…da3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x014a}
0xda3a…da62               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x008b, t01=0x0154}
0xda62…da82               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x008b, t01=0x017c}
0xda82…da98               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x008c, t01=0x000c}
0xda98…dabe               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x008c, t01=0x0022}
0xdabe…dac8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0048}
0xdac8…db0e               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x008c, t01=0x0052}
0xdb0e…db3c               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x008c, t01=0x0098}
0xdb3c…db6c               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x008c, t01=0x00c6}
0xdb6c…db76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x00f6}
0xdb76…dba8               Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x008c, t01=0x0100}
0xdba8…dbb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0132}
0xdbb2…dbbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x013c}
0xdbbc…dbd0               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x008c, t01=0x0146}
0xdbd0…dbe4               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x008c, t01=0x015a}
0xdbe4…dbf8               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x008c, t01=0x016e}
0xdbf8…dc04               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x0182}
0xdc04…dc16               Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x008c, t01=0x018e}
0xdc16…dc2a               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x008d, t01=0x0010}
0xdc2a…dc3e               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x008d, t01=0x0024}
0xdc3e…dc4a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0038}
0xdc4a…dc74               Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x008d, t01=0x0044}
0xdc74…dca2               Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x008d, t01=0x006e}
0xdca2…dcba               Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x008d, t01=0x009c}
0xdcba…dcda               Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x008d, t01=0x00b4}
0xdcda…dcfc               Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x008d, t01=0x00d4}
0xdcfc…dd28               Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x008d, t01=0x00f6}
0xdd28…dd4c               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x008d, t01=0x0122}
0xdd4c…dd60               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x008d, t01=0x0146}
0xdd60…dd88               Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x008d, t01=0x015a}
0xdd88…ddb6               Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x008d, t01=0x0182}
0xddb6…ddc2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x0020}
0xddc2…ddd6               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x008e, t01=0x002c}
0xddd6…de08               Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x008e, t01=0x0040}
0xde08…de14               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x0072}
0xde14…de3e               Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x008e, t01=0x007e}
0xde3e…de56               Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x008e, t01=0x00a8}
0xde56…de6c               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x008e, t01=0x00c0}
0xde6c…de7c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008e, t01=0x00d6}
0xde7c…de8a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008e, t01=0x00e6}
0xde8a…de94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00f4}
0xde94…de9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00fe}
0xde9e…deba               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x008e, t01=0x0108}
0xdeba…dec4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0124}
0xdec4…dece               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x012e}
0xdece…def6               Head {h00=0x0024, h01=0x0050, text=»DC15ON CF A15,SAVE8 SAVE A1 - A8«, t00=0x008e, t01=0x0138}
0xdef6…df12               Head {h00=0x0018, h01=0x0050, text=» RF DRDC06  ********«, t00=0x008e, t01=0x0160}
0xdf12…df26               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x008e, t01=0x017c}
0xdf26…df46               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x008e, t01=0x0190}
0xdf46…df5a               Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x008f, t01=0x0020}
0xdf5a…df8c               Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x008f, t01=0x0034}
0xdf8c…dfa4               Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x008f, t01=0x0066}
0xdfa4…dfb8               Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x008f, t01=0x007e}
0xdfb8…dfda               Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x008f, t01=0x0092}
0xdfda…dffe               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x008f, t01=0x00b4}
0xdffe…e032               Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x008f, t01=0x00d8}
0xe032…e05e               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x008f, t01=0x010c}
0xe05e…e070               Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x008f, t01=0x0138}
0xe070…e084               Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x008f, t01=0x014a}
0xe084…e090               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x015e}
0xe090…e0bc               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x008f, t01=0x016a}
0xe0bc…e0e2               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x0090, t01=0x0008}
0xe0e2…e110               Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x0090, t01=0x002e}
0xe110…e126               Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x0090, t01=0x005c}
0xe126…e134               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0090, t01=0x0072}
0xe134…e13e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0080}
0xe13e…e156               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0090, t01=0x008a}
0xe156…e160               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00a2}
0xe160…e18c               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0090, t01=0x00ac}
0xe18c…e1a0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0090, t01=0x00d8}
0xe1a0…e1cc               Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x0090, t01=0x00ec}
0xe1cc…e1fa               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0090, t01=0x0118}
0xe1fa…e222               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0090, t01=0x0146}
0xe222…e234               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0090, t01=0x016e}
0xe234…e23e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0180}
0xe23e…e276               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x0090, t01=0x018a}
0xe276…e280               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0032}
0xe280…e2a8               Head {h00=0x0024, h01=0x0050, text=»CPTIM CM DCONOF INDICATE POLLING«, t00=0x0091, t01=0x003c}
0xe2a8…e2c0               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x0091, t01=0x0064}
0xe2c0…e2e4               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x0091, t01=0x007c}
0xe2e4…e312               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0091, t01=0x00a0}
0xe312…e322               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0091, t01=0x00ce}
0xe322…e32c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00de}
0xe32c…e346               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x0091, t01=0x00e8}
0xe346…e350               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0102}
0xe350…e378               Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x0091, t01=0x010c}
0xe378…e392               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x0091, t01=0x0134}
0xe392…e3bc               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x0091, t01=0x014e}
0xe3bc…e3d0               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0091, t01=0x0178}
0xe3d0…e3e2               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0091, t01=0x018c}
0xe3e2…e3f0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0092, t01=0x000e}
0xe3f0…e3fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x001c}
0xe3fa…e41a               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x0092, t01=0x0026}
0xe41a…e424               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0046}
0xe424…e438               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x0092, t01=0x0050}
0xe438…e460               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x0092, t01=0x0064}
0xe460…e476               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0092, t01=0x008c}
0xe476…e492               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x0092, t01=0x00a2}
0xe492…e4ba               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x0092, t01=0x00be}
0xe4ba…e4ca               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0092, t01=0x00e6}
0xe4ca…e4d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x00f6}
0xe4d4…e4f0               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x0092, t01=0x0100}
0xe4f0…e4fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x011c}
0xe4fa…e512               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x0092, t01=0x0126}
0xe512…e52e               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x0092, t01=0x013e}
0xe52e…e552               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x0092, t01=0x015a}
0xe552…e582               Head {h00=0x002c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT IF OPEN SALCUZ «, t00=0x0092, t01=0x017e}
0xe582…e596               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0093, t01=0x001e}
0xe596…e5bc               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x0093, t01=0x0032}
0xe5bc…e5da               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0093, t01=0x0058}
0xe5da…e604               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0093, t01=0x0076}
0xe604…e61a               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x0093, t01=0x00a0}
0xe61a…e628               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0093, t01=0x00b6}
0xe628…e632               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00c4}
0xe632…e650               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x0093, t01=0x00ce}
0xe650…e65a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00ec}
0xe65a…e686               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x0093, t01=0x00f6}
0xe686…e6a6               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x0093, t01=0x0122}
0xe6a6…e6c4               Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x0093, t01=0x0142}
0xe6c4…e6d6               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x0093, t01=0x0160}
0xe6d6…e6ea               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x0093, t01=0x0172}
0xe6ea…e6f8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0093, t01=0x0186}
0xe6f8…e70c (148, 0, 400) Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0094, t01=0x0004}
0xe70c…e716               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0018}
0xe716…e720               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0022}
0xe720…e73c               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x0094, t01=0x002c}
0xe73c…e746               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0048}
0xe746…e75e               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x0094, t01=0x0052}
0xe75e…e77c               Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x0094, t01=0x006a}
0xe77c…e786               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0088}
0xe786…e790               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0092}
0xe790…e7a4               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x0094, t01=0x009c}
0xe7a4…e7ba               Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x0094, t01=0x00b0}
0xe7ba…e7d2               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x0094, t01=0x00c6}
0xe7d2…e7ea               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x0094, t01=0x00de}
0xe7ea…e7fc               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x0094, t01=0x00f6}
0xe7fc…e814               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x0094, t01=0x0108}
0xe814…e826               Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x0094, t01=0x0120}
0xe826…e838               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x0094, t01=0x0132}
0xe838…e84a               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x0094, t01=0x0144}
0xe84a…e85c               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0094, t01=0x0156}
0xe85c…e872               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x0094, t01=0x0168}
0xe872…e888               Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x0094, t01=0x017e}
0xe888…e8a0 (149, 0, 400) Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x0095, t01=0x0004}
0xe8a0…e8b6               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x0095, t01=0x001c}
0xe8b6…e8cc               Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x0095, t01=0x0032}
0xe8cc…e8e4               Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x0095, t01=0x0048}
0xe8e4…e8fc               Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x0095, t01=0x0060}
0xe8fc…e90c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0095, t01=0x0078}
0xe90c…e920               Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x0095, t01=0x0088}
0xe920…e92e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0095, t01=0x009c}
0xe92e…e938               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00aa}
0xe938…e942               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00b4}
0xe942…e96e               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x0095, t01=0x00be}
0xe96e…e98e               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x0095, t01=0x00ea}
0xe98e…e998               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x010a}
0xe998…e9a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0114}
0xe9a2…e9ca               Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x0095, t01=0x011e}
0xe9ca…e9f2               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x0095, t01=0x0146}
0xe9f2…ea12               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x0095, t01=0x016e}
0xea12…ea32               Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x0095, t01=0x018e}
0xea32…ea52               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x0096, t01=0x001e}
0xea52…ea7e               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x0096, t01=0x003e}
0xea7e…ea9e               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x0096, t01=0x006a}
0xea9e…eab0               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0096, t01=0x008a}
0xeab0…eac2               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x0096, t01=0x009c}
0xeac2…ead4               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0096, t01=0x00ae}
0xead4…eb06               Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x0096, t01=0x00c0}
0xeb06…eb16               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0096, t01=0x00f2}
0xeb16…eb22               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0096, t01=0x0102}
0xeb22…eb36               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0096, t01=0x010e}
0xeb36…eb40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0122}
0xeb40…eb6a               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x0096, t01=0x012c}
0xeb6a…eb90               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x0096, t01=0x0156}
0xeb90…eb9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x017c}
0xeb9a…ebb0               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x0096, t01=0x0186}
0xebb0…ebc4               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0097, t01=0x000c}
0xebc4…ebd6               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0097, t01=0x0020}
0xebd6…ebe8               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0097, t01=0x0032}
0xebe8…ebfe               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x0097, t01=0x0044}
0xebfe…ec12               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x0097, t01=0x005a}
0xec12…ec26               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x0097, t01=0x006e}
0xec26…ec38               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x0097, t01=0x0082}
0xec38…ec48               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0097, t01=0x0094}
0xec48…ec50               Head {h00=0x0004, h01=0x0050, t00=0x0097, t01=0x00a4}
0xec50…ec5c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0097, t01=0x00ac}
0xec5c…ec6a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0097, t01=0x00b8}
0xec6a…ec74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00c6}
0xec74…ec7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00d0}
0xec7e…eca4               Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x0097, t01=0x00da}
0xeca4…ecae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0100}
0xecae…ecb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x010a}
0xecb8…ecd8               Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x0097, t01=0x0114}
0xecd8…ecf8               Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x0097, t01=0x0134}
0xecf8…ed12               Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x0097, t01=0x0154}
0xed12…ed2e               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0097, t01=0x016e}
0xed2e…ed44               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0097, t01=0x018a}
0xed44…ed72               Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x0098, t01=0x0010}
0xed72…ed8e               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x0098, t01=0x003e}
0xed8e…edb6               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0098, t01=0x005a}
0xedb6…edd0               Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x0098, t01=0x0082}
0xedd0…edee               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x0098, t01=0x009c}
0xedee…ee1a               Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x0098, t01=0x00ba}
0xee1a…ee4c               Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x0098, t01=0x00e6}
0xee4c…ee72               Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x0098, t01=0x0118}
0xee72…eea2               Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x0098, t01=0x013e}
0xeea2…eec0               Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x0098, t01=0x016e}
0xeec0…eece               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0098, t01=0x018c}
0xeece…eed8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x000a}
0xeed8…eee2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0014}
0xeee2…ef02               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x0099, t01=0x001e}
0xef02…ef0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x003e}
0xef0c…ef2c               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x0099, t01=0x0048}
0xef2c…ef36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0068}
0xef36…ef4a               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x0099, t01=0x0072}
0xef4a…ef6e               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x0099, t01=0x0086}
0xef6e…ef84               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x0099, t01=0x00aa}
0xef84…ef9a               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0099, t01=0x00c0}
0xef9a…efae               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0099, t01=0x00d6}
0xefae…efc4               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x0099, t01=0x00ea}
0xefc4…efda               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0099, t01=0x0100}
0xefda…efee               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0099, t01=0x0116}
0xefee…f004               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x0099, t01=0x012a}
0xf004…f01a               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0099, t01=0x0140}
0xf01a…f02e               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0099, t01=0x0156}
0xf02e…f03a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0099, t01=0x016a}
0xf03a…f050               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0099, t01=0x0176}
0xf050…f064               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0099, t01=0x018c}
0xf064…f080               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x009a, t01=0x0010}
0xf080…f094               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009a, t01=0x002c}
0xf094…f09e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0040}
0xf09e…f0a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x004a}
0xf0a8…f0ca               Head {h00=0x001e, h01=0x0050, text=»* DC TRANSMIT BUFFER POOL «, t00=0x009a, t01=0x0054}
0xf0ca…f0d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0076}
0xf0d4…f0de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0080}
0xf0de…f0f2               Head {h00=0x0010, h01=0x0050, text=»DCTBUF EQU *«, t00=0x009a, t01=0x008a}
0xf0f2…f0fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x009e}
0xf0fc…f106               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00a8}
0xf106…f11a               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x009a, t01=0x00b2}
0xf11a…f14a               Head {h00=0x002c, h01=0x0050, text=» DATA TBUF1 POINTER TO FIRST FREE BUFFER«, t00=0x009a, t01=0x00c6}
0xf14a…f17e               Head {h00=0x0030, h01=0x0050, text=»TBUF1 DATA TBUF2 POINTER TO NEXT FREE BUFFER«, t00=0x009a, t01=0x00f6}
0xf17e…f19e               Head {h00=0x001c, h01=0x0050, text=» RES TBUFL BUFFER AREA 1«, t00=0x009a, t01=0x012a}
0xf19e…f1c0               Head {h00=0x001e, h01=0x0050, text=»TBUF2 DATA 0 END OF CHAIN «, t00=0x009a, t01=0x014a}
0xf1c0…f1e0               Head {h00=0x001c, h01=0x0050, text=» RES TBUFL BUFFER AREA 2«, t00=0x009a, t01=0x016c}
0xf1e0…f1ec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x018c}
0xf1ec…f1f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0008}
0xf1f6…f204               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009b, t01=0x0012}
0xf204…f20e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0020}
0xf20e…f218               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x002a}
0xf218…f23c               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x009b, t01=0x0034}
0xf23c…f246               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0058}
0xf246…f250               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0062}
0xf250…f264               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x009b, t01=0x006c}
0xf264…f27e               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x009b, t01=0x0080}
0xf27e…f294               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x009b, t01=0x009a}
0xf294…f2a6               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x009b, t01=0x00b0}
0xf2a6…f2c0               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x009b, t01=0x00c2}
0xf2c0…f2d6               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x009b, t01=0x00dc}
0xf2d6…f2e8               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x009b, t01=0x00f2}
0xf2e8…f300               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x009b, t01=0x0104}
0xf300…f316               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x009b, t01=0x011c}
0xf316…f32a               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x009b, t01=0x0132}
0xf32a…f344               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x009b, t01=0x0146}
0xf344…f35a               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x009b, t01=0x0160}
0xf35a…f36c               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x009b, t01=0x0176}
0xf36c…f37e               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x009b, t01=0x0188}
0xf37e…f394               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x009c, t01=0x000a}
0xf394…f3aa               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x009c, t01=0x0020}
0xf3aa…f3c2               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x009c, t01=0x0036}
0xf3c2…f3de               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x009c, t01=0x004e}
0xf3de…f3f2               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x009c, t01=0x006a}
0xf3f2…f406               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x009c, t01=0x007e}
0xf406…f41c               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x009c, t01=0x0092}
0xf41c…f42a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x00a8}
0xf42a…f434               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00b6}
0xf434…f43e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00c0}
0xf43e…f458               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x009c, t01=0x00ca}
0xf458…f46c               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x009c, t01=0x00e4}
0xf46c…f47c               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x009c, t01=0x00f8}
0xf47c…f492               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x009c, t01=0x0108}
0xf492…f4a6               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x009c, t01=0x011e}
0xf4a6…f4ba               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x009c, t01=0x0132}
0xf4ba…f4c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x0146}
0xf4c6…f4d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0152}
0xf4d0…f4da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x015c}
0xf4da…f4e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0166}
0xf4e4…f4f8               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x009c, t01=0x0170}
0xf4f8…f506               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x0184}
0xf506…f546 (157, 0, 400) Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x009d, t01=0x0004}
0xf546…f550               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0044}
0xf550…f56a               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x009d, t01=0x004e}
0xf56a…f574               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0068}
0xf574…f5b2               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x009d, t01=0x0072}
0xf5b2…f5bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00b0}
0xf5bc…f5fe               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x009d, t01=0x00ba}
0xf5fe…f606               Head {h00=0x0004, h01=0x0050, t00=0x009d, t01=0x00fc}
0xf606…f61a               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x009d, t01=0x0104}
0xf61a…f640               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x009d, t01=0x0118}
0xf640…f652               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x009d, t01=0x013e}
0xf652…f668               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x009d, t01=0x0150}
0xf668…f692               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x009d, t01=0x0166}
0xf692…f6b8               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x009d, t01=0x0190}
0xf6b8…f6c0               Head {h00=0x0004, h01=0x0050, t00=0x009e, t01=0x0026}
0xf6c0…f6d2               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x009e, t01=0x002e}
0xf6d2…f6e8               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x009e, t01=0x0040}
0xf6e8…f714               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x009e, t01=0x0056}
0xf714…f73c               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x009e, t01=0x0082}
0xf73c…f752               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x009e, t01=0x00aa}
0xf752…f75c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00c0}
0xf75c…f766               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00ca}
0xf766…f770               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00d4}
0xf770…f77e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009e, t01=0x00de}
0xf77e…f786               Head {h00=0x0004, h01=0x0050, t00=0x009e, t01=0x00ec}
0xf786…f78e               Head {h00=0x0004, h01=0x0050, t00=0x009e, t01=0x00f4}
0xf78e…f7a2               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x009e, t01=0x00fc}
0xf7a2…f7d0               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x009e, t01=0x0110}
0xf7d0…f7fe               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 /08-/0F «, t00=0x009e, t01=0x013e}
0xf7fe…f82c               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x009e, t01=0x016c}
0xf82c…f85a               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E /18-/1F «, t00=0x009f, t01=0x000a}
0xf85a…f888               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x009f, t01=0x0038}
0xf888…f8b6               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F /28-/2F «, t00=0x009f, t01=0x0066}
0xf8b6…f8e2               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x009f, t01=0x0094}
0xf8e2…f90e               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 /38-3F«, t00=0x009f, t01=0x00c0}
0xf90e…f91a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x00ec}
0xf91a…f928               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009f, t01=0x00f8}
0xf928…f930               Head {h00=0x0004, h01=0x0050, t00=0x009f, t01=0x0106}
0xf930…f94c               Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x009f, t01=0x010e}
0xf94c…f966               Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x009f, t01=0x012a}
0xf966…f98c               Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x009f, t01=0x0144}
0xf98c…f9ba               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x009f, t01=0x016a}
0xf9ba…f9e8               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00a0, t01=0x0008}
0xf9e8…f9fc               Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x00a0, t01=0x0036}
0xf9fc…fa06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x004a}
0xfa06…fa10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0054}
0xfa10…fa1c               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00a0, t01=0x005e}
0xfa1c…fa20               Head {h00=0x4004, h01=0x0000}
0xfa20…fa24               00 a0 00 6a                                                                                                                                                                                                                                       ┆   j┆
0xfa24…fa2c (161, 1, 8)   20 04 00 00 00 a1 00 04                                                                                                                                                                                                                           ┆        ┆
0xfa2c…fa7c (162, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 44 4b 4d 4f 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 38 30 2e 30 32 2e 32 37 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆    LABEL = DKMON             DATE =  80.02.27        PACK NBR =  0             ┆
0xfa7c…facc               00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff   ┆ f                                                                              ┆
0xfacc…fb1c               ff ff ff ff ff ff ff ff ff ff 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆              =IR   E                                                           ┆
0xfb1c…fb6c               20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                          […0x1…]
0xfbbc…fc0c (163, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 44 4b 4d 4f 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 38 30 2e 30 32 2e 32 37 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆    LABEL = DKMON             DATE =  80.02.27        PACK NBR =  0             ┆
0xfc0c…fc5c               00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff   ┆ f                                                                              ┆
0xfc5c…fcac               ff ff ff ff ff ff ff ff ff ff 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆              =IR   E                                                           ┆
0xfcac…fcfc               20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                          […0x1…]
0xfd4c…fd9c (164, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 44 4b 4d 4f 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 38 30 2e 30 32 2e 32 37 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆    LABEL = DKMON             DATE =  80.02.27        PACK NBR =  0             ┆
0xfd9c…fdec               00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff   ┆ f                                                                              ┆
0xfdec…fe3c               ff ff ff ff ff ff ff ff ff ff 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆              =IR   E                                                           ┆
0xfe3c…fe8c               20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                          […0x1…]

Reduced view