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

⟦807f1fc14⟧

    Length: 68110 (0x10a0e)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«

Derivation

└─⟦38a30a456⟧ Bits:30009662 Philips computer tape "600104"
    └─⟦this⟧ »M:FD2/DRDC15.SC« 

PTS(SC)

	IDENT	DRDC15	9.2DK 4 81-05-26 870105040924 

			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	400 
X:B	EQU	/60	DCTASK FILE CODE
DC15FC	EQU	/60
X:C	EQU	1	IF 1 INTERRUPT LOGGING
LOGG	EQU	0
* 
TIMPOL	EQU	900	POLL TIMEOUT VALUE		DK 
X:E	EQU	1	STATUS AND RVI HANDLING IF=1
STAT	EQU	0
X:F	EQU	1	READ COMMAND HANDLING IF=1
RCOM	EQU	1
X:G	EQU	254	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	252 
X:H	EQU	1	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	1
X:I	EQU	0	IF 1 SPECIFIC POLL HANDLING 
SPECP	EQU	0 
X:J	EQU	1	IF = 1  LINE SPEED SET TO HIGH
			IF = 0  LINE SPEED IS SET TO LOW 
SPEED	EQU	1 
X:K	EQU	0	IF 1 SIEMENS MSV1 PROCEDURE 
MSV1	EQU	0
X:L	EQU	2	NUMBER OF RECEIVE BUFFERS (2-5) 
RBUFNR	EQU	2
X:M	EQU	0	IF = 1  PTS 6805 ADAPTION	SALCUZ
P6805	EQU	00
X:N	EQU	/02 
	IFT	P6805=0
LCUIN	EQU	02	DEVICE ADDRESS OF RECEIVER 
	XIF
	IFT	P6805=1
LCUIN	EQU	/0A	DEVICE ADDRESS OF RECEIVER
	XIF
X:O	EQU	0 
IBMCHR	EQU	0	IF 1 IBM CHARACTER HANDLING
X:P	EQU	0	IF 1 MESSAGE PASSING TO DC TASK 
MESPAS	EQU	0
X:Q	EQU	0	IBM-3270 EMULATION PACKAGE, IF NOT = 0
EM3270	EQU	1
X:R	EQU	1000
				DK2 
BINTRM	EQU	0	IF 1 BINARY TRANSMISSION 
TSTREQ	EQU	0	IF 1 TEST REQUEST HANDLING 
DMRK	EQU	1	SPECIAL CONDITION FOR DENMARK
NOWACK	EQU	0	WHEN WORKING WITH A MAIN-FRAME THAT
			DOESN'T ACCEPT WACK RESPONSE TO A SELECT 
			SEQUENCE, NOWACK SHOULD BE SET TO "ONE". 
			ONLY WORKING IF STAT IS SET TO "ONE".
	IFT	P6805=0		SALCUZ
LCUUT	EQU	LCUIN+/10	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
	IFT	P6805=1
LCUUT	EQU	LCUIN+/01	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
* 
	 
* 
* 
***************************************** 
* 
*	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	400	MMU BUFFER LENGTH 
	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
DCSS30	EQU	*
	CF	A15,INSSQ	INSERT DWT IN STATUS QUEUE
	LDK	A1,4	SET DE
	RB	DCSS10
	XIF
	 

* 
*   SET REQUEST TIMEOUT VALUE 
* 
* 

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

* 
*   ILLEGAL APPLICATION BUFFER SIZE 
* 

IL:LEN	LDKL	A1,/8008	REQUEST ERROR + ILLEGAL LENGTH 
	ABL	DISEND	COMPLETE REQUEST
	 
* 
* 
* 
*	TIMER HANDLING PART 
* 
* 
* 
*	READ TIMER=TIMERR 
* 
TIMERE	EQU	*
	LDR	A1,A6
	LD	A2,DWTTIM,A6	GET REQUEST TIMEOUT VALUE
	RF(Z)	TIME10	NO TIMING 
	ST	A2,TIMERR 
	CF	A15,SETIME
	DATA	TOUTRE
TIMERR	DATA	0 
	ST	A4,DWTTP,A6	STORE TIMER POINTER 
TIME10	EQU	*
	RF	GBUF10	RETURN 
* 
*	TIMEOUT READ TIMER
* 
TOUTRE	EQU	*
	LDR	A6,A1	FETCH DWT
	CM	DWTTP,A6
TOUTR1	EQU	*
	LDK	A1,/40	INDICATE TIME OUT 
TOUTR2	RB	ENDIO	COMPLETE REQUEST
* 
*	WRITE TIMER=TIMWR 
* 
TIMEWR	LDR	A1,A6
	LD	A2,DWTTIM,A6	GET REQUEST TIMEOUT VALUE
	RB(Z)	TIME10	NO TIMING 
	ST	A2,TIMWR
	CF	A15,SETIME
	DATA	TOUTWR
TIMWR	DATA	0
	ST	A4,DWTTP,A6 
	RB	TIME10
	 
* 
*	TIMEOUT WRITE TIMER 
* 
TOUTWR	EQU	*
	LDR	A6,A1	FETCH DWT
	CM	DWTTP,A6
	CF	A15,REMOVW	REMOVE FROM WRITE QUEUE
* 
*	THIS INSTRUCTION DOES NOT BELONG
*	TO THE STANDARD INTERFACE 
	LD	A2,FDWTUT 
	CWR	A2,A6
	RB(NE)	TOUTR1	THIS DWT IS NOT WRITING
	CM	XACK	INDICATE 'ACK NOT EXPECTED'
	CM	FDWTUT
* 
* 
	RB	TOUTR1
	 
* 
* 
*	STOP REQUEST TIMING 
* 
*	REMAINING TIME IS RETURNED IN A2
* 
* 
CTIME	EQU	* 
	LD	A2,DWTTP,A6	GET TIMER POINTER 
	RF(Z)	CTIM10	NOT RUNNING 
	LDR*	A2,A2 
	NGR	A2,A2	GET REMAINING TIME 
	CM*	DWTTP,A6	STOP TIMER
	CM	DWTTP,A6
CTIM10	EQU	*
	RF	GBUF10
	 
* 
*	GET RECEIVE BUFFER
* 
*	CALLING SEQUENCE: CF A15,GRBUF
*	A4=0 IF NO BUFFER IS FREE 
*	ELSE A4 CONTAINS BUFFER ADDRESS 
*	A2 AND A3 ARE DESTROYED 
* 
* 
GRBUF	LDKL	A2,DCRBUF	RECEIVE BUFFERS
GBUF	INH
	LDR*	A4,A2 
	RF(Z)	GBUF10	NO BUFFER FREE
	LDR*	A3,A4	REMOVE BUFFER FROM FREE CHAIN 
	STR	A3,A2
GBUF10	ADKL	A15,4	ADJUST STACK POINTER
	ABR*	A15	RETURN TO CALLER
	 
* 
* 
*	INSERT DWT IN WRITE REQUEST QUEUE 
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSWQ	LDKL	A2,DCWRQ	GET QUEUE ANCHOR
INSWQ1	LDK	A4,DWTWQ 
INSWQ2	LDR*	A3,A2 
	RF(Z)	INSWQ3	END OF QUEUE FOUND
	LDR	A2,A3
	RB	INSWQ2
INSWQ3	ADR	A4,A6
	STR	A4,A2	INSERT IN QUEUE
	CMR	A4	INDICATE END OF QUEUE 
	RB	GBUF10	RETURN 
* 
* 
*	REMOVE DWT FROM WRITE REQUEST QUEUE 
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
REMOVW	LDKL	A2,DCWRQ	GET QUEUE ANCHOR 
REM05	LDK	A4,DWTWQ	GET DWT-LINK TO BE REMOVED 
REM06	EQU	* 
	ADR	A4,A6	 
REM10	LDR*	A3,A2
	RB(Z)	GBUF10	NOT ON QUEUE: RETURN
	CWR	A3,A4
	RF(E)	REM15
	LDR	A2,A3	GET NEXT 
	RB	REM10 
REM15	LDR*	A3,A4	REMOVE 
	STR	A3,A2
	RB	GBUF10	RETURN 
	 
* 
* 
*	INSERT DWT IN STATUS QUEUE
* 
	IFF	STAT=0 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSSQ	EQU	* 
	LD	A2,0,A6	GET TERMINAL ADDRESS	DK4
	ANK	A2,/FF	IF ADDRESS = 00 OR /7F	DK4
	RB(Z)	GBUF10	DONT PUT IN STATUS	DK4
	SUK	A2,/7F	QUEUE, TERMINAL HAS BEEN	DK4
	RB(Z)	GBUF10	MADE INACTIVE	DK4 
	LDKL	A2,DCSTQ	GET QUEUE ANCHOR 
	LDK	A4,DWTSQ 
	RB	INSWQ2
* 
* 
*	REMOVE DWT FROM STATUS QUEUE
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
REMOVS	LDKL	A2,DCSTQ	GET QUEUE ANCHOR 
	LDK	A4,DWTSQ 
	RB	REM06 
	XIF
	 
* 
* 
*	QUEUE ALLOCATED RECEIVE BUFFER
* 
*	A4=BUFFER ADDR
*	A2,A3 DESTROYED 
* 
QRBUF	EQU	* 
	IFT	MESPAS=1 
	LDKL	A2,DW1500	QUEUE ON DC-TASK DWT
	XIF
	IFT	MESPAS=0 
	LDR	A2,A6	QUEUE ON TERMINAL DWT
	XIF
	ADK	A2,DWTRQ	BEGINNING OF RECEIVE QUEUE
QR100	EQU	* 
	LDR*	A3,A2 
	RF(Z)	QR200	END OF QUEUE FOUND 
	LDR	A2,A3
	RB	QR100 
QR200	STR	A4,A2	INSERT INTO QUEUE 
	CMR	A4	INDICATE END OF QUEUE 
	RTN	A5 
	 
* 
* 
*	CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE
* 
*	REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED 
* 
CKMESS	LDKL	A6,DW1500 
	LD	A1,DWTST,A6 
	RF(N)	CKM110	NO REQUEST
	LDK	A1,2	READ REQUEST ?
	CW	A1,DWTOR,A6 
	RF(NE)	CKM110	NO 
	LD	A8,DWTECB,A6	ECB ADDR TO A8 
	LD	A3,DWTRQ,A6	A3=ADDR TO READ QUEUE 
	RF(Z)	CKM200	NO READ IN QUEUE


	LDR*	A2,A3	A2=ADDR TO NEXT READ BUFFER 
	ST	A2,DWTRQ,A6	STORE THIS ADDR INTO QUEUE
	ADK	A3,6	MOVE POINTER TO TEXT
			DONT DESTROY BUFFER ADDRESS	=6 
	LD	A4,-4,A3
	ST	A4,ECBEL,A8	STORE NUMBERS OF CHARACTERS 
	LD	A4,-2,A3
	ST	A4,ECBCW,A8	STORE LINE DEVICE ADDRESS 

	LDK	A1,0	RESET RETURN CODE 
	LDR	A4,A3	RECEIVE BUFFER ADDRESS 
	CF	A15,DC:MIN	MOVE DATA TO USER BUFFER 
CKM110	ADKL	A15,4	ADJUST STACK POINTER
	ABR*	A15	RETURN
CKM200	LD	A1,DCSTCU	NO MESSAGE RECEIVED,CHECK STATUS
	OR	A1,DCONOF	TAKE CARE OF POLL TIME OUT
	CW	A1,DCSTOL 
	ST	A1,DCSTOL 
	RB(E)	CKM110	NO CHANGE OF STATUS 
	ORKL	A1,/2000	INDICATE STATUS CHANGE 
	CF	A15,TENDIO	COMPLETE READ GENERAL REQUEST
	RB	CKM110
	 

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

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

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

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

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

	 
* 
* 
*	STORE REGISTER A3-A8
*	CALLING SEQUENSE: CF A15,STREG
* 
*	RESTORE 
*	CALLING SEQUENCE: CF A15,LDREG
* 
* 
STREG	ST	A3,LCA3
	ST	A4,LCA4 
	ST	A5,LCA5 
	ST	A6,LCA6 
	ST	A7,LCA7 
	ST	A8,LCA8 
	RF	RTNA15	RETURN 
	 
LDREG	LDKL	A3,0 
LCA3	EQU	*-2
	LDKL	A4,0
LCA4	EQU	*-2
	LDKL	A5,0
LCA5	EQU	*-2
	LDKL	A6,0
LCA6	EQU	*-2
	LDKL	A7,0
LCA7	EQU	*-2
	LDKL	A8,0
LCA8	EQU	*-2
RTNA15	EQU	*
	ADKL	A15,4 
	ABR*	A15 
	 
* 
* 
*	TIMER VALUES
* 
* 
TIMPRO	EQU	90	PROCEDURE TIMER 9 SEC	DK
TIMNAK	EQU	3	DELAY FOR NAK	DK 
* 
* 
*	CHARACTER EQUATES 
* 
SF	EQU	X'1D'	START FIELD CHARACTER
SYN	EQU	/16 
STX	EQU	/02 
ETX	EQU	/03 
ETB	EQU	/17 
ITB	EQU	/1F 
SOH	EQU	/01 
ENQ	EQU	/05 
DLE	EQU	/10 
EOT	EQU	/04 
NAK	EQU	/15 
ESC	EQU	/1B 
SBA	EQU	/11 
GP	EQU	/22
RDBCOM	EQU	/32
RDMCOM	EQU	/36
	IFT	CODE=0 
PAR	EQU	/80 
RVI	EQU	/3C 
ACK0	EQU	/30
ACK1	EQU	/31
DC1	EQU	/11 
	IFT	MSV1=0 
WACK	EQU	/3B
	XIF
	IFT	CODE=0 
	IFT	MSV1=1 
WACK	EQU	/BF	=WABT - SIEMENS MSV1 PROCEDURE 
	XIF
	IFT	CODE=1 
PAR	EQU	/00 
WACK	EQU	/2C
RVI	EQU	XRVI		DK
ACK0	EQU	/18
ACK1	EQU	/2F
SYNEBC	EQU	/32
	XIF
	 
* 
* 
*	PROCEDURE WORK AREAS
* 
* 
FDWTIN	RES	1	CURRENT DWT FOR RECEPTION
FDWTUT	RES	1	CURRENT DWT FOR TRANSMISSION 
XACK	DATA	0	ACK EXPECTED
XSEL	DATA	0	SELECTED
XETX	DATA	0	ETX SENT
XSTA	DATA	0	STATUS SENT / MESSAGE INPUT RESULT
XRB	DATA	0	READ BUFFER SWITCH 
CACK	DATA	0	ACK COUNTER 
SYNSW	DATA	0	0=SKIP SYNS, 1=DON'T SKIP
* 
FECB	RES	1	WRITING ECB
FECBBA	RES	1	WRITING BUFFER ADDRESS 
FECBRL	RES	1	WRITING BUFFER LENGTH
FBAX	DATA	0	BUFFER INDEX
FBLST	DATA	0	START OF LAST TRANSMITTED BLOCK
DCSTQ	DATA	0	STATUS QUEUE ANCHOR
DCTPP	DATA	0	POINTER FOR PROCEDURE TIMING 
RESEND	DATA	0	CONTROL SEQUENCE SAVE AREA
CRDBUF	DATA	0	READ BUFFER COUNTER	DK
* 
* 
*	3270 SENSE/STATUS INFORMATION 
* 
* 
	IFF	STAT=0 
SSTAB	EQU	*	S/S 0 : NO STATUS,DB,DE,DB+DE 
* 
* 
	DATA	/4248 
	DATA	/4242 
* 
NOIR	EQU	/20	S/S 1 : NO INTERVENTION REQUIRED 
IR	EQU	/26	S/S 1 : INTERVENTION REQUIRED
	XIF
	 
* 
* 
*	BASIC RECEIVE MODE
* 
*	ENTERED EVERY TIME A MESSAGE
*	IS EXPECTED FROM THE MASTER SIDE
* 
* 
	IFT	P6805=1		SALCUZ
BRMHLT	CF	A5,HALTIN	HALT RECEIVER	SALCUZ
	XIF			SALCUZ 
BRM	EQU	* 
	LDKL	A5,STB	LOAD STACKBASE 
	IFT	P6805=0		SALCUZ
	CF	A5,HALTIN	HALT RECEIVER AND UPDATE STATUS 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	CF	A15,CKMESS	CHECK IF STATUS CHANGE	SALCUZ
	XIF			SALCUZ 
BRM010	EQU	*
	IFT	CODE+P6805=0		SALCUZ 
	LDKL	A2,/100+LSPEED+SYN	SPECIFY SYN PATTERN
	XIF			SALCUZ 
	IFT	P6805=0		SALCUZ
	IFT	CODE=1 
	LDKL	A2,/100+LSPEED+SYNEBC	SPECIFY SYN PATTERN 
	XIF			SALCUZ 
	IFT	P6805=0		SALCUZ
	CIO	A2,1,LCUIN	START RECEIVER
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	IFF	CODE=1		SALCUZ 
	LDK	A2,/0C		SALCUZ 
	CIO	A2,1,LCUIN	START RECEIVER	SALCUZ 
	LDK	A2,SYN		SALCUZ 
	OTR	A2,1,LCUIN	SPECIFY SYNC CHARACTER	SALCUZ 
	RB(NA)	BRMHLT		SALCUZ
	XIF			SALCUZ 
	IFT	CODE+P6805=2		SALCUZ 
	LDK	A2,0		SALCUZ 
	CIO	A2,1,LCUIN	START RECEIVER	SALCUZ 
	LDK	A2,SYNEBC		SALCUZ
	OTR	A2,1,LCUIN	SPECIFY SYNC CHARACTER	SALCUZ 
	RB(NA)	BRMHLT		SALCUZ
	XIF			SALCUZ 
BRM100	EQU	*
	CF	A5,READP	READ ONE CHARACTER 
	RF(NZ)	BRM150	PARITY ERROR 
	LDR	A1,A2
	SUK	A1,STX 
	RF(Z)	BRM300	STX RECEIVED
	SUK	A1,EOT-STX 
	RF(Z)	BRM200	EOT RECEIVED
	SUK	A1,ENQ-EOT 
	ABL(Z)	BRM400	ENQ RECEIVED 
	SUK	A1,DLE-ENQ 
	ABL(Z)	BRM600	DLE RECEIVED 
	SUK	A1,NAK-DLE 
	ABL(Z)	BRM500	NAK RECEIVED 
	IFT	MSV1=0 
	LDR	A8,A2
	CF	A5,READP	READ ONE CHARACTER 
	RF(NZ)	BRM150	PARITY ERROR 
	CWR	A2,A8
	RF(NE)	BRM150	INVALID ADDRESSING 
	XIF
	LDK	A3,0 
	CC	A2,DW1500+1 
	RF(E)	BRM110	POLLING 
	LDK	A3,2 
	CC	A2,DW1500 
	RF(NE)	BRM150	NOT THIS TCU 
BRM110	EQU	*
	CF	A5,READP	READ 1:ST STA
	RF(NZ)	BRM150	PARITY ERROR 
	LDR	A8,A2
	IFT	MSV1=0 
	CF	A5,READP	READ 2:ND STA
	RF(NZ)	BRM150	PARITY ERROR 
	CWR	A2,A8
	RF(NE)	BRM150	INVALID ADDRESS SEQUENCE 
	XIF
	CF	A5,READ	READ ONE CHARACTER
	IFT	P6805=0		SALCUZ
	SUK	A2,ENQ+PAR 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	SUK	A2,ENQ		SALCUZ 
	XIF			SALCUZ 
	RF(NZ)	BRM150	NOT ENQ
	IFT	P6805=0		SALCUZ
	CF	A5,READ	READ LAST CHARACTER 

*	TRAILING PAD CAN BE CHECKED 

	CIO	A1,0,LCUIN	HALT INPUT
	SST	A1,LCUIN 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	CF	A5,HALTIN	HALT INPUT	SALCUZ 
	RB(NZ)	BRM010	PARITY ERROR	SALCUZ		SALCUZ
	XIF			SALCUZ 
	LDK	A1,1 
	ST	A1,CACK	LOAD ACK COUNTER
	LDR	A2,A8
	SUK	A3,2 
	RF(Z)	BRM120	SELECTING 
	CWK	A8,GP
	ABL(E)	GPOLL	GENERAL POLL
	IFT	MSV1=1 
	CF	A5,FINTEP	CHECK IF STA PRESENT (POLL ADDRESS) 
	XIF
	IFT	MSV1=0 
	CF	A5,FINTER	CHECK IF STA PRESENT
	XIF
	LDR	A6,A3	LOAD DWT TO A6 
	ABL(NZ)	SPOLL	SPECIFIC POLL
	RB	BRM	INVALID POLL
BRM120	EQU	*
	CF	A5,FINTER	CHECK IF STA PRESENT
	LDR	A6,A3	LOAD DWT TO A6 
	RF(NZ)	BRM130	STA FOUND
	IFT	MSV1=0		 
	LDKL	A6,DW1500	SELECT TO DCTASK
BRM130	EQU	*
	ABL	SELECT 
	XIF			 
	IFT	MSV1=1		 
	ABL	BRM	INVALID ADDRESS
	XIF			 
* 
*   WAIT FOR MARK HOLD TO RESYNCHRONIZE 
* 
BRM150	EQU	*
	ANK	A2,/7F 
	SUK	A2,/7F 
	RB(Z)	BRM	RESYNCHRONIZE
	CF	A5,READ	READ ANOTHER CHARACTER
	RB	BRM150
	 
* 
* 
*	EOT HAS BEEN RECEIVED 
* 
* 
BRM200	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	IFT	RCOM=1 
	CM	XRB	RESET READ BUFFER 
	XIF
	LD	A1,XACK 
	RF(Z)	BRM220	ACK IS NOT EXPECTED 
	LD	A6,FDWTUT	GET WRITING DWT 
	RF(Z)	BRM210	NO ONE WRITING
	LDK	A1,2	SET RC=2
	CF	A5,CWRITE	COMPLETE WRITE REQUEST
BRM210	EQU	*
	CM	XACK	RESET 'ACK EXPECTED' 
BRM220	EQU	*
	CM	XSEL	RESET 'SELECTED' 
	RB	BRM 
	 
* 
* 
*	STX HAS BEEN RECEIVED 
* 
* 
BRM300	EQU	*
	CF	A5,HPTIM
	LD	A1,XSEL 
	RF(Z)	BRM315	NOT SELECTED
	LD	A1,DCRBUF 
	RB(Z)	BRM150	NO BUFFER AVAILABLE 
BRM305	EQU	*
	CF	A5,RDMESS	READ MESSAGE
	SUK	A7,1 
	RF(NZ)	BRM320	MESSAGE OK 
BRM310	EQU	*
	CM	XSTA	INDICATE 'INVALID MESSAGE' 
BRM312	EQU	*
	CF	A5,TRNAK	SEND NAK 
	ABL	BRM
BRM315	EQU	*
	IFT	RCOM=1 
	LD	A1,XACK 
	RF(Z)	BRM316	ACK IS NOT EXPECTED 
	LD	A1,DCRBUF 
	RF(Z)	BRM316	NO BUFFER AVAILABLE 
	LD	A6,FDWTUT	GET WRITING DWT 
	ABL(Z)	BRM150	NO ONE WRITING. RESYNCHRONIZE
	LDR*	A2,A6	GET STA 
	XIF
	IFT	RCOM=1 
	CF	A5,PRREC	PREPARE FOR TEXT RECEPTION 
	LDK	A1,0	SET RC=0
	CF	A5,CWRITE	COMPLETE WRITE REQUEST
	CM	CACK	PRESET ACK-1	=7
	RB	BRM305	READ THE MESSAGE 
	XIF
BRM316	CF	A5,READ	READ ONE CHARACTER
	IFF	P6805=1		=8
	SUK	A2,ENQ+PAR 
	XIF			=8 
	IFT	P6805=1		=8
	SUK	A2,ENQ		=8 
	XIF			=8 
	RB(Z)	BRM312	FORWARD ABORT SEQUENCE
	RB	BRM220
BRM320	EQU	*
	IM	XSTA	INDICATE MESSAGE OK
	LD	A4,DCRBUF	GET BUFFER ADDRESS
	ADK	A4,6 
	CW	A4,FBLST
	RF(NE)	BRM325	NOT FIRST BLOCK
	IFF	RCOM=0 
	LDK	A1,ESC 
	CCR	A1,A4
	RB(NE)	BRM310	ESC NOT FOUND
	ADK	A4,1 
	LCR	A1,A4	GET COMMAND CODE 
	SUK	A4,1 
	SUK	A1,RDBCOM
	RF(Z)	RDBUF	READ MODIFIED RECEIVED 
	SUK	A1,RDMCOM-RDBCOM 
	RF(Z)	RDMOD	READ BUFFER RECEIVED 
	XIF
BRM325	EQU	*
	SUK	A7,1 
	RF(Z)	BRM340	MESSAGE ENDED BY ETB
	CM	FBAX
	CF	A15,GRBUF	ALLOCATE RECEIVE BUFFER 
	ADK	A4,6 
	LD	A6,FDWTIN	GET INPUT DWT 
* 
*	PREPARE FOR CHAINED COMMAND 
* 
	IFT	RCOM=1 
	LDR*	A2,A6 
	LC	A2,TEBCDIC,A2 
	LD	A1,DCRBUF 
	RF(Z)	BRM326 
	ST	A2,+4,A1
	XIF
BRM326	EQU	*
	CWK	A6,DW1500
	RF(E)	BRM330	MESSAGE IS MENT FOR DCTASK
	LD	A2,DWTST,A6	GET STATUS
	RF(N)	BRM330	NO REQUEST
	IFT	EM3270=1		=4 
	LD	A2,DWTOR,A6	ORDER	=4
	RF(Z)	BRM327	ANY MESSAGE ORDER	=4
	XIF			=4 
	LDK	A2,2 
	CW	A2,DWTOR,A6 
	RF(NE)	BRM330	NO READ REQUEST
BRM327	EQU	*
	LDK	A1,0	SET RC=0
	LD	A8,DWTECB,A6	GET ECB ADDRESS
	LD	A3,-4,A4	GET LENGTH 
	ST	A3,ECBEL,A8	STORE EFFECTIVE LENGTH
	CF	A15,CTIME	STOP REQUEST TIMING 
	ST	A2,ECBCW,A8	STORE REMAINING TIME
	 
* 
* 
*	CHECK IF START PRINTER BIT SET IN CCC/WCC 
* 
* 
	IFT	STAT=1 
	LC	A2,+2,A4	GET WCC/CCC
	ANK	A2,/FF 
	LC	A2,TEBCDI,A2	TRANSLATE
	ANK	A2,8 
	RF(Z)	BRM328 
	LD	A2,DWTST,A6	GET STATUS
	ORK	A2,/A
	ST	A2,DWTST,A6 
BRM328	EQU	*
	XIF
	IFT	EM3270=1		=4 
	LD	A2,DWTOR,A6	ORDER	=4
	RF(NZ)	BRM329	NOT ANY MESSAGE ORDER	=4 
	SUK	A4,6	ADJUST BUFFER ADDRESS	=4
	CF	A5,QRBUF	QUEUE MESSAGE ON DWT	=4
	RF	BRM32A		=4
	XIF		=4
BRM329	EQU	*		=4

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

	CF	A15,TENDIO	COMPLETE REQUEST 
	RF	BRM345
	 
BRM330	EQU	*
	IFT	EM3270=1		=4 
	LD	A1,DWTST,A6	STATUS	=4 
	RF(N)	BRM335	NO REQUEST	=4 
	LD	A1,DWTOR,A6	ORDER	=4
	RF(NZ)	BRM335	NOT ANY MESSAGE ORDER	=4 
	CF	A15,TENDIO	COMPLETE REQUEST	=4
BRM335	EQU	*		=4
	XIF			=4 
	SUK	A4,6	GET BUFFER BASE 
	CF	A5,QRBUF	QUEUE BUFFER FOR DCTASK
	CF	A15,CKMESS	COMPLETE DCTASK READ IF ANY
BRM340	EQU	*
	CF	A5,TRACK	SEND ACK 0/1 
	ABL	BRM
BRM345	EQU	*
	IFT	STAT=1 
	LD	A1,DWTST,A6 
	ANK	A1,8 
	RB(Z)	BRM340	ACK SHOULD BE SENT
	CF	A5,TRWACK	SEND WACK 
	RF	BRM410
	XIF
	IFF	STAT=1 
	RB	BRM340
	XIF
	 
* 
* 
*	READ MODIFIED OR READ BUFFER RECEIVED 
* 
* 
	IFF	RCOM=0 
RDBUF	EQU	*	READ BUFFER COMMAND 
RDMOD	EQU	* 
	CM	XSEL	RESET SELECT EXPECTED
	LD	A6,FDWTIN	DWT-ADDRESS FOR ADDRESSED TERMINAL
	LD	A4,DWTBUF,A6	BUFFER ADDRESS 
	SUK	A4,2	SDJUST BUFFER ADDRESS 
	LDKL	A3,1922	REQUESTED LENGTH
	IM	XRB	SET READ BUFFER SWITCH
	CM	FDWTUT
	LDK	A1,1 
	XRS	A1,CACK	INCREMENT ACK COUNTER
				DB
	LD	A1,CRDBUF	INCREMENT READ BUFFER	DK
	ADK	A1,1	COUNTER	DK
	ST	A1,CRDBUF		DK 
				DE
	ABL	POL127 
	XIF
* 
* 
*	ENQ HAS BEEN RECEIVED 
* 
* 
BRM400	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RF(NZ)	BRM510	RETRANSMISSION OF MESSAGE
	OR	A1,XSEL 
	RF(Z)	BRM410	IN CONTROL STATE
	CF	A5,TRREP	REPEAT LAST CONTROL SEQUENCE 
BRM410	EQU	*
	ABL	BRM
	 
* 
* 
*	NAK HAS BEEN RECEIVED 
* 
* 
BRM500	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RF(NZ)	BRM510	ACK EXPECTED 
	OR	A1,XSEL 
	RB(Z)	BRM410	IN CONTROL STATE
	RF	BRM636
BRM510	EQU	*
				DB
	LDK	A1,0 
	CIO	A1,0,LCUIN		DK 
	SST	A1,LCUIN		DK 
	CF	A15,STREG		DK 
	CF	A15,SETIME		DK
	DATA	BRM520,TIMNAK		DK 
	ABL	TDISP		DK
BRM520	EQU	*		DK
	CF	A15,LDREG		DK 
				DE
	LD	A6,FDWTUT	GET WRITING DWT 
	IFF	STAT=0 
	LD	A1,XSTA 
	ABL(NZ)	POL050	STATUS HAS BEEN TRANSMITTED 
	XIF
	LD	A1,FBLST	GET START POINT FOR LAST BLOCK 
	SU	A1,FECBBA	COMPUTE BUFFER INDEX
	ST	A1,FBAX 
	ABL	POL130 
* 
* 
*	DLE HAS BEEN RECEIVED 
* 
* 
BRM600	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RB(Z)	BRM410	ACK NOT EXPECTED
	CF	A5,READ	READ SECOND CHARACTER 
	IFF	P6805=1		=8
	CWK	A2,ACK0+PAR
	XIF			=8 
	IFT	P6805=1		=8
	CWK	A2,ACK0		=8
	XIF			=8 
	RF(NE)	BRM620
* 
*	ACK , 0 RECEIVED
* 
	LD	A1,CACK	GET ACKCOUNTER
	RF(Z)	BRM630	ACK,0 EXPECTED
BRM610	EQU	*
	CF	A5,TRENQ	SEND ENQ 
	CF	A5,SPTIM	START PROCEDURE TIMER
	RB	BRM410
BRM620	EQU	*
	CWK	A2,ACK1
	RF(NE)	BRM650
* 
*	ACK , 1 RECEIVED
* 
	LD	A1,CACK	GET ACK COUNTER 
	RB(Z)	BRM610	ACK,1 NOT EXPECTED
BRM630	EQU	*
	LD	A1,XETX 
	RF(Z)	BRM640	ETX NOT SENT
	 
* 
*	ACK HAS BEEN RECEIVED TO AN ETX BLOCK 
* 
	LDK	A1,0	SET RC=0
BRM635	EQU	*
	IFF	STAT=0 
	LD	A2,XSTA 
	RF(NZ)	BRM670	STATUS HAS BEEN TRANSMITTED
	XIF
	CF	A5,CWRITE	COMPLETE WRITE REQUEST
BRM636	EQU	*
	CF	A5,TREOT	SEND EOT 
	IFT	RCOM=1 

	CM	XRB	RESET READ BUFFER 
	XIF
	RB	BRM410
BRM640	EQU	*
	LDK	A1,1 
	XRS	A1,CACK	INCREMENT ACK COUNTER
	ABL	POL130 
