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

⟦32817ef02⟧

    Length: 66052 (0x10204)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«

Derivation

└─⟦470bcbfc6⟧ Bits:30009709 Philips computer tape "M_92LP"
    └─⟦this⟧ »M:92LP/DRDC15.SC« 

PTS(SC)

	IDENT	DRDC15	9.2DK 4 81-05-26 870105040924 
			DK4, TRANS.PARAM.ADDR.,/00,/7F 
			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	0
X:F	EQU	1	READ COMMAND HANDLING IF=1
RCOM	EQU	1
X:G	EQU	254	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	2300
X:H	EQU	1	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	0
X:I	EQU	0	IF 1 SPECIFIC POLL HANDLING 
SPECP	EQU	0 
X:J	EQU	1	IF = 1  LINE SPEED SET TO HIGH
			IF = 0  LINE SPEED IS SET TO LOW 
SPEED	EQU	1 
X:K	EQU	0	IF 1 SIEMENS MSV1 PROCEDURE 
MSV1	EQU	0
X:L	EQU	2	NUMBER OF RECEIVE BUFFERS (2-5) 
RBUFNR	EQU	2
X:M	EQU	0	IF = 1  PTS 6805 ADAPTION	SALCUZ
P6805	EQU	00
X:N	EQU	/02 
	IFT	P6805=0
LCUIN	EQU	02	DEVICE ADDRESS OF RECEIVER 
	XIF
	IFT	P6805=1
LCUIN	EQU	/0A	DEVICE ADDRESS OF RECEIVER
	XIF
X:O	EQU	0 
IBMCHR	EQU	0	IF 1 IBM CHARACTER HANDLING
X:P	EQU	0	IF 1 MESSAGE PASSING TO DC TASK 
MESPAS	EQU	0
X:Q	EQU	0	IBM-3270 EMULATION PACKAGE, IF NOT = 0
EM3270	EQU	1
X:R	EQU	1000
				DK2 
BINTRM	EQU	0	IF 1 BINARY TRANSMISSION 
TSTREQ	EQU	0	IF 1 TEST REQUEST HANDLING 
DMRK	EQU	1	SPECIAL CONDITION FOR DENMARK
NOWACK	EQU	0	WHEN WORKING WITH A MAIN-FRAME THAT
			DOESN'T ACCEPT WACK RESPONSE TO A SELECT 
			SEQUENCE, NOWACK SHOULD BE SET TO "ONE". 
			ONLY WORKING IF STAT IS SET TO "ONE".
	IFT	P6805=0		SALCUZ
LCUUT	EQU	LCUIN+/10	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
	IFT	P6805=1
LCUUT	EQU	LCUIN+/01	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
* 
	EJECT
* 
* 
***************************************** 
* 
*	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	1
* 
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
* 
	 
* 
*	REQUEST HANDLING
* 
* 
* 
*	A7=ORDER
* 
*	/02: READ 
*	/06: WRITE
*	/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,/37-/06 
	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 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 
	LD	A3,ECBBA,A8	DEVICE BUFFER ADDRESS 
	ST	A3,DWTBUF,A6
	LD	A3,ECBRL,A8	CURSOR ADDRESS WORD 
	ST	A3,DWTCUR,A6
	XIF
	CWK	A6,DW1500	DCTASK DWT ??? 
	RF(E)	DCTP30	YES!!!  SHOULD NOT BE IN DC:TAB 
	LD	A1,DC:IN	GET DC:TAB INPUT POINTER 
	CWK	A1,DC:END	TABLE ALREADY FULL ????
	ABL(E)	DISIOE	YES!! REQUEST ERROR
	 


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
	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 
	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
	ANK	A2,8 
	RF(Z)	BRM328 
	LD	A2,DWTST,A6	GET STATUS
	ORK	A2,/A
	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	BUFFER ADDRESS 
	SUK	A4,2	SDJUST BUFFER ADDRESS 
	LDKL	A3,1922	REQUESTED LENGTH
	IM	XRB	SET READ BUFFER SWITCH
	CM	FDWTUT
	LDK	A1,1 
	XRS	A1,CACK	INCREMENT ACK COUNTER
				DB
	LD	A1,CRDBUF	INCREMENT READ BUFFER	DK
	ADK	A1,1	COUNTER	DK
	ST	A1,CRDBUF		DK 
				DE
	ABL	POL127 
	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 
	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
	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 

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

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

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

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

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

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

TRT101	EQU	*

	LDK	A2,SF
	CF	A5,WRITEP	SEND START FIELD

	LC	A2,-1,A4	GET ATTRIBUTE CHARACTER
	ANK	A2,X'7F' 
	LDR	A1,A2	CONVERT TO IBM ATTRIBUTE 
	ANK	A1,1 
	ANK	A2,/1E	MASK
	SLL	A2,1 
	ORR	A2,A1	IBM ATTRIBUTE COMPOSED 
	ORK	A2,/40	BIT ALWAYS SET ONE
	LC	A2,TASCII,A2
	CWK	A2,/18	CHECK SPECIAL ATTRIBUT
	RF(NE)	TRT104
	LDK	A2,/30 
TRT104	EQU	*
	CF	A5,WRITEP	SEND ATTRIBUTE
	ADK	A3,1 
	RF	TRT110
TRT105	EQU	*
	XIF
	 
	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 
* 
	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, 398)   Head {h00=0x0030, h01=0x0050, text=» IDENT DRDC15 9.2DK 4 81-05-26 870105040924 «, t00=0x0000, t01=0x0004}
