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

⟦1166d4d9d⟧

    Length: 67824 (0x108f0)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«

Derivation

└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
    └─⟦this⟧ »D3270:92/DRDC15.SC« 
└─⟦bdcaa0fa2⟧ Bits:30009700 Philips computer tape "600999"
    └─⟦this⟧ »D3270:92/DRDC15.SC« 

PTS(SC)

	IDENT	DRDC15	9.2DK 6 82-10-04 870105040924 
			DK7,READ-MODIFIED, MODIFIED
			82-10-02 
			DK6, READ MODIFIED 
			DK5, LP, DWTINF, ST.PR.BIT, 81-11-05 

			DK3, RBUFNR=1 ALLOWED
			DK2, TBUFL 
			80-03-11 
			DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. 
			80-03-11 
			REL 9.1 79-08-16 
			=8, ASCII-MODE FOR SALCUZ
			REL 9.1 79-07-19 
			=7, ACK IN CONVERSATIONAL MODE 
			REL 9.1 79-07-19 
			=6, DCTASK BUFFER ADDRESS DESTROYED
			REL 9.1 79-05-23 
			=5, INCOMPLETE POLL SEQUENCE 
			REL 9.1 79-05-23 
			=3, TRANSFER PARAMETER 
			PRR 9.1 79-04-06 
			=4, ANY MESSAGE ORDER
			PRR 9.1 79-04-06 
			=2, ABORT HANDLING 
			PRR 9.1 78-11-29 
			=1, MSR-INSTRUCTION
			PRR 9.1 78-11-14 
			REL 8.2 78-11-14 

* 
* 
********************************************* 
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   DRDC15: DRIVER DATA COMMUNICATION 
*           BSC MULTIPOINT LINE PROCEDURE 
*           OR SIEMENS MSV1 
* 
* 
* 
* 
* 
****************************************************
	 
* 
* 
*	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 
	EXTRN	ECBBA	ECB BUFFER ADDRESS 
	EXTRN	ECBRL	ECB REQUESTED LENGTH 
	EXTRN	ECBEL	ECB EFFECTIVE LENGTH 
	EXTRN	ECBRC	ECB RETURN CODE
	EXTRN	ECBCW	ECB CONTROL WORD 
	EXTRN	DC:MIN	MOVE DATA TO USER BUFFER
	EXTRN	DC:MOT	MOVE DATA FROM USER BUFFER
	EXTRN	DISEND	COMPLETE REQUEST AND DISPATCH 
	 
* 
* 
* 
* 
*   STANDARD INTERFACE PART FOR DATA COMMUNICATION
* 
* 
* 
* 
*	DWT CONTENTS
* 
*	DWTCHP	TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)
* 
	 
******************************************************* 
* 
*	PARAMETERS FOR CONDITIONAL ASSEMBLY 
* 
XRVI	EQU	/5C	STANDARD:/40, DK:/5C	DK
X:D	EQU	0	BASE FOR RBUFL AND TBUFL	DK 
X:X	EQU	500	VALUE FOR BASE	DK 
X:A	EQU	2000	RECEIVE BUFFER LENGTH
RBUFL	EQU	650+X:X		DK 
X:B	EQU	/60	DCTASK FILE CODE
DC15FC	EQU	/60
X:C	EQU	1	IF 1 INTERRUPT LOGGING
LOGG	EQU	0
* 
TIMPOL	EQU	600	POLL TIMEOUT VALUE		DK 
X:E	EQU	1	STATUS AND RVI HANDLING IF=1
STAT	EQU	X:E
X:F	EQU	1	READ COMMAND HANDLING IF=1
RCOM	EQU	X:F
X:G	EQU	252	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	X:G 
X:H	EQU	1	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	X:H
X:I	EQU	0	IF 1 SPECIFIC POLL HANDLING 
SPECP	EQU	X:I 
X:J	EQU	1	IF = 1  LINE SPEED SET TO HIGH
			IF = 0  LINE SPEED IS SET TO LOW 
SPEED	EQU	X:J 
X:K	EQU	0	IF 1 SIEMENS MSV1 PROCEDURE 
MSV1	EQU	X:K
X:L	EQU	2	NUMBER OF RECEIVE BUFFERS (2-5) 
RBUFNR	EQU	1
X:M	EQU	0	IF = 1  PTS 6805 ADAPTION	SALCUZ
P6805	EQU	X:M 
X:N	EQU	/02 
	IFT	P6805=0
LCUIN	EQU	X:N	DEVICE ADDRESS OF RECEIVER
	XIF
	IFT	P6805=1
LCUIN	EQU	/0A	DEVICE ADDRESS OF RECEIVER
	XIF
X:O	EQU	0 
IBMCHR	EQU	X:O	IF 1 IBM CHARACTER HANDLING
X:P	EQU	0	IF 1 MESSAGE PASSING TO DC TASK 
MESPAS	EQU	X:P
X:Q	EQU	1	IBM-3270 EMULATION PACKAGE, IF NOT = 0
EM3270	EQU	X:Q
X:R	EQU	1000
				DK2 
BINTRM	EQU	0	IF 1 BINARY TRANSMISSION 
TSTREQ	EQU	X:I	IF 1 TEST REQUEST HANDLING 
DMRK	EQU	1	SPECIAL CONDITION FOR DENMARK
NOWACK	EQU	0	WHEN WORKING WITH A MAIN-FRAME THAT
			DOESN'T ACCEPT WACK RESPONSE TO A SELECT 
			SEQUENCE, NOWACK SHOULD BE SET TO "ONE". 
			ONLY WORKING IF STAT IS SET TO "ONE".
	IFT	P6805=0		SALCUZ
LCUUT	EQU	LCUIN+/10	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
	IFT	P6805=1
LCUUT	EQU	LCUIN+/01	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
* 
	 
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	1
* 
				DB
	IFT	MMUPAG=0		DK2
TBUFL	EQU	0		DK2
	XIF			DK2
* 
	IFT	MMUPAG=1		DK2
TBUFL	EQU	650+X:X	MMU BUFFER LENGTH	DK
	XIF			DK2
				DE
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	0
* 
DEVIND	EQU	-2	DEVICE INDEX DATA COMMUNICATION 
BUFLEN	EQU	TBUFL+TBUFL	MMU BUFFER SIZE
* 
	 
* 
*	DWT DISPLACEMENTS 
* 
DWTDRD	EQU	/10	START OF DRIVER DEFINED PART 
* 
	IFT	MMUPAG=0 
START	EQU	DWTDRD
	XIF
* 
	IFT	MMUPAG=1 
START	EQU	DWTDRD+4
	XIF
* 
DWTTP	EQU	START+/00	TIMER POINTER ORDER PROCESS 
DWTWQ	EQU	START+/02	WRITE/GET BUFFER QUEUE
DWTSQ	EQU	START+/04	STATUS QUEUE
DWTRQ	EQU	START+/06	RECEIVE QUEUE 
DWTBUF	EQU	START+/08	DEVICE BUFFER ADDRESS
DWTCUR	EQU	START+/0A	CURSOR ADDRESS 
DWTTIM	EQU	START+/0C	REQUEST TIMER VALUE
DWTINF	EQU	START+/0E	DEVICE INFO, 1=LP	DK5
* 
	 
* 
*	REQUEST HANDLING
* 
* 
* 
*	A7=ORDER
* 
*	/02: READ 
*	/06: WRITE
*	/31: TRANSFER DWTINF		DK5 
*	/33: READ MODIFIED RESPONSE 
*	/37: TRANSFER PARAMETERS
*	/38: SET STATUS 
*	/39: SET REQUEST TIMEOUT VALUE
* 
* 
*	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
DCTPGP	DATA	0	TIMER POINTER GENERAL POLL
	 
* 
*	DC TASK ADDRESS BLOCK 
* 
	DATA	0	INDICATES NO MMU BUFFER 
	DATA	DEVIND	DEVICE INDEX 
DC15DC	DATA	DCACTD	ACTIVATION ADDRESS 
	DATA	ABORT	ABORT ROUTINE ADDRESS 
	DATA	DCRBUF	REC. BUFFER ANCHOR 
* 
*	DRIVER ADDRESS BLOCK
* 
	DATA	BUFLEN	MMU BUFFER SIZE
	DATA	DEVIND	DEVICE INDEX 
DC15AD	DATA	DCACT	ACTIVATION ADDRESS
	DATA	ABORT	ABORT ROUTINE	ABORT ROUTINE ADDRESS 
	DATA	DCRBUF	REC. BUFFER ANCHOR 
* 
	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
	 
* 
* 
*	ACTIVATION FROM TERMINAL TASKS
* 
DCACT	EQU	* 
	LDK	A1,0	PRESET RETURN CODE
	IFT	EM3270=1		=4 
	LDR	A7,A7		=4
	RF(Z)	ANYMSG	ANY MESSAGE ORDER	=4
	XIF
	SUK	A7,/02 
	ABL(Z)	DCRD	READ SPECIFIC
	SUK	A7,/06-/02 
	RF(Z)	DCWR 
	SUK	A7,/31-/06		DK5
	RF(Z)	TRINF	TRANSFER DWTINF	DK5
	SUK	A7,/33-/31		DK7
	RF(E)	RESTRM	RESPONSE TO READ MODIFIED 
	SUK	A7,/37-/33		DK5
	RF(Z)	DCTP	TRANSFER PARAMETERS 
	IFF	STAT=0 
	SUK	A7,/38-/37 
	ABL(Z)	DCSS	SET STATUS	DK4 
	SUK	A7,/39-/38 
	ABL(Z)	REQTIM	SET REQUEST TIMER
	XIF

	IFT	STAT=0 
	SUK	A7,/39-/37 
	RF(Z)	REQTIM	SET REQUEST TIMER 
	XIF
	RF	DCA100
	 
* 
* 
*	ACTIVATION FROM DCTASK
* 
* 
DCACTD	EQU	*
	SUR	A1,A1	PRESET RETURN CODE	=4
	IFT	EM3270=1		=4 
	LDR	A7,A7		=4
	RF(Z)	ANYMSG	ANY MESSAGE ORDER	=4
	XIF
	SUK	A7,/02 
	RF(E)	DCRDDC	READ
	SUK	A7,/37-/02 
	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 
	IFT	EM3270=1		=4 
	 
***************************************** 
* 
*   ANY MESSAGE ORDER 
* 
***************************** 

ANYMSG	LD	A4,DWTRQ,A6	ANY QUEUED MESSAGE ??	=4
	RF(Z)	DCRD10	NO!!	=4 
	RF	ENDIO	YES!! COMPLETE REQUEST	=4 
	XIF
	 
* 
*	TRANSFER DWTINF		DK5
*				DK5
TRINF	EQU	*		DK5
	LD	A2,ECBCW,A8	GET INFO	DK5
	ORS	A2,DWTINF,A6	OR AND STORE	DK5
	RF	ENDIO	COMPLETE REQUEST	DK5
*	
*	 RESPONSE TO READ MODIFIED
*	
RESTRM	EQU	*		DK7 
	LD	A1,DWTINF,A6	WAS READ MODIFIED RECEIVED?	DK7
	ANKL	A1,/0002		DK7 
	ABL(Z)	DISIOE	NO, REQUEST ERROR	DK7
	RF	DCWR	TREAT ALMOST AS WRITE REQUEST
	EJECT			 
*				DK5
* 
*	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
	ST	A2,DWTBUF,A6	SAVE TERM. ADDR.	DK4 
DCTP12	EQU	*	 
	LD	A1,DCSTQ	CHECK IF THIS DWT IS IN QUEUE	DK4
DCTP14	EQU	*	 
	RF(Z)	DCTP18	NO, END OF/OR NO QUEUE	DK4
	LDR	A3,A6	ADJUST ADDR. VALUE	DK4 
	ADKL	A3,DWTSQ		DK4 
	CWR	A1,A3	SOMETHING QUEUED OUR DWT?	DK4
	RF(E)	DCTP16	YES, WAIT BEFORE TRANS. PARAM.	DK4
	LDR*	A1,A1	NOT OURS, GET NEXT	DK4
	RB	DCTP14		DK4 
DCTP16	EQU	*	 
	LDR	A1,A6	SAVE DWT AS PARAMETER	DK4
	CF	A15,SETIME	WAIT UNTIL STATUS IS SENT	DK4
	DATA	TPTOUT,20	DELAY= 2 SECONDS	DK4
	RB	DCRTN		DK4
TPTOUT	EQU	*	 
	LDR	A6,A1	RESTORE DWT	DK4
	RB	DCTP12	LOOK IN THE QUEUE AGAIN	DK4
DCTP18	EQU	*	 
	LD	A2,DWTBUF,A6	RESTORE TERM ADDR.	DK4 
	STR	A2,A6	SAVE IN FIRST WORD OF DWT

	IFT	RCOM=1 
	ST	A8,DWTBUF,A6	SAVE ECB FOR RD. MODIFIED	DK6
	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
	 


DCTP20	EQU	*
	LD	A4,DCTAB	DC:TAB ADDRESS	=3
	AD*	A4,DCTAB	LAST TABLE POS.	=3
DCTP22	SUK	A4,2	ADDR. TO NEXT ENTRY	=3
	CW	A4,DCTAB	ALL ENTRIES CHECKED??	=3 
	RF(E)	DCTP25	YES.DWT NOT IN TABLE	=3 
	CWR*	A6,A4	IN TABLE ??	=3
	RF(E)	DCTP30	YES!!	=3
	RB	DCTP22	CHECK NEXT ENTRY	=3
DCTP25	EQU	*		=3

	STR	A6,A1	INSERT DWT IN DC:TAB 
	LDK	A1,2 
	ADS	A1,DC:IN	UPDATE DC:TAB IN POINTER

	ADS	A1,DC:TAB	INCREMENT DC:TAB LENGTH
	IFT	STAT=1 
	LDK	A1,4	DEVICE END
	ORS	A1,DWTST,A6
	CF	A15,INSSQ	INSERT IN STATUS QUEUE
	XIF
DCTP30	EQU	*
	SUR	A1,A1	RETURN CODE ::= 0
ENDIO	EQU	* 
	CF	A15,TENDIO	COMPLETE REQUEST 
	RB	DCRTN 
	 
* 
* 
*	WRITE 
* 
* 
*	COMPLETE WHEN:
*	  SUCCESFUL TRANSMISSION
*	  TIME OUT
* 
* 
DCWR	EQU	*
	IFT	MMUPAG=1 
	LD	A1,ECBRL,A8	REQUESTED LENGTH
	CWK	A1,BUFLEN	ILLEGAL LENGTH?
	RF(G)	IL:LEN	YES!! 
	XIF
	CF	A15,TIMEWR	SET TIMER
	CF	A15,INSWQ 	QUEUE REQUEST
	LD	A1,DWTOR,A6	RESPONSE TO READ MODIFIED?	DK7
	ANK	A1,/FF	MASK ORDER	DK7
	CWK	A1,/0033	READ-MOD. RESPONSE?	DK7 
	ABL(E)	SPOLLX	YES TREAT AS SPECIFIC POLL	DK7 
	RB	DCRTN 
* 
* 
* 
*	READ
* 
* 
*	COMPLETE WHEN:
*	  MESSAGE RECEIVED
*	  TIME OUT
* 
* 
DCRD	EQU	*
	LD	A8,DWTECB,A6	GET ECB
	LD	A4,DWTRQ,A6	AND RECEIVE MESSAGE QUEUE 
	RF(Z)	DCRD10	NOTHING IN QUEUE



	LDR*	A2,A4	TAKE THE FIRST IN QUEUE 
	ST	A2,DWTRQ,A6 
	ADK	A4,6 
	LD	A3,-4,A4	EFFECTIVE LENGTH 
	ST	A3,ECBEL,A8 

	LDK	A1,0	RESET RETURN CODE 
	CF	A15,DC:MIN	MOV DATA TO USER BUFFER
	RB	DCRTN 

DCRD10	CF	A15,TIMERE	START TIMER
	RB	DCRTN 
	 
* 
* 
*	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	DCTP30	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
	 

* 
*   SET REQUEST TIMEOUT VALUE 
* 
* 

REQTIM	EQU	*
	LD	A2,ECBCW,A8	TIMEOUT VALUE 
	ST	A2,DWTTIM,A6	SAVE IT IN DWT 
	RB	DCTP30	TENDIO & DISPATCH

* 
*   ILLEGAL APPLICATION BUFFER SIZE 
* 

IL:LEN	LDKL	A1,/8008	REQUEST ERROR + ILLEGAL LENGTH 
	ABL	DISEND	COMPLETE REQUEST
	 
* 
* 
* 
*	TIMER HANDLING PART 
* 
* 
* 
*	READ TIMER=TIMERR 
* 
TIMERE	EQU	*
	LDR	A1,A6
	LD	A2,DWTTIM,A6	GET REQUEST 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
TOUTR1	EQU	*
	LDK	A1,/40	INDICATE TIME OUT 
TOUTR2	RB	ENDIO	COMPLETE REQUEST
* 
*	WRITE TIMER=TIMWR 
* 
TIMEWR	LDR	A1,A6
	LD	A2,DWTTIM,A6	GET REQUEST TIMEOUT VALUE
	RB(Z)	TIME10	NO TIMING 
	ST	A2,TIMWR
	CF	A15,SETIME
	DATA	TOUTWR
TIMWR	DATA	0
	ST	A4,DWTTP,A6 
	RB	TIME10
	 
* 
*	TIMEOUT WRITE TIMER 
* 
TOUTWR	EQU	*
	LDR	A6,A1	FETCH DWT
	CM	DWTTP,A6
	CF	A15,REMOVW	REMOVE FROM WRITE QUEUE
* 
*	THIS INSTRUCTION DOES NOT BELONG
*	TO THE STANDARD INTERFACE 
	LD	A2,FDWTUT 
	CWR	A2,A6
	RB(NE)	TOUTR1	THIS DWT IS NOT WRITING
	CM	XACK	INDICATE 'ACK NOT EXPECTED'
	CM	FDWTUT
* 
* 
	RB	TOUTR1
	 
* 
* 
*	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
	 
* 
*	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
	 
* 
* 
*	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 
	 
* 
* 
*	INSERT DWT IN STATUS QUEUE
* 
	IFF	STAT=0 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSSQ	EQU	* 
	LD	A2,0,A6	GET TERMINAL ADDRESS	DK4
	ANK	A2,/FF	IF ADDRESS = 00 OR /7F	DK4
	RB(Z)	GBUF10	DONT PUT IN STATUS	DK4
	SUK	A2,/7F	QUEUE, TERMINAL HAS BEEN	DK4
	RB(Z)	GBUF10	MADE INACTIVE	DK4 
	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
	 
* 
* 
*	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 
	 
* 
* 
*	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
			DONT DESTROY BUFFER ADDRESS	=6 
	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	RESET RETURN CODE 
	LDR	A4,A3	RECEIVE BUFFER ADDRESS 
	CF	A15,DC:MIN	MOVE DATA TO USER BUFFER 
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 
	CF	A15,TENDIO	COMPLETE READ GENERAL REQUEST
	RB	CKM110
	 

************************************************************
* 
*    ABORT ROUTINE
* 
************************

ABORT	LD	A1,DWTTP,A6	TIMER POINTER
	RF(Z)	AB:10	NO TIMER RUNNING 
	CM*	DWTTP,A6	KILL TIMER
	CM	DWTTP,A6

AB:10	LD	A1,DWTOR,A6	ORDER CODE 
	SUK	A1,2 
	RF(Z)	AB:RTN	READ REQUEST. NO ACTION 
	SUK	A1,4 
	RF(NZ)	AB:RTN	NO ACTION IF NOT READ/WRITE

	CF	A15,REMOVW	REMOVE DWT FROM WRITE QUEUE
	LD	A2,FDWTUT	WRITING DWT ADDRESS 
	CWR	A2,A6
	RF(NE)	AB:RTN	NOT THIS DWT 
	CM	XACK	RESET ACK EXPECTED 
	CM	FDWTUT	RESET WRITING DWT

AB:RTN	EQU	*
	IFT	CPU852=1 
	ADKL	A15,4 
	ABR*	A15	RETURN IN INHIBIT MODE
	XIF
	IFF	CPU852=1 
	RTN	A15
	XIF
	 

	 
* 
* 
*	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 
	 
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 
	 
* 
* 
*	TIMER VALUES
* 
* 
TIMPRO	EQU	90	PROCEDURE TIMER 9 SEC	DK
TIMNAK	EQU	3	DELAY FOR NAK	DK 
* 
* 
*	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	XRVI		DK
ACK0	EQU	/18
ACK1	EQU	/2F
SYNEBC	EQU	/32
	XIF
	 
* 
* 
*	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
CRDBUF	DATA	0	READ BUFFER COUNTER	DK
* 
* 
*	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
	 
* 
* 
*	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
	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
	 
* 
* 
*	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 
	 
* 
* 
*	STX HAS BEEN RECEIVED 
* 
* 
BRM300	EQU	*
	CF	A5,HPTIM
	LD	A1,XSEL 
	RF(Z)	BRM315	NOT SELECTED
	LD	A1,DCRBUF 
	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
	IFT	RCOM=1 
	CF	A5,PRREC	PREPARE FOR TEXT RECEPTION 
	LD	A1,DWTECB,A6	SAVE CURRENT ECB	DK6 
	ST	A1,DWTCUR,A6		DK6 
	LDK	A1,0	SET RC=0
	CF	A5,CWRITE	COMPLETE WRITE REQUEST
	CM	CACK	PRESET ACK-1	=7
	RB	BRM305	READ THE MESSAGE 
	XIF
BRM316	CF	A5,READ	READ ONE CHARACTER
	IFF	P6805=1		=8
	SUK	A2,ENQ+PAR 
	XIF			=8 
	IFT	P6805=1		=8
	SUK	A2,ENQ		=8 
	XIF			=8 
	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
	IFT	EM3270=1		=4 
	LD	A2,DWTOR,A6	ORDER	=4
	RF(Z)	BRM327	ANY MESSAGE ORDER	=4
	XIF			=4 
	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
	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
	 
* 
* 
*	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
	LD	A3,DWTINF,A6	GET DWT INFO	DK5 
	ANK	A3,1	GET LPBIT	DK5 
	RF(Z)	BRM328	NOT LP	DK5
	ANK	A2,8 
	RF(Z)	BRM328 
	LD	A2,DWTST,A6	GET STATUS
	ORK	A2,/A	SET WACK INDICATION
	ST	A2,DWTST,A6 
BRM328	EQU	*
	XIF
	IFT	EM3270=1		=4 
	LD	A2,DWTOR,A6	ORDER	=4
	RF(NZ)	BRM329	NOT ANY MESSAGE ORDER	=4 
	SUK	A4,6	ADJUST BUFFER ADDRESS	=4
	CF	A5,QRBUF	QUEUE MESSAGE ON DWT	=4
	RF	BRM32A		=4
	XIF		=4
BRM329	EQU	*		=4

	LDK	A1,0	RESET RETURN CODE 
	CF	A15,DC:MIN	MOVE TO USER BUFFER
	RF	BRM345
BRM32A	EQU	*		=4

	CF	A15,TENDIO	COMPLETE REQUEST 
	RF	BRM345
	 
BRM330	EQU	*
	IFT	EM3270=1		=4 
	LD	A1,DWTST,A6	STATUS	=4 
	RF(N)	BRM335	NO REQUEST	=4 
	LD	A1,DWTOR,A6	ORDER	=4
	RF(NZ)	BRM335	NOT ANY MESSAGE ORDER	=4 
	CF	A15,TENDIO	COMPLETE REQUEST	=4
BRM335	EQU	*		=4
	XIF			=4 
	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,DWTINF,A6	READ-MOD. RECEIVED?	DK7
	ANKL	A1,/0002		DK7 
	RF(NZ)	BRM410	WAIT FOR RESPONSE FROM APPL.	DK7 
	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
	 
* 
* 
*	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
	LDK	A1,1 
	XRS	A1,CACK	INCREMENT ACK COUNTER
				DB
	LDK	A1,/02	INDICATE READ-MOD. RECEIVED	DK7 
	ORS	A1,DWTINF,A6		DK7
	LDKL	A1,/4000	SET RETURN CODE =READ-MOD.	DK7 
	RB	BRM32A	COMPLETE THE REQUEST	DK7 
	XIF
* 
* 
*	ENQ HAS BEEN RECEIVED 
* 
* 
BRM400	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RF(NZ)	BRM510	RETRANSMISSION OF MESSAGE
	OR	A1,XSEL 
	RF(Z)	BRM410	IN CONTROL STATE
	CF	A5,TRREP	REPEAT LAST CONTROL SEQUENCE 
BRM410	EQU	*
	ABL	BRM
	 
* 
* 
*	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	*
				DB
	LDK	A1,0 
	CIO	A1,0,LCUIN		DK 
	SST	A1,LCUIN		DK 
	CF	A15,STREG		DK 
	CF	A15,SETIME		DK
	DATA	BRM520,TIMNAK		DK 
	ABL	TDISP		DK
BRM520	EQU	*		DK
	CF	A15,LDREG		DK 
				DE
	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		=8
	CWK	A2,ACK0+PAR
	XIF			=8 
	IFT	P6805=1		=8
	CWK	A2,ACK0		=8
	XIF			=8 
	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
	 
* 
*	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		=8
	CWK	A2,RVI+PAR 
	XIF			=8 
	IFT	P6805=1		=8
	CWK	A2,RVI		=8 
	XIF			=8 
	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 
	 
* 
* 
*	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
	 
* 
* 
*	SELECT HAS BEEN RECEIVED
* 
* 
SELECT	EQU	*
	LD	A1,XACK		=5 
	RF(NZ)	POL010	ERROR. ACK EXPECTED	=5 
	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
	 
* 
* 
*	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 
	 
* 
* 
*	GENERAL POLL HAS BEEN RECEIVED
* 
* 
GPOLL	EQU	* 
	LD	A1,XACK		=5 
	RF(Z)	POL020	ACK NOT EXPECTED	=5 
POL010	CF	A5,TRENQ	SEND ENQ	=5
	CF	A5,SPTIM	START PROCEDURE TIMER	=5 
	ABL	BRM	WAIT FOR RESPONSE	=5 
POL020	EQU	*		=5
	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 

	IFF	MMUPAG=0 
	LDKL	A4,MMUBUF	MMU WORK BUFFER 
	ST	A4,ECBBA,A8 
	CF	A15,DC:MOT	MOVE DATA FROM USER BUFFER 
	XIF
	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		
*	
*	PROCESS RESPONSE TO READ MODIFIED 
*	
SPOLLX	EQU	*		DK7 
	LDK	A1,/06	FAKE A WRITE REQUEST	 
	ST	A1,DWTOR,A6		DK7
	LDKL	A1,/FFFF-/0002	CLEAR READ MODIFIED FLAG	DK7 
	ANS	A1,DWTINF,A6	
	LDKL	A5,STB	SET STACK BASE	DK7 
	RF	SPOLL	PROCESS AS SPECIFIC POLL	DK7
	 
