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

⟦5d946f178⟧

    Length: 68478 (0x10b7e)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«, »GLDC15.SC«

Derivation

└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
    └─⟦this⟧ »D3270:92/GLDC15.SC« 
└─⟦1fa4b7c7b⟧ Bits:30009694 Philips computer tape "600410A"
    └─⟦this⟧ »MOD3270/DRDC15.SC« 
    └─⟦this⟧ »MODMON/DRDC15.SC« 
└─⟦bdcaa0fa2⟧ Bits:30009700 Philips computer tape "600999"
    └─⟦this⟧ »D3270:92/GLDC15.SC« 

PTS(SC)

	IDENT	DRDC15	9.2DK 6 82-02-21 870105040924 
			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	X:L
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 
*	/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 
	RF(Z)	DCRD	READ SPECIFIC 
	SUK	A7,/06-/02 
	RF(Z)	DCWR 
	SUK	A7,/31-/06		DK5
	RF(Z)	TRINF	TRANSFER DWTINF	DK5
	SUK	A7,/37-/31		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
*				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
	ST	A8,DWTBUF,A6	SAVE ECB FOR RD. MODIFIED	DK6
	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,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
	LD	A4,DWTBUF,A6	RESTORE LAST WRITE ECB	DK6 
	ST	A4,DWTECB,A6		DK6 
	IM	XRB	SET READ BUFFER SWITCH
	CM	FDWTUT
	LDK	A1,1 
	XRS	A1,CACK	INCREMENT ACK COUNTER
				DB
	LD	A1,CRDBUF	INCREMENT READ BUFFER	DK
	ADK	A1,1	COUNTER	DK
	ST	A1,CRDBUF		DK 
				DE
	ABL	POL125	HANDEL AS WRITE	DK6 
	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
	 