0x00034…0005e               Head {h00=0x0026, h01=0x0050, text=»   DK4, TRANS.PARAM.ADDR.,/00,/7F «, t00=0x0000, t01=0x0038}
0x0005e…0007e               Head {h00=0x001c, h01=0x0050, text=»   DK3, RBUFNR=1 ALLOWED«, t00=0x0000, t01=0x0062}
0x0007e…00094               Head {h00=0x0012, h01=0x0050, text=»   DK2, TBUFL «, t00=0x0000, t01=0x0082}
0x00094…000a8               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x0098}
0x000a8…000dc               Head {h00=0x0030, h01=0x0050, text=»   DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. «, t00=0x0000, t01=0x00ac}
0x000dc…000f0               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x00e0}
0x000f0…0010c               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-08-16 «, t00=0x0000, t01=0x00f4}
0x0010c…00130               Head {h00=0x0020, h01=0x0050, text=»   =8, ASCII-MODE FOR SALCUZ«, t00=0x0000, t01=0x0110}
0x00130…0014c               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0000, t01=0x0134}
0x0014c…00176               Head {h00=0x0026, h01=0x0050, text=»   =7, ACK IN CONVERSATIONAL MODE «, t00=0x0000, t01=0x0150}
0x00176…00192               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0000, t01=0x017a}
0x00192…001c0               Head {h00=0x002a, h01=0x0050, text=»   =6, DCTASK BUFFER ADDRESS DESTROYED«, t00=0x0001, t01=0x0008}
0x001c0…001dc               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x0036}
0x001dc…00204               Head {h00=0x0024, h01=0x0050, text=»   =5, INCOMPLETE POLL SEQUENCE «, t00=0x0001, t01=0x0052}
0x00204…00220               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x007a}
0x00220…00242               Head {h00=0x001e, h01=0x0050, text=»   =3, TRANSFER PARAMETER «, t00=0x0001, t01=0x0096}
0x00242…0025e               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x00b8}
0x0025e…0027e               Head {h00=0x001c, h01=0x0050, text=»   =4, ANY MESSAGE ORDER«, t00=0x0001, t01=0x00d4}
0x0027e…0029a               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x00f4}
0x0029a…002b8               Head {h00=0x001a, h01=0x0050, text=»   =2, ABORT HANDLING «, t00=0x0001, t01=0x0110}
0x002b8…002d4               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-29 «, t00=0x0001, t01=0x012e}
0x002d4…002f2               Head {h00=0x001a, h01=0x0050, text=»   =1, MSR-INSTRUCTION«, t00=0x0001, t01=0x014a}
0x002f2…0030e               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-14 «, t00=0x0001, t01=0x0168}
0x0030e…0032a               Head {h00=0x0018, h01=0x0050, text=»   REL 8.2 78-11-14 «, t00=0x0001, t01=0x0184}
0x0032a…00332               Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0010}
0x00332…0033c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0018}
0x0033c…00346               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0022}
0x00346…0037c               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x002c}
0x0037c…00386               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0062}
0x00386…003ae               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x006c}
0x003ae…003b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0094}
0x003b8…003e6               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x009e}
0x003e6…00418               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0002, t01=0x00cc}
0x00418…0043c               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0002, t01=0x00fe}
0x0043c…00446               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0122}
0x00446…00450               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x012c}
0x00450…0045a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0136}
0x0045a…00464               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0140}
0x00464…0046e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014a}
0x0046e…004aa               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0002, t01=0x0154}
0x004aa…004b4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0002, t01=0x0190}
0x004b4…004be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x000a}
0x004be…004c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0014}
0x004c8…004de               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0003, t01=0x001e}
0x004de…004e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0034}
0x004e8…0051e               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0003, t01=0x003e}
0x0051e…00544               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x0074}
0x00544…0056a               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x009a}
0x0056a…00590               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0003, t01=0x00c0}
0x00590…005b6               Head {h00=0x0022, h01=0x0050, text=» ENTRY DW1500 DWT FOR DC TASK «, t00=0x0003, t01=0x00e6}
0x005b6…005c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x010c}
0x005c0…005ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0116}
0x005ca…005e8               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0003, t01=0x0120}
0x005e8…005f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x013e}
0x005f2…005fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0148}
0x005fc…00622               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0003, t01=0x0152}
0x00622…0064e               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0003, t01=0x0178}
0x0064e…00676               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0004, t01=0x0014}
0x00676…0069a               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0004, t01=0x003c}
0x0069a…006ba               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x0060}
0x006ba…006da               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x0080}
0x006da…006f8               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x00a0}
0x006f8…00716               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0004, t01=0x00be}
0x00716…00744               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x00dc}
0x00744…00770               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0004, t01=0x010a}
0x00770…0079c               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0004, t01=0x0136}
0x0079c…007c4               Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0004, t01=0x0162}
0x007c4…007ee               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0004, t01=0x018a}
0x007ee…00818               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0005, t01=0x0024}
0x00818…0083c               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x004e}
0x0083c…00862               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0005, t01=0x0072}
0x00862…00890               Head {h00=0x002a, h01=0x0050, text=» EXTRN DC:MIN MOVE DATA TO USER BUFFER«, t00=0x0005, t01=0x0098}
0x00890…008c0               Head {h00=0x002c, h01=0x0050, text=» EXTRN DC:MOT MOVE DATA FROM USER BUFFER«, t00=0x0005, t01=0x00c6}
0x008c0…008f4               Head {h00=0x0030, h01=0x0050, text=» EXTRN DISEND COMPLETE REQUEST AND DISPATCH «, t00=0x0005, t01=0x00f6}
0x008f4…008fe               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0005, t01=0x012a}
0x008fe…00908               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0134}
0x00908…00912               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013e}
0x00912…0091c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0148}
0x0091c…00926               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0152}
0x00926…00960               Head {h00=0x0036, h01=0x0050, text=»*   STANDARD INTERFACE PART FOR DATA COMMUNICATION«, t00=0x0005, t01=0x015c}
0x00960…0096a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0008}
0x0096a…00974               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0012}
0x00974…0097e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x001c}
0x0097e…00988               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0026}
0x00988…0099e               Head {h00=0x0012, h01=0x0050, text=»* DWT CONTENTS«, t00=0x0006, t01=0x0030}
0x0099e…009a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0046}
0x009a8…009f6               Head {h00=0x004a, h01=0x0050, text=»* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)«, t00=0x0006, t01=0x0050}
0x009f6…00a00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x009e}
0x00a00…00a0a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0006, t01=0x00a8}
0x00a0a…00a4a               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0006, t01=0x00b2}
0x00a4a…00a54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f2}
0x00a54…00a82               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x00fc}
0x00a82…00a8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x012a}
0x00a8c…00ab8               Head {h00=0x0028, h01=0x0050, text=»XRVI EQU /5C STANDARD:/40, DK:/5C DK«, t00=0x0006, t01=0x0134}
0x00ab8…00ae6               Head {h00=0x002a, h01=0x0050, text=»X:D EQU 0 BASE FOR RBUFL AND TBUFL DK «, t00=0x0006, t01=0x0160}
0x00ae6…00b0c               Head {h00=0x0022, h01=0x0050, text=»X:X EQU 500 VALUE FOR BASE DK «, t00=0x0006, t01=0x018e}
0x00b0c…00b36               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 2000 RECEIVE BUFFER LENGTH«, t00=0x0007, t01=0x0024}
0x00b36…00b54               Head {h00=0x001a, h01=0x0050, text=»RBUFL EQU 650+X:X  DK «, t00=0x0007, t01=0x004e}
0x00b54…00b78               Head {h00=0x0020, h01=0x0050, text=»X:B EQU /60 DCTASK FILE CODE«, t00=0x0007, t01=0x006c}
0x00b78…00b8e               Head {h00=0x0012, h01=0x0050, text=»DC15FC EQU /60«, t00=0x0007, t01=0x0090}
0x00b8e…00bb6               Head {h00=0x0024, h01=0x0050, text=»X:C EQU 1 IF 1 INTERRUPT LOGGING«, t00=0x0007, t01=0x00a6}
0x00bb6…00bc8               Head {h00=0x000e, h01=0x0050, text=»LOGG EQU 0«, t00=0x0007, t01=0x00ce}
0x00bc8…00bd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00e0}
0x00bd2…00c00               Head {h00=0x002a, h01=0x0050, text=»TIMPOL EQU 600 POLL TIMEOUT VALUE  DK «, t00=0x0007, t01=0x00ea}
0x00c00…00c2e               Head {h00=0x002a, h01=0x0050, text=»X:E EQU 1 STATUS AND RVI HANDLING IF=1«, t00=0x0007, t01=0x0118}
0x00c2e…00c40               Head {h00=0x000e, h01=0x0050, text=»STAT EQU 0«, t00=0x0007, t01=0x0146}
0x00c40…00c6c               Head {h00=0x0028, h01=0x0050, text=»X:F EQU 1 READ COMMAND HANDLING IF=1«, t00=0x0007, t01=0x0158}
0x00c6c…00c7e               Head {h00=0x000e, h01=0x0050, text=»RCOM EQU 1«, t00=0x0007, t01=0x0184}
0x00c7e…00ca8               Head {h00=0x0026, h01=0x0050, text=»X:G EQU 254 TRANSMIT BLOCK LENGTH «, t00=0x0008, t01=0x0008}
0x00ca8…00cbe               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU 2300«, t00=0x0008, t01=0x0032}
0x00cbe…00cea               Head {h00=0x0028, h01=0x0050, text=»X:H EQU 1 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0008, t01=0x0048}
0x00cea…00cfc               Head {h00=0x000e, h01=0x0050, text=»CODE EQU 0«, t00=0x0008, t01=0x0074}
0x00cfc…00d2a               Head {h00=0x002a, h01=0x0050, text=»X:I EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0008, t01=0x0086}
0x00d2a…00d3e               Head {h00=0x0010, h01=0x0050, text=»SPECP EQU 0 «, t00=0x0008, t01=0x00b4}
0x00d3e…00d6e               Head {h00=0x002c, h01=0x0050, text=»X:J EQU 1 IF = 1  LINE SPEED SET TO HIGH«, t00=0x0008, t01=0x00c8}
0x00d6e…00d9a               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0008, t01=0x00f8}
0x00d9a…00dae               Head {h00=0x0010, h01=0x0050, text=»SPEED EQU 1 «, t00=0x0008, t01=0x0124}
0x00dae…00ddc               Head {h00=0x002a, h01=0x0050, text=»X:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0008, t01=0x0138}
0x00ddc…00dee               Head {h00=0x000e, h01=0x0050, text=»MSV1 EQU 0«, t00=0x0008, t01=0x0166}
0x00dee…00e20               Head {h00=0x002e, h01=0x0050, text=»X:L EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0008, t01=0x0178}
0x00e20…00e34               Head {h00=0x0010, h01=0x0050, text=»RBUFNR EQU 2«, t00=0x0009, t01=0x001a}
0x00e34…00e66               Head {h00=0x002e, h01=0x0050, text=»X:M EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x0009, t01=0x002e}
0x00e66…00e7a               Head {h00=0x0010, h01=0x0050, text=»P6805 EQU 00«, t00=0x0009, t01=0x0060}
0x00e7a…00e8e               Head {h00=0x0010, h01=0x0050, text=»X:N EQU /02 «, t00=0x0009, t01=0x0074}
0x00e8e…00ea2               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0009, t01=0x0088}
0x00ea2…00ed2               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU 02 DEVICE ADDRESS OF RECEIVER «, t00=0x0009, t01=0x009c}
0x00ed2…00ede               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x00cc}
0x00ede…00ef2               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0009, t01=0x00d8}
0x00ef2…00f22               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x00ec}
0x00f22…00f2e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x011c}
0x00f2e…00f40               Head {h00=0x000e, h01=0x0050, text=»X:O EQU 0 «, t00=0x0009, t01=0x0128}
0x00f40…00f70               Head {h00=0x002c, h01=0x0050, text=»IBMCHR EQU 0 IF 1 IBM CHARACTER HANDLING«, t00=0x0009, t01=0x013a}
0x00f70…00fa2               Head {h00=0x002e, h01=0x0050, text=»X:P EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x0009, t01=0x016a}
0x00fa2…00fb6               Head {h00=0x0010, h01=0x0050, text=»MESPAS EQU 0«, t00=0x000a, t01=0x000c}
0x00fb6…00fee               Head {h00=0x0034, h01=0x0050, text=»X:Q EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000a, t01=0x0020}
0x00fee…01002               Head {h00=0x0010, h01=0x0050, text=»EM3270 EQU 1«, t00=0x000a, t01=0x0058}
0x01002…01016               Head {h00=0x0010, h01=0x0050, text=»X:R EQU 1000«, t00=0x000a, t01=0x006c}
0x01016…01026               Head {h00=0x000c, h01=0x0050, text=»    DK2 «, t00=0x000a, t01=0x0080}
0x01026…01054               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000a, t01=0x0090}
0x01054…01084               Head {h00=0x002c, h01=0x0050, text=»TSTREQ EQU 0 IF 1 TEST REQUEST HANDLING «, t00=0x000a, t01=0x00be}
0x01084…010b4               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 1 SPECIAL CONDITION FOR DENMARK«, t00=0x000a, t01=0x00ee}
0x010b4…010ec               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000a, t01=0x011e}
0x010ec…01120               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000a, t01=0x0156}
0x01120…01154               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000a, t01=0x018a}
0x01154…01184               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000b, t01=0x002e}
0x01184…011a0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000b, t01=0x005e}
0x011a0…011e0               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x007a}
0x011e0…011f6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x00ba}
0x011f6…0120a               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x00d0}
0x0120a…0124a               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x00e4}
0x0124a…01260               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x0124}
0x01260…0126a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x013a}
0x0126a…01278               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0144}
0x01278…01282               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0152}
0x01282…0128c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x015c}
0x0128c…012be               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000b, t01=0x0166}
0x012be…012c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0008}
0x012c8…012e6               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000c, t01=0x0012}
0x012e6…012f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0030}
0x012f0…01322               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x003a}
0x01322…0132c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x006c}
0x0132c…0135e               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000c, t01=0x0076}
0x0135e…0138c               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000c, t01=0x00a8}
0x0138c…01396               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00d6}
0x01396…013aa               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000c, t01=0x00e0}
0x013aa…013b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f4}
0x013b4…013c2               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x000c, t01=0x00fe}
0x013c2…013dc               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=0  DK2«, t00=0x000c, t01=0x010c}
0x013dc…013f4               Head {h00=0x0014, h01=0x0050, text=»TBUFL EQU 0  DK2«, t00=0x000c, t01=0x0126}
0x013f4…01406               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000c, t01=0x013e}
0x01406…01410               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0150}
0x01410…0142a               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=1  DK2«, t00=0x000c, t01=0x015a}
0x0142a…01458               Head {h00=0x002a, h01=0x0050, text=»TBUFL EQU 650+X:X MMU BUFFER LENGTH DK«, t00=0x000c, t01=0x0174}
0x01458…0146a               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000d, t01=0x0012}
0x0146a…01478               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x000d, t01=0x0024}
0x01478…01482               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0032}
0x01482…014bc               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000d, t01=0x003c}
0x014bc…014ee               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000d, t01=0x0076}
0x014ee…014f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00a8}
0x014f8…0150c               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x000d, t01=0x00b2}
0x0150c…01516               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c6}
0x01516…0154c               Head {h00=0x0032, h01=0x0050, text=»DEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION «, t00=0x000d, t01=0x00d0}
0x0154c…0157a               Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE«, t00=0x000d, t01=0x0106}
0x0157a…01584               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0134}
0x01584…0158e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000d, t01=0x013e}
0x0158e…01598               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0148}
0x01598…015b4               Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x000d, t01=0x0152}
0x015b4…015be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x016e}
0x015be…015f2               Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000d, t01=0x0178}
0x015f2…015fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x001c}
0x015fc…01612               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000e, t01=0x0026}
0x01612…0162a               Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000e, t01=0x003c}
0x0162a…01636               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0054}
0x01636…01640               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0060}
0x01640…01656               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x006a}
0x01656…01670               Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000e, t01=0x0080}
0x01670…0167c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x009a}
0x0167c…01686               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00a6}
0x01686…016be               Head {h00=0x0034, h01=0x0050, text=»DWTTP EQU START+/00 TIMER POINTER ORDER PROCESS «, t00=0x000e, t01=0x00b0}
0x016be…016f0               Head {h00=0x002e, h01=0x0050, text=»DWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE«, t00=0x000e, t01=0x00e8}
0x016f0…01718               Head {h00=0x0024, h01=0x0050, text=»DWTSQ EQU START+/04 STATUS QUEUE«, t00=0x000e, t01=0x011a}
0x01718…01742               Head {h00=0x0026, h01=0x0050, text=»DWTRQ EQU START+/06 RECEIVE QUEUE «, t00=0x000e, t01=0x0142}
0x01742…01774               Head {h00=0x002e, h01=0x0050, text=»DWTBUF EQU START+/08 DEVICE BUFFER ADDRESS«, t00=0x000e, t01=0x016c}
0x01774…017a0               Head {h00=0x0028, h01=0x0050, text=»DWTCUR EQU START+/0A CURSOR ADDRESS «, t00=0x000f, t01=0x000e}
0x017a0…017d0               Head {h00=0x002c, h01=0x0050, text=»DWTTIM EQU START+/0C REQUEST TIMER VALUE«, t00=0x000f, t01=0x003a}
0x017d0…017da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x006a}
0x017da…017e4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000f, t01=0x0074}
0x017e4…017ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x007e}
0x017ee…01808               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000f, t01=0x0088}
0x01808…01812               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a2}
0x01812…0181c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ac}
0x0181c…01826               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b6}
0x01826…01838               Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000f, t01=0x00c0}
0x01838…01842               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00d2}
0x01842…01856               Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000f, t01=0x00dc}
0x01856…0186a               Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x000f, t01=0x00f0}
0x0186a…0188c               Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x000f, t01=0x0104}
0x0188c…018a6               Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x000f, t01=0x0126}
0x018a6…018ce               Head {h00=0x0024, h01=0x0050, text=»* /39: SET REQUEST TIMEOUT VALUE«, t00=0x000f, t01=0x0140}
0x018ce…018d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0168}
0x018d8…018e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0172}
0x018e2…01904               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x000f, t01=0x017c}
0x01904…0190e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x000e}
0x0190e…01918               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0018}
0x01918…01942               Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x0010, t01=0x0022}
0x01942…01970               Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x0010, t01=0x004c}
0x01970…01994               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x0010, t01=0x007a}
0x01994…019bc               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x0010, t01=0x009e}
0x019bc…019ec               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x0010, t01=0x00c6}
0x019ec…019f6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0010, t01=0x00f6}
0x019f6…01a00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0100}
0x01a00…01a20               Head {h00=0x001c, h01=0x0050, text=»* DC TASK ADDRESS BLOCK «, t00=0x0010, t01=0x010a}
0x01a20…01a2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x012a}
0x01a2a…01a52               Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDICATES NO MMU BUFFER «, t00=0x0010, t01=0x0134}
0x01a52…01a74               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0010, t01=0x015c}
0x01a74…01aa2               Head {h00=0x002a, h01=0x0050, text=»DC15DC DATA DCACTD ACTIVATION ADDRESS «, t00=0x0010, t01=0x017e}
0x01aa2…01acc               Head {h00=0x0026, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x001c}
0x01acc…01af4               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x0046}
0x01af4…01afe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x006e}
0x01afe…01b1c               Head {h00=0x001a, h01=0x0050, text=»* DRIVER ADDRESS BLOCK«, t00=0x0011, t01=0x0078}
0x01b1c…01b26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0096}
0x01b26…01b4a               Head {h00=0x0020, h01=0x0050, text=» DATA BUFLEN MMU BUFFER SIZE«, t00=0x0011, t01=0x00a0}
0x01b4a…01b6c               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0011, t01=0x00c4}
0x01b6c…01b98               Head {h00=0x0028, h01=0x0050, text=»DC15AD DATA DCACT ACTIVATION ADDRESS«, t00=0x0011, t01=0x00e6}
0x01b98…01bd0               Head {h00=0x0034, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x0112}
0x01bd0…01bf8               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x014a}
0x01bf8…01c02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0172}
0x01c02…01c32               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x0011, t01=0x017c}
0x01c32…01c44               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x0012, t01=0x001c}
0x01c44…01c6a               Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x0012, t01=0x002e}
0x01c6a…01c7c               Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x0012, t01=0x0054}
0x01c7c…01c84               Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x0066}
0x01c84…01c98               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x0012, t01=0x006e}
0x01c98…01cb0               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x0012, t01=0x0082}
0x01cb0…01cbc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x009a}
0x01cbc…01cd0               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x0012, t01=0x00a6}
0x01cd0…01ce4               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x0012, t01=0x00ba}
0x01ce4…01cf0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00ce}
0x01cf0…01cfa               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0012, t01=0x00da}
0x01cfa…01d04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e4}
0x01d04…01d0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ee}
0x01d0e…01d36               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x0012, t01=0x00f8}
0x01d36…01d40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0120}
0x01d40…01d54               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x0012, t01=0x012a}
0x01d54…01d78               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0012, t01=0x013e}
0x01d78…01d92               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0012, t01=0x0162}
0x01d92…01da8               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0012, t01=0x017c}
0x01da8…01dd2 (19, 0, 400)  Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0013, t01=0x0004}
0x01dd2…01dde               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x002e}
0x01dde…01df2               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0013, t01=0x003a}
0x01df2…01e14               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DCRD READ SPECIFIC «, t00=0x0013, t01=0x004e}
0x01e14…01e2c               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x0013, t01=0x0070}
0x01e2c…01e40               Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x0013, t01=0x0088}
0x01e40…01e58               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/06 «, t00=0x0013, t01=0x009c}
0x01e58…01e80               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x0013, t01=0x00b4}
0x01e80…01e94               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0013, t01=0x00dc}
0x01e94…01eac               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x0013, t01=0x00f0}
0x01eac…01ed0               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) DCSS SET STATUS DK4 «, t00=0x0013, t01=0x0108}
0x01ed0…01ee8               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/38 «, t00=0x0013, t01=0x012c}
0x01ee8…01f10               Head {h00=0x0024, h01=0x0050, text=» ABL(Z) REQTIM SET REQUEST TIMER«, t00=0x0013, t01=0x0144}
0x01f10…01f1c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x016c}
0x01f1c…01f24               Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0178}
0x01f24…01f38               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=0 «, t00=0x0013, t01=0x0180}
0x01f38…01f50 (20, 0, 400)  Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/37 «, t00=0x0014, t01=0x0004}
0x01f50…01f78               Head {h00=0x0024, h01=0x0050, text=» RF(Z) REQTIM SET REQUEST TIMER «, t00=0x0014, t01=0x001c}
0x01f78…01f84               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0044}
0x01f84…01f96               Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x0014, t01=0x0050}
0x01f96…01fa0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0014, t01=0x0062}
0x01fa0…01faa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x006c}
0x01faa…01fb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0076}
0x01fb4…01fd4               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x0014, t01=0x0080}
0x01fd4…01fde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00a0}
0x01fde…01fe8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00aa}
0x01fe8…01ffc               Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x0014, t01=0x00b4}
0x01ffc…02024               Head {h00=0x0024, h01=0x0050, text=» SUR A1,A1 PRESET RETURN CODE =4«, t00=0x0014, t01=0x00c8}
0x02024…0203e               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0014, t01=0x00f0}
0x0203e…02054               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0014, t01=0x010a}
0x02054…0207e               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0014, t01=0x0120}
0x0207e…0208a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x014a}
0x0208a…0209e               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0014, t01=0x0156}
0x0209e…020b8               Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x0014, t01=0x016a}
0x020b8…020d0               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/02 «, t00=0x0014, t01=0x0184}
0x020d0…020f8               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x0015, t01=0x000c}
0x020f8…02100               Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0034}
0x02100…02122               Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x0015, t01=0x003c}
0x02122…02144               Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x0015, t01=0x005e}
0x02144…0214e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0080}
0x0214e…02158               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x008a}
0x02158…02172               Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x0015, t01=0x0094}
0x02172…0217c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ae}
0x0217c…02186               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00b8}
0x02186…021a4               Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0015, t01=0x00c2}
0x021a4…021bc               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0015, t01=0x00e0}
0x021bc…021e6               Head {h00=0x0026, h01=0x0050, text=»*   STATUS CHANGE ON DC EQUIPMENT «, t00=0x0015, t01=0x00f8}
0x021e6…0220e               Head {h00=0x0024, h01=0x0050, text=»*   SPONTANOUS MESSAGE RECEPTION«, t00=0x0015, t01=0x0122}
0x0220e…02218               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x014a}
0x02218…0222c               Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0015, t01=0x0154}
0x0222c…0225c               Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0015, t01=0x0168}
0x0225c…02270               Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0016, t01=0x0008}
0x02270…02294               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0016, t01=0x001c}
0x02294…022ae               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0016, t01=0x0040}
0x022ae…022b8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0016, t01=0x005a}
0x022b8…022ea               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0016, t01=0x0064}
0x022ea…022f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0096}
0x022f4…02312               Head {h00=0x001a, h01=0x0050, text=»*   ANY MESSAGE ORDER «, t00=0x0016, t01=0x00a0}
0x02312…0231c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00be}
0x0231c…02342               Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0016, t01=0x00c8}
0x02342…0234a               Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00ee}
0x0234a…02380               Head {h00=0x0032, h01=0x0050, text=»ANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4«, t00=0x0016, t01=0x00f6}
0x02380…0239e               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCRD10 NO!! =4 «, t00=0x0016, t01=0x012c}
0x0239e…023ca               Head {h00=0x0028, h01=0x0050, text=» RF ENDIO YES!! COMPLETE REQUEST =4 «, t00=0x0016, t01=0x014a}
0x023ca…023d6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0176}
0x023d6…023e0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0016, t01=0x0182}
0x023e0…023ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x018c}
0x023ea…023f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0008}
0x023f4…02412               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0017, t01=0x0012}
0x02412…0241c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0030}
0x0241c…02426               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x003a}
0x02426…02468               Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0017, t01=0x0044}
0x02468…024a6               Head {h00=0x003a, h01=0x0050, text=»*         FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0017, t01=0x0086}
0x024a6…024b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00c4}
0x024b0…024ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ce}
0x024ba…024ce               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0017, t01=0x00d8}
0x024ce…024f8               Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0017, t01=0x00ec}
0x024f8…02504               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0116}
0x02504…02518               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0017, t01=0x0122}
0x02518…02542               Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0017, t01=0x0136}
0x02542…02556               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0017, t01=0x0160}
0x02556…0256c               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x0017, t01=0x0174}
0x0256c…02598               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0017, t01=0x018a}
0x02598…025aa               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0018, t01=0x0026}
0x025aa…025be               Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x0018, t01=0x0038}
0x025be…025e6               Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x0018, t01=0x004c}
0x025e6…025fa               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0018, t01=0x0074}
0x025fa…02626               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x0018, t01=0x0088}
0x02626…02632               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00b4}
0x02632…02660               Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTBUF,A6 SAVE TERM. ADDR. DK4 «, t00=0x0018, t01=0x00c0}
0x02660…02676               Head {h00=0x0012, h01=0x0050, text=»DCTP12 EQU *  «, t00=0x0018, t01=0x00ee}
0x02676…026ac               Head {h00=0x0032, h01=0x0050, text=» LD A1,DCSTQ CHECK IF THIS DWT IS IN QUEUE DK4«, t00=0x0018, t01=0x0104}
0x026ac…026c2               Head {h00=0x0012, h01=0x0050, text=»DCTP14 EQU *  «, t00=0x0018, t01=0x013a}
0x026c2…026f2               Head {h00=0x002c, h01=0x0050, text=» RF(Z) DCTP18 NO, END OF/OR NO QUEUE DK4«, t00=0x0018, t01=0x0150}
0x026f2…0271c               Head {h00=0x0026, h01=0x0050, text=» LDR A3,A6 ADJUST ADDR. VALUE DK4 «, t00=0x0018, t01=0x0180}
0x0271c…02738               Head {h00=0x0018, h01=0x0050, text=» ADKL A3,DWTSQ  DK4 «, t00=0x0019, t01=0x001a}
0x02738…02768               Head {h00=0x002c, h01=0x0050, text=» CWR A1,A3 SOMETHING QUEUED OUR DWT? DK4«, t00=0x0019, t01=0x0036}
0x02768…027a0               Head {h00=0x0034, h01=0x0050, text=» RF(E) DCTP16 YES, WAIT BEFORE TRANS. PARAM. DK4«, t00=0x0019, t01=0x0066}
0x027a0…027ca               Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A1 NOT OURS, GET NEXT DK4«, t00=0x0019, t01=0x009e}
0x027ca…027e2               Head {h00=0x0014, h01=0x0050, text=» RB DCTP14  DK4 «, t00=0x0019, t01=0x00c8}
0x027e2…027f8               Head {h00=0x0012, h01=0x0050, text=»DCTP16 EQU *  «, t00=0x0019, t01=0x00e0}
0x027f8…02824               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A6 SAVE DWT AS PARAMETER DK4«, t00=0x0019, t01=0x00f6}
0x02824…02858               Head {h00=0x0030, h01=0x0050, text=» CF A15,SETIME WAIT UNTIL STATUS IS SENT DK4«, t00=0x0019, t01=0x0122}
0x02858…02884               Head {h00=0x0028, h01=0x0050, text=» DATA TPTOUT,20 DELAY= 2 SECONDS DK4«, t00=0x0019, t01=0x0156}
0x02884…0289a               Head {h00=0x0012, h01=0x0050, text=» RB DCRTN  DK4«, t00=0x0019, t01=0x0182}
0x0289a…028b0               Head {h00=0x0012, h01=0x0050, text=»TPTOUT EQU *  «, t00=0x001a, t01=0x0008}
0x028b0…028d2               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 RESTORE DWT DK4«, t00=0x001a, t01=0x001e}
0x028d2…02900               Head {h00=0x002a, h01=0x0050, text=» RB DCTP12 LOOK IN THE QUEUE AGAIN DK4«, t00=0x001a, t01=0x0040}
0x02900…02916               Head {h00=0x0012, h01=0x0050, text=»DCTP18 EQU *  «, t00=0x001a, t01=0x006e}
0x02916…02946               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTBUF,A6 RESTORE TERM ADDR. DK4 «, t00=0x001a, t01=0x0084}
0x02946…02972               Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x001a, t01=0x00b4}
0x02972…0297a               Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00e0}
0x0297a…0298e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x001a, t01=0x00e8}
0x0298e…029bc               Head {h00=0x002a, h01=0x0050, text=» LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS «, t00=0x001a, t01=0x00fc}
0x029bc…029d4               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTBUF,A6«, t00=0x001a, t01=0x012a}
0x029d4…02a00               Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBRL,A8 CURSOR ADDRESS WORD «, t00=0x001a, t01=0x0142}
0x02a00…02a18               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTCUR,A6«, t00=0x001a, t01=0x016e}
0x02a18…02a24               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0186}
0x02a24…02a4a (27, 0, 400)  Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x001b, t01=0x0004}
0x02a4a…02a80               Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!!  SHOULD NOT BE IN DC:TAB «, t00=0x001b, t01=0x002a}
0x02a80…02aae               Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x001b, t01=0x0060}
0x02aae…02adc               Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x001b, t01=0x008e}
0x02adc…02b06               Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x001b, t01=0x00bc}
0x02b06…02b10               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x001b, t01=0x00e6}
0x02b10…02b18               Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x00f0}
0x02b18…02b20               Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x00f8}
0x02b20…02b34               Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x001b, t01=0x0100}
0x02b34…02b5a               Head {h00=0x0022, h01=0x0050, text=» LD A4,DCTAB DC:TAB ADDRESS =3«, t00=0x001b, t01=0x0114}
0x02b5a…02b82               Head {h00=0x0024, h01=0x0050, text=» AD* A4,DCTAB LAST TABLE POS. =3«, t00=0x001b, t01=0x013a}
0x02b82…02bb0               Head {h00=0x002a, h01=0x0050, text=»DCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3«, t00=0x001b, t01=0x0162}
0x02bb0…02bde               Head {h00=0x002a, h01=0x0050, text=» CW A4,DCTAB ALL ENTRIES CHECKED?? =3 «, t00=0x001b, t01=0x0190}
0x02bde…02c0c               Head {h00=0x002a, h01=0x0050, text=» RF(E) DCTP25 YES.DWT NOT IN TABLE =3 «, t00=0x001c, t01=0x002e}
0x02c0c…02c2e               Head {h00=0x001e, h01=0x0050, text=» CWR* A6,A4 IN TABLE ?? =3«, t00=0x001c, t01=0x005c}
0x02c2e…02c4c               Head {h00=0x001a, h01=0x0050, text=» RF(E) DCTP30 YES!! =3«, t00=0x001c, t01=0x007e}
0x02c4c…02c72               Head {h00=0x0022, h01=0x0050, text=» RB DCTP22 CHECK NEXT ENTRY =3«, t00=0x001c, t01=0x009c}
0x02c72…02c8a               Head {h00=0x0014, h01=0x0050, text=»DCTP25 EQU *  =3«, t00=0x001c, t01=0x00c2}
0x02c8a…02c92               Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x00da}
0x02c92…02cba               Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x001c, t01=0x00e2}
0x02cba…02ccc               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x001c, t01=0x010a}
0x02ccc…02cfa               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x001c, t01=0x011c}
0x02cfa…02d02               Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x014a}
0x02d02…02d30               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x001c, t01=0x0152}
0x02d30…02d44               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x001c, t01=0x0180}
0x02d44…02d60 (29, 0, 400)  Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x001d, t01=0x0004}
0x02d60…02d78               Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x001d, t01=0x0020}
0x02d78…02da4               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x001d, t01=0x0038}
0x02da4…02db0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0064}
0x02db0…02dc4               Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x001d, t01=0x0070}
0x02dc4…02de8               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x001d, t01=0x0084}
0x02de8…02dfc               Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x001d, t01=0x00a8}
0x02dfc…02e24               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x001d, t01=0x00bc}
0x02e24…02e36               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001d, t01=0x00e4}
0x02e36…02e40               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x001d, t01=0x00f6}
0x02e40…02e4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0100}
0x02e4a…02e54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x010a}
0x02e54…02e64               Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x001d, t01=0x0114}
0x02e64…02e6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0124}
0x02e6e…02e78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x012e}
0x02e78…02e90               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001d, t01=0x0138}
0x02e90…02eb2               Head {h00=0x001e, h01=0x0050, text=»*   SUCCESFUL TRANSMISSION«, t00=0x001d, t01=0x0150}
0x02eb2…02ec6               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001d, t01=0x0172}
0x02ec6…02ed0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0186}
0x02ed0…02eda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0190}
0x02eda…02eec               Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x001e, t01=0x000a}
0x02eec…02f02               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001e, t01=0x001c}
0x02f02…02f2a               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x001e, t01=0x0032}
0x02f2a…02f50               Head {h00=0x0022, h01=0x0050, text=» CWK A1,BUFLEN ILLEGAL LENGTH?«, t00=0x001e, t01=0x005a}
0x02f50…02f6c               Head {h00=0x0018, h01=0x0050, text=» RF(G) IL:LEN YES!! «, t00=0x001e, t01=0x0080}
0x02f6c…02f78               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x009c}
0x02f78…02f98               Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x001e, t01=0x00a8}
0x02f98…02fbc               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ  QUEUE REQUEST«, t00=0x001e, t01=0x00c8}
0x02fbc…02fce               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001e, t01=0x00ec}
0x02fce…02fd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00fe}
0x02fd8…02fe2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0108}
0x02fe2…02fec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0112}
0x02fec…02ffa               Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x001e, t01=0x011c}
0x02ffa…03004               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x012a}
0x03004…0300e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0134}
0x0300e…03026               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001e, t01=0x013e}
0x03026…03042               Head {h00=0x0018, h01=0x0050, text=»*   MESSAGE RECEIVED«, t00=0x001e, t01=0x0156}
0x03042…03056               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001e, t01=0x0172}
0x03056…03060               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0186}
0x03060…0306a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0190}
0x0306a…0307c               Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x001f, t01=0x000a}
0x0307c…0309c               Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x001f, t01=0x001c}
0x0309c…030ce               Head {h00=0x002e, h01=0x0050, text=» LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x001f, t01=0x003c}
0x030ce…030f4               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x001f, t01=0x006e}
0x030f4…030fc               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0094}
0x030fc…03104               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x009c}
0x03104…0310c               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x00a4}
0x0310c…03138               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 TAKE THE FIRST IN QUEUE «, t00=0x001f, t01=0x00ac}
0x03138…03150               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x001f, t01=0x00d8}
0x03150…03162               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x001f, t01=0x00f0}
0x03162…03188               Head {h00=0x0022, h01=0x0050, text=» LD A3,-4,A4 EFFECTIVE LENGTH «, t00=0x001f, t01=0x0102}
0x03188…031a0               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x001f, t01=0x0128}
0x031a0…031a8               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0140}
0x031a8…031cc               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x001f, t01=0x0148}
0x031cc…031fa               Head {h00=0x002a, h01=0x0050, text=» CF A15,DC:MIN MOV DATA TO USER BUFFER«, t00=0x001f, t01=0x016c}
0x031fa…0320c               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0020, t01=0x000a}
0x0320c…03214               Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x001c}
0x03214…0323c               Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x0020, t01=0x0024}
0x0323c…0324e               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0020, t01=0x004c}
0x0324e…03258               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0020, t01=0x005e}
0x03258…03262               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0068}
0x03262…0326c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0072}
0x0326c…03280               Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x0020, t01=0x007c}
0x03280…0328a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0090}
0x0328a…03294               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x009a}
0x03294…032a8               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0020, t01=0x00a4}
0x032a8…032ba               Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x0020, t01=0x00b8}
0x032ba…032e8               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x0020, t01=0x00ca}
0x032e8…03304               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x0020, t01=0x00f8}
0x03304…03324               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x0020, t01=0x0114}
0x03324…03338               Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x0020, t01=0x0134}
0x03338…03350               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x0020, t01=0x0148}
0x03350…03374               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 COMPLETE REQUEST «, t00=0x0020, t01=0x0160}
0x03374…03388               Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x0020, t01=0x0184}
0x03388…033a0               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0021, t01=0x0008}
0x033a0…033b2               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x0021, t01=0x0020}
0x033b2…033de               Head {h00=0x0028, h01=0x0050, text=» RB(Z) DCSS10 WACK HAS NOT BEEN SENT«, t00=0x0021, t01=0x0032}
0x033de…033f2               Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x0021, t01=0x005e}
0x033f2…03422               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x0021, t01=0x0072}
0x03422…0343a               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x0021, t01=0x00a2}
0x0343a…0344c               Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x0021, t01=0x00ba}
0x0344c…03458               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x00cc}
0x03458…03462               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0021, t01=0x00d8}
0x03462…0346a               Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x00e2}
0x0346a…03474               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00ea}
0x03474…0349a               Head {h00=0x0022, h01=0x0050, text=»*   SET REQUEST TIMEOUT VALUE «, t00=0x0021, t01=0x00f4}
0x0349a…034a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x011a}
0x034a4…034ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0124}
0x034ae…034b6               Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x012e}
0x034b6…034ca               Head {h00=0x0010, h01=0x0050, text=»REQTIM EQU *«, t00=0x0021, t01=0x0136}
0x034ca…034f0               Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBCW,A8 TIMEOUT VALUE «, t00=0x0021, t01=0x014a}
0x034f0…03518               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTTIM,A6 SAVE IT IN DWT «, t00=0x0021, t01=0x0170}
0x03518…0353c               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 TENDIO & DISPATCH«, t00=0x0022, t01=0x0008}
0x0353c…03544               Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x002c}
0x03544…0354e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0034}
0x0354e…0357a               Head {h00=0x0028, h01=0x0050, text=»*   ILLEGAL APPLICATION BUFFER SIZE «, t00=0x0022, t01=0x003e}
0x0357a…03584               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x006a}
0x03584…0358c               Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0074}
0x0358c…035c8               Head {h00=0x0038, h01=0x0050, text=»IL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH «, t00=0x0022, t01=0x007c}
0x035c8…035ec               Head {h00=0x0020, h01=0x0050, text=» ABL DISEND COMPLETE REQUEST«, t00=0x0022, t01=0x00b8}
0x035ec…035f6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0022, t01=0x00dc}
0x035f6…03600               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00e6}
0x03600…0360a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00f0}
0x0360a…03614               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00fa}
0x03614…03632               Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x0022, t01=0x0104}
0x03632…0363c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0122}
0x0363c…03646               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x012c}
0x03646…03650               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0136}
0x03650…0366c               Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x0022, t01=0x0140}
0x0366c…03676               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x015c}
0x03676…0368a               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x0022, t01=0x0166}
0x0368a…0369c               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0022, t01=0x017a}
0x0369c…036ce               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0022, t01=0x018c}
0x036ce…036ee               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x0023, t01=0x002e}
0x036ee…03704               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x0023, t01=0x004e}
0x03704…0371a               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0023, t01=0x0064}
0x0371a…0372e               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x0023, t01=0x007a}
0x0372e…03744               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x0023, t01=0x008e}
0x03744…03770               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x0023, t01=0x00a4}
0x03770…03784               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x0023, t01=0x00d0}
0x03784…0379e               Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x0023, t01=0x00e4}
0x0379e…037a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00fe}
0x037a8…037c4               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x0023, t01=0x0108}
0x037c4…037ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0124}
0x037ce…037e2               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x0023, t01=0x012e}
0x037e2…037fe               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0023, t01=0x0142}
0x037fe…03812               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0023, t01=0x015e}
0x03812…03826               Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x0023, t01=0x0172}
0x03826…0384c               Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x0023, t01=0x0186}
0x0384c…03874               Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x0024, t01=0x001c}
0x03874…0387e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0044}
0x0387e…0389a               Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x0024, t01=0x004e}
0x0389a…038a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x006a}
0x038a4…038bc               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x0024, t01=0x0074}
0x038bc…038ee               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0024, t01=0x008c}
0x038ee…0390e               Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x0024, t01=0x00be}
0x0390e…03922               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x0024, t01=0x00de}
0x03922…03938               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0024, t01=0x00f2}
0x03938…0394c               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x0024, t01=0x0108}
0x0394c…03960               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x0024, t01=0x011c}
0x03960…03978               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x0024, t01=0x0130}
0x03978…0398a               Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x0024, t01=0x0148}
0x0398a…03994               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0024, t01=0x015a}
0x03994…0399e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0164}
0x0399e…039bc               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x0024, t01=0x016e}
0x039bc…039c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x018c}
0x039c6…039da               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x0025, t01=0x0008}
0x039da…039f6               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0025, t01=0x001c}
0x039f6…03a0a               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0025, t01=0x0038}
0x03a0a…03a38               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0025, t01=0x004c}
0x03a38…03a42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x007a}
0x03a42…03a6c               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x0025, t01=0x0084}
0x03a6c…03a90               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x0025, t01=0x00ae}
0x03a90…03aa6               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x0025, t01=0x00d2}
0x03aa6…03ab8               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0025, t01=0x00e8}
0x03ab8…03ae6               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT IS NOT WRITING«, t00=0x0025, t01=0x00fa}
0x03ae6…03b12               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x0025, t01=0x0128}
0x03b12…03b24               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0025, t01=0x0154}
0x03b24…03b2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0166}
0x03b2e…03b38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0170}
0x03b38…03b4a               Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x0025, t01=0x017a}
0x03b4a…03b54               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0025, t01=0x018c}
0x03b54…03b5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0008}
0x03b5e…03b68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0012}
0x03b68…03b86               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0026, t01=0x001c}
0x03b86…03b90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x003a}
0x03b90…03bba               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0026, t01=0x0044}
0x03bba…03bc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x006e}
0x03bc4…03bce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0078}
0x03bce…03be2               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0026, t01=0x0082}
0x03be2…03c0c               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0026, t01=0x0096}
0x03c0c…03c2e               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0026, t01=0x00c0}
0x03c2e…03c42               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0026, t01=0x00e2}
0x03c42…03c68               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0026, t01=0x00f6}
0x03c68…03c88               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0026, t01=0x011c}
0x03c88…03c9c               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0026, t01=0x013c}
0x03c9c…03cb0               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0026, t01=0x0150}
0x03cb0…03cc2               Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0026, t01=0x0164}
0x03cc2…03ccc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0026, t01=0x0176}
0x03ccc…03cd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0180}
0x03cd6…03cf2               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0026, t01=0x018a}
0x03cf2…03cfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0016}
0x03cfc…03d24               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0027, t01=0x0020}
0x03d24…03d48               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0027, t01=0x0048}
0x03d48…03d72               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0027, t01=0x006c}
0x03d72…03d94               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0027, t01=0x0096}
0x03d94…03d9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00b8}
0x03d9e…03da8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00c2}
0x03da8…03dd4               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0027, t01=0x00cc}
0x03dd4…03de4               Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x0027, t01=0x00f8}
0x03de4…03df8               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x0027, t01=0x0108}
0x03df8…03e1c               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x0027, t01=0x011c}
0x03e1c…03e4e               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x0027, t01=0x0140}
0x03e4e…03e60               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0027, t01=0x0172}
0x03e60…03e8e               Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0027, t01=0x0184}
0x03e8e…03eb0               Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x0028, t01=0x0022}
0x03eb0…03eba               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0028, t01=0x0044}
0x03eba…03ec4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x004e}
0x03ec4…03ece               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0058}
0x03ece…03efa               Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x0028, t01=0x0062}
0x03efa…03f04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x008e}
0x03f04…03f20               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0028, t01=0x0098}
0x03f20…03f30               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0028, t01=0x00b4}
0x03f30…03f3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00c4}
0x03f3a…03f66               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0028, t01=0x00ce}
0x03f66…03f82               Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x0028, t01=0x00fa}
0x03f82…03f9c               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0028, t01=0x0116}
0x03f9c…03fc4               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0028, t01=0x0130}
0x03fc4…03fd6               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0028, t01=0x0158}
0x03fd6…03fe8               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0028, t01=0x016a}
0x03fe8…04000               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0028, t01=0x017c}
0x04000…04022 (41, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0029, t01=0x0004}
0x04022…04048               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0029, t01=0x0026}
0x04048…04062               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0029, t01=0x004c}
0x04062…0406c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0066}
0x0406c…04076               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0070}
0x04076…040a4               Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x0029, t01=0x007a}
0x040a4…040ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00a8}
0x040ae…040ca               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0029, t01=0x00b2}
0x040ca…040da               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0029, t01=0x00ce}
0x040da…040e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00de}
0x040e4…04112               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x0029, t01=0x00e8}
0x04112…04148               Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x0029, t01=0x0116}
0x04148…0415c               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x0029, t01=0x014c}
0x0415c…04170               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x0029, t01=0x0160}
0x04170…04188               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x0029, t01=0x0174}
0x04188…041b2               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x0029, t01=0x018c}
0x041b2…041c4               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x002a, t01=0x0026}
0x041c4…041d8               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x002a, t01=0x0038}
0x041d8…041f4               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x002a, t01=0x004c}
0x041f4…04206               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x002a, t01=0x0068}
0x04206…04226               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x002a, t01=0x007a}
0x04226…04238               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x002a, t01=0x009a}
0x04238…04252               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x002a, t01=0x00ac}
0x04252…0425c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002a, t01=0x00c6}
0x0425c…04266               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00d0}
0x04266…04270               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00da}
0x04270…04294               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x002a, t01=0x00e4}
0x04294…0429e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0108}
0x0429e…042b2               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x002a, t01=0x0112}
0x042b2…042ce               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002a, t01=0x0126}
0x042ce…042de               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002a, t01=0x0142}
0x042de…042e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0152}
0x042e8…042fc               Head {h00=0x0010, h01=0x0050, text=»INSSQ EQU * «, t00=0x002a, t01=0x015c}
0x042fc…04328               Head {h00=0x0028, h01=0x0050, text=» LD A2,0,A6 GET TERMINAL ADDRESS DK4«, t00=0x002a, t01=0x0170}
0x04328…04356               Head {h00=0x002a, h01=0x0050, text=» ANK A2,/FF IF ADDRESS = 00 OR /7F DK4«, t00=0x002b, t01=0x000c}
0x04356…04382               Head {h00=0x0028, h01=0x0050, text=» RB(Z) GBUF10 DONT PUT IN STATUS DK4«, t00=0x002b, t01=0x003a}
0x04382…043b2               Head {h00=0x002c, h01=0x0050, text=» SUK A2,/7F QUEUE, TERMINAL HAS BEEN DK4«, t00=0x002b, t01=0x0066}
0x043b2…043da               Head {h00=0x0024, h01=0x0050, text=» RB(Z) GBUF10 MADE INACTIVE DK4 «, t00=0x002b, t01=0x0096}
0x043da…04402               Head {h00=0x0024, h01=0x0050, text=» LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002b, t01=0x00be}
0x04402…04418               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002b, t01=0x00e6}
0x04418…0442a               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002b, t01=0x00fc}
0x0442a…04434               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x010e}
0x04434…0443e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0118}
0x0443e…04464               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x002b, t01=0x0122}
0x04464…0446e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0148}
0x0446e…0448a               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x0152}
0x0448a…0449a               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x016e}
0x0449a…044a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x017e}
0x044a4…044d2               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002b, t01=0x0188}
0x044d2…044e8               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002c, t01=0x0026}
0x044e8…044fa               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x002c, t01=0x003c}
0x044fa…04506               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x004e}
0x04506…04510               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002c, t01=0x005a}
0x04510…0451a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0064}
0x0451a…04524               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x006e}
0x04524…0454c               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x002c, t01=0x0078}
0x0454c…04556               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00a0}
0x04556…0456e               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x002c, t01=0x00aa}
0x0456e…04588               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002c, t01=0x00c2}
0x04588…04592               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00dc}
0x04592…045a6               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002c, t01=0x00e6}
0x045a6…045bc               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002c, t01=0x00fa}
0x045bc…045e8               Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002c, t01=0x0110}
0x045e8…045f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x013c}
0x045f4…0460a               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002c, t01=0x0148}
0x0460a…04632               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002c, t01=0x015e}
0x04632…0463e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0186}
0x0463e…0466e (45, 0, 400)  Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002d, t01=0x0004}
0x0466e…04682               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002d, t01=0x0034}
0x04682…04696               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002d, t01=0x0048}
0x04696…046be               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002d, t01=0x005c}
0x046be…046d0               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002d, t01=0x0084}
0x046d0…046e2               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002d, t01=0x0096}
0x046e2…0470c               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002d, t01=0x00a8}
0x0470c…04732               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002d, t01=0x00d2}
0x04732…04742               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002d, t01=0x00f8}
0x04742…0474c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002d, t01=0x0108}
0x0474c…04756               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0112}
0x04756…04760               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x011c}
0x04760…04796               Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x002d, t01=0x0126}
0x04796…047a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x015c}
0x047a0…047d8               Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x002d, t01=0x0166}
0x047d8…047e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x000e}
0x047e2…04800               Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x002e, t01=0x0018}
0x04800…04818               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x002e, t01=0x0036}
0x04818…04838               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x002e, t01=0x004e}
0x04838…04858               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x002e, t01=0x006e}
0x04858…04870               Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x002e, t01=0x008e}
0x04870…0488a               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x002e, t01=0x00a6}
0x0488a…048b2               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x002e, t01=0x00c0}
0x048b2…048e0               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x002e, t01=0x00e8}
0x048e0…04906               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x002e, t01=0x0116}
0x04906…0490e               Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x013c}
0x0490e…04916               Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x0144}
0x04916…04946               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x002e, t01=0x014c}
0x04946…04978               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x002e, t01=0x017c}
0x04978…0499e               Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x002f, t01=0x001e}
0x0499e…049c8               Head {h00=0x0026, h01=0x0050, text=»   DONT DESTROY BUFFER ADDRESS =6 «, t00=0x002f, t01=0x0044}
0x049c8…049dc               Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x002f, t01=0x006e}
0x049dc…04a10               Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x002f, t01=0x0082}
0x04a10…04a24               Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x002f, t01=0x00b6}
0x04a24…04a56               Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x002f, t01=0x00ca}
0x04a56…04a5e               Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x00fc}
0x04a5e…04a82               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x002f, t01=0x0104}
0x04a82…04aac               Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 RECEIVE BUFFER ADDRESS «, t00=0x002f, t01=0x0128}
0x04aac…04adc               Head {h00=0x002c, h01=0x0050, text=» CF A15,DC:MIN MOVE DATA TO USER BUFFER «, t00=0x002f, t01=0x0152}
0x04adc…04b0a               Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x002f, t01=0x0182}
0x04b0a…04b22               Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0030, t01=0x0020}
0x04b22…04b5e               Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x0030, t01=0x0038}
0x04b5e…04b8e               Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x0030, t01=0x0074}
0x04b8e…04ba4               Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x0030, t01=0x00a4}
0x04ba4…04bba               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x0030, t01=0x00ba}
0x04bba…04be4               Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x0030, t01=0x00d0}
0x04be4…04c12               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x0030, t01=0x00fa}
0x04c12…04c46               Head {h00=0x0030, h01=0x0050, text=» CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x0030, t01=0x0128}
0x04c46…04c58               Head {h00=0x000e, h01=0x0050, text=» RB CKM110«, t00=0x0030, t01=0x015c}
0x04c58…04c62               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0030, t01=0x016e}
0x04c62…04c6a               Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x0178}
0x04c6a…04cae               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0030, t01=0x0180}
0x04cae…04cb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0034}
0x04cb8…04cd2               Head {h00=0x0016, h01=0x0050, text=»*    ABORT ROUTINE«, t00=0x0031, t01=0x003e}
0x04cd2…04cdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0058}
0x04cdc…04cfc               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0031, t01=0x0062}
0x04cfc…04d04               Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x0082}
0x04d04…04d2e               Head {h00=0x0026, h01=0x0050, text=»ABORT LD A1,DWTTP,A6 TIMER POINTER«, t00=0x0031, t01=0x008a}
0x04d2e…04d54               Head {h00=0x0022, h01=0x0050, text=» RF(Z) AB:10 NO TIMER RUNNING «, t00=0x0031, t01=0x00b4}
0x04d54…04d74               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 KILL TIMER«, t00=0x0031, t01=0x00da}
0x04d74…04d88               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0031, t01=0x00fa}
0x04d88…04d90               Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x010e}
0x04d90…04db8               Head {h00=0x0024, h01=0x0050, text=»AB:10 LD A1,DWTOR,A6 ORDER CODE «, t00=0x0031, t01=0x0116}
0x04db8…04dca               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0031, t01=0x013e}
0x04dca…04df8               Head {h00=0x002a, h01=0x0050, text=» RF(Z) AB:RTN READ REQUEST. NO ACTION «, t00=0x0031, t01=0x0150}
0x04df8…04e0a               Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x0031, t01=0x017e}
0x04e0a…04e3c               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE«, t00=0x0031, t01=0x0190}
0x04e3c…04e44               Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x0032}
0x04e44…04e76               Head {h00=0x002e, h01=0x0050, text=» CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE«, t00=0x0032, t01=0x003a}
0x04e76…04ea0               Head {h00=0x0026, h01=0x0050, text=» LD A2,FDWTUT WRITING DWT ADDRESS «, t00=0x0032, t01=0x006c}
0x04ea0…04eb2               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0032, t01=0x0096}
0x04eb2…04ed6               Head {h00=0x0020, h01=0x0050, text=» RF(NE) AB:RTN NOT THIS DWT «, t00=0x0032, t01=0x00a8}
0x04ed6…04efa               Head {h00=0x0020, h01=0x0050, text=» CM XACK RESET ACK EXPECTED «, t00=0x0032, t01=0x00cc}
0x04efa…04f1e               Head {h00=0x0020, h01=0x0050, text=» CM FDWTUT RESET WRITING DWT«, t00=0x0032, t01=0x00f0}
0x04f1e…04f26               Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x0114}
0x04f26…04f3a               Head {h00=0x0010, h01=0x0050, text=»AB:RTN EQU *«, t00=0x0032, t01=0x011c}
0x04f3a…04f50               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0032, t01=0x0130}
0x04f50…04f64               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0032, t01=0x0146}
0x04f64…04f8c               Head {h00=0x0024, h01=0x0050, text=» ABR* A15 RETURN IN INHIBIT MODE«, t00=0x0032, t01=0x015a}
0x04f8c…04f98               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x0182}
0x04f98…04fae               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0032, t01=0x018e}
0x04fae…04fbe               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0033, t01=0x0014}
0x04fbe…04fca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0024}
0x04fca…04fd4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0033, t01=0x0030}
0x04fd4…04fdc               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x003a}
0x04fdc…04fe6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0033, t01=0x0042}
0x04fe6…04ff0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x004c}
0x04ff0…04ffa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0056}
0x04ffa…05018               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0033, t01=0x0060}
0x05018…05040               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0033, t01=0x007e}
0x05040…0504a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00a6}
0x0504a…0505c               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0033, t01=0x00b0}
0x0505c…05084               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0033, t01=0x00c2}
0x05084…0508e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00ea}
0x0508e…05098               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00f4}
0x05098…050b0               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0033, t01=0x00fe}
0x050b0…050c4               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0033, t01=0x0116}
0x050c4…050d8               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0033, t01=0x012a}
0x050d8…050ec               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0033, t01=0x013e}
0x050ec…05100               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0033, t01=0x0152}
0x05100…05114               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0033, t01=0x0166}
0x05114…0512e               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0033, t01=0x017a}
0x0512e…05138 (52, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0034, t01=0x0004}
0x05138…05150               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0034, t01=0x000e}
0x05150…05164               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0034, t01=0x0026}
0x05164…05176               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0034, t01=0x003a}
0x05176…0518a               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0034, t01=0x004c}
0x0518a…0519c               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0034, t01=0x0060}
0x0519c…051b0               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0034, t01=0x0072}
0x051b0…051c2               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0034, t01=0x0086}
0x051c2…051d6               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0034, t01=0x0098}
0x051d6…051e8               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0034, t01=0x00ac}
0x051e8…051fc               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0034, t01=0x00be}
0x051fc…0520e               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0034, t01=0x00d2}
0x0520e…05222               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0034, t01=0x00e4}
0x05222…05236               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0034, t01=0x00f8}
0x05236…0524a               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0034, t01=0x010c}
0x0524a…0525c               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0034, t01=0x0120}
0x0525c…05266               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0034, t01=0x0132}
0x05266…05270               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x013c}
0x05270…0527a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0146}
0x0527a…05290               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0034, t01=0x0150}
0x05290…0529a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0166}
0x0529a…052a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0170}
0x052a4…052d2               Head {h00=0x002a, h01=0x0050, text=»TIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK«, t00=0x0034, t01=0x017a}
0x052d2…052f8               Head {h00=0x0022, h01=0x0050, text=»TIMNAK EQU 3 DELAY FOR NAK DK «, t00=0x0035, t01=0x0018}
0x052f8…05302               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x003e}
0x05302…0530c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0048}
0x0530c…05328               Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0035, t01=0x0052}
0x05328…05332               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x006e}
0x05332…0535c               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0035, t01=0x0078}
0x0535c…05370               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0035, t01=0x00a2}
0x05370…05384               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0035, t01=0x00b6}
0x05384…05398               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0035, t01=0x00ca}
0x05398…053ac               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0035, t01=0x00de}
0x053ac…053c0               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0035, t01=0x00f2}
0x053c0…053d4               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0035, t01=0x0106}
0x053d4…053e8               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0035, t01=0x011a}
0x053e8…053fc               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0035, t01=0x012e}
0x053fc…05410               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0035, t01=0x0142}
0x05410…05424               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0035, t01=0x0156}
0x05424…05438               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0035, t01=0x016a}
0x05438…0544c               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0035, t01=0x017e}
0x0544c…0545e (54, 0, 398)  Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0036, t01=0x0004}
0x0545e…05474               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0036, t01=0x0016}
0x05474…0548a               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0036, t01=0x002c}
0x0548a…0549e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0036, t01=0x0042}
0x0549e…054b2               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0036, t01=0x0056}
0x054b2…054c6               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0036, t01=0x006a}
0x054c6…054da               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0036, t01=0x007e}
0x054da…054ee               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0036, t01=0x0092}
0x054ee…05502               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0036, t01=0x00a6}
0x05502…05516               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0036, t01=0x00ba}
0x05516…0552a               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0036, t01=0x00ce}
0x0552a…05536               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x00e2}
0x05536…0554a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0036, t01=0x00ee}
0x0554a…0555e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0036, t01=0x0102}
0x0555e…05592               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0036, t01=0x0116}
0x05592…0559e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x014a}
0x0559e…055b2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0036, t01=0x0156}
0x055b2…055c6               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0036, t01=0x016a}
0x055c6…055da               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0036, t01=0x017e}
0x055da…055f2 (55, 0, 400)  Head {h00=0x0014, h01=0x0050, text=»RVI EQU XRVI  DK«, t00=0x0037, t01=0x0004}
0x055f2…05606               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0037, t01=0x001c}
0x05606…0561a               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0037, t01=0x0030}
0x0561a…05630               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0037, t01=0x0044}
0x05630…0563c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x005a}
0x0563c…05646               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0037, t01=0x0066}
0x05646…05650               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0070}
0x05650…0565a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x007a}
0x0565a…05678               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0037, t01=0x0084}
0x05678…05682               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00a2}
0x05682…0568c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00ac}
0x0568c…056ba               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0037, t01=0x00b6}
0x056ba…056ec               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0037, t01=0x00e4}
0x056ec…0570c               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x0037, t01=0x0116}
0x0570c…05728               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x0037, t01=0x0136}
0x05728…05744               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x0037, t01=0x0152}
0x05744…0577a               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x0037, t01=0x016e}
0x0577a…057a0               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x0038, t01=0x0014}
0x057a0…057c0               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x0038, t01=0x003a}
0x057c0…057ee               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x0038, t01=0x005a}
0x057ee…057f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0088}
0x057f8…05816               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x0038, t01=0x0092}
0x05816…05842               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x0038, t01=0x00b0}
0x05842…0586c               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x0038, t01=0x00dc}
0x0586c…0588c               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x0038, t01=0x0106}
0x0588c…058c0               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x0038, t01=0x0126}
0x058c0…058e8               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x0038, t01=0x015a}
0x058e8…0591a               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x0038, t01=0x0182}
0x0591a…0594a               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x0039, t01=0x0024}
0x0594a…05976               Head {h00=0x0028, h01=0x0050, text=»CRDBUF DATA 0 READ BUFFER COUNTER DK«, t00=0x0039, t01=0x0054}
0x05976…05980               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0080}
0x05980…0598a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x008a}
0x0598a…059b2               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x0039, t01=0x0094}
0x059b2…059bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00bc}
0x059bc…059c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00c6}
0x059c6…059da               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0039, t01=0x00d0}
0x059da…05a0c               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x0039, t01=0x00e4}
0x05a0c…05a16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0116}
0x05a16…05a20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0120}
0x05a20…05a34               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x0039, t01=0x012a}
0x05a34…05a48               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x0039, t01=0x013e}
0x05a48…05a52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0152}
0x05a52…05a88               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x0039, t01=0x015c}
0x05a88…05ab8 (58, 0, 400)  Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x003a, t01=0x0004}
0x05ab8…05ac4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x0034}
0x05ac4…05ace               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x003a, t01=0x0040}
0x05ace…05ad8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x004a}
0x05ad8…05ae2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0054}
0x05ae2…05afe               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x003a, t01=0x005e}
0x05afe…05b08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x007a}
0x05b08…05b2e               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x003a, t01=0x0084}
0x05b2e…05b58               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x003a, t01=0x00aa}
0x05b58…05b62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00d4}
0x05b62…05b6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00de}
0x05b6c…05b88               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003a, t01=0x00e8}
0x05b88…05bb8               Head {h00=0x002c, h01=0x0050, text=»BRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ«, t00=0x003a, t01=0x0104}
0x05bb8…05bce               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003a, t01=0x0134}
0x05bce…05be0               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x003a, t01=0x014a}
0x05be0…05c04               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x003a, t01=0x015c}
0x05c04…05c20               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003a, t01=0x0180}
0x05c20…05c56               Head {h00=0x0032, h01=0x0050, text=» CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS «, t00=0x003b, t01=0x000c}
0x05c56…05c6c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x0042}
0x05c6c…05c88               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003b, t01=0x0058}
0x05c88…05cbc               Head {h00=0x0030, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ«, t00=0x003b, t01=0x0074}
0x05cbc…05cd2               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x00a8}
0x05cd2…05ce6               Head {h00=0x0010, h01=0x0050, text=»BRM010 EQU *«, t00=0x003b, t01=0x00be}
0x05ce6…05d08               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x003b, t01=0x00d2}
0x05d08…05d3c               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN«, t00=0x003b, t01=0x00f4}
0x05d3c…05d52               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x0128}
0x05d52…05d6e               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003b, t01=0x013e}
0x05d6e…05d82               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x003b, t01=0x015a}
0x05d82…05dba               Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN «, t00=0x003b, t01=0x016e}
0x05dba…05dd0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x0016}
0x05dd0…05dec               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003c, t01=0x002c}
0x05dec…05e12               Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x003c, t01=0x0048}
0x05e12…05e28               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x006e}
0x05e28…05e44               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003c, t01=0x0084}
0x05e44…05e60               Head {h00=0x0018, h01=0x0050, text=» IFF CODE=1  SALCUZ «, t00=0x003c, t01=0x00a0}
0x05e60…05e7c               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x003c, t01=0x00bc}
0x05e7c…05eaa               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003c, t01=0x00d8}
0x05eaa…05ec6               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x003c, t01=0x0106}
0x05ec6…05efc               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003c, t01=0x0122}
0x05efc…05f1a               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003c, t01=0x0158}
0x05f1a…05f30               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x0176}
0x05f30…05f52               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=2  SALCUZ «, t00=0x003c, t01=0x018c}
0x05f52…05f6c               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x003d, t01=0x001e}
0x05f6c…05f9a               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003d, t01=0x0038}
0x05f9a…05fb8               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x003d, t01=0x0066}
0x05fb8…05fee               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003d, t01=0x0084}
0x05fee…0600c               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003d, t01=0x00ba}
0x0600c…06022               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x00d8}
0x06022…06036               Head {h00=0x0010, h01=0x0050, text=»BRM100 EQU *«, t00=0x003d, t01=0x00ee}
0x06036…0605e               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003d, t01=0x0102}
0x0605e…06082               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003d, t01=0x012a}
0x06082…06094               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003d, t01=0x014e}
0x06094…060a8               Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x003d, t01=0x0160}
0x060a8…060ca               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x003d, t01=0x0174}
0x060ca…060e2               Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x003e, t01=0x0008}
0x060e2…06104               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x003e, t01=0x0020}
0x06104…0611c               Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x003e, t01=0x0042}
0x0611c…06140               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x003e, t01=0x005a}
0x06140…06158               Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x003e, t01=0x007e}
0x06158…0617c               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x003e, t01=0x0096}
0x0617c…06194               Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x003e, t01=0x00ba}
0x06194…061b8               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x003e, t01=0x00d2}
0x061b8…061cc               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003e, t01=0x00f6}
0x061cc…061de               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003e, t01=0x010a}
0x061de…06206               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003e, t01=0x011c}
0x06206…0622a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003e, t01=0x0144}
0x0622a…0623c               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003e, t01=0x0168}
0x0623c…06266               Head {h00=0x0026, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESSING «, t00=0x003e, t01=0x017a}
0x06266…06272               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x0014}
0x06272…06284               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003f, t01=0x0020}
0x06284…0629c               Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x003f, t01=0x0032}
0x0629c…062ba               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x003f, t01=0x004a}
0x062ba…062cc               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x003f, t01=0x0068}
0x062cc…062e2               Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x003f, t01=0x007a}
0x062e2…06306               Head {h00=0x0020, h01=0x0050, text=» RF(NE) BRM150 NOT THIS TCU «, t00=0x003f, t01=0x0090}
0x06306…0631a               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x003f, t01=0x00b4}
0x0631a…0633c               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x003f, t01=0x00c8}
0x0633c…06360               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003f, t01=0x00ea}
0x06360…06372               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003f, t01=0x010e}
0x06372…06386               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003f, t01=0x0120}
0x06386…063a8               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x003f, t01=0x0134}
0x063a8…063cc               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003f, t01=0x0156}
0x063cc…063de               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003f, t01=0x017a}
0x063de…0640e               Head {h00=0x002c, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESS SEQUENCE «, t00=0x003f, t01=0x018c}
0x0640e…0641a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x002c}
0x0641a…06440               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ READ ONE CHARACTER«, t00=0x0040, t01=0x0038}
0x06440…0645c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0040, t01=0x005e}
0x0645c…06474               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0040, t01=0x007a}
0x06474…0648a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0040, t01=0x0092}
0x0648a…064a6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0040, t01=0x00a8}
0x064a6…064c2               Head {h00=0x0018, h01=0x0050, text=» SUK A2,ENQ  SALCUZ «, t00=0x0040, t01=0x00c4}
0x064c2…064d8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0040, t01=0x00e0}
0x064d8…064f6               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) BRM150 NOT ENQ«, t00=0x0040, t01=0x00f6}
0x064f6…06512               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0040, t01=0x0114}
0x06512…0653a               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ READ LAST CHARACTER «, t00=0x0040, t01=0x0130}
0x0653a…06542               Head {h00=0x0004, h01=0x0050, t00=0x0040, t01=0x0158}
0x06542…06568               Head {h00=0x0022, h01=0x0050, text=»* TRAILING PAD CAN BE CHECKED «, t00=0x0040, t01=0x0160}
0x06568…06570               Head {h00=0x0004, h01=0x0050, t00=0x0040, t01=0x0186}
0x06570…06592               Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,LCUIN HALT INPUT«, t00=0x0040, t01=0x018e}
0x06592…065a8               Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUIN «, t00=0x0041, t01=0x0020}
0x065a8…065be               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0041, t01=0x0036}
0x065be…065da               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0041, t01=0x004c}
0x065da…06602               Head {h00=0x0024, h01=0x0050, text=» CF A5,HALTIN HALT INPUT SALCUZ «, t00=0x0041, t01=0x0068}
0x06602…06634               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) BRM010 PARITY ERROR SALCUZ  SALCUZ«, t00=0x0041, t01=0x0090}
0x06634…0664a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0041, t01=0x00c2}
0x0664a…0665c               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0041, t01=0x00d8}
0x0665c…06680               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK COUNTER«, t00=0x0041, t01=0x00ea}
0x06680…06692               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x0041, t01=0x010e}
0x06692…066a4               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x0041, t01=0x0120}
0x066a4…066c4               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x0041, t01=0x0132}
0x066c4…066d6               Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x0041, t01=0x0152}
0x066d6…066f8               Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x0041, t01=0x0164}
0x066f8…0670c               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0041, t01=0x0186}
0x0670c…06746               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x0042, t01=0x000a}
0x06746…06752               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0044}
0x06752…06766               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0042, t01=0x0050}
0x06766…06790               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0042, t01=0x0064}
0x06790…0679c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x008e}
0x0679c…067be               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0042, t01=0x009a}
0x067be…067e2               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x0042, t01=0x00bc}
0x067e2…067fe               Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x0042, t01=0x00e0}
0x067fe…06812               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x0042, t01=0x00fc}
0x06812…0683c               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0042, t01=0x0110}
0x0683c…0685e               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0042, t01=0x013a}
0x0685e…0687e               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x0042, t01=0x015c}
0x0687e…06894               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=0   «, t00=0x0042, t01=0x017c}
0x06894…068bc (67, 0, 400)  Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x0043, t01=0x0004}
0x068bc…068d0               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0043, t01=0x002c}
0x068d0…068e4               Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x0043, t01=0x0040}
0x068e4…068f4               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0043, t01=0x0054}
0x068f4…0690a               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=1   «, t00=0x0043, t01=0x0064}
0x0690a…0692a               Head {h00=0x001c, h01=0x0050, text=» ABL BRM INVALID ADDRESS«, t00=0x0043, t01=0x007a}
0x0692a…0693a               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0043, t01=0x009a}
0x0693a…06944               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00aa}
0x06944…06974               Head {h00=0x002c, h01=0x0050, text=»*   WAIT FOR MARK HOLD TO RESYNCHRONIZE «, t00=0x0043, t01=0x00b4}
0x06974…0697e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00e4}
0x0697e…06992               Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0043, t01=0x00ee}
0x06992…069a6               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0043, t01=0x0102}
0x069a6…069ba               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0043, t01=0x0116}
0x069ba…069da               Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM RESYNCHRONIZE«, t00=0x0043, t01=0x012a}
0x069da…06a04               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ ANOTHER CHARACTER«, t00=0x0043, t01=0x014a}
0x06a04…06a16               Head {h00=0x000e, h01=0x0050, text=» RB BRM150«, t00=0x0043, t01=0x0174}
0x06a16…06a20               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0043, t01=0x0186}
0x06a20…06a2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0190}
0x06a2a…06a34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x000a}
0x06a34…06a54               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0044, t01=0x0014}
0x06a54…06a5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0034}
0x06a5e…06a68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x003e}
0x06a68…06a7c               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0044, t01=0x0048}
0x06a7c…06aa6               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0044, t01=0x005c}
0x06aa6…06aba               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0044, t01=0x0086}
0x06aba…06adc               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0044, t01=0x009a}
0x06adc…06ae8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x00bc}
0x06ae8…06afc               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0044, t01=0x00c8}
0x06afc…06b26               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0044, t01=0x00dc}
0x06b26…06b4c               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0044, t01=0x0106}
0x06b4c…06b70               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0044, t01=0x012c}
0x06b70…06b8a               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0044, t01=0x0150}
0x06b8a…06bb6               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0044, t01=0x016a}
0x06bb6…06bca               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0045, t01=0x0008}
0x06bca…06bf0               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0045, t01=0x001c}
0x06bf0…06c04               Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0045, t01=0x0042}
0x06c04…06c26               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0045, t01=0x0056}
0x06c26…06c36               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0045, t01=0x0078}
0x06c36…06c40               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0045, t01=0x0088}
0x06c40…06c4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0092}
0x06c4a…06c54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x009c}
0x06c54…06c74               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0045, t01=0x00a6}
0x06c74…06c7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00c6}
0x06c7e…06c88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00d0}
0x06c88…06c9c               Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0045, t01=0x00da}
0x06c9c…06cb0               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0045, t01=0x00ee}
0x06cb0…06cc4               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0045, t01=0x0102}
0x06cc4…06ce6               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0045, t01=0x0116}
0x06ce6…06cfc               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0045, t01=0x0138}
0x06cfc…06d26               Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0045, t01=0x014e}
0x06d26…06d3a               Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0045, t01=0x0178}
0x06d3a…06d5c               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0045, t01=0x018c}
0x06d5c…06d6e               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0046, t01=0x001e}
0x06d6e…06d90               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0046, t01=0x0030}
0x06d90…06da4               Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0046, t01=0x0052}
0x06da4…06dd0               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0046, t01=0x0066}
0x06dd0…06de4               Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0046, t01=0x0092}
0x06de4…06e02               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0046, t01=0x00a6}
0x06e02…06e12               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0046, t01=0x00c4}
0x06e12…06e26               Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0046, t01=0x00d4}
0x06e26…06e3a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0046, t01=0x00e8}
0x06e3a…06e4e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0046, t01=0x00fc}
0x06e4e…06e78               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0046, t01=0x0110}
0x06e78…06e8e               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0046, t01=0x013a}
0x06e8e…06eb8               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0046, t01=0x0150}
0x06eb8…06ede               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0046, t01=0x017a}
0x06ede…06f12               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0047, t01=0x0010}
0x06f12…06f2e               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0047, t01=0x0044}
0x06f2e…06f3a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0060}
0x06f3a…06f4e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0047, t01=0x006c}
0x06f4e…06f7e               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0047, t01=0x0080}
0x06f7e…06f98               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0047, t01=0x00b0}
0x06f98…06fc4               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0047, t01=0x00ca}
0x06fc4…06fe4               Head {h00=0x001c, h01=0x0050, text=» CM CACK PRESET ACK-1 =7«, t00=0x0047, t01=0x00f6}
0x06fe4…07008               Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x0047, t01=0x0116}
0x07008…07014               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x013a}
0x07014…07040               Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x0047, t01=0x0146}
0x07040…07058               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0047, t01=0x0172}
0x07058…07070               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0047, t01=0x018a}
0x07070…07082               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0048, t01=0x0012}
0x07082…0709a               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0048, t01=0x0024}
0x0709a…070b2               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ  =8 «, t00=0x0048, t01=0x003c}
0x070b2…070c4               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0048, t01=0x0054}
0x070c4…070f0               Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x0048, t01=0x0066}
0x070f0…07102               Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x0048, t01=0x0092}
0x07102…07116               Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x0048, t01=0x00a4}
0x07116…0713a               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0048, t01=0x00b8}
0x0713a…07162               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0048, t01=0x00dc}
0x07162…07174               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0048, t01=0x0104}
0x07174…07188               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0048, t01=0x0116}
0x07188…071ae               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x0048, t01=0x012a}
0x071ae…071c2               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0048, t01=0x0150}
0x071c2…071d6               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x0048, t01=0x0164}
0x071d6…071e8               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x0048, t01=0x0178}
0x071e8…0720c               Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x0048, t01=0x018a}
0x0720c…0721e               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0049, t01=0x001e}
0x0721e…07242               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x0049, t01=0x0030}
0x07242…07254               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0049, t01=0x0054}
0x07254…0726a               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x0049, t01=0x0066}
0x0726a…07296               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x0049, t01=0x007c}
0x07296…072b4               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x0049, t01=0x00a8}
0x072b4…072de               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x0049, t01=0x00c6}
0x072de…072ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x00f0}
0x072ea…072fe               Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x0049, t01=0x00fc}
0x072fe…07310               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0049, t01=0x0110}
0x07310…0733a               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x0049, t01=0x0122}
0x0733a…0734a               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0049, t01=0x014c}
0x0734a…07378               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0049, t01=0x015c}
0x07378…0738a               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0049, t01=0x018a}
0x0738a…073ae               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x004a, t01=0x000c}
0x073ae…073b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0030}
0x073b8…073de               Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x004a, t01=0x003a}
0x073de…073e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0060}
0x073e8…073fc               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x004a, t01=0x006a}
0x073fc…07410               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x004a, t01=0x007e}
0x07410…0742a               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x004a, t01=0x0092}
0x0742a…07440               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x004a, t01=0x00ac}
0x07440…07456               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x004a, t01=0x00c2}
0x07456…0746a               Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x004a, t01=0x00d8}
0x0746a…07476               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x00ec}
0x07476…0748a               Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x004a, t01=0x00f8}
0x0748a…074a0               Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x004a, t01=0x010c}
0x074a0…074d0               Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x004a, t01=0x0122}
0x074d0…074f2               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004a, t01=0x0152}
0x074f2…07512               Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x004a, t01=0x0174}
0x07512…0752c (75, 0, 400)  Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004b, t01=0x0004}
0x0752c…0754c               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004b, t01=0x001e}
0x0754c…07576               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM327 ANY MESSAGE ORDER =4«, t00=0x004b, t01=0x003e}
0x07576…07588               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x004b, t01=0x0068}
0x07588…0759a               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x004b, t01=0x007a}
0x0759a…075b2               Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x004b, t01=0x008c}
0x075b2…075d8               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x004b, t01=0x00a4}
0x075d8…075ec               Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x004b, t01=0x00ca}
0x075ec…07606               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x004b, t01=0x00de}
0x07606…0762e               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x004b, t01=0x00f8}
0x0762e…0764e               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x004b, t01=0x0120}
0x0764e…0767c               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x004b, t01=0x0140}
0x0767c…076a6               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x004b, t01=0x016e}
0x076a6…076d2               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x004c, t01=0x0008}
0x076d2…076dc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x004c, t01=0x0034}
0x076dc…076e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x003e}
0x076e6…076f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0048}
0x076f0…07724               Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x004c, t01=0x0052}
0x07724…0772e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0086}
0x0772e…07738               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0090}
0x07738…0774c               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004c, t01=0x009a}
0x0774c…0776c               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x004c, t01=0x00ae}
0x0776c…07780               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004c, t01=0x00ce}
0x07780…077a2               Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x004c, t01=0x00e2}
0x077a2…077b4               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x004c, t01=0x0104}
0x077b4…077ca               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004c, t01=0x0116}
0x077ca…077ec               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004c, t01=0x012c}
0x077ec…077fe               Head {h00=0x000e, h01=0x0050, text=» ORK A2,/A«, t00=0x004c, t01=0x014e}
0x077fe…07816               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004c, t01=0x0160}
0x07816…0782a               Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004c, t01=0x0178}
0x0782a…07836               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x018c}
0x07836…07850               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004d, t01=0x0008}
0x07850…07870               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004d, t01=0x0022}
0x07870…078a0               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 «, t00=0x004d, t01=0x0042}
0x078a0…078ca               Head {h00=0x0026, h01=0x0050, text=» SUK A4,6 ADJUST BUFFER ADDRESS =4«, t00=0x004d, t01=0x0072}
0x078ca…078f6               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE MESSAGE ON DWT =4«, t00=0x004d, t01=0x009c}
0x078f6…0790c               Head {h00=0x0012, h01=0x0050, text=» RF BRM32A  =4«, t00=0x004d, t01=0x00c8}
0x0790c…0791c               Head {h00=0x000c, h01=0x0050, text=» XIF  =4«, t00=0x004d, t01=0x00de}
0x0791c…07934               Head {h00=0x0014, h01=0x0050, text=»BRM329 EQU *  =4«, t00=0x004d, t01=0x00ee}
0x07934…0793c               Head {h00=0x0004, h01=0x0050, t00=0x004d, t01=0x0106}
0x0793c…07960               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x004d, t01=0x010e}
0x07960…0798a               Head {h00=0x0026, h01=0x0050, text=» CF A15,DC:MIN MOVE TO USER BUFFER«, t00=0x004d, t01=0x0132}
0x0798a…0799c               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004d, t01=0x015c}
0x0799c…079b4               Head {h00=0x0014, h01=0x0050, text=»BRM32A EQU *  =4«, t00=0x004d, t01=0x016e}
0x079b4…079bc               Head {h00=0x0004, h01=0x0050, t00=0x004d, t01=0x0186}
0x079bc…079e4               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004d, t01=0x018e}
0x079e4…079f6               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004e, t01=0x0026}
0x079f6…07a00               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x004e, t01=0x0038}
0x07a00…07a14               Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x004e, t01=0x0042}
0x07a14…07a2e               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004e, t01=0x0056}
0x07a2e…07a50               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 STATUS =4 «, t00=0x004e, t01=0x0070}
0x07a50…07a74               Head {h00=0x0020, h01=0x0050, text=» RF(N) BRM335 NO REQUEST =4 «, t00=0x004e, t01=0x0092}
0x07a74…07a94               Head {h00=0x001c, h01=0x0050, text=» LD A1,DWTOR,A6 ORDER =4«, t00=0x004e, t01=0x00b6}
0x07a94…07ac4               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 «, t00=0x004e, t01=0x00d6}
0x07ac4…07aee               Head {h00=0x0026, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST =4«, t00=0x004e, t01=0x0106}
0x07aee…07b06               Head {h00=0x0014, h01=0x0050, text=»BRM335 EQU *  =4«, t00=0x004e, t01=0x0130}
0x07b06…07b18               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x004e, t01=0x0148}
0x07b18…07b3a               Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x004e, t01=0x015a}
0x07b3a…07b66               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x004e, t01=0x017c}
0x07b66…07b98               Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x004f, t01=0x0018}
0x07b98…07bac               Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x004f, t01=0x004a}
0x07bac…07bce               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x004f, t01=0x005e}
0x07bce…07bde               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004f, t01=0x0080}
0x07bde…07bf2               Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x004f, t01=0x0090}
0x07bf2…07c06               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004f, t01=0x00a4}
0x07c06…07c1e               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x004f, t01=0x00b8}
0x07c1e…07c30               Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x004f, t01=0x00d0}
0x07c30…07c58               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x004f, t01=0x00e2}
0x07c58…07c78               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x004f, t01=0x010a}
0x07c78…07c8a               Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x004f, t01=0x012a}
0x07c8a…07c96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x013c}
0x07c96…07caa               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x004f, t01=0x0148}
0x07caa…07cbc               Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x004f, t01=0x015c}
0x07cbc…07cc8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x016e}
0x07cc8…07cd2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x004f, t01=0x017a}
0x07cd2…07cdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0184}
0x07cdc…07ce6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x018e}
0x07ce6…07d16               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x0050, t01=0x0008}
0x07d16…07d20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0038}
0x07d20…07d2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0042}
0x07d2a…07d3e               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0050, t01=0x004c}
0x07d3e…07d66               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x0050, t01=0x0060}
0x07d66…07d7a               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x0050, t01=0x0088}
0x07d7a…07da0               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x0050, t01=0x009c}
0x07da0…07dd8               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x0050, t01=0x00c2}
0x07dd8…07e00               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x0050, t01=0x00fa}
0x07e00…07e28               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x0050, t01=0x0122}
0x07e28…07e4e               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x0050, t01=0x014a}
0x07e4e…07e74               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x0050, t01=0x0170}
0x07e74…07e86               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0051, t01=0x0008}
0x07e86…07e98               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0051, t01=0x001a}
0x07e98…07ec2               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0051, t01=0x002c}
0x07ec2…07ed0               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x0051, t01=0x0056}
0x07ed0…07efe               Head {h00=0x002a, h01=0x0050, text=» LD A1,CRDBUF INCREMENT READ BUFFER DK«, t00=0x0051, t01=0x0064}
0x07efe…07f1a               Head {h00=0x0018, h01=0x0050, text=» ADK A1,1 COUNTER DK«, t00=0x0051, t01=0x0092}
0x07f1a…07f34               Head {h00=0x0016, h01=0x0050, text=» ST A1,CRDBUF  DK «, t00=0x0051, t01=0x00ae}
0x07f34…07f42               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x0051, t01=0x00c8}
0x07f42…07f56               Head {h00=0x0010, h01=0x0050, text=» ABL POL127 «, t00=0x0051, t01=0x00d6}
0x07f56…07f62               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x00ea}
0x07f62…07f6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00f6}
0x07f6c…07f76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0100}
0x07f76…07f96               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x0051, t01=0x010a}
0x07f96…07fa0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x012a}
0x07fa0…07faa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0134}
0x07faa…07fbe               Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x0051, t01=0x013e}
0x07fbe…07fe8               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0051, t01=0x0152}
0x07fe8…07ffc               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0051, t01=0x017c}
0x07ffc…0802c               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM510 RETRANSMISSION OF MESSAGE«, t00=0x0051, t01=0x0190}
0x0802c…08040               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0052, t01=0x0030}
0x08040…08066               Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x0052, t01=0x0044}
0x08066…08098               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x0052, t01=0x006a}
0x08098…080ac               Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x0052, t01=0x009c}
0x080ac…080bc               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0052, t01=0x00b0}
0x080bc…080c6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0052, t01=0x00c0}
0x080c6…080d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00ca}
0x080d0…080da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00d4}
0x080da…080fa               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x0052, t01=0x00de}
0x080fa…08104               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00fe}
0x08104…0810e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0108}
0x0810e…08122               Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x0052, t01=0x0112}
0x08122…0814c               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0052, t01=0x0126}
0x0814c…08160               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0052, t01=0x0150}
0x08160…08184               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x0052, t01=0x0164}
0x08184…08198               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0052, t01=0x0188}
0x08198…081be               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x0053, t01=0x000c}
0x081be…081d0               Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x0053, t01=0x0032}
0x081d0…081e4               Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x0053, t01=0x0044}
0x081e4…081f2               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x0053, t01=0x0058}
0x081f2…08204               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0053, t01=0x0066}
0x08204…08220               Head {h00=0x0018, h01=0x0050, text=» CIO A1,0,LCUIN  DK «, t00=0x0053, t01=0x0078}
0x08220…0823a               Head {h00=0x0016, h01=0x0050, text=» SST A1,LCUIN  DK «, t00=0x0053, t01=0x0094}
0x0823a…08254               Head {h00=0x0016, h01=0x0050, text=» CF A15,STREG  DK «, t00=0x0053, t01=0x00ae}
0x08254…0826e               Head {h00=0x0016, h01=0x0050, text=» CF A15,SETIME  DK«, t00=0x0053, t01=0x00c8}
0x0826e…0828e               Head {h00=0x001c, h01=0x0050, text=» DATA BRM520,TIMNAK  DK «, t00=0x0053, t01=0x00e2}
0x0828e…082a4               Head {h00=0x0012, h01=0x0050, text=» ABL TDISP  DK«, t00=0x0053, t01=0x0102}
0x082a4…082bc               Head {h00=0x0014, h01=0x0050, text=»BRM520 EQU *  DK«, t00=0x0053, t01=0x0118}
0x082bc…082d6               Head {h00=0x0016, h01=0x0050, text=» CF A15,LDREG  DK «, t00=0x0053, t01=0x0130}
0x082d6…082e4               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x0053, t01=0x014a}
0x082e4…0830a               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0053, t01=0x0158}
0x0830a…0831e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0053, t01=0x017e}
0x0831e…08332 (84, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0054, t01=0x0004}
0x08332…08366               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x0054, t01=0x0018}
0x08366…08372               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x004c}
0x08372…083a6               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x0054, t01=0x0058}
0x083a6…083d0               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x0054, t01=0x008c}
0x083d0…083e4               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0054, t01=0x00b6}
0x083e4…083f8               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0054, t01=0x00ca}
0x083f8…08402               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00de}
0x08402…0840c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00e8}
0x0840c…0842c               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x0054, t01=0x00f2}
0x0842c…08436               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0112}
0x08436…08440               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x011c}
0x08440…08454               Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x0054, t01=0x0126}
0x08454…0847e               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0054, t01=0x013a}
0x0847e…08492               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0054, t01=0x0164}
0x08492…084b8               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 ACK NOT EXPECTED«, t00=0x0054, t01=0x0178}
0x084b8…084e2               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x0055, t01=0x000e}
0x084e2…084fa               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0055, t01=0x0038}
0x084fa…08512               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x0055, t01=0x0050}
0x08512…08524               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0055, t01=0x0068}
0x08524…0853c               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0055, t01=0x007a}
0x0853c…08554               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0  =8«, t00=0x0055, t01=0x0092}
0x08554…08566               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0055, t01=0x00aa}
0x08566…0857c               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x0055, t01=0x00bc}
0x0857c…08586               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00d2}
0x08586…085a0               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x0055, t01=0x00dc}
0x085a0…085aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00f6}
0x085aa…085cc               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x0055, t01=0x0100}
0x085cc…085f0               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0055, t01=0x0122}
0x085f0…08604               Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0055, t01=0x0146}
0x08604…08622               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0055, t01=0x015a}
0x08622…0864c               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0055, t01=0x0178}
0x0864c…0865e               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0056, t01=0x0012}
0x0865e…08672               Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0056, t01=0x0024}
0x08672…08686               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0056, t01=0x0038}
0x08686…0869c               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0056, t01=0x004c}
0x0869c…086a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0062}
0x086a6…086c0               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0056, t01=0x006c}
0x086c0…086ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0086}
0x086ca…086ee               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0056, t01=0x0090}
0x086ee…08716               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0056, t01=0x00b4}
0x08716…0872a               Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0056, t01=0x00dc}
0x0872a…0873e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0056, t01=0x00f0}
0x0873e…08760               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0056, t01=0x0104}
0x08760…0876a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0056, t01=0x0126}
0x0876a…08774               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0130}
0x08774…087a4               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0056, t01=0x013a}
0x087a4…087ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x016a}
0x087ae…087c8               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0056, t01=0x0174}
0x087c8…087dc               Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0056, t01=0x018e}
0x087dc…087f0               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0057, t01=0x0012}
0x087f0…08804               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x0057, t01=0x0026}
0x08804…08836               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x0057, t01=0x003a}
0x08836…08842               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x006c}
0x08842…0886e               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0057, t01=0x0078}
0x0886e…08882               Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x0057, t01=0x00a4}
0x08882…088a0               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0057, t01=0x00b8}
0x088a0…088b4               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0057, t01=0x00d6}
0x088b4…088bc               Head {h00=0x0004, h01=0x0050, t00=0x0057, t01=0x00ea}
0x088bc…088de               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0057, t01=0x00f2}
0x088de…088ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x0114}
0x088ea…088fc               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0057, t01=0x0120}
0x088fc…08910               Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x0057, t01=0x0132}
0x08910…08922               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0057, t01=0x0146}
0x08922…0894c               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0057, t01=0x0158}
0x0894c…08960               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0057, t01=0x0182}
0x08960…08974               Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x0058, t01=0x0008}
0x08974…0898c               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0058, t01=0x001c}
0x0898c…089a4               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x0058, t01=0x0034}
0x089a4…089b6               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0058, t01=0x004c}
0x089b6…089ce               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0058, t01=0x005e}
0x089ce…089e6               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI  =8 «, t00=0x0058, t01=0x0076}
0x089e6…089f8               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0058, t01=0x008e}
0x089f8…08a24               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x0058, t01=0x00a0}
0x08a24…08a4a               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x0058, t01=0x00cc}
0x08a4a…08a5e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0058, t01=0x00f2}
0x08a5e…08a86               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x0058, t01=0x0106}
0x08a86…08aa0               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0058, t01=0x012e}
0x08aa0…08ab2               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0058, t01=0x0148}
0x08ab2…08ac6               Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x0058, t01=0x015a}
0x08ac6…08ae0               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0058, t01=0x016e}
0x08ae0…08af2               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0058, t01=0x0188}
0x08af2…08b06               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0059, t01=0x000a}
0x08b06…08b10               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0059, t01=0x001e}
0x08b10…08b1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0028}
0x08b1a…08b24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0032}
0x08b24…08b4a               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x0059, t01=0x003c}
0x08b4a…08b54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0062}
0x08b54…08b5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x006c}
0x08b5e…08b72               Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x0059, t01=0x0076}
0x08b72…08b98               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x0059, t01=0x008a}
0x08b98…08bc8               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x0059, t01=0x00b0}
0x08bc8…08bec               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x0059, t01=0x00e0}
0x08bec…08c12               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x0059, t01=0x0104}
0x08c12…08c34               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0059, t01=0x012a}
0x08c34…08c46               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0059, t01=0x014c}
0x08c46…08c62               Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x0059, t01=0x015e}
0x08c62…08c78               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x0059, t01=0x017a}
0x08c78…08c9e               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x0059, t01=0x0190}
0x08c9e…08cb0               Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x005a, t01=0x0026}
0x08cb0…08cbc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x0038}
0x08cbc…08cc6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005a, t01=0x0044}
0x08cc6…08cd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x004e}
0x08cd0…08cda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0058}
0x08cda…08cfc               Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x005a, t01=0x0062}
0x08cfc…08d06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0084}
0x08d06…08d10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x008e}
0x08d10…08d24               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x005a, t01=0x0098}
0x08d24…08d3c               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005a, t01=0x00ac}
0x08d3c…08d6a               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) POL010 ERROR. ACK EXPECTED =5 «, t00=0x005a, t01=0x00c4}
0x08d6a…08d7e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005a, t01=0x00f2}
0x08d7e…08da0               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005a, t01=0x0106}
0x08da0…08db2               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x005a, t01=0x0128}
0x08db2…08dc4               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x005a, t01=0x013a}
0x08dc4…08dec               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x005a, t01=0x014c}
0x08dec…08e0a               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x005a, t01=0x0174}
0x08e0a…08e16 (91, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0004}
0x08e16…08e2a               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005b, t01=0x0010}
0x08e2a…08e3c               Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x005b, t01=0x0024}
0x08e3c…08e48               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0036}
0x08e48…08e5c               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x005b, t01=0x0042}
0x08e5c…08e6c               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005b, t01=0x0056}
0x08e6c…08e80               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x005b, t01=0x0066}
0x08e80…08e9a               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x005b, t01=0x007a}
0x08e9a…08eac               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005b, t01=0x0094}
0x08eac…08ec8               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x005b, t01=0x00a6}
0x08ec8…08ed4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x00c2}
0x08ed4…08eee               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x005b, t01=0x00ce}
0x08eee…08f00               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005b, t01=0x00e8}
0x08f00…08f26               Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x005b, t01=0x00fa}
0x08f26…08f4a               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x005b, t01=0x0120}
0x08f4a…08f5a               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005b, t01=0x0144}
0x08f5a…08f6e               Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x005b, t01=0x0154}
0x08f6e…08f7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0168}
0x08f7a…08f90               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x005b, t01=0x0174}
0x08f90…08fb8               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x005b, t01=0x018a}
0x08fb8…08fcc               Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x005c, t01=0x0022}
0x08fcc…08fe6               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x005c, t01=0x0036}
0x08fe6…09006               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x005c, t01=0x0050}
0x09006…09012               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x0070}
0x09012…09024               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005c, t01=0x007c}
0x09024…09038               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x005c, t01=0x008e}
0x09038…09068               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x005c, t01=0x00a2}
0x09068…09088               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x005c, t01=0x00d2}
0x09088…0909a               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005c, t01=0x00f2}
0x0909a…090a4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005c, t01=0x0104}
0x090a4…090ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x010e}
0x090ae…090b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0118}
0x090b8…090dc               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x005c, t01=0x0122}
0x090dc…090e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0146}
0x090e6…090f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0150}
0x090f0…09104               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x005c, t01=0x015a}
0x09104…09124               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x005c, t01=0x016e}
0x09124…09148               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005c, t01=0x018e}
0x09148…0915c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x005d, t01=0x0022}
0x0915c…0918e               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x005d, t01=0x0036}
0x0918e…0919a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0068}
0x0919a…091c2               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x005d, t01=0x0074}
0x091c2…091d2               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x005d, t01=0x009c}
0x091d2…091f8               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x005d, t01=0x00ac}
0x091f8…09208               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x005d, t01=0x00d2}
0x09208…09212               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005d, t01=0x00e2}
0x09212…0921c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00ec}
0x0921c…09226               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00f6}
0x09226…0924e               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x005d, t01=0x0100}
0x0924e…09258               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0128}
0x09258…09262               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0132}
0x09262…09276               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x005d, t01=0x013c}
0x09276…0928e               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005d, t01=0x0150}
0x0928e…092b8               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL020 ACK NOT EXPECTED =5 «, t00=0x005d, t01=0x0168}
0x092b8…092de (94, 0, 400)  Head {h00=0x0022, h01=0x0050, text=»POL010 CF A5,TRENQ SEND ENQ =5«, t00=0x005e, t01=0x0004}
0x092de…0930c               Head {h00=0x002a, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER =5 «, t00=0x005e, t01=0x002a}
0x0930c…09332               Head {h00=0x0022, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE =5 «, t00=0x005e, t01=0x0058}
0x09332…0934a               Head {h00=0x0014, h01=0x0050, text=»POL020 EQU *  =5«, t00=0x005e, t01=0x007e}
0x0934a…09370               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x005e, t01=0x0096}
0x09370…09384               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005e, t01=0x00bc}
0x09384…0939a               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x005e, t01=0x00d0}
0x0939a…093c4               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x005e, t01=0x00e6}
0x093c4…093ea               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x005e, t01=0x0110}
0x093ea…093fe               Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x005e, t01=0x0136}
0x093fe…0941e               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x005e, t01=0x014a}
0x0941e…09448               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005e, t01=0x016a}
0x09448…0946c (95, 0, 398)  Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005f, t01=0x0004}
0x0946c…09478               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x0028}
0x09478…0948c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005f, t01=0x0034}
0x0948c…0949e               Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x005f, t01=0x0048}
0x0949e…094aa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x005a}
0x094aa…094be               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x005f, t01=0x0066}
0x094be…094ce               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005f, t01=0x007a}
0x094ce…094e2               Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x005f, t01=0x008a}
0x094e2…094f6               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x005f, t01=0x009e}
0x094f6…0951c               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x005f, t01=0x00b2}
0x0951c…09530               Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x005f, t01=0x00d8}
0x09530…0954e               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x005f, t01=0x00ec}
0x0954e…09560               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005f, t01=0x010a}
0x09560…09574               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x005f, t01=0x011c}
0x09574…0959a               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x005f, t01=0x0130}
0x0959a…095ae               Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x005f, t01=0x0156}
0x095ae…095d6               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x005f, t01=0x016a}
0x095d6…095ec (96, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x0060, t01=0x0004}
0x095ec…09602               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x0060, t01=0x001a}
0x09602…09614               Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x0060, t01=0x0030}
0x09614…09628               Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x0060, t01=0x0042}
0x09628…0964c               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x0060, t01=0x0056}
0x0964c…0966a               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0060, t01=0x007a}
0x0966a…09672               Head {h00=0x0004, h01=0x0050, t00=0x0060, t01=0x0098}
0x09672…09688               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x0060, t01=0x00a0}
0x09688…096b0               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,MMUBUF MMU WORK BUFFER «, t00=0x0060, t01=0x00b6}
0x096b0…096c8               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x0060, t01=0x00de}
0x096c8…096fa               Head {h00=0x002e, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA FROM USER BUFFER «, t00=0x0060, t01=0x00f6}
0x096fa…09706               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0060, t01=0x0128}
0x09706…09730               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0060, t01=0x0134}
0x09730…09752               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x0060, t01=0x015e}
0x09752…09766               Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x0060, t01=0x0180}
0x09766…09790 (97, 0, 400)  Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x0061, t01=0x0004}
0x09790…097bc               Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x0061, t01=0x002e}
0x097bc…097de               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x0061, t01=0x005a}
0x097de…09802               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x0061, t01=0x007c}
0x09802…09816               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x0061, t01=0x00a0}
0x09816…09838               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x0061, t01=0x00b4}
0x09838…09848               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0061, t01=0x00d6}
0x09848…0986c               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x0061, t01=0x00e6}
0x0986c…09896               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0061, t01=0x010a}
0x09896…098ba               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0061, t01=0x0134}
0x098ba…098cc               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x0061, t01=0x0158}
0x098cc…098d6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0061, t01=0x016a}
0x098d6…098e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0174}
0x098e0…098ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x017e}
0x098ea…09914               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x0061, t01=0x0188}
0x09914…0991e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0022}
0x0991e…09928               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x002c}
0x09928…0993c               Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x0062, t01=0x0036}
0x0993c…09956               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0062, t01=0x004a}
0x09956…0996e               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x0062, t01=0x0064}
0x0996e…09994               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL010 ACK EXPECTED =5«, t00=0x0062, t01=0x007c}
0x09994…099ae               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x0062, t01=0x00a2}
0x099ae…099d2               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x0062, t01=0x00bc}
0x099d2…099f0               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x0062, t01=0x00e0}
0x099f0…09a04               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0062, t01=0x00fe}
0x09a04…09a26               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0062, t01=0x0112}
0x09a26…09a38               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x0062, t01=0x0134}
0x09a38…09a5e               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x0062, t01=0x0146}
0x09a5e…09a6a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0062, t01=0x016c}
0x09a6a…09a84               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0062, t01=0x0178}
0x09a84…09a9c (99, 0, 400)  Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0063, t01=0x0004}
0x09a9c…09abc               Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x0063, t01=0x001c}
0x09abc…09ade               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x0063, t01=0x003c}
0x09ade…09af0               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x0063, t01=0x005e}
0x09af0…09b14               Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x0063, t01=0x0070}
0x09b14…09b26               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0063, t01=0x0094}
0x09b26…09b4c               Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x0063, t01=0x00a6}
0x09b4c…09b58               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x00cc}
0x09b58…09b74               Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x0063, t01=0x00d8}
0x09b74…09b7e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0063, t01=0x00f4}
0x09b7e…09b88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00fe}
0x09b88…09b92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0108}
0x09b92…09bce               Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x0063, t01=0x0112}
0x09bce…09bd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x014e}
0x09bd8…09bfa               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x0063, t01=0x0158}
0x09bfa…09c04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x017a}
0x09c04…09c0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0184}
0x09c0e…09c2a               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x0063, t01=0x018e}
0x09c2a…09c52               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x0064, t01=0x001a}
0x09c52…09c6a               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0064, t01=0x0042}
0x09c6a…09c8a               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x0064, t01=0x005a}
0x09c8a…09cac               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0064, t01=0x007a}
0x09cac…09cbe               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0064, t01=0x009c}
0x09cbe…09ce2               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x0064, t01=0x00ae}
0x09ce2…09cf4               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0064, t01=0x00d2}
0x09cf4…09d20               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x0064, t01=0x00e4}
0x09d20…09d32               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0064, t01=0x0110}
0x09d32…09d68               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x0064, t01=0x0122}
0x09d68…09d88               Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x0064, t01=0x0158}
0x09d88…09db4               Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x0064, t01=0x0178}
0x09db4…09dc6               Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x0065, t01=0x0014}
0x09dc6…09df0               Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x0065, t01=0x0026}
0x09df0…09e12               Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x0065, t01=0x0050}
0x09e12…09e24               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0065, t01=0x0072}
0x09e24…09e3a               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x0065, t01=0x0084}
0x09e3a…09e52               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0065, t01=0x009a}
0x09e52…09e7a               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0065, t01=0x00b2}
0x09e7a…09e8e               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x0065, t01=0x00da}
0x09e8e…09ebc               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0065, t01=0x00ee}
0x09ebc…09ed0               Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x0065, t01=0x011c}
0x09ed0…09ee4               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x0065, t01=0x0130}
0x09ee4…09f0a               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0065, t01=0x0144}
0x09f0a…09f1c               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0065, t01=0x016a}
0x09f1c…09f2c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0065, t01=0x017c}
0x09f2c…09f36               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0065, t01=0x018c}
0x09f36…09f40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0008}
0x09f40…09f4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0012}
0x09f4a…09f68               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x0066, t01=0x001c}
0x09f68…09f72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x003a}
0x09f72…09f92               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x0066, t01=0x0044}
0x09f92…09fbe               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x0066, t01=0x0064}
0x09fbe…09ff4               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x0066, t01=0x0090}
0x09ff4…0a020               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x0066, t01=0x00c6}
0x0a020…0a02a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00f2}
0x0a02a…0a03e               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x0066, t01=0x00fc}
0x0a03e…0a066               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0066, t01=0x0110}
0x0a066…0a086               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x0066, t01=0x0138}
0x0a086…0a098               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0066, t01=0x0158}
0x0a098…0a0ac               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0066, t01=0x016a}
0x0a0ac…0a0d4               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x0066, t01=0x017e}
0x0a0d4…0a0fa               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x0067, t01=0x0016}
0x0a0fa…0a10c               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x0067, t01=0x003c}
0x0a10c…0a120               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0067, t01=0x004e}
0x0a120…0a134               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x0067, t01=0x0062}
0x0a134…0a158               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0067, t01=0x0076}
0x0a158…0a184               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0067, t01=0x009a}
0x0a184…0a198               Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x0067, t01=0x00c6}
0x0a198…0a1a8               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0067, t01=0x00da}
0x0a1a8…0a1c4               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0067, t01=0x00ea}
0x0a1c4…0a1cc               Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x0106}
0x0a1cc…0a1e2               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0067, t01=0x010e}
0x0a1e2…0a1f6               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0067, t01=0x0124}
0x0a1f6…0a21c               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x0067, t01=0x0138}
0x0a21c…0a230               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0067, t01=0x015e}
0x0a230…0a254               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0067, t01=0x0172}
0x0a254…0a268               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x0068, t01=0x0008}
0x0a268…0a27e               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x0068, t01=0x001c}
0x0a27e…0a2ac               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x0068, t01=0x0032}
0x0a2ac…0a2c0               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0068, t01=0x0060}
0x0a2c0…0a2cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0068, t01=0x0074}
0x0a2cc…0a2e0               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x0068, t01=0x0080}
0x0a2e0…0a308               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0068, t01=0x0094}
0x0a308…0a32c               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0068, t01=0x00bc}
0x0a32c…0a340               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x0068, t01=0x00e0}
0x0a340…0a354               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x0068, t01=0x00f4}
0x0a354…0a376               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x0068, t01=0x0108}
0x0a376…0a38a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x0068, t01=0x012a}
0x0a38a…0a3ac               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x0068, t01=0x013e}
0x0a3ac…0a3c0               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x0068, t01=0x0160}
0x0a3c0…0a3e2               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x0068, t01=0x0174}
0x0a3e2…0a3f6               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x0069, t01=0x0008}
0x0a3f6…0a42c               Head {h00=0x0032, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE «, t00=0x0069, t01=0x001c}
0x0a42c…0a440               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0069, t01=0x0052}
0x0a440…0a468               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x0069, t01=0x0066}
0x0a468…0a470               Head {h00=0x0004, h01=0x0050, t00=0x0069, t01=0x008e}
0x0a470…0a484               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0069, t01=0x0096}
0x0a484…0a49a               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x0069, t01=0x00aa}
0x0a49a…0a4a2               Head {h00=0x0004, h01=0x0050, t00=0x0069, t01=0x00c0}
0x0a4a2…0a4b4               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0069, t01=0x00c8}
0x0a4b4…0a4ca               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x0069, t01=0x00da}
0x0a4ca…0a4ec               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x0069, t01=0x00f0}
0x0a4ec…0a4fe               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x0069, t01=0x0112}
0x0a4fe…0a520               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x0069, t01=0x0124}
0x0a520…0a532               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x0069, t01=0x0146}
0x0a532…0a544               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0069, t01=0x0158}
0x0a544…0a572               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x0069, t01=0x016a}
0x0a572…0a596               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006a, t01=0x0008}
0x0a596…0a5c4               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x006a, t01=0x002c}
0x0a5c4…0a5d6               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x006a, t01=0x005a}
0x0a5d6…0a5ea               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x006a, t01=0x006c}
0x0a5ea…0a5f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006a, t01=0x0080}
0x0a5f6…0a5fe               Head {h00=0x0004, h01=0x0050, t00=0x006a, t01=0x008c}
0x0a5fe…0a620               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x006a, t01=0x0094}
0x0a620…0a644               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x006a, t01=0x00b6}
0x0a644…0a66c               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x006a, t01=0x00da}
0x0a66c…0a680               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x006a, t01=0x0102}
0x0a680…0a69c               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x006a, t01=0x0116}
0x0a69c…0a6c0               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x006a, t01=0x0132}
0x0a6c0…0a6ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0156}
0x0a6ca…0a6e4               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x006a, t01=0x0160}
0x0a6e4…0a6ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x017a}
0x0a6ee…0a70c               Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x006a, t01=0x0184}
0x0a70c…0a720               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x006b, t01=0x0012}
0x0a720…0a74a               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006b, t01=0x0026}
0x0a74a…0a75e               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x006b, t01=0x0050}
0x0a75e…0a786               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x006b, t01=0x0064}
0x0a786…0a798               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006b, t01=0x008c}
0x0a798…0a7a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x009e}
0x0a7a2…0a7b8               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x006b, t01=0x00a8}
0x0a7b8…0a7c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00be}
0x0a7c2…0a7d6               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x006b, t01=0x00c8}
0x0a7d6…0a7fe               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x006b, t01=0x00dc}
0x0a7fe…0a822               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x006b, t01=0x0104}
0x0a822…0a858               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x006b, t01=0x0128}
0x0a858…0a86c               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006b, t01=0x015e}
0x0a86c…0a880               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006b, t01=0x0172}
0x0a880…0a8a0               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x006b, t01=0x0186}
0x0a8a0…0a8ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x0016}
0x0a8ac…0a8c0               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006c, t01=0x0022}
0x0a8c0…0a8ea               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006c, t01=0x0036}
0x0a8ea…0a90a               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x006c, t01=0x0060}
0x0a90a…0a916               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x0080}
0x0a916…0a92a               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x006c, t01=0x008c}
0x0a92a…0a954               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006c, t01=0x00a0}
0x0a954…0a968               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x006c, t01=0x00ca}
0x0a968…0a990               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x006c, t01=0x00de}
0x0a990…0a9b0               Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x006c, t01=0x0106}
0x0a9b0…0a9c4               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x006c, t01=0x0126}
0x0a9c4…0a9ea               Head {h00=0x0022, h01=0x0050, text=» ORR A7,A1 PARITY ERROR SALCUZ«, t00=0x006c, t01=0x013a}
0x0a9ea…0aa00               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x006c, t01=0x0160}
0x0aa00…0aa10               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006c, t01=0x0176}
0x0aa10…0aa1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0186}
0x0aa1a…0aa30               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x006c, t01=0x0190}
0x0aa30…0aa3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0016}
0x0aa3a…0aa4e               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x006d, t01=0x0020}
0x0aa4e…0aa60               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x006d, t01=0x0034}
0x0aa60…0aa86               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x006d, t01=0x0046}
0x0aa86…0aaac               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x006d, t01=0x006c}
0x0aaac…0aabe               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x006d, t01=0x0092}
0x0aabe…0aac8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00a4}
0x0aac8…0aade               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x006d, t01=0x00ae}
0x0aade…0aae8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00c4}
0x0aae8…0aafc               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x006d, t01=0x00ce}
0x0aafc…0ab10               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006d, t01=0x00e2}
0x0ab10…0ab24               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006d, t01=0x00f6}
0x0ab24…0ab4a               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x006d, t01=0x010a}
0x0ab4a…0ab56               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x0130}
0x0ab56…0ab6a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006d, t01=0x013c}
0x0ab6a…0ab94               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006d, t01=0x0150}
0x0ab94…0abba               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x006d, t01=0x017a}
0x0abba…0abc6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x0010}
0x0abc6…0abd8               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006e, t01=0x001c}
0x0abd8…0abe2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x006e, t01=0x002e}
0x0abe2…0abec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0038}
0x0abec…0ac0a               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x006e, t01=0x0042}
0x0ac0a…0ac14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0060}
0x0ac14…0ac2a               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x006e, t01=0x006a}
0x0ac2a…0ac4c               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x006e, t01=0x0080}
0x0ac4c…0ac76               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x006e, t01=0x00a2}
0x0ac76…0ac8c               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x006e, t01=0x00cc}
0x0ac8c…0acaa               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x006e, t01=0x00e2}
0x0acaa…0acbc               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006e, t01=0x0100}
0x0acbc…0acc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0112}
0x0acc6…0acde               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x006e, t01=0x011c}
0x0acde…0ace8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0134}
0x0ace8…0ad0c               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x006e, t01=0x013e}
0x0ad0c…0ad1e               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006e, t01=0x0162}
0x0ad1e…0ad28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0174}
0x0ad28…0ad3e               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x006e, t01=0x017e}
0x0ad3e…0ad48 (111, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0004}
0x0ad48…0ad5c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x006f, t01=0x000e}
0x0ad5c…0ad7e               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x006f, t01=0x0022}
0x0ad7e…0ad8a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x0044}
0x0ad8a…0ad94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0050}
0x0ad94…0adaa               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x006f, t01=0x005a}
0x0adaa…0adb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0070}
0x0adb4…0add6               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x006f, t01=0x007a}
0x0add6…0adfc               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x006f, t01=0x009c}
0x0adfc…0ae14               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x006f, t01=0x00c2}
0x0ae14…0ae26               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x006f, t01=0x00da}
0x0ae26…0ae30               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x006f, t01=0x00ec}
0x0ae30…0ae3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00f6}
0x0ae3a…0ae50               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x006f, t01=0x0100}
0x0ae50…0ae5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0116}
0x0ae5a…0ae7c               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x006f, t01=0x0120}
0x0ae7c…0ae8e               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x006f, t01=0x0142}
0x0ae8e…0ae98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0154}
0x0ae98…0aeae               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x006f, t01=0x015e}
0x0aeae…0aeb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0174}
0x0aeb8…0aeda               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x006f, t01=0x017e}
0x0aeda…0aeec               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0070, t01=0x0010}
0x0aeec…0aef6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0022}
0x0aef6…0af0c               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x0070, t01=0x002c}
0x0af0c…0af16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0042}
0x0af16…0af38               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x0070, t01=0x004c}
0x0af38…0af42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x006e}
0x0af42…0af6e               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x0070, t01=0x0078}
0x0af6e…0af82               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0070, t01=0x00a4}
0x0af82…0af9a               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x0070, t01=0x00b8}
0x0af9a…0afc2               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x0070, t01=0x00d0}
0x0afc2…0afec               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x0070, t01=0x00f8}
0x0afec…0b00a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0070, t01=0x0122}
0x0b00a…0b034               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x0070, t01=0x0140}
0x0b034…0b052               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0070, t01=0x016a}
0x0b052…0b06c               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x0070, t01=0x0188}
0x0b06c…0b08a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x0071, t01=0x0012}
0x0b08a…0b09e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0071, t01=0x0030}
0x0b09e…0b0b4               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x0071, t01=0x0044}
0x0b0b4…0b0ce               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0071, t01=0x005a}
0x0b0ce…0b0f6               Head {h00=0x0024, h01=0x0050, text=» CIO A2,0,LCUUT STOP TRANSMITTER«, t00=0x0071, t01=0x0074}
0x0b0f6…0b112               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0071, t01=0x009c}
0x0b112…0b13a               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ WAIT FOR END SALCUZ «, t00=0x0071, t01=0x00b8}
0x0b13a…0b150               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0071, t01=0x00e0}
0x0b150…0b17a               Head {h00=0x0026, h01=0x0050, text=» SST A2,LCUUT PERFORM SST AT ONCE «, t00=0x0071, t01=0x00f6}
0x0b17a…0b18e               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0071, t01=0x0120}
0x0b18e…0b1ba               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x0071, t01=0x0134}
0x0b1ba…0b1c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x0160}
0x0b1c6…0b1d6               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0071, t01=0x016c}
0x0b1d6…0b1e0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0071, t01=0x017c}
0x0b1e0…0b1ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0186}
0x0b1ea…0b1f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0190}
0x0b1f4…0b216               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x0072, t01=0x000a}
0x0b216…0b220               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x002c}
0x0b220…0b22a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0036}
0x0b22a…0b23e               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x0072, t01=0x0040}
0x0b23e…0b260               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0072, t01=0x0054}
0x0b260…0b276               Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x0072, t01=0x0076}
0x0b276…0b280               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x008c}
0x0b280…0b28a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0096}
0x0b28a…0b2aa               Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x0072, t01=0x00a0}
0x0b2aa…0b2b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00c0}
0x0b2b4…0b2be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00ca}
0x0b2be…0b2d2               Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x0072, t01=0x00d4}
0x0b2d2…0b2fe               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x0072, t01=0x00e8}
0x0b2fe…0b306               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x0114}
0x0b306…0b33c               Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x0072, t01=0x011c}
0x0b33c…0b35a               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x0072, t01=0x0152}
0x0b35a…0b362               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x0170}
0x0b362…0b378               Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x0072, t01=0x0178}
0x0b378…0b39e               Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x0072, t01=0x018e}
0x0b39e…0b3b2               Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x0073, t01=0x0024}
0x0b3b2…0b3da               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x0073, t01=0x0038}
0x0b3da…0b3ee               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0073, t01=0x0060}
0x0b3ee…0b40c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0073, t01=0x0074}
0x0b40c…0b428               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x0073, t01=0x0092}
0x0b428…0b43c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0073, t01=0x00ae}
0x0b43c…0b458               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x0073, t01=0x00c2}
0x0b458…0b46c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x0073, t01=0x00de}
0x0b46c…0b488               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x0073, t01=0x00f2}
0x0b488…0b49c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0073, t01=0x010e}
0x0b49c…0b4ba               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0073, t01=0x0122}
0x0b4ba…0b4e6               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0073, t01=0x0140}
0x0b4e6…0b512               Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x0073, t01=0x016c}
0x0b512…0b532               Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x0074, t01=0x0008}
0x0b532…0b544               Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x0074, t01=0x0028}
0x0b544…0b558               Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x0074, t01=0x003a}
0x0b558…0b56a               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0074, t01=0x004e}
0x0b56a…0b57e               Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x0074, t01=0x0060}
0x0b57e…0b588               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0074}
0x0b588…0b592               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x007e}
0x0b592…0b59c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0088}
0x0b59c…0b5a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x0092}
0x0b5a8…0b5bc               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0074, t01=0x009e}
0x0b5bc…0b5da               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0074, t01=0x00b2}
0x0b5da…0b5f6               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0074, t01=0x00d0}
0x0b5f6…0b61e               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0074, t01=0x00ec}
0x0b61e…0b642               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0074, t01=0x0114}
0x0b642…0b66e               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0074, t01=0x0138}
0x0b66e…0b69a               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x0074, t01=0x0164}
0x0b69a…0b6c4               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x0074, t01=0x0190}
0x0b6c4…0b6e8               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x0075, t01=0x002a}
0x0b6e8…0b70e               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x0075, t01=0x004e}
0x0b70e…0b72e               Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x0075, t01=0x0074}
0x0b72e…0b74c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0075, t01=0x0094}
0x0b74c…0b768               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0075, t01=0x00b2}
0x0b768…0b786               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0075, t01=0x00ce}
0x0b786…0b79c               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0075, t01=0x00ec}
0x0b79c…0b7b0               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x0075, t01=0x0102}
0x0b7b0…0b7d6               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x0075, t01=0x0116}
0x0b7d6…0b7ec               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0075, t01=0x013c}
0x0b7ec…0b812               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x0075, t01=0x0152}
0x0b812…0b828               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0075, t01=0x0178}
0x0b828…0b83c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x0075, t01=0x018e}
0x0b83c…0b852               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0076, t01=0x0012}
0x0b852…0b85e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x0028}
0x0b85e…0b872               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0076, t01=0x0034}
0x0b872…0b87a               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x0048}
0x0b87a…0b8a4               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0076, t01=0x0050}
0x0b8a4…0b8be               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x0076, t01=0x007a}
0x0b8be…0b8c6               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x0094}
0x0b8c6…0b8e6               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x0076, t01=0x009c}
0x0b8e6…0b90c               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x0076, t01=0x00bc}
0x0b90c…0b930               Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x0076, t01=0x00e2}
0x0b930…0b938               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x0106}
0x0b938…0b960               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x0076, t01=0x010e}
0x0b960…0b992               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x0076, t01=0x0136}
0x0b992…0b9b4               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x0076, t01=0x0168}
0x0b9b4…0b9c6               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0076, t01=0x018a}
0x0b9c6…0b9da               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x0077, t01=0x000c}
0x0b9da…0b9e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x0020}
0x0b9e6…0b9ee               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x002c}
0x0b9ee…0ba00               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0077, t01=0x0034}
0x0ba00…0ba14               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x0077, t01=0x0046}
0x0ba14…0ba38               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x0077, t01=0x005a}
0x0ba38…0ba5c               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0077, t01=0x007e}
0x0ba5c…0ba70               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0077, t01=0x00a2}
0x0ba70…0ba84               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0077, t01=0x00b6}
0x0ba84…0baae               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0077, t01=0x00ca}
0x0baae…0bac8               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x0077, t01=0x00f4}
0x0bac8…0bad0               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x010e}
0x0bad0…0bb14               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0077, t01=0x0116}
0x0bb14…0bb1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x015a}
0x0bb1e…0bb4e               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x0077, t01=0x0164}
0x0bb4e…0bb58 (120, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0004}
0x0bb58…0bb90               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0078, t01=0x000e}
0x0bb90…0bb98               Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x0046}
0x0bb98…0bbc2               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x0078, t01=0x004e}
0x0bbc2…0bbde               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x0078, t01=0x0078}
0x0bbde…0bbea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x0094}
0x0bbea…0bbfe               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x0078, t01=0x00a0}
0x0bbfe…0bc1e               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x0078, t01=0x00b4}
0x0bc1e…0bc44               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x0078, t01=0x00d4}
0x0bc44…0bc58               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x0078, t01=0x00fa}
0x0bc58…0bc6c               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x0078, t01=0x010e}
0x0bc6c…0bc90               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x0078, t01=0x0122}
0x0bc90…0bcb6               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x0078, t01=0x0146}
0x0bcb6…0bcca               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x0078, t01=0x016c}
0x0bcca…0bcde               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x0078, t01=0x0180}
0x0bcde…0bcfc (121, 0, 400) Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x0079, t01=0x0004}
0x0bcfc…0bd12               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x0079, t01=0x0022}
0x0bd12…0bd24               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0079, t01=0x0038}
0x0bd24…0bd30               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x004a}
0x0bd30…0bd44               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0079, t01=0x0056}
0x0bd44…0bd56               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x0079, t01=0x006a}
0x0bd56…0bd5e               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x007c}
0x0bd5e…0bd72               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x0079, t01=0x0084}
0x0bd72…0bd7a               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x0098}
0x0bd7a…0bd8c               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x0079, t01=0x00a0}
0x0bd8c…0bdb2               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x0079, t01=0x00b2}
0x0bdb2…0bdba               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x00d8}
0x0bdba…0bde6               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x0079, t01=0x00e0}
0x0bde6…0bdfc               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x0079, t01=0x010c}
0x0bdfc…0be28               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x0079, t01=0x0122}
0x0be28…0be3a               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0079, t01=0x014e}
0x0be3a…0be52               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x0079, t01=0x0160}
0x0be52…0be64               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0079, t01=0x0178}
0x0be64…0be8e               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x0079, t01=0x018a}
0x0be8e…0beb4               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x007a, t01=0x0024}
0x0beb4…0becc               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x007a, t01=0x004a}
0x0becc…0bef6               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x007a, t01=0x0062}
0x0bef6…0bf0c               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x007a, t01=0x008c}
0x0bf0c…0bf20               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x007a, t01=0x00a2}
0x0bf20…0bf34               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x007a, t01=0x00b6}
0x0bf34…0bf58               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x007a, t01=0x00ca}
0x0bf58…0bf6a               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x007a, t01=0x00ee}
0x0bf6a…0bf7c               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x007a, t01=0x0100}
0x0bf7c…0bf90               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x007a, t01=0x0112}
0x0bf90…0bf9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x0126}
0x0bf9c…0bfa6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x007a, t01=0x0132}
0x0bfa6…0bfba               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x007a, t01=0x013c}
0x0bfba…0bfe6               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x007a, t01=0x0150}
0x0bfe6…0c00a               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x007a, t01=0x017c}
0x0c00a…0c01e               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x007b, t01=0x0010}
0x0c01e…0c046               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x007b, t01=0x0024}
0x0c046…0c070               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x007b, t01=0x004c}
0x0c070…0c084               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x007b, t01=0x0076}
0x0c084…0c0aa               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x007b, t01=0x008a}
0x0c0aa…0c0d8               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x007b, t01=0x00b0}
0x0c0d8…0c0ee               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x007b, t01=0x00de}
0x0c0ee…0c112               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x007b, t01=0x00f4}
0x0c112…0c126               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007b, t01=0x0118}
0x0c126…0c156               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x007b, t01=0x012c}
0x0c156…0c16a               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x007b, t01=0x015c}
0x0c16a…0c184               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x007b, t01=0x0170}
0x0c184…0c198               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x007b, t01=0x018a}
0x0c198…0c1ba               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x007c, t01=0x000e}
0x0c1ba…0c1e6               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x007c, t01=0x0030}
0x0c1e6…0c208               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x007c, t01=0x005c}
0x0c208…0c226               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007c, t01=0x007e}
0x0c226…0c246               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007c, t01=0x009c}
0x0c246…0c278               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x007c, t01=0x00bc}
0x0c278…0c296               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007c, t01=0x00ee}
0x0c296…0c2b6               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007c, t01=0x010c}
0x0c2b6…0c2c2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x012c}
0x0c2c2…0c2d6               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x007c, t01=0x0138}
0x0c2d6…0c2f2               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x007c, t01=0x014c}
0x0c2f2…0c306               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x007c, t01=0x0168}
0x0c306…0c324               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007c, t01=0x017c}
0x0c324…0c338               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x007d, t01=0x000a}
0x0c338…0c352               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x007d, t01=0x001e}
0x0c352…0c370               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x007d, t01=0x0038}
0x0c370…0c37c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x0056}
0x0c37c…0c390               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x007d, t01=0x0062}
0x0c390…0c3b4               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x007d, t01=0x0076}
0x0c3b4…0c3c6               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x007d, t01=0x009a}
0x0c3c6…0c3da               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007d, t01=0x00ac}
0x0c3da…0c400               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x007d, t01=0x00c0}
0x0c400…0c412               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x007d, t01=0x00e6}
0x0c412…0c426               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007d, t01=0x00f8}
0x0c426…0c44c               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x007d, t01=0x010c}
0x0c44c…0c458               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x0132}
0x0c458…0c478               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x007d, t01=0x013e}
0x0c478…0c48c               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x007d, t01=0x015e}
0x0c48c…0c4b0               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x007d, t01=0x0172}
0x0c4b0…0c4c4               Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x007e, t01=0x0008}
0x0c4c4…0c4e0               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x007e, t01=0x001c}
0x0c4e0…0c504               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x007e, t01=0x0038}
0x0c504…0c50e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x007e, t01=0x005c}
0x0c50e…0c518               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0066}
0x0c518…0c522               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0070}
0x0c522…0c544               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x007e, t01=0x007a}
0x0c544…0c54e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x009c}
0x0c54e…0c558               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00a6}
0x0c558…0c56c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x007e, t01=0x00b0}
0x0c56c…0c580               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x007e, t01=0x00c4}
0x0c580…0c5a8               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x007e, t01=0x00d8}
0x0c5a8…0c5c6               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x007e, t01=0x0100}
0x0c5c6…0c5e8               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x007e, t01=0x011e}
0x0c5e8…0c5fc               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x007e, t01=0x0140}
0x0c5fc…0c61a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x007e, t01=0x0154}
0x0c61a…0c634               Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x007e, t01=0x0172}
0x0c634…0c648               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x007e, t01=0x018c}
0x0c648…0c666               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x007f, t01=0x0010}
0x0c666…0c67a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x007f, t01=0x002e}
0x0c67a…0c698               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x007f, t01=0x0042}
0x0c698…0c6ac               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x007f, t01=0x0060}
0x0c6ac…0c6ca               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x007f, t01=0x0074}
0x0c6ca…0c6e2               Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x007f, t01=0x0092}
0x0c6e2…0c700               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x007f, t01=0x00aa}
0x0c700…0c714               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x007f, t01=0x00c8}
0x0c714…0c732               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x007f, t01=0x00dc}
0x0c732…0c754               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x007f, t01=0x00fa}
0x0c754…0c776               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x007f, t01=0x011c}
0x0c776…0c788               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x007f, t01=0x013e}
0x0c788…0c7b0               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x007f, t01=0x0150}
0x0c7b0…0c7d0               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x007f, t01=0x0178}
0x0c7d0…0c7f2               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x0080, t01=0x0008}
0x0c7f2…0c814               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0080, t01=0x002a}
0x0c814…0c826               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x0080, t01=0x004c}
0x0c826…0c844               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x0080, t01=0x005e}
0x0c844…0c856               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0080, t01=0x007c}
0x0c856…0c878               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x0080, t01=0x008e}
0x0c878…0c88a               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x0080, t01=0x00b0}
0x0c88a…0c89e               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x0080, t01=0x00c2}
0x0c89e…0c8be               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x0080, t01=0x00d6}
0x0c8be…0c8e2               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x0080, t01=0x00f6}
0x0c8e2…0c8ee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x011a}
0x0c8ee…0c8f8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0080, t01=0x0126}
0x0c8f8…0c902               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0130}
0x0c902…0c90c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x013a}
0x0c90c…0c92c               Head {h00=0x001c, h01=0x0050, text=»* TRANSMIT SYNC SEQUENCE«, t00=0x0080, t01=0x0144}
0x0c92c…0c936               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0164}
0x0c936…0c940               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x016e}
0x0c940…0c954               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x0080, t01=0x0178}
0x0c954…0c96e               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0080, t01=0x018c}
0x0c96e…0c99c               Head {h00=0x002a, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT IF NOT DONE«, t00=0x0081, t01=0x0016}
0x0c99c…0c9be               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN PERFORM SST «, t00=0x0081, t01=0x0044}
0x0c9be…0c9da               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0081, t01=0x0066}
0x0c9da…0ca04               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x0081, t01=0x0082}
0x0ca04…0ca1a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0081, t01=0x00ac}
0x0ca1a…0ca36               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0081, t01=0x00c2}
0x0ca36…0ca52               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=1  SALCUZ «, t00=0x0081, t01=0x00de}
0x0ca52…0ca6c               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0081, t01=0x00fa}
0x0ca6c…0ca9c               Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER SALCUZ«, t00=0x0081, t01=0x0114}
0x0ca9c…0caba               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x0081, t01=0x0144}
0x0caba…0cad8               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x0081, t01=0x0162}
0x0cad8…0caf6               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x0081, t01=0x0180}
0x0caf6…0cb0e               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0082, t01=0x000e}
0x0cb0e…0cb34               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0082, t01=0x0026}
0x0cb34…0cb50               Head {h00=0x0018, h01=0x0050, text=»TRS010 EQU *  SALCUZ«, t00=0x0082, t01=0x004c}
0x0cb50…0cb6e               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x0082, t01=0x0068}
0x0cb6e…0cba4               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0082, t01=0x0086}
0x0cba4…0cbba               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0082, t01=0x00bc}
0x0cbba…0cbd6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0082, t01=0x00d2}
0x0cbd6…0cbf2               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=0  SALCUZ «, t00=0x0082, t01=0x00ee}
0x0cbf2…0cc0e               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x0082, t01=0x010a}
0x0cc0e…0cc2e               Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,LCUUT  SALCUZ «, t00=0x0082, t01=0x0126}
0x0cc2e…0cc4c               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x0082, t01=0x0146}
0x0cc4c…0cc6a               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x0082, t01=0x0164}
0x0cc6a…0cc88               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x0082, t01=0x0182}
0x0cc88…0cca0               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0083, t01=0x0010}
0x0cca0…0ccc6               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0083, t01=0x0028}
0x0ccc6…0ccda               Head {h00=0x0010, h01=0x0050, text=»TRS010 EQU *«, t00=0x0083, t01=0x004e}
0x0ccda…0ccf6               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x0083, t01=0x0062}
0x0ccf6…0cd2c               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0083, t01=0x007e}
0x0cd2c…0cd42               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0083, t01=0x00b4}
0x0cd42…0cd70               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x0083, t01=0x00ca}
0x0cd70…0cd88               Head {h00=0x0014, h01=0x0050, text=» LDK A3,4 4 SYNS«, t00=0x0083, t01=0x00f8}
0x0cd88…0cda2               Head {h00=0x0016, h01=0x0050, text=»TRS100 LDK A2,SYN «, t00=0x0083, t01=0x0110}
0x0cda2…0cdc0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SYN «, t00=0x0083, t01=0x012a}
0x0cdc0…0cdd2               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0083, t01=0x0148}
0x0cdd2…0cde8               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x0083, t01=0x015a}
0x0cde8…0cdf8               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0083, t01=0x0170}
0x0cdf8…0ce02               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0083, t01=0x0180}
0x0ce02…0ce0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x018a}
0x0ce0c…0ce16 (132, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0004}
0x0ce16…0ce34               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x0084, t01=0x000e}
0x0ce34…0ce3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x002c}
0x0ce3e…0ce48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0036}
0x0ce48…0ce5c               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x0084, t01=0x0040}
0x0ce5c…0ce70               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0084, t01=0x0054}
0x0ce70…0ce86               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0084, t01=0x0068}
0x0ce86…0cea6               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0084, t01=0x007e}
0x0cea6…0ceb2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x009e}
0x0ceb2…0ceba               Head {h00=0x0004, h01=0x0050, t00=0x0084, t01=0x00aa}
0x0ceba…0ced0               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0084, t01=0x00b2}
0x0ced0…0cef0               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0084, t01=0x00c8}
0x0cef0…0cefc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x00e8}
0x0cefc…0cf2a               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0084, t01=0x00f4}
0x0cf2a…0cf4c               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x0084, t01=0x0122}
0x0cf4c…0cf7c               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x0084, t01=0x0144}
0x0cf7c…0cf90               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0084, t01=0x0174}
0x0cf90…0cfbc               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x0084, t01=0x0188}
0x0cfbc…0cfc8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x0024}
0x0cfc8…0cfdc               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0085, t01=0x0030}
0x0cfdc…0cfee               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0085, t01=0x0044}
0x0cfee…0d004               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHLCI2«, t00=0x0085, t01=0x0056}
0x0d004…0d022               Head {h00=0x001a, h01=0x0050, text=» CWK A2,SYN SKIP SYNS «, t00=0x0085, t01=0x006c}
0x0d022…0d036               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x0085, t01=0x008a}
0x0d036…0d05c               Head {h00=0x0022, h01=0x0050, text=»IHLCI2 XRR A7,A2 CALCULATE LRC«, t00=0x0085, t01=0x009e}
0x0d05c…0d068               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x00c4}
0x0d068…0d07c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0085, t01=0x00d0}
0x0d07c…0d08e               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0085, t01=0x00e4}
0x0d08e…0d0c4               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME «, t00=0x0085, t01=0x00f6}
0x0d0c4…0d0da               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x0085, t01=0x012c}
0x0d0da…0d0fe               Head {h00=0x0020, h01=0x0050, text=» RF(E) READ SKIP EBCDIC SYN «, t00=0x0085, t01=0x0142}
0x0d0fe…0d112               Head {h00=0x0010, h01=0x0050, text=»IHLCI1 EQU *«, t00=0x0085, t01=0x0166}
0x0d112…0d136               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x0085, t01=0x017a}
0x0d136…0d162               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0086, t01=0x000e}
0x0d162…0d16e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x003a}
0x0d16e…0d184               Head {h00=0x0012, h01=0x0050, text=»IHIN10 RTN A5 «, t00=0x0086, t01=0x0046}
0x0d184…0d1a0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0086, t01=0x005c}
0x0d1a0…0d1c4               Head {h00=0x0020, h01=0x0050, text=»IHIN20 CF A5,SST PERFORM SST«, t00=0x0086, t01=0x0078}
0x0d1c4…0d1d4               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0086, t01=0x009c}
0x0d1d4…0d1ea               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0086, t01=0x00ac}
0x0d1ea…0d206               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0086, t01=0x00c2}
0x0d206…0d22e               Head {h00=0x0024, h01=0x0050, text=»IHIN20 RF SST PERFORM SST SALCUZ«, t00=0x0086, t01=0x00de}
0x0d22e…0d244               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0086, t01=0x0106}
0x0d244…0d24e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0086, t01=0x011c}
0x0d24e…0d258               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0126}
0x0d258…0d262               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0130}
0x0d262…0d284               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x0086, t01=0x013a}
0x0d284…0d28e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x015c}
0x0d28e…0d298               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0166}
0x0d298…0d2ac               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x0086, t01=0x0170}
0x0d2ac…0d2c0               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0086, t01=0x0184}
0x0d2c0…0d2d6               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0087, t01=0x0008}
0x0d2d6…0d2f8               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0087, t01=0x001e}
0x0d2f8…0d304               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x0040}
0x0d304…0d30c               Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x004c}
0x0d30c…0d322               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0087, t01=0x0054}
0x0d322…0d342               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0087, t01=0x006a}
0x0d342…0d34e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x008a}
0x0d34e…0d37c               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0087, t01=0x0096}
0x0d37c…0d38e               Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x0087, t01=0x00c4}
0x0d38e…0d398               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0087, t01=0x00d6}
0x0d398…0d3a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00e0}
0x0d3a2…0d3ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00ea}
0x0d3ac…0d3d6               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x0087, t01=0x00f4}
0x0d3d6…0d3e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x011e}
0x0d3e0…0d40c               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x0087, t01=0x0128}
0x0d40c…0d43e               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x0087, t01=0x0154}
0x0d43e…0d46e               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x0087, t01=0x0186}
0x0d46e…0d49e               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x0088, t01=0x0026}
0x0d49e…0d4a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0056}
0x0d4a8…0d4c0               Head {h00=0x0014, h01=0x0050, text=»SST SST A1,LCUIN«, t00=0x0088, t01=0x0060}
0x0d4c0…0d4dc               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0088, t01=0x0078}
0x0d4dc…0d512               Head {h00=0x0032, h01=0x0050, text=» RF(NA) SST200 ALREADY INACTIVE SALCUZ  SALCUZ«, t00=0x0088, t01=0x0094}
0x0d512…0d528               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0088, t01=0x00ca}
0x0d528…0d53a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0088, t01=0x00e0}
0x0d53a…0d54e               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0088, t01=0x00f2}
0x0d54e…0d578               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOG SST INFORMATION «, t00=0x0088, t01=0x0106}
0x0d578…0d584               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x0130}
0x0d584…0d5a0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0088, t01=0x013c}
0x0d5a0…0d5b2               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0088, t01=0x0158}
0x0d5b2…0d5c8               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x0088, t01=0x016a}
0x0d5c8…0d5de               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0088, t01=0x0180}
0x0d5de…0d5fa               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0089, t01=0x0008}
0x0d5fa…0d614               Head {h00=0x0016, h01=0x0050, text=» ANK A2,6  SALCUZ «, t00=0x0089, t01=0x0024}
0x0d614…0d632               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST100  SALCUZ «, t00=0x0089, t01=0x003e}
0x0d632…0d64c               Head {h00=0x0016, h01=0x0050, text=» ANK A2,2  SALCUZ «, t00=0x0089, t01=0x005c}
0x0d64c…0d676               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SST050 THROUGH PUT SALCUZ «, t00=0x0089, t01=0x0076}
0x0d676…0d6a0               Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 SET PARITY ERROR SALCUZ «, t00=0x0089, t01=0x00a0}
0x0d6a0…0d6ba               Head {h00=0x0016, h01=0x0050, text=» RF SSTRET  SALCUZ«, t00=0x0089, t01=0x00ca}
0x0d6ba…0d6d0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0089, t01=0x00e4}
0x0d6d0…0d6ec               Head {h00=0x0018, h01=0x0050, text=»SST050 EQU *  SALCUZ«, t00=0x0089, t01=0x00fa}
0x0d6ec…0d70c               Head {h00=0x001c, h01=0x0050, text=» CM XSTA TROUHHPUT ERROR«, t00=0x0089, t01=0x0116}
0x0d70c…0d720               Head {h00=0x0010, h01=0x0050, text=» LDKL A5,STB«, t00=0x0089, t01=0x0136}
0x0d720…0d734               Head {h00=0x0010, h01=0x0050, text=» ABL BRM010 «, t00=0x0089, t01=0x014a}
0x0d734…0d748               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x0089, t01=0x015e}
0x0d748…0d75e               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTCU «, t00=0x0089, t01=0x0172}
0x0d75e…0d77a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0089, t01=0x0188}
0x0d77a…0d7a8               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x008a, t01=0x0014}
0x0d7a8…0d7b8               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008a, t01=0x0042}
0x0d7b8…0d7ce               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008a, t01=0x0052}
0x0d7ce…0d7ea               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008a, t01=0x0068}
0x0d7ea…0d806               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/21  SALCUZ «, t00=0x008a, t01=0x0084}
0x0d806…0d824               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST200 LSALCUZ «, t00=0x008a, t01=0x00a0}
0x0d824…0d85e               Head {h00=0x0036, h01=0x0050, text=» CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ«, t00=0x008a, t01=0x00be}
0x0d85e…0d87e               Head {h00=0x001c, h01=0x0050, text=» DATA BRM RESTART SALCUZ«, t00=0x008a, t01=0x00f8}
0x0d87e…0d89e               Head {h00=0x001c, h01=0x0050, text=» DATA 2 WAIT TIME SALCUZ«, t00=0x008a, t01=0x0118}
0x0d89e…0d8b6               Head {h00=0x0014, h01=0x0050, text=» RF READ  SALCUZ«, t00=0x008a, t01=0x0138}
0x0d8b6…0d8c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0150}
0x0d8c0…0d8e0               Head {h00=0x001c, h01=0x0050, text=»SST200 LDK A1,0  SALCUZ «, t00=0x008a, t01=0x015a}
0x0d8e0…0d900               Head {h00=0x001c, h01=0x0050, text=»SSTRET ADK A5,4  SALCUZ «, t00=0x008a, t01=0x017a}
0x0d900…0d920               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 SET CR SALCUZ«, t00=0x008b, t01=0x000a}
0x0d920…0d93e               Head {h00=0x001a, h01=0x0050, text=» ABR* A5 RETURN SALCUZ«, t00=0x008b, t01=0x002a}
0x0d93e…0d954               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008b, t01=0x0048}
0x0d954…0d95e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x005e}
0x0d95e…0d968               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0068}
0x0d968…0d97c               Head {h00=0x0010, h01=0x0050, text=»* HALT INPUT«, t00=0x008b, t01=0x0072}
0x0d97c…0d986               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0086}
0x0d986…0d990               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0090}
0x0d990…0d9b0               Head {h00=0x001c, h01=0x0050, text=»HALTIN LDK A1,0  SALCUZ «, t00=0x008b, t01=0x009a}
0x0d9b0…0d9c8               Head {h00=0x0014, h01=0x0050, text=» CIO A1,0,LCUIN «, t00=0x008b, t01=0x00ba}
0x0d9c8…0d9e4               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x008b, t01=0x00d2}
0x0d9e4…0da1c               Head {h00=0x0034, h01=0x0050, text=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK«, t00=0x008b, t01=0x00ee}
0x0da1c…0da32               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008b, t01=0x0126}
0x0da32…0da4e               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008b, t01=0x013c}
0x0da4e…0da7c               Head {h00=0x002a, h01=0x0050, text=» RF READ WAIT FOR SST INTERRUPT SALCUZ«, t00=0x008b, t01=0x0158}
0x0da7c…0da92               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008b, t01=0x0186}
0x0da92…0da9c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x008c, t01=0x000c}
0x0da9c…0daa6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0016}
0x0daa6…0dab0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0020}
0x0dab0…0dae0               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x008c, t01=0x002a}
0x0dae0…0daea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x005a}
0x0daea…0daf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0064}
0x0daf4…0db08               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x008c, t01=0x006e}
0x0db08…0db1c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008c, t01=0x0082}
0x0db1c…0db30               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x008c, t01=0x0096}
0x0db30…0db44               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x008c, t01=0x00aa}
0x0db44…0db78               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x008c, t01=0x00be}
0x0db78…0dba6               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x008c, t01=0x00f2}
0x0dba6…0dbb2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x0120}
0x0dbb2…0dbc6               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x008c, t01=0x012c}
0x0dbc6…0dbec               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x008c, t01=0x0140}
0x0dbec…0dc02               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x008c, t01=0x0166}
0x0dc02…0dc24               Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x008c, t01=0x017c}
0x0dc24…0dc38               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x008d, t01=0x000e}
0x0dc38…0dc60               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x008d, t01=0x0022}
0x0dc60…0dc6c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x004a}
0x0dc6c…0dc80               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008d, t01=0x0056}
0x0dc80…0dcaa               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x008d, t01=0x006a}
0x0dcaa…0dcb6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0094}
0x0dcb6…0dcca               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x008d, t01=0x00a0}
0x0dcca…0dcf4               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x008d, t01=0x00b4}
0x0dcf4…0dd00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x00de}
0x0dd00…0dd0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00ea}
0x0dd0a…0dd24               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x008d, t01=0x00f4}
0x0dd24…0dd36               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x008d, t01=0x010e}
0x0dd36…0dd40               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x008d, t01=0x0120}
0x0dd40…0dd4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x012a}
0x0dd4a…0dd54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0134}
0x0dd54…0dd66               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x008d, t01=0x013e}
0x0dd66…0dd70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0150}
0x0dd70…0dd90               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x008d, t01=0x015a}
0x0dd90…0dd9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x017a}
0x0dd9a…0dda4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0184}
0x0dda4…0ddc6               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x008d, t01=0x018e}
0x0ddc6…0dde0               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x008e, t01=0x0020}
0x0dde0…0ddf2               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x008e, t01=0x003a}
0x0ddf2…0de06               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x008e, t01=0x004c}
0x0de06…0de1e               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x008e, t01=0x0060}
0x0de1e…0de34               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x008e, t01=0x0078}
0x0de34…0de4e               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x008e, t01=0x008e}
0x0de4e…0de62               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x008e, t01=0x00a8}
0x0de62…0de74               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x008e, t01=0x00bc}
0x0de74…0de80               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x00ce}
0x0de80…0dea2               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008e, t01=0x00da}
0x0dea2…0deba               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x008e, t01=0x00fc}
0x0deba…0dec6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x0114}
0x0dec6…0ded0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0120}
0x0ded0…0deda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x012a}
0x0deda…0dee4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0134}
0x0dee4…0def6               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x008e, t01=0x013e}
0x0def6…0df00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0150}
0x0df00…0df32               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x008e, t01=0x015a}
0x0df32…0df3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x018c}
0x0df3c…0df46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0008}
0x0df46…0df5e               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x008f, t01=0x0012}
0x0df5e…0df80               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x008f, t01=0x002a}
0x0df80…0df92               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x008f, t01=0x004c}
0x0df92…0dfa8               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x008f, t01=0x005e}
0x0dfa8…0dfbc               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x008f, t01=0x0074}
0x0dfbc…0dfd2               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x008f, t01=0x0088}
0x0dfd2…0dfe6               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x008f, t01=0x009e}
0x0dfe6…0dff8               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x008f, t01=0x00b2}
0x0dff8…0e010               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x008f, t01=0x00c4}
0x0e010…0e024               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x008f, t01=0x00dc}
0x0e024…0e030               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x00f0}
0x0e030…0e052               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008f, t01=0x00fc}
0x0e052…0e066               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x008f, t01=0x011e}
0x0e066…0e072               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x0132}
0x0e072…0e084               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x008f, t01=0x013e}
0x0e084…0e098               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x008f, t01=0x0150}
0x0e098…0e0ac               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x008f, t01=0x0164}
0x0e0ac…0e0bc               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x008f, t01=0x0178}
0x0e0bc…0e0c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0188}
0x0e0c6…0e0d0 (144, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0004}
0x0e0d0…0e0da               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0090, t01=0x000e}
0x0e0da…0e0e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0018}
0x0e0e4…0e124               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x0090, t01=0x0022}
0x0e124…0e12e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0062}
0x0e12e…0e156               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x0090, t01=0x006c}
0x0e156…0e176               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x0090, t01=0x0094}
0x0e176…0e18c               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x0090, t01=0x00b4}
0x0e18c…0e1b2               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x0090, t01=0x00ca}
0x0e1b2…0e1bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00f0}
0x0e1bc…0e202               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x0090, t01=0x00fa}
0x0e202…0e230               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x0090, t01=0x0140}
0x0e230…0e260               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x0090, t01=0x016e}
0x0e260…0e26a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x000e}
0x0e26a…0e29c               Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x0091, t01=0x0018}
0x0e29c…0e2a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x004a}
0x0e2a6…0e2b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0054}
0x0e2b0…0e2c4               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x0091, t01=0x005e}
0x0e2c4…0e2d8               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0091, t01=0x0072}
0x0e2d8…0e2ec               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0091, t01=0x0086}
0x0e2ec…0e2f8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x009a}
0x0e2f8…0e30a               Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x0091, t01=0x00a6}
0x0e30a…0e31e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0091, t01=0x00b8}
0x0e31e…0e332               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0091, t01=0x00cc}
0x0e332…0e33e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x00e0}
0x0e33e…0e368               Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x0091, t01=0x00ec}
0x0e368…0e396               Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x0091, t01=0x0116}
0x0e396…0e3ae               Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x0091, t01=0x0144}
0x0e3ae…0e3ce               Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x0091, t01=0x015c}
0x0e3ce…0e3f0               Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x0091, t01=0x017c}
0x0e3f0…0e41c               Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x0092, t01=0x000e}
0x0e41c…0e440               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x0092, t01=0x003a}
0x0e440…0e454               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0092, t01=0x005e}
0x0e454…0e47c               Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x0092, t01=0x0072}
0x0e47c…0e4aa               Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x0092, t01=0x009a}
0x0e4aa…0e4b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0092, t01=0x00c8}
0x0e4b6…0e4ca               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0092, t01=0x00d4}
0x0e4ca…0e4fc               Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x0092, t01=0x00e8}
0x0e4fc…0e508               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0092, t01=0x011a}
0x0e508…0e532               Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x0092, t01=0x0126}
0x0e532…0e54a               Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x0092, t01=0x0150}
0x0e54a…0e560               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x0092, t01=0x0168}
0x0e560…0e570               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0092, t01=0x017e}
0x0e570…0e57a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0092, t01=0x018e}
0x0e57a…0e584               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0008}
0x0e584…0e58e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0012}
0x0e58e…0e5aa               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x0093, t01=0x001c}
0x0e5aa…0e5b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0038}
0x0e5b4…0e5be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0042}
0x0e5be…0e5d2               Head {h00=0x0010, h01=0x0050, text=»DC15ON EQU *«, t00=0x0093, t01=0x004c}
0x0e5d2…0e5e8               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0093, t01=0x0060}
0x0e5e8…0e608               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0093, t01=0x0076}
0x0e608…0e614               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x0096}
0x0e614…0e61c               Head {h00=0x0004, h01=0x0050, t00=0x0093, t01=0x00a2}
0x0e61c…0e632               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0093, t01=0x00aa}
0x0e632…0e652               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0093, t01=0x00c0}
0x0e652…0e65e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x00e0}
0x0e65e…0e672               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0093, t01=0x00ec}
0x0e672…0e692               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x0093, t01=0x0100}
0x0e692…0e6a6               Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x0093, t01=0x0120}
0x0e6a6…0e6d8               Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x0093, t01=0x0134}
0x0e6d8…0e6f0               Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x0093, t01=0x0166}
0x0e6f0…0e704               Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x0093, t01=0x017e}
0x0e704…0e726 (148, 0, 400) Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x0094, t01=0x0004}
0x0e726…0e74a               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x0094, t01=0x0026}
0x0e74a…0e77e               Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x0094, t01=0x004a}
0x0e77e…0e7aa               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x0094, t01=0x007e}
0x0e7aa…0e7bc               Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x0094, t01=0x00aa}
0x0e7bc…0e7d0               Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x0094, t01=0x00bc}
0x0e7d0…0e7dc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x00d0}
0x0e7dc…0e7f0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0094, t01=0x00dc}
0x0e7f0…0e806               Head {h00=0x0012, h01=0x0050, text=» ORS A2,DCONOF«, t00=0x0094, t01=0x00f0}
0x0e806…0e81c               Head {h00=0x0012, h01=0x0050, text=» CF A15,CKMESS«, t00=0x0094, t01=0x0106}
0x0e81c…0e848               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x0094, t01=0x011c}
0x0e848…0e86e               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x0094, t01=0x0148}
0x0e86e…0e89c               Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x0094, t01=0x016e}
0x0e89c…0e8b2               Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x0095, t01=0x000c}
0x0e8b2…0e8bc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0095, t01=0x0022}
0x0e8bc…0e8c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x002c}
0x0e8c6…0e8de               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0095, t01=0x0036}
0x0e8de…0e8e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x004e}
0x0e8e8…0e914               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0095, t01=0x0058}
0x0e914…0e928               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0095, t01=0x0084}
0x0e928…0e954               Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x0095, t01=0x0098}
0x0e954…0e982               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0095, t01=0x00c4}
0x0e982…0e9aa               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0095, t01=0x00f2}
0x0e9aa…0e9bc               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0095, t01=0x011a}
0x0e9bc…0e9c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x012c}
0x0e9c6…0e9fe               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x0095, t01=0x0136}
0x0e9fe…0ea08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x016e}
0x0ea08…0ea30               Head {h00=0x0024, h01=0x0050, text=»CPTIM CM DCONOF INDICATE POLLING«, t00=0x0095, t01=0x0178}
0x0ea30…0ea48               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x0096, t01=0x0010}
0x0ea48…0ea6c               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x0096, t01=0x0028}
0x0ea6c…0ea9a               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0096, t01=0x004c}
0x0ea9a…0eaaa               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0096, t01=0x007a}
0x0eaaa…0eab4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x008a}
0x0eab4…0eace               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x0096, t01=0x0094}
0x0eace…0ead8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00ae}
0x0ead8…0eb00               Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x0096, t01=0x00b8}
0x0eb00…0eb1a               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x0096, t01=0x00e0}
0x0eb1a…0eb44               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x0096, t01=0x00fa}
0x0eb44…0eb58               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0096, t01=0x0124}
0x0eb58…0eb6a               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0096, t01=0x0138}
0x0eb6a…0eb74               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0096, t01=0x014a}
0x0eb74…0eb7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0154}
0x0eb7e…0eb9e               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x0096, t01=0x015e}
0x0eb9e…0eba8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x017e}
0x0eba8…0ebbc               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x0096, t01=0x0188}
0x0ebbc…0ebe4               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x0097, t01=0x000c}
0x0ebe4…0ebfa               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0097, t01=0x0034}
0x0ebfa…0ec16               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x0097, t01=0x004a}
0x0ec16…0ec3e               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x0097, t01=0x0066}
0x0ec3e…0ec4e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0097, t01=0x008e}
0x0ec4e…0ec58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x009e}
0x0ec58…0ec74               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x0097, t01=0x00a8}
0x0ec74…0ec7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00c4}
0x0ec7e…0ec96               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x0097, t01=0x00ce}
0x0ec96…0ecb2               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x0097, t01=0x00e6}
0x0ecb2…0ecd6               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x0097, t01=0x0102}
0x0ecd6…0ed06               Head {h00=0x002c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT IF OPEN SALCUZ «, t00=0x0097, t01=0x0126}
0x0ed06…0ed1a               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0097, t01=0x0156}
0x0ed1a…0ed40               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x0097, t01=0x016a}
0x0ed40…0ed5e               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0097, t01=0x0190}
0x0ed5e…0ed88               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0098, t01=0x001e}
0x0ed88…0ed9e               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x0098, t01=0x0048}
0x0ed9e…0eda8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0098, t01=0x005e}
0x0eda8…0edb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0068}
0x0edb2…0edd0               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x0098, t01=0x0072}
0x0edd0…0edda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0090}
0x0edda…0ee06               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x0098, t01=0x009a}
0x0ee06…0ee26               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x0098, t01=0x00c6}
0x0ee26…0ee44               Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x0098, t01=0x00e6}
0x0ee44…0ee56               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x0098, t01=0x0104}
0x0ee56…0ee6a               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x0098, t01=0x0116}
0x0ee6a…0ee74               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0098, t01=0x012a}
0x0ee74…0ee88               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0098, t01=0x0134}
0x0ee88…0ee92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0148}
0x0ee92…0ee9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0152}
0x0ee9c…0eeb8               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x0098, t01=0x015c}
0x0eeb8…0eec2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0178}
0x0eec2…0eeda               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x0098, t01=0x0182}
0x0eeda…0eef8               Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x0099, t01=0x000a}
0x0eef8…0ef02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0028}
0x0ef02…0ef0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0032}
0x0ef0c…0ef20               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x0099, t01=0x003c}
0x0ef20…0ef36               Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x0099, t01=0x0050}
0x0ef36…0ef4e               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x0099, t01=0x0066}
0x0ef4e…0ef66               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x0099, t01=0x007e}
0x0ef66…0ef78               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x0099, t01=0x0096}
0x0ef78…0ef90               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x0099, t01=0x00a8}
0x0ef90…0efa2               Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x0099, t01=0x00c0}
0x0efa2…0efb4               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x0099, t01=0x00d2}
0x0efb4…0efc6               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x0099, t01=0x00e4}
0x0efc6…0efd8               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0099, t01=0x00f6}
0x0efd8…0efee               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x0099, t01=0x0108}
0x0efee…0f004               Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x0099, t01=0x011e}
0x0f004…0f01c               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x0099, t01=0x0134}
0x0f01c…0f032               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x0099, t01=0x014c}
0x0f032…0f048               Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x0099, t01=0x0162}
0x0f048…0f060               Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x0099, t01=0x0178}
0x0f060…0f078               Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x0099, t01=0x0190}
0x0f078…0f088               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x009a, t01=0x0018}
0x0f088…0f09c               Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x009a, t01=0x0028}
0x0f09c…0f0a6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009a, t01=0x003c}
0x0f0a6…0f0b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0046}
0x0f0b0…0f0ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0050}
0x0f0ba…0f0e6               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x009a, t01=0x005a}
0x0f0e6…0f106               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x009a, t01=0x0086}
0x0f106…0f110               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00a6}
0x0f110…0f11a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00b0}
0x0f11a…0f142               Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x009a, t01=0x00ba}
0x0f142…0f16a               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x009a, t01=0x00e2}
0x0f16a…0f18a               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x009a, t01=0x010a}
0x0f18a…0f1aa               Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x009a, t01=0x012a}
0x0f1aa…0f1ca               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x009a, t01=0x014a}
0x0f1ca…0f1f6               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x009a, t01=0x016a}
0x0f1f6…0f216               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x009b, t01=0x0008}
0x0f216…0f228               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x009b, t01=0x0028}
0x0f228…0f23a               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x009b, t01=0x003a}
0x0f23a…0f24c               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x009b, t01=0x004c}
0x0f24c…0f27e               Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x009b, t01=0x005e}
0x0f27e…0f28e               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009b, t01=0x0090}
0x0f28e…0f29a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x00a0}
0x0f29a…0f2ae               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x009b, t01=0x00ac}
0x0f2ae…0f2b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x00c0}
0x0f2b8…0f2e2               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x009b, t01=0x00ca}
0x0f2e2…0f308               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x009b, t01=0x00f4}
0x0f308…0f312               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x011a}
0x0f312…0f328               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x009b, t01=0x0124}
0x0f328…0f33c               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x009b, t01=0x013a}
0x0f33c…0f34e               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x009b, t01=0x014e}
0x0f34e…0f360               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x009b, t01=0x0160}
0x0f360…0f376               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x009b, t01=0x0172}
0x0f376…0f38a               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x009b, t01=0x0188}
0x0f38a…0f39e               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x009c, t01=0x000c}
0x0f39e…0f3b0               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x009c, t01=0x0020}
0x0f3b0…0f3c0               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009c, t01=0x0032}
0x0f3c0…0f3c8               Head {h00=0x0004, h01=0x0050, t00=0x009c, t01=0x0042}
0x0f3c8…0f3d4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x004a}
0x0f3d4…0f3de               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009c, t01=0x0056}
0x0f3de…0f3e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0060}
0x0f3e8…0f3f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x006a}
0x0f3f2…0f418               Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x009c, t01=0x0074}
0x0f418…0f422               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x009a}
0x0f422…0f42c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00a4}
0x0f42c…0f44c               Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x009c, t01=0x00ae}
0x0f44c…0f46c               Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x009c, t01=0x00ce}
0x0f46c…0f486               Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x009c, t01=0x00ee}
0x0f486…0f4a2               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x009c, t01=0x0108}
0x0f4a2…0f4b8               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x009c, t01=0x0124}
0x0f4b8…0f4e6               Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x009c, t01=0x013a}
0x0f4e6…0f502               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x009c, t01=0x0168}
0x0f502…0f52a               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x009c, t01=0x0184}
0x0f52a…0f544               Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x009d, t01=0x001c}
0x0f544…0f54e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0036}
0x0f54e…0f564               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x009d, t01=0x0040}
0x0f564…0f584               Head {h00=0x001c, h01=0x0050, text=» DATA 0 USER ECB ADDRESS«, t00=0x009d, t01=0x0056}
0x0f584…0f5a8               Head {h00=0x0020, h01=0x0050, text=» DATA DC:ECB MMU ECB ADDRESS«, t00=0x009d, t01=0x0076}
0x0f5a8…0f5b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009d, t01=0x009a}
0x0f5b4…0f5be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00a6}
0x0f5be…0f5dc               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x009d, t01=0x00b0}
0x0f5dc…0f608               Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x009d, t01=0x00ce}
0x0f608…0f63a               Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x009d, t01=0x00fa}
0x0f63a…0f660               Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x009d, t01=0x012c}
0x0f660…0f690               Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x009d, t01=0x0152}
0x0f690…0f6ae               Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x009d, t01=0x0182}
0x0f6ae…0f6d4               Head {h00=0x0022, h01=0x0050, text=» DATA 0 REQUEST TIMEOUT VALUE «, t00=0x009e, t01=0x0010}
0x0f6d4…0f6de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0036}
0x0f6de…0f6f4               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x009e, t01=0x0040}
0x0f6f4…0f710               Head {h00=0x0018, h01=0x0050, text=»DC:ECB EQU * MMU ECB«, t00=0x009e, t01=0x0056}
0x0f710…0f72a               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x009e, t01=0x0072}
0x0f72a…0f736               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009e, t01=0x008c}
0x0f736…0f740               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0098}
0x0f740…0f74a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009e, t01=0x00a2}
0x0f74a…0f754               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00ac}
0x0f754…0f75e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00b6}
0x0f75e…0f77e               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x009e, t01=0x00c0}
0x0f77e…0f788               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00e0}
0x0f788…0f7a8               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x009e, t01=0x00ea}
0x0f7a8…0f7b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x010a}
0x0f7b2…0f7c6               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x009e, t01=0x0114}
0x0f7c6…0f7ea               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x009e, t01=0x0128}
0x0f7ea…0f804               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x009e, t01=0x014c}
0x0f804…0f81a               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x009e, t01=0x0166}
0x0f81a…0f830               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009e, t01=0x017c}
0x0f830…0f844 (159, 0, 398) Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x0004}
0x0f844…0f85a               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x009f, t01=0x0018}
0x0f85a…0f870               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009f, t01=0x002e}
0x0f870…0f884               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x0044}
0x0f884…0f89a               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x009f, t01=0x0058}
0x0f89a…0f8b0               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009f, t01=0x006e}
0x0f8b0…0f8c4               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x0084}
0x0f8c4…0f8d0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x0098}
0x0f8d0…0f8ea               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x009f, t01=0x00a4}
0x0f8ea…0f900               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009f, t01=0x00be}
0x0f900…0f914               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x00d4}
0x0f914…0f926               Head {h00=0x000e, h01=0x0050, text=» XIF   DK3«, t00=0x009f, t01=0x00e8}
0x0f926…0f942               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x009f, t01=0x00fa}
0x0f942…0f956               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x0116}
0x0f956…0f95e               Head {h00=0x0004, h01=0x0050, t00=0x009f, t01=0x012a}
0x0f95e…0f974               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x009f, t01=0x0132}
0x0f974…0f99e               Head {h00=0x0026, h01=0x0050, text=»MMUBUF RES TBUFL+1 MMU WORK BUFFER«, t00=0x009f, t01=0x0148}
0x0f99e…0f9aa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x0172}
0x0f9aa…0f9b4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009f, t01=0x017e}
0x0f9b4…0f9be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0188}
0x0f9be…0f9c8 (160, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0004}
0x0f9c8…0f9ec               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x00a0, t01=0x000e}
0x0f9ec…0f9f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0032}
0x0f9f6…0fa00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x003c}
0x0fa00…0fa14               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00a0, t01=0x0046}
0x0fa14…0fa2e               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x00a0, t01=0x005a}
0x0fa2e…0fa44               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x00a0, t01=0x0074}
0x0fa44…0fa56               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a0, t01=0x008a}
0x0fa56…0fa70               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x00a0, t01=0x009c}
0x0fa70…0fa86               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x00a0, t01=0x00b6}
0x0fa86…0fa98               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a0, t01=0x00cc}
0x0fa98…0fab0               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x00a0, t01=0x00de}
0x0fab0…0fac6               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x00a0, t01=0x00f6}
0x0fac6…0fada               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x00a0, t01=0x010c}
0x0fada…0faf4               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x00a0, t01=0x0120}
0x0faf4…0fb0a               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x00a0, t01=0x013a}
0x0fb0a…0fb1c               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x00a0, t01=0x0150}
0x0fb1c…0fb2e               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x00a0, t01=0x0162}
0x0fb2e…0fb44               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x00a0, t01=0x0174}
0x0fb44…0fb5a               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x00a0, t01=0x018a}
0x0fb5a…0fb72               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x00a1, t01=0x0010}
0x0fb72…0fb8e               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x00a1, t01=0x0028}
0x0fb8e…0fba2               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x00a1, t01=0x0044}
0x0fba2…0fbb6               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x00a1, t01=0x0058}
0x0fbb6…0fbcc               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x00a1, t01=0x006c}
0x0fbcc…0fbd6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a1, t01=0x0082}
0x0fbd6…0fbe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x008c}
0x0fbe0…0fbea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0096}
0x0fbea…0fc04               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x00a1, t01=0x00a0}
0x0fc04…0fc18               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x00a1, t01=0x00ba}
0x0fc18…0fc28               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x00a1, t01=0x00ce}
0x0fc28…0fc3e               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x00a1, t01=0x00de}
0x0fc3e…0fc52               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x00a1, t01=0x00f4}
0x0fc52…0fc66               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x00a1, t01=0x0108}
0x0fc66…0fc72               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x011c}
0x0fc72…0fc7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0128}
0x0fc7c…0fc86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0132}
0x0fc86…0fc90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x013c}
0x0fc90…0fca4               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00a1, t01=0x0146}
0x0fca4…0fcae               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a1, t01=0x015a}
0x0fcae…0fcee               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x00a1, t01=0x0164}
0x0fcee…0fcf8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0014}
0x0fcf8…0fd12               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x00a2, t01=0x001e}
0x0fd12…0fd1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0038}
0x0fd1c…0fd5a               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x00a2, t01=0x0042}
0x0fd5a…0fd64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0080}
0x0fd64…0fda6               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x00a2, t01=0x008a}
0x0fda6…0fdae               Head {h00=0x0004, h01=0x0050, t00=0x00a2, t01=0x00cc}
0x0fdae…0fdc2               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x00a2, t01=0x00d4}
0x0fdc2…0fde8               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x00a2, t01=0x00e8}
0x0fde8…0fdfa               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x00a2, t01=0x010e}
0x0fdfa…0fe10               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a2, t01=0x0120}
0x0fe10…0fe3a               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x00a2, t01=0x0136}
0x0fe3a…0fe60               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x00a2, t01=0x0160}
0x0fe60…0fe68               Head {h00=0x0004, h01=0x0050, t00=0x00a2, t01=0x0186}
0x0fe68…0fe7a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x00a2, t01=0x018e}
0x0fe7a…0fe90               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a3, t01=0x0010}
0x0fe90…0febc               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x00a3, t01=0x0026}
0x0febc…0fee4               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x00a3, t01=0x0052}
0x0fee4…0fefa               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x00a3, t01=0x007a}
0x0fefa…0ff04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0090}
0x0ff04…0ff0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x009a}
0x0ff0e…0ff18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00a4}
0x0ff18…0ff22               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a3, t01=0x00ae}
0x0ff22…0ff2a               Head {h00=0x0004, h01=0x0050, t00=0x00a3, t01=0x00b8}
0x0ff2a…0ff4e               Head {h00=0x0020, h01=0x0050, text=»*     SCANDINAVIAN ALPHABET «, t00=0x00a3, t01=0x00c0}
0x0ff4e…0ff5c               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x00a3, t01=0x00e4}
0x0ff5c…0ff70               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x00a3, t01=0x00f2}
0x0ff70…0ff9e               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x00a3, t01=0x0106}
0x0ff9e…0ffcc               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/232E,/3C28,/2B21 /08-/0F «, t00=0x00a3, t01=0x0134}
0x0ffcc…0fffa               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x00a3, t01=0x0162}
0x0fffa…10028               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/245D,/2A29,/3B5E /18-/1F «, t00=0x00a3, t01=0x0190}
0x10028…10056               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x00a4, t01=0x002e}
0x10056…10084               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/402C,/255F,/3E3F /28-/2F «, t00=0x00a4, t01=0x005c}
0x10084…100b0               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x00a4, t01=0x008a}
0x100b0…100dc               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A5B,/5C27,/3D22 /38-3F«, t00=0x00a4, t01=0x00b6}
0x100dc…100ea               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x00a4, t01=0x00e2}
0x100ea…100f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a4, t01=0x00f0}
0x100f6…10100               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a4, t01=0x00fc}
0x10100…10108               Head {h00=0x0004, h01=0x0050, t00=0x00a4, t01=0x0106}
0x10108…10124               Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x00a4, t01=0x010e}
0x10124…1013e               Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x00a4, t01=0x012a}
0x1013e…10164               Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x00a4, t01=0x0144}
0x10164…10192               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00a4, t01=0x016a}
0x10192…101c0               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00a5, t01=0x0008}
0x101c0…101d4               Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x00a5, t01=0x0036}
0x101d4…101de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x004a}
0x101de…101e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0054}
0x101e8…101f4               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00a5, t01=0x005e}
0x101f4…101f8               Head {h00=0x4004, h01=0x0000}
0x101f8…101fc               00 a5 00 6a                                                                                                                                                                                                                                       ┆   j┆
0x101fc…10204 (166, 1, 8)   20 04 00 00 00 a6 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view