* 
* 
*	SPECIFIC POLL HAS BEEN RECEIVED 
* 
* 
SPOLL	EQU	* 
	IFF	STAT+SPECP=0 
	LD	A1,XACK		=5 
	RB(NZ)	POL010	ACK EXPECTED	=5
	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 
	 
* 
* 
*	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 
	IFT	RCOM=1	
	LD	A2,XRB	IF RCOM, SKIP IT	DK6 
	RF(NZ)	CWR900		DK6 
	XIF			 
	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	*
CWR900	EQU	*
	CM	XACK	RESET 'ACK EXPECTED' 
	CM	FDWTUT
	IFT	RCOM=1	
	LD	A2,XRB	READ MODIFIED ?	DK6
	RF(Z)	CWR910		DK6
	LD	A2,DWTCUR,A6	RESTORE ECB	DK6
	ST	A2,DWTECB,A6		DK6 
CWR910	EQU	*		DK6 
	XIF		
	RTN	A5 
	 
* 
* 
*	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 EMBEDDED IN MESSAGE 
	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
	 
* 
*	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 
	 
* 
*	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 
	 
* 
* 
*	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 

	RF	TRT070		DK6 

			******************** 
	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 
	RF	TRT105		DK6 

************************************************************
* 
*   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
	 
	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 
	 
* 
* 
*	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
	 
* 
* 
*	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 
	 
* 
* 
*   RECEIVER INTERRUPT
* 
* 
IH1501	EQU	*
	ST	P,INTSAV
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8
	XIF

	IFF	CPU852=1 
	MSR	8,A15	SAVE A1-A8	=1
	XIF
	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 
	 
* 
* 
*   TRANSMITTER INTERRUPT 
* 
* 
IH1502	EQU	*
	ST	P,INTSAV
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1 - A8
	XIF

	IFF	CPU852=1 
	MSR	8,A15	SAVE A1-A8	=1
	XIF
	CF	A15,LDREG	RESTORE DC REGS A3 - A8 
	RB	IHIN10
	 
* 
* 
*	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 
	 
* 
* 
*	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
	 
* 
* 
***	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
* 
* 
	 
* 
*	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 
	 
* 
* 
*	POWER ON FUNCTIONS
* 
* 
DC15ON	EQU	*
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8
	XIF

	IFF	CPU852=1 
	MSR	8,A15	SAVE A1-A8	=1
	XIF
	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
	LDK	A2,/40 
	ORS	A2,DCONOF
	CF	A15,CKMESS
	LD	A2,DCTPGP	GET POLL TIMER POINTER
	RF(NZ)	DRDC20	ALREADY STARTED
DRDC10	CF	A15,SPOTIM	START POLL TIMER 
DRDC20	ABL	BRM
	 
* 
*	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 
	 
* 
*	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 
	 
* 
*	STOP PROCEDURE TIMER
* 
HPTIM	LD	A1,DCTPP	GET TIMER POINTER 
	RF(Z)	HPT10	NOT RUNNING
	CM*	DCTPP	STOP TIMER 
	CM	DCTPP 
HPT10	RTN	A5
	 
	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
	 
* 
* 
*	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
	 
* 
* 
*	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
* 
	IFT	MMUPAG=1 
	DATA	0	USER ECB ADDRESS
	DATA	DC:ECB	MMU ECB ADDRESS
	XIF
* 
	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
	DATA	0	REQUEST TIMEOUT VALUE 
	DATA	0	EXTRA DEVICE INFO	DK5 
* 
	IFT	MMUPAG=1 
DC:ECB	EQU	*	MMU ECB
	DATA	0,0,0,0,0,0 
	XIF
* 
	 
* 
* 
*	DC RECEIVE BUFFER POOL
* 
RLINK	EQU	RBUFL+RBUFL+8 
* 
DCRBUF	EQU	*
	DATA	*+2	FREE BUFFER ANCHOR
	IFF	RBUFNR=1	DK3 
	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
	IFF	RBUFNR=1	DK3 
	DATA	*+RLINK 
	RES	RBUFL+3
	XIF			DK3
	DATA	0	END OF CHAIN
	RES	RBUFL+3

	IFF	MMUPAG=0 
MMUBUF	RES	TBUFL+1	MMU WORK BUFFER
	XIF
	 
* 
* 
*	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 
	 
* 
* 
LOGPNT	DATA	LOGSTA
LOGSTA	EQU	*
	RES	300
LOGEND	EQU	*-4
SAVE2	DATA	0
SAVE3	DATA	0
	XIF
* 
* 
* 
	IFT	RCOM=1 
	 
******************************************************* 
* 
*     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
* 
* 
* 
	 

*     SCANDINAVIAN ALPHABET 
				DB
LICO:T	EQU	*
	DATA	/2041,/4243,/4445,/4647	/00-/07 
	DATA	/4849,/232E,/3C28,/2B21	/08-/0F 
	DATA	/264A,/4B4C,/4D4E,/4F50	/10-/17 
	DATA	/5152,/245D,/2A29,/3B5E	/18-/1F 
	DATA	/2D2F,/5354,/5556,/5758	/20-/27 
	DATA	/595A,/402C,/255F,/3E3F	/28-/2F 
	DATA	/3031,/3233,/3435,/3637	/30-37
	DATA	/3839,/3A5B,/5C27,/3D22	/38-3F
				DE
	XIF
	 

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