* 
* 
*	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-02-21 870105040924 «, t00=0x0000, t01=0x0004}
0x00034…00052               Head {h00=0x001a, h01=0x0050, text=»   DK6, READ MODIFIED «, t00=0x0000, t01=0x0038}
0x00052…00082               Head {h00=0x002c, h01=0x0050, text=»   DK5, LP, DWTINF, ST.PR.BIT, 81-11-05 «, t00=0x0000, t01=0x0056}
0x00082…0008a               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0086}
0x0008a…000aa               Head {h00=0x001c, h01=0x0050, text=»   DK3, RBUFNR=1 ALLOWED«, t00=0x0000, t01=0x008e}
0x000aa…000c0               Head {h00=0x0012, h01=0x0050, text=»   DK2, TBUFL «, t00=0x0000, t01=0x00ae}
0x000c0…000d4               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x00c4}
0x000d4…00108               Head {h00=0x0030, h01=0x0050, text=»   DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. «, t00=0x0000, t01=0x00d8}
0x00108…0011c               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x010c}
0x0011c…00138               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-08-16 «, t00=0x0000, t01=0x0120}
0x00138…0015c               Head {h00=0x0020, h01=0x0050, text=»   =8, ASCII-MODE FOR SALCUZ«, t00=0x0000, t01=0x013c}
0x0015c…00178               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0000, t01=0x0160}
0x00178…001a2               Head {h00=0x0026, h01=0x0050, text=»   =7, ACK IN CONVERSATIONAL MODE «, t00=0x0000, t01=0x017c}
0x001a2…001be               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0001, t01=0x0016}
0x001be…001ec               Head {h00=0x002a, h01=0x0050, text=»   =6, DCTASK BUFFER ADDRESS DESTROYED«, t00=0x0001, t01=0x0032}
0x001ec…00208               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x0060}
0x00208…00230               Head {h00=0x0024, h01=0x0050, text=»   =5, INCOMPLETE POLL SEQUENCE «, t00=0x0001, t01=0x007c}
0x00230…0024c               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x00a4}
0x0024c…0026e               Head {h00=0x001e, h01=0x0050, text=»   =3, TRANSFER PARAMETER «, t00=0x0001, t01=0x00c0}
0x0026e…0028a               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x00e2}
0x0028a…002aa               Head {h00=0x001c, h01=0x0050, text=»   =4, ANY MESSAGE ORDER«, t00=0x0001, t01=0x00fe}
0x002aa…002c6               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x011e}
0x002c6…002e4               Head {h00=0x001a, h01=0x0050, text=»   =2, ABORT HANDLING «, t00=0x0001, t01=0x013a}
0x002e4…00300               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-29 «, t00=0x0001, t01=0x0158}
0x00300…0031e               Head {h00=0x001a, h01=0x0050, text=»   =1, MSR-INSTRUCTION«, t00=0x0001, t01=0x0174}
0x0031e…0033a (2, 0, 400)   Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-14 «, t00=0x0002, t01=0x0004}
0x0033a…00356               Head {h00=0x0018, h01=0x0050, text=»   REL 8.2 78-11-14 «, t00=0x0002, t01=0x0020}
0x00356…0035e               Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x003c}
0x0035e…00368               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0044}
0x00368…00372               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x004e}
0x00372…003a8               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x0058}
0x003a8…003b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x008e}
0x003b2…003da               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x0098}
0x003da…003e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c0}
0x003e4…00412               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x00ca}
0x00412…00444               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0002, t01=0x00f8}
0x00444…00468               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0002, t01=0x012a}
0x00468…00472               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014e}
0x00472…0047c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0158}
0x0047c…00486               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0162}
0x00486…00490               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x016c}
0x00490…0049a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0176}
0x0049a…004d6               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0002, t01=0x0180}
0x004d6…004e0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0003, t01=0x002c}
0x004e0…004ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0036}
0x004ea…004f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0040}
0x004f4…0050a               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0003, t01=0x004a}
0x0050a…00514               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0060}
0x00514…0054a               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0003, t01=0x006a}
0x0054a…00570               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x00a0}
0x00570…00596               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x00c6}
0x00596…005bc               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0003, t01=0x00ec}
0x005bc…005e2               Head {h00=0x0022, h01=0x0050, text=» ENTRY DW1500 DWT FOR DC TASK «, t00=0x0003, t01=0x0112}
0x005e2…005ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0138}
0x005ec…005f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0142}
0x005f6…00614               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0003, t01=0x014c}
0x00614…0061e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x016a}
0x0061e…00628               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0174}
0x00628…0064e               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0003, t01=0x017e}
0x0064e…0067a               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0004, t01=0x0014}
0x0067a…006a2               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0004, t01=0x0040}
0x006a2…006c6               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0004, t01=0x0068}
0x006c6…006e6               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x008c}
0x006e6…00706               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x00ac}
0x00706…00724               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x00cc}
0x00724…00742               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0004, t01=0x00ea}
0x00742…00770               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x0108}
0x00770…0079c               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0004, t01=0x0136}
0x0079c…007c8               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0004, t01=0x0162}
0x007c8…007f0               Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0004, t01=0x018e}
0x007f0…0081a               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0005, t01=0x0026}
0x0081a…00844               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0005, t01=0x0050}
0x00844…00868               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x007a}
0x00868…0088e               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0005, t01=0x009e}
0x0088e…008bc               Head {h00=0x002a, h01=0x0050, text=» EXTRN DC:MIN MOVE DATA TO USER BUFFER«, t00=0x0005, t01=0x00c4}
0x008bc…008ec               Head {h00=0x002c, h01=0x0050, text=» EXTRN DC:MOT MOVE DATA FROM USER BUFFER«, t00=0x0005, t01=0x00f2}
0x008ec…00920               Head {h00=0x0030, h01=0x0050, text=» EXTRN DISEND COMPLETE REQUEST AND DISPATCH «, t00=0x0005, t01=0x0122}
0x00920…0092a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0005, t01=0x0156}
0x0092a…00934               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0160}
0x00934…0093e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x016a}
0x0093e…00948               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0174}
0x00948…00952               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x017e}
0x00952…0098c               Head {h00=0x0036, h01=0x0050, text=»*   STANDARD INTERFACE PART FOR DATA COMMUNICATION«, t00=0x0005, t01=0x0188}
0x0098c…00996               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0032}
0x00996…009a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x003c}
0x009a0…009aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0046}
0x009aa…009b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0050}
0x009b4…009ca               Head {h00=0x0012, h01=0x0050, text=»* DWT CONTENTS«, t00=0x0006, t01=0x005a}
0x009ca…009d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0070}
0x009d4…00a22               Head {h00=0x004a, h01=0x0050, text=»* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)«, t00=0x0006, t01=0x007a}
0x00a22…00a2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c8}
0x00a2c…00a36               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0006, t01=0x00d2}
0x00a36…00a76               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0006, t01=0x00dc}
0x00a76…00a80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x011c}
0x00a80…00aae               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x0126}
0x00aae…00ab8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0154}
0x00ab8…00ae4               Head {h00=0x0028, h01=0x0050, text=»XRVI EQU /5C STANDARD:/40, DK:/5C DK«, t00=0x0006, t01=0x015e}
0x00ae4…00b12               Head {h00=0x002a, h01=0x0050, text=»X:D EQU 0 BASE FOR RBUFL AND TBUFL DK «, t00=0x0006, t01=0x018a}
0x00b12…00b38               Head {h00=0x0022, h01=0x0050, text=»X:X EQU 500 VALUE FOR BASE DK «, t00=0x0007, t01=0x0028}
0x00b38…00b62               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 2000 RECEIVE BUFFER LENGTH«, t00=0x0007, t01=0x004e}
0x00b62…00b80               Head {h00=0x001a, h01=0x0050, text=»RBUFL EQU 650+X:X  DK «, t00=0x0007, t01=0x0078}
0x00b80…00ba4               Head {h00=0x0020, h01=0x0050, text=»X:B EQU /60 DCTASK FILE CODE«, t00=0x0007, t01=0x0096}
0x00ba4…00bba               Head {h00=0x0012, h01=0x0050, text=»DC15FC EQU /60«, t00=0x0007, t01=0x00ba}
0x00bba…00be2               Head {h00=0x0024, h01=0x0050, text=»X:C EQU 1 IF 1 INTERRUPT LOGGING«, t00=0x0007, t01=0x00d0}
0x00be2…00bf4               Head {h00=0x000e, h01=0x0050, text=»LOGG EQU 0«, t00=0x0007, t01=0x00f8}
0x00bf4…00bfe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x010a}
0x00bfe…00c2c               Head {h00=0x002a, h01=0x0050, text=»TIMPOL EQU 600 POLL TIMEOUT VALUE  DK «, t00=0x0007, t01=0x0114}
0x00c2c…00c5a               Head {h00=0x002a, h01=0x0050, text=»X:E EQU 1 STATUS AND RVI HANDLING IF=1«, t00=0x0007, t01=0x0142}
0x00c5a…00c6e               Head {h00=0x0010, h01=0x0050, text=»STAT EQU X:E«, t00=0x0007, t01=0x0170}
0x00c6e…00c9a               Head {h00=0x0028, h01=0x0050, text=»X:F EQU 1 READ COMMAND HANDLING IF=1«, t00=0x0007, t01=0x0184}
0x00c9a…00cae               Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:F«, t00=0x0008, t01=0x0020}
0x00cae…00cd8               Head {h00=0x0026, h01=0x0050, text=»X:G EQU 252 TRANSMIT BLOCK LENGTH «, t00=0x0008, t01=0x0034}
0x00cd8…00cee               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU X:G «, t00=0x0008, t01=0x005e}
0x00cee…00d1a               Head {h00=0x0028, h01=0x0050, text=»X:H EQU 1 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0008, t01=0x0074}
0x00d1a…00d2e               Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:H«, t00=0x0008, t01=0x00a0}
0x00d2e…00d5c               Head {h00=0x002a, h01=0x0050, text=»X:I EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0008, t01=0x00b4}
0x00d5c…00d72               Head {h00=0x0012, h01=0x0050, text=»SPECP EQU X:I «, t00=0x0008, t01=0x00e2}
0x00d72…00da2               Head {h00=0x002c, h01=0x0050, text=»X:J EQU 1 IF = 1  LINE SPEED SET TO HIGH«, t00=0x0008, t01=0x00f8}
0x00da2…00dce               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0008, t01=0x0128}
0x00dce…00de4               Head {h00=0x0012, h01=0x0050, text=»SPEED EQU X:J «, t00=0x0008, t01=0x0154}
0x00de4…00e12               Head {h00=0x002a, h01=0x0050, text=»X:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0008, t01=0x016a}
0x00e12…00e26               Head {h00=0x0010, h01=0x0050, text=»MSV1 EQU X:K«, t00=0x0009, t01=0x0008}
0x00e26…00e58               Head {h00=0x002e, h01=0x0050, text=»X:L EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0009, t01=0x001c}
0x00e58…00e6e               Head {h00=0x0012, h01=0x0050, text=»RBUFNR EQU X:L«, t00=0x0009, t01=0x004e}
0x00e6e…00ea0               Head {h00=0x002e, h01=0x0050, text=»X:M EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x0009, t01=0x0064}
0x00ea0…00eb6               Head {h00=0x0012, h01=0x0050, text=»P6805 EQU X:M «, t00=0x0009, t01=0x0096}
0x00eb6…00eca               Head {h00=0x0010, h01=0x0050, text=»X:N EQU /02 «, t00=0x0009, t01=0x00ac}
0x00eca…00ede               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0009, t01=0x00c0}
0x00ede…00f0e               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU X:N DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x00d4}
0x00f0e…00f1a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0104}
0x00f1a…00f2e               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0009, t01=0x0110}
0x00f2e…00f5e               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x0124}
0x00f5e…00f6a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0154}
0x00f6a…00f7c               Head {h00=0x000e, h01=0x0050, text=»X:O EQU 0 «, t00=0x0009, t01=0x0160}
0x00f7c…00fae               Head {h00=0x002e, h01=0x0050, text=»IBMCHR EQU X:O IF 1 IBM CHARACTER HANDLING«, t00=0x0009, t01=0x0172}
0x00fae…00fe0               Head {h00=0x002e, h01=0x0050, text=»X:P EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x000a, t01=0x0014}
0x00fe0…00ff6               Head {h00=0x0012, h01=0x0050, text=»MESPAS EQU X:P«, t00=0x000a, t01=0x0046}
0x00ff6…0102e               Head {h00=0x0034, h01=0x0050, text=»X:Q EQU 1 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000a, t01=0x005c}
0x0102e…01044               Head {h00=0x0012, h01=0x0050, text=»EM3270 EQU X:Q«, t00=0x000a, t01=0x0094}
0x01044…01058               Head {h00=0x0010, h01=0x0050, text=»X:R EQU 1000«, t00=0x000a, t01=0x00aa}
0x01058…01068               Head {h00=0x000c, h01=0x0050, text=»    DK2 «, t00=0x000a, t01=0x00be}
0x01068…01096               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000a, t01=0x00ce}
0x01096…010c8               Head {h00=0x002e, h01=0x0050, text=»TSTREQ EQU X:I IF 1 TEST REQUEST HANDLING «, t00=0x000a, t01=0x00fc}
0x010c8…010f8               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 1 SPECIAL CONDITION FOR DENMARK«, t00=0x000a, t01=0x012e}
0x010f8…01130               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000a, t01=0x015e}
0x01130…01164               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000b, t01=0x0008}
0x01164…01198               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000b, t01=0x003c}
0x01198…011c8               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000b, t01=0x0070}
0x011c8…011e4               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000b, t01=0x00a0}
0x011e4…01224               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x00bc}
0x01224…0123a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x00fc}
0x0123a…0124e               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x0112}
0x0124e…0128e               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x0126}
0x0128e…012a4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x0166}
0x012a4…012ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x017c}
0x012ae…012b8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000b, t01=0x0186}
0x012b8…012c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0190}
0x012c2…012cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x000a}
0x012cc…012fe               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x0014}
0x012fe…01308               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0046}
0x01308…01326               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000c, t01=0x0050}
0x01326…01330               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x006e}
0x01330…01362               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x0078}
0x01362…0136c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00aa}
0x0136c…0139e               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000c, t01=0x00b4}
0x0139e…013cc               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000c, t01=0x00e6}
0x013cc…013d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0114}
0x013d6…013ea               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000c, t01=0x011e}
0x013ea…013f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0132}
0x013f4…01402               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x000c, t01=0x013c}
0x01402…0141c               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=0  DK2«, t00=0x000c, t01=0x014a}
0x0141c…01434               Head {h00=0x0014, h01=0x0050, text=»TBUFL EQU 0  DK2«, t00=0x000c, t01=0x0164}
0x01434…01446               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000c, t01=0x017c}
0x01446…01450               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x018e}
0x01450…0146a               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=1  DK2«, t00=0x000d, t01=0x0008}
0x0146a…01498               Head {h00=0x002a, h01=0x0050, text=»TBUFL EQU 650+X:X MMU BUFFER LENGTH DK«, t00=0x000d, t01=0x0022}
0x01498…014aa               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000d, t01=0x0050}
0x014aa…014b8               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x000d, t01=0x0062}
0x014b8…014c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0070}
0x014c2…014fc               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000d, t01=0x007a}
0x014fc…0152e               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000d, t01=0x00b4}
0x0152e…01538               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00e6}
0x01538…0154c               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000d, t01=0x00f0}
0x0154c…01556               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0104}
0x01556…0158c               Head {h00=0x0032, h01=0x0050, text=»DEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION «, t00=0x000d, t01=0x010e}
0x0158c…015ba               Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE«, t00=0x000d, t01=0x0144}
0x015ba…015c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0172}
0x015c4…015ce               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000d, t01=0x017c}
0x015ce…015d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0186}
0x015d8…015f4               Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x000d, t01=0x0190}
0x015f4…015fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x001c}
0x015fe…01632               Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000e, t01=0x0026}
0x01632…0163c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x005a}
0x0163c…01652               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000e, t01=0x0064}
0x01652…0166a               Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000e, t01=0x007a}
0x0166a…01676               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0092}
0x01676…01680               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x009e}
0x01680…01696               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x00a8}
0x01696…016b0               Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000e, t01=0x00be}
0x016b0…016bc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x00d8}
0x016bc…016c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00e4}
0x016c6…016fe               Head {h00=0x0034, h01=0x0050, text=»DWTTP EQU START+/00 TIMER POINTER ORDER PROCESS «, t00=0x000e, t01=0x00ee}
0x016fe…01730               Head {h00=0x002e, h01=0x0050, text=»DWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE«, t00=0x000e, t01=0x0126}
0x01730…01758               Head {h00=0x0024, h01=0x0050, text=»DWTSQ EQU START+/04 STATUS QUEUE«, t00=0x000e, t01=0x0158}
0x01758…01782               Head {h00=0x0026, h01=0x0050, text=»DWTRQ EQU START+/06 RECEIVE QUEUE «, t00=0x000e, t01=0x0180}
0x01782…017b4               Head {h00=0x002e, h01=0x0050, text=»DWTBUF EQU START+/08 DEVICE BUFFER ADDRESS«, t00=0x000f, t01=0x001a}
0x017b4…017e0               Head {h00=0x0028, h01=0x0050, text=»DWTCUR EQU START+/0A CURSOR ADDRESS «, t00=0x000f, t01=0x004c}
0x017e0…01810               Head {h00=0x002c, h01=0x0050, text=»DWTTIM EQU START+/0C REQUEST TIMER VALUE«, t00=0x000f, t01=0x0078}
0x01810…01842               Head {h00=0x002e, h01=0x0050, text=»DWTINF EQU START+/0E DEVICE INFO, 1=LP DK5«, t00=0x000f, t01=0x00a8}
0x01842…0184c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00da}
0x0184c…01856               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000f, t01=0x00e4}
0x01856…01860               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ee}
0x01860…0187a               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000f, t01=0x00f8}
0x0187a…01884               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0112}
0x01884…0188e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x011c}
0x0188e…01898               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0126}
0x01898…018aa               Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000f, t01=0x0130}
0x018aa…018b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0142}
0x018b4…018c8               Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000f, t01=0x014c}
0x018c8…018dc               Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x000f, t01=0x0160}
0x018dc…01900               Head {h00=0x0020, h01=0x0050, text=»* /31: TRANSFER DWTINF  DK5 «, t00=0x000f, t01=0x0174}
0x01900…01922               Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x0010, t01=0x0008}
0x01922…0193c               Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x0010, t01=0x002a}
0x0193c…01964               Head {h00=0x0024, h01=0x0050, text=»* /39: SET REQUEST TIMEOUT VALUE«, t00=0x0010, t01=0x0044}
0x01964…0196e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006c}
0x0196e…01978               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0076}
0x01978…0199a               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x0010, t01=0x0080}
0x0199a…019a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a2}
0x019a4…019ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ac}
0x019ae…019d8               Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x0010, t01=0x00b6}
0x019d8…01a06               Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x0010, t01=0x00e0}
0x01a06…01a2a               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x0010, t01=0x010e}
0x01a2a…01a52               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x0010, t01=0x0132}
0x01a52…01a82               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x0010, t01=0x015a}
0x01a82…01a8c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0010, t01=0x018a}
0x01a8c…01a96 (17, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0004}
0x01a96…01ab6               Head {h00=0x001c, h01=0x0050, text=»* DC TASK ADDRESS BLOCK «, t00=0x0011, t01=0x000e}
0x01ab6…01ac0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x002e}
0x01ac0…01ae8               Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDICATES NO MMU BUFFER «, t00=0x0011, t01=0x0038}
0x01ae8…01b0a               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0011, t01=0x0060}
0x01b0a…01b38               Head {h00=0x002a, h01=0x0050, text=»DC15DC DATA DCACTD ACTIVATION ADDRESS «, t00=0x0011, t01=0x0082}
0x01b38…01b62               Head {h00=0x0026, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x00b0}
0x01b62…01b8a               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x00da}
0x01b8a…01b94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0102}
0x01b94…01bb2               Head {h00=0x001a, h01=0x0050, text=»* DRIVER ADDRESS BLOCK«, t00=0x0011, t01=0x010c}
0x01bb2…01bbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x012a}
0x01bbc…01be0               Head {h00=0x0020, h01=0x0050, text=» DATA BUFLEN MMU BUFFER SIZE«, t00=0x0011, t01=0x0134}
0x01be0…01c02               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0011, t01=0x0158}
0x01c02…01c2e               Head {h00=0x0028, h01=0x0050, text=»DC15AD DATA DCACT ACTIVATION ADDRESS«, t00=0x0011, t01=0x017a}
0x01c2e…01c66               Head {h00=0x0034, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS «, t00=0x0012, t01=0x0016}
0x01c66…01c8e               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0012, t01=0x004e}
0x01c8e…01c98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0076}
0x01c98…01cc8               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x0012, t01=0x0080}
0x01cc8…01cda               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x0012, t01=0x00b0}
0x01cda…01d00               Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x0012, t01=0x00c2}
0x01d00…01d12               Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x0012, t01=0x00e8}
0x01d12…01d1a               Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x00fa}
0x01d1a…01d2e               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x0012, t01=0x0102}
0x01d2e…01d46               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x0012, t01=0x0116}
0x01d46…01d52               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x012e}
0x01d52…01d66               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x0012, t01=0x013a}
0x01d66…01d7a               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x0012, t01=0x014e}
0x01d7a…01d86               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0162}
0x01d86…01d90               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0012, t01=0x016e}
0x01d90…01d9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0178}
0x01d9a…01da4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0182}
0x01da4…01dcc               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x0012, t01=0x018c}
0x01dcc…01dd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0024}
0x01dd6…01dea               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x0013, t01=0x002e}
0x01dea…01e0e               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0013, t01=0x0042}
0x01e0e…01e28               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0013, t01=0x0066}
0x01e28…01e3e               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0013, t01=0x0080}
0x01e3e…01e68               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0013, t01=0x0096}
0x01e68…01e74               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00c0}
0x01e74…01e88               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0013, t01=0x00cc}
0x01e88…01eaa               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DCRD READ SPECIFIC «, t00=0x0013, t01=0x00e0}
0x01eaa…01ec2               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x0013, t01=0x0102}
0x01ec2…01ed6               Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x0013, t01=0x011a}
0x01ed6…01ef2               Head {h00=0x0018, h01=0x0050, text=» SUK A7,/31-/06  DK5«, t00=0x0013, t01=0x012e}
0x01ef2…01f1a               Head {h00=0x0024, h01=0x0050, text=» RF(Z) TRINF TRANSFER DWTINF DK5«, t00=0x0013, t01=0x014a}
0x01f1a…01f36               Head {h00=0x0018, h01=0x0050, text=» SUK A7,/37-/31  DK5«, t00=0x0013, t01=0x0172}
0x01f36…01f5e               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x0013, t01=0x018e}
0x01f5e…01f72               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0014, t01=0x0026}
0x01f72…01f8a               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x0014, t01=0x003a}
0x01f8a…01fae               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) DCSS SET STATUS DK4 «, t00=0x0014, t01=0x0052}
0x01fae…01fc6               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/38 «, t00=0x0014, t01=0x0076}
0x01fc6…01fee               Head {h00=0x0024, h01=0x0050, text=» ABL(Z) REQTIM SET REQUEST TIMER«, t00=0x0014, t01=0x008e}
0x01fee…01ffa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x00b6}
0x01ffa…02002               Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x00c2}
0x02002…02016               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=0 «, t00=0x0014, t01=0x00ca}
0x02016…0202e               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/37 «, t00=0x0014, t01=0x00de}
0x0202e…02056               Head {h00=0x0024, h01=0x0050, text=» RF(Z) REQTIM SET REQUEST TIMER «, t00=0x0014, t01=0x00f6}
0x02056…02062               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x011e}
0x02062…02074               Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x0014, t01=0x012a}
0x02074…0207e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0014, t01=0x013c}
0x0207e…02088               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0146}
0x02088…02092               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0150}
0x02092…020b2               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x0014, t01=0x015a}
0x020b2…020bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x017a}
0x020bc…020c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0184}
0x020c6…020da               Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x0014, t01=0x018e}
0x020da…02102               Head {h00=0x0024, h01=0x0050, text=» SUR A1,A1 PRESET RETURN CODE =4«, t00=0x0015, t01=0x0012}
0x02102…0211c               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0015, t01=0x003a}
0x0211c…02132               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0015, t01=0x0054}
0x02132…0215c               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0015, t01=0x006a}
0x0215c…02168               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0094}
0x02168…0217c               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0015, t01=0x00a0}
0x0217c…02196               Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x0015, t01=0x00b4}
0x02196…021ae               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/02 «, t00=0x0015, t01=0x00ce}
0x021ae…021d6               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x0015, t01=0x00e6}
0x021d6…021de               Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x010e}
0x021de…02200               Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x0015, t01=0x0116}
0x02200…02222               Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x0015, t01=0x0138}
0x02222…0222c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x015a}
0x0222c…02236               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0164}
0x02236…02250               Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x0015, t01=0x016e}
0x02250…0225a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0188}
0x0225a…02264 (22, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0004}
0x02264…02282               Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0016, t01=0x000e}
0x02282…0229a               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0016, t01=0x002c}
0x0229a…022c4               Head {h00=0x0026, h01=0x0050, text=»*   STATUS CHANGE ON DC EQUIPMENT «, t00=0x0016, t01=0x0044}
0x022c4…022ec               Head {h00=0x0024, h01=0x0050, text=»*   SPONTANOUS MESSAGE RECEPTION«, t00=0x0016, t01=0x006e}
0x022ec…022f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0096}
0x022f6…0230a               Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0016, t01=0x00a0}
0x0230a…0233a               Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0016, t01=0x00b4}
0x0233a…0234e               Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0016, t01=0x00e4}
0x0234e…02372               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0016, t01=0x00f8}
0x02372…0238c               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0016, t01=0x011c}
0x0238c…02396               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0016, t01=0x0136}
0x02396…023c8               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0016, t01=0x0140}
0x023c8…023d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0172}
0x023d2…023f0               Head {h00=0x001a, h01=0x0050, text=»*   ANY MESSAGE ORDER «, t00=0x0016, t01=0x017c}
0x023f0…023fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x000a}
0x023fa…02420               Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0017, t01=0x0014}
0x02420…02428               Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x003a}
0x02428…0245e               Head {h00=0x0032, h01=0x0050, text=»ANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4«, t00=0x0017, t01=0x0042}
0x0245e…0247c               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCRD10 NO!! =4 «, t00=0x0017, t01=0x0078}
0x0247c…024a8               Head {h00=0x0028, h01=0x0050, text=» RF ENDIO YES!! COMPLETE REQUEST =4 «, t00=0x0017, t01=0x0096}
0x024a8…024b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00c2}
0x024b4…024be               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0017, t01=0x00ce}
0x024be…024c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00d8}
0x024c8…024e6               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER DWTINF  DK5«, t00=0x0017, t01=0x00e2}
0x024e6…024f6               Head {h00=0x000c, h01=0x0050, text=»*    DK5«, t00=0x0017, t01=0x0100}
0x024f6…0250e               Head {h00=0x0014, h01=0x0050, text=»TRINF EQU *  DK5«, t00=0x0017, t01=0x0110}
0x0250e…02532               Head {h00=0x0020, h01=0x0050, text=» LD A2,ECBCW,A8 GET INFO DK5«, t00=0x0017, t01=0x0128}
0x02532…0255c               Head {h00=0x0026, h01=0x0050, text=» ORS A2,DWTINF,A6 OR AND STORE DK5«, t00=0x0017, t01=0x014c}
0x0255c…02582               Head {h00=0x0022, h01=0x0050, text=» RF ENDIO COMPLETE REQUEST DK5«, t00=0x0017, t01=0x0176}
0x02582…02592               Head {h00=0x000c, h01=0x0050, text=»*    DK5«, t00=0x0018, t01=0x000c}
0x02592…0259c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x001c}
0x0259c…025ba               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0018, t01=0x0026}
0x025ba…025c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0044}
0x025c4…025ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x004e}
0x025ce…02610               Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0018, t01=0x0058}
0x02610…0264e               Head {h00=0x003a, h01=0x0050, text=»*         FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0018, t01=0x009a}
0x0264e…02658               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00d8}
0x02658…02662               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00e2}
0x02662…02676               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0018, t01=0x00ec}
0x02676…026a0               Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0018, t01=0x0100}
0x026a0…026ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x012a}
0x026ac…026c0               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0018, t01=0x0136}
0x026c0…026ea               Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0018, t01=0x014a}
0x026ea…026fe               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0018, t01=0x0174}
0x026fe…02714               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x0018, t01=0x0188}
0x02714…02740               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0019, t01=0x000e}
0x02740…02752               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0019, t01=0x003a}
0x02752…02766               Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x0019, t01=0x004c}
0x02766…0278e               Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x0019, t01=0x0060}
0x0278e…027a2               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0019, t01=0x0088}
0x027a2…027ce               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x0019, t01=0x009c}
0x027ce…027da               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00c8}
0x027da…02808               Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTBUF,A6 SAVE TERM. ADDR. DK4 «, t00=0x0019, t01=0x00d4}
0x02808…0281e               Head {h00=0x0012, h01=0x0050, text=»DCTP12 EQU *  «, t00=0x0019, t01=0x0102}
0x0281e…02854               Head {h00=0x0032, h01=0x0050, text=» LD A1,DCSTQ CHECK IF THIS DWT IS IN QUEUE DK4«, t00=0x0019, t01=0x0118}
0x02854…0286a               Head {h00=0x0012, h01=0x0050, text=»DCTP14 EQU *  «, t00=0x0019, t01=0x014e}
0x0286a…0289a               Head {h00=0x002c, h01=0x0050, text=» RF(Z) DCTP18 NO, END OF/OR NO QUEUE DK4«, t00=0x0019, t01=0x0164}
0x0289a…028c4 (26, 0, 398)  Head {h00=0x0026, h01=0x0050, text=» LDR A3,A6 ADJUST ADDR. VALUE DK4 «, t00=0x001a, t01=0x0004}
0x028c4…028e0               Head {h00=0x0018, h01=0x0050, text=» ADKL A3,DWTSQ  DK4 «, t00=0x001a, t01=0x002e}
0x028e0…02910               Head {h00=0x002c, h01=0x0050, text=» CWR A1,A3 SOMETHING QUEUED OUR DWT? DK4«, t00=0x001a, t01=0x004a}
0x02910…02948               Head {h00=0x0034, h01=0x0050, text=» RF(E) DCTP16 YES, WAIT BEFORE TRANS. PARAM. DK4«, t00=0x001a, t01=0x007a}
0x02948…02972               Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A1 NOT OURS, GET NEXT DK4«, t00=0x001a, t01=0x00b2}
0x02972…0298a               Head {h00=0x0014, h01=0x0050, text=» RB DCTP14  DK4 «, t00=0x001a, t01=0x00dc}
0x0298a…029a0               Head {h00=0x0012, h01=0x0050, text=»DCTP16 EQU *  «, t00=0x001a, t01=0x00f4}
0x029a0…029cc               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A6 SAVE DWT AS PARAMETER DK4«, t00=0x001a, t01=0x010a}
0x029cc…02a00               Head {h00=0x0030, h01=0x0050, text=» CF A15,SETIME WAIT UNTIL STATUS IS SENT DK4«, t00=0x001a, t01=0x0136}
0x02a00…02a2c               Head {h00=0x0028, h01=0x0050, text=» DATA TPTOUT,20 DELAY= 2 SECONDS DK4«, t00=0x001a, t01=0x016a}
0x02a2c…02a42               Head {h00=0x0012, h01=0x0050, text=» RB DCRTN  DK4«, t00=0x001b, t01=0x0008}
0x02a42…02a58               Head {h00=0x0012, h01=0x0050, text=»TPTOUT EQU *  «, t00=0x001b, t01=0x001e}
0x02a58…02a7a               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 RESTORE DWT DK4«, t00=0x001b, t01=0x0034}
0x02a7a…02aa8               Head {h00=0x002a, h01=0x0050, text=» RB DCTP12 LOOK IN THE QUEUE AGAIN DK4«, t00=0x001b, t01=0x0056}
0x02aa8…02abe               Head {h00=0x0012, h01=0x0050, text=»DCTP18 EQU *  «, t00=0x001b, t01=0x0084}
0x02abe…02aee               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTBUF,A6 RESTORE TERM ADDR. DK4 «, t00=0x001b, t01=0x009a}
0x02aee…02b1a               Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x001b, t01=0x00ca}
0x02b1a…02b22               Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x00f6}
0x02b22…02b36               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x001b, t01=0x00fe}
0x02b36…02b6c               Head {h00=0x0032, h01=0x0050, text=» ST A8,DWTBUF,A6 SAVE ECB FOR RD. MODIFIED DK6«, t00=0x001b, t01=0x0112}
0x02b6c…02b78               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0148}
0x02b78…02b9e               Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x001b, t01=0x0154}
0x02b9e…02bd4               Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!!  SHOULD NOT BE IN DC:TAB «, t00=0x001b, t01=0x017a}
0x02bd4…02c02               Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x001c, t01=0x0020}
0x02c02…02c30               Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x001c, t01=0x004e}
0x02c30…02c5a               Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x001c, t01=0x007c}
0x02c5a…02c64               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x001c, t01=0x00a6}
0x02c64…02c6c               Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x00b0}
0x02c6c…02c74               Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x00b8}
0x02c74…02c88               Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x001c, t01=0x00c0}
0x02c88…02cae               Head {h00=0x0022, h01=0x0050, text=» LD A4,DCTAB DC:TAB ADDRESS =3«, t00=0x001c, t01=0x00d4}
0x02cae…02cd6               Head {h00=0x0024, h01=0x0050, text=» AD* A4,DCTAB LAST TABLE POS. =3«, t00=0x001c, t01=0x00fa}
0x02cd6…02d04               Head {h00=0x002a, h01=0x0050, text=»DCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3«, t00=0x001c, t01=0x0122}
0x02d04…02d32               Head {h00=0x002a, h01=0x0050, text=» CW A4,DCTAB ALL ENTRIES CHECKED?? =3 «, t00=0x001c, t01=0x0150}
0x02d32…02d60               Head {h00=0x002a, h01=0x0050, text=» RF(E) DCTP25 YES.DWT NOT IN TABLE =3 «, t00=0x001c, t01=0x017e}
0x02d60…02d82               Head {h00=0x001e, h01=0x0050, text=» CWR* A6,A4 IN TABLE ?? =3«, t00=0x001d, t01=0x001c}
0x02d82…02da0               Head {h00=0x001a, h01=0x0050, text=» RF(E) DCTP30 YES!! =3«, t00=0x001d, t01=0x003e}
0x02da0…02dc6               Head {h00=0x0022, h01=0x0050, text=» RB DCTP22 CHECK NEXT ENTRY =3«, t00=0x001d, t01=0x005c}
0x02dc6…02dde               Head {h00=0x0014, h01=0x0050, text=»DCTP25 EQU *  =3«, t00=0x001d, t01=0x0082}
0x02dde…02de6               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x009a}
0x02de6…02e0e               Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x001d, t01=0x00a2}
0x02e0e…02e20               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x001d, t01=0x00ca}
0x02e20…02e4e               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x001d, t01=0x00dc}
0x02e4e…02e56               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x010a}
0x02e56…02e84               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x001d, t01=0x0112}
0x02e84…02e98               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x001d, t01=0x0140}
0x02e98…02eb4               Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x001d, t01=0x0154}
0x02eb4…02ecc               Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x001d, t01=0x0170}
0x02ecc…02ef8               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x001d, t01=0x0188}
0x02ef8…02f04               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0024}
0x02f04…02f18               Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x001e, t01=0x0030}
0x02f18…02f3c               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x001e, t01=0x0044}
0x02f3c…02f50               Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x001e, t01=0x0068}
0x02f50…02f78               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x001e, t01=0x007c}
0x02f78…02f8a               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001e, t01=0x00a4}
0x02f8a…02f94               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x001e, t01=0x00b6}
0x02f94…02f9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00c0}
0x02f9e…02fa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00ca}
0x02fa8…02fb8               Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x001e, t01=0x00d4}
0x02fb8…02fc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00e4}
0x02fc2…02fcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00ee}
0x02fcc…02fe4               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001e, t01=0x00f8}
0x02fe4…03006               Head {h00=0x001e, h01=0x0050, text=»*   SUCCESFUL TRANSMISSION«, t00=0x001e, t01=0x0110}
0x03006…0301a               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001e, t01=0x0132}
0x0301a…03024               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0146}
0x03024…0302e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0150}
0x0302e…03040               Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x001e, t01=0x015a}
0x03040…03056               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001e, t01=0x016c}
0x03056…0307e               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x001e, t01=0x0182}
0x0307e…030a4               Head {h00=0x0022, h01=0x0050, text=» CWK A1,BUFLEN ILLEGAL LENGTH?«, t00=0x001f, t01=0x001a}
0x030a4…030c0               Head {h00=0x0018, h01=0x0050, text=» RF(G) IL:LEN YES!! «, t00=0x001f, t01=0x0040}
0x030c0…030cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x005c}
0x030cc…030ec               Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x001f, t01=0x0068}
0x030ec…03110               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ  QUEUE REQUEST«, t00=0x001f, t01=0x0088}
0x03110…03146               Head {h00=0x0032, h01=0x0050, text=» ST A8,DWTBUF,A6 SAVE ECB FOR RD. MODIFIED DK6«, t00=0x001f, t01=0x00ac}
0x03146…03158               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001f, t01=0x00e2}
0x03158…03162               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00f4}
0x03162…0316c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00fe}
0x0316c…03176               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0108}
0x03176…03184               Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x001f, t01=0x0112}
0x03184…0318e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0120}
0x0318e…03198               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x012a}
0x03198…031b0               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001f, t01=0x0134}
0x031b0…031cc               Head {h00=0x0018, h01=0x0050, text=»*   MESSAGE RECEIVED«, t00=0x001f, t01=0x014c}
0x031cc…031e0               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001f, t01=0x0168}
0x031e0…031ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x017c}
0x031ea…031f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0186}
0x031f4…03206               Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x001f, t01=0x0190}
0x03206…03226               Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x0020, t01=0x0012}
0x03226…03258               Head {h00=0x002e, h01=0x0050, text=» LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x0020, t01=0x0032}
0x03258…0327e               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x0020, t01=0x0064}
0x0327e…03286               Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x008a}
0x03286…0328e               Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0092}
0x0328e…03296               Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x009a}
0x03296…032c2               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 TAKE THE FIRST IN QUEUE «, t00=0x0020, t01=0x00a2}
0x032c2…032da               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x0020, t01=0x00ce}
0x032da…032ec               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0020, t01=0x00e6}
0x032ec…03312               Head {h00=0x0022, h01=0x0050, text=» LD A3,-4,A4 EFFECTIVE LENGTH «, t00=0x0020, t01=0x00f8}
0x03312…0332a               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x0020, t01=0x011e}
0x0332a…03332               Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0136}
0x03332…03356               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0020, t01=0x013e}
0x03356…03384               Head {h00=0x002a, h01=0x0050, text=» CF A15,DC:MIN MOV DATA TO USER BUFFER«, t00=0x0020, t01=0x0162}
0x03384…03396               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0020, t01=0x0190}
0x03396…0339e               Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0012}
0x0339e…033c6               Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x0021, t01=0x001a}
0x033c6…033d8               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0021, t01=0x0042}
0x033d8…033e2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0021, t01=0x0054}
0x033e2…033ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x005e}
0x033ec…033f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0068}
0x033f6…0340a               Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x0021, t01=0x0072}
0x0340a…03414               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0086}
0x03414…0341e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0090}
0x0341e…03432               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0021, t01=0x009a}
0x03432…03444               Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x0021, t01=0x00ae}
0x03444…03472               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x0021, t01=0x00c0}
0x03472…0348e               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x0021, t01=0x00ee}
0x0348e…034ae               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x0021, t01=0x010a}
0x034ae…034c2               Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x0021, t01=0x012a}
0x034c2…034da               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x0021, t01=0x013e}
0x034da…034fe               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 COMPLETE REQUEST «, t00=0x0021, t01=0x0156}
0x034fe…03512               Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x0021, t01=0x017a}
0x03512…0352a               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0021, t01=0x018e}
0x0352a…0353c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x0022, t01=0x0016}
0x0353c…03568               Head {h00=0x0028, h01=0x0050, text=» RB(Z) DCSS10 WACK HAS NOT BEEN SENT«, t00=0x0022, t01=0x0028}
0x03568…0357c               Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x0022, t01=0x0054}
0x0357c…035ac               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x0022, t01=0x0068}
0x035ac…035c4               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x0022, t01=0x0098}
0x035c4…035d6               Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x0022, t01=0x00b0}
0x035d6…035e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00c2}
0x035e2…035ec               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0022, t01=0x00ce}
0x035ec…035f4               Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x00d8}
0x035f4…035fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00e0}
0x035fe…03624               Head {h00=0x0022, h01=0x0050, text=»*   SET REQUEST TIMEOUT VALUE «, t00=0x0022, t01=0x00ea}
0x03624…0362e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0110}
0x0362e…03638               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x011a}
0x03638…03640               Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0124}
0x03640…03654               Head {h00=0x0010, h01=0x0050, text=»REQTIM EQU *«, t00=0x0022, t01=0x012c}
0x03654…0367a               Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBCW,A8 TIMEOUT VALUE «, t00=0x0022, t01=0x0140}
0x0367a…036a2               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTTIM,A6 SAVE IT IN DWT «, t00=0x0022, t01=0x0166}
0x036a2…036c6               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 TENDIO & DISPATCH«, t00=0x0022, t01=0x018e}
0x036c6…036ce               Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0022}
0x036ce…036d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x002a}
0x036d8…03704               Head {h00=0x0028, h01=0x0050, text=»*   ILLEGAL APPLICATION BUFFER SIZE «, t00=0x0023, t01=0x0034}
0x03704…0370e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0060}
0x0370e…03716               Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x006a}
0x03716…03752               Head {h00=0x0038, h01=0x0050, text=»IL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH «, t00=0x0023, t01=0x0072}
0x03752…03776               Head {h00=0x0020, h01=0x0050, text=» ABL DISEND COMPLETE REQUEST«, t00=0x0023, t01=0x00ae}
0x03776…03780               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0023, t01=0x00d2}
0x03780…0378a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00dc}
0x0378a…03794               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00e6}
0x03794…0379e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00f0}
0x0379e…037bc               Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x0023, t01=0x00fa}
0x037bc…037c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0118}
0x037c6…037d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0122}
0x037d0…037da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x012c}
0x037da…037f6               Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x0023, t01=0x0136}
0x037f6…03800               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0152}
0x03800…03814               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x0023, t01=0x015c}
0x03814…03826               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0023, t01=0x0170}
0x03826…03858               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0023, t01=0x0182}
0x03858…03878               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x0024, t01=0x0024}
0x03878…0388e               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x0024, t01=0x0044}
0x0388e…038a4               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0024, t01=0x005a}
0x038a4…038b8               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x0024, t01=0x0070}
0x038b8…038ce               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x0024, t01=0x0084}
0x038ce…038fa               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x0024, t01=0x009a}
0x038fa…0390e               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x0024, t01=0x00c6}
0x0390e…03928               Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x0024, t01=0x00da}
0x03928…03932               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00f4}
0x03932…0394e               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x0024, t01=0x00fe}
0x0394e…03958               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x011a}
0x03958…0396c               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x0024, t01=0x0124}
0x0396c…03988               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0024, t01=0x0138}
0x03988…0399c               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0024, t01=0x0154}
0x0399c…039b0               Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x0024, t01=0x0168}
0x039b0…039d6               Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x0024, t01=0x017c}
0x039d6…039fe               Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x0025, t01=0x0012}
0x039fe…03a08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x003a}
0x03a08…03a24               Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x0025, t01=0x0044}
0x03a24…03a2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0060}
0x03a2e…03a46               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x0025, t01=0x006a}
0x03a46…03a78               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0025, t01=0x0082}
0x03a78…03a98               Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x0025, t01=0x00b4}
0x03a98…03aac               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x0025, t01=0x00d4}
0x03aac…03ac2               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0025, t01=0x00e8}
0x03ac2…03ad6               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x0025, t01=0x00fe}
0x03ad6…03aea               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x0025, t01=0x0112}
0x03aea…03b02               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x0025, t01=0x0126}
0x03b02…03b14               Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x0025, t01=0x013e}
0x03b14…03b1e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0025, t01=0x0150}
0x03b1e…03b28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x015a}
0x03b28…03b46               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x0025, t01=0x0164}
0x03b46…03b50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0182}
0x03b50…03b64               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x0025, t01=0x018c}
0x03b64…03b80               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0026, t01=0x0010}
0x03b80…03b94               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0026, t01=0x002c}
0x03b94…03bc2               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0026, t01=0x0040}
0x03bc2…03bcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x006e}
0x03bcc…03bf6               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x0026, t01=0x0078}
0x03bf6…03c1a               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x0026, t01=0x00a2}
0x03c1a…03c30               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x0026, t01=0x00c6}
0x03c30…03c42               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0026, t01=0x00dc}
0x03c42…03c70               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT IS NOT WRITING«, t00=0x0026, t01=0x00ee}
0x03c70…03c9c               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x0026, t01=0x011c}
0x03c9c…03cae               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0026, t01=0x0148}
0x03cae…03cb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x015a}
0x03cb8…03cc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0164}
0x03cc2…03cd4               Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x0026, t01=0x016e}
0x03cd4…03cde               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0026, t01=0x0180}
0x03cde…03ce8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x018a}
0x03ce8…03cf2 (39, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0004}
0x03cf2…03d10               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0027, t01=0x000e}
0x03d10…03d1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x002c}
0x03d1a…03d44               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0027, t01=0x0036}
0x03d44…03d4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0060}
0x03d4e…03d58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x006a}
0x03d58…03d6c               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0027, t01=0x0074}
0x03d6c…03d96               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0027, t01=0x0088}
0x03d96…03db8               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0027, t01=0x00b2}
0x03db8…03dcc               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0027, t01=0x00d4}
0x03dcc…03df2               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0027, t01=0x00e8}
0x03df2…03e12               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0027, t01=0x010e}
0x03e12…03e26               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0027, t01=0x012e}
0x03e26…03e3a               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0027, t01=0x0142}
0x03e3a…03e4c               Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0027, t01=0x0156}
0x03e4c…03e56               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0027, t01=0x0168}
0x03e56…03e60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0172}
0x03e60…03e7c               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0027, t01=0x017c}
0x03e7c…03e86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0008}
0x03e86…03eae               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0028, t01=0x0012}
0x03eae…03ed2               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0028, t01=0x003a}
0x03ed2…03efc               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0028, t01=0x005e}
0x03efc…03f1e               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0028, t01=0x0088}
0x03f1e…03f28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00aa}
0x03f28…03f32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00b4}
0x03f32…03f5e               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0028, t01=0x00be}
0x03f5e…03f6e               Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x0028, t01=0x00ea}
0x03f6e…03f82               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x0028, t01=0x00fa}
0x03f82…03fa6               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x0028, t01=0x010e}
0x03fa6…03fd8               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x0028, t01=0x0132}
0x03fd8…03fea               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0028, t01=0x0164}
0x03fea…04018               Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0028, t01=0x0176}
0x04018…0403a               Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x0029, t01=0x0014}
0x0403a…04044               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0029, t01=0x0036}
0x04044…0404e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0040}
0x0404e…04058               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x004a}
0x04058…04084               Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x0029, t01=0x0054}
0x04084…0408e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0080}
0x0408e…040aa               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0029, t01=0x008a}
0x040aa…040ba               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0029, t01=0x00a6}
0x040ba…040c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00b6}
0x040c4…040f0               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0029, t01=0x00c0}
0x040f0…0410c               Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x0029, t01=0x00ec}
0x0410c…04126               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0029, t01=0x0108}
0x04126…0414e               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0029, t01=0x0122}
0x0414e…04160               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0029, t01=0x014a}
0x04160…04172               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0029, t01=0x015c}
0x04172…0418a               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0029, t01=0x016e}
0x0418a…041ac               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0029, t01=0x0186}
0x041ac…041d2               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002a, t01=0x0018}
0x041d2…041ec               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x002a, t01=0x003e}
0x041ec…041f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0058}
0x041f6…04200               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0062}
0x04200…0422e               Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x002a, t01=0x006c}
0x0422e…04238               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x009a}
0x04238…04254               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002a, t01=0x00a4}
0x04254…04264               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002a, t01=0x00c0}
0x04264…0426e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00d0}
0x0426e…0429c               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x002a, t01=0x00da}
0x0429c…042d2               Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x002a, t01=0x0108}
0x042d2…042e6               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x002a, t01=0x013e}
0x042e6…042fa               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x002a, t01=0x0152}
0x042fa…04312               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x002a, t01=0x0166}
0x04312…0433c               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x002a, t01=0x017e}
0x0433c…0434e               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x002b, t01=0x0018}
0x0434e…04362               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x002b, t01=0x002a}
0x04362…0437e               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x002b, t01=0x003e}
0x0437e…04390               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x002b, t01=0x005a}
0x04390…043b0               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x002b, t01=0x006c}
0x043b0…043c2               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x002b, t01=0x008c}
0x043c2…043dc               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x002b, t01=0x009e}
0x043dc…043e6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002b, t01=0x00b8}
0x043e6…043f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00c2}
0x043f0…043fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00cc}
0x043fa…0441e               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x002b, t01=0x00d6}
0x0441e…04428               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00fa}
0x04428…0443c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x002b, t01=0x0104}
0x0443c…04458               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x0118}
0x04458…04468               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x0134}
0x04468…04472               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0144}
0x04472…04486               Head {h00=0x0010, h01=0x0050, text=»INSSQ EQU * «, t00=0x002b, t01=0x014e}
0x04486…044b2               Head {h00=0x0028, h01=0x0050, text=» LD A2,0,A6 GET TERMINAL ADDRESS DK4«, t00=0x002b, t01=0x0162}
0x044b2…044e0               Head {h00=0x002a, h01=0x0050, text=» ANK A2,/FF IF ADDRESS = 00 OR /7F DK4«, t00=0x002b, t01=0x018e}
0x044e0…0450c               Head {h00=0x0028, h01=0x0050, text=» RB(Z) GBUF10 DONT PUT IN STATUS DK4«, t00=0x002c, t01=0x002c}
0x0450c…0453c               Head {h00=0x002c, h01=0x0050, text=» SUK A2,/7F QUEUE, TERMINAL HAS BEEN DK4«, t00=0x002c, t01=0x0058}
0x0453c…04564               Head {h00=0x0024, h01=0x0050, text=» RB(Z) GBUF10 MADE INACTIVE DK4 «, t00=0x002c, t01=0x0088}
0x04564…0458c               Head {h00=0x0024, h01=0x0050, text=» LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002c, t01=0x00b0}
0x0458c…045a2               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002c, t01=0x00d8}
0x045a2…045b4               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002c, t01=0x00ee}
0x045b4…045be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0100}
0x045be…045c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x010a}
0x045c8…045ee               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x002c, t01=0x0114}
0x045ee…045f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x013a}
0x045f8…04614               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002c, t01=0x0144}
0x04614…04624               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002c, t01=0x0160}
0x04624…0462e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0170}
0x0462e…0465c               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002c, t01=0x017a}
0x0465c…04672               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002d, t01=0x0018}
0x04672…04684               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x002d, t01=0x002e}
0x04684…04690               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0040}
0x04690…0469a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002d, t01=0x004c}
0x0469a…046a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0056}
0x046a4…046ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0060}
0x046ae…046d6               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x002d, t01=0x006a}
0x046d6…046e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0092}
0x046e0…046f8               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x002d, t01=0x009c}
0x046f8…04712               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002d, t01=0x00b4}
0x04712…0471c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00ce}
0x0471c…04730               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002d, t01=0x00d8}
0x04730…04746               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002d, t01=0x00ec}
0x04746…04772               Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002d, t01=0x0102}
0x04772…0477e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x012e}
0x0477e…04794               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002d, t01=0x013a}
0x04794…047bc               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002d, t01=0x0150}
0x047bc…047c8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0178}
0x047c8…047f8               Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002d, t01=0x0184}
0x047f8…0480c               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002e, t01=0x0024}
0x0480c…04820               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002e, t01=0x0038}
0x04820…04848               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002e, t01=0x004c}
0x04848…0485a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002e, t01=0x0074}
0x0485a…0486c               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002e, t01=0x0086}
0x0486c…04896               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002e, t01=0x0098}
0x04896…048bc               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002e, t01=0x00c2}
0x048bc…048cc               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002e, t01=0x00e8}
0x048cc…048d6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002e, t01=0x00f8}
0x048d6…048e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0102}
0x048e0…048ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x010c}
0x048ea…04920               Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x002e, t01=0x0116}
0x04920…0492a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x014c}
0x0492a…04962               Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x002e, t01=0x0156}
0x04962…0496c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x018e}
0x0496c…0498a               Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x002f, t01=0x0008}
0x0498a…049a2               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x002f, t01=0x0026}
0x049a2…049c2               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x002f, t01=0x003e}
0x049c2…049e2               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x002f, t01=0x005e}
0x049e2…049fa               Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x002f, t01=0x007e}
0x049fa…04a14               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x002f, t01=0x0096}
0x04a14…04a3c               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x002f, t01=0x00b0}
0x04a3c…04a6a               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x002f, t01=0x00d8}
0x04a6a…04a90               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x002f, t01=0x0106}
0x04a90…04a98               Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x012c}
0x04a98…04aa0               Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0134}
0x04aa0…04ad0               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x002f, t01=0x013c}
0x04ad0…04b02               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x002f, t01=0x016c}
0x04b02…04b28               Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x0030, t01=0x000e}
0x04b28…04b52               Head {h00=0x0026, h01=0x0050, text=»   DONT DESTROY BUFFER ADDRESS =6 «, t00=0x0030, t01=0x0034}
0x04b52…04b66               Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x0030, t01=0x005e}
0x04b66…04b9a               Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x0030, t01=0x0072}
0x04b9a…04bae               Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x0030, t01=0x00a6}
0x04bae…04be0               Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x0030, t01=0x00ba}
0x04be0…04be8               Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x00ec}
0x04be8…04c0c               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0030, t01=0x00f4}
0x04c0c…04c36               Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 RECEIVE BUFFER ADDRESS «, t00=0x0030, t01=0x0118}
0x04c36…04c66               Head {h00=0x002c, h01=0x0050, text=» CF A15,DC:MIN MOVE DATA TO USER BUFFER «, t00=0x0030, t01=0x0142}
0x04c66…04c94               Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0030, t01=0x0172}
0x04c94…04cac               Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0031, t01=0x0010}
0x04cac…04ce8               Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x0031, t01=0x0028}
0x04ce8…04d18               Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x0031, t01=0x0064}
0x04d18…04d2e               Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x0031, t01=0x0094}
0x04d2e…04d44               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x0031, t01=0x00aa}
0x04d44…04d6e               Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x0031, t01=0x00c0}
0x04d6e…04d9c               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x0031, t01=0x00ea}
0x04d9c…04dd0               Head {h00=0x0030, h01=0x0050, text=» CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x0031, t01=0x0118}
0x04dd0…04de2               Head {h00=0x000e, h01=0x0050, text=» RB CKM110«, t00=0x0031, t01=0x014c}
0x04de2…04dec               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0031, t01=0x015e}
0x04dec…04df4               Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x0168}
0x04df4…04e38               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0031, t01=0x0170}
0x04e38…04e42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0024}
0x04e42…04e5c               Head {h00=0x0016, h01=0x0050, text=»*    ABORT ROUTINE«, t00=0x0032, t01=0x002e}
0x04e5c…04e66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0048}
0x04e66…04e86               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0032, t01=0x0052}
0x04e86…04e8e               Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x0072}
0x04e8e…04eb8               Head {h00=0x0026, h01=0x0050, text=»ABORT LD A1,DWTTP,A6 TIMER POINTER«, t00=0x0032, t01=0x007a}
0x04eb8…04ede               Head {h00=0x0022, h01=0x0050, text=» RF(Z) AB:10 NO TIMER RUNNING «, t00=0x0032, t01=0x00a4}
0x04ede…04efe               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 KILL TIMER«, t00=0x0032, t01=0x00ca}
0x04efe…04f12               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0032, t01=0x00ea}
0x04f12…04f1a               Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x00fe}
0x04f1a…04f42               Head {h00=0x0024, h01=0x0050, text=»AB:10 LD A1,DWTOR,A6 ORDER CODE «, t00=0x0032, t01=0x0106}
0x04f42…04f54               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0032, t01=0x012e}
0x04f54…04f82               Head {h00=0x002a, h01=0x0050, text=» RF(Z) AB:RTN READ REQUEST. NO ACTION «, t00=0x0032, t01=0x0140}
0x04f82…04f94               Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x0032, t01=0x016e}
0x04f94…04fc6               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE«, t00=0x0032, t01=0x0180}
0x04fc6…04fce               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x0022}
0x04fce…05000               Head {h00=0x002e, h01=0x0050, text=» CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE«, t00=0x0033, t01=0x002a}
0x05000…0502a               Head {h00=0x0026, h01=0x0050, text=» LD A2,FDWTUT WRITING DWT ADDRESS «, t00=0x0033, t01=0x005c}
0x0502a…0503c               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0033, t01=0x0086}
0x0503c…05060               Head {h00=0x0020, h01=0x0050, text=» RF(NE) AB:RTN NOT THIS DWT «, t00=0x0033, t01=0x0098}
0x05060…05084               Head {h00=0x0020, h01=0x0050, text=» CM XACK RESET ACK EXPECTED «, t00=0x0033, t01=0x00bc}
0x05084…050a8               Head {h00=0x0020, h01=0x0050, text=» CM FDWTUT RESET WRITING DWT«, t00=0x0033, t01=0x00e0}
0x050a8…050b0               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x0104}
0x050b0…050c4               Head {h00=0x0010, h01=0x0050, text=»AB:RTN EQU *«, t00=0x0033, t01=0x010c}
0x050c4…050da               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0033, t01=0x0120}
0x050da…050ee               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0033, t01=0x0136}
0x050ee…05116               Head {h00=0x0024, h01=0x0050, text=» ABR* A15 RETURN IN INHIBIT MODE«, t00=0x0033, t01=0x014a}
0x05116…05122               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0172}
0x05122…05138               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0033, t01=0x017e}
0x05138…05148 (52, 0, 400)  Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0034, t01=0x0004}
0x05148…05154               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0014}
0x05154…0515e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0034, t01=0x0020}
0x0515e…05166               Head {h00=0x0004, h01=0x0050, t00=0x0034, t01=0x002a}
0x05166…05170               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0034, t01=0x0032}
0x05170…0517a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x003c}
0x0517a…05184               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0046}
0x05184…051a2               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0034, t01=0x0050}
0x051a2…051ca               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0034, t01=0x006e}
0x051ca…051d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0096}
0x051d4…051e6               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0034, t01=0x00a0}
0x051e6…0520e               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0034, t01=0x00b2}
0x0520e…05218               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00da}
0x05218…05222               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00e4}
0x05222…0523a               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0034, t01=0x00ee}
0x0523a…0524e               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0034, t01=0x0106}
0x0524e…05262               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0034, t01=0x011a}
0x05262…05276               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0034, t01=0x012e}
0x05276…0528a               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0034, t01=0x0142}
0x0528a…0529e               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0034, t01=0x0156}
0x0529e…052b8               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0034, t01=0x016a}
0x052b8…052c2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0034, t01=0x0184}
0x052c2…052da               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0034, t01=0x018e}
0x052da…052ee               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0035, t01=0x0016}
0x052ee…05300               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0035, t01=0x002a}
0x05300…05314               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0035, t01=0x003c}
0x05314…05326               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0035, t01=0x0050}
0x05326…0533a               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0035, t01=0x0062}
0x0533a…0534c               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0035, t01=0x0076}
0x0534c…05360               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0035, t01=0x0088}
0x05360…05372               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0035, t01=0x009c}
0x05372…05386               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0035, t01=0x00ae}
0x05386…05398               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0035, t01=0x00c2}
0x05398…053ac               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0035, t01=0x00d4}
0x053ac…053c0               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0035, t01=0x00e8}
0x053c0…053d4               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0035, t01=0x00fc}
0x053d4…053e6               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0035, t01=0x0110}
0x053e6…053f0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0035, t01=0x0122}
0x053f0…053fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x012c}
0x053fa…05404               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0136}
0x05404…0541a               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0035, t01=0x0140}
0x0541a…05424               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0156}
0x05424…0542e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0160}
0x0542e…0545c               Head {h00=0x002a, h01=0x0050, text=»TIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK«, t00=0x0035, t01=0x016a}
0x0545c…05482               Head {h00=0x0022, h01=0x0050, text=»TIMNAK EQU 3 DELAY FOR NAK DK «, t00=0x0036, t01=0x0008}
0x05482…0548c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x002e}
0x0548c…05496               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0038}
0x05496…054b2               Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0036, t01=0x0042}
0x054b2…054bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x005e}
0x054bc…054e6               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0036, t01=0x0068}
0x054e6…054fa               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0036, t01=0x0092}
0x054fa…0550e               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0036, t01=0x00a6}
0x0550e…05522               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0036, t01=0x00ba}
0x05522…05536               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0036, t01=0x00ce}
0x05536…0554a               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0036, t01=0x00e2}
0x0554a…0555e               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0036, t01=0x00f6}
0x0555e…05572               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0036, t01=0x010a}
0x05572…05586               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0036, t01=0x011e}
0x05586…0559a               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0036, t01=0x0132}
0x0559a…055ae               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0036, t01=0x0146}
0x055ae…055c2               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0036, t01=0x015a}
0x055c2…055d6               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0036, t01=0x016e}
0x055d6…055e8               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0036, t01=0x0182}
0x055e8…055fe (55, 0, 400)  Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0037, t01=0x0004}
0x055fe…05614               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0037, t01=0x001a}
0x05614…05628               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0037, t01=0x0030}
0x05628…0563c               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0037, t01=0x0044}
0x0563c…05650               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0037, t01=0x0058}
0x05650…05664               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0037, t01=0x006c}
0x05664…05678               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0037, t01=0x0080}
0x05678…0568c               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0037, t01=0x0094}
0x0568c…056a0               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0037, t01=0x00a8}
0x056a0…056b4               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0037, t01=0x00bc}
0x056b4…056c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x00d0}
0x056c0…056d4               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0037, t01=0x00dc}
0x056d4…056e8               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0037, t01=0x00f0}
0x056e8…0571c               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0037, t01=0x0104}
0x0571c…05728               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0138}
0x05728…0573c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0037, t01=0x0144}
0x0573c…05750               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0037, t01=0x0158}
0x05750…05764               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0037, t01=0x016c}
0x05764…0577c               Head {h00=0x0014, h01=0x0050, text=»RVI EQU XRVI  DK«, t00=0x0037, t01=0x0180}
0x0577c…05790               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0038, t01=0x0008}
0x05790…057a4               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0038, t01=0x001c}
0x057a4…057ba               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0038, t01=0x0030}
0x057ba…057c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0046}
0x057c6…057d0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0038, t01=0x0052}
0x057d0…057da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x005c}
0x057da…057e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0066}
0x057e4…05802               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0038, t01=0x0070}
0x05802…0580c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x008e}
0x0580c…05816               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0098}
0x05816…05844               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0038, t01=0x00a2}
0x05844…05876               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0038, t01=0x00d0}
0x05876…05896               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x0038, t01=0x0102}
0x05896…058b2               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x0038, t01=0x0122}
0x058b2…058ce               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x0038, t01=0x013e}
0x058ce…05904               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x0038, t01=0x015a}
0x05904…0592a               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x0038, t01=0x0190}
0x0592a…0594a               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x0039, t01=0x0026}
0x0594a…05978               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x0039, t01=0x0046}
0x05978…05982               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0074}
0x05982…059a0               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x0039, t01=0x007e}
0x059a0…059cc               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x0039, t01=0x009c}
0x059cc…059f6               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x0039, t01=0x00c8}
0x059f6…05a16               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x0039, t01=0x00f2}
0x05a16…05a4a               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x0039, t01=0x0112}
0x05a4a…05a72               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x0039, t01=0x0146}
0x05a72…05aa4               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x0039, t01=0x016e}
0x05aa4…05ad4               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x003a, t01=0x0010}
0x05ad4…05b00               Head {h00=0x0028, h01=0x0050, text=»CRDBUF DATA 0 READ BUFFER COUNTER DK«, t00=0x003a, t01=0x0040}
0x05b00…05b0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x006c}
0x05b0a…05b14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0076}
0x05b14…05b3c               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x003a, t01=0x0080}
0x05b3c…05b46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00a8}
0x05b46…05b50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00b2}
0x05b50…05b64               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x003a, t01=0x00bc}
0x05b64…05b96               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x003a, t01=0x00d0}
0x05b96…05ba0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0102}
0x05ba0…05baa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x010c}
0x05baa…05bbe               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x003a, t01=0x0116}
0x05bbe…05bd2               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x003a, t01=0x012a}
0x05bd2…05bdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x013e}
0x05bdc…05c12               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x003a, t01=0x0148}
0x05c12…05c42               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x003a, t01=0x017e}
0x05c42…05c4e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x001e}
0x05c4e…05c58               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x003b, t01=0x002a}
0x05c58…05c62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0034}
0x05c62…05c6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x003e}
0x05c6c…05c88               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x003b, t01=0x0048}
0x05c88…05c92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0064}
0x05c92…05cb8               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x003b, t01=0x006e}
0x05cb8…05ce2               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x003b, t01=0x0094}
0x05ce2…05cec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00be}
0x05cec…05cf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00c8}
0x05cf6…05d12               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003b, t01=0x00d2}
0x05d12…05d42               Head {h00=0x002c, h01=0x0050, text=»BRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ«, t00=0x003b, t01=0x00ee}
0x05d42…05d58               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x011e}
0x05d58…05d6a               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x003b, t01=0x0134}
0x05d6a…05d8e               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x003b, t01=0x0146}
0x05d8e…05daa               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003b, t01=0x016a}
0x05daa…05de0               Head {h00=0x0032, h01=0x0050, text=» CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS «, t00=0x003b, t01=0x0186}
0x05de0…05df6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x002c}
0x05df6…05e12               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003c, t01=0x0042}
0x05e12…05e46               Head {h00=0x0030, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ«, t00=0x003c, t01=0x005e}
0x05e46…05e5c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x0092}
0x05e5c…05e70               Head {h00=0x0010, h01=0x0050, text=»BRM010 EQU *«, t00=0x003c, t01=0x00a8}
0x05e70…05e92               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x003c, t01=0x00bc}
0x05e92…05ec6               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN«, t00=0x003c, t01=0x00de}
0x05ec6…05edc               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x0112}
0x05edc…05ef8               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003c, t01=0x0128}
0x05ef8…05f0c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x003c, t01=0x0144}
0x05f0c…05f44               Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN «, t00=0x003c, t01=0x0158}
0x05f44…05f5a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x0190}
0x05f5a…05f76               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003d, t01=0x0016}
0x05f76…05f9c               Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x003d, t01=0x0032}
0x05f9c…05fb2               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x0058}
0x05fb2…05fce               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003d, t01=0x006e}
0x05fce…05fea               Head {h00=0x0018, h01=0x0050, text=» IFF CODE=1  SALCUZ «, t00=0x003d, t01=0x008a}
0x05fea…06006               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x003d, t01=0x00a6}
0x06006…06034               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003d, t01=0x00c2}
0x06034…06050               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x003d, t01=0x00f0}
0x06050…06086               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003d, t01=0x010c}
0x06086…060a4               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003d, t01=0x0142}
0x060a4…060ba               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x0160}
0x060ba…060dc               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=2  SALCUZ «, t00=0x003d, t01=0x0176}
0x060dc…060f6               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x003e, t01=0x0008}
0x060f6…06124               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003e, t01=0x0022}
0x06124…06142               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x003e, t01=0x0050}
0x06142…06178               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003e, t01=0x006e}
0x06178…06196               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003e, t01=0x00a4}
0x06196…061ac               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x00c2}
0x061ac…061c0               Head {h00=0x0010, h01=0x0050, text=»BRM100 EQU *«, t00=0x003e, t01=0x00d8}
0x061c0…061e8               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003e, t01=0x00ec}
0x061e8…0620c               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003e, t01=0x0114}
0x0620c…0621e               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003e, t01=0x0138}
0x0621e…06232               Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x003e, t01=0x014a}
0x06232…06254               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x003e, t01=0x015e}
0x06254…0626c               Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x003e, t01=0x0180}
0x0626c…0628e               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x003f, t01=0x0008}
0x0628e…062a6               Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x003f, t01=0x002a}
0x062a6…062ca               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x003f, t01=0x0042}
0x062ca…062e2               Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x003f, t01=0x0066}
0x062e2…06306               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x003f, t01=0x007e}
0x06306…0631e               Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x003f, t01=0x00a2}
0x0631e…06342               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x003f, t01=0x00ba}
0x06342…06356               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003f, t01=0x00de}
0x06356…06368               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003f, t01=0x00f2}
0x06368…06390               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003f, t01=0x0104}
0x06390…063b4               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003f, t01=0x012c}
0x063b4…063c6               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003f, t01=0x0150}
0x063c6…063f0               Head {h00=0x0026, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESSING «, t00=0x003f, t01=0x0162}
0x063f0…063fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x018c}
0x063fc…0640e               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0040, t01=0x0008}
0x0640e…06426               Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x0040, t01=0x001a}
0x06426…06444               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x0040, t01=0x0032}
0x06444…06456               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0040, t01=0x0050}
0x06456…0646c               Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x0040, t01=0x0062}
0x0646c…06490               Head {h00=0x0020, h01=0x0050, text=» RF(NE) BRM150 NOT THIS TCU «, t00=0x0040, t01=0x0078}
0x06490…064a4               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x0040, t01=0x009c}
0x064a4…064c6               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x0040, t01=0x00b0}
0x064c6…064ea               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x0040, t01=0x00d2}
0x064ea…064fc               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x0040, t01=0x00f6}
0x064fc…06510               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0040, t01=0x0108}
0x06510…06532               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x0040, t01=0x011c}
0x06532…06556               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x0040, t01=0x013e}
0x06556…06568               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x0040, t01=0x0162}
0x06568…06598               Head {h00=0x002c, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESS SEQUENCE «, t00=0x0040, t01=0x0174}
0x06598…065a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x0014}
0x065a4…065ca               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ READ ONE CHARACTER«, t00=0x0041, t01=0x0020}
0x065ca…065e6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0041, t01=0x0046}
0x065e6…065fe               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0041, t01=0x0062}
0x065fe…06614               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0041, t01=0x007a}
0x06614…06630               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0041, t01=0x0090}
0x06630…0664c               Head {h00=0x0018, h01=0x0050, text=» SUK A2,ENQ  SALCUZ «, t00=0x0041, t01=0x00ac}
0x0664c…06662               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0041, t01=0x00c8}
0x06662…06680               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) BRM150 NOT ENQ«, t00=0x0041, t01=0x00de}
0x06680…0669c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0041, t01=0x00fc}
0x0669c…066c4               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ READ LAST CHARACTER «, t00=0x0041, t01=0x0118}
0x066c4…066cc               Head {h00=0x0004, h01=0x0050, t00=0x0041, t01=0x0140}
0x066cc…066f2               Head {h00=0x0022, h01=0x0050, text=»* TRAILING PAD CAN BE CHECKED «, t00=0x0041, t01=0x0148}
0x066f2…066fa               Head {h00=0x0004, h01=0x0050, t00=0x0041, t01=0x016e}
0x066fa…0671c               Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,LCUIN HALT INPUT«, t00=0x0041, t01=0x0176}
0x0671c…06732               Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUIN «, t00=0x0042, t01=0x0008}
0x06732…06748               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0042, t01=0x001e}
0x06748…06764               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0042, t01=0x0034}
0x06764…0678c               Head {h00=0x0024, h01=0x0050, text=» CF A5,HALTIN HALT INPUT SALCUZ «, t00=0x0042, t01=0x0050}
0x0678c…067be               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) BRM010 PARITY ERROR SALCUZ  SALCUZ«, t00=0x0042, t01=0x0078}
0x067be…067d4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0042, t01=0x00aa}
0x067d4…067e6               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0042, t01=0x00c0}
0x067e6…0680a               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK COUNTER«, t00=0x0042, t01=0x00d2}
0x0680a…0681c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x0042, t01=0x00f6}
0x0681c…0682e               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x0042, t01=0x0108}
0x0682e…0684e               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x0042, t01=0x011a}
0x0684e…06860               Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x0042, t01=0x013a}
0x06860…06882               Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x0042, t01=0x014c}
0x06882…06896               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0042, t01=0x016e}
0x06896…068d0               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x0042, t01=0x0182}
0x068d0…068dc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x002c}
0x068dc…068f0               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0043, t01=0x0038}
0x068f0…0691a               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0043, t01=0x004c}
0x0691a…06926               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x0076}
0x06926…06948               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0043, t01=0x0082}
0x06948…0696c               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x0043, t01=0x00a4}
0x0696c…06988               Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x0043, t01=0x00c8}
0x06988…0699c               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x0043, t01=0x00e4}
0x0699c…069c6               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0043, t01=0x00f8}
0x069c6…069e8               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0043, t01=0x0122}
0x069e8…06a08               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x0043, t01=0x0144}
0x06a08…06a1e               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=0   «, t00=0x0043, t01=0x0164}
0x06a1e…06a46               Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x0043, t01=0x017a}
0x06a46…06a5a               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0044, t01=0x0012}
0x06a5a…06a6e               Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x0044, t01=0x0026}
0x06a6e…06a7e               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0044, t01=0x003a}
0x06a7e…06a94               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=1   «, t00=0x0044, t01=0x004a}
0x06a94…06ab4               Head {h00=0x001c, h01=0x0050, text=» ABL BRM INVALID ADDRESS«, t00=0x0044, t01=0x0060}
0x06ab4…06ac4               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0044, t01=0x0080}
0x06ac4…06ace               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0090}
0x06ace…06afe               Head {h00=0x002c, h01=0x0050, text=»*   WAIT FOR MARK HOLD TO RESYNCHRONIZE «, t00=0x0044, t01=0x009a}
0x06afe…06b08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00ca}
0x06b08…06b1c               Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0044, t01=0x00d4}
0x06b1c…06b30               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0044, t01=0x00e8}
0x06b30…06b44               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0044, t01=0x00fc}
0x06b44…06b64               Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM RESYNCHRONIZE«, t00=0x0044, t01=0x0110}
0x06b64…06b8e               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ ANOTHER CHARACTER«, t00=0x0044, t01=0x0130}
0x06b8e…06ba0               Head {h00=0x000e, h01=0x0050, text=» RB BRM150«, t00=0x0044, t01=0x015a}
0x06ba0…06baa               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0044, t01=0x016c}
0x06baa…06bb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0176}
0x06bb4…06bbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0180}
0x06bbe…06bde               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0044, t01=0x018a}
0x06bde…06be8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x001a}
0x06be8…06bf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0024}
0x06bf2…06c06               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0045, t01=0x002e}
0x06c06…06c30               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0045, t01=0x0042}
0x06c30…06c44               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0045, t01=0x006c}
0x06c44…06c66               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0045, t01=0x0080}
0x06c66…06c72               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x00a2}
0x06c72…06c86               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0045, t01=0x00ae}
0x06c86…06cb0               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0045, t01=0x00c2}
0x06cb0…06cd6               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0045, t01=0x00ec}
0x06cd6…06cfa               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0045, t01=0x0112}
0x06cfa…06d14               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0045, t01=0x0136}
0x06d14…06d40               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0045, t01=0x0150}
0x06d40…06d54               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0045, t01=0x017c}
0x06d54…06d7a               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0045, t01=0x0190}
0x06d7a…06d8e               Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0046, t01=0x0026}
0x06d8e…06db0               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0046, t01=0x003a}
0x06db0…06dc0               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0046, t01=0x005c}
0x06dc0…06dca               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0046, t01=0x006c}
0x06dca…06dd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0076}
0x06dd4…06dde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0080}
0x06dde…06dfe               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0046, t01=0x008a}
0x06dfe…06e08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00aa}
0x06e08…06e12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00b4}
0x06e12…06e26               Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0046, t01=0x00be}
0x06e26…06e3a               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0046, t01=0x00d2}
0x06e3a…06e4e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0046, t01=0x00e6}
0x06e4e…06e70               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0046, t01=0x00fa}
0x06e70…06e86               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0046, t01=0x011c}
0x06e86…06eb0               Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0046, t01=0x0132}
0x06eb0…06ec4               Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0046, t01=0x015c}
0x06ec4…06ee6               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0046, t01=0x0170}
0x06ee6…06ef8 (71, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0047, t01=0x0004}
0x06ef8…06f1a               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0047, t01=0x0016}
0x06f1a…06f2e               Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0047, t01=0x0038}
0x06f2e…06f5a               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0047, t01=0x004c}
0x06f5a…06f6e               Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0047, t01=0x0078}
0x06f6e…06f8c               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0047, t01=0x008c}
0x06f8c…06f9c               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0047, t01=0x00aa}
0x06f9c…06fb0               Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0047, t01=0x00ba}
0x06fb0…06fc4               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0047, t01=0x00ce}
0x06fc4…06fd8               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0047, t01=0x00e2}
0x06fd8…07002               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0047, t01=0x00f6}
0x07002…07018               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0047, t01=0x0120}
0x07018…07042               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0047, t01=0x0136}
0x07042…07068               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0047, t01=0x0160}
0x07068…0709c               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0047, t01=0x0186}
0x0709c…070b8               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0048, t01=0x002a}
0x070b8…070c4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x0046}
0x070c4…070d8               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0048, t01=0x0052}
0x070d8…07108               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0048, t01=0x0066}
0x07108…07136               Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTECB,A6 SAVE CURRENT ECB DK6 «, t00=0x0048, t01=0x0096}
0x07136…07154               Head {h00=0x001a, h01=0x0050, text=» ST A1,DWTCUR,A6  DK6 «, t00=0x0048, t01=0x00c4}
0x07154…0716e               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0048, t01=0x00e2}
0x0716e…0719a               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0048, t01=0x00fc}
0x0719a…071ba               Head {h00=0x001c, h01=0x0050, text=» CM CACK PRESET ACK-1 =7«, t00=0x0048, t01=0x0128}
0x071ba…071de               Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x0048, t01=0x0148}
0x071de…071ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x016c}
0x071ea…07216               Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x0048, t01=0x0178}
0x07216…0722e               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0049, t01=0x0014}
0x0722e…07246               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0049, t01=0x002c}
0x07246…07258               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0049, t01=0x0044}
0x07258…07270               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0049, t01=0x0056}
0x07270…07288               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ  =8 «, t00=0x0049, t01=0x006e}
0x07288…0729a               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0049, t01=0x0086}
0x0729a…072c6               Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x0049, t01=0x0098}
0x072c6…072d8               Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x0049, t01=0x00c4}
0x072d8…072ec               Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x0049, t01=0x00d6}
0x072ec…07310               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0049, t01=0x00ea}
0x07310…07338               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0049, t01=0x010e}
0x07338…0734a               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0049, t01=0x0136}
0x0734a…0735e               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0049, t01=0x0148}
0x0735e…07384               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x0049, t01=0x015c}
0x07384…07398               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0049, t01=0x0182}
0x07398…073ac               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x004a, t01=0x0008}
0x073ac…073be               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x004a, t01=0x001c}
0x073be…073e2               Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x004a, t01=0x002e}
0x073e2…073f4               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x004a, t01=0x0052}
0x073f4…07418               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x004a, t01=0x0064}
0x07418…0742a               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x004a, t01=0x0088}
0x0742a…07440               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x004a, t01=0x009a}
0x07440…0746c               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x004a, t01=0x00b0}
0x0746c…0748a               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x004a, t01=0x00dc}
0x0748a…074b4               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x004a, t01=0x00fa}
0x074b4…074c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x0124}
0x074c0…074d4               Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x004a, t01=0x0130}
0x074d4…074e6               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x004a, t01=0x0144}
0x074e6…07510               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x004a, t01=0x0156}
0x07510…07520               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x004a, t01=0x0180}
0x07520…0754e               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x004a, t01=0x0190}
0x0754e…07560               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x004b, t01=0x002e}
0x07560…07584               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x004b, t01=0x0040}
0x07584…0758e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0064}
0x0758e…075b4               Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x004b, t01=0x006e}
0x075b4…075be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0094}
0x075be…075d2               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x004b, t01=0x009e}
0x075d2…075e6               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x004b, t01=0x00b2}
0x075e6…07600               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x004b, t01=0x00c6}
0x07600…07616               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x004b, t01=0x00e0}
0x07616…0762c               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x004b, t01=0x00f6}
0x0762c…07640               Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x004b, t01=0x010c}
0x07640…0764c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x0120}
0x0764c…07660               Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x004b, t01=0x012c}
0x07660…07676               Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x004b, t01=0x0140}
0x07676…076a6               Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x004b, t01=0x0156}
0x076a6…076c8               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004b, t01=0x0186}
0x076c8…076e8               Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x004c, t01=0x0018}
0x076e8…07702               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004c, t01=0x0038}
0x07702…07722               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004c, t01=0x0052}
0x07722…0774c               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM327 ANY MESSAGE ORDER =4«, t00=0x004c, t01=0x0072}
0x0774c…0775e               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x004c, t01=0x009c}
0x0775e…07770               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x004c, t01=0x00ae}
0x07770…07788               Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x004c, t01=0x00c0}
0x07788…077ae               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x004c, t01=0x00d8}
0x077ae…077c2               Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x004c, t01=0x00fe}
0x077c2…077dc               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x004c, t01=0x0112}
0x077dc…07804               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x004c, t01=0x012c}
0x07804…07824               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x004c, t01=0x0154}
0x07824…07852               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x004c, t01=0x0174}
0x07852…0787c               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x004d, t01=0x0012}
0x0787c…078a8               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x004d, t01=0x003c}
0x078a8…078b2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x004d, t01=0x0068}
0x078b2…078bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0072}
0x078bc…078c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x007c}
0x078c6…078fa               Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x004d, t01=0x0086}
0x078fa…07904               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00ba}
0x07904…0790e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00c4}
0x0790e…07922               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004d, t01=0x00ce}
0x07922…07942               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x004d, t01=0x00e2}
0x07942…07956               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004d, t01=0x0102}
0x07956…07978               Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x004d, t01=0x0116}
0x07978…079a2               Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTINF,A6 GET DWT INFO DK5 «, t00=0x004d, t01=0x0138}
0x079a2…079c2               Head {h00=0x001c, h01=0x0050, text=» ANK A3,1 GET LPBIT DK5 «, t00=0x004d, t01=0x0162}
0x079c2…079e2               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM328 NOT LP DK5«, t00=0x004d, t01=0x0182}
0x079e2…079f4               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x004e, t01=0x0012}
0x079f4…07a0a               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004e, t01=0x0024}
0x07a0a…07a2c               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004e, t01=0x003a}
0x07a2c…07a52               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/A SET WACK INDICATION«, t00=0x004e, t01=0x005c}
0x07a52…07a6a               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004e, t01=0x0082}
0x07a6a…07a7e               Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004e, t01=0x009a}
0x07a7e…07a8a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x00ae}
0x07a8a…07aa4               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004e, t01=0x00ba}
0x07aa4…07ac4               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004e, t01=0x00d4}
0x07ac4…07af4               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 «, t00=0x004e, t01=0x00f4}
0x07af4…07b1e               Head {h00=0x0026, h01=0x0050, text=» SUK A4,6 ADJUST BUFFER ADDRESS =4«, t00=0x004e, t01=0x0124}
0x07b1e…07b4a               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE MESSAGE ON DWT =4«, t00=0x004e, t01=0x014e}
0x07b4a…07b60               Head {h00=0x0012, h01=0x0050, text=» RF BRM32A  =4«, t00=0x004e, t01=0x017a}
0x07b60…07b70               Head {h00=0x000c, h01=0x0050, text=» XIF  =4«, t00=0x004e, t01=0x0190}
0x07b70…07b88               Head {h00=0x0014, h01=0x0050, text=»BRM329 EQU *  =4«, t00=0x004f, t01=0x0010}
0x07b88…07b90               Head {h00=0x0004, h01=0x0050, t00=0x004f, t01=0x0028}
0x07b90…07bb4               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x004f, t01=0x0030}
0x07bb4…07bde               Head {h00=0x0026, h01=0x0050, text=» CF A15,DC:MIN MOVE TO USER BUFFER«, t00=0x004f, t01=0x0054}
0x07bde…07bf0               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004f, t01=0x007e}
0x07bf0…07c08               Head {h00=0x0014, h01=0x0050, text=»BRM32A EQU *  =4«, t00=0x004f, t01=0x0090}
0x07c08…07c10               Head {h00=0x0004, h01=0x0050, t00=0x004f, t01=0x00a8}
0x07c10…07c38               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004f, t01=0x00b0}
0x07c38…07c4a               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004f, t01=0x00d8}
0x07c4a…07c54               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x004f, t01=0x00ea}
0x07c54…07c68               Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x004f, t01=0x00f4}
0x07c68…07c82               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004f, t01=0x0108}
0x07c82…07ca4               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 STATUS =4 «, t00=0x004f, t01=0x0122}
0x07ca4…07cc8               Head {h00=0x0020, h01=0x0050, text=» RF(N) BRM335 NO REQUEST =4 «, t00=0x004f, t01=0x0144}
0x07cc8…07ce8               Head {h00=0x001c, h01=0x0050, text=» LD A1,DWTOR,A6 ORDER =4«, t00=0x004f, t01=0x0168}
0x07ce8…07d18               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 «, t00=0x004f, t01=0x0188}
0x07d18…07d42               Head {h00=0x0026, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST =4«, t00=0x0050, t01=0x0028}
0x07d42…07d5a               Head {h00=0x0014, h01=0x0050, text=»BRM335 EQU *  =4«, t00=0x0050, t01=0x0052}
0x07d5a…07d6c               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0050, t01=0x006a}
0x07d6c…07d8e               Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x0050, t01=0x007c}
0x07d8e…07dba               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x0050, t01=0x009e}
0x07dba…07dec               Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x0050, t01=0x00ca}
0x07dec…07e00               Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x0050, t01=0x00fc}
0x07e00…07e22               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x0050, t01=0x0110}
0x07e22…07e32               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0050, t01=0x0132}
0x07e32…07e46               Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x0050, t01=0x0142}
0x07e46…07e5a               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0050, t01=0x0156}
0x07e5a…07e72               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0050, t01=0x016a}
0x07e72…07e84               Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x0050, t01=0x0182}
0x07e84…07eac (81, 0, 400)  Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x0051, t01=0x0004}
0x07eac…07ecc               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x0051, t01=0x002c}
0x07ecc…07ede               Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x0051, t01=0x004c}
0x07ede…07eea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x005e}
0x07eea…07efe               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0051, t01=0x006a}
0x07efe…07f10               Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x0051, t01=0x007e}
0x07f10…07f1c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x0090}
0x07f1c…07f26               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0051, t01=0x009c}
0x07f26…07f30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00a6}
0x07f30…07f3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00b0}
0x07f3a…07f6a               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x0051, t01=0x00ba}
0x07f6a…07f74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00ea}
0x07f74…07f7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00f4}
0x07f7e…07f92               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0051, t01=0x00fe}
0x07f92…07fba               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x0051, t01=0x0112}
0x07fba…07fce               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x0051, t01=0x013a}
0x07fce…07ff4               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x0051, t01=0x014e}
0x07ff4…0802c               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x0051, t01=0x0174}
0x0802c…08060               Head {h00=0x0030, h01=0x0050, text=» LD A4,DWTBUF,A6 RESTORE LAST WRITE ECB DK6 «, t00=0x0052, t01=0x001c}
0x08060…0807e               Head {h00=0x001a, h01=0x0050, text=» ST A4,DWTECB,A6  DK6 «, t00=0x0052, t01=0x0050}
0x0807e…080a4               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x0052, t01=0x006e}
0x080a4…080b6               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0052, t01=0x0094}
0x080b6…080c8               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0052, t01=0x00a6}
0x080c8…080f2               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0052, t01=0x00b8}
0x080f2…08100               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x0052, t01=0x00e2}
0x08100…0812e               Head {h00=0x002a, h01=0x0050, text=» LD A1,CRDBUF INCREMENT READ BUFFER DK«, t00=0x0052, t01=0x00f0}
0x0812e…0814a               Head {h00=0x0018, h01=0x0050, text=» ADK A1,1 COUNTER DK«, t00=0x0052, t01=0x011e}
0x0814a…08164               Head {h00=0x0016, h01=0x0050, text=» ST A1,CRDBUF  DK «, t00=0x0052, t01=0x013a}
0x08164…08172               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x0052, t01=0x0154}
0x08172…0819a               Head {h00=0x0024, h01=0x0050, text=» ABL POL125 HANDEL AS WRITE DK6 «, t00=0x0052, t01=0x0162}
0x0819a…081a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x018a}
0x081a6…081b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0008}
0x081b0…081ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0012}
0x081ba…081da               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x0053, t01=0x001c}
0x081da…081e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x003c}
0x081e4…081ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0046}
0x081ee…08202               Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x0053, t01=0x0050}
0x08202…0822c               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0053, t01=0x0064}
0x0822c…08240               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0053, t01=0x008e}
0x08240…08270               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM510 RETRANSMISSION OF MESSAGE«, t00=0x0053, t01=0x00a2}
0x08270…08284               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0053, t01=0x00d2}
0x08284…082aa               Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x0053, t01=0x00e6}
0x082aa…082dc               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x0053, t01=0x010c}
0x082dc…082f0               Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x0053, t01=0x013e}
0x082f0…08300               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0053, t01=0x0152}
0x08300…0830a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0053, t01=0x0162}
0x0830a…08314               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x016c}
0x08314…0831e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0176}
0x0831e…0833e               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x0053, t01=0x0180}
0x0833e…08348               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0010}
0x08348…08352               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x001a}
0x08352…08366               Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x0054, t01=0x0024}
0x08366…08390               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0054, t01=0x0038}
0x08390…083a4               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0054, t01=0x0062}
0x083a4…083c8               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x0054, t01=0x0076}
0x083c8…083dc               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0054, t01=0x009a}
0x083dc…08402               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x0054, t01=0x00ae}
0x08402…08414               Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x0054, t01=0x00d4}
0x08414…08428               Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x0054, t01=0x00e6}
0x08428…08436               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x0054, t01=0x00fa}
0x08436…08448               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0054, t01=0x0108}
0x08448…08464               Head {h00=0x0018, h01=0x0050, text=» CIO A1,0,LCUIN  DK «, t00=0x0054, t01=0x011a}
0x08464…0847e               Head {h00=0x0016, h01=0x0050, text=» SST A1,LCUIN  DK «, t00=0x0054, t01=0x0136}
0x0847e…08498               Head {h00=0x0016, h01=0x0050, text=» CF A15,STREG  DK «, t00=0x0054, t01=0x0150}
0x08498…084b2               Head {h00=0x0016, h01=0x0050, text=» CF A15,SETIME  DK«, t00=0x0054, t01=0x016a}
0x084b2…084d2               Head {h00=0x001c, h01=0x0050, text=» DATA BRM520,TIMNAK  DK «, t00=0x0054, t01=0x0184}
0x084d2…084e8               Head {h00=0x0012, h01=0x0050, text=» ABL TDISP  DK«, t00=0x0055, t01=0x0014}
0x084e8…08500               Head {h00=0x0014, h01=0x0050, text=»BRM520 EQU *  DK«, t00=0x0055, t01=0x002a}
0x08500…0851a               Head {h00=0x0016, h01=0x0050, text=» CF A15,LDREG  DK «, t00=0x0055, t01=0x0042}
0x0851a…08528               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x0055, t01=0x005c}
0x08528…0854e               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0055, t01=0x006a}
0x0854e…08562               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0055, t01=0x0090}
0x08562…08576               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0055, t01=0x00a4}
0x08576…085aa               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x0055, t01=0x00b8}
0x085aa…085b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x00ec}
0x085b6…085ea               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x0055, t01=0x00f8}
0x085ea…08614               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x0055, t01=0x012c}
0x08614…08628               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0055, t01=0x0156}
0x08628…0863c               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0055, t01=0x016a}
0x0863c…08646               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x017e}
0x08646…08650               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0188}
0x08650…08670 (86, 0, 400)  Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x0056, t01=0x0004}
0x08670…0867a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0024}
0x0867a…08684               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x002e}
0x08684…08698               Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x0056, t01=0x0038}
0x08698…086c2               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0056, t01=0x004c}
0x086c2…086d6               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0056, t01=0x0076}
0x086d6…086fc               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 ACK NOT EXPECTED«, t00=0x0056, t01=0x008a}
0x086fc…08726               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x0056, t01=0x00b0}
0x08726…0873e               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0056, t01=0x00da}
0x0873e…08756               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x0056, t01=0x00f2}
0x08756…08768               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0056, t01=0x010a}
0x08768…08780               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0056, t01=0x011c}
0x08780…08798               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0  =8«, t00=0x0056, t01=0x0134}
0x08798…087aa               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0056, t01=0x014c}
0x087aa…087c0               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x0056, t01=0x015e}
0x087c0…087ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0174}
0x087ca…087e4               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x0056, t01=0x017e}
0x087e4…087ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0008}
0x087ee…08810               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x0057, t01=0x0012}
0x08810…08834               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0057, t01=0x0034}
0x08834…08848               Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0057, t01=0x0058}
0x08848…08866               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0057, t01=0x006c}
0x08866…08890               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0057, t01=0x008a}
0x08890…088a2               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0057, t01=0x00b4}
0x088a2…088b6               Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0057, t01=0x00c6}
0x088b6…088ca               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0057, t01=0x00da}
0x088ca…088e0               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0057, t01=0x00ee}
0x088e0…088ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0104}
0x088ea…08904               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0057, t01=0x010e}
0x08904…0890e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0128}
0x0890e…08932               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0057, t01=0x0132}
0x08932…0895a               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0057, t01=0x0156}
0x0895a…0896e               Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0057, t01=0x017e}
0x0896e…08982 (88, 0, 398)  Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0058, t01=0x0004}
0x08982…089a4               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0058, t01=0x0018}
0x089a4…089ae               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0058, t01=0x003a}
0x089ae…089b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0044}
0x089b8…089e8               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0058, t01=0x004e}
0x089e8…089f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x007e}
0x089f2…08a0c               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0058, t01=0x0088}
0x08a0c…08a20               Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0058, t01=0x00a2}
0x08a20…08a34               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0058, t01=0x00b6}
0x08a34…08a48               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x0058, t01=0x00ca}
0x08a48…08a7a               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x0058, t01=0x00de}
0x08a7a…08a86               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0110}
0x08a86…08ab2               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0058, t01=0x011c}
0x08ab2…08ac6               Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x0058, t01=0x0148}
0x08ac6…08ae4               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0058, t01=0x015c}
0x08ae4…08af8               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0058, t01=0x017a}
0x08af8…08b00               Head {h00=0x0004, h01=0x0050, t00=0x0058, t01=0x018e}
0x08b00…08b22               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0059, t01=0x0008}
0x08b22…08b2e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x002a}
0x08b2e…08b40               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0059, t01=0x0036}
0x08b40…08b54               Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x0059, t01=0x0048}
0x08b54…08b66               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0059, t01=0x005c}
0x08b66…08b90               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0059, t01=0x006e}
0x08b90…08ba4               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0059, t01=0x0098}
0x08ba4…08bb8               Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x0059, t01=0x00ac}
0x08bb8…08bd0               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0059, t01=0x00c0}
0x08bd0…08be8               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x0059, t01=0x00d8}
0x08be8…08bfa               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0059, t01=0x00f0}
0x08bfa…08c12               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0059, t01=0x0102}
0x08c12…08c2a               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI  =8 «, t00=0x0059, t01=0x011a}
0x08c2a…08c3c               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0059, t01=0x0132}
0x08c3c…08c68               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x0059, t01=0x0144}
0x08c68…08c8e               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x0059, t01=0x0170}
0x08c8e…08ca2               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x005a, t01=0x0008}
0x08ca2…08cca               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x005a, t01=0x001c}
0x08cca…08ce4               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x005a, t01=0x0044}
0x08ce4…08cf6               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x005a, t01=0x005e}
0x08cf6…08d0a               Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x005a, t01=0x0070}
0x08d0a…08d24               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x005a, t01=0x0084}
0x08d24…08d36               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x005a, t01=0x009e}
0x08d36…08d4a               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005a, t01=0x00b0}
0x08d4a…08d54               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005a, t01=0x00c4}
0x08d54…08d5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00ce}
0x08d5e…08d68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00d8}
0x08d68…08d8e               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x005a, t01=0x00e2}
0x08d8e…08d98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0108}
0x08d98…08da2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0112}
0x08da2…08db6               Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x005a, t01=0x011c}
0x08db6…08ddc               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x005a, t01=0x0130}
0x08ddc…08e0c               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x005a, t01=0x0156}
0x08e0c…08e30               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x005a, t01=0x0186}
0x08e30…08e56               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x005b, t01=0x001a}
0x08e56…08e78               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005b, t01=0x0040}
0x08e78…08e8a               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x005b, t01=0x0062}
0x08e8a…08ea6               Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x005b, t01=0x0074}
0x08ea6…08ebc               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x005b, t01=0x0090}
0x08ebc…08ee2               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x005b, t01=0x00a6}
0x08ee2…08ef4               Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x005b, t01=0x00cc}
0x08ef4…08f00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x00de}
0x08f00…08f0a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005b, t01=0x00ea}
0x08f0a…08f14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00f4}
0x08f14…08f1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00fe}
0x08f1e…08f40               Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x005b, t01=0x0108}
0x08f40…08f4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x012a}
0x08f4a…08f54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0134}
0x08f54…08f68               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x005b, t01=0x013e}
0x08f68…08f80               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005b, t01=0x0152}
0x08f80…08fae               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) POL010 ERROR. ACK EXPECTED =5 «, t00=0x005b, t01=0x016a}
0x08fae…08fc2               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005c, t01=0x0008}
0x08fc2…08fe4               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005c, t01=0x001c}
0x08fe4…08ff6               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x005c, t01=0x003e}
0x08ff6…09008               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x005c, t01=0x0050}
0x09008…09030               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x005c, t01=0x0062}
0x09030…0904e               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x005c, t01=0x008a}
0x0904e…0905a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x00a8}
0x0905a…0906e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005c, t01=0x00b4}
0x0906e…09080               Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x005c, t01=0x00c8}
0x09080…0908c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x00da}
0x0908c…090a0               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x005c, t01=0x00e6}
0x090a0…090b0               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005c, t01=0x00fa}
0x090b0…090c4               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x005c, t01=0x010a}
0x090c4…090de               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x005c, t01=0x011e}
0x090de…090f0               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005c, t01=0x0138}
0x090f0…0910c               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x005c, t01=0x014a}
0x0910c…09118               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x0166}
0x09118…09132               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x005c, t01=0x0172}
0x09132…09144               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005c, t01=0x018c}
0x09144…0916a               Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x005d, t01=0x000e}
0x0916a…0918e               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x005d, t01=0x0034}
0x0918e…0919e               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005d, t01=0x0058}
0x0919e…091b2               Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x005d, t01=0x0068}
0x091b2…091be               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x007c}
0x091be…091d4               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x005d, t01=0x0088}
0x091d4…091fc               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x005d, t01=0x009e}
0x091fc…09210               Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x005d, t01=0x00c6}
0x09210…0922a               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x005d, t01=0x00da}
0x0922a…0924a               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x005d, t01=0x00f4}
0x0924a…09256               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0114}
0x09256…09268               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005d, t01=0x0120}
0x09268…0927c               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x005d, t01=0x0132}
0x0927c…092ac               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x005d, t01=0x0146}
0x092ac…092cc               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x005d, t01=0x0176}
0x092cc…092de               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005e, t01=0x0008}
0x092de…092e8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005e, t01=0x001a}
0x092e8…092f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0024}
0x092f2…092fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x002e}
0x092fc…09320               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x005e, t01=0x0038}
0x09320…0932a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x005c}
0x0932a…09334               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0066}
0x09334…09348               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x005e, t01=0x0070}
0x09348…09368               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x005e, t01=0x0084}
0x09368…0938c               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005e, t01=0x00a4}
0x0938c…093a0               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x005e, t01=0x00c8}
0x093a0…093d2               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x005e, t01=0x00dc}
0x093d2…093de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x010e}
0x093de…09406               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x005e, t01=0x011a}
0x09406…09416               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x005e, t01=0x0142}
0x09416…0943c               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x005e, t01=0x0152}
0x0943c…0944c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x005e, t01=0x0178}
0x0944c…09456               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005e, t01=0x0188}
0x09456…09460 (95, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0004}
0x09460…0946a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x000e}
0x0946a…09492               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x005f, t01=0x0018}
0x09492…0949c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0040}
0x0949c…094a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x004a}
0x094a6…094ba               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x005f, t01=0x0054}
0x094ba…094d2               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005f, t01=0x0068}
0x094d2…094fc               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL020 ACK NOT EXPECTED =5 «, t00=0x005f, t01=0x0080}
0x094fc…09522               Head {h00=0x0022, h01=0x0050, text=»POL010 CF A5,TRENQ SEND ENQ =5«, t00=0x005f, t01=0x00aa}
0x09522…09550               Head {h00=0x002a, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER =5 «, t00=0x005f, t01=0x00d0}
0x09550…09576               Head {h00=0x0022, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE =5 «, t00=0x005f, t01=0x00fe}
0x09576…0958e               Head {h00=0x0014, h01=0x0050, text=»POL020 EQU *  =5«, t00=0x005f, t01=0x0124}
0x0958e…095b4               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x005f, t01=0x013c}
0x095b4…095c8               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005f, t01=0x0162}
0x095c8…095de               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x005f, t01=0x0176}
0x095de…09608               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x005f, t01=0x018c}
0x09608…0962e               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x0060, t01=0x0026}
0x0962e…09642               Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x0060, t01=0x004c}
0x09642…09662               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x0060, t01=0x0060}
0x09662…0968c               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0060, t01=0x0080}
0x0968c…096b0               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0060, t01=0x00aa}
0x096b0…096bc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0060, t01=0x00ce}
0x096bc…096d0               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0060, t01=0x00da}
0x096d0…096e2               Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x0060, t01=0x00ee}
0x096e2…096ee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0060, t01=0x0100}
0x096ee…09702               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x0060, t01=0x010c}
0x09702…09712               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0060, t01=0x0120}
0x09712…09726               Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x0060, t01=0x0130}
0x09726…0973a               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x0060, t01=0x0144}
0x0973a…09760               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x0060, t01=0x0158}
0x09760…09774               Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x0060, t01=0x017e}
0x09774…09792 (97, 0, 400)  Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0061, t01=0x0004}
0x09792…097a4               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x0061, t01=0x0022}
0x097a4…097b8               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x0061, t01=0x0034}
0x097b8…097de               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x0061, t01=0x0048}
0x097de…097f2               Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x0061, t01=0x006e}
0x097f2…0981a               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0061, t01=0x0082}
0x0981a…09830               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x0061, t01=0x00aa}
0x09830…09846               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x0061, t01=0x00c0}
0x09846…09858               Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x0061, t01=0x00d6}
0x09858…0986c               Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x0061, t01=0x00e8}
0x0986c…09890               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x0061, t01=0x00fc}
0x09890…098ae               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0061, t01=0x0120}
0x098ae…098b6               Head {h00=0x0004, h01=0x0050, t00=0x0061, t01=0x013e}
0x098b6…098cc               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x0061, t01=0x0146}
0x098cc…098f4               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,MMUBUF MMU WORK BUFFER «, t00=0x0061, t01=0x015c}
0x098f4…0990c               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x0061, t01=0x0184}
0x0990c…0993e               Head {h00=0x002e, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA FROM USER BUFFER «, t00=0x0062, t01=0x000c}
0x0993e…0994a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0062, t01=0x003e}
0x0994a…09974               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0062, t01=0x004a}
0x09974…09996               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x0062, t01=0x0074}
0x09996…099aa               Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x0062, t01=0x0096}
0x099aa…099d4               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x0062, t01=0x00aa}
0x099d4…09a00               Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x0062, t01=0x00d4}
0x09a00…09a22               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x0062, t01=0x0100}
0x09a22…09a46               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x0062, t01=0x0122}
0x09a46…09a5a               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x0062, t01=0x0146}
0x09a5a…09a7c               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x0062, t01=0x015a}
0x09a7c…09a8c               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0062, t01=0x017c}
0x09a8c…09ab0               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x0062, t01=0x018c}
0x09ab0…09ada               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0063, t01=0x0020}
0x09ada…09afe               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0063, t01=0x004a}
0x09afe…09b10               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x0063, t01=0x006e}
0x09b10…09b1a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0063, t01=0x0080}
0x09b1a…09b24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x008a}
0x09b24…09b2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0094}
0x09b2e…09b58               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x0063, t01=0x009e}
0x09b58…09b62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00c8}
0x09b62…09b6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00d2}
0x09b6c…09b80               Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x0063, t01=0x00dc}
0x09b80…09b9a               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0063, t01=0x00f0}
0x09b9a…09bb2               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x0063, t01=0x010a}
0x09bb2…09bd8               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL010 ACK EXPECTED =5«, t00=0x0063, t01=0x0122}
0x09bd8…09bf2               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x0063, t01=0x0148}
0x09bf2…09c16               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x0063, t01=0x0162}
0x09c16…09c34               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x0063, t01=0x0186}
0x09c34…09c48               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0064, t01=0x0014}
0x09c48…09c6a               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0064, t01=0x0028}
0x09c6a…09c7c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x0064, t01=0x004a}
0x09c7c…09ca2               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x0064, t01=0x005c}
0x09ca2…09cae               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0064, t01=0x0082}
0x09cae…09cc8               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0064, t01=0x008e}
0x09cc8…09ce0               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0064, t01=0x00a8}
0x09ce0…09d00               Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x0064, t01=0x00c0}
0x09d00…09d22               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x0064, t01=0x00e0}
0x09d22…09d34               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x0064, t01=0x0102}
0x09d34…09d58               Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x0064, t01=0x0114}
0x09d58…09d6a               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0064, t01=0x0138}
0x09d6a…09d90               Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x0064, t01=0x014a}
0x09d90…09d9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0064, t01=0x0170}
0x09d9c…09db8               Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x0064, t01=0x017c}
0x09db8…09dc2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0065, t01=0x0008}
0x09dc2…09dcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0012}
0x09dcc…09dd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x001c}
0x09dd6…09e12               Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x0065, t01=0x0026}
0x09e12…09e1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0062}
0x09e1c…09e3e               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x0065, t01=0x006c}
0x09e3e…09e48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x008e}
0x09e48…09e52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0098}
0x09e52…09e6e               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x0065, t01=0x00a2}
0x09e6e…09e96               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x0065, t01=0x00be}
0x09e96…09eaa               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0065, t01=0x00e6}
0x09eaa…09ed2               Head {h00=0x0024, h01=0x0050, text=» LD A2,XRB IF RCOM, SKIP IT DK6 «, t00=0x0065, t01=0x00fa}
0x09ed2…09eee               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) CWR900  DK6 «, t00=0x0065, t01=0x0122}
0x09eee…09efe               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0065, t01=0x013e}
0x09efe…09f16               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0065, t01=0x014e}
0x09f16…09f36               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x0065, t01=0x0166}
0x09f36…09f58               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0065, t01=0x0186}
0x09f58…09f6a               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0066, t01=0x0018}
0x09f6a…09f8e               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x0066, t01=0x002a}
0x09f8e…09fa0               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0066, t01=0x004e}
0x09fa0…09fcc               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x0066, t01=0x0060}
0x09fcc…09fde               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0066, t01=0x008c}
0x09fde…0a014               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x0066, t01=0x009e}
0x0a014…0a034               Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x0066, t01=0x00d4}
0x0a034…0a060               Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x0066, t01=0x00f4}
0x0a060…0a072               Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x0066, t01=0x0120}
0x0a072…0a09c               Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x0066, t01=0x0132}
0x0a09c…0a0be               Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x0066, t01=0x015c}
0x0a0be…0a0d0               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0066, t01=0x017e}
0x0a0d0…0a0e6               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x0066, t01=0x0190}
0x0a0e6…0a0fe               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0067, t01=0x0016}
0x0a0fe…0a126               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0067, t01=0x002e}
0x0a126…0a13a               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x0067, t01=0x0056}
0x0a13a…0a168               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0067, t01=0x006a}
0x0a168…0a17c               Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x0067, t01=0x0098}
0x0a17c…0a190               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x0067, t01=0x00ac}
0x0a190…0a1b6               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0067, t01=0x00c0}
0x0a1b6…0a1c8               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0067, t01=0x00e6}
0x0a1c8…0a1dc               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0067, t01=0x00f8}
0x0a1dc…0a202               Head {h00=0x0022, h01=0x0050, text=» LD A2,XRB READ MODIFIED ? DK6«, t00=0x0067, t01=0x010c}
0x0a202…0a21c               Head {h00=0x0016, h01=0x0050, text=» RF(Z) CWR910  DK6«, t00=0x0067, t01=0x0132}
0x0a21c…0a244               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTCUR,A6 RESTORE ECB DK6«, t00=0x0067, t01=0x014c}
0x0a244…0a262               Head {h00=0x001a, h01=0x0050, text=» ST A2,DWTECB,A6  DK6 «, t00=0x0067, t01=0x0174}
0x0a262…0a27c (104, 0, 398) Head {h00=0x0016, h01=0x0050, text=»CWR910 EQU *  DK6 «, t00=0x0068, t01=0x0004}
0x0a27c…0a28a               Head {h00=0x000a, h01=0x0050, text=» XIF  «, t00=0x0068, t01=0x001e}
0x0a28a…0a29a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0068, t01=0x002c}
0x0a29a…0a2a4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0068, t01=0x003c}
0x0a2a4…0a2ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0046}
0x0a2ae…0a2b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0050}
0x0a2b8…0a2d6               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x0068, t01=0x005a}
0x0a2d6…0a2e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0078}
0x0a2e0…0a300               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x0068, t01=0x0082}
0x0a300…0a32c               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x0068, t01=0x00a2}
0x0a32c…0a362               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x0068, t01=0x00ce}
0x0a362…0a38e               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x0068, t01=0x0104}
0x0a38e…0a398               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0130}
0x0a398…0a3ac               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x0068, t01=0x013a}
0x0a3ac…0a3d4               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0068, t01=0x014e}
0x0a3d4…0a3f4               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x0068, t01=0x0176}
0x0a3f4…0a406               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0069, t01=0x0008}
0x0a406…0a41a               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0069, t01=0x001a}
0x0a41a…0a442               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x0069, t01=0x002e}
0x0a442…0a468               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x0069, t01=0x0056}
0x0a468…0a47a               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x0069, t01=0x007c}
0x0a47a…0a48e               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0069, t01=0x008e}
0x0a48e…0a4a2               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x0069, t01=0x00a2}
0x0a4a2…0a4c6               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0069, t01=0x00b6}
0x0a4c6…0a4f2               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0069, t01=0x00da}
0x0a4f2…0a506               Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x0069, t01=0x0106}
0x0a506…0a516               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0069, t01=0x011a}
0x0a516…0a532               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0069, t01=0x012a}
0x0a532…0a53a               Head {h00=0x0004, h01=0x0050, t00=0x0069, t01=0x0146}
0x0a53a…0a550               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0069, t01=0x014e}
0x0a550…0a564               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0069, t01=0x0164}
0x0a564…0a58a               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x0069, t01=0x0178}
0x0a58a…0a59e               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x006a, t01=0x000e}
0x0a59e…0a5c2               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006a, t01=0x0022}
0x0a5c2…0a5d6               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x006a, t01=0x0046}
0x0a5d6…0a5ec               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x006a, t01=0x005a}
0x0a5ec…0a61a               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x006a, t01=0x0070}
0x0a61a…0a62e               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x006a, t01=0x009e}
0x0a62e…0a63a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006a, t01=0x00b2}
0x0a63a…0a64e               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x006a, t01=0x00be}
0x0a64e…0a676               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x006a, t01=0x00d2}
0x0a676…0a69a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006a, t01=0x00fa}
0x0a69a…0a6ae               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x006a, t01=0x011e}
0x0a6ae…0a6c2               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x006a, t01=0x0132}
0x0a6c2…0a6e4               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x006a, t01=0x0146}
0x0a6e4…0a6f8               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x006a, t01=0x0168}
0x0a6f8…0a71a               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x006a, t01=0x017c}
0x0a71a…0a72e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x006b, t01=0x000e}
0x0a72e…0a750               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x006b, t01=0x0022}
0x0a750…0a764               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x006b, t01=0x0044}
0x0a764…0a79a               Head {h00=0x0032, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE «, t00=0x006b, t01=0x0058}
0x0a79a…0a7ae               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x006b, t01=0x008e}
0x0a7ae…0a7d6               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x006b, t01=0x00a2}
0x0a7d6…0a7de               Head {h00=0x0004, h01=0x0050, t00=0x006b, t01=0x00ca}
0x0a7de…0a7f2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x006b, t01=0x00d2}
0x0a7f2…0a808               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x006b, t01=0x00e6}
0x0a808…0a810               Head {h00=0x0004, h01=0x0050, t00=0x006b, t01=0x00fc}
0x0a810…0a822               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x006b, t01=0x0104}
0x0a822…0a838               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x006b, t01=0x0116}
0x0a838…0a85a               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x006b, t01=0x012c}
0x0a85a…0a86c               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x006b, t01=0x014e}
0x0a86c…0a88e               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x006b, t01=0x0160}
0x0a88e…0a8a0               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x006b, t01=0x0182}
0x0a8a0…0a8b2 (108, 0, 398) Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x006c, t01=0x0004}
0x0a8b2…0a8e0               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x006c, t01=0x0016}
0x0a8e0…0a904               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006c, t01=0x0044}
0x0a904…0a932               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x006c, t01=0x0068}
0x0a932…0a944               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x006c, t01=0x0096}
0x0a944…0a958               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x006c, t01=0x00a8}
0x0a958…0a964               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x00bc}
0x0a964…0a96c               Head {h00=0x0004, h01=0x0050, t00=0x006c, t01=0x00c8}
0x0a96c…0a98e               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x006c, t01=0x00d0}
0x0a98e…0a9b2               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x006c, t01=0x00f2}
0x0a9b2…0a9da               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x006c, t01=0x0116}
0x0a9da…0a9ee               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x006c, t01=0x013e}
0x0a9ee…0aa0a               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x006c, t01=0x0152}
0x0aa0a…0aa2e               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x006c, t01=0x016e}
0x0aa2e…0aa38 (109, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0004}
0x0aa38…0aa52               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x006d, t01=0x000e}
0x0aa52…0aa5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0028}
0x0aa5c…0aa7a               Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x006d, t01=0x0032}
0x0aa7a…0aa8e               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x006d, t01=0x0050}
0x0aa8e…0aab8               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006d, t01=0x0064}
0x0aab8…0aacc               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x006d, t01=0x008e}
0x0aacc…0aaf4               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x006d, t01=0x00a2}
0x0aaf4…0ab06               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006d, t01=0x00ca}
0x0ab06…0ab10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00dc}
0x0ab10…0ab26               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x006d, t01=0x00e6}
0x0ab26…0ab30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00fc}
0x0ab30…0ab44               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x006d, t01=0x0106}
0x0ab44…0ab6c               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x006d, t01=0x011a}
0x0ab6c…0ab90               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x006d, t01=0x0142}
0x0ab90…0abc6               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x006d, t01=0x0166}
0x0abc6…0abda               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006e, t01=0x000c}
0x0abda…0abee               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006e, t01=0x0020}
0x0abee…0ac0e               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x006e, t01=0x0034}
0x0ac0e…0ac1a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x0054}
0x0ac1a…0ac2e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006e, t01=0x0060}
0x0ac2e…0ac58               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006e, t01=0x0074}
0x0ac58…0ac78               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x006e, t01=0x009e}
0x0ac78…0ac84               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x00be}
0x0ac84…0ac98               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x006e, t01=0x00ca}
0x0ac98…0acc2               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006e, t01=0x00de}
0x0acc2…0acd6               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x006e, t01=0x0108}
0x0acd6…0acfe               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x006e, t01=0x011c}
0x0acfe…0ad1e               Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x006e, t01=0x0144}
0x0ad1e…0ad32               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x006e, t01=0x0164}
0x0ad32…0ad58               Head {h00=0x0022, h01=0x0050, text=» ORR A7,A1 PARITY ERROR SALCUZ«, t00=0x006e, t01=0x0178}
0x0ad58…0ad6e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x006f, t01=0x000e}
0x0ad6e…0ad7e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006f, t01=0x0024}
0x0ad7e…0ad88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0034}
0x0ad88…0ad9e               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x006f, t01=0x003e}
0x0ad9e…0ada8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0054}
0x0ada8…0adbc               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x006f, t01=0x005e}
0x0adbc…0adce               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x006f, t01=0x0072}
0x0adce…0adf4               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x006f, t01=0x0084}
0x0adf4…0ae1a               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x006f, t01=0x00aa}
0x0ae1a…0ae2c               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x006f, t01=0x00d0}
0x0ae2c…0ae36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00e2}
0x0ae36…0ae4c               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x006f, t01=0x00ec}
0x0ae4c…0ae56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0102}
0x0ae56…0ae6a               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x006f, t01=0x010c}
0x0ae6a…0ae7e               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006f, t01=0x0120}
0x0ae7e…0ae92               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006f, t01=0x0134}
0x0ae92…0aeb8               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x006f, t01=0x0148}
0x0aeb8…0aec4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x016e}
0x0aec4…0aed8               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006f, t01=0x017a}
0x0aed8…0af02               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006f, t01=0x018e}
0x0af02…0af28               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x0070, t01=0x0028}
0x0af28…0af34               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x004e}
0x0af34…0af46               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0070, t01=0x005a}
0x0af46…0af50               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0070, t01=0x006c}
0x0af50…0af5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0076}
0x0af5a…0af78               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x0070, t01=0x0080}
0x0af78…0af82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x009e}
0x0af82…0af98               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x0070, t01=0x00a8}
0x0af98…0afba               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x0070, t01=0x00be}
0x0afba…0afe4               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x0070, t01=0x00e0}
0x0afe4…0affa               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x0070, t01=0x010a}
0x0affa…0b018               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x0070, t01=0x0120}
0x0b018…0b02a               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0070, t01=0x013e}
0x0b02a…0b034               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0150}
0x0b034…0b04c               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x0070, t01=0x015a}
0x0b04c…0b056               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0172}
0x0b056…0b07a               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x0070, t01=0x017c}
0x0b07a…0b08c               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0071, t01=0x0010}
0x0b08c…0b096               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0022}
0x0b096…0b0ac               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x0071, t01=0x002c}
0x0b0ac…0b0b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0042}
0x0b0b6…0b0ca               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0071, t01=0x004c}
0x0b0ca…0b0ec               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x0071, t01=0x0060}
0x0b0ec…0b0f8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x0082}
0x0b0f8…0b102               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x008e}
0x0b102…0b118               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x0071, t01=0x0098}
0x0b118…0b122               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00ae}
0x0b122…0b144               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x0071, t01=0x00b8}
0x0b144…0b16a               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x0071, t01=0x00da}
0x0b16a…0b182               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x0071, t01=0x0100}
0x0b182…0b194               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x0071, t01=0x0118}
0x0b194…0b19e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0071, t01=0x012a}
0x0b19e…0b1a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0134}
0x0b1a8…0b1be               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x0071, t01=0x013e}
0x0b1be…0b1c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0154}
0x0b1c8…0b1ea               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x0071, t01=0x015e}
0x0b1ea…0b1fc               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0071, t01=0x0180}
0x0b1fc…0b206 (114, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0004}
0x0b206…0b21c               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x0072, t01=0x000e}
0x0b21c…0b226               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0024}
0x0b226…0b248               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x0072, t01=0x002e}
0x0b248…0b25a               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0072, t01=0x0050}
0x0b25a…0b264               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0062}
0x0b264…0b27a               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x0072, t01=0x006c}
0x0b27a…0b284               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0082}
0x0b284…0b2a6               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x0072, t01=0x008c}
0x0b2a6…0b2b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00ae}
0x0b2b0…0b2dc               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x0072, t01=0x00b8}
0x0b2dc…0b2f0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0072, t01=0x00e4}
0x0b2f0…0b308               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x0072, t01=0x00f8}
0x0b308…0b330               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x0072, t01=0x0110}
0x0b330…0b35a               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x0072, t01=0x0138}
0x0b35a…0b378               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0072, t01=0x0162}
0x0b378…0b3a2               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x0072, t01=0x0180}
0x0b3a2…0b3c0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0073, t01=0x001a}
0x0b3c0…0b3da               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x0073, t01=0x0038}
0x0b3da…0b3f8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x0073, t01=0x0052}
0x0b3f8…0b40c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0073, t01=0x0070}
0x0b40c…0b422               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x0073, t01=0x0084}
0x0b422…0b43c               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0073, t01=0x009a}
0x0b43c…0b464               Head {h00=0x0024, h01=0x0050, text=» CIO A2,0,LCUUT STOP TRANSMITTER«, t00=0x0073, t01=0x00b4}
0x0b464…0b480               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0073, t01=0x00dc}
0x0b480…0b4a8               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ WAIT FOR END SALCUZ «, t00=0x0073, t01=0x00f8}
0x0b4a8…0b4be               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0073, t01=0x0120}
0x0b4be…0b4e8               Head {h00=0x0026, h01=0x0050, text=» SST A2,LCUUT PERFORM SST AT ONCE «, t00=0x0073, t01=0x0136}
0x0b4e8…0b4fc               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0073, t01=0x0160}
0x0b4fc…0b528               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x0073, t01=0x0174}
0x0b528…0b534               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x0010}
0x0b534…0b544               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0074, t01=0x001c}
0x0b544…0b54e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0074, t01=0x002c}
0x0b54e…0b558               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0036}
0x0b558…0b562               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0040}
0x0b562…0b584               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x0074, t01=0x004a}
0x0b584…0b58e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x006c}
0x0b58e…0b598               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0076}
0x0b598…0b5ac               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x0074, t01=0x0080}
0x0b5ac…0b5ce               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0074, t01=0x0094}
0x0b5ce…0b5e4               Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x0074, t01=0x00b6}
0x0b5e4…0b5ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00cc}
0x0b5ee…0b5f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00d6}
0x0b5f8…0b618               Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x0074, t01=0x00e0}
0x0b618…0b622               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0100}
0x0b622…0b62c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x010a}
0x0b62c…0b640               Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x0074, t01=0x0114}
0x0b640…0b66c               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x0074, t01=0x0128}
0x0b66c…0b674               Head {h00=0x0004, h01=0x0050, t00=0x0074, t01=0x0154}
0x0b674…0b6aa               Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x0074, t01=0x015c}
0x0b6aa…0b6c8 (117, 0, 400) Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x0075, t01=0x0004}
0x0b6c8…0b6d0               Head {h00=0x0004, h01=0x0050, t00=0x0075, t01=0x0022}
0x0b6d0…0b6e6               Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x0075, t01=0x002a}
0x0b6e6…0b70c               Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x0075, t01=0x0040}
0x0b70c…0b720               Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x0075, t01=0x0066}
0x0b720…0b748               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x0075, t01=0x007a}
0x0b748…0b75c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0075, t01=0x00a2}
0x0b75c…0b77a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0075, t01=0x00b6}
0x0b77a…0b796               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x0075, t01=0x00d4}
0x0b796…0b7aa               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0075, t01=0x00f0}
0x0b7aa…0b7c6               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x0075, t01=0x0104}
0x0b7c6…0b7da               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x0075, t01=0x0120}
0x0b7da…0b7f6               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x0075, t01=0x0134}
0x0b7f6…0b80a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0075, t01=0x0150}
0x0b80a…0b828               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0075, t01=0x0164}
0x0b828…0b854               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0075, t01=0x0182}
0x0b854…0b880               Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x0076, t01=0x001e}
0x0b880…0b8a0               Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x0076, t01=0x004a}
0x0b8a0…0b8b2               Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x0076, t01=0x006a}
0x0b8b2…0b8c6               Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x0076, t01=0x007c}
0x0b8c6…0b8d8               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0076, t01=0x0090}
0x0b8d8…0b8ec               Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x0076, t01=0x00a2}
0x0b8ec…0b8f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00b6}
0x0b8f6…0b900               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00c0}
0x0b900…0b90a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00ca}
0x0b90a…0b916               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x00d4}
0x0b916…0b92a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0076, t01=0x00e0}
0x0b92a…0b948               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0076, t01=0x00f4}
0x0b948…0b964               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0076, t01=0x0112}
0x0b964…0b98c               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0076, t01=0x012e}
0x0b98c…0b9b0               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0076, t01=0x0156}
0x0b9b0…0b9dc               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0076, t01=0x017a}
0x0b9dc…0ba08               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x0077, t01=0x0016}
0x0ba08…0ba32               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x0077, t01=0x0042}
0x0ba32…0ba56               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x0077, t01=0x006c}
0x0ba56…0ba7c               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x0077, t01=0x0090}
0x0ba7c…0ba9c               Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x0077, t01=0x00b6}
0x0ba9c…0baba               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0077, t01=0x00d6}
0x0baba…0bad6               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0077, t01=0x00f4}
0x0bad6…0baf4               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0077, t01=0x0110}
0x0baf4…0bb0a               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0077, t01=0x012e}
0x0bb0a…0bb1e               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x0077, t01=0x0144}
0x0bb1e…0bb44               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x0077, t01=0x0158}
0x0bb44…0bb5a               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0077, t01=0x017e}
0x0bb5a…0bb80 (120, 0, 400) Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x0078, t01=0x0004}
0x0bb80…0bb96               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0078, t01=0x002a}
0x0bb96…0bbaa               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x0078, t01=0x0040}
0x0bbaa…0bbc0               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0078, t01=0x0054}
0x0bbc0…0bbcc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x006a}
0x0bbcc…0bbe0               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0078, t01=0x0076}
0x0bbe0…0bbe8               Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x008a}
0x0bbe8…0bc00               Head {h00=0x0014, h01=0x0050, text=» RF TRT070  DK6 «, t00=0x0078, t01=0x0092}
0x0bc00…0bc08               Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x00aa}
0x0bc08…0bc28               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x0078, t01=0x00b2}
0x0bc28…0bc4e               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x0078, t01=0x00d2}
0x0bc4e…0bc72               Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x0078, t01=0x00f8}
0x0bc72…0bc7a               Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x011c}
0x0bc7a…0bca2               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x0078, t01=0x0124}
0x0bca2…0bcd4               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x0078, t01=0x014c}
0x0bcd4…0bcf6               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x0078, t01=0x017e}
0x0bcf6…0bd08               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0079, t01=0x0010}
0x0bd08…0bd1c               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x0079, t01=0x0022}
0x0bd1c…0bd28               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0036}
0x0bd28…0bd30               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x0042}
0x0bd30…0bd42               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0079, t01=0x004a}
0x0bd42…0bd56               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x0079, t01=0x005c}
0x0bd56…0bd7a               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x0079, t01=0x0070}
0x0bd7a…0bd9e               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0079, t01=0x0094}
0x0bd9e…0bdb2               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0079, t01=0x00b8}
0x0bdb2…0bdc6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0079, t01=0x00cc}
0x0bdc6…0bdde               Head {h00=0x0014, h01=0x0050, text=» RF TRT105  DK6 «, t00=0x0079, t01=0x00e0}
0x0bdde…0bde6               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x00f8}
0x0bde6…0be2a               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0079, t01=0x0100}
0x0be2a…0be34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0144}
0x0be34…0be64               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x0079, t01=0x014e}
0x0be64…0be6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x017e}
0x0be6e…0bea6               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0079, t01=0x0188}
0x0bea6…0beae               Head {h00=0x0004, h01=0x0050, t00=0x007a, t01=0x0030}
0x0beae…0bed8               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x007a, t01=0x0038}
0x0bed8…0bef4               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x007a, t01=0x0062}
0x0bef4…0bf00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x007e}
0x0bf00…0bf14               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x007a, t01=0x008a}
0x0bf14…0bf34               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x007a, t01=0x009e}
0x0bf34…0bf5a               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x007a, t01=0x00be}
0x0bf5a…0bf6e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x007a, t01=0x00e4}
0x0bf6e…0bf82               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x007a, t01=0x00f8}
0x0bf82…0bfa6               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x007a, t01=0x010c}
0x0bfa6…0bfcc               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x007a, t01=0x0130}
0x0bfcc…0bfe0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x007a, t01=0x0156}
0x0bfe0…0bff4               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x007a, t01=0x016a}
0x0bff4…0c012               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x007a, t01=0x017e}
0x0c012…0c028               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x007b, t01=0x000c}
0x0c028…0c03a               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x007b, t01=0x0022}
0x0c03a…0c046               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007b, t01=0x0034}
0x0c046…0c05a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007b, t01=0x0040}
0x0c05a…0c06c               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x007b, t01=0x0054}
0x0c06c…0c074               Head {h00=0x0004, h01=0x0050, t00=0x007b, t01=0x0066}
0x0c074…0c088               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x007b, t01=0x006e}
0x0c088…0c090               Head {h00=0x0004, h01=0x0050, t00=0x007b, t01=0x0082}
0x0c090…0c0a2               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x007b, t01=0x008a}
0x0c0a2…0c0c8               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x007b, t01=0x009c}
0x0c0c8…0c0d0               Head {h00=0x0004, h01=0x0050, t00=0x007b, t01=0x00c2}
0x0c0d0…0c0fc               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x007b, t01=0x00ca}
0x0c0fc…0c112               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x007b, t01=0x00f6}
0x0c112…0c13e               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x007b, t01=0x010c}
0x0c13e…0c150               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x007b, t01=0x0138}
0x0c150…0c168               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x007b, t01=0x014a}
0x0c168…0c17a               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x007b, t01=0x0162}
0x0c17a…0c1a4               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x007b, t01=0x0174}
0x0c1a4…0c1ca               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x007c, t01=0x000e}
0x0c1ca…0c1e2               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x007c, t01=0x0034}
0x0c1e2…0c20c               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x007c, t01=0x004c}
0x0c20c…0c222               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x007c, t01=0x0076}
0x0c222…0c236               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x007c, t01=0x008c}
0x0c236…0c24a               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x007c, t01=0x00a0}
0x0c24a…0c26e               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x007c, t01=0x00b4}
0x0c26e…0c280               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x007c, t01=0x00d8}
0x0c280…0c292               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x007c, t01=0x00ea}
0x0c292…0c2a6               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x007c, t01=0x00fc}
0x0c2a6…0c2b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x0110}
0x0c2b2…0c2bc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x007c, t01=0x011c}
0x0c2bc…0c2d0               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x007c, t01=0x0126}
0x0c2d0…0c2fc               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x007c, t01=0x013a}
0x0c2fc…0c320               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x007c, t01=0x0166}
0x0c320…0c334               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x007c, t01=0x018a}
0x0c334…0c35c               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x007d, t01=0x000e}
0x0c35c…0c386               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x007d, t01=0x0036}
0x0c386…0c39a               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x007d, t01=0x0060}
0x0c39a…0c3c0               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x007d, t01=0x0074}
0x0c3c0…0c3ee               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x007d, t01=0x009a}
0x0c3ee…0c404               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x007d, t01=0x00c8}
0x0c404…0c428               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x007d, t01=0x00de}
0x0c428…0c43c               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007d, t01=0x0102}
0x0c43c…0c46c               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x007d, t01=0x0116}
0x0c46c…0c480               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x007d, t01=0x0146}
0x0c480…0c49a               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x007d, t01=0x015a}
0x0c49a…0c4ae               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x007d, t01=0x0174}
0x0c4ae…0c4d0               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x007d, t01=0x0188}
0x0c4d0…0c4fc               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x007e, t01=0x001a}
0x0c4fc…0c51e               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x007e, t01=0x0046}
0x0c51e…0c53c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007e, t01=0x0068}
0x0c53c…0c55c               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007e, t01=0x0086}
0x0c55c…0c58e               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x007e, t01=0x00a6}
0x0c58e…0c5ac               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007e, t01=0x00d8}
0x0c5ac…0c5cc               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007e, t01=0x00f6}
0x0c5cc…0c5d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x0116}
0x0c5d8…0c5ec               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x007e, t01=0x0122}
0x0c5ec…0c608               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x007e, t01=0x0136}
0x0c608…0c61c               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x007e, t01=0x0152}
0x0c61c…0c63a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007e, t01=0x0166}
0x0c63a…0c64e               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x007e, t01=0x0184}
0x0c64e…0c668               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x007f, t01=0x0008}
0x0c668…0c686               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x007f, t01=0x0022}
0x0c686…0c692               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007f, t01=0x0040}
0x0c692…0c6a6               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x007f, t01=0x004c}
0x0c6a6…0c6ca               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x007f, t01=0x0060}
0x0c6ca…0c6dc               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x007f, t01=0x0084}
0x0c6dc…0c6f0               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007f, t01=0x0096}
0x0c6f0…0c716               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x007f, t01=0x00aa}
0x0c716…0c728               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x007f, t01=0x00d0}
0x0c728…0c73c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007f, t01=0x00e2}
0x0c73c…0c762               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x007f, t01=0x00f6}
0x0c762…0c76e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007f, t01=0x011c}
0x0c76e…0c78e               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x007f, t01=0x0128}
0x0c78e…0c7a2               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x007f, t01=0x0148}
0x0c7a2…0c7c6               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x007f, t01=0x015c}
0x0c7c6…0c7da               Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x007f, t01=0x0180}
0x0c7da…0c7f6 (128, 0, 400) Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x0080, t01=0x0004}
0x0c7f6…0c81a               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x0080, t01=0x0020}
0x0c81a…0c824               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0080, t01=0x0044}
0x0c824…0c82e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x004e}
0x0c82e…0c838               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0058}
0x0c838…0c85a               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x0080, t01=0x0062}
0x0c85a…0c864               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0084}
0x0c864…0c86e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x008e}
0x0c86e…0c882               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0080, t01=0x0098}
0x0c882…0c896               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x0080, t01=0x00ac}
0x0c896…0c8be               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x0080, t01=0x00c0}
0x0c8be…0c8dc               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0080, t01=0x00e8}
0x0c8dc…0c8fe               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0080, t01=0x0106}
0x0c8fe…0c912               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0080, t01=0x0128}
0x0c912…0c930               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0080, t01=0x013c}
0x0c930…0c94a               Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x0080, t01=0x015a}
0x0c94a…0c95e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0080, t01=0x0174}
0x0c95e…0c97c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x0080, t01=0x0188}
0x0c97c…0c990               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x0081, t01=0x0016}
0x0c990…0c9ae               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x0081, t01=0x002a}
0x0c9ae…0c9c2               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0081, t01=0x0048}
0x0c9c2…0c9e0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0081, t01=0x005c}
0x0c9e0…0c9f8               Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x0081, t01=0x007a}
0x0c9f8…0ca16               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0081, t01=0x0092}
0x0ca16…0ca2a               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0081, t01=0x00b0}
0x0ca2a…0ca48               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0081, t01=0x00c4}
0x0ca48…0ca6a               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0081, t01=0x00e2}
0x0ca6a…0ca8c               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x0081, t01=0x0104}
0x0ca8c…0ca9e               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0081, t01=0x0126}
0x0ca9e…0cac6               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x0081, t01=0x0138}
0x0cac6…0cae6               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x0081, t01=0x0160}
0x0cae6…0cb08               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x0081, t01=0x0180}
0x0cb08…0cb2a               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0082, t01=0x0012}
0x0cb2a…0cb3c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x0082, t01=0x0034}
0x0cb3c…0cb5a               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x0082, t01=0x0046}
0x0cb5a…0cb6c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0082, t01=0x0064}
0x0cb6c…0cb8e               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x0082, t01=0x0076}
0x0cb8e…0cba0               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x0082, t01=0x0098}
0x0cba0…0cbb4               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x0082, t01=0x00aa}
0x0cbb4…0cbd4               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x0082, t01=0x00be}
0x0cbd4…0cbf8               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x0082, t01=0x00de}
0x0cbf8…0cc04               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x0102}
0x0cc04…0cc0e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0082, t01=0x010e}
0x0cc0e…0cc18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0118}
0x0cc18…0cc22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0122}
0x0cc22…0cc42               Head {h00=0x001c, h01=0x0050, text=»* TRANSMIT SYNC SEQUENCE«, t00=0x0082, t01=0x012c}
0x0cc42…0cc4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x014c}
0x0cc4c…0cc56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0156}
0x0cc56…0cc6a               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x0082, t01=0x0160}
0x0cc6a…0cc84               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0082, t01=0x0174}
0x0cc84…0ccb2               Head {h00=0x002a, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT IF NOT DONE«, t00=0x0082, t01=0x018e}
0x0ccb2…0ccd4               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN PERFORM SST «, t00=0x0083, t01=0x002c}
0x0ccd4…0ccf0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0083, t01=0x004e}
0x0ccf0…0cd1a               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x0083, t01=0x006a}
0x0cd1a…0cd30               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0083, t01=0x0094}
0x0cd30…0cd4c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0083, t01=0x00aa}
0x0cd4c…0cd68               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=1  SALCUZ «, t00=0x0083, t01=0x00c6}
0x0cd68…0cd82               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0083, t01=0x00e2}
0x0cd82…0cdb2               Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER SALCUZ«, t00=0x0083, t01=0x00fc}
0x0cdb2…0cdd0               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x0083, t01=0x012c}
0x0cdd0…0cdee               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x0083, t01=0x014a}
0x0cdee…0ce0c               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x0083, t01=0x0168}
0x0ce0c…0ce24               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0083, t01=0x0186}
0x0ce24…0ce4a               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0084, t01=0x000e}
0x0ce4a…0ce66               Head {h00=0x0018, h01=0x0050, text=»TRS010 EQU *  SALCUZ«, t00=0x0084, t01=0x0034}
0x0ce66…0ce84               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x0084, t01=0x0050}
0x0ce84…0ceba               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0084, t01=0x006e}
0x0ceba…0ced0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x00a4}
0x0ced0…0ceec               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0084, t01=0x00ba}
0x0ceec…0cf08               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=0  SALCUZ «, t00=0x0084, t01=0x00d6}
0x0cf08…0cf24               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x0084, t01=0x00f2}
0x0cf24…0cf44               Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,LCUUT  SALCUZ «, t00=0x0084, t01=0x010e}
0x0cf44…0cf62               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x0084, t01=0x012e}
0x0cf62…0cf80               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x0084, t01=0x014c}
0x0cf80…0cf9e               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x0084, t01=0x016a}
0x0cf9e…0cfb6               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0084, t01=0x0188}
0x0cfb6…0cfdc               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0085, t01=0x0010}
0x0cfdc…0cff0               Head {h00=0x0010, h01=0x0050, text=»TRS010 EQU *«, t00=0x0085, t01=0x0036}
0x0cff0…0d00c               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x0085, t01=0x004a}
0x0d00c…0d042               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0085, t01=0x0066}
0x0d042…0d058               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0085, t01=0x009c}
0x0d058…0d086               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x0085, t01=0x00b2}
0x0d086…0d09e               Head {h00=0x0014, h01=0x0050, text=» LDK A3,4 4 SYNS«, t00=0x0085, t01=0x00e0}
0x0d09e…0d0b8               Head {h00=0x0016, h01=0x0050, text=»TRS100 LDK A2,SYN «, t00=0x0085, t01=0x00f8}
0x0d0b8…0d0d6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SYN «, t00=0x0085, t01=0x0112}
0x0d0d6…0d0e8               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0085, t01=0x0130}
0x0d0e8…0d0fe               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x0085, t01=0x0142}
0x0d0fe…0d10e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0085, t01=0x0158}
0x0d10e…0d118               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0085, t01=0x0168}
0x0d118…0d122               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0172}
0x0d122…0d12c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x017c}
0x0d12c…0d14a               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x0085, t01=0x0186}
0x0d14a…0d154               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0014}
0x0d154…0d15e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x001e}
0x0d15e…0d172               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x0086, t01=0x0028}
0x0d172…0d186               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0086, t01=0x003c}
0x0d186…0d19c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0086, t01=0x0050}
0x0d19c…0d1bc               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0086, t01=0x0066}
0x0d1bc…0d1c8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x0086}
0x0d1c8…0d1d0               Head {h00=0x0004, h01=0x0050, t00=0x0086, t01=0x0092}
0x0d1d0…0d1e6               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0086, t01=0x009a}
0x0d1e6…0d206               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0086, t01=0x00b0}
0x0d206…0d212               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x00d0}
0x0d212…0d240               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0086, t01=0x00dc}
0x0d240…0d262               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x0086, t01=0x010a}
0x0d262…0d292               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x0086, t01=0x012c}
0x0d292…0d2a6               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0086, t01=0x015c}
0x0d2a6…0d2d2               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x0086, t01=0x0170}
0x0d2d2…0d2de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x000c}
0x0d2de…0d2f2               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0087, t01=0x0018}
0x0d2f2…0d304               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0087, t01=0x002c}
0x0d304…0d31a               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHLCI2«, t00=0x0087, t01=0x003e}
0x0d31a…0d338               Head {h00=0x001a, h01=0x0050, text=» CWK A2,SYN SKIP SYNS «, t00=0x0087, t01=0x0054}
0x0d338…0d34c               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x0087, t01=0x0072}
0x0d34c…0d372               Head {h00=0x0022, h01=0x0050, text=»IHLCI2 XRR A7,A2 CALCULATE LRC«, t00=0x0087, t01=0x0086}
0x0d372…0d37e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x00ac}
0x0d37e…0d392               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0087, t01=0x00b8}
0x0d392…0d3a4               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0087, t01=0x00cc}
0x0d3a4…0d3da               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME «, t00=0x0087, t01=0x00de}
0x0d3da…0d3f0               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x0087, t01=0x0114}
0x0d3f0…0d414               Head {h00=0x0020, h01=0x0050, text=» RF(E) READ SKIP EBCDIC SYN «, t00=0x0087, t01=0x012a}
0x0d414…0d428               Head {h00=0x0010, h01=0x0050, text=»IHLCI1 EQU *«, t00=0x0087, t01=0x014e}
0x0d428…0d44c               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x0087, t01=0x0162}
0x0d44c…0d478               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0087, t01=0x0186}
0x0d478…0d484               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x0022}
0x0d484…0d49a               Head {h00=0x0012, h01=0x0050, text=»IHIN10 RTN A5 «, t00=0x0088, t01=0x002e}
0x0d49a…0d4b6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0088, t01=0x0044}
0x0d4b6…0d4da               Head {h00=0x0020, h01=0x0050, text=»IHIN20 CF A5,SST PERFORM SST«, t00=0x0088, t01=0x0060}
0x0d4da…0d4ea               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0088, t01=0x0084}
0x0d4ea…0d500               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0088, t01=0x0094}
0x0d500…0d51c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0088, t01=0x00aa}
0x0d51c…0d544               Head {h00=0x0024, h01=0x0050, text=»IHIN20 RF SST PERFORM SST SALCUZ«, t00=0x0088, t01=0x00c6}
0x0d544…0d55a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0088, t01=0x00ee}
0x0d55a…0d564               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0088, t01=0x0104}
0x0d564…0d56e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x010e}
0x0d56e…0d578               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0118}
0x0d578…0d59a               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x0088, t01=0x0122}
0x0d59a…0d5a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0144}
0x0d5a4…0d5ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x014e}
0x0d5ae…0d5c2               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x0088, t01=0x0158}
0x0d5c2…0d5d6               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0088, t01=0x016c}
0x0d5d6…0d5ec               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0088, t01=0x0180}
0x0d5ec…0d60e               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0089, t01=0x0008}
0x0d60e…0d61a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x002a}
0x0d61a…0d622               Head {h00=0x0004, h01=0x0050, t00=0x0089, t01=0x0036}
0x0d622…0d638               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0089, t01=0x003e}
0x0d638…0d658               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0089, t01=0x0054}
0x0d658…0d664               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x0074}
0x0d664…0d692               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0089, t01=0x0080}
0x0d692…0d6a4               Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x0089, t01=0x00ae}
0x0d6a4…0d6ae               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0089, t01=0x00c0}
0x0d6ae…0d6b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00ca}
0x0d6b8…0d6c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00d4}
0x0d6c2…0d6ec               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x0089, t01=0x00de}
0x0d6ec…0d6f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0108}
0x0d6f6…0d722               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x0089, t01=0x0112}
0x0d722…0d754               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x0089, t01=0x013e}
0x0d754…0d784               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x0089, t01=0x0170}
0x0d784…0d7b4               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x008a, t01=0x0010}
0x0d7b4…0d7be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0040}
0x0d7be…0d7d6               Head {h00=0x0014, h01=0x0050, text=»SST SST A1,LCUIN«, t00=0x008a, t01=0x004a}
0x0d7d6…0d7f2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008a, t01=0x0062}
0x0d7f2…0d828               Head {h00=0x0032, h01=0x0050, text=» RF(NA) SST200 ALREADY INACTIVE SALCUZ  SALCUZ«, t00=0x008a, t01=0x007e}
0x0d828…0d83e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008a, t01=0x00b4}
0x0d83e…0d850               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x008a, t01=0x00ca}
0x0d850…0d864               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x008a, t01=0x00dc}
0x0d864…0d88e               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOG SST INFORMATION «, t00=0x008a, t01=0x00f0}
0x0d88e…0d89a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x011a}
0x0d89a…0d8b6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x008a, t01=0x0126}
0x0d8b6…0d8c8               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x008a, t01=0x0142}
0x0d8c8…0d8de               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x008a, t01=0x0154}
0x0d8de…0d8f4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008a, t01=0x016a}
0x0d8f4…0d910               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008a, t01=0x0180}
0x0d910…0d92a               Head {h00=0x0016, h01=0x0050, text=» ANK A2,6  SALCUZ «, t00=0x008b, t01=0x000c}
0x0d92a…0d948               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST100  SALCUZ «, t00=0x008b, t01=0x0026}
0x0d948…0d962               Head {h00=0x0016, h01=0x0050, text=» ANK A2,2  SALCUZ «, t00=0x008b, t01=0x0044}
0x0d962…0d98c               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SST050 THROUGH PUT SALCUZ «, t00=0x008b, t01=0x005e}
0x0d98c…0d9b6               Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 SET PARITY ERROR SALCUZ «, t00=0x008b, t01=0x0088}
0x0d9b6…0d9d0               Head {h00=0x0016, h01=0x0050, text=» RF SSTRET  SALCUZ«, t00=0x008b, t01=0x00b2}
0x0d9d0…0d9e6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008b, t01=0x00cc}
0x0d9e6…0da02               Head {h00=0x0018, h01=0x0050, text=»SST050 EQU *  SALCUZ«, t00=0x008b, t01=0x00e2}
0x0da02…0da22               Head {h00=0x001c, h01=0x0050, text=» CM XSTA TROUHHPUT ERROR«, t00=0x008b, t01=0x00fe}
0x0da22…0da36               Head {h00=0x0010, h01=0x0050, text=» LDKL A5,STB«, t00=0x008b, t01=0x011e}
0x0da36…0da4a               Head {h00=0x0010, h01=0x0050, text=» ABL BRM010 «, t00=0x008b, t01=0x0132}
0x0da4a…0da5e               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x008b, t01=0x0146}
0x0da5e…0da74               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTCU «, t00=0x008b, t01=0x015a}
0x0da74…0da90               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x008b, t01=0x0170}
0x0da90…0dabe               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x008b, t01=0x018c}
0x0dabe…0dace               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008c, t01=0x002a}
0x0dace…0dae4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008c, t01=0x003a}
0x0dae4…0db00               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008c, t01=0x0050}
0x0db00…0db1c               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/21  SALCUZ «, t00=0x008c, t01=0x006c}
0x0db1c…0db3a               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST200 LSALCUZ «, t00=0x008c, t01=0x0088}
0x0db3a…0db74               Head {h00=0x0036, h01=0x0050, text=» CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ«, t00=0x008c, t01=0x00a6}
0x0db74…0db94               Head {h00=0x001c, h01=0x0050, text=» DATA BRM RESTART SALCUZ«, t00=0x008c, t01=0x00e0}
0x0db94…0dbb4               Head {h00=0x001c, h01=0x0050, text=» DATA 2 WAIT TIME SALCUZ«, t00=0x008c, t01=0x0100}
0x0dbb4…0dbcc               Head {h00=0x0014, h01=0x0050, text=» RF READ  SALCUZ«, t00=0x008c, t01=0x0120}
0x0dbcc…0dbd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0138}
0x0dbd6…0dbf6               Head {h00=0x001c, h01=0x0050, text=»SST200 LDK A1,0  SALCUZ «, t00=0x008c, t01=0x0142}
0x0dbf6…0dc16               Head {h00=0x001c, h01=0x0050, text=»SSTRET ADK A5,4  SALCUZ «, t00=0x008c, t01=0x0162}
0x0dc16…0dc36               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 SET CR SALCUZ«, t00=0x008c, t01=0x0182}
0x0dc36…0dc54               Head {h00=0x001a, h01=0x0050, text=» ABR* A5 RETURN SALCUZ«, t00=0x008d, t01=0x0012}
0x0dc54…0dc6a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008d, t01=0x0030}
0x0dc6a…0dc74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0046}
0x0dc74…0dc7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0050}
0x0dc7e…0dc92               Head {h00=0x0010, h01=0x0050, text=»* HALT INPUT«, t00=0x008d, t01=0x005a}
0x0dc92…0dc9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x006e}
0x0dc9c…0dca6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0078}
0x0dca6…0dcc6               Head {h00=0x001c, h01=0x0050, text=»HALTIN LDK A1,0  SALCUZ «, t00=0x008d, t01=0x0082}
0x0dcc6…0dcde               Head {h00=0x0014, h01=0x0050, text=» CIO A1,0,LCUIN «, t00=0x008d, t01=0x00a2}
0x0dcde…0dcfa               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x008d, t01=0x00ba}
0x0dcfa…0dd32               Head {h00=0x0034, h01=0x0050, text=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK«, t00=0x008d, t01=0x00d6}
0x0dd32…0dd48               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008d, t01=0x010e}
0x0dd48…0dd64               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008d, t01=0x0124}
0x0dd64…0dd92               Head {h00=0x002a, h01=0x0050, text=» RF READ WAIT FOR SST INTERRUPT SALCUZ«, t00=0x008d, t01=0x0140}
0x0dd92…0dda8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008d, t01=0x016e}
0x0dda8…0ddb2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x008d, t01=0x0184}
0x0ddb2…0ddbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x018e}
0x0ddbc…0ddc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0008}
0x0ddc6…0ddf6               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x008e, t01=0x0012}
0x0ddf6…0de00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0042}
0x0de00…0de0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x004c}
0x0de0a…0de1e               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x008e, t01=0x0056}
0x0de1e…0de32               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008e, t01=0x006a}
0x0de32…0de46               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x008e, t01=0x007e}
0x0de46…0de5a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x008e, t01=0x0092}
0x0de5a…0de8e               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x008e, t01=0x00a6}
0x0de8e…0debc               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x008e, t01=0x00da}
0x0debc…0dec8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x0108}
0x0dec8…0dedc               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x008e, t01=0x0114}
0x0dedc…0df02               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x008e, t01=0x0128}
0x0df02…0df18               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x008e, t01=0x014e}
0x0df18…0df3a               Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x008e, t01=0x0164}
0x0df3a…0df4e               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x008e, t01=0x0186}
0x0df4e…0df76               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x008f, t01=0x000a}
0x0df76…0df82               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x0032}
0x0df82…0df96               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008f, t01=0x003e}
0x0df96…0dfc0               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x008f, t01=0x0052}
0x0dfc0…0dfcc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x007c}
0x0dfcc…0dfe0               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x008f, t01=0x0088}
0x0dfe0…0e00a               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x008f, t01=0x009c}
0x0e00a…0e016               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x00c6}
0x0e016…0e020               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x00d2}
0x0e020…0e03a               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x008f, t01=0x00dc}
0x0e03a…0e04c               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x008f, t01=0x00f6}
0x0e04c…0e056               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x008f, t01=0x0108}
0x0e056…0e060               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0112}
0x0e060…0e06a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x011c}
0x0e06a…0e07c               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x008f, t01=0x0126}
0x0e07c…0e086               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0138}
0x0e086…0e0a6               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x008f, t01=0x0142}
0x0e0a6…0e0b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0162}
0x0e0b0…0e0ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x016c}
0x0e0ba…0e0dc               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x008f, t01=0x0176}
0x0e0dc…0e0f6               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x0090, t01=0x0008}
0x0e0f6…0e108               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0090, t01=0x0022}
0x0e108…0e11c               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x0090, t01=0x0034}
0x0e11c…0e134               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x0090, t01=0x0048}
0x0e134…0e14a               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x0090, t01=0x0060}
0x0e14a…0e164               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x0090, t01=0x0076}
0x0e164…0e178               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0090, t01=0x0090}
0x0e178…0e18a               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x0090, t01=0x00a4}
0x0e18a…0e196               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0090, t01=0x00b6}
0x0e196…0e1b8               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x0090, t01=0x00c2}
0x0e1b8…0e1d0               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x0090, t01=0x00e4}
0x0e1d0…0e1dc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0090, t01=0x00fc}
0x0e1dc…0e1e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0108}
0x0e1e6…0e1f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0112}
0x0e1f0…0e1fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x011c}
0x0e1fa…0e20c               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x0090, t01=0x0126}
0x0e20c…0e216               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0138}
0x0e216…0e248               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x0090, t01=0x0142}
0x0e248…0e252               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0174}
0x0e252…0e25c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x017e}
0x0e25c…0e274               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x0090, t01=0x0188}
0x0e274…0e296               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0091, t01=0x0010}
0x0e296…0e2a8               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0091, t01=0x0032}
0x0e2a8…0e2be               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x0091, t01=0x0044}
0x0e2be…0e2d2               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x0091, t01=0x005a}
0x0e2d2…0e2e8               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x0091, t01=0x006e}
0x0e2e8…0e2fc               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0091, t01=0x0084}
0x0e2fc…0e30e               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x0091, t01=0x0098}
0x0e30e…0e326               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x0091, t01=0x00aa}
0x0e326…0e33a               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0091, t01=0x00c2}
0x0e33a…0e346               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x00d6}
0x0e346…0e368               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x0091, t01=0x00e2}
0x0e368…0e37c               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x0091, t01=0x0104}
0x0e37c…0e388               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x0118}
0x0e388…0e39a               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0091, t01=0x0124}
0x0e39a…0e3ae               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x0091, t01=0x0136}
0x0e3ae…0e3c2               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x0091, t01=0x014a}
0x0e3c2…0e3d2               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0091, t01=0x015e}
0x0e3d2…0e3dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x016e}
0x0e3dc…0e3e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0178}
0x0e3e6…0e3f0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0091, t01=0x0182}
0x0e3f0…0e3fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x018c}
0x0e3fa…0e43a               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x0092, t01=0x0008}
0x0e43a…0e444               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0048}
0x0e444…0e46c               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x0092, t01=0x0052}
0x0e46c…0e48c               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x0092, t01=0x007a}
0x0e48c…0e4a2               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x0092, t01=0x009a}
0x0e4a2…0e4c8               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x0092, t01=0x00b0}
0x0e4c8…0e4d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x00d6}
0x0e4d2…0e518               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x0092, t01=0x00e0}
0x0e518…0e546               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x0092, t01=0x0126}
0x0e546…0e576               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x0092, t01=0x0154}
0x0e576…0e580               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0184}
0x0e580…0e5b2               Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x0092, t01=0x018e}
0x0e5b2…0e5bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0030}
0x0e5bc…0e5c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x003a}
0x0e5c6…0e5da               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x0093, t01=0x0044}
0x0e5da…0e5ee               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0093, t01=0x0058}
0x0e5ee…0e602               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0093, t01=0x006c}
0x0e602…0e60e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x0080}
0x0e60e…0e620               Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x0093, t01=0x008c}
0x0e620…0e634               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0093, t01=0x009e}
0x0e634…0e648               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0093, t01=0x00b2}
0x0e648…0e654               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x00c6}
0x0e654…0e67e               Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x0093, t01=0x00d2}
0x0e67e…0e6ac               Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x0093, t01=0x00fc}
0x0e6ac…0e6c4               Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x0093, t01=0x012a}
0x0e6c4…0e6e4               Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x0093, t01=0x0142}
0x0e6e4…0e706               Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x0093, t01=0x0162}
0x0e706…0e732               Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x0093, t01=0x0184}
0x0e732…0e756               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x0094, t01=0x0020}
0x0e756…0e76a               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0094, t01=0x0044}
0x0e76a…0e792               Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x0094, t01=0x0058}
0x0e792…0e7c0               Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x0094, t01=0x0080}
0x0e7c0…0e7cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x00ae}
0x0e7cc…0e7e0               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0094, t01=0x00ba}
0x0e7e0…0e812               Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x0094, t01=0x00ce}
0x0e812…0e81e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x0100}
0x0e81e…0e848               Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x0094, t01=0x010c}
0x0e848…0e860               Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x0094, t01=0x0136}
0x0e860…0e876               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x0094, t01=0x014e}
0x0e876…0e886               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0094, t01=0x0164}
0x0e886…0e890               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0094, t01=0x0174}
0x0e890…0e89a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x017e}
0x0e89a…0e8a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0188}
0x0e8a4…0e8c0 (149, 0, 400) Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x0095, t01=0x0004}
0x0e8c0…0e8ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0020}
0x0e8ca…0e8d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x002a}
0x0e8d4…0e8e8               Head {h00=0x0010, h01=0x0050, text=»DC15ON EQU *«, t00=0x0095, t01=0x0034}
0x0e8e8…0e8fe               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0095, t01=0x0048}
0x0e8fe…0e91e               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0095, t01=0x005e}
0x0e91e…0e92a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x007e}
0x0e92a…0e932               Head {h00=0x0004, h01=0x0050, t00=0x0095, t01=0x008a}
0x0e932…0e948               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0095, t01=0x0092}
0x0e948…0e968               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0095, t01=0x00a8}
0x0e968…0e974               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x00c8}
0x0e974…0e988               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0095, t01=0x00d4}
0x0e988…0e9a8               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x0095, t01=0x00e8}
0x0e9a8…0e9bc               Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x0095, t01=0x0108}
0x0e9bc…0e9ee               Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x0095, t01=0x011c}
0x0e9ee…0ea06               Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x0095, t01=0x014e}
0x0ea06…0ea1a               Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x0095, t01=0x0166}
0x0ea1a…0ea3c               Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x0095, t01=0x017a}
0x0ea3c…0ea60               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x0096, t01=0x000c}
0x0ea60…0ea94               Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x0096, t01=0x0030}
0x0ea94…0eac0               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x0096, t01=0x0064}
0x0eac0…0ead2               Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x0096, t01=0x0090}
0x0ead2…0eae6               Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x0096, t01=0x00a2}
0x0eae6…0eaf2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0096, t01=0x00b6}
0x0eaf2…0eb06               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0096, t01=0x00c2}
0x0eb06…0eb1c               Head {h00=0x0012, h01=0x0050, text=» ORS A2,DCONOF«, t00=0x0096, t01=0x00d6}
0x0eb1c…0eb32               Head {h00=0x0012, h01=0x0050, text=» CF A15,CKMESS«, t00=0x0096, t01=0x00ec}
0x0eb32…0eb5e               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x0096, t01=0x0102}
0x0eb5e…0eb84               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x0096, t01=0x012e}
0x0eb84…0ebb2               Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x0096, t01=0x0154}
0x0ebb2…0ebc8               Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x0096, t01=0x0182}
0x0ebc8…0ebd2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0097, t01=0x0008}
0x0ebd2…0ebdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0012}
0x0ebdc…0ebf4               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0097, t01=0x001c}
0x0ebf4…0ebfe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0034}
0x0ebfe…0ec2a               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0097, t01=0x003e}
0x0ec2a…0ec3e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0097, t01=0x006a}
0x0ec3e…0ec6a               Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x0097, t01=0x007e}
0x0ec6a…0ec98               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0097, t01=0x00aa}
0x0ec98…0ecc0               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0097, t01=0x00d8}
0x0ecc0…0ecd2               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0097, t01=0x0100}
0x0ecd2…0ecdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0112}
0x0ecdc…0ed14               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x0097, t01=0x011c}
0x0ed14…0ed1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0154}
0x0ed1e…0ed46               Head {h00=0x0024, h01=0x0050, text=»CPTIM CM DCONOF INDICATE POLLING«, t00=0x0097, t01=0x015e}
0x0ed46…0ed5e               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x0097, t01=0x0186}
0x0ed5e…0ed82               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x0098, t01=0x000e}
0x0ed82…0edb0               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0098, t01=0x0032}
0x0edb0…0edc0               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0098, t01=0x0060}
0x0edc0…0edca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0070}
0x0edca…0ede4               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x0098, t01=0x007a}
0x0ede4…0edee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0094}
0x0edee…0ee16               Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x0098, t01=0x009e}
0x0ee16…0ee30               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x0098, t01=0x00c6}
0x0ee30…0ee5a               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x0098, t01=0x00e0}
0x0ee5a…0ee6e               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0098, t01=0x010a}
0x0ee6e…0ee80               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0098, t01=0x011e}
0x0ee80…0ee8a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0098, t01=0x0130}
0x0ee8a…0ee94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x013a}
0x0ee94…0eeb4               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x0098, t01=0x0144}
0x0eeb4…0eebe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0164}
0x0eebe…0eed2               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x0098, t01=0x016e}
0x0eed2…0eefa               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x0098, t01=0x0182}
0x0eefa…0ef10               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0099, t01=0x001a}
0x0ef10…0ef2c               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x0099, t01=0x0030}
0x0ef2c…0ef54               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x0099, t01=0x004c}
0x0ef54…0ef64               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0099, t01=0x0074}
0x0ef64…0ef6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0084}
0x0ef6e…0ef8a               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x0099, t01=0x008e}
0x0ef8a…0ef94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00aa}
0x0ef94…0efac               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x0099, t01=0x00b4}
0x0efac…0efc8               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x0099, t01=0x00cc}
0x0efc8…0efec               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x0099, t01=0x00e8}
0x0efec…0f01c               Head {h00=0x002c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT IF OPEN SALCUZ «, t00=0x0099, t01=0x010c}
0x0f01c…0f030               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0099, t01=0x013c}
0x0f030…0f056               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x0099, t01=0x0150}
0x0f056…0f074               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0099, t01=0x0176}
0x0f074…0f09e (154, 0, 400) Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x009a, t01=0x0004}
0x0f09e…0f0b4               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x009a, t01=0x002e}
0x0f0b4…0f0be               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009a, t01=0x0044}
0x0f0be…0f0c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x004e}
0x0f0c8…0f0e6               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x009a, t01=0x0058}
0x0f0e6…0f0f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0076}
0x0f0f0…0f11c               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x009a, t01=0x0080}
0x0f11c…0f13c               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x009a, t01=0x00ac}
0x0f13c…0f15a               Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x009a, t01=0x00cc}
0x0f15a…0f16c               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x009a, t01=0x00ea}
0x0f16c…0f180               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x009a, t01=0x00fc}
0x0f180…0f18a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009a, t01=0x0110}
0x0f18a…0f19e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x009a, t01=0x011a}
0x0f19e…0f1a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x012e}
0x0f1a8…0f1b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0138}
0x0f1b2…0f1ce               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x009a, t01=0x0142}
0x0f1ce…0f1d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x015e}
0x0f1d8…0f1f0               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x009a, t01=0x0168}
0x0f1f0…0f20e               Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x009a, t01=0x0180}
0x0f20e…0f218               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x000e}
0x0f218…0f222               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0018}
0x0f222…0f236               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x009b, t01=0x0022}
0x0f236…0f24c               Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x009b, t01=0x0036}
0x0f24c…0f264               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x009b, t01=0x004c}
0x0f264…0f27c               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x009b, t01=0x0064}
0x0f27c…0f28e               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x009b, t01=0x007c}
0x0f28e…0f2a6               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x009b, t01=0x008e}
0x0f2a6…0f2b8               Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x009b, t01=0x00a6}
0x0f2b8…0f2ca               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x009b, t01=0x00b8}
0x0f2ca…0f2dc               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x009b, t01=0x00ca}
0x0f2dc…0f2ee               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x009b, t01=0x00dc}
0x0f2ee…0f304               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x009b, t01=0x00ee}
0x0f304…0f31a               Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x009b, t01=0x0104}
0x0f31a…0f332               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x009b, t01=0x011a}
0x0f332…0f348               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x009b, t01=0x0132}
0x0f348…0f35e               Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x009b, t01=0x0148}
0x0f35e…0f376               Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x009b, t01=0x015e}
0x0f376…0f38e               Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x009b, t01=0x0176}
0x0f38e…0f39e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x009b, t01=0x018e}
0x0f39e…0f3b2               Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x009c, t01=0x000e}
0x0f3b2…0f3bc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009c, t01=0x0022}
0x0f3bc…0f3c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x002c}
0x0f3c6…0f3d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0036}
0x0f3d0…0f3fc               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x009c, t01=0x0040}
0x0f3fc…0f41c               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x009c, t01=0x006c}
0x0f41c…0f426               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x008c}
0x0f426…0f430               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0096}
0x0f430…0f458               Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x009c, t01=0x00a0}
0x0f458…0f480               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x009c, t01=0x00c8}
0x0f480…0f4a0               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x009c, t01=0x00f0}
0x0f4a0…0f4c0               Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x009c, t01=0x0110}
0x0f4c0…0f4e0               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x009c, t01=0x0130}
0x0f4e0…0f50c               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x009c, t01=0x0150}
0x0f50c…0f52c               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x009c, t01=0x017c}
0x0f52c…0f53e               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x009d, t01=0x000c}
0x0f53e…0f550               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x009d, t01=0x001e}
0x0f550…0f562               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x009d, t01=0x0030}
0x0f562…0f594               Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x009d, t01=0x0042}
0x0f594…0f5a4               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009d, t01=0x0074}
0x0f5a4…0f5b0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009d, t01=0x0084}
0x0f5b0…0f5c4               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x009d, t01=0x0090}
0x0f5c4…0f5ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00a4}
0x0f5ce…0f5f8               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x009d, t01=0x00ae}
0x0f5f8…0f61e               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x009d, t01=0x00d8}
0x0f61e…0f628               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00fe}
0x0f628…0f63e               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x009d, t01=0x0108}
0x0f63e…0f652               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x009d, t01=0x011e}
0x0f652…0f664               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x009d, t01=0x0132}
0x0f664…0f676               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x009d, t01=0x0144}
0x0f676…0f68c               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x009d, t01=0x0156}
0x0f68c…0f6a0               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x009d, t01=0x016c}
0x0f6a0…0f6b4               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x009d, t01=0x0180}
0x0f6b4…0f6c6 (158, 0, 400) Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x009e, t01=0x0004}
0x0f6c6…0f6d6               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009e, t01=0x0016}
0x0f6d6…0f6de               Head {h00=0x0004, h01=0x0050, t00=0x009e, t01=0x0026}
0x0f6de…0f6ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009e, t01=0x002e}
0x0f6ea…0f6f4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009e, t01=0x003a}
0x0f6f4…0f6fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0044}
0x0f6fe…0f708               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x004e}
0x0f708…0f72e               Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x009e, t01=0x0058}
0x0f72e…0f738               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x007e}
0x0f738…0f742               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0088}
0x0f742…0f762               Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x009e, t01=0x0092}
0x0f762…0f782               Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x009e, t01=0x00b2}
0x0f782…0f79c               Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x009e, t01=0x00d2}
0x0f79c…0f7b8               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x009e, t01=0x00ec}
0x0f7b8…0f7ce               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x009e, t01=0x0108}
0x0f7ce…0f7fc               Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x009e, t01=0x011e}
0x0f7fc…0f818               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x009e, t01=0x014c}
0x0f818…0f840               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x009e, t01=0x0168}
0x0f840…0f85a               Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x009e, t01=0x0190}
0x0f85a…0f864               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x001a}
0x0f864…0f87a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x009f, t01=0x0024}
0x0f87a…0f89a               Head {h00=0x001c, h01=0x0050, text=» DATA 0 USER ECB ADDRESS«, t00=0x009f, t01=0x003a}
0x0f89a…0f8be               Head {h00=0x0020, h01=0x0050, text=» DATA DC:ECB MMU ECB ADDRESS«, t00=0x009f, t01=0x005a}
0x0f8be…0f8ca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x007e}
0x0f8ca…0f8d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x008a}
0x0f8d4…0f8f2               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x009f, t01=0x0094}
0x0f8f2…0f91e               Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x009f, t01=0x00b2}
0x0f91e…0f950               Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x009f, t01=0x00de}
0x0f950…0f976               Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x009f, t01=0x0110}
0x0f976…0f9a6               Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x009f, t01=0x0136}
0x0f9a6…0f9c4               Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x009f, t01=0x0166}
0x0f9c4…0f9ea               Head {h00=0x0022, h01=0x0050, text=» DATA 0 REQUEST TIMEOUT VALUE «, t00=0x009f, t01=0x0184}
0x0f9ea…0fa10               Head {h00=0x0022, h01=0x0050, text=» DATA 0 EXTRA DEVICE INFO DK5 «, t00=0x00a0, t01=0x001a}
0x0fa10…0fa1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0040}
0x0fa1a…0fa30               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x00a0, t01=0x004a}
0x0fa30…0fa4c               Head {h00=0x0018, h01=0x0050, text=»DC:ECB EQU * MMU ECB«, t00=0x00a0, t01=0x0060}
0x0fa4c…0fa66               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x00a0, t01=0x007c}
0x0fa66…0fa72               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a0, t01=0x0096}
0x0fa72…0fa7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x00a2}
0x0fa7c…0fa86               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a0, t01=0x00ac}
0x0fa86…0fa90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x00b6}
0x0fa90…0fa9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x00c0}
0x0fa9a…0faba               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x00a0, t01=0x00ca}
0x0faba…0fac4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x00ea}
0x0fac4…0fae4               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x00a0, t01=0x00f4}
0x0fae4…0faee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0114}
0x0faee…0fb02               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x00a0, t01=0x011e}
0x0fb02…0fb26               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x00a0, t01=0x0132}
0x0fb26…0fb40               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x00a0, t01=0x0156}
0x0fb40…0fb56               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x00a0, t01=0x0170}
0x0fb56…0fb6c               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a0, t01=0x0186}
0x0fb6c…0fb80               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a1, t01=0x000c}
0x0fb80…0fb96               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x00a1, t01=0x0020}
0x0fb96…0fbac               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a1, t01=0x0036}
0x0fbac…0fbc0               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a1, t01=0x004c}
0x0fbc0…0fbd6               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x00a1, t01=0x0060}
0x0fbd6…0fbec               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a1, t01=0x0076}
0x0fbec…0fc00               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a1, t01=0x008c}
0x0fc00…0fc0c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x00a0}
0x0fc0c…0fc26               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x00a1, t01=0x00ac}
0x0fc26…0fc3c               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a1, t01=0x00c6}
0x0fc3c…0fc50               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a1, t01=0x00dc}
0x0fc50…0fc62               Head {h00=0x000e, h01=0x0050, text=» XIF   DK3«, t00=0x00a1, t01=0x00f0}
0x0fc62…0fc7e               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x00a1, t01=0x0102}
0x0fc7e…0fc92               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a1, t01=0x011e}
0x0fc92…0fc9a               Head {h00=0x0004, h01=0x0050, t00=0x00a1, t01=0x0132}
0x0fc9a…0fcb0               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x00a1, t01=0x013a}
0x0fcb0…0fcda               Head {h00=0x0026, h01=0x0050, text=»MMUBUF RES TBUFL+1 MMU WORK BUFFER«, t00=0x00a1, t01=0x0150}
0x0fcda…0fce6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x017a}
0x0fce6…0fcf0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a1, t01=0x0186}
0x0fcf0…0fcfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0190}
0x0fcfa…0fd04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x000a}
0x0fd04…0fd28               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x00a2, t01=0x0014}
0x0fd28…0fd32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0038}
0x0fd32…0fd3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0042}
0x0fd3c…0fd50               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00a2, t01=0x004c}
0x0fd50…0fd6a               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x00a2, t01=0x0060}
0x0fd6a…0fd80               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x00a2, t01=0x007a}
0x0fd80…0fd92               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a2, t01=0x0090}
0x0fd92…0fdac               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x00a2, t01=0x00a2}
0x0fdac…0fdc2               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x00a2, t01=0x00bc}
0x0fdc2…0fdd4               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a2, t01=0x00d2}
0x0fdd4…0fdec               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x00a2, t01=0x00e4}
0x0fdec…0fe02               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x00a2, t01=0x00fc}
0x0fe02…0fe16               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x00a2, t01=0x0112}
0x0fe16…0fe30               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x00a2, t01=0x0126}
0x0fe30…0fe46               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x00a2, t01=0x0140}
0x0fe46…0fe58               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x00a2, t01=0x0156}
0x0fe58…0fe6a               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x00a2, t01=0x0168}
0x0fe6a…0fe80               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x00a2, t01=0x017a}
0x0fe80…0fe96               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x00a2, t01=0x0190}
0x0fe96…0feae               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x00a3, t01=0x0016}
0x0feae…0feca               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x00a3, t01=0x002e}
0x0feca…0fede               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x00a3, t01=0x004a}
0x0fede…0fef2               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x00a3, t01=0x005e}
0x0fef2…0ff08               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x00a3, t01=0x0072}
0x0ff08…0ff12               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a3, t01=0x0088}
0x0ff12…0ff1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0092}
0x0ff1c…0ff26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x009c}
0x0ff26…0ff40               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x00a3, t01=0x00a6}
0x0ff40…0ff54               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x00a3, t01=0x00c0}
0x0ff54…0ff64               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x00a3, t01=0x00d4}
0x0ff64…0ff7a               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x00a3, t01=0x00e4}
0x0ff7a…0ff8e               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x00a3, t01=0x00fa}
0x0ff8e…0ffa2               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x00a3, t01=0x010e}
0x0ffa2…0ffae               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a3, t01=0x0122}
0x0ffae…0ffb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x012e}
0x0ffb8…0ffc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0138}
0x0ffc2…0ffcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0142}
0x0ffcc…0ffe0               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00a3, t01=0x014c}
0x0ffe0…0ffea               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a3, t01=0x0160}
0x0ffea…1002a               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x00a3, t01=0x016a}
0x1002a…10034               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x001a}
0x10034…1004e               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x00a4, t01=0x0024}
0x1004e…10058               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x003e}
0x10058…10096               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x00a4, t01=0x0048}
0x10096…100a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x0086}
0x100a0…100e2               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x00a4, t01=0x0090}
0x100e2…100ea               Head {h00=0x0004, h01=0x0050, t00=0x00a4, t01=0x00d2}
0x100ea…100fe               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x00a4, t01=0x00da}
0x100fe…10124               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x00a4, t01=0x00ee}
0x10124…10136               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x00a4, t01=0x0114}
0x10136…1014c               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a4, t01=0x0126}
0x1014c…10176               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x00a4, t01=0x013c}
0x10176…1019c               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x00a4, t01=0x0166}
0x1019c…101a4               Head {h00=0x0004, h01=0x0050, t00=0x00a4, t01=0x018c}
0x101a4…101b6 (165, 0, 398) Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x00a5, t01=0x0004}
0x101b6…101cc               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a5, t01=0x0016}
0x101cc…101f8               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x00a5, t01=0x002c}
0x101f8…10220               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x00a5, t01=0x0058}
0x10220…10236               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x00a5, t01=0x0080}
0x10236…10240               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0096}
0x10240…1024a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x00a0}
0x1024a…10254               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x00aa}
0x10254…1025e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a5, t01=0x00b4}
0x1025e…10266               Head {h00=0x0004, h01=0x0050, t00=0x00a5, t01=0x00be}
0x10266…1028a               Head {h00=0x0020, h01=0x0050, text=»*     SCANDINAVIAN ALPHABET «, t00=0x00a5, t01=0x00c6}
0x1028a…10298               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x00a5, t01=0x00ea}
0x10298…102ac               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x00a5, t01=0x00f8}
0x102ac…102da               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x00a5, t01=0x010c}
0x102da…10308               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/232E,/3C28,/2B21 /08-/0F «, t00=0x00a5, t01=0x013a}
0x10308…10336               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x00a5, t01=0x0168}
0x10336…10364               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/245D,/2A29,/3B5E /18-/1F «, t00=0x00a6, t01=0x0008}
0x10364…10392               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x00a6, t01=0x0036}
0x10392…103c0               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/402C,/255F,/3E3F /28-/2F «, t00=0x00a6, t01=0x0064}
0x103c0…103ec               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x00a6, t01=0x0092}
0x103ec…10418               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A5B,/5C27,/3D22 /38-3F«, t00=0x00a6, t01=0x00be}
0x10418…10426               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x00a6, t01=0x00ea}
0x10426…10432               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a6, t01=0x00f8}
0x10432…1043c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a6, t01=0x0104}
0x1043c…10444               Head {h00=0x0004, h01=0x0050, t00=0x00a6, t01=0x010e}
0x10444…10460               Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x00a6, t01=0x0116}
0x10460…1047a               Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x00a6, t01=0x0132}
0x1047a…104a0               Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x00a6, t01=0x014c}
0x104a0…104ce               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00a6, t01=0x0172}
0x104ce…104fc               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00a7, t01=0x0010}
0x104fc…10510               Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x00a7, t01=0x003e}
0x10510…1051a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0052}
0x1051a…10524               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x005c}
0x10524…10530               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00a7, t01=0x0066}
0x10530…10534               Head {h00=0x4004, h01=0x0000}
0x10534…10538               00 a7 00 72                                                                                                                                                                                                                                       ┆   r┆
0x10538…10540 (168, 1, 8)   20 04 00 00 00 a8 00 04                                                                                                                                                                                                                           ┆        ┆
0x10540…10590 (169, 0, 400) 5c 41 31 34 00 10 01 8c 00 12 00 50 2a 20 20 20 20 20 20 20 20 45 4a 45 43 54 00 11 00 0c 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆ A14       P*        EJECT     D P**********************************************┆
0x10590…105e0               2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 11 00 22 00 06 00 50 2a 20 00 11 00 6a 00 14 00 50 2a 5c 49 4e 50 55 54 20 46 52 4f 4d 20 44 43 20 00 11 00 74 00 06 00 50 2a 20 00 11 00 8c 00 38 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆******************   "   P*    j   P* INPUT FROM DC    t   P*      8 P**********┆
0x105e0…10630               2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 11 00 96 00 06 00 50 2a 20 00 11 00 d2 00 10 00 50 44 43 49 4e 50 5c 45 51 55 5c 2a 20 00 11 00 dc 00 28 00 50   ┆******************************************       P*        PDCINP EQU *      ( P┆
0x10630…10680               5c 43 46 5c 41 31 34 2c 49 43 41 42 4f 52 5c 41 42 4f 52 54 20 49 4e 54 45 52 54 41 53 4b 20 52 45 41 44 20 00 11 00 f0 00 0e 00 50 5c 4c 44 52 5c 41 37 2c 41 37 00 11 01 1c 00 20 00 50 5c 52 46 28 5a 29 5c 44 43 49 4e 31 30 5c 4e 4f 54 20   ┆ CF A14,ICABOR ABORT INTERTASK READ        P LDR A7,A7       P RF(Z) DCIN10 NOT ┆
0x10680…106d0               43 4f 4d 50 4c 45 54 45 44 20 00 11 01 2e 00 1e 00 50 5c 49 4d 5c 49 43 57 4f 52 4b 2c 54 43 41 42 41 53 5c 53 45 54 20 46 4c 41 47 00 11 01 52 00 2c 00 50 5c 52 46 5c 49 43 52 49 4e 50 5c 54 41 4b 45 20 43 41 52 45 20 4f 46 20 49 4e 54 45   ┆COMPLETED    .   P IM ICWORK,TCABAS SET FLAG   R , P RF ICRINP TAKE CARE OF INTE┆
0x106d0…10720 (170, 0, 398) 52 54 41 53 4b 20 49 4e 50 55 54 20 00 11 01 74 00 2e 00 50 5c 5c 5c 4f 52 20 42 55 46 46 45 52 20 57 49 4c 4c 20 42 45 20 44 45 53 54 52 4f 59 45 44 20 49 4e 20 27 55 50 44 41 54 45 27 00 12 00 14 00 10 00 50 44 43 49 4e 31 30 5c 45 51 55   ┆RTASK INPUT    t . P   OR BUFFER WILL BE DESTROYED IN 'UPDATE'       PDCIN10 EQU┆
0x10720…10770               5c 2a 00 12 00 46 00 26 00 50 5c 43 46 5c 41 31 34 2c 47 54 52 42 55 46 5c 47 45 54 20 52 45 43 45 49 56 45 20 42 55 46 46 45 52 20 00 12 00 5a 00 18 00 50 5c 4c 44 5c 41 38 2c 45 43 42 44 43 43 2c 54 43 41 42 41 53 00 12 00 84 00 20 00 50   ┆ *   F & P CF A14,GTRBUF GET RECEIVE BUFFER    Z   P LD A8,ECBDCC,TCABAS       P┆
0x10770…107c0               5c 43 46 5c 41 31 34 2c 44 43 47 45 54 4d 5c 52 45 41 44 20 4d 45 53 53 41 47 45 20 00 12 00 a0 00 10 00 50 5c 49 46 46 5c 44 43 4c 49 4e 3d 32 00 12 00 c4 00 1a 00 50 5c 43 4d 5c 45 43 42 42 4c 4b 2b 44 43 31 2c 54 43 41 42 41 53 20 00 12   ┆ CF A14,DCGETM READ MESSAGE        P IFF DCLIN=2       P CM ECBBLK+DC1,TCABAS   ┆
0x107c0…10810               00 d8 00 08 00 50 5c 58 49 46 00 12 00 f6 00 10 00 50 5c 49 46 54 5c 44 43 4c 49 4e 3d 32 00 12 01 02 00 1c 00 50 5c 43 57 5c 41 38 2c 45 43 42 42 4c 4b 2b 44 43 32 2c 54 43 41 42 41 53 00 12 01 16 00 18 00 50 5c 52 46 28 45 29 5c 44 43 49   ┆     P XIF       P IFT DCLIN=2       P CW A8,ECBBLK+DC2,TCABAS       P RF(E) DCI┆
0x10810…1085e               4e 32 30 5c 4d 46 20 23 20 32 00 12 01 36 00 1a 00 50 5c 43 4d 5c 45 43 42 42 4c 4b 2b 44 43 31 2c 54 43 41 42 41 53 20 00 12 01 52 00 0e 00 50 5c 52 46 5c 44 43 49 4e 33 30 00 12 01 70 00 10 00 50 44 43 49 4e 32 30 5c 45 51 55 5c 2a         ┆N20 MF # 2   6   P CM ECBBLK+DC1,TCABAS    R   P RF DCIN30   p   PDCIN20 EQU *┆
0x1085e…108ae (171, 0, 400) 00 12 01 82 00 1a 00 50 5c 43 4d 5c 45 43 42 42 4c 4b 2b 44 43 32 2c 54 43 41 42 41 53 20 00 13 00 08 00 08 00 50 5c 58 49 46 00 13 00 26 00 10 00 50 44 43 49 4e 33 30 5c 45 51 55 5c 2a 00 13 00 32 00 24 00 50 5c 4c 44 5c 41 31 2c 45 43 42   ┆       P CM ECBBLK+DC2,TCABAS        P XIF   &   PDCIN30 EQU *   2 $ P LD A1,ECB┆
0x108ae…108fe               45 4c 2c 41 38 5c 45 46 46 45 43 54 49 56 45 20 4c 45 4e 47 54 48 00 13 00 46 00 2e 00 50 5c 53 54 5c 41 31 2c 44 43 4c 45 4e 47 2c 54 43 41 42 41 53 5c 53 41 56 45 20 49 54 20 49 4e 20 53 41 56 45 20 41 52 45 41 20 00 13 00 6e 00 04 00 50   ┆EL,A8 EFFECTIVE LENGTH   F . P ST A1,DCLENG,TCABAS SAVE IT IN SAVE AREA    n   P┆
0x108fe…1094e               00 13 00 a0 00 32 00 50 5c 43 46 5c 41 31 34 2c 55 50 44 41 54 45 5c 4d 4f 56 45 20 46 52 4f 4d 20 44 43 20 54 4f 20 50 52 49 4e 54 45 52 20 42 55 46 46 45 52 3b 00 13 00 a8 00 12 00 50 5c 49 46 54 5c 43 4f 50 43 4d 44 3d 31 20 00 13 00 de   ┆     2 P CF A14,UPDATE MOVE FROM DC TO PRINTER BUFFER;       P IFT COPCMD=1     ┆
0x1094e…1099e               00 18 00 50 5c 4c 44 5c 41 31 2c 49 43 57 4f 52 4b 2c 54 43 41 42 41 53 00 13 00 f4 00 20 00 50 5c 52 46 28 4e 5a 29 5c 44 43 49 4e 39 30 5c 43 4f 50 59 20 43 4f 4d 4d 41 4e 44 20 00 13 01 10 00 08 00 50 5c 58 49 46 00 13 01 34 00 2e 00 50   ┆   P LD A1,ICWORK,TCABAS       P RF(NZ) DCIN90 COPY COMMAND        P XIF   4 . P┆
0x1099e…109ee               5c 4c 44 5c 41 31 2c 57 43 43 2c 54 43 41 42 41 53 5c 57 52 49 54 45 20 43 4f 4e 54 52 4f 4c 20 43 48 41 52 41 43 54 45 52 20 00 13 01 40 00 1e 00 50 5c 53 54 5c 41 31 2c 43 43 43 2c 54 43 41 42 41 53 5c 43 4f 50 59 20 49 54 20 00 13 01 72   ┆ LD A1,WCC,TCABAS WRITE CONTROL CHARACTER    @   P ST A1,CCC,TCABAS COPY IT    r┆
0x109ee…10a3e (172, 0, 400) 00 20 00 50 5c 43 46 5c 41 31 34 2c 43 4f 50 59 5c 43 4f 50 59 20 4f 4e 20 50 52 49 4e 54 45 52 00 14 00 04 00 10 00 50 44 43 49 4e 39 30 5c 45 51 55 5c 2a 00 14 00 28 00 12 00 50 5c 43 46 5c 41 31 34 2c 53 4e 42 55 53 59 00 14 00 3c 00 0c   ┆   P CF A14,COPY COPY ON PRINTER       PDCIN90 EQU *   (   P CF A14,SNBUSY   <  ┆
0x10a3e…10a8e               00 50 5c 52 54 4e 5c 41 31 34 00 14 00 52 00 12 00 50 2a 20 20 20 20 20 20 20 20 45 4a 45 43 54 00 14 00 62 00 06 00 50 2a 20 00 14 00 78 00 1a 00 50 2a 5c 41 42 4f 52 54 20 49 4e 54 45 52 54 41 53 4b 20 52 45 41 44 00 14 00 82 00 06 00 50   ┆ P RTN A14   R   P*        EJECT   b   P*    x   P* ABORT INTERTASK READ       P┆
0x10a8e…10ade               2a 20 00 14 00 a0 00 10 00 50 49 43 41 42 4f 52 5c 45 51 55 5c 2a 00 14 00 aa 00 0e 00 50 5c 4c 44 4b 5c 41 37 2c 30 20 00 14 00 be 00 1a 00 50 5c 43 4d 5c 45 43 42 42 4c 4b 2b 49 43 52 2c 54 43 41 42 41 53 20 00 14 00 d0 00 14 00 50 5c 4c   ┆*        PICABOR EQU *       P LDK A7,0        P CM ECBBLK+ICR,TCABAS        P L┆
0x10ade…10b2e               44 4b 4c 5c 41 38 2c 45 43 42 49 43 52 20 00 14 00 ee 00 12 00 50 5c 41 44 52 5c 41 38 2c 43 52 45 42 41 53 00 14 01 06 00 08 00 50 5c 4c 4b 4d 00 14 01 1c 00 0c 00 50 5c 44 41 54 41 5c 31 30 00 14 01 28 00 0c 00 50 5c 52 54 4e 5c 41 31 34   ┆DKL A8,ECBICR        P ADR A8,CREBAS       P LKM       P DATA 10   (   P RTN A14┆
0x10b2e…10b7e               00 14 01 38 00 12 00 50 2a 20 20 20 20 20 20 20 20 45 4a 45 43 54 00 14 01 48 00 06 00 50 2a 20 00 14 01 5e 00 1a 00 50 2a 5c 49 4e 50 55 54 20 46 52 4f 4d 20 49 4e 54 45 52 54 41 53 4b 00 14 01 68 00 06 00 50 2a 20 00 14 01 86 00 10 00 50   ┆   8   P*        EJECT   H   P*    ^   P* INPUT FROM INTERTASK   h   P*        P┆

Reduced view