BRM650	EQU	*
	IFF	P6805=1		=8
	CWK	A2,RVI+PAR 
	XIF			=8 
	IFT	P6805=1		=8
	CWK	A2,RVI		=8 
	XIF			=8 
	RB(NE)	BRM610	INVALID DLE SEQUENCE 
	CM	XACK	RESET 'EXPECTING ACK'
	LD	A1,XETX 
	RF(NZ)	BRM660	ETX HAS BEEN SENT
	LDK	A1,2	SET RC=2
	RB	BRM635
BRM660	EQU	*
	LDK	A1,0	SET RC=0
	RB	BRM635
	IFF	STAT=0 
	 
* 
* 
*	STATUS HAS BEEN TRANSMITTED 
* 
* 
BRM670	EQU	*
	LD	A6,FDWTUT	GET DWT ADDRESS 
	CF	A15,REMOVS	REMOVE FROM STATUS QUEUE 
	CM	XSTA	CLEAR 'STATUS SENT'
	CM	XACK	CLEAR 'ACK EXPECTED' 
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,4 
	RB(Z)	BRM636	NOT DE
	LDKL	A1,/8000
	ANS	A1,DWTST,A6	CLEAR STATUS 
	RB	BRM636
	XIF
	 
* 
* 
*	SELECT HAS BEEN RECEIVED
* 
* 
SELECT	EQU	*
	LD	A1,XACK		=5 
	RF(NZ)	POL010	ERROR. ACK EXPECTED	=5 
	IFF	STAT=0 
	LD	A1,DWTST,A6	GET STATUS
	LDR	A3,A1
	ANK	A1,1 
	RF(Z)	SEL110	NO PENDING STATUS 
	CF	A5,TRRVI	SEND RVI 
	XIF
	IFF	STAT=1 
	RF	SEL110
	XIF
SEL100	EQU	*
	ABL	BRM
SEL110	EQU	*
	IFT	STAT+NOWACK=1
	ANK	A3,8 
	RF(NZ)	SEL115	BUSY 
	XIF
	IFT	STAT+NOWACK=2
	ANK	A3,8 
	RF(Z)	SEL111	DEVICE NOT BUSY 
	CF	A5,TRWACK	TRANSMIT WACK 
	ABL	BRM
SEL111	EQU	*
	XIF
	LD	A1,DCRBUF 
	RF(NZ)	SEL120	BUFFER AVAILABLE 
SEL115	EQU	*
	IFF	STAT+NOWACK=2
	CF	A5,TRWACK	SEND WACK 
	XIF
	RB	SEL100
SEL120	EQU	*
	CF	A5,PRREC	PREPARE FOR TEXT RECEPTION 
	CF	A5,TRACK	SEND ACK,0 
	RB	SEL100
	 
* 
* 
*	PREPARE FOR TEXT RECEPTION
* 
* 
PRREC	EQU	* 
	IM	XSEL	SET 'SELECTED' 
	CM	FBAX	RESET BUFFER INDEX 
	IFT	CODE=1 
	LC	A2,TEBCDIC,A2	TRANSLATE STA TO EBCDIC 
	XIF
	ST	A2,+4,A1	SAVE STA IN BUFFER 
	IM	XSTA
	ST	A6,FDWTIN	STORE INPUT DWT 
	RTN	A5 
	 
* 
* 
*	GENERAL POLL HAS BEEN RECEIVED
* 
* 
GPOLL	EQU	* 
	LD	A1,XACK		=5 
	RF(Z)	POL020	ACK NOT EXPECTED	=5 
POL010	CF	A5,TRENQ	SEND ENQ	=5
	CF	A5,SPTIM	START PROCEDURE TIMER	=5 
	ABL	BRM	WAIT FOR RESPONSE	=5 
POL020	EQU	*		=5
	CF	A5,CPTIM	CHECK POLL TIMER 
	IFF	STAT=0 
	LD	A6,DCSTQ	 
	RF(Z)	POL110	NO STATUS TO BE SENT
	SUK	A6,DWTSQ	GET DWT ADDRESS 
POL050	EQU	*
	CF	A5,TRSTA	SEND STATUS
	CF	A5,SPTIM	START PROCEDURE TIMER
	IM	XACK	SET 'ACK EXPECTED' 
	XIF
	IFF	STAT=1 
	RF	POL110
	XIF
POL100	EQU	*
	ABL	BRM
POL110	EQU	*
	LD	A6,DCWRQ
	RF(NZ)	POL120	WRITE ON QUEUE 
POL115	EQU	*
	CF	A5,TREOT	SEND EOT 
	RB	POL100
POL120	EQU	*
	SUK	A6,DWTWQ	GET DWT ADDRESS 
POL125	EQU	*
	LD	A8,DWTECB,A6	GET ECB ADDRESS
	RF(NZ)	POL126
	CF	A15,REMOVW
	RB	POL115
POL126	EQU	*
	ST	A8,FECB	SAVE ECB ADDRESS
	ST	A6,FDWTUT	SAVE A6 

	IFF	MMUPAG=0 
	LDKL	A4,MMUBUF	MMU WORK BUFFER 
	ST	A4,ECBBA,A8 
	CF	A15,DC:MOT	MOVE DATA FROM USER BUFFER 
	XIF
	LD	A4,ECBBA,A8	GET BUFFER ADDRESS
	LD	A3,ECBRL,A8	GET LENGTH
POL127	EQU	*
	ST	A4,FECBBA	SAVE BUFFER ADDRESS 
	SUK	A3,2	SKIP FIRST WORD OF BUFFER 
	ST	A3,FECBRL	SAVE LENGTH 
	CM	FBAX	RESET BUFFER INDEX 
POL130	EQU	*
	CM	XETX	RESET 'ETX SENT' 
	CM	XSTA
	CF	A5,TRTEXT	SEND ONE BLOCK
	CF	A5,SPTIM	START PROCEDURE TIMER
	IM	XACK	SET 'ACK EXPECTED' 
	RB	POL100
	 
* 
* 
*	SPECIFIC POLL HAS BEEN RECEIVED 
* 
* 
SPOLL	EQU	* 
	IFF	STAT+SPECP=0 
	LD	A1,XACK		=5 
	RB(NZ)	POL010	ACK EXPECTED	=5
	LDR	A7,A6	SAVE A6
	CF	A5,CPTIM	CHECK POLLTIMER
	LDR	A6,A7	RESTORE A6 
	IFT	STAT=1 
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,7 
	RB(NZ)	POL050	PENDING STATUS 
	XIF
	IFF	STAT+SPECP=0 
	LD	A1,DWTST,A6 
	RB(N)	POL115	NO REQUEST
	LD	A1,DWTOR,A6	GET ORDER 
	SUK	A1,6 
	RB(Z)	POL125	WRITE REQUEST 
	SUK	A1,2 
	RB(Z)	POL125	EXCHANGE REQUEST
	XIF
	RB	POL115	SEND EOT 
	 
* 
* 
*	CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED 
* 
*	A1 CONTAINS RETURN CODE 
* 
* 
CWRITE	LD	A6,FDWTUT 
	RF(Z)	CWR900	NO WRITE GOING ON 
	LD	A2,DWTST,A6 
	RF(N)	CWR900	NO REQUEST
	LD	A2,DWTOR,A6	GET ORDER 
	SUK	A2,6 
	RF(Z)	CWR100	WRITE REQUEST 
	SUK	A2,2 
	RF(NZ)	CWR900	NOT EXCHANGE REQUEST 
	LDR	A1,A1
	RF(NZ)	CWR100	TRANSMISSION ERROR, RC NOT ZERO
	LDK	A2,2	TRANMISSION OK
	ST	A2,DWTOR,A6	INDICATE READ ORDER 
	RF	CWR150
CWR100	LD	A8,FECB	GET ECB ADDRESS 
	CF	A15,CTIME	STOP TIMING 
	LDR	A8,A8
	RF(Z)	CWR150 
	ST	A2,ECBCW,A8 
	CF	A15,TENDIO	COMPLETE REQUEST 
CWR150	EQU	*
	CF	A15,REMOVW	REMOVE FROM WRITE QUEUE
CWR200	EQU	*
CWR900	EQU	*
	CM	XACK	RESET 'ACK EXPECTED' 
	CM	FDWTUT
	RTN	A5 
	 
* 
* 
*	READ ONE TEXT BLOCK 
* 
*	ON EXIT A3 CONTAINS : 
*	0 : IF CORRECT ETX BLOCK RECEIVED 
*	1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW
*	2 : IF CORRECT ETB BLOCK RECEIVED 
* 
RDMESS	EQU	*
	LD	A4,DCRBUF	GET BUFFER ADDRESS
	ADK	A4,6	RESERVE HEADER
	LDK	A3,0 
	LD	A1,XSTA 
	RF(NZ)	RDM050	LAST INPUT WAS OK
	LD	A1,FBLST	COMPUTE NEW INDEX
	SUR	A1,A4
	ST	A1,FBAX 
RDM050	EQU	*
	AD	A4,FBAX	ADD BUFFER INDEX
	ST	A4,FBLST	REMEMBER START OF BLOCK
RDM075	EQU	*
	CM	XSTA
	LDK	A7,0	RESET LRC 

	IFT	IBMCHR=1 
	LD	A1,FBAX 
	RF(NZ)	RDM100	NOT FIRST BLOCK
	CF	A5,READP
	RF(NZ)	RDM120	PARITY ERROR 
	CWK	A2,ESC 
	RF(NE)	RDM110
	CF	A5,READP	SKIP NEXT TWO CHARACTERS 
	CF	A5,READP
	XIF
RDM100	EQU	*
	CF	A5,READP	READ ONE CHARACTER 
	RF(NZ)	RDM120	PARITY ERROR 
RDM110	EQU	*
	CWK	A2,ETX 
	RF(E)	RDM130	ETX RECEIVED
	CWK	A2,ETB 
	RF(E)	RDM160	ETB RECEIVED
	CWK	A2,ITB 
	RF(E)	RDM170	ITB RECEIVED
	CWK	A2,ENQ 
	RF(E)	RDM120	SKIP IF ENQ EMBEDDED IN MESSAGE 
	CWK	A2,/FF 
	RF(E)	RDM140	MARK HOLD RECEIVED

	IFT	CODE=0 
	IFT	BINTRM=1 

	LDR	A1,A2
	SUK	A1,DC1+3 
	RF(P)	RDM115	NOT DC1-DC3 
	ADK	A1,3 
	RF(N)	RDM115	NOT DC1-DC3 
	SLL	A1,6 
	LDR	A8,A1
	CF	A5,READP	8-BIT CHAR GET NEXT PART 
	RF(NZ)	RDM120	PARITY ERROR 
	SUK	A2,/20	ASSEMBLE TO ONE CHARACTER 
	ORR	A2,A8
RDM115	EQU	*
	XIF

	SCR	A2,A4	STORE CHARACTER
	ADK	A4,1	INCREMENT POINTER 
	IM	FBAX	INCREMENT BUFFER INDEX 
	LD	A1,FBAX 
	CWK	A1,RBUFL+RBUFL 
	RB(NG)	RDM100	NOT OVERFLOW 
* 
*	BUFFER OVERFLOW 
* 
	RF	RDM140	ABORT INPUT
RDM120	EQU	*
	LDK	A3,1	INDICATE INVALID MESSAGE
	SUK	A2,/7F 
	RF(Z)	RDM150	MARK HOLD RECEIVED
	RB	RDM100
* 
*	ETX RECEIVED
* 
RDM130	EQU	*
	LD	A1,DCRBUF	GET BUFFER ADDRESS
	LD	A2,FBAX	GET BUFFER INDEX
	ST	A2,+2,A1	STORE EFFECTIVE LENGTH IN HEADER 
	IFF	CODE=1 
	CF	A5,RDLRC
	RF(Z)	RDM150	LRC WAS OK
	XIF
	IFT	CODE=1 
	CF	A5,RDCRC	READ CRC AND CHECK IT
	RF(E)	RDM150	CRC WAS OK
	XIF
RDM140	EQU	*
	LDK	A3,1	INDICATE INVALID MESSAGE
RDM150	EQU	*
	LDR	A7,A3	SAVE RESULT REGISTER 
	CF	A5,HALTIN	HALT INPUT
	IFT	P6805=1
	ORR	A7,A1	PARITY ERROR	SALCUZ
	XIF			SALCUZ 
	RTN	A5 
* 
*	ETB RECEIVED
* 
RDM160	EQU	*
	LDR	A3,A3
	RB(NZ)	RDM130	ALREADY INVALID
	LDK	A3,2	INDICATE CORRECT ETB
	RB	RDM130
* 
*	ITB RECEIVED
* 
RDM170	EQU	*
	IFF	CODE=1 
	CF	A5,RDLRC
	RB(NZ)	RDM120	LRC WAS NOT OK 
	XIF
	IFT	CODE=1 
	CF	A5,RDCRC	READ CRC AND CHECK IT
	RB(NE)	RDM120	CRC WAS NOT OK 
	XIF
	RB	RDM100
	 
* 
*	TRANSMIT ACK 0 OR 1 
* 
TRACK	LDK	A2,1
	LDK	A3,ACK1	PRELOAD ACK1 
	XRS	A2,CACK	INCREMENT ACK COUNTER
	RF(NZ)	TRDLE 
	LDK	A3,ACK0	LOAD ACK0
	RF	TRDLE 
* 
*	TRANSMIT WACK 
* 
TRWACK	LDK	A3,WACK	LOAD WACK
	RF	TRDLE 
* 
*	TRANSMIT RVI
* 
	IFF	STAT=0 
TRRVI	LDK	A3,RVI	LOAD RVI 
	XIF
* 
*	TRANSMIT DLE
* 
TRDLE	LDK	A2,DLE	LOAD DLE 
	SC	A2,RESEND	PUT INSAVE AREA 
	SC	A3,RESEND+1	
	RF	TRREP 
	 
* 
*	TRANSMIT NAK
* 
TRNAK	LDK	A3,NAK	LOAD NAK 
	RF	TREN10
* 
*	TRANSMIT EOT
* 
TREOT	LDK	A3,EOT	LOAD EOT 
	RF	TREN10
* 
*	TRANSMIT ENQ
* 
TRENQ	LDK	A3,ENQ	LOAD ENQ 
* 
TREN10	SC	A3,RESEND	PUT IN SAVE AREA
	LDK	A2,/FF 
	SC	A2,RESEND+1 
TRREP	CF	A5,TRSYNC	START OUTPUT 
	LC	A2,RESEND	GET FIRST CHARACTER 
	CF	A5,WRITEP	SEND IT 
	LC	A2,RESEND+1	GET NEXT CHARACTER
	CF	A5,WRITEP	SEND IT 
TRRE10	LDK	A2,/FF 
	CF	A5,WRIT05	SEND PAD
	LDK	A2,/FF 
	CF	A5,WRIT05 
	LDK	A2,0		SALCUZ 
	CIO	A2,0,LCUUT	STOP TRANSMITTER
	IFT	P6805=1		SALCUZ
	CF	A5,READ	WAIT FOR END	SALCUZ 
	XIF			SALCUZ 
	SST	A2,LCUUT	PERFORM SST AT ONCE 
	IFF	LOGG=0 
	CF	A5,LOGSST	LOG TRANSMITTER STATUS
	XIF
	RTN	A5 
	 
* 
* 
*	TRANSMIT ONE TEXT BLOCK 
* 
* 
TRTEXT	EQU	*
	CF	A5,TRSYNC	START OUTPUT
	IFT	TSTREQ=1 
* 
* 
*	TEST REQUEST HANDLING 
* 
* 
	LD	A4,FBAX 
	RF(NZ)	TRT050	NOT START OF MESSAGE 

	LD	A1,XRB	READ BUFFER COMMAND IN PROCESS ??? 
	RF(NZ)	TRT050	YES !! 

	LD	A4,FECBBA 
	LC	A3,+2,A4	GET AID CHARACTER
	SUK	A3,/30 
	RF(NZ)	TRT050	NOT TEST REQUEST 
	LDK	A2,SOH 
	CF	A5,WRITE	SEND SOH 
	LDK	A7,0	RESET BCC 
	LDK	A2,'%' 
	CF	A5,WRITE	SEND % 
	LDK	A2,'/' 
	CF	A5,WRITE	SEND / 
	LDK	A2,STX 
	CF	A5,WRITE	SEND STX 
	ST	A4,FBLST	REMEMBER START OF BLOCK
	ADK	A4,5	SKIP AID + CURSOR ADDRESS 
	LDK	A3,5	ADJUST LENGTH 
	LDK	A2,3 
	ST	A2,FBAX 
	RF	TRT100
TRT050	EQU	*
* 
* 
* 
	XIF
	LDK	A2,STX 
	CF	A5,WRITE	SEND STX 
	LDK	A7,0	RESET LRC 
	LD	A4,FECBBA	GET BUFFER ADDRESS
	AD	A4,FBAX	ADD BUFFER INDEX
	ST	A4,FBLST	REMEMBER START OF BLOCK
	ADK	A4,2	SKIP FIRST WORD OF BUFFER 
	LDK	A3,0	RESET CHARACTER COUNTER 
	LD	A1,FBAX	GET BUFFER INDEX
	RF(NZ)	TRT100	NOT FIRST BLOCK
	LC	A2,DW1500+1	GET TCA 
	CF	A5,WRITEP	SEND TCA
	LDR*	A2,A6	GET STA 
	CF	A5,WRITEP	SEND STA
	IFT	IBMCHR=1 
	IFF	RCOM=1 
	LDK	A2,/27	SEND ENTER AS AID 
	CF	A5,WRITEP 
	LDK	A2,/20	AND CURSOR ADDRESS
	CF	A5,WRITEP 
	LDK	A2,/20 
	CF	A5,WRITEP 
	XIF
	IFT	RCOM=1 

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

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

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

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

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

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

TRT101	EQU	*

	LDK	A2,SF
	CF	A5,WRITEP	SEND START FIELD

	LC	A2,-1,A4	GET ATTRIBUTE CHARACTER
	ANK	A2,X'7F' 
	LDR	A1,A2	CONVERT TO IBM ATTRIBUTE 
	ANK	A1,1 
	ANK	A2,/1E	MASK
	SLL	A2,1 
	ORR	A2,A1	IBM ATTRIBUTE COMPOSED 
	ORK	A2,/40	BIT ALWAYS SET ONE
	LC	A2,TASCII,A2
	CWK	A2,/18	CHECK SPECIAL ATTRIBUT
	RF(NE)	TRT104
	LDK	A2,/30 
TRT104	EQU	*
	CF	A5,WRITEP	SEND ATTRIBUTE
	ADK	A3,1 
	RF	TRT110
TRT105	EQU	*
	XIF
	 
	CWK	A2,/07 
	RF(L)	TRT110	ILLEGAL CODE : SKIP IT
	CF	A5,WRITEP	SEND CHARACTER
TRT110	EQU	*
	IM	FBAX	INCREMENT BUFFER INDEX 
	LD	A1,FECBRL	GET REQUESTED LENGTH
	CW	A1,FBAX 
	RF(NG)	TRT130	END OF MESSAGE 
	ADK	A3,1	INCREMENT CHARACTER COUNTER 
	CWK	A3,TBLEN 
	RB(L)	TRT100	NOT FULL BLOCK
	IFT	RCOM=1 
	LDK	A1,SBA	CHECK IF SBA AT END OF BLOCK
	CC	A1,-2,A4
	RF(E)	TRT115	YES 
	CC	A1,-1,A4
	RF(NE)	TRT116	NO SEND ETB
	LCR	A2,A4	GET FIRST BYTE AFTER SBA 
	ADK	A4,1	INREMENT POINTER
	CF	A5,WRITEP	SEND IT 
	IM	FBAX	INCREMENT INDEX
TRT115	LCR	A2,A4	GET SECOND BYTE AFTER SBA
	CF	A5,WRITEP	SEND IT 
	IM	FBAX	INCREMENT INDEX
	XIF
TRT116	EQU	*
	LDK	A2,ETB	LOAD ETB
TRT120	EQU	*
	CF	A5,WRITEP	SEND IT 
	IFF	CODE=1 
	LDR	A2,A7	GET LRC
	CF	A5,WRITEP	SEND LRC
	XIF
	IFT	CODE=1 
	LDR	A8,A7	SAVE CURRENT CRC 
	LDR	A2,A7
	ANK	A2,/FF 
	CF	A5,WRIT05	SEND CRC BYTE 1 
	ECR	A2,A8
	ANK	A2,/FF 
	CF	A5,WRIT05	SEND CRC BYTE 2 
	XIF
	ABL	TRRE10	HALT OUTPUT 
TRT130	EQU	*
	IM	XETX	INDICATE 'ETX SENT'
TRT140	EQU	*
	LDK	A2,ETX	LOAD ETX
	RB	TRT120	SEND ETX AND LRC 
	 
* 
* 
*	TRANSMIT STATUS MESSAGE 
* 
* 
	IFF	STAT=0 
TRSTA	EQU	* 
	IM	XSTA	INDICATE 'STATUS SENT' 
	ST	A6,FDWTUT	SAVE A6 
	CF	A5,TRSYNC	START OUTPUT
	LDK	A2,SOH 
	CF	A5,WRITE	SEND SOH 
	LDK	A7,0	REST LRC
	LDK	A2,'%' 
	CF	A5,WRITEP	SEND '%'
	LDK	A2,'R' 
	CF	A5,WRITEP	SEND 'R'
	LDK	A2,STX 
	CF	A5,WRITE	SEND STX 
	LC	A2,DW1500+1 
	CF	A5,WRITEP	SEND TCA
	LDR*	A2,A6 
	CF	A5,WRITEP	SEND STA
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,/06	MASK FOR S/S 0
	SRL	A1,1 
	LC	A2,SSTAB,A1	GET STATUS BYTE 
	CF	A5,WRITEP	SEND S/S 0
	LDK	A2,NOIR	PRELOAD S/S 1
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,5 
	RF(Z)	TRST10	NOT 'IR'
	ANK	A1,4 
	RF(NZ)	TRST10	NO IR IF DE
	LDK	A2,IR
TRST10	EQU	*
	CF	A5,WRITEP	SEND S/S 1
	RB	TRT130	SEND ETX AND LRC 
	XIF
	 
* 
* 
*	TRANSMIT SYNC SEQUENCE
* 
* 
TRSYNC	EQU	*
	LDK	A2,0		SALCUZ 
	CIO	A2,0,LCUIN	HALT INPUT IF NOT DONE
	SST	A2,LCUIN	PERFORM SST 
	IFT	P6805=0		SALCUZ
	CIO	A2,1,LCUUT	START TRANSMITTER 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	IFT	CODE=1		SALCUZ 
	LDK	A2,0		SALCUZ 
	CIO	A2,1,LCUUT	START TRANSMITTER	SALCUZ
	RF(A)	TRS010		SALCUZ 
	SST	A1,LCUUT		SALCUZ 
	RF(A)	TRS005		SALCUZ 
	ABL	BRM		SALCUZ
TRS005	CIO	A2,1,LCUUT		SALCUZ 
TRS010	EQU	*		SALCUZ
	LDK	A2,SYNEBC		SALCUZ
	OTR	A2,1,LCUUT	SPECIFY SYNC CHARACTER	SALCUZ 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	IFT	CODE=0		SALCUZ 
	LDK	A2,/0C		SALCUZ 
	CIO	A2,1,LCUUT		SALCUZ 
	RF(A)	TRS010		SALCUZ 
	SST	A1,LCUUT		SALCUZ 
	RF(A)	TRS005		SALCUZ 
	ABL	BRM		SALCUZ
TRS005	CIO	A2,1,LCUUT		SALCUZ 
TRS010	EQU	*
	LDK	A2,SYN		SALCUZ 
	OTR	A2,1,LCUUT	SPECIFY SYNC CHARACTER	SALCUZ 
	XIF			SALCUZ 
	CF	A5,READ	WAIT FOR OUTPUT INTERRUPT 
	LDK	A3,4	4 SYNS
TRS100	LDK	A2,SYN 
	CF	A5,WRITE	SEND SYN 
	SUK	A3,1 
	RB(NZ)	TRS100
	RTN	A5 
	 
* 
* 
*   RECEIVER INTERRUPT
* 
* 
IH1501	EQU	*
	ST	P,INTSAV
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8
	XIF

	IFF	CPU852=1 
	MSR	8,A15	SAVE A1-A8	=1
	XIF
	CF	A15,LDREG	RESTORE DC REGS A3 - A8 
	INR	A2,0,LCUIN	READ CHAR 
	RF(NA)	IHIN20	NOT ACCEPTED,CHECK STATUS
	IFF	LOGG=0 
	CF	A5,LOGIN	LOG RECEIVED CHARACTER 
	XIF
	IFF	CODE=1 
	C2	SYNSW 
	RF(NZ)	IHLCI2
	CWK	A2,SYN	SKIP SYNS 
	RF(E)	READ 
IHLCI2	XRR	A7,A2	CALCULATE LRC
	XIF
	IFT	CODE=1 
	C2	SYNSW 
	RF(NZ)	IHLCI1	DO NOT SKIP SYNCS IN BCC FRAME 
	CWK	A2,SYNEBC
	RF(E)	READ	SKIP EBCDIC SYN 
IHLCI1	EQU	*
	CF	A5,CRCCAL	CALCULATE CRC 
	LC	A2,TASCII,A2	TRANSLATE TO ASCII 
	XIF
IHIN10	RTN	A5 
	IFT	P6805=0		SALCUZ
IHIN20	CF	A5,SST	PERFORM SST
	ABL	BRM
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
IHIN20	RF	SST	PERFORM SST	SALCUZ
	XIF			SALCUZ 
	 
* 
* 
*   TRANSMITTER INTERRUPT 
* 
* 
IH1502	EQU	*
	ST	P,INTSAV
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1 - A8
	XIF

	IFF	CPU852=1 
	MSR	8,A15	SAVE A1-A8	=1
	XIF
	CF	A15,LDREG	RESTORE DC REGS A3 - A8 
	RB	IHIN10
	 
* 
* 
*	SST INSTRUCTION AND STATUS CHECK
* 
*   LCU STATUS : BIT 10=CARRIER OFF 
*		BIT 13=PARITY ERROR (6805 ONLY)	SALCUZ 
*                BIT 14=THROUGHPUT ERROR
*                BIT 15=MODEM NOT READY 
* 
SST	SST	A1,LCUIN
	IFT	P6805=1		SALCUZ
	RF(NA)	SST200	ALREADY INACTIVE	SALCUZ		SALCUZ
	XIF			SALCUZ 
	LDR	A2,A1
	IFF	LOGG=0 
	CF	A5,LOGSST	LOG SST INFORMATION 
	XIF
	IFT	P6805=0		SALCUZ
	ANK	A2,2 
	RF(Z)	SST100 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	ANK	A2,6		SALCUZ 
	RF(Z)	SST100		SALCUZ 
	ANK	A2,2		SALCUZ 
	RF(NZ)	SST050	THROUGH PUT	SALCUZ 
	LDK	A1,1	SET PARITY ERROR	SALCUZ 
	RF	SSTRET		SALCUZ
	XIF			SALCUZ 
SST050	EQU	*		SALCUZ
	CM	XSTA	TROUHHPUT ERROR
	LDKL	A5,STB
	ABL	BRM010 
SST100	EQU	*
	ST	A1,DCSTCU 
	IFT	P6805=0		SALCUZ
	CF	A15,CKMESS	CHECK IF STATUS CHANGE 
	RTN	A5 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	ANK	A1,/21		SALCUZ 
	RF(Z)	SST200	LSALCUZ 
	CF	A15,SETIME	LINE ERROR, WAIT 0.2 SECONDS	SALCUZ
	DATA	BRM	RESTART	SALCUZ
	DATA	2	WAIT TIME	SALCUZ
	RF	READ		SALCUZ
* 
SST200	LDK	A1,0		SALCUZ 
SSTRET	ADK	A5,4		SALCUZ 
	LDR	A1,A1	SET CR	SALCUZ
	ABR*	A5	RETURN	SALCUZ
	XIF			SALCUZ 
* 
* 
*	HALT INPUT
* 
* 
HALTIN	LDK	A1,0		SALCUZ 
	CIO	A1,0,LCUIN 
	IFT	P6805=0		SALCUZ
	RB	SST	PERFORM SST INSTRUCTION AND STATUS CHECK
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	RF	READ	WAIT FOR SST INTERRUPT	SALCUZ
	XIF			SALCUZ 
	 
* 
* 
*	WRITE FROM OR READ ONE CHARACTER TO A2
* 
* 
WRITE	EQU	* 
	IFT	CODE=1 
	ANK	A2,/FF 
	CWK	A2,/FF 
	RF(E)	WRIT05	NO TRANSLATION OF TRAILING PAD
	LC	A2,TEBCDIC,A2	TRANSLATE TO EBCDIC 
	XIF
WRIT05	EQU	*
	OTR	A2,0,LCUUT	SEND CHARACTER
	RF(A)	WRIT10 
	RF	READ	THROUGHPUT ERROR 
	IFF	CODE=1 
WRIT10	XRR	A7,A2	ACCUMULATE BCC 
	XIF
	IFT	CODE=1 
WRIT10	CF	A5,CRCCAL	CALCULATE CRC 
	XIF
	IFF	LOGG=0 
	CF	A5,LOGOUT	LOG OUTPUT CHARACTER
	XIF
* 
READ	CF	A15,STREG 
	ABL	TDISP
	 
* 
* 
***	WRITEP
* 
*   WRITE A2 WITH PARITY
* 
* 
	IFT	CODE+P6805=0		SALCUZ 
WRITEP	ANK	A2,/FF 
	ECR	A1,A2
	ORK	A2,/80 
WRI100	SLL	A1,1 
	RB(P)	WRI100 
	RB(Z)	WRITE	WRITE
	XRK	A2,/80 
	RB	WRI100
	XIF
	IFF	CODE+P6805=0		SALCUZ 
WRITEP	RB	WRITE 
	XIF
* 
* 
* 
***	READP 
* 
*   READ CHARACTER TO A2 AND CHECK PARITY 
* 
* 
READP	CF	A5,READ
	IFT	CODE+P6805=0		SALCUZ 
	ECR	A1,A2
RE100	SLL	A1,1
	RF(Z)	RE110
	RB(NN)	RE100 
	XRK	A2,/80 
	RB	RE100 
RE110	LDR	A1,A2 
	ANK	A2,/7F 
	XIF
	IFF	CODE+P6805=0		SALCUZ 
	LDK	A1,/80 
	XIF
	ADK	A5,4 
	ANK	A1,/80 
	XRK	A1,/80 
	ABR*	A5
* 
* 
	 
* 
*	FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2
* 
*	CALLING SEQUENCE: CF A5,FINTER
*	A2=SUBTERMINAL ADDRESS
*	A4 DESTROYED
*	A3#0: DWT TO FOUND TERMINAL 
* 
* NOTE:	FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES 
*	ENTRY:	FINTER - CHECK SELECT ADDRESS
*		FINTEP - CHECK SPECIFIC POLL ADDRESS 
* 
RBYTE	DATA	0	IF 1 COMPARE WITH RIGTH BYTE 
* 
* 
FINTEP	EQU	*
	IFT	MSV1=0 
FINTER	EQU	*
	XIF
	IM	RBYTE 
	IFT	MSV1=1 
FINTER	EQU	*
	XIF
	LD	A4,DCTAB	GET ADDRESS TO DC:TAB
	AD*	A4,DCTAB	ADDRESS TO END OF DC:TAB
FINT10	SUK	A4,2 
	LDK	A3,0	DEFAULT VALUE 
	CW	A4,DCTAB	END OF TABLE 
	RF(E)	FINT20	SUBTERMINAL NOT FOUND 
	LDR*	A3,A4	LOAD DWT ADDRESS
	IFT	MSV1=1 
	AD	A3,RBYTE	CHOOSE ADDRESS TYPE
	CCR	A2,A3	COMPARE SUBTERMINAL ADDRESS
	XIF
	IFT	MSV1=0 
	CC	A2,1,A3	COMPARE TO SUBTERMINAL ADDRESS
	XIF
	RB(NE)	FINT10	TAKE NEXT TERMINAL 
FINT20	CM	RBYTE 
	ANKL	A3,/FFFE
	RTN	A5 
	 
* 
* 
*	POWER ON FUNCTIONS
* 
* 
DC15ON	EQU	*
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8
	XIF

	IFF	CPU852=1 
	MSR	8,A15	SAVE A1-A8	=1
	XIF
	IFT	STAT=1 
	LDK	A5,4	SET DEVICE END
	LD	A1,DCTAB
	AD*	A1,DCTAB	GET ADDRESS TO END OF TABLE 
