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

⟦1adcdefe6⟧

    Length: 65334 (0xff36)
    Notes: pts_type(SC)
    Names: »GLDC15.SC«

Derivation

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

PTS(SC)

	IDENT DRDC15 	9.2DK 3 80-01-03  870105040920 

			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 
* 
* 
* 
* 
* 
****************************************************
	EJECT
* 
* 
*	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 
	EJECT
* 
* 
* 
* 
*   STANDARD INTERFACE PART FOR DATA COMMUNICATION
* 
* 
* 
* 
*	DWT CONTENTS
* 
*	DWTCHP	TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)
* 
	EJECT
******************************************************* 
* 
*	PARAMETERS FOR CONDITIONAL ASSEMBLY 
* 
XRVI	EQU	/5C	STANDARD:/40, DK:/5C	DK
X:D	EQU	0	BASE FOR RBUFL AND TBUFL	DK 
X:X	EQU	500	VALUE FOR BASE	DK 
X:A	EQU	2000	RECEIVE BUFFER LENGTH
RBUFL	EQU	650+X:X		DK 
X:B	EQU	/60	DCTASK FILE CODE
DC15FC	EQU	/60
X:C	EQU	1	IF 1 INTERRUPT LOGGING
LOGG	EQU	0
* 
TIMPOL	EQU	600	POLL TIMEOUT VALUE		DK 
X:E	EQU	1	STATUS AND RVI HANDLING IF=1
STAT	EQU	0
X:F	EQU	1	READ COMMAND HANDLING IF=1
RCOM	EQU	1
X:G	EQU	254	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	2300
X:H	EQU	1	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	0
X:I	EQU	0	IF 1 SPECIFIC POLL HANDLING 
SPECP	EQU	0 
X:J	EQU	1	IF = 1  LINE SPEED SET TO HIGH
			IF = 0  LINE SPEED IS SET TO LOW 
SPEED	EQU	1 
X:K	EQU	0	IF 1 SIEMENS MSV1 PROCEDURE 
MSV1	EQU	0
X:L	EQU	2	NUMBER OF RECEIVE BUFFERS (2-5) 
RBUFNR	EQU	2
X:M	EQU	0	IF = 1  PTS 6805 ADAPTION	SALCUZ
P6805	EQU	00
X:N	EQU	/02 
	IFT	P6805=0
LCUIN	EQU	02	DEVICE ADDRESS OF RECEIVER 
	XIF
	IFT	P6805=1
LCUIN	EQU	/0A	DEVICE ADDRESS OF RECEIVER
	XIF
X:O	EQU	0 
IBMCHR	EQU	0	IF 1 IBM CHARACTER HANDLING
X:P	EQU	0	IF 1 MESSAGE PASSING TO DC TASK 
MESPAS	EQU	0
X:Q	EQU	0	IBM-3270 EMULATION PACKAGE, IF NOT = 0
EM3270	EQU	1
X:R	EQU	1000
				DK2 
BINTRM	EQU	0	IF 1 BINARY TRANSMISSION 
TSTREQ	EQU	0	IF 1 TEST REQUEST HANDLING 
DMRK	EQU	1	SPECIAL CONDITION FOR DENMARK
NOWACK	EQU	0	WHEN WORKING WITH A MAIN-FRAME THAT
			DOESN'T ACCEPT WACK RESPONSE TO A SELECT 
			SEQUENCE, NOWACK SHOULD BE SET TO "ONE". 
			ONLY WORKING IF STAT IS SET TO "ONE".
	IFT	P6805=0		SALCUZ
LCUUT	EQU	LCUIN+/10	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
	IFT	P6805=1
LCUUT	EQU	LCUIN+/01	DEVICE ADDRESS OF TRANSMITTER	SALCUZ
	XIF			SALCUZ 
* 
	EJECT
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	1
* 
				DB
	IFT	MMUPAG=0		DK2
TBUFL	EQU	0		DK2
	XIF			DK2
* 
	IFT	MMUPAG=1		DK2
TBUFL	EQU	650+X:X	MMU BUFFER LENGTH	DK
	XIF			DK2
				DE
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	0
* 
DEVIND	EQU	-2	DEVICE INDEX DATA COMMUNICATION 
BUFLEN	EQU	TBUFL+TBUFL	MMU BUFFER SIZE
* 
	EJECT
* 
*	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
* 
	EJECT
* 
*	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
	EJECT
* 
*	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
	EJECT
* 
* 
*	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 
	RF(Z)	DCSS	SET STATUS
	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
	EJECT
* 
* 
*	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 
	EJECT
***************************************** 
* 
*   ANY MESSAGE ORDER 
* 
***************************** 

ANYMSG	LD	A4,DWTRQ,A6	ANY QUEUED MESSAGE ??	=4
	RF(Z)	DCRD10	NO!!	=4 
	RF	ENDIO	YES!! COMPLETE REQUEST	=4 
	XIF
	EJECT
* 
* 
*	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
	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
	EJECT


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 
	EJECT
* 
* 
*	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 
	EJECT
* 
* 
*	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
	EJECT

* 
*   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
	EJECT
* 
* 
* 
*	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
	EJECT
* 
*	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
	EJECT
* 
* 
*	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
	EJECT
* 
*	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
	EJECT
* 
* 
*	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 
	EJECT
* 
* 
*	INSERT DWT IN STATUS QUEUE
* 
	IFF	STAT=0 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSSQ	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
	EJECT
* 
* 
*	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 
	EJECT
* 
* 
*	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
	EJECT

************************************************************
* 
*    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
	EJECT

	EJECT
* 
* 
*	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 
	EJECT
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 
	EJECT
* 
* 
*	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
	EJECT
* 
* 
*	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
	EJECT
* 
* 
*	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
	EJECT
* 
* 
*	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 
	EJECT
* 
* 
*	STX HAS BEEN RECEIVED 
* 
* 
BRM300	EQU	*
	CF	A5,HPTIM
	LD	A1,XSEL 
	RF(Z)	BRM315	NOT SELECTED
	LD	A1,DCRBUF 
*********************CHAINED COMMAND
	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
	EJECT
* 
* 
*	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
	EJECT
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
	EJECT
* 
* 
*	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
	EJECT
* 
* 
*	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
	EJECT
* 
*	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 
	EJECT
* 
* 
*	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
	EJECT
* 
* 
*	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
	EJECT
* 
* 
*	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 
	EJECT
* 
* 
*	GENERAL POLL HAS BEEN RECEIVED
* 
* 
GPOLL	EQU	* 
	LD	A1,XACK		=5 
	RF(Z)	POL020	ACK NOT EXPECTED	=5 
POL010	CF	A5,TRENQ	SEND ENQ	=5
	CF	A5,SPTIM	START PROCEDURE TIMER	=5 
	ABL	BRM	WAIT FOR RESPONSE	=5 
POL020	EQU	*		=5
	CF	A5,CPTIM	CHECK POLL TIMER 
	IFF	STAT=0 
	LD	A6,DCSTQ	 
	RF(Z)	POL110	NO STATUS TO BE SENT
	SUK	A6,DWTSQ	GET DWT ADDRESS 
POL050	EQU	*
	CF	A5,TRSTA	SEND STATUS
	CF	A5,SPTIM	START PROCEDURE TIMER
	IM	XACK	SET 'ACK EXPECTED' 
	XIF
	IFF	STAT=1 
	RF	POL110
	XIF
POL100	EQU	*
	ABL	BRM
POL110	EQU	*
	LD	A6,DCWRQ
	RF(NZ)	POL120	WRITE ON QUEUE 
POL115	EQU	*
	CF	A5,TREOT	SEND EOT 
	RB	POL100
POL120	EQU	*
	SUK	A6,DWTWQ	GET DWT ADDRESS 
POL125	EQU	*
	LD	A8,DWTECB,A6	GET ECB ADDRESS
	RF(NZ)	POL126
	CF	A15,REMOVW
	RB	POL115
POL126	EQU	*
	ST	A8,FECB	SAVE ECB ADDRESS
	ST	A6,FDWTUT	SAVE A6 

	IFF	MMUPAG=0 
	LDKL	A4,MMUBUF	MMU WORK BUFFER 
	ST	A4,ECBBA,A8 
	CF	A15,DC:MOT	MOVE DATA FROM USER BUFFER 
	XIF
	LD	A4,ECBBA,A8	GET BUFFER ADDRESS
	LD	A3,ECBRL,A8	GET LENGTH
POL127	EQU	*
	ST	A4,FECBBA	SAVE BUFFER ADDRESS 
	SUK	A3,2	SKIP FIRST WORD OF BUFFER 
	ST	A3,FECBRL	SAVE LENGTH 
	CM	FBAX	RESET BUFFER INDEX 
POL130	EQU	*
	CM	XETX	RESET 'ETX SENT' 
	CM	XSTA
	CF	A5,TRTEXT	SEND ONE BLOCK
	CF	A5,SPTIM	START PROCEDURE TIMER
	IM	XACK	SET 'ACK EXPECTED' 
	RB	POL100
	EJECT
* 
* 
*	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 
	EJECT
* 
* 
*	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 
	EJECT
* 
* 
*	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
	EJECT
* 
*	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 
	EJECT
* 
*	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 
	EJECT
* 
* 
*	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
	EJECT
	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 
	EJECT
* 
* 
*	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
	EJECT
* 
* 
*	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 
	EJECT
* 
* 
*   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 
	EJECT
* 
* 
*   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
	EJECT
* 
* 
*	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 
	EJECT
* 
* 
*	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
	EJECT
* 
* 
***	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
* 
* 
	EJECT
* 
*	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 
	EJECT
* 
* 
*	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
	EJECT
* 
*	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 
	EJECT
* 
*	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 
	EJECT
* 
*	STOP PROCEDURE TIMER
* 
HPTIM	LD	A1,DCTPP	GET TIMER POINTER 
	RF(Z)	HPT10	NOT RUNNING
	CM*	DCTPP	STOP TIMER 
	CM	DCTPP 
HPT10	RTN	A5
	EJECT
	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
	EJECT
* 
* 
*	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
	EJECT
* 
* 
*	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
* 
	EJECT
* 
* 
*	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
	EJECT
* 
* 
*	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 
	EJECT
* 
* 
LOGPNT	DATA	LOGSTA
LOGSTA	EQU	*
	RES	300
LOGEND	EQU	*-4
SAVE2	DATA	0
SAVE3	DATA	0
	XIF
* 
* 
* 
	IFT	RCOM=1 
	EJECT
******************************************************* 
* 
*     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
* 
* 
* 
	EJECT

*     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
	EJECT

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

