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

⟦eab097409⟧

    Length: 66102 (0x10236)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«

Derivation

└─⟦3a2bec7de⟧ Bits:30009687 Philips computer tape "600313"
    └─⟦this⟧ »M:821/DRDC15.SC« 

PTS(SC)

	IDENT	DRDC15	9.2DK 6 81-10-08 870105040924 

			DK6, WACK/DEVICEEND
			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	0	IF 1 INTERRUPT LOGGING
LOGG	EQU	X:C
* 
TIMPOL	EQU	600	POLL TIMEOUT VALUE		DK 
X:E	EQU	1	STATUS AND RVI HANDLING IF=1
STAT	EQU	X:E
X:F	EQU	1	READ COMMAND HANDLING IF=1
RCOM	EQU	X:F
X:G	EQU	252	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	X:G 
X:H	EQU	1	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	X:H
X:I	EQU	0	IF 1 SPECIFIC POLL HANDLING 
SPECP	EQU	X:I 
X:J	EQU	1	IF = 1  LINE SPEED SET TO HIGH
			IF = 0  LINE SPEED IS SET TO LOW 
SPEED	EQU	X:J 
X:K	EQU	0	IF 1 SIEMENS MSV1 PROCEDURE 
MSV1	EQU	X:K
X:L	EQU	2	NUMBER OF RECEIVE BUFFERS (2-5) 
RBUFNR	EQU	X:L
X:M	EQU	0	IF = 1  PTS 6805 ADAPTION	SALCUZ
P6805	EQU	X:M 
X:N	EQU	/02 
	IFT	P6805=0
LCUIN	EQU	X:N	DEVICE ADDRESS OF RECEIVER
	XIF
	IFT	P6805=1
LCUIN	EQU	/0A	DEVICE ADDRESS OF RECEIVER
	XIF
X:O	EQU	0 
IBMCHR	EQU	X:O	IF 1 IBM CHARACTER HANDLING
X:P	EQU	0	IF 1 MESSAGE PASSING TO DC TASK 
MESPAS	EQU	X:P
X:Q	EQU	1	IBM-3270 EMULATION PACKAGE, IF NOT = 0
EM3270	EQU	X:Q
X:R	EQU	1000
				DK2 
BINTRM	EQU	0	IF 1 BINARY TRANSMISSION 
TSTREQ	EQU	X:I	IF 1 TEST REQUEST HANDLING 
DMRK	EQU	1	SPECIAL CONDITION FOR DENMARK
NOWACK	EQU	0	WHEN WORKING WITH A MAIN-FRAME THAT
			DOESN'T ACCEPT WACK RESPONSE TO A SELECT 
			SEQUENCE, NOWACK SHOULD BE SET TO "ONE". 
			ONLY WORKING IF STAT IS SET TO "ONE".
	IFT	P6805=0		SALCUZ
LCUUT	EQU	LCUIN+/10	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
	IFT	P6805=1
LCUUT	EQU	LCUIN+/01	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
* 
	 
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	1
* 
				DB
	IFT	MMUPAG=0		DK2
TBUFL	EQU	0		DK2
	XIF			DK2
* 
	IFT	MMUPAG=1		DK2
TBUFL	EQU	650+X:X	MMU BUFFER LENGTH	DK
	XIF			DK2
				DE
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	0
* 
DEVIND	EQU	-2	DEVICE INDEX DATA COMMUNICATION 
BUFLEN	EQU	TBUFL+TBUFL	MMU BUFFER SIZE
* 
	 
* 
*	DWT DISPLACEMENTS 
* 
DWTDRD	EQU	/10	START OF DRIVER DEFINED PART 
* 
	IFT	MMUPAG=0 
START	EQU	DWTDRD
	XIF
* 
	IFT	MMUPAG=1 
START	EQU	DWTDRD+4
	XIF
* 
DWTTP	EQU	START+/00	TIMER POINTER ORDER PROCESS 
DWTWQ	EQU	START+/02	WRITE/GET BUFFER QUEUE
DWTSQ	EQU	START+/04	STATUS QUEUE
DWTRQ	EQU	START+/06	RECEIVE QUEUE 
DWTBUF	EQU	START+/08	DEVICE BUFFER ADDRESS
DWTCUR	EQU	START+/0A	CURSOR ADDRESS 
DWTTIM	EQU	START+/0C	REQUEST TIMER VALUE
* 
	 
* 
*	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	DK6 
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,/0	CLEAR STARTPRINTERBIT	DK5
	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 6 81-10-08 870105040924 «, t00=0x0000, t01=0x0004}