DRDC05	SUK	A1,2 
	CW	A1,DCTAB
	RF(E)	DRDC06	END OF TABLE
	LDR*	A6,A1	GET DWT ADDRESS 
	ORS	A5,DWTST,A6	STORE DEVICE END FOR DEVICE
	CF	A15,INSSQ	INSERT IN STATUS QUEUE
	RB	DRDC05
DRDC06	EQU	*
	XIF
	LDK	A2,/40 
	ORS	A2,DCONOF
	CF	A15,CKMESS
	LD	A2,DCTPGP	GET POLL TIMER POINTER
	RF(NZ)	DRDC20	ALREADY STARTED
DRDC10	CF	A15,SPOTIM	START POLL TIMER 
DRDC20	ABL	BRM
	 
* 
*	POLL TIME OUT 
* 
PTOUT	LDKL	A5,STB	LOAD A5 STACK BASE
	LDK	A2,/40 
	ST	A2,DCONOF	INDICATE POLL TIME OUT
	CF	A15,CKMESS	CHECK IF STATUS CHANGE 
	CF	A15,SPOTIM	START POLL TIMER 
	ABL	TDISP
* 
*	RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED
* 
CPTIM	CM	DCONOF	INDICATE POLLING
	LDKL	A2,-TIMPOL
	ST*	A2,DCTPGP	RESTART TIMER
	CF	A15,CKMESS	CHECK IF STATUS CHANGE 
	RTN	A5 
* 
*	START POLL TIMER
* 
SPOTIM	CF	A15,SETIME	START TIMER
	DATA	PTOUT,TIMPOL
	ST	A4,DCTPGP	STORE TIMER POINTER 
	ADKL	A15,4 
	ABR*	A15 
	 
* 
*	START PROCEDURE TIMER 
* 
SPTIM	EQU	* 
	LDR	A1,A6	LOAD DWT AS PARAMETER
	CF	A15,SETIME
	DATA	PRTOUT,TIMPRO 
	ST	A4,DCTPP	SAVE TIMER POINTER 
	RTN	A5 
* 
*	PROCEDURE TIMEOUT 
* 
PRTOUT	CM	DCTPP 
	LDR	A6,A1	RELOAD A6
	LDKL	A5,STB	LOAD STACK BASE
	CF	A5,HALTIN	HALT INPUT IF OPEN	SALCUZ 
	LD	A1,XACK 
	RF(Z)	PRT10	ACK NOT EXPECTED 
	CF	A5,TRENQ	SEND ENQ 
	CF	A5,SPTIM	START PROCEDURE TIMER
PRT10	ABL	BRM 
	 
* 
*	STOP PROCEDURE TIMER
* 
HPTIM	LD	A1,DCTPP	GET TIMER POINTER 
	RF(Z)	HPT10	NOT RUNNING
	CM*	DCTPP	STOP TIMER 
	CM	DCTPP 
HPT10	RTN	A5
	 
	IFT	CODE=1 
* 
* 
*	CALCULATION OF CRC
* 
*	A2 = CHARACTER
*	A7 = ACCUMULATED CRC
* 
* 
CRCCAL	EQU	*
	ST	A1,CRCSAV 
	ST	A2,CRCSAV+2 
	ST	A3,CRCSAV+4 
	LDK	A1,8 
CRC100	LDR	A3,A7
	SRL	A7,1 
	XRR	A3,A2
	SRL	A2,1 
	ANK	A3,1 
	RF(Z)	CRC110 
	XRKL	A7,/A001
CRC110	SUK	A1,1 
	RB(NZ)	CRC100
	LD	A1,CRCSAV 
	LD	A2,CRCSAV+2 
	LD	A3,CRCSAV+4 
	RTN	A5 
CRCSAV	RES	3
	 
* 
* 
*	READ CRC CHARACTERS AND CHECK THEM
*	CR = (E) IF CRC WAS OK
* 
* 
RDCRC	LDR	A6,A7	SAVE CURRENT CRC
	IM	SYNSW	DO NOT SKIP SYNCS NOW 
	CF	A5,READ	READ BYTE 1 
	LD	A8,CRCSAV+2	SAVE IT 
	CF	A5,READ	READ BYTE 2 
	CM	SYNSW	SYNCS CAN BE SKIPPED AGAIN
	LD	A2,CRCSAV+2	SAVE IT 
	SLL	A2,8 
	XRR	A2,A8
	ADK	A5,4 
	CWR	A2,A6	COMPARE RECEIVED WITH COMPUTED 
	ABR*	A5
	XIF
	IFT	CODE=0 
* 
*   RDLRC      READ LRC CHARACTER 
*              CR=0 IF LRC OK 
* 
RDLRC	IM	SYNSW
	CF	A5,READP
	ADK	A5,4 
	LDR	A1,A1
	RF(NZ)	LRCEND
	ANK	A7,/7F 
LRCEND	EQU	*
	CM	SYNSW 
	ABR*	A5

	XIF
	 
* 
* 
*	DEVICE WORK TABLE FOR DCTASK
* 
* 
DW1500	EQU	*	TABLE ENTRY
	DATA	0	CU LINE ADDRESS 
	DATA	/8000	STATUS
	DATA	0	ECB ADDRESS 
	DATA	0	ORDER 
	DATA	DC15DC	POINTER TO ADDRESS BLOCK 
	DATA	0	TTAB ADDRESS
	DATA	0	WAIT/ACTIVATE INDICATOR 
	DATA	0	TASK QUEUE
* 
	IFT	MMUPAG=1 
	DATA	0	USER ECB ADDRESS
	DATA	DC:ECB	MMU ECB ADDRESS
	XIF
* 
	DATA	0	TIMER POINTER 
	DATA	0	WRITE QUEUE OR BUFFER QUEUE 
	DATA	0	STATUS QUEUE (NOT USED BY DC-TASK)
	DATA	0	RECEIVE MESSAGE QUEUE 
	DATA	0	SIMULATED DEVICE BUFFER ADDRESS 
	DATA	0	CURSOR ADDRESS
	DATA	0	REQUEST TIMEOUT VALUE 
* 
	IFT	MMUPAG=1 
DC:ECB	EQU	*	MMU ECB
	DATA	0,0,0,0,0,0 
	XIF
* 
	 
* 
* 
*	DC RECEIVE BUFFER POOL
* 
RLINK	EQU	RBUFL+RBUFL+8 
* 
DCRBUF	EQU	*
	DATA	*+2	FREE BUFFER ANCHOR
	IFF	RBUFNR=1	DK3 
	IFF	RBUFNR=2 
	DATA	*+RLINK 
	RES	RBUFL+3
	IFF	RBUFNR=3 
	DATA	*+RLINK 
	RES	RBUFL+3
	IFF	RBUFNR=4 
	DATA	*+RLINK 
	RES	RBUFL+3
	XIF
	IFF	RBUFNR=1	DK3 
	DATA	*+RLINK 
	RES	RBUFL+3
	XIF			DK3
	DATA	0	END OF CHAIN
	RES	RBUFL+3

	IFF	MMUPAG=0 
MMUBUF	RES	TBUFL+1	MMU WORK BUFFER
	XIF
	 
* 
* 
*	INTERRUPT LOGGING ROUTINE 
* 
* 
	IFF	LOGG=0 
LOGSST	ST	A2,SAVE2
	ORKL	A2,/F000
	RF	LOG10 
LOGOUT	ST	A2,SAVE2
	ORKL	A2,/0F00
	RF	LOG10 
LOGIN	CWK	A2,/FF
	RF(E)	LOGE10 
	ST	A2,SAVE2
LOG10	ST	A3,SAVE3 
	LD	A3,LOGPNT 
	STR	A2,A3
	ADK	A3,2 
	CWK	A3,LOGEND
	RF(L)	LOGEXI 
	LDKL	A3,LOGSTA 
LOGEXI	ST	A3,LOGPNT 
	LD	A2,SAVE2
	LD	A3,SAVE3
LOGE10	RTN	A5 
	 
* 
* 
LOGPNT	DATA	LOGSTA
LOGSTA	EQU	*
	RES	300
LOGEND	EQU	*-4
SAVE2	DATA	0
SAVE3	DATA	0
	XIF
* 
* 
* 
	IFT	RCOM=1 
	 
******************************************************* 
* 
*     L I N C O L 
* 
*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER
* 
**********************************************************

LINCOL	EQU	*
	LDR	A2,A3	COPY CURSOR ADDRESS
	SRL	A2,6 
	ANK	A2,X'3F'	
	LC	A2,LICO:T,A2	ASCII LINE NUMBER
	CF	A5,WRITEP	SEND LINE NUMBER

	LDR	A2,A3
	ANK	A2,X'3F' 
	LC	A2,LICO:T,A2	ASCII COLUMN NUMBER
	CF	A5,WRITEP	SEND COLUMN NUMBER
	RTN	A5	RETURN
* 
* 
* 
	 

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

DC:IN	DATA	DC:TAB+2 
DCTAB	DATA	DC:TAB 
DC:TAB	DATA	2	LENGTH OF DC:TAB
	DATA	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
	DATA	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
DC:END	EQU	*
* 
* 
	END

HexDump