0x00000…00034 (0, 0, 400)   Head {h00=0x0030, h01=0x0050, text=» IDENT DRDC15 9.2DK 6 82-10-04 870105040924 «, t00=0x0000, t01=0x0004}
0x00034…0005a               Head {h00=0x0022, h01=0x0050, text=»   DK7,READ-MODIFIED, MODIFIED«, t00=0x0000, t01=0x0038}
0x0005a…0006e               Head {h00=0x0010, h01=0x0050, text=»   82-10-02 «, t00=0x0000, t01=0x005e}
0x0006e…0008c               Head {h00=0x001a, h01=0x0050, text=»   DK6, READ MODIFIED «, t00=0x0000, t01=0x0072}
0x0008c…000bc               Head {h00=0x002c, h01=0x0050, text=»   DK5, LP, DWTINF, ST.PR.BIT, 81-11-05 «, t00=0x0000, t01=0x0090}
0x000bc…000c4               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x00c0}
0x000c4…000e4               Head {h00=0x001c, h01=0x0050, text=»   DK3, RBUFNR=1 ALLOWED«, t00=0x0000, t01=0x00c8}
0x000e4…000fa               Head {h00=0x0012, h01=0x0050, text=»   DK2, TBUFL «, t00=0x0000, t01=0x00e8}
0x000fa…0010e               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x00fe}
0x0010e…00142               Head {h00=0x0030, h01=0x0050, text=»   DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. «, t00=0x0000, t01=0x0112}
0x00142…00156               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x0146}
0x00156…00172               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-08-16 «, t00=0x0000, t01=0x015a}
0x00172…00196               Head {h00=0x0020, h01=0x0050, text=»   =8, ASCII-MODE FOR SALCUZ«, t00=0x0000, t01=0x0176}
0x00196…001b2               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0001, t01=0x000a}
0x001b2…001dc               Head {h00=0x0026, h01=0x0050, text=»   =7, ACK IN CONVERSATIONAL MODE «, t00=0x0001, t01=0x0026}
0x001dc…001f8               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0001, t01=0x0050}
0x001f8…00226               Head {h00=0x002a, h01=0x0050, text=»   =6, DCTASK BUFFER ADDRESS DESTROYED«, t00=0x0001, t01=0x006c}
0x00226…00242               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x009a}
0x00242…0026a               Head {h00=0x0024, h01=0x0050, text=»   =5, INCOMPLETE POLL SEQUENCE «, t00=0x0001, t01=0x00b6}
0x0026a…00286               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x00de}
0x00286…002a8               Head {h00=0x001e, h01=0x0050, text=»   =3, TRANSFER PARAMETER «, t00=0x0001, t01=0x00fa}
0x002a8…002c4               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x011c}
0x002c4…002e4               Head {h00=0x001c, h01=0x0050, text=»   =4, ANY MESSAGE ORDER«, t00=0x0001, t01=0x0138}
0x002e4…00300               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x0158}
0x00300…0031e               Head {h00=0x001a, h01=0x0050, text=»   =2, ABORT HANDLING «, t00=0x0001, t01=0x0174}
0x0031e…0033a (2, 0, 398)   Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-29 «, t00=0x0002, t01=0x0004}
0x0033a…00358               Head {h00=0x001a, h01=0x0050, text=»   =1, MSR-INSTRUCTION«, t00=0x0002, t01=0x0020}
0x00358…00374               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-14 «, t00=0x0002, t01=0x003e}
0x00374…00390               Head {h00=0x0018, h01=0x0050, text=»   REL 8.2 78-11-14 «, t00=0x0002, t01=0x005a}
0x00390…00398               Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0076}
0x00398…003a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x007e}
0x003a2…003ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0088}
0x003ac…003e2               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x0092}
0x003e2…003ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c8}
0x003ec…00414               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x00d2}
0x00414…0041e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fa}
0x0041e…0044c               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x0104}
0x0044c…0047e               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0002, t01=0x0132}
0x0047e…004a2               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0002, t01=0x0164}
0x004a2…004ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0188}
0x004ac…004b6 (3, 0, 400)   Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0004}
0x004b6…004c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x000e}
0x004c0…004ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0018}
0x004ca…004d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0022}
0x004d4…00510               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0003, t01=0x002c}
0x00510…0051a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0003, t01=0x0068}
0x0051a…00524               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0072}
0x00524…0052e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x007c}
0x0052e…00544               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0003, t01=0x0086}
0x00544…0054e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x009c}
0x0054e…00584               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0003, t01=0x00a6}
0x00584…005aa               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x00dc}
0x005aa…005d0               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x0102}
0x005d0…005f6               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0003, t01=0x0128}
0x005f6…0061c               Head {h00=0x0022, h01=0x0050, text=» ENTRY DW1500 DWT FOR DC TASK «, t00=0x0003, t01=0x014e}
0x0061c…00626               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0174}
0x00626…00630               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x017e}
0x00630…0064e               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0003, t01=0x0188}
0x0064e…00658               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0016}
0x00658…00662               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0020}
0x00662…00688               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0004, t01=0x002a}
0x00688…006b4               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0004, t01=0x0050}
0x006b4…006dc               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0004, t01=0x007c}
0x006dc…00700               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0004, t01=0x00a4}
0x00700…00720               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x00c8}
0x00720…00740               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x00e8}
0x00740…0075e               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x0108}
0x0075e…0077c               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0004, t01=0x0126}
0x0077c…007aa               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x0144}
0x007aa…007d6               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0004, t01=0x0172}
0x007d6…00802               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0005, t01=0x000e}
0x00802…0082a               Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0005, t01=0x003a}
0x0082a…00854               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0005, t01=0x0062}
0x00854…0087e               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0005, t01=0x008c}
0x0087e…008a2               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x00b6}
0x008a2…008c8               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0005, t01=0x00da}
0x008c8…008f6               Head {h00=0x002a, h01=0x0050, text=» EXTRN DC:MIN MOVE DATA TO USER BUFFER«, t00=0x0005, t01=0x0100}
0x008f6…00926               Head {h00=0x002c, h01=0x0050, text=» EXTRN DC:MOT MOVE DATA FROM USER BUFFER«, t00=0x0005, t01=0x012e}
0x00926…0095a               Head {h00=0x0030, h01=0x0050, text=» EXTRN DISEND COMPLETE REQUEST AND DISPATCH «, t00=0x0005, t01=0x015e}
0x0095a…00964 (6, 0, 398)   Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0006, t01=0x0004}
0x00964…0096e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x000e}
0x0096e…00978               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0018}
0x00978…00982               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0022}
0x00982…0098c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x002c}
0x0098c…009c6               Head {h00=0x0036, h01=0x0050, text=»*   STANDARD INTERFACE PART FOR DATA COMMUNICATION«, t00=0x0006, t01=0x0036}
0x009c6…009d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0070}
0x009d0…009da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x007a}
0x009da…009e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0084}
0x009e4…009ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x008e}
0x009ee…00a04               Head {h00=0x0012, h01=0x0050, text=»* DWT CONTENTS«, t00=0x0006, t01=0x0098}
0x00a04…00a0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ae}
0x00a0e…00a5c               Head {h00=0x004a, h01=0x0050, text=»* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)«, t00=0x0006, t01=0x00b8}
0x00a5c…00a66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0106}
0x00a66…00a70               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0006, t01=0x0110}
0x00a70…00ab0               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0006, t01=0x011a}
0x00ab0…00aba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x015a}
0x00aba…00ae8               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x0164}
0x00ae8…00af2 (7, 0, 400)   Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x00af2…00b1e               Head {h00=0x0028, h01=0x0050, text=»XRVI EQU /5C STANDARD:/40, DK:/5C DK«, t00=0x0007, t01=0x000e}
0x00b1e…00b4c               Head {h00=0x002a, h01=0x0050, text=»X:D EQU 0 BASE FOR RBUFL AND TBUFL DK «, t00=0x0007, t01=0x003a}
0x00b4c…00b72               Head {h00=0x0022, h01=0x0050, text=»X:X EQU 500 VALUE FOR BASE DK «, t00=0x0007, t01=0x0068}
0x00b72…00b9c               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 2000 RECEIVE BUFFER LENGTH«, t00=0x0007, t01=0x008e}
0x00b9c…00bba               Head {h00=0x001a, h01=0x0050, text=»RBUFL EQU 650+X:X  DK «, t00=0x0007, t01=0x00b8}
0x00bba…00bde               Head {h00=0x0020, h01=0x0050, text=»X:B EQU /60 DCTASK FILE CODE«, t00=0x0007, t01=0x00d6}
0x00bde…00bf4               Head {h00=0x0012, h01=0x0050, text=»DC15FC EQU /60«, t00=0x0007, t01=0x00fa}
0x00bf4…00c1c               Head {h00=0x0024, h01=0x0050, text=»X:C EQU 1 IF 1 INTERRUPT LOGGING«, t00=0x0007, t01=0x0110}
0x00c1c…00c2e               Head {h00=0x000e, h01=0x0050, text=»LOGG EQU 0«, t00=0x0007, t01=0x0138}
0x00c2e…00c38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x014a}
0x00c38…00c66               Head {h00=0x002a, h01=0x0050, text=»TIMPOL EQU 600 POLL TIMEOUT VALUE  DK «, t00=0x0007, t01=0x0154}
0x00c66…00c94               Head {h00=0x002a, h01=0x0050, text=»X:E EQU 1 STATUS AND RVI HANDLING IF=1«, t00=0x0007, t01=0x0182}
0x00c94…00ca8               Head {h00=0x0010, h01=0x0050, text=»STAT EQU X:E«, t00=0x0008, t01=0x0020}
0x00ca8…00cd4               Head {h00=0x0028, h01=0x0050, text=»X:F EQU 1 READ COMMAND HANDLING IF=1«, t00=0x0008, t01=0x0034}
0x00cd4…00ce8               Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:F«, t00=0x0008, t01=0x0060}
0x00ce8…00d12               Head {h00=0x0026, h01=0x0050, text=»X:G EQU 252 TRANSMIT BLOCK LENGTH «, t00=0x0008, t01=0x0074}
0x00d12…00d28               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU X:G «, t00=0x0008, t01=0x009e}
0x00d28…00d54               Head {h00=0x0028, h01=0x0050, text=»X:H EQU 1 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0008, t01=0x00b4}
0x00d54…00d68               Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:H«, t00=0x0008, t01=0x00e0}
0x00d68…00d96               Head {h00=0x002a, h01=0x0050, text=»X:I EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0008, t01=0x00f4}
0x00d96…00dac               Head {h00=0x0012, h01=0x0050, text=»SPECP EQU X:I «, t00=0x0008, t01=0x0122}
0x00dac…00ddc               Head {h00=0x002c, h01=0x0050, text=»X:J EQU 1 IF = 1  LINE SPEED SET TO HIGH«, t00=0x0008, t01=0x0138}
0x00ddc…00e08               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0008, t01=0x0168}
0x00e08…00e1e (9, 0, 398)   Head {h00=0x0012, h01=0x0050, text=»SPEED EQU X:J «, t00=0x0009, t01=0x0004}
0x00e1e…00e4c               Head {h00=0x002a, h01=0x0050, text=»X:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0009, t01=0x001a}
0x00e4c…00e60               Head {h00=0x0010, h01=0x0050, text=»MSV1 EQU X:K«, t00=0x0009, t01=0x0048}
0x00e60…00e92               Head {h00=0x002e, h01=0x0050, text=»X:L EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0009, t01=0x005c}
0x00e92…00ea6               Head {h00=0x0010, h01=0x0050, text=»RBUFNR EQU 1«, t00=0x0009, t01=0x008e}
0x00ea6…00ed8               Head {h00=0x002e, h01=0x0050, text=»X:M EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x0009, t01=0x00a2}
0x00ed8…00eee               Head {h00=0x0012, h01=0x0050, text=»P6805 EQU X:M «, t00=0x0009, t01=0x00d4}
0x00eee…00f02               Head {h00=0x0010, h01=0x0050, text=»X:N EQU /02 «, t00=0x0009, t01=0x00ea}
0x00f02…00f16               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0009, t01=0x00fe}
0x00f16…00f46               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU X:N DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x0112}
0x00f46…00f52               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0142}
0x00f52…00f66               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0009, t01=0x014e}
0x00f66…00f96               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x0162}
0x00f96…00fa2 (10, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000a, t01=0x0004}
0x00fa2…00fb4               Head {h00=0x000e, h01=0x0050, text=»X:O EQU 0 «, t00=0x000a, t01=0x0010}
0x00fb4…00fe6               Head {h00=0x002e, h01=0x0050, text=»IBMCHR EQU X:O IF 1 IBM CHARACTER HANDLING«, t00=0x000a, t01=0x0022}
0x00fe6…01018               Head {h00=0x002e, h01=0x0050, text=»X:P EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x000a, t01=0x0054}
0x01018…0102e               Head {h00=0x0012, h01=0x0050, text=»MESPAS EQU X:P«, t00=0x000a, t01=0x0086}
0x0102e…01066               Head {h00=0x0034, h01=0x0050, text=»X:Q EQU 1 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000a, t01=0x009c}
0x01066…0107c               Head {h00=0x0012, h01=0x0050, text=»EM3270 EQU X:Q«, t00=0x000a, t01=0x00d4}
0x0107c…01090               Head {h00=0x0010, h01=0x0050, text=»X:R EQU 1000«, t00=0x000a, t01=0x00ea}
0x01090…010a0               Head {h00=0x000c, h01=0x0050, text=»    DK2 «, t00=0x000a, t01=0x00fe}
0x010a0…010ce               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000a, t01=0x010e}
0x010ce…01100               Head {h00=0x002e, h01=0x0050, text=»TSTREQ EQU X:I IF 1 TEST REQUEST HANDLING «, t00=0x000a, t01=0x013c}
0x01100…01130               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 1 SPECIAL CONDITION FOR DENMARK«, t00=0x000a, t01=0x016e}
0x01130…01168               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000b, t01=0x000e}
0x01168…0119c               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000b, t01=0x0046}
0x0119c…011d0               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000b, t01=0x007a}
0x011d0…01200               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000b, t01=0x00ae}
0x01200…0121c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000b, t01=0x00de}
0x0121c…0125c               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x00fa}
0x0125c…01272               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x013a}
0x01272…01286               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x0150}
0x01286…012c6               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x0164}
0x012c6…012dc               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000c, t01=0x0014}
0x012dc…012e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x002a}
0x012e6…012f0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000c, t01=0x0034}
0x012f0…012fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x003e}
0x012fa…01304               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0048}
0x01304…01336               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x0052}
0x01336…01340               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0084}
0x01340…0135e               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000c, t01=0x008e}
0x0135e…01368               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ac}
0x01368…0139a               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x00b6}
0x0139a…013a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e8}
0x013a4…013d6               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000c, t01=0x00f2}
0x013d6…01404               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000c, t01=0x0124}
0x01404…0140e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0152}
0x0140e…01422               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000c, t01=0x015c}
0x01422…0142c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0170}
0x0142c…0143a               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x000c, t01=0x017a}
0x0143a…01454               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=0  DK2«, t00=0x000c, t01=0x0188}
0x01454…0146c               Head {h00=0x0014, h01=0x0050, text=»TBUFL EQU 0  DK2«, t00=0x000d, t01=0x0012}
0x0146c…0147e               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000d, t01=0x002a}
0x0147e…01488               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x003c}
0x01488…014a2               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=1  DK2«, t00=0x000d, t01=0x0046}
0x014a2…014d0               Head {h00=0x002a, h01=0x0050, text=»TBUFL EQU 650+X:X MMU BUFFER LENGTH DK«, t00=0x000d, t01=0x0060}
0x014d0…014e2               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000d, t01=0x008e}
0x014e2…014f0               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x000d, t01=0x00a0}
0x014f0…014fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ae}
0x014fa…01534               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000d, t01=0x00b8}
0x01534…01566               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000d, t01=0x00f2}
0x01566…01570               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0124}
0x01570…01584               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000d, t01=0x012e}
0x01584…0158e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0142}
0x0158e…015c4               Head {h00=0x0032, h01=0x0050, text=»DEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION «, t00=0x000d, t01=0x014c}
0x015c4…015f2               Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE«, t00=0x000d, t01=0x0182}
0x015f2…015fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0020}
0x015fc…01606               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000e, t01=0x002a}
0x01606…01610               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0034}
0x01610…0162c               Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x000e, t01=0x003e}
0x0162c…01636               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x005a}
0x01636…0166a               Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000e, t01=0x0064}
0x0166a…01674               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0098}
0x01674…0168a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000e, t01=0x00a2}
0x0168a…016a2               Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000e, t01=0x00b8}
0x016a2…016ae               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x00d0}
0x016ae…016b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00dc}
0x016b8…016ce               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x00e6}
0x016ce…016e8               Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000e, t01=0x00fc}
0x016e8…016f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0116}
0x016f4…016fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0122}
0x016fe…01736               Head {h00=0x0034, h01=0x0050, text=»DWTTP EQU START+/00 TIMER POINTER ORDER PROCESS «, t00=0x000e, t01=0x012c}
0x01736…01768               Head {h00=0x002e, h01=0x0050, text=»DWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE«, t00=0x000e, t01=0x0164}
0x01768…01790               Head {h00=0x0024, h01=0x0050, text=»DWTSQ EQU START+/04 STATUS QUEUE«, t00=0x000f, t01=0x0008}
0x01790…017ba               Head {h00=0x0026, h01=0x0050, text=»DWTRQ EQU START+/06 RECEIVE QUEUE «, t00=0x000f, t01=0x0030}
0x017ba…017ec               Head {h00=0x002e, h01=0x0050, text=»DWTBUF EQU START+/08 DEVICE BUFFER ADDRESS«, t00=0x000f, t01=0x005a}
0x017ec…01818               Head {h00=0x0028, h01=0x0050, text=»DWTCUR EQU START+/0A CURSOR ADDRESS «, t00=0x000f, t01=0x008c}
0x01818…01848               Head {h00=0x002c, h01=0x0050, text=»DWTTIM EQU START+/0C REQUEST TIMER VALUE«, t00=0x000f, t01=0x00b8}
0x01848…0187a               Head {h00=0x002e, h01=0x0050, text=»DWTINF EQU START+/0E DEVICE INFO, 1=LP DK5«, t00=0x000f, t01=0x00e8}
0x0187a…01884               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x011a}
0x01884…0188e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000f, t01=0x0124}
0x0188e…01898               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x012e}
0x01898…018b2               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000f, t01=0x0138}
0x018b2…018bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0152}
0x018bc…018c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x015c}
0x018c6…018d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0166}
0x018d0…018e2               Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000f, t01=0x0170}
0x018e2…018ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0182}
0x018ec…01900               Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000f, t01=0x018c}
0x01900…01914               Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x0010, t01=0x0010}
0x01914…01938               Head {h00=0x0020, h01=0x0050, text=»* /31: TRANSFER DWTINF  DK5 «, t00=0x0010, t01=0x0024}
0x01938…0195e               Head {h00=0x0022, h01=0x0050, text=»* /33: READ MODIFIED RESPONSE «, t00=0x0010, t01=0x0048}
0x0195e…01980               Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x0010, t01=0x006e}
0x01980…0199a               Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x0010, t01=0x0090}
0x0199a…019c2               Head {h00=0x0024, h01=0x0050, text=»* /39: SET REQUEST TIMEOUT VALUE«, t00=0x0010, t01=0x00aa}
0x019c2…019cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00d2}
0x019cc…019d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00dc}
0x019d6…019f8               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x0010, t01=0x00e6}
0x019f8…01a02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0108}
0x01a02…01a0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0112}
0x01a0c…01a36               Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x0010, t01=0x011c}
0x01a36…01a64               Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x0010, t01=0x0146}
0x01a64…01a88               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x0010, t01=0x0174}
0x01a88…01ab0               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x0011, t01=0x0008}
0x01ab0…01ae0               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x0011, t01=0x0030}
0x01ae0…01aea               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0011, t01=0x0060}
0x01aea…01af4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x006a}
0x01af4…01b14               Head {h00=0x001c, h01=0x0050, text=»* DC TASK ADDRESS BLOCK «, t00=0x0011, t01=0x0074}
0x01b14…01b1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0094}
0x01b1e…01b46               Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDICATES NO MMU BUFFER «, t00=0x0011, t01=0x009e}
0x01b46…01b68               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0011, t01=0x00c6}
0x01b68…01b96               Head {h00=0x002a, h01=0x0050, text=»DC15DC DATA DCACTD ACTIVATION ADDRESS «, t00=0x0011, t01=0x00e8}
0x01b96…01bc0               Head {h00=0x0026, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x0116}
0x01bc0…01be8               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x0140}
0x01be8…01bf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0168}
0x01bf2…01c10               Head {h00=0x001a, h01=0x0050, text=»* DRIVER ADDRESS BLOCK«, t00=0x0011, t01=0x0172}
0x01c10…01c1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0190}
0x01c1a…01c3e               Head {h00=0x0020, h01=0x0050, text=» DATA BUFLEN MMU BUFFER SIZE«, t00=0x0012, t01=0x000a}
0x01c3e…01c60               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0012, t01=0x002e}
0x01c60…01c8c               Head {h00=0x0028, h01=0x0050, text=»DC15AD DATA DCACT ACTIVATION ADDRESS«, t00=0x0012, t01=0x0050}
0x01c8c…01cc4               Head {h00=0x0034, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS «, t00=0x0012, t01=0x007c}
0x01cc4…01cec               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0012, t01=0x00b4}
0x01cec…01cf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00dc}
0x01cf6…01d26               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x0012, t01=0x00e6}
0x01d26…01d38               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x0012, t01=0x0116}
0x01d38…01d5e               Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x0012, t01=0x0128}
0x01d5e…01d70               Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x0012, t01=0x014e}
0x01d70…01d78               Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x0160}
0x01d78…01d8c               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x0012, t01=0x0168}
0x01d8c…01da4               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x0012, t01=0x017c}
0x01da4…01db0 (19, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0004}
0x01db0…01dc4               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x0013, t01=0x0010}
0x01dc4…01dd8               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x0013, t01=0x0024}
0x01dd8…01de4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0038}
0x01de4…01dee               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0013, t01=0x0044}
0x01dee…01df8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x004e}
0x01df8…01e02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0058}
0x01e02…01e2a               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x0013, t01=0x0062}
0x01e2a…01e34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x008a}
0x01e34…01e48               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x0013, t01=0x0094}
0x01e48…01e6c               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0013, t01=0x00a8}
0x01e6c…01e86               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0013, t01=0x00cc}
0x01e86…01e9c               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0013, t01=0x00e6}
0x01e9c…01ec6               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0013, t01=0x00fc}
0x01ec6…01ed2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0126}
0x01ed2…01ee6               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0013, t01=0x0132}
0x01ee6…01f08               Head {h00=0x001e, h01=0x0050, text=» ABL(Z) DCRD READ SPECIFIC«, t00=0x0013, t01=0x0146}
0x01f08…01f20               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x0013, t01=0x0168}
0x01f20…01f34               Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x0013, t01=0x0180}
0x01f34…01f50 (20, 0, 400)  Head {h00=0x0018, h01=0x0050, text=» SUK A7,/31-/06  DK5«, t00=0x0014, t01=0x0004}
0x01f50…01f78               Head {h00=0x0024, h01=0x0050, text=» RF(Z) TRINF TRANSFER DWTINF DK5«, t00=0x0014, t01=0x0020}
0x01f78…01f94               Head {h00=0x0018, h01=0x0050, text=» SUK A7,/33-/31  DK7«, t00=0x0014, t01=0x0048}
0x01f94…01fc4               Head {h00=0x002c, h01=0x0050, text=» RF(E) RESTRM RESPONSE TO READ MODIFIED «, t00=0x0014, t01=0x0064}
0x01fc4…01fe0               Head {h00=0x0018, h01=0x0050, text=» SUK A7,/37-/33  DK5«, t00=0x0014, t01=0x0094}
0x01fe0…02008               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x0014, t01=0x00b0}
0x02008…0201c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0014, t01=0x00d8}
0x0201c…02034               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x0014, t01=0x00ec}
0x02034…02058               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) DCSS SET STATUS DK4 «, t00=0x0014, t01=0x0104}
0x02058…02070               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/38 «, t00=0x0014, t01=0x0128}
0x02070…02098               Head {h00=0x0024, h01=0x0050, text=» ABL(Z) REQTIM SET REQUEST TIMER«, t00=0x0014, t01=0x0140}
0x02098…020a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0168}
0x020a4…020ac               Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0174}
0x020ac…020c0               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=0 «, t00=0x0014, t01=0x017c}
0x020c0…020d8               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/37 «, t00=0x0014, t01=0x0190}
0x020d8…02100               Head {h00=0x0024, h01=0x0050, text=» RF(Z) REQTIM SET REQUEST TIMER «, t00=0x0015, t01=0x0018}
0x02100…0210c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0040}
0x0210c…0211e               Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x0015, t01=0x004c}
0x0211e…02128               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0015, t01=0x005e}
0x02128…02132               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0068}
0x02132…0213c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0072}
0x0213c…0215c               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x0015, t01=0x007c}
0x0215c…02166               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x009c}
0x02166…02170               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a6}
0x02170…02184               Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x0015, t01=0x00b0}
0x02184…021ac               Head {h00=0x0024, h01=0x0050, text=» SUR A1,A1 PRESET RETURN CODE =4«, t00=0x0015, t01=0x00c4}
0x021ac…021c6               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0015, t01=0x00ec}
0x021c6…021dc               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0015, t01=0x0106}
0x021dc…02206               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0015, t01=0x011c}
0x02206…02212               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0146}
0x02212…02226               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0015, t01=0x0152}
0x02226…02240               Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x0015, t01=0x0166}
0x02240…02258               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/02 «, t00=0x0015, t01=0x0180}
0x02258…02280               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x0016, t01=0x0008}
0x02280…02288               Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0030}
0x02288…022aa               Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x0016, t01=0x0038}
0x022aa…022cc               Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x0016, t01=0x005a}
0x022cc…022d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x007c}
0x022d6…022e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0086}
0x022e0…022fa               Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x0016, t01=0x0090}
0x022fa…02304               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00aa}
0x02304…0230e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00b4}
0x0230e…0232c               Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0016, t01=0x00be}
0x0232c…02344               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0016, t01=0x00dc}
0x02344…0236e               Head {h00=0x0026, h01=0x0050, text=»*   STATUS CHANGE ON DC EQUIPMENT «, t00=0x0016, t01=0x00f4}
0x0236e…02396               Head {h00=0x0024, h01=0x0050, text=»*   SPONTANOUS MESSAGE RECEPTION«, t00=0x0016, t01=0x011e}
0x02396…023a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0146}
0x023a0…023b4               Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0016, t01=0x0150}
0x023b4…023e4               Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0016, t01=0x0164}
0x023e4…023f8 (23, 0, 398)  Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0017, t01=0x0004}
0x023f8…0241c               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0017, t01=0x0018}
0x0241c…02436               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0017, t01=0x003c}
0x02436…02440               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0017, t01=0x0056}
0x02440…02472               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0017, t01=0x0060}
0x02472…0247c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0092}
0x0247c…0249a               Head {h00=0x001a, h01=0x0050, text=»*   ANY MESSAGE ORDER «, t00=0x0017, t01=0x009c}
0x0249a…024a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ba}
0x024a4…024ca               Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0017, t01=0x00c4}
0x024ca…024d2               Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00ea}
0x024d2…02508               Head {h00=0x0032, h01=0x0050, text=»ANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4«, t00=0x0017, t01=0x00f2}
0x02508…02526               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCRD10 NO!! =4 «, t00=0x0017, t01=0x0128}
0x02526…02552               Head {h00=0x0028, h01=0x0050, text=» RF ENDIO YES!! COMPLETE REQUEST =4 «, t00=0x0017, t01=0x0146}
0x02552…0255e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0172}
0x0255e…02568               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0017, t01=0x017e}
0x02568…02572               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0188}
0x02572…02590 (24, 0, 400)  Head {h00=0x001a, h01=0x0050, text=»* TRANSFER DWTINF  DK5«, t00=0x0018, t01=0x0004}
0x02590…025a0               Head {h00=0x000c, h01=0x0050, text=»*    DK5«, t00=0x0018, t01=0x0022}
0x025a0…025b8               Head {h00=0x0014, h01=0x0050, text=»TRINF EQU *  DK5«, t00=0x0018, t01=0x0032}
0x025b8…025dc               Head {h00=0x0020, h01=0x0050, text=» LD A2,ECBCW,A8 GET INFO DK5«, t00=0x0018, t01=0x004a}
0x025dc…02606               Head {h00=0x0026, h01=0x0050, text=» ORS A2,DWTINF,A6 OR AND STORE DK5«, t00=0x0018, t01=0x006e}
0x02606…0262c               Head {h00=0x0022, h01=0x0050, text=» RF ENDIO COMPLETE REQUEST DK5«, t00=0x0018, t01=0x0098}
0x0262c…02636               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00be}
0x02636…0265a               Head {h00=0x0020, h01=0x0050, text=»*  RESPONSE TO READ MODIFIED«, t00=0x0018, t01=0x00c8}
0x0265a…02664               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00ec}
0x02664…0267e               Head {h00=0x0016, h01=0x0050, text=»RESTRM EQU *  DK7 «, t00=0x0018, t01=0x00f6}
0x0267e…026b6               Head {h00=0x0034, h01=0x0050, text=» LD A1,DWTINF,A6 WAS READ MODIFIED RECEIVED? DK7«, t00=0x0018, t01=0x0110}
0x026b6…026d2               Head {h00=0x0018, h01=0x0050, text=» ANKL A1,/0002  DK7 «, t00=0x0018, t01=0x0148}
0x026d2…026fe               Head {h00=0x0028, h01=0x0050, text=» ABL(Z) DISIOE NO, REQUEST ERROR DK7«, t00=0x0018, t01=0x0164}
0x026fe…0272c               Head {h00=0x002a, h01=0x0050, text=» RF DCWR TREAT ALMOST AS WRITE REQUEST«, t00=0x0018, t01=0x0190}
0x0272c…0273e               Head {h00=0x000e, h01=0x0050, text=» EJECT    «, t00=0x0019, t01=0x002e}
0x0273e…0274e               Head {h00=0x000c, h01=0x0050, text=»*    DK5«, t00=0x0019, t01=0x0040}
0x0274e…02758               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0050}
0x02758…02776               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0019, t01=0x005a}
0x02776…02780               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0078}
0x02780…0278a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0082}
0x0278a…027cc               Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0019, t01=0x008c}
0x027cc…0280a               Head {h00=0x003a, h01=0x0050, text=»*         FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0019, t01=0x00ce}
0x0280a…02814               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x010c}
0x02814…0281e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0116}
0x0281e…02832               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0019, t01=0x0120}
0x02832…0285c               Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0019, t01=0x0134}
0x0285c…02868               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x015e}
0x02868…0287c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0019, t01=0x016a}
0x0287c…028a6               Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0019, t01=0x017e}
0x028a6…028ba               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x001a, t01=0x0018}
0x028ba…028d0               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x001a, t01=0x002c}
0x028d0…028fc               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x001a, t01=0x0042}
0x028fc…0290e               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x001a, t01=0x006e}
0x0290e…02922               Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x001a, t01=0x0080}
0x02922…0294a               Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x001a, t01=0x0094}
0x0294a…0295e               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x001a, t01=0x00bc}
0x0295e…0298a               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x001a, t01=0x00d0}
0x0298a…02996               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x00fc}
0x02996…029c4               Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTBUF,A6 SAVE TERM. ADDR. DK4 «, t00=0x001a, t01=0x0108}
0x029c4…029da               Head {h00=0x0012, h01=0x0050, text=»DCTP12 EQU *  «, t00=0x001a, t01=0x0136}
0x029da…02a10               Head {h00=0x0032, h01=0x0050, text=» LD A1,DCSTQ CHECK IF THIS DWT IS IN QUEUE DK4«, t00=0x001a, t01=0x014c}
0x02a10…02a26               Head {h00=0x0012, h01=0x0050, text=»DCTP14 EQU *  «, t00=0x001a, t01=0x0182}
0x02a26…02a56               Head {h00=0x002c, h01=0x0050, text=» RF(Z) DCTP18 NO, END OF/OR NO QUEUE DK4«, t00=0x001b, t01=0x0008}
0x02a56…02a80               Head {h00=0x0026, h01=0x0050, text=» LDR A3,A6 ADJUST ADDR. VALUE DK4 «, t00=0x001b, t01=0x0038}
0x02a80…02a9c               Head {h00=0x0018, h01=0x0050, text=» ADKL A3,DWTSQ  DK4 «, t00=0x001b, t01=0x0062}
0x02a9c…02acc               Head {h00=0x002c, h01=0x0050, text=» CWR A1,A3 SOMETHING QUEUED OUR DWT? DK4«, t00=0x001b, t01=0x007e}
0x02acc…02b04               Head {h00=0x0034, h01=0x0050, text=» RF(E) DCTP16 YES, WAIT BEFORE TRANS. PARAM. DK4«, t00=0x001b, t01=0x00ae}
0x02b04…02b2e               Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A1 NOT OURS, GET NEXT DK4«, t00=0x001b, t01=0x00e6}
0x02b2e…02b46               Head {h00=0x0014, h01=0x0050, text=» RB DCTP14  DK4 «, t00=0x001b, t01=0x0110}
0x02b46…02b5c               Head {h00=0x0012, h01=0x0050, text=»DCTP16 EQU *  «, t00=0x001b, t01=0x0128}
0x02b5c…02b88               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A6 SAVE DWT AS PARAMETER DK4«, t00=0x001b, t01=0x013e}
0x02b88…02bbc               Head {h00=0x0030, h01=0x0050, text=» CF A15,SETIME WAIT UNTIL STATUS IS SENT DK4«, t00=0x001b, t01=0x016a}
0x02bbc…02be8               Head {h00=0x0028, h01=0x0050, text=» DATA TPTOUT,20 DELAY= 2 SECONDS DK4«, t00=0x001c, t01=0x000e}
0x02be8…02bfe               Head {h00=0x0012, h01=0x0050, text=» RB DCRTN  DK4«, t00=0x001c, t01=0x003a}
0x02bfe…02c14               Head {h00=0x0012, h01=0x0050, text=»TPTOUT EQU *  «, t00=0x001c, t01=0x0050}
0x02c14…02c36               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 RESTORE DWT DK4«, t00=0x001c, t01=0x0066}
0x02c36…02c64               Head {h00=0x002a, h01=0x0050, text=» RB DCTP12 LOOK IN THE QUEUE AGAIN DK4«, t00=0x001c, t01=0x0088}
0x02c64…02c7a               Head {h00=0x0012, h01=0x0050, text=»DCTP18 EQU *  «, t00=0x001c, t01=0x00b6}
0x02c7a…02caa               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTBUF,A6 RESTORE TERM ADDR. DK4 «, t00=0x001c, t01=0x00cc}
0x02caa…02cd6               Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x001c, t01=0x00fc}
0x02cd6…02cde               Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0128}
0x02cde…02cf2               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x001c, t01=0x0130}
0x02cf2…02d28               Head {h00=0x0032, h01=0x0050, text=» ST A8,DWTBUF,A6 SAVE ECB FOR RD. MODIFIED DK6«, t00=0x001c, t01=0x0144}
0x02d28…02d34               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x017a}
0x02d34…02d5a               Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x001c, t01=0x0186}
0x02d5a…02d90               Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!!  SHOULD NOT BE IN DC:TAB «, t00=0x001d, t01=0x001c}
0x02d90…02dbe               Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x001d, t01=0x0052}
0x02dbe…02dec               Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x001d, t01=0x0080}
0x02dec…02e16               Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x001d, t01=0x00ae}
0x02e16…02e20               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x001d, t01=0x00d8}
0x02e20…02e28               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00e2}
0x02e28…02e30               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00ea}
0x02e30…02e44               Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x001d, t01=0x00f2}
0x02e44…02e6a               Head {h00=0x0022, h01=0x0050, text=» LD A4,DCTAB DC:TAB ADDRESS =3«, t00=0x001d, t01=0x0106}
0x02e6a…02e92               Head {h00=0x0024, h01=0x0050, text=» AD* A4,DCTAB LAST TABLE POS. =3«, t00=0x001d, t01=0x012c}
0x02e92…02ec0               Head {h00=0x002a, h01=0x0050, text=»DCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3«, t00=0x001d, t01=0x0154}
0x02ec0…02eee               Head {h00=0x002a, h01=0x0050, text=» CW A4,DCTAB ALL ENTRIES CHECKED?? =3 «, t00=0x001d, t01=0x0182}
0x02eee…02f1c               Head {h00=0x002a, h01=0x0050, text=» RF(E) DCTP25 YES.DWT NOT IN TABLE =3 «, t00=0x001e, t01=0x0020}
0x02f1c…02f3e               Head {h00=0x001e, h01=0x0050, text=» CWR* A6,A4 IN TABLE ?? =3«, t00=0x001e, t01=0x004e}
0x02f3e…02f5c               Head {h00=0x001a, h01=0x0050, text=» RF(E) DCTP30 YES!! =3«, t00=0x001e, t01=0x0070}
0x02f5c…02f82               Head {h00=0x0022, h01=0x0050, text=» RB DCTP22 CHECK NEXT ENTRY =3«, t00=0x001e, t01=0x008e}
0x02f82…02f9a               Head {h00=0x0014, h01=0x0050, text=»DCTP25 EQU *  =3«, t00=0x001e, t01=0x00b4}
0x02f9a…02fa2               Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x00cc}
0x02fa2…02fca               Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x001e, t01=0x00d4}
0x02fca…02fdc               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x001e, t01=0x00fc}
0x02fdc…0300a               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x001e, t01=0x010e}
0x0300a…03012               Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x013c}
0x03012…03040               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x001e, t01=0x0144}
0x03040…03054               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x001e, t01=0x0172}
0x03054…03070               Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x001e, t01=0x0186}
0x03070…03088               Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x001f, t01=0x0012}
0x03088…030b4               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x001f, t01=0x002a}
0x030b4…030c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0056}
0x030c0…030d4               Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x001f, t01=0x0062}
0x030d4…030f8               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x001f, t01=0x0076}
0x030f8…0310c               Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x001f, t01=0x009a}
0x0310c…03134               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x001f, t01=0x00ae}
0x03134…03146               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001f, t01=0x00d6}
0x03146…03150               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x001f, t01=0x00e8}
0x03150…0315a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00f2}
0x0315a…03164               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00fc}
0x03164…03174               Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x001f, t01=0x0106}
0x03174…0317e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0116}
0x0317e…03188               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0120}
0x03188…031a0               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001f, t01=0x012a}
0x031a0…031c2               Head {h00=0x001e, h01=0x0050, text=»*   SUCCESFUL TRANSMISSION«, t00=0x001f, t01=0x0142}
0x031c2…031d6               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001f, t01=0x0164}
0x031d6…031e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0178}
0x031e0…031ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0182}
0x031ea…031fc               Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x001f, t01=0x018c}
0x031fc…03212               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0020, t01=0x000e}
0x03212…0323a               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x0020, t01=0x0024}
0x0323a…03260               Head {h00=0x0022, h01=0x0050, text=» CWK A1,BUFLEN ILLEGAL LENGTH?«, t00=0x0020, t01=0x004c}
0x03260…0327c               Head {h00=0x0018, h01=0x0050, text=» RF(G) IL:LEN YES!! «, t00=0x0020, t01=0x0072}
0x0327c…03288               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x008e}
0x03288…032a8               Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x0020, t01=0x009a}
0x032a8…032cc               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ  QUEUE REQUEST«, t00=0x0020, t01=0x00ba}
0x032cc…03302               Head {h00=0x0032, h01=0x0050, text=» LD A1,DWTOR,A6 RESPONSE TO READ MODIFIED? DK7«, t00=0x0020, t01=0x00de}
0x03302…03324               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/FF MASK ORDER DK7«, t00=0x0020, t01=0x0114}
0x03324…03352               Head {h00=0x002a, h01=0x0050, text=» CWK A1,/0033 READ-MOD. RESPONSE? DK7 «, t00=0x0020, t01=0x0136}
0x03352…03388               Head {h00=0x0032, h01=0x0050, text=» ABL(E) SPOLLX YES TREAT AS SPECIFIC POLL DK7 «, t00=0x0020, t01=0x0164}
0x03388…0339a               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0021, t01=0x000a}
0x0339a…033a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x001c}
0x033a4…033ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0026}
0x033ae…033b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0030}
0x033b8…033c6               Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x0021, t01=0x003a}
0x033c6…033d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0048}
0x033d0…033da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0052}
0x033da…033f2               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0021, t01=0x005c}
0x033f2…0340e               Head {h00=0x0018, h01=0x0050, text=»*   MESSAGE RECEIVED«, t00=0x0021, t01=0x0074}
0x0340e…03422               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0021, t01=0x0090}
0x03422…0342c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00a4}
0x0342c…03436               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00ae}
0x03436…03448               Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x0021, t01=0x00b8}
0x03448…03468               Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x0021, t01=0x00ca}
0x03468…0349a               Head {h00=0x002e, h01=0x0050, text=» LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x0021, t01=0x00ea}
0x0349a…034c0               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x0021, t01=0x011c}
0x034c0…034c8               Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0142}
0x034c8…034d0               Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x014a}
0x034d0…034d8               Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0152}
0x034d8…03504               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 TAKE THE FIRST IN QUEUE «, t00=0x0021, t01=0x015a}
0x03504…0351c               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x0021, t01=0x0186}
0x0351c…0352e               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0022, t01=0x000e}
0x0352e…03554               Head {h00=0x0022, h01=0x0050, text=» LD A3,-4,A4 EFFECTIVE LENGTH «, t00=0x0022, t01=0x0020}
0x03554…0356c               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x0022, t01=0x0046}
0x0356c…03574               Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x005e}
0x03574…03598               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0022, t01=0x0066}
0x03598…035c6               Head {h00=0x002a, h01=0x0050, text=» CF A15,DC:MIN MOV DATA TO USER BUFFER«, t00=0x0022, t01=0x008a}
0x035c6…035d8               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0022, t01=0x00b8}
0x035d8…035e0               Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x00ca}
0x035e0…03608               Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x0022, t01=0x00d2}
0x03608…0361a               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0022, t01=0x00fa}
0x0361a…03624               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0022, t01=0x010c}
0x03624…0362e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0116}
0x0362e…03638               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0120}
0x03638…0364c               Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x0022, t01=0x012a}
0x0364c…03656               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x013e}
0x03656…03660               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0148}
0x03660…03674               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0022, t01=0x0152}
0x03674…03686               Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x0022, t01=0x0166}
0x03686…036b4               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x0022, t01=0x0178}
0x036b4…036d0               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x0023, t01=0x0016}
0x036d0…036f0               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x0023, t01=0x0032}
0x036f0…03704               Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x0023, t01=0x0052}
0x03704…0371c               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x0023, t01=0x0066}
0x0371c…03740               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 COMPLETE REQUEST «, t00=0x0023, t01=0x007e}
0x03740…03754               Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x0023, t01=0x00a2}
0x03754…0376c               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0023, t01=0x00b6}
0x0376c…0377e               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x0023, t01=0x00ce}
0x0377e…037aa               Head {h00=0x0028, h01=0x0050, text=» RB(Z) DCSS10 WACK HAS NOT BEEN SENT«, t00=0x0023, t01=0x00e0}
0x037aa…037be               Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x0023, t01=0x010c}
0x037be…037ee               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x0023, t01=0x0120}
0x037ee…03806               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x0023, t01=0x0150}
0x03806…03818               Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x0023, t01=0x0168}
0x03818…03824               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x017a}
0x03824…0382e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0023, t01=0x0186}
0x0382e…03836               Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0190}
0x03836…03840               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0008}
0x03840…03866               Head {h00=0x0022, h01=0x0050, text=»*   SET REQUEST TIMEOUT VALUE «, t00=0x0024, t01=0x0012}
0x03866…03870               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0038}
0x03870…0387a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0042}
0x0387a…03882               Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x004c}
0x03882…03896               Head {h00=0x0010, h01=0x0050, text=»REQTIM EQU *«, t00=0x0024, t01=0x0054}
0x03896…038bc               Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBCW,A8 TIMEOUT VALUE «, t00=0x0024, t01=0x0068}
0x038bc…038e4               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTTIM,A6 SAVE IT IN DWT «, t00=0x0024, t01=0x008e}
0x038e4…03908               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 TENDIO & DISPATCH«, t00=0x0024, t01=0x00b6}
0x03908…03910               Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x00da}
0x03910…0391a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00e2}
0x0391a…03946               Head {h00=0x0028, h01=0x0050, text=»*   ILLEGAL APPLICATION BUFFER SIZE «, t00=0x0024, t01=0x00ec}
0x03946…03950               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0118}
0x03950…03958               Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x0122}
0x03958…03994               Head {h00=0x0038, h01=0x0050, text=»IL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH «, t00=0x0024, t01=0x012a}
0x03994…039b8               Head {h00=0x0020, h01=0x0050, text=» ABL DISEND COMPLETE REQUEST«, t00=0x0024, t01=0x0166}
0x039b8…039c2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0024, t01=0x018a}
0x039c2…039cc (37, 0, 398)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0004}
0x039cc…039d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x000e}
0x039d6…039e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0018}
0x039e0…039fe               Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x0025, t01=0x0022}
0x039fe…03a08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0040}
0x03a08…03a12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x004a}
0x03a12…03a1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0054}
0x03a1c…03a38               Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x0025, t01=0x005e}
0x03a38…03a42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x007a}
0x03a42…03a56               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x0025, t01=0x0084}
0x03a56…03a68               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0025, t01=0x0098}
0x03a68…03a9a               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0025, t01=0x00aa}
0x03a9a…03aba               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x0025, t01=0x00dc}
0x03aba…03ad0               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x0025, t01=0x00fc}
0x03ad0…03ae6               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0025, t01=0x0112}
0x03ae6…03afa               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x0025, t01=0x0128}
0x03afa…03b10               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x0025, t01=0x013c}
0x03b10…03b3c               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x0025, t01=0x0152}
0x03b3c…03b50               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x0025, t01=0x017e}
0x03b50…03b6a (38, 0, 400)  Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x0026, t01=0x0004}
0x03b6a…03b74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x001e}
0x03b74…03b90               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x0026, t01=0x0028}
0x03b90…03b9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0044}
0x03b9a…03bae               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x0026, t01=0x004e}
0x03bae…03bca               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0026, t01=0x0062}
0x03bca…03bde               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0026, t01=0x007e}
0x03bde…03bf2               Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x0026, t01=0x0092}
0x03bf2…03c18               Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x0026, t01=0x00a6}
0x03c18…03c40               Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x0026, t01=0x00cc}
0x03c40…03c4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00f4}
0x03c4a…03c66               Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x0026, t01=0x00fe}
0x03c66…03c70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x011a}
0x03c70…03c88               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x0026, t01=0x0124}
0x03c88…03cba               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0026, t01=0x013c}
0x03cba…03cda               Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x0026, t01=0x016e}
0x03cda…03cee               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x0026, t01=0x018e}
0x03cee…03d04               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0027, t01=0x0012}
0x03d04…03d18               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x0027, t01=0x0028}
0x03d18…03d2c               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x0027, t01=0x003c}
0x03d2c…03d44               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x0027, t01=0x0050}
0x03d44…03d56               Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x0027, t01=0x0068}
0x03d56…03d60               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0027, t01=0x007a}
0x03d60…03d6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0084}
0x03d6a…03d88               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x0027, t01=0x008e}
0x03d88…03d92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00ac}
0x03d92…03da6               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x0027, t01=0x00b6}
0x03da6…03dc2               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0027, t01=0x00ca}
0x03dc2…03dd6               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0027, t01=0x00e6}
0x03dd6…03e04               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0027, t01=0x00fa}
0x03e04…03e0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0128}
0x03e0e…03e38               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x0027, t01=0x0132}
0x03e38…03e5c               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x0027, t01=0x015c}
0x03e5c…03e72               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x0027, t01=0x0180}
0x03e72…03e84               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0028, t01=0x0008}
0x03e84…03eb2               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT IS NOT WRITING«, t00=0x0028, t01=0x001a}
0x03eb2…03ede               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x0028, t01=0x0048}
0x03ede…03ef0               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0028, t01=0x0074}
0x03ef0…03efa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0086}
0x03efa…03f04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0090}
0x03f04…03f16               Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x0028, t01=0x009a}
0x03f16…03f20               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0028, t01=0x00ac}
0x03f20…03f2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00b6}
0x03f2a…03f34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00c0}
0x03f34…03f52               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0028, t01=0x00ca}
0x03f52…03f5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00e8}
0x03f5c…03f86               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0028, t01=0x00f2}
0x03f86…03f90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x011c}
0x03f90…03f9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0126}
0x03f9a…03fae               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0028, t01=0x0130}
0x03fae…03fd8               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0028, t01=0x0144}
0x03fd8…03ffa               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0028, t01=0x016e}
0x03ffa…0400e               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0028, t01=0x0190}
0x0400e…04034               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0029, t01=0x0014}
0x04034…04054               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0029, t01=0x003a}
0x04054…04068               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0029, t01=0x005a}
0x04068…0407c               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0029, t01=0x006e}
0x0407c…0408e               Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0029, t01=0x0082}
0x0408e…04098               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0029, t01=0x0094}
0x04098…040a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x009e}
0x040a2…040be               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0029, t01=0x00a8}
0x040be…040c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00c4}
0x040c8…040f0               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0029, t01=0x00ce}
0x040f0…04114               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0029, t01=0x00f6}
0x04114…0413e               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0029, t01=0x011a}
0x0413e…04160               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0029, t01=0x0144}
0x04160…0416a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0166}
0x0416a…04174               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0170}
0x04174…041a0               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0029, t01=0x017a}
0x041a0…041b0               Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x002a, t01=0x0016}
0x041b0…041c4               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x002a, t01=0x0026}
0x041c4…041e8               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x002a, t01=0x003a}
0x041e8…0421a               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x002a, t01=0x005e}
0x0421a…0422c               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x002a, t01=0x0090}
0x0422c…0425a               Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x002a, t01=0x00a2}
0x0425a…0427c               Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x002a, t01=0x00d0}
0x0427c…04286               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002a, t01=0x00f2}
0x04286…04290               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00fc}
0x04290…0429a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0106}
0x0429a…042c6               Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x002a, t01=0x0110}
0x042c6…042d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x013c}
0x042d0…042ec               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002a, t01=0x0146}
0x042ec…042fc               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002a, t01=0x0162}
0x042fc…04306               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0172}
0x04306…04332               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x002a, t01=0x017c}
0x04332…0434e               Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x002b, t01=0x0018}
0x0434e…04368               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x002b, t01=0x0034}
0x04368…04390               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x002b, t01=0x004e}
0x04390…043a2               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002b, t01=0x0076}
0x043a2…043b4               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002b, t01=0x0088}
0x043b4…043cc               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x002b, t01=0x009a}
0x043cc…043ee               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x002b, t01=0x00b2}
0x043ee…04414               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002b, t01=0x00d4}
0x04414…0442e               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x002b, t01=0x00fa}
0x0442e…04438               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0114}
0x04438…04442               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x011e}
0x04442…04470               Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x002b, t01=0x0128}
0x04470…0447a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0156}
0x0447a…04496               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x0160}
0x04496…044a6               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x017c}
0x044a6…044b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x018c}
0x044b0…044de               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x002c, t01=0x0008}
0x044de…04514               Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x002c, t01=0x0036}
0x04514…04528               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x002c, t01=0x006c}
0x04528…0453c               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x002c, t01=0x0080}
0x0453c…04554               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x002c, t01=0x0094}
0x04554…0457e               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x002c, t01=0x00ac}
0x0457e…04590               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x002c, t01=0x00d6}
0x04590…045a4               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x002c, t01=0x00e8}
0x045a4…045c0               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x002c, t01=0x00fc}
0x045c0…045d2               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x002c, t01=0x0118}
0x045d2…045f2               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x002c, t01=0x012a}
0x045f2…04604               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x002c, t01=0x014a}
0x04604…0461e               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x002c, t01=0x015c}
0x0461e…04628               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002c, t01=0x0176}
0x04628…04632               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0180}
0x04632…0463c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x018a}
0x0463c…04660 (45, 0, 398)  Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x002d, t01=0x0004}
0x04660…0466a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0028}
0x0466a…0467e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x002d, t01=0x0032}
0x0467e…0469a               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002d, t01=0x0046}
0x0469a…046aa               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002d, t01=0x0062}
0x046aa…046b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0072}
0x046b4…046c8               Head {h00=0x0010, h01=0x0050, text=»INSSQ EQU * «, t00=0x002d, t01=0x007c}
0x046c8…046f4               Head {h00=0x0028, h01=0x0050, text=» LD A2,0,A6 GET TERMINAL ADDRESS DK4«, t00=0x002d, t01=0x0090}
0x046f4…04722               Head {h00=0x002a, h01=0x0050, text=» ANK A2,/FF IF ADDRESS = 00 OR /7F DK4«, t00=0x002d, t01=0x00bc}
0x04722…0474e               Head {h00=0x0028, h01=0x0050, text=» RB(Z) GBUF10 DONT PUT IN STATUS DK4«, t00=0x002d, t01=0x00ea}
0x0474e…0477e               Head {h00=0x002c, h01=0x0050, text=» SUK A2,/7F QUEUE, TERMINAL HAS BEEN DK4«, t00=0x002d, t01=0x0116}
0x0477e…047a6               Head {h00=0x0024, h01=0x0050, text=» RB(Z) GBUF10 MADE INACTIVE DK4 «, t00=0x002d, t01=0x0146}
0x047a6…047ce               Head {h00=0x0024, h01=0x0050, text=» LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002d, t01=0x016e}
0x047ce…047e4               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002e, t01=0x0008}
0x047e4…047f6               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002e, t01=0x001e}
0x047f6…04800               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0030}
0x04800…0480a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x003a}
0x0480a…04830               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x002e, t01=0x0044}
0x04830…0483a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x006a}
0x0483a…04856               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002e, t01=0x0074}
0x04856…04866               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002e, t01=0x0090}
0x04866…04870               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00a0}
0x04870…0489e               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002e, t01=0x00aa}
0x0489e…048b4               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002e, t01=0x00d8}
0x048b4…048c6               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x002e, t01=0x00ee}
0x048c6…048d2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0100}
0x048d2…048dc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002e, t01=0x010c}
0x048dc…048e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0116}
0x048e6…048f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0120}
0x048f0…04918               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x002e, t01=0x012a}
0x04918…04922               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0152}
0x04922…0493a               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x002e, t01=0x015c}
0x0493a…04954               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002e, t01=0x0174}
0x04954…0495e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x018e}
0x0495e…04972               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002f, t01=0x0008}
0x04972…04988               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002f, t01=0x001c}
0x04988…049b4               Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002f, t01=0x0032}
0x049b4…049c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x005e}
0x049c0…049d6               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002f, t01=0x006a}
0x049d6…049fe               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002f, t01=0x0080}
0x049fe…04a0a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x00a8}
0x04a0a…04a3a               Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002f, t01=0x00b4}
0x04a3a…04a4e               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002f, t01=0x00e4}
0x04a4e…04a62               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002f, t01=0x00f8}
0x04a62…04a8a               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002f, t01=0x010c}
0x04a8a…04a9c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002f, t01=0x0134}
0x04a9c…04aae               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002f, t01=0x0146}
0x04aae…04ad8               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002f, t01=0x0158}
0x04ad8…04afe               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002f, t01=0x0182}
0x04afe…04b0e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0030, t01=0x0018}
0x04b0e…04b18               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0030, t01=0x0028}
0x04b18…04b22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0032}
0x04b22…04b2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x003c}
0x04b2c…04b62               Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x0030, t01=0x0046}
0x04b62…04b6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x007c}
0x04b6c…04ba4               Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x0030, t01=0x0086}
0x04ba4…04bae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00be}
0x04bae…04bcc               Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x0030, t01=0x00c8}
0x04bcc…04be4               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0030, t01=0x00e6}
0x04be4…04c04               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x0030, t01=0x00fe}
0x04c04…04c24               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x0030, t01=0x011e}
0x04c24…04c3c               Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x0030, t01=0x013e}
0x04c3c…04c56               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x0030, t01=0x0156}
0x04c56…04c7e               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x0030, t01=0x0170}
0x04c7e…04cac               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x0031, t01=0x0008}
0x04cac…04cd2               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x0031, t01=0x0036}
0x04cd2…04cda               Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x005c}
0x04cda…04ce2               Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x0064}
0x04ce2…04d12               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x0031, t01=0x006c}
0x04d12…04d44               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x0031, t01=0x009c}
0x04d44…04d6a               Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x0031, t01=0x00ce}
0x04d6a…04d94               Head {h00=0x0026, h01=0x0050, text=»   DONT DESTROY BUFFER ADDRESS =6 «, t00=0x0031, t01=0x00f4}
0x04d94…04da8               Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x0031, t01=0x011e}
0x04da8…04ddc               Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x0031, t01=0x0132}
0x04ddc…04df0               Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x0031, t01=0x0166}
0x04df0…04e22               Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x0031, t01=0x017a}
0x04e22…04e2a               Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x001c}
0x04e2a…04e4e               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0032, t01=0x0024}
0x04e4e…04e78               Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 RECEIVE BUFFER ADDRESS «, t00=0x0032, t01=0x0048}
0x04e78…04ea8               Head {h00=0x002c, h01=0x0050, text=» CF A15,DC:MIN MOVE DATA TO USER BUFFER «, t00=0x0032, t01=0x0072}
0x04ea8…04ed6               Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0032, t01=0x00a2}
0x04ed6…04eee               Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0032, t01=0x00d0}
0x04eee…04f2a               Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x0032, t01=0x00e8}
0x04f2a…04f5a               Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x0032, t01=0x0124}
0x04f5a…04f70               Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x0032, t01=0x0154}
0x04f70…04f86               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x0032, t01=0x016a}
0x04f86…04fb0               Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x0032, t01=0x0180}
0x04fb0…04fde               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x0033, t01=0x001a}
0x04fde…05012               Head {h00=0x0030, h01=0x0050, text=» CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x0033, t01=0x0048}
0x05012…05024               Head {h00=0x000e, h01=0x0050, text=» RB CKM110«, t00=0x0033, t01=0x007c}
0x05024…0502e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0033, t01=0x008e}
0x0502e…05036               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x0098}
0x05036…0507a               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0033, t01=0x00a0}
0x0507a…05084               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00e4}
0x05084…0509e               Head {h00=0x0016, h01=0x0050, text=»*    ABORT ROUTINE«, t00=0x0033, t01=0x00ee}
0x0509e…050a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0108}
0x050a8…050c8               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0033, t01=0x0112}
0x050c8…050d0               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x0132}
0x050d0…050fa               Head {h00=0x0026, h01=0x0050, text=»ABORT LD A1,DWTTP,A6 TIMER POINTER«, t00=0x0033, t01=0x013a}
0x050fa…05120               Head {h00=0x0022, h01=0x0050, text=» RF(Z) AB:10 NO TIMER RUNNING «, t00=0x0033, t01=0x0164}
0x05120…05140               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 KILL TIMER«, t00=0x0033, t01=0x018a}
0x05140…05154               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0034, t01=0x001a}
0x05154…0515c               Head {h00=0x0004, h01=0x0050, t00=0x0034, t01=0x002e}
0x0515c…05184               Head {h00=0x0024, h01=0x0050, text=»AB:10 LD A1,DWTOR,A6 ORDER CODE «, t00=0x0034, t01=0x0036}
0x05184…05196               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0034, t01=0x005e}
0x05196…051c4               Head {h00=0x002a, h01=0x0050, text=» RF(Z) AB:RTN READ REQUEST. NO ACTION «, t00=0x0034, t01=0x0070}
0x051c4…051d6               Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x0034, t01=0x009e}
0x051d6…05208               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE«, t00=0x0034, t01=0x00b0}
0x05208…05210               Head {h00=0x0004, h01=0x0050, t00=0x0034, t01=0x00e2}
0x05210…05242               Head {h00=0x002e, h01=0x0050, text=» CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE«, t00=0x0034, t01=0x00ea}
0x05242…0526c               Head {h00=0x0026, h01=0x0050, text=» LD A2,FDWTUT WRITING DWT ADDRESS «, t00=0x0034, t01=0x011c}
0x0526c…0527e               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0034, t01=0x0146}
0x0527e…052a2               Head {h00=0x0020, h01=0x0050, text=» RF(NE) AB:RTN NOT THIS DWT «, t00=0x0034, t01=0x0158}
0x052a2…052c6               Head {h00=0x0020, h01=0x0050, text=» CM XACK RESET ACK EXPECTED «, t00=0x0034, t01=0x017c}
0x052c6…052ea               Head {h00=0x0020, h01=0x0050, text=» CM FDWTUT RESET WRITING DWT«, t00=0x0035, t01=0x0010}
0x052ea…052f2               Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x0034}
0x052f2…05306               Head {h00=0x0010, h01=0x0050, text=»AB:RTN EQU *«, t00=0x0035, t01=0x003c}
0x05306…0531c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0035, t01=0x0050}
0x0531c…05330               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0035, t01=0x0066}
0x05330…05358               Head {h00=0x0024, h01=0x0050, text=» ABR* A15 RETURN IN INHIBIT MODE«, t00=0x0035, t01=0x007a}
0x05358…05364               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x00a2}
0x05364…0537a               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0035, t01=0x00ae}
0x0537a…0538a               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0035, t01=0x00c4}
0x0538a…05396               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x00d4}
0x05396…053a0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0035, t01=0x00e0}
0x053a0…053a8               Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x00ea}
0x053a8…053b2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0035, t01=0x00f2}
0x053b2…053bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00fc}
0x053bc…053c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0106}
0x053c6…053e4               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0035, t01=0x0110}
0x053e4…0540c               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0035, t01=0x012e}
0x0540c…05416               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0156}
0x05416…05428               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0035, t01=0x0160}
0x05428…05450               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0035, t01=0x0172}
0x05450…0545a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x000a}
0x0545a…05464               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0014}
0x05464…0547c               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0036, t01=0x001e}
0x0547c…05490               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0036, t01=0x0036}
0x05490…054a4               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0036, t01=0x004a}
0x054a4…054b8               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0036, t01=0x005e}
0x054b8…054cc               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0036, t01=0x0072}
0x054cc…054e0               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0036, t01=0x0086}
0x054e0…054fa               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0036, t01=0x009a}
0x054fa…05504               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0036, t01=0x00b4}
0x05504…0551c               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0036, t01=0x00be}
0x0551c…05530               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0036, t01=0x00d6}
0x05530…05542               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0036, t01=0x00ea}
0x05542…05556               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0036, t01=0x00fc}
0x05556…05568               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0036, t01=0x0110}
0x05568…0557c               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0036, t01=0x0122}
0x0557c…0558e               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0036, t01=0x0136}
0x0558e…055a2               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0036, t01=0x0148}
0x055a2…055b4               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0036, t01=0x015c}
0x055b4…055c8               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0036, t01=0x016e}
0x055c8…055da               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0036, t01=0x0182}
0x055da…055ee (55, 0, 400)  Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0037, t01=0x0004}
0x055ee…05602               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0037, t01=0x0018}
0x05602…05616               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0037, t01=0x002c}
0x05616…05628               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0037, t01=0x0040}
0x05628…05632               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0037, t01=0x0052}
0x05632…0563c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x005c}
0x0563c…05646               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0066}
0x05646…0565c               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0037, t01=0x0070}
0x0565c…05666               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0086}
0x05666…05670               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0090}
0x05670…0569e               Head {h00=0x002a, h01=0x0050, text=»TIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK«, t00=0x0037, t01=0x009a}
0x0569e…056c4               Head {h00=0x0022, h01=0x0050, text=»TIMNAK EQU 3 DELAY FOR NAK DK «, t00=0x0037, t01=0x00c8}
0x056c4…056ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00ee}
0x056ce…056d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00f8}
0x056d8…056f4               Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0037, t01=0x0102}
0x056f4…056fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x011e}
0x056fe…05728               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0037, t01=0x0128}
0x05728…0573c               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0037, t01=0x0152}
0x0573c…05750               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0037, t01=0x0166}
0x05750…05764               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0037, t01=0x017a}
0x05764…05778               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0037, t01=0x018e}
0x05778…0578c               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0038, t01=0x0012}
0x0578c…057a0               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0038, t01=0x0026}
0x057a0…057b4               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0038, t01=0x003a}
0x057b4…057c8               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0038, t01=0x004e}
0x057c8…057dc               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0038, t01=0x0062}
0x057dc…057f0               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0038, t01=0x0076}
0x057f0…05804               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0038, t01=0x008a}
0x05804…05818               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0038, t01=0x009e}
0x05818…0582a               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0038, t01=0x00b2}
0x0582a…05840               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0038, t01=0x00c4}
0x05840…05856               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0038, t01=0x00da}
0x05856…0586a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0038, t01=0x00f0}
0x0586a…0587e               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0038, t01=0x0104}
0x0587e…05892               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0038, t01=0x0118}
0x05892…058a6               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0038, t01=0x012c}
0x058a6…058ba               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0038, t01=0x0140}
0x058ba…058ce               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0038, t01=0x0154}
0x058ce…058e2               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0038, t01=0x0168}
0x058e2…058f6               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0038, t01=0x017c}
0x058f6…05902               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0190}
0x05902…05916               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0039, t01=0x000c}
0x05916…0592a               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0039, t01=0x0020}
0x0592a…0595e               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0039, t01=0x0034}
0x0595e…0596a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0068}
0x0596a…0597e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0039, t01=0x0074}
0x0597e…05992               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0039, t01=0x0088}
0x05992…059a6               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0039, t01=0x009c}
0x059a6…059be               Head {h00=0x0014, h01=0x0050, text=»RVI EQU XRVI  DK«, t00=0x0039, t01=0x00b0}
0x059be…059d2               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0039, t01=0x00c8}
0x059d2…059e6               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0039, t01=0x00dc}
0x059e6…059fc               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0039, t01=0x00f0}
0x059fc…05a08               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0106}
0x05a08…05a12               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0039, t01=0x0112}
0x05a12…05a1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x011c}
0x05a1c…05a26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0126}
0x05a26…05a44               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0039, t01=0x0130}
0x05a44…05a4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x014e}
0x05a4e…05a58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0158}
0x05a58…05a86               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0039, t01=0x0162}
0x05a86…05ab8               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0039, t01=0x0190}
0x05ab8…05ad8               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x003a, t01=0x0032}
0x05ad8…05af4               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x003a, t01=0x0052}
0x05af4…05b10               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x003a, t01=0x006e}
0x05b10…05b46               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x003a, t01=0x008a}
0x05b46…05b6c               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x003a, t01=0x00c0}
0x05b6c…05b8c               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x003a, t01=0x00e6}
0x05b8c…05bba               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x003a, t01=0x0106}
0x05bba…05bc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0134}
0x05bc4…05be2               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x003a, t01=0x013e}
0x05be2…05c0e               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x003a, t01=0x015c}
0x05c0e…05c38               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x003a, t01=0x0188}
0x05c38…05c58               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x003b, t01=0x0022}
0x05c58…05c8c               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x003b, t01=0x0042}
0x05c8c…05cb4               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x003b, t01=0x0076}
0x05cb4…05ce6               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x003b, t01=0x009e}
0x05ce6…05d16               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x003b, t01=0x00d0}
0x05d16…05d42               Head {h00=0x0028, h01=0x0050, text=»CRDBUF DATA 0 READ BUFFER COUNTER DK«, t00=0x003b, t01=0x0100}
0x05d42…05d4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x012c}
0x05d4c…05d56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0136}
0x05d56…05d7e               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x003b, t01=0x0140}
0x05d7e…05d88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0168}
0x05d88…05d92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0172}
0x05d92…05da6               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x003b, t01=0x017c}
0x05da6…05dd8               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x003b, t01=0x0190}
0x05dd8…05de2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0032}
0x05de2…05dec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x003c}
0x05dec…05e00               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x003c, t01=0x0046}
0x05e00…05e14               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x003c, t01=0x005a}
0x05e14…05e1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x006e}
0x05e1e…05e54               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x003c, t01=0x0078}
0x05e54…05e84               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x003c, t01=0x00ae}
0x05e84…05e90               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x00de}
0x05e90…05e9a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x003c, t01=0x00ea}
0x05e9a…05ea4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00f4}
0x05ea4…05eae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00fe}
0x05eae…05eca               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x003c, t01=0x0108}
0x05eca…05ed4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0124}
0x05ed4…05efa               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x003c, t01=0x012e}
0x05efa…05f24               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x003c, t01=0x0154}
0x05f24…05f2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x017e}
0x05f2e…05f38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0188}
0x05f38…05f54 (61, 0, 400)  Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003d, t01=0x0004}
0x05f54…05f84               Head {h00=0x002c, h01=0x0050, text=»BRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ«, t00=0x003d, t01=0x0020}
0x05f84…05f9a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x0050}
0x05f9a…05fac               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x003d, t01=0x0066}
0x05fac…05fd0               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x003d, t01=0x0078}
0x05fd0…05fec               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003d, t01=0x009c}
0x05fec…06022               Head {h00=0x0032, h01=0x0050, text=» CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS «, t00=0x003d, t01=0x00b8}
0x06022…06038               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x00ee}
0x06038…06054               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003d, t01=0x0104}
0x06054…06088               Head {h00=0x0030, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ«, t00=0x003d, t01=0x0120}
0x06088…0609e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x0154}
0x0609e…060b2               Head {h00=0x0010, h01=0x0050, text=»BRM010 EQU *«, t00=0x003d, t01=0x016a}
0x060b2…060d4               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x003d, t01=0x017e}
0x060d4…06108               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN«, t00=0x003e, t01=0x0010}
0x06108…0611e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x0044}
0x0611e…0613a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003e, t01=0x005a}
0x0613a…0614e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x003e, t01=0x0076}
0x0614e…06186               Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN «, t00=0x003e, t01=0x008a}
0x06186…0619c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x00c2}
0x0619c…061b8               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003e, t01=0x00d8}
0x061b8…061de               Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x003e, t01=0x00f4}
0x061de…061f4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x011a}
0x061f4…06210               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003e, t01=0x0130}
0x06210…0622c               Head {h00=0x0018, h01=0x0050, text=» IFF CODE=1  SALCUZ «, t00=0x003e, t01=0x014c}
0x0622c…06248               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x003e, t01=0x0168}
0x06248…06276               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003e, t01=0x0184}
0x06276…06292               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x003f, t01=0x0022}
0x06292…062c8               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003f, t01=0x003e}
0x062c8…062e6               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003f, t01=0x0074}
0x062e6…062fc               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003f, t01=0x0092}
0x062fc…0631e               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=2  SALCUZ «, t00=0x003f, t01=0x00a8}
0x0631e…06338               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x003f, t01=0x00ca}
0x06338…06366               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003f, t01=0x00e4}
0x06366…06384               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x003f, t01=0x0112}
0x06384…063ba               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003f, t01=0x0130}
0x063ba…063d8               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003f, t01=0x0166}
0x063d8…063ee               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003f, t01=0x0184}
0x063ee…06402               Head {h00=0x0010, h01=0x0050, text=»BRM100 EQU *«, t00=0x0040, t01=0x000a}
0x06402…0642a               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0040, t01=0x001e}
0x0642a…0644e               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x0040, t01=0x0046}
0x0644e…06460               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0040, t01=0x006a}
0x06460…06474               Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x0040, t01=0x007c}
0x06474…06496               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x0040, t01=0x0090}
0x06496…064ae               Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x0040, t01=0x00b2}
0x064ae…064d0               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x0040, t01=0x00ca}
0x064d0…064e8               Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x0040, t01=0x00ec}
0x064e8…0650c               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x0040, t01=0x0104}
0x0650c…06524               Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x0040, t01=0x0128}
0x06524…06548               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x0040, t01=0x0140}
0x06548…06560               Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x0040, t01=0x0164}
0x06560…06584               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x0040, t01=0x017c}
0x06584…06598               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0041, t01=0x0010}
0x06598…065aa               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x0041, t01=0x0024}
0x065aa…065d2               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0041, t01=0x0036}
0x065d2…065f6               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x0041, t01=0x005e}
0x065f6…06608               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x0041, t01=0x0082}
0x06608…06632               Head {h00=0x0026, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESSING «, t00=0x0041, t01=0x0094}
0x06632…0663e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x00be}
0x0663e…06650               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0041, t01=0x00ca}
0x06650…06668               Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x0041, t01=0x00dc}
0x06668…06686               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x0041, t01=0x00f4}
0x06686…06698               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0041, t01=0x0112}
0x06698…066ae               Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x0041, t01=0x0124}
0x066ae…066d2               Head {h00=0x0020, h01=0x0050, text=» RF(NE) BRM150 NOT THIS TCU «, t00=0x0041, t01=0x013a}
0x066d2…066e6               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x0041, t01=0x015e}
0x066e6…06708               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x0041, t01=0x0172}
0x06708…0672c (66, 0, 400)  Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x0042, t01=0x0004}
0x0672c…0673e               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x0042, t01=0x0028}
0x0673e…06752               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0042, t01=0x003a}
0x06752…06774               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x0042, t01=0x004e}
0x06774…06798               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x0042, t01=0x0070}
0x06798…067aa               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x0042, t01=0x0094}
0x067aa…067da               Head {h00=0x002c, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESS SEQUENCE «, t00=0x0042, t01=0x00a6}
0x067da…067e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x00d6}
0x067e6…0680c               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ READ ONE CHARACTER«, t00=0x0042, t01=0x00e2}
0x0680c…06828               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0042, t01=0x0108}
0x06828…06840               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0042, t01=0x0124}
0x06840…06856               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0042, t01=0x013c}
0x06856…06872               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0042, t01=0x0152}
0x06872…0688e               Head {h00=0x0018, h01=0x0050, text=» SUK A2,ENQ  SALCUZ «, t00=0x0042, t01=0x016e}
0x0688e…068a4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0042, t01=0x018a}
0x068a4…068c2               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) BRM150 NOT ENQ«, t00=0x0043, t01=0x0010}
0x068c2…068de               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0043, t01=0x002e}
0x068de…06906               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ READ LAST CHARACTER «, t00=0x0043, t01=0x004a}
0x06906…0690e               Head {h00=0x0004, h01=0x0050, t00=0x0043, t01=0x0072}
0x0690e…06934               Head {h00=0x0022, h01=0x0050, text=»* TRAILING PAD CAN BE CHECKED «, t00=0x0043, t01=0x007a}
0x06934…0693c               Head {h00=0x0004, h01=0x0050, t00=0x0043, t01=0x00a0}
0x0693c…0695e               Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,LCUIN HALT INPUT«, t00=0x0043, t01=0x00a8}
0x0695e…06974               Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUIN «, t00=0x0043, t01=0x00ca}
0x06974…0698a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0043, t01=0x00e0}
0x0698a…069a6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0043, t01=0x00f6}
0x069a6…069ce               Head {h00=0x0024, h01=0x0050, text=» CF A5,HALTIN HALT INPUT SALCUZ «, t00=0x0043, t01=0x0112}
0x069ce…06a00               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) BRM010 PARITY ERROR SALCUZ  SALCUZ«, t00=0x0043, t01=0x013a}
0x06a00…06a16               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0043, t01=0x016c}
0x06a16…06a28               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0043, t01=0x0182}
0x06a28…06a4c (68, 0, 400)  Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK COUNTER«, t00=0x0044, t01=0x0004}
0x06a4c…06a5e               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x0044, t01=0x0028}
0x06a5e…06a70               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x0044, t01=0x003a}
0x06a70…06a90               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x0044, t01=0x004c}
0x06a90…06aa2               Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x0044, t01=0x006c}
0x06aa2…06ac4               Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x0044, t01=0x007e}
0x06ac4…06ad8               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0044, t01=0x00a0}
0x06ad8…06b12               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x0044, t01=0x00b4}
0x06b12…06b1e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x00ee}
0x06b1e…06b32               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0044, t01=0x00fa}
0x06b32…06b5c               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0044, t01=0x010e}
0x06b5c…06b68               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x0138}
0x06b68…06b8a               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0044, t01=0x0144}
0x06b8a…06bae               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x0044, t01=0x0166}
0x06bae…06bca               Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x0044, t01=0x018a}
0x06bca…06bde               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x0045, t01=0x0016}
0x06bde…06c08               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0045, t01=0x002a}
0x06c08…06c2a               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0045, t01=0x0054}
0x06c2a…06c4a               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x0045, t01=0x0076}
0x06c4a…06c60               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=0   «, t00=0x0045, t01=0x0096}
0x06c60…06c88               Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x0045, t01=0x00ac}
0x06c88…06c9c               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0045, t01=0x00d4}
0x06c9c…06cb0               Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x0045, t01=0x00e8}
0x06cb0…06cc0               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0045, t01=0x00fc}
0x06cc0…06cd6               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=1   «, t00=0x0045, t01=0x010c}
0x06cd6…06cf6               Head {h00=0x001c, h01=0x0050, text=» ABL BRM INVALID ADDRESS«, t00=0x0045, t01=0x0122}
0x06cf6…06d06               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0045, t01=0x0142}
0x06d06…06d10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0152}
0x06d10…06d40               Head {h00=0x002c, h01=0x0050, text=»*   WAIT FOR MARK HOLD TO RESYNCHRONIZE «, t00=0x0045, t01=0x015c}
0x06d40…06d4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x018c}
0x06d4a…06d5e               Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0046, t01=0x0008}
0x06d5e…06d72               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0046, t01=0x001c}
0x06d72…06d86               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0046, t01=0x0030}
0x06d86…06da6               Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM RESYNCHRONIZE«, t00=0x0046, t01=0x0044}
0x06da6…06dd0               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ ANOTHER CHARACTER«, t00=0x0046, t01=0x0064}
0x06dd0…06de2               Head {h00=0x000e, h01=0x0050, text=» RB BRM150«, t00=0x0046, t01=0x008e}
0x06de2…06dec               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0046, t01=0x00a0}
0x06dec…06df6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00aa}
0x06df6…06e00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00b4}
0x06e00…06e20               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0046, t01=0x00be}
0x06e20…06e2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00de}
0x06e2a…06e34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00e8}
0x06e34…06e48               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0046, t01=0x00f2}
0x06e48…06e72               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0046, t01=0x0106}
0x06e72…06e86               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0046, t01=0x0130}
0x06e86…06ea8               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0046, t01=0x0144}
0x06ea8…06eb4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x0166}
0x06eb4…06ec8               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0046, t01=0x0172}
0x06ec8…06ef2               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0046, t01=0x0186}
0x06ef2…06f18               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0047, t01=0x0020}
0x06f18…06f3c               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0047, t01=0x0046}
0x06f3c…06f56               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0047, t01=0x006a}
0x06f56…06f82               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0047, t01=0x0084}
0x06f82…06f96               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0047, t01=0x00b0}
0x06f96…06fbc               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0047, t01=0x00c4}
0x06fbc…06fd0               Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0047, t01=0x00ea}
0x06fd0…06ff2               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0047, t01=0x00fe}
0x06ff2…07002               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0047, t01=0x0120}
0x07002…0700c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0047, t01=0x0130}
0x0700c…07016               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x013a}
0x07016…07020               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0144}
0x07020…07040               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0047, t01=0x014e}
0x07040…0704a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x016e}
0x0704a…07054               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0178}
0x07054…07068               Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0047, t01=0x0182}
0x07068…0707c               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0048, t01=0x0008}
0x0707c…07090               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0048, t01=0x001c}
0x07090…070b2               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0048, t01=0x0030}
0x070b2…070c8               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0048, t01=0x0052}
0x070c8…070f2               Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0048, t01=0x0068}
0x070f2…07106               Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0048, t01=0x0092}
0x07106…07128               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0048, t01=0x00a6}
0x07128…0713a               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0048, t01=0x00c8}
0x0713a…0715c               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0048, t01=0x00da}
0x0715c…07170               Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0048, t01=0x00fc}
0x07170…0719c               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0048, t01=0x0110}
0x0719c…071b0               Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0048, t01=0x013c}
0x071b0…071ce               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0048, t01=0x0150}
0x071ce…071de               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0048, t01=0x016e}
0x071de…071f2               Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0048, t01=0x017e}
0x071f2…07206 (73, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0049, t01=0x0004}
0x07206…0721a               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0049, t01=0x0018}
0x0721a…07244               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0049, t01=0x002c}
0x07244…0725a               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0049, t01=0x0056}
0x0725a…07284               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0049, t01=0x006c}
0x07284…072aa               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0049, t01=0x0096}
0x072aa…072de               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0049, t01=0x00bc}
0x072de…072fa               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0049, t01=0x00f0}
0x072fa…07306               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x010c}
0x07306…0731a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0049, t01=0x0118}
0x0731a…0734a               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0049, t01=0x012c}
0x0734a…07378               Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTECB,A6 SAVE CURRENT ECB DK6 «, t00=0x0049, t01=0x015c}
0x07378…07396               Head {h00=0x001a, h01=0x0050, text=» ST A1,DWTCUR,A6  DK6 «, t00=0x0049, t01=0x018a}
0x07396…073b0               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x004a, t01=0x0018}
0x073b0…073dc               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x004a, t01=0x0032}
0x073dc…073fc               Head {h00=0x001c, h01=0x0050, text=» CM CACK PRESET ACK-1 =7«, t00=0x004a, t01=0x005e}
0x073fc…07420               Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x004a, t01=0x007e}
0x07420…0742c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x00a2}
0x0742c…07458               Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x004a, t01=0x00ae}
0x07458…07470               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x004a, t01=0x00da}
0x07470…07488               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x004a, t01=0x00f2}
0x07488…0749a               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x004a, t01=0x010a}
0x0749a…074b2               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x004a, t01=0x011c}
0x074b2…074ca               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ  =8 «, t00=0x004a, t01=0x0134}
0x074ca…074dc               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x004a, t01=0x014c}
0x074dc…07508               Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x004a, t01=0x015e}
0x07508…0751a               Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x004a, t01=0x018a}
0x0751a…0752e               Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x004b, t01=0x000c}
0x0752e…07552               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x004b, t01=0x0020}
0x07552…0757a               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x004b, t01=0x0044}
0x0757a…0758c               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x004b, t01=0x006c}
0x0758c…075a0               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x004b, t01=0x007e}
0x075a0…075c6               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x004b, t01=0x0092}
0x075c6…075da               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x004b, t01=0x00b8}
0x075da…075ee               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x004b, t01=0x00cc}
0x075ee…07600               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x004b, t01=0x00e0}
0x07600…07624               Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x004b, t01=0x00f2}
0x07624…07636               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x004b, t01=0x0116}
0x07636…0765a               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x004b, t01=0x0128}
0x0765a…0766c               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x004b, t01=0x014c}
0x0766c…07682               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x004b, t01=0x015e}
0x07682…076ae               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x004b, t01=0x0174}
0x076ae…076cc               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x004c, t01=0x0010}
0x076cc…076f6               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x004c, t01=0x002e}
0x076f6…07702               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x0058}
0x07702…07716               Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x004c, t01=0x0064}
0x07716…07728               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x004c, t01=0x0078}
0x07728…07752               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x004c, t01=0x008a}
0x07752…07762               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x004c, t01=0x00b4}
0x07762…07790               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x004c, t01=0x00c4}
0x07790…077a2               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x004c, t01=0x00f2}
0x077a2…077c6               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x004c, t01=0x0104}
0x077c6…077d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0128}
0x077d0…077f6               Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x004c, t01=0x0132}
0x077f6…07800               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0158}
0x07800…07814               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x004c, t01=0x0162}
0x07814…07828               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x004c, t01=0x0176}
0x07828…07842               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x004c, t01=0x018a}
0x07842…07858               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x004d, t01=0x0014}
0x07858…0786e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x004d, t01=0x002a}
0x0786e…07882               Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x004d, t01=0x0040}
0x07882…0788e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x0054}
0x0788e…078a2               Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x004d, t01=0x0060}
0x078a2…078b8               Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x004d, t01=0x0074}
0x078b8…078e8               Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x004d, t01=0x008a}
0x078e8…0790a               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004d, t01=0x00ba}
0x0790a…0792a               Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x004d, t01=0x00dc}
0x0792a…07944               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004d, t01=0x00fc}
0x07944…07964               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004d, t01=0x0116}
0x07964…0798e               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM327 ANY MESSAGE ORDER =4«, t00=0x004d, t01=0x0136}
0x0798e…079a0               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x004d, t01=0x0160}
0x079a0…079b2               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x004d, t01=0x0172}
0x079b2…079ca               Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x004d, t01=0x0184}
0x079ca…079f0               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x004e, t01=0x000c}
0x079f0…07a04               Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x004e, t01=0x0032}
0x07a04…07a1e               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x004e, t01=0x0046}
0x07a1e…07a46               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x004e, t01=0x0060}
0x07a46…07a66               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x004e, t01=0x0088}
0x07a66…07a94               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x004e, t01=0x00a8}
0x07a94…07abe               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x004e, t01=0x00d6}
0x07abe…07aea               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x004e, t01=0x0100}
0x07aea…07af4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x004e, t01=0x012c}
0x07af4…07afe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0136}
0x07afe…07b08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0140}
0x07b08…07b3c               Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x004e, t01=0x014a}
0x07b3c…07b46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x017e}
0x07b46…07b50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0188}
0x07b50…07b64 (79, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004f, t01=0x0004}
0x07b64…07b84               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x004f, t01=0x0018}
0x07b84…07b98               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004f, t01=0x0038}
0x07b98…07bba               Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x004f, t01=0x004c}
0x07bba…07be4               Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTINF,A6 GET DWT INFO DK5 «, t00=0x004f, t01=0x006e}
0x07be4…07c04               Head {h00=0x001c, h01=0x0050, text=» ANK A3,1 GET LPBIT DK5 «, t00=0x004f, t01=0x0098}
0x07c04…07c24               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM328 NOT LP DK5«, t00=0x004f, t01=0x00b8}
0x07c24…07c36               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x004f, t01=0x00d8}
0x07c36…07c4c               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004f, t01=0x00ea}
0x07c4c…07c6e               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004f, t01=0x0100}
0x07c6e…07c94               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/A SET WACK INDICATION«, t00=0x004f, t01=0x0122}
0x07c94…07cac               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004f, t01=0x0148}
0x07cac…07cc0               Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004f, t01=0x0160}
0x07cc0…07ccc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x0174}
0x07ccc…07ce6               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004f, t01=0x0180}
0x07ce6…07d06               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x0050, t01=0x000a}
0x07d06…07d36               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 «, t00=0x0050, t01=0x002a}
0x07d36…07d60               Head {h00=0x0026, h01=0x0050, text=» SUK A4,6 ADJUST BUFFER ADDRESS =4«, t00=0x0050, t01=0x005a}
0x07d60…07d8c               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE MESSAGE ON DWT =4«, t00=0x0050, t01=0x0084}
0x07d8c…07da2               Head {h00=0x0012, h01=0x0050, text=» RF BRM32A  =4«, t00=0x0050, t01=0x00b0}
0x07da2…07db2               Head {h00=0x000c, h01=0x0050, text=» XIF  =4«, t00=0x0050, t01=0x00c6}
0x07db2…07dca               Head {h00=0x0014, h01=0x0050, text=»BRM329 EQU *  =4«, t00=0x0050, t01=0x00d6}
0x07dca…07dd2               Head {h00=0x0004, h01=0x0050, t00=0x0050, t01=0x00ee}
0x07dd2…07df6               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0050, t01=0x00f6}
0x07df6…07e20               Head {h00=0x0026, h01=0x0050, text=» CF A15,DC:MIN MOVE TO USER BUFFER«, t00=0x0050, t01=0x011a}
0x07e20…07e32               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x0050, t01=0x0144}
0x07e32…07e4a               Head {h00=0x0014, h01=0x0050, text=»BRM32A EQU *  =4«, t00=0x0050, t01=0x0156}
0x07e4a…07e52               Head {h00=0x0004, h01=0x0050, t00=0x0050, t01=0x016e}
0x07e52…07e7a               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0050, t01=0x0176}
0x07e7a…07e8c               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x0051, t01=0x000e}
0x07e8c…07e96               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0051, t01=0x0020}
0x07e96…07eaa               Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x0051, t01=0x002a}
0x07eaa…07ec4               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0051, t01=0x003e}
0x07ec4…07ee6               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 STATUS =4 «, t00=0x0051, t01=0x0058}
0x07ee6…07f0a               Head {h00=0x0020, h01=0x0050, text=» RF(N) BRM335 NO REQUEST =4 «, t00=0x0051, t01=0x007a}
0x07f0a…07f2a               Head {h00=0x001c, h01=0x0050, text=» LD A1,DWTOR,A6 ORDER =4«, t00=0x0051, t01=0x009e}
0x07f2a…07f5a               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 «, t00=0x0051, t01=0x00be}
0x07f5a…07f84               Head {h00=0x0026, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST =4«, t00=0x0051, t01=0x00ee}
0x07f84…07f9c               Head {h00=0x0014, h01=0x0050, text=»BRM335 EQU *  =4«, t00=0x0051, t01=0x0118}
0x07f9c…07fae               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0051, t01=0x0130}
0x07fae…07fd0               Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x0051, t01=0x0142}
0x07fd0…07ffc               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x0051, t01=0x0164}
0x07ffc…0802e               Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x0051, t01=0x0190}
0x0802e…08042               Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x0052, t01=0x0032}
0x08042…08064               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x0052, t01=0x0046}
0x08064…08074               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0052, t01=0x0068}
0x08074…08088               Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x0052, t01=0x0078}
0x08088…0809c               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0052, t01=0x008c}
0x0809c…080cc               Head {h00=0x002c, h01=0x0050, text=» LD A1,DWTINF,A6 READ-MOD. RECEIVED? DK7«, t00=0x0052, t01=0x00a0}
0x080cc…080e8               Head {h00=0x0018, h01=0x0050, text=» ANKL A1,/0002  DK7 «, t00=0x0052, t01=0x00d0}
0x080e8…08120               Head {h00=0x0034, h01=0x0050, text=» RF(NZ) BRM410 WAIT FOR RESPONSE FROM APPL. DK7 «, t00=0x0052, t01=0x00ec}
0x08120…08138               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0052, t01=0x0124}
0x08138…0814a               Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x0052, t01=0x013c}
0x0814a…08172               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x0052, t01=0x014e}
0x08172…08192               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x0052, t01=0x0176}
0x08192…081a4               Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x0053, t01=0x0008}
0x081a4…081b0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x001a}
0x081b0…081c4               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0053, t01=0x0026}
0x081c4…081d6               Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x0053, t01=0x003a}
0x081d6…081e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x004c}
0x081e2…081ec               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0053, t01=0x0058}
0x081ec…081f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0062}
0x081f6…08200               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x006c}
0x08200…08230               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x0053, t01=0x0076}
0x08230…0823a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00a6}
0x0823a…08244               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00b0}
0x08244…08258               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0053, t01=0x00ba}
0x08258…08280               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x0053, t01=0x00ce}
0x08280…08294               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x0053, t01=0x00f6}
0x08294…082ba               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x0053, t01=0x010a}
0x082ba…082f2               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x0053, t01=0x0130}
0x082f2…08304               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0053, t01=0x0168}
0x08304…0832e               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0053, t01=0x017a}
0x0832e…0833c               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x0054, t01=0x0014}
0x0833c…08370               Head {h00=0x0030, h01=0x0050, text=» LDK A1,/02 INDICATE READ-MOD. RECEIVED DK7 «, t00=0x0054, t01=0x0022}
0x08370…0838e               Head {h00=0x001a, h01=0x0050, text=» ORS A1,DWTINF,A6  DK7«, t00=0x0054, t01=0x0056}
0x0838e…083c4               Head {h00=0x0032, h01=0x0050, text=» LDKL A1,/4000 SET RETURN CODE =READ-MOD. DK7 «, t00=0x0054, t01=0x0074}
0x083c4…083f0               Head {h00=0x0028, h01=0x0050, text=» RB BRM32A COMPLETE THE REQUEST DK7 «, t00=0x0054, t01=0x00aa}
0x083f0…083fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x00d6}
0x083fc…08406               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00e2}
0x08406…08410               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00ec}
0x08410…08430               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x0054, t01=0x00f6}
0x08430…0843a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0116}
0x0843a…08444               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0120}
0x08444…08458               Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x0054, t01=0x012a}
0x08458…08482               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0054, t01=0x013e}
0x08482…08496               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0054, t01=0x0168}
0x08496…084c6               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM510 RETRANSMISSION OF MESSAGE«, t00=0x0054, t01=0x017c}
0x084c6…084da               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0055, t01=0x001c}
0x084da…08500               Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x0055, t01=0x0030}
0x08500…08532               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x0055, t01=0x0056}
0x08532…08546               Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x0055, t01=0x0088}
0x08546…08556               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0055, t01=0x009c}
0x08556…08560               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0055, t01=0x00ac}
0x08560…0856a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00b6}
0x0856a…08574               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00c0}
0x08574…08594               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x0055, t01=0x00ca}
0x08594…0859e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00ea}
0x0859e…085a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00f4}
0x085a8…085bc               Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x0055, t01=0x00fe}
0x085bc…085e6               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0055, t01=0x0112}
0x085e6…085fa               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0055, t01=0x013c}
0x085fa…0861e               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x0055, t01=0x0150}
0x0861e…08632               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0055, t01=0x0174}
0x08632…08658               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x0055, t01=0x0188}
0x08658…0866a               Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x0056, t01=0x001e}
0x0866a…0867e               Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x0056, t01=0x0030}
0x0867e…0868c               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x0056, t01=0x0044}
0x0868c…0869e               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0056, t01=0x0052}
0x0869e…086ba               Head {h00=0x0018, h01=0x0050, text=» CIO A1,0,LCUIN  DK «, t00=0x0056, t01=0x0064}
0x086ba…086d4               Head {h00=0x0016, h01=0x0050, text=» SST A1,LCUIN  DK «, t00=0x0056, t01=0x0080}
0x086d4…086ee               Head {h00=0x0016, h01=0x0050, text=» CF A15,STREG  DK «, t00=0x0056, t01=0x009a}
0x086ee…08708               Head {h00=0x0016, h01=0x0050, text=» CF A15,SETIME  DK«, t00=0x0056, t01=0x00b4}
0x08708…08728               Head {h00=0x001c, h01=0x0050, text=» DATA BRM520,TIMNAK  DK «, t00=0x0056, t01=0x00ce}
0x08728…0873e               Head {h00=0x0012, h01=0x0050, text=» ABL TDISP  DK«, t00=0x0056, t01=0x00ee}
0x0873e…08756               Head {h00=0x0014, h01=0x0050, text=»BRM520 EQU *  DK«, t00=0x0056, t01=0x0104}
0x08756…08770               Head {h00=0x0016, h01=0x0050, text=» CF A15,LDREG  DK «, t00=0x0056, t01=0x011c}
0x08770…0877e               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x0056, t01=0x0136}
0x0877e…087a4               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0056, t01=0x0144}
0x087a4…087b8               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0056, t01=0x016a}
0x087b8…087cc               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0056, t01=0x017e}
0x087cc…08800 (87, 0, 400)  Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x0057, t01=0x0004}
0x08800…0880c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x0038}
0x0880c…08840               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x0057, t01=0x0044}
0x08840…0886a               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x0057, t01=0x0078}
0x0886a…0887e               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0057, t01=0x00a2}
0x0887e…08892               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0057, t01=0x00b6}
0x08892…0889c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00ca}
0x0889c…088a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00d4}
0x088a6…088c6               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x0057, t01=0x00de}
0x088c6…088d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00fe}
0x088d0…088da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0108}
0x088da…088ee               Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x0057, t01=0x0112}
0x088ee…08918               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0057, t01=0x0126}
0x08918…0892c               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0057, t01=0x0150}
0x0892c…08952               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 ACK NOT EXPECTED«, t00=0x0057, t01=0x0164}
0x08952…0897c               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x0057, t01=0x018a}
0x0897c…08994               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0058, t01=0x0024}
0x08994…089ac               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x0058, t01=0x003c}
0x089ac…089be               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0058, t01=0x0054}
0x089be…089d6               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0058, t01=0x0066}
0x089d6…089ee               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0  =8«, t00=0x0058, t01=0x007e}
0x089ee…08a00               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0058, t01=0x0096}
0x08a00…08a16               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x0058, t01=0x00a8}
0x08a16…08a20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00be}
0x08a20…08a3a               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x0058, t01=0x00c8}
0x08a3a…08a44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00e2}
0x08a44…08a66               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x0058, t01=0x00ec}
0x08a66…08a8a               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0058, t01=0x010e}
0x08a8a…08a9e               Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0058, t01=0x0132}
0x08a9e…08abc               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0058, t01=0x0146}
0x08abc…08ae6               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0058, t01=0x0164}
0x08ae6…08af8               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0058, t01=0x018e}
0x08af8…08b0c               Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0059, t01=0x0010}
0x08b0c…08b20               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0059, t01=0x0024}
0x08b20…08b36               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0059, t01=0x0038}
0x08b36…08b40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x004e}
0x08b40…08b5a               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0059, t01=0x0058}
0x08b5a…08b64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0072}
0x08b64…08b88               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0059, t01=0x007c}
0x08b88…08bb0               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0059, t01=0x00a0}
0x08bb0…08bc4               Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0059, t01=0x00c8}
0x08bc4…08bd8               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0059, t01=0x00dc}
0x08bd8…08bfa               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0059, t01=0x00f0}
0x08bfa…08c04               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0059, t01=0x0112}
0x08c04…08c0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x011c}
0x08c0e…08c3e               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0059, t01=0x0126}
0x08c3e…08c48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0156}
0x08c48…08c62               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0059, t01=0x0160}
0x08c62…08c76               Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0059, t01=0x017a}
0x08c76…08c8a               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0059, t01=0x018e}
0x08c8a…08c9e               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x005a, t01=0x0012}
0x08c9e…08cd0               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x005a, t01=0x0026}
0x08cd0…08cdc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x0058}
0x08cdc…08d08               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x005a, t01=0x0064}
0x08d08…08d1c               Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x005a, t01=0x0090}
0x08d1c…08d3a               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x005a, t01=0x00a4}
0x08d3a…08d4e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x005a, t01=0x00c2}
0x08d4e…08d56               Head {h00=0x0004, h01=0x0050, t00=0x005a, t01=0x00d6}
0x08d56…08d78               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x005a, t01=0x00de}
0x08d78…08d84               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x0100}
0x08d84…08d96               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x005a, t01=0x010c}
0x08d96…08daa               Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x005a, t01=0x011e}
0x08daa…08dbc               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x005a, t01=0x0132}
0x08dbc…08de6               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x005a, t01=0x0144}
0x08de6…08dfa               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x005a, t01=0x016e}
0x08dfa…08e0e               Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x005a, t01=0x0182}
0x08e0e…08e26               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x005b, t01=0x0008}
0x08e26…08e3e               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x005b, t01=0x0020}
0x08e3e…08e50               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x005b, t01=0x0038}
0x08e50…08e68               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x005b, t01=0x004a}
0x08e68…08e80               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI  =8 «, t00=0x005b, t01=0x0062}
0x08e80…08e92               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x005b, t01=0x007a}
0x08e92…08ebe               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x005b, t01=0x008c}
0x08ebe…08ee4               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x005b, t01=0x00b8}
0x08ee4…08ef8               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x005b, t01=0x00de}
0x08ef8…08f20               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x005b, t01=0x00f2}
0x08f20…08f3a               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x005b, t01=0x011a}
0x08f3a…08f4c               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x005b, t01=0x0134}
0x08f4c…08f60               Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x005b, t01=0x0146}
0x08f60…08f7a               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x005b, t01=0x015a}
0x08f7a…08f8c               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x005b, t01=0x0174}
0x08f8c…08fa0               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005b, t01=0x0186}
0x08fa0…08faa               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005c, t01=0x000a}
0x08faa…08fb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0014}
0x08fb4…08fbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x001e}
0x08fbe…08fe4               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x005c, t01=0x0028}
0x08fe4…08fee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x004e}
0x08fee…08ff8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0058}
0x08ff8…0900c               Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x005c, t01=0x0062}
0x0900c…09032               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x005c, t01=0x0076}
0x09032…09062               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x005c, t01=0x009c}
0x09062…09086               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x005c, t01=0x00cc}
0x09086…090ac               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x005c, t01=0x00f0}
0x090ac…090ce               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005c, t01=0x0116}
0x090ce…090e0               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x005c, t01=0x0138}
0x090e0…090fc               Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x005c, t01=0x014a}
0x090fc…09112               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x005c, t01=0x0166}
0x09112…09138               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x005c, t01=0x017c}
0x09138…0914a               Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x005d, t01=0x0012}
0x0914a…09156               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0024}
0x09156…09160               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005d, t01=0x0030}
0x09160…0916a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x003a}
0x0916a…09174               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0044}
0x09174…09196               Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x005d, t01=0x004e}
0x09196…091a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0070}
0x091a0…091aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x007a}
0x091aa…091be               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x005d, t01=0x0084}
0x091be…091d6               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005d, t01=0x0098}
0x091d6…09204               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) POL010 ERROR. ACK EXPECTED =5 «, t00=0x005d, t01=0x00b0}
0x09204…09218               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005d, t01=0x00de}
0x09218…0923a               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005d, t01=0x00f2}
0x0923a…0924c               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x005d, t01=0x0114}
0x0924c…0925e               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x005d, t01=0x0126}
0x0925e…09286               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x005d, t01=0x0138}
0x09286…092a4               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x005d, t01=0x0160}
0x092a4…092b0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x017e}
0x092b0…092c4               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005d, t01=0x018a}
0x092c4…092d6               Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x005e, t01=0x000e}
0x092d6…092e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x0020}
0x092e2…092f6               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x005e, t01=0x002c}
0x092f6…09306               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005e, t01=0x0040}
0x09306…0931a               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x005e, t01=0x0050}
0x0931a…09334               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x005e, t01=0x0064}
0x09334…09346               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005e, t01=0x007e}
0x09346…09362               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x005e, t01=0x0090}
0x09362…0936e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x00ac}
0x0936e…09388               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x005e, t01=0x00b8}
0x09388…0939a               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005e, t01=0x00d2}
0x0939a…093c0               Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x005e, t01=0x00e4}
0x093c0…093e4               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x005e, t01=0x010a}
0x093e4…093f4               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005e, t01=0x012e}
0x093f4…09408               Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x005e, t01=0x013e}
0x09408…09414               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x0152}
0x09414…0942a               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x005e, t01=0x015e}
0x0942a…09452               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x005e, t01=0x0174}
0x09452…09466               Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x005f, t01=0x000c}
0x09466…09480               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x005f, t01=0x0020}
0x09480…094a0               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x005f, t01=0x003a}
0x094a0…094ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x005a}
0x094ac…094be               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005f, t01=0x0066}
0x094be…094d2               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x005f, t01=0x0078}
0x094d2…09502               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x005f, t01=0x008c}
0x09502…09522               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x005f, t01=0x00bc}
0x09522…09534               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005f, t01=0x00dc}
0x09534…0953e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005f, t01=0x00ee}
0x0953e…09548               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00f8}
0x09548…09552               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0102}
0x09552…09576               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x005f, t01=0x010c}
0x09576…09580               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0130}
0x09580…0958a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x013a}
0x0958a…0959e               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x005f, t01=0x0144}
0x0959e…095be               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x005f, t01=0x0158}
0x095be…095e2               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005f, t01=0x0178}
0x095e2…095f6               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0060, t01=0x000c}
0x095f6…09628               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x0060, t01=0x0020}
0x09628…09634               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0060, t01=0x0052}
0x09634…0965c               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x0060, t01=0x005e}
0x0965c…0966c               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x0060, t01=0x0086}
0x0966c…09692               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x0060, t01=0x0096}
0x09692…096a2               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0060, t01=0x00bc}
0x096a2…096ac               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0060, t01=0x00cc}
0x096ac…096b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00d6}
0x096b6…096c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00e0}
0x096c0…096e8               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x0060, t01=0x00ea}
0x096e8…096f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0112}
0x096f2…096fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x011c}
0x096fc…09710               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x0060, t01=0x0126}
0x09710…09728               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x0060, t01=0x013a}
0x09728…09752               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL020 ACK NOT EXPECTED =5 «, t00=0x0060, t01=0x0152}
0x09752…09778               Head {h00=0x0022, h01=0x0050, text=»POL010 CF A5,TRENQ SEND ENQ =5«, t00=0x0060, t01=0x017c}
0x09778…097a6               Head {h00=0x002a, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER =5 «, t00=0x0061, t01=0x0012}
0x097a6…097cc               Head {h00=0x0022, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE =5 «, t00=0x0061, t01=0x0040}
0x097cc…097e4               Head {h00=0x0014, h01=0x0050, text=»POL020 EQU *  =5«, t00=0x0061, t01=0x0066}
0x097e4…0980a               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x0061, t01=0x007e}
0x0980a…0981e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0061, t01=0x00a4}
0x0981e…09834               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x0061, t01=0x00b8}
0x09834…0985e               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x0061, t01=0x00ce}
0x0985e…09884               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x0061, t01=0x00f8}
0x09884…09898               Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x0061, t01=0x011e}
0x09898…098b8               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x0061, t01=0x0132}
0x098b8…098e2               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0061, t01=0x0152}
0x098e2…09906               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0061, t01=0x017c}
0x09906…09912               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0062, t01=0x0010}
0x09912…09926               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0062, t01=0x001c}
0x09926…09938               Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x0062, t01=0x0030}
0x09938…09944               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0062, t01=0x0042}
0x09944…09958               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x0062, t01=0x004e}
0x09958…09968               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0062, t01=0x0062}
0x09968…0997c               Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x0062, t01=0x0072}
0x0997c…09990               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x0062, t01=0x0086}
0x09990…099b6               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x0062, t01=0x009a}
0x099b6…099ca               Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x0062, t01=0x00c0}
0x099ca…099e8               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0062, t01=0x00d4}
0x099e8…099fa               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x0062, t01=0x00f2}
0x099fa…09a0e               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x0062, t01=0x0104}
0x09a0e…09a34               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x0062, t01=0x0118}
0x09a34…09a48               Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x0062, t01=0x013e}
0x09a48…09a70               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0062, t01=0x0152}
0x09a70…09a86               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x0062, t01=0x017a}
0x09a86…09a9c               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x0062, t01=0x0190}
0x09a9c…09aae               Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x0063, t01=0x0016}
0x09aae…09ac2               Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x0063, t01=0x0028}
0x09ac2…09ae6               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x0063, t01=0x003c}
0x09ae6…09b04               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0063, t01=0x0060}
0x09b04…09b0c               Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x007e}
0x09b0c…09b22               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x0063, t01=0x0086}
0x09b22…09b4a               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,MMUBUF MMU WORK BUFFER «, t00=0x0063, t01=0x009c}
0x09b4a…09b62               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x0063, t01=0x00c4}
0x09b62…09b94               Head {h00=0x002e, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA FROM USER BUFFER «, t00=0x0063, t01=0x00dc}
0x09b94…09ba0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x010e}
0x09ba0…09bca               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0063, t01=0x011a}
0x09bca…09bec               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x0063, t01=0x0144}
0x09bec…09c00               Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x0063, t01=0x0166}
0x09c00…09c2a               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x0063, t01=0x017a}
0x09c2a…09c56               Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x0064, t01=0x0014}
0x09c56…09c78               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x0064, t01=0x0040}
0x09c78…09c9c               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x0064, t01=0x0062}
0x09c9c…09cb0               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x0064, t01=0x0086}
0x09cb0…09cd2               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x0064, t01=0x009a}
0x09cd2…09ce2               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0064, t01=0x00bc}
0x09ce2…09d06               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x0064, t01=0x00cc}
0x09d06…09d30               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0064, t01=0x00f0}
0x09d30…09d54               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0064, t01=0x011a}
0x09d54…09d66               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x0064, t01=0x013e}
0x09d66…09d76               Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x0064, t01=0x0150}
0x09d76…09d80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0160}
0x09d80…09dac               Head {h00=0x0028, h01=0x0050, text=»* PROCESS RESPONSE TO READ MODIFIED «, t00=0x0064, t01=0x016a}
0x09dac…09db6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0008}
0x09db6…09dd0               Head {h00=0x0016, h01=0x0050, text=»SPOLLX EQU *  DK7 «, t00=0x0065, t01=0x0012}
0x09dd0…09dfa               Head {h00=0x0026, h01=0x0050, text=» LDK A1,/06 FAKE A WRITE REQUEST  «, t00=0x0065, t01=0x002c}
0x09dfa…09e16               Head {h00=0x0018, h01=0x0050, text=» ST A1,DWTOR,A6  DK7«, t00=0x0065, t01=0x0056}
0x09e16…09e50               Head {h00=0x0036, h01=0x0050, text=» LDKL A1,/FFFF-/0002 CLEAR READ MODIFIED FLAG DK7 «, t00=0x0065, t01=0x0072}
0x09e50…09e6a               Head {h00=0x0016, h01=0x0050, text=» ANS A1,DWTINF,A6 «, t00=0x0065, t01=0x00ac}
0x09e6a…09e92               Head {h00=0x0024, h01=0x0050, text=» LDKL A5,STB SET STACK BASE DK7 «, t00=0x0065, t01=0x00c6}
0x09e92…09ec0               Head {h00=0x002a, h01=0x0050, text=» RF SPOLL PROCESS AS SPECIFIC POLL DK7«, t00=0x0065, t01=0x00ee}
0x09ec0…09eca               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0065, t01=0x011c}
0x09eca…09ed4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0126}
0x09ed4…09ede               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0130}
0x09ede…09f08               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x0065, t01=0x013a}
0x09f08…09f12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0164}
0x09f12…09f1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x016e}
0x09f1c…09f30               Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x0065, t01=0x0178}
0x09f30…09f4a               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0065, t01=0x018c}
0x09f4a…09f62               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x0066, t01=0x0016}
0x09f62…09f88               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL010 ACK EXPECTED =5«, t00=0x0066, t01=0x002e}
0x09f88…09fa2               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x0066, t01=0x0054}
0x09fa2…09fc6               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x0066, t01=0x006e}
0x09fc6…09fe4               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x0066, t01=0x0092}
0x09fe4…09ff8               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0066, t01=0x00b0}
0x09ff8…0a01a               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0066, t01=0x00c4}
0x0a01a…0a02c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x0066, t01=0x00e6}
0x0a02c…0a052               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x0066, t01=0x00f8}
0x0a052…0a05e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x011e}
0x0a05e…0a078               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0066, t01=0x012a}
0x0a078…0a090               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0066, t01=0x0144}
0x0a090…0a0b0               Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x0066, t01=0x015c}
0x0a0b0…0a0d2               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x0066, t01=0x017c}
0x0a0d2…0a0e4               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x0067, t01=0x000e}
0x0a0e4…0a108               Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x0067, t01=0x0020}
0x0a108…0a11a               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0067, t01=0x0044}
0x0a11a…0a140               Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x0067, t01=0x0056}
0x0a140…0a14c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0067, t01=0x007c}
0x0a14c…0a168               Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x0067, t01=0x0088}
0x0a168…0a172               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0067, t01=0x00a4}
0x0a172…0a17c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00ae}
0x0a17c…0a186               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00b8}
0x0a186…0a1c2               Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x0067, t01=0x00c2}
0x0a1c2…0a1cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00fe}
0x0a1cc…0a1ee               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x0067, t01=0x0108}
0x0a1ee…0a1f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x012a}
0x0a1f8…0a202               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0134}
0x0a202…0a21e               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x0067, t01=0x013e}
0x0a21e…0a246               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x0067, t01=0x015a}
0x0a246…0a25a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0067, t01=0x0182}
0x0a25a…0a282               Head {h00=0x0024, h01=0x0050, text=» LD A2,XRB IF RCOM, SKIP IT DK6 «, t00=0x0068, t01=0x0008}
0x0a282…0a29e               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) CWR900  DK6 «, t00=0x0068, t01=0x0030}
0x0a29e…0a2ae               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0068, t01=0x004c}
0x0a2ae…0a2c6               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0068, t01=0x005c}
0x0a2c6…0a2e6               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x0068, t01=0x0074}
0x0a2e6…0a308               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0068, t01=0x0094}
0x0a308…0a31a               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0068, t01=0x00b6}
0x0a31a…0a33e               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x0068, t01=0x00c8}
0x0a33e…0a350               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0068, t01=0x00ec}
0x0a350…0a37c               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x0068, t01=0x00fe}
0x0a37c…0a38e               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0068, t01=0x012a}
0x0a38e…0a3c4               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x0068, t01=0x013c}
0x0a3c4…0a3e4               Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x0068, t01=0x0172}
0x0a3e4…0a410 (105, 0, 400) Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x0069, t01=0x0004}
0x0a410…0a422               Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x0069, t01=0x0030}
0x0a422…0a44c               Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x0069, t01=0x0042}
0x0a44c…0a46e               Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x0069, t01=0x006c}
0x0a46e…0a480               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0069, t01=0x008e}
0x0a480…0a496               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x0069, t01=0x00a0}
0x0a496…0a4ae               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0069, t01=0x00b6}
0x0a4ae…0a4d6               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0069, t01=0x00ce}
0x0a4d6…0a4ea               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x0069, t01=0x00f6}
0x0a4ea…0a518               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0069, t01=0x010a}
0x0a518…0a52c               Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x0069, t01=0x0138}
0x0a52c…0a540               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x0069, t01=0x014c}
0x0a540…0a566               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0069, t01=0x0160}
0x0a566…0a578               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0069, t01=0x0186}
0x0a578…0a58c               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x006a, t01=0x0008}
0x0a58c…0a5b2               Head {h00=0x0022, h01=0x0050, text=» LD A2,XRB READ MODIFIED ? DK6«, t00=0x006a, t01=0x001c}
0x0a5b2…0a5cc               Head {h00=0x0016, h01=0x0050, text=» RF(Z) CWR910  DK6«, t00=0x006a, t01=0x0042}
0x0a5cc…0a5f4               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTCUR,A6 RESTORE ECB DK6«, t00=0x006a, t01=0x005c}
0x0a5f4…0a612               Head {h00=0x001a, h01=0x0050, text=» ST A2,DWTECB,A6  DK6 «, t00=0x006a, t01=0x0084}
0x0a612…0a62c               Head {h00=0x0016, h01=0x0050, text=»CWR910 EQU *  DK6 «, t00=0x006a, t01=0x00a2}
0x0a62c…0a63a               Head {h00=0x000a, h01=0x0050, text=» XIF  «, t00=0x006a, t01=0x00bc}
0x0a63a…0a64a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006a, t01=0x00ca}
0x0a64a…0a654               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x006a, t01=0x00da}
0x0a654…0a65e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x00e4}
0x0a65e…0a668               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x00ee}
0x0a668…0a686               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x006a, t01=0x00f8}
0x0a686…0a690               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0116}
0x0a690…0a6b0               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x006a, t01=0x0120}
0x0a6b0…0a6dc               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x006a, t01=0x0140}
0x0a6dc…0a712               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x006a, t01=0x016c}
0x0a712…0a73e               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x006b, t01=0x0012}
0x0a73e…0a748               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x003e}
0x0a748…0a75c               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x006b, t01=0x0048}
0x0a75c…0a784               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x006b, t01=0x005c}
0x0a784…0a7a4               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x006b, t01=0x0084}
0x0a7a4…0a7b6               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x006b, t01=0x00a4}
0x0a7b6…0a7ca               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x006b, t01=0x00b6}
0x0a7ca…0a7f2               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x006b, t01=0x00ca}
0x0a7f2…0a818               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x006b, t01=0x00f2}
0x0a818…0a82a               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x006b, t01=0x0118}
0x0a82a…0a83e               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x006b, t01=0x012a}
0x0a83e…0a852               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x006b, t01=0x013e}
0x0a852…0a876               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x006b, t01=0x0152}
0x0a876…0a8a2               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x006b, t01=0x0176}
0x0a8a2…0a8b6               Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x006c, t01=0x0012}
0x0a8b6…0a8c6               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x006c, t01=0x0026}
0x0a8c6…0a8e2               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x006c, t01=0x0036}
0x0a8e2…0a8ea               Head {h00=0x0004, h01=0x0050, t00=0x006c, t01=0x0052}
0x0a8ea…0a900               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x006c, t01=0x005a}
0x0a900…0a914               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x006c, t01=0x0070}
0x0a914…0a93a               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x006c, t01=0x0084}
0x0a93a…0a94e               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x006c, t01=0x00aa}
0x0a94e…0a972               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006c, t01=0x00be}
0x0a972…0a986               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x006c, t01=0x00e2}
0x0a986…0a99c               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x006c, t01=0x00f6}
0x0a99c…0a9ca               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x006c, t01=0x010c}
0x0a9ca…0a9de               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x006c, t01=0x013a}
0x0a9de…0a9ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x014e}
0x0a9ea…0a9fe               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x006c, t01=0x015a}
0x0a9fe…0aa26               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x006c, t01=0x016e}
0x0aa26…0aa4a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006d, t01=0x0008}
0x0aa4a…0aa5e               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x006d, t01=0x002c}
0x0aa5e…0aa72               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x006d, t01=0x0040}
0x0aa72…0aa94               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x006d, t01=0x0054}
0x0aa94…0aaa8               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x006d, t01=0x0076}
0x0aaa8…0aaca               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x006d, t01=0x008a}
0x0aaca…0aade               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x006d, t01=0x00ac}
0x0aade…0ab00               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x006d, t01=0x00c0}
0x0ab00…0ab14               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x006d, t01=0x00e2}
0x0ab14…0ab4a               Head {h00=0x0032, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE «, t00=0x006d, t01=0x00f6}
0x0ab4a…0ab5e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x006d, t01=0x012c}
0x0ab5e…0ab86               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x006d, t01=0x0140}
0x0ab86…0ab8e               Head {h00=0x0004, h01=0x0050, t00=0x006d, t01=0x0168}
0x0ab8e…0aba2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x006d, t01=0x0170}
0x0aba2…0abb8               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x006d, t01=0x0184}
0x0abb8…0abc0               Head {h00=0x0004, h01=0x0050, t00=0x006e, t01=0x000a}
0x0abc0…0abd2               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x006e, t01=0x0012}
0x0abd2…0abe8               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x006e, t01=0x0024}
0x0abe8…0ac0a               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x006e, t01=0x003a}
0x0ac0a…0ac1c               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x006e, t01=0x005c}
0x0ac1c…0ac3e               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x006e, t01=0x006e}
0x0ac3e…0ac50               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x006e, t01=0x0090}
0x0ac50…0ac62               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x006e, t01=0x00a2}
0x0ac62…0ac90               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x006e, t01=0x00b4}
0x0ac90…0acb4               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006e, t01=0x00e2}
0x0acb4…0ace2               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x006e, t01=0x0106}
0x0ace2…0acf4               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x006e, t01=0x0134}
0x0acf4…0ad08               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x006e, t01=0x0146}
0x0ad08…0ad14               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x015a}
0x0ad14…0ad1c               Head {h00=0x0004, h01=0x0050, t00=0x006e, t01=0x0166}
0x0ad1c…0ad3e               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x006e, t01=0x016e}
0x0ad3e…0ad62               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x006e, t01=0x0190}
0x0ad62…0ad8a               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x006f, t01=0x0024}
0x0ad8a…0ad9e               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x006f, t01=0x004c}
0x0ad9e…0adba               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x006f, t01=0x0060}
0x0adba…0adde               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x006f, t01=0x007c}
0x0adde…0ade8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00a0}
0x0ade8…0ae02               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x006f, t01=0x00aa}
0x0ae02…0ae0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00c4}
0x0ae0c…0ae2a               Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x006f, t01=0x00ce}
0x0ae2a…0ae3e               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x006f, t01=0x00ec}
0x0ae3e…0ae68               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006f, t01=0x0100}
0x0ae68…0ae7c               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x006f, t01=0x012a}
0x0ae7c…0aea4               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x006f, t01=0x013e}
0x0aea4…0aeb6               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006f, t01=0x0166}
0x0aeb6…0aec0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0178}
0x0aec0…0aed6               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x006f, t01=0x0182}
0x0aed6…0aee0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0008}
0x0aee0…0aef4               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x0070, t01=0x0012}
0x0aef4…0af1c               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x0070, t01=0x0026}
0x0af1c…0af40               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x0070, t01=0x004e}
0x0af40…0af76               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x0070, t01=0x0072}
0x0af76…0af8a               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0070, t01=0x00a8}
0x0af8a…0af9e               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0070, t01=0x00bc}
0x0af9e…0afbe               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x0070, t01=0x00d0}
0x0afbe…0afca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x00f0}
0x0afca…0afde               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0070, t01=0x00fc}
0x0afde…0b008               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x0070, t01=0x0110}
0x0b008…0b028               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x0070, t01=0x013a}
0x0b028…0b034               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x015a}
0x0b034…0b048               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x0070, t01=0x0166}
0x0b048…0b072               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x0070, t01=0x017a}
0x0b072…0b086               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x0071, t01=0x0014}
0x0b086…0b0ae               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x0071, t01=0x0028}
0x0b0ae…0b0ce               Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x0071, t01=0x0050}
0x0b0ce…0b0e2               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0071, t01=0x0070}
0x0b0e2…0b108               Head {h00=0x0022, h01=0x0050, text=» ORR A7,A1 PARITY ERROR SALCUZ«, t00=0x0071, t01=0x0084}
0x0b108…0b11e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0071, t01=0x00aa}
0x0b11e…0b12e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0071, t01=0x00c0}
0x0b12e…0b138               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00d0}
0x0b138…0b14e               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x0071, t01=0x00da}
0x0b14e…0b158               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00f0}
0x0b158…0b16c               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x0071, t01=0x00fa}
0x0b16c…0b17e               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0071, t01=0x010e}
0x0b17e…0b1a4               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x0071, t01=0x0120}
0x0b1a4…0b1ca               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x0071, t01=0x0146}
0x0b1ca…0b1dc               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x0071, t01=0x016c}
0x0b1dc…0b1e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x017e}
0x0b1e6…0b1fc               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x0071, t01=0x0188}
0x0b1fc…0b206               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x000e}
0x0b206…0b21a               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x0072, t01=0x0018}
0x0b21a…0b22e               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0072, t01=0x002c}
0x0b22e…0b242               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0072, t01=0x0040}
0x0b242…0b268               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x0072, t01=0x0054}
0x0b268…0b274               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x007a}
0x0b274…0b288               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0072, t01=0x0086}
0x0b288…0b2b2               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x0072, t01=0x009a}
0x0b2b2…0b2d8               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x0072, t01=0x00c4}
0x0b2d8…0b2e4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x00ea}
0x0b2e4…0b2f6               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0072, t01=0x00f6}
0x0b2f6…0b300               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0072, t01=0x0108}
0x0b300…0b30a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0112}
0x0b30a…0b328               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x0072, t01=0x011c}
0x0b328…0b332               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x013a}
0x0b332…0b348               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x0072, t01=0x0144}
0x0b348…0b36a               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x0072, t01=0x015a}
0x0b36a…0b394               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x0072, t01=0x017c}
0x0b394…0b3aa               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x0073, t01=0x0016}
0x0b3aa…0b3c8               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x0073, t01=0x002c}
0x0b3c8…0b3da               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0073, t01=0x004a}
0x0b3da…0b3e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x005c}
0x0b3e4…0b3fc               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x0073, t01=0x0066}
0x0b3fc…0b406               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x007e}
0x0b406…0b42a               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x0073, t01=0x0088}
0x0b42a…0b43c               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0073, t01=0x00ac}
0x0b43c…0b446               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00be}
0x0b446…0b45c               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x0073, t01=0x00c8}
0x0b45c…0b466               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00de}
0x0b466…0b47a               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0073, t01=0x00e8}
0x0b47a…0b49c               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x0073, t01=0x00fc}
0x0b49c…0b4a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x011e}
0x0b4a8…0b4b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x012a}
0x0b4b2…0b4c8               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x0073, t01=0x0134}
0x0b4c8…0b4d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x014a}
0x0b4d2…0b4f4               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x0073, t01=0x0154}
0x0b4f4…0b51a               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x0073, t01=0x0176}
0x0b51a…0b532               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x0074, t01=0x000c}
0x0b532…0b544               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x0074, t01=0x0024}
0x0b544…0b54e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0074, t01=0x0036}
0x0b54e…0b558               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0040}
0x0b558…0b56e               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x0074, t01=0x004a}
0x0b56e…0b578               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0060}
0x0b578…0b59a               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x0074, t01=0x006a}
0x0b59a…0b5ac               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0074, t01=0x008c}
0x0b5ac…0b5b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x009e}
0x0b5b6…0b5cc               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x0074, t01=0x00a8}
0x0b5cc…0b5d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00be}
0x0b5d6…0b5f8               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x0074, t01=0x00c8}
0x0b5f8…0b60a               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0074, t01=0x00ea}
0x0b60a…0b614               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00fc}
0x0b614…0b62a               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x0074, t01=0x0106}
0x0b62a…0b634               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x011c}
0x0b634…0b656               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x0074, t01=0x0126}
0x0b656…0b660               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0148}
0x0b660…0b68c               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x0074, t01=0x0152}
0x0b68c…0b6a0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0074, t01=0x017e}
0x0b6a0…0b6b8 (117, 0, 400) Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x0075, t01=0x0004}
0x0b6b8…0b6e0               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x0075, t01=0x001c}
0x0b6e0…0b70a               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x0075, t01=0x0044}
0x0b70a…0b728               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0075, t01=0x006e}
0x0b728…0b752               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x0075, t01=0x008c}
0x0b752…0b770               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0075, t01=0x00b6}
0x0b770…0b78a               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x0075, t01=0x00d4}
0x0b78a…0b7a8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x0075, t01=0x00ee}
0x0b7a8…0b7bc               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0075, t01=0x010c}
0x0b7bc…0b7d2               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x0075, t01=0x0120}
0x0b7d2…0b7ec               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0075, t01=0x0136}
0x0b7ec…0b814               Head {h00=0x0024, h01=0x0050, text=» CIO A2,0,LCUUT STOP TRANSMITTER«, t00=0x0075, t01=0x0150}
0x0b814…0b830               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0075, t01=0x0178}
0x0b830…0b858 (118, 0, 400) Head {h00=0x0024, h01=0x0050, text=» CF A5,READ WAIT FOR END SALCUZ «, t00=0x0076, t01=0x0004}
0x0b858…0b86e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0076, t01=0x002c}
0x0b86e…0b898               Head {h00=0x0026, h01=0x0050, text=» SST A2,LCUUT PERFORM SST AT ONCE «, t00=0x0076, t01=0x0042}
0x0b898…0b8ac               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0076, t01=0x006c}
0x0b8ac…0b8d8               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x0076, t01=0x0080}
0x0b8d8…0b8e4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x00ac}
0x0b8e4…0b8f4               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0076, t01=0x00b8}
0x0b8f4…0b8fe               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0076, t01=0x00c8}
0x0b8fe…0b908               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00d2}
0x0b908…0b912               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00dc}
0x0b912…0b934               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x0076, t01=0x00e6}
0x0b934…0b93e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0108}
0x0b93e…0b948               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0112}
0x0b948…0b95c               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x0076, t01=0x011c}
0x0b95c…0b97e               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0076, t01=0x0130}
0x0b97e…0b994               Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x0076, t01=0x0152}
0x0b994…0b99e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0168}
0x0b99e…0b9a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0172}
0x0b9a8…0b9c8               Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x0076, t01=0x017c}
0x0b9c8…0b9d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x000c}
0x0b9d2…0b9dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0016}
0x0b9dc…0b9f0               Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x0077, t01=0x0020}
0x0b9f0…0ba1c               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x0077, t01=0x0034}
0x0ba1c…0ba24               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x0060}
0x0ba24…0ba5a               Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x0077, t01=0x0068}
0x0ba5a…0ba78               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x0077, t01=0x009e}
0x0ba78…0ba80               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x00bc}
0x0ba80…0ba96               Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x0077, t01=0x00c4}
0x0ba96…0babc               Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x0077, t01=0x00da}
0x0babc…0bad0               Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x0077, t01=0x0100}
0x0bad0…0baf8               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x0077, t01=0x0114}
0x0baf8…0bb0c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0077, t01=0x013c}
0x0bb0c…0bb2a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0077, t01=0x0150}
0x0bb2a…0bb46               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x0077, t01=0x016e}
0x0bb46…0bb5a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0077, t01=0x018a}
0x0bb5a…0bb76               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x0078, t01=0x000e}
0x0bb76…0bb8a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x0078, t01=0x002a}
0x0bb8a…0bba6               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x0078, t01=0x003e}
0x0bba6…0bbba               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0078, t01=0x005a}
0x0bbba…0bbd8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0078, t01=0x006e}
0x0bbd8…0bc04               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0078, t01=0x008c}
0x0bc04…0bc30               Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x0078, t01=0x00b8}
0x0bc30…0bc50               Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x0078, t01=0x00e4}
0x0bc50…0bc62               Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x0078, t01=0x0104}
0x0bc62…0bc76               Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x0078, t01=0x0116}
0x0bc76…0bc88               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0078, t01=0x012a}
0x0bc88…0bc9c               Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x0078, t01=0x013c}
0x0bc9c…0bca6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0150}
0x0bca6…0bcb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x015a}
0x0bcb0…0bcba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0164}
0x0bcba…0bcc6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x016e}
0x0bcc6…0bcda               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0078, t01=0x017a}
0x0bcda…0bcf8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0078, t01=0x018e}
0x0bcf8…0bd14               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0079, t01=0x001c}
0x0bd14…0bd3c               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0079, t01=0x0038}
0x0bd3c…0bd60               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0079, t01=0x0060}
0x0bd60…0bd8c               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0079, t01=0x0084}
0x0bd8c…0bdb8               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x0079, t01=0x00b0}
0x0bdb8…0bde2               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x0079, t01=0x00dc}
0x0bde2…0be06               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x0079, t01=0x0106}
0x0be06…0be2c               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x0079, t01=0x012a}
0x0be2c…0be4c               Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x0079, t01=0x0150}
0x0be4c…0be6a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0079, t01=0x0170}
0x0be6a…0be86               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0079, t01=0x018e}
0x0be86…0bea4               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x007a, t01=0x001a}
0x0bea4…0beba               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x007a, t01=0x0038}
0x0beba…0bece               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x007a, t01=0x004e}
0x0bece…0bef4               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x007a, t01=0x0062}
0x0bef4…0bf0a               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x007a, t01=0x0088}
0x0bf0a…0bf30               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x007a, t01=0x009e}
0x0bf30…0bf46               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x007a, t01=0x00c4}
0x0bf46…0bf5a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x007a, t01=0x00da}
0x0bf5a…0bf70               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x007a, t01=0x00ee}
0x0bf70…0bf7c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x0104}
0x0bf7c…0bf90               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007a, t01=0x0110}
0x0bf90…0bf98               Head {h00=0x0004, h01=0x0050, t00=0x007a, t01=0x0124}
0x0bf98…0bfb0               Head {h00=0x0014, h01=0x0050, text=» RF TRT070  DK6 «, t00=0x007a, t01=0x012c}
0x0bfb0…0bfb8               Head {h00=0x0004, h01=0x0050, t00=0x007a, t01=0x0144}
0x0bfb8…0bfd8               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x007a, t01=0x014c}
0x0bfd8…0bffe               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x007a, t01=0x016c}
0x0bffe…0c022 (123, 0, 400) Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x007b, t01=0x0004}
0x0c022…0c02a               Head {h00=0x0004, h01=0x0050, t00=0x007b, t01=0x0028}
0x0c02a…0c052               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x007b, t01=0x0030}
0x0c052…0c084               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x007b, t01=0x0058}
0x0c084…0c0a6               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x007b, t01=0x008a}
0x0c0a6…0c0b8               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x007b, t01=0x00ac}
0x0c0b8…0c0cc               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x007b, t01=0x00be}
0x0c0cc…0c0d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007b, t01=0x00d2}
0x0c0d8…0c0e0               Head {h00=0x0004, h01=0x0050, t00=0x007b, t01=0x00de}
0x0c0e0…0c0f2               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x007b, t01=0x00e6}
0x0c0f2…0c106               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x007b, t01=0x00f8}
0x0c106…0c12a               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x007b, t01=0x010c}
0x0c12a…0c14e               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x007b, t01=0x0130}
0x0c14e…0c162               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x007b, t01=0x0154}
0x0c162…0c176               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007b, t01=0x0168}
0x0c176…0c18e               Head {h00=0x0014, h01=0x0050, text=» RF TRT105  DK6 «, t00=0x007b, t01=0x017c}
0x0c18e…0c196 (124, 0, 400) Head {h00=0x0004, h01=0x0050, t00=0x007c, t01=0x0004}
0x0c196…0c1da               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x007c, t01=0x000c}
0x0c1da…0c1e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0050}
0x0c1e4…0c214               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x007c, t01=0x005a}
0x0c214…0c21e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x008a}
0x0c21e…0c256               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x007c, t01=0x0094}
0x0c256…0c25e               Head {h00=0x0004, h01=0x0050, t00=0x007c, t01=0x00cc}
0x0c25e…0c288               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x007c, t01=0x00d4}
0x0c288…0c2a4               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x007c, t01=0x00fe}
0x0c2a4…0c2b0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x011a}
0x0c2b0…0c2c4               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x007c, t01=0x0126}
0x0c2c4…0c2e4               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x007c, t01=0x013a}
0x0c2e4…0c30a               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x007c, t01=0x015a}
0x0c30a…0c31e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x007c, t01=0x0180}
0x0c31e…0c332 (125, 0, 398) Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x007d, t01=0x0004}
0x0c332…0c356               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x007d, t01=0x0018}
0x0c356…0c37c               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x007d, t01=0x003c}
0x0c37c…0c390               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x007d, t01=0x0062}
0x0c390…0c3a4               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x007d, t01=0x0076}
0x0c3a4…0c3c2               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x007d, t01=0x008a}
0x0c3c2…0c3d8               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x007d, t01=0x00a8}
0x0c3d8…0c3ea               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x007d, t01=0x00be}
0x0c3ea…0c3f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x00d0}
0x0c3f6…0c40a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007d, t01=0x00dc}
0x0c40a…0c41c               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x007d, t01=0x00f0}
0x0c41c…0c424               Head {h00=0x0004, h01=0x0050, t00=0x007d, t01=0x0102}
0x0c424…0c438               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x007d, t01=0x010a}
0x0c438…0c440               Head {h00=0x0004, h01=0x0050, t00=0x007d, t01=0x011e}
0x0c440…0c452               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x007d, t01=0x0126}
0x0c452…0c478               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x007d, t01=0x0138}
0x0c478…0c480               Head {h00=0x0004, h01=0x0050, t00=0x007d, t01=0x015e}
0x0c480…0c4ac               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x007d, t01=0x0166}
0x0c4ac…0c4c2 (126, 0, 400) Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x007e, t01=0x0004}
0x0c4c2…0c4ee               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x007e, t01=0x001a}
0x0c4ee…0c500               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x007e, t01=0x0046}
0x0c500…0c518               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x007e, t01=0x0058}
0x0c518…0c52a               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x007e, t01=0x0070}
0x0c52a…0c554               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x007e, t01=0x0082}
0x0c554…0c57a               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x007e, t01=0x00ac}
0x0c57a…0c592               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x007e, t01=0x00d2}
0x0c592…0c5bc               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x007e, t01=0x00ea}
0x0c5bc…0c5d2               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x007e, t01=0x0114}
0x0c5d2…0c5e6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x007e, t01=0x012a}
0x0c5e6…0c5fa               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x007e, t01=0x013e}
0x0c5fa…0c61e               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x007e, t01=0x0152}
0x0c61e…0c630               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x007e, t01=0x0176}
0x0c630…0c642               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x007e, t01=0x0188}
0x0c642…0c656               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x007f, t01=0x000a}
0x0c656…0c662               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007f, t01=0x001e}
0x0c662…0c66c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x007f, t01=0x002a}
0x0c66c…0c680               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x007f, t01=0x0034}
0x0c680…0c6ac               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x007f, t01=0x0048}
0x0c6ac…0c6d0               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x007f, t01=0x0074}
0x0c6d0…0c6e4               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x007f, t01=0x0098}
0x0c6e4…0c70c               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x007f, t01=0x00ac}
0x0c70c…0c736               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x007f, t01=0x00d4}
0x0c736…0c74a               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x007f, t01=0x00fe}
0x0c74a…0c770               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x007f, t01=0x0112}
0x0c770…0c79e               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x007f, t01=0x0138}
0x0c79e…0c7b4               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x007f, t01=0x0166}
0x0c7b4…0c7d8               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x007f, t01=0x017c}
0x0c7d8…0c7ec               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0080, t01=0x0010}
0x0c7ec…0c81c               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x0080, t01=0x0024}
0x0c81c…0c830               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x0080, t01=0x0054}
0x0c830…0c84a               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x0080, t01=0x0068}
0x0c84a…0c85e               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x0080, t01=0x0082}
0x0c85e…0c880               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x0080, t01=0x0096}
0x0c880…0c8ac               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x0080, t01=0x00b8}
0x0c8ac…0c8ce               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x0080, t01=0x00e4}
0x0c8ce…0c8ec               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0080, t01=0x0106}
0x0c8ec…0c90c               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x0080, t01=0x0124}
0x0c90c…0c93e               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x0080, t01=0x0144}
0x0c93e…0c95c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0080, t01=0x0176}
0x0c95c…0c97c (129, 0, 400) Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x0081, t01=0x0004}
0x0c97c…0c988               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x0024}
0x0c988…0c99c               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x0081, t01=0x0030}
0x0c99c…0c9b8               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x0081, t01=0x0044}
0x0c9b8…0c9cc               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x0081, t01=0x0060}
0x0c9cc…0c9ea               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0081, t01=0x0074}
0x0c9ea…0c9fe               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0081, t01=0x0092}
0x0c9fe…0ca18               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x0081, t01=0x00a6}
0x0ca18…0ca36               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x0081, t01=0x00c0}
0x0ca36…0ca42               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x00de}
0x0ca42…0ca56               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0081, t01=0x00ea}
0x0ca56…0ca7a               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x0081, t01=0x00fe}
0x0ca7a…0ca8c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0081, t01=0x0122}
0x0ca8c…0caa0               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0081, t01=0x0134}
0x0caa0…0cac6               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x0081, t01=0x0148}
0x0cac6…0cad8               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x0081, t01=0x016e}
0x0cad8…0caec               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0081, t01=0x0180}
0x0caec…0cb12 (130, 0, 400) Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x0082, t01=0x0004}
0x0cb12…0cb1e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x002a}
0x0cb1e…0cb3e               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x0082, t01=0x0036}
0x0cb3e…0cb52               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x0082, t01=0x0056}
0x0cb52…0cb76               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x0082, t01=0x006a}
0x0cb76…0cb8a               Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x0082, t01=0x008e}
0x0cb8a…0cba6               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x0082, t01=0x00a2}
0x0cba6…0cbca               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x0082, t01=0x00be}
0x0cbca…0cbd4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0082, t01=0x00e2}
0x0cbd4…0cbde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00ec}
0x0cbde…0cbe8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00f6}
0x0cbe8…0cc0a               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x0082, t01=0x0100}
0x0cc0a…0cc14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0122}
0x0cc14…0cc1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x012c}
0x0cc1e…0cc32               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0082, t01=0x0136}
0x0cc32…0cc46               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x0082, t01=0x014a}
0x0cc46…0cc6e               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x0082, t01=0x015e}
0x0cc6e…0cc8c               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0082, t01=0x0186}
0x0cc8c…0ccae               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0083, t01=0x0014}
0x0ccae…0ccc2               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0083, t01=0x0036}
0x0ccc2…0cce0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0083, t01=0x004a}
0x0cce0…0ccfa               Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x0083, t01=0x0068}
0x0ccfa…0cd0e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0083, t01=0x0082}
0x0cd0e…0cd2c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x0083, t01=0x0096}
0x0cd2c…0cd40               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x0083, t01=0x00b4}
0x0cd40…0cd5e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x0083, t01=0x00c8}
0x0cd5e…0cd72               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0083, t01=0x00e6}
0x0cd72…0cd90               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0083, t01=0x00fa}
0x0cd90…0cda8               Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x0083, t01=0x0118}
0x0cda8…0cdc6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0083, t01=0x0130}
0x0cdc6…0cdda               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0083, t01=0x014e}
0x0cdda…0cdf8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0083, t01=0x0162}
0x0cdf8…0ce1a               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0083, t01=0x0180}
0x0ce1a…0ce3c               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x0084, t01=0x0012}
0x0ce3c…0ce4e               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0084, t01=0x0034}
0x0ce4e…0ce76               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x0084, t01=0x0046}
0x0ce76…0ce96               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x0084, t01=0x006e}
0x0ce96…0ceb8               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x0084, t01=0x008e}
0x0ceb8…0ceda               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0084, t01=0x00b0}
0x0ceda…0ceec               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x0084, t01=0x00d2}
0x0ceec…0cf0a               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x0084, t01=0x00e4}
0x0cf0a…0cf1c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0084, t01=0x0102}
0x0cf1c…0cf3e               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x0084, t01=0x0114}
0x0cf3e…0cf50               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x0084, t01=0x0136}
0x0cf50…0cf64               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x0084, t01=0x0148}
0x0cf64…0cf84               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x0084, t01=0x015c}
0x0cf84…0cfa8               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x0084, t01=0x017c}
0x0cfa8…0cfb4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x0010}
0x0cfb4…0cfbe               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0085, t01=0x001c}
0x0cfbe…0cfc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0026}
0x0cfc8…0cfd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0030}
0x0cfd2…0cff2               Head {h00=0x001c, h01=0x0050, text=»* TRANSMIT SYNC SEQUENCE«, t00=0x0085, t01=0x003a}
0x0cff2…0cffc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x005a}
0x0cffc…0d006               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0064}
0x0d006…0d01a               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x0085, t01=0x006e}
0x0d01a…0d034               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0085, t01=0x0082}
0x0d034…0d062               Head {h00=0x002a, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT IF NOT DONE«, t00=0x0085, t01=0x009c}
0x0d062…0d084               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN PERFORM SST «, t00=0x0085, t01=0x00ca}
0x0d084…0d0a0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0085, t01=0x00ec}
0x0d0a0…0d0ca               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x0085, t01=0x0108}
0x0d0ca…0d0e0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0085, t01=0x0132}
0x0d0e0…0d0fc               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0085, t01=0x0148}
0x0d0fc…0d118               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=1  SALCUZ «, t00=0x0085, t01=0x0164}
0x0d118…0d132               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0085, t01=0x0180}
0x0d132…0d162               Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER SALCUZ«, t00=0x0086, t01=0x000a}
0x0d162…0d180               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x0086, t01=0x003a}
0x0d180…0d19e               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x0086, t01=0x0058}
0x0d19e…0d1bc               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x0086, t01=0x0076}
0x0d1bc…0d1d4               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0086, t01=0x0094}
0x0d1d4…0d1fa               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0086, t01=0x00ac}
0x0d1fa…0d216               Head {h00=0x0018, h01=0x0050, text=»TRS010 EQU *  SALCUZ«, t00=0x0086, t01=0x00d2}
0x0d216…0d234               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x0086, t01=0x00ee}
0x0d234…0d26a               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0086, t01=0x010c}
0x0d26a…0d280               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0086, t01=0x0142}
0x0d280…0d29c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0086, t01=0x0158}
0x0d29c…0d2b8               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=0  SALCUZ «, t00=0x0086, t01=0x0174}
0x0d2b8…0d2d4               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x0086, t01=0x0190}
0x0d2d4…0d2f4               Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,LCUUT  SALCUZ «, t00=0x0087, t01=0x001c}
0x0d2f4…0d312               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x0087, t01=0x003c}
0x0d312…0d330               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x0087, t01=0x005a}
0x0d330…0d34e               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x0087, t01=0x0078}
0x0d34e…0d366               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0087, t01=0x0096}
0x0d366…0d38c               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0087, t01=0x00ae}
0x0d38c…0d3a0               Head {h00=0x0010, h01=0x0050, text=»TRS010 EQU *«, t00=0x0087, t01=0x00d4}
0x0d3a0…0d3bc               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x0087, t01=0x00e8}
0x0d3bc…0d3f2               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0087, t01=0x0104}
0x0d3f2…0d408               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0087, t01=0x013a}
0x0d408…0d436               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x0087, t01=0x0150}
0x0d436…0d44e               Head {h00=0x0014, h01=0x0050, text=» LDK A3,4 4 SYNS«, t00=0x0087, t01=0x017e}
0x0d44e…0d468               Head {h00=0x0016, h01=0x0050, text=»TRS100 LDK A2,SYN «, t00=0x0088, t01=0x0008}
0x0d468…0d486               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SYN «, t00=0x0088, t01=0x0022}
0x0d486…0d498               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0088, t01=0x0040}
0x0d498…0d4ae               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x0088, t01=0x0052}
0x0d4ae…0d4be               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0088, t01=0x0068}
0x0d4be…0d4c8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0088, t01=0x0078}
0x0d4c8…0d4d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0082}
0x0d4d2…0d4dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x008c}
0x0d4dc…0d4fa               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x0088, t01=0x0096}
0x0d4fa…0d504               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00b4}
0x0d504…0d50e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00be}
0x0d50e…0d522               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x0088, t01=0x00c8}
0x0d522…0d536               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0088, t01=0x00dc}
0x0d536…0d54c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0088, t01=0x00f0}
0x0d54c…0d56c               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0088, t01=0x0106}
0x0d56c…0d578               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x0126}
0x0d578…0d580               Head {h00=0x0004, h01=0x0050, t00=0x0088, t01=0x0132}
0x0d580…0d596               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0088, t01=0x013a}
0x0d596…0d5b6               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0088, t01=0x0150}
0x0d5b6…0d5c2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x0170}
0x0d5c2…0d5f0               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0088, t01=0x017c}
0x0d5f0…0d612               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x0089, t01=0x001a}
0x0d612…0d642               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x0089, t01=0x003c}
0x0d642…0d656               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0089, t01=0x006c}
0x0d656…0d682               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x0089, t01=0x0080}
0x0d682…0d68e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x00ac}
0x0d68e…0d6a2               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0089, t01=0x00b8}
0x0d6a2…0d6b4               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0089, t01=0x00cc}
0x0d6b4…0d6ca               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHLCI2«, t00=0x0089, t01=0x00de}
0x0d6ca…0d6e8               Head {h00=0x001a, h01=0x0050, text=» CWK A2,SYN SKIP SYNS «, t00=0x0089, t01=0x00f4}
0x0d6e8…0d6fc               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x0089, t01=0x0112}
0x0d6fc…0d722               Head {h00=0x0022, h01=0x0050, text=»IHLCI2 XRR A7,A2 CALCULATE LRC«, t00=0x0089, t01=0x0126}
0x0d722…0d72e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x014c}
0x0d72e…0d742               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0089, t01=0x0158}
0x0d742…0d754               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0089, t01=0x016c}
0x0d754…0d78a               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME «, t00=0x0089, t01=0x017e}
0x0d78a…0d7a0               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x008a, t01=0x0024}
0x0d7a0…0d7c4               Head {h00=0x0020, h01=0x0050, text=» RF(E) READ SKIP EBCDIC SYN «, t00=0x008a, t01=0x003a}
0x0d7c4…0d7d8               Head {h00=0x0010, h01=0x0050, text=»IHLCI1 EQU *«, t00=0x008a, t01=0x005e}
0x0d7d8…0d7fc               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x008a, t01=0x0072}
0x0d7fc…0d828               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x008a, t01=0x0096}
0x0d828…0d834               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x00c2}
0x0d834…0d84a               Head {h00=0x0012, h01=0x0050, text=»IHIN10 RTN A5 «, t00=0x008a, t01=0x00ce}
0x0d84a…0d866               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x008a, t01=0x00e4}
0x0d866…0d88a               Head {h00=0x0020, h01=0x0050, text=»IHIN20 CF A5,SST PERFORM SST«, t00=0x008a, t01=0x0100}
0x0d88a…0d89a               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x008a, t01=0x0124}
0x0d89a…0d8b0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008a, t01=0x0134}
0x0d8b0…0d8cc               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008a, t01=0x014a}
0x0d8cc…0d8f4               Head {h00=0x0024, h01=0x0050, text=»IHIN20 RF SST PERFORM SST SALCUZ«, t00=0x008a, t01=0x0166}
0x0d8f4…0d90a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008a, t01=0x018e}
0x0d90a…0d914               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x008b, t01=0x0014}
0x0d914…0d91e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x001e}
0x0d91e…0d928               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0028}
0x0d928…0d94a               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x008b, t01=0x0032}
0x0d94a…0d954               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0054}
0x0d954…0d95e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x005e}
0x0d95e…0d972               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x008b, t01=0x0068}
0x0d972…0d986               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x008b, t01=0x007c}
0x0d986…0d99c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x008b, t01=0x0090}
0x0d99c…0d9be               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x008b, t01=0x00a6}
0x0d9be…0d9ca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x00c8}
0x0d9ca…0d9d2               Head {h00=0x0004, h01=0x0050, t00=0x008b, t01=0x00d4}
0x0d9d2…0d9e8               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x008b, t01=0x00dc}
0x0d9e8…0da08               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x008b, t01=0x00f2}
0x0da08…0da14               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x0112}
0x0da14…0da42               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x008b, t01=0x011e}
0x0da42…0da54               Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x008b, t01=0x014c}
0x0da54…0da5e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x008b, t01=0x015e}
0x0da5e…0da68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0168}
0x0da68…0da72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0172}
0x0da72…0da9c               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x008b, t01=0x017c}
0x0da9c…0daa6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0016}
0x0daa6…0dad2               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x008c, t01=0x0020}
0x0dad2…0db04               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x008c, t01=0x004c}
0x0db04…0db34               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x008c, t01=0x007e}
0x0db34…0db64               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x008c, t01=0x00ae}
0x0db64…0db6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x00de}
0x0db6e…0db86               Head {h00=0x0014, h01=0x0050, text=»SST SST A1,LCUIN«, t00=0x008c, t01=0x00e8}
0x0db86…0dba2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008c, t01=0x0100}
0x0dba2…0dbd8               Head {h00=0x0032, h01=0x0050, text=» RF(NA) SST200 ALREADY INACTIVE SALCUZ  SALCUZ«, t00=0x008c, t01=0x011c}
0x0dbd8…0dbee               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008c, t01=0x0152}
0x0dbee…0dc00               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x008c, t01=0x0168}
0x0dc00…0dc14               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x008c, t01=0x017a}
0x0dc14…0dc3e               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOG SST INFORMATION «, t00=0x008c, t01=0x018e}
0x0dc3e…0dc4a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0028}
0x0dc4a…0dc66               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x008d, t01=0x0034}
0x0dc66…0dc78               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x008d, t01=0x0050}
0x0dc78…0dc8e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x008d, t01=0x0062}
0x0dc8e…0dca4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008d, t01=0x0078}
0x0dca4…0dcc0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008d, t01=0x008e}
0x0dcc0…0dcda               Head {h00=0x0016, h01=0x0050, text=» ANK A2,6  SALCUZ «, t00=0x008d, t01=0x00aa}
0x0dcda…0dcf8               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST100  SALCUZ «, t00=0x008d, t01=0x00c4}
0x0dcf8…0dd12               Head {h00=0x0016, h01=0x0050, text=» ANK A2,2  SALCUZ «, t00=0x008d, t01=0x00e2}
0x0dd12…0dd3c               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SST050 THROUGH PUT SALCUZ «, t00=0x008d, t01=0x00fc}
0x0dd3c…0dd66               Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 SET PARITY ERROR SALCUZ «, t00=0x008d, t01=0x0126}
0x0dd66…0dd80               Head {h00=0x0016, h01=0x0050, text=» RF SSTRET  SALCUZ«, t00=0x008d, t01=0x0150}
0x0dd80…0dd96               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008d, t01=0x016a}
0x0dd96…0ddb2               Head {h00=0x0018, h01=0x0050, text=»SST050 EQU *  SALCUZ«, t00=0x008d, t01=0x0180}
0x0ddb2…0ddd2               Head {h00=0x001c, h01=0x0050, text=» CM XSTA TROUHHPUT ERROR«, t00=0x008e, t01=0x000c}
0x0ddd2…0dde6               Head {h00=0x0010, h01=0x0050, text=» LDKL A5,STB«, t00=0x008e, t01=0x002c}
0x0dde6…0ddfa               Head {h00=0x0010, h01=0x0050, text=» ABL BRM010 «, t00=0x008e, t01=0x0040}
0x0ddfa…0de0e               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x008e, t01=0x0054}
0x0de0e…0de24               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTCU «, t00=0x008e, t01=0x0068}
0x0de24…0de40               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x008e, t01=0x007e}
0x0de40…0de6e               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x008e, t01=0x009a}
0x0de6e…0de7e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008e, t01=0x00c8}
0x0de7e…0de94               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008e, t01=0x00d8}
0x0de94…0deb0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008e, t01=0x00ee}
0x0deb0…0decc               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/21  SALCUZ «, t00=0x008e, t01=0x010a}
0x0decc…0deea               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST200 LSALCUZ «, t00=0x008e, t01=0x0126}
0x0deea…0df24               Head {h00=0x0036, h01=0x0050, text=» CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ«, t00=0x008e, t01=0x0144}
0x0df24…0df44               Head {h00=0x001c, h01=0x0050, text=» DATA BRM RESTART SALCUZ«, t00=0x008e, t01=0x017e}
0x0df44…0df64               Head {h00=0x001c, h01=0x0050, text=» DATA 2 WAIT TIME SALCUZ«, t00=0x008f, t01=0x000e}
0x0df64…0df7c               Head {h00=0x0014, h01=0x0050, text=» RF READ  SALCUZ«, t00=0x008f, t01=0x002e}
0x0df7c…0df86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0046}
0x0df86…0dfa6               Head {h00=0x001c, h01=0x0050, text=»SST200 LDK A1,0  SALCUZ «, t00=0x008f, t01=0x0050}
0x0dfa6…0dfc6               Head {h00=0x001c, h01=0x0050, text=»SSTRET ADK A5,4  SALCUZ «, t00=0x008f, t01=0x0070}
0x0dfc6…0dfe6               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 SET CR SALCUZ«, t00=0x008f, t01=0x0090}
0x0dfe6…0e004               Head {h00=0x001a, h01=0x0050, text=» ABR* A5 RETURN SALCUZ«, t00=0x008f, t01=0x00b0}
0x0e004…0e01a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008f, t01=0x00ce}
0x0e01a…0e024               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x00e4}
0x0e024…0e02e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x00ee}
0x0e02e…0e042               Head {h00=0x0010, h01=0x0050, text=»* HALT INPUT«, t00=0x008f, t01=0x00f8}
0x0e042…0e04c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x010c}
0x0e04c…0e056               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0116}
0x0e056…0e076               Head {h00=0x001c, h01=0x0050, text=»HALTIN LDK A1,0  SALCUZ «, t00=0x008f, t01=0x0120}
0x0e076…0e08e               Head {h00=0x0014, h01=0x0050, text=» CIO A1,0,LCUIN «, t00=0x008f, t01=0x0140}
0x0e08e…0e0aa               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x008f, t01=0x0158}
0x0e0aa…0e0e2               Head {h00=0x0034, h01=0x0050, text=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK«, t00=0x008f, t01=0x0174}
0x0e0e2…0e0f8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0090, t01=0x001c}
0x0e0f8…0e114               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0090, t01=0x0032}
0x0e114…0e142               Head {h00=0x002a, h01=0x0050, text=» RF READ WAIT FOR SST INTERRUPT SALCUZ«, t00=0x0090, t01=0x004e}
0x0e142…0e158               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0090, t01=0x007c}
0x0e158…0e162               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0090, t01=0x0092}
0x0e162…0e16c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x009c}
0x0e16c…0e176               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00a6}
0x0e176…0e1a6               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x0090, t01=0x00b0}
0x0e1a6…0e1b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00e0}
0x0e1b0…0e1ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00ea}
0x0e1ba…0e1ce               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0090, t01=0x00f4}
0x0e1ce…0e1e2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0090, t01=0x0108}
0x0e1e2…0e1f6               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0090, t01=0x011c}
0x0e1f6…0e20a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0090, t01=0x0130}
0x0e20a…0e23e               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x0090, t01=0x0144}
0x0e23e…0e26c               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x0090, t01=0x0178}
0x0e26c…0e278               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x0016}
0x0e278…0e28c               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x0091, t01=0x0022}
0x0e28c…0e2b2               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x0091, t01=0x0036}
0x0e2b2…0e2c8               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x0091, t01=0x005c}
0x0e2c8…0e2ea               Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x0091, t01=0x0072}
0x0e2ea…0e2fe               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0091, t01=0x0094}
0x0e2fe…0e326               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x0091, t01=0x00a8}
0x0e326…0e332               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x00d0}
0x0e332…0e346               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0091, t01=0x00dc}
0x0e346…0e370               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x0091, t01=0x00f0}
0x0e370…0e37c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x011a}
0x0e37c…0e390               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0091, t01=0x0126}
0x0e390…0e3ba               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x0091, t01=0x013a}
0x0e3ba…0e3c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x0164}
0x0e3c6…0e3d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0170}
0x0e3d0…0e3ea               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x0091, t01=0x017a}
0x0e3ea…0e3fc (146, 0, 400) Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0092, t01=0x0004}
0x0e3fc…0e406               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0092, t01=0x0016}
0x0e406…0e410               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0020}
0x0e410…0e41a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x002a}
0x0e41a…0e42c               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x0092, t01=0x0034}
0x0e42c…0e436               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0046}
0x0e436…0e456               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x0092, t01=0x0050}
0x0e456…0e460               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0070}
0x0e460…0e46a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x007a}
0x0e46a…0e48c               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0092, t01=0x0084}
0x0e48c…0e4a6               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x0092, t01=0x00a6}
0x0e4a6…0e4b8               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0092, t01=0x00c0}
0x0e4b8…0e4cc               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x0092, t01=0x00d2}
0x0e4cc…0e4e4               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x0092, t01=0x00e6}
0x0e4e4…0e4fa               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x0092, t01=0x00fe}
0x0e4fa…0e514               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x0092, t01=0x0114}
0x0e514…0e528               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0092, t01=0x012e}
0x0e528…0e53a               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x0092, t01=0x0142}
0x0e53a…0e546               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0092, t01=0x0154}
0x0e546…0e568               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x0092, t01=0x0160}
0x0e568…0e580               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x0092, t01=0x0182}
0x0e580…0e58c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x000a}
0x0e58c…0e596               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0016}
0x0e596…0e5a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0020}
0x0e5a0…0e5aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x002a}
0x0e5aa…0e5bc               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x0093, t01=0x0034}
0x0e5bc…0e5c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0046}
0x0e5c6…0e5f8               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x0093, t01=0x0050}
0x0e5f8…0e602               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0082}
0x0e602…0e60c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x008c}
0x0e60c…0e624               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x0093, t01=0x0096}
0x0e624…0e646               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0093, t01=0x00ae}
0x0e646…0e658               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0093, t01=0x00d0}
0x0e658…0e66e               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x0093, t01=0x00e2}
0x0e66e…0e682               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x0093, t01=0x00f8}
0x0e682…0e698               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x0093, t01=0x010c}
0x0e698…0e6ac               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0093, t01=0x0122}
0x0e6ac…0e6be               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x0093, t01=0x0136}
0x0e6be…0e6d6               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x0093, t01=0x0148}
0x0e6d6…0e6ea               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0093, t01=0x0160}
0x0e6ea…0e6f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x0174}
0x0e6f6…0e718               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x0093, t01=0x0180}
0x0e718…0e72c               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x0094, t01=0x0012}
0x0e72c…0e738               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x0026}
0x0e738…0e74a               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0094, t01=0x0032}
0x0e74a…0e75e               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x0094, t01=0x0044}
0x0e75e…0e772               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x0094, t01=0x0058}
0x0e772…0e782               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0094, t01=0x006c}
0x0e782…0e78c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x007c}
0x0e78c…0e796               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0086}
0x0e796…0e7a0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0094, t01=0x0090}
0x0e7a0…0e7aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x009a}
0x0e7aa…0e7ea               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x0094, t01=0x00a4}
0x0e7ea…0e7f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x00e4}
0x0e7f4…0e81c               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x0094, t01=0x00ee}
0x0e81c…0e83c               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x0094, t01=0x0116}
0x0e83c…0e852               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x0094, t01=0x0136}
0x0e852…0e878               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x0094, t01=0x014c}
0x0e878…0e882               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0172}
0x0e882…0e8c8               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x0094, t01=0x017c}
0x0e8c8…0e8f6               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x0095, t01=0x0032}
0x0e8f6…0e926               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x0095, t01=0x0060}
0x0e926…0e930               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0090}
0x0e930…0e962               Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x0095, t01=0x009a}
0x0e962…0e96c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00cc}
0x0e96c…0e976               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00d6}
0x0e976…0e98a               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x0095, t01=0x00e0}
0x0e98a…0e99e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0095, t01=0x00f4}
0x0e99e…0e9b2               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0095, t01=0x0108}
0x0e9b2…0e9be               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x011c}
0x0e9be…0e9d0               Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x0095, t01=0x0128}
0x0e9d0…0e9e4               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0095, t01=0x013a}
0x0e9e4…0e9f8               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0095, t01=0x014e}
0x0e9f8…0ea04               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x0162}
0x0ea04…0ea2e               Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x0095, t01=0x016e}
0x0ea2e…0ea5c               Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x0096, t01=0x0008}
0x0ea5c…0ea74               Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x0096, t01=0x0036}
0x0ea74…0ea94               Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x0096, t01=0x004e}
0x0ea94…0eab6               Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x0096, t01=0x006e}
0x0eab6…0eae2               Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x0096, t01=0x0090}
0x0eae2…0eb06               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x0096, t01=0x00bc}
0x0eb06…0eb1a               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0096, t01=0x00e0}
0x0eb1a…0eb42               Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x0096, t01=0x00f4}
0x0eb42…0eb70               Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x0096, t01=0x011c}
0x0eb70…0eb7c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0096, t01=0x014a}
0x0eb7c…0eb90               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0096, t01=0x0156}
0x0eb90…0ebc2               Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x0096, t01=0x016a}
0x0ebc2…0ebce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0097, t01=0x000c}
0x0ebce…0ebf8               Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x0097, t01=0x0018}
0x0ebf8…0ec10               Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x0097, t01=0x0042}
0x0ec10…0ec26               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x0097, t01=0x005a}
0x0ec26…0ec36               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0097, t01=0x0070}
0x0ec36…0ec40               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0097, t01=0x0080}
0x0ec40…0ec4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x008a}
0x0ec4a…0ec54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0094}
0x0ec54…0ec70               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x0097, t01=0x009e}
0x0ec70…0ec7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00ba}
0x0ec7a…0ec84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00c4}
0x0ec84…0ec98               Head {h00=0x0010, h01=0x0050, text=»DC15ON EQU *«, t00=0x0097, t01=0x00ce}
0x0ec98…0ecae               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0097, t01=0x00e2}
0x0ecae…0ecce               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0097, t01=0x00f8}
0x0ecce…0ecda               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0097, t01=0x0118}
0x0ecda…0ece2               Head {h00=0x0004, h01=0x0050, t00=0x0097, t01=0x0124}
0x0ece2…0ecf8               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0097, t01=0x012c}
0x0ecf8…0ed18               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0097, t01=0x0142}
0x0ed18…0ed24               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0097, t01=0x0162}
0x0ed24…0ed38               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0097, t01=0x016e}
0x0ed38…0ed58               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x0097, t01=0x0182}
0x0ed58…0ed6c               Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x0098, t01=0x0012}
0x0ed6c…0ed9e               Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x0098, t01=0x0026}
0x0ed9e…0edb6               Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x0098, t01=0x0058}
0x0edb6…0edca               Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x0098, t01=0x0070}
0x0edca…0edec               Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x0098, t01=0x0084}
0x0edec…0ee10               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x0098, t01=0x00a6}
0x0ee10…0ee44               Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x0098, t01=0x00ca}
0x0ee44…0ee70               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x0098, t01=0x00fe}
0x0ee70…0ee82               Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x0098, t01=0x012a}
0x0ee82…0ee96               Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x0098, t01=0x013c}
0x0ee96…0eea2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0098, t01=0x0150}
0x0eea2…0eeb6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0098, t01=0x015c}
0x0eeb6…0eecc               Head {h00=0x0012, h01=0x0050, text=» ORS A2,DCONOF«, t00=0x0098, t01=0x0170}
0x0eecc…0eee2               Head {h00=0x0012, h01=0x0050, text=» CF A15,CKMESS«, t00=0x0098, t01=0x0186}
0x0eee2…0ef0e               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x0099, t01=0x000c}
0x0ef0e…0ef34               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x0099, t01=0x0038}
0x0ef34…0ef62               Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x0099, t01=0x005e}
0x0ef62…0ef78               Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x0099, t01=0x008c}
0x0ef78…0ef82               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0099, t01=0x00a2}
0x0ef82…0ef8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00ac}
0x0ef8c…0efa4               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0099, t01=0x00b6}
0x0efa4…0efae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00ce}
0x0efae…0efda               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0099, t01=0x00d8}
0x0efda…0efee               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0099, t01=0x0104}
0x0efee…0f01a               Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x0099, t01=0x0118}
0x0f01a…0f048               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0099, t01=0x0144}
0x0f048…0f070               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0099, t01=0x0172}
0x0f070…0f082               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x009a, t01=0x000a}
0x0f082…0f08c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x001c}
0x0f08c…0f0c4               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x009a, t01=0x0026}
0x0f0c4…0f0ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x005e}
0x0f0ce…0f0f6               Head {h00=0x0024, h01=0x0050, text=»CPTIM CM DCONOF INDICATE POLLING«, t00=0x009a, t01=0x0068}
0x0f0f6…0f10e               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x009a, t01=0x0090}
0x0f10e…0f132               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x009a, t01=0x00a8}
0x0f132…0f160               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x009a, t01=0x00cc}
0x0f160…0f170               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x009a, t01=0x00fa}
0x0f170…0f17a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x010a}
0x0f17a…0f194               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x009a, t01=0x0114}
0x0f194…0f19e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x012e}
0x0f19e…0f1c6               Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x009a, t01=0x0138}
0x0f1c6…0f1e0               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x009a, t01=0x0160}
0x0f1e0…0f20a               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x009a, t01=0x017a}
0x0f20a…0f21e               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x009b, t01=0x0014}
0x0f21e…0f230               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x009b, t01=0x0028}
0x0f230…0f23a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009b, t01=0x003a}
0x0f23a…0f244               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0044}
0x0f244…0f264               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x009b, t01=0x004e}
0x0f264…0f26e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x006e}
0x0f26e…0f282               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x009b, t01=0x0078}
0x0f282…0f2aa               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x009b, t01=0x008c}
0x0f2aa…0f2c0               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x009b, t01=0x00b4}
0x0f2c0…0f2dc               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x009b, t01=0x00ca}
0x0f2dc…0f304               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x009b, t01=0x00e6}
0x0f304…0f314               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x009b, t01=0x010e}
0x0f314…0f31e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x011e}
0x0f31e…0f33a               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x009b, t01=0x0128}
0x0f33a…0f344               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0144}
0x0f344…0f35c               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x009b, t01=0x014e}
0x0f35c…0f378               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x009b, t01=0x0166}
0x0f378…0f39c               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x009b, t01=0x0182}
0x0f39c…0f3cc               Head {h00=0x002c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT IF OPEN SALCUZ «, t00=0x009c, t01=0x0016}
0x0f3cc…0f3e0               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x009c, t01=0x0046}
0x0f3e0…0f406               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x009c, t01=0x005a}
0x0f406…0f424               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x009c, t01=0x0080}
0x0f424…0f44e               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x009c, t01=0x009e}
0x0f44e…0f464               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x009c, t01=0x00c8}
0x0f464…0f46e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009c, t01=0x00de}
0x0f46e…0f478               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00e8}
0x0f478…0f496               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x009c, t01=0x00f2}
0x0f496…0f4a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0110}
0x0f4a0…0f4cc               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x009c, t01=0x011a}
0x0f4cc…0f4ec               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x009c, t01=0x0146}
0x0f4ec…0f50a               Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x009c, t01=0x0166}
0x0f50a…0f51c               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x009c, t01=0x0184}
0x0f51c…0f530               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x009d, t01=0x0008}
0x0f530…0f53a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009d, t01=0x001c}
0x0f53a…0f54e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x009d, t01=0x0026}
0x0f54e…0f558               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x003a}
0x0f558…0f562               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0044}
0x0f562…0f57e               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x009d, t01=0x004e}
0x0f57e…0f588               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x006a}
0x0f588…0f5a0               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x009d, t01=0x0074}
0x0f5a0…0f5be               Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x009d, t01=0x008c}
0x0f5be…0f5c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00aa}
0x0f5c8…0f5d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00b4}
0x0f5d2…0f5e6               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x009d, t01=0x00be}
0x0f5e6…0f5fc               Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x009d, t01=0x00d2}
0x0f5fc…0f614               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x009d, t01=0x00e8}
0x0f614…0f62c               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x009d, t01=0x0100}
0x0f62c…0f63e               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x009d, t01=0x0118}
0x0f63e…0f656               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x009d, t01=0x012a}
0x0f656…0f668               Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x009d, t01=0x0142}
0x0f668…0f67a               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x009d, t01=0x0154}
0x0f67a…0f68c               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x009d, t01=0x0166}
0x0f68c…0f69e               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x009d, t01=0x0178}
0x0f69e…0f6b4               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x009d, t01=0x018a}
0x0f6b4…0f6ca               Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x009e, t01=0x0010}
0x0f6ca…0f6e2               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x009e, t01=0x0026}
0x0f6e2…0f6f8               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x009e, t01=0x003e}
0x0f6f8…0f70e               Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x009e, t01=0x0054}
0x0f70e…0f726               Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x009e, t01=0x006a}
0x0f726…0f73e               Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x009e, t01=0x0082}
0x0f73e…0f74e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x009e, t01=0x009a}
0x0f74e…0f762               Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x009e, t01=0x00aa}
0x0f762…0f76c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009e, t01=0x00be}
0x0f76c…0f776               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00c8}
0x0f776…0f780               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00d2}
0x0f780…0f7ac               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x009e, t01=0x00dc}
0x0f7ac…0f7cc               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x009e, t01=0x0108}
0x0f7cc…0f7d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0128}
0x0f7d6…0f7e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0132}
0x0f7e0…0f808               Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x009e, t01=0x013c}
0x0f808…0f830               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x009e, t01=0x0164}
0x0f830…0f850               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x009e, t01=0x018c}
0x0f850…0f870               Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x009f, t01=0x001c}
0x0f870…0f890               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x009f, t01=0x003c}
0x0f890…0f8bc               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x009f, t01=0x005c}
0x0f8bc…0f8dc               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x009f, t01=0x0088}
0x0f8dc…0f8ee               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x009f, t01=0x00a8}
0x0f8ee…0f900               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x009f, t01=0x00ba}
0x0f900…0f912               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x009f, t01=0x00cc}
0x0f912…0f944               Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x009f, t01=0x00de}
0x0f944…0f954               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009f, t01=0x0110}
0x0f954…0f960               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x0120}
0x0f960…0f974               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x009f, t01=0x012c}
0x0f974…0f97e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0140}
0x0f97e…0f9a8               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x009f, t01=0x014a}
0x0f9a8…0f9ce               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x009f, t01=0x0174}
0x0f9ce…0f9d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x000a}
0x0f9d8…0f9ee               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x00a0, t01=0x0014}
0x0f9ee…0fa02               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x00a0, t01=0x002a}
0x0fa02…0fa14               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x00a0, t01=0x003e}
0x0fa14…0fa26               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x00a0, t01=0x0050}
0x0fa26…0fa3c               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x00a0, t01=0x0062}
0x0fa3c…0fa50               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x00a0, t01=0x0078}
0x0fa50…0fa64               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x00a0, t01=0x008c}
0x0fa64…0fa76               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x00a0, t01=0x00a0}
0x0fa76…0fa86               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00a0, t01=0x00b2}
0x0fa86…0fa8e               Head {h00=0x0004, h01=0x0050, t00=0x00a0, t01=0x00c2}
0x0fa8e…0fa9a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a0, t01=0x00ca}
0x0fa9a…0faa4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a0, t01=0x00d6}
0x0faa4…0faae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x00e0}
0x0faae…0fab8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x00ea}
0x0fab8…0fade               Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x00a0, t01=0x00f4}
0x0fade…0fae8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x011a}
0x0fae8…0faf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0124}
0x0faf2…0fb12               Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x00a0, t01=0x012e}
0x0fb12…0fb32               Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x00a0, t01=0x014e}
0x0fb32…0fb4c               Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x00a0, t01=0x016e}
0x0fb4c…0fb68               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x00a0, t01=0x0188}
0x0fb68…0fb7e               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x00a1, t01=0x0014}
0x0fb7e…0fbac               Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x00a1, t01=0x002a}
0x0fbac…0fbc8               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x00a1, t01=0x0058}
0x0fbc8…0fbf0               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x00a1, t01=0x0074}
0x0fbf0…0fc0a               Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x00a1, t01=0x009c}
0x0fc0a…0fc14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00b6}
0x0fc14…0fc2a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x00a1, t01=0x00c0}
0x0fc2a…0fc4a               Head {h00=0x001c, h01=0x0050, text=» DATA 0 USER ECB ADDRESS«, t00=0x00a1, t01=0x00d6}
0x0fc4a…0fc6e               Head {h00=0x0020, h01=0x0050, text=» DATA DC:ECB MMU ECB ADDRESS«, t00=0x00a1, t01=0x00f6}
0x0fc6e…0fc7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x011a}
0x0fc7a…0fc84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0126}
0x0fc84…0fca2               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x00a1, t01=0x0130}
0x0fca2…0fcce               Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x00a1, t01=0x014e}
0x0fcce…0fd00               Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x00a1, t01=0x017a}
0x0fd00…0fd26               Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x00a2, t01=0x001c}
0x0fd26…0fd56               Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x00a2, t01=0x0042}
0x0fd56…0fd74               Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x00a2, t01=0x0072}
0x0fd74…0fd9a               Head {h00=0x0022, h01=0x0050, text=» DATA 0 REQUEST TIMEOUT VALUE «, t00=0x00a2, t01=0x0090}
0x0fd9a…0fdc0               Head {h00=0x0022, h01=0x0050, text=» DATA 0 EXTRA DEVICE INFO DK5 «, t00=0x00a2, t01=0x00b6}
0x0fdc0…0fdca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00dc}
0x0fdca…0fde0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x00a2, t01=0x00e6}
0x0fde0…0fdfc               Head {h00=0x0018, h01=0x0050, text=»DC:ECB EQU * MMU ECB«, t00=0x00a2, t01=0x00fc}
0x0fdfc…0fe16               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x00a2, t01=0x0118}
0x0fe16…0fe22               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a2, t01=0x0132}
0x0fe22…0fe2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x013e}
0x0fe2c…0fe36               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a2, t01=0x0148}
0x0fe36…0fe40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0152}
0x0fe40…0fe4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x015c}
0x0fe4a…0fe6a               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x00a2, t01=0x0166}
0x0fe6a…0fe74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0186}
0x0fe74…0fe94               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x00a2, t01=0x0190}
0x0fe94…0fe9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0020}
0x0fe9e…0feb2               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x00a3, t01=0x002a}
0x0feb2…0fed6               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x00a3, t01=0x003e}
0x0fed6…0fef0               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x00a3, t01=0x0062}
0x0fef0…0ff06               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x00a3, t01=0x007c}
0x0ff06…0ff1c               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a3, t01=0x0092}
0x0ff1c…0ff30               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a3, t01=0x00a8}
0x0ff30…0ff46               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x00a3, t01=0x00bc}
0x0ff46…0ff5c               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a3, t01=0x00d2}
0x0ff5c…0ff70               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a3, t01=0x00e8}
0x0ff70…0ff86               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x00a3, t01=0x00fc}
0x0ff86…0ff9c               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a3, t01=0x0112}
0x0ff9c…0ffb0               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a3, t01=0x0128}
0x0ffb0…0ffbc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a3, t01=0x013c}
0x0ffbc…0ffd6               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x00a3, t01=0x0148}
0x0ffd6…0ffec               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a3, t01=0x0162}
0x0ffec…10000               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a3, t01=0x0178}
0x10000…10012               Head {h00=0x000e, h01=0x0050, text=» XIF   DK3«, t00=0x00a3, t01=0x018c}
0x10012…1002e               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x00a4, t01=0x000e}
0x1002e…10042               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a4, t01=0x002a}
0x10042…1004a               Head {h00=0x0004, h01=0x0050, t00=0x00a4, t01=0x003e}
0x1004a…10060               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x00a4, t01=0x0046}
0x10060…1008a               Head {h00=0x0026, h01=0x0050, text=»MMUBUF RES TBUFL+1 MMU WORK BUFFER«, t00=0x00a4, t01=0x005c}
0x1008a…10096               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a4, t01=0x0086}
0x10096…100a0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a4, t01=0x0092}
0x100a0…100aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x009c}
0x100aa…100b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00a6}
0x100b4…100d8               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x00a4, t01=0x00b0}
0x100d8…100e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00d4}
0x100e2…100ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00de}
0x100ec…10100               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00a4, t01=0x00e8}
0x10100…1011a               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x00a4, t01=0x00fc}
0x1011a…10130               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x00a4, t01=0x0116}
0x10130…10142               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a4, t01=0x012c}
0x10142…1015c               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x00a4, t01=0x013e}
0x1015c…10172               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x00a4, t01=0x0158}
0x10172…10184               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a4, t01=0x016e}
0x10184…1019c               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x00a4, t01=0x0180}
0x1019c…101b2               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x00a5, t01=0x0008}
0x101b2…101c6               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x00a5, t01=0x001e}
0x101c6…101e0               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x00a5, t01=0x0032}
0x101e0…101f6               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x00a5, t01=0x004c}
0x101f6…10208               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x00a5, t01=0x0062}
0x10208…1021a               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x00a5, t01=0x0074}
0x1021a…10230               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x00a5, t01=0x0086}
0x10230…10246               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x00a5, t01=0x009c}
0x10246…1025e               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x00a5, t01=0x00b2}
0x1025e…1027a               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x00a5, t01=0x00ca}
0x1027a…1028e               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x00a5, t01=0x00e6}
0x1028e…102a2               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x00a5, t01=0x00fa}
0x102a2…102b8               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x00a5, t01=0x010e}
0x102b8…102c2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a5, t01=0x0124}
0x102c2…102cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x012e}
0x102cc…102d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0138}
0x102d6…102f0               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x00a5, t01=0x0142}
0x102f0…10304               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x00a5, t01=0x015c}
0x10304…10314               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x00a5, t01=0x0170}
0x10314…1032a               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x00a5, t01=0x0180}
0x1032a…1033e               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x00a6, t01=0x0008}
0x1033e…10352               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x00a6, t01=0x001c}
0x10352…1035e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a6, t01=0x0030}
0x1035e…10368               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x003c}
0x10368…10372               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0046}
0x10372…1037c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0050}
0x1037c…10390               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00a6, t01=0x005a}
0x10390…1039a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a6, t01=0x006e}
0x1039a…103da               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x00a6, t01=0x0078}
0x103da…103e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x00b8}
0x103e4…103fe               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x00a6, t01=0x00c2}
0x103fe…10408               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x00dc}
0x10408…10446               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x00a6, t01=0x00e6}
0x10446…10450               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0124}
0x10450…10492               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x00a6, t01=0x012e}
0x10492…1049a               Head {h00=0x0004, h01=0x0050, t00=0x00a6, t01=0x0170}
0x1049a…104ae               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x00a6, t01=0x0178}
0x104ae…104d4               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x00a6, t01=0x018c}
0x104d4…104e6               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x00a7, t01=0x0022}
0x104e6…104fc               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a7, t01=0x0034}
0x104fc…10526               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x00a7, t01=0x004a}
0x10526…1054c               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x00a7, t01=0x0074}
0x1054c…10554               Head {h00=0x0004, h01=0x0050, t00=0x00a7, t01=0x009a}
0x10554…10566               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x00a7, t01=0x00a2}
0x10566…1057c               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a7, t01=0x00b4}
0x1057c…105a8               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x00a7, t01=0x00ca}
0x105a8…105d0               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x00a7, t01=0x00f6}
0x105d0…105e6               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x00a7, t01=0x011e}
0x105e6…105f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0134}
0x105f0…105fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x013e}
0x105fa…10604               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0148}
0x10604…1060e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a7, t01=0x0152}
0x1060e…10616               Head {h00=0x0004, h01=0x0050, t00=0x00a7, t01=0x015c}
0x10616…1063a               Head {h00=0x0020, h01=0x0050, text=»*     SCANDINAVIAN ALPHABET «, t00=0x00a7, t01=0x0164}
0x1063a…10648               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x00a7, t01=0x0188}
0x10648…1065c               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x00a8, t01=0x0008}
0x1065c…1068a               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x00a8, t01=0x001c}
0x1068a…106b8               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/232E,/3C28,/2B21 /08-/0F «, t00=0x00a8, t01=0x004a}
0x106b8…106e6               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x00a8, t01=0x0078}
0x106e6…10714               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/245D,/2A29,/3B5E /18-/1F «, t00=0x00a8, t01=0x00a6}
0x10714…10742               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x00a8, t01=0x00d4}
0x10742…10770               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/402C,/255F,/3E3F /28-/2F «, t00=0x00a8, t01=0x0102}
0x10770…1079c               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x00a8, t01=0x0130}
0x1079c…107c8               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A5B,/5C27,/3D22 /38-3F«, t00=0x00a8, t01=0x015c}
0x107c8…107d6               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x00a8, t01=0x0188}
0x107d6…107e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a9, t01=0x0008}
0x107e2…107ec               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a9, t01=0x0014}
0x107ec…107f4               Head {h00=0x0004, h01=0x0050, t00=0x00a9, t01=0x001e}
0x107f4…10810               Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x00a9, t01=0x0026}
0x10810…1082a               Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x00a9, t01=0x0042}
0x1082a…10850               Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x00a9, t01=0x005c}
0x10850…1087e               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00a9, t01=0x0082}
0x1087e…108ac               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00a9, t01=0x00b0}
0x108ac…108c0               Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x00a9, t01=0x00de}
0x108c0…108ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x00f2}
0x108ca…108d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x00fc}
0x108d4…108e0               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00a9, t01=0x0106}
0x108e0…108e4               Head {h00=0x4004, h01=0x0000}
0x108e4…108e8               00 a9 01 12                                                                                                                                                                                                                                       ┆    ┆
0x108e8…108f0 (170, 1, 8)   20 04 00 00 00 aa 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view