0x00034…0003c               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x0003c…0005a               Head {h00=0x001a, h01=0x0050, text=»   DK6, WACK/DEVICEEND«, t00=0x0000, t01=0x0040}
0x0005a…0007a               Head {h00=0x001c, h01=0x0050, text=»   DK3, RBUFNR=1 ALLOWED«, t00=0x0000, t01=0x005e}
0x0007a…00090               Head {h00=0x0012, h01=0x0050, text=»   DK2, TBUFL «, t00=0x0000, t01=0x007e}
0x00090…000a4               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x0094}
0x000a4…000d8               Head {h00=0x0030, h01=0x0050, text=»   DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. «, t00=0x0000, t01=0x00a8}
0x000d8…000ec               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x00dc}
0x000ec…00108               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-08-16 «, t00=0x0000, t01=0x00f0}
0x00108…0012c               Head {h00=0x0020, h01=0x0050, text=»   =8, ASCII-MODE FOR SALCUZ«, t00=0x0000, t01=0x010c}
0x0012c…00148               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0000, t01=0x0130}
0x00148…00172               Head {h00=0x0026, h01=0x0050, text=»   =7, ACK IN CONVERSATIONAL MODE «, t00=0x0000, t01=0x014c}
0x00172…0018e               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0000, t01=0x0176}
0x0018e…001bc (1, 0, 400)   Head {h00=0x002a, h01=0x0050, text=»   =6, DCTASK BUFFER ADDRESS DESTROYED«, t00=0x0001, t01=0x0004}
0x001bc…001d8               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x0032}
0x001d8…00200               Head {h00=0x0024, h01=0x0050, text=»   =5, INCOMPLETE POLL SEQUENCE «, t00=0x0001, t01=0x004e}
0x00200…0021c               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x0076}
0x0021c…0023e               Head {h00=0x001e, h01=0x0050, text=»   =3, TRANSFER PARAMETER «, t00=0x0001, t01=0x0092}
0x0023e…0025a               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x00b4}
0x0025a…0027a               Head {h00=0x001c, h01=0x0050, text=»   =4, ANY MESSAGE ORDER«, t00=0x0001, t01=0x00d0}
0x0027a…00296               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x00f0}
0x00296…002b4               Head {h00=0x001a, h01=0x0050, text=»   =2, ABORT HANDLING «, t00=0x0001, t01=0x010c}
0x002b4…002d0               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-29 «, t00=0x0001, t01=0x012a}
0x002d0…002ee               Head {h00=0x001a, h01=0x0050, text=»   =1, MSR-INSTRUCTION«, t00=0x0001, t01=0x0146}
0x002ee…0030a               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-14 «, t00=0x0001, t01=0x0164}
0x0030a…00326               Head {h00=0x0018, h01=0x0050, text=»   REL 8.2 78-11-14 «, t00=0x0001, t01=0x0180}
0x00326…0032e               Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x000c}
0x0032e…00338               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0014}
0x00338…00342               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001e}
0x00342…00378               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x0028}
0x00378…00382               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005e}
0x00382…003aa               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x0068}
0x003aa…003b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0090}
0x003b4…003e2               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x009a}
0x003e2…00414               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0002, t01=0x00c8}
0x00414…00438               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0002, t01=0x00fa}
0x00438…00442               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x011e}
0x00442…0044c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0128}
0x0044c…00456               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0132}
0x00456…00460               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x013c}
0x00460…0046a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0146}
0x0046a…004a6               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0002, t01=0x0150}
0x004a6…004b0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0002, t01=0x018c}
0x004b0…004ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0008}
0x004ba…004c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0012}
0x004c4…004da               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0003, t01=0x001c}
0x004da…004e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0032}
0x004e4…0051a               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0003, t01=0x003c}
0x0051a…00540               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x0072}
0x00540…00566               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x0098}
0x00566…0058c               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0003, t01=0x00be}
0x0058c…005b2               Head {h00=0x0022, h01=0x0050, text=» ENTRY DW1500 DWT FOR DC TASK «, t00=0x0003, t01=0x00e4}
0x005b2…005bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x010a}
0x005bc…005c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0114}
0x005c6…005e4               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0003, t01=0x011e}
0x005e4…005ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x013c}
0x005ee…005f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0146}
0x005f8…0061e               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0003, t01=0x0150}
0x0061e…0064a               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0003, t01=0x0176}
0x0064a…00672               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0004, t01=0x0012}
0x00672…00696               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0004, t01=0x003a}
0x00696…006b6               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x005e}
0x006b6…006d6               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x007e}
0x006d6…006f4               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x009e}
0x006f4…00712               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0004, t01=0x00bc}
0x00712…00740               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x00da}
0x00740…0076c               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0004, t01=0x0108}
0x0076c…00798               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0004, t01=0x0134}
0x00798…007c0               Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0004, t01=0x0160}
0x007c0…007ea               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0004, t01=0x0188}
0x007ea…00814               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0005, t01=0x0022}
0x00814…00838               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x004c}
0x00838…0085e               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0005, t01=0x0070}
0x0085e…0088c               Head {h00=0x002a, h01=0x0050, text=» EXTRN DC:MIN MOVE DATA TO USER BUFFER«, t00=0x0005, t01=0x0096}
0x0088c…008bc               Head {h00=0x002c, h01=0x0050, text=» EXTRN DC:MOT MOVE DATA FROM USER BUFFER«, t00=0x0005, t01=0x00c4}
0x008bc…008f0               Head {h00=0x0030, h01=0x0050, text=» EXTRN DISEND COMPLETE REQUEST AND DISPATCH «, t00=0x0005, t01=0x00f4}
0x008f0…008fa               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0005, t01=0x0128}
0x008fa…00904               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0132}
0x00904…0090e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013c}
0x0090e…00918               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0146}
0x00918…00922               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0150}
0x00922…0095c               Head {h00=0x0036, h01=0x0050, text=»*   STANDARD INTERFACE PART FOR DATA COMMUNICATION«, t00=0x0005, t01=0x015a}
0x0095c…00966 (6, 0, 400)   Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0004}
0x00966…00970               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x000e}
0x00970…0097a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0018}
0x0097a…00984               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0022}
0x00984…0099a               Head {h00=0x0012, h01=0x0050, text=»* DWT CONTENTS«, t00=0x0006, t01=0x002c}
0x0099a…009a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0042}
0x009a4…009f2               Head {h00=0x004a, h01=0x0050, text=»* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)«, t00=0x0006, t01=0x004c}
0x009f2…009fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x009a}
0x009fc…00a06               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0006, t01=0x00a4}
0x00a06…00a46               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0006, t01=0x00ae}
0x00a46…00a50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ee}
0x00a50…00a7e               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x00f8}
0x00a7e…00a88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0126}
0x00a88…00ab4               Head {h00=0x0028, h01=0x0050, text=»XRVI EQU /5C STANDARD:/40, DK:/5C DK«, t00=0x0006, t01=0x0130}
0x00ab4…00ae2               Head {h00=0x002a, h01=0x0050, text=»X:D EQU 0 BASE FOR RBUFL AND TBUFL DK «, t00=0x0006, t01=0x015c}
0x00ae2…00b08               Head {h00=0x0022, h01=0x0050, text=»X:X EQU 500 VALUE FOR BASE DK «, t00=0x0006, t01=0x018a}
0x00b08…00b32               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 2000 RECEIVE BUFFER LENGTH«, t00=0x0007, t01=0x0020}
0x00b32…00b50               Head {h00=0x001a, h01=0x0050, text=»RBUFL EQU 650+X:X  DK «, t00=0x0007, t01=0x004a}
0x00b50…00b74               Head {h00=0x0020, h01=0x0050, text=»X:B EQU /60 DCTASK FILE CODE«, t00=0x0007, t01=0x0068}
0x00b74…00b8a               Head {h00=0x0012, h01=0x0050, text=»DC15FC EQU /60«, t00=0x0007, t01=0x008c}
0x00b8a…00bb2               Head {h00=0x0024, h01=0x0050, text=»X:C EQU 0 IF 1 INTERRUPT LOGGING«, t00=0x0007, t01=0x00a2}
0x00bb2…00bc6               Head {h00=0x0010, h01=0x0050, text=»LOGG EQU X:C«, t00=0x0007, t01=0x00ca}
0x00bc6…00bd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00de}
0x00bd0…00bfe               Head {h00=0x002a, h01=0x0050, text=»TIMPOL EQU 600 POLL TIMEOUT VALUE  DK «, t00=0x0007, t01=0x00e8}
0x00bfe…00c2c               Head {h00=0x002a, h01=0x0050, text=»X:E EQU 1 STATUS AND RVI HANDLING IF=1«, t00=0x0007, t01=0x0116}
0x00c2c…00c40               Head {h00=0x0010, h01=0x0050, text=»STAT EQU X:E«, t00=0x0007, t01=0x0144}
0x00c40…00c6c               Head {h00=0x0028, h01=0x0050, text=»X:F EQU 1 READ COMMAND HANDLING IF=1«, t00=0x0007, t01=0x0158}
0x00c6c…00c80               Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:F«, t00=0x0007, t01=0x0184}
0x00c80…00caa               Head {h00=0x0026, h01=0x0050, text=»X:G EQU 252 TRANSMIT BLOCK LENGTH «, t00=0x0008, t01=0x0008}
0x00caa…00cc0               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU X:G «, t00=0x0008, t01=0x0032}
0x00cc0…00cec               Head {h00=0x0028, h01=0x0050, text=»X:H EQU 1 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0008, t01=0x0048}
0x00cec…00d00               Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:H«, t00=0x0008, t01=0x0074}
0x00d00…00d2e               Head {h00=0x002a, h01=0x0050, text=»X:I EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0008, t01=0x0088}
0x00d2e…00d44               Head {h00=0x0012, h01=0x0050, text=»SPECP EQU X:I «, t00=0x0008, t01=0x00b6}
0x00d44…00d74               Head {h00=0x002c, h01=0x0050, text=»X:J EQU 1 IF = 1  LINE SPEED SET TO HIGH«, t00=0x0008, t01=0x00cc}
0x00d74…00da0               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0008, t01=0x00fc}
0x00da0…00db6               Head {h00=0x0012, h01=0x0050, text=»SPEED EQU X:J «, t00=0x0008, t01=0x0128}
0x00db6…00de4               Head {h00=0x002a, h01=0x0050, text=»X:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0008, t01=0x013e}
0x00de4…00df8               Head {h00=0x0010, h01=0x0050, text=»MSV1 EQU X:K«, t00=0x0008, t01=0x016c}
0x00df8…00e2a               Head {h00=0x002e, h01=0x0050, text=»X:L EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0008, t01=0x0180}
0x00e2a…00e40               Head {h00=0x0012, h01=0x0050, text=»RBUFNR EQU X:L«, t00=0x0009, t01=0x0022}
0x00e40…00e72               Head {h00=0x002e, h01=0x0050, text=»X:M EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x0009, t01=0x0038}
0x00e72…00e88               Head {h00=0x0012, h01=0x0050, text=»P6805 EQU X:M «, t00=0x0009, t01=0x006a}
0x00e88…00e9c               Head {h00=0x0010, h01=0x0050, text=»X:N EQU /02 «, t00=0x0009, t01=0x0080}
0x00e9c…00eb0               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0009, t01=0x0094}
0x00eb0…00ee0               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU X:N DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x00a8}
0x00ee0…00eec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x00d8}
0x00eec…00f00               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0009, t01=0x00e4}
0x00f00…00f30               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x00f8}
0x00f30…00f3c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0128}
0x00f3c…00f4e               Head {h00=0x000e, h01=0x0050, text=»X:O EQU 0 «, t00=0x0009, t01=0x0134}
0x00f4e…00f80               Head {h00=0x002e, h01=0x0050, text=»IBMCHR EQU X:O IF 1 IBM CHARACTER HANDLING«, t00=0x0009, t01=0x0146}
0x00f80…00fb2               Head {h00=0x002e, h01=0x0050, text=»X:P EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x0009, t01=0x0178}
0x00fb2…00fc8               Head {h00=0x0012, h01=0x0050, text=»MESPAS EQU X:P«, t00=0x000a, t01=0x001a}
0x00fc8…01000               Head {h00=0x0034, h01=0x0050, text=»X:Q EQU 1 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000a, t01=0x0030}
0x01000…01016               Head {h00=0x0012, h01=0x0050, text=»EM3270 EQU X:Q«, t00=0x000a, t01=0x0068}
0x01016…0102a               Head {h00=0x0010, h01=0x0050, text=»X:R EQU 1000«, t00=0x000a, t01=0x007e}
0x0102a…0103a               Head {h00=0x000c, h01=0x0050, text=»    DK2 «, t00=0x000a, t01=0x0092}
0x0103a…01068               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000a, t01=0x00a2}
0x01068…0109a               Head {h00=0x002e, h01=0x0050, text=»TSTREQ EQU X:I IF 1 TEST REQUEST HANDLING «, t00=0x000a, t01=0x00d0}
0x0109a…010ca               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 1 SPECIAL CONDITION FOR DENMARK«, t00=0x000a, t01=0x0102}
0x010ca…01102               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000a, t01=0x0132}
0x01102…01136               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000a, t01=0x016a}
0x01136…0116a               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000b, t01=0x000e}
0x0116a…0119a               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000b, t01=0x0042}
0x0119a…011b6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000b, t01=0x0072}
0x011b6…011f6               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x008e}
0x011f6…0120c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x00ce}
0x0120c…01220               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x00e4}
0x01220…01260               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x00f8}
0x01260…01276               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x0138}
0x01276…01280               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x014e}
0x01280…0128a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000b, t01=0x0158}
0x0128a…01294               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0162}
0x01294…0129e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x016c}
0x0129e…012d0               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000b, t01=0x0176}
0x012d0…012da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0018}
0x012da…012f8               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000c, t01=0x0022}
0x012f8…01302               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0040}
0x01302…01334               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x004a}
0x01334…0133e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x007c}
0x0133e…01370               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000c, t01=0x0086}
0x01370…0139e               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000c, t01=0x00b8}
0x0139e…013a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e6}
0x013a8…013bc               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000c, t01=0x00f0}
0x013bc…013c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0104}
0x013c6…013d4               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x000c, t01=0x010e}
0x013d4…013ee               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=0  DK2«, t00=0x000c, t01=0x011c}
0x013ee…01406               Head {h00=0x0014, h01=0x0050, text=»TBUFL EQU 0  DK2«, t00=0x000c, t01=0x0136}
0x01406…01418               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000c, t01=0x014e}
0x01418…01422               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0160}
0x01422…0143c               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=1  DK2«, t00=0x000c, t01=0x016a}
0x0143c…0146a               Head {h00=0x002a, h01=0x0050, text=»TBUFL EQU 650+X:X MMU BUFFER LENGTH DK«, t00=0x000c, t01=0x0184}
0x0146a…0147c               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000d, t01=0x0022}
0x0147c…0148a               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x000d, t01=0x0034}
0x0148a…01494               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0042}
0x01494…014ce               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000d, t01=0x004c}
0x014ce…01500               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000d, t01=0x0086}
0x01500…0150a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00b8}
0x0150a…0151e               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000d, t01=0x00c2}
0x0151e…01528               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00d6}
0x01528…0155e               Head {h00=0x0032, h01=0x0050, text=»DEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION «, t00=0x000d, t01=0x00e0}
0x0155e…0158c               Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE«, t00=0x000d, t01=0x0116}
0x0158c…01596               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0144}
0x01596…015a0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000d, t01=0x014e}
0x015a0…015aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0158}
0x015aa…015c6               Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x000d, t01=0x0162}
0x015c6…015d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x017e}
0x015d0…01604               Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000d, t01=0x0188}
0x01604…0160e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x002c}
0x0160e…01624               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000e, t01=0x0036}
0x01624…0163c               Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000e, t01=0x004c}
0x0163c…01648               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0064}
0x01648…01652               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0070}
0x01652…01668               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x007a}
0x01668…01682               Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000e, t01=0x0090}
0x01682…0168e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x00aa}
0x0168e…01698               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00b6}
0x01698…016d0               Head {h00=0x0034, h01=0x0050, text=»DWTTP EQU START+/00 TIMER POINTER ORDER PROCESS «, t00=0x000e, t01=0x00c0}
0x016d0…01702               Head {h00=0x002e, h01=0x0050, text=»DWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE«, t00=0x000e, t01=0x00f8}
0x01702…0172a               Head {h00=0x0024, h01=0x0050, text=»DWTSQ EQU START+/04 STATUS QUEUE«, t00=0x000e, t01=0x012a}
0x0172a…01754               Head {h00=0x0026, h01=0x0050, text=»DWTRQ EQU START+/06 RECEIVE QUEUE «, t00=0x000e, t01=0x0152}
0x01754…01786               Head {h00=0x002e, h01=0x0050, text=»DWTBUF EQU START+/08 DEVICE BUFFER ADDRESS«, t00=0x000e, t01=0x017c}
0x01786…017b2               Head {h00=0x0028, h01=0x0050, text=»DWTCUR EQU START+/0A CURSOR ADDRESS «, t00=0x000f, t01=0x001e}
0x017b2…017e2               Head {h00=0x002c, h01=0x0050, text=»DWTTIM EQU START+/0C REQUEST TIMER VALUE«, t00=0x000f, t01=0x004a}
0x017e2…017ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x007a}
0x017ec…017f6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000f, t01=0x0084}
0x017f6…01800               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x008e}
0x01800…0181a               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000f, t01=0x0098}
0x0181a…01824               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b2}
0x01824…0182e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00bc}
0x0182e…01838               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c6}
0x01838…0184a               Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000f, t01=0x00d0}
0x0184a…01854               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e2}
0x01854…01868               Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000f, t01=0x00ec}
0x01868…0187c               Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x000f, t01=0x0100}
0x0187c…0189e               Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x000f, t01=0x0114}
0x0189e…018b8               Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x000f, t01=0x0136}
0x018b8…018e0               Head {h00=0x0024, h01=0x0050, text=»* /39: SET REQUEST TIMEOUT VALUE«, t00=0x000f, t01=0x0150}
0x018e0…018ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0178}
0x018ea…018f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0182}
0x018f4…01916               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x000f, t01=0x018c}
0x01916…01920               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x001e}
0x01920…0192a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0028}
0x0192a…01954               Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x0010, t01=0x0032}
0x01954…01982               Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x0010, t01=0x005c}
0x01982…019a6               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x0010, t01=0x008a}
0x019a6…019ce               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x0010, t01=0x00ae}
0x019ce…019fe               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x0010, t01=0x00d6}
0x019fe…01a08               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0010, t01=0x0106}
0x01a08…01a12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0110}
0x01a12…01a32               Head {h00=0x001c, h01=0x0050, text=»* DC TASK ADDRESS BLOCK «, t00=0x0010, t01=0x011a}
0x01a32…01a3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x013a}
0x01a3c…01a64               Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDICATES NO MMU BUFFER «, t00=0x0010, t01=0x0144}
0x01a64…01a86               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0010, t01=0x016c}
0x01a86…01ab4               Head {h00=0x002a, h01=0x0050, text=»DC15DC DATA DCACTD ACTIVATION ADDRESS «, t00=0x0010, t01=0x018e}
0x01ab4…01ade               Head {h00=0x0026, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x002c}
0x01ade…01b06               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x0056}
0x01b06…01b10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x007e}
0x01b10…01b2e               Head {h00=0x001a, h01=0x0050, text=»* DRIVER ADDRESS BLOCK«, t00=0x0011, t01=0x0088}
0x01b2e…01b38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00a6}
0x01b38…01b5c               Head {h00=0x0020, h01=0x0050, text=» DATA BUFLEN MMU BUFFER SIZE«, t00=0x0011, t01=0x00b0}
0x01b5c…01b7e               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0011, t01=0x00d4}
0x01b7e…01baa               Head {h00=0x0028, h01=0x0050, text=»DC15AD DATA DCACT ACTIVATION ADDRESS«, t00=0x0011, t01=0x00f6}
0x01baa…01be2               Head {h00=0x0034, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x0122}
0x01be2…01c0a               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x015a}
0x01c0a…01c14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0182}
0x01c14…01c44               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x0011, t01=0x018c}
0x01c44…01c56               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x0012, t01=0x002c}
0x01c56…01c7c               Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x0012, t01=0x003e}
0x01c7c…01c8e               Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x0012, t01=0x0064}
0x01c8e…01c96               Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x0076}
0x01c96…01caa               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x0012, t01=0x007e}
0x01caa…01cc2               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x0012, t01=0x0092}
0x01cc2…01cce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00aa}
0x01cce…01ce2               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x0012, t01=0x00b6}
0x01ce2…01cf6               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x0012, t01=0x00ca}
0x01cf6…01d02               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00de}
0x01d02…01d0c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0012, t01=0x00ea}
0x01d0c…01d16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00f4}
0x01d16…01d20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00fe}
0x01d20…01d48               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x0012, t01=0x0108}
0x01d48…01d52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0130}
0x01d52…01d66               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x0012, t01=0x013a}
0x01d66…01d8a               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0012, t01=0x014e}
0x01d8a…01da4               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0012, t01=0x0172}
0x01da4…01dba               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0012, t01=0x018c}
0x01dba…01de4               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0013, t01=0x0012}
0x01de4…01df0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x003c}
0x01df0…01e04               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0013, t01=0x0048}
0x01e04…01e26               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DCRD READ SPECIFIC «, t00=0x0013, t01=0x005c}
0x01e26…01e3e               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x0013, t01=0x007e}
0x01e3e…01e52               Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x0013, t01=0x0096}
0x01e52…01e6a               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/06 «, t00=0x0013, t01=0x00aa}
0x01e6a…01e92               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x0013, t01=0x00c2}
0x01e92…01ea6               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0013, t01=0x00ea}
0x01ea6…01ebe               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x0013, t01=0x00fe}
0x01ebe…01ee2               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) DCSS SET STATUS DK4 «, t00=0x0013, t01=0x0116}
0x01ee2…01efa               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/38 «, t00=0x0013, t01=0x013a}
0x01efa…01f22               Head {h00=0x0024, h01=0x0050, text=» ABL(Z) REQTIM SET REQUEST TIMER«, t00=0x0013, t01=0x0152}
0x01f22…01f2e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x017a}
0x01f2e…01f36               Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0186}
0x01f36…01f4a               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=0 «, t00=0x0013, t01=0x018e}
0x01f4a…01f62               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/37 «, t00=0x0014, t01=0x0012}
0x01f62…01f8a               Head {h00=0x0024, h01=0x0050, text=» RF(Z) REQTIM SET REQUEST TIMER «, t00=0x0014, t01=0x002a}
0x01f8a…01f96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0052}
0x01f96…01fa8               Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x0014, t01=0x005e}
0x01fa8…01fb2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0014, t01=0x0070}
0x01fb2…01fbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x007a}
0x01fbc…01fc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0084}
0x01fc6…01fe6               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x0014, t01=0x008e}
0x01fe6…01ff0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00ae}
0x01ff0…01ffa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00b8}
0x01ffa…0200e               Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x0014, t01=0x00c2}
0x0200e…02036               Head {h00=0x0024, h01=0x0050, text=» SUR A1,A1 PRESET RETURN CODE =4«, t00=0x0014, t01=0x00d6}
0x02036…02050               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0014, t01=0x00fe}
0x02050…02066               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0014, t01=0x0118}
0x02066…02090               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0014, t01=0x012e}
0x02090…0209c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0158}
0x0209c…020b0               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0014, t01=0x0164}
0x020b0…020ca               Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x0014, t01=0x0178}
0x020ca…020e2 (21, 0, 400)  Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/02 «, t00=0x0015, t01=0x0004}
0x020e2…0210a               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x0015, t01=0x001c}
0x0210a…02112               Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0044}
0x02112…02134               Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x0015, t01=0x004c}
0x02134…02156               Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x0015, t01=0x006e}
0x02156…02160               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0090}
0x02160…0216a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x009a}
0x0216a…02184               Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x0015, t01=0x00a4}
0x02184…0218e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00be}
0x0218e…02198               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00c8}
0x02198…021b6               Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0015, t01=0x00d2}
0x021b6…021ce               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0015, t01=0x00f0}
0x021ce…021f8               Head {h00=0x0026, h01=0x0050, text=»*   STATUS CHANGE ON DC EQUIPMENT «, t00=0x0015, t01=0x0108}
0x021f8…02220               Head {h00=0x0024, h01=0x0050, text=»*   SPONTANOUS MESSAGE RECEPTION«, t00=0x0015, t01=0x0132}
0x02220…0222a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x015a}
0x0222a…0223e               Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0015, t01=0x0164}
0x0223e…0226e               Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0015, t01=0x0178}
0x0226e…02282               Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0016, t01=0x0018}
0x02282…022a6               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0016, t01=0x002c}
0x022a6…022c0               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0016, t01=0x0050}
0x022c0…022ca               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0016, t01=0x006a}
0x022ca…022fc               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0016, t01=0x0074}
0x022fc…02306               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00a6}
0x02306…02324               Head {h00=0x001a, h01=0x0050, text=»*   ANY MESSAGE ORDER «, t00=0x0016, t01=0x00b0}
0x02324…0232e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ce}
0x0232e…02354               Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0016, t01=0x00d8}
0x02354…0235c               Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00fe}
0x0235c…02392               Head {h00=0x0032, h01=0x0050, text=»ANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4«, t00=0x0016, t01=0x0106}
0x02392…023b0               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCRD10 NO!! =4 «, t00=0x0016, t01=0x013c}
0x023b0…023dc               Head {h00=0x0028, h01=0x0050, text=» RF ENDIO YES!! COMPLETE REQUEST =4 «, t00=0x0016, t01=0x015a}
0x023dc…023e8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0186}
0x023e8…023f2 (23, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0017, t01=0x0004}
0x023f2…023fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x000e}
0x023fc…02406               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0018}
0x02406…02424               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0017, t01=0x0022}
0x02424…0242e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0040}
0x0242e…02438               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x004a}
0x02438…0247a               Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0017, t01=0x0054}
0x0247a…024b8               Head {h00=0x003a, h01=0x0050, text=»*         FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0017, t01=0x0096}
0x024b8…024c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00d4}
0x024c2…024cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00de}
0x024cc…024e0               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0017, t01=0x00e8}
0x024e0…0250a               Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0017, t01=0x00fc}
0x0250a…02516               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0126}
0x02516…0252a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0017, t01=0x0132}
0x0252a…02554               Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0017, t01=0x0146}
0x02554…02568               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0017, t01=0x0170}
0x02568…0257e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x0017, t01=0x0184}
0x0257e…025aa               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0018, t01=0x000a}
0x025aa…025bc               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0018, t01=0x0036}
0x025bc…025d0               Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x0018, t01=0x0048}
0x025d0…025f8               Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x0018, t01=0x005c}
0x025f8…0260c               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0018, t01=0x0084}
0x0260c…02638               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x0018, t01=0x0098}
0x02638…02644               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00c4}
0x02644…02672               Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTBUF,A6 SAVE TERM. ADDR. DK4 «, t00=0x0018, t01=0x00d0}
0x02672…02688               Head {h00=0x0012, h01=0x0050, text=»DCTP12 EQU *  «, t00=0x0018, t01=0x00fe}
0x02688…026be               Head {h00=0x0032, h01=0x0050, text=» LD A1,DCSTQ CHECK IF THIS DWT IS IN QUEUE DK4«, t00=0x0018, t01=0x0114}
0x026be…026d4               Head {h00=0x0012, h01=0x0050, text=»DCTP14 EQU *  «, t00=0x0018, t01=0x014a}
0x026d4…02704               Head {h00=0x002c, h01=0x0050, text=» RF(Z) DCTP18 NO, END OF/OR NO QUEUE DK4«, t00=0x0018, t01=0x0160}
0x02704…0272e               Head {h00=0x0026, h01=0x0050, text=» LDR A3,A6 ADJUST ADDR. VALUE DK4 «, t00=0x0018, t01=0x0190}
0x0272e…0274a               Head {h00=0x0018, h01=0x0050, text=» ADKL A3,DWTSQ  DK4 «, t00=0x0019, t01=0x002a}
0x0274a…0277a               Head {h00=0x002c, h01=0x0050, text=» CWR A1,A3 SOMETHING QUEUED OUR DWT? DK4«, t00=0x0019, t01=0x0046}
0x0277a…027b2               Head {h00=0x0034, h01=0x0050, text=» RF(E) DCTP16 YES, WAIT BEFORE TRANS. PARAM. DK4«, t00=0x0019, t01=0x0076}
0x027b2…027dc               Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A1 NOT OURS, GET NEXT DK4«, t00=0x0019, t01=0x00ae}
0x027dc…027f4               Head {h00=0x0014, h01=0x0050, text=» RB DCTP14  DK4 «, t00=0x0019, t01=0x00d8}
0x027f4…0280a               Head {h00=0x0012, h01=0x0050, text=»DCTP16 EQU *  «, t00=0x0019, t01=0x00f0}
0x0280a…02836               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A6 SAVE DWT AS PARAMETER DK4«, t00=0x0019, t01=0x0106}
0x02836…0286a               Head {h00=0x0030, h01=0x0050, text=» CF A15,SETIME WAIT UNTIL STATUS IS SENT DK4«, t00=0x0019, t01=0x0132}
0x0286a…02896               Head {h00=0x0028, h01=0x0050, text=» DATA TPTOUT,20 DELAY= 2 SECONDS DK4«, t00=0x0019, t01=0x0166}
0x02896…028ac (26, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» RB DCRTN  DK4«, t00=0x001a, t01=0x0004}
0x028ac…028c2               Head {h00=0x0012, h01=0x0050, text=»TPTOUT EQU *  «, t00=0x001a, t01=0x001a}
0x028c2…028e4               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 RESTORE DWT DK4«, t00=0x001a, t01=0x0030}
0x028e4…02912               Head {h00=0x002a, h01=0x0050, text=» RB DCTP12 LOOK IN THE QUEUE AGAIN DK4«, t00=0x001a, t01=0x0052}
0x02912…02928               Head {h00=0x0012, h01=0x0050, text=»DCTP18 EQU *  «, t00=0x001a, t01=0x0080}
0x02928…02958               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTBUF,A6 RESTORE TERM ADDR. DK4 «, t00=0x001a, t01=0x0096}
0x02958…02984               Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x001a, t01=0x00c6}
0x02984…0298c               Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00f2}
0x0298c…029a0               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x001a, t01=0x00fa}
0x029a0…029ce               Head {h00=0x002a, h01=0x0050, text=» LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS «, t00=0x001a, t01=0x010e}
0x029ce…029e6               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTBUF,A6«, t00=0x001a, t01=0x013c}
0x029e6…02a12               Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBRL,A8 CURSOR ADDRESS WORD «, t00=0x001a, t01=0x0154}
0x02a12…02a2a               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTCUR,A6«, t00=0x001a, t01=0x0180}
0x02a2a…02a36               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0008}
0x02a36…02a5c               Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x001b, t01=0x0014}
0x02a5c…02a92               Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!!  SHOULD NOT BE IN DC:TAB «, t00=0x001b, t01=0x003a}
0x02a92…02ac0               Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x001b, t01=0x0070}
0x02ac0…02aee               Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x001b, t01=0x009e}
0x02aee…02b18               Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x001b, t01=0x00cc}
0x02b18…02b22               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x001b, t01=0x00f6}
0x02b22…02b2a               Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0100}
0x02b2a…02b32               Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0108}
0x02b32…02b46               Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x001b, t01=0x0110}
0x02b46…02b6c               Head {h00=0x0022, h01=0x0050, text=» LD A4,DCTAB DC:TAB ADDRESS =3«, t00=0x001b, t01=0x0124}
0x02b6c…02b94               Head {h00=0x0024, h01=0x0050, text=» AD* A4,DCTAB LAST TABLE POS. =3«, t00=0x001b, t01=0x014a}
0x02b94…02bc2               Head {h00=0x002a, h01=0x0050, text=»DCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3«, t00=0x001b, t01=0x0172}
0x02bc2…02bf0               Head {h00=0x002a, h01=0x0050, text=» CW A4,DCTAB ALL ENTRIES CHECKED?? =3 «, t00=0x001c, t01=0x0010}
0x02bf0…02c1e               Head {h00=0x002a, h01=0x0050, text=» RF(E) DCTP25 YES.DWT NOT IN TABLE =3 «, t00=0x001c, t01=0x003e}
0x02c1e…02c40               Head {h00=0x001e, h01=0x0050, text=» CWR* A6,A4 IN TABLE ?? =3«, t00=0x001c, t01=0x006c}
0x02c40…02c5e               Head {h00=0x001a, h01=0x0050, text=» RF(E) DCTP30 YES!! =3«, t00=0x001c, t01=0x008e}
0x02c5e…02c84               Head {h00=0x0022, h01=0x0050, text=» RB DCTP22 CHECK NEXT ENTRY =3«, t00=0x001c, t01=0x00ac}
0x02c84…02c9c               Head {h00=0x0014, h01=0x0050, text=»DCTP25 EQU *  =3«, t00=0x001c, t01=0x00d2}
0x02c9c…02ca4               Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x00ea}
0x02ca4…02ccc               Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x001c, t01=0x00f2}
0x02ccc…02cde               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x001c, t01=0x011a}
0x02cde…02d0c               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x001c, t01=0x012c}
0x02d0c…02d14               Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x015a}
0x02d14…02d42               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x001c, t01=0x0162}
0x02d42…02d56               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x001c, t01=0x0190}
0x02d56…02d72               Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x001d, t01=0x0014}
0x02d72…02d8a               Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x001d, t01=0x0030}
0x02d8a…02db6               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x001d, t01=0x0048}
0x02db6…02dc2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0074}
0x02dc2…02dd6               Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x001d, t01=0x0080}
0x02dd6…02dfa               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x001d, t01=0x0094}
0x02dfa…02e0e               Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x001d, t01=0x00b8}
0x02e0e…02e36               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x001d, t01=0x00cc}
0x02e36…02e48               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001d, t01=0x00f4}
0x02e48…02e52               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x001d, t01=0x0106}
0x02e52…02e5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0110}
0x02e5c…02e66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x011a}
0x02e66…02e76               Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x001d, t01=0x0124}
0x02e76…02e80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0134}
0x02e80…02e8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x013e}
0x02e8a…02ea2               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001d, t01=0x0148}
0x02ea2…02ec4               Head {h00=0x001e, h01=0x0050, text=»*   SUCCESFUL TRANSMISSION«, t00=0x001d, t01=0x0160}
0x02ec4…02ed8               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001d, t01=0x0182}
0x02ed8…02ee2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0008}
0x02ee2…02eec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0012}
0x02eec…02efe               Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x001e, t01=0x001c}
0x02efe…02f14               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001e, t01=0x002e}
0x02f14…02f3c               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x001e, t01=0x0044}
0x02f3c…02f62               Head {h00=0x0022, h01=0x0050, text=» CWK A1,BUFLEN ILLEGAL LENGTH?«, t00=0x001e, t01=0x006c}
0x02f62…02f7e               Head {h00=0x0018, h01=0x0050, text=» RF(G) IL:LEN YES!! «, t00=0x001e, t01=0x0092}
0x02f7e…02f8a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00ae}
0x02f8a…02faa               Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x001e, t01=0x00ba}
0x02faa…02fce               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ  QUEUE REQUEST«, t00=0x001e, t01=0x00da}
0x02fce…02fe0               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001e, t01=0x00fe}
0x02fe0…02fea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0110}
0x02fea…02ff4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x011a}
0x02ff4…02ffe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0124}
0x02ffe…0300c               Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x001e, t01=0x012e}
0x0300c…03016               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x013c}
0x03016…03020               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0146}
0x03020…03038               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001e, t01=0x0150}
0x03038…03054               Head {h00=0x0018, h01=0x0050, text=»*   MESSAGE RECEIVED«, t00=0x001e, t01=0x0168}
0x03054…03068               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001e, t01=0x0184}
0x03068…03072               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0008}
0x03072…0307c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0012}
0x0307c…0308e               Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x001f, t01=0x001c}
0x0308e…030ae               Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x001f, t01=0x002e}
0x030ae…030e0               Head {h00=0x002e, h01=0x0050, text=» LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x001f, t01=0x004e}
0x030e0…03106               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x001f, t01=0x0080}
0x03106…0310e               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x00a6}
0x0310e…03116               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x00ae}
0x03116…0311e               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x00b6}
0x0311e…0314a               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 TAKE THE FIRST IN QUEUE «, t00=0x001f, t01=0x00be}
0x0314a…03162               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x001f, t01=0x00ea}
0x03162…03174               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x001f, t01=0x0102}
0x03174…0319a               Head {h00=0x0022, h01=0x0050, text=» LD A3,-4,A4 EFFECTIVE LENGTH «, t00=0x001f, t01=0x0114}
0x0319a…031b2               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x001f, t01=0x013a}
0x031b2…031ba               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0152}
0x031ba…031de               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x001f, t01=0x015a}
0x031de…0320c               Head {h00=0x002a, h01=0x0050, text=» CF A15,DC:MIN MOV DATA TO USER BUFFER«, t00=0x001f, t01=0x017e}
0x0320c…0321e               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0020, t01=0x001c}
0x0321e…03226               Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x002e}
0x03226…0324e               Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x0020, t01=0x0036}
0x0324e…03260               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0020, t01=0x005e}
0x03260…0326a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0020, t01=0x0070}
0x0326a…03274               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x007a}
0x03274…0327e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0084}
0x0327e…03292               Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x0020, t01=0x008e}
0x03292…0329c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00a2}
0x0329c…032a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00ac}
0x032a6…032ba               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0020, t01=0x00b6}
0x032ba…032cc               Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x0020, t01=0x00ca}
0x032cc…032fa               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x0020, t01=0x00dc}
0x032fa…03316               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x0020, t01=0x010a}
0x03316…03336               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x0020, t01=0x0126}
0x03336…0334a               Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x0020, t01=0x0146}
0x0334a…03362               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x0020, t01=0x015a}
0x03362…03386               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 COMPLETE REQUEST «, t00=0x0020, t01=0x0172}
0x03386…0339a               Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x0021, t01=0x0008}
0x0339a…033b2               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0021, t01=0x001c}
0x033b2…033c4               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x0021, t01=0x0034}
0x033c4…033f6               Head {h00=0x002e, h01=0x0050, text=»* RB(Z) DCSS10 WACK HAS NOT BEEN SENT DK6 «, t00=0x0021, t01=0x0046}
0x033f6…0340a               Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x0021, t01=0x0078}
0x0340a…0343a               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x0021, t01=0x008c}
0x0343a…03452               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x0021, t01=0x00bc}
0x03452…03464               Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x0021, t01=0x00d4}
0x03464…03470               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x00e6}
0x03470…0347a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0021, t01=0x00f2}
0x0347a…03482               Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x00fc}
0x03482…0348c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0104}
0x0348c…034b2               Head {h00=0x0022, h01=0x0050, text=»*   SET REQUEST TIMEOUT VALUE «, t00=0x0021, t01=0x010e}
0x034b2…034bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0134}
0x034bc…034c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x013e}
0x034c6…034ce               Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0148}
0x034ce…034e2               Head {h00=0x0010, h01=0x0050, text=»REQTIM EQU *«, t00=0x0021, t01=0x0150}
0x034e2…03508               Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBCW,A8 TIMEOUT VALUE «, t00=0x0021, t01=0x0164}
0x03508…03530               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTTIM,A6 SAVE IT IN DWT «, t00=0x0021, t01=0x018a}
0x03530…03554               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 TENDIO & DISPATCH«, t00=0x0022, t01=0x0022}
0x03554…0355c               Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0046}
0x0355c…03566               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x004e}
0x03566…03592               Head {h00=0x0028, h01=0x0050, text=»*   ILLEGAL APPLICATION BUFFER SIZE «, t00=0x0022, t01=0x0058}
0x03592…0359c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0084}
0x0359c…035a4               Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x008e}
0x035a4…035e0               Head {h00=0x0038, h01=0x0050, text=»IL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH «, t00=0x0022, t01=0x0096}
0x035e0…03604               Head {h00=0x0020, h01=0x0050, text=» ABL DISEND COMPLETE REQUEST«, t00=0x0022, t01=0x00d2}
0x03604…0360e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0022, t01=0x00f6}
0x0360e…03618               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0100}
0x03618…03622               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x010a}
0x03622…0362c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0114}
0x0362c…0364a               Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x0022, t01=0x011e}
0x0364a…03654               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x013c}
0x03654…0365e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0146}
0x0365e…03668               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0150}
0x03668…03684               Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x0022, t01=0x015a}
0x03684…0368e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0176}
0x0368e…036a2               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x0022, t01=0x0180}
0x036a2…036b4 (35, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0023, t01=0x0004}
0x036b4…036e6               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0023, t01=0x0016}
0x036e6…03706               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x0023, t01=0x0048}
0x03706…0371c               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x0023, t01=0x0068}
0x0371c…03732               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0023, t01=0x007e}
0x03732…03746               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x0023, t01=0x0094}
0x03746…0375c               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x0023, t01=0x00a8}
0x0375c…03788               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x0023, t01=0x00be}
0x03788…0379c               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x0023, t01=0x00ea}
0x0379c…037b6               Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x0023, t01=0x00fe}
0x037b6…037c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0118}
0x037c0…037dc               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x0023, t01=0x0122}
0x037dc…037e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x013e}
0x037e6…037fa               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x0023, t01=0x0148}
0x037fa…03816               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0023, t01=0x015c}
0x03816…0382a               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0023, t01=0x0178}
0x0382a…0383e               Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x0023, t01=0x018c}
0x0383e…03864               Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x0024, t01=0x0010}
0x03864…0388c               Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x0024, t01=0x0036}
0x0388c…03896               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x005e}
0x03896…038b2               Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x0024, t01=0x0068}
0x038b2…038bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0084}
0x038bc…038d4               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x0024, t01=0x008e}
0x038d4…03906               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0024, t01=0x00a6}
0x03906…03926               Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x0024, t01=0x00d8}
0x03926…0393a               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x0024, t01=0x00f8}
0x0393a…03950               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0024, t01=0x010c}
0x03950…03964               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x0024, t01=0x0122}
0x03964…03978               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x0024, t01=0x0136}
0x03978…03990               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x0024, t01=0x014a}
0x03990…039a2               Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x0024, t01=0x0162}
0x039a2…039ac               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0024, t01=0x0174}
0x039ac…039b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x017e}
0x039b6…039d4               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x0024, t01=0x0188}
0x039d4…039de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0016}
0x039de…039f2               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x0025, t01=0x0020}
0x039f2…03a0e               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0025, t01=0x0034}
0x03a0e…03a22               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0025, t01=0x0050}
0x03a22…03a50               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0025, t01=0x0064}
0x03a50…03a5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0092}
0x03a5a…03a84               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x0025, t01=0x009c}
0x03a84…03aa8               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x0025, t01=0x00c6}
0x03aa8…03abe               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x0025, t01=0x00ea}
0x03abe…03ad0               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0025, t01=0x0100}
0x03ad0…03afe               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT IS NOT WRITING«, t00=0x0025, t01=0x0112}
0x03afe…03b2a               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x0025, t01=0x0140}
0x03b2a…03b3c               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0025, t01=0x016c}
0x03b3c…03b46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x017e}
0x03b46…03b50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0188}
0x03b50…03b62 (38, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x0026, t01=0x0004}
0x03b62…03b6c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0026, t01=0x0016}
0x03b6c…03b76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0020}
0x03b76…03b80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x002a}
0x03b80…03b9e               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0026, t01=0x0034}
0x03b9e…03ba8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0052}
0x03ba8…03bd2               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0026, t01=0x005c}
0x03bd2…03bdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0086}
0x03bdc…03be6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0090}
0x03be6…03bfa               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0026, t01=0x009a}
0x03bfa…03c24               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0026, t01=0x00ae}
0x03c24…03c46               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0026, t01=0x00d8}
0x03c46…03c5a               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0026, t01=0x00fa}
0x03c5a…03c80               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0026, t01=0x010e}
0x03c80…03ca0               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0026, t01=0x0134}
0x03ca0…03cb4               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0026, t01=0x0154}
0x03cb4…03cc8               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0026, t01=0x0168}
0x03cc8…03cda               Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0026, t01=0x017c}
0x03cda…03ce4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0026, t01=0x018e}
0x03ce4…03cee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0008}
0x03cee…03d0a               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0027, t01=0x0012}
0x03d0a…03d14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x002e}
0x03d14…03d3c               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0027, t01=0x0038}
0x03d3c…03d60               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0027, t01=0x0060}
0x03d60…03d8a               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0027, t01=0x0084}
0x03d8a…03dac               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0027, t01=0x00ae}
0x03dac…03db6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00d0}
0x03db6…03dc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00da}
0x03dc0…03dec               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0027, t01=0x00e4}
0x03dec…03dfc               Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x0027, t01=0x0110}
0x03dfc…03e10               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x0027, t01=0x0120}
0x03e10…03e34               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x0027, t01=0x0134}
0x03e34…03e66               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x0027, t01=0x0158}
0x03e66…03e78               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0027, t01=0x018a}
0x03e78…03ea6               Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0028, t01=0x000c}
0x03ea6…03ec8               Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x0028, t01=0x003a}
0x03ec8…03ed2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0028, t01=0x005c}
0x03ed2…03edc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0066}
0x03edc…03ee6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0070}
0x03ee6…03f12               Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x0028, t01=0x007a}
0x03f12…03f1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00a6}
0x03f1c…03f38               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0028, t01=0x00b0}
0x03f38…03f48               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0028, t01=0x00cc}
0x03f48…03f52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00dc}
0x03f52…03f7e               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0028, t01=0x00e6}
0x03f7e…03f9a               Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x0028, t01=0x0112}
0x03f9a…03fb4               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0028, t01=0x012e}
0x03fb4…03fdc               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0028, t01=0x0148}
0x03fdc…03fee               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0028, t01=0x0170}
0x03fee…04000               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0028, t01=0x0182}
0x04000…04018 (41, 0, 400)  Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0029, t01=0x0004}
0x04018…0403a               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0029, t01=0x001c}
0x0403a…04060               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0029, t01=0x003e}
0x04060…0407a               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0029, t01=0x0064}
0x0407a…04084               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x007e}
0x04084…0408e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0088}
0x0408e…040bc               Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x0029, t01=0x0092}
0x040bc…040c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00c0}
0x040c6…040e2               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0029, t01=0x00ca}
0x040e2…040f2               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0029, t01=0x00e6}
0x040f2…040fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00f6}
0x040fc…0412a               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x0029, t01=0x0100}
0x0412a…04160               Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x0029, t01=0x012e}
0x04160…04174               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x0029, t01=0x0164}
0x04174…04188               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x0029, t01=0x0178}
0x04188…041a0               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x0029, t01=0x018c}
0x041a0…041ca               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x002a, t01=0x0014}
0x041ca…041dc               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x002a, t01=0x003e}
0x041dc…041f0               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x002a, t01=0x0050}
0x041f0…0420c               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x002a, t01=0x0064}
0x0420c…0421e               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x002a, t01=0x0080}
0x0421e…0423e               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x002a, t01=0x0092}
0x0423e…04250               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x002a, t01=0x00b2}
0x04250…0426a               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x002a, t01=0x00c4}
0x0426a…04274               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002a, t01=0x00de}
0x04274…0427e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00e8}
0x0427e…04288               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00f2}
0x04288…042ac               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x002a, t01=0x00fc}
0x042ac…042b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0120}
0x042b6…042ca               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x002a, t01=0x012a}
0x042ca…042e6               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002a, t01=0x013e}
0x042e6…042f6               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002a, t01=0x015a}
0x042f6…04300               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x016a}
0x04300…04314               Head {h00=0x0010, h01=0x0050, text=»INSSQ EQU * «, t00=0x002a, t01=0x0174}
0x04314…04340               Head {h00=0x0028, h01=0x0050, text=» LD A2,0,A6 GET TERMINAL ADDRESS DK4«, t00=0x002a, t01=0x0188}
0x04340…0436e               Head {h00=0x002a, h01=0x0050, text=» ANK A2,/FF IF ADDRESS = 00 OR /7F DK4«, t00=0x002b, t01=0x0024}
0x0436e…0439a               Head {h00=0x0028, h01=0x0050, text=» RB(Z) GBUF10 DONT PUT IN STATUS DK4«, t00=0x002b, t01=0x0052}
0x0439a…043ca               Head {h00=0x002c, h01=0x0050, text=» SUK A2,/7F QUEUE, TERMINAL HAS BEEN DK4«, t00=0x002b, t01=0x007e}
0x043ca…043f2               Head {h00=0x0024, h01=0x0050, text=» RB(Z) GBUF10 MADE INACTIVE DK4 «, t00=0x002b, t01=0x00ae}
0x043f2…0441a               Head {h00=0x0024, h01=0x0050, text=» LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002b, t01=0x00d6}
0x0441a…04430               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002b, t01=0x00fe}
0x04430…04442               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002b, t01=0x0114}
0x04442…0444c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0126}
0x0444c…04456               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0130}
0x04456…0447c               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x002b, t01=0x013a}
0x0447c…04486               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0160}
0x04486…044a2               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x016a}
0x044a2…044b2               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x0186}
0x044b2…044bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0008}
0x044bc…044ea               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002c, t01=0x0012}
0x044ea…04500               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002c, t01=0x0040}
0x04500…04512               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x002c, t01=0x0056}
0x04512…0451e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0068}
0x0451e…04528               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002c, t01=0x0074}
0x04528…04532               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x007e}
0x04532…0453c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0088}
0x0453c…04564               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x002c, t01=0x0092}
0x04564…0456e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00ba}
0x0456e…04586               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x002c, t01=0x00c4}
0x04586…045a0               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002c, t01=0x00dc}
0x045a0…045aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00f6}
0x045aa…045be               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002c, t01=0x0100}
0x045be…045d4               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002c, t01=0x0114}
0x045d4…04600               Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002c, t01=0x012a}
0x04600…0460c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0156}
0x0460c…04622               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002c, t01=0x0162}
0x04622…0464a               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002c, t01=0x0178}
0x0464a…04656               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0010}
0x04656…04686               Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002d, t01=0x001c}
0x04686…0469a               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002d, t01=0x004c}
0x0469a…046ae               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002d, t01=0x0060}
0x046ae…046d6               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002d, t01=0x0074}
0x046d6…046e8               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002d, t01=0x009c}
0x046e8…046fa               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002d, t01=0x00ae}
0x046fa…04724               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002d, t01=0x00c0}
0x04724…0474a               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002d, t01=0x00ea}
0x0474a…0475a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002d, t01=0x0110}
0x0475a…04764               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002d, t01=0x0120}
0x04764…0476e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x012a}
0x0476e…04778               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0134}
0x04778…047ae               Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x002d, t01=0x013e}
0x047ae…047b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0174}
0x047b8…047f0               Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x002d, t01=0x017e}
0x047f0…047fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0026}
0x047fa…04818               Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x002e, t01=0x0030}
0x04818…04830               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x002e, t01=0x004e}
0x04830…04850               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x002e, t01=0x0066}
0x04850…04870               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x002e, t01=0x0086}
0x04870…04888               Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x002e, t01=0x00a6}
0x04888…048a2               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x002e, t01=0x00be}
0x048a2…048ca               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x002e, t01=0x00d8}
0x048ca…048f8               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x002e, t01=0x0100}
0x048f8…0491e               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x002e, t01=0x012e}
0x0491e…04926               Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x0154}
0x04926…0492e               Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x015c}
0x0492e…0495e               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x002e, t01=0x0164}
0x0495e…04990 (47, 0, 400)  Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x002f, t01=0x0004}
0x04990…049b6               Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x002f, t01=0x0036}
0x049b6…049e0               Head {h00=0x0026, h01=0x0050, text=»   DONT DESTROY BUFFER ADDRESS =6 «, t00=0x002f, t01=0x005c}
0x049e0…049f4               Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x002f, t01=0x0086}
0x049f4…04a28               Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x002f, t01=0x009a}
0x04a28…04a3c               Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x002f, t01=0x00ce}
0x04a3c…04a6e               Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x002f, t01=0x00e2}
0x04a6e…04a76               Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0114}
0x04a76…04a9a               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x002f, t01=0x011c}
0x04a9a…04ac4               Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 RECEIVE BUFFER ADDRESS «, t00=0x002f, t01=0x0140}
0x04ac4…04af4               Head {h00=0x002c, h01=0x0050, text=» CF A15,DC:MIN MOVE DATA TO USER BUFFER «, t00=0x002f, t01=0x016a}
0x04af4…04b22               Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0030, t01=0x000a}
0x04b22…04b3a               Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0030, t01=0x0038}
0x04b3a…04b76               Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x0030, t01=0x0050}
0x04b76…04ba6               Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x0030, t01=0x008c}
0x04ba6…04bbc               Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x0030, t01=0x00bc}
0x04bbc…04bd2               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x0030, t01=0x00d2}
0x04bd2…04bfc               Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x0030, t01=0x00e8}
0x04bfc…04c2a               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x0030, t01=0x0112}
0x04c2a…04c5e               Head {h00=0x0030, h01=0x0050, text=» CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x0030, t01=0x0140}
0x04c5e…04c70               Head {h00=0x000e, h01=0x0050, text=» RB CKM110«, t00=0x0030, t01=0x0174}
0x04c70…04c7a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0030, t01=0x0186}
0x04c7a…04c82               Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x0190}
0x04c82…04cc6               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0031, t01=0x0008}
0x04cc6…04cd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x004c}
0x04cd0…04cea               Head {h00=0x0016, h01=0x0050, text=»*    ABORT ROUTINE«, t00=0x0031, t01=0x0056}
0x04cea…04cf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0070}
0x04cf4…04d14               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0031, t01=0x007a}
0x04d14…04d1c               Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x009a}
0x04d1c…04d46               Head {h00=0x0026, h01=0x0050, text=»ABORT LD A1,DWTTP,A6 TIMER POINTER«, t00=0x0031, t01=0x00a2}
0x04d46…04d6c               Head {h00=0x0022, h01=0x0050, text=» RF(Z) AB:10 NO TIMER RUNNING «, t00=0x0031, t01=0x00cc}
0x04d6c…04d8c               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 KILL TIMER«, t00=0x0031, t01=0x00f2}
0x04d8c…04da0               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0031, t01=0x0112}
0x04da0…04da8               Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x0126}
0x04da8…04dd0               Head {h00=0x0024, h01=0x0050, text=»AB:10 LD A1,DWTOR,A6 ORDER CODE «, t00=0x0031, t01=0x012e}
0x04dd0…04de2               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0031, t01=0x0156}
0x04de2…04e10               Head {h00=0x002a, h01=0x0050, text=» RF(Z) AB:RTN READ REQUEST. NO ACTION «, t00=0x0031, t01=0x0168}
0x04e10…04e22               Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x0032, t01=0x0008}
0x04e22…04e54               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE«, t00=0x0032, t01=0x001a}
0x04e54…04e5c               Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x004c}
0x04e5c…04e8e               Head {h00=0x002e, h01=0x0050, text=» CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE«, t00=0x0032, t01=0x0054}
0x04e8e…04eb8               Head {h00=0x0026, h01=0x0050, text=» LD A2,FDWTUT WRITING DWT ADDRESS «, t00=0x0032, t01=0x0086}
0x04eb8…04eca               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0032, t01=0x00b0}
0x04eca…04eee               Head {h00=0x0020, h01=0x0050, text=» RF(NE) AB:RTN NOT THIS DWT «, t00=0x0032, t01=0x00c2}
0x04eee…04f12               Head {h00=0x0020, h01=0x0050, text=» CM XACK RESET ACK EXPECTED «, t00=0x0032, t01=0x00e6}
0x04f12…04f36               Head {h00=0x0020, h01=0x0050, text=» CM FDWTUT RESET WRITING DWT«, t00=0x0032, t01=0x010a}
0x04f36…04f3e               Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x012e}
0x04f3e…04f52               Head {h00=0x0010, h01=0x0050, text=»AB:RTN EQU *«, t00=0x0032, t01=0x0136}
0x04f52…04f68               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0032, t01=0x014a}
0x04f68…04f7c               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0032, t01=0x0160}
0x04f7c…04fa4               Head {h00=0x0024, h01=0x0050, text=» ABR* A15 RETURN IN INHIBIT MODE«, t00=0x0032, t01=0x0174}
0x04fa4…04fb0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x000c}
0x04fb0…04fc6               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0033, t01=0x0018}
0x04fc6…04fd6               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0033, t01=0x002e}
0x04fd6…04fe2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x003e}
0x04fe2…04fec               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0033, t01=0x004a}
0x04fec…04ff4               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x0054}
0x04ff4…04ffe               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0033, t01=0x005c}
0x04ffe…05008               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0066}
0x05008…05012               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0070}
0x05012…05030               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0033, t01=0x007a}
0x05030…05058               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0033, t01=0x0098}
0x05058…05062               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00c0}
0x05062…05074               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0033, t01=0x00ca}
0x05074…0509c               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0033, t01=0x00dc}
0x0509c…050a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0104}
0x050a6…050b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x010e}
0x050b0…050c8               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0033, t01=0x0118}
0x050c8…050dc               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0033, t01=0x0130}
0x050dc…050f0               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0033, t01=0x0144}
0x050f0…05104               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0033, t01=0x0158}
0x05104…05118               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0033, t01=0x016c}
0x05118…0512c               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0033, t01=0x0180}
0x0512c…05146 (52, 0, 400)  Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0034, t01=0x0004}
0x05146…05150               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0034, t01=0x001e}
0x05150…05168               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0034, t01=0x0028}
0x05168…0517c               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0034, t01=0x0040}
0x0517c…0518e               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0034, t01=0x0054}
0x0518e…051a2               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0034, t01=0x0066}
0x051a2…051b4               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0034, t01=0x007a}
0x051b4…051c8               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0034, t01=0x008c}
0x051c8…051da               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0034, t01=0x00a0}
0x051da…051ee               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0034, t01=0x00b2}
0x051ee…05200               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0034, t01=0x00c6}
0x05200…05214               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0034, t01=0x00d8}
0x05214…05226               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0034, t01=0x00ec}
0x05226…0523a               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0034, t01=0x00fe}
0x0523a…0524e               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0034, t01=0x0112}
0x0524e…05262               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0034, t01=0x0126}
0x05262…05274               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0034, t01=0x013a}
0x05274…0527e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0034, t01=0x014c}
0x0527e…05288               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0156}
0x05288…05292               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0160}
0x05292…052a8               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0034, t01=0x016a}
0x052a8…052b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0180}
0x052b2…052bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x018a}
0x052bc…052ea (53, 0, 400)  Head {h00=0x002a, h01=0x0050, text=»TIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK«, t00=0x0035, t01=0x0004}
0x052ea…05310               Head {h00=0x0022, h01=0x0050, text=»TIMNAK EQU 3 DELAY FOR NAK DK «, t00=0x0035, t01=0x0032}
0x05310…0531a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0058}
0x0531a…05324               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0062}
0x05324…05340               Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0035, t01=0x006c}
0x05340…0534a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0088}
0x0534a…05374               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0035, t01=0x0092}
0x05374…05388               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0035, t01=0x00bc}
0x05388…0539c               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0035, t01=0x00d0}
0x0539c…053b0               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0035, t01=0x00e4}
0x053b0…053c4               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0035, t01=0x00f8}
0x053c4…053d8               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0035, t01=0x010c}
0x053d8…053ec               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0035, t01=0x0120}
0x053ec…05400               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0035, t01=0x0134}
0x05400…05414               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0035, t01=0x0148}
0x05414…05428               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0035, t01=0x015c}
0x05428…0543c               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0035, t01=0x0170}
0x0543c…05450               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0035, t01=0x0184}
0x05450…05464               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0036, t01=0x0008}
0x05464…05476               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0036, t01=0x001c}
0x05476…0548c               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0036, t01=0x002e}
0x0548c…054a2               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0036, t01=0x0044}
0x054a2…054b6               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0036, t01=0x005a}
0x054b6…054ca               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0036, t01=0x006e}
0x054ca…054de               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0036, t01=0x0082}
0x054de…054f2               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0036, t01=0x0096}
0x054f2…05506               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0036, t01=0x00aa}
0x05506…0551a               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0036, t01=0x00be}
0x0551a…0552e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0036, t01=0x00d2}
0x0552e…05542               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0036, t01=0x00e6}
0x05542…0554e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x00fa}
0x0554e…05562               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0036, t01=0x0106}
0x05562…05576               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0036, t01=0x011a}
0x05576…055aa               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0036, t01=0x012e}
0x055aa…055b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x0162}
0x055b6…055ca               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0036, t01=0x016e}
0x055ca…055de               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0036, t01=0x0182}
0x055de…055f2               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0037, t01=0x0008}
0x055f2…0560a               Head {h00=0x0014, h01=0x0050, text=»RVI EQU XRVI  DK«, t00=0x0037, t01=0x001c}
0x0560a…0561e               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0037, t01=0x0034}
0x0561e…05632               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0037, t01=0x0048}
0x05632…05648               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0037, t01=0x005c}
0x05648…05654               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0072}
0x05654…0565e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0037, t01=0x007e}
0x0565e…05668               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0088}
0x05668…05672               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0092}
0x05672…05690               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0037, t01=0x009c}
0x05690…0569a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00ba}
0x0569a…056a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00c4}
0x056a4…056d2               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0037, t01=0x00ce}
0x056d2…05704               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0037, t01=0x00fc}
0x05704…05724               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x0037, t01=0x012e}
0x05724…05740               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x0037, t01=0x014e}
0x05740…0575c               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x0037, t01=0x016a}
0x0575c…05792               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x0037, t01=0x0186}
0x05792…057b8               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x0038, t01=0x002c}
0x057b8…057d8               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x0038, t01=0x0052}
0x057d8…05806               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x0038, t01=0x0072}
0x05806…05810               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00a0}
0x05810…0582e               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x0038, t01=0x00aa}
0x0582e…0585a               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x0038, t01=0x00c8}
0x0585a…05884               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x0038, t01=0x00f4}
0x05884…058a4               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x0038, t01=0x011e}
0x058a4…058d8               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x0038, t01=0x013e}
0x058d8…05900               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x0038, t01=0x0172}
0x05900…05932               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x0039, t01=0x000a}
0x05932…05962               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x0039, t01=0x003c}
0x05962…0598e               Head {h00=0x0028, h01=0x0050, text=»CRDBUF DATA 0 READ BUFFER COUNTER DK«, t00=0x0039, t01=0x006c}
0x0598e…05998               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0098}
0x05998…059a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00a2}
0x059a2…059ca               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x0039, t01=0x00ac}
0x059ca…059d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00d4}
0x059d4…059de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00de}
0x059de…059f2               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0039, t01=0x00e8}
0x059f2…05a24               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x0039, t01=0x00fc}
0x05a24…05a2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x012e}
0x05a2e…05a38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0138}
0x05a38…05a4c               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x0039, t01=0x0142}
0x05a4c…05a60               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x0039, t01=0x0156}
0x05a60…05a6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x016a}
0x05a6a…05aa0               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x0039, t01=0x0174}
0x05aa0…05ad0               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x003a, t01=0x001a}
0x05ad0…05adc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x004a}
0x05adc…05ae6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x003a, t01=0x0056}
0x05ae6…05af0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0060}
0x05af0…05afa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x006a}
0x05afa…05b16               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x003a, t01=0x0074}
0x05b16…05b20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0090}
0x05b20…05b46               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x003a, t01=0x009a}
0x05b46…05b70               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x003a, t01=0x00c0}
0x05b70…05b7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00ea}
0x05b7a…05b84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00f4}
0x05b84…05ba0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003a, t01=0x00fe}
0x05ba0…05bd0               Head {h00=0x002c, h01=0x0050, text=»BRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ«, t00=0x003a, t01=0x011a}
0x05bd0…05be6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003a, t01=0x014a}
0x05be6…05bf8               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x003a, t01=0x0160}
0x05bf8…05c1c               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x003a, t01=0x0172}
0x05c1c…05c38               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003b, t01=0x0008}
0x05c38…05c6e               Head {h00=0x0032, h01=0x0050, text=» CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS «, t00=0x003b, t01=0x0024}
0x05c6e…05c84               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x005a}
0x05c84…05ca0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003b, t01=0x0070}
0x05ca0…05cd4               Head {h00=0x0030, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ«, t00=0x003b, t01=0x008c}
0x05cd4…05cea               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x00c0}
0x05cea…05cfe               Head {h00=0x0010, h01=0x0050, text=»BRM010 EQU *«, t00=0x003b, t01=0x00d6}
0x05cfe…05d20               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x003b, t01=0x00ea}
0x05d20…05d54               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN«, t00=0x003b, t01=0x010c}
0x05d54…05d6a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x0140}
0x05d6a…05d86               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003b, t01=0x0156}
0x05d86…05d9a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x003b, t01=0x0172}
0x05d9a…05dd2               Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN «, t00=0x003b, t01=0x0186}
0x05dd2…05de8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x002e}
0x05de8…05e04               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003c, t01=0x0044}
0x05e04…05e2a               Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x003c, t01=0x0060}
0x05e2a…05e40               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x0086}
0x05e40…05e5c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003c, t01=0x009c}
0x05e5c…05e78               Head {h00=0x0018, h01=0x0050, text=» IFF CODE=1  SALCUZ «, t00=0x003c, t01=0x00b8}
0x05e78…05e94               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x003c, t01=0x00d4}
0x05e94…05ec2               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003c, t01=0x00f0}
0x05ec2…05ede               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x003c, t01=0x011e}
0x05ede…05f14               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003c, t01=0x013a}
0x05f14…05f32               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003c, t01=0x0170}
0x05f32…05f48               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x018e}
0x05f48…05f6a               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=2  SALCUZ «, t00=0x003d, t01=0x0014}
0x05f6a…05f84               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x003d, t01=0x0036}
0x05f84…05fb2               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003d, t01=0x0050}
0x05fb2…05fd0               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x003d, t01=0x007e}
0x05fd0…06006               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003d, t01=0x009c}
0x06006…06024               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003d, t01=0x00d2}
0x06024…0603a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x00f0}
0x0603a…0604e               Head {h00=0x0010, h01=0x0050, text=»BRM100 EQU *«, t00=0x003d, t01=0x0106}
0x0604e…06076               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003d, t01=0x011a}
0x06076…0609a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003d, t01=0x0142}
0x0609a…060ac               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003d, t01=0x0166}
0x060ac…060c0               Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x003d, t01=0x0178}
0x060c0…060e2               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x003d, t01=0x018c}
0x060e2…060fa               Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x003e, t01=0x001e}
0x060fa…0611c               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x003e, t01=0x0036}
0x0611c…06134               Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x003e, t01=0x0058}
0x06134…06158               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x003e, t01=0x0070}
0x06158…06170               Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x003e, t01=0x0094}
0x06170…06194               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x003e, t01=0x00ac}
0x06194…061ac               Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x003e, t01=0x00d0}
0x061ac…061d0               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x003e, t01=0x00e8}
0x061d0…061e4               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003e, t01=0x010c}
0x061e4…061f6               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003e, t01=0x0120}
0x061f6…0621e               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003e, t01=0x0132}
0x0621e…06242               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003e, t01=0x015a}
0x06242…06254               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003e, t01=0x017e}
0x06254…0627e               Head {h00=0x0026, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESSING «, t00=0x003e, t01=0x0190}
0x0627e…0628a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x002a}
0x0628a…0629c               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003f, t01=0x0036}
0x0629c…062b4               Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x003f, t01=0x0048}
0x062b4…062d2               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x003f, t01=0x0060}
0x062d2…062e4               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x003f, t01=0x007e}
0x062e4…062fa               Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x003f, t01=0x0090}
0x062fa…0631e               Head {h00=0x0020, h01=0x0050, text=» RF(NE) BRM150 NOT THIS TCU «, t00=0x003f, t01=0x00a6}
0x0631e…06332               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x003f, t01=0x00ca}
0x06332…06354               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x003f, t01=0x00de}
0x06354…06378               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003f, t01=0x0100}
0x06378…0638a               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003f, t01=0x0124}
0x0638a…0639e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003f, t01=0x0136}
0x0639e…063c0               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x003f, t01=0x014a}
0x063c0…063e4               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003f, t01=0x016c}
0x063e4…063f6               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003f, t01=0x0190}
0x063f6…06426               Head {h00=0x002c, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESS SEQUENCE «, t00=0x0040, t01=0x0012}
0x06426…06432               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x0042}
0x06432…06458               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ READ ONE CHARACTER«, t00=0x0040, t01=0x004e}
0x06458…06474               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0040, t01=0x0074}
0x06474…0648c               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0040, t01=0x0090}
0x0648c…064a2               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0040, t01=0x00a8}
0x064a2…064be               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0040, t01=0x00be}
0x064be…064da               Head {h00=0x0018, h01=0x0050, text=» SUK A2,ENQ  SALCUZ «, t00=0x0040, t01=0x00da}
0x064da…064f0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0040, t01=0x00f6}
0x064f0…0650e               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) BRM150 NOT ENQ«, t00=0x0040, t01=0x010c}
0x0650e…0652a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0040, t01=0x012a}
0x0652a…06552               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ READ LAST CHARACTER «, t00=0x0040, t01=0x0146}
0x06552…0655a               Head {h00=0x0004, h01=0x0050, t00=0x0040, t01=0x016e}
0x0655a…06580               Head {h00=0x0022, h01=0x0050, text=»* TRAILING PAD CAN BE CHECKED «, t00=0x0040, t01=0x0176}
0x06580…06588               Head {h00=0x0004, h01=0x0050, t00=0x0041, t01=0x000c}
0x06588…065aa               Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,LCUIN HALT INPUT«, t00=0x0041, t01=0x0014}
0x065aa…065c0               Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUIN «, t00=0x0041, t01=0x0036}
0x065c0…065d6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0041, t01=0x004c}
0x065d6…065f2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0041, t01=0x0062}
0x065f2…0661a               Head {h00=0x0024, h01=0x0050, text=» CF A5,HALTIN HALT INPUT SALCUZ «, t00=0x0041, t01=0x007e}
0x0661a…0664c               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) BRM010 PARITY ERROR SALCUZ  SALCUZ«, t00=0x0041, t01=0x00a6}
0x0664c…06662               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0041, t01=0x00d8}
0x06662…06674               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0041, t01=0x00ee}
0x06674…06698               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK COUNTER«, t00=0x0041, t01=0x0100}
0x06698…066aa               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x0041, t01=0x0124}
0x066aa…066bc               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x0041, t01=0x0136}
0x066bc…066dc               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x0041, t01=0x0148}
0x066dc…066ee               Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x0041, t01=0x0168}
0x066ee…06710               Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x0041, t01=0x017a}
0x06710…06724               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0042, t01=0x000c}
0x06724…0675e               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x0042, t01=0x0020}
0x0675e…0676a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x005a}
0x0676a…0677e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0042, t01=0x0066}
0x0677e…067a8               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0042, t01=0x007a}
0x067a8…067b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x00a4}
0x067b4…067d6               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0042, t01=0x00b0}
0x067d6…067fa               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x0042, t01=0x00d2}
0x067fa…06816               Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x0042, t01=0x00f6}
0x06816…0682a               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x0042, t01=0x0112}
0x0682a…06854               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0042, t01=0x0126}
0x06854…06876               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0042, t01=0x0150}
0x06876…06896               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x0042, t01=0x0172}
0x06896…068ac (67, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=0   «, t00=0x0043, t01=0x0004}
0x068ac…068d4               Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x0043, t01=0x001a}
0x068d4…068e8               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0043, t01=0x0042}
0x068e8…068fc               Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x0043, t01=0x0056}
0x068fc…0690c               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0043, t01=0x006a}
0x0690c…06922               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=1   «, t00=0x0043, t01=0x007a}
0x06922…06942               Head {h00=0x001c, h01=0x0050, text=» ABL BRM INVALID ADDRESS«, t00=0x0043, t01=0x0090}
0x06942…06952               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0043, t01=0x00b0}
0x06952…0695c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00c0}
0x0695c…0698c               Head {h00=0x002c, h01=0x0050, text=»*   WAIT FOR MARK HOLD TO RESYNCHRONIZE «, t00=0x0043, t01=0x00ca}
0x0698c…06996               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00fa}
0x06996…069aa               Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0043, t01=0x0104}
0x069aa…069be               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0043, t01=0x0118}
0x069be…069d2               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0043, t01=0x012c}
0x069d2…069f2               Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM RESYNCHRONIZE«, t00=0x0043, t01=0x0140}
0x069f2…06a1c               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ ANOTHER CHARACTER«, t00=0x0043, t01=0x0160}
0x06a1c…06a2e               Head {h00=0x000e, h01=0x0050, text=» RB BRM150«, t00=0x0043, t01=0x018a}
0x06a2e…06a38               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0044, t01=0x000c}
0x06a38…06a42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0016}
0x06a42…06a4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0020}
0x06a4c…06a6c               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0044, t01=0x002a}
0x06a6c…06a76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x004a}
0x06a76…06a80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0054}
0x06a80…06a94               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0044, t01=0x005e}
0x06a94…06abe               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0044, t01=0x0072}
0x06abe…06ad2               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0044, t01=0x009c}
0x06ad2…06af4               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0044, t01=0x00b0}
0x06af4…06b00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x00d2}
0x06b00…06b14               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0044, t01=0x00de}
0x06b14…06b3e               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0044, t01=0x00f2}
0x06b3e…06b64               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0044, t01=0x011c}
0x06b64…06b88               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0044, t01=0x0142}
0x06b88…06ba2               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0044, t01=0x0166}
0x06ba2…06bce               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0044, t01=0x0180}
0x06bce…06be2               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0045, t01=0x001c}
0x06be2…06c08               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0045, t01=0x0030}
0x06c08…06c1c               Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0045, t01=0x0056}
0x06c1c…06c3e               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0045, t01=0x006a}
0x06c3e…06c4e               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0045, t01=0x008c}
0x06c4e…06c58               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0045, t01=0x009c}
0x06c58…06c62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00a6}
0x06c62…06c6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00b0}
0x06c6c…06c8c               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0045, t01=0x00ba}
0x06c8c…06c96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00da}
0x06c96…06ca0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00e4}
0x06ca0…06cb4               Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0045, t01=0x00ee}
0x06cb4…06cc8               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0045, t01=0x0102}
0x06cc8…06cdc               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0045, t01=0x0116}
0x06cdc…06cfe               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0045, t01=0x012a}
0x06cfe…06d14               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0045, t01=0x014c}
0x06d14…06d3e               Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0045, t01=0x0162}
0x06d3e…06d52               Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0045, t01=0x018c}
0x06d52…06d74               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0046, t01=0x0010}
0x06d74…06d86               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0046, t01=0x0032}
0x06d86…06da8               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0046, t01=0x0044}
0x06da8…06dbc               Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0046, t01=0x0066}
0x06dbc…06de8               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0046, t01=0x007a}
0x06de8…06dfc               Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0046, t01=0x00a6}
0x06dfc…06e1a               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0046, t01=0x00ba}
0x06e1a…06e2a               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0046, t01=0x00d8}
0x06e2a…06e3e               Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0046, t01=0x00e8}
0x06e3e…06e52               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0046, t01=0x00fc}
0x06e52…06e66               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0046, t01=0x0110}
0x06e66…06e90               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0046, t01=0x0124}
0x06e90…06ea6               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0046, t01=0x014e}
0x06ea6…06ed0               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0046, t01=0x0164}
0x06ed0…06ef6               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0046, t01=0x018e}
0x06ef6…06f2a               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0047, t01=0x0024}
0x06f2a…06f46               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0047, t01=0x0058}
0x06f46…06f52               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0074}
0x06f52…06f66               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0047, t01=0x0080}
0x06f66…06f96               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0047, t01=0x0094}
0x06f96…06fb0               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0047, t01=0x00c4}
0x06fb0…06fdc               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0047, t01=0x00de}
0x06fdc…06ffc               Head {h00=0x001c, h01=0x0050, text=» CM CACK PRESET ACK-1 =7«, t00=0x0047, t01=0x010a}
0x06ffc…07020               Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x0047, t01=0x012a}
0x07020…0702c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x014e}
0x0702c…07058               Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x0047, t01=0x015a}
0x07058…07070               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0047, t01=0x0186}
0x07070…07088               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0048, t01=0x000e}
0x07088…0709a               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0048, t01=0x0026}
0x0709a…070b2               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0048, t01=0x0038}
0x070b2…070ca               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ  =8 «, t00=0x0048, t01=0x0050}
0x070ca…070dc               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0048, t01=0x0068}
0x070dc…07108               Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x0048, t01=0x007a}
0x07108…0711a               Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x0048, t01=0x00a6}
0x0711a…0712e               Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x0048, t01=0x00b8}
0x0712e…07152               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0048, t01=0x00cc}
0x07152…0717a               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0048, t01=0x00f0}
0x0717a…0718c               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0048, t01=0x0118}
0x0718c…071a0               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0048, t01=0x012a}
0x071a0…071c6               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x0048, t01=0x013e}
0x071c6…071da               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0048, t01=0x0164}
0x071da…071ee               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x0048, t01=0x0178}
0x071ee…07200               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x0048, t01=0x018c}
0x07200…07224               Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x0049, t01=0x000e}
0x07224…07236               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0049, t01=0x0032}
0x07236…0725a               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x0049, t01=0x0044}
0x0725a…0726c               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0049, t01=0x0068}
0x0726c…07282               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x0049, t01=0x007a}
0x07282…072ae               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x0049, t01=0x0090}
0x072ae…072cc               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x0049, t01=0x00bc}
0x072cc…072f6               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x0049, t01=0x00da}
0x072f6…07302               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0104}
0x07302…07316               Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x0049, t01=0x0110}
0x07316…07328               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0049, t01=0x0124}
0x07328…07352               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x0049, t01=0x0136}
0x07352…07362               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0049, t01=0x0160}
0x07362…07390               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0049, t01=0x0170}
0x07390…073a2               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x004a, t01=0x000e}
0x073a2…073c6               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x004a, t01=0x0020}
0x073c6…073d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0044}
0x073d0…073f6               Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x004a, t01=0x004e}
0x073f6…07400               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0074}
0x07400…07414               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x004a, t01=0x007e}
0x07414…07428               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x004a, t01=0x0092}
0x07428…07442               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x004a, t01=0x00a6}
0x07442…07458               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x004a, t01=0x00c0}
0x07458…0746e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x004a, t01=0x00d6}
0x0746e…07482               Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x004a, t01=0x00ec}
0x07482…0748e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x0100}
0x0748e…074a2               Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x004a, t01=0x010c}
0x074a2…074b8               Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x004a, t01=0x0120}
0x074b8…074e8               Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x004a, t01=0x0136}
0x074e8…0750a               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004a, t01=0x0166}
0x0750a…0752a               Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x004a, t01=0x0188}
0x0752a…07544               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004b, t01=0x0018}
0x07544…07564               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004b, t01=0x0032}
0x07564…0758e               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM327 ANY MESSAGE ORDER =4«, t00=0x004b, t01=0x0052}
0x0758e…075a0               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x004b, t01=0x007c}
0x075a0…075b2               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x004b, t01=0x008e}
0x075b2…075ca               Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x004b, t01=0x00a0}
0x075ca…075f0               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x004b, t01=0x00b8}
0x075f0…07604               Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x004b, t01=0x00de}
0x07604…0761e               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x004b, t01=0x00f2}
0x0761e…07646               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x004b, t01=0x010c}
0x07646…07666               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x004b, t01=0x0134}
0x07666…07694               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x004b, t01=0x0154}
0x07694…076be               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x004b, t01=0x0182}
0x076be…076ea               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x004c, t01=0x001c}
0x076ea…076f4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x004c, t01=0x0048}
0x076f4…076fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0052}
0x076fe…07708               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x005c}
0x07708…0773c               Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x004c, t01=0x0066}
0x0773c…07746               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x009a}
0x07746…07750               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x00a4}
0x07750…07764               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004c, t01=0x00ae}
0x07764…07784               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x004c, t01=0x00c2}
0x07784…07798               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004c, t01=0x00e2}
0x07798…077ba               Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x004c, t01=0x00f6}
0x077ba…077cc               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x004c, t01=0x0118}
0x077cc…077e2               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004c, t01=0x012a}
0x077e2…07804               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004c, t01=0x0140}
0x07804…07830               Head {h00=0x0028, h01=0x0050, text=» ORK A2,/0 CLEAR STARTPRINTERBIT DK5«, t00=0x004c, t01=0x0162}
0x07830…07848               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004c, t01=0x018e}
0x07848…0785c               Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004d, t01=0x0016}
0x0785c…07868               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x002a}
0x07868…07882               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004d, t01=0x0036}
0x07882…078a2               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004d, t01=0x0050}
0x078a2…078d2               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 «, t00=0x004d, t01=0x0070}
0x078d2…078fc               Head {h00=0x0026, h01=0x0050, text=» SUK A4,6 ADJUST BUFFER ADDRESS =4«, t00=0x004d, t01=0x00a0}
0x078fc…07928               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE MESSAGE ON DWT =4«, t00=0x004d, t01=0x00ca}
0x07928…0793e               Head {h00=0x0012, h01=0x0050, text=» RF BRM32A  =4«, t00=0x004d, t01=0x00f6}
0x0793e…0794e               Head {h00=0x000c, h01=0x0050, text=» XIF  =4«, t00=0x004d, t01=0x010c}
0x0794e…07966               Head {h00=0x0014, h01=0x0050, text=»BRM329 EQU *  =4«, t00=0x004d, t01=0x011c}
0x07966…0796e               Head {h00=0x0004, h01=0x0050, t00=0x004d, t01=0x0134}
0x0796e…07992               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x004d, t01=0x013c}
0x07992…079bc               Head {h00=0x0026, h01=0x0050, text=» CF A15,DC:MIN MOVE TO USER BUFFER«, t00=0x004d, t01=0x0160}
0x079bc…079ce               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004d, t01=0x018a}
0x079ce…079e6               Head {h00=0x0014, h01=0x0050, text=»BRM32A EQU *  =4«, t00=0x004e, t01=0x000c}
0x079e6…079ee               Head {h00=0x0004, h01=0x0050, t00=0x004e, t01=0x0024}
0x079ee…07a16               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004e, t01=0x002c}
0x07a16…07a28               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004e, t01=0x0054}
0x07a28…07a32               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x004e, t01=0x0066}
0x07a32…07a46               Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x004e, t01=0x0070}
0x07a46…07a60               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004e, t01=0x0084}
0x07a60…07a82               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 STATUS =4 «, t00=0x004e, t01=0x009e}
0x07a82…07aa6               Head {h00=0x0020, h01=0x0050, text=» RF(N) BRM335 NO REQUEST =4 «, t00=0x004e, t01=0x00c0}
0x07aa6…07ac6               Head {h00=0x001c, h01=0x0050, text=» LD A1,DWTOR,A6 ORDER =4«, t00=0x004e, t01=0x00e4}
0x07ac6…07af6               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 «, t00=0x004e, t01=0x0104}
0x07af6…07b20               Head {h00=0x0026, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST =4«, t00=0x004e, t01=0x0134}
0x07b20…07b38               Head {h00=0x0014, h01=0x0050, text=»BRM335 EQU *  =4«, t00=0x004e, t01=0x015e}
0x07b38…07b4a               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x004e, t01=0x0176}
0x07b4a…07b6c               Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x004e, t01=0x0188}
0x07b6c…07b98               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x004f, t01=0x001a}
0x07b98…07bca               Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x004f, t01=0x0046}
0x07bca…07bde               Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x004f, t01=0x0078}
0x07bde…07c00               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x004f, t01=0x008c}
0x07c00…07c10               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004f, t01=0x00ae}
0x07c10…07c24               Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x004f, t01=0x00be}
0x07c24…07c38               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004f, t01=0x00d2}
0x07c38…07c50               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x004f, t01=0x00e6}
0x07c50…07c62               Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x004f, t01=0x00fe}
0x07c62…07c8a               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x004f, t01=0x0110}
0x07c8a…07caa               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x004f, t01=0x0138}
0x07caa…07cbc               Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x004f, t01=0x0158}
0x07cbc…07cc8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x016a}
0x07cc8…07cdc               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x004f, t01=0x0176}
0x07cdc…07cee               Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x004f, t01=0x018a}
0x07cee…07cfa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0050, t01=0x000c}
0x07cfa…07d04               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0050, t01=0x0018}
0x07d04…07d0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0022}
0x07d0e…07d18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x002c}
0x07d18…07d48               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x0050, t01=0x0036}
0x07d48…07d52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0066}
0x07d52…07d5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0070}
0x07d5c…07d70               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0050, t01=0x007a}
0x07d70…07d98               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x0050, t01=0x008e}
0x07d98…07dac               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x0050, t01=0x00b6}
0x07dac…07dd2               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x0050, t01=0x00ca}
0x07dd2…07e0a               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x0050, t01=0x00f0}
0x07e0a…07e32               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x0050, t01=0x0128}
0x07e32…07e5a               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x0050, t01=0x0150}
0x07e5a…07e80               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x0050, t01=0x0178}
0x07e80…07ea6               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x0051, t01=0x000e}
0x07ea6…07eb8               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0051, t01=0x0034}
0x07eb8…07eca               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0051, t01=0x0046}
0x07eca…07ef4               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0051, t01=0x0058}
0x07ef4…07f02               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x0051, t01=0x0082}
0x07f02…07f30               Head {h00=0x002a, h01=0x0050, text=» LD A1,CRDBUF INCREMENT READ BUFFER DK«, t00=0x0051, t01=0x0090}
0x07f30…07f4c               Head {h00=0x0018, h01=0x0050, text=» ADK A1,1 COUNTER DK«, t00=0x0051, t01=0x00be}
0x07f4c…07f66               Head {h00=0x0016, h01=0x0050, text=» ST A1,CRDBUF  DK «, t00=0x0051, t01=0x00da}
0x07f66…07f74               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x0051, t01=0x00f4}
0x07f74…07f88               Head {h00=0x0010, h01=0x0050, text=» ABL POL127 «, t00=0x0051, t01=0x0102}
0x07f88…07f94               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x0116}
0x07f94…07f9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0122}
0x07f9e…07fa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x012c}
0x07fa8…07fc8               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x0051, t01=0x0136}
0x07fc8…07fd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0156}
0x07fd2…07fdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0160}
0x07fdc…07ff0               Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x0051, t01=0x016a}
0x07ff0…0801a               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0051, t01=0x017e}
0x0801a…0802e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0052, t01=0x0018}
0x0802e…0805e               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM510 RETRANSMISSION OF MESSAGE«, t00=0x0052, t01=0x002c}
0x0805e…08072               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0052, t01=0x005c}
0x08072…08098               Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x0052, t01=0x0070}
0x08098…080ca               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x0052, t01=0x0096}
0x080ca…080de               Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x0052, t01=0x00c8}
0x080de…080ee               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0052, t01=0x00dc}
0x080ee…080f8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0052, t01=0x00ec}
0x080f8…08102               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00f6}
0x08102…0810c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0100}
0x0810c…0812c               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x0052, t01=0x010a}
0x0812c…08136               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x012a}
0x08136…08140               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0134}
0x08140…08154               Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x0052, t01=0x013e}
0x08154…0817e               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0052, t01=0x0152}
0x0817e…08192               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0052, t01=0x017c}
0x08192…081b6               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x0052, t01=0x0190}
0x081b6…081ca               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0053, t01=0x0024}
0x081ca…081f0               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x0053, t01=0x0038}
0x081f0…08202               Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x0053, t01=0x005e}
0x08202…08216               Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x0053, t01=0x0070}
0x08216…08224               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x0053, t01=0x0084}
0x08224…08236               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0053, t01=0x0092}
0x08236…08252               Head {h00=0x0018, h01=0x0050, text=» CIO A1,0,LCUIN  DK «, t00=0x0053, t01=0x00a4}
0x08252…0826c               Head {h00=0x0016, h01=0x0050, text=» SST A1,LCUIN  DK «, t00=0x0053, t01=0x00c0}
0x0826c…08286               Head {h00=0x0016, h01=0x0050, text=» CF A15,STREG  DK «, t00=0x0053, t01=0x00da}
0x08286…082a0               Head {h00=0x0016, h01=0x0050, text=» CF A15,SETIME  DK«, t00=0x0053, t01=0x00f4}
0x082a0…082c0               Head {h00=0x001c, h01=0x0050, text=» DATA BRM520,TIMNAK  DK «, t00=0x0053, t01=0x010e}
0x082c0…082d6               Head {h00=0x0012, h01=0x0050, text=» ABL TDISP  DK«, t00=0x0053, t01=0x012e}
0x082d6…082ee               Head {h00=0x0014, h01=0x0050, text=»BRM520 EQU *  DK«, t00=0x0053, t01=0x0144}
0x082ee…08308               Head {h00=0x0016, h01=0x0050, text=» CF A15,LDREG  DK «, t00=0x0053, t01=0x015c}
0x08308…08316               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x0053, t01=0x0176}
0x08316…0833c               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0053, t01=0x0184}
0x0833c…08350               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0054, t01=0x001a}
0x08350…08364               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0054, t01=0x002e}
0x08364…08398               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x0054, t01=0x0042}
0x08398…083a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x0076}
0x083a4…083d8               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x0054, t01=0x0082}
0x083d8…08402               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x0054, t01=0x00b6}
0x08402…08416               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0054, t01=0x00e0}
0x08416…0842a               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0054, t01=0x00f4}
0x0842a…08434               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0108}
0x08434…0843e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0112}
0x0843e…0845e               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x0054, t01=0x011c}
0x0845e…08468               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x013c}
0x08468…08472               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0146}
0x08472…08486               Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x0054, t01=0x0150}
0x08486…084b0               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0054, t01=0x0164}
0x084b0…084c4               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0054, t01=0x018e}
0x084c4…084ea               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 ACK NOT EXPECTED«, t00=0x0055, t01=0x0012}
0x084ea…08514               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x0055, t01=0x0038}
0x08514…0852c               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0055, t01=0x0062}
0x0852c…08544               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x0055, t01=0x007a}
0x08544…08556               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0055, t01=0x0092}
0x08556…0856e               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0055, t01=0x00a4}
0x0856e…08586               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0  =8«, t00=0x0055, t01=0x00bc}
0x08586…08598               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0055, t01=0x00d4}
0x08598…085ae               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x0055, t01=0x00e6}
0x085ae…085b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00fc}
0x085b8…085d2               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x0055, t01=0x0106}
0x085d2…085dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0120}
0x085dc…085fe               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x0055, t01=0x012a}
0x085fe…08622               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0055, t01=0x014c}
0x08622…08636               Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0055, t01=0x0170}
0x08636…08654               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0055, t01=0x0184}
0x08654…0867e               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0056, t01=0x0012}
0x0867e…08690               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0056, t01=0x003c}
0x08690…086a4               Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0056, t01=0x004e}
0x086a4…086b8               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0056, t01=0x0062}
0x086b8…086ce               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0056, t01=0x0076}
0x086ce…086d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x008c}
0x086d8…086f2               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0056, t01=0x0096}
0x086f2…086fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00b0}
0x086fc…08720               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0056, t01=0x00ba}
0x08720…08748               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0056, t01=0x00de}
0x08748…0875c               Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0056, t01=0x0106}
0x0875c…08770               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0056, t01=0x011a}
0x08770…08792               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0056, t01=0x012e}
0x08792…0879c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0056, t01=0x0150}
0x0879c…087a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x015a}
0x087a6…087d6               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0056, t01=0x0164}
0x087d6…087e0 (87, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0004}
0x087e0…087fa               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0057, t01=0x000e}
0x087fa…0880e               Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0057, t01=0x0028}
0x0880e…08822               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0057, t01=0x003c}
0x08822…08836               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x0057, t01=0x0050}
0x08836…08868               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x0057, t01=0x0064}
0x08868…08874               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x0096}
0x08874…088a0               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0057, t01=0x00a2}
0x088a0…088b4               Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x0057, t01=0x00ce}
0x088b4…088d2               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0057, t01=0x00e2}
0x088d2…088e6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0057, t01=0x0100}
0x088e6…088ee               Head {h00=0x0004, h01=0x0050, t00=0x0057, t01=0x0114}
0x088ee…08910               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0057, t01=0x011c}
0x08910…0891c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x013e}
0x0891c…0892e               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0057, t01=0x014a}
0x0892e…08942               Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x0057, t01=0x015c}
0x08942…08954               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0057, t01=0x0170}
0x08954…0897e               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0057, t01=0x0182}
0x0897e…08992               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0058, t01=0x001c}
0x08992…089a6               Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x0058, t01=0x0030}
0x089a6…089be               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0058, t01=0x0044}
0x089be…089d6               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x0058, t01=0x005c}
0x089d6…089e8               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0058, t01=0x0074}
0x089e8…08a00               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0058, t01=0x0086}
0x08a00…08a18               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI  =8 «, t00=0x0058, t01=0x009e}
0x08a18…08a2a               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0058, t01=0x00b6}
0x08a2a…08a56               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x0058, t01=0x00c8}
0x08a56…08a7c               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x0058, t01=0x00f4}
0x08a7c…08a90               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0058, t01=0x011a}
0x08a90…08ab8               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x0058, t01=0x012e}
0x08ab8…08ad2               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0058, t01=0x0156}
0x08ad2…08ae4               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0058, t01=0x0170}
0x08ae4…08af8               Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x0058, t01=0x0182}
0x08af8…08b12               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0059, t01=0x0008}
0x08b12…08b24               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0059, t01=0x0022}
0x08b24…08b38               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0059, t01=0x0034}
0x08b38…08b42               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0059, t01=0x0048}
0x08b42…08b4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0052}
0x08b4c…08b56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x005c}
0x08b56…08b7c               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x0059, t01=0x0066}
0x08b7c…08b86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x008c}
0x08b86…08b90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0096}
0x08b90…08ba4               Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x0059, t01=0x00a0}
0x08ba4…08bca               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x0059, t01=0x00b4}
0x08bca…08bfa               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x0059, t01=0x00da}
0x08bfa…08c1e               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x0059, t01=0x010a}
0x08c1e…08c44               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x0059, t01=0x012e}
0x08c44…08c66               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0059, t01=0x0154}
0x08c66…08c78               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0059, t01=0x0176}
0x08c78…08c94               Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x0059, t01=0x0188}
0x08c94…08caa               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x005a, t01=0x0014}
0x08caa…08cd0               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x005a, t01=0x002a}
0x08cd0…08ce2               Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x005a, t01=0x0050}
0x08ce2…08cee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x0062}
0x08cee…08cf8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005a, t01=0x006e}
0x08cf8…08d02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0078}
0x08d02…08d0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0082}
0x08d0c…08d2e               Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x005a, t01=0x008c}
0x08d2e…08d38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00ae}
0x08d38…08d42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00b8}
0x08d42…08d56               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x005a, t01=0x00c2}
0x08d56…08d6e               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005a, t01=0x00d6}
0x08d6e…08d9c               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) POL010 ERROR. ACK EXPECTED =5 «, t00=0x005a, t01=0x00ee}
0x08d9c…08db0               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005a, t01=0x011c}
0x08db0…08dd2               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005a, t01=0x0130}
0x08dd2…08de4               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x005a, t01=0x0152}
0x08de4…08df6               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x005a, t01=0x0164}
0x08df6…08e1e               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x005a, t01=0x0176}
0x08e1e…08e3c               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x005b, t01=0x000e}
0x08e3c…08e48               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x002c}
0x08e48…08e5c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005b, t01=0x0038}
0x08e5c…08e6e               Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x005b, t01=0x004c}
0x08e6e…08e7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x005e}
0x08e7a…08e8e               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x005b, t01=0x006a}
0x08e8e…08e9e               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005b, t01=0x007e}
0x08e9e…08eb2               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x005b, t01=0x008e}
0x08eb2…08ecc               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x005b, t01=0x00a2}
0x08ecc…08ede               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005b, t01=0x00bc}
0x08ede…08efa               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x005b, t01=0x00ce}
0x08efa…08f06               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x00ea}
0x08f06…08f20               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x005b, t01=0x00f6}
0x08f20…08f32               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005b, t01=0x0110}
0x08f32…08f58               Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x005b, t01=0x0122}
0x08f58…08f7c               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x005b, t01=0x0148}
0x08f7c…08f8c               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005b, t01=0x016c}
0x08f8c…08fa0               Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x005b, t01=0x017c}
0x08fa0…08fac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0190}
0x08fac…08fc2               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x005c, t01=0x000c}
0x08fc2…08fea               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x005c, t01=0x0022}
0x08fea…08ffe               Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x005c, t01=0x004a}
0x08ffe…09018               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x005c, t01=0x005e}
0x09018…09038               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x005c, t01=0x0078}
0x09038…09044               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x0098}
0x09044…09056               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005c, t01=0x00a4}
0x09056…0906a               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x005c, t01=0x00b6}
0x0906a…0909a               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x005c, t01=0x00ca}
0x0909a…090ba               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x005c, t01=0x00fa}
0x090ba…090cc               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005c, t01=0x011a}
0x090cc…090d6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005c, t01=0x012c}
0x090d6…090e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0136}
0x090e0…090ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0140}
0x090ea…0910e               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x005c, t01=0x014a}
0x0910e…09118               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x016e}
0x09118…09122               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0178}
0x09122…09136               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x005c, t01=0x0182}
0x09136…09156               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x005d, t01=0x0008}
0x09156…0917a               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005d, t01=0x0028}
0x0917a…0918e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x005d, t01=0x004c}
0x0918e…091c0               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x005d, t01=0x0060}
0x091c0…091cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0092}
0x091cc…091f4               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x005d, t01=0x009e}
0x091f4…09204               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x005d, t01=0x00c6}
0x09204…0922a               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x005d, t01=0x00d6}
0x0922a…0923a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x005d, t01=0x00fc}
0x0923a…09244               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005d, t01=0x010c}
0x09244…0924e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0116}
0x0924e…09258               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0120}
0x09258…09280               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x005d, t01=0x012a}
0x09280…0928a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0152}
0x0928a…09294               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x015c}
0x09294…092a8               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x005d, t01=0x0166}
0x092a8…092c0               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005d, t01=0x017a}
0x092c0…092ea (94, 0, 400)  Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL020 ACK NOT EXPECTED =5 «, t00=0x005e, t01=0x0004}
0x092ea…09310               Head {h00=0x0022, h01=0x0050, text=»POL010 CF A5,TRENQ SEND ENQ =5«, t00=0x005e, t01=0x002e}
0x09310…0933e               Head {h00=0x002a, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER =5 «, t00=0x005e, t01=0x0054}
0x0933e…09364               Head {h00=0x0022, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE =5 «, t00=0x005e, t01=0x0082}
0x09364…0937c               Head {h00=0x0014, h01=0x0050, text=»POL020 EQU *  =5«, t00=0x005e, t01=0x00a8}
0x0937c…093a2               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x005e, t01=0x00c0}
0x093a2…093b6               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005e, t01=0x00e6}
0x093b6…093cc               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x005e, t01=0x00fa}
0x093cc…093f6               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x005e, t01=0x0110}
0x093f6…0941c               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x005e, t01=0x013a}
0x0941c…09430               Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x005e, t01=0x0160}
0x09430…09450               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x005e, t01=0x0174}
0x09450…0947a (95, 0, 400)  Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005f, t01=0x0004}
0x0947a…0949e               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005f, t01=0x002e}
0x0949e…094aa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x0052}
0x094aa…094be               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005f, t01=0x005e}
0x094be…094d0               Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x005f, t01=0x0072}
0x094d0…094dc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x0084}
0x094dc…094f0               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x005f, t01=0x0090}
0x094f0…09500               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005f, t01=0x00a4}
0x09500…09514               Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x005f, t01=0x00b4}
0x09514…09528               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x005f, t01=0x00c8}
0x09528…0954e               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x005f, t01=0x00dc}
0x0954e…09562               Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x005f, t01=0x0102}
0x09562…09580               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x005f, t01=0x0116}
0x09580…09592               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005f, t01=0x0134}
0x09592…095a6               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x005f, t01=0x0146}
0x095a6…095cc               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x005f, t01=0x015a}
0x095cc…095e0               Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x005f, t01=0x0180}
0x095e0…09608 (96, 0, 400)  Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0060, t01=0x0004}
0x09608…0961e               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x0060, t01=0x002c}
0x0961e…09634               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x0060, t01=0x0042}
0x09634…09646               Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x0060, t01=0x0058}
0x09646…0965a               Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x0060, t01=0x006a}
0x0965a…0967e               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x0060, t01=0x007e}
0x0967e…0969c               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0060, t01=0x00a2}
0x0969c…096a4               Head {h00=0x0004, h01=0x0050, t00=0x0060, t01=0x00c0}
0x096a4…096ba               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x0060, t01=0x00c8}
0x096ba…096e2               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,MMUBUF MMU WORK BUFFER «, t00=0x0060, t01=0x00de}
0x096e2…096fa               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x0060, t01=0x0106}
0x096fa…0972c               Head {h00=0x002e, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA FROM USER BUFFER «, t00=0x0060, t01=0x011e}
0x0972c…09738               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0060, t01=0x0150}
0x09738…09762               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0060, t01=0x015c}
0x09762…09784               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x0060, t01=0x0186}
0x09784…09798               Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x0061, t01=0x0018}
0x09798…097c2               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x0061, t01=0x002c}
0x097c2…097ee               Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x0061, t01=0x0056}
0x097ee…09810               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x0061, t01=0x0082}
0x09810…09834               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x0061, t01=0x00a4}
0x09834…09848               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x0061, t01=0x00c8}
0x09848…0986a               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x0061, t01=0x00dc}
0x0986a…0987a               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0061, t01=0x00fe}
0x0987a…0989e               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x0061, t01=0x010e}
0x0989e…098c8               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0061, t01=0x0132}
0x098c8…098ec               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0061, t01=0x015c}
0x098ec…098fe               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x0061, t01=0x0180}
0x098fe…09908 (98, 0, 398)  Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0062, t01=0x0004}
0x09908…09912               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x000e}
0x09912…0991c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0018}
0x0991c…09946               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x0062, t01=0x0022}
0x09946…09950               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x004c}
0x09950…0995a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0056}
0x0995a…0996e               Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x0062, t01=0x0060}
0x0996e…09988               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0062, t01=0x0074}
0x09988…099a0               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x0062, t01=0x008e}
0x099a0…099c6               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL010 ACK EXPECTED =5«, t00=0x0062, t01=0x00a6}
0x099c6…099e0               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x0062, t01=0x00cc}
0x099e0…09a04               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x0062, t01=0x00e6}
0x09a04…09a22               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x0062, t01=0x010a}
0x09a22…09a36               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0062, t01=0x0128}
0x09a36…09a58               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0062, t01=0x013c}
0x09a58…09a6a               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x0062, t01=0x015e}
0x09a6a…09a90               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x0062, t01=0x0170}
0x09a90…09a9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x0008}
0x09a9c…09ab6               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0063, t01=0x0014}
0x09ab6…09ace               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0063, t01=0x002e}
0x09ace…09aee               Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x0063, t01=0x0046}
0x09aee…09b10               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x0063, t01=0x0066}
0x09b10…09b22               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x0063, t01=0x0088}
0x09b22…09b46               Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x0063, t01=0x009a}
0x09b46…09b58               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0063, t01=0x00be}
0x09b58…09b7e               Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x0063, t01=0x00d0}
0x09b7e…09b8a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x00f6}
0x09b8a…09ba6               Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x0063, t01=0x0102}
0x09ba6…09bb0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0063, t01=0x011e}
0x09bb0…09bba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0128}
0x09bba…09bc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0132}
0x09bc4…09c00               Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x0063, t01=0x013c}
0x09c00…09c0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0178}
0x09c0a…09c2c               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x0063, t01=0x0182}
0x09c2c…09c36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0014}
0x09c36…09c40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x001e}
0x09c40…09c5c               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x0064, t01=0x0028}
0x09c5c…09c84               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x0064, t01=0x0044}
0x09c84…09c9c               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0064, t01=0x006c}
0x09c9c…09cbc               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x0064, t01=0x0084}
0x09cbc…09cde               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0064, t01=0x00a4}
0x09cde…09cf0               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0064, t01=0x00c6}
0x09cf0…09d14               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x0064, t01=0x00d8}
0x09d14…09d26               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0064, t01=0x00fc}
0x09d26…09d52               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x0064, t01=0x010e}
0x09d52…09d64               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0064, t01=0x013a}
0x09d64…09d9a               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x0064, t01=0x014c}
0x09d9a…09dba               Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x0064, t01=0x0182}
0x09dba…09de6               Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x0065, t01=0x0012}
0x09de6…09df8               Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x0065, t01=0x003e}
0x09df8…09e22               Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x0065, t01=0x0050}
0x09e22…09e44               Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x0065, t01=0x007a}
0x09e44…09e56               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0065, t01=0x009c}
0x09e56…09e6c               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x0065, t01=0x00ae}
0x09e6c…09e84               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0065, t01=0x00c4}
0x09e84…09eac               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0065, t01=0x00dc}
0x09eac…09ec0               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x0065, t01=0x0104}
0x09ec0…09eee               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0065, t01=0x0118}
0x09eee…09f02               Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x0065, t01=0x0146}
0x09f02…09f16               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x0065, t01=0x015a}
0x09f16…09f3c               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0065, t01=0x016e}
0x09f3c…09f4e (102, 0, 398) Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0066, t01=0x0004}
0x09f4e…09f5e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0066, t01=0x0016}
0x09f5e…09f68               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0066, t01=0x0026}
0x09f68…09f72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0030}
0x09f72…09f7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x003a}
0x09f7c…09f9a               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x0066, t01=0x0044}
0x09f9a…09fa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0062}
0x09fa4…09fc4               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x0066, t01=0x006c}
0x09fc4…09ff0               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x0066, t01=0x008c}
0x09ff0…0a026               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x0066, t01=0x00b8}
0x0a026…0a052               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x0066, t01=0x00ee}
0x0a052…0a05c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x011a}
0x0a05c…0a070               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x0066, t01=0x0124}
0x0a070…0a098               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0066, t01=0x0138}
0x0a098…0a0b8               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x0066, t01=0x0160}
0x0a0b8…0a0ca               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0066, t01=0x0180}
0x0a0ca…0a0de (103, 0, 400) Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0067, t01=0x0004}
0x0a0de…0a106               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x0067, t01=0x0018}
0x0a106…0a12c               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x0067, t01=0x0040}
0x0a12c…0a13e               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x0067, t01=0x0066}
0x0a13e…0a152               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0067, t01=0x0078}
0x0a152…0a166               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x0067, t01=0x008c}
0x0a166…0a18a               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0067, t01=0x00a0}
0x0a18a…0a1b6               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0067, t01=0x00c4}
0x0a1b6…0a1ca               Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x0067, t01=0x00f0}
0x0a1ca…0a1da               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0067, t01=0x0104}
0x0a1da…0a1f6               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0067, t01=0x0114}
0x0a1f6…0a1fe               Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x0130}
0x0a1fe…0a214               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0067, t01=0x0138}
0x0a214…0a228               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0067, t01=0x014e}
0x0a228…0a24e               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x0067, t01=0x0162}
0x0a24e…0a262               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0067, t01=0x0188}
0x0a262…0a286               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0068, t01=0x000c}
0x0a286…0a29a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x0068, t01=0x0030}
0x0a29a…0a2b0               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x0068, t01=0x0044}
0x0a2b0…0a2de               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x0068, t01=0x005a}
0x0a2de…0a2f2               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0068, t01=0x0088}
0x0a2f2…0a2fe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0068, t01=0x009c}
0x0a2fe…0a312               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x0068, t01=0x00a8}
0x0a312…0a33a               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0068, t01=0x00bc}
0x0a33a…0a35e               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0068, t01=0x00e4}
0x0a35e…0a372               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x0068, t01=0x0108}
0x0a372…0a386               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x0068, t01=0x011c}
0x0a386…0a3a8               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x0068, t01=0x0130}
0x0a3a8…0a3bc               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x0068, t01=0x0152}
0x0a3bc…0a3de               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x0068, t01=0x0166}
0x0a3de…0a3f2               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x0068, t01=0x0188}
0x0a3f2…0a414               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x0069, t01=0x000c}
0x0a414…0a428               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x0069, t01=0x002e}
0x0a428…0a45e               Head {h00=0x0032, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE «, t00=0x0069, t01=0x0042}
0x0a45e…0a472               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0069, t01=0x0078}
0x0a472…0a49a               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x0069, t01=0x008c}
0x0a49a…0a4a2               Head {h00=0x0004, h01=0x0050, t00=0x0069, t01=0x00b4}
0x0a4a2…0a4b6               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0069, t01=0x00bc}
0x0a4b6…0a4cc               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x0069, t01=0x00d0}
0x0a4cc…0a4d4               Head {h00=0x0004, h01=0x0050, t00=0x0069, t01=0x00e6}
0x0a4d4…0a4e6               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0069, t01=0x00ee}
0x0a4e6…0a4fc               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x0069, t01=0x0100}
0x0a4fc…0a51e               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x0069, t01=0x0116}
0x0a51e…0a530               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x0069, t01=0x0138}
0x0a530…0a552               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x0069, t01=0x014a}
0x0a552…0a564               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x0069, t01=0x016c}
0x0a564…0a576               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0069, t01=0x017e}
0x0a576…0a5a4               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x0069, t01=0x0190}
0x0a5a4…0a5c8               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006a, t01=0x002e}
0x0a5c8…0a5f6               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x006a, t01=0x0052}
0x0a5f6…0a608               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x006a, t01=0x0080}
0x0a608…0a61c               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x006a, t01=0x0092}
0x0a61c…0a628               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006a, t01=0x00a6}
0x0a628…0a630               Head {h00=0x0004, h01=0x0050, t00=0x006a, t01=0x00b2}
0x0a630…0a652               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x006a, t01=0x00ba}
0x0a652…0a676               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x006a, t01=0x00dc}
0x0a676…0a69e               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x006a, t01=0x0100}
0x0a69e…0a6b2               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x006a, t01=0x0128}
0x0a6b2…0a6ce               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x006a, t01=0x013c}
0x0a6ce…0a6f2               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x006a, t01=0x0158}
0x0a6f2…0a6fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x017c}
0x0a6fc…0a716               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x006a, t01=0x0186}
0x0a716…0a720               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0010}
0x0a720…0a73e               Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x006b, t01=0x001a}
0x0a73e…0a752               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x006b, t01=0x0038}
0x0a752…0a77c               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006b, t01=0x004c}
0x0a77c…0a790               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x006b, t01=0x0076}
0x0a790…0a7b8               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x006b, t01=0x008a}
0x0a7b8…0a7ca               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006b, t01=0x00b2}
0x0a7ca…0a7d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00c4}
0x0a7d4…0a7ea               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x006b, t01=0x00ce}
0x0a7ea…0a7f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00e4}
0x0a7f4…0a808               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x006b, t01=0x00ee}
0x0a808…0a830               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x006b, t01=0x0102}
0x0a830…0a854               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x006b, t01=0x012a}
0x0a854…0a88a               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x006b, t01=0x014e}
0x0a88a…0a89e               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006b, t01=0x0184}
0x0a89e…0a8b2               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006c, t01=0x0008}
0x0a8b2…0a8d2               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x006c, t01=0x001c}
0x0a8d2…0a8de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x003c}
0x0a8de…0a8f2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006c, t01=0x0048}
0x0a8f2…0a91c               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006c, t01=0x005c}
0x0a91c…0a93c               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x006c, t01=0x0086}
0x0a93c…0a948               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x00a6}
0x0a948…0a95c               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x006c, t01=0x00b2}
0x0a95c…0a986               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006c, t01=0x00c6}
0x0a986…0a99a               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x006c, t01=0x00f0}
0x0a99a…0a9c2               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x006c, t01=0x0104}
0x0a9c2…0a9e2               Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x006c, t01=0x012c}
0x0a9e2…0a9f6               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x006c, t01=0x014c}
0x0a9f6…0aa1c               Head {h00=0x0022, h01=0x0050, text=» ORR A7,A1 PARITY ERROR SALCUZ«, t00=0x006c, t01=0x0160}
0x0aa1c…0aa32               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x006c, t01=0x0186}
0x0aa32…0aa42               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006d, t01=0x000c}
0x0aa42…0aa4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x001c}
0x0aa4c…0aa62               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x006d, t01=0x0026}
0x0aa62…0aa6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x003c}
0x0aa6c…0aa80               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x006d, t01=0x0046}
0x0aa80…0aa92               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x006d, t01=0x005a}
0x0aa92…0aab8               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x006d, t01=0x006c}
0x0aab8…0aade               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x006d, t01=0x0092}
0x0aade…0aaf0               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x006d, t01=0x00b8}
0x0aaf0…0aafa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00ca}
0x0aafa…0ab10               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x006d, t01=0x00d4}
0x0ab10…0ab1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00ea}
0x0ab1a…0ab2e               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x006d, t01=0x00f4}
0x0ab2e…0ab42               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006d, t01=0x0108}
0x0ab42…0ab56               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006d, t01=0x011c}
0x0ab56…0ab7c               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x006d, t01=0x0130}
0x0ab7c…0ab88               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x0156}
0x0ab88…0ab9c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006d, t01=0x0162}
0x0ab9c…0abc6               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006d, t01=0x0176}
0x0abc6…0abec               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x006e, t01=0x0010}
0x0abec…0abf8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x0036}
0x0abf8…0ac0a               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006e, t01=0x0042}
0x0ac0a…0ac14               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x006e, t01=0x0054}
0x0ac14…0ac1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x005e}
0x0ac1e…0ac3c               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x006e, t01=0x0068}
0x0ac3c…0ac46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0086}
0x0ac46…0ac5c               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x006e, t01=0x0090}
0x0ac5c…0ac7e               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x006e, t01=0x00a6}
0x0ac7e…0aca8               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x006e, t01=0x00c8}
0x0aca8…0acbe               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x006e, t01=0x00f2}
0x0acbe…0acdc               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x006e, t01=0x0108}
0x0acdc…0acee               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006e, t01=0x0126}
0x0acee…0acf8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0138}
0x0acf8…0ad10               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x006e, t01=0x0142}
0x0ad10…0ad1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x015a}
0x0ad1a…0ad3e               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x006e, t01=0x0164}
0x0ad3e…0ad50               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006e, t01=0x0188}
0x0ad50…0ad5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x000a}
0x0ad5a…0ad70               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x006f, t01=0x0014}
0x0ad70…0ad7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x002a}
0x0ad7a…0ad8e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x006f, t01=0x0034}
0x0ad8e…0adb0               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x006f, t01=0x0048}
0x0adb0…0adbc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x006a}
0x0adbc…0adc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0076}
0x0adc6…0addc               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x006f, t01=0x0080}
0x0addc…0ade6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0096}
0x0ade6…0ae08               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x006f, t01=0x00a0}
0x0ae08…0ae2e               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x006f, t01=0x00c2}
0x0ae2e…0ae46               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x006f, t01=0x00e8}
0x0ae46…0ae58               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x006f, t01=0x0100}
0x0ae58…0ae62               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x006f, t01=0x0112}
0x0ae62…0ae6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x011c}
0x0ae6c…0ae82               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x006f, t01=0x0126}
0x0ae82…0ae8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x013c}
0x0ae8c…0aeae               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x006f, t01=0x0146}
0x0aeae…0aec0               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x006f, t01=0x0168}
0x0aec0…0aeca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x017a}
0x0aeca…0aee0               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x006f, t01=0x0184}
0x0aee0…0aeea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x000a}
0x0aeea…0af0c               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x0070, t01=0x0014}
0x0af0c…0af1e               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0070, t01=0x0036}
0x0af1e…0af28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0048}
0x0af28…0af3e               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x0070, t01=0x0052}
0x0af3e…0af48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0068}
0x0af48…0af6a               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x0070, t01=0x0072}
0x0af6a…0af74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0094}
0x0af74…0afa0               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x0070, t01=0x009e}
0x0afa0…0afb4               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0070, t01=0x00ca}
0x0afb4…0afcc               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x0070, t01=0x00de}
0x0afcc…0aff4               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x0070, t01=0x00f6}
0x0aff4…0b01e               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x0070, t01=0x011e}
0x0b01e…0b03c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0070, t01=0x0148}
0x0b03c…0b066               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x0070, t01=0x0166}
0x0b066…0b084               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0070, t01=0x0190}
0x0b084…0b09e               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x0071, t01=0x001e}
0x0b09e…0b0bc               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x0071, t01=0x0038}
0x0b0bc…0b0d0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0071, t01=0x0056}
0x0b0d0…0b0e6               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x0071, t01=0x006a}
0x0b0e6…0b100               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0071, t01=0x0080}
0x0b100…0b128               Head {h00=0x0024, h01=0x0050, text=» CIO A2,0,LCUUT STOP TRANSMITTER«, t00=0x0071, t01=0x009a}
0x0b128…0b144               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0071, t01=0x00c2}
0x0b144…0b16c               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ WAIT FOR END SALCUZ «, t00=0x0071, t01=0x00de}
0x0b16c…0b182               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0071, t01=0x0106}
0x0b182…0b1ac               Head {h00=0x0026, h01=0x0050, text=» SST A2,LCUUT PERFORM SST AT ONCE «, t00=0x0071, t01=0x011c}
0x0b1ac…0b1c0               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0071, t01=0x0146}
0x0b1c0…0b1ec               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x0071, t01=0x015a}
0x0b1ec…0b1f8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x0186}
0x0b1f8…0b208 (114, 0, 400) Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0072, t01=0x0004}
0x0b208…0b212               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0072, t01=0x0014}
0x0b212…0b21c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x001e}
0x0b21c…0b226               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0028}
0x0b226…0b248               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x0072, t01=0x0032}
0x0b248…0b252               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0054}
0x0b252…0b25c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x005e}
0x0b25c…0b270               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x0072, t01=0x0068}
0x0b270…0b292               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0072, t01=0x007c}
0x0b292…0b2a8               Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x0072, t01=0x009e}
0x0b2a8…0b2b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00b4}
0x0b2b2…0b2bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00be}
0x0b2bc…0b2dc               Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x0072, t01=0x00c8}
0x0b2dc…0b2e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00e8}
0x0b2e6…0b2f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00f2}
0x0b2f0…0b304               Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x0072, t01=0x00fc}
0x0b304…0b330               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x0072, t01=0x0110}
0x0b330…0b338               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x013c}
0x0b338…0b36e               Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x0072, t01=0x0144}
0x0b36e…0b38c               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x0072, t01=0x017a}
0x0b38c…0b394               Head {h00=0x0004, h01=0x0050, t00=0x0073, t01=0x0008}
0x0b394…0b3aa               Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x0073, t01=0x0010}
0x0b3aa…0b3d0               Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x0073, t01=0x0026}
0x0b3d0…0b3e4               Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x0073, t01=0x004c}
0x0b3e4…0b40c               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x0073, t01=0x0060}
0x0b40c…0b420               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0073, t01=0x0088}
0x0b420…0b43e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0073, t01=0x009c}
0x0b43e…0b45a               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x0073, t01=0x00ba}
0x0b45a…0b46e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0073, t01=0x00d6}
0x0b46e…0b48a               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x0073, t01=0x00ea}
0x0b48a…0b49e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x0073, t01=0x0106}
0x0b49e…0b4ba               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x0073, t01=0x011a}
0x0b4ba…0b4ce               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0073, t01=0x0136}
0x0b4ce…0b4ec               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0073, t01=0x014a}
0x0b4ec…0b518               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0073, t01=0x0168}
0x0b518…0b544 (116, 0, 400) Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x0074, t01=0x0004}
0x0b544…0b564               Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x0074, t01=0x0030}
0x0b564…0b576               Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x0074, t01=0x0050}
0x0b576…0b58a               Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x0074, t01=0x0062}
0x0b58a…0b59c               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0074, t01=0x0076}
0x0b59c…0b5b0               Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x0074, t01=0x0088}
0x0b5b0…0b5ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x009c}
0x0b5ba…0b5c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00a6}
0x0b5c4…0b5ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00b0}
0x0b5ce…0b5da               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x00ba}
0x0b5da…0b5ee               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0074, t01=0x00c6}
0x0b5ee…0b60c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0074, t01=0x00da}
0x0b60c…0b628               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0074, t01=0x00f8}
0x0b628…0b650               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0074, t01=0x0114}
0x0b650…0b674               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0074, t01=0x013c}
0x0b674…0b6a0               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0074, t01=0x0160}
0x0b6a0…0b6cc               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x0074, t01=0x018c}
0x0b6cc…0b6f6               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x0075, t01=0x0028}
0x0b6f6…0b71a               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x0075, t01=0x0052}
0x0b71a…0b740               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x0075, t01=0x0076}
0x0b740…0b760               Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x0075, t01=0x009c}
0x0b760…0b77e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0075, t01=0x00bc}
0x0b77e…0b79a               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0075, t01=0x00da}
0x0b79a…0b7b8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0075, t01=0x00f6}
0x0b7b8…0b7ce               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0075, t01=0x0114}
0x0b7ce…0b7e2               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x0075, t01=0x012a}
0x0b7e2…0b808               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x0075, t01=0x013e}
0x0b808…0b81e               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0075, t01=0x0164}
0x0b81e…0b844               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x0075, t01=0x017a}
0x0b844…0b85a               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0076, t01=0x0010}
0x0b85a…0b86e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x0076, t01=0x0026}
0x0b86e…0b884               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0076, t01=0x003a}
0x0b884…0b890               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x0050}
0x0b890…0b8a4               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0076, t01=0x005c}
0x0b8a4…0b8ac               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x0070}
0x0b8ac…0b8d6               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0076, t01=0x0078}
0x0b8d6…0b8f0               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x0076, t01=0x00a2}
0x0b8f0…0b8f8               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x00bc}
0x0b8f8…0b918               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x0076, t01=0x00c4}
0x0b918…0b93e               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x0076, t01=0x00e4}
0x0b93e…0b962               Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x0076, t01=0x010a}
0x0b962…0b96a               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x012e}
0x0b96a…0b992               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x0076, t01=0x0136}
0x0b992…0b9c4               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x0076, t01=0x015e}
0x0b9c4…0b9e6               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x0076, t01=0x0190}
0x0b9e6…0b9f8               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0077, t01=0x0022}
0x0b9f8…0ba0c               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x0077, t01=0x0034}
0x0ba0c…0ba18               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x0048}
0x0ba18…0ba20               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x0054}
0x0ba20…0ba32               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0077, t01=0x005c}
0x0ba32…0ba46               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x0077, t01=0x006e}
0x0ba46…0ba6a               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x0077, t01=0x0082}
0x0ba6a…0ba8e               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0077, t01=0x00a6}
0x0ba8e…0baa2               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0077, t01=0x00ca}
0x0baa2…0bab6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0077, t01=0x00de}
0x0bab6…0bae0               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0077, t01=0x00f2}
0x0bae0…0bafa               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x0077, t01=0x011c}
0x0bafa…0bb02               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x0136}
0x0bb02…0bb46               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0077, t01=0x013e}
0x0bb46…0bb50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0182}
0x0bb50…0bb80               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x0077, t01=0x018c}
0x0bb80…0bb8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x002c}
0x0bb8a…0bbc2               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0078, t01=0x0036}
0x0bbc2…0bbca               Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x006e}
0x0bbca…0bbf4               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x0078, t01=0x0076}
0x0bbf4…0bc10               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x0078, t01=0x00a0}
0x0bc10…0bc1c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x00bc}
0x0bc1c…0bc30               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x0078, t01=0x00c8}
0x0bc30…0bc50               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x0078, t01=0x00dc}
0x0bc50…0bc76               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x0078, t01=0x00fc}
0x0bc76…0bc8a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x0078, t01=0x0122}
0x0bc8a…0bc9e               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x0078, t01=0x0136}
0x0bc9e…0bcc2               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x0078, t01=0x014a}
0x0bcc2…0bce8               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x0078, t01=0x016e}
0x0bce8…0bcfc (121, 0, 400) Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x0079, t01=0x0004}
0x0bcfc…0bd10               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x0079, t01=0x0018}
0x0bd10…0bd2e               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x0079, t01=0x002c}
0x0bd2e…0bd44               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x0079, t01=0x004a}
0x0bd44…0bd56               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0079, t01=0x0060}
0x0bd56…0bd62               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0072}
0x0bd62…0bd76               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0079, t01=0x007e}
0x0bd76…0bd88               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x0079, t01=0x0092}
0x0bd88…0bd90               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x00a4}
0x0bd90…0bda4               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x0079, t01=0x00ac}
0x0bda4…0bdac               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x00c0}
0x0bdac…0bdbe               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x0079, t01=0x00c8}
0x0bdbe…0bde4               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x0079, t01=0x00da}
0x0bde4…0bdec               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x0100}
0x0bdec…0be18               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x0079, t01=0x0108}
0x0be18…0be2e               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x0079, t01=0x0134}
0x0be2e…0be5a               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x0079, t01=0x014a}
0x0be5a…0be6c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0079, t01=0x0176}
0x0be6c…0be84               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x0079, t01=0x0188}
0x0be84…0be96               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x007a, t01=0x0010}
0x0be96…0bec0               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x007a, t01=0x0022}
0x0bec0…0bee6               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x007a, t01=0x004c}
0x0bee6…0befe               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x007a, t01=0x0072}
0x0befe…0bf28               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x007a, t01=0x008a}
0x0bf28…0bf3e               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x007a, t01=0x00b4}
0x0bf3e…0bf52               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x007a, t01=0x00ca}
0x0bf52…0bf66               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x007a, t01=0x00de}
0x0bf66…0bf8a               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x007a, t01=0x00f2}
0x0bf8a…0bf9c               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x007a, t01=0x0116}
0x0bf9c…0bfae               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x007a, t01=0x0128}
0x0bfae…0bfc2               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x007a, t01=0x013a}
0x0bfc2…0bfce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x014e}
0x0bfce…0bfd8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x007a, t01=0x015a}
0x0bfd8…0bfec               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x007a, t01=0x0164}
0x0bfec…0c018               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x007a, t01=0x0178}
0x0c018…0c03c               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x007b, t01=0x0014}
0x0c03c…0c050               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x007b, t01=0x0038}
0x0c050…0c078               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x007b, t01=0x004c}
0x0c078…0c0a2               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x007b, t01=0x0074}
0x0c0a2…0c0b6               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x007b, t01=0x009e}
0x0c0b6…0c0dc               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x007b, t01=0x00b2}
0x0c0dc…0c10a               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x007b, t01=0x00d8}
0x0c10a…0c120               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x007b, t01=0x0106}
0x0c120…0c144               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x007b, t01=0x011c}
0x0c144…0c158               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007b, t01=0x0140}
0x0c158…0c188               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x007b, t01=0x0154}
0x0c188…0c19c               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x007b, t01=0x0184}
0x0c19c…0c1b6               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x007c, t01=0x0008}
0x0c1b6…0c1ca               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x007c, t01=0x0022}
0x0c1ca…0c1ec               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x007c, t01=0x0036}
0x0c1ec…0c218               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x007c, t01=0x0058}
0x0c218…0c23a               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x007c, t01=0x0084}
0x0c23a…0c258               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007c, t01=0x00a6}
0x0c258…0c278               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007c, t01=0x00c4}
0x0c278…0c2aa               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x007c, t01=0x00e4}
0x0c2aa…0c2c8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007c, t01=0x0116}
0x0c2c8…0c2e8               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007c, t01=0x0134}
0x0c2e8…0c2f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x0154}
0x0c2f4…0c308               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x007c, t01=0x0160}
0x0c308…0c324               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x007c, t01=0x0174}
0x0c324…0c338               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x007c, t01=0x0190}
0x0c338…0c356               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007d, t01=0x0014}
0x0c356…0c36a               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x007d, t01=0x0032}
0x0c36a…0c384               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x007d, t01=0x0046}
0x0c384…0c3a2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x007d, t01=0x0060}
0x0c3a2…0c3ae               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x007e}
0x0c3ae…0c3c2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x007d, t01=0x008a}
0x0c3c2…0c3e6               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x007d, t01=0x009e}
0x0c3e6…0c3f8               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x007d, t01=0x00c2}
0x0c3f8…0c40c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007d, t01=0x00d4}
0x0c40c…0c432               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x007d, t01=0x00e8}
0x0c432…0c444               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x007d, t01=0x010e}
0x0c444…0c458               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007d, t01=0x0120}
0x0c458…0c47e               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x007d, t01=0x0134}
0x0c47e…0c48a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x015a}
0x0c48a…0c4aa               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x007d, t01=0x0166}
0x0c4aa…0c4be               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x007d, t01=0x0186}
0x0c4be…0c4e2               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x007e, t01=0x000a}
0x0c4e2…0c4f6               Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x007e, t01=0x002e}
0x0c4f6…0c512               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x007e, t01=0x0042}
0x0c512…0c536               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x007e, t01=0x005e}
0x0c536…0c540               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x007e, t01=0x0082}
0x0c540…0c54a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x008c}
0x0c54a…0c554               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0096}
0x0c554…0c576               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x007e, t01=0x00a0}
0x0c576…0c580               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00c2}
0x0c580…0c58a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00cc}
0x0c58a…0c59e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x007e, t01=0x00d6}
0x0c59e…0c5b2               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x007e, t01=0x00ea}
0x0c5b2…0c5da               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x007e, t01=0x00fe}
0x0c5da…0c5f8               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x007e, t01=0x0126}
0x0c5f8…0c61a               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x007e, t01=0x0144}
0x0c61a…0c62e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x007e, t01=0x0166}
0x0c62e…0c64c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x007e, t01=0x017a}
0x0c64c…0c666               Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x007f, t01=0x0008}
0x0c666…0c67a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x007f, t01=0x0022}
0x0c67a…0c698               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x007f, t01=0x0036}
0x0c698…0c6ac               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x007f, t01=0x0054}
0x0c6ac…0c6ca               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x007f, t01=0x0068}
0x0c6ca…0c6de               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x007f, t01=0x0086}
0x0c6de…0c6fc               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x007f, t01=0x009a}
0x0c6fc…0c714               Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x007f, t01=0x00b8}
0x0c714…0c732               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x007f, t01=0x00d0}
0x0c732…0c746               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x007f, t01=0x00ee}
0x0c746…0c764               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x007f, t01=0x0102}
0x0c764…0c786               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x007f, t01=0x0120}
0x0c786…0c7a8               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x007f, t01=0x0142}
0x0c7a8…0c7ba               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x007f, t01=0x0164}
0x0c7ba…0c7e2               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x007f, t01=0x0176}
0x0c7e2…0c802               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x0080, t01=0x000e}
0x0c802…0c824               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x0080, t01=0x002e}
0x0c824…0c846               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0080, t01=0x0050}
0x0c846…0c858               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x0080, t01=0x0072}
0x0c858…0c876               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x0080, t01=0x0084}
0x0c876…0c888               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0080, t01=0x00a2}
0x0c888…0c8aa               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x0080, t01=0x00b4}
0x0c8aa…0c8bc               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x0080, t01=0x00d6}
0x0c8bc…0c8d0               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x0080, t01=0x00e8}
0x0c8d0…0c8f0               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x0080, t01=0x00fc}
0x0c8f0…0c914               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x0080, t01=0x011c}
0x0c914…0c920               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x0140}
0x0c920…0c92a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0080, t01=0x014c}
0x0c92a…0c934               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0156}
0x0c934…0c93e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0160}
0x0c93e…0c95e               Head {h00=0x001c, h01=0x0050, text=»* TRANSMIT SYNC SEQUENCE«, t00=0x0080, t01=0x016a}
0x0c95e…0c968               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x018a}
0x0c968…0c972 (129, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0004}
0x0c972…0c986               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x0081, t01=0x000e}
0x0c986…0c9a0               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0081, t01=0x0022}
0x0c9a0…0c9ce               Head {h00=0x002a, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT IF NOT DONE«, t00=0x0081, t01=0x003c}
0x0c9ce…0c9f0               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN PERFORM SST «, t00=0x0081, t01=0x006a}
0x0c9f0…0ca0c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0081, t01=0x008c}
0x0ca0c…0ca36               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x0081, t01=0x00a8}
0x0ca36…0ca4c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0081, t01=0x00d2}
0x0ca4c…0ca68               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0081, t01=0x00e8}
0x0ca68…0ca84               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=1  SALCUZ «, t00=0x0081, t01=0x0104}
0x0ca84…0ca9e               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0081, t01=0x0120}
0x0ca9e…0cace               Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER SALCUZ«, t00=0x0081, t01=0x013a}
0x0cace…0caec               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x0081, t01=0x016a}
0x0caec…0cb0a               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x0081, t01=0x0188}
0x0cb0a…0cb28               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x0082, t01=0x0016}
0x0cb28…0cb40               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0082, t01=0x0034}
0x0cb40…0cb66               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0082, t01=0x004c}
0x0cb66…0cb82               Head {h00=0x0018, h01=0x0050, text=»TRS010 EQU *  SALCUZ«, t00=0x0082, t01=0x0072}
0x0cb82…0cba0               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x0082, t01=0x008e}
0x0cba0…0cbd6               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0082, t01=0x00ac}
0x0cbd6…0cbec               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0082, t01=0x00e2}
0x0cbec…0cc08               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0082, t01=0x00f8}
0x0cc08…0cc24               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=0  SALCUZ «, t00=0x0082, t01=0x0114}
0x0cc24…0cc40               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x0082, t01=0x0130}
0x0cc40…0cc60               Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,LCUUT  SALCUZ «, t00=0x0082, t01=0x014c}
0x0cc60…0cc7e               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x0082, t01=0x016c}
0x0cc7e…0cc9c               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x0082, t01=0x018a}
0x0cc9c…0ccba               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x0083, t01=0x0018}
0x0ccba…0ccd2               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0083, t01=0x0036}
0x0ccd2…0ccf8               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0083, t01=0x004e}
0x0ccf8…0cd0c               Head {h00=0x0010, h01=0x0050, text=»TRS010 EQU *«, t00=0x0083, t01=0x0074}
0x0cd0c…0cd28               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x0083, t01=0x0088}
0x0cd28…0cd5e               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0083, t01=0x00a4}
0x0cd5e…0cd74               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0083, t01=0x00da}
0x0cd74…0cda2               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x0083, t01=0x00f0}
0x0cda2…0cdba               Head {h00=0x0014, h01=0x0050, text=» LDK A3,4 4 SYNS«, t00=0x0083, t01=0x011e}
0x0cdba…0cdd4               Head {h00=0x0016, h01=0x0050, text=»TRS100 LDK A2,SYN «, t00=0x0083, t01=0x0136}
0x0cdd4…0cdf2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SYN «, t00=0x0083, t01=0x0150}
0x0cdf2…0ce04               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0083, t01=0x016e}
0x0ce04…0ce1a               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x0083, t01=0x0180}
0x0ce1a…0ce2a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0084, t01=0x0008}
0x0ce2a…0ce34               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0084, t01=0x0018}
0x0ce34…0ce3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0022}
0x0ce3e…0ce48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x002c}
0x0ce48…0ce66               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x0084, t01=0x0036}
0x0ce66…0ce70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0054}
0x0ce70…0ce7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x005e}
0x0ce7a…0ce8e               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x0084, t01=0x0068}
0x0ce8e…0cea2               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0084, t01=0x007c}
0x0cea2…0ceb8               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0084, t01=0x0090}
0x0ceb8…0ced8               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0084, t01=0x00a6}
0x0ced8…0cee4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x00c6}
0x0cee4…0ceec               Head {h00=0x0004, h01=0x0050, t00=0x0084, t01=0x00d2}
0x0ceec…0cf02               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0084, t01=0x00da}
0x0cf02…0cf22               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0084, t01=0x00f0}
0x0cf22…0cf2e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x0110}
0x0cf2e…0cf5c               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0084, t01=0x011c}
0x0cf5c…0cf7e               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x0084, t01=0x014a}
0x0cf7e…0cfae               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x0084, t01=0x016c}
0x0cfae…0cfc2               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0085, t01=0x000c}
0x0cfc2…0cfee               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x0085, t01=0x0020}
0x0cfee…0cffa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x004c}
0x0cffa…0d00e               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0085, t01=0x0058}
0x0d00e…0d020               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0085, t01=0x006c}
0x0d020…0d036               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHLCI2«, t00=0x0085, t01=0x007e}
0x0d036…0d054               Head {h00=0x001a, h01=0x0050, text=» CWK A2,SYN SKIP SYNS «, t00=0x0085, t01=0x0094}
0x0d054…0d068               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x0085, t01=0x00b2}
0x0d068…0d08e               Head {h00=0x0022, h01=0x0050, text=»IHLCI2 XRR A7,A2 CALCULATE LRC«, t00=0x0085, t01=0x00c6}
0x0d08e…0d09a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x00ec}
0x0d09a…0d0ae               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0085, t01=0x00f8}
0x0d0ae…0d0c0               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0085, t01=0x010c}
0x0d0c0…0d0f6               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME «, t00=0x0085, t01=0x011e}
0x0d0f6…0d10c               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x0085, t01=0x0154}
0x0d10c…0d130               Head {h00=0x0020, h01=0x0050, text=» RF(E) READ SKIP EBCDIC SYN «, t00=0x0085, t01=0x016a}
0x0d130…0d144               Head {h00=0x0010, h01=0x0050, text=»IHLCI1 EQU *«, t00=0x0085, t01=0x018e}
0x0d144…0d168               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x0086, t01=0x0012}
0x0d168…0d194               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0086, t01=0x0036}
0x0d194…0d1a0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x0062}
0x0d1a0…0d1b6               Head {h00=0x0012, h01=0x0050, text=»IHIN10 RTN A5 «, t00=0x0086, t01=0x006e}
0x0d1b6…0d1d2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0086, t01=0x0084}
0x0d1d2…0d1f6               Head {h00=0x0020, h01=0x0050, text=»IHIN20 CF A5,SST PERFORM SST«, t00=0x0086, t01=0x00a0}
0x0d1f6…0d206               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0086, t01=0x00c4}
0x0d206…0d21c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0086, t01=0x00d4}
0x0d21c…0d238               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0086, t01=0x00ea}
0x0d238…0d260               Head {h00=0x0024, h01=0x0050, text=»IHIN20 RF SST PERFORM SST SALCUZ«, t00=0x0086, t01=0x0106}
0x0d260…0d276               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0086, t01=0x012e}
0x0d276…0d280               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0086, t01=0x0144}
0x0d280…0d28a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x014e}
0x0d28a…0d294               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0158}
0x0d294…0d2b6               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x0086, t01=0x0162}
0x0d2b6…0d2c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0184}
0x0d2c0…0d2ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x018e}
0x0d2ca…0d2de               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x0087, t01=0x0008}
0x0d2de…0d2f2               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0087, t01=0x001c}
0x0d2f2…0d308               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0087, t01=0x0030}
0x0d308…0d32a               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0087, t01=0x0046}
0x0d32a…0d336               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x0068}
0x0d336…0d33e               Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x0074}
0x0d33e…0d354               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0087, t01=0x007c}
0x0d354…0d374               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0087, t01=0x0092}
0x0d374…0d380               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x00b2}
0x0d380…0d3ae               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0087, t01=0x00be}
0x0d3ae…0d3c0               Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x0087, t01=0x00ec}
0x0d3c0…0d3ca               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0087, t01=0x00fe}
0x0d3ca…0d3d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0108}
0x0d3d4…0d3de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0112}
0x0d3de…0d408               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x0087, t01=0x011c}
0x0d408…0d412               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0146}
0x0d412…0d43e               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x0087, t01=0x0150}
0x0d43e…0d470               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x0087, t01=0x017c}
0x0d470…0d4a0               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x0088, t01=0x001e}
0x0d4a0…0d4d0               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x0088, t01=0x004e}
0x0d4d0…0d4da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x007e}
0x0d4da…0d4f2               Head {h00=0x0014, h01=0x0050, text=»SST SST A1,LCUIN«, t00=0x0088, t01=0x0088}
0x0d4f2…0d50e               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0088, t01=0x00a0}
0x0d50e…0d544               Head {h00=0x0032, h01=0x0050, text=» RF(NA) SST200 ALREADY INACTIVE SALCUZ  SALCUZ«, t00=0x0088, t01=0x00bc}
0x0d544…0d55a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0088, t01=0x00f2}
0x0d55a…0d56c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0088, t01=0x0108}
0x0d56c…0d580               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0088, t01=0x011a}
0x0d580…0d5aa               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOG SST INFORMATION «, t00=0x0088, t01=0x012e}
0x0d5aa…0d5b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x0158}
0x0d5b6…0d5d2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0088, t01=0x0164}
0x0d5d2…0d5e4               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0088, t01=0x0180}
0x0d5e4…0d5fa (137, 0, 400) Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x0089, t01=0x0004}
0x0d5fa…0d610               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0089, t01=0x001a}
0x0d610…0d62c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0089, t01=0x0030}
0x0d62c…0d646               Head {h00=0x0016, h01=0x0050, text=» ANK A2,6  SALCUZ «, t00=0x0089, t01=0x004c}
0x0d646…0d664               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST100  SALCUZ «, t00=0x0089, t01=0x0066}
0x0d664…0d67e               Head {h00=0x0016, h01=0x0050, text=» ANK A2,2  SALCUZ «, t00=0x0089, t01=0x0084}
0x0d67e…0d6a8               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SST050 THROUGH PUT SALCUZ «, t00=0x0089, t01=0x009e}
0x0d6a8…0d6d2               Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 SET PARITY ERROR SALCUZ «, t00=0x0089, t01=0x00c8}
0x0d6d2…0d6ec               Head {h00=0x0016, h01=0x0050, text=» RF SSTRET  SALCUZ«, t00=0x0089, t01=0x00f2}
0x0d6ec…0d702               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0089, t01=0x010c}
0x0d702…0d71e               Head {h00=0x0018, h01=0x0050, text=»SST050 EQU *  SALCUZ«, t00=0x0089, t01=0x0122}
0x0d71e…0d73e               Head {h00=0x001c, h01=0x0050, text=» CM XSTA TROUHHPUT ERROR«, t00=0x0089, t01=0x013e}
0x0d73e…0d752               Head {h00=0x0010, h01=0x0050, text=» LDKL A5,STB«, t00=0x0089, t01=0x015e}
0x0d752…0d766               Head {h00=0x0010, h01=0x0050, text=» ABL BRM010 «, t00=0x0089, t01=0x0172}
0x0d766…0d77a               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x0089, t01=0x0186}
0x0d77a…0d790               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTCU «, t00=0x008a, t01=0x000a}
0x0d790…0d7ac               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x008a, t01=0x0020}
0x0d7ac…0d7da               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x008a, t01=0x003c}
0x0d7da…0d7ea               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008a, t01=0x006a}
0x0d7ea…0d800               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008a, t01=0x007a}
0x0d800…0d81c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008a, t01=0x0090}
0x0d81c…0d838               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/21  SALCUZ «, t00=0x008a, t01=0x00ac}
0x0d838…0d856               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST200 LSALCUZ «, t00=0x008a, t01=0x00c8}
0x0d856…0d890               Head {h00=0x0036, h01=0x0050, text=» CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ«, t00=0x008a, t01=0x00e6}
0x0d890…0d8b0               Head {h00=0x001c, h01=0x0050, text=» DATA BRM RESTART SALCUZ«, t00=0x008a, t01=0x0120}
0x0d8b0…0d8d0               Head {h00=0x001c, h01=0x0050, text=» DATA 2 WAIT TIME SALCUZ«, t00=0x008a, t01=0x0140}
0x0d8d0…0d8e8               Head {h00=0x0014, h01=0x0050, text=» RF READ  SALCUZ«, t00=0x008a, t01=0x0160}
0x0d8e8…0d8f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0178}
0x0d8f2…0d912               Head {h00=0x001c, h01=0x0050, text=»SST200 LDK A1,0  SALCUZ «, t00=0x008a, t01=0x0182}
0x0d912…0d932               Head {h00=0x001c, h01=0x0050, text=»SSTRET ADK A5,4  SALCUZ «, t00=0x008b, t01=0x0012}
0x0d932…0d952               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 SET CR SALCUZ«, t00=0x008b, t01=0x0032}
0x0d952…0d970               Head {h00=0x001a, h01=0x0050, text=» ABR* A5 RETURN SALCUZ«, t00=0x008b, t01=0x0052}
0x0d970…0d986               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008b, t01=0x0070}
0x0d986…0d990               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0086}
0x0d990…0d99a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0090}
0x0d99a…0d9ae               Head {h00=0x0010, h01=0x0050, text=»* HALT INPUT«, t00=0x008b, t01=0x009a}
0x0d9ae…0d9b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00ae}
0x0d9b8…0d9c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00b8}
0x0d9c2…0d9e2               Head {h00=0x001c, h01=0x0050, text=»HALTIN LDK A1,0  SALCUZ «, t00=0x008b, t01=0x00c2}
0x0d9e2…0d9fa               Head {h00=0x0014, h01=0x0050, text=» CIO A1,0,LCUIN «, t00=0x008b, t01=0x00e2}
0x0d9fa…0da16               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x008b, t01=0x00fa}
0x0da16…0da4e               Head {h00=0x0034, h01=0x0050, text=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK«, t00=0x008b, t01=0x0116}
0x0da4e…0da64               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008b, t01=0x014e}
0x0da64…0da80               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008b, t01=0x0164}
0x0da80…0daae               Head {h00=0x002a, h01=0x0050, text=» RF READ WAIT FOR SST INTERRUPT SALCUZ«, t00=0x008b, t01=0x0180}
0x0daae…0dac4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008c, t01=0x001e}
0x0dac4…0dace               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x008c, t01=0x0034}
0x0dace…0dad8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x003e}
0x0dad8…0dae2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0048}
0x0dae2…0db12               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x008c, t01=0x0052}
0x0db12…0db1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0082}
0x0db1c…0db26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x008c}
0x0db26…0db3a               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x008c, t01=0x0096}
0x0db3a…0db4e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008c, t01=0x00aa}
0x0db4e…0db62               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x008c, t01=0x00be}
0x0db62…0db76               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x008c, t01=0x00d2}
0x0db76…0dbaa               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x008c, t01=0x00e6}
0x0dbaa…0dbd8               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x008c, t01=0x011a}
0x0dbd8…0dbe4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x0148}
0x0dbe4…0dbf8               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x008c, t01=0x0154}
0x0dbf8…0dc1e               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x008c, t01=0x0168}
0x0dc1e…0dc34               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x008c, t01=0x018e}
0x0dc34…0dc56               Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x008d, t01=0x0014}
0x0dc56…0dc6a               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x008d, t01=0x0036}
0x0dc6a…0dc92               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x008d, t01=0x004a}
0x0dc92…0dc9e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0072}
0x0dc9e…0dcb2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008d, t01=0x007e}
0x0dcb2…0dcdc               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x008d, t01=0x0092}
0x0dcdc…0dce8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x00bc}
0x0dce8…0dcfc               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x008d, t01=0x00c8}
0x0dcfc…0dd26               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x008d, t01=0x00dc}
0x0dd26…0dd32               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0106}
0x0dd32…0dd3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0112}
0x0dd3c…0dd56               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x008d, t01=0x011c}
0x0dd56…0dd68               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x008d, t01=0x0136}
0x0dd68…0dd72               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x008d, t01=0x0148}
0x0dd72…0dd7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0152}
0x0dd7c…0dd86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x015c}
0x0dd86…0dd98               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x008d, t01=0x0166}
0x0dd98…0dda2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0178}
0x0dda2…0ddc2               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x008d, t01=0x0182}
0x0ddc2…0ddcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0012}
0x0ddcc…0ddd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x001c}
0x0ddd6…0ddf8               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x008e, t01=0x0026}
0x0ddf8…0de12               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x008e, t01=0x0048}
0x0de12…0de24               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x008e, t01=0x0062}
0x0de24…0de38               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x008e, t01=0x0074}
0x0de38…0de50               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x008e, t01=0x0088}
0x0de50…0de66               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x008e, t01=0x00a0}
0x0de66…0de80               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x008e, t01=0x00b6}
0x0de80…0de94               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x008e, t01=0x00d0}
0x0de94…0dea6               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x008e, t01=0x00e4}
0x0dea6…0deb2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x00f6}
0x0deb2…0ded4               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008e, t01=0x0102}
0x0ded4…0deec               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x008e, t01=0x0124}
0x0deec…0def8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x013c}
0x0def8…0df02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0148}
0x0df02…0df0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0152}
0x0df0c…0df16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x015c}
0x0df16…0df28               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x008e, t01=0x0166}
0x0df28…0df32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0178}
0x0df32…0df64               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x008e, t01=0x0182}
0x0df64…0df6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0024}
0x0df6e…0df78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x002e}
0x0df78…0df90               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x008f, t01=0x0038}
0x0df90…0dfb2               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x008f, t01=0x0050}
0x0dfb2…0dfc4               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x008f, t01=0x0072}
0x0dfc4…0dfda               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x008f, t01=0x0084}
0x0dfda…0dfee               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x008f, t01=0x009a}
0x0dfee…0e004               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x008f, t01=0x00ae}
0x0e004…0e018               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x008f, t01=0x00c4}
0x0e018…0e02a               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x008f, t01=0x00d8}
0x0e02a…0e042               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x008f, t01=0x00ea}
0x0e042…0e056               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x008f, t01=0x0102}
0x0e056…0e062               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x0116}
0x0e062…0e084               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008f, t01=0x0122}
0x0e084…0e098               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x008f, t01=0x0144}
0x0e098…0e0a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x0158}
0x0e0a4…0e0b6               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x008f, t01=0x0164}
0x0e0b6…0e0ca               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x008f, t01=0x0176}
0x0e0ca…0e0de               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x008f, t01=0x018a}
0x0e0de…0e0ee               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0090, t01=0x000e}
0x0e0ee…0e0f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x001e}
0x0e0f8…0e102               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0028}
0x0e102…0e10c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0090, t01=0x0032}
0x0e10c…0e116               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x003c}
0x0e116…0e156               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x0090, t01=0x0046}
0x0e156…0e160               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0086}
0x0e160…0e188               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x0090, t01=0x0090}
0x0e188…0e1a8               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x0090, t01=0x00b8}
0x0e1a8…0e1be               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x0090, t01=0x00d8}
0x0e1be…0e1e4               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x0090, t01=0x00ee}
0x0e1e4…0e1ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0114}
0x0e1ee…0e234               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x0090, t01=0x011e}
0x0e234…0e262               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x0090, t01=0x0164}
0x0e262…0e292 (145, 0, 400) Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x0091, t01=0x0004}
0x0e292…0e29c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0034}
0x0e29c…0e2ce               Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x0091, t01=0x003e}
0x0e2ce…0e2d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0070}
0x0e2d8…0e2e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x007a}
0x0e2e2…0e2f6               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x0091, t01=0x0084}
0x0e2f6…0e30a               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0091, t01=0x0098}
0x0e30a…0e31e               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0091, t01=0x00ac}
0x0e31e…0e32a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x00c0}
0x0e32a…0e33c               Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x0091, t01=0x00cc}
0x0e33c…0e350               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0091, t01=0x00de}
0x0e350…0e364               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0091, t01=0x00f2}
0x0e364…0e370               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x0106}
0x0e370…0e39a               Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x0091, t01=0x0112}
0x0e39a…0e3c8               Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x0091, t01=0x013c}
0x0e3c8…0e3e0               Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x0091, t01=0x016a}
0x0e3e0…0e400               Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x0091, t01=0x0182}
0x0e400…0e422               Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x0092, t01=0x0012}
0x0e422…0e44e               Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x0092, t01=0x0034}
0x0e44e…0e472               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x0092, t01=0x0060}
0x0e472…0e486               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0092, t01=0x0084}
0x0e486…0e4ae               Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x0092, t01=0x0098}
0x0e4ae…0e4dc               Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x0092, t01=0x00c0}
0x0e4dc…0e4e8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0092, t01=0x00ee}
0x0e4e8…0e4fc               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0092, t01=0x00fa}
0x0e4fc…0e52e               Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x0092, t01=0x010e}
0x0e52e…0e53a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0092, t01=0x0140}
0x0e53a…0e564               Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x0092, t01=0x014c}
0x0e564…0e57c               Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x0092, t01=0x0176}
0x0e57c…0e592               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x0092, t01=0x018e}
0x0e592…0e5a2               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0093, t01=0x0014}
0x0e5a2…0e5ac               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0093, t01=0x0024}
0x0e5ac…0e5b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x002e}
0x0e5b6…0e5c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0038}
0x0e5c0…0e5dc               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x0093, t01=0x0042}
0x0e5dc…0e5e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x005e}
0x0e5e6…0e5f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0068}
0x0e5f0…0e604               Head {h00=0x0010, h01=0x0050, text=»DC15ON EQU *«, t00=0x0093, t01=0x0072}
0x0e604…0e61a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0093, t01=0x0086}
0x0e61a…0e63a               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0093, t01=0x009c}
0x0e63a…0e646               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x00bc}
0x0e646…0e64e               Head {h00=0x0004, h01=0x0050, t00=0x0093, t01=0x00c8}
0x0e64e…0e664               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0093, t01=0x00d0}
0x0e664…0e684               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0093, t01=0x00e6}
0x0e684…0e690               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x0106}
0x0e690…0e6a4               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0093, t01=0x0112}
0x0e6a4…0e6c4               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x0093, t01=0x0126}
0x0e6c4…0e6d8               Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x0093, t01=0x0146}
0x0e6d8…0e70a               Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x0093, t01=0x015a}
0x0e70a…0e722               Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x0093, t01=0x018c}
0x0e722…0e736               Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x0094, t01=0x0014}
0x0e736…0e758               Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x0094, t01=0x0028}
0x0e758…0e77c               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x0094, t01=0x004a}
0x0e77c…0e7b0               Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x0094, t01=0x006e}
0x0e7b0…0e7dc               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x0094, t01=0x00a2}
0x0e7dc…0e7ee               Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x0094, t01=0x00ce}
0x0e7ee…0e802               Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x0094, t01=0x00e0}
0x0e802…0e80e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x00f4}
0x0e80e…0e822               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0094, t01=0x0100}
0x0e822…0e838               Head {h00=0x0012, h01=0x0050, text=» ORS A2,DCONOF«, t00=0x0094, t01=0x0114}
0x0e838…0e84e               Head {h00=0x0012, h01=0x0050, text=» CF A15,CKMESS«, t00=0x0094, t01=0x012a}
0x0e84e…0e87a               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x0094, t01=0x0140}
0x0e87a…0e8a0               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x0094, t01=0x016c}
0x0e8a0…0e8ce (149, 0, 400) Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x0095, t01=0x0004}
0x0e8ce…0e8e4               Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x0095, t01=0x0032}
0x0e8e4…0e8ee               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0095, t01=0x0048}
0x0e8ee…0e8f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0052}
0x0e8f8…0e910               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0095, t01=0x005c}
0x0e910…0e91a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0074}
0x0e91a…0e946               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0095, t01=0x007e}
0x0e946…0e95a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0095, t01=0x00aa}
0x0e95a…0e986               Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x0095, t01=0x00be}
0x0e986…0e9b4               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0095, t01=0x00ea}
0x0e9b4…0e9dc               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0095, t01=0x0118}
0x0e9dc…0e9ee               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0095, t01=0x0140}
0x0e9ee…0e9f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0152}
0x0e9f8…0ea30               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x0095, t01=0x015c}
0x0ea30…0ea3a (150, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0004}
0x0ea3a…0ea62               Head {h00=0x0024, h01=0x0050, text=»CPTIM CM DCONOF INDICATE POLLING«, t00=0x0096, t01=0x000e}
0x0ea62…0ea7a               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x0096, t01=0x0036}
0x0ea7a…0ea9e               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x0096, t01=0x004e}
0x0ea9e…0eacc               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0096, t01=0x0072}
0x0eacc…0eadc               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0096, t01=0x00a0}
0x0eadc…0eae6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00b0}
0x0eae6…0eb00               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x0096, t01=0x00ba}
0x0eb00…0eb0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00d4}
0x0eb0a…0eb32               Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x0096, t01=0x00de}
0x0eb32…0eb4c               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x0096, t01=0x0106}
0x0eb4c…0eb76               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x0096, t01=0x0120}
0x0eb76…0eb8a               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0096, t01=0x014a}
0x0eb8a…0eb9c               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0096, t01=0x015e}
0x0eb9c…0eba6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0096, t01=0x0170}
0x0eba6…0ebb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x017a}
0x0ebb0…0ebd0               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x0096, t01=0x0184}
0x0ebd0…0ebda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0014}
0x0ebda…0ebee               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x0097, t01=0x001e}
0x0ebee…0ec16               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x0097, t01=0x0032}
0x0ec16…0ec2c               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0097, t01=0x005a}
0x0ec2c…0ec48               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x0097, t01=0x0070}
0x0ec48…0ec70               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x0097, t01=0x008c}
0x0ec70…0ec80               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0097, t01=0x00b4}
0x0ec80…0ec8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00c4}
0x0ec8a…0eca6               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x0097, t01=0x00ce}
0x0eca6…0ecb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00ea}
0x0ecb0…0ecc8               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x0097, t01=0x00f4}
0x0ecc8…0ece4               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x0097, t01=0x010c}
0x0ece4…0ed08               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x0097, t01=0x0128}
0x0ed08…0ed38               Head {h00=0x002c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT IF OPEN SALCUZ «, t00=0x0097, t01=0x014c}
0x0ed38…0ed4c               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0097, t01=0x017c}
0x0ed4c…0ed72               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x0097, t01=0x0190}
0x0ed72…0ed90               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0098, t01=0x0026}
0x0ed90…0edba               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0098, t01=0x0044}
0x0edba…0edd0               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x0098, t01=0x006e}
0x0edd0…0edda               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0098, t01=0x0084}
0x0edda…0ede4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x008e}
0x0ede4…0ee02               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x0098, t01=0x0098}
0x0ee02…0ee0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x00b6}
0x0ee0c…0ee38               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x0098, t01=0x00c0}
0x0ee38…0ee58               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x0098, t01=0x00ec}
0x0ee58…0ee76               Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x0098, t01=0x010c}
0x0ee76…0ee88               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x0098, t01=0x012a}
0x0ee88…0ee9c               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x0098, t01=0x013c}
0x0ee9c…0eea6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0098, t01=0x0150}
0x0eea6…0eeba               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0098, t01=0x015a}
0x0eeba…0eec4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x016e}
0x0eec4…0eece               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0178}
0x0eece…0eeea               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x0098, t01=0x0182}
0x0eeea…0eef4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x000e}
0x0eef4…0ef0c               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x0099, t01=0x0018}
0x0ef0c…0ef2a               Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x0099, t01=0x0030}
0x0ef2a…0ef34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x004e}
0x0ef34…0ef3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0058}
0x0ef3e…0ef52               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x0099, t01=0x0062}
0x0ef52…0ef68               Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x0099, t01=0x0076}
0x0ef68…0ef80               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x0099, t01=0x008c}
0x0ef80…0ef98               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x0099, t01=0x00a4}
0x0ef98…0efaa               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x0099, t01=0x00bc}
0x0efaa…0efc2               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x0099, t01=0x00ce}
0x0efc2…0efd4               Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x0099, t01=0x00e6}
0x0efd4…0efe6               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x0099, t01=0x00f8}
0x0efe6…0eff8               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x0099, t01=0x010a}
0x0eff8…0f00a               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0099, t01=0x011c}
0x0f00a…0f020               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x0099, t01=0x012e}
0x0f020…0f036               Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x0099, t01=0x0144}
0x0f036…0f04e               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x0099, t01=0x015a}
0x0f04e…0f064               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x0099, t01=0x0172}
0x0f064…0f07a               Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x0099, t01=0x0188}
0x0f07a…0f092               Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x009a, t01=0x000e}
0x0f092…0f0aa               Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x009a, t01=0x0026}
0x0f0aa…0f0ba               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x009a, t01=0x003e}
0x0f0ba…0f0ce               Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x009a, t01=0x004e}
0x0f0ce…0f0d8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009a, t01=0x0062}
0x0f0d8…0f0e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x006c}
0x0f0e2…0f0ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0076}
0x0f0ec…0f118               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x009a, t01=0x0080}
0x0f118…0f138               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x009a, t01=0x00ac}
0x0f138…0f142               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00cc}
0x0f142…0f14c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00d6}
0x0f14c…0f174               Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x009a, t01=0x00e0}
0x0f174…0f19c               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x009a, t01=0x0108}
0x0f19c…0f1bc               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x009a, t01=0x0130}
0x0f1bc…0f1dc               Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x009a, t01=0x0150}
0x0f1dc…0f1fc               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x009a, t01=0x0170}
0x0f1fc…0f228               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x009a, t01=0x0190}
0x0f228…0f248               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x009b, t01=0x002c}
0x0f248…0f25a               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x009b, t01=0x004c}
0x0f25a…0f26c               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x009b, t01=0x005e}
0x0f26c…0f27e               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x009b, t01=0x0070}
0x0f27e…0f2b0               Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x009b, t01=0x0082}
0x0f2b0…0f2c0               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009b, t01=0x00b4}
0x0f2c0…0f2cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x00c4}
0x0f2cc…0f2e0               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x009b, t01=0x00d0}
0x0f2e0…0f2ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x00e4}
0x0f2ea…0f314               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x009b, t01=0x00ee}
0x0f314…0f33a               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x009b, t01=0x0118}
0x0f33a…0f344               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x013e}
0x0f344…0f35a               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x009b, t01=0x0148}
0x0f35a…0f36e               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x009b, t01=0x015e}
0x0f36e…0f380               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x009b, t01=0x0172}
0x0f380…0f392               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x009b, t01=0x0184}
0x0f392…0f3a8               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x009c, t01=0x0008}
0x0f3a8…0f3bc               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x009c, t01=0x001e}
0x0f3bc…0f3d0               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x009c, t01=0x0032}
0x0f3d0…0f3e2               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x009c, t01=0x0046}
0x0f3e2…0f3f2               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009c, t01=0x0058}
0x0f3f2…0f3fa               Head {h00=0x0004, h01=0x0050, t00=0x009c, t01=0x0068}
0x0f3fa…0f406               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x0070}
0x0f406…0f410               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009c, t01=0x007c}
0x0f410…0f41a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0086}
0x0f41a…0f424               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0090}
0x0f424…0f44a               Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x009c, t01=0x009a}
0x0f44a…0f454               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00c0}
0x0f454…0f45e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00ca}
0x0f45e…0f47e               Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x009c, t01=0x00d4}
0x0f47e…0f49e               Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x009c, t01=0x00f4}
0x0f49e…0f4b8               Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x009c, t01=0x0114}
0x0f4b8…0f4d4               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x009c, t01=0x012e}
0x0f4d4…0f4ea               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x009c, t01=0x014a}
0x0f4ea…0f518               Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x009c, t01=0x0160}
0x0f518…0f534               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x009c, t01=0x018e}
0x0f534…0f55c               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x009d, t01=0x001a}
0x0f55c…0f576               Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x009d, t01=0x0042}
0x0f576…0f580               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x005c}
0x0f580…0f596               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x009d, t01=0x0066}
0x0f596…0f5b6               Head {h00=0x001c, h01=0x0050, text=» DATA 0 USER ECB ADDRESS«, t00=0x009d, t01=0x007c}
0x0f5b6…0f5da               Head {h00=0x0020, h01=0x0050, text=» DATA DC:ECB MMU ECB ADDRESS«, t00=0x009d, t01=0x009c}
0x0f5da…0f5e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009d, t01=0x00c0}
0x0f5e6…0f5f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00cc}
0x0f5f0…0f60e               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x009d, t01=0x00d6}
0x0f60e…0f63a               Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x009d, t01=0x00f4}
0x0f63a…0f66c               Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x009d, t01=0x0120}
0x0f66c…0f692               Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x009d, t01=0x0152}
0x0f692…0f6c2               Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x009d, t01=0x0178}
0x0f6c2…0f6e0               Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x009e, t01=0x0018}
0x0f6e0…0f706               Head {h00=0x0022, h01=0x0050, text=» DATA 0 REQUEST TIMEOUT VALUE «, t00=0x009e, t01=0x0036}
0x0f706…0f710               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x005c}
0x0f710…0f726               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x009e, t01=0x0066}
0x0f726…0f742               Head {h00=0x0018, h01=0x0050, text=»DC:ECB EQU * MMU ECB«, t00=0x009e, t01=0x007c}
0x0f742…0f75c               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x009e, t01=0x0098}
0x0f75c…0f768               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009e, t01=0x00b2}
0x0f768…0f772               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00be}
0x0f772…0f77c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009e, t01=0x00c8}
0x0f77c…0f786               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00d2}
0x0f786…0f790               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00dc}
0x0f790…0f7b0               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x009e, t01=0x00e6}
0x0f7b0…0f7ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0106}
0x0f7ba…0f7da               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x009e, t01=0x0110}
0x0f7da…0f7e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0130}
0x0f7e4…0f7f8               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x009e, t01=0x013a}
0x0f7f8…0f81c               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x009e, t01=0x014e}
0x0f81c…0f836               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x009e, t01=0x0172}
0x0f836…0f84c               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x009e, t01=0x018c}
0x0f84c…0f862               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009f, t01=0x0012}
0x0f862…0f876               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x0028}
0x0f876…0f88c               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x009f, t01=0x003c}
0x0f88c…0f8a2               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009f, t01=0x0052}
0x0f8a2…0f8b6               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x0068}
0x0f8b6…0f8cc               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x009f, t01=0x007c}
0x0f8cc…0f8e2               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009f, t01=0x0092}
0x0f8e2…0f8f6               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x00a8}
0x0f8f6…0f902               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x00bc}
0x0f902…0f91c               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x009f, t01=0x00c8}
0x0f91c…0f932               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009f, t01=0x00e2}
0x0f932…0f946               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x00f8}
0x0f946…0f958               Head {h00=0x000e, h01=0x0050, text=» XIF   DK3«, t00=0x009f, t01=0x010c}
0x0f958…0f974               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x009f, t01=0x011e}
0x0f974…0f988               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x013a}
0x0f988…0f990               Head {h00=0x0004, h01=0x0050, t00=0x009f, t01=0x014e}
0x0f990…0f9a6               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x009f, t01=0x0156}
0x0f9a6…0f9d0               Head {h00=0x0026, h01=0x0050, text=»MMUBUF RES TBUFL+1 MMU WORK BUFFER«, t00=0x009f, t01=0x016c}
0x0f9d0…0f9dc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a0, t01=0x0008}
0x0f9dc…0f9e6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a0, t01=0x0014}
0x0f9e6…0f9f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x001e}
0x0f9f0…0f9fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0028}
0x0f9fa…0fa1e               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x00a0, t01=0x0032}
0x0fa1e…0fa28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0056}
0x0fa28…0fa32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0060}
0x0fa32…0fa46               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00a0, t01=0x006a}
0x0fa46…0fa60               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x00a0, t01=0x007e}
0x0fa60…0fa76               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x00a0, t01=0x0098}
0x0fa76…0fa88               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a0, t01=0x00ae}
0x0fa88…0faa2               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x00a0, t01=0x00c0}
0x0faa2…0fab8               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x00a0, t01=0x00da}
0x0fab8…0faca               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a0, t01=0x00f0}
0x0faca…0fae2               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x00a0, t01=0x0102}
0x0fae2…0faf8               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x00a0, t01=0x011a}
0x0faf8…0fb0c               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x00a0, t01=0x0130}
0x0fb0c…0fb26               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x00a0, t01=0x0144}
0x0fb26…0fb3c               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x00a0, t01=0x015e}
0x0fb3c…0fb4e               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x00a0, t01=0x0174}
0x0fb4e…0fb60               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x00a0, t01=0x0186}
0x0fb60…0fb76               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x00a1, t01=0x0008}
0x0fb76…0fb8c               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x00a1, t01=0x001e}
0x0fb8c…0fba4               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x00a1, t01=0x0034}
0x0fba4…0fbc0               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x00a1, t01=0x004c}
0x0fbc0…0fbd4               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x00a1, t01=0x0068}
0x0fbd4…0fbe8               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x00a1, t01=0x007c}
0x0fbe8…0fbfe               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x00a1, t01=0x0090}
0x0fbfe…0fc08               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a1, t01=0x00a6}
0x0fc08…0fc12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00b0}
0x0fc12…0fc1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00ba}
0x0fc1c…0fc36               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x00a1, t01=0x00c4}
0x0fc36…0fc4a               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x00a1, t01=0x00de}
0x0fc4a…0fc5a               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x00a1, t01=0x00f2}
0x0fc5a…0fc70               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x00a1, t01=0x0102}
0x0fc70…0fc84               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x00a1, t01=0x0118}
0x0fc84…0fc98               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x00a1, t01=0x012c}
0x0fc98…0fca4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x0140}
0x0fca4…0fcae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x014c}
0x0fcae…0fcb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0156}
0x0fcb8…0fcc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0160}
0x0fcc2…0fcd6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00a1, t01=0x016a}
0x0fcd6…0fce0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a1, t01=0x017e}
0x0fce0…0fd20               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x00a1, t01=0x0188}
0x0fd20…0fd2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0038}
0x0fd2a…0fd44               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x00a2, t01=0x0042}
0x0fd44…0fd4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x005c}
0x0fd4e…0fd8c               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x00a2, t01=0x0066}
0x0fd8c…0fd96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00a4}
0x0fd96…0fdd8               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x00a2, t01=0x00ae}
0x0fdd8…0fde0               Head {h00=0x0004, h01=0x0050, t00=0x00a2, t01=0x00f0}
0x0fde0…0fdf4               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x00a2, t01=0x00f8}
0x0fdf4…0fe1a               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x00a2, t01=0x010c}
0x0fe1a…0fe2c               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x00a2, t01=0x0132}
0x0fe2c…0fe42               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a2, t01=0x0144}
0x0fe42…0fe6c               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x00a2, t01=0x015a}
0x0fe6c…0fe92               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x00a2, t01=0x0184}
0x0fe92…0fe9a               Head {h00=0x0004, h01=0x0050, t00=0x00a3, t01=0x001a}
0x0fe9a…0feac               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x00a3, t01=0x0022}
0x0feac…0fec2               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a3, t01=0x0034}
0x0fec2…0feee               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x00a3, t01=0x004a}
0x0feee…0ff16               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x00a3, t01=0x0076}
0x0ff16…0ff2c               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x00a3, t01=0x009e}
0x0ff2c…0ff36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00b4}
0x0ff36…0ff40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00be}
0x0ff40…0ff4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00c8}
0x0ff4a…0ff54               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a3, t01=0x00d2}
0x0ff54…0ff5c               Head {h00=0x0004, h01=0x0050, t00=0x00a3, t01=0x00dc}
0x0ff5c…0ff80               Head {h00=0x0020, h01=0x0050, text=»*     SCANDINAVIAN ALPHABET «, t00=0x00a3, t01=0x00e4}
0x0ff80…0ff8e               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x00a3, t01=0x0108}
0x0ff8e…0ffa2               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x00a3, t01=0x0116}
0x0ffa2…0ffd0               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x00a3, t01=0x012a}
0x0ffd0…0fffe               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/232E,/3C28,/2B21 /08-/0F «, t00=0x00a3, t01=0x0158}
0x0fffe…1002c               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x00a3, t01=0x0186}
0x1002c…1005a               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/245D,/2A29,/3B5E /18-/1F «, t00=0x00a4, t01=0x0024}
0x1005a…10088               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x00a4, t01=0x0052}
0x10088…100b6               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/402C,/255F,/3E3F /28-/2F «, t00=0x00a4, t01=0x0080}
0x100b6…100e2               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x00a4, t01=0x00ae}
0x100e2…1010e               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A5B,/5C27,/3D22 /38-3F«, t00=0x00a4, t01=0x00da}
0x1010e…1011c               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x00a4, t01=0x0106}
0x1011c…10128               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a4, t01=0x0114}
0x10128…10132               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a4, t01=0x0120}
0x10132…1013a               Head {h00=0x0004, h01=0x0050, t00=0x00a4, t01=0x012a}
0x1013a…10156               Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x00a4, t01=0x0132}
0x10156…10170               Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x00a4, t01=0x014e}
0x10170…10196               Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x00a4, t01=0x0168}
0x10196…101c4               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=0x018e}
0x101c4…101f2               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=0x002c}
0x101f2…10206               Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x00a5, t01=0x005a}
0x10206…10210               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x006e}
0x10210…1021a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0078}
0x1021a…10226               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00a5, t01=0x0082}
0x10226…1022a               Head {h00=0x4004, h01=0x0000}
0x1022a…1022e               00 a5 00 8e                                                                                                                                                                                                                                       ┆    ┆
0x1022e…10236 (166, 1, 8)   20 04 00 00 00 a6 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view