0x00000…00034 (0, 0, 400)   Head {h00=0x0030, h01=0x0050, text=» IDENT DRDC15 9.2DK 4 81-05-26 870105040924 «, t00=0x0000, t01=0x0004}
0x00034…0003c               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x0003c…0005c               Head {h00=0x001c, h01=0x0050, text=»   DK3, RBUFNR=1 ALLOWED«, t00=0x0000, t01=0x0040}
0x0005c…00072               Head {h00=0x0012, h01=0x0050, text=»   DK2, TBUFL «, t00=0x0000, t01=0x0060}
0x00072…00086               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x0076}
0x00086…000ba               Head {h00=0x0030, h01=0x0050, text=»   DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. «, t00=0x0000, t01=0x008a}
0x000ba…000ce               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x00be}
0x000ce…000ea               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-08-16 «, t00=0x0000, t01=0x00d2}
0x000ea…0010e               Head {h00=0x0020, h01=0x0050, text=»   =8, ASCII-MODE FOR SALCUZ«, t00=0x0000, t01=0x00ee}
0x0010e…0012a               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0000, t01=0x0112}
0x0012a…00154               Head {h00=0x0026, h01=0x0050, text=»   =7, ACK IN CONVERSATIONAL MODE «, t00=0x0000, t01=0x012e}
0x00154…00170               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0000, t01=0x0158}
0x00170…0019e               Head {h00=0x002a, h01=0x0050, text=»   =6, DCTASK BUFFER ADDRESS DESTROYED«, t00=0x0000, t01=0x0174}
0x0019e…001ba               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x0012}
0x001ba…001e2               Head {h00=0x0024, h01=0x0050, text=»   =5, INCOMPLETE POLL SEQUENCE «, t00=0x0001, t01=0x002e}
0x001e2…001fe               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x0056}
0x001fe…00220               Head {h00=0x001e, h01=0x0050, text=»   =3, TRANSFER PARAMETER «, t00=0x0001, t01=0x0072}
0x00220…0023c               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x0094}
0x0023c…0025c               Head {h00=0x001c, h01=0x0050, text=»   =4, ANY MESSAGE ORDER«, t00=0x0001, t01=0x00b0}
0x0025c…00278               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x00d0}
0x00278…00296               Head {h00=0x001a, h01=0x0050, text=»   =2, ABORT HANDLING «, t00=0x0001, t01=0x00ec}
0x00296…002b2               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-29 «, t00=0x0001, t01=0x010a}
0x002b2…002d0               Head {h00=0x001a, h01=0x0050, text=»   =1, MSR-INSTRUCTION«, t00=0x0001, t01=0x0126}
0x002d0…002ec               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-14 «, t00=0x0001, t01=0x0144}
0x002ec…00308               Head {h00=0x0018, h01=0x0050, text=»   REL 8.2 78-11-14 «, t00=0x0001, t01=0x0160}
0x00308…00310               Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x017c}
0x00310…0031a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0184}
0x0031a…00324               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x018e}
0x00324…0035a               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x0008}
0x0035a…00364               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x003e}
0x00364…0038c               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x0048}
0x0038c…00396               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0070}
0x00396…003c4               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x007a}
0x003c4…003f6               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0002, t01=0x00a8}
0x003f6…0041a               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0002, t01=0x00da}
0x0041a…00424               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fe}
0x00424…0042e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0108}
0x0042e…00438               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0112}
0x00438…00442               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x011c}
0x00442…0044c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0126}
0x0044c…00488               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0002, t01=0x0130}
0x00488…00492               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0002, t01=0x016c}
0x00492…0049c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0176}
0x0049c…004a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0180}
0x004a6…004bc               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0002, t01=0x018a}
0x004bc…004c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0010}
0x004c6…004fc               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0003, t01=0x001a}
0x004fc…00522               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x0050}
0x00522…00548               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x0076}
0x00548…0056e               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0003, t01=0x009c}
0x0056e…00594               Head {h00=0x0022, h01=0x0050, text=» ENTRY DW1500 DWT FOR DC TASK «, t00=0x0003, t01=0x00c2}
0x00594…0059e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e8}
0x0059e…005a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f2}
0x005a8…005c6               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0003, t01=0x00fc}
0x005c6…005d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x011a}
0x005d0…005da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0124}
0x005da…00600               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0003, t01=0x012e}
0x00600…0062c               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0003, t01=0x0154}
0x0062c…00654               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0003, t01=0x0180}
0x00654…00678               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0004, t01=0x0018}
0x00678…00698               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x003c}
0x00698…006b8               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x005c}
0x006b8…006d6               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x007c}
0x006d6…006f4               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0004, t01=0x009a}
0x006f4…00722               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x00b8}
0x00722…0074e               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0004, t01=0x00e6}
0x0074e…0077a               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0004, t01=0x0112}
0x0077a…007a2               Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0004, t01=0x013e}
0x007a2…007cc               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0004, t01=0x0166}
0x007cc…007f6               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0004, t01=0x0190}
0x007f6…0081a               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x002a}
0x0081a…00840               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0005, t01=0x004e}
0x00840…0086e               Head {h00=0x002a, h01=0x0050, text=» EXTRN DC:MIN MOVE DATA TO USER BUFFER«, t00=0x0005, t01=0x0074}
0x0086e…0089e               Head {h00=0x002c, h01=0x0050, text=» EXTRN DC:MOT MOVE DATA FROM USER BUFFER«, t00=0x0005, t01=0x00a2}
0x0089e…008d2               Head {h00=0x0030, h01=0x0050, text=» EXTRN DISEND COMPLETE REQUEST AND DISPATCH «, t00=0x0005, t01=0x00d2}
0x008d2…008dc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0005, t01=0x0106}
0x008dc…008e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0110}
0x008e6…008f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x011a}
0x008f0…008fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0124}
0x008fa…00904               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x012e}
0x00904…0093e               Head {h00=0x0036, h01=0x0050, text=»*   STANDARD INTERFACE PART FOR DATA COMMUNICATION«, t00=0x0005, t01=0x0138}
0x0093e…00948               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0172}
0x00948…00952               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x017c}
0x00952…0095c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0186}
0x0095c…00966               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0190}
0x00966…0097c               Head {h00=0x0012, h01=0x0050, text=»* DWT CONTENTS«, t00=0x0006, t01=0x000a}
0x0097c…00986               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0020}
0x00986…009d4               Head {h00=0x004a, h01=0x0050, text=»* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)«, t00=0x0006, t01=0x002a}
0x009d4…009de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0078}
0x009de…009e8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0006, t01=0x0082}
0x009e8…00a28               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0006, t01=0x008c}
0x00a28…00a32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00cc}
0x00a32…00a60               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x00d6}
0x00a60…00a6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0104}
0x00a6a…00a96               Head {h00=0x0028, h01=0x0050, text=»XRVI EQU /5C STANDARD:/40, DK:/5C DK«, t00=0x0006, t01=0x010e}
0x00a96…00ac4               Head {h00=0x002a, h01=0x0050, text=»X:D EQU 0 BASE FOR RBUFL AND TBUFL DK «, t00=0x0006, t01=0x013a}
0x00ac4…00aea               Head {h00=0x0022, h01=0x0050, text=»X:X EQU 500 VALUE FOR BASE DK «, t00=0x0006, t01=0x0168}
0x00aea…00b14               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 2000 RECEIVE BUFFER LENGTH«, t00=0x0006, t01=0x018e}
0x00b14…00b2a               Head {h00=0x0012, h01=0x0050, text=»RBUFL EQU 400 «, t00=0x0007, t01=0x0028}
0x00b2a…00b4e               Head {h00=0x0020, h01=0x0050, text=»X:B EQU /60 DCTASK FILE CODE«, t00=0x0007, t01=0x003e}
0x00b4e…00b64               Head {h00=0x0012, h01=0x0050, text=»DC15FC EQU /60«, t00=0x0007, t01=0x0062}
0x00b64…00b8c               Head {h00=0x0024, h01=0x0050, text=»X:C EQU 1 IF 1 INTERRUPT LOGGING«, t00=0x0007, t01=0x0078}
0x00b8c…00b9e               Head {h00=0x000e, h01=0x0050, text=»LOGG EQU 0«, t00=0x0007, t01=0x00a0}
0x00b9e…00ba8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00b2}
0x00ba8…00bd6               Head {h00=0x002a, h01=0x0050, text=»TIMPOL EQU 900 POLL TIMEOUT VALUE  DK «, t00=0x0007, t01=0x00bc}
0x00bd6…00c04               Head {h00=0x002a, h01=0x0050, text=»X:E EQU 1 STATUS AND RVI HANDLING IF=1«, t00=0x0007, t01=0x00ea}
0x00c04…00c16               Head {h00=0x000e, h01=0x0050, text=»STAT EQU 0«, t00=0x0007, t01=0x0118}
0x00c16…00c42               Head {h00=0x0028, h01=0x0050, text=»X:F EQU 1 READ COMMAND HANDLING IF=1«, t00=0x0007, t01=0x012a}
0x00c42…00c54               Head {h00=0x000e, h01=0x0050, text=»RCOM EQU 1«, t00=0x0007, t01=0x0156}
0x00c54…00c7e               Head {h00=0x0026, h01=0x0050, text=»X:G EQU 254 TRANSMIT BLOCK LENGTH «, t00=0x0007, t01=0x0168}
0x00c7e…00c94 (8, 0, 400)   Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU 252 «, t00=0x0008, t01=0x0004}
0x00c94…00cc0               Head {h00=0x0028, h01=0x0050, text=»X:H EQU 1 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0008, t01=0x001a}
0x00cc0…00cd2               Head {h00=0x000e, h01=0x0050, text=»CODE EQU 1«, t00=0x0008, t01=0x0046}
0x00cd2…00d00               Head {h00=0x002a, h01=0x0050, text=»X:I EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0008, t01=0x0058}
0x00d00…00d14               Head {h00=0x0010, h01=0x0050, text=»SPECP EQU 0 «, t00=0x0008, t01=0x0086}
0x00d14…00d44               Head {h00=0x002c, h01=0x0050, text=»X:J EQU 1 IF = 1  LINE SPEED SET TO HIGH«, t00=0x0008, t01=0x009a}
0x00d44…00d70               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0008, t01=0x00ca}
0x00d70…00d84               Head {h00=0x0010, h01=0x0050, text=»SPEED EQU 1 «, t00=0x0008, t01=0x00f6}
0x00d84…00db2               Head {h00=0x002a, h01=0x0050, text=»X:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0008, t01=0x010a}
0x00db2…00dc4               Head {h00=0x000e, h01=0x0050, text=»MSV1 EQU 0«, t00=0x0008, t01=0x0138}
0x00dc4…00df6               Head {h00=0x002e, h01=0x0050, text=»X:L EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0008, t01=0x014a}
0x00df6…00e0a               Head {h00=0x0010, h01=0x0050, text=»RBUFNR EQU 2«, t00=0x0008, t01=0x017c}
0x00e0a…00e3c               Head {h00=0x002e, h01=0x0050, text=»X:M EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x0008, t01=0x0190}
0x00e3c…00e50               Head {h00=0x0010, h01=0x0050, text=»P6805 EQU 00«, t00=0x0009, t01=0x0032}
0x00e50…00e64               Head {h00=0x0010, h01=0x0050, text=»X:N EQU /02 «, t00=0x0009, t01=0x0046}
0x00e64…00e78               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0009, t01=0x005a}
0x00e78…00ea8               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU 02 DEVICE ADDRESS OF RECEIVER «, t00=0x0009, t01=0x006e}
0x00ea8…00eb4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x009e}
0x00eb4…00ec8               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0009, t01=0x00aa}
0x00ec8…00ef8               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x00be}
0x00ef8…00f04               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x00ee}
0x00f04…00f16               Head {h00=0x000e, h01=0x0050, text=»X:O EQU 0 «, t00=0x0009, t01=0x00fa}
0x00f16…00f46               Head {h00=0x002c, h01=0x0050, text=»IBMCHR EQU 0 IF 1 IBM CHARACTER HANDLING«, t00=0x0009, t01=0x010c}
0x00f46…00f78               Head {h00=0x002e, h01=0x0050, text=»X:P EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x0009, t01=0x013c}
0x00f78…00f8c               Head {h00=0x0010, h01=0x0050, text=»MESPAS EQU 0«, t00=0x0009, t01=0x016e}
0x00f8c…00fc4               Head {h00=0x0034, h01=0x0050, text=»X:Q EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x0009, t01=0x0182}
0x00fc4…00fd8               Head {h00=0x0010, h01=0x0050, text=»EM3270 EQU 1«, t00=0x000a, t01=0x002a}
0x00fd8…00fec               Head {h00=0x0010, h01=0x0050, text=»X:R EQU 1000«, t00=0x000a, t01=0x003e}
0x00fec…00ffc               Head {h00=0x000c, h01=0x0050, text=»    DK2 «, t00=0x000a, t01=0x0052}
0x00ffc…0102a               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000a, t01=0x0062}
0x0102a…0105a               Head {h00=0x002c, h01=0x0050, text=»TSTREQ EQU 0 IF 1 TEST REQUEST HANDLING «, t00=0x000a, t01=0x0090}
0x0105a…0108a               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 1 SPECIAL CONDITION FOR DENMARK«, t00=0x000a, t01=0x00c0}
0x0108a…010c2               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000a, t01=0x00f0}
0x010c2…010f6               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000a, t01=0x0128}
0x010f6…0112a               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000a, t01=0x015c}
0x0112a…0115a               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000a, t01=0x0190}
0x0115a…01176               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000b, t01=0x0030}
0x01176…011b6               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x004c}
0x011b6…011cc               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x008c}
0x011cc…011e0               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x00a2}
0x011e0…01220               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x00b6}
0x01220…01236               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x00f6}
0x01236…01240               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x010c}
0x01240…0124a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000b, t01=0x0116}
0x0124a…01254               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0120}
0x01254…0125e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x012a}
0x0125e…01290               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000b, t01=0x0134}
0x01290…0129a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0166}
0x0129a…012b8               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000b, t01=0x0170}
0x012b8…012c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x018e}
0x012c2…012f4               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x0008}
0x012f4…012fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x003a}
0x012fe…01330               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000c, t01=0x0044}
0x01330…0135e               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000c, t01=0x0076}
0x0135e…01368               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00a4}
0x01368…0137c               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000c, t01=0x00ae}
0x0137c…01386               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00c2}
0x01386…01394               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x000c, t01=0x00cc}
0x01394…013ae               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=0  DK2«, t00=0x000c, t01=0x00da}
0x013ae…013c6               Head {h00=0x0014, h01=0x0050, text=»TBUFL EQU 0  DK2«, t00=0x000c, t01=0x00f4}
0x013c6…013d8               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000c, t01=0x010c}
0x013d8…013e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x011e}
0x013e2…013fc               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=1  DK2«, t00=0x000c, t01=0x0128}
0x013fc…01424               Head {h00=0x0024, h01=0x0050, text=»TBUFL EQU 400 MMU BUFFER LENGTH «, t00=0x000c, t01=0x0142}
0x01424…01436               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000c, t01=0x016a}
0x01436…01444               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x000c, t01=0x017c}
0x01444…0144e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x018a}
0x0144e…01488 (13, 0, 400)  Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000d, t01=0x0004}
0x01488…014ba               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000d, t01=0x003e}
0x014ba…014c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0070}
0x014c4…014d8               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000d, t01=0x007a}
0x014d8…014e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x008e}
0x014e2…01518               Head {h00=0x0032, h01=0x0050, text=»DEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION «, t00=0x000d, t01=0x0098}
0x01518…01546               Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE«, t00=0x000d, t01=0x00ce}
0x01546…01550               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00fc}
0x01550…0155a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000d, t01=0x0106}
0x0155a…01564               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0110}
0x01564…01580               Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x000d, t01=0x011a}
0x01580…0158a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0136}
0x0158a…015be               Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000d, t01=0x0140}
0x015be…015c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0174}
0x015c8…015de               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000d, t01=0x017e}
0x015de…015f6 (14, 0, 398)  Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000e, t01=0x0004}
0x015f6…01602               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x001c}
0x01602…0160c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0028}
0x0160c…01622               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x0032}
0x01622…0163c               Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000e, t01=0x0048}
0x0163c…01648               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0062}
0x01648…01652               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x006e}
0x01652…0168a               Head {h00=0x0034, h01=0x0050, text=»DWTTP EQU START+/00 TIMER POINTER ORDER PROCESS «, t00=0x000e, t01=0x0078}
0x0168a…016bc               Head {h00=0x002e, h01=0x0050, text=»DWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE«, t00=0x000e, t01=0x00b0}
0x016bc…016e4               Head {h00=0x0024, h01=0x0050, text=»DWTSQ EQU START+/04 STATUS QUEUE«, t00=0x000e, t01=0x00e2}
0x016e4…0170e               Head {h00=0x0026, h01=0x0050, text=»DWTRQ EQU START+/06 RECEIVE QUEUE «, t00=0x000e, t01=0x010a}
0x0170e…01740               Head {h00=0x002e, h01=0x0050, text=»DWTBUF EQU START+/08 DEVICE BUFFER ADDRESS«, t00=0x000e, t01=0x0134}
0x01740…0176c               Head {h00=0x0028, h01=0x0050, text=»DWTCUR EQU START+/0A CURSOR ADDRESS «, t00=0x000e, t01=0x0166}
0x0176c…0179c (15, 0, 400)  Head {h00=0x002c, h01=0x0050, text=»DWTTIM EQU START+/0C REQUEST TIMER VALUE«, t00=0x000f, t01=0x0004}
0x0179c…017a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0034}
0x017a6…017b0               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x000f, t01=0x003e}
0x017b0…017ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0048}
0x017ba…017d4               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000f, t01=0x0052}
0x017d4…017de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x006c}
0x017de…017e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0076}
0x017e8…017f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0080}
0x017f2…01804               Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000f, t01=0x008a}
0x01804…0180e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x009c}
0x0180e…01822               Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000f, t01=0x00a6}
0x01822…01836               Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x000f, t01=0x00ba}
0x01836…01858               Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x000f, t01=0x00ce}
0x01858…01872               Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x000f, t01=0x00f0}
0x01872…0189a               Head {h00=0x0024, h01=0x0050, text=»* /39: SET REQUEST TIMEOUT VALUE«, t00=0x000f, t01=0x010a}
0x0189a…018a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0132}
0x018a4…018ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x013c}
0x018ae…018d0               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x000f, t01=0x0146}
0x018d0…018da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0168}
0x018da…018e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0172}
0x018e4…0190e               Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x000f, t01=0x017c}
0x0190e…0193c               Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x0010, t01=0x0016}
0x0193c…01960               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x0010, t01=0x0044}
0x01960…01988               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x0010, t01=0x0068}
0x01988…019b8               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x0010, t01=0x0090}
0x019b8…019c2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0010, t01=0x00c0}
0x019c2…019cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ca}
0x019cc…019ec               Head {h00=0x001c, h01=0x0050, text=»* DC TASK ADDRESS BLOCK «, t00=0x0010, t01=0x00d4}
0x019ec…019f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f4}
0x019f6…01a1e               Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDICATES NO MMU BUFFER «, t00=0x0010, t01=0x00fe}
0x01a1e…01a40               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0010, t01=0x0126}
0x01a40…01a6e               Head {h00=0x002a, h01=0x0050, text=»DC15DC DATA DCACTD ACTIVATION ADDRESS «, t00=0x0010, t01=0x0148}
0x01a6e…01a98               Head {h00=0x0026, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ADDRESS «, t00=0x0010, t01=0x0176}
0x01a98…01ac0               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x0010}
0x01ac0…01aca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0038}
0x01aca…01ae8               Head {h00=0x001a, h01=0x0050, text=»* DRIVER ADDRESS BLOCK«, t00=0x0011, t01=0x0042}
0x01ae8…01af2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0060}
0x01af2…01b16               Head {h00=0x0020, h01=0x0050, text=» DATA BUFLEN MMU BUFFER SIZE«, t00=0x0011, t01=0x006a}
0x01b16…01b38               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0011, t01=0x008e}
0x01b38…01b64               Head {h00=0x0028, h01=0x0050, text=»DC15AD DATA DCACT ACTIVATION ADDRESS«, t00=0x0011, t01=0x00b0}
0x01b64…01b9c               Head {h00=0x0034, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x00dc}
0x01b9c…01bc4               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x0114}
0x01bc4…01bce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x013c}
0x01bce…01bfe               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x0011, t01=0x0146}
0x01bfe…01c10               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x0011, t01=0x0176}
0x01c10…01c36               Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x0011, t01=0x0188}
0x01c36…01c48               Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x0012, t01=0x001e}
0x01c48…01c50               Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x0030}
0x01c50…01c64               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x0012, t01=0x0038}
0x01c64…01c7c               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x0012, t01=0x004c}
0x01c7c…01c88               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0064}
0x01c88…01c9c               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x0012, t01=0x0070}
0x01c9c…01cb0               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x0012, t01=0x0084}
0x01cb0…01cbc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0098}
0x01cbc…01cc6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0012, t01=0x00a4}
0x01cc6…01cd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ae}
0x01cd0…01cda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b8}
0x01cda…01d02               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x0012, t01=0x00c2}
0x01d02…01d0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ea}
0x01d0c…01d20               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x0012, t01=0x00f4}
0x01d20…01d44               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0012, t01=0x0108}
0x01d44…01d5e               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0012, t01=0x012c}
0x01d5e…01d74               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0012, t01=0x0146}
0x01d74…01d9e               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0012, t01=0x015c}
0x01d9e…01daa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0186}
0x01daa…01dbe (19, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0013, t01=0x0004}
0x01dbe…01de0               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DCRD READ SPECIFIC «, t00=0x0013, t01=0x0018}
0x01de0…01df8               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x0013, t01=0x003a}
0x01df8…01e0c               Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x0013, t01=0x0052}
0x01e0c…01e24               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/06 «, t00=0x0013, t01=0x0066}
0x01e24…01e4c               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x0013, t01=0x007e}
0x01e4c…01e60               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0013, t01=0x00a6}
0x01e60…01e78               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x0013, t01=0x00ba}
0x01e78…01e9c               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) DCSS SET STATUS DK4 «, t00=0x0013, t01=0x00d2}
0x01e9c…01eb4               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/38 «, t00=0x0013, t01=0x00f6}
0x01eb4…01edc               Head {h00=0x0024, h01=0x0050, text=» ABL(Z) REQTIM SET REQUEST TIMER«, t00=0x0013, t01=0x010e}
0x01edc…01ee8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0136}
0x01ee8…01ef0               Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0142}
0x01ef0…01f04               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=0 «, t00=0x0013, t01=0x014a}
0x01f04…01f1c               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/37 «, t00=0x0013, t01=0x015e}
0x01f1c…01f44               Head {h00=0x0024, h01=0x0050, text=» RF(Z) REQTIM SET REQUEST TIMER «, t00=0x0013, t01=0x0176}
0x01f44…01f50               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x000e}
0x01f50…01f62               Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x0014, t01=0x001a}
0x01f62…01f6c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0014, t01=0x002c}
0x01f6c…01f76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0036}
0x01f76…01f80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0040}
0x01f80…01fa0               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x0014, t01=0x004a}
0x01fa0…01faa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x006a}
0x01faa…01fb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0074}
0x01fb4…01fc8               Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x0014, t01=0x007e}
0x01fc8…01ff0               Head {h00=0x0024, h01=0x0050, text=» SUR A1,A1 PRESET RETURN CODE =4«, t00=0x0014, t01=0x0092}
0x01ff0…0200a               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0014, t01=0x00ba}
0x0200a…02020               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0014, t01=0x00d4}
0x02020…0204a               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0014, t01=0x00ea}
0x0204a…02056               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0114}
0x02056…0206a               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0014, t01=0x0120}
0x0206a…02084               Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x0014, t01=0x0134}
0x02084…0209c               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/02 «, t00=0x0014, t01=0x014e}
0x0209c…020c4               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x0014, t01=0x0166}
0x020c4…020cc               Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x018e}
0x020cc…020ee               Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x0015, t01=0x0008}
0x020ee…02110               Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x0015, t01=0x002a}
0x02110…0211a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x004c}
0x0211a…02124               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0056}
0x02124…0213e               Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x0015, t01=0x0060}
0x0213e…02148               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x007a}
0x02148…02152               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0084}
0x02152…02170               Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0015, t01=0x008e}
0x02170…02188               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0015, t01=0x00ac}
0x02188…021b2               Head {h00=0x0026, h01=0x0050, text=»*   STATUS CHANGE ON DC EQUIPMENT «, t00=0x0015, t01=0x00c4}
0x021b2…021da               Head {h00=0x0024, h01=0x0050, text=»*   SPONTANOUS MESSAGE RECEPTION«, t00=0x0015, t01=0x00ee}
0x021da…021e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0116}
0x021e4…021f8               Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0015, t01=0x0120}
0x021f8…02228               Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0015, t01=0x0134}
0x02228…0223c               Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0015, t01=0x0164}
0x0223c…02260               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0015, t01=0x0178}
0x02260…0227a               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0016, t01=0x000c}
0x0227a…02284               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0016, t01=0x0026}
0x02284…022b6               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0016, t01=0x0030}
0x022b6…022c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0062}
0x022c0…022de               Head {h00=0x001a, h01=0x0050, text=»*   ANY MESSAGE ORDER «, t00=0x0016, t01=0x006c}
0x022de…022e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x008a}
0x022e8…0230e               Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0016, t01=0x0094}
0x0230e…02316               Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00ba}
0x02316…0234c               Head {h00=0x0032, h01=0x0050, text=»ANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4«, t00=0x0016, t01=0x00c2}
0x0234c…0236a               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCRD10 NO!! =4 «, t00=0x0016, t01=0x00f8}
0x0236a…02396               Head {h00=0x0028, h01=0x0050, text=» RF ENDIO YES!! COMPLETE REQUEST =4 «, t00=0x0016, t01=0x0116}
0x02396…023a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0142}
0x023a2…023ac               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0016, t01=0x014e}
0x023ac…023b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0158}
0x023b6…023c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0162}
0x023c0…023de               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0016, t01=0x016c}
0x023de…023e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x018a}
0x023e8…023f2 (23, 0, 398)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0004}
0x023f2…02434               Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0017, t01=0x000e}
0x02434…02472               Head {h00=0x003a, h01=0x0050, text=»*         FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0017, t01=0x0050}
0x02472…0247c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x008e}
0x0247c…02486               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0098}
0x02486…0249a               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0017, t01=0x00a2}
0x0249a…024c4               Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0017, t01=0x00b6}
0x024c4…024d0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00e0}
0x024d0…024e4               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0017, t01=0x00ec}
0x024e4…0250e               Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0017, t01=0x0100}
0x0250e…02522               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0017, t01=0x012a}
0x02522…02538               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x0017, t01=0x013e}
0x02538…02564               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0017, t01=0x0154}
0x02564…02576               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0017, t01=0x0180}
0x02576…0258a (24, 0, 398)  Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x0018, t01=0x0004}
0x0258a…025b2               Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x0018, t01=0x0018}
0x025b2…025c6               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0018, t01=0x0040}
0x025c6…025f2               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x0018, t01=0x0054}
0x025f2…025fe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0080}
0x025fe…0262c               Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTBUF,A6 SAVE TERM. ADDR. DK4 «, t00=0x0018, t01=0x008c}
0x0262c…02642               Head {h00=0x0012, h01=0x0050, text=»DCTP12 EQU *  «, t00=0x0018, t01=0x00ba}
0x02642…02678               Head {h00=0x0032, h01=0x0050, text=» LD A1,DCSTQ CHECK IF THIS DWT IS IN QUEUE DK4«, t00=0x0018, t01=0x00d0}
0x02678…0268e               Head {h00=0x0012, h01=0x0050, text=»DCTP14 EQU *  «, t00=0x0018, t01=0x0106}
0x0268e…026be               Head {h00=0x002c, h01=0x0050, text=» RF(Z) DCTP18 NO, END OF/OR NO QUEUE DK4«, t00=0x0018, t01=0x011c}
0x026be…026e8               Head {h00=0x0026, h01=0x0050, text=» LDR A3,A6 ADJUST ADDR. VALUE DK4 «, t00=0x0018, t01=0x014c}
0x026e8…02704               Head {h00=0x0018, h01=0x0050, text=» ADKL A3,DWTSQ  DK4 «, t00=0x0018, t01=0x0176}
0x02704…02734 (25, 0, 400)  Head {h00=0x002c, h01=0x0050, text=» CWR A1,A3 SOMETHING QUEUED OUR DWT? DK4«, t00=0x0019, t01=0x0004}
0x02734…0276c               Head {h00=0x0034, h01=0x0050, text=» RF(E) DCTP16 YES, WAIT BEFORE TRANS. PARAM. DK4«, t00=0x0019, t01=0x0034}
0x0276c…02796               Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A1 NOT OURS, GET NEXT DK4«, t00=0x0019, t01=0x006c}
0x02796…027ae               Head {h00=0x0014, h01=0x0050, text=» RB DCTP14  DK4 «, t00=0x0019, t01=0x0096}
0x027ae…027c4               Head {h00=0x0012, h01=0x0050, text=»DCTP16 EQU *  «, t00=0x0019, t01=0x00ae}
0x027c4…027f0               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A6 SAVE DWT AS PARAMETER DK4«, t00=0x0019, t01=0x00c4}
0x027f0…02824               Head {h00=0x0030, h01=0x0050, text=» CF A15,SETIME WAIT UNTIL STATUS IS SENT DK4«, t00=0x0019, t01=0x00f0}
0x02824…02850               Head {h00=0x0028, h01=0x0050, text=» DATA TPTOUT,20 DELAY= 2 SECONDS DK4«, t00=0x0019, t01=0x0124}
0x02850…02866               Head {h00=0x0012, h01=0x0050, text=» RB DCRTN  DK4«, t00=0x0019, t01=0x0150}
0x02866…0287c               Head {h00=0x0012, h01=0x0050, text=»TPTOUT EQU *  «, t00=0x0019, t01=0x0166}
0x0287c…0289e               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 RESTORE DWT DK4«, t00=0x0019, t01=0x017c}
0x0289e…028cc               Head {h00=0x002a, h01=0x0050, text=» RB DCTP12 LOOK IN THE QUEUE AGAIN DK4«, t00=0x001a, t01=0x000e}
0x028cc…028e2               Head {h00=0x0012, h01=0x0050, text=»DCTP18 EQU *  «, t00=0x001a, t01=0x003c}
0x028e2…02912               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTBUF,A6 RESTORE TERM ADDR. DK4 «, t00=0x001a, t01=0x0052}
0x02912…0293e               Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x001a, t01=0x0082}
0x0293e…02946               Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00ae}
0x02946…0295a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x001a, t01=0x00b6}
0x0295a…02988               Head {h00=0x002a, h01=0x0050, text=» LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS «, t00=0x001a, t01=0x00ca}
0x02988…029a0               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTBUF,A6«, t00=0x001a, t01=0x00f8}
0x029a0…029cc               Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBRL,A8 CURSOR ADDRESS WORD «, t00=0x001a, t01=0x0110}
0x029cc…029e4               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTCUR,A6«, t00=0x001a, t01=0x013c}
0x029e4…029f0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0154}
0x029f0…02a16               Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x001a, t01=0x0160}
0x02a16…02a4c               Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!!  SHOULD NOT BE IN DC:TAB «, t00=0x001a, t01=0x0186}
0x02a4c…02a7a               Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x001b, t01=0x002c}
0x02a7a…02aa8               Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x001b, t01=0x005a}
0x02aa8…02ad2               Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x001b, t01=0x0088}
0x02ad2…02adc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x001b, t01=0x00b2}
0x02adc…02ae4               Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x00bc}
0x02ae4…02aec               Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x00c4}
0x02aec…02b00               Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x001b, t01=0x00cc}
0x02b00…02b26               Head {h00=0x0022, h01=0x0050, text=» LD A4,DCTAB DC:TAB ADDRESS =3«, t00=0x001b, t01=0x00e0}
0x02b26…02b4e               Head {h00=0x0024, h01=0x0050, text=» AD* A4,DCTAB LAST TABLE POS. =3«, t00=0x001b, t01=0x0106}
0x02b4e…02b7c               Head {h00=0x002a, h01=0x0050, text=»DCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3«, t00=0x001b, t01=0x012e}
0x02b7c…02baa               Head {h00=0x002a, h01=0x0050, text=» CW A4,DCTAB ALL ENTRIES CHECKED?? =3 «, t00=0x001b, t01=0x015c}
0x02baa…02bd8               Head {h00=0x002a, h01=0x0050, text=» RF(E) DCTP25 YES.DWT NOT IN TABLE =3 «, t00=0x001b, t01=0x018a}
0x02bd8…02bfa               Head {h00=0x001e, h01=0x0050, text=» CWR* A6,A4 IN TABLE ?? =3«, t00=0x001c, t01=0x0028}
0x02bfa…02c18               Head {h00=0x001a, h01=0x0050, text=» RF(E) DCTP30 YES!! =3«, t00=0x001c, t01=0x004a}
0x02c18…02c3e               Head {h00=0x0022, h01=0x0050, text=» RB DCTP22 CHECK NEXT ENTRY =3«, t00=0x001c, t01=0x0068}
0x02c3e…02c56               Head {h00=0x0014, h01=0x0050, text=»DCTP25 EQU *  =3«, t00=0x001c, t01=0x008e}
0x02c56…02c5e               Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x00a6}
0x02c5e…02c86               Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x001c, t01=0x00ae}
0x02c86…02c98               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x001c, t01=0x00d6}
0x02c98…02cc6               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x001c, t01=0x00e8}
0x02cc6…02cce               Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0116}
0x02cce…02cfc               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x001c, t01=0x011e}
0x02cfc…02d10               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x001c, t01=0x014c}
0x02d10…02d2c               Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x001c, t01=0x0160}
0x02d2c…02d44               Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x001c, t01=0x017c}
0x02d44…02d70 (29, 0, 400)  Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x001d, t01=0x0004}
0x02d70…02d7c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0030}
0x02d7c…02d90               Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x001d, t01=0x003c}
0x02d90…02db4               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x001d, t01=0x0050}
0x02db4…02dc8               Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x001d, t01=0x0074}
0x02dc8…02df0               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x001d, t01=0x0088}
0x02df0…02e02               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001d, t01=0x00b0}
0x02e02…02e0c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x001d, t01=0x00c2}
0x02e0c…02e16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00cc}
0x02e16…02e20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00d6}
0x02e20…02e30               Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x001d, t01=0x00e0}
0x02e30…02e3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00f0}
0x02e3a…02e44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00fa}
0x02e44…02e5c               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001d, t01=0x0104}
0x02e5c…02e7e               Head {h00=0x001e, h01=0x0050, text=»*   SUCCESFUL TRANSMISSION«, t00=0x001d, t01=0x011c}
0x02e7e…02e92               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001d, t01=0x013e}
0x02e92…02e9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0152}
0x02e9c…02ea6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x015c}
0x02ea6…02eb8               Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x001d, t01=0x0166}
0x02eb8…02ece               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001d, t01=0x0178}
0x02ece…02ef6               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x001d, t01=0x018e}
0x02ef6…02f1c               Head {h00=0x0022, h01=0x0050, text=» CWK A1,BUFLEN ILLEGAL LENGTH?«, t00=0x001e, t01=0x0026}
0x02f1c…02f38               Head {h00=0x0018, h01=0x0050, text=» RF(G) IL:LEN YES!! «, t00=0x001e, t01=0x004c}
0x02f38…02f44               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0068}
0x02f44…02f64               Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x001e, t01=0x0074}
0x02f64…02f88               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ  QUEUE REQUEST«, t00=0x001e, t01=0x0094}
0x02f88…02f9a               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001e, t01=0x00b8}
0x02f9a…02fa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00ca}
0x02fa4…02fae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00d4}
0x02fae…02fb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00de}
0x02fb8…02fc6               Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x001e, t01=0x00e8}
0x02fc6…02fd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00f6}
0x02fd0…02fda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0100}
0x02fda…02ff2               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001e, t01=0x010a}
0x02ff2…0300e               Head {h00=0x0018, h01=0x0050, text=»*   MESSAGE RECEIVED«, t00=0x001e, t01=0x0122}
0x0300e…03022               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001e, t01=0x013e}
0x03022…0302c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0152}
0x0302c…03036               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x015c}
0x03036…03048               Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x001e, t01=0x0166}
0x03048…03068               Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x001e, t01=0x0178}
0x03068…0309a               Head {h00=0x002e, h01=0x0050, text=» LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x001f, t01=0x0008}
0x0309a…030c0               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x001f, t01=0x003a}
0x030c0…030c8               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0060}
0x030c8…030d0               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0068}
0x030d0…030d8               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0070}
0x030d8…03104               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 TAKE THE FIRST IN QUEUE «, t00=0x001f, t01=0x0078}
0x03104…0311c               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x001f, t01=0x00a4}
0x0311c…0312e               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x001f, t01=0x00bc}
0x0312e…03154               Head {h00=0x0022, h01=0x0050, text=» LD A3,-4,A4 EFFECTIVE LENGTH «, t00=0x001f, t01=0x00ce}
0x03154…0316c               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x001f, t01=0x00f4}
0x0316c…03174               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x010c}
0x03174…03198               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x001f, t01=0x0114}
0x03198…031c6               Head {h00=0x002a, h01=0x0050, text=» CF A15,DC:MIN MOV DATA TO USER BUFFER«, t00=0x001f, t01=0x0138}
0x031c6…031d8               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001f, t01=0x0166}
0x031d8…031e0               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0178}
0x031e0…03208               Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x001f, t01=0x0180}
0x03208…0321a               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0020, t01=0x0018}
0x0321a…03224               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0020, t01=0x002a}
0x03224…0322e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0034}
0x0322e…03238               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x003e}
0x03238…0324c               Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x0020, t01=0x0048}
0x0324c…03256               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x005c}
0x03256…03260               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0066}
0x03260…03274               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0020, t01=0x0070}
0x03274…03286               Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x0020, t01=0x0084}
0x03286…032b4               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x0020, t01=0x0096}
0x032b4…032d0               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x0020, t01=0x00c4}
0x032d0…032f0               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x0020, t01=0x00e0}
0x032f0…03304               Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x0020, t01=0x0100}
0x03304…0331c               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x0020, t01=0x0114}
0x0331c…03340               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 COMPLETE REQUEST «, t00=0x0020, t01=0x012c}
0x03340…03354               Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x0020, t01=0x0150}
0x03354…0336c               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0020, t01=0x0164}
0x0336c…0337e               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x0020, t01=0x017c}
0x0337e…033aa               Head {h00=0x0028, h01=0x0050, text=» RB(Z) DCSS10 WACK HAS NOT BEEN SENT«, t00=0x0020, t01=0x018e}
0x033aa…033be               Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x0021, t01=0x002a}
0x033be…033ee               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x0021, t01=0x003e}
0x033ee…03406               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x0021, t01=0x006e}
0x03406…03418               Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x0021, t01=0x0086}
0x03418…03424               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0098}
0x03424…0342e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0021, t01=0x00a4}
0x0342e…03436               Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x00ae}
0x03436…03440               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00b6}
0x03440…03466               Head {h00=0x0022, h01=0x0050, text=»*   SET REQUEST TIMEOUT VALUE «, t00=0x0021, t01=0x00c0}
0x03466…03470               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00e6}
0x03470…0347a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00f0}
0x0347a…03482               Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x00fa}
0x03482…03496               Head {h00=0x0010, h01=0x0050, text=»REQTIM EQU *«, t00=0x0021, t01=0x0102}
0x03496…034bc               Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBCW,A8 TIMEOUT VALUE «, t00=0x0021, t01=0x0116}
0x034bc…034e4               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTTIM,A6 SAVE IT IN DWT «, t00=0x0021, t01=0x013c}
0x034e4…03508               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 TENDIO & DISPATCH«, t00=0x0021, t01=0x0164}
0x03508…03510               Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0188}
0x03510…0351a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0190}
0x0351a…03546               Head {h00=0x0028, h01=0x0050, text=»*   ILLEGAL APPLICATION BUFFER SIZE «, t00=0x0022, t01=0x000a}
0x03546…03550               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0036}
0x03550…03558               Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0040}
0x03558…03594               Head {h00=0x0038, h01=0x0050, text=»IL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH «, t00=0x0022, t01=0x0048}
0x03594…035b8               Head {h00=0x0020, h01=0x0050, text=» ABL DISEND COMPLETE REQUEST«, t00=0x0022, t01=0x0084}
0x035b8…035c2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0022, t01=0x00a8}
0x035c2…035cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00b2}
0x035cc…035d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00bc}
0x035d6…035e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00c6}
0x035e0…035fe               Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x0022, t01=0x00d0}
0x035fe…03608               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ee}
0x03608…03612               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00f8}
0x03612…0361c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0102}
0x0361c…03638               Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x0022, t01=0x010c}
0x03638…03642               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0128}
0x03642…03656               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x0022, t01=0x0132}
0x03656…03668               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0022, t01=0x0146}
0x03668…0369a               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0022, t01=0x0158}
0x0369a…036ba               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x0022, t01=0x018a}
0x036ba…036d0               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x0023, t01=0x001a}
0x036d0…036e6               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0023, t01=0x0030}
0x036e6…036fa               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x0023, t01=0x0046}
0x036fa…03710               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x0023, t01=0x005a}
0x03710…0373c               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x0023, t01=0x0070}
0x0373c…03750               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x0023, t01=0x009c}
0x03750…0376a               Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x0023, t01=0x00b0}
0x0376a…03774               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00ca}
0x03774…03790               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x0023, t01=0x00d4}
0x03790…0379a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00f0}
0x0379a…037ae               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x0023, t01=0x00fa}
0x037ae…037ca               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0023, t01=0x010e}
0x037ca…037de               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0023, t01=0x012a}
0x037de…037f2               Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x0023, t01=0x013e}
0x037f2…03818               Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x0023, t01=0x0152}
0x03818…03840               Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x0023, t01=0x0178}
0x03840…0384a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0010}
0x0384a…03866               Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x0024, t01=0x001a}
0x03866…03870               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0036}
0x03870…03888               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x0024, t01=0x0040}
0x03888…038ba               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0024, t01=0x0058}
0x038ba…038da               Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x0024, t01=0x008a}
0x038da…038ee               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x0024, t01=0x00aa}
0x038ee…03904               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0024, t01=0x00be}
0x03904…03918               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x0024, t01=0x00d4}
0x03918…0392c               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x0024, t01=0x00e8}
0x0392c…03944               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x0024, t01=0x00fc}
0x03944…03956               Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x0024, t01=0x0114}
0x03956…03960               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0024, t01=0x0126}
0x03960…0396a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0130}
0x0396a…03988               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x0024, t01=0x013a}
0x03988…03992               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0158}
0x03992…039a6               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x0024, t01=0x0162}
0x039a6…039c2               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0024, t01=0x0176}
0x039c2…039d6 (37, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0025, t01=0x0004}
0x039d6…03a04               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0025, t01=0x0018}
0x03a04…03a0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0046}
0x03a0e…03a38               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x0025, t01=0x0050}
0x03a38…03a5c               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x0025, t01=0x007a}
0x03a5c…03a72               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x0025, t01=0x009e}
0x03a72…03a84               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0025, t01=0x00b4}
0x03a84…03ab2               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT IS NOT WRITING«, t00=0x0025, t01=0x00c6}
0x03ab2…03ade               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x0025, t01=0x00f4}
0x03ade…03af0               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0025, t01=0x0120}
0x03af0…03afa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0132}
0x03afa…03b04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x013c}
0x03b04…03b16               Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x0025, t01=0x0146}
0x03b16…03b20               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0025, t01=0x0158}
0x03b20…03b2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0162}
0x03b2a…03b34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x016c}
0x03b34…03b52               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0025, t01=0x0176}
0x03b52…03b5c (38, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0004}
0x03b5c…03b86               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0026, t01=0x000e}
0x03b86…03b90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0038}
0x03b90…03b9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0042}
0x03b9a…03bae               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0026, t01=0x004c}
0x03bae…03bd8               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0026, t01=0x0060}
0x03bd8…03bfa               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0026, t01=0x008a}
0x03bfa…03c0e               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0026, t01=0x00ac}
0x03c0e…03c34               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0026, t01=0x00c0}
0x03c34…03c54               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0026, t01=0x00e6}
0x03c54…03c68               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0026, t01=0x0106}
0x03c68…03c7c               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0026, t01=0x011a}
0x03c7c…03c8e               Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0026, t01=0x012e}
0x03c8e…03c98               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0026, t01=0x0140}
0x03c98…03ca2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x014a}
0x03ca2…03cbe               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0026, t01=0x0154}
0x03cbe…03cc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0170}
0x03cc8…03cf0               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0026, t01=0x017a}
0x03cf0…03d14               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0027, t01=0x0012}
0x03d14…03d3e               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0027, t01=0x0036}
0x03d3e…03d60               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0027, t01=0x0060}
0x03d60…03d6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0082}
0x03d6a…03d74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x008c}
0x03d74…03da0               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0027, t01=0x0096}
0x03da0…03db0               Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x0027, t01=0x00c2}
0x03db0…03dc4               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x0027, t01=0x00d2}
0x03dc4…03de8               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x0027, t01=0x00e6}
0x03de8…03e1a               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x0027, t01=0x010a}
0x03e1a…03e2c               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0027, t01=0x013c}
0x03e2c…03e5a               Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0027, t01=0x014e}
0x03e5a…03e7c               Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x0027, t01=0x017c}
0x03e7c…03e86               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0028, t01=0x000e}
0x03e86…03e90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0018}
0x03e90…03e9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0022}
0x03e9a…03ec6               Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x0028, t01=0x002c}
0x03ec6…03ed0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0058}
0x03ed0…03eec               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0028, t01=0x0062}
0x03eec…03efc               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0028, t01=0x007e}
0x03efc…03f06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x008e}
0x03f06…03f32               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0028, t01=0x0098}
0x03f32…03f4e               Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x0028, t01=0x00c4}
0x03f4e…03f68               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0028, t01=0x00e0}
0x03f68…03f90               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0028, t01=0x00fa}
0x03f90…03fa2               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0028, t01=0x0122}
0x03fa2…03fb4               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0028, t01=0x0134}
0x03fb4…03fcc               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0028, t01=0x0146}
0x03fcc…03fee               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0028, t01=0x015e}
0x03fee…04014               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0028, t01=0x0180}
0x04014…0402e               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0029, t01=0x0016}
0x0402e…04038               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0030}
0x04038…04042               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x003a}
0x04042…04070               Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x0029, t01=0x0044}
0x04070…0407a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0072}
0x0407a…04096               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0029, t01=0x007c}
0x04096…040a6               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0029, t01=0x0098}
0x040a6…040b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00a8}
0x040b0…040de               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x0029, t01=0x00b2}
0x040de…04114               Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x0029, t01=0x00e0}
0x04114…04128               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x0029, t01=0x0116}
0x04128…0413c               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x0029, t01=0x012a}
0x0413c…04154               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x0029, t01=0x013e}
0x04154…0417e               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x0029, t01=0x0156}
0x0417e…04190               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x0029, t01=0x0180}
0x04190…041a4 (42, 0, 398)  Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x002a, t01=0x0004}
0x041a4…041c0               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x002a, t01=0x0018}
0x041c0…041d2               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x002a, t01=0x0034}
0x041d2…041f2               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x002a, t01=0x0046}
0x041f2…04204               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x002a, t01=0x0066}
0x04204…0421e               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x002a, t01=0x0078}
0x0421e…04228               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002a, t01=0x0092}
0x04228…04232               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x009c}
0x04232…0423c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00a6}
0x0423c…04260               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x002a, t01=0x00b0}
0x04260…0426a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00d4}
0x0426a…0427e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x002a, t01=0x00de}
0x0427e…0429a               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002a, t01=0x00f2}
0x0429a…042aa               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002a, t01=0x010e}
0x042aa…042b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x011e}
0x042b4…042c8               Head {h00=0x0010, h01=0x0050, text=»INSSQ EQU * «, t00=0x002a, t01=0x0128}
0x042c8…042f4               Head {h00=0x0028, h01=0x0050, text=» LD A2,0,A6 GET TERMINAL ADDRESS DK4«, t00=0x002a, t01=0x013c}
0x042f4…04322               Head {h00=0x002a, h01=0x0050, text=» ANK A2,/FF IF ADDRESS = 00 OR /7F DK4«, t00=0x002a, t01=0x0168}
0x04322…0434e               Head {h00=0x0028, h01=0x0050, text=» RB(Z) GBUF10 DONT PUT IN STATUS DK4«, t00=0x002b, t01=0x0008}
0x0434e…0437e               Head {h00=0x002c, h01=0x0050, text=» SUK A2,/7F QUEUE, TERMINAL HAS BEEN DK4«, t00=0x002b, t01=0x0034}
0x0437e…043a6               Head {h00=0x0024, h01=0x0050, text=» RB(Z) GBUF10 MADE INACTIVE DK4 «, t00=0x002b, t01=0x0064}
0x043a6…043ce               Head {h00=0x0024, h01=0x0050, text=» LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002b, t01=0x008c}
0x043ce…043e4               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002b, t01=0x00b4}
0x043e4…043f6               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002b, t01=0x00ca}
0x043f6…04400               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00dc}
0x04400…0440a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00e6}
0x0440a…04430               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x002b, t01=0x00f0}
0x04430…0443a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0116}
0x0443a…04456               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x0120}
0x04456…04466               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x013c}
0x04466…04470               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x014c}
0x04470…0449e               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002b, t01=0x0156}
0x0449e…044b4               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002b, t01=0x0184}
0x044b4…044c6               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x002c, t01=0x000a}
0x044c6…044d2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x001c}
0x044d2…044dc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002c, t01=0x0028}
0x044dc…044e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0032}
0x044e6…044f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x003c}
0x044f0…04518               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x002c, t01=0x0046}
0x04518…04522               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x006e}
0x04522…0453a               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x002c, t01=0x0078}
0x0453a…04554               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002c, t01=0x0090}
0x04554…0455e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00aa}
0x0455e…04572               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002c, t01=0x00b4}
0x04572…04588               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002c, t01=0x00c8}
0x04588…045b4               Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002c, t01=0x00de}
0x045b4…045c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x010a}
0x045c0…045d6               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002c, t01=0x0116}
0x045d6…045fe               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002c, t01=0x012c}
0x045fe…0460a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0154}
0x0460a…0463a               Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002c, t01=0x0160}
0x0463a…0464e               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002c, t01=0x0190}
0x0464e…04662               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002d, t01=0x0014}
0x04662…0468a               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002d, t01=0x0028}
0x0468a…0469c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002d, t01=0x0050}
0x0469c…046ae               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002d, t01=0x0062}
0x046ae…046d8               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002d, t01=0x0074}
0x046d8…046fe               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002d, t01=0x009e}
0x046fe…0470e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002d, t01=0x00c4}
0x0470e…04718               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002d, t01=0x00d4}
0x04718…04722               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00de}
0x04722…0472c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00e8}
0x0472c…04762               Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x002d, t01=0x00f2}
0x04762…0476c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0128}
0x0476c…047a4               Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x002d, t01=0x0132}
0x047a4…047ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x016a}
0x047ae…047cc               Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x002d, t01=0x0174}
0x047cc…047e4 (46, 0, 400)  Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x002e, t01=0x0004}
0x047e4…04804               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x002e, t01=0x001c}
0x04804…04824               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x002e, t01=0x003c}
0x04824…0483c               Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x002e, t01=0x005c}
0x0483c…04856               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x002e, t01=0x0074}
0x04856…0487e               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x002e, t01=0x008e}
0x0487e…048ac               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x002e, t01=0x00b6}
0x048ac…048d2               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x002e, t01=0x00e4}
0x048d2…048da               Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x010a}
0x048da…048e2               Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x0112}
0x048e2…04912               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x002e, t01=0x011a}
0x04912…04944               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x002e, t01=0x014a}
0x04944…0496a               Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x002e, t01=0x017c}
0x0496a…04994               Head {h00=0x0026, h01=0x0050, text=»   DONT DESTROY BUFFER ADDRESS =6 «, t00=0x002f, t01=0x0012}
0x04994…049a8               Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x002f, t01=0x003c}
0x049a8…049dc               Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x002f, t01=0x0050}
0x049dc…049f0               Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x002f, t01=0x0084}
0x049f0…04a22               Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x002f, t01=0x0098}
0x04a22…04a2a               Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x00ca}
0x04a2a…04a4e               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x002f, t01=0x00d2}
0x04a4e…04a78               Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 RECEIVE BUFFER ADDRESS «, t00=0x002f, t01=0x00f6}
0x04a78…04aa8               Head {h00=0x002c, h01=0x0050, text=» CF A15,DC:MIN MOVE DATA TO USER BUFFER «, t00=0x002f, t01=0x0120}
0x04aa8…04ad6               Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x002f, t01=0x0150}
0x04ad6…04aee               Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x002f, t01=0x017e}
0x04aee…04b2a               Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x0030, t01=0x0008}
0x04b2a…04b5a               Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x0030, t01=0x0044}
0x04b5a…04b70               Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x0030, t01=0x0074}
0x04b70…04b86               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x0030, t01=0x008a}
0x04b86…04bb0               Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x0030, t01=0x00a0}
0x04bb0…04bde               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x0030, t01=0x00ca}
0x04bde…04c12               Head {h00=0x0030, h01=0x0050, text=» CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x0030, t01=0x00f8}
0x04c12…04c24               Head {h00=0x000e, h01=0x0050, text=» RB CKM110«, t00=0x0030, t01=0x012c}
0x04c24…04c2e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0030, t01=0x013e}
0x04c2e…04c36               Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x0148}
0x04c36…04c7a               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0030, t01=0x0150}
0x04c7a…04c84 (49, 0, 398)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0004}
0x04c84…04c9e               Head {h00=0x0016, h01=0x0050, text=»*    ABORT ROUTINE«, t00=0x0031, t01=0x000e}
0x04c9e…04ca8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0028}
0x04ca8…04cc8               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0031, t01=0x0032}
0x04cc8…04cd0               Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x0052}
0x04cd0…04cfa               Head {h00=0x0026, h01=0x0050, text=»ABORT LD A1,DWTTP,A6 TIMER POINTER«, t00=0x0031, t01=0x005a}
0x04cfa…04d20               Head {h00=0x0022, h01=0x0050, text=» RF(Z) AB:10 NO TIMER RUNNING «, t00=0x0031, t01=0x0084}
0x04d20…04d40               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 KILL TIMER«, t00=0x0031, t01=0x00aa}
0x04d40…04d54               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0031, t01=0x00ca}
0x04d54…04d5c               Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x00de}
0x04d5c…04d84               Head {h00=0x0024, h01=0x0050, text=»AB:10 LD A1,DWTOR,A6 ORDER CODE «, t00=0x0031, t01=0x00e6}
0x04d84…04d96               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0031, t01=0x010e}
0x04d96…04dc4               Head {h00=0x002a, h01=0x0050, text=» RF(Z) AB:RTN READ REQUEST. NO ACTION «, t00=0x0031, t01=0x0120}
0x04dc4…04dd6               Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x0031, t01=0x014e}
0x04dd6…04e08               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE«, t00=0x0031, t01=0x0160}
0x04e08…04e10 (50, 0, 398)  Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x0004}
0x04e10…04e42               Head {h00=0x002e, h01=0x0050, text=» CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE«, t00=0x0032, t01=0x000c}
0x04e42…04e6c               Head {h00=0x0026, h01=0x0050, text=» LD A2,FDWTUT WRITING DWT ADDRESS «, t00=0x0032, t01=0x003e}
0x04e6c…04e7e               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0032, t01=0x0068}
0x04e7e…04ea2               Head {h00=0x0020, h01=0x0050, text=» RF(NE) AB:RTN NOT THIS DWT «, t00=0x0032, t01=0x007a}
0x04ea2…04ec6               Head {h00=0x0020, h01=0x0050, text=» CM XACK RESET ACK EXPECTED «, t00=0x0032, t01=0x009e}
0x04ec6…04eea               Head {h00=0x0020, h01=0x0050, text=» CM FDWTUT RESET WRITING DWT«, t00=0x0032, t01=0x00c2}
0x04eea…04ef2               Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x00e6}
0x04ef2…04f06               Head {h00=0x0010, h01=0x0050, text=»AB:RTN EQU *«, t00=0x0032, t01=0x00ee}
0x04f06…04f1c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0032, t01=0x0102}
0x04f1c…04f30               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0032, t01=0x0118}
0x04f30…04f58               Head {h00=0x0024, h01=0x0050, text=» ABR* A15 RETURN IN INHIBIT MODE«, t00=0x0032, t01=0x012c}
0x04f58…04f64               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x0154}
0x04f64…04f7a               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0032, t01=0x0160}
0x04f7a…04f8a               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0032, t01=0x0176}
0x04f8a…04f96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x0186}
0x04f96…04fa0 (51, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0033, t01=0x0004}
0x04fa0…04fa8               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x000e}
0x04fa8…04fb2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0033, t01=0x0016}
0x04fb2…04fbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0020}
0x04fbc…04fc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x002a}
0x04fc6…04fe4               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0033, t01=0x0034}
0x04fe4…0500c               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0033, t01=0x0052}
0x0500c…05016               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x007a}
0x05016…05028               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0033, t01=0x0084}
0x05028…05050               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0033, t01=0x0096}
0x05050…0505a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00be}
0x0505a…05064               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00c8}
0x05064…0507c               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0033, t01=0x00d2}
0x0507c…05090               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0033, t01=0x00ea}
0x05090…050a4               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0033, t01=0x00fe}
0x050a4…050b8               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0033, t01=0x0112}
0x050b8…050cc               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0033, t01=0x0126}
0x050cc…050e0               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0033, t01=0x013a}
0x050e0…050fa               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0033, t01=0x014e}
0x050fa…05104               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0033, t01=0x0168}
0x05104…0511c               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0033, t01=0x0172}
0x0511c…05130               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0033, t01=0x018a}
0x05130…05142               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0034, t01=0x000e}
0x05142…05156               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0034, t01=0x0020}
0x05156…05168               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0034, t01=0x0034}
0x05168…0517c               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0034, t01=0x0046}
0x0517c…0518e               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0034, t01=0x005a}
0x0518e…051a2               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0034, t01=0x006c}
0x051a2…051b4               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0034, t01=0x0080}
0x051b4…051c8               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0034, t01=0x0092}
0x051c8…051da               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0034, t01=0x00a6}
0x051da…051ee               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0034, t01=0x00b8}
0x051ee…05202               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0034, t01=0x00cc}
0x05202…05216               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0034, t01=0x00e0}
0x05216…05228               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0034, t01=0x00f4}
0x05228…05232               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0034, t01=0x0106}
0x05232…0523c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0110}
0x0523c…05246               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x011a}
0x05246…0525c               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0034, t01=0x0124}
0x0525c…05266               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x013a}
0x05266…05270               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0144}
0x05270…0529e               Head {h00=0x002a, h01=0x0050, text=»TIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK«, t00=0x0034, t01=0x014e}
0x0529e…052c4               Head {h00=0x0022, h01=0x0050, text=»TIMNAK EQU 3 DELAY FOR NAK DK «, t00=0x0034, t01=0x017c}
0x052c4…052ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0012}
0x052ce…052d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x001c}
0x052d8…052f4               Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0035, t01=0x0026}
0x052f4…052fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0042}
0x052fe…05328               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0035, t01=0x004c}
0x05328…0533c               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0035, t01=0x0076}
0x0533c…05350               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0035, t01=0x008a}
0x05350…05364               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0035, t01=0x009e}
0x05364…05378               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0035, t01=0x00b2}
0x05378…0538c               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0035, t01=0x00c6}
0x0538c…053a0               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0035, t01=0x00da}
0x053a0…053b4               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0035, t01=0x00ee}
0x053b4…053c8               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0035, t01=0x0102}
0x053c8…053dc               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0035, t01=0x0116}
0x053dc…053f0               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0035, t01=0x012a}
0x053f0…05404               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0035, t01=0x013e}
0x05404…05418               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0035, t01=0x0152}
0x05418…0542a               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0035, t01=0x0166}
0x0542a…05440               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0035, t01=0x0178}
0x05440…05456               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0035, t01=0x018e}
0x05456…0546a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0036, t01=0x0014}
0x0546a…0547e               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0036, t01=0x0028}
0x0547e…05492               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0036, t01=0x003c}
0x05492…054a6               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0036, t01=0x0050}
0x054a6…054ba               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0036, t01=0x0064}
0x054ba…054ce               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0036, t01=0x0078}
0x054ce…054e2               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0036, t01=0x008c}
0x054e2…054f6               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0036, t01=0x00a0}
0x054f6…05502               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x00b4}
0x05502…05516               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0036, t01=0x00c0}
0x05516…0552a               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0036, t01=0x00d4}
0x0552a…0555e               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0036, t01=0x00e8}
0x0555e…0556a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x011c}
0x0556a…0557e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0036, t01=0x0128}
0x0557e…05592               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0036, t01=0x013c}
0x05592…055a6               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0036, t01=0x0150}
0x055a6…055be               Head {h00=0x0014, h01=0x0050, text=»RVI EQU XRVI  DK«, t00=0x0036, t01=0x0164}
0x055be…055d2               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0036, t01=0x017c}
0x055d2…055e6               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0036, t01=0x0190}
0x055e6…055fc               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0037, t01=0x0014}
0x055fc…05608               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x002a}
0x05608…05612               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0037, t01=0x0036}
0x05612…0561c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0040}
0x0561c…05626               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x004a}
0x05626…05644               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0037, t01=0x0054}
0x05644…0564e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0072}
0x0564e…05658               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x007c}
0x05658…05686               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0037, t01=0x0086}
0x05686…056b8               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0037, t01=0x00b4}
0x056b8…056d8               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x0037, t01=0x00e6}
0x056d8…056f4               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x0037, t01=0x0106}
0x056f4…05710               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x0037, t01=0x0122}
0x05710…05746               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x0037, t01=0x013e}
0x05746…0576c               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x0037, t01=0x0174}
0x0576c…0578c               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x0038, t01=0x000a}
0x0578c…057ba               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x0038, t01=0x002a}
0x057ba…057c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0058}
0x057c4…057e2               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x0038, t01=0x0062}
0x057e2…0580e               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x0038, t01=0x0080}
0x0580e…05838               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x0038, t01=0x00ac}
0x05838…05858               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x0038, t01=0x00d6}
0x05858…0588c               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x0038, t01=0x00f6}
0x0588c…058b4               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x0038, t01=0x012a}
0x058b4…058e6               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x0038, t01=0x0152}
0x058e6…05916               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x0038, t01=0x0184}
0x05916…05942               Head {h00=0x0028, h01=0x0050, text=»CRDBUF DATA 0 READ BUFFER COUNTER DK«, t00=0x0039, t01=0x0024}
0x05942…0594c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0050}
0x0594c…05956               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x005a}
0x05956…0597e               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x0039, t01=0x0064}
0x0597e…05988               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x008c}
0x05988…05992               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0096}
0x05992…059a6               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0039, t01=0x00a0}
0x059a6…059d8               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x0039, t01=0x00b4}
0x059d8…059e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00e6}
0x059e2…059ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00f0}
0x059ec…05a00               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x0039, t01=0x00fa}
0x05a00…05a14               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x0039, t01=0x010e}
0x05a14…05a1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0122}
0x05a1e…05a54               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x0039, t01=0x012c}
0x05a54…05a84               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x0039, t01=0x0162}
0x05a84…05a90 (58, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x0004}
0x05a90…05a9a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x003a, t01=0x0010}
0x05a9a…05aa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x001a}
0x05aa4…05aae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0024}
0x05aae…05aca               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x003a, t01=0x002e}
0x05aca…05ad4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x004a}
0x05ad4…05afa               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x003a, t01=0x0054}
0x05afa…05b24               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x003a, t01=0x007a}
0x05b24…05b2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00a4}
0x05b2e…05b38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00ae}
0x05b38…05b54               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003a, t01=0x00b8}
0x05b54…05b84               Head {h00=0x002c, h01=0x0050, text=»BRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ«, t00=0x003a, t01=0x00d4}
0x05b84…05b9a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003a, t01=0x0104}
0x05b9a…05bac               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x003a, t01=0x011a}
0x05bac…05bd0               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x003a, t01=0x012c}
0x05bd0…05bec               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003a, t01=0x0150}
0x05bec…05c22               Head {h00=0x0032, h01=0x0050, text=» CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS «, t00=0x003a, t01=0x016c}
0x05c22…05c38               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x0012}
0x05c38…05c54               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003b, t01=0x0028}
0x05c54…05c88               Head {h00=0x0030, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ«, t00=0x003b, t01=0x0044}
0x05c88…05c9e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x0078}
0x05c9e…05cb2               Head {h00=0x0010, h01=0x0050, text=»BRM010 EQU *«, t00=0x003b, t01=0x008e}
0x05cb2…05cd4               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x003b, t01=0x00a2}
0x05cd4…05d08               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN«, t00=0x003b, t01=0x00c4}
0x05d08…05d1e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x00f8}
0x05d1e…05d3a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003b, t01=0x010e}
0x05d3a…05d4e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x003b, t01=0x012a}
0x05d4e…05d86               Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN «, t00=0x003b, t01=0x013e}
0x05d86…05d9c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x0176}
0x05d9c…05db8               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003b, t01=0x018c}
0x05db8…05dde               Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x003c, t01=0x0018}
0x05dde…05df4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x003e}
0x05df4…05e10               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003c, t01=0x0054}
0x05e10…05e2c               Head {h00=0x0018, h01=0x0050, text=» IFF CODE=1  SALCUZ «, t00=0x003c, t01=0x0070}
0x05e2c…05e48               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x003c, t01=0x008c}
0x05e48…05e76               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003c, t01=0x00a8}
0x05e76…05e92               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x003c, t01=0x00d6}
0x05e92…05ec8               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003c, t01=0x00f2}
0x05ec8…05ee6               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003c, t01=0x0128}
0x05ee6…05efc               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003c, t01=0x0146}
0x05efc…05f1e               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=2  SALCUZ «, t00=0x003c, t01=0x015c}
0x05f1e…05f38               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x003c, t01=0x017e}
0x05f38…05f66               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003d, t01=0x0008}
0x05f66…05f84               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x003d, t01=0x0036}
0x05f84…05fba               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003d, t01=0x0054}
0x05fba…05fd8               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003d, t01=0x008a}
0x05fd8…05fee               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x00a8}
0x05fee…06002               Head {h00=0x0010, h01=0x0050, text=»BRM100 EQU *«, t00=0x003d, t01=0x00be}
0x06002…0602a               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003d, t01=0x00d2}
0x0602a…0604e               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003d, t01=0x00fa}
0x0604e…06060               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003d, t01=0x011e}
0x06060…06074               Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x003d, t01=0x0130}
0x06074…06096               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x003d, t01=0x0144}
0x06096…060ae               Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x003d, t01=0x0166}
0x060ae…060d0               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x003d, t01=0x017e}
0x060d0…060e8               Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x003e, t01=0x0010}
0x060e8…0610c               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x003e, t01=0x0028}
0x0610c…06124               Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x003e, t01=0x004c}
0x06124…06148               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x003e, t01=0x0064}
0x06148…06160               Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x003e, t01=0x0088}
0x06160…06184               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x003e, t01=0x00a0}
0x06184…06198               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003e, t01=0x00c4}
0x06198…061aa               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003e, t01=0x00d8}
0x061aa…061d2               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003e, t01=0x00ea}
0x061d2…061f6               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003e, t01=0x0112}
0x061f6…06208               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003e, t01=0x0136}
0x06208…06232               Head {h00=0x0026, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESSING «, t00=0x003e, t01=0x0148}
0x06232…0623e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0172}
0x0623e…06250               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003e, t01=0x017e}
0x06250…06268               Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x003e, t01=0x0190}
0x06268…06286               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x003f, t01=0x0018}
0x06286…06298               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x003f, t01=0x0036}
0x06298…062ae               Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x003f, t01=0x0048}
0x062ae…062d2               Head {h00=0x0020, h01=0x0050, text=» RF(NE) BRM150 NOT THIS TCU «, t00=0x003f, t01=0x005e}
0x062d2…062e6               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x003f, t01=0x0082}
0x062e6…06308               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x003f, t01=0x0096}
0x06308…0632c               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003f, t01=0x00b8}
0x0632c…0633e               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003f, t01=0x00dc}
0x0633e…06352               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003f, t01=0x00ee}
0x06352…06374               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x003f, t01=0x0102}
0x06374…06398               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003f, t01=0x0124}
0x06398…063aa               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003f, t01=0x0148}
0x063aa…063da               Head {h00=0x002c, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESS SEQUENCE «, t00=0x003f, t01=0x015a}
0x063da…063e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x018a}
0x063e6…0640c               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ READ ONE CHARACTER«, t00=0x0040, t01=0x0008}
0x0640c…06428               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0040, t01=0x002e}
0x06428…06440               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0040, t01=0x004a}
0x06440…06456               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0040, t01=0x0062}
0x06456…06472               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0040, t01=0x0078}
0x06472…0648e               Head {h00=0x0018, h01=0x0050, text=» SUK A2,ENQ  SALCUZ «, t00=0x0040, t01=0x0094}
0x0648e…064a4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0040, t01=0x00b0}
0x064a4…064c2               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) BRM150 NOT ENQ«, t00=0x0040, t01=0x00c6}
0x064c2…064de               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0040, t01=0x00e4}
0x064de…06506               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ READ LAST CHARACTER «, t00=0x0040, t01=0x0100}
0x06506…0650e               Head {h00=0x0004, h01=0x0050, t00=0x0040, t01=0x0128}
0x0650e…06534               Head {h00=0x0022, h01=0x0050, text=»* TRAILING PAD CAN BE CHECKED «, t00=0x0040, t01=0x0130}
0x06534…0653c               Head {h00=0x0004, h01=0x0050, t00=0x0040, t01=0x0156}
0x0653c…0655e               Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,LCUIN HALT INPUT«, t00=0x0040, t01=0x015e}
0x0655e…06574               Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUIN «, t00=0x0040, t01=0x0180}
0x06574…0658a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0041, t01=0x0008}
0x0658a…065a6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0041, t01=0x001e}
0x065a6…065ce               Head {h00=0x0024, h01=0x0050, text=» CF A5,HALTIN HALT INPUT SALCUZ «, t00=0x0041, t01=0x003a}
0x065ce…06600               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) BRM010 PARITY ERROR SALCUZ  SALCUZ«, t00=0x0041, t01=0x0062}
0x06600…06616               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0041, t01=0x0094}
0x06616…06628               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0041, t01=0x00aa}
0x06628…0664c               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK COUNTER«, t00=0x0041, t01=0x00bc}
0x0664c…0665e               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x0041, t01=0x00e0}
0x0665e…06670               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x0041, t01=0x00f2}
0x06670…06690               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x0041, t01=0x0104}
0x06690…066a2               Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x0041, t01=0x0124}
0x066a2…066c4               Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x0041, t01=0x0136}
0x066c4…066d8               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0041, t01=0x0158}
0x066d8…06712               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x0041, t01=0x016c}
0x06712…0671e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0016}
0x0671e…06732               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0042, t01=0x0022}
0x06732…0675c               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0042, t01=0x0036}
0x0675c…06768               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0060}
0x06768…0678a               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0042, t01=0x006c}
0x0678a…067ae               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x0042, t01=0x008e}
0x067ae…067ca               Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x0042, t01=0x00b2}
0x067ca…067de               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x0042, t01=0x00ce}
0x067de…06808               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0042, t01=0x00e2}
0x06808…0682a               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0042, t01=0x010c}
0x0682a…0684a               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x0042, t01=0x012e}
0x0684a…06860               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=0   «, t00=0x0042, t01=0x014e}
0x06860…06888               Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x0042, t01=0x0164}
0x06888…0689c               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0042, t01=0x018c}
0x0689c…068b0               Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x0043, t01=0x0010}
0x068b0…068c0               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0043, t01=0x0024}
0x068c0…068d6               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=1   «, t00=0x0043, t01=0x0034}
0x068d6…068f6               Head {h00=0x001c, h01=0x0050, text=» ABL BRM INVALID ADDRESS«, t00=0x0043, t01=0x004a}
0x068f6…06906               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0043, t01=0x006a}
0x06906…06910               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x007a}
0x06910…06940               Head {h00=0x002c, h01=0x0050, text=»*   WAIT FOR MARK HOLD TO RESYNCHRONIZE «, t00=0x0043, t01=0x0084}
0x06940…0694a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00b4}
0x0694a…0695e               Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0043, t01=0x00be}
0x0695e…06972               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0043, t01=0x00d2}
0x06972…06986               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0043, t01=0x00e6}
0x06986…069a6               Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM RESYNCHRONIZE«, t00=0x0043, t01=0x00fa}
0x069a6…069d0               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ ANOTHER CHARACTER«, t00=0x0043, t01=0x011a}
0x069d0…069e2               Head {h00=0x000e, h01=0x0050, text=» RB BRM150«, t00=0x0043, t01=0x0144}
0x069e2…069ec               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0043, t01=0x0156}
0x069ec…069f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0160}
0x069f6…06a00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x016a}
0x06a00…06a20               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0043, t01=0x0174}
0x06a20…06a2a (68, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0004}
0x06a2a…06a34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x000e}
0x06a34…06a48               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0044, t01=0x0018}
0x06a48…06a72               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0044, t01=0x002c}
0x06a72…06a86               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0044, t01=0x0056}
0x06a86…06aa8               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0044, t01=0x006a}
0x06aa8…06ab4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x008c}
0x06ab4…06ac8               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0044, t01=0x0098}
0x06ac8…06af2               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0044, t01=0x00ac}
0x06af2…06b18               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0044, t01=0x00d6}
0x06b18…06b3c               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0044, t01=0x00fc}
0x06b3c…06b56               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0044, t01=0x0120}
0x06b56…06b82               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0044, t01=0x013a}
0x06b82…06b96               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0044, t01=0x0166}
0x06b96…06bbc               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0044, t01=0x017a}
0x06bbc…06bd0               Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0045, t01=0x0010}
0x06bd0…06bf2               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0045, t01=0x0024}
0x06bf2…06c02               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0045, t01=0x0046}
0x06c02…06c0c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0045, t01=0x0056}
0x06c0c…06c16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0060}
0x06c16…06c20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x006a}
0x06c20…06c40               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0045, t01=0x0074}
0x06c40…06c4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0094}
0x06c4a…06c54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x009e}
0x06c54…06c68               Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0045, t01=0x00a8}
0x06c68…06c7c               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0045, t01=0x00bc}
0x06c7c…06c90               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0045, t01=0x00d0}
0x06c90…06cb2               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0045, t01=0x00e4}
0x06cb2…06cc8               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0045, t01=0x0106}
0x06cc8…06cf2               Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0045, t01=0x011c}
0x06cf2…06d06               Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0045, t01=0x0146}
0x06d06…06d28               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0045, t01=0x015a}
0x06d28…06d3a               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0045, t01=0x017c}
0x06d3a…06d5c               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0045, t01=0x018e}
0x06d5c…06d70               Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0046, t01=0x0020}
0x06d70…06d9c               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0046, t01=0x0034}
0x06d9c…06db0               Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0046, t01=0x0060}
0x06db0…06dce               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0046, t01=0x0074}
0x06dce…06dde               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0046, t01=0x0092}
0x06dde…06df2               Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0046, t01=0x00a2}
0x06df2…06e06               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0046, t01=0x00b6}
0x06e06…06e1a               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0046, t01=0x00ca}
0x06e1a…06e44               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0046, t01=0x00de}
0x06e44…06e5a               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0046, t01=0x0108}
0x06e5a…06e84               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0046, t01=0x011e}
0x06e84…06eaa               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0046, t01=0x0148}
0x06eaa…06ede               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0046, t01=0x016e}
0x06ede…06efa               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0047, t01=0x0012}
0x06efa…06f06               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x002e}
0x06f06…06f1a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0047, t01=0x003a}
0x06f1a…06f4a               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0047, t01=0x004e}
0x06f4a…06f64               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0047, t01=0x007e}
0x06f64…06f90               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0047, t01=0x0098}
0x06f90…06fb0               Head {h00=0x001c, h01=0x0050, text=» CM CACK PRESET ACK-1 =7«, t00=0x0047, t01=0x00c4}
0x06fb0…06fd4               Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x0047, t01=0x00e4}
0x06fd4…06fe0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0108}
0x06fe0…0700c               Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x0047, t01=0x0114}
0x0700c…07024               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0047, t01=0x0140}
0x07024…0703c               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0047, t01=0x0158}
0x0703c…0704e               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0047, t01=0x0170}
0x0704e…07066               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0047, t01=0x0182}
0x07066…0707e               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ  =8 «, t00=0x0048, t01=0x000a}
0x0707e…07090               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0048, t01=0x0022}
0x07090…070bc               Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x0048, t01=0x0034}
0x070bc…070ce               Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x0048, t01=0x0060}
0x070ce…070e2               Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x0048, t01=0x0072}
0x070e2…07106               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0048, t01=0x0086}
0x07106…0712e               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0048, t01=0x00aa}
0x0712e…07140               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0048, t01=0x00d2}
0x07140…07154               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0048, t01=0x00e4}
0x07154…0717a               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x0048, t01=0x00f8}
0x0717a…0718e               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0048, t01=0x011e}
0x0718e…071a2               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x0048, t01=0x0132}
0x071a2…071b4               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x0048, t01=0x0146}
0x071b4…071d8               Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x0048, t01=0x0158}
0x071d8…071ea               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0048, t01=0x017c}
0x071ea…0720e               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x0048, t01=0x018e}
0x0720e…07220               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0049, t01=0x0022}
0x07220…07236               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x0049, t01=0x0034}
0x07236…07262               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x0049, t01=0x004a}
0x07262…07280               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x0049, t01=0x0076}
0x07280…072aa               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x0049, t01=0x0094}
0x072aa…072b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x00be}
0x072b6…072ca               Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x0049, t01=0x00ca}
0x072ca…072dc               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0049, t01=0x00de}
0x072dc…07306               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x0049, t01=0x00f0}
0x07306…07316               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0049, t01=0x011a}
0x07316…07344               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0049, t01=0x012a}
0x07344…07356               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0049, t01=0x0158}
0x07356…0737a               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x0049, t01=0x016a}
0x0737a…07384               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x018e}
0x07384…073aa               Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x004a, t01=0x0008}
0x073aa…073b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x002e}
0x073b4…073c8               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x004a, t01=0x0038}
0x073c8…073dc               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x004a, t01=0x004c}
0x073dc…073f6               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x004a, t01=0x0060}
0x073f6…0740c               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x004a, t01=0x007a}
0x0740c…07422               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x004a, t01=0x0090}
0x07422…07436               Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x004a, t01=0x00a6}
0x07436…07442               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x00ba}
0x07442…07456               Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x004a, t01=0x00c6}
0x07456…0746c               Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x004a, t01=0x00da}
0x0746c…0749c               Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x004a, t01=0x00f0}
0x0749c…074be               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004a, t01=0x0120}
0x074be…074de               Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x004a, t01=0x0142}
0x074de…074f8               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004a, t01=0x0162}
0x074f8…07518               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004a, t01=0x017c}
0x07518…07542               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM327 ANY MESSAGE ORDER =4«, t00=0x004b, t01=0x000c}
0x07542…07554               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x004b, t01=0x0036}
0x07554…07566               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x004b, t01=0x0048}
0x07566…0757e               Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x004b, t01=0x005a}
0x0757e…075a4               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x004b, t01=0x0072}
0x075a4…075b8               Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x004b, t01=0x0098}
0x075b8…075d2               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x004b, t01=0x00ac}
0x075d2…075fa               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x004b, t01=0x00c6}
0x075fa…0761a               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x004b, t01=0x00ee}
0x0761a…07648               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x004b, t01=0x010e}
0x07648…07672               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x004b, t01=0x013c}
0x07672…0769e               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x004b, t01=0x0166}
0x0769e…076a8 (76, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x004c, t01=0x0004}
0x076a8…076b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x000e}
0x076b2…076bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0018}
0x076bc…076f0               Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x004c, t01=0x0022}
0x076f0…076fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0056}
0x076fa…07704               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0060}
0x07704…07718               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004c, t01=0x006a}
0x07718…07738               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x004c, t01=0x007e}
0x07738…0774c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004c, t01=0x009e}
0x0774c…0776e               Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x004c, t01=0x00b2}
0x0776e…07780               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x004c, t01=0x00d4}
0x07780…07796               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004c, t01=0x00e6}
0x07796…077b8               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004c, t01=0x00fc}
0x077b8…077ca               Head {h00=0x000e, h01=0x0050, text=» ORK A2,/A«, t00=0x004c, t01=0x011e}
0x077ca…077e2               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004c, t01=0x0130}
0x077e2…077f6               Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004c, t01=0x0148}
0x077f6…07802               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x015c}
0x07802…0781c               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004c, t01=0x0168}
0x0781c…0783c               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004c, t01=0x0182}
0x0783c…0786c               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 «, t00=0x004d, t01=0x0012}
0x0786c…07896               Head {h00=0x0026, h01=0x0050, text=» SUK A4,6 ADJUST BUFFER ADDRESS =4«, t00=0x004d, t01=0x0042}
0x07896…078c2               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE MESSAGE ON DWT =4«, t00=0x004d, t01=0x006c}
0x078c2…078d8               Head {h00=0x0012, h01=0x0050, text=» RF BRM32A  =4«, t00=0x004d, t01=0x0098}
0x078d8…078e8               Head {h00=0x000c, h01=0x0050, text=» XIF  =4«, t00=0x004d, t01=0x00ae}
0x078e8…07900               Head {h00=0x0014, h01=0x0050, text=»BRM329 EQU *  =4«, t00=0x004d, t01=0x00be}
0x07900…07908               Head {h00=0x0004, h01=0x0050, t00=0x004d, t01=0x00d6}
0x07908…0792c               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x004d, t01=0x00de}
0x0792c…07956               Head {h00=0x0026, h01=0x0050, text=» CF A15,DC:MIN MOVE TO USER BUFFER«, t00=0x004d, t01=0x0102}
0x07956…07968               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004d, t01=0x012c}
0x07968…07980               Head {h00=0x0014, h01=0x0050, text=»BRM32A EQU *  =4«, t00=0x004d, t01=0x013e}
0x07980…07988               Head {h00=0x0004, h01=0x0050, t00=0x004d, t01=0x0156}
0x07988…079b0               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004d, t01=0x015e}
0x079b0…079c2               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004d, t01=0x0186}
0x079c2…079cc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x004e, t01=0x0008}
0x079cc…079e0               Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x004e, t01=0x0012}
0x079e0…079fa               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004e, t01=0x0026}
0x079fa…07a1c               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 STATUS =4 «, t00=0x004e, t01=0x0040}
0x07a1c…07a40               Head {h00=0x0020, h01=0x0050, text=» RF(N) BRM335 NO REQUEST =4 «, t00=0x004e, t01=0x0062}
0x07a40…07a60               Head {h00=0x001c, h01=0x0050, text=» LD A1,DWTOR,A6 ORDER =4«, t00=0x004e, t01=0x0086}
0x07a60…07a90               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 «, t00=0x004e, t01=0x00a6}
0x07a90…07aba               Head {h00=0x0026, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST =4«, t00=0x004e, t01=0x00d6}
0x07aba…07ad2               Head {h00=0x0014, h01=0x0050, text=»BRM335 EQU *  =4«, t00=0x004e, t01=0x0100}
0x07ad2…07ae4               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x004e, t01=0x0118}
0x07ae4…07b06               Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x004e, t01=0x012a}
0x07b06…07b32               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x004e, t01=0x014c}
0x07b32…07b64               Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x004e, t01=0x0178}
0x07b64…07b78               Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x004f, t01=0x001a}
0x07b78…07b9a               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x004f, t01=0x002e}
0x07b9a…07baa               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004f, t01=0x0050}
0x07baa…07bbe               Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x004f, t01=0x0060}
0x07bbe…07bd2               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004f, t01=0x0074}
0x07bd2…07bea               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x004f, t01=0x0088}
0x07bea…07bfc               Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x004f, t01=0x00a0}
0x07bfc…07c24               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x004f, t01=0x00b2}
0x07c24…07c44               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x004f, t01=0x00da}
0x07c44…07c56               Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x004f, t01=0x00fa}
0x07c56…07c62               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x010c}
0x07c62…07c76               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x004f, t01=0x0118}
0x07c76…07c88               Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x004f, t01=0x012c}
0x07c88…07c94               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x013e}
0x07c94…07c9e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x004f, t01=0x014a}
0x07c9e…07ca8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0154}
0x07ca8…07cb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x015e}
0x07cb2…07ce2               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x004f, t01=0x0168}
0x07ce2…07cec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0008}
0x07cec…07cf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0012}
0x07cf6…07d0a               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0050, t01=0x001c}
0x07d0a…07d32               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x0050, t01=0x0030}
0x07d32…07d46               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x0050, t01=0x0058}
0x07d46…07d6c               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x0050, t01=0x006c}
0x07d6c…07da4               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x0050, t01=0x0092}
0x07da4…07dcc               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x0050, t01=0x00ca}
0x07dcc…07df4               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x0050, t01=0x00f2}
0x07df4…07e1a               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x0050, t01=0x011a}
0x07e1a…07e40               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x0050, t01=0x0140}
0x07e40…07e52               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0050, t01=0x0166}
0x07e52…07e64               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0050, t01=0x0178}
0x07e64…07e8e               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0050, t01=0x018a}
0x07e8e…07e9c               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x0051, t01=0x0024}
0x07e9c…07eca               Head {h00=0x002a, h01=0x0050, text=» LD A1,CRDBUF INCREMENT READ BUFFER DK«, t00=0x0051, t01=0x0032}
0x07eca…07ee6               Head {h00=0x0018, h01=0x0050, text=» ADK A1,1 COUNTER DK«, t00=0x0051, t01=0x0060}
0x07ee6…07f00               Head {h00=0x0016, h01=0x0050, text=» ST A1,CRDBUF  DK «, t00=0x0051, t01=0x007c}
0x07f00…07f0e               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x0051, t01=0x0096}
0x07f0e…07f22               Head {h00=0x0010, h01=0x0050, text=» ABL POL127 «, t00=0x0051, t01=0x00a4}
0x07f22…07f2e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x00b8}
0x07f2e…07f38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00c4}
0x07f38…07f42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00ce}
0x07f42…07f62               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x0051, t01=0x00d8}
0x07f62…07f6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00f8}
0x07f6c…07f76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0102}
0x07f76…07f8a               Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x0051, t01=0x010c}
0x07f8a…07fb4               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0051, t01=0x0120}
0x07fb4…07fc8               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0051, t01=0x014a}
0x07fc8…07ff8               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM510 RETRANSMISSION OF MESSAGE«, t00=0x0051, t01=0x015e}
0x07ff8…0800c               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0051, t01=0x018e}
0x0800c…08032               Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x0052, t01=0x0012}
0x08032…08064               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x0052, t01=0x0038}
0x08064…08078               Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x0052, t01=0x006a}
0x08078…08088               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0052, t01=0x007e}
0x08088…08092               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0052, t01=0x008e}
0x08092…0809c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0098}
0x0809c…080a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00a2}
0x080a6…080c6               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x0052, t01=0x00ac}
0x080c6…080d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00cc}
0x080d0…080da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00d6}
0x080da…080ee               Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x0052, t01=0x00e0}
0x080ee…08118               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0052, t01=0x00f4}
0x08118…0812c               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0052, t01=0x011e}
0x0812c…08150               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x0052, t01=0x0132}
0x08150…08164               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0052, t01=0x0156}
0x08164…0818a               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x0052, t01=0x016a}
0x0818a…0819c               Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x0052, t01=0x0190}
0x0819c…081b0               Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x0053, t01=0x0012}
0x081b0…081be               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x0053, t01=0x0026}
0x081be…081d0               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0053, t01=0x0034}
0x081d0…081ec               Head {h00=0x0018, h01=0x0050, text=» CIO A1,0,LCUIN  DK «, t00=0x0053, t01=0x0046}
0x081ec…08206               Head {h00=0x0016, h01=0x0050, text=» SST A1,LCUIN  DK «, t00=0x0053, t01=0x0062}
0x08206…08220               Head {h00=0x0016, h01=0x0050, text=» CF A15,STREG  DK «, t00=0x0053, t01=0x007c}
0x08220…0823a               Head {h00=0x0016, h01=0x0050, text=» CF A15,SETIME  DK«, t00=0x0053, t01=0x0096}
0x0823a…0825a               Head {h00=0x001c, h01=0x0050, text=» DATA BRM520,TIMNAK  DK «, t00=0x0053, t01=0x00b0}
0x0825a…08270               Head {h00=0x0012, h01=0x0050, text=» ABL TDISP  DK«, t00=0x0053, t01=0x00d0}
0x08270…08288               Head {h00=0x0014, h01=0x0050, text=»BRM520 EQU *  DK«, t00=0x0053, t01=0x00e6}
0x08288…082a2               Head {h00=0x0016, h01=0x0050, text=» CF A15,LDREG  DK «, t00=0x0053, t01=0x00fe}
0x082a2…082b0               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x0053, t01=0x0118}
0x082b0…082d6               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0053, t01=0x0126}
0x082d6…082ea               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0053, t01=0x014c}
0x082ea…082fe               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0053, t01=0x0160}
0x082fe…08332               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x0053, t01=0x0174}
0x08332…0833e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x0018}
0x0833e…08372               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x0054, t01=0x0024}
0x08372…0839c               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x0054, t01=0x0058}
0x0839c…083b0               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0054, t01=0x0082}
0x083b0…083c4               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0054, t01=0x0096}
0x083c4…083ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00aa}
0x083ce…083d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00b4}
0x083d8…083f8               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x0054, t01=0x00be}
0x083f8…08402               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00de}
0x08402…0840c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00e8}
0x0840c…08420               Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x0054, t01=0x00f2}
0x08420…0844a               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0054, t01=0x0106}
0x0844a…0845e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0054, t01=0x0130}
0x0845e…08484               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 ACK NOT EXPECTED«, t00=0x0054, t01=0x0144}
0x08484…084ae               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x0054, t01=0x016a}
0x084ae…084c6 (85, 0, 400)  Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0055, t01=0x0004}
0x084c6…084de               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x0055, t01=0x001c}
0x084de…084f0               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0055, t01=0x0034}
0x084f0…08508               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0055, t01=0x0046}
0x08508…08520               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0  =8«, t00=0x0055, t01=0x005e}
0x08520…08532               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0055, t01=0x0076}
0x08532…08548               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x0055, t01=0x0088}
0x08548…08552               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x009e}
0x08552…0856c               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x0055, t01=0x00a8}
0x0856c…08576               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00c2}
0x08576…08598               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x0055, t01=0x00cc}
0x08598…085bc               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0055, t01=0x00ee}
0x085bc…085d0               Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0055, t01=0x0112}
0x085d0…085ee               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0055, t01=0x0126}
0x085ee…08618               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0055, t01=0x0144}
0x08618…0862a               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0055, t01=0x016e}
0x0862a…0863e               Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0055, t01=0x0180}
0x0863e…08652 (86, 0, 398)  Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0056, t01=0x0004}
0x08652…08668               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0056, t01=0x0018}
0x08668…08672               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x002e}
0x08672…0868c               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0056, t01=0x0038}
0x0868c…08696               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0052}
0x08696…086ba               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0056, t01=0x005c}
0x086ba…086e2               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0056, t01=0x0080}
0x086e2…086f6               Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0056, t01=0x00a8}
0x086f6…0870a               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0056, t01=0x00bc}
0x0870a…0872c               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0056, t01=0x00d0}
0x0872c…08736               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0056, t01=0x00f2}
0x08736…08740               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00fc}
0x08740…08770               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0056, t01=0x0106}
0x08770…0877a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0136}
0x0877a…08794               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0056, t01=0x0140}
0x08794…087a8               Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0056, t01=0x015a}
0x087a8…087bc               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0056, t01=0x016e}
0x087bc…087d0               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x0056, t01=0x0182}
0x087d0…08802               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x0057, t01=0x0008}
0x08802…0880e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x003a}
0x0880e…0883a               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0057, t01=0x0046}
0x0883a…0884e               Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x0057, t01=0x0072}
0x0884e…0886c               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0057, t01=0x0086}
0x0886c…08880               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0057, t01=0x00a4}
0x08880…08888               Head {h00=0x0004, h01=0x0050, t00=0x0057, t01=0x00b8}
0x08888…088aa               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0057, t01=0x00c0}
0x088aa…088b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x00e2}
0x088b6…088c8               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0057, t01=0x00ee}
0x088c8…088dc               Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x0057, t01=0x0100}
0x088dc…088ee               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0057, t01=0x0114}
0x088ee…08918               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0057, t01=0x0126}
0x08918…0892c               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0057, t01=0x0150}
0x0892c…08940               Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x0057, t01=0x0164}
0x08940…08958               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0057, t01=0x0178}
0x08958…08970               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x0057, t01=0x0190}
0x08970…08982               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0058, t01=0x0018}
0x08982…0899a               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0058, t01=0x002a}
0x0899a…089b2               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI  =8 «, t00=0x0058, t01=0x0042}
0x089b2…089c4               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0058, t01=0x005a}
0x089c4…089f0               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x0058, t01=0x006c}
0x089f0…08a16               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x0058, t01=0x0098}
0x08a16…08a2a               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0058, t01=0x00be}
0x08a2a…08a52               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x0058, t01=0x00d2}
0x08a52…08a6c               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0058, t01=0x00fa}
0x08a6c…08a7e               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0058, t01=0x0114}
0x08a7e…08a92               Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x0058, t01=0x0126}
0x08a92…08aac               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0058, t01=0x013a}
0x08aac…08abe               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0058, t01=0x0154}
0x08abe…08ad2               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0058, t01=0x0166}
0x08ad2…08adc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0058, t01=0x017a}
0x08adc…08ae6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0184}
0x08ae6…08af0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x018e}
0x08af0…08b16               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x0059, t01=0x0008}
0x08b16…08b20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x002e}
0x08b20…08b2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0038}
0x08b2a…08b3e               Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x0059, t01=0x0042}
0x08b3e…08b64               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x0059, t01=0x0056}
0x08b64…08b94               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x0059, t01=0x007c}
0x08b94…08bb8               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x0059, t01=0x00ac}
0x08bb8…08bde               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x0059, t01=0x00d0}
0x08bde…08c00               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0059, t01=0x00f6}
0x08c00…08c12               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0059, t01=0x0118}
0x08c12…08c2e               Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x0059, t01=0x012a}
0x08c2e…08c44               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x0059, t01=0x0146}
0x08c44…08c6a               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x0059, t01=0x015c}
0x08c6a…08c7c               Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x0059, t01=0x0182}
0x08c7c…08c88 (90, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x0004}
0x08c88…08c92               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005a, t01=0x0010}
0x08c92…08c9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x001a}
0x08c9c…08ca6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0024}
0x08ca6…08cc8               Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x005a, t01=0x002e}
0x08cc8…08cd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0050}
0x08cd2…08cdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x005a}
0x08cdc…08cf0               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x005a, t01=0x0064}
0x08cf0…08d08               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005a, t01=0x0078}
0x08d08…08d36               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) POL010 ERROR. ACK EXPECTED =5 «, t00=0x005a, t01=0x0090}
0x08d36…08d4a               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005a, t01=0x00be}
0x08d4a…08d6c               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005a, t01=0x00d2}
0x08d6c…08d7e               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x005a, t01=0x00f4}
0x08d7e…08d90               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x005a, t01=0x0106}
0x08d90…08db8               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x005a, t01=0x0118}
0x08db8…08dd6               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x005a, t01=0x0140}
0x08dd6…08de2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x015e}
0x08de2…08df6               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005a, t01=0x016a}
0x08df6…08e08               Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x005a, t01=0x017e}
0x08e08…08e14               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x0190}
0x08e14…08e28               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x005b, t01=0x000c}
0x08e28…08e38               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005b, t01=0x0020}
0x08e38…08e4c               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x005b, t01=0x0030}
0x08e4c…08e66               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x005b, t01=0x0044}
0x08e66…08e78               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005b, t01=0x005e}
0x08e78…08e94               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x005b, t01=0x0070}
0x08e94…08ea0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x008c}
0x08ea0…08eba               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x005b, t01=0x0098}
0x08eba…08ecc               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x005b, t01=0x00b2}
0x08ecc…08ef2               Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x005b, t01=0x00c4}
0x08ef2…08f16               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x005b, t01=0x00ea}
0x08f16…08f26               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005b, t01=0x010e}
0x08f26…08f3a               Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x005b, t01=0x011e}
0x08f3a…08f46               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0132}
0x08f46…08f5c               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x005b, t01=0x013e}
0x08f5c…08f84               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x005b, t01=0x0154}
0x08f84…08f98               Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x005b, t01=0x017c}
0x08f98…08fb2               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x005b, t01=0x0190}
0x08fb2…08fd2               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x005c, t01=0x001a}
0x08fd2…08fde               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x003a}
0x08fde…08ff0               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005c, t01=0x0046}
0x08ff0…09004               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x005c, t01=0x0058}
0x09004…09034               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x005c, t01=0x006c}
0x09034…09054               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x005c, t01=0x009c}
0x09054…09066               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005c, t01=0x00bc}
0x09066…09070               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005c, t01=0x00ce}
0x09070…0907a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00d8}
0x0907a…09084               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00e2}
0x09084…090a8               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x005c, t01=0x00ec}
0x090a8…090b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0110}
0x090b2…090bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x011a}
0x090bc…090d0               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x005c, t01=0x0124}
0x090d0…090f0               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x005c, t01=0x0138}
0x090f0…09114               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005c, t01=0x0158}
0x09114…09128               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x005c, t01=0x017c}
0x09128…0915a               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x005c, t01=0x0190}
0x0915a…09166               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0032}
0x09166…0918e               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x005d, t01=0x003e}
0x0918e…0919e               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x005d, t01=0x0066}
0x0919e…091c4               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x005d, t01=0x0076}
0x091c4…091d4               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x005d, t01=0x009c}
0x091d4…091de               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x005d, t01=0x00ac}
0x091de…091e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00b6}
0x091e8…091f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00c0}
0x091f2…0921a               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x005d, t01=0x00ca}
0x0921a…09224               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00f2}
0x09224…0922e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00fc}
0x0922e…09242               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x005d, t01=0x0106}
0x09242…0925a               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005d, t01=0x011a}
0x0925a…09284               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL020 ACK NOT EXPECTED =5 «, t00=0x005d, t01=0x0132}
0x09284…092aa               Head {h00=0x0022, h01=0x0050, text=»POL010 CF A5,TRENQ SEND ENQ =5«, t00=0x005d, t01=0x015c}
0x092aa…092d8               Head {h00=0x002a, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER =5 «, t00=0x005d, t01=0x0182}
0x092d8…092fe               Head {h00=0x0022, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE =5 «, t00=0x005e, t01=0x0020}
0x092fe…09316               Head {h00=0x0014, h01=0x0050, text=»POL020 EQU *  =5«, t00=0x005e, t01=0x0046}
0x09316…0933c               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x005e, t01=0x005e}
0x0933c…09350               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005e, t01=0x0084}
0x09350…09366               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x005e, t01=0x0098}
0x09366…09390               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x005e, t01=0x00ae}
0x09390…093b6               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x005e, t01=0x00d8}
0x093b6…093ca               Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x005e, t01=0x00fe}
0x093ca…093ea               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x005e, t01=0x0112}
0x093ea…09414               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005e, t01=0x0132}
0x09414…09438               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005e, t01=0x015c}
0x09438…09444               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x0180}
0x09444…09458               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005e, t01=0x018c}
0x09458…0946a               Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x005f, t01=0x0010}
0x0946a…09476               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x0022}
0x09476…0948a               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x005f, t01=0x002e}
0x0948a…0949a               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005f, t01=0x0042}
0x0949a…094ae               Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x005f, t01=0x0052}
0x094ae…094c2               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x005f, t01=0x0066}
0x094c2…094e8               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x005f, t01=0x007a}
0x094e8…094fc               Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x005f, t01=0x00a0}
0x094fc…0951a               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x005f, t01=0x00b4}
0x0951a…0952c               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005f, t01=0x00d2}
0x0952c…09540               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x005f, t01=0x00e4}
0x09540…09566               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x005f, t01=0x00f8}
0x09566…0957a               Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x005f, t01=0x011e}
0x0957a…095a2               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x005f, t01=0x0132}
0x095a2…095b8               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x005f, t01=0x015a}
0x095b8…095ce               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x005f, t01=0x0170}
0x095ce…095e0               Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x005f, t01=0x0186}
0x095e0…095f4               Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x0060, t01=0x0008}
0x095f4…09618               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x0060, t01=0x001c}
0x09618…09636               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0060, t01=0x0040}
0x09636…0963e               Head {h00=0x0004, h01=0x0050, t00=0x0060, t01=0x005e}
0x0963e…09654               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x0060, t01=0x0066}
0x09654…0967c               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,MMUBUF MMU WORK BUFFER «, t00=0x0060, t01=0x007c}
0x0967c…09694               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x0060, t01=0x00a4}
0x09694…096c6               Head {h00=0x002e, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA FROM USER BUFFER «, t00=0x0060, t01=0x00bc}
0x096c6…096d2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0060, t01=0x00ee}
0x096d2…096fc               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0060, t01=0x00fa}
0x096fc…0971e               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x0060, t01=0x0124}
0x0971e…09732               Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x0060, t01=0x0146}
0x09732…0975c               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x0060, t01=0x015a}
0x0975c…09788               Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x0060, t01=0x0184}
0x09788…097aa               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x0061, t01=0x0020}
0x097aa…097ce               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x0061, t01=0x0042}
0x097ce…097e2               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x0061, t01=0x0066}
0x097e2…09804               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x0061, t01=0x007a}
0x09804…09814               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0061, t01=0x009c}
0x09814…09838               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x0061, t01=0x00ac}
0x09838…09862               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0061, t01=0x00d0}
0x09862…09886               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0061, t01=0x00fa}
0x09886…09898               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x0061, t01=0x011e}
0x09898…098a2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0061, t01=0x0130}
0x098a2…098ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x013a}
0x098ac…098b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0144}
0x098b6…098e0               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x0061, t01=0x014e}
0x098e0…098ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0178}
0x098ea…098f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0182}
0x098f4…09908               Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x0061, t01=0x018c}
0x09908…09922               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0062, t01=0x0010}
0x09922…0993a               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x0062, t01=0x002a}
0x0993a…09960               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL010 ACK EXPECTED =5«, t00=0x0062, t01=0x0042}
0x09960…0997a               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x0062, t01=0x0068}
0x0997a…0999e               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x0062, t01=0x0082}
0x0999e…099bc               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x0062, t01=0x00a6}
0x099bc…099d0               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0062, t01=0x00c4}
0x099d0…099f2               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0062, t01=0x00d8}
0x099f2…09a04               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x0062, t01=0x00fa}
0x09a04…09a2a               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x0062, t01=0x010c}
0x09a2a…09a36               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0062, t01=0x0132}
0x09a36…09a50               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0062, t01=0x013e}
0x09a50…09a68               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0062, t01=0x0158}
0x09a68…09a88               Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x0062, t01=0x0170}
0x09a88…09aaa               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x0062, t01=0x0190}
0x09aaa…09abc               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x0063, t01=0x0022}
0x09abc…09ae0               Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x0063, t01=0x0034}
0x09ae0…09af2               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0063, t01=0x0058}
0x09af2…09b18               Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x0063, t01=0x006a}
0x09b18…09b24               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x0090}
0x09b24…09b40               Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x0063, t01=0x009c}
0x09b40…09b4a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0063, t01=0x00b8}
0x09b4a…09b54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00c2}
0x09b54…09b5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00cc}
0x09b5e…09b9a               Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x0063, t01=0x00d6}
0x09b9a…09ba4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0112}
0x09ba4…09bc6               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x0063, t01=0x011c}
0x09bc6…09bd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x013e}
0x09bd0…09bda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0148}
0x09bda…09bf6               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x0063, t01=0x0152}
0x09bf6…09c1e               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x0063, t01=0x016e}
0x09c1e…09c36               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0064, t01=0x0008}
0x09c36…09c56               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x0064, t01=0x0020}
0x09c56…09c78               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0064, t01=0x0040}
0x09c78…09c8a               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0064, t01=0x0062}
0x09c8a…09cae               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x0064, t01=0x0074}
0x09cae…09cc0               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0064, t01=0x0098}
0x09cc0…09cec               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x0064, t01=0x00aa}
0x09cec…09cfe               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0064, t01=0x00d6}
0x09cfe…09d34               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x0064, t01=0x00e8}
0x09d34…09d54               Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x0064, t01=0x011e}
0x09d54…09d80               Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x0064, t01=0x013e}
0x09d80…09d92               Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x0064, t01=0x016a}
0x09d92…09dbc               Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x0064, t01=0x017c}
0x09dbc…09dde               Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x0065, t01=0x0016}
0x09dde…09df0               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0065, t01=0x0038}
0x09df0…09e06               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x0065, t01=0x004a}
0x09e06…09e1e               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0065, t01=0x0060}
0x09e1e…09e46               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0065, t01=0x0078}
0x09e46…09e5a               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x0065, t01=0x00a0}
0x09e5a…09e88               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0065, t01=0x00b4}
0x09e88…09e9c               Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x0065, t01=0x00e2}
0x09e9c…09eb0               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x0065, t01=0x00f6}
0x09eb0…09ed6               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0065, t01=0x010a}
0x09ed6…09ee8               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0065, t01=0x0130}
0x09ee8…09ef8               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0065, t01=0x0142}
0x09ef8…09f02               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0065, t01=0x0152}
0x09f02…09f0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x015c}
0x09f0c…09f16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0166}
0x09f16…09f34               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x0065, t01=0x0170}
0x09f34…09f3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x018e}
0x09f3e…09f5e               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x0066, t01=0x0008}
0x09f5e…09f8a               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x0066, t01=0x0028}
0x09f8a…09fc0               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x0066, t01=0x0054}
0x09fc0…09fec               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x0066, t01=0x008a}
0x09fec…09ff6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00b6}
0x09ff6…0a00a               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x0066, t01=0x00c0}
0x0a00a…0a032               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0066, t01=0x00d4}
0x0a032…0a052               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x0066, t01=0x00fc}
0x0a052…0a064               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0066, t01=0x011c}
0x0a064…0a078               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0066, t01=0x012e}
0x0a078…0a0a0               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x0066, t01=0x0142}
0x0a0a0…0a0c6               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x0066, t01=0x016a}
0x0a0c6…0a0d8               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x0066, t01=0x0190}
0x0a0d8…0a0ec               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0067, t01=0x0012}
0x0a0ec…0a100               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x0067, t01=0x0026}
0x0a100…0a124               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0067, t01=0x003a}
0x0a124…0a150               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0067, t01=0x005e}
0x0a150…0a164               Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x0067, t01=0x008a}
0x0a164…0a174               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0067, t01=0x009e}
0x0a174…0a190               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0067, t01=0x00ae}
0x0a190…0a198               Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x00ca}
0x0a198…0a1ae               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0067, t01=0x00d2}
0x0a1ae…0a1c2               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0067, t01=0x00e8}
0x0a1c2…0a1e8               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x0067, t01=0x00fc}
0x0a1e8…0a1fc               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0067, t01=0x0122}
0x0a1fc…0a220               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0067, t01=0x0136}
0x0a220…0a234               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x0067, t01=0x015a}
0x0a234…0a24a               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x0067, t01=0x016e}
0x0a24a…0a278               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x0067, t01=0x0184}
0x0a278…0a28c               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0068, t01=0x0022}
0x0a28c…0a298               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0068, t01=0x0036}
0x0a298…0a2ac               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x0068, t01=0x0042}
0x0a2ac…0a2d4               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0068, t01=0x0056}
0x0a2d4…0a2f8               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0068, t01=0x007e}
0x0a2f8…0a30c               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x0068, t01=0x00a2}
0x0a30c…0a320               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x0068, t01=0x00b6}
0x0a320…0a342               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x0068, t01=0x00ca}
0x0a342…0a356               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x0068, t01=0x00ec}
0x0a356…0a378               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x0068, t01=0x0100}
0x0a378…0a38c               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x0068, t01=0x0122}
0x0a38c…0a3ae               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x0068, t01=0x0136}
0x0a3ae…0a3c2               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x0068, t01=0x0158}
0x0a3c2…0a3f8               Head {h00=0x0032, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE «, t00=0x0068, t01=0x016c}
0x0a3f8…0a40c               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0069, t01=0x0012}
0x0a40c…0a434               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x0069, t01=0x0026}
0x0a434…0a43c               Head {h00=0x0004, h01=0x0050, t00=0x0069, t01=0x004e}
0x0a43c…0a450               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0069, t01=0x0056}
0x0a450…0a466               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x0069, t01=0x006a}
0x0a466…0a46e               Head {h00=0x0004, h01=0x0050, t00=0x0069, t01=0x0080}
0x0a46e…0a480               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0069, t01=0x0088}
0x0a480…0a496               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x0069, t01=0x009a}
0x0a496…0a4b8               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x0069, t01=0x00b0}
0x0a4b8…0a4ca               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x0069, t01=0x00d2}
0x0a4ca…0a4ec               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x0069, t01=0x00e4}
0x0a4ec…0a4fe               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x0069, t01=0x0106}
0x0a4fe…0a510               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0069, t01=0x0118}
0x0a510…0a53e               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x0069, t01=0x012a}
0x0a53e…0a562               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0069, t01=0x0158}
0x0a562…0a590               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x0069, t01=0x017c}
0x0a590…0a5a2               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x006a, t01=0x001a}
0x0a5a2…0a5b6               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x006a, t01=0x002c}
0x0a5b6…0a5c2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006a, t01=0x0040}
0x0a5c2…0a5ca               Head {h00=0x0004, h01=0x0050, t00=0x006a, t01=0x004c}
0x0a5ca…0a5ec               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x006a, t01=0x0054}
0x0a5ec…0a610               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x006a, t01=0x0076}
0x0a610…0a638               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x006a, t01=0x009a}
0x0a638…0a64c               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x006a, t01=0x00c2}
0x0a64c…0a668               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x006a, t01=0x00d6}
0x0a668…0a68c               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x006a, t01=0x00f2}
0x0a68c…0a696               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0116}
0x0a696…0a6b0               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x006a, t01=0x0120}
0x0a6b0…0a6ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x013a}
0x0a6ba…0a6d8               Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x006a, t01=0x0144}
0x0a6d8…0a6ec               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x006a, t01=0x0162}
0x0a6ec…0a716               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006a, t01=0x0176}
0x0a716…0a72a               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x006b, t01=0x0010}
0x0a72a…0a752               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x006b, t01=0x0024}
0x0a752…0a764               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006b, t01=0x004c}
0x0a764…0a76e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x005e}
0x0a76e…0a784               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x006b, t01=0x0068}
0x0a784…0a78e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x007e}
0x0a78e…0a7a2               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x006b, t01=0x0088}
0x0a7a2…0a7ca               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x006b, t01=0x009c}
0x0a7ca…0a7ee               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x006b, t01=0x00c4}
0x0a7ee…0a824               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x006b, t01=0x00e8}
0x0a824…0a838               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006b, t01=0x011e}
0x0a838…0a84c               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006b, t01=0x0132}
0x0a84c…0a86c               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x006b, t01=0x0146}
0x0a86c…0a878               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x0166}
0x0a878…0a88c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006b, t01=0x0172}
0x0a88c…0a8b6               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006b, t01=0x0186}
0x0a8b6…0a8d6               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x006c, t01=0x0020}
0x0a8d6…0a8e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x0040}
0x0a8e2…0a8f6               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x006c, t01=0x004c}
0x0a8f6…0a920               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006c, t01=0x0060}
0x0a920…0a934               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x006c, t01=0x008a}
0x0a934…0a95c               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x006c, t01=0x009e}
0x0a95c…0a97c               Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x006c, t01=0x00c6}
0x0a97c…0a990               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x006c, t01=0x00e6}
0x0a990…0a9b6               Head {h00=0x0022, h01=0x0050, text=» ORR A7,A1 PARITY ERROR SALCUZ«, t00=0x006c, t01=0x00fa}
0x0a9b6…0a9cc               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x006c, t01=0x0120}
0x0a9cc…0a9dc               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006c, t01=0x0136}
0x0a9dc…0a9e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0146}
0x0a9e6…0a9fc               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x006c, t01=0x0150}
0x0a9fc…0aa06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0166}
0x0aa06…0aa1a               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x006c, t01=0x0170}
0x0aa1a…0aa2c               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x006c, t01=0x0184}
0x0aa2c…0aa52               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x006d, t01=0x0008}
0x0aa52…0aa78               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x006d, t01=0x002e}
0x0aa78…0aa8a               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x006d, t01=0x0054}
0x0aa8a…0aa94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0066}
0x0aa94…0aaaa               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x006d, t01=0x0070}
0x0aaaa…0aab4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0086}
0x0aab4…0aac8               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x006d, t01=0x0090}
0x0aac8…0aadc               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006d, t01=0x00a4}
0x0aadc…0aaf0               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006d, t01=0x00b8}
0x0aaf0…0ab16               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x006d, t01=0x00cc}
0x0ab16…0ab22               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x00f2}
0x0ab22…0ab36               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006d, t01=0x00fe}
0x0ab36…0ab60               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006d, t01=0x0112}
0x0ab60…0ab86               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x006d, t01=0x013c}
0x0ab86…0ab92               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x0162}
0x0ab92…0aba4               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006d, t01=0x016e}
0x0aba4…0abae               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x006d, t01=0x0180}
0x0abae…0abb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x018a}
0x0abb8…0abd6 (110, 0, 398) Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x006e, t01=0x0004}
0x0abd6…0abe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0022}
0x0abe0…0abf6               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x006e, t01=0x002c}
0x0abf6…0ac18               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x006e, t01=0x0042}
0x0ac18…0ac42               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x006e, t01=0x0064}
0x0ac42…0ac58               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x006e, t01=0x008e}
0x0ac58…0ac76               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x006e, t01=0x00a4}
0x0ac76…0ac88               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006e, t01=0x00c2}
0x0ac88…0ac92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00d4}
0x0ac92…0acaa               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x006e, t01=0x00de}
0x0acaa…0acb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00f6}
0x0acb4…0acd8               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x006e, t01=0x0100}
0x0acd8…0acea               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006e, t01=0x0124}
0x0acea…0acf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0136}
0x0acf4…0ad0a               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x006e, t01=0x0140}
0x0ad0a…0ad14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0156}
0x0ad14…0ad28               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x006e, t01=0x0160}
0x0ad28…0ad4a               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x006e, t01=0x0174}
0x0ad4a…0ad56               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x0008}
0x0ad56…0ad60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0014}
0x0ad60…0ad76               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x006f, t01=0x001e}
0x0ad76…0ad80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0034}
0x0ad80…0ada2               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x006f, t01=0x003e}
0x0ada2…0adc8               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x006f, t01=0x0060}
0x0adc8…0ade0               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x006f, t01=0x0086}
0x0ade0…0adf2               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x006f, t01=0x009e}
0x0adf2…0adfc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x006f, t01=0x00b0}
0x0adfc…0ae06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00ba}
0x0ae06…0ae1c               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x006f, t01=0x00c4}
0x0ae1c…0ae26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00da}
0x0ae26…0ae48               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x006f, t01=0x00e4}
0x0ae48…0ae5a               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x006f, t01=0x0106}
0x0ae5a…0ae64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0118}
0x0ae64…0ae7a               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x006f, t01=0x0122}
0x0ae7a…0ae84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0138}
0x0ae84…0aea6               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x006f, t01=0x0142}
0x0aea6…0aeb8               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x006f, t01=0x0164}
0x0aeb8…0aec2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0176}
0x0aec2…0aed8               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x006f, t01=0x0180}
0x0aed8…0aee2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0008}
0x0aee2…0af04               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x0070, t01=0x0012}
0x0af04…0af0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0034}
0x0af0e…0af3a               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x0070, t01=0x003e}
0x0af3a…0af4e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0070, t01=0x006a}
0x0af4e…0af66               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x0070, t01=0x007e}
0x0af66…0af8e               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x0070, t01=0x0096}
0x0af8e…0afb8               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x0070, t01=0x00be}
0x0afb8…0afd6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0070, t01=0x00e8}
0x0afd6…0b000               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x0070, t01=0x0106}
0x0b000…0b01e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0070, t01=0x0130}
0x0b01e…0b038               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x0070, t01=0x014e}
0x0b038…0b056               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x0070, t01=0x0168}
0x0b056…0b06a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0070, t01=0x0186}
0x0b06a…0b080               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x0071, t01=0x000a}
0x0b080…0b09a               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0071, t01=0x0020}
0x0b09a…0b0c2               Head {h00=0x0024, h01=0x0050, text=» CIO A2,0,LCUUT STOP TRANSMITTER«, t00=0x0071, t01=0x003a}
0x0b0c2…0b0de               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0071, t01=0x0062}
0x0b0de…0b106               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ WAIT FOR END SALCUZ «, t00=0x0071, t01=0x007e}
0x0b106…0b11c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0071, t01=0x00a6}
0x0b11c…0b146               Head {h00=0x0026, h01=0x0050, text=» SST A2,LCUUT PERFORM SST AT ONCE «, t00=0x0071, t01=0x00bc}
0x0b146…0b15a               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0071, t01=0x00e6}
0x0b15a…0b186               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x0071, t01=0x00fa}
0x0b186…0b192               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x0126}
0x0b192…0b1a2               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0071, t01=0x0132}
0x0b1a2…0b1ac               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0071, t01=0x0142}
0x0b1ac…0b1b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x014c}
0x0b1b6…0b1c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0156}
0x0b1c0…0b1e2               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x0071, t01=0x0160}
0x0b1e2…0b1ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0182}
0x0b1ec…0b1f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x018c}
0x0b1f6…0b20a               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x0072, t01=0x0008}
0x0b20a…0b22c               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0072, t01=0x001c}
0x0b22c…0b242               Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x0072, t01=0x003e}
0x0b242…0b24c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0054}
0x0b24c…0b256               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x005e}
0x0b256…0b276               Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x0072, t01=0x0068}
0x0b276…0b280               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0088}
0x0b280…0b28a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0092}
0x0b28a…0b29e               Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x0072, t01=0x009c}
0x0b29e…0b2ca               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x0072, t01=0x00b0}
0x0b2ca…0b2d2               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x00dc}
0x0b2d2…0b308               Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x0072, t01=0x00e4}
0x0b308…0b326               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x0072, t01=0x011a}
0x0b326…0b32e               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x0138}
0x0b32e…0b344               Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x0072, t01=0x0140}
0x0b344…0b36a               Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x0072, t01=0x0156}
0x0b36a…0b37e               Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x0072, t01=0x017c}
0x0b37e…0b3a6               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x0072, t01=0x0190}
0x0b3a6…0b3ba               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0073, t01=0x0028}
0x0b3ba…0b3d8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0073, t01=0x003c}
0x0b3d8…0b3f4               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x0073, t01=0x005a}
0x0b3f4…0b408               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0073, t01=0x0076}
0x0b408…0b424               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x0073, t01=0x008a}
0x0b424…0b438               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x0073, t01=0x00a6}
0x0b438…0b454               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x0073, t01=0x00ba}
0x0b454…0b468               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0073, t01=0x00d6}
0x0b468…0b486               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0073, t01=0x00ea}
0x0b486…0b4b2               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0073, t01=0x0108}
0x0b4b2…0b4de               Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x0073, t01=0x0134}
0x0b4de…0b4fe               Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x0073, t01=0x0160}
0x0b4fe…0b510               Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x0073, t01=0x0180}
0x0b510…0b524 (116, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x0074, t01=0x0004}
0x0b524…0b536               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0074, t01=0x0018}
0x0b536…0b54a               Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x0074, t01=0x002a}
0x0b54a…0b554               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x003e}
0x0b554…0b55e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0048}
0x0b55e…0b568               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0052}
0x0b568…0b574               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x005c}
0x0b574…0b588               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0074, t01=0x0068}
0x0b588…0b5a6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0074, t01=0x007c}
0x0b5a6…0b5c2               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0074, t01=0x009a}
0x0b5c2…0b5ea               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0074, t01=0x00b6}
0x0b5ea…0b60e               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0074, t01=0x00de}
0x0b60e…0b63a               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0074, t01=0x0102}
0x0b63a…0b666               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x0074, t01=0x012e}
0x0b666…0b690               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x0074, t01=0x015a}
0x0b690…0b6b4               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x0074, t01=0x0184}
0x0b6b4…0b6da               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x0075, t01=0x0018}
0x0b6da…0b6fa               Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x0075, t01=0x003e}
0x0b6fa…0b718               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0075, t01=0x005e}
0x0b718…0b734               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0075, t01=0x007c}
0x0b734…0b752               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0075, t01=0x0098}
0x0b752…0b768               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0075, t01=0x00b6}
0x0b768…0b77c               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x0075, t01=0x00cc}
0x0b77c…0b7a2               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x0075, t01=0x00e0}
0x0b7a2…0b7b8               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0075, t01=0x0106}
0x0b7b8…0b7de               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x0075, t01=0x011c}
0x0b7de…0b7f4               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0075, t01=0x0142}
0x0b7f4…0b808               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x0075, t01=0x0158}
0x0b808…0b81e               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0075, t01=0x016c}
0x0b81e…0b82a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x0182}
0x0b82a…0b83e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0075, t01=0x018e}
0x0b83e…0b846               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x0012}
0x0b846…0b870               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0076, t01=0x001a}
0x0b870…0b88a               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x0076, t01=0x0044}
0x0b88a…0b892               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x005e}
0x0b892…0b8b2               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x0076, t01=0x0066}
0x0b8b2…0b8d8               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x0076, t01=0x0086}
0x0b8d8…0b8fc               Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x0076, t01=0x00ac}
0x0b8fc…0b904               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x00d0}
0x0b904…0b92c               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x0076, t01=0x00d8}
0x0b92c…0b95e               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x0076, t01=0x0100}
0x0b95e…0b980               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x0076, t01=0x0132}
0x0b980…0b992               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0076, t01=0x0154}
0x0b992…0b9a6               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x0076, t01=0x0166}
0x0b9a6…0b9b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x017a}
0x0b9b2…0b9ba               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x0186}
0x0b9ba…0b9cc               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0076, t01=0x018e}
0x0b9cc…0b9e0               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x0077, t01=0x0010}
0x0b9e0…0ba04               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x0077, t01=0x0024}
0x0ba04…0ba28               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0077, t01=0x0048}
0x0ba28…0ba3c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0077, t01=0x006c}
0x0ba3c…0ba50               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0077, t01=0x0080}
0x0ba50…0ba7a               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0077, t01=0x0094}
0x0ba7a…0ba94               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x0077, t01=0x00be}
0x0ba94…0ba9c               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x00d8}
0x0ba9c…0bae0               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0077, t01=0x00e0}
0x0bae0…0baea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0124}
0x0baea…0bb1a               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x0077, t01=0x012e}
0x0bb1a…0bb24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x015e}
0x0bb24…0bb5c               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0077, t01=0x0168}
0x0bb5c…0bb64               Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x0010}
0x0bb64…0bb8e               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x0078, t01=0x0018}
0x0bb8e…0bbaa               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x0078, t01=0x0042}
0x0bbaa…0bbb6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x005e}
0x0bbb6…0bbca               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x0078, t01=0x006a}
0x0bbca…0bbea               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x0078, t01=0x007e}
0x0bbea…0bc10               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x0078, t01=0x009e}
0x0bc10…0bc24               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x0078, t01=0x00c4}
0x0bc24…0bc38               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x0078, t01=0x00d8}
0x0bc38…0bc5c               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x0078, t01=0x00ec}
0x0bc5c…0bc82               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x0078, t01=0x0110}
0x0bc82…0bc96               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x0078, t01=0x0136}
0x0bc96…0bcaa               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x0078, t01=0x014a}
0x0bcaa…0bcc8               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x0078, t01=0x015e}
0x0bcc8…0bcde               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x0078, t01=0x017c}
0x0bcde…0bcf0 (121, 0, 400) Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0079, t01=0x0004}
0x0bcf0…0bcfc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0016}
0x0bcfc…0bd10               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0079, t01=0x0022}
0x0bd10…0bd22               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x0079, t01=0x0036}
0x0bd22…0bd2a               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x0048}
0x0bd2a…0bd3e               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x0079, t01=0x0050}
0x0bd3e…0bd46               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x0064}
0x0bd46…0bd58               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x0079, t01=0x006c}
0x0bd58…0bd7e               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x0079, t01=0x007e}
0x0bd7e…0bd86               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x00a4}
0x0bd86…0bdb2               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x0079, t01=0x00ac}
0x0bdb2…0bdc8               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x0079, t01=0x00d8}
0x0bdc8…0bdf4               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x0079, t01=0x00ee}
0x0bdf4…0be06               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0079, t01=0x011a}
0x0be06…0be1e               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x0079, t01=0x012c}
0x0be1e…0be30               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0079, t01=0x0144}
0x0be30…0be5a               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x0079, t01=0x0156}
0x0be5a…0be80               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x0079, t01=0x0180}
0x0be80…0be98               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x007a, t01=0x0016}
0x0be98…0bec2               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x007a, t01=0x002e}
0x0bec2…0bed8               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x007a, t01=0x0058}
0x0bed8…0beec               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x007a, t01=0x006e}
0x0beec…0bf00               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x007a, t01=0x0082}
0x0bf00…0bf24               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x007a, t01=0x0096}
0x0bf24…0bf36               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x007a, t01=0x00ba}
0x0bf36…0bf48               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x007a, t01=0x00cc}
0x0bf48…0bf5c               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x007a, t01=0x00de}
0x0bf5c…0bf68               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x00f2}
0x0bf68…0bf72               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x007a, t01=0x00fe}
0x0bf72…0bf86               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x007a, t01=0x0108}
0x0bf86…0bfb2               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x007a, t01=0x011c}
0x0bfb2…0bfd6               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x007a, t01=0x0148}
0x0bfd6…0bfea               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x007a, t01=0x016c}
0x0bfea…0c012               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x007a, t01=0x0180}
0x0c012…0c03c               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x007b, t01=0x0018}
0x0c03c…0c050               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x007b, t01=0x0042}
0x0c050…0c076               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x007b, t01=0x0056}
0x0c076…0c0a4               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x007b, t01=0x007c}
0x0c0a4…0c0ba               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x007b, t01=0x00aa}
0x0c0ba…0c0de               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x007b, t01=0x00c0}
0x0c0de…0c0f2               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007b, t01=0x00e4}
0x0c0f2…0c122               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x007b, t01=0x00f8}
0x0c122…0c136               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x007b, t01=0x0128}
0x0c136…0c150               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x007b, t01=0x013c}
0x0c150…0c164               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x007b, t01=0x0156}
0x0c164…0c186               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x007b, t01=0x016a}
0x0c186…0c1b2               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x007b, t01=0x018c}
0x0c1b2…0c1d4               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x007c, t01=0x0028}
0x0c1d4…0c1f2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007c, t01=0x004a}
0x0c1f2…0c212               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007c, t01=0x0068}
0x0c212…0c244               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x007c, t01=0x0088}
0x0c244…0c262               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007c, t01=0x00ba}
0x0c262…0c282               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007c, t01=0x00d8}
0x0c282…0c28e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x00f8}
0x0c28e…0c2a2               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x007c, t01=0x0104}
0x0c2a2…0c2be               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x007c, t01=0x0118}
0x0c2be…0c2d2               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x007c, t01=0x0134}
0x0c2d2…0c2f0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007c, t01=0x0148}
0x0c2f0…0c304               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x007c, t01=0x0166}
0x0c304…0c31e               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x007c, t01=0x017a}
0x0c31e…0c33c (125, 0, 398) Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x007d, t01=0x0004}
0x0c33c…0c348               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x0022}
0x0c348…0c35c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x007d, t01=0x002e}
0x0c35c…0c380               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x007d, t01=0x0042}
0x0c380…0c392               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x007d, t01=0x0066}
0x0c392…0c3a6               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007d, t01=0x0078}
0x0c3a6…0c3cc               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x007d, t01=0x008c}
0x0c3cc…0c3de               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x007d, t01=0x00b2}
0x0c3de…0c3f2               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007d, t01=0x00c4}
0x0c3f2…0c418               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x007d, t01=0x00d8}
0x0c418…0c424               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x00fe}
0x0c424…0c444               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x007d, t01=0x010a}
0x0c444…0c458               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x007d, t01=0x012a}
0x0c458…0c47c               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x007d, t01=0x013e}
0x0c47c…0c490               Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x007d, t01=0x0162}
0x0c490…0c4ac               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x007d, t01=0x0176}
0x0c4ac…0c4d0 (126, 0, 400) Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x007e, t01=0x0004}
0x0c4d0…0c4da               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x007e, t01=0x0028}
0x0c4da…0c4e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0032}
0x0c4e4…0c4ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x003c}
0x0c4ee…0c510               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x007e, t01=0x0046}
0x0c510…0c51a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0068}
0x0c51a…0c524               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0072}
0x0c524…0c538               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x007e, t01=0x007c}
0x0c538…0c54c               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x007e, t01=0x0090}
0x0c54c…0c574               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x007e, t01=0x00a4}
0x0c574…0c592               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x007e, t01=0x00cc}
0x0c592…0c5b4               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x007e, t01=0x00ea}
0x0c5b4…0c5c8               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x007e, t01=0x010c}
0x0c5c8…0c5e6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x007e, t01=0x0120}
0x0c5e6…0c600               Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x007e, t01=0x013e}
0x0c600…0c614               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x007e, t01=0x0158}
0x0c614…0c632               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x007e, t01=0x016c}
0x0c632…0c646               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x007e, t01=0x018a}
0x0c646…0c664               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x007f, t01=0x000e}
0x0c664…0c678               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x007f, t01=0x002c}
0x0c678…0c696               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x007f, t01=0x0040}
0x0c696…0c6ae               Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x007f, t01=0x005e}
0x0c6ae…0c6cc               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x007f, t01=0x0076}
0x0c6cc…0c6e0               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x007f, t01=0x0094}
0x0c6e0…0c6fe               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x007f, t01=0x00a8}
0x0c6fe…0c720               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x007f, t01=0x00c6}
0x0c720…0c742               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x007f, t01=0x00e8}
0x0c742…0c754               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x007f, t01=0x010a}
0x0c754…0c77c               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x007f, t01=0x011c}
0x0c77c…0c79c               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x007f, t01=0x0144}
0x0c79c…0c7be               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x007f, t01=0x0164}
0x0c7be…0c7e0               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x007f, t01=0x0186}
0x0c7e0…0c7f2               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x0080, t01=0x0018}
0x0c7f2…0c810               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x0080, t01=0x002a}
0x0c810…0c822               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0080, t01=0x0048}
0x0c822…0c844               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x0080, t01=0x005a}
0x0c844…0c856               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x0080, t01=0x007c}
0x0c856…0c86a               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x0080, t01=0x008e}
0x0c86a…0c88a               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x0080, t01=0x00a2}
0x0c88a…0c8ae               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x0080, t01=0x00c2}
0x0c8ae…0c8ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x00e6}
0x0c8ba…0c8c4               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0080, t01=0x00f2}
0x0c8c4…0c8ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00fc}
0x0c8ce…0c8d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0106}
0x0c8d8…0c8f8               Head {h00=0x001c, h01=0x0050, text=»* TRANSMIT SYNC SEQUENCE«, t00=0x0080, t01=0x0110}
0x0c8f8…0c902               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0130}
0x0c902…0c90c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x013a}
0x0c90c…0c920               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x0080, t01=0x0144}
0x0c920…0c93a               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0080, t01=0x0158}
0x0c93a…0c968               Head {h00=0x002a, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT IF NOT DONE«, t00=0x0080, t01=0x0172}
0x0c968…0c98a               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN PERFORM SST «, t00=0x0081, t01=0x0010}
0x0c98a…0c9a6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0081, t01=0x0032}
0x0c9a6…0c9d0               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x0081, t01=0x004e}
0x0c9d0…0c9e6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0081, t01=0x0078}
0x0c9e6…0ca02               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0081, t01=0x008e}
0x0ca02…0ca1e               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=1  SALCUZ «, t00=0x0081, t01=0x00aa}
0x0ca1e…0ca38               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x0081, t01=0x00c6}
0x0ca38…0ca68               Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER SALCUZ«, t00=0x0081, t01=0x00e0}
0x0ca68…0ca86               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x0081, t01=0x0110}
0x0ca86…0caa4               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x0081, t01=0x012e}
0x0caa4…0cac2               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x0081, t01=0x014c}
0x0cac2…0cada               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0081, t01=0x016a}
0x0cada…0cb00               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0081, t01=0x0182}
0x0cb00…0cb1c               Head {h00=0x0018, h01=0x0050, text=»TRS010 EQU *  SALCUZ«, t00=0x0082, t01=0x0018}
0x0cb1c…0cb3a               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x0082, t01=0x0034}
0x0cb3a…0cb70               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0082, t01=0x0052}
0x0cb70…0cb86               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0082, t01=0x0088}
0x0cb86…0cba2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0082, t01=0x009e}
0x0cba2…0cbbe               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=0  SALCUZ «, t00=0x0082, t01=0x00ba}
0x0cbbe…0cbda               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x0082, t01=0x00d6}
0x0cbda…0cbfa               Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,LCUUT  SALCUZ «, t00=0x0082, t01=0x00f2}
0x0cbfa…0cc18               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x0082, t01=0x0112}
0x0cc18…0cc36               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x0082, t01=0x0130}
0x0cc36…0cc54               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x0082, t01=0x014e}
0x0cc54…0cc6c               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0082, t01=0x016c}
0x0cc6c…0cc92               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0082, t01=0x0184}
0x0cc92…0cca6               Head {h00=0x0010, h01=0x0050, text=»TRS010 EQU *«, t00=0x0083, t01=0x001a}
0x0cca6…0ccc2               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x0083, t01=0x002e}
0x0ccc2…0ccf8               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0083, t01=0x004a}
0x0ccf8…0cd0e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0083, t01=0x0080}
0x0cd0e…0cd3c               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x0083, t01=0x0096}
0x0cd3c…0cd54               Head {h00=0x0014, h01=0x0050, text=» LDK A3,4 4 SYNS«, t00=0x0083, t01=0x00c4}
0x0cd54…0cd6e               Head {h00=0x0016, h01=0x0050, text=»TRS100 LDK A2,SYN «, t00=0x0083, t01=0x00dc}
0x0cd6e…0cd8c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SYN «, t00=0x0083, t01=0x00f6}
0x0cd8c…0cd9e               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0083, t01=0x0114}
0x0cd9e…0cdb4               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x0083, t01=0x0126}
0x0cdb4…0cdc4               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0083, t01=0x013c}
0x0cdc4…0cdce               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0083, t01=0x014c}
0x0cdce…0cdd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0156}
0x0cdd8…0cde2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0160}
0x0cde2…0ce00               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x0083, t01=0x016a}
0x0ce00…0ce0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0188}
0x0ce0a…0ce14 (132, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0004}
0x0ce14…0ce28               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x0084, t01=0x000e}
0x0ce28…0ce3c               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0084, t01=0x0022}
0x0ce3c…0ce52               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0084, t01=0x0036}
0x0ce52…0ce72               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0084, t01=0x004c}
0x0ce72…0ce7e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x006c}
0x0ce7e…0ce86               Head {h00=0x0004, h01=0x0050, t00=0x0084, t01=0x0078}
0x0ce86…0ce9c               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0084, t01=0x0080}
0x0ce9c…0cebc               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0084, t01=0x0096}
0x0cebc…0cec8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x00b6}
0x0cec8…0cef6               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0084, t01=0x00c2}
0x0cef6…0cf18               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x0084, t01=0x00f0}
0x0cf18…0cf48               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x0084, t01=0x0112}
0x0cf48…0cf5c               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0084, t01=0x0142}
0x0cf5c…0cf88               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x0084, t01=0x0156}
0x0cf88…0cf94               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x0182}
0x0cf94…0cfa8               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0084, t01=0x018e}
0x0cfa8…0cfba               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0085, t01=0x0012}
0x0cfba…0cfd0               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHLCI2«, t00=0x0085, t01=0x0024}
0x0cfd0…0cfee               Head {h00=0x001a, h01=0x0050, text=» CWK A2,SYN SKIP SYNS «, t00=0x0085, t01=0x003a}
0x0cfee…0d002               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x0085, t01=0x0058}
0x0d002…0d028               Head {h00=0x0022, h01=0x0050, text=»IHLCI2 XRR A7,A2 CALCULATE LRC«, t00=0x0085, t01=0x006c}
0x0d028…0d034               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x0092}
0x0d034…0d048               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0085, t01=0x009e}
0x0d048…0d05a               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0085, t01=0x00b2}
0x0d05a…0d090               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME «, t00=0x0085, t01=0x00c4}
0x0d090…0d0a6               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x0085, t01=0x00fa}
0x0d0a6…0d0ca               Head {h00=0x0020, h01=0x0050, text=» RF(E) READ SKIP EBCDIC SYN «, t00=0x0085, t01=0x0110}
0x0d0ca…0d0de               Head {h00=0x0010, h01=0x0050, text=»IHLCI1 EQU *«, t00=0x0085, t01=0x0134}
0x0d0de…0d102               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x0085, t01=0x0148}
0x0d102…0d12e               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0085, t01=0x016c}
0x0d12e…0d13a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x0008}
0x0d13a…0d150               Head {h00=0x0012, h01=0x0050, text=»IHIN10 RTN A5 «, t00=0x0086, t01=0x0014}
0x0d150…0d16c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0086, t01=0x002a}
0x0d16c…0d190               Head {h00=0x0020, h01=0x0050, text=»IHIN20 CF A5,SST PERFORM SST«, t00=0x0086, t01=0x0046}
0x0d190…0d1a0               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0086, t01=0x006a}
0x0d1a0…0d1b6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0086, t01=0x007a}
0x0d1b6…0d1d2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0086, t01=0x0090}
0x0d1d2…0d1fa               Head {h00=0x0024, h01=0x0050, text=»IHIN20 RF SST PERFORM SST SALCUZ«, t00=0x0086, t01=0x00ac}
0x0d1fa…0d210               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0086, t01=0x00d4}
0x0d210…0d21a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0086, t01=0x00ea}
0x0d21a…0d224               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00f4}
0x0d224…0d22e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00fe}
0x0d22e…0d250               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x0086, t01=0x0108}
0x0d250…0d25a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x012a}
0x0d25a…0d264               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0134}
0x0d264…0d278               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x0086, t01=0x013e}
0x0d278…0d28c               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0086, t01=0x0152}
0x0d28c…0d2a2               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0086, t01=0x0166}
0x0d2a2…0d2c4               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0086, t01=0x017c}
0x0d2c4…0d2d0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x000e}
0x0d2d0…0d2d8               Head {h00=0x0004, h01=0x0050, t00=0x0087, t01=0x001a}
0x0d2d8…0d2ee               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0087, t01=0x0022}
0x0d2ee…0d30e               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0087, t01=0x0038}
0x0d30e…0d31a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x0058}
0x0d31a…0d348               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0087, t01=0x0064}
0x0d348…0d35a               Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x0087, t01=0x0092}
0x0d35a…0d364               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0087, t01=0x00a4}
0x0d364…0d36e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00ae}
0x0d36e…0d378               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00b8}
0x0d378…0d3a2               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x0087, t01=0x00c2}
0x0d3a2…0d3ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00ec}
0x0d3ac…0d3d8               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x0087, t01=0x00f6}
0x0d3d8…0d40a               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x0087, t01=0x0122}
0x0d40a…0d43a               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x0087, t01=0x0154}
0x0d43a…0d46a               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x0087, t01=0x0184}
0x0d46a…0d474               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0024}
0x0d474…0d48c               Head {h00=0x0014, h01=0x0050, text=»SST SST A1,LCUIN«, t00=0x0088, t01=0x002e}
0x0d48c…0d4a8               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0088, t01=0x0046}
0x0d4a8…0d4de               Head {h00=0x0032, h01=0x0050, text=» RF(NA) SST200 ALREADY INACTIVE SALCUZ  SALCUZ«, t00=0x0088, t01=0x0062}
0x0d4de…0d4f4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0088, t01=0x0098}
0x0d4f4…0d506               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0088, t01=0x00ae}
0x0d506…0d51a               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0088, t01=0x00c0}
0x0d51a…0d544               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOG SST INFORMATION «, t00=0x0088, t01=0x00d4}
0x0d544…0d550               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x00fe}
0x0d550…0d56c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0088, t01=0x010a}
0x0d56c…0d57e               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0088, t01=0x0126}
0x0d57e…0d594               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x0088, t01=0x0138}
0x0d594…0d5aa               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0088, t01=0x014e}
0x0d5aa…0d5c6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0088, t01=0x0164}
0x0d5c6…0d5e0               Head {h00=0x0016, h01=0x0050, text=» ANK A2,6  SALCUZ «, t00=0x0088, t01=0x0180}
0x0d5e0…0d5fe               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST100  SALCUZ «, t00=0x0089, t01=0x000a}
0x0d5fe…0d618               Head {h00=0x0016, h01=0x0050, text=» ANK A2,2  SALCUZ «, t00=0x0089, t01=0x0028}
0x0d618…0d642               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SST050 THROUGH PUT SALCUZ «, t00=0x0089, t01=0x0042}
0x0d642…0d66c               Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 SET PARITY ERROR SALCUZ «, t00=0x0089, t01=0x006c}
0x0d66c…0d686               Head {h00=0x0016, h01=0x0050, text=» RF SSTRET  SALCUZ«, t00=0x0089, t01=0x0096}
0x0d686…0d69c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0089, t01=0x00b0}
0x0d69c…0d6b8               Head {h00=0x0018, h01=0x0050, text=»SST050 EQU *  SALCUZ«, t00=0x0089, t01=0x00c6}
0x0d6b8…0d6d8               Head {h00=0x001c, h01=0x0050, text=» CM XSTA TROUHHPUT ERROR«, t00=0x0089, t01=0x00e2}
0x0d6d8…0d6ec               Head {h00=0x0010, h01=0x0050, text=» LDKL A5,STB«, t00=0x0089, t01=0x0102}
0x0d6ec…0d700               Head {h00=0x0010, h01=0x0050, text=» ABL BRM010 «, t00=0x0089, t01=0x0116}
0x0d700…0d714               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x0089, t01=0x012a}
0x0d714…0d72a               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTCU «, t00=0x0089, t01=0x013e}
0x0d72a…0d746               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0089, t01=0x0154}
0x0d746…0d774               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0089, t01=0x0170}
0x0d774…0d784               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008a, t01=0x000e}
0x0d784…0d79a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008a, t01=0x001e}
0x0d79a…0d7b6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008a, t01=0x0034}
0x0d7b6…0d7d2               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/21  SALCUZ «, t00=0x008a, t01=0x0050}
0x0d7d2…0d7f0               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST200 LSALCUZ «, t00=0x008a, t01=0x006c}
0x0d7f0…0d82a               Head {h00=0x0036, h01=0x0050, text=» CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ«, t00=0x008a, t01=0x008a}
0x0d82a…0d84a               Head {h00=0x001c, h01=0x0050, text=» DATA BRM RESTART SALCUZ«, t00=0x008a, t01=0x00c4}
0x0d84a…0d86a               Head {h00=0x001c, h01=0x0050, text=» DATA 2 WAIT TIME SALCUZ«, t00=0x008a, t01=0x00e4}
0x0d86a…0d882               Head {h00=0x0014, h01=0x0050, text=» RF READ  SALCUZ«, t00=0x008a, t01=0x0104}
0x0d882…0d88c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x011c}
0x0d88c…0d8ac               Head {h00=0x001c, h01=0x0050, text=»SST200 LDK A1,0  SALCUZ «, t00=0x008a, t01=0x0126}
0x0d8ac…0d8cc               Head {h00=0x001c, h01=0x0050, text=»SSTRET ADK A5,4  SALCUZ «, t00=0x008a, t01=0x0146}
0x0d8cc…0d8ec               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 SET CR SALCUZ«, t00=0x008a, t01=0x0166}
0x0d8ec…0d90a               Head {h00=0x001a, h01=0x0050, text=» ABR* A5 RETURN SALCUZ«, t00=0x008a, t01=0x0186}
0x0d90a…0d920               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008b, t01=0x0014}
0x0d920…0d92a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x002a}
0x0d92a…0d934               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0034}
0x0d934…0d948               Head {h00=0x0010, h01=0x0050, text=»* HALT INPUT«, t00=0x008b, t01=0x003e}
0x0d948…0d952               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0052}
0x0d952…0d95c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x005c}
0x0d95c…0d97c               Head {h00=0x001c, h01=0x0050, text=»HALTIN LDK A1,0  SALCUZ «, t00=0x008b, t01=0x0066}
0x0d97c…0d994               Head {h00=0x0014, h01=0x0050, text=» CIO A1,0,LCUIN «, t00=0x008b, t01=0x0086}
0x0d994…0d9b0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x008b, t01=0x009e}
0x0d9b0…0d9e8               Head {h00=0x0034, h01=0x0050, text=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK«, t00=0x008b, t01=0x00ba}
0x0d9e8…0d9fe               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008b, t01=0x00f2}
0x0d9fe…0da1a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x008b, t01=0x0108}
0x0da1a…0da48               Head {h00=0x002a, h01=0x0050, text=» RF READ WAIT FOR SST INTERRUPT SALCUZ«, t00=0x008b, t01=0x0124}
0x0da48…0da5e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x008b, t01=0x0152}
0x0da5e…0da68               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x008b, t01=0x0168}
0x0da68…0da72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0172}
0x0da72…0da7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x017c}
0x0da7c…0daac               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x008b, t01=0x0186}
0x0daac…0dab6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0026}
0x0dab6…0dac0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0030}
0x0dac0…0dad4               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x008c, t01=0x003a}
0x0dad4…0dae8               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008c, t01=0x004e}
0x0dae8…0dafc               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x008c, t01=0x0062}
0x0dafc…0db10               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x008c, t01=0x0076}
0x0db10…0db44               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x008c, t01=0x008a}
0x0db44…0db72               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x008c, t01=0x00be}
0x0db72…0db7e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x00ec}
0x0db7e…0db92               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x008c, t01=0x00f8}
0x0db92…0dbb8               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x008c, t01=0x010c}
0x0dbb8…0dbce               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x008c, t01=0x0132}
0x0dbce…0dbf0               Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x008c, t01=0x0148}
0x0dbf0…0dc04               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x008c, t01=0x016a}
0x0dc04…0dc2c               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x008c, t01=0x017e}
0x0dc2c…0dc38               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0016}
0x0dc38…0dc4c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008d, t01=0x0022}
0x0dc4c…0dc76               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x008d, t01=0x0036}
0x0dc76…0dc82               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0060}
0x0dc82…0dc96               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x008d, t01=0x006c}
0x0dc96…0dcc0               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x008d, t01=0x0080}
0x0dcc0…0dccc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x00aa}
0x0dccc…0dcd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00b6}
0x0dcd6…0dcf0               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x008d, t01=0x00c0}
0x0dcf0…0dd02               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x008d, t01=0x00da}
0x0dd02…0dd0c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x008d, t01=0x00ec}
0x0dd0c…0dd16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00f6}
0x0dd16…0dd20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0100}
0x0dd20…0dd32               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x008d, t01=0x010a}
0x0dd32…0dd3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x011c}
0x0dd3c…0dd5c               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x008d, t01=0x0126}
0x0dd5c…0dd66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0146}
0x0dd66…0dd70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0150}
0x0dd70…0dd92               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x008d, t01=0x015a}
0x0dd92…0ddac               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x008d, t01=0x017c}
0x0ddac…0ddbe               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x008e, t01=0x0008}
0x0ddbe…0ddd2               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x008e, t01=0x001a}
0x0ddd2…0ddea               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x008e, t01=0x002e}
0x0ddea…0de00               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x008e, t01=0x0046}
0x0de00…0de1a               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x008e, t01=0x005c}
0x0de1a…0de2e               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x008e, t01=0x0076}
0x0de2e…0de40               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x008e, t01=0x008a}
0x0de40…0de4c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x009c}
0x0de4c…0de6e               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008e, t01=0x00a8}
0x0de6e…0de86               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x008e, t01=0x00ca}
0x0de86…0de92               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x00e2}
0x0de92…0de9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00ee}
0x0de9c…0dea6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00f8}
0x0dea6…0deb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0102}
0x0deb0…0dec2               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x008e, t01=0x010c}
0x0dec2…0decc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x011e}
0x0decc…0defe               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x008e, t01=0x0128}
0x0defe…0df08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x015a}
0x0df08…0df12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0164}
0x0df12…0df2a               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x008e, t01=0x016e}
0x0df2a…0df4c               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x008e, t01=0x0186}
0x0df4c…0df5e               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x008f, t01=0x0018}
0x0df5e…0df74               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x008f, t01=0x002a}
0x0df74…0df88               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x008f, t01=0x0040}
0x0df88…0df9e               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x008f, t01=0x0054}
0x0df9e…0dfb2               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x008f, t01=0x006a}
0x0dfb2…0dfc4               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x008f, t01=0x007e}
0x0dfc4…0dfdc               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x008f, t01=0x0090}
0x0dfdc…0dff0               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x008f, t01=0x00a8}
0x0dff0…0dffc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x00bc}
0x0dffc…0e01e               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008f, t01=0x00c8}
0x0e01e…0e032               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x008f, t01=0x00ea}
0x0e032…0e03e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x00fe}
0x0e03e…0e050               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x008f, t01=0x010a}
0x0e050…0e064               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x008f, t01=0x011c}
0x0e064…0e078               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x008f, t01=0x0130}
0x0e078…0e088               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x008f, t01=0x0144}
0x0e088…0e092               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0154}
0x0e092…0e09c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x015e}
0x0e09c…0e0a6               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x008f, t01=0x0168}
0x0e0a6…0e0b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0172}
0x0e0b0…0e0f0               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x008f, t01=0x017c}
0x0e0f0…0e0fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x002c}
0x0e0fa…0e122               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x0090, t01=0x0036}
0x0e122…0e142               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x0090, t01=0x005e}
0x0e142…0e158               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x0090, t01=0x007e}
0x0e158…0e17e               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x0090, t01=0x0094}
0x0e17e…0e188               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00ba}
0x0e188…0e1ce               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x0090, t01=0x00c4}
0x0e1ce…0e1fc               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x0090, t01=0x010a}
0x0e1fc…0e22c               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x0090, t01=0x0138}
0x0e22c…0e236               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0168}
0x0e236…0e268               Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x0090, t01=0x0172}
0x0e268…0e272               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0014}
0x0e272…0e27c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x001e}
0x0e27c…0e290               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x0091, t01=0x0028}
0x0e290…0e2a4               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0091, t01=0x003c}
0x0e2a4…0e2b8               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0091, t01=0x0050}
0x0e2b8…0e2c4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x0064}
0x0e2c4…0e2d6               Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x0091, t01=0x0070}
0x0e2d6…0e2ea               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0091, t01=0x0082}
0x0e2ea…0e2fe               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0091, t01=0x0096}
0x0e2fe…0e30a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x00aa}
0x0e30a…0e334               Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x0091, t01=0x00b6}
0x0e334…0e362               Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x0091, t01=0x00e0}
0x0e362…0e37a               Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x0091, t01=0x010e}
0x0e37a…0e39a               Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x0091, t01=0x0126}
0x0e39a…0e3bc               Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x0091, t01=0x0146}
0x0e3bc…0e3e8               Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x0091, t01=0x0168}
0x0e3e8…0e40c (146, 0, 398) Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x0092, t01=0x0004}
0x0e40c…0e420               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0092, t01=0x0028}
0x0e420…0e448               Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x0092, t01=0x003c}
0x0e448…0e476               Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x0092, t01=0x0064}
0x0e476…0e482               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0092, t01=0x0092}
0x0e482…0e496               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0092, t01=0x009e}
0x0e496…0e4c8               Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x0092, t01=0x00b2}
0x0e4c8…0e4d4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0092, t01=0x00e4}
0x0e4d4…0e4fe               Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x0092, t01=0x00f0}
0x0e4fe…0e516               Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x0092, t01=0x011a}
0x0e516…0e52c               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x0092, t01=0x0132}
0x0e52c…0e53c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0092, t01=0x0148}
0x0e53c…0e546               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0092, t01=0x0158}
0x0e546…0e550               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0162}
0x0e550…0e55a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x016c}
0x0e55a…0e576               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x0092, t01=0x0176}
0x0e576…0e580 (147, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0004}
0x0e580…0e58a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x000e}
0x0e58a…0e59e               Head {h00=0x0010, h01=0x0050, text=»DC15ON EQU *«, t00=0x0093, t01=0x0018}
0x0e59e…0e5b4               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0093, t01=0x002c}
0x0e5b4…0e5d4               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0093, t01=0x0042}
0x0e5d4…0e5e0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x0062}
0x0e5e0…0e5e8               Head {h00=0x0004, h01=0x0050, t00=0x0093, t01=0x006e}
0x0e5e8…0e5fe               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0093, t01=0x0076}
0x0e5fe…0e61e               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0093, t01=0x008c}
0x0e61e…0e62a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x00ac}
0x0e62a…0e63e               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0093, t01=0x00b8}
0x0e63e…0e65e               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x0093, t01=0x00cc}
0x0e65e…0e672               Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x0093, t01=0x00ec}
0x0e672…0e6a4               Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x0093, t01=0x0100}
0x0e6a4…0e6bc               Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x0093, t01=0x0132}
0x0e6bc…0e6d0               Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x0093, t01=0x014a}
0x0e6d0…0e6f2               Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x0093, t01=0x015e}
0x0e6f2…0e716               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x0093, t01=0x0180}
0x0e716…0e74a               Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x0094, t01=0x0014}
0x0e74a…0e776               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x0094, t01=0x0048}
0x0e776…0e788               Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x0094, t01=0x0074}
0x0e788…0e79c               Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x0094, t01=0x0086}
0x0e79c…0e7a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x009a}
0x0e7a8…0e7bc               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0094, t01=0x00a6}
0x0e7bc…0e7d2               Head {h00=0x0012, h01=0x0050, text=» ORS A2,DCONOF«, t00=0x0094, t01=0x00ba}
0x0e7d2…0e7e8               Head {h00=0x0012, h01=0x0050, text=» CF A15,CKMESS«, t00=0x0094, t01=0x00d0}
0x0e7e8…0e814               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x0094, t01=0x00e6}
0x0e814…0e83a               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x0094, t01=0x0112}
0x0e83a…0e868               Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x0094, t01=0x0138}
0x0e868…0e87e               Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x0094, t01=0x0166}
0x0e87e…0e888               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0094, t01=0x017c}
0x0e888…0e892               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0186}
0x0e892…0e8aa               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0094, t01=0x0190}
0x0e8aa…0e8b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0018}
0x0e8b4…0e8e0               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0095, t01=0x0022}
0x0e8e0…0e8f4               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0095, t01=0x004e}
0x0e8f4…0e920               Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x0095, t01=0x0062}
0x0e920…0e94e               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0095, t01=0x008e}
0x0e94e…0e976               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0095, t01=0x00bc}
0x0e976…0e988               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0095, t01=0x00e4}
0x0e988…0e992               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00f6}
0x0e992…0e9ca               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x0095, t01=0x0100}
0x0e9ca…0e9d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0138}
0x0e9d4…0e9fc               Head {h00=0x0024, h01=0x0050, text=»CPTIM CM DCONOF INDICATE POLLING«, t00=0x0095, t01=0x0142}
0x0e9fc…0ea14               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x0095, t01=0x016a}
0x0ea14…0ea38               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x0095, t01=0x0182}
0x0ea38…0ea66               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0096, t01=0x0016}
0x0ea66…0ea76               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0096, t01=0x0044}
0x0ea76…0ea80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0054}
0x0ea80…0ea9a               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x0096, t01=0x005e}
0x0ea9a…0eaa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0078}
0x0eaa4…0eacc               Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x0096, t01=0x0082}
0x0eacc…0eae6               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x0096, t01=0x00aa}
0x0eae6…0eb10               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x0096, t01=0x00c4}
0x0eb10…0eb24               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0096, t01=0x00ee}
0x0eb24…0eb36               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0096, t01=0x0102}
0x0eb36…0eb40               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0096, t01=0x0114}
0x0eb40…0eb4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x011e}
0x0eb4a…0eb6a               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x0096, t01=0x0128}
0x0eb6a…0eb74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0148}
0x0eb74…0eb88               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x0096, t01=0x0152}
0x0eb88…0ebb0               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x0096, t01=0x0166}
0x0ebb0…0ebc6               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0096, t01=0x018e}
0x0ebc6…0ebe2               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x0097, t01=0x0014}
0x0ebe2…0ec0a               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x0097, t01=0x0030}
0x0ec0a…0ec1a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0097, t01=0x0058}
0x0ec1a…0ec24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0068}
0x0ec24…0ec40               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x0097, t01=0x0072}
0x0ec40…0ec4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x008e}
0x0ec4a…0ec62               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x0097, t01=0x0098}
0x0ec62…0ec7e               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x0097, t01=0x00b0}
0x0ec7e…0eca2               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x0097, t01=0x00cc}
0x0eca2…0ecd2               Head {h00=0x002c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT IF OPEN SALCUZ «, t00=0x0097, t01=0x00f0}
0x0ecd2…0ece6               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0097, t01=0x0120}
0x0ece6…0ed0c               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x0097, t01=0x0134}
0x0ed0c…0ed2a               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0097, t01=0x015a}
0x0ed2a…0ed54               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0097, t01=0x0178}
0x0ed54…0ed6a               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x0098, t01=0x0012}
0x0ed6a…0ed74               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0098, t01=0x0028}
0x0ed74…0ed7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0032}
0x0ed7e…0ed9c               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x0098, t01=0x003c}
0x0ed9c…0eda6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x005a}
0x0eda6…0edd2               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x0098, t01=0x0064}
0x0edd2…0edf2               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x0098, t01=0x0090}
0x0edf2…0ee10               Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x0098, t01=0x00b0}
0x0ee10…0ee22               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x0098, t01=0x00ce}
0x0ee22…0ee36               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x0098, t01=0x00e0}
0x0ee36…0ee40               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0098, t01=0x00f4}
0x0ee40…0ee54               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0098, t01=0x00fe}
0x0ee54…0ee5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0112}
0x0ee5e…0ee68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x011c}
0x0ee68…0ee84               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x0098, t01=0x0126}
0x0ee84…0ee8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0142}
0x0ee8e…0eea6               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x0098, t01=0x014c}
0x0eea6…0eec4               Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x0098, t01=0x0164}
0x0eec4…0eece               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0182}
0x0eece…0eed8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x018c}
0x0eed8…0eeec               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x0099, t01=0x0008}
0x0eeec…0ef02               Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x0099, t01=0x001c}
0x0ef02…0ef1a               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x0099, t01=0x0032}
0x0ef1a…0ef32               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x0099, t01=0x004a}
0x0ef32…0ef44               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x0099, t01=0x0062}
0x0ef44…0ef5c               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x0099, t01=0x0074}
0x0ef5c…0ef6e               Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x0099, t01=0x008c}
0x0ef6e…0ef80               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x0099, t01=0x009e}
0x0ef80…0ef92               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x0099, t01=0x00b0}
0x0ef92…0efa4               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0099, t01=0x00c2}
0x0efa4…0efba               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x0099, t01=0x00d4}
0x0efba…0efd0               Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x0099, t01=0x00ea}
0x0efd0…0efe8               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x0099, t01=0x0100}
0x0efe8…0effe               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x0099, t01=0x0118}
0x0effe…0f014               Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x0099, t01=0x012e}
0x0f014…0f02c               Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x0099, t01=0x0144}
0x0f02c…0f044               Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x0099, t01=0x015c}
0x0f044…0f054               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0099, t01=0x0174}
0x0f054…0f068               Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x0099, t01=0x0184}
0x0f068…0f072               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009a, t01=0x0008}
0x0f072…0f07c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0012}
0x0f07c…0f086               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x001c}
0x0f086…0f0b2               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x009a, t01=0x0026}
0x0f0b2…0f0d2               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x009a, t01=0x0052}
0x0f0d2…0f0dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0072}
0x0f0dc…0f0e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x007c}
0x0f0e6…0f10e               Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x009a, t01=0x0086}
0x0f10e…0f136               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x009a, t01=0x00ae}
0x0f136…0f156               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x009a, t01=0x00d6}
0x0f156…0f176               Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x009a, t01=0x00f6}
0x0f176…0f196               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x009a, t01=0x0116}
0x0f196…0f1c2               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x009a, t01=0x0136}
0x0f1c2…0f1e2               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x009a, t01=0x0162}
0x0f1e2…0f1f4               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x009a, t01=0x0182}
0x0f1f4…0f206 (155, 0, 400) Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x009b, t01=0x0004}
0x0f206…0f218               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x009b, t01=0x0016}
0x0f218…0f24a               Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x009b, t01=0x0028}
0x0f24a…0f25a               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009b, t01=0x005a}
0x0f25a…0f266               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x006a}
0x0f266…0f27a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x009b, t01=0x0076}
0x0f27a…0f284               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x008a}
0x0f284…0f2ae               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x009b, t01=0x0094}
0x0f2ae…0f2d4               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x009b, t01=0x00be}
0x0f2d4…0f2de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x00e4}
0x0f2de…0f2f4               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x009b, t01=0x00ee}
0x0f2f4…0f308               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x009b, t01=0x0104}
0x0f308…0f31a               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x009b, t01=0x0118}
0x0f31a…0f32c               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x009b, t01=0x012a}
0x0f32c…0f342               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x009b, t01=0x013c}
0x0f342…0f356               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x009b, t01=0x0152}
0x0f356…0f36a               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x009b, t01=0x0166}
0x0f36a…0f37c               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x009b, t01=0x017a}
0x0f37c…0f38c               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009b, t01=0x018c}
0x0f38c…0f394               Head {h00=0x0004, h01=0x0050, t00=0x009c, t01=0x000c}
0x0f394…0f3a0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x0014}
0x0f3a0…0f3aa               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009c, t01=0x0020}
0x0f3aa…0f3b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x002a}
0x0f3b4…0f3be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0034}
0x0f3be…0f3e4               Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x009c, t01=0x003e}
0x0f3e4…0f3ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0064}
0x0f3ee…0f3f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x006e}
0x0f3f8…0f418               Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x009c, t01=0x0078}
0x0f418…0f438               Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x009c, t01=0x0098}
0x0f438…0f452               Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x009c, t01=0x00b8}
0x0f452…0f46e               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x009c, t01=0x00d2}
0x0f46e…0f484               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x009c, t01=0x00ee}
0x0f484…0f4b2               Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x009c, t01=0x0104}
0x0f4b2…0f4ce               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x009c, t01=0x0132}
0x0f4ce…0f4f6               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x009c, t01=0x014e}
0x0f4f6…0f510               Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x009c, t01=0x0176}
0x0f510…0f51a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0190}
0x0f51a…0f530               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x009d, t01=0x000a}
0x0f530…0f550               Head {h00=0x001c, h01=0x0050, text=» DATA 0 USER ECB ADDRESS«, t00=0x009d, t01=0x0020}
0x0f550…0f574               Head {h00=0x0020, h01=0x0050, text=» DATA DC:ECB MMU ECB ADDRESS«, t00=0x009d, t01=0x0040}
0x0f574…0f580               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009d, t01=0x0064}
0x0f580…0f58a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0070}
0x0f58a…0f5a8               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x009d, t01=0x007a}
0x0f5a8…0f5d4               Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x009d, t01=0x0098}
0x0f5d4…0f606               Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x009d, t01=0x00c4}
0x0f606…0f62c               Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x009d, t01=0x00f6}
0x0f62c…0f65c               Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x009d, t01=0x011c}
0x0f65c…0f67a               Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x009d, t01=0x014c}
0x0f67a…0f6a0               Head {h00=0x0022, h01=0x0050, text=» DATA 0 REQUEST TIMEOUT VALUE «, t00=0x009d, t01=0x016a}
0x0f6a0…0f6aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0190}
0x0f6aa…0f6c0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x009e, t01=0x000a}
0x0f6c0…0f6dc               Head {h00=0x0018, h01=0x0050, text=»DC:ECB EQU * MMU ECB«, t00=0x009e, t01=0x0020}
0x0f6dc…0f6f6               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x009e, t01=0x003c}
0x0f6f6…0f702               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009e, t01=0x0056}
0x0f702…0f70c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0062}
0x0f70c…0f716               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009e, t01=0x006c}
0x0f716…0f720               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0076}
0x0f720…0f72a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0080}
0x0f72a…0f74a               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x009e, t01=0x008a}
0x0f74a…0f754               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00aa}
0x0f754…0f774               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x009e, t01=0x00b4}
0x0f774…0f77e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00d4}
0x0f77e…0f792               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x009e, t01=0x00de}
0x0f792…0f7b6               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x009e, t01=0x00f2}
0x0f7b6…0f7d0               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x009e, t01=0x0116}
0x0f7d0…0f7e6               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x009e, t01=0x0130}
0x0f7e6…0f7fc               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009e, t01=0x0146}
0x0f7fc…0f810               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009e, t01=0x015c}
0x0f810…0f826               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x009e, t01=0x0170}
0x0f826…0f83c               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009e, t01=0x0186}
0x0f83c…0f850               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x000c}
0x0f850…0f866               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x009f, t01=0x0020}
0x0f866…0f87c               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009f, t01=0x0036}
0x0f87c…0f890               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x004c}
0x0f890…0f89c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x0060}
0x0f89c…0f8b6               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x009f, t01=0x006c}
0x0f8b6…0f8cc               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009f, t01=0x0086}
0x0f8cc…0f8e0               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x009c}
0x0f8e0…0f8f2               Head {h00=0x000e, h01=0x0050, text=» XIF   DK3«, t00=0x009f, t01=0x00b0}
0x0f8f2…0f90e               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x009f, t01=0x00c2}
0x0f90e…0f922               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009f, t01=0x00de}
0x0f922…0f92a               Head {h00=0x0004, h01=0x0050, t00=0x009f, t01=0x00f2}
0x0f92a…0f940               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x009f, t01=0x00fa}
0x0f940…0f96a               Head {h00=0x0026, h01=0x0050, text=»MMUBUF RES TBUFL+1 MMU WORK BUFFER«, t00=0x009f, t01=0x0110}
0x0f96a…0f976               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x013a}
0x0f976…0f980               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x009f, t01=0x0146}
0x0f980…0f98a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0150}
0x0f98a…0f994               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x015a}
0x0f994…0f9b8               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x009f, t01=0x0164}
0x0f9b8…0f9c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0188}
0x0f9c2…0f9cc (160, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0004}
0x0f9cc…0f9e0               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00a0, t01=0x000e}
0x0f9e0…0f9fa               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x00a0, t01=0x0022}
0x0f9fa…0fa10               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x00a0, t01=0x003c}
0x0fa10…0fa22               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a0, t01=0x0052}
0x0fa22…0fa3c               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x00a0, t01=0x0064}
0x0fa3c…0fa52               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x00a0, t01=0x007e}
0x0fa52…0fa64               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a0, t01=0x0094}
0x0fa64…0fa7c               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x00a0, t01=0x00a6}
0x0fa7c…0fa92               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x00a0, t01=0x00be}
0x0fa92…0faa6               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x00a0, t01=0x00d4}
0x0faa6…0fac0               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x00a0, t01=0x00e8}
0x0fac0…0fad6               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x00a0, t01=0x0102}
0x0fad6…0fae8               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x00a0, t01=0x0118}
0x0fae8…0fafa               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x00a0, t01=0x012a}
0x0fafa…0fb10               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x00a0, t01=0x013c}
0x0fb10…0fb26               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x00a0, t01=0x0152}
0x0fb26…0fb3e               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x00a0, t01=0x0168}
0x0fb3e…0fb5a               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x00a0, t01=0x0180}
0x0fb5a…0fb6e               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x00a1, t01=0x000c}
0x0fb6e…0fb82               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x00a1, t01=0x0020}
0x0fb82…0fb98               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x00a1, t01=0x0034}
0x0fb98…0fba2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a1, t01=0x004a}
0x0fba2…0fbac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0054}
0x0fbac…0fbb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x005e}
0x0fbb6…0fbd0               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x00a1, t01=0x0068}
0x0fbd0…0fbe4               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x00a1, t01=0x0082}
0x0fbe4…0fbf4               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x00a1, t01=0x0096}
0x0fbf4…0fc0a               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x00a1, t01=0x00a6}
0x0fc0a…0fc1e               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x00a1, t01=0x00bc}
0x0fc1e…0fc32               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x00a1, t01=0x00d0}
0x0fc32…0fc3e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x00e4}
0x0fc3e…0fc48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00f0}
0x0fc48…0fc52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00fa}
0x0fc52…0fc5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0104}
0x0fc5c…0fc70               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00a1, t01=0x010e}
0x0fc70…0fc7a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a1, t01=0x0122}
0x0fc7a…0fcba               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x00a1, t01=0x012c}
0x0fcba…0fcc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x016c}
0x0fcc4…0fcde               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x00a1, t01=0x0176}
0x0fcde…0fce8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0190}
0x0fce8…0fd26               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x00a2, t01=0x000a}
0x0fd26…0fd30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0048}
0x0fd30…0fd72               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x00a2, t01=0x0052}
0x0fd72…0fd7a               Head {h00=0x0004, h01=0x0050, t00=0x00a2, t01=0x0094}
0x0fd7a…0fd8e               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x00a2, t01=0x009c}
0x0fd8e…0fdb4               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x00a2, t01=0x00b0}
0x0fdb4…0fdc6               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x00a2, t01=0x00d6}
0x0fdc6…0fddc               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a2, t01=0x00e8}
0x0fddc…0fe06               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x00a2, t01=0x00fe}
0x0fe06…0fe2c               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x00a2, t01=0x0128}
0x0fe2c…0fe34               Head {h00=0x0004, h01=0x0050, t00=0x00a2, t01=0x014e}
0x0fe34…0fe46               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x00a2, t01=0x0156}
0x0fe46…0fe5c               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a2, t01=0x0168}
0x0fe5c…0fe88               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x00a2, t01=0x017e}
0x0fe88…0feb0               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x00a3, t01=0x001a}
0x0feb0…0fec6               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x00a3, t01=0x0042}
0x0fec6…0fed0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0058}
0x0fed0…0feda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0062}
0x0feda…0fee4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x006c}
0x0fee4…0feee               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a3, t01=0x0076}
0x0feee…0fef6               Head {h00=0x0004, h01=0x0050, t00=0x00a3, t01=0x0080}
0x0fef6…0ff1a               Head {h00=0x0020, h01=0x0050, text=»*     SCANDINAVIAN ALPHABET «, t00=0x00a3, t01=0x0088}
0x0ff1a…0ff28               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x00a3, t01=0x00ac}
0x0ff28…0ff3c               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x00a3, t01=0x00ba}
0x0ff3c…0ff6a               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x00a3, t01=0x00ce}
0x0ff6a…0ff98               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/232E,/3C28,/2B21 /08-/0F «, t00=0x00a3, t01=0x00fc}
0x0ff98…0ffc6               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x00a3, t01=0x012a}
0x0ffc6…0fff4               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/245D,/2A29,/3B5E /18-/1F «, t00=0x00a3, t01=0x0158}
0x0fff4…10022               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x00a3, t01=0x0186}
0x10022…10050               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/402C,/255F,/3E3F /28-/2F «, t00=0x00a4, t01=0x0024}
0x10050…1007c               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x00a4, t01=0x0052}
0x1007c…100a8               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A5B,/5C27,/3D22 /38-3F«, t00=0x00a4, t01=0x007e}
0x100a8…100b6               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x00a4, t01=0x00aa}
0x100b6…100c2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a4, t01=0x00b8}
0x100c2…100cc               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x00a4, t01=0x00c4}
0x100cc…100d4               Head {h00=0x0004, h01=0x0050, t00=0x00a4, t01=0x00ce}
0x100d4…100f0               Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x00a4, t01=0x00d6}
0x100f0…1010a               Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x00a4, t01=0x00f2}
0x1010a…10130               Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x00a4, t01=0x010c}
0x10130…1015e               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=0x0132}
0x1015e…1018c               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=0x0160}
0x1018c…101a0               Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x00a4, t01=0x018e}
0x101a0…101aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0012}
0x101aa…101b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x001c}
0x101b4…101c0               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00a5, t01=0x0026}
0x101c0…101c4               Head {h00=0x4004, h01=0x0000}
0x101c4…101c8               00 a5 00 32                                                                                                                                                                                                                                       ┆   2┆
0x101c8…101d0 (166, 1, 8)   20 04 00 00 00 a6 00 04                                                                                                                                                                                                                           ┆        ┆
0x101d0…10220 (167, 2, 340) 00 2c 00 28 03 13 00 00 01 b7 80 00 00 00 00 1e 81 3e 11 02 5f 14 f0 3e 81 3f 81 20 c0 c0 81 5f 00 04 81 3e f0 3e 81 3f e1 5e 00 18 00 04 00 04 00 10 00 0c 05 05 dc 49 4e 54 53 41 56 40 01 e4 00 04 00 34 00 10 00 0c 05 05 dc 49 4c 4c 49 4e   ┆ , (             >  _  > ?     _   > > ? ^             INTSAV@     4       ILLIN┆
0x10220…10270               54 f6 01 e8 00 04 00 48 00 0e 00 0a 05 04 9c 48 41 4c 54 59 01 ee 00 04 00 5c 00 2c 00 28 03 13 00 01 01 d5 00 00 21 fc 19 bc 59 18 81 5e 00 18 a1 20 ff fe 5f 1e 00 00 00 00 01 05 f7 a1 00 00 bf 3f 87 c1 01 e6 00 04 00 6e 00 10 00 0c 03 05   ┆T      H       HALTY       , (        !   Y  ^      _            ?       n      ┆
0x10270…102c0               00 00 01 f5 00 00 41 2e 20 7f 00 04 00 9e 00 48 00 44 04 21 83 34 00 15 00 24 00 31 50 10 00 3b 52 06 00 53 57 0c 00 5b 57 06 00 67 54 24 00 91 00 d0 00 99 00 d0 00 a5 54 04 00 b9 50 ec 00 c3 00 f4 00 cb 00 f4 00 d9 54 06 00 df 01 ee 01 1d   ┆      A.       H D ! 4   $ 1P  ;R  SW  [W  gT$          T   P           T       ┆
0x102c0…10310               52 22 01 23 54 18 00 04 00 b2 00 3c 00 38 04 1b 00 08 01 33 54 3e 01 39 57 38 01 4b 52 22 01 51 54 18 01 61 54 10 01 67 57 0a 01 71 57 32 01 7b 57 28 01 8d 50 0a 01 97 57 0c 01 9b 57 08 01 af 56 0e 01 ed 01 ee 00 04 00 fe 00 0e 00 0a 07 04   ┆R" #T      < 8     3T> 9W8 KR" QT  aT  gW  qW2 {W(  P   W   W   V               ┆
0x10310…10324               00 00 00 00 01 f8 00 00 00 04 01 3e 40 04 00 00 00 04 01 50                                                                                                                                                                                       ┆           >@      P┆
0x10324…10374 (168, 0, 400) 00 4a 00 46 20 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 54 54 4d 4a 4f 42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 20 39 2e 32 20 37 39 2d 31 31 2d 31 36 20 20 38 37 30 31 30 35 30 34 30 39 32 30 00 00 00 04 00 46   ┆ J F         IDENT TTMJOB                   REL 9.2 79-11-16  870105040920     F┆
0x10374…103c4               00 42 01 20 c4 54 54 42 3a 4c 41 4b c4 54 54 42 3a 4d 54 00 c4 54 54 42 3a 53 42 c4 c4 54 54 4d 4a 4f 42 00 c4 54 54 42 3a 51 4c ff c4 54 54 42 3a 49 44 d3 c4 54 54 42 3a 53 54 4c c4 54 54 42 3a 50 50 de 00 00 00 52 00 1e 00 1a 01 0c c4 54   ┆ B   TTB:LAK TTB:MT  TTB:SB  TTMJOB  TTB:QL  TTB:ID  TTB:STL TTB:PP    R       T┆
0x103c4…10414               54 42 3a 50 57 e0 c4 54 54 42 3a 53 41 ff c4 54 54 42 3a 54 44 a0 00 00 00 9c 00 2c 00 28 03 13 00 00 00 01 00 00 00 00 04 00 08 00 0c 00 10 00 14 00 18 00 1c 00 20 00 24 00 28 00 2c 00 30 00 34 00 38 00 3c 00 00 00 00 be 00 10 00 0c 05 05   ┆TB:PW  TTB:SA  TTB:TD      , (                          $ ( , 0 4 8 <           ┆
0x10414…10464               d4 54 54 42 3a 4c 41 4b ff de 00 00 00 ee 00 10 00 0c 05 05 d4 54 54 42 3a 4d 54 00 ff de 00 00 01 02 00 10 00 0c 05 05 d4 54 54 42 3a 53 42 c4 ff fe 00 00 01 16 00 10 00 0c 05 05 dc 54 54 4d 4a 4f 42 00 00 22 00 00 01 2a 00 10 00 0c 05 05   ┆ TTB:LAK             TTB:MT              TTB:SB              TTMJOB  "   *      ┆
0x10464…104b4               d4 54 54 42 3a 51 4c ff 00 00 00 00 01 3e 00 10 00 0c 05 05 d4 54 54 42 3a 49 44 d3 00 02 00 00 01 52 00 10 00 0c 05 05 d4 54 54 42 3a 53 54 4c 00 04 00 00 01 66 00 10 00 0c 05 05 d4 54 54 42 3a 50 50 de 00 06 00 00 01 7a 00 10 00 0c 05 05   ┆ TTB:QL      >       TTB:ID      R       TTB:STL     f       TTB:PP      z      ┆
0x104b4…10504 (169, 2, 172) d4 54 54 42 3a 50 57 e0 00 08 00 00 01 8e 00 10 00 0c 05 05 d4 54 54 42 3a 53 41 ff 00 0a 00 01 00 12 00 2c 00 28 03 13 00 00 00 21 00 00 00 00 00 00 23 4d 00 31 00 00 c4 c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01   ┆ TTB:PW              TTB:SA        , (     !      #M 1                          ┆
0x10504…10554               00 26 00 10 00 0c 05 05 d4 54 54 42 3a 54 44 a0 00 28 00 01 00 56 00 18 00 14 03 09 00 00 00 41 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 6a 00 0c 00 08 04 03 00 00 00 4b 00 02 00 01 00 86 00 0e 00 0a 07 04 00 00 00 00 00 4c 00 00   ┆ &       TTB:TD  (   V         A                 j         K                 L  ┆
0x10554…10560               00 01 00 96 40 04 00 00 00 01 00 a8                                                                                                                                                                                                               ┆    @       ┆
0x10560…105b0 (170, 0, 400) 00 4a 00 46 20 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 54 4f 53 53 49 4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 20 39 2e 32 20 37 39 2d 31 31 2d 31 36 20 20 38 37 30 31 30 35 30 34 30 39 32 30 00 00 00 04 00 48   ┆ J F         IDENT TOSSIO                   REL 9.2 79-11-16  870105040920     H┆
0x105b0…10600               00 44 01 21 64 54 49 4f c4 54 45 4e 44 49 4f 01 c4 44 43 3a 4d 49 4e 00 c4 44 43 3a 4d 4f 54 20 c4 4d 4f 4e 4d 4d 55 00 a4 45 43 42 46 43 a4 45 43 42 42 41 a4 45 43 42 52 4c a4 45 43 42 45 4c a4 45 43 42 52 43 00 00 00 52 00 44 00 40 01 1f   ┆ D !dTIO TENDIO  DC:MIN  DC:MOT  MONMMU  ECBFC ECBBA ECBRL ECBEL ECBRC   R D @  ┆
0x10600…10650               a4 45 43 42 43 57 c4 45 43 42 43 57 32 d3 c4 42 55 46 4c 45 4e 41 c4 41 43 54 41 44 52 41 c4 41 42 54 41 44 52 ee c4 49 4e 54 41 44 52 60 c4 50 4f 4c 41 44 52 00 c4 52 45 43 41 44 52 00 00 00 00 9e 00 46 00 42 01 20 c4 45 43 48 41 44 52 10   ┆ ECBCW ECBCW2  BUFLENA ACTADRA ABTADR  INTADR` POLADR  RECADR      F B   ECHADR ┆
0x10650…106a0               c4 44 43 3a 44 49 58 56 c4 44 4d 3a 44 49 58 20 c4 50 43 3a 44 49 58 38 c4 4d 58 3a 44 49 58 54 c4 4b 42 3a 44 49 58 4e c4 49 54 3a 44 49 58 20 c4 44 57 54 43 48 50 a0 00 00 00 e6 00 46 00 42 01 20 a4 44 57 54 53 54 a4 44 57 54 42 43 c4 44   ┆ DC:DIXV DM:DIX  PC:DIX8 MX:DIXT KB:DIXN IT:DIX  DWTCHP      F B   DWTST DWTBC D┆
0x106a0…106f0               57 54 45 43 42 02 a4 44 57 54 4f 52 c4 44 57 54 4f 43 48 b6 c4 44 57 54 41 44 52 c4 c4 44 57 54 54 41 42 c6 c4 44 57 54 57 41 54 b8 a4 44 57 54 54 51 00 00 01 30 00 46 00 42 01 20 c4 44 57 54 4f 54 51 02 c4 44 57 54 54 44 4d 16 c4 44 57 54   ┆WTECB  DWTOR DWTOCH  DWTADR  DWTTAB  DWTWAT  DWTTQ   0 F B   DWTOTQ  DWTTDM  DWT┆
0x106f0…10740 (171, 0, 398) 55 45 43 23 c4 44 57 54 4d 45 43 00 a4 44 57 54 41 32 a4 44 57 54 41 33 a4 44 57 54 41 34 a4 44 57 54 41 35 c4 44 57 54 53 42 31 20 00 00 01 7a 00 2a 00 26 01 12 c4 44 57 54 53 42 32 66 a4 44 57 54 54 50 c4 44 57 54 45 43 48 6a a4 44 57 54   ┆UEC# DWTMEC  DWTA2 DWTA3 DWTA4 DWTA5 DWTSB1    z * &   DWTSB2f DWTTP DWTECHj DWT┆
0x10740…10790               53 51 c4 44 57 54 56 4f 4c 57 00 01 00 34 00 10 00 0c 05 05 d4 44 57 54 43 48 50 a0 00 00 00 01 00 62 00 0e 00 0a 05 04 b4 44 57 54 53 54 00 02 00 01 00 76 00 0e 00 0a 05 04 b4 44 57 54 42 43 00 03 00 01 00 88 00 10 00 0c 05 05 d4 44 57 54   ┆SQ DWTVOLW   4       DWTCHP      b       DWTST     v       DWTBC             DWT┆
0x10790…107e0               45 43 42 02 00 04 00 01 00 9a 00 0e 00 0a 05 04 b4 44 57 54 4f 52 00 06 00 01 00 ae 00 10 00 0c 05 05 d4 44 57 54 4f 43 48 b6 00 06 00 01 00 c0 00 10 00 0c 05 05 d4 44 57 54 41 44 52 c4 00 08 00 01 00 d4 00 10 00 0c 05 05 d4 44 57 54 54 41   ┆ECB              DWTOR             DWTOCH              DWTADR              DWTTA┆
0x107e0…10830               42 c6 00 0a 00 01 00 e8 00 10 00 0c 05 05 d4 44 57 54 57 41 54 b8 00 0c 00 01 00 fc 00 0e 00 0a 05 04 b4 44 57 54 54 51 00 0e 00 01 01 10 00 10 00 0c 05 05 d4 44 57 54 55 45 43 23 00 10 00 01 01 22 00 10 00 0c 05 05 d4 44 57 54 4d 45 43 00   ┆B              DWTWAT              DWTTQ             DWTUEC#     "       DWTMEC ┆
0x10830…1087e               00 12 00 01 01 36 00 10 00 0c 05 05 d4 44 57 54 4f 54 51 02 00 14 00 01 01 4a 00 10 00 0c 05 05 d4 44 57 54 54 44 4d 16 00 14 00 01 01 5e 00 0e 00 0a 05 04 b4 44 57 54 41 32 00 16 00 01 01 72 00 0e 00 0a 05 04 b4 44 57 54 41 33 00 16         ┆     6       DWTOTQ      J       DWTTDM      ^       DWTA2     r       DWTA3  ┆
0x1087e…108ce (172, 0, 400) 00 01 01 84 00 0e 00 0a 05 04 b4 44 57 54 41 34 00 18 00 02 00 08 00 0e 00 0a 05 04 b4 44 57 54 41 35 00 1a 00 02 00 1a 00 10 00 0c 05 05 d4 44 57 54 53 42 31 20 00 1e 00 02 00 2c 00 10 00 0c 05 05 d4 44 57 54 53 42 32 66 00 22 00 02 00 40   ┆           DWTA4             DWTA5             DWTSB1      ,       DWTSB2f "   @┆
0x108ce…1091e               00 0e 00 0a 05 04 b4 44 57 54 54 50 00 24 00 02 00 54 00 10 00 0c 05 05 d4 44 57 54 45 43 48 6a 00 26 00 02 00 66 00 0e 00 0a 05 04 b4 44 57 54 53 51 00 30 00 02 00 7a 00 10 00 0c 05 05 d4 44 57 54 56 4f 4c 57 00 30 00 02 00 8c 00 10 00 0c   ┆       DWTTP $   T       DWTECHj &   f       DWTSQ 0   z       DWTVOLW 0        ┆
0x1091e…1096e               05 05 d4 42 55 46 4c 45 4e 41 ff fc 00 02 00 a0 00 10 00 0c 05 05 d4 41 43 54 41 44 52 41 00 00 00 02 00 b4 00 10 00 0c 05 05 d4 41 42 54 41 44 52 ee 00 02 00 02 00 c8 00 10 00 0c 05 05 d4 49 4e 54 41 44 52 60 00 04 00 02 00 dc 00 10 00 0c   ┆   BUFLENA             ACTADRA             ABTADR              INTADR`          ┆
0x1096e…109be               05 05 d4 50 4f 4c 41 44 52 00 00 04 00 02 00 f0 00 10 00 0c 05 05 d4 52 45 43 41 44 52 00 00 06 00 02 01 04 00 10 00 0c 05 05 d4 45 43 48 41 44 52 10 00 08 00 02 01 18 00 10 00 0c 05 05 d4 44 43 3a 44 49 58 56 ff fe 00 02 01 2c 00 10 00 0c   ┆   POLADR              RECADR              ECHADR              DC:DIXV     ,    ┆
0x109be…10a0e               05 05 d4 44 4d 3a 44 49 58 20 00 00 00 02 01 40 00 10 00 0c 05 05 d4 50 43 3a 44 49 58 38 00 02 00 02 01 54 00 10 00 0c 05 05 d4 4d 58 3a 44 49 58 54 00 04 00 02 01 68 00 10 00 0c 05 05 d4 4b 42 3a 44 49 58 4e 00 06 00 02 01 7c 00 10 00 0c   ┆   DM:DIX      @       PC:DIX8     T       MX:DIXT     h       KB:DIXN     |    ┆

Reduced view