0x0000…0036 (0, 0, 400)   Head {h00=0x0032, h01=0x0050, text=» IDENT DRDC15  9.2DK 3 80-01-03  870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…005e               Head {h00=0x001c, h01=0x0050, text=»   DK3, RBUFNR=1 ALLOWED«, t00=0x0000, t01=0x0042}
0x005e…0074               Head {h00=0x0012, h01=0x0050, text=»   DK2, TBUFL «, t00=0x0000, t01=0x0062}
0x0074…0088               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x0078}
0x0088…00bc               Head {h00=0x0030, h01=0x0050, text=»   DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. «, t00=0x0000, t01=0x008c}
0x00bc…00d0               Head {h00=0x0010, h01=0x0050, text=»   80-03-11 «, t00=0x0000, t01=0x00c0}
0x00d0…00ec               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-08-16 «, t00=0x0000, t01=0x00d4}
0x00ec…0110               Head {h00=0x0020, h01=0x0050, text=»   =8, ASCII-MODE FOR SALCUZ«, t00=0x0000, t01=0x00f0}
0x0110…012c               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0000, t01=0x0114}
0x012c…0156               Head {h00=0x0026, h01=0x0050, text=»   =7, ACK IN CONVERSATIONAL MODE «, t00=0x0000, t01=0x0130}
0x0156…0172               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0000, t01=0x015a}
0x0172…01a0               Head {h00=0x002a, h01=0x0050, text=»   =6, DCTASK BUFFER ADDRESS DESTROYED«, t00=0x0000, t01=0x0176}
0x01a0…01bc               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x0014}
0x01bc…01e4               Head {h00=0x0024, h01=0x0050, text=»   =5, INCOMPLETE POLL SEQUENCE «, t00=0x0001, t01=0x0030}
0x01e4…0200               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x0058}
0x0200…0222               Head {h00=0x001e, h01=0x0050, text=»   =3, TRANSFER PARAMETER «, t00=0x0001, t01=0x0074}
0x0222…023e               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x0096}
0x023e…025e               Head {h00=0x001c, h01=0x0050, text=»   =4, ANY MESSAGE ORDER«, t00=0x0001, t01=0x00b2}
0x025e…027a               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x00d2}
0x027a…0298               Head {h00=0x001a, h01=0x0050, text=»   =2, ABORT HANDLING «, t00=0x0001, t01=0x00ee}
0x0298…02b4               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-29 «, t00=0x0001, t01=0x010c}
0x02b4…02d2               Head {h00=0x001a, h01=0x0050, text=»   =1, MSR-INSTRUCTION«, t00=0x0001, t01=0x0128}
0x02d2…02ee               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-14 «, t00=0x0001, t01=0x0146}
0x02ee…030a               Head {h00=0x0018, h01=0x0050, text=»   REL 8.2 78-11-14 «, t00=0x0001, t01=0x0162}
0x030a…0312               Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x017e}
0x0312…031c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0186}
0x031c…0326               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0190}
0x0326…035c               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x000a}
0x035c…0366               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0040}
0x0366…038e               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x004a}
0x038e…0398               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0072}
0x0398…03c6               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x007c}
0x03c6…03f8               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0002, t01=0x00aa}
0x03f8…041c               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0002, t01=0x00dc}
0x041c…0426               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0100}
0x0426…0430               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x010a}
0x0430…043a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0114}
0x043a…0444               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x011e}
0x0444…044e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0128}
0x044e…048a               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0002, t01=0x0132}
0x048a…0498               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x016e}
0x0498…04a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x017c}
0x04a2…04ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0186}
0x04ac…04c2               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0002, t01=0x0190}
0x04c2…04cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0016}
0x04cc…0502               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0003, t01=0x0020}
0x0502…0528               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x0056}
0x0528…054e               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x007c}
0x054e…0574               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0003, t01=0x00a2}
0x0574…059a               Head {h00=0x0022, h01=0x0050, text=» ENTRY DW1500 DWT FOR DC TASK «, t00=0x0003, t01=0x00c8}
0x059a…05a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ee}
0x05a4…05ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f8}
0x05ae…05cc               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0003, t01=0x0102}
0x05cc…05d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0120}
0x05d6…05e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x012a}
0x05e0…0606               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0003, t01=0x0134}
0x0606…0632               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0003, t01=0x015a}
0x0632…065a               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0003, t01=0x0186}
0x065a…067e               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0004, t01=0x001e}
0x067e…069e               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x0042}
0x069e…06be               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x0062}
0x06be…06dc               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x0082}
0x06dc…06fa               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0004, t01=0x00a0}
0x06fa…0728               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x00be}
0x0728…0754               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0004, t01=0x00ec}
0x0754…0780               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0004, t01=0x0118}
0x0780…07a8               Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0004, t01=0x0144}
0x07a8…07d2               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0004, t01=0x016c}
0x07d2…07fc               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0005, t01=0x0008}
0x07fc…0820               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x0032}
0x0820…0846               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0005, t01=0x0056}
0x0846…0874               Head {h00=0x002a, h01=0x0050, text=» EXTRN DC:MIN MOVE DATA TO USER BUFFER«, t00=0x0005, t01=0x007c}
0x0874…08a4               Head {h00=0x002c, h01=0x0050, text=» EXTRN DC:MOT MOVE DATA FROM USER BUFFER«, t00=0x0005, t01=0x00aa}
0x08a4…08d8               Head {h00=0x0030, h01=0x0050, text=» EXTRN DISEND COMPLETE REQUEST AND DISPATCH «, t00=0x0005, t01=0x00da}
0x08d8…08e6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x010e}
0x08e6…08f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x011c}
0x08f0…08fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0126}
0x08fa…0904               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0130}
0x0904…090e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013a}
0x090e…0948               Head {h00=0x0036, h01=0x0050, text=»*   STANDARD INTERFACE PART FOR DATA COMMUNICATION«, t00=0x0005, t01=0x0144}
0x0948…0952               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x017e}
0x0952…095c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0188}
0x095c…0966 (6, 0, 400)   Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0004}
0x0966…0970               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x000e}
0x0970…0986               Head {h00=0x0012, h01=0x0050, text=»* DWT CONTENTS«, t00=0x0006, t01=0x0018}
0x0986…0990               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x002e}
0x0990…09de               Head {h00=0x004a, h01=0x0050, text=»* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)«, t00=0x0006, t01=0x0038}
0x09de…09e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0086}
0x09e8…09f6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0090}
0x09f6…0a36               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0006, t01=0x009e}
0x0a36…0a40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00de}
0x0a40…0a6e               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x00e8}
0x0a6e…0a78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0116}
0x0a78…0aa4               Head {h00=0x0028, h01=0x0050, text=»XRVI EQU /5C STANDARD:/40, DK:/5C DK«, t00=0x0006, t01=0x0120}
0x0aa4…0ad2               Head {h00=0x002a, h01=0x0050, text=»X:D EQU 0 BASE FOR RBUFL AND TBUFL DK «, t00=0x0006, t01=0x014c}
0x0ad2…0af8               Head {h00=0x0022, h01=0x0050, text=»X:X EQU 500 VALUE FOR BASE DK «, t00=0x0006, t01=0x017a}
0x0af8…0b22               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 2000 RECEIVE BUFFER LENGTH«, t00=0x0007, t01=0x0010}
0x0b22…0b40               Head {h00=0x001a, h01=0x0050, text=»RBUFL EQU 650+X:X  DK «, t00=0x0007, t01=0x003a}
0x0b40…0b64               Head {h00=0x0020, h01=0x0050, text=»X:B EQU /60 DCTASK FILE CODE«, t00=0x0007, t01=0x0058}
0x0b64…0b7a               Head {h00=0x0012, h01=0x0050, text=»DC15FC EQU /60«, t00=0x0007, t01=0x007c}
0x0b7a…0ba2               Head {h00=0x0024, h01=0x0050, text=»X:C EQU 1 IF 1 INTERRUPT LOGGING«, t00=0x0007, t01=0x0092}
0x0ba2…0bb4               Head {h00=0x000e, h01=0x0050, text=»LOGG EQU 0«, t00=0x0007, t01=0x00ba}
0x0bb4…0bbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00cc}
0x0bbe…0bec               Head {h00=0x002a, h01=0x0050, text=»TIMPOL EQU 600 POLL TIMEOUT VALUE  DK «, t00=0x0007, t01=0x00d6}
0x0bec…0c1a               Head {h00=0x002a, h01=0x0050, text=»X:E EQU 1 STATUS AND RVI HANDLING IF=1«, t00=0x0007, t01=0x0104}
0x0c1a…0c2c               Head {h00=0x000e, h01=0x0050, text=»STAT EQU 0«, t00=0x0007, t01=0x0132}
0x0c2c…0c58               Head {h00=0x0028, h01=0x0050, text=»X:F EQU 1 READ COMMAND HANDLING IF=1«, t00=0x0007, t01=0x0144}
0x0c58…0c6a               Head {h00=0x000e, h01=0x0050, text=»RCOM EQU 1«, t00=0x0007, t01=0x0170}
0x0c6a…0c94               Head {h00=0x0026, h01=0x0050, text=»X:G EQU 254 TRANSMIT BLOCK LENGTH «, t00=0x0007, t01=0x0182}
0x0c94…0caa               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU 2300«, t00=0x0008, t01=0x001c}
0x0caa…0cd6               Head {h00=0x0028, h01=0x0050, text=»X:H EQU 1 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0008, t01=0x0032}
0x0cd6…0ce8               Head {h00=0x000e, h01=0x0050, text=»CODE EQU 0«, t00=0x0008, t01=0x005e}
0x0ce8…0d16               Head {h00=0x002a, h01=0x0050, text=»X:I EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0008, t01=0x0070}
0x0d16…0d2a               Head {h00=0x0010, h01=0x0050, text=»SPECP EQU 0 «, t00=0x0008, t01=0x009e}
0x0d2a…0d5a               Head {h00=0x002c, h01=0x0050, text=»X:J EQU 1 IF = 1  LINE SPEED SET TO HIGH«, t00=0x0008, t01=0x00b2}
0x0d5a…0d86               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0008, t01=0x00e2}
0x0d86…0d9a               Head {h00=0x0010, h01=0x0050, text=»SPEED EQU 1 «, t00=0x0008, t01=0x010e}
0x0d9a…0dc8               Head {h00=0x002a, h01=0x0050, text=»X:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0008, t01=0x0122}
0x0dc8…0dda               Head {h00=0x000e, h01=0x0050, text=»MSV1 EQU 0«, t00=0x0008, t01=0x0150}
0x0dda…0e0c               Head {h00=0x002e, h01=0x0050, text=»X:L EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0008, t01=0x0162}
0x0e0c…0e20 (9, 0, 400)   Head {h00=0x0010, h01=0x0050, text=»RBUFNR EQU 2«, t00=0x0009, t01=0x0004}
0x0e20…0e52               Head {h00=0x002e, h01=0x0050, text=»X:M EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x0009, t01=0x0018}
0x0e52…0e66               Head {h00=0x0010, h01=0x0050, text=»P6805 EQU 00«, t00=0x0009, t01=0x004a}
0x0e66…0e7a               Head {h00=0x0010, h01=0x0050, text=»X:N EQU /02 «, t00=0x0009, t01=0x005e}
0x0e7a…0e8e               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0009, t01=0x0072}
0x0e8e…0ebe               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU 02 DEVICE ADDRESS OF RECEIVER «, t00=0x0009, t01=0x0086}
0x0ebe…0eca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x00b6}
0x0eca…0ede               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0009, t01=0x00c2}
0x0ede…0f0e               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x00d6}
0x0f0e…0f1a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0106}
0x0f1a…0f2c               Head {h00=0x000e, h01=0x0050, text=»X:O EQU 0 «, t00=0x0009, t01=0x0112}
0x0f2c…0f5c               Head {h00=0x002c, h01=0x0050, text=»IBMCHR EQU 0 IF 1 IBM CHARACTER HANDLING«, t00=0x0009, t01=0x0124}
0x0f5c…0f8e               Head {h00=0x002e, h01=0x0050, text=»X:P EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x0009, t01=0x0154}
0x0f8e…0fa2               Head {h00=0x0010, h01=0x0050, text=»MESPAS EQU 0«, t00=0x0009, t01=0x0186}
0x0fa2…0fda               Head {h00=0x0034, h01=0x0050, text=»X:Q EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000a, t01=0x000a}
0x0fda…0fee               Head {h00=0x0010, h01=0x0050, text=»EM3270 EQU 1«, t00=0x000a, t01=0x0042}
0x0fee…1002               Head {h00=0x0010, h01=0x0050, text=»X:R EQU 1000«, t00=0x000a, t01=0x0056}
0x1002…1012               Head {h00=0x000c, h01=0x0050, text=»    DK2 «, t00=0x000a, t01=0x006a}
0x1012…1040               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000a, t01=0x007a}
0x1040…1070               Head {h00=0x002c, h01=0x0050, text=»TSTREQ EQU 0 IF 1 TEST REQUEST HANDLING «, t00=0x000a, t01=0x00a8}
0x1070…10a0               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 1 SPECIAL CONDITION FOR DENMARK«, t00=0x000a, t01=0x00d8}
0x10a0…10d8               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000a, t01=0x0108}
0x10d8…110c               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000a, t01=0x0140}
0x110c…1140               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000a, t01=0x0174}
0x1140…1170               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000b, t01=0x0018}
0x1170…118c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000b, t01=0x0048}
0x118c…11cc               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x0064}
0x11cc…11e2               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x00a4}
0x11e2…11f6               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x00ba}
0x11f6…1236               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x00ce}
0x1236…124c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x010e}
0x124c…1256               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0124}
0x1256…1264               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x012e}
0x1264…126e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x013c}
0x126e…1278               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0146}
0x1278…12aa               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000b, t01=0x0150}
0x12aa…12b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0182}
0x12b4…12d2               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000b, t01=0x018c}
0x12d2…12dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x001a}
0x12dc…130e               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x0024}
0x130e…1318               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0056}
0x1318…134a               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000c, t01=0x0060}
0x134a…1378               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000c, t01=0x0092}
0x1378…1382               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00c0}
0x1382…1396               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000c, t01=0x00ca}
0x1396…13a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00de}
0x13a0…13ae               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x000c, t01=0x00e8}
0x13ae…13c8               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=0  DK2«, t00=0x000c, t01=0x00f6}
0x13c8…13e0               Head {h00=0x0014, h01=0x0050, text=»TBUFL EQU 0  DK2«, t00=0x000c, t01=0x0110}
0x13e0…13f2               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000c, t01=0x0128}
0x13f2…13fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x013a}
0x13fc…1416               Head {h00=0x0016, h01=0x0050, text=» IFT MMUPAG=1  DK2«, t00=0x000c, t01=0x0144}
0x1416…1444               Head {h00=0x002a, h01=0x0050, text=»TBUFL EQU 650+X:X MMU BUFFER LENGTH DK«, t00=0x000c, t01=0x015e}
0x1444…1456               Head {h00=0x000e, h01=0x0050, text=» XIF   DK2«, t00=0x000c, t01=0x018c}
0x1456…1464               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x000d, t01=0x000e}
0x1464…146e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x001c}
0x146e…14a8               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000d, t01=0x0026}
0x14a8…14da               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000d, t01=0x0060}
0x14da…14e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0092}
0x14e4…14f8               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000d, t01=0x009c}
0x14f8…1502               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00b0}
0x1502…1538               Head {h00=0x0032, h01=0x0050, text=»DEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION «, t00=0x000d, t01=0x00ba}
0x1538…1566               Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE«, t00=0x000d, t01=0x00f0}
0x1566…1570               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x011e}
0x1570…157e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0128}
0x157e…1588               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0136}
0x1588…15a4               Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x000d, t01=0x0140}
0x15a4…15ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x015c}
0x15ae…15e2               Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000d, t01=0x0166}
0x15e2…15ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x000a}
0x15ec…1602               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000e, t01=0x0014}
0x1602…161a               Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000e, t01=0x002a}
0x161a…1626               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0042}
0x1626…1630               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x004e}
0x1630…1646               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x0058}
0x1646…1660               Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000e, t01=0x006e}
0x1660…166c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0088}
0x166c…1676               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0094}
0x1676…16ae               Head {h00=0x0034, h01=0x0050, text=»DWTTP EQU START+/00 TIMER POINTER ORDER PROCESS «, t00=0x000e, t01=0x009e}
0x16ae…16e0               Head {h00=0x002e, h01=0x0050, text=»DWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE«, t00=0x000e, t01=0x00d6}
0x16e0…1708               Head {h00=0x0024, h01=0x0050, text=»DWTSQ EQU START+/04 STATUS QUEUE«, t00=0x000e, t01=0x0108}
0x1708…1732               Head {h00=0x0026, h01=0x0050, text=»DWTRQ EQU START+/06 RECEIVE QUEUE «, t00=0x000e, t01=0x0130}
0x1732…1764               Head {h00=0x002e, h01=0x0050, text=»DWTBUF EQU START+/08 DEVICE BUFFER ADDRESS«, t00=0x000e, t01=0x015a}
0x1764…1790               Head {h00=0x0028, h01=0x0050, text=»DWTCUR EQU START+/0A CURSOR ADDRESS «, t00=0x000e, t01=0x018c}
0x1790…17c0               Head {h00=0x002c, h01=0x0050, text=»DWTTIM EQU START+/0C REQUEST TIMER VALUE«, t00=0x000f, t01=0x0028}
0x17c0…17ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0058}
0x17ca…17d8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0062}
0x17d8…17e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0070}
0x17e2…17fc               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000f, t01=0x007a}
0x17fc…1806               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0094}
0x1806…1810               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x009e}
0x1810…181a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a8}
0x181a…182c               Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000f, t01=0x00b2}
0x182c…1836               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c4}
0x1836…184a               Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000f, t01=0x00ce}
0x184a…185e               Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x000f, t01=0x00e2}
0x185e…1880               Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x000f, t01=0x00f6}
0x1880…189a               Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x000f, t01=0x0118}
0x189a…18c2               Head {h00=0x0024, h01=0x0050, text=»* /39: SET REQUEST TIMEOUT VALUE«, t00=0x000f, t01=0x0132}
0x18c2…18cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x015a}
0x18cc…18d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0164}
0x18d6…18f8               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x000f, t01=0x016e}
0x18f8…1902               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0190}
0x1902…190c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x000a}
0x190c…1936               Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x0010, t01=0x0014}
0x1936…1964               Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x0010, t01=0x003e}
0x1964…1988               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x0010, t01=0x006c}
0x1988…19b0               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x0010, t01=0x0090}
0x19b0…19e0               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x0010, t01=0x00b8}
0x19e0…19ee               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x00e8}
0x19ee…19f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f6}
0x19f8…1a18               Head {h00=0x001c, h01=0x0050, text=»* DC TASK ADDRESS BLOCK «, t00=0x0010, t01=0x0100}
0x1a18…1a22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0120}
0x1a22…1a4a               Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDICATES NO MMU BUFFER «, t00=0x0010, t01=0x012a}
0x1a4a…1a6c               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0010, t01=0x0152}
0x1a6c…1a9a               Head {h00=0x002a, h01=0x0050, text=»DC15DC DATA DCACTD ACTIVATION ADDRESS «, t00=0x0010, t01=0x0174}
0x1a9a…1ac4               Head {h00=0x0026, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x0012}
0x1ac4…1aec               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x003c}
0x1aec…1af6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0064}
0x1af6…1b14               Head {h00=0x001a, h01=0x0050, text=»* DRIVER ADDRESS BLOCK«, t00=0x0011, t01=0x006e}
0x1b14…1b1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x008c}
0x1b1e…1b42               Head {h00=0x0020, h01=0x0050, text=» DATA BUFLEN MMU BUFFER SIZE«, t00=0x0011, t01=0x0096}
0x1b42…1b64               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0011, t01=0x00ba}
0x1b64…1b90               Head {h00=0x0028, h01=0x0050, text=»DC15AD DATA DCACT ACTIVATION ADDRESS«, t00=0x0011, t01=0x00dc}
0x1b90…1bc8               Head {h00=0x0034, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x0108}
0x1bc8…1bf0               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x0140}
0x1bf0…1bfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0168}
0x1bfa…1c2a               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x0011, t01=0x0172}
0x1c2a…1c3c               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x0012, t01=0x0012}
0x1c3c…1c62               Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x0012, t01=0x0024}
0x1c62…1c74               Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x0012, t01=0x004a}
0x1c74…1c7c               Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x005c}
0x1c7c…1c90               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x0012, t01=0x0064}
0x1c90…1ca8               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x0012, t01=0x0078}
0x1ca8…1cb4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0090}
0x1cb4…1cc8               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x0012, t01=0x009c}
0x1cc8…1cdc               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x0012, t01=0x00b0}
0x1cdc…1ce8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00c4}
0x1ce8…1cf6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x00d0}
0x1cf6…1d00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00de}
0x1d00…1d0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e8}
0x1d0a…1d32               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x0012, t01=0x00f2}
0x1d32…1d3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x011a}
0x1d3c…1d50               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x0012, t01=0x0124}
0x1d50…1d74               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0012, t01=0x0138}
0x1d74…1d8e               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0012, t01=0x015c}
0x1d8e…1da4               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0012, t01=0x0176}
0x1da4…1dce               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0012, t01=0x018c}
0x1dce…1dda               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0026}
0x1dda…1dee               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0013, t01=0x0032}
0x1dee…1e10               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DCRD READ SPECIFIC «, t00=0x0013, t01=0x0046}
0x1e10…1e28               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x0013, t01=0x0068}
0x1e28…1e3c               Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x0013, t01=0x0080}
0x1e3c…1e54               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/06 «, t00=0x0013, t01=0x0094}
0x1e54…1e7c               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x0013, t01=0x00ac}
0x1e7c…1e90               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0013, t01=0x00d4}
0x1e90…1ea8               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x0013, t01=0x00e8}
0x1ea8…1ec6               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCSS SET STATUS«, t00=0x0013, t01=0x0100}
0x1ec6…1ede               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/38 «, t00=0x0013, t01=0x011e}
0x1ede…1f06               Head {h00=0x0024, h01=0x0050, text=» ABL(Z) REQTIM SET REQUEST TIMER«, t00=0x0013, t01=0x0136}
0x1f06…1f12               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x015e}
0x1f12…1f1a               Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x016a}
0x1f1a…1f2e               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=0 «, t00=0x0013, t01=0x0172}
0x1f2e…1f46               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/37 «, t00=0x0013, t01=0x0186}
0x1f46…1f6e               Head {h00=0x0024, h01=0x0050, text=» RF(Z) REQTIM SET REQUEST TIMER «, t00=0x0014, t01=0x000e}
0x1f6e…1f7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0036}
0x1f7a…1f8c               Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x0014, t01=0x0042}
0x1f8c…1f9a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0054}
0x1f9a…1fa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0062}
0x1fa4…1fae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x006c}
0x1fae…1fce               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x0014, t01=0x0076}
0x1fce…1fd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0096}
0x1fd8…1fe2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00a0}
0x1fe2…1ff6               Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x0014, t01=0x00aa}
0x1ff6…201e               Head {h00=0x0024, h01=0x0050, text=» SUR A1,A1 PRESET RETURN CODE =4«, t00=0x0014, t01=0x00be}
0x201e…2038               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0014, t01=0x00e6}
0x2038…204e               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0014, t01=0x0100}
0x204e…2078               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0014, t01=0x0116}
0x2078…2084               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0140}
0x2084…2098               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0014, t01=0x014c}
0x2098…20b2               Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x0014, t01=0x0160}
0x20b2…20ca               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/02 «, t00=0x0014, t01=0x017a}
0x20ca…20f2 (21, 0, 400)  Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x0015, t01=0x0004}
0x20f2…20fa               Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x002c}
0x20fa…211c               Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x0015, t01=0x0034}
0x211c…213e               Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x0015, t01=0x0056}
0x213e…2148               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0078}
0x2148…2152               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0082}
0x2152…216c               Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x0015, t01=0x008c}
0x216c…2176               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a6}
0x2176…2180               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00b0}
0x2180…219e               Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0015, t01=0x00ba}
0x219e…21b6               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0015, t01=0x00d8}
0x21b6…21e0               Head {h00=0x0026, h01=0x0050, text=»*   STATUS CHANGE ON DC EQUIPMENT «, t00=0x0015, t01=0x00f0}
0x21e0…2208               Head {h00=0x0024, h01=0x0050, text=»*   SPONTANOUS MESSAGE RECEPTION«, t00=0x0015, t01=0x011a}
0x2208…2212               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0142}
0x2212…2226               Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0015, t01=0x014c}
0x2226…2256               Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0015, t01=0x0160}
0x2256…226a               Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0015, t01=0x0190}
0x226a…228e               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0016, t01=0x0014}
0x228e…22a8               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0016, t01=0x0038}
0x22a8…22b6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0052}
0x22b6…22e8               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0016, t01=0x0060}
0x22e8…22f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0092}
0x22f2…2310               Head {h00=0x001a, h01=0x0050, text=»*   ANY MESSAGE ORDER «, t00=0x0016, t01=0x009c}
0x2310…231a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ba}
0x231a…2340               Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0016, t01=0x00c4}
0x2340…2348               Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00ea}
0x2348…237e               Head {h00=0x0032, h01=0x0050, text=»ANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4«, t00=0x0016, t01=0x00f2}
0x237e…239c               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCRD10 NO!! =4 «, t00=0x0016, t01=0x0128}
0x239c…23c8               Head {h00=0x0028, h01=0x0050, text=» RF ENDIO YES!! COMPLETE REQUEST =4 «, t00=0x0016, t01=0x0146}
0x23c8…23d4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0172}
0x23d4…23e2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x017e}
0x23e2…23ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x018c}
0x23ec…23f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0008}
0x23f6…2414               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0017, t01=0x0012}
0x2414…241e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0030}
0x241e…2428               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x003a}
0x2428…246a               Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0017, t01=0x0044}
0x246a…24a8               Head {h00=0x003a, h01=0x0050, text=»*         FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0017, t01=0x0086}
0x24a8…24b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00c4}
0x24b2…24bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ce}
0x24bc…24d0               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0017, t01=0x00d8}
0x24d0…24fa               Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0017, t01=0x00ec}
0x24fa…2506               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0116}
0x2506…251a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0017, t01=0x0122}
0x251a…2544               Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0017, t01=0x0136}
0x2544…2558               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0017, t01=0x0160}
0x2558…256e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x0017, t01=0x0174}
0x256e…259a               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0017, t01=0x018a}
0x259a…25ac               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0018, t01=0x0026}
0x25ac…25c0               Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x0018, t01=0x0038}
0x25c0…25e8               Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x0018, t01=0x004c}
0x25e8…25fc               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0018, t01=0x0074}
0x25fc…2628               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x0018, t01=0x0088}
0x2628…2634               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00b4}
0x2634…2660               Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x0018, t01=0x00c0}
0x2660…2668               Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x00ec}
0x2668…267c               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0018, t01=0x00f4}
0x267c…26aa               Head {h00=0x002a, h01=0x0050, text=» LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS «, t00=0x0018, t01=0x0108}
0x26aa…26c2               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTBUF,A6«, t00=0x0018, t01=0x0136}
0x26c2…26ee               Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBRL,A8 CURSOR ADDRESS WORD «, t00=0x0018, t01=0x014e}
0x26ee…2706               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTCUR,A6«, t00=0x0018, t01=0x017a}
0x2706…2712 (25, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0004}
0x2712…2738               Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x0019, t01=0x0010}
0x2738…276e               Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!!  SHOULD NOT BE IN DC:TAB «, t00=0x0019, t01=0x0036}
0x276e…279c               Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x0019, t01=0x006c}
0x279c…27ca               Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x0019, t01=0x009a}
0x27ca…27f4               Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x0019, t01=0x00c8}
0x27f4…2802               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x00f2}
0x2802…280a               Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0100}
0x280a…2812               Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0108}
0x2812…2826               Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x0019, t01=0x0110}
0x2826…284c               Head {h00=0x0022, h01=0x0050, text=» LD A4,DCTAB DC:TAB ADDRESS =3«, t00=0x0019, t01=0x0124}
0x284c…2874               Head {h00=0x0024, h01=0x0050, text=» AD* A4,DCTAB LAST TABLE POS. =3«, t00=0x0019, t01=0x014a}
0x2874…28a2               Head {h00=0x002a, h01=0x0050, text=»DCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3«, t00=0x0019, t01=0x0172}
0x28a2…28d0               Head {h00=0x002a, h01=0x0050, text=» CW A4,DCTAB ALL ENTRIES CHECKED?? =3 «, t00=0x001a, t01=0x0010}
0x28d0…28fe               Head {h00=0x002a, h01=0x0050, text=» RF(E) DCTP25 YES.DWT NOT IN TABLE =3 «, t00=0x001a, t01=0x003e}
0x28fe…2920               Head {h00=0x001e, h01=0x0050, text=» CWR* A6,A4 IN TABLE ?? =3«, t00=0x001a, t01=0x006c}
0x2920…293e               Head {h00=0x001a, h01=0x0050, text=» RF(E) DCTP30 YES!! =3«, t00=0x001a, t01=0x008e}
0x293e…2964               Head {h00=0x0022, h01=0x0050, text=» RB DCTP22 CHECK NEXT ENTRY =3«, t00=0x001a, t01=0x00ac}
0x2964…297c               Head {h00=0x0014, h01=0x0050, text=»DCTP25 EQU *  =3«, t00=0x001a, t01=0x00d2}
0x297c…2984               Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00ea}
0x2984…29ac               Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x001a, t01=0x00f2}
0x29ac…29be               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x001a, t01=0x011a}
0x29be…29ec               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x001a, t01=0x012c}
0x29ec…29f4               Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x015a}
0x29f4…2a22               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x001a, t01=0x0162}
0x2a22…2a36               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x001a, t01=0x0190}
0x2a36…2a52               Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x001b, t01=0x0014}
0x2a52…2a6a               Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x001b, t01=0x0030}
0x2a6a…2a96               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x001b, t01=0x0048}
0x2a96…2aa2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0074}
0x2aa2…2ab6               Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x001b, t01=0x0080}
0x2ab6…2ada               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x001b, t01=0x0094}
0x2ada…2aee               Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x001b, t01=0x00b8}
0x2aee…2b16               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x001b, t01=0x00cc}
0x2b16…2b28               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001b, t01=0x00f4}
0x2b28…2b36               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0106}
0x2b36…2b40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0114}
0x2b40…2b4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x011e}
0x2b4a…2b5a               Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x001b, t01=0x0128}
0x2b5a…2b64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0138}
0x2b64…2b6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0142}
0x2b6e…2b86               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001b, t01=0x014c}
0x2b86…2ba8               Head {h00=0x001e, h01=0x0050, text=»*   SUCCESFUL TRANSMISSION«, t00=0x001b, t01=0x0164}
0x2ba8…2bbc               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001b, t01=0x0186}
0x2bbc…2bc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x000a}
0x2bc6…2bd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0014}
0x2bd0…2be2               Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x001c, t01=0x001e}
0x2be2…2bf8               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001c, t01=0x0030}
0x2bf8…2c20               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x001c, t01=0x0046}
0x2c20…2c46               Head {h00=0x0022, h01=0x0050, text=» CWK A1,BUFLEN ILLEGAL LENGTH?«, t00=0x001c, t01=0x006e}
0x2c46…2c62               Head {h00=0x0018, h01=0x0050, text=» RF(G) IL:LEN YES!! «, t00=0x001c, t01=0x0094}
0x2c62…2c6e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00b0}
0x2c6e…2c8e               Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x001c, t01=0x00bc}
0x2c8e…2cb2               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ  QUEUE REQUEST«, t00=0x001c, t01=0x00dc}
0x2cb2…2cc4               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001c, t01=0x0100}
0x2cc4…2cce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0112}
0x2cce…2cd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x011c}
0x2cd8…2ce2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0126}
0x2ce2…2cf0               Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x001c, t01=0x0130}
0x2cf0…2cfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x013e}
0x2cfa…2d04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0148}
0x2d04…2d1c               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001c, t01=0x0152}
0x2d1c…2d38               Head {h00=0x0018, h01=0x0050, text=»*   MESSAGE RECEIVED«, t00=0x001c, t01=0x016a}
0x2d38…2d4c               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001c, t01=0x0186}
0x2d4c…2d56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x000a}
0x2d56…2d60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0014}
0x2d60…2d72               Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x001d, t01=0x001e}
0x2d72…2d92               Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x001d, t01=0x0030}
0x2d92…2dc4               Head {h00=0x002e, h01=0x0050, text=» LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x001d, t01=0x0050}
0x2dc4…2dea               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x001d, t01=0x0082}
0x2dea…2df2               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00a8}
0x2df2…2dfa               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00b0}
0x2dfa…2e02               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00b8}
0x2e02…2e2e               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 TAKE THE FIRST IN QUEUE «, t00=0x001d, t01=0x00c0}
0x2e2e…2e46               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x001d, t01=0x00ec}
0x2e46…2e58               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x001d, t01=0x0104}
0x2e58…2e7e               Head {h00=0x0022, h01=0x0050, text=» LD A3,-4,A4 EFFECTIVE LENGTH «, t00=0x001d, t01=0x0116}
0x2e7e…2e96               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x001d, t01=0x013c}
0x2e96…2e9e               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x0154}
0x2e9e…2ec2               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x001d, t01=0x015c}
0x2ec2…2ef0               Head {h00=0x002a, h01=0x0050, text=» CF A15,DC:MIN MOV DATA TO USER BUFFER«, t00=0x001d, t01=0x0180}
0x2ef0…2f02               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001e, t01=0x001e}
0x2f02…2f0a               Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x0030}
0x2f0a…2f32               Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x001e, t01=0x0038}
0x2f32…2f44               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001e, t01=0x0060}
0x2f44…2f52               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x0072}
0x2f52…2f5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0080}
0x2f5c…2f66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x008a}
0x2f66…2f7a               Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x001e, t01=0x0094}
0x2f7a…2f84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00a8}
0x2f84…2f8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00b2}
0x2f8e…2fa2               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x001e, t01=0x00bc}
0x2fa2…2fb4               Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x001e, t01=0x00d0}
0x2fb4…2fe2               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x001e, t01=0x00e2}
0x2fe2…2ffe               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x001e, t01=0x0110}
0x2ffe…301e               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x001e, t01=0x012c}
0x301e…3032               Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x001e, t01=0x014c}
0x3032…304a               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x001e, t01=0x0160}
0x304a…306e               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 COMPLETE REQUEST «, t00=0x001e, t01=0x0178}
0x306e…3082               Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x001f, t01=0x000c}
0x3082…309a               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x001f, t01=0x0020}
0x309a…30ac               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x001f, t01=0x0038}
0x30ac…30d8               Head {h00=0x0028, h01=0x0050, text=» RB(Z) DCSS10 WACK HAS NOT BEEN SENT«, t00=0x001f, t01=0x004a}
0x30d8…30ec               Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x001f, t01=0x0076}
0x30ec…311c               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x001f, t01=0x008a}
0x311c…3134               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x001f, t01=0x00ba}
0x3134…3146               Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x001f, t01=0x00d2}
0x3146…3152               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x00e4}
0x3152…3160               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x00f0}
0x3160…3168               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x00fe}
0x3168…3172               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0106}
0x3172…3198               Head {h00=0x0022, h01=0x0050, text=»*   SET REQUEST TIMEOUT VALUE «, t00=0x001f, t01=0x0110}
0x3198…31a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0136}
0x31a2…31ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0140}
0x31ac…31b4               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x014a}
0x31b4…31c8               Head {h00=0x0010, h01=0x0050, text=»REQTIM EQU *«, t00=0x001f, t01=0x0152}
0x31c8…31ee               Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBCW,A8 TIMEOUT VALUE «, t00=0x001f, t01=0x0166}
0x31ee…3216               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTTIM,A6 SAVE IT IN DWT «, t00=0x001f, t01=0x018c}
0x3216…323a               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 TENDIO & DISPATCH«, t00=0x0020, t01=0x0024}
0x323a…3242               Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0048}
0x3242…324c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0050}
0x324c…3278               Head {h00=0x0028, h01=0x0050, text=»*   ILLEGAL APPLICATION BUFFER SIZE «, t00=0x0020, t01=0x005a}
0x3278…3282               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0086}
0x3282…328a               Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0090}
0x328a…32c6               Head {h00=0x0038, h01=0x0050, text=»IL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH «, t00=0x0020, t01=0x0098}
0x32c6…32ea               Head {h00=0x0020, h01=0x0050, text=» ABL DISEND COMPLETE REQUEST«, t00=0x0020, t01=0x00d4}
0x32ea…32f8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x00f8}
0x32f8…3302               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0106}
0x3302…330c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0110}
0x330c…3316               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x011a}
0x3316…3334               Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x0020, t01=0x0124}
0x3334…333e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0142}
0x333e…3348               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x014c}
0x3348…3352               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0156}
0x3352…336e               Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x0020, t01=0x0160}
0x336e…3378               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x017c}
0x3378…338c               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x0020, t01=0x0186}
0x338c…339e               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0021, t01=0x000a}
0x339e…33d0               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0021, t01=0x001c}
0x33d0…33f0               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x0021, t01=0x004e}
0x33f0…3406               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x0021, t01=0x006e}
0x3406…341c               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0021, t01=0x0084}
0x341c…3430               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x0021, t01=0x009a}
0x3430…3446               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x0021, t01=0x00ae}
0x3446…3472               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x0021, t01=0x00c4}
0x3472…3486               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x0021, t01=0x00f0}
0x3486…34a0               Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x0021, t01=0x0104}
0x34a0…34aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x011e}
0x34aa…34c6               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x0021, t01=0x0128}
0x34c6…34d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0144}
0x34d0…34e4               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x0021, t01=0x014e}
0x34e4…3500               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0021, t01=0x0162}
0x3500…3514               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0021, t01=0x017e}
0x3514…3528 (34, 0, 400)  Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x0022, t01=0x0004}
0x3528…354e               Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x0022, t01=0x0018}
0x354e…3576               Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x0022, t01=0x003e}
0x3576…3580               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0066}
0x3580…359c               Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x0022, t01=0x0070}
0x359c…35a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x008c}
0x35a6…35be               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x0022, t01=0x0096}
0x35be…35f0               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0022, t01=0x00ae}
0x35f0…3610               Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x0022, t01=0x00e0}
0x3610…3624               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x0022, t01=0x0100}
0x3624…363a               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0022, t01=0x0114}
0x363a…364e               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x0022, t01=0x012a}
0x364e…3662               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x0022, t01=0x013e}
0x3662…367a               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x0022, t01=0x0152}
0x367a…368c               Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x0022, t01=0x016a}
0x368c…369a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x017c}
0x369a…36a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x018a}
0x36a4…36c2 (35, 0, 400)  Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x0023, t01=0x0004}
0x36c2…36cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0022}
0x36cc…36e0               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x0023, t01=0x002c}
0x36e0…36fc               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0023, t01=0x0040}
0x36fc…3710               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0023, t01=0x005c}
0x3710…373e               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0023, t01=0x0070}
0x373e…3748               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x009e}
0x3748…3772               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x0023, t01=0x00a8}
0x3772…3796               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x0023, t01=0x00d2}
0x3796…37ac               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x0023, t01=0x00f6}
0x37ac…37be               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0023, t01=0x010c}
0x37be…37ec               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT IS NOT WRITING«, t00=0x0023, t01=0x011e}
0x37ec…3818               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x0023, t01=0x014c}
0x3818…382a               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0023, t01=0x0178}
0x382a…3834               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x018a}
0x3834…383e (36, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0004}
0x383e…3850               Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x0024, t01=0x000e}
0x3850…385e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x0020}
0x385e…3868               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x002e}
0x3868…3872               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0038}
0x3872…3890               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0024, t01=0x0042}
0x3890…389a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0060}
0x389a…38c4               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0024, t01=0x006a}
0x38c4…38ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0094}
0x38ce…38d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x009e}
0x38d8…38ec               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0024, t01=0x00a8}
0x38ec…3916               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0024, t01=0x00bc}
0x3916…3938               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0024, t01=0x00e6}
0x3938…394c               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0024, t01=0x0108}
0x394c…3972               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0024, t01=0x011c}
0x3972…3992               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0024, t01=0x0142}
0x3992…39a6               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0024, t01=0x0162}
0x39a6…39ba               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0024, t01=0x0176}
0x39ba…39cc               Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0024, t01=0x018a}
0x39cc…39da               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x000c}
0x39da…39e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x001a}
0x39e4…3a00               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0025, t01=0x0024}
0x3a00…3a0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0040}
0x3a0a…3a32               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0025, t01=0x004a}
0x3a32…3a56               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0025, t01=0x0072}
0x3a56…3a80               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0025, t01=0x0096}
0x3a80…3aa2               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0025, t01=0x00c0}
0x3aa2…3aac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00e2}
0x3aac…3ab6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00ec}
0x3ab6…3ae2               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0025, t01=0x00f6}
0x3ae2…3af2               Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x0025, t01=0x0122}
0x3af2…3b06               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x0025, t01=0x0132}
0x3b06…3b2a               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x0025, t01=0x0146}
0x3b2a…3b5c               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x0025, t01=0x016a}
0x3b5c…3b6e               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0026, t01=0x000c}
0x3b6e…3b9c               Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0026, t01=0x001e}
0x3b9c…3bbe               Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x0026, t01=0x004c}
0x3bbe…3bcc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x006e}
0x3bcc…3bd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x007c}
0x3bd6…3be0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0086}
0x3be0…3c0c               Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x0026, t01=0x0090}
0x3c0c…3c16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00bc}
0x3c16…3c32               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0026, t01=0x00c6}
0x3c32…3c42               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0026, t01=0x00e2}
0x3c42…3c4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00f2}
0x3c4c…3c78               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0026, t01=0x00fc}
0x3c78…3c94               Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x0026, t01=0x0128}
0x3c94…3cae               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0026, t01=0x0144}
0x3cae…3cd6               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0026, t01=0x015e}
0x3cd6…3ce8               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0026, t01=0x0186}
0x3ce8…3cfa               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0027, t01=0x0008}
0x3cfa…3d12               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0027, t01=0x001a}
0x3d12…3d34               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0027, t01=0x0032}
0x3d34…3d5a               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0027, t01=0x0054}
0x3d5a…3d74               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0027, t01=0x007a}
0x3d74…3d7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0094}
0x3d7e…3d88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x009e}
0x3d88…3db6               Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x0027, t01=0x00a8}
0x3db6…3dc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00d6}
0x3dc0…3ddc               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0027, t01=0x00e0}
0x3ddc…3dec               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0027, t01=0x00fc}
0x3dec…3df6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x010c}
0x3df6…3e24               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x0027, t01=0x0116}
0x3e24…3e5a               Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x0027, t01=0x0144}
0x3e5a…3e6e               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x0027, t01=0x017a}
0x3e6e…3e82               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x0027, t01=0x018e}
0x3e82…3e9a               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x0028, t01=0x0012}
0x3e9a…3ec4               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x0028, t01=0x002a}
0x3ec4…3ed6               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x0028, t01=0x0054}
0x3ed6…3eea               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x0028, t01=0x0066}
0x3eea…3f06               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x0028, t01=0x007a}
0x3f06…3f18               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x0028, t01=0x0096}
0x3f18…3f38               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x0028, t01=0x00a8}
0x3f38…3f4a               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0028, t01=0x00c8}
0x3f4a…3f64               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0028, t01=0x00da}
0x3f64…3f72               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x00f4}
0x3f72…3f7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0102}
0x3f7c…3f86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x010c}
0x3f86…3faa               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x0028, t01=0x0116}
0x3faa…3fb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x013a}
0x3fb4…3fc8               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0028, t01=0x0144}
0x3fc8…3fe4               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0028, t01=0x0158}
0x3fe4…3ff4               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0028, t01=0x0174}
0x3ff4…3ffe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0184}
0x3ffe…402a               Head {h00=0x0028, h01=0x0050, text=»INSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR«, t00=0x0028, t01=0x018e}
0x402a…4040               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x0029, t01=0x002a}
0x4040…4052               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0029, t01=0x0040}
0x4052…405c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0052}
0x405c…4066               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x005c}
0x4066…408c               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x0029, t01=0x0066}
0x408c…4096               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x008c}
0x4096…40b2               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0029, t01=0x0096}
0x40b2…40c2               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0029, t01=0x00b2}
0x40c2…40cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00c2}
0x40cc…40fa               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x0029, t01=0x00cc}
0x40fa…4110               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x0029, t01=0x00fa}
0x4110…4122               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x0029, t01=0x0110}
0x4122…412e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x0122}
0x412e…413c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x012e}
0x413c…4146               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x013c}
0x4146…4150               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0146}
0x4150…4178               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x0029, t01=0x0150}
0x4178…4182               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0178}
0x4182…419a               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x0029, t01=0x0182}
0x419a…41b4               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002a, t01=0x000a}
0x41b4…41be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0024}
0x41be…41d2               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002a, t01=0x002e}
0x41d2…41e8               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002a, t01=0x0042}
0x41e8…4214               Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002a, t01=0x0058}
0x4214…4220               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0084}
0x4220…4236               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002a, t01=0x0090}
0x4236…425e               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002a, t01=0x00a6}
0x425e…426a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x00ce}
0x426a…429a               Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002a, t01=0x00da}
0x429a…42ae               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002a, t01=0x010a}
0x42ae…42c2               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002a, t01=0x011e}
0x42c2…42ea               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002a, t01=0x0132}
0x42ea…42fc               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002a, t01=0x015a}
0x42fc…430e               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002a, t01=0x016c}
0x430e…4338               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002a, t01=0x017e}
0x4338…435e               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002b, t01=0x0018}
0x435e…436e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002b, t01=0x003e}
0x436e…437c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x004e}
0x437c…4386               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x005c}
0x4386…4390               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0066}
0x4390…43c6               Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x002b, t01=0x0070}
0x43c6…43d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00a6}
0x43d0…4408               Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x002b, t01=0x00b0}
0x4408…4412               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00e8}
0x4412…4430               Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x002b, t01=0x00f2}
0x4430…4448               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x002b, t01=0x0110}
0x4448…4468               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x002b, t01=0x0128}
0x4468…4488               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x002b, t01=0x0148}
0x4488…44a0               Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x002b, t01=0x0168}
0x44a0…44ba               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x002b, t01=0x0180}
0x44ba…44e2               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x002c, t01=0x000a}
0x44e2…4510               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x002c, t01=0x0032}
0x4510…4536               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x002c, t01=0x0060}
0x4536…453e               Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0086}
0x453e…4546               Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x008e}
0x4546…4576               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x002c, t01=0x0096}
0x4576…45a8               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x002c, t01=0x00c6}
0x45a8…45ce               Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x002c, t01=0x00f8}
0x45ce…45f8               Head {h00=0x0026, h01=0x0050, text=»   DONT DESTROY BUFFER ADDRESS =6 «, t00=0x002c, t01=0x011e}
0x45f8…460c               Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x002c, t01=0x0148}
0x460c…4640               Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x002c, t01=0x015c}
0x4640…4654               Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x002c, t01=0x0190}
0x4654…4686               Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x002d, t01=0x0014}
0x4686…468e               Head {h00=0x0004, h01=0x0050, t00=0x002d, t01=0x0046}
0x468e…46b2               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x002d, t01=0x004e}
0x46b2…46dc               Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 RECEIVE BUFFER ADDRESS «, t00=0x002d, t01=0x0072}
0x46dc…470c               Head {h00=0x002c, h01=0x0050, text=» CF A15,DC:MIN MOVE DATA TO USER BUFFER «, t00=0x002d, t01=0x009c}
0x470c…473a               Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x002d, t01=0x00cc}
0x473a…4752               Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x002d, t01=0x00fa}
0x4752…478e               Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x002d, t01=0x0112}
0x478e…47be               Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x002d, t01=0x014e}
0x47be…47d4               Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x002d, t01=0x017e}
0x47d4…47ea (46, 0, 398)  Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x002e, t01=0x0004}
0x47ea…4814               Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x002e, t01=0x001a}
0x4814…4842               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x002e, t01=0x0044}
0x4842…4876               Head {h00=0x0030, h01=0x0050, text=» CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x002e, t01=0x0072}
0x4876…4888               Head {h00=0x000e, h01=0x0050, text=» RB CKM110«, t00=0x002e, t01=0x00a6}
0x4888…4896               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x00b8}
0x4896…489e               Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x00c6}
0x489e…48e2               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x002e, t01=0x00ce}
0x48e2…48ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0112}
0x48ec…4906               Head {h00=0x0016, h01=0x0050, text=»*    ABORT ROUTINE«, t00=0x002e, t01=0x011c}
0x4906…4910               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0136}
0x4910…4930               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x002e, t01=0x0140}
0x4930…4938               Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x0160}
0x4938…4962               Head {h00=0x0026, h01=0x0050, text=»ABORT LD A1,DWTTP,A6 TIMER POINTER«, t00=0x002e, t01=0x0168}
0x4962…4988 (47, 0, 400)  Head {h00=0x0022, h01=0x0050, text=» RF(Z) AB:10 NO TIMER RUNNING «, t00=0x002f, t01=0x0004}
0x4988…49a8               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 KILL TIMER«, t00=0x002f, t01=0x002a}
0x49a8…49bc               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x002f, t01=0x004a}
0x49bc…49c4               Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x005e}
0x49c4…49ec               Head {h00=0x0024, h01=0x0050, text=»AB:10 LD A1,DWTOR,A6 ORDER CODE «, t00=0x002f, t01=0x0066}
0x49ec…49fe               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x002f, t01=0x008e}
0x49fe…4a2c               Head {h00=0x002a, h01=0x0050, text=» RF(Z) AB:RTN READ REQUEST. NO ACTION «, t00=0x002f, t01=0x00a0}
0x4a2c…4a3e               Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x002f, t01=0x00ce}
0x4a3e…4a70               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE«, t00=0x002f, t01=0x00e0}
0x4a70…4a78               Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0112}
0x4a78…4aaa               Head {h00=0x002e, h01=0x0050, text=» CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE«, t00=0x002f, t01=0x011a}
0x4aaa…4ad4               Head {h00=0x0026, h01=0x0050, text=» LD A2,FDWTUT WRITING DWT ADDRESS «, t00=0x002f, t01=0x014c}
0x4ad4…4ae6               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x002f, t01=0x0176}
0x4ae6…4b0a               Head {h00=0x0020, h01=0x0050, text=» RF(NE) AB:RTN NOT THIS DWT «, t00=0x002f, t01=0x0188}
0x4b0a…4b2e               Head {h00=0x0020, h01=0x0050, text=» CM XACK RESET ACK EXPECTED «, t00=0x0030, t01=0x001c}
0x4b2e…4b52               Head {h00=0x0020, h01=0x0050, text=» CM FDWTUT RESET WRITING DWT«, t00=0x0030, t01=0x0040}
0x4b52…4b5a               Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x0064}
0x4b5a…4b6e               Head {h00=0x0010, h01=0x0050, text=»AB:RTN EQU *«, t00=0x0030, t01=0x006c}
0x4b6e…4b84               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0030, t01=0x0080}
0x4b84…4b98               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0030, t01=0x0096}
0x4b98…4bc0               Head {h00=0x0024, h01=0x0050, text=» ABR* A15 RETURN IN INHIBIT MODE«, t00=0x0030, t01=0x00aa}
0x4bc0…4bcc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x00d2}
0x4bcc…4be2               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0030, t01=0x00de}
0x4be2…4bf2               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0030, t01=0x00f4}
0x4bf2…4bfe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x0104}
0x4bfe…4c0c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0110}
0x4c0c…4c14               Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x011e}
0x4c14…4c22               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0126}
0x4c22…4c2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0134}
0x4c2c…4c36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x013e}
0x4c36…4c54               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0030, t01=0x0148}
0x4c54…4c7c               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0030, t01=0x0166}
0x4c7c…4c86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x018e}
0x4c86…4c98               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0031, t01=0x0008}
0x4c98…4cc0               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0031, t01=0x001a}
0x4cc0…4cca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0042}
0x4cca…4cd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x004c}
0x4cd4…4cec               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0031, t01=0x0056}
0x4cec…4d00               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0031, t01=0x006e}
0x4d00…4d14               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0031, t01=0x0082}
0x4d14…4d28               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0031, t01=0x0096}
0x4d28…4d3c               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0031, t01=0x00aa}
0x4d3c…4d50               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0031, t01=0x00be}
0x4d50…4d6a               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0031, t01=0x00d2}
0x4d6a…4d78               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x00ec}
0x4d78…4d90               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0031, t01=0x00fa}
0x4d90…4da4               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0031, t01=0x0112}
0x4da4…4db6               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0031, t01=0x0126}
0x4db6…4dca               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0031, t01=0x0138}
0x4dca…4ddc               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0031, t01=0x014c}
0x4ddc…4df0               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0031, t01=0x015e}
0x4df0…4e02               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0031, t01=0x0172}
0x4e02…4e16               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0031, t01=0x0184}
0x4e16…4e28               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0032, t01=0x0008}
0x4e28…4e3c               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0032, t01=0x001a}
0x4e3c…4e4e               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0032, t01=0x002e}
0x4e4e…4e62               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0032, t01=0x0040}
0x4e62…4e76               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0032, t01=0x0054}
0x4e76…4e8a               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0032, t01=0x0068}
0x4e8a…4e9c               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0032, t01=0x007c}
0x4e9c…4eaa               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x008e}
0x4eaa…4eb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x009c}
0x4eb4…4ebe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00a6}
0x4ebe…4ed4               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0032, t01=0x00b0}
0x4ed4…4ede               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00c6}
0x4ede…4ee8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00d0}
0x4ee8…4f16               Head {h00=0x002a, h01=0x0050, text=»TIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK«, t00=0x0032, t01=0x00da}
0x4f16…4f3c               Head {h00=0x0022, h01=0x0050, text=»TIMNAK EQU 3 DELAY FOR NAK DK «, t00=0x0032, t01=0x0108}
0x4f3c…4f46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x012e}
0x4f46…4f50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0138}
0x4f50…4f6c               Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0032, t01=0x0142}
0x4f6c…4f76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x015e}
0x4f76…4fa0               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0032, t01=0x0168}
0x4fa0…4fb4 (51, 0, 398)  Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0033, t01=0x0004}
0x4fb4…4fc8               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0033, t01=0x0018}
0x4fc8…4fdc               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0033, t01=0x002c}
0x4fdc…4ff0               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0033, t01=0x0040}
0x4ff0…5004               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0033, t01=0x0054}
0x5004…5018               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0033, t01=0x0068}
0x5018…502c               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0033, t01=0x007c}
0x502c…5040               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0033, t01=0x0090}
0x5040…5054               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0033, t01=0x00a4}
0x5054…5068               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0033, t01=0x00b8}
0x5068…507c               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0033, t01=0x00cc}
0x507c…5090               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0033, t01=0x00e0}
0x5090…50a2               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0033, t01=0x00f4}
0x50a2…50b8               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0033, t01=0x0106}
0x50b8…50ce               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0033, t01=0x011c}
0x50ce…50e2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0033, t01=0x0132}
0x50e2…50f6               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0033, t01=0x0146}
0x50f6…510a               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0033, t01=0x015a}
0x510a…511e               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0033, t01=0x016e}
0x511e…5132               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0033, t01=0x0182}
0x5132…5146               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0034, t01=0x0008}
0x5146…515a               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0034, t01=0x001c}
0x515a…516e               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0034, t01=0x0030}
0x516e…517a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0044}
0x517a…518e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0034, t01=0x0050}
0x518e…51a2               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0034, t01=0x0064}
0x51a2…51d6               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0034, t01=0x0078}
0x51d6…51e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x00ac}
0x51e2…51f6               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0034, t01=0x00b8}
0x51f6…520a               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0034, t01=0x00cc}
0x520a…521e               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0034, t01=0x00e0}
0x521e…5236               Head {h00=0x0014, h01=0x0050, text=»RVI EQU XRVI  DK«, t00=0x0034, t01=0x00f4}
0x5236…524a               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0034, t01=0x010c}
0x524a…525e               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0034, t01=0x0120}
0x525e…5274               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0034, t01=0x0134}
0x5274…5280               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x014a}
0x5280…528e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x0156}
0x528e…5298               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0164}
0x5298…52a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x016e}
0x52a2…52c0               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0034, t01=0x0178}
0x52c0…52ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0008}
0x52ca…52d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0012}
0x52d4…5302               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0035, t01=0x001c}
0x5302…5334               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0035, t01=0x004a}
0x5334…5354               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x0035, t01=0x007c}
0x5354…5370               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x0035, t01=0x009c}
0x5370…538c               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x0035, t01=0x00b8}
0x538c…53c2               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x0035, t01=0x00d4}
0x53c2…53e8               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x0035, t01=0x010a}
0x53e8…5408               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x0035, t01=0x0130}
0x5408…5436               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x0035, t01=0x0150}
0x5436…5440               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x017e}
0x5440…545e               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x0035, t01=0x0188}
0x545e…548a               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x0036, t01=0x0016}
0x548a…54b4               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x0036, t01=0x0042}
0x54b4…54d4               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x0036, t01=0x006c}
0x54d4…5508               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x0036, t01=0x008c}
0x5508…5530               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x0036, t01=0x00c0}
0x5530…5562               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x0036, t01=0x00e8}
0x5562…5592               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x0036, t01=0x011a}
0x5592…55be               Head {h00=0x0028, h01=0x0050, text=»CRDBUF DATA 0 READ BUFFER COUNTER DK«, t00=0x0036, t01=0x014a}
0x55be…55c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0176}
0x55c8…55d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0180}
0x55d2…55fa               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x0036, t01=0x018a}
0x55fa…5604               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0022}
0x5604…560e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x002c}
0x560e…5622               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0037, t01=0x0036}
0x5622…5654               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x0037, t01=0x004a}
0x5654…565e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x007c}
0x565e…5668               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0086}
0x5668…567c               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x0037, t01=0x0090}
0x567c…5690               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x0037, t01=0x00a4}
0x5690…569a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00b8}
0x569a…56d0               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x0037, t01=0x00c2}
0x56d0…5700               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x0037, t01=0x00f8}
0x5700…570c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0128}
0x570c…571a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0134}
0x571a…5724               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0142}
0x5724…572e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x014c}
0x572e…574a               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x0037, t01=0x0156}
0x574a…5754               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0172}
0x5754…577a               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x0037, t01=0x017c}
0x577a…57a4               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x0038, t01=0x0012}
0x57a4…57ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x003c}
0x57ae…57b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0046}
0x57b8…57d4               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0038, t01=0x0050}
0x57d4…5804               Head {h00=0x002c, h01=0x0050, text=»BRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ«, t00=0x0038, t01=0x006c}
0x5804…581a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0038, t01=0x009c}
0x581a…582c               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x0038, t01=0x00b2}
0x582c…5850               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x0038, t01=0x00c4}
0x5850…586c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0038, t01=0x00e8}
0x586c…58a2               Head {h00=0x0032, h01=0x0050, text=» CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS «, t00=0x0038, t01=0x0104}
0x58a2…58b8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0038, t01=0x013a}
0x58b8…58d4               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0038, t01=0x0150}
0x58d4…5908               Head {h00=0x0030, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ«, t00=0x0038, t01=0x016c}
0x5908…591e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x0010}
0x591e…5932               Head {h00=0x0010, h01=0x0050, text=»BRM010 EQU *«, t00=0x0039, t01=0x0026}
0x5932…5954               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0039, t01=0x003a}
0x5954…5988               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN«, t00=0x0039, t01=0x005c}
0x5988…599e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x0090}
0x599e…59ba               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0039, t01=0x00a6}
0x59ba…59ce               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0039, t01=0x00c2}
0x59ce…5a06               Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN «, t00=0x0039, t01=0x00d6}
0x5a06…5a1c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x010e}
0x5a1c…5a38               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0039, t01=0x0124}
0x5a38…5a5e               Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x0039, t01=0x0140}
0x5a5e…5a74               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x0166}
0x5a74…5a90               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0039, t01=0x017c}
0x5a90…5aac               Head {h00=0x0018, h01=0x0050, text=» IFF CODE=1  SALCUZ «, t00=0x003a, t01=0x0008}
0x5aac…5ac8               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x003a, t01=0x0024}
0x5ac8…5af6               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003a, t01=0x0040}
0x5af6…5b12               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x003a, t01=0x006e}
0x5b12…5b48               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003a, t01=0x008a}
0x5b48…5b66               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003a, t01=0x00c0}
0x5b66…5b7c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003a, t01=0x00de}
0x5b7c…5b9e               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=2  SALCUZ «, t00=0x003a, t01=0x00f4}
0x5b9e…5bb8               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x003a, t01=0x0116}
0x5bb8…5be6               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003a, t01=0x0130}
0x5be6…5c04               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x003a, t01=0x015e}
0x5c04…5c3a               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003a, t01=0x017c}
0x5c3a…5c58               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003b, t01=0x0022}
0x5c58…5c6e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x0040}
0x5c6e…5c82               Head {h00=0x0010, h01=0x0050, text=»BRM100 EQU *«, t00=0x003b, t01=0x0056}
0x5c82…5caa               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003b, t01=0x006a}
0x5caa…5cce               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003b, t01=0x0092}
0x5cce…5ce0               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003b, t01=0x00b6}
0x5ce0…5cf4               Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x003b, t01=0x00c8}
0x5cf4…5d16               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x003b, t01=0x00dc}
0x5d16…5d2e               Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x003b, t01=0x00fe}
0x5d2e…5d50               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x003b, t01=0x0116}
0x5d50…5d68               Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x003b, t01=0x0138}
0x5d68…5d8c               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x003b, t01=0x0150}
0x5d8c…5da4               Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x003b, t01=0x0174}
0x5da4…5dc8               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x003b, t01=0x018c}
0x5dc8…5de0               Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x003c, t01=0x0020}
0x5de0…5e04               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x003c, t01=0x0038}
0x5e04…5e18               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003c, t01=0x005c}
0x5e18…5e2a               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003c, t01=0x0070}
0x5e2a…5e52               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003c, t01=0x0082}
0x5e52…5e76               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003c, t01=0x00aa}
0x5e76…5e88               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003c, t01=0x00ce}
0x5e88…5eb2               Head {h00=0x0026, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESSING «, t00=0x003c, t01=0x00e0}
0x5eb2…5ebe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x010a}
0x5ebe…5ed0               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003c, t01=0x0116}
0x5ed0…5ee8               Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x003c, t01=0x0128}
0x5ee8…5f06               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x003c, t01=0x0140}
0x5f06…5f18               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x003c, t01=0x015e}
0x5f18…5f2e               Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x003c, t01=0x0170}
0x5f2e…5f52               Head {h00=0x0020, h01=0x0050, text=» RF(NE) BRM150 NOT THIS TCU «, t00=0x003c, t01=0x0186}
0x5f52…5f66               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x003d, t01=0x001a}
0x5f66…5f88               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x003d, t01=0x002e}
0x5f88…5fac               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003d, t01=0x0050}
0x5fac…5fbe               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003d, t01=0x0074}
0x5fbe…5fd2               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003d, t01=0x0086}
0x5fd2…5ff4               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x003d, t01=0x009a}
0x5ff4…6018               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003d, t01=0x00bc}
0x6018…602a               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003d, t01=0x00e0}
0x602a…605a               Head {h00=0x002c, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESS SEQUENCE «, t00=0x003d, t01=0x00f2}
0x605a…6066               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x0122}
0x6066…608c               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ READ ONE CHARACTER«, t00=0x003d, t01=0x012e}
0x608c…60a8               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003d, t01=0x0154}
0x60a8…60c0               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x003d, t01=0x0170}
0x60c0…60d6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003d, t01=0x0188}
0x60d6…60f2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003e, t01=0x000e}
0x60f2…610e               Head {h00=0x0018, h01=0x0050, text=» SUK A2,ENQ  SALCUZ «, t00=0x003e, t01=0x002a}
0x610e…6124               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x0046}
0x6124…6142               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) BRM150 NOT ENQ«, t00=0x003e, t01=0x005c}
0x6142…615e               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003e, t01=0x007a}
0x615e…6186               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ READ LAST CHARACTER «, t00=0x003e, t01=0x0096}
0x6186…618e               Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x00be}
0x618e…61b4               Head {h00=0x0022, h01=0x0050, text=»* TRAILING PAD CAN BE CHECKED «, t00=0x003e, t01=0x00c6}
0x61b4…61bc               Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x00ec}
0x61bc…61de               Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,LCUIN HALT INPUT«, t00=0x003e, t01=0x00f4}
0x61de…61f4               Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUIN «, t00=0x003e, t01=0x0116}
0x61f4…620a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x012c}
0x620a…6226               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003e, t01=0x0142}
0x6226…624e               Head {h00=0x0024, h01=0x0050, text=» CF A5,HALTIN HALT INPUT SALCUZ «, t00=0x003e, t01=0x015e}
0x624e…6280               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) BRM010 PARITY ERROR SALCUZ  SALCUZ«, t00=0x003e, t01=0x0186}
0x6280…6296               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003f, t01=0x0028}
0x6296…62a8               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x003f, t01=0x003e}
0x62a8…62cc               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK COUNTER«, t00=0x003f, t01=0x0050}
0x62cc…62de               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x003f, t01=0x0074}
0x62de…62f0               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x003f, t01=0x0086}
0x62f0…6310               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x003f, t01=0x0098}
0x6310…6322               Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x003f, t01=0x00b8}
0x6322…6344               Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x003f, t01=0x00ca}
0x6344…6358               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x003f, t01=0x00ec}
0x6358…6392               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x003f, t01=0x0100}
0x6392…639e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x013a}
0x639e…63b2               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003f, t01=0x0146}
0x63b2…63dc               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x003f, t01=0x015a}
0x63dc…63e8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x0184}
0x63e8…640a               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x003f, t01=0x0190}
0x640a…642e               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x0040, t01=0x0022}
0x642e…644a               Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x0040, t01=0x0046}
0x644a…645e               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x0040, t01=0x0062}
0x645e…6488               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0040, t01=0x0076}
0x6488…64aa               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0040, t01=0x00a0}
0x64aa…64ca               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x0040, t01=0x00c2}
0x64ca…64e0               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=0   «, t00=0x0040, t01=0x00e2}
0x64e0…6508               Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x0040, t01=0x00f8}
0x6508…651c               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0040, t01=0x0120}
0x651c…6530               Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x0040, t01=0x0134}
0x6530…6540               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0040, t01=0x0148}
0x6540…6556               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=1   «, t00=0x0040, t01=0x0158}
0x6556…6576               Head {h00=0x001c, h01=0x0050, text=» ABL BRM INVALID ADDRESS«, t00=0x0040, t01=0x016e}
0x6576…6586               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0040, t01=0x018e}
0x6586…6590               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x000e}
0x6590…65c0               Head {h00=0x002c, h01=0x0050, text=»*   WAIT FOR MARK HOLD TO RESYNCHRONIZE «, t00=0x0041, t01=0x0018}
0x65c0…65ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0048}
0x65ca…65de               Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0041, t01=0x0052}
0x65de…65f2               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0041, t01=0x0066}
0x65f2…6606               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0041, t01=0x007a}
0x6606…6626               Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM RESYNCHRONIZE«, t00=0x0041, t01=0x008e}
0x6626…6650               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ ANOTHER CHARACTER«, t00=0x0041, t01=0x00ae}
0x6650…6662               Head {h00=0x000e, h01=0x0050, text=» RB BRM150«, t00=0x0041, t01=0x00d8}
0x6662…6670               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x00ea}
0x6670…667a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00f8}
0x667a…6684               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0102}
0x6684…66a4               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0041, t01=0x010c}
0x66a4…66ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x012c}
0x66ae…66b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0136}
0x66b8…66cc               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0041, t01=0x0140}
0x66cc…66f6               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0041, t01=0x0154}
0x66f6…670a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0041, t01=0x017e}
0x670a…672c (66, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0042, t01=0x0004}
0x672c…6738               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0026}
0x6738…674c               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0042, t01=0x0032}
0x674c…6776               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0042, t01=0x0046}
0x6776…679c               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0042, t01=0x0070}
0x679c…67c0               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0042, t01=0x0096}
0x67c0…67da               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0042, t01=0x00ba}
0x67da…6806               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0042, t01=0x00d4}
0x6806…681a               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0042, t01=0x0100}
0x681a…6840               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0042, t01=0x0114}
0x6840…6854               Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0042, t01=0x013a}
0x6854…6876               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0042, t01=0x014e}
0x6876…6886               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0042, t01=0x0170}
0x6886…6894               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0180}
0x6894…689e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x018e}
0x689e…68a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0008}
0x68a8…68c8               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0043, t01=0x0012}
0x68c8…68d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0032}
0x68d2…68dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x003c}
0x68dc…68f0               Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0043, t01=0x0046}
0x68f0…6904               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0043, t01=0x005a}
0x6904…6918               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0043, t01=0x006e}
0x6918…693a               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0043, t01=0x0082}
0x693a…6950               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0043, t01=0x00a4}
0x6950…697c               Head {h00=0x0028, h01=0x0050, text=»*********************CHAINED COMMAND«, t00=0x0043, t01=0x00ba}
0x697c…69a6               Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0043, t01=0x00e6}
0x69a6…69c4               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0043, t01=0x0110}
0x69c4…69d8               Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0043, t01=0x012e}
0x69d8…69fa               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0043, t01=0x0142}
0x69fa…6a0c               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0043, t01=0x0164}
0x6a0c…6a2e               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0043, t01=0x0176}
0x6a2e…6a42               Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0044, t01=0x0008}
0x6a42…6a6e               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0044, t01=0x001c}
0x6a6e…6a82               Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0044, t01=0x0048}
0x6a82…6aa0               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0044, t01=0x005c}
0x6aa0…6ab0               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0044, t01=0x007a}
0x6ab0…6ac4               Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0044, t01=0x008a}
0x6ac4…6ad8               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0044, t01=0x009e}
0x6ad8…6aec               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0044, t01=0x00b2}
0x6aec…6b16               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0044, t01=0x00c6}
0x6b16…6b2c               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0044, t01=0x00f0}
0x6b2c…6b56               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0044, t01=0x0106}
0x6b56…6b7c               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0044, t01=0x0130}
0x6b7c…6bb0               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0044, t01=0x0156}
0x6bb0…6bcc               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0044, t01=0x018a}
0x6bcc…6bd8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x0016}
0x6bd8…6bec               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0045, t01=0x0022}
0x6bec…6c1c               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0045, t01=0x0036}
0x6c1c…6c36               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0045, t01=0x0066}
0x6c36…6c62               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0045, t01=0x0080}
0x6c62…6c82               Head {h00=0x001c, h01=0x0050, text=» CM CACK PRESET ACK-1 =7«, t00=0x0045, t01=0x00ac}
0x6c82…6ca6               Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x0045, t01=0x00cc}
0x6ca6…6cb2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x00f0}
0x6cb2…6cde               Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x0045, t01=0x00fc}
0x6cde…6cf6               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0045, t01=0x0128}
0x6cf6…6d0e               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0045, t01=0x0140}
0x6d0e…6d20               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0045, t01=0x0158}
0x6d20…6d38               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0045, t01=0x016a}
0x6d38…6d50               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ  =8 «, t00=0x0045, t01=0x0182}
0x6d50…6d62               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0046, t01=0x000a}
0x6d62…6d8e               Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x0046, t01=0x001c}
0x6d8e…6da0               Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x0046, t01=0x0048}
0x6da0…6db4               Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x0046, t01=0x005a}
0x6db4…6dd8               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0046, t01=0x006e}
0x6dd8…6e00               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0046, t01=0x0092}
0x6e00…6e12               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0046, t01=0x00ba}
0x6e12…6e26               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0046, t01=0x00cc}
0x6e26…6e4c               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x0046, t01=0x00e0}
0x6e4c…6e60               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0046, t01=0x0106}
0x6e60…6e74               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x0046, t01=0x011a}
0x6e74…6e86               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x0046, t01=0x012e}
0x6e86…6eaa               Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x0046, t01=0x0140}
0x6eaa…6ebc               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0046, t01=0x0164}
0x6ebc…6ee0               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x0046, t01=0x0176}
0x6ee0…6ef2               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0047, t01=0x000a}
0x6ef2…6f08               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x0047, t01=0x001c}
0x6f08…6f34               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x0047, t01=0x0032}
0x6f34…6f52               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x0047, t01=0x005e}
0x6f52…6f7c               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x0047, t01=0x007c}
0x6f7c…6f88               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x00a6}
0x6f88…6f9c               Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x0047, t01=0x00b2}
0x6f9c…6fae               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0047, t01=0x00c6}
0x6fae…6fd8               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x0047, t01=0x00d8}
0x6fd8…6fe8               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0047, t01=0x0102}
0x6fe8…7016               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0047, t01=0x0112}
0x7016…7028               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0047, t01=0x0140}
0x7028…704c               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x0047, t01=0x0152}
0x704c…7056               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0176}
0x7056…707c               Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x0047, t01=0x0180}
0x707c…7086               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0016}
0x7086…709a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0048, t01=0x0020}
0x709a…70ae               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0048, t01=0x0034}
0x70ae…70c8               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x0048, t01=0x0048}
0x70c8…70de               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0048, t01=0x0062}
0x70de…70f4               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x0048, t01=0x0078}
0x70f4…7108               Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x0048, t01=0x008e}
0x7108…7114               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x00a2}
0x7114…7128               Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x0048, t01=0x00ae}
0x7128…713e               Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x0048, t01=0x00c2}
0x713e…716e               Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x0048, t01=0x00d8}
0x716e…7190               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x0048, t01=0x0108}
0x7190…71b0               Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x0048, t01=0x012a}
0x71b0…71ca               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0048, t01=0x014a}
0x71ca…71ea               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x0048, t01=0x0164}
0x71ea…7214               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM327 ANY MESSAGE ORDER =4«, t00=0x0048, t01=0x0184}
0x7214…7226               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0049, t01=0x001e}
0x7226…7238               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x0049, t01=0x0030}
0x7238…7250               Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x0049, t01=0x0042}
0x7250…7276               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x0049, t01=0x005a}
0x7276…728a               Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x0049, t01=0x0080}
0x728a…72a4               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0049, t01=0x0094}
0x72a4…72cc               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0049, t01=0x00ae}
0x72cc…72ec               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x0049, t01=0x00d6}
0x72ec…731a               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x0049, t01=0x00f6}
0x731a…7344               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x0049, t01=0x0124}
0x7344…7370               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x0049, t01=0x014e}
0x7370…737e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x017a}
0x737e…7388               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0188}
0x7388…7392 (74, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0004}
0x7392…73c6               Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x004a, t01=0x000e}
0x73c6…73d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0042}
0x73d0…73da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x004c}
0x73da…73ee               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004a, t01=0x0056}
0x73ee…740e               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x004a, t01=0x006a}
0x740e…7422               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004a, t01=0x008a}
0x7422…7444               Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x004a, t01=0x009e}
0x7444…7456               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x004a, t01=0x00c0}
0x7456…746c               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004a, t01=0x00d2}
0x746c…748e               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004a, t01=0x00e8}
0x748e…74a0               Head {h00=0x000e, h01=0x0050, text=» ORK A2,/A«, t00=0x004a, t01=0x010a}
0x74a0…74b8               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004a, t01=0x011c}
0x74b8…74cc               Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004a, t01=0x0134}
0x74cc…74d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x0148}
0x74d8…74f2               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004a, t01=0x0154}
0x74f2…7512               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004a, t01=0x016e}
0x7512…7542               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 «, t00=0x004a, t01=0x018e}
0x7542…756c               Head {h00=0x0026, h01=0x0050, text=» SUK A4,6 ADJUST BUFFER ADDRESS =4«, t00=0x004b, t01=0x002e}
0x756c…7598               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE MESSAGE ON DWT =4«, t00=0x004b, t01=0x0058}
0x7598…75ae               Head {h00=0x0012, h01=0x0050, text=» RF BRM32A  =4«, t00=0x004b, t01=0x0084}
0x75ae…75be               Head {h00=0x000c, h01=0x0050, text=» XIF  =4«, t00=0x004b, t01=0x009a}
0x75be…75d6               Head {h00=0x0014, h01=0x0050, text=»BRM329 EQU *  =4«, t00=0x004b, t01=0x00aa}
0x75d6…75de               Head {h00=0x0004, h01=0x0050, t00=0x004b, t01=0x00c2}
0x75de…7602               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x004b, t01=0x00ca}
0x7602…762c               Head {h00=0x0026, h01=0x0050, text=» CF A15,DC:MIN MOVE TO USER BUFFER«, t00=0x004b, t01=0x00ee}
0x762c…763e               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004b, t01=0x0118}
0x763e…7656               Head {h00=0x0014, h01=0x0050, text=»BRM32A EQU *  =4«, t00=0x004b, t01=0x012a}
0x7656…765e               Head {h00=0x0004, h01=0x0050, t00=0x004b, t01=0x0142}
0x765e…7686               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004b, t01=0x014a}
0x7686…7698               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004b, t01=0x0172}
0x7698…76a6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004b, t01=0x0184}
0x76a6…76ba (76, 0, 400)  Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x004c, t01=0x0004}
0x76ba…76d4               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004c, t01=0x0018}
0x76d4…76f6               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 STATUS =4 «, t00=0x004c, t01=0x0032}
0x76f6…771a               Head {h00=0x0020, h01=0x0050, text=» RF(N) BRM335 NO REQUEST =4 «, t00=0x004c, t01=0x0054}
0x771a…773a               Head {h00=0x001c, h01=0x0050, text=» LD A1,DWTOR,A6 ORDER =4«, t00=0x004c, t01=0x0078}
0x773a…776a               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 «, t00=0x004c, t01=0x0098}
0x776a…7794               Head {h00=0x0026, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST =4«, t00=0x004c, t01=0x00c8}
0x7794…77ac               Head {h00=0x0014, h01=0x0050, text=»BRM335 EQU *  =4«, t00=0x004c, t01=0x00f2}
0x77ac…77be               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x004c, t01=0x010a}
0x77be…77e0               Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x004c, t01=0x011c}
0x77e0…780c               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x004c, t01=0x013e}
0x780c…783e               Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x004c, t01=0x016a}
0x783e…7852               Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x004d, t01=0x000c}
0x7852…7874               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x004d, t01=0x0020}
0x7874…7884               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004d, t01=0x0042}
0x7884…7898               Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x004d, t01=0x0052}
0x7898…78ac               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004d, t01=0x0066}
0x78ac…78c4               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x004d, t01=0x007a}
0x78c4…78d6               Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x004d, t01=0x0092}
0x78d6…78fe               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x004d, t01=0x00a4}
0x78fe…791e               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x004d, t01=0x00cc}
0x791e…7930               Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x004d, t01=0x00ec}
0x7930…793c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x00fe}
0x793c…7950               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x004d, t01=0x010a}
0x7950…7962               Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x004d, t01=0x011e}
0x7962…796e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x0130}
0x796e…797c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004d, t01=0x013c}
0x797c…7986               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x014a}
0x7986…7990               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0154}
0x7990…79c0               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x004d, t01=0x015e}
0x79c0…79ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x018e}
0x79ca…79d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0008}
0x79d4…79e8               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x004e, t01=0x0012}
0x79e8…7a10               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x004e, t01=0x0026}
0x7a10…7a24               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x004e, t01=0x004e}
0x7a24…7a4a               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x004e, t01=0x0062}
0x7a4a…7a82               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x004e, t01=0x0088}
0x7a82…7aaa               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x004e, t01=0x00c0}
0x7aaa…7ad2               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x004e, t01=0x00e8}
0x7ad2…7af8               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x004e, t01=0x0110}
0x7af8…7b1e               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x004e, t01=0x0136}
0x7b1e…7b30               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x004e, t01=0x015c}
0x7b30…7b42               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x004e, t01=0x016e}
0x7b42…7b6c               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x004e, t01=0x0180}
0x7b6c…7b7a               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x004f, t01=0x001a}
0x7b7a…7ba8               Head {h00=0x002a, h01=0x0050, text=» LD A1,CRDBUF INCREMENT READ BUFFER DK«, t00=0x004f, t01=0x0028}
0x7ba8…7bc4               Head {h00=0x0018, h01=0x0050, text=» ADK A1,1 COUNTER DK«, t00=0x004f, t01=0x0056}
0x7bc4…7bde               Head {h00=0x0016, h01=0x0050, text=» ST A1,CRDBUF  DK «, t00=0x004f, t01=0x0072}
0x7bde…7bec               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x004f, t01=0x008c}
0x7bec…7c00               Head {h00=0x0010, h01=0x0050, text=» ABL POL127 «, t00=0x004f, t01=0x009a}
0x7c00…7c0c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x00ae}
0x7c0c…7c16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00ba}
0x7c16…7c20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00c4}
0x7c20…7c40               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x004f, t01=0x00ce}
0x7c40…7c4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00ee}
0x7c4a…7c54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00f8}
0x7c54…7c68               Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x004f, t01=0x0102}
0x7c68…7c92               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004f, t01=0x0116}
0x7c92…7ca6               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004f, t01=0x0140}
0x7ca6…7cd6               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM510 RETRANSMISSION OF MESSAGE«, t00=0x004f, t01=0x0154}
0x7cd6…7cea               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x004f, t01=0x0184}
0x7cea…7d10               Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x0050, t01=0x0008}
0x7d10…7d42               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x0050, t01=0x002e}
0x7d42…7d56               Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x0050, t01=0x0060}
0x7d56…7d66               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0050, t01=0x0074}
0x7d66…7d74               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0050, t01=0x0084}
0x7d74…7d7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0092}
0x7d7e…7d88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x009c}
0x7d88…7da8               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x0050, t01=0x00a6}
0x7da8…7db2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00c6}
0x7db2…7dbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00d0}
0x7dbc…7dd0               Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x0050, t01=0x00da}
0x7dd0…7dfa               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0050, t01=0x00ee}
0x7dfa…7e0e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0050, t01=0x0118}
0x7e0e…7e32               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x0050, t01=0x012c}
0x7e32…7e46               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0050, t01=0x0150}
0x7e46…7e6c               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x0050, t01=0x0164}
0x7e6c…7e7e               Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x0050, t01=0x018a}
0x7e7e…7e92               Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x0051, t01=0x000c}
0x7e92…7ea0               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x0051, t01=0x0020}
0x7ea0…7eb2               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0051, t01=0x002e}
0x7eb2…7ece               Head {h00=0x0018, h01=0x0050, text=» CIO A1,0,LCUIN  DK «, t00=0x0051, t01=0x0040}
0x7ece…7ee8               Head {h00=0x0016, h01=0x0050, text=» SST A1,LCUIN  DK «, t00=0x0051, t01=0x005c}
0x7ee8…7f02               Head {h00=0x0016, h01=0x0050, text=» CF A15,STREG  DK «, t00=0x0051, t01=0x0076}
0x7f02…7f1c               Head {h00=0x0016, h01=0x0050, text=» CF A15,SETIME  DK«, t00=0x0051, t01=0x0090}
0x7f1c…7f3c               Head {h00=0x001c, h01=0x0050, text=» DATA BRM520,TIMNAK  DK «, t00=0x0051, t01=0x00aa}
0x7f3c…7f52               Head {h00=0x0012, h01=0x0050, text=» ABL TDISP  DK«, t00=0x0051, t01=0x00ca}
0x7f52…7f6a               Head {h00=0x0014, h01=0x0050, text=»BRM520 EQU *  DK«, t00=0x0051, t01=0x00e0}
0x7f6a…7f84               Head {h00=0x0016, h01=0x0050, text=» CF A15,LDREG  DK «, t00=0x0051, t01=0x00f8}
0x7f84…7f92               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x0051, t01=0x0112}
0x7f92…7fb8               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0051, t01=0x0120}
0x7fb8…7fcc               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0051, t01=0x0146}
0x7fcc…7fe0               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0051, t01=0x015a}
0x7fe0…8014               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x0051, t01=0x016e}
0x8014…8020               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x0012}
0x8020…8054               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x0052, t01=0x001e}
0x8054…807e               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x0052, t01=0x0052}
0x807e…8092               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0052, t01=0x007c}
0x8092…80a6               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0052, t01=0x0090}
0x80a6…80b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00a4}
0x80b0…80ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00ae}
0x80ba…80da               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x0052, t01=0x00b8}
0x80da…80e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00d8}
0x80e4…80ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00e2}
0x80ee…8102               Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x0052, t01=0x00ec}
0x8102…812c               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0052, t01=0x0100}
0x812c…8140               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0052, t01=0x012a}
0x8140…8166               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 ACK NOT EXPECTED«, t00=0x0052, t01=0x013e}
0x8166…8190               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x0052, t01=0x0164}
0x8190…81a8               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0052, t01=0x018e}
0x81a8…81c0               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x0053, t01=0x0016}
0x81c0…81d2               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0053, t01=0x002e}
0x81d2…81ea               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0053, t01=0x0040}
0x81ea…8202               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0  =8«, t00=0x0053, t01=0x0058}
0x8202…8214               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0053, t01=0x0070}
0x8214…822a               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x0053, t01=0x0082}
0x822a…8234               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0098}
0x8234…824e               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x0053, t01=0x00a2}
0x824e…8258               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00bc}
0x8258…827a               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x0053, t01=0x00c6}
0x827a…829e               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0053, t01=0x00e8}
0x829e…82b2               Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0053, t01=0x010c}
0x82b2…82d0               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0053, t01=0x0120}
0x82d0…82fa               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0053, t01=0x013e}
0x82fa…830c               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0053, t01=0x0168}
0x830c…8320               Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0053, t01=0x017a}
0x8320…8334               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0053, t01=0x018e}
0x8334…834a               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0054, t01=0x0012}
0x834a…8354               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0028}
0x8354…836e               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0054, t01=0x0032}
0x836e…8378               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x004c}
0x8378…839c               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0054, t01=0x0056}
0x839c…83c4               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0054, t01=0x007a}
0x83c4…83d8               Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0054, t01=0x00a2}
0x83d8…83ec               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0054, t01=0x00b6}
0x83ec…840e               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0054, t01=0x00ca}
0x840e…841c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0054, t01=0x00ec}
0x841c…8426               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00fa}
0x8426…8456               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0054, t01=0x0104}
0x8456…8460               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0134}
0x8460…847a               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0054, t01=0x013e}
0x847a…848e               Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0054, t01=0x0158}
0x848e…84a2               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0054, t01=0x016c}
0x84a2…84b6               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x0054, t01=0x0180}
0x84b6…84e8 (85, 0, 400)  Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x0055, t01=0x0004}
0x84e8…84f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x0036}
0x84f4…8520               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0055, t01=0x0042}
0x8520…8534               Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x0055, t01=0x006e}
0x8534…8552               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0055, t01=0x0082}
0x8552…8566               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0055, t01=0x00a0}
0x8566…856e               Head {h00=0x0004, h01=0x0050, t00=0x0055, t01=0x00b4}
0x856e…8590               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0055, t01=0x00bc}
0x8590…859c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x00de}
0x859c…85ae               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0055, t01=0x00ea}
0x85ae…85c2               Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x0055, t01=0x00fc}
0x85c2…85d4               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0055, t01=0x0110}
0x85d4…85fe               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0055, t01=0x0122}
0x85fe…8612               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0055, t01=0x014c}
0x8612…8626               Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x0055, t01=0x0160}
0x8626…863e               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0055, t01=0x0174}
0x863e…8656               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x0055, t01=0x018c}
0x8656…8668               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0056, t01=0x0014}
0x8668…8680               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0056, t01=0x0026}
0x8680…8698               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI  =8 «, t00=0x0056, t01=0x003e}
0x8698…86aa               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0056, t01=0x0056}
0x86aa…86d6               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x0056, t01=0x0068}
0x86d6…86fc               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x0056, t01=0x0094}
0x86fc…8710               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0056, t01=0x00ba}
0x8710…8738               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x0056, t01=0x00ce}
0x8738…8752               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0056, t01=0x00f6}
0x8752…8764               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0056, t01=0x0110}
0x8764…8778               Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x0056, t01=0x0122}
0x8778…8792               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0056, t01=0x0136}
0x8792…87a4               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0056, t01=0x0150}
0x87a4…87b8               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0056, t01=0x0162}
0x87b8…87c6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0056, t01=0x0176}
0x87c6…87d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0184}
0x87d0…87da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x018e}
0x87da…8800               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x0057, t01=0x0008}
0x8800…880a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x002e}
0x880a…8814               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0038}
0x8814…8828               Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x0057, t01=0x0042}
0x8828…884e               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x0057, t01=0x0056}
0x884e…887e               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x0057, t01=0x007c}
0x887e…88a2               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x0057, t01=0x00ac}
0x88a2…88c8               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x0057, t01=0x00d0}
0x88c8…88ea               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0057, t01=0x00f6}
0x88ea…88fc               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0057, t01=0x0118}
0x88fc…8918               Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x0057, t01=0x012a}
0x8918…892e               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x0057, t01=0x0146}
0x892e…8954               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x0057, t01=0x015c}
0x8954…8966               Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x0057, t01=0x0182}
0x8966…8972 (88, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0004}
0x8972…8980               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0058, t01=0x0010}
0x8980…898a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x001e}
0x898a…8994               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0028}
0x8994…89b6               Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x0058, t01=0x0032}
0x89b6…89c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0054}
0x89c0…89ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x005e}
0x89ca…89de               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x0058, t01=0x0068}
0x89de…89f6               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x0058, t01=0x007c}
0x89f6…8a24               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) POL010 ERROR. ACK EXPECTED =5 «, t00=0x0058, t01=0x0094}
0x8a24…8a38               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0058, t01=0x00c2}
0x8a38…8a5a               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0058, t01=0x00d6}
0x8a5a…8a6c               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0058, t01=0x00f8}
0x8a6c…8a7e               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0058, t01=0x010a}
0x8a7e…8aa6               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x0058, t01=0x011c}
0x8aa6…8ac4               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x0058, t01=0x0144}
0x8ac4…8ad0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0162}
0x8ad0…8ae4               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0058, t01=0x016e}
0x8ae4…8af6               Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x0058, t01=0x0182}
0x8af6…8b02 (89, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x0004}
0x8b02…8b16               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x0059, t01=0x0010}
0x8b16…8b26               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0059, t01=0x0024}
0x8b26…8b3a               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x0059, t01=0x0034}
0x8b3a…8b54               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x0059, t01=0x0048}
0x8b54…8b66               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0059, t01=0x0062}
0x8b66…8b82               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x0059, t01=0x0074}
0x8b82…8b8e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x0090}
0x8b8e…8ba8               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x0059, t01=0x009c}
0x8ba8…8bba               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0059, t01=0x00b6}
0x8bba…8be0               Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x0059, t01=0x00c8}
0x8be0…8c04               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x0059, t01=0x00ee}
0x8c04…8c14               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0059, t01=0x0112}
0x8c14…8c28               Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x0059, t01=0x0122}
0x8c28…8c34               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x0136}
0x8c34…8c4a               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0059, t01=0x0142}
0x8c4a…8c72               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x0059, t01=0x0158}
0x8c72…8c86               Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x0059, t01=0x0180}
0x8c86…8ca0 (90, 0, 400)  Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x005a, t01=0x0004}
0x8ca0…8cc0               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x005a, t01=0x001e}
0x8cc0…8ccc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x003e}
0x8ccc…8cde               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005a, t01=0x004a}
0x8cde…8cf2               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x005a, t01=0x005c}
0x8cf2…8d22               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x005a, t01=0x0070}
0x8d22…8d42               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x005a, t01=0x00a0}
0x8d42…8d54               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005a, t01=0x00c0}
0x8d54…8d62               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005a, t01=0x00d2}
0x8d62…8d6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00e0}
0x8d6c…8d76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00ea}
0x8d76…8d9a               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x005a, t01=0x00f4}
0x8d9a…8da4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0118}
0x8da4…8dae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0122}
0x8dae…8dc2               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x005a, t01=0x012c}
0x8dc2…8de2               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x005a, t01=0x0140}
0x8de2…8e06               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005a, t01=0x0160}
0x8e06…8e1a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x005a, t01=0x0184}
0x8e1a…8e4c               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x005b, t01=0x0008}
0x8e4c…8e58               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x003a}
0x8e58…8e80               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x005b, t01=0x0046}
0x8e80…8e90               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x005b, t01=0x006e}
0x8e90…8eb6               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x005b, t01=0x007e}
0x8eb6…8ec6               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x005b, t01=0x00a4}
0x8ec6…8ed4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005b, t01=0x00b4}
0x8ed4…8ede               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00c2}
0x8ede…8ee8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00cc}
0x8ee8…8f10               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x005b, t01=0x00d6}
0x8f10…8f1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00fe}
0x8f1a…8f24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0108}
0x8f24…8f38               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x005b, t01=0x0112}
0x8f38…8f50               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005b, t01=0x0126}
0x8f50…8f7a               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL020 ACK NOT EXPECTED =5 «, t00=0x005b, t01=0x013e}
0x8f7a…8fa0               Head {h00=0x0022, h01=0x0050, text=»POL010 CF A5,TRENQ SEND ENQ =5«, t00=0x005b, t01=0x0168}
0x8fa0…8fce               Head {h00=0x002a, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER =5 «, t00=0x005b, t01=0x018e}
0x8fce…8ff4               Head {h00=0x0022, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE =5 «, t00=0x005c, t01=0x002c}
0x8ff4…900c               Head {h00=0x0014, h01=0x0050, text=»POL020 EQU *  =5«, t00=0x005c, t01=0x0052}
0x900c…9032               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x005c, t01=0x006a}
0x9032…9046               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005c, t01=0x0090}
0x9046…905c               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x005c, t01=0x00a4}
0x905c…9086               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x005c, t01=0x00ba}
0x9086…90ac               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x005c, t01=0x00e4}
0x90ac…90c0               Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x005c, t01=0x010a}
0x90c0…90e0               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x005c, t01=0x011e}
0x90e0…910a               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005c, t01=0x013e}
0x910a…912e               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005c, t01=0x0168}
0x912e…913a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x018c}
0x913a…914e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005d, t01=0x0008}
0x914e…9160               Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x005d, t01=0x001c}
0x9160…916c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x002e}
0x916c…9180               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x005d, t01=0x003a}
0x9180…9190               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005d, t01=0x004e}
0x9190…91a4               Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x005d, t01=0x005e}
0x91a4…91b8               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x005d, t01=0x0072}
0x91b8…91de               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x005d, t01=0x0086}
0x91de…91f2               Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x005d, t01=0x00ac}
0x91f2…9210               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x005d, t01=0x00c0}
0x9210…9222               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005d, t01=0x00de}
0x9222…9236               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x005d, t01=0x00f0}
0x9236…925c               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x005d, t01=0x0104}
0x925c…9270               Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x005d, t01=0x012a}
0x9270…9298               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x005d, t01=0x013e}
0x9298…92ae               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x005d, t01=0x0166}
0x92ae…92c4               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x005d, t01=0x017c}
0x92c4…92d6 (94, 0, 398)  Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x005e, t01=0x0004}
0x92d6…92ea               Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x005e, t01=0x0016}
0x92ea…930e               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x005e, t01=0x002a}
0x930e…932c               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x005e, t01=0x004e}
0x932c…9334               Head {h00=0x0004, h01=0x0050, t00=0x005e, t01=0x006c}
0x9334…934a               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x005e, t01=0x0074}
0x934a…9372               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,MMUBUF MMU WORK BUFFER «, t00=0x005e, t01=0x008a}
0x9372…938a               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x005e, t01=0x00b2}
0x938a…93bc               Head {h00=0x002e, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA FROM USER BUFFER «, t00=0x005e, t01=0x00ca}
0x93bc…93c8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x00fc}
0x93c8…93f2               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x005e, t01=0x0108}
0x93f2…9414               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x005e, t01=0x0132}
0x9414…9428               Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x005e, t01=0x0154}
0x9428…9452               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x005e, t01=0x0168}
0x9452…947e (95, 0, 398)  Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x005f, t01=0x0004}
0x947e…94a0               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x005f, t01=0x0030}
0x94a0…94c4               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005f, t01=0x0052}
0x94c4…94d8               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x005f, t01=0x0076}
0x94d8…94fa               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x005f, t01=0x008a}
0x94fa…950a               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x005f, t01=0x00ac}
0x950a…952e               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x005f, t01=0x00bc}
0x952e…9558               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005f, t01=0x00e0}
0x9558…957c               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005f, t01=0x010a}
0x957c…958e               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005f, t01=0x012e}
0x958e…959c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x0140}
0x959c…95a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x014e}
0x95a6…95b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0158}
0x95b0…95da               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x005f, t01=0x0162}
0x95da…95e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x018c}
0x95e4…95ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0008}
0x95ee…9602               Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x0060, t01=0x0012}
0x9602…961c               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0060, t01=0x0026}
0x961c…9634               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x0060, t01=0x0040}
0x9634…965a               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL010 ACK EXPECTED =5«, t00=0x0060, t01=0x0058}
0x965a…9674               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x0060, t01=0x007e}
0x9674…9698               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x0060, t01=0x0098}
0x9698…96b6               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x0060, t01=0x00bc}
0x96b6…96ca               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0060, t01=0x00da}
0x96ca…96ec               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0060, t01=0x00ee}
0x96ec…96fe               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x0060, t01=0x0110}
0x96fe…9724               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x0060, t01=0x0122}
0x9724…9730               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0060, t01=0x0148}
0x9730…974a               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0060, t01=0x0154}
0x974a…9762               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0060, t01=0x016e}
0x9762…9782               Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x0060, t01=0x0186}
0x9782…97a4               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x0061, t01=0x0016}
0x97a4…97b6               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x0061, t01=0x0038}
0x97b6…97da               Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x0061, t01=0x004a}
0x97da…97ec               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0061, t01=0x006e}
0x97ec…9812               Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x0061, t01=0x0080}
0x9812…981e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x00a6}
0x981e…983a               Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x0061, t01=0x00b2}
0x983a…9848               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0061, t01=0x00ce}
0x9848…9852               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00dc}
0x9852…985c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00e6}
0x985c…9898               Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x0061, t01=0x00f0}
0x9898…98a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x012c}
0x98a2…98c4               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x0061, t01=0x0136}
0x98c4…98ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0158}
0x98ce…98d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0162}
0x98d8…98f4               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x0061, t01=0x016c}
0x98f4…991c               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x0061, t01=0x0188}
0x991c…9934               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0062, t01=0x0020}
0x9934…9954               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x0062, t01=0x0038}
0x9954…9976               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0062, t01=0x0058}
0x9976…9988               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0062, t01=0x007a}
0x9988…99ac               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x0062, t01=0x008c}
0x99ac…99be               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0062, t01=0x00b0}
0x99be…99ea               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x0062, t01=0x00c2}
0x99ea…99fc               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0062, t01=0x00ee}
0x99fc…9a32               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x0062, t01=0x0100}
0x9a32…9a52               Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x0062, t01=0x0136}
0x9a52…9a7e               Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x0062, t01=0x0156}
0x9a7e…9a90               Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x0062, t01=0x0182}
0x9a90…9aba (99, 0, 400)  Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x0063, t01=0x0004}
0x9aba…9adc               Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x0063, t01=0x002e}
0x9adc…9aee               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0063, t01=0x0050}
0x9aee…9b04               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x0063, t01=0x0062}
0x9b04…9b1c               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0063, t01=0x0078}
0x9b1c…9b44               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0063, t01=0x0090}
0x9b44…9b58               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x0063, t01=0x00b8}
0x9b58…9b86               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0063, t01=0x00cc}
0x9b86…9b9a               Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x0063, t01=0x00fa}
0x9b9a…9bae               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x0063, t01=0x010e}
0x9bae…9bd4               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0063, t01=0x0122}
0x9bd4…9be6               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0063, t01=0x0148}
0x9be6…9bf6               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0063, t01=0x015a}
0x9bf6…9c04               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x016a}
0x9c04…9c0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0178}
0x9c0e…9c18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0182}
0x9c18…9c36               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x0063, t01=0x018c}
0x9c36…9c40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x001a}
0x9c40…9c60               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x0064, t01=0x0024}
0x9c60…9c8c               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x0064, t01=0x0044}
0x9c8c…9cc2               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x0064, t01=0x0070}
0x9cc2…9cee               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x0064, t01=0x00a6}
0x9cee…9cf8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x00d2}
0x9cf8…9d0c               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x0064, t01=0x00dc}
0x9d0c…9d34               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0064, t01=0x00f0}
0x9d34…9d54               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x0064, t01=0x0118}
0x9d54…9d66               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0064, t01=0x0138}
0x9d66…9d7a               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0064, t01=0x014a}
0x9d7a…9da2               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x0064, t01=0x015e}
0x9da2…9dc8               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x0064, t01=0x0186}
0x9dc8…9dda               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x0065, t01=0x001c}
0x9dda…9dee               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0065, t01=0x002e}
0x9dee…9e02               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x0065, t01=0x0042}
0x9e02…9e26               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0065, t01=0x0056}
0x9e26…9e52               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0065, t01=0x007a}
0x9e52…9e66               Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x0065, t01=0x00a6}
0x9e66…9e76               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0065, t01=0x00ba}
0x9e76…9e92               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0065, t01=0x00ca}
0x9e92…9e9a               Head {h00=0x0004, h01=0x0050, t00=0x0065, t01=0x00e6}
0x9e9a…9eb0               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0065, t01=0x00ee}
0x9eb0…9ec4               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0065, t01=0x0104}
0x9ec4…9eea               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x0065, t01=0x0118}
0x9eea…9efe               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0065, t01=0x013e}
0x9efe…9f22               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0065, t01=0x0152}
0x9f22…9f36               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x0065, t01=0x0176}
0x9f36…9f4c               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x0065, t01=0x018a}
0x9f4c…9f7a               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x0066, t01=0x0010}
0x9f7a…9f8e               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0066, t01=0x003e}
0x9f8e…9f9a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x0052}
0x9f9a…9fae               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x0066, t01=0x005e}
0x9fae…9fd6               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0066, t01=0x0072}
0x9fd6…9ffa               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0066, t01=0x009a}
0x9ffa…a00e               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x0066, t01=0x00be}
0xa00e…a022               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x0066, t01=0x00d2}
0xa022…a044               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x0066, t01=0x00e6}
0xa044…a058               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x0066, t01=0x0108}
0xa058…a07a               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x0066, t01=0x011c}
0xa07a…a08e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x0066, t01=0x013e}
0xa08e…a0b0               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x0066, t01=0x0152}
0xa0b0…a0c4               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x0066, t01=0x0174}
0xa0c4…a0fa               Head {h00=0x0032, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE «, t00=0x0066, t01=0x0188}
0xa0fa…a10e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0067, t01=0x002e}
0xa10e…a136               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x0067, t01=0x0042}
0xa136…a13e               Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x006a}
0xa13e…a152               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0067, t01=0x0072}
0xa152…a168               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x0067, t01=0x0086}
0xa168…a170               Head {h00=0x0004, h01=0x0050, t00=0x0067, t01=0x009c}
0xa170…a182               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0067, t01=0x00a4}
0xa182…a198               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x0067, t01=0x00b6}
0xa198…a1ba               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x0067, t01=0x00cc}
0xa1ba…a1cc               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x0067, t01=0x00ee}
0xa1cc…a1ee               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x0067, t01=0x0100}
0xa1ee…a200               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x0067, t01=0x0122}
0xa200…a212               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0067, t01=0x0134}
0xa212…a240               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x0067, t01=0x0146}
0xa240…a264               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0067, t01=0x0174}
0xa264…a292               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x0068, t01=0x0008}
0xa292…a2a4               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x0068, t01=0x0036}
0xa2a4…a2b8               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x0068, t01=0x0048}
0xa2b8…a2c4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0068, t01=0x005c}
0xa2c4…a2cc               Head {h00=0x0004, h01=0x0050, t00=0x0068, t01=0x0068}
0xa2cc…a2ee               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x0068, t01=0x0070}
0xa2ee…a312               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0068, t01=0x0092}
0xa312…a33a               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x0068, t01=0x00b6}
0xa33a…a34e               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0068, t01=0x00de}
0xa34e…a36a               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x0068, t01=0x00f2}
0xa36a…a38e               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x0068, t01=0x010e}
0xa38e…a398               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0132}
0xa398…a3b2               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x0068, t01=0x013c}
0xa3b2…a3bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0156}
0xa3bc…a3da               Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x0068, t01=0x0160}
0xa3da…a3ee               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x0068, t01=0x017e}
0xa3ee…a418 (105, 0, 400) Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x0069, t01=0x0004}
0xa418…a42c               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0069, t01=0x002e}
0xa42c…a454               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x0069, t01=0x0042}
0xa454…a466               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0069, t01=0x006a}
0xa466…a470               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x007c}
0xa470…a486               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x0069, t01=0x0086}
0xa486…a490               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x009c}
0xa490…a4a4               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x0069, t01=0x00a6}
0xa4a4…a4cc               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x0069, t01=0x00ba}
0xa4cc…a4f0               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x0069, t01=0x00e2}
0xa4f0…a526               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x0069, t01=0x0106}
0xa526…a53a               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0069, t01=0x013c}
0xa53a…a54e               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0069, t01=0x0150}
0xa54e…a56e               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x0069, t01=0x0164}
0xa56e…a57a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0069, t01=0x0184}
0xa57a…a58e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0069, t01=0x0190}
0xa58e…a5b8               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006a, t01=0x0014}
0xa5b8…a5d8               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x006a, t01=0x003e}
0xa5d8…a5e4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006a, t01=0x005e}
0xa5e4…a5f8               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x006a, t01=0x006a}
0xa5f8…a622               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006a, t01=0x007e}
0xa622…a636               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x006a, t01=0x00a8}
0xa636…a65e               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x006a, t01=0x00bc}
0xa65e…a67e               Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x006a, t01=0x00e4}
0xa67e…a692               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x006a, t01=0x0104}
0xa692…a6b8               Head {h00=0x0022, h01=0x0050, text=» ORR A7,A1 PARITY ERROR SALCUZ«, t00=0x006a, t01=0x0118}
0xa6b8…a6ce               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x006a, t01=0x013e}
0xa6ce…a6de               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006a, t01=0x0154}
0xa6de…a6e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0164}
0xa6e8…a6fe               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x006a, t01=0x016e}
0xa6fe…a708               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0184}
0xa708…a71c               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x006a, t01=0x018e}
0xa71c…a72e               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x006b, t01=0x0012}
0xa72e…a754               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x006b, t01=0x0024}
0xa754…a77a               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x006b, t01=0x004a}
0xa77a…a78c               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x006b, t01=0x0070}
0xa78c…a796               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0082}
0xa796…a7ac               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x006b, t01=0x008c}
0xa7ac…a7b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00a2}
0xa7b6…a7ca               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x006b, t01=0x00ac}
0xa7ca…a7de               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006b, t01=0x00c0}
0xa7de…a7f2               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006b, t01=0x00d4}
0xa7f2…a818               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x006b, t01=0x00e8}
0xa818…a824               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x010e}
0xa824…a838               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006b, t01=0x011a}
0xa838…a862               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006b, t01=0x012e}
0xa862…a888               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x006b, t01=0x0158}
0xa888…a894               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x017e}
0xa894…a8a6               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006b, t01=0x018a}
0xa8a6…a8b4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006c, t01=0x000c}
0xa8b4…a8be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x001a}
0xa8be…a8dc               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x006c, t01=0x0024}
0xa8dc…a8e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0042}
0xa8e6…a8fc               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x006c, t01=0x004c}
0xa8fc…a91e               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x006c, t01=0x0062}
0xa91e…a948               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x006c, t01=0x0084}
0xa948…a95e               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x006c, t01=0x00ae}
0xa95e…a97c               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x006c, t01=0x00c4}
0xa97c…a98e               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006c, t01=0x00e2}
0xa98e…a998               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00f4}
0xa998…a9b0               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x006c, t01=0x00fe}
0xa9b0…a9ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0116}
0xa9ba…a9de               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x006c, t01=0x0120}
0xa9de…a9f0               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006c, t01=0x0144}
0xa9f0…a9fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0156}
0xa9fa…aa10               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x006c, t01=0x0160}
0xaa10…aa1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0176}
0xaa1a…aa2e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x006c, t01=0x0180}
0xaa2e…aa50 (109, 0, 400) Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x006d, t01=0x0004}
0xaa50…aa5c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x0026}
0xaa5c…aa66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0032}
0xaa66…aa7c               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x006d, t01=0x003c}
0xaa7c…aa86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0052}
0xaa86…aaa8               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x006d, t01=0x005c}
0xaaa8…aace               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x006d, t01=0x007e}
0xaace…aae6               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x006d, t01=0x00a4}
0xaae6…aaf8               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x006d, t01=0x00bc}
0xaaf8…ab06               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006d, t01=0x00ce}
0xab06…ab10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00dc}
0xab10…ab26               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x006d, t01=0x00e6}
0xab26…ab30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00fc}
0xab30…ab52               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x006d, t01=0x0106}
0xab52…ab64               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x006d, t01=0x0128}
0xab64…ab6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x013a}
0xab6e…ab84               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x006d, t01=0x0144}
0xab84…ab8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x015a}
0xab8e…abb0               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x006d, t01=0x0164}
0xabb0…abc2               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x006d, t01=0x0186}
0xabc2…abcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0008}
0xabcc…abe2               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x006e, t01=0x0012}
0xabe2…abec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0028}
0xabec…ac0e               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x006e, t01=0x0032}
0xac0e…ac18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0054}
0xac18…ac44               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x006e, t01=0x005e}
0xac44…ac58               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x006e, t01=0x008a}
0xac58…ac70               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x006e, t01=0x009e}
0xac70…ac98               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x006e, t01=0x00b6}
0xac98…acc2               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x006e, t01=0x00de}
0xacc2…ace0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x006e, t01=0x0108}
0xace0…ad0a               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x006e, t01=0x0126}
0xad0a…ad28               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x006e, t01=0x0150}
0xad28…ad42               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x006e, t01=0x016e}
0xad42…ad60               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x006e, t01=0x0188}
0xad60…ad74               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x006f, t01=0x0016}
0xad74…ad8a               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x006f, t01=0x002a}
0xad8a…ada4               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x006f, t01=0x0040}
0xada4…adcc               Head {h00=0x0024, h01=0x0050, text=» CIO A2,0,LCUUT STOP TRANSMITTER«, t00=0x006f, t01=0x005a}
0xadcc…ade8               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x006f, t01=0x0082}
0xade8…ae10               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ WAIT FOR END SALCUZ «, t00=0x006f, t01=0x009e}
0xae10…ae26               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x006f, t01=0x00c6}
0xae26…ae50               Head {h00=0x0026, h01=0x0050, text=» SST A2,LCUUT PERFORM SST AT ONCE «, t00=0x006f, t01=0x00dc}
0xae50…ae64               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x006f, t01=0x0106}
0xae64…ae90               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x006f, t01=0x011a}
0xae90…ae9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x0146}
0xae9c…aeac               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006f, t01=0x0152}
0xaeac…aeba               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006f, t01=0x0162}
0xaeba…aec4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0170}
0xaec4…aece               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x017a}
0xaece…aef0               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x006f, t01=0x0184}
0xaef0…aefa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0016}
0xaefa…af04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0020}
0xaf04…af18               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x0070, t01=0x002a}
0xaf18…af3a               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0070, t01=0x003e}
0xaf3a…af50               Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x0070, t01=0x0060}
0xaf50…af5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0076}
0xaf5a…af64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0080}
0xaf64…af84               Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x0070, t01=0x008a}
0xaf84…af8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x00aa}
0xaf8e…af98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x00b4}
0xaf98…afac               Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x0070, t01=0x00be}
0xafac…afd8               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x0070, t01=0x00d2}
0xafd8…afe0               Head {h00=0x0004, h01=0x0050, t00=0x0070, t01=0x00fe}
0xafe0…b016               Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x0070, t01=0x0106}
0xb016…b034               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x0070, t01=0x013c}
0xb034…b03c               Head {h00=0x0004, h01=0x0050, t00=0x0070, t01=0x015a}
0xb03c…b052               Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x0070, t01=0x0162}
0xb052…b078               Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x0070, t01=0x0178}
0xb078…b08c               Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x0071, t01=0x000e}
0xb08c…b0b4               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x0071, t01=0x0022}
0xb0b4…b0c8               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0071, t01=0x004a}
0xb0c8…b0e6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0071, t01=0x005e}
0xb0e6…b102               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x0071, t01=0x007c}
0xb102…b116               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0071, t01=0x0098}
0xb116…b132               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x0071, t01=0x00ac}
0xb132…b146               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x0071, t01=0x00c8}
0xb146…b162               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x0071, t01=0x00dc}
0xb162…b176               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0071, t01=0x00f8}
0xb176…b194               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0071, t01=0x010c}
0xb194…b1c0               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0071, t01=0x012a}
0xb1c0…b1ec               Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x0071, t01=0x0156}
0xb1ec…b20c               Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x0071, t01=0x0182}
0xb20c…b21e               Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x0072, t01=0x0012}
0xb21e…b232               Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x0072, t01=0x0024}
0xb232…b244               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0072, t01=0x0038}
0xb244…b258               Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x0072, t01=0x004a}
0xb258…b262               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x005e}
0xb262…b26c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0068}
0xb26c…b276               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0072}
0xb276…b282               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x007c}
0xb282…b296               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0072, t01=0x0088}
0xb296…b2b4               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0072, t01=0x009c}
0xb2b4…b2d0               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0072, t01=0x00ba}
0xb2d0…b2f8               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0072, t01=0x00d6}
0xb2f8…b31c               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0072, t01=0x00fe}
0xb31c…b348               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0072, t01=0x0122}
0xb348…b374               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x0072, t01=0x014e}
0xb374…b39e               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x0072, t01=0x017a}
0xb39e…b3c2               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x0073, t01=0x0014}
0xb3c2…b3e8               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x0073, t01=0x0038}
0xb3e8…b408               Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x0073, t01=0x005e}
0xb408…b426               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0073, t01=0x007e}
0xb426…b442               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0073, t01=0x009c}
0xb442…b460               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0073, t01=0x00b8}
0xb460…b476               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0073, t01=0x00d6}
0xb476…b48a               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x0073, t01=0x00ec}
0xb48a…b4b0               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x0073, t01=0x0100}
0xb4b0…b4c6               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0073, t01=0x0126}
0xb4c6…b4ec               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x0073, t01=0x013c}
0xb4ec…b502               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0073, t01=0x0162}
0xb502…b516               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x0073, t01=0x0178}
0xb516…b52c               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0073, t01=0x018c}
0xb52c…b538               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x0012}
0xb538…b54c               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0074, t01=0x001e}
0xb54c…b554               Head {h00=0x0004, h01=0x0050, t00=0x0074, t01=0x0032}
0xb554…b57e               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0074, t01=0x003a}
0xb57e…b598               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x0074, t01=0x0064}
0xb598…b5a0               Head {h00=0x0004, h01=0x0050, t00=0x0074, t01=0x007e}
0xb5a0…b5c0               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x0074, t01=0x0086}
0xb5c0…b5e6               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x0074, t01=0x00a6}
0xb5e6…b60a               Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x0074, t01=0x00cc}
0xb60a…b612               Head {h00=0x0004, h01=0x0050, t00=0x0074, t01=0x00f0}
0xb612…b63a               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x0074, t01=0x00f8}
0xb63a…b66c               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x0074, t01=0x0120}
0xb66c…b68e               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x0074, t01=0x0152}
0xb68e…b6a0               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0074, t01=0x0174}
0xb6a0…b6b4               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x0074, t01=0x0186}
0xb6b4…b6c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x000a}
0xb6c0…b6c8               Head {h00=0x0004, h01=0x0050, t00=0x0075, t01=0x0016}
0xb6c8…b6da               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0075, t01=0x001e}
0xb6da…b6ee               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x0075, t01=0x0030}
0xb6ee…b712               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x0075, t01=0x0044}
0xb712…b736               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0075, t01=0x0068}
0xb736…b74a               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0075, t01=0x008c}
0xb74a…b75e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0075, t01=0x00a0}
0xb75e…b788               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0075, t01=0x00b4}
0xb788…b7a2               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x0075, t01=0x00de}
0xb7a2…b7aa               Head {h00=0x0004, h01=0x0050, t00=0x0075, t01=0x00f8}
0xb7aa…b7ee               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0075, t01=0x0100}
0xb7ee…b7f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0144}
0xb7f8…b828               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x0075, t01=0x014e}
0xb828…b832               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x017e}
0xb832…b86a               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0075, t01=0x0188}
0xb86a…b872               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x0030}
0xb872…b89c               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x0076, t01=0x0038}
0xb89c…b8b8               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x0076, t01=0x0062}
0xb8b8…b8c4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x007e}
0xb8c4…b8d8               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x0076, t01=0x008a}
0xb8d8…b8f8               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x0076, t01=0x009e}
0xb8f8…b91e               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x0076, t01=0x00be}
0xb91e…b932               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x0076, t01=0x00e4}
0xb932…b946               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x0076, t01=0x00f8}
0xb946…b96a               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x0076, t01=0x010c}
0xb96a…b990               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x0076, t01=0x0130}
0xb990…b9a4               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x0076, t01=0x0156}
0xb9a4…b9b8               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x0076, t01=0x016a}
0xb9b8…b9d6               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x0076, t01=0x017e}
0xb9d6…b9ec               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x0077, t01=0x000c}
0xb9ec…b9fe               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0077, t01=0x0022}
0xb9fe…ba0a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x0034}
0xba0a…ba1e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0077, t01=0x0040}
0xba1e…ba30               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x0077, t01=0x0054}
0xba30…ba38               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x0066}
0xba38…ba4c               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x0077, t01=0x006e}
0xba4c…ba54               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x0082}
0xba54…ba66               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x0077, t01=0x008a}
0xba66…ba8c               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x0077, t01=0x009c}
0xba8c…ba94               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x00c2}
0xba94…bac0               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x0077, t01=0x00ca}
0xbac0…bad6               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x0077, t01=0x00f6}
0xbad6…bb02               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x0077, t01=0x010c}
0xbb02…bb14               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0077, t01=0x0138}
0xbb14…bb2c               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x0077, t01=0x014a}
0xbb2c…bb3e               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0077, t01=0x0162}
0xbb3e…bb68               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x0077, t01=0x0174}
0xbb68…bb8e               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x0078, t01=0x000e}
0xbb8e…bba6               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x0078, t01=0x0034}
0xbba6…bbd0               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x0078, t01=0x004c}
0xbbd0…bbe6               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x0078, t01=0x0076}
0xbbe6…bbfa               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x0078, t01=0x008c}
0xbbfa…bc0e               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x0078, t01=0x00a0}
0xbc0e…bc32               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x0078, t01=0x00b4}
0xbc32…bc44               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0078, t01=0x00d8}
0xbc44…bc56               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x0078, t01=0x00ea}
0xbc56…bc6a               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x0078, t01=0x00fc}
0xbc6a…bc76               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x0110}
0xbc76…bc84               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0078, t01=0x011c}
0xbc84…bc98               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x0078, t01=0x012a}
0xbc98…bcc4               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x0078, t01=0x013e}
0xbcc4…bce8               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x0078, t01=0x016a}
0xbce8…bcfc               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x0078, t01=0x018e}
0xbcfc…bd24               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x0079, t01=0x0012}
0xbd24…bd4e               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x0079, t01=0x003a}
0xbd4e…bd62               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x0079, t01=0x0064}
0xbd62…bd88               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x0079, t01=0x0078}
0xbd88…bdb6               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x0079, t01=0x009e}
0xbdb6…bdcc               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x0079, t01=0x00cc}
0xbdcc…bdf0               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x0079, t01=0x00e2}
0xbdf0…be04               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0079, t01=0x0106}
0xbe04…be34               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x0079, t01=0x011a}
0xbe34…be48               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x0079, t01=0x014a}
0xbe48…be62               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x0079, t01=0x015e}
0xbe62…be76               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x0079, t01=0x0178}
0xbe76…be98               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x0079, t01=0x018c}
0xbe98…bec4               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x007a, t01=0x001e}
0xbec4…bee6               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x007a, t01=0x004a}
0xbee6…bf04               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007a, t01=0x006c}
0xbf04…bf24               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007a, t01=0x008a}
0xbf24…bf56               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x007a, t01=0x00aa}
0xbf56…bf74               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007a, t01=0x00dc}
0xbf74…bf94               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007a, t01=0x00fa}
0xbf94…bfa0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x011a}
0xbfa0…bfb4               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x007a, t01=0x0126}
0xbfb4…bfd0               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x007a, t01=0x013a}
0xbfd0…bfe4               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x007a, t01=0x0156}
0xbfe4…c002               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007a, t01=0x016a}
0xc002…c016               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x007a, t01=0x0188}
0xc016…c030               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x007b, t01=0x000c}
0xc030…c04e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x007b, t01=0x0026}
0xc04e…c05a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007b, t01=0x0044}
0xc05a…c06e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x007b, t01=0x0050}
0xc06e…c092               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x007b, t01=0x0064}
0xc092…c0a4               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x007b, t01=0x0088}
0xc0a4…c0b8               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007b, t01=0x009a}
0xc0b8…c0de               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x007b, t01=0x00ae}
0xc0de…c0f0               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x007b, t01=0x00d4}
0xc0f0…c104               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007b, t01=0x00e6}
0xc104…c12a               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x007b, t01=0x00fa}
0xc12a…c136               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007b, t01=0x0120}
0xc136…c156               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x007b, t01=0x012c}
0xc156…c16a               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x007b, t01=0x014c}
0xc16a…c18e               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x007b, t01=0x0160}
0xc18e…c1a2               Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x007b, t01=0x0184}
0xc1a2…c1be               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x007c, t01=0x0008}
0xc1be…c1e2               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x007c, t01=0x0024}
0xc1e2…c1f0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007c, t01=0x0048}
0xc1f0…c1fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0056}
0xc1fa…c204               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0060}
0xc204…c226               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x007c, t01=0x006a}
0xc226…c230               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x008c}
0xc230…c23a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0096}
0xc23a…c24e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x007c, t01=0x00a0}
0xc24e…c262               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x007c, t01=0x00b4}
0xc262…c28a               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x007c, t01=0x00c8}
0xc28a…c2a8               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x007c, t01=0x00f0}
0xc2a8…c2ca               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x007c, t01=0x010e}
0xc2ca…c2de               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x007c, t01=0x0130}
0xc2de…c2fc               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x007c, t01=0x0144}
0xc2fc…c316               Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x007c, t01=0x0162}
0xc316…c32a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x007c, t01=0x017c}
0xc32a…c348               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x007c, t01=0x0190}
0xc348…c35c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x007d, t01=0x001e}
0xc35c…c37a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x007d, t01=0x0032}
0xc37a…c38e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x007d, t01=0x0050}
0xc38e…c3ac               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x007d, t01=0x0064}
0xc3ac…c3c4               Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x007d, t01=0x0082}
0xc3c4…c3e2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x007d, t01=0x009a}
0xc3e2…c3f6               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x007d, t01=0x00b8}
0xc3f6…c414               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x007d, t01=0x00cc}
0xc414…c436               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x007d, t01=0x00ea}
0xc436…c458               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x007d, t01=0x010c}
0xc458…c46a               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x007d, t01=0x012e}
0xc46a…c492               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x007d, t01=0x0140}
0xc492…c4b2               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x007d, t01=0x0168}
0xc4b2…c4d4               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x007d, t01=0x0188}
0xc4d4…c4f6               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x007e, t01=0x001a}
0xc4f6…c508               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x007e, t01=0x003c}
0xc508…c526               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x007e, t01=0x004e}
0xc526…c538               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x007e, t01=0x006c}
0xc538…c55a               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x007e, t01=0x007e}
0xc55a…c56c               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x007e, t01=0x00a0}
0xc56c…c580               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x007e, t01=0x00b2}
0xc580…c5a0               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x007e, t01=0x00c6}
0xc5a0…c5c4               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x007e, t01=0x00e6}
0xc5c4…c5d0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x010a}
0xc5d0…c5de               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007e, t01=0x0116}
0xc5de…c5e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0124}
0xc5e8…c5f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x012e}
0xc5f2…c612               Head {h00=0x001c, h01=0x0050, text=»* TRANSMIT SYNC SEQUENCE«, t00=0x007e, t01=0x0138}
0xc612…c61c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0158}
0xc61c…c626               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0162}
0xc626…c63a               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x007e, t01=0x016c}
0xc63a…c654               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x007e, t01=0x0180}
0xc654…c682               Head {h00=0x002a, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT IF NOT DONE«, t00=0x007f, t01=0x000a}
0xc682…c6a4               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN PERFORM SST «, t00=0x007f, t01=0x0038}
0xc6a4…c6c0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x007f, t01=0x005a}
0xc6c0…c6ea               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x007f, t01=0x0076}
0xc6ea…c700               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007f, t01=0x00a0}
0xc700…c71c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x007f, t01=0x00b6}
0xc71c…c738               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=1  SALCUZ «, t00=0x007f, t01=0x00d2}
0xc738…c752               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x007f, t01=0x00ee}
0xc752…c782               Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER SALCUZ«, t00=0x007f, t01=0x0108}
0xc782…c7a0               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x007f, t01=0x0138}
0xc7a0…c7be               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x007f, t01=0x0156}
0xc7be…c7dc               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x007f, t01=0x0174}
0xc7dc…c7f4 (128, 0, 398) Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0080, t01=0x0004}
0xc7f4…c81a               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0080, t01=0x001c}
0xc81a…c836               Head {h00=0x0018, h01=0x0050, text=»TRS010 EQU *  SALCUZ«, t00=0x0080, t01=0x0042}
0xc836…c854               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x0080, t01=0x005e}
0xc854…c88a               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0080, t01=0x007c}
0xc88a…c8a0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0080, t01=0x00b2}
0xc8a0…c8bc               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0080, t01=0x00c8}
0xc8bc…c8d8               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=0  SALCUZ «, t00=0x0080, t01=0x00e4}
0xc8d8…c8f4               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x0080, t01=0x0100}
0xc8f4…c914               Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,LCUUT  SALCUZ «, t00=0x0080, t01=0x011c}
0xc914…c932               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x0080, t01=0x013c}
0xc932…c950               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x0080, t01=0x015a}
0xc950…c96e               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x0080, t01=0x0178}
0xc96e…c986               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x0081, t01=0x0008}
0xc986…c9ac               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x0081, t01=0x0020}
0xc9ac…c9c0               Head {h00=0x0010, h01=0x0050, text=»TRS010 EQU *«, t00=0x0081, t01=0x0046}
0xc9c0…c9dc               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x0081, t01=0x005a}
0xc9dc…ca12               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x0081, t01=0x0076}
0xca12…ca28               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0081, t01=0x00ac}
0xca28…ca56               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x0081, t01=0x00c2}
0xca56…ca6e               Head {h00=0x0014, h01=0x0050, text=» LDK A3,4 4 SYNS«, t00=0x0081, t01=0x00f0}
0xca6e…ca88               Head {h00=0x0016, h01=0x0050, text=»TRS100 LDK A2,SYN «, t00=0x0081, t01=0x0108}
0xca88…caa6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SYN «, t00=0x0081, t01=0x0122}
0xcaa6…cab8               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0081, t01=0x0140}
0xcab8…cace               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x0081, t01=0x0152}
0xcace…cade               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0081, t01=0x0168}
0xcade…caec               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0081, t01=0x0178}
0xcaec…caf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0186}
0xcaf6…cb00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0190}
0xcb00…cb1e               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x0082, t01=0x000a}
0xcb1e…cb28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0028}
0xcb28…cb32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0032}
0xcb32…cb46               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x0082, t01=0x003c}
0xcb46…cb5a               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0082, t01=0x0050}
0xcb5a…cb70               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0082, t01=0x0064}
0xcb70…cb90               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0082, t01=0x007a}
0xcb90…cb9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x009a}
0xcb9c…cba4               Head {h00=0x0004, h01=0x0050, t00=0x0082, t01=0x00a6}
0xcba4…cbba               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0082, t01=0x00ae}
0xcbba…cbda               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0082, t01=0x00c4}
0xcbda…cbe6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x00e4}
0xcbe6…cc14               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0082, t01=0x00f0}
0xcc14…cc36               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x0082, t01=0x011e}
0xcc36…cc66               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x0082, t01=0x0140}
0xcc66…cc7a               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0082, t01=0x0170}
0xcc7a…cca6               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x0082, t01=0x0184}
0xcca6…ccb2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x0020}
0xccb2…ccc6               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0083, t01=0x002c}
0xccc6…ccd8               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0083, t01=0x0040}
0xccd8…ccee               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHLCI2«, t00=0x0083, t01=0x0052}
0xccee…cd0c               Head {h00=0x001a, h01=0x0050, text=» CWK A2,SYN SKIP SYNS «, t00=0x0083, t01=0x0068}
0xcd0c…cd20               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x0083, t01=0x0086}
0xcd20…cd46               Head {h00=0x0022, h01=0x0050, text=»IHLCI2 XRR A7,A2 CALCULATE LRC«, t00=0x0083, t01=0x009a}
0xcd46…cd52               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x00c0}
0xcd52…cd66               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0083, t01=0x00cc}
0xcd66…cd78               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0083, t01=0x00e0}
0xcd78…cdae               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME «, t00=0x0083, t01=0x00f2}
0xcdae…cdc4               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x0083, t01=0x0128}
0xcdc4…cde8               Head {h00=0x0020, h01=0x0050, text=» RF(E) READ SKIP EBCDIC SYN «, t00=0x0083, t01=0x013e}
0xcde8…cdfc               Head {h00=0x0010, h01=0x0050, text=»IHLCI1 EQU *«, t00=0x0083, t01=0x0162}
0xcdfc…ce20               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x0083, t01=0x0176}
0xce20…ce4c               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0084, t01=0x000a}
0xce4c…ce58               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x0036}
0xce58…ce6e               Head {h00=0x0012, h01=0x0050, text=»IHIN10 RTN A5 «, t00=0x0084, t01=0x0042}
0xce6e…ce8a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0084, t01=0x0058}
0xce8a…ceae               Head {h00=0x0020, h01=0x0050, text=»IHIN20 CF A5,SST PERFORM SST«, t00=0x0084, t01=0x0074}
0xceae…cebe               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0084, t01=0x0098}
0xcebe…ced4               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x00a8}
0xced4…cef0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0084, t01=0x00be}
0xcef0…cf18               Head {h00=0x0024, h01=0x0050, text=»IHIN20 RF SST PERFORM SST SALCUZ«, t00=0x0084, t01=0x00da}
0xcf18…cf2e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x0102}
0xcf2e…cf3c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0084, t01=0x0118}
0xcf3c…cf46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0126}
0xcf46…cf50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0130}
0xcf50…cf72               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x0084, t01=0x013a}
0xcf72…cf7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x015c}
0xcf7c…cf86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0166}
0xcf86…cf9a               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x0084, t01=0x0170}
0xcf9a…cfae               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0084, t01=0x0184}
0xcfae…cfc4               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0085, t01=0x0008}
0xcfc4…cfe6               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0085, t01=0x001e}
0xcfe6…cff2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x0040}
0xcff2…cffa               Head {h00=0x0004, h01=0x0050, t00=0x0085, t01=0x004c}
0xcffa…d010               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0085, t01=0x0054}
0xd010…d030               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0085, t01=0x006a}
0xd030…d03c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x008a}
0xd03c…d06a               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0085, t01=0x0096}
0xd06a…d07c               Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x0085, t01=0x00c4}
0xd07c…d08a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0085, t01=0x00d6}
0xd08a…d094               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x00e4}
0xd094…d09e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x00ee}
0xd09e…d0c8               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x0085, t01=0x00f8}
0xd0c8…d0d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0122}
0xd0d2…d0fe               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x0085, t01=0x012c}
0xd0fe…d130               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x0085, t01=0x0158}
0xd130…d160               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x0085, t01=0x018a}
0xd160…d190               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x0086, t01=0x002a}
0xd190…d19a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x005a}
0xd19a…d1b2               Head {h00=0x0014, h01=0x0050, text=»SST SST A1,LCUIN«, t00=0x0086, t01=0x0064}
0xd1b2…d1ce               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0086, t01=0x007c}
0xd1ce…d204               Head {h00=0x0032, h01=0x0050, text=» RF(NA) SST200 ALREADY INACTIVE SALCUZ  SALCUZ«, t00=0x0086, t01=0x0098}
0xd204…d21a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0086, t01=0x00ce}
0xd21a…d22c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0086, t01=0x00e4}
0xd22c…d240               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0086, t01=0x00f6}
0xd240…d26a               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOG SST INFORMATION «, t00=0x0086, t01=0x010a}
0xd26a…d276               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x0134}
0xd276…d292               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0086, t01=0x0140}
0xd292…d2a4               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0086, t01=0x015c}
0xd2a4…d2ba               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x0086, t01=0x016e}
0xd2ba…d2d0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0086, t01=0x0184}
0xd2d0…d2ec               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0087, t01=0x000a}
0xd2ec…d306               Head {h00=0x0016, h01=0x0050, text=» ANK A2,6  SALCUZ «, t00=0x0087, t01=0x0026}
0xd306…d324               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST100  SALCUZ «, t00=0x0087, t01=0x0040}
0xd324…d33e               Head {h00=0x0016, h01=0x0050, text=» ANK A2,2  SALCUZ «, t00=0x0087, t01=0x005e}
0xd33e…d368               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SST050 THROUGH PUT SALCUZ «, t00=0x0087, t01=0x0078}
0xd368…d392               Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 SET PARITY ERROR SALCUZ «, t00=0x0087, t01=0x00a2}
0xd392…d3ac               Head {h00=0x0016, h01=0x0050, text=» RF SSTRET  SALCUZ«, t00=0x0087, t01=0x00cc}
0xd3ac…d3c2               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0087, t01=0x00e6}
0xd3c2…d3de               Head {h00=0x0018, h01=0x0050, text=»SST050 EQU *  SALCUZ«, t00=0x0087, t01=0x00fc}
0xd3de…d3fe               Head {h00=0x001c, h01=0x0050, text=» CM XSTA TROUHHPUT ERROR«, t00=0x0087, t01=0x0118}
0xd3fe…d412               Head {h00=0x0010, h01=0x0050, text=» LDKL A5,STB«, t00=0x0087, t01=0x0138}
0xd412…d426               Head {h00=0x0010, h01=0x0050, text=» ABL BRM010 «, t00=0x0087, t01=0x014c}
0xd426…d43a               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x0087, t01=0x0160}
0xd43a…d450               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTCU «, t00=0x0087, t01=0x0174}
0xd450…d46c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0087, t01=0x018a}
0xd46c…d49a               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0088, t01=0x0016}
0xd49a…d4aa               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0088, t01=0x0044}
0xd4aa…d4c0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0088, t01=0x0054}
0xd4c0…d4dc               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0088, t01=0x006a}
0xd4dc…d4f8               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/21  SALCUZ «, t00=0x0088, t01=0x0086}
0xd4f8…d516               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST200 LSALCUZ «, t00=0x0088, t01=0x00a2}
0xd516…d550               Head {h00=0x0036, h01=0x0050, text=» CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ«, t00=0x0088, t01=0x00c0}
0xd550…d570               Head {h00=0x001c, h01=0x0050, text=» DATA BRM RESTART SALCUZ«, t00=0x0088, t01=0x00fa}
0xd570…d590               Head {h00=0x001c, h01=0x0050, text=» DATA 2 WAIT TIME SALCUZ«, t00=0x0088, t01=0x011a}
0xd590…d5a8               Head {h00=0x0014, h01=0x0050, text=» RF READ  SALCUZ«, t00=0x0088, t01=0x013a}
0xd5a8…d5b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0152}
0xd5b2…d5d2               Head {h00=0x001c, h01=0x0050, text=»SST200 LDK A1,0  SALCUZ «, t00=0x0088, t01=0x015c}
0xd5d2…d5f2               Head {h00=0x001c, h01=0x0050, text=»SSTRET ADK A5,4  SALCUZ «, t00=0x0088, t01=0x017c}
0xd5f2…d612               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 SET CR SALCUZ«, t00=0x0089, t01=0x000c}
0xd612…d630               Head {h00=0x001a, h01=0x0050, text=» ABR* A5 RETURN SALCUZ«, t00=0x0089, t01=0x002c}
0xd630…d646               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0089, t01=0x004a}
0xd646…d650               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0060}
0xd650…d65a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x006a}
0xd65a…d66e               Head {h00=0x0010, h01=0x0050, text=»* HALT INPUT«, t00=0x0089, t01=0x0074}
0xd66e…d678               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0088}
0xd678…d682               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0092}
0xd682…d6a2               Head {h00=0x001c, h01=0x0050, text=»HALTIN LDK A1,0  SALCUZ «, t00=0x0089, t01=0x009c}
0xd6a2…d6ba               Head {h00=0x0014, h01=0x0050, text=» CIO A1,0,LCUIN «, t00=0x0089, t01=0x00bc}
0xd6ba…d6d6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0089, t01=0x00d4}
0xd6d6…d70e               Head {h00=0x0034, h01=0x0050, text=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK«, t00=0x0089, t01=0x00f0}
0xd70e…d724               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0089, t01=0x0128}
0xd724…d740               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0089, t01=0x013e}
0xd740…d76e               Head {h00=0x002a, h01=0x0050, text=» RF READ WAIT FOR SST INTERRUPT SALCUZ«, t00=0x0089, t01=0x015a}
0xd76e…d784               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0089, t01=0x0188}
0xd784…d792               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008a, t01=0x000e}
0xd792…d79c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x001c}
0xd79c…d7a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0026}
0xd7a6…d7d6               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x008a, t01=0x0030}
0xd7d6…d7e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0060}
0xd7e0…d7ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x006a}
0xd7ea…d7fe               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x008a, t01=0x0074}
0xd7fe…d812               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008a, t01=0x0088}
0xd812…d826               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x008a, t01=0x009c}
0xd826…d83a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x008a, t01=0x00b0}
0xd83a…d86e               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x008a, t01=0x00c4}
0xd86e…d89c               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x008a, t01=0x00f8}
0xd89c…d8a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x0126}
0xd8a8…d8bc               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x008a, t01=0x0132}
0xd8bc…d8e2               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x008a, t01=0x0146}
0xd8e2…d8f8               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x008a, t01=0x016c}
0xd8f8…d91a               Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x008a, t01=0x0182}
0xd91a…d92e               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x008b, t01=0x0014}
0xd92e…d956               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x008b, t01=0x0028}
0xd956…d962               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x0050}
0xd962…d976               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008b, t01=0x005c}
0xd976…d9a0               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x008b, t01=0x0070}
0xd9a0…d9ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x009a}
0xd9ac…d9c0               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x008b, t01=0x00a6}
0xd9c0…d9ea               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x008b, t01=0x00ba}
0xd9ea…d9f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x00e4}
0xd9f6…da00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00f0}
0xda00…da1a               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x008b, t01=0x00fa}
0xda1a…da2c               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x008b, t01=0x0114}
0xda2c…da3a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008b, t01=0x0126}
0xda3a…da44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0134}
0xda44…da4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x013e}
0xda4e…da60               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x008b, t01=0x0148}
0xda60…da6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x015a}
0xda6a…da8a               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x008b, t01=0x0164}
0xda8a…da94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0184}
0xda94…da9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x018e}
0xda9e…dac0               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x008c, t01=0x0008}
0xdac0…dada               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x008c, t01=0x002a}
0xdada…daec               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x008c, t01=0x0044}
0xdaec…db00               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x008c, t01=0x0056}
0xdb00…db18               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x008c, t01=0x006a}
0xdb18…db2e               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x008c, t01=0x0082}
0xdb2e…db48               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x008c, t01=0x0098}
0xdb48…db5c               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x008c, t01=0x00b2}
0xdb5c…db6e               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x008c, t01=0x00c6}
0xdb6e…db7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x00d8}
0xdb7a…db9c               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008c, t01=0x00e4}
0xdb9c…dbb4               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x008c, t01=0x0106}
0xdbb4…dbc0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x011e}
0xdbc0…dbca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x012a}
0xdbca…dbd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0134}
0xdbd4…dbde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x013e}
0xdbde…dbf0               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x008c, t01=0x0148}
0xdbf0…dbfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x015a}
0xdbfa…dc2c               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x008c, t01=0x0164}
0xdc2c…dc36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0008}
0xdc36…dc40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0012}
0xdc40…dc58               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x008d, t01=0x001c}
0xdc58…dc7a               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x008d, t01=0x0034}
0xdc7a…dc8c               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x008d, t01=0x0056}
0xdc8c…dca2               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x008d, t01=0x0068}
0xdca2…dcb6               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x008d, t01=0x007e}
0xdcb6…dccc               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x008d, t01=0x0092}
0xdccc…dce0               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x008d, t01=0x00a8}
0xdce0…dcf2               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x008d, t01=0x00bc}
0xdcf2…dd0a               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x008d, t01=0x00ce}
0xdd0a…dd1e               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x008d, t01=0x00e6}
0xdd1e…dd2a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x00fa}
0xdd2a…dd4c               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008d, t01=0x0106}
0xdd4c…dd60               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x008d, t01=0x0128}
0xdd60…dd6c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x013c}
0xdd6c…dd7e               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x008d, t01=0x0148}
0xdd7e…dd92               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x008d, t01=0x015a}
0xdd92…dda6               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x008d, t01=0x016e}
0xdda6…ddb6               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x008d, t01=0x0182}
0xddb6…ddc0 (142, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0004}
0xddc0…ddca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x000e}
0xddca…ddd8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008e, t01=0x0018}
0xddd8…dde2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0026}
0xdde2…de22               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x008e, t01=0x0030}
0xde22…de2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0070}
0xde2c…de54               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x008e, t01=0x007a}
0xde54…de74               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x008e, t01=0x00a2}
0xde74…de8a               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x008e, t01=0x00c2}
0xde8a…deb0               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x008e, t01=0x00d8}
0xdeb0…deba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00fe}
0xdeba…df00               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x008e, t01=0x0108}
0xdf00…df2e               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x008e, t01=0x014e}
0xdf2e…df5e               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x008e, t01=0x017c}
0xdf5e…df68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x001c}
0xdf68…df9a               Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x008f, t01=0x0026}
0xdf9a…dfa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0058}
0xdfa4…dfae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0062}
0xdfae…dfc2               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x008f, t01=0x006c}
0xdfc2…dfd6               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x008f, t01=0x0080}
0xdfd6…dfea               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x008f, t01=0x0094}
0xdfea…dff6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x00a8}
0xdff6…e008               Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x008f, t01=0x00b4}
0xe008…e01c               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x008f, t01=0x00c6}
0xe01c…e030               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x008f, t01=0x00da}
0xe030…e03c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x00ee}
0xe03c…e066               Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x008f, t01=0x00fa}
0xe066…e094               Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x008f, t01=0x0124}
0xe094…e0ac               Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x008f, t01=0x0152}
0xe0ac…e0cc               Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x008f, t01=0x016a}
0xe0cc…e0ee               Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x008f, t01=0x018a}
0xe0ee…e11a               Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x0090, t01=0x001c}
0xe11a…e13e               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x0090, t01=0x0048}
0xe13e…e152               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0090, t01=0x006c}
0xe152…e17a               Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x0090, t01=0x0080}
0xe17a…e1a8               Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x0090, t01=0x00a8}
0xe1a8…e1b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0090, t01=0x00d6}
0xe1b4…e1c8               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0090, t01=0x00e2}
0xe1c8…e1fa               Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x0090, t01=0x00f6}
0xe1fa…e206               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0090, t01=0x0128}
0xe206…e230               Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x0090, t01=0x0134}
0xe230…e248               Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x0090, t01=0x015e}
0xe248…e25e               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x0090, t01=0x0176}
0xe25e…e26e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0090, t01=0x018c}
0xe26e…e27c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0091, t01=0x000c}
0xe27c…e286               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x001a}
0xe286…e290               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0024}
0xe290…e2ac               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x0091, t01=0x002e}
0xe2ac…e2b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x004a}
0xe2b6…e2c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0054}
0xe2c0…e2d4               Head {h00=0x0010, h01=0x0050, text=»DC15ON EQU *«, t00=0x0091, t01=0x005e}
0xe2d4…e2ea               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0091, t01=0x0072}
0xe2ea…e30a               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0091, t01=0x0088}
0xe30a…e316               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x00a8}
0xe316…e31e               Head {h00=0x0004, h01=0x0050, t00=0x0091, t01=0x00b4}
0xe31e…e334               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0091, t01=0x00bc}
0xe334…e354               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x0091, t01=0x00d2}
0xe354…e360               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x00f2}
0xe360…e374               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0091, t01=0x00fe}
0xe374…e394               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x0091, t01=0x0112}
0xe394…e3a8               Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x0091, t01=0x0132}
0xe3a8…e3da               Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x0091, t01=0x0146}
0xe3da…e3f2               Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x0091, t01=0x0178}
0xe3f2…e406               Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x0091, t01=0x0190}
0xe406…e428               Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x0092, t01=0x0014}
0xe428…e44c               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x0092, t01=0x0036}
0xe44c…e480               Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x0092, t01=0x005a}
0xe480…e4ac               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x0092, t01=0x008e}
0xe4ac…e4be               Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x0092, t01=0x00ba}
0xe4be…e4d2               Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x0092, t01=0x00cc}
0xe4d2…e4de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0092, t01=0x00e0}
0xe4de…e4f2               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0092, t01=0x00ec}
0xe4f2…e508               Head {h00=0x0012, h01=0x0050, text=» ORS A2,DCONOF«, t00=0x0092, t01=0x0100}
0xe508…e51e               Head {h00=0x0012, h01=0x0050, text=» CF A15,CKMESS«, t00=0x0092, t01=0x0116}
0xe51e…e54a               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x0092, t01=0x012c}
0xe54a…e570               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x0092, t01=0x0158}
0xe570…e59e               Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x0092, t01=0x017e}
0xe59e…e5b4               Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x0093, t01=0x001c}
0xe5b4…e5c2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0093, t01=0x0032}
0xe5c2…e5cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0040}
0xe5cc…e5e4               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0093, t01=0x004a}
0xe5e4…e5ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0062}
0xe5ee…e61a               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0093, t01=0x006c}
0xe61a…e62e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0093, t01=0x0098}
0xe62e…e65a               Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x0093, t01=0x00ac}
0xe65a…e688               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0093, t01=0x00d8}
0xe688…e6b0               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0093, t01=0x0106}
0xe6b0…e6c2               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0093, t01=0x012e}
0xe6c2…e6cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0140}
0xe6cc…e704               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x0093, t01=0x014a}
0xe704…e70e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0182}
0xe70e…e736               Head {h00=0x0024, h01=0x0050, text=»CPTIM CM DCONOF INDICATE POLLING«, t00=0x0093, t01=0x018c}
0xe736…e74e               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x0094, t01=0x0024}
0xe74e…e772               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x0094, t01=0x003c}
0xe772…e7a0               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0094, t01=0x0060}
0xe7a0…e7b0               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0094, t01=0x008e}
0xe7b0…e7ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x009e}
0xe7ba…e7d4               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x0094, t01=0x00a8}
0xe7d4…e7de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x00c2}
0xe7de…e806               Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x0094, t01=0x00cc}
0xe806…e820               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x0094, t01=0x00f4}
0xe820…e84a               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x0094, t01=0x010e}
0xe84a…e85e               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0094, t01=0x0138}
0xe85e…e870               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0094, t01=0x014c}
0xe870…e87e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0094, t01=0x015e}
0xe87e…e888               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x016c}
0xe888…e8a8               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x0094, t01=0x0176}
0xe8a8…e8b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0008}
0xe8b2…e8c6               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x0095, t01=0x0012}
0xe8c6…e8ee               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x0095, t01=0x0026}
0xe8ee…e904               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0095, t01=0x004e}
0xe904…e920               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x0095, t01=0x0064}
0xe920…e948               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x0095, t01=0x0080}
0xe948…e958               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0095, t01=0x00a8}
0xe958…e962               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00b8}
0xe962…e97e               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x0095, t01=0x00c2}
0xe97e…e988               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00de}
0xe988…e9a0               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x0095, t01=0x00e8}
0xe9a0…e9bc               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x0095, t01=0x0100}
0xe9bc…e9e0               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x0095, t01=0x011c}
0xe9e0…ea10               Head {h00=0x002c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT IF OPEN SALCUZ «, t00=0x0095, t01=0x0140}
0xea10…ea24               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0095, t01=0x0170}
0xea24…ea4a               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x0095, t01=0x0184}
0xea4a…ea68               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0096, t01=0x001a}
0xea68…ea92               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0096, t01=0x0038}
0xea92…eaa8               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x0096, t01=0x0062}
0xeaa8…eab6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0096, t01=0x0078}
0xeab6…eac0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0086}
0xeac0…eade               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x0096, t01=0x0090}
0xeade…eae8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00ae}
0xeae8…eb14               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x0096, t01=0x00b8}
0xeb14…eb34               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x0096, t01=0x00e4}
0xeb34…eb52               Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x0096, t01=0x0104}
0xeb52…eb64               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x0096, t01=0x0122}
0xeb64…eb78               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x0096, t01=0x0134}
0xeb78…eb86               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0096, t01=0x0148}
0xeb86…eb9a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0096, t01=0x0156}
0xeb9a…eba4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x016a}
0xeba4…ebae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0174}
0xebae…ebca               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x0096, t01=0x017e}
0xebca…ebd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x000a}
0xebd4…ebec               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x0097, t01=0x0014}
0xebec…ec0a               Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x0097, t01=0x002c}
0xec0a…ec14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x004a}
0xec14…ec1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0054}
0xec1e…ec32               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x0097, t01=0x005e}
0xec32…ec48               Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x0097, t01=0x0072}
0xec48…ec60               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x0097, t01=0x0088}
0xec60…ec78               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x0097, t01=0x00a0}
0xec78…ec8a               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x0097, t01=0x00b8}
0xec8a…eca2               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x0097, t01=0x00ca}
0xeca2…ecb4               Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x0097, t01=0x00e2}
0xecb4…ecc6               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x0097, t01=0x00f4}
0xecc6…ecd8               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x0097, t01=0x0106}
0xecd8…ecea               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0097, t01=0x0118}
0xecea…ed00               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x0097, t01=0x012a}
0xed00…ed16               Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x0097, t01=0x0140}
0xed16…ed2e               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x0097, t01=0x0156}
0xed2e…ed44               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x0097, t01=0x016e}
0xed44…ed5a               Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x0097, t01=0x0184}
0xed5a…ed72               Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x0098, t01=0x000a}
0xed72…ed8a               Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x0098, t01=0x0022}
0xed8a…ed9a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0098, t01=0x003a}
0xed9a…edae               Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x0098, t01=0x004a}
0xedae…edbc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0098, t01=0x005e}
0xedbc…edc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x006c}
0xedc6…edd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0076}
0xedd0…edfc               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x0098, t01=0x0080}
0xedfc…ee1c               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x0098, t01=0x00ac}
0xee1c…ee26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x00cc}
0xee26…ee30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x00d6}
0xee30…ee58               Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x0098, t01=0x00e0}
0xee58…ee80               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x0098, t01=0x0108}
0xee80…eea0               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x0098, t01=0x0130}
0xeea0…eec0               Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x0098, t01=0x0150}
0xeec0…eee0               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x0098, t01=0x0170}
0xeee0…ef0c               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x0098, t01=0x0190}
0xef0c…ef2c               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x0099, t01=0x002c}
0xef2c…ef3e               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0099, t01=0x004c}
0xef3e…ef50               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x0099, t01=0x005e}
0xef50…ef62               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0099, t01=0x0070}
0xef62…ef94               Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x0099, t01=0x0082}
0xef94…efa4               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0099, t01=0x00b4}
0xefa4…efb0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0099, t01=0x00c4}
0xefb0…efc4               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0099, t01=0x00d0}
0xefc4…efce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00e4}
0xefce…eff8               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x0099, t01=0x00ee}
0xeff8…f01e               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x0099, t01=0x0118}
0xf01e…f028               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x013e}
0xf028…f03e               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x0099, t01=0x0148}
0xf03e…f052               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0099, t01=0x015e}
0xf052…f064               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0099, t01=0x0172}
0xf064…f076               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0099, t01=0x0184}
0xf076…f08c               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x009a, t01=0x0008}
0xf08c…f0a0               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x009a, t01=0x001e}
0xf0a0…f0b4               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x009a, t01=0x0032}
0xf0b4…f0c6               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x009a, t01=0x0046}
0xf0c6…f0d6               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x009a, t01=0x0058}
0xf0d6…f0de               Head {h00=0x0004, h01=0x0050, t00=0x009a, t01=0x0068}
0xf0de…f0ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x0070}
0xf0ea…f0f8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009a, t01=0x007c}
0xf0f8…f102               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x008a}
0xf102…f10c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0094}
0xf10c…f132               Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x009a, t01=0x009e}
0xf132…f13c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00c4}
0xf13c…f146               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00ce}
0xf146…f166               Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x009a, t01=0x00d8}
0xf166…f186               Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x009a, t01=0x00f8}
0xf186…f1a0               Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x009a, t01=0x0118}
0xf1a0…f1bc               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x009a, t01=0x0132}
0xf1bc…f1d2               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x009a, t01=0x014e}
0xf1d2…f200               Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x009a, t01=0x0164}
0xf200…f21c (155, 0, 400) Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x009b, t01=0x0004}
0xf21c…f244               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x009b, t01=0x0020}
0xf244…f25e               Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x009b, t01=0x0048}
0xf25e…f268               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0062}
0xf268…f27e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x009b, t01=0x006c}
0xf27e…f29e               Head {h00=0x001c, h01=0x0050, text=» DATA 0 USER ECB ADDRESS«, t00=0x009b, t01=0x0082}
0xf29e…f2c2               Head {h00=0x0020, h01=0x0050, text=» DATA DC:ECB MMU ECB ADDRESS«, t00=0x009b, t01=0x00a2}
0xf2c2…f2ce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x00c6}
0xf2ce…f2d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x00d2}
0xf2d8…f2f6               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x009b, t01=0x00dc}
0xf2f6…f322               Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x009b, t01=0x00fa}
0xf322…f354               Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x009b, t01=0x0126}
0xf354…f37a               Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x009b, t01=0x0158}
0xf37a…f3aa               Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x009b, t01=0x017e}
0xf3aa…f3c8               Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x009c, t01=0x001e}
0xf3c8…f3ee               Head {h00=0x0022, h01=0x0050, text=» DATA 0 REQUEST TIMEOUT VALUE «, t00=0x009c, t01=0x003c}
0xf3ee…f3f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0062}
0xf3f8…f40e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x009c, t01=0x006c}
0xf40e…f42a               Head {h00=0x0018, h01=0x0050, text=»DC:ECB EQU * MMU ECB«, t00=0x009c, t01=0x0082}
0xf42a…f444               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x009c, t01=0x009e}
0xf444…f450               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x00b8}
0xf450…f45a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00c4}
0xf45a…f468               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x00ce}
0xf468…f472               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00dc}
0xf472…f47c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00e6}
0xf47c…f49c               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x009c, t01=0x00f0}
0xf49c…f4a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0110}
0xf4a6…f4c6               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x009c, t01=0x011a}
0xf4c6…f4d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x013a}
0xf4d0…f4e4               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x009c, t01=0x0144}
0xf4e4…f508               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x009c, t01=0x0158}
0xf508…f522               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x009c, t01=0x017c}
0xf522…f538               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x009d, t01=0x0008}
0xf538…f54e               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009d, t01=0x001e}
0xf54e…f562               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009d, t01=0x0034}
0xf562…f578               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x009d, t01=0x0048}
0xf578…f58e               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009d, t01=0x005e}
0xf58e…f5a2               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009d, t01=0x0074}
0xf5a2…f5b8               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x009d, t01=0x0088}
0xf5b8…f5ce               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009d, t01=0x009e}
0xf5ce…f5e2               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009d, t01=0x00b4}
0xf5e2…f5ee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009d, t01=0x00c8}
0xf5ee…f608               Head {h00=0x0016, h01=0x0050, text=» IFF RBUFNR=1 DK3 «, t00=0x009d, t01=0x00d4}
0xf608…f61e               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x009d, t01=0x00ee}
0xf61e…f632               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009d, t01=0x0104}
0xf632…f644               Head {h00=0x000e, h01=0x0050, text=» XIF   DK3«, t00=0x009d, t01=0x0118}
0xf644…f660               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x009d, t01=0x012a}
0xf660…f674               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x009d, t01=0x0146}
0xf674…f67c               Head {h00=0x0004, h01=0x0050, t00=0x009d, t01=0x015a}
0xf67c…f692               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x009d, t01=0x0162}
0xf692…f6bc               Head {h00=0x0026, h01=0x0050, text=»MMUBUF RES TBUFL+1 MMU WORK BUFFER«, t00=0x009d, t01=0x0178}
0xf6bc…f6c8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009e, t01=0x0012}
0xf6c8…f6d6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009e, t01=0x001e}
0xf6d6…f6e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x002c}
0xf6e0…f6ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0036}
0xf6ea…f70e               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x009e, t01=0x0040}
0xf70e…f718               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0064}
0xf718…f722               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x006e}
0xf722…f736               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x009e, t01=0x0078}
0xf736…f750               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x009e, t01=0x008c}
0xf750…f766               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x009e, t01=0x00a6}
0xf766…f778               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x009e, t01=0x00bc}
0xf778…f792               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x009e, t01=0x00ce}
0xf792…f7a8               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x009e, t01=0x00e8}
0xf7a8…f7ba               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x009e, t01=0x00fe}
0xf7ba…f7d2               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x009e, t01=0x0110}
0xf7d2…f7e8               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x009e, t01=0x0128}
0xf7e8…f7fc               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x009e, t01=0x013e}
0xf7fc…f816               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x009e, t01=0x0152}
0xf816…f82c               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x009e, t01=0x016c}
0xf82c…f83e               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x009e, t01=0x0182}
0xf83e…f850 (159, 0, 400) Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x009f, t01=0x0004}
0xf850…f866               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x009f, t01=0x0016}
0xf866…f87c               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x009f, t01=0x002c}
0xf87c…f894               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x009f, t01=0x0042}
0xf894…f8b0               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x009f, t01=0x005a}
0xf8b0…f8c4               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x009f, t01=0x0076}
0xf8c4…f8d8               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x009f, t01=0x008a}
0xf8d8…f8ee               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x009f, t01=0x009e}
0xf8ee…f8fc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009f, t01=0x00b4}
0xf8fc…f906               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00c2}
0xf906…f910               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00cc}
0xf910…f92a               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x009f, t01=0x00d6}
0xf92a…f93e               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x009f, t01=0x00f0}
0xf93e…f94e               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x009f, t01=0x0104}
0xf94e…f964               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x009f, t01=0x0114}
0xf964…f978               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x009f, t01=0x012a}
0xf978…f98c               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x009f, t01=0x013e}
0xf98c…f998               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x0152}
0xf998…f9a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x015e}
0xf9a2…f9ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0168}
0xf9ac…f9b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0172}
0xf9b6…f9ca               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x009f, t01=0x017c}
0xf9ca…f9d8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009f, t01=0x0190}
0xf9d8…fa18               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x00a0, t01=0x000e}
0xfa18…fa22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x004e}
0xfa22…fa3c               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x00a0, t01=0x0058}
0xfa3c…fa46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0072}
0xfa46…fa84               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x00a0, t01=0x007c}
0xfa84…fa8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x00ba}
0xfa8e…fad0               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x00a0, t01=0x00c4}
0xfad0…fad8               Head {h00=0x0004, h01=0x0050, t00=0x00a0, t01=0x0106}
0xfad8…faec               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x00a0, t01=0x010e}
0xfaec…fb12               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x00a0, t01=0x0122}
0xfb12…fb24               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x00a0, t01=0x0148}
0xfb24…fb3a               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a0, t01=0x015a}
0xfb3a…fb64               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x00a0, t01=0x0170}
0xfb64…fb8a               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x00a1, t01=0x000a}
0xfb8a…fb92               Head {h00=0x0004, h01=0x0050, t00=0x00a1, t01=0x0030}
0xfb92…fba4               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x00a1, t01=0x0038}
0xfba4…fbba               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00a1, t01=0x004a}
0xfbba…fbe6               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x00a1, t01=0x0060}
0xfbe6…fc0e               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x00a1, t01=0x008c}
0xfc0e…fc24               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x00a1, t01=0x00b4}
0xfc24…fc2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00ca}
0xfc2e…fc38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00d4}
0xfc38…fc42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00de}
0xfc42…fc50               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a1, t01=0x00e8}
0xfc50…fc58               Head {h00=0x0004, h01=0x0050, t00=0x00a1, t01=0x00f6}
0xfc58…fc7c               Head {h00=0x0020, h01=0x0050, text=»*     SCANDINAVIAN ALPHABET «, t00=0x00a1, t01=0x00fe}
0xfc7c…fc8a               Head {h00=0x000a, h01=0x0050, text=»    DB«, t00=0x00a1, t01=0x0122}
0xfc8a…fc9e               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x00a1, t01=0x0130}
0xfc9e…fccc               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x00a1, t01=0x0144}
0xfccc…fcfa               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/232E,/3C28,/2B21 /08-/0F «, t00=0x00a1, t01=0x0172}
0xfcfa…fd28               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x00a2, t01=0x0010}
0xfd28…fd56               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/245D,/2A29,/3B5E /18-/1F «, t00=0x00a2, t01=0x003e}
0xfd56…fd84               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x00a2, t01=0x006c}
0xfd84…fdb2               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/402C,/255F,/3E3F /28-/2F «, t00=0x00a2, t01=0x009a}
0xfdb2…fdde               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x00a2, t01=0x00c8}
0xfdde…fe0a               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A5B,/5C27,/3D22 /38-3F«, t00=0x00a2, t01=0x00f4}
0xfe0a…fe18               Head {h00=0x000a, h01=0x0050, text=»    DE«, t00=0x00a2, t01=0x0120}
0xfe18…fe24               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a2, t01=0x012e}
0xfe24…fe32               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a2, t01=0x013a}
0xfe32…fe3a               Head {h00=0x0004, h01=0x0050, t00=0x00a2, t01=0x0148}
0xfe3a…fe56               Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x00a2, t01=0x0150}
0xfe56…fe70               Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x00a2, t01=0x016c}
0xfe70…fe96               Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x00a2, t01=0x0186}
0xfe96…fec4               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00a3, t01=0x001c}
0xfec4…fef2               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00a3, t01=0x004a}
0xfef2…ff06               Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x00a3, t01=0x0078}
0xff06…ff10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x008c}
0xff10…ff1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0096}
0xff1a…ff26               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00a3, t01=0x00a0}
0xff26…ff2a               Head {h00=0x4004, h01=0x0000}
0xff2a…ff2e               00 a3 00 ac                                                                                                                                                                                                                                       ┆    ┆
0xff2e…ff36 (164, 1, 8)   20 04 00 00 00 a4 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view