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

⟦154d579af⟧

    Length: 71518 (0x1175e)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«

Derivation

└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
    └─⟦this⟧ »TOSSWORK/DRDC15.SC« 

PTS(SC)

	IDENT DRDC15 	PRR 10.0 80-05-07  870105041000

			=11, DC:MIN HEADER LENGTH
			REL 10.1 80-01-25
			=10,WRONG LABEL IF SALCUZ
			REL 10.1 79-12-04
			=9, OLLES POWER UP+MODEM NOT OP
			REL 10.1 79-10-26

			REL 10.1 ADAPTATION
			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 
	EXTRN	PFPOST	WAIT FOR POWER UP IF SET
	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 
* 
* 
X:A	EQU	2000	RECEIVE BUFFER LENGTH
RBUFL	EQU	X:A 
X:B	EQU	/60	DCTASK FILE CODE
DC15FC	EQU	/60
X:C	EQU	1	IF 1 INTERRUPT LOGGING
LOGG	EQU	X:C
X:D	EQU	600	POLL TIMEOUT VALUE
TIMPOL	EQU	X:D
X:E	EQU	1	STATUS AND RVI HANDLING IF=1
STAT	EQU	X:E
X:F	EQU	1	READ COMMAND HANDLING IF=1
RCOM	EQU	X:F
X:G	EQU	254	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	X:G 
X:H	EQU	0	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	X:H
X:I	EQU	0	IF 1 SPECIFIC POLL HANDLING 
SPECP	EQU	X:I 
X:J	EQU	1	IF = 1  LINE SPEED SET TO HIGH
			IF = 0  LINE SPEED IS SET TO LOW 
SPEED	EQU	X:J 
X:K	EQU	0	IF 1 SIEMENS MSV1 PROCEDURE 
MSV1	EQU	X:K
X:L	EQU	2	NUMBER OF RECEIVE BUFFERS (2-5) 
RBUFNR	EQU	X:L
X:M	EQU	1	IF = 1  PTS 6805 ADAPTION	SALCUZ
P6805	EQU	X:M 
X:N	EQU	/02 
	IFT	P6805=0
LCUIN	EQU	X:N	DEVICE ADDRESS OF RECEIVER
	XIF
	IFT	P6805=1
LCUIN	EQU	/0A	DEVICE ADDRESS OF RECEIVER
	XIF
X:O	EQU	0 
IBMCHR	EQU	X:O	IF 1 IBM CHARACTER HANDLING
X:P	EQU	0	IF 1 MESSAGE PASSING TO DC TASK 
MESPAS	EQU	X:P
X:Q	EQU	0	IBM-3270 EMULATION PACKAGE, IF NOT = 0
EM3270	EQU	X:Q
X:R	EQU	1000
TBUFL	EQU	X:R	MMU BUFFER LENGTH 
BINTRM	EQU	0	IF 1 BINARY TRANSMISSION 
TSTREQ	EQU	0	IF 1 TEST REQUEST HANDLING 
DMRK	EQU	0	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 
TPMODE	EQU	0	TRANSPARENT MODE IF = 1
* 
	EJECT
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	0
* 
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	1
* 
DEVIND	EQU	-2	DEVICE INDEX DATA COMMUNICATION 
BUFLEN	EQU	TBUFL+TBUFL	MMU BUFFER SIZE
* 
	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
DCLCI	DATA	0	DC UNIT INPUT STATUS 
	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 
	DATA	6	HEADER LENGTH	=11 
* 
*	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 
	DATA	6	HEADER LENGTH	=11 
* 
	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	30	PROCEDURE TIMER 3 SEC 
* 
* 
*	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	/40 
ACK0	EQU	/18
ACK1	EQU	/2F
SYNEBC	EQU	/32
ENQEBC	EQU	/2D
ETBEBC	EQU	/26
	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
TPM	DATA	0	IF =1 TRANSPARENT TEXT 
* 
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
* 
* 
*	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
* 
* 
*		LINE CONTROL UNIT  FUNCTION CONTROL
* 
	IFT	CODE=0 
SYNC	EQU	/16
	XIF
	IFT	CODE=1 
SYNC	EQU	/32
	XIF
	IFT	P6805=0
CBCARR	EQU	/100+LSPEED
	XIF
	IFT	P6805=1
CBSTOP	EQU	/00
	IFT	CODE=0 
PARITY	EQU	/0C
	XIF
	IFT	P6805=1
	IFT	CODE=1 
PARITY	EQU	/00
	XIF
	EJECT
* 
* 
*		LINE CONTROL UNIT SST STATUS BITS
* 
SBNOOP	EQU	/01	NOT OPERABLE 
SBTHRU	EQU	/02	THROUGHPUT ERROR 
SBCARR	EQU	/20	CARRIER OFF
	IFT	P6805=0
SBERR	EQU	/23	SBNOOP+SBTHRU+SBCARR
	XIF
	IFT	P6805=1
SBPARI	EQU	/04
SBERR	EQU	/27	SBNOOP+SBTHRU+SBPARI+SBCARR 
	XIF
	EJECT
* 
* 
*	BASIC RECEIVE MODE
* 
*	ENTERED EVERY TIME A MESSAGE
*	IS EXPECTED FROM THE MASTER SIDE
* 
* 
BRM	EQU	* 
	LDKL	A5,STB	LOAD STACKBASE 
	CM	SYNSW	CLEAR SYN-SWITCH
	CM	TPM	CLEAR TRANSPARENT TEXT
	CF	A5,CSYNCI	START INPUT WITH SYNC DEF 
* 
* 
* 
	CF	A5,READP	READ CHARACTER 
	RF(NZ)	BRM150	PARITY ERROR 
* 
* 
*		CHECK IF IT IS A CONTROL CHARACTER 
* 
	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 
	EJECT
* 
* 
*		CHECK IF IT IS A POLL OR A SELECT SEQUENCE 
* 
	IFT	MSV1=0 
	LDR	A8,A2
	CF	A5,READP	READ CHARACTER 
	CWR	A2,A8
	RF(NE)	BRM150	INVALID SEQUENCE 
	XIF
	LDK	A3,0 
	CC	A2,DW1500+1 
	RF(E)	BRM110	POLLING 
	LDK	A3,2 
	CC	A2,DW1500 
	RF(NE)	BRM150	INVALID SEQUENCE 
BRM110	EQU	*
	CF	A5,READP	READ 1:ST STA
	RB(NZ)	BRM	PARITY ERROR
	LDR	A8,A2
	IFT	MSV1=0 
	CF	A5,READP	READ 2:ND STA
	CWR	A2,A8
	RF(NE)	BRM150	INVALID SEQUENCE 
	XIF
	CF	A5,READP	READ ENQ 
	SUK	A2,ENQ 
	RF(NE)	BRM150	INVALID SEQUENCE 
* 
* 
*		YES SEQUENCE OK - HALT INPUT 
* 
	CF	A5,CHALTI 
	EJECT
* 
* 
*		CHECK IF IT IS A SELECT OR A POLL ADDRESS
* 
	LDK	A1,1 
	ST	A1,CACK	LOAD ACK-COUNTER
	LDR	A2,A8
	SUK	A3,2 
	RF(Z)	BRM120	SELECTING 
* 
* 
*		POLLING
* 
	CWK	A8,GP
	ABL(E)	GPOLL	GENERAL POLL
	CF	A5,FINTEP	CHECK IF STA PRESENT (POLL ADDRESS) 
	LDR	A6,A3	LOAD DWT TO A6 
	ABL(NZ)	SPOLL	SPECIFIC POLL
	RB	BRM	INVALID POLL
* 
* 
*		SELECTING
* 
BRM120	EQU	*
	CF	A5,FINTER	CHECK IF STA PRESENT
	LDR	A6,A3	LOAD DWT TO A6 
	RF(NZ)	BRM130	STA FOUND
	IFT	MSV1=1 
	RB	BRM	INVALID ADDRESS 
	XIF
	IFT	MSV1=0 
	LDKL	A6,DW1500	SELECT TO DCTASK
	XIF
BRM130	EQU	*
	ABL	SELECT 
	EJECT
* 
* 
*		THROUGHPUT ERROR 
* 
BRM140	EQU	*
	CM	XSTA	INDICATE "INVALID MESSAGE" 
	LDKL	A5,STB	LOAD STACKBASE TO A5 
	CF	A5,CSYNCI	START INPUT WITH SYNC DEF 
* 
* 
*		WAIT FOR MARK HOLD TO RESYNC.
* 
BRM150	EQU	*
	CF	A5,READ	READ CHARACTER
	LD	A1,DCSTCU	ANY STATUS FROM CONTROL UNIT ?
	RF(NZ)	BRM160	YES
	ANK	A2,/7F 
	SUK	A2,/7F 
	RB(NZ)	BRM150	NO 
BRM160	EQU	*
	CF	A5,CHALTI	HALT INPUT
	RB	BRM 
	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
	IFT	TPMODE=1 
	RB	BRM150	INVALID SEQENCE
BRM302	EQU	*
	XIF
	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
	ABL	POL127 
	XIF
	EJECT
* 
* 
*	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	*
	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 
	EJECT
* 
* 
*	DLE HAS BEEN RECEIVED 
* 
* 
BRM600	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RF(NZ)	BRM605
	IFT	TPMODE=1 
	CF	A5,READ 
	CWK	A2,STX 
	ABL(Z)	BRM302	YES - TRANSPARENT TEXT 
	XIF
	RB	BRM410
BRM605	EQU	*
	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 
	ADK	A1,6 
	ST	A1,FBLST
	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 
	IFF	TPMODE=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
	IFF	TPMODE=1 
RDM100	EQU	*
	CF	A5,READP	READ ONE CHARACTER 
	RF(NZ)	RDM120	PARITY ERROR 
RDM110	EQU	*
	XIF
	IFT	TPMODE=1 
	IM	TPM	INDICATE TRANSPARENT TEXT 
RDM100	CF	A5,READ 
	CWK	A2,DLE	CHECK IF DLE
	RF(NE)	RDM112	NO 
	CF	A5,READ	SKIP DLE AND READ NEXT CHARACTER
	CWK	A2,SYNEBC	CHECK IF SYN 
	RB(E)	RDM100	SKIP SYN
	CF	A5,CRCCAL	CALCULATE CRC 
	CWK	A2,DLE	CHECK IF 2:ND DLE 
	RF(E)	RDM115	YES - STORE DLE AS DATA 
	CWK	A2,ETX	CHECK IF ETX
	RF(E)	RDM130	YES 
	CWK	A2,ETBEBC	CHECK IF ETB 
	RF(E)	RDM160	YES 
	CWK	A2,ITB	CHECK IF ITB
	RF(E)	RDM175	YES 
	CWK	A2,ENQEBC	CHECK IF ENQ 
	RF(E)	RDM135	YES SEND NAK
* 
* 
*	GET END OF BLOCK
* 
RDM105	EQU	*
	CF	A5,READ 
	CWK	A2,DLE 
	RB(NE)	RDM105
	CF	A5,READ 
	CWK	A2,ETX 
	RF(E)	RDM110	YES - END OF BLOCK
	CWK	A2,ETBEBC
	RF(E)	RDM110	YES - END OF BLOCK
	RB	RDM105
RDM110	EQU	*
	CM	TPM	OUT OF TRANSPARENT TEXT 
	CF	A5,RDCRC
	RF	RDM140	INDICATE INVALID MESSAGE 
RDM112	CF	A5,CRCCAL	CALCULATE CRC 
	XIF
	IFF	TPMODE=1 
	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
	XIF
RDM115	EQU	*

	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 
	IFT	TPMODE=1 
	RF	RDM135
	XIF
* 
*	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	TPMODE=1 
	CM	TPM	OUT OF TRANSPARENT TEXT 
	XIF
	IFT	CODE=1 
	CF	A5,RDCRC	READ CRC AND CHECK IT
	RF(E)	RDM150	CRC WAS OK
	XIF
	IFT	TPMODE=1 
RDM135	CM	TPM	OUT OF TRANSP TEXT
	XIF
RDM140	EQU	*
	LDK	A3,1	INDICATE INVALID MESSAGE
RDM150	EQU	*
	LDR	A7,A3	SAVE RESULT REGISTER 
	CF	A5,CHALTI	HALT INPUT
	IFT	P6805=1
	IFT	CODE=0 
	ANK	A2,SBPARI
	RF(Z)	RDM155 
	LDK	A7,1	PARITY ERROR
RDM155	EQU	*
	XIF
	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 
	IFT	TPMODE=1 
RDM175	CM	TPM	OUT OF TRANSPARENT TEXT 
	CF	A5,RDCRC	READ AND CHECK CRC 
	IM	TPM 
	RB(NE)	RDM105	CRC WAS NOT OK 
RDM180	CF	A5,READ 
	CWK	A2,SYNEBC
	RB(E)	RDM180	SKIP SYN
	CWK	A2,DLE 
	RB(NE)	RDM105	ILLEGAL CHARACTER
	CF	A5,READ 
	CWK	A2,STX 
	RB(NE)	RDM105	ILLEGAL CHARACTER
	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 
	CF	A5,CHALTO	HALT OUTPUT 
	IFF	LOGG=0 
	CF	A5,LOGSST	LOG TRANSMITTER STATUS
	XIF
	RTN	A5 
	EJECT
* 
* 
*	TRANSMIT ONE TEXT BLOCK 
* 
* 
TRTEXT	EQU	*
	CF	A5,TRSYNC	START OUTPUT
	IFF	TPMODE=1 
	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
	IFT	TPMODE=1 
	LDK	A2,DLE 
	CF	A5,WRIDLE	SEND DLE
	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	*
	IFT	TPMODE=1 
	IM	TPM	TRANSPARENT TEXT
TRT105	EQU	*
	XIF
	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
	IFF	TPMODE=1 
	CWK	A2,/07 
	RF(L)	TRT110	ILLEGAL CODE : SKIP IT
	XIF
	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 
	IFT	TPMODE=1 
	RB(L)	TRT105	NOT FULL BLOCK
	XIF
	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	*
	IFT	TPMODE=1 
	LDK	A2,DLE 
	CF	A5,WRIDLE	SEND AN EXTRA DLE 
	XIF
	LDK	A2,ETB	LOAD ETB
TRT120	EQU	*
	IFT	TPMODE=1 
	CM	TPM 
	XIF
	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	*
	IFT	TPMODE=1 
	LDK	A2,DLE 
	CF	A5,WRIDLE	SEND AN EXTRA DLE 
	XIF
	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
* 
* 
*		TRSYNC : TRANSMIT SYNC SEQUENCE
* 
TRSYNC	EQU	*
	CF	A5,CHALTI	HALT INPUT IF NOT DONE
	CF	A5,CSYNCO	START OUTPUT WITH SYNC DEF
	CF	A5,READ	WAIT FOR OUTPUT INTERRUPT 
* 
* 
*		SEND 4 SYN-CHARACTERS
* 
	LDK	A3,4 
TRS100	EQU	*
	LDK	A2,SYN 
	CF	A5,WRITE	SEND CHARACTER 
	SUK	A3,1 
	RB(NZ)	TRS100
	RTN	A5	RETURN TO CALLER
	EJECT
* 
* 
*		CSYNCI :SEND SYNC-PATTERN FOR INPUT DATA 
* 
CSYNCI	EQU	*
	LD	A2,PFPOST 
	RF(NZ)	CSYN:I	WAIT FOR POWER UP
	CF	A5,CHALTI	STOP INPUT
	ST	A5,DCLCI	SET INPUT ACTIVE FLAG
	IFT	P6805=1
	LDK	A2,PARITY	CHAR PARITY FUNCTION FOR LC
	CIO	A2,1,LCUIN	START I/O 
	LDK	A2,SYNC	SYNC PATTERN 
	OTR	A2,1,LCUIN	SEND INPUT SYNC-PATTERN TO LC 
	XIF
	IFT	P6805=0
	LDKL	A2,CBCARR+SYNC	DEF SYNC-PATTERN 
	CIO	A2,1,LCUIN	SEND INPUT SYNC-PATTERN TO LC 
	XIF
CSYN:I	EQU	*
	RTN	A5	RETURN TO CALLER
	EJECT
* 
* 
*		CHALTI : HALT INPUT CHANNEL
* 
CHALTI	EQU	*
	IFT	P6805=1
	LDK	A2,CBSTOP	STOP FUNCTION BIT
	XIF
	CIO	A2,0,LCUIN	HALT INPUT
	CM	DCLCI	CLEAR INPUT ACTIVE FLAG 
	SST	A2,LCUIN	READ STATUS 
	IFF	LOGG=0 
	CF	A5,LOGSST	LOGG INPUT STATUS 
	XIF
	RTN	A5	RETURN TO CALLER
	EJECT
* 
* 
*		CSYNCO : START TRANSMITTER WITH SYNC DEF 
* 
CSYNCO	EQU	*
	LD	A2,PFPOST 
	RF(NZ)	CSYN:O	WAIT FOR POWER UP
	IFT	P6805=1
	LDK	A2,PARITY	CHAR PARITY CHECK BY CU
	CIO	A2,1,LCUUT	CIO START 
	RF(A)	CSYNC1	ACCEPTED
	SST	A2,LCUUT	TRY TO READ STATUS
	ABL	BRM	NOT ACCEPTED TIMEOUT REQUEST 
CSYNC1	EQU	*
	LDK	A2,SYNC	DEF SYNC PATTERN 
	OTR	A2,1,LCUUT	SEND SYNC PATTERN 
	XIF
	IFT	P6805=0
	CIO	A2,1,LCUUT	START TRANSMITTER 
	XIF
CSYN:O	EQU	*
	RTN	A5	RETURN TO CALLER
	EJECT
* 
* 
*		CHALTO : HALT OUTPUT CHANNEL 
* 
CHALTO	EQU	*
	IFT	P6805=1
	LDK	A2,CBSTOP	STOP FUNCTION
	XIF
	CIO	A2,0,LCUUT	HALT OUTPUT 
	IFT	P6805=1
	CF	A5,READ	WAIT FOR INTERRUPT
	XIF
	SST	A2,LCUUT	GET STATUS
	RTN	A5	RETURN TO CALLER
	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
	C2	TPM 
	RF(NZ)	IHLC10	DO NOT SKIP SYNC IN TRANSPARENT TEXT 
	C2	SYNSW 
	RF(NZ)	IHLC05	DO NOT SKIP SYNS IN BCC FRAME
	CWK	A2,SYNC
	RF(E)	READ 
IHLC05	EQU	*
	IFT	CODE=0 
	XRR	A7,A2	CALCULATE LRC
	XIF
	IFT	CODE=1 
	CF	A5,CRCCAL	CALCULATE CRC 
	LC	A2,TASCII,A2	TRANSLATE TO ASCII 
	XIF
IHLC10	EQU	*
	LDR	A1,A2
	ORKL	A1,/FF00	SET FLAG FOR CARRIER ON
	ST	A1,DCLCI	SET INPUT ACTIV FLAG 
	CM	DCSTCU	CLEAR SST SAVE 
IHIN10	EQU	*
	RTN	A5	RETURN TO CALLER
IHIN20	EQU	*
	CF	A5,SST	PERFORM SST
	ABL	BRM
	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	EQU	* 
	SST	A2,LCUIN	GET STATUS
	LDR	A1,A2
	IFT	LOGG=1 
	CF	A5,LOGSST	LOGG SST INFORMATION
	XIF
	ANK	A2,SBERR	ERROR BIT SET 
	RF(NZ)	SST050	YES
	IFT	P6805=0
	LD	A2,DCLCI	INPUT STATUS 
	RF(Z)	SST125	INPUT NOT ACTIVE  IGNORE
	RF(N)	SST100	INPUT ACTIVE WITH DATA
	LDKL	A2,CBCARR+SYNC	DEF SYNC PATTERN 
	CIO	A2,1,LCUIN	START INPUT AGAIN 
	RF	SST125	RETURN TO DISPATCHER 
	XIF
	IFT	P6805=1
	RF	SST100
	XIF
SST050	EQU	*
	ANK	A2,SBCARR	CARRIR OFF 
	RF(Z)	SST075	NO
	LD	A2,DCLCI	INPUT STATUS 
	RF(Z)	SST125	NOT ACTIVE IGNORE CARRIER OFF 
	RF	SST100	ACTIVE 
SST075	EQU	*
	LDR	A2,A1
	ANK	A2,SBTHRU	THROUGHPUT ERROR 
	ABL(NZ)	BRM140	YES 
* 
SST100	EQU	*
	LDR	A2,A1
	ANK	A2,SBNOOP	NOT OPRABLE
	RF(Z)	SST200 
	CF	A15,STREG	SAVE REGISTERS
	CF	A15,SETIME	DELAY 1 SEC
	DATA	SST150,10 
SST125	EQU	*
	ABL	TDISP	RETURN TO DISPATCHER 
* 
SST150	EQU	*
	CF	A15,LDREG	LOAD REGISTERS
SST200	EQU	*
	LDR	A2,A1
	ANK	A2,SBCARR	CHECK STATUS IF CARRIER OFF
	RF(Z)	SST225	NO
	XRK	A1,SBCARR	CHECK STATUS IF ONLY CARRIER OFF 
	RF(Z)	SST250	YES 
SST225	EQU	*
	ST	A1,DCSTCU	STORE STATUS AS CURRENT STATUS
	CF	A15,CKMESS	CHECK IF STATUS CHANGE 
SST250	EQU	*
	RTN	A5	RETURN TO CALLER
	EJECT
* 
* 
*	WRITE FROM OR READ ONE CHARACTER TO A2
* 
* 
WRITE	EQU	* 
	IFT	CODE=1 
	C2	TPM 
	RF(Z)	WRIT02	NOT TRANSPARENT MODE
	CWK	A2,DLE	CHECK IF DLE
	RF(NZ)	WRIT05	NO 
	CF	A5,WRIDLE	SEND EXTRA DLE
	LDK	A2,DLE 
	RF	WRIT05
WRIT02	EQU	*
	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
WRIT15	EQU	*
	IFF	LOGG=0 
	CF	A5,LOGOUT	LOG OUTPUT CHARACTER
	XIF
* 
READ	CF	A15,STREG 
	ABL	TDISP
	IFT	CODE=1 
WRIDLE	EQU	*
	OTR	A2,0,LCUUT 
	RB(NA)	READ	THROUGHPUT ERROR 
	RB	WRIT15
	XIF
	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
	CM	DCLCI	INIT LINE CONTROL UNIT INFO 
	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	EQU	* 
	LD	A1,DCONOF	CHECK THE ON-/OFF LINESWITCH
	ANK	A1,/40	IF IT IS POLL TIME OUT
	RF(Z)	CPTIM1	NO
	AN	A1,DCSTOL	IS OLD STATUS POLL TIME OUT 
	RF(Z)	CPTIM2	NO
CPTIM1	EQU	*
	CM	DCONOF	INDICATE POLLING 
CPTIM2	EQU	*
	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,CHALTI	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=2 
	DATA	*+RLINK 
	RES	RBUFL+3
	IFF	RBUFNR=3 
	DATA	*+RLINK 
	RES	RBUFL+3
	IFF	RBUFNR=4 
	DATA	*+RLINK 
	RES	RBUFL+3
	XIF
	DATA	*+RLINK 
	RES	RBUFL+3
	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


LICO:T	EQU	*
	DATA	/2041,/4243,/4445,/4647	/00-/07 
	DATA	/4849,/5B2E,/3C28,/2B21	/08-/0F 
	DATA	/264A,/4B4C,/4D4E,/4F50	/10-/17 
	DATA	/5152,/5D24,/2A29,/3B5E	/18-/1F 
	DATA	/2D2F,/5354,/5556,/5758	/20-/27 
	DATA	/595A,/7C2C,/255F,/3E3F	/28-/2F 
	DATA	/3031,/3233,/3435,/3637	/30-37
	DATA	/3839,/3A23,/4027,/3D22	/38-3F
	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

0x00000…00036 (0, 0, 400)   Head {h00=0x0032, h01=0x0050, text=» IDENT DRDC15  PRR 10.0 80-05-07  870105041000«, t00=0x0000, t01=0x0004}
0x00036…0003e               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x0003e…00062               Head {h00=0x0020, h01=0x0050, text=»   =11, DC:MIN HEADER LENGTH«, t00=0x0000, t01=0x0042}
0x00062…0007e               Head {h00=0x0018, h01=0x0050, text=»   REL 10.1 80-01-25«, t00=0x0000, t01=0x0066}
0x0007e…000a2               Head {h00=0x0020, h01=0x0050, text=»   =10,WRONG LABEL IF SALCUZ«, t00=0x0000, t01=0x0082}
0x000a2…000be               Head {h00=0x0018, h01=0x0050, text=»   REL 10.1 79-12-04«, t00=0x0000, t01=0x00a6}
0x000be…000e8               Head {h00=0x0026, h01=0x0050, text=»   =9, OLLES POWER UP+MODEM NOT OP«, t00=0x0000, t01=0x00c2}
0x000e8…00104               Head {h00=0x0018, h01=0x0050, text=»   REL 10.1 79-10-26«, t00=0x0000, t01=0x00ec}
0x00104…0010c               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0108}
0x0010c…0012a               Head {h00=0x001a, h01=0x0050, text=»   REL 10.1 ADAPTATION«, t00=0x0000, t01=0x0110}
0x0012a…00146               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-08-16 «, t00=0x0000, t01=0x012e}
0x00146…0016a               Head {h00=0x0020, h01=0x0050, text=»   =8, ASCII-MODE FOR SALCUZ«, t00=0x0000, t01=0x014a}
0x0016a…00186               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0000, t01=0x016e}
0x00186…001b0               Head {h00=0x0026, h01=0x0050, text=»   =7, ACK IN CONVERSATIONAL MODE «, t00=0x0000, t01=0x018a}
0x001b0…001cc               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-07-19 «, t00=0x0001, t01=0x0024}
0x001cc…001fa               Head {h00=0x002a, h01=0x0050, text=»   =6, DCTASK BUFFER ADDRESS DESTROYED«, t00=0x0001, t01=0x0040}
0x001fa…00216               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x006e}
0x00216…0023e               Head {h00=0x0024, h01=0x0050, text=»   =5, INCOMPLETE POLL SEQUENCE «, t00=0x0001, t01=0x008a}
0x0023e…0025a               Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-05-23 «, t00=0x0001, t01=0x00b2}
0x0025a…0027c               Head {h00=0x001e, h01=0x0050, text=»   =3, TRANSFER PARAMETER «, t00=0x0001, t01=0x00ce}
0x0027c…00298               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x00f0}
0x00298…002b8               Head {h00=0x001c, h01=0x0050, text=»   =4, ANY MESSAGE ORDER«, t00=0x0001, t01=0x010c}
0x002b8…002d4               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-04-06 «, t00=0x0001, t01=0x012c}
0x002d4…002f2               Head {h00=0x001a, h01=0x0050, text=»   =2, ABORT HANDLING «, t00=0x0001, t01=0x0148}
0x002f2…0030e               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-29 «, t00=0x0001, t01=0x0166}
0x0030e…0032c               Head {h00=0x001a, h01=0x0050, text=»   =1, MSR-INSTRUCTION«, t00=0x0001, t01=0x0182}
0x0032c…00348               Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 78-11-14 «, t00=0x0002, t01=0x0010}
0x00348…00364               Head {h00=0x0018, h01=0x0050, text=»   REL 8.2 78-11-14 «, t00=0x0002, t01=0x002c}
0x00364…0036c               Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0048}
0x0036c…00376               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0050}
0x00376…00380               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005a}
0x00380…003b6               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x0064}
0x003b6…003c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x009a}
0x003c0…003e8               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x00a4}
0x003e8…003f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00cc}
0x003f2…00420               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x00d6}
0x00420…00452               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0002, t01=0x0104}
0x00452…00476               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0002, t01=0x0136}
0x00476…00480               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x015a}
0x00480…0048a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0164}
0x0048a…00494               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x016e}
0x00494…0049e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0178}
0x0049e…004a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0182}
0x004a8…004e4               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0002, t01=0x018c}
0x004e4…004f2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0038}
0x004f2…004fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0046}
0x004fc…00506               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0050}
0x00506…0051c               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0003, t01=0x005a}
0x0051c…00526               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0070}
0x00526…0055c               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0003, t01=0x007a}
0x0055c…00582               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x00b0}
0x00582…005a8               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x00d6}
0x005a8…005ce               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0003, t01=0x00fc}
0x005ce…005f4               Head {h00=0x0022, h01=0x0050, text=» ENTRY DW1500 DWT FOR DC TASK «, t00=0x0003, t01=0x0122}
0x005f4…005fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0148}
0x005fe…00608               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0152}
0x00608…00626               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0003, t01=0x015c}
0x00626…00630               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x017a}
0x00630…0063a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0184}
0x0063a…00660               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0003, t01=0x018e}
0x00660…0068c               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0004, t01=0x0024}
0x0068c…006b4               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0004, t01=0x0050}
0x006b4…006d8               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0004, t01=0x0078}
0x006d8…006f8               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x009c}
0x006f8…00718               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x00bc}
0x00718…00736               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x00dc}
0x00736…00754               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0004, t01=0x00fa}
0x00754…00782               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x0118}
0x00782…007ae               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0004, t01=0x0146}
0x007ae…007da               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0004, t01=0x0172}
0x007da…00802               Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0005, t01=0x000e}
0x00802…0082c               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0005, t01=0x0036}
0x0082c…00856               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0005, t01=0x0060}
0x00856…0087a               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x008a}
0x0087a…008a0               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0005, t01=0x00ae}
0x008a0…008ce               Head {h00=0x002a, h01=0x0050, text=» EXTRN DC:MIN MOVE DATA TO USER BUFFER«, t00=0x0005, t01=0x00d4}
0x008ce…008fe               Head {h00=0x002c, h01=0x0050, text=» EXTRN DC:MOT MOVE DATA FROM USER BUFFER«, t00=0x0005, t01=0x0102}
0x008fe…00932               Head {h00=0x0030, h01=0x0050, text=» EXTRN DISEND COMPLETE REQUEST AND DISPATCH «, t00=0x0005, t01=0x0132}
0x00932…00960               Head {h00=0x002a, h01=0x0050, text=» EXTRN PFPOST WAIT FOR POWER UP IF SET«, t00=0x0005, t01=0x0166}
0x00960…0096e (6, 0, 400)   Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0004}
0x0096e…00978               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0012}
0x00978…00982               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x001c}
0x00982…0098c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0026}
0x0098c…00996               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0030}
0x00996…009d0               Head {h00=0x0036, h01=0x0050, text=»*   STANDARD INTERFACE PART FOR DATA COMMUNICATION«, t00=0x0006, t01=0x003a}
0x009d0…009da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0074}
0x009da…009e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x007e}
0x009e4…009ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0088}
0x009ee…009f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0092}
0x009f8…00a0e               Head {h00=0x0012, h01=0x0050, text=»* DWT CONTENTS«, t00=0x0006, t01=0x009c}
0x00a0e…00a18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b2}
0x00a18…00a66               Head {h00=0x004a, h01=0x0050, text=»* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)«, t00=0x0006, t01=0x00bc}
0x00a66…00a70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x010a}
0x00a70…00a7e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0114}
0x00a7e…00abe               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0006, t01=0x0122}
0x00abe…00ac8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0162}
0x00ac8…00af6               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x016c}
0x00af6…00b00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000a}
0x00b00…00b0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0014}
0x00b0a…00b34               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 2000 RECEIVE BUFFER LENGTH«, t00=0x0007, t01=0x001e}
0x00b34…00b4a               Head {h00=0x0012, h01=0x0050, text=»RBUFL EQU X:A «, t00=0x0007, t01=0x0048}
0x00b4a…00b6e               Head {h00=0x0020, h01=0x0050, text=»X:B EQU /60 DCTASK FILE CODE«, t00=0x0007, t01=0x005e}
0x00b6e…00b84               Head {h00=0x0012, h01=0x0050, text=»DC15FC EQU /60«, t00=0x0007, t01=0x0082}
0x00b84…00bac               Head {h00=0x0024, h01=0x0050, text=»X:C EQU 1 IF 1 INTERRUPT LOGGING«, t00=0x0007, t01=0x0098}
0x00bac…00bc0               Head {h00=0x0010, h01=0x0050, text=»LOGG EQU X:C«, t00=0x0007, t01=0x00c0}
0x00bc0…00be6               Head {h00=0x0022, h01=0x0050, text=»X:D EQU 600 POLL TIMEOUT VALUE«, t00=0x0007, t01=0x00d4}
0x00be6…00bfc               Head {h00=0x0012, h01=0x0050, text=»TIMPOL EQU X:D«, t00=0x0007, t01=0x00fa}
0x00bfc…00c2a               Head {h00=0x002a, h01=0x0050, text=»X:E EQU 1 STATUS AND RVI HANDLING IF=1«, t00=0x0007, t01=0x0110}
0x00c2a…00c3e               Head {h00=0x0010, h01=0x0050, text=»STAT EQU X:E«, t00=0x0007, t01=0x013e}
0x00c3e…00c6a               Head {h00=0x0028, h01=0x0050, text=»X:F EQU 1 READ COMMAND HANDLING IF=1«, t00=0x0007, t01=0x0152}
0x00c6a…00c7e               Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:F«, t00=0x0007, t01=0x017e}
0x00c7e…00ca8 (8, 0, 400)   Head {h00=0x0026, h01=0x0050, text=»X:G EQU 254 TRANSMIT BLOCK LENGTH «, t00=0x0008, t01=0x0004}
0x00ca8…00cbe               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU X:G «, t00=0x0008, t01=0x002e}
0x00cbe…00cea               Head {h00=0x0028, h01=0x0050, text=»X:H EQU 0 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0008, t01=0x0044}
0x00cea…00cfe               Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:H«, t00=0x0008, t01=0x0070}
0x00cfe…00d2c               Head {h00=0x002a, h01=0x0050, text=»X:I EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0008, t01=0x0084}
0x00d2c…00d42               Head {h00=0x0012, h01=0x0050, text=»SPECP EQU X:I «, t00=0x0008, t01=0x00b2}
0x00d42…00d72               Head {h00=0x002c, h01=0x0050, text=»X:J EQU 1 IF = 1  LINE SPEED SET TO HIGH«, t00=0x0008, t01=0x00c8}
0x00d72…00d9e               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0008, t01=0x00f8}
0x00d9e…00db4               Head {h00=0x0012, h01=0x0050, text=»SPEED EQU X:J «, t00=0x0008, t01=0x0124}
0x00db4…00de2               Head {h00=0x002a, h01=0x0050, text=»X:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0008, t01=0x013a}
0x00de2…00df6               Head {h00=0x0010, h01=0x0050, text=»MSV1 EQU X:K«, t00=0x0008, t01=0x0168}
0x00df6…00e28               Head {h00=0x002e, h01=0x0050, text=»X:L EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0008, t01=0x017c}
0x00e28…00e3e               Head {h00=0x0012, h01=0x0050, text=»RBUFNR EQU X:L«, t00=0x0009, t01=0x001e}
0x00e3e…00e70               Head {h00=0x002e, h01=0x0050, text=»X:M EQU 1 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x0009, t01=0x0034}
0x00e70…00e86               Head {h00=0x0012, h01=0x0050, text=»P6805 EQU X:M «, t00=0x0009, t01=0x0066}
0x00e86…00e9a               Head {h00=0x0010, h01=0x0050, text=»X:N EQU /02 «, t00=0x0009, t01=0x007c}
0x00e9a…00eae               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0009, t01=0x0090}
0x00eae…00ede               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU X:N DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x00a4}
0x00ede…00eea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x00d4}
0x00eea…00efe               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0009, t01=0x00e0}
0x00efe…00f2e               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x00f4}
0x00f2e…00f3a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0124}
0x00f3a…00f4c               Head {h00=0x000e, h01=0x0050, text=»X:O EQU 0 «, t00=0x0009, t01=0x0130}
0x00f4c…00f7e               Head {h00=0x002e, h01=0x0050, text=»IBMCHR EQU X:O IF 1 IBM CHARACTER HANDLING«, t00=0x0009, t01=0x0142}
0x00f7e…00fb0               Head {h00=0x002e, h01=0x0050, text=»X:P EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x0009, t01=0x0174}
0x00fb0…00fc6               Head {h00=0x0012, h01=0x0050, text=»MESPAS EQU X:P«, t00=0x000a, t01=0x0016}
0x00fc6…00ffe               Head {h00=0x0034, h01=0x0050, text=»X:Q EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000a, t01=0x002c}
0x00ffe…01014               Head {h00=0x0012, h01=0x0050, text=»EM3270 EQU X:Q«, t00=0x000a, t01=0x0064}
0x01014…01028               Head {h00=0x0010, h01=0x0050, text=»X:R EQU 1000«, t00=0x000a, t01=0x007a}
0x01028…01050               Head {h00=0x0024, h01=0x0050, text=»TBUFL EQU X:R MMU BUFFER LENGTH «, t00=0x000a, t01=0x008e}
0x01050…0107e               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000a, t01=0x00b6}
0x0107e…010ae               Head {h00=0x002c, h01=0x0050, text=»TSTREQ EQU 0 IF 1 TEST REQUEST HANDLING «, t00=0x000a, t01=0x00e4}
0x010ae…010de               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 0 SPECIAL CONDITION FOR DENMARK«, t00=0x000a, t01=0x0114}
0x010de…01116               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000a, t01=0x0144}
0x01116…0114a               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000a, t01=0x017c}
0x0114a…0117e               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000b, t01=0x0020}
0x0117e…011ae               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000b, t01=0x0054}
0x011ae…011ca               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000b, t01=0x0084}
0x011ca…0120a               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x00a0}
0x0120a…01220               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x00e0}
0x01220…01234               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x00f6}
0x01234…01274               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x010a}
0x01274…0128a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x014a}
0x0128a…012b6               Head {h00=0x0028, h01=0x0050, text=»TPMODE EQU 0 TRANSPARENT MODE IF = 1«, t00=0x000b, t01=0x0160}
0x012b6…012c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x018c}
0x012c0…012ce               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0008}
0x012ce…012d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0016}
0x012d8…012e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0020}
0x012e2…01314               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x002a}
0x01314…0131e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x005c}
0x0131e…0133c               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000c, t01=0x0066}
0x0133c…01346               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0084}
0x01346…01378               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x008e}
0x01378…01382               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00c0}
0x01382…013b4               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000c, t01=0x00ca}
0x013b4…013e2               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000c, t01=0x00fc}
0x013e2…013ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x012a}
0x013ec…01400               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x000c, t01=0x0134}
0x01400…0140a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0148}
0x0140a…01414               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0152}
0x01414…0144e               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000c, t01=0x015c}
0x0144e…01480               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000d, t01=0x0008}
0x01480…0148a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x003a}
0x0148a…0149e               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x000d, t01=0x0044}
0x0149e…014a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0058}
0x014a8…014de               Head {h00=0x0032, h01=0x0050, text=»DEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION «, t00=0x000d, t01=0x0062}
0x014de…0150c               Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE«, t00=0x000d, t01=0x0098}
0x0150c…01516               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c6}
0x01516…01524               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x00d0}
0x01524…0152e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00de}
0x0152e…0154a               Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x000d, t01=0x00e8}
0x0154a…01554               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0104}
0x01554…01588               Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000d, t01=0x010e}
0x01588…01592               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0142}
0x01592…015a8               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000d, t01=0x014c}
0x015a8…015c0               Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000d, t01=0x0162}
0x015c0…015cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x017a}
0x015cc…015d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0186}
0x015d6…015ec               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000d, t01=0x0190}
0x015ec…01606               Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000e, t01=0x0016}
0x01606…01612               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0030}
0x01612…0161c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003c}
0x0161c…01654               Head {h00=0x0034, h01=0x0050, text=»DWTTP EQU START+/00 TIMER POINTER ORDER PROCESS «, t00=0x000e, t01=0x0046}
0x01654…01686               Head {h00=0x002e, h01=0x0050, text=»DWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE«, t00=0x000e, t01=0x007e}
0x01686…016ae               Head {h00=0x0024, h01=0x0050, text=»DWTSQ EQU START+/04 STATUS QUEUE«, t00=0x000e, t01=0x00b0}
0x016ae…016d8               Head {h00=0x0026, h01=0x0050, text=»DWTRQ EQU START+/06 RECEIVE QUEUE «, t00=0x000e, t01=0x00d8}
0x016d8…0170a               Head {h00=0x002e, h01=0x0050, text=»DWTBUF EQU START+/08 DEVICE BUFFER ADDRESS«, t00=0x000e, t01=0x0102}
0x0170a…01736               Head {h00=0x0028, h01=0x0050, text=»DWTCUR EQU START+/0A CURSOR ADDRESS «, t00=0x000e, t01=0x0134}
0x01736…01766               Head {h00=0x002c, h01=0x0050, text=»DWTTIM EQU START+/0C REQUEST TIMER VALUE«, t00=0x000e, t01=0x0160}
0x01766…01770               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0190}
0x01770…0177e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x000a}
0x0177e…01788               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0018}
0x01788…017a2               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000f, t01=0x0022}
0x017a2…017ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x003c}
0x017ac…017b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0046}
0x017b6…017c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0050}
0x017c0…017d2               Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000f, t01=0x005a}
0x017d2…017dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x006c}
0x017dc…017f0               Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000f, t01=0x0076}
0x017f0…01804               Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x000f, t01=0x008a}
0x01804…01826               Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x000f, t01=0x009e}
0x01826…01840               Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x000f, t01=0x00c0}
0x01840…01868               Head {h00=0x0024, h01=0x0050, text=»* /39: SET REQUEST TIMEOUT VALUE«, t00=0x000f, t01=0x00da}
0x01868…01872               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0102}
0x01872…0187c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x010c}
0x0187c…0189e               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x000f, t01=0x0116}
0x0189e…018a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0138}
0x018a8…018b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0142}
0x018b2…018dc               Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x000f, t01=0x014c}
0x018dc…0190a               Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x000f, t01=0x0176}
0x0190a…0192e               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x0010, t01=0x0014}
0x0192e…01956               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x0010, t01=0x0038}
0x01956…01986               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x0010, t01=0x0060}
0x01986…019b0               Head {h00=0x0026, h01=0x0050, text=»DCLCI DATA 0 DC UNIT INPUT STATUS «, t00=0x0010, t01=0x0090}
0x019b0…019be               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x00ba}
0x019be…019c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c8}
0x019c8…019e8               Head {h00=0x001c, h01=0x0050, text=»* DC TASK ADDRESS BLOCK «, t00=0x0010, t01=0x00d2}
0x019e8…019f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f2}
0x019f2…01a1a               Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDICATES NO MMU BUFFER «, t00=0x0010, t01=0x00fc}
0x01a1a…01a3c               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0010, t01=0x0124}
0x01a3c…01a6a               Head {h00=0x002a, h01=0x0050, text=»DC15DC DATA DCACTD ACTIVATION ADDRESS «, t00=0x0010, t01=0x0146}
0x01a6a…01a94               Head {h00=0x0026, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ADDRESS «, t00=0x0010, t01=0x0174}
0x01a94…01abc               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x000e}
0x01abc…01ade               Head {h00=0x001e, h01=0x0050, text=» DATA 6 HEADER LENGTH =11 «, t00=0x0011, t01=0x0036}
0x01ade…01ae8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0058}
0x01ae8…01b06               Head {h00=0x001a, h01=0x0050, text=»* DRIVER ADDRESS BLOCK«, t00=0x0011, t01=0x0062}
0x01b06…01b10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0080}
0x01b10…01b34               Head {h00=0x0020, h01=0x0050, text=» DATA BUFLEN MMU BUFFER SIZE«, t00=0x0011, t01=0x008a}
0x01b34…01b56               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0011, t01=0x00ae}
0x01b56…01b82               Head {h00=0x0028, h01=0x0050, text=»DC15AD DATA DCACT ACTIVATION ADDRESS«, t00=0x0011, t01=0x00d0}
0x01b82…01bba               Head {h00=0x0034, h01=0x0050, text=» DATA ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS «, t00=0x0011, t01=0x00fc}
0x01bba…01be2               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0011, t01=0x0134}
0x01be2…01c04               Head {h00=0x001e, h01=0x0050, text=» DATA 6 HEADER LENGTH =11 «, t00=0x0011, t01=0x015c}
0x01c04…01c0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x017e}
0x01c0e…01c3e               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x0011, t01=0x0188}
0x01c3e…01c50               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x0012, t01=0x0028}
0x01c50…01c76               Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x0012, t01=0x003a}
0x01c76…01c88               Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x0012, t01=0x0060}
0x01c88…01c90               Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x0072}
0x01c90…01ca4               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x0012, t01=0x007a}
0x01ca4…01cbc               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x0012, t01=0x008e}
0x01cbc…01cc8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00a6}
0x01cc8…01cdc               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x0012, t01=0x00b2}
0x01cdc…01cf0               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x0012, t01=0x00c6}
0x01cf0…01cfc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00da}
0x01cfc…01d0a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x00e6}
0x01d0a…01d14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00f4}
0x01d14…01d1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00fe}
0x01d1e…01d46               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x0012, t01=0x0108}
0x01d46…01d50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0130}
0x01d50…01d64               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x0012, t01=0x013a}
0x01d64…01d88               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0012, t01=0x014e}
0x01d88…01da2               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0012, t01=0x0172}
0x01da2…01db8               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0012, t01=0x018c}
0x01db8…01de2               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0013, t01=0x0012}
0x01de2…01dee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x003c}
0x01dee…01e02               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0013, t01=0x0048}
0x01e02…01e24               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DCRD READ SPECIFIC «, t00=0x0013, t01=0x005c}
0x01e24…01e3c               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x0013, t01=0x007e}
0x01e3c…01e50               Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x0013, t01=0x0096}
0x01e50…01e68               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/06 «, t00=0x0013, t01=0x00aa}
0x01e68…01e90               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x0013, t01=0x00c2}
0x01e90…01ea4               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0013, t01=0x00ea}
0x01ea4…01ebc               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x0013, t01=0x00fe}
0x01ebc…01eda               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCSS SET STATUS«, t00=0x0013, t01=0x0116}
0x01eda…01ef2               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/38 «, t00=0x0013, t01=0x0134}
0x01ef2…01f1a               Head {h00=0x0024, h01=0x0050, text=» ABL(Z) REQTIM SET REQUEST TIMER«, t00=0x0013, t01=0x014c}
0x01f1a…01f26               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0174}
0x01f26…01f2e               Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0180}
0x01f2e…01f42               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=0 «, t00=0x0013, t01=0x0188}
0x01f42…01f5a               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/37 «, t00=0x0014, t01=0x000c}
0x01f5a…01f82               Head {h00=0x0024, h01=0x0050, text=» RF(Z) REQTIM SET REQUEST TIMER «, t00=0x0014, t01=0x0024}
0x01f82…01f8e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x004c}
0x01f8e…01fa0               Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x0014, t01=0x0058}
0x01fa0…01fae               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x006a}
0x01fae…01fb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0078}
0x01fb8…01fc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0082}
0x01fc2…01fe2               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x0014, t01=0x008c}
0x01fe2…01fec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00ac}
0x01fec…01ff6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00b6}
0x01ff6…0200a               Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x0014, t01=0x00c0}
0x0200a…02032               Head {h00=0x0024, h01=0x0050, text=» SUR A1,A1 PRESET RETURN CODE =4«, t00=0x0014, t01=0x00d4}
0x02032…0204c               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0014, t01=0x00fc}
0x0204c…02062               Head {h00=0x0012, h01=0x0050, text=» LDR A7,A7  =4«, t00=0x0014, t01=0x0116}
0x02062…0208c               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ANYMSG ANY MESSAGE ORDER =4«, t00=0x0014, t01=0x012c}
0x0208c…02098               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0156}
0x02098…020ac               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0014, t01=0x0162}
0x020ac…020c6               Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x0014, t01=0x0176}
0x020c6…020de               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/02 «, t00=0x0014, t01=0x0190}
0x020de…02106               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x0015, t01=0x0018}
0x02106…0210e               Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0040}
0x0210e…02130               Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x0015, t01=0x0048}
0x02130…02152               Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x0015, t01=0x006a}
0x02152…0215c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x008c}
0x0215c…02166               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0096}
0x02166…02180               Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x0015, t01=0x00a0}
0x02180…0218a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ba}
0x0218a…02194               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00c4}
0x02194…021b2               Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0015, t01=0x00ce}
0x021b2…021ca               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0015, t01=0x00ec}
0x021ca…021f4               Head {h00=0x0026, h01=0x0050, text=»*   STATUS CHANGE ON DC EQUIPMENT «, t00=0x0015, t01=0x0104}
0x021f4…0221c               Head {h00=0x0024, h01=0x0050, text=»*   SPONTANOUS MESSAGE RECEPTION«, t00=0x0015, t01=0x012e}
0x0221c…02226               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0156}
0x02226…0223a               Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0015, t01=0x0160}
0x0223a…0226a               Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0015, t01=0x0174}
0x0226a…0227e               Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0016, t01=0x0014}
0x0227e…022a2               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0016, t01=0x0028}
0x022a2…022bc               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0016, t01=0x004c}
0x022bc…022ca               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0066}
0x022ca…022fc               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0016, t01=0x0074}
0x022fc…02306               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00a6}
0x02306…02324               Head {h00=0x001a, h01=0x0050, text=»*   ANY MESSAGE ORDER «, t00=0x0016, t01=0x00b0}
0x02324…0232e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ce}
0x0232e…02354               Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0016, t01=0x00d8}
0x02354…0235c               Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00fe}
0x0235c…02392               Head {h00=0x0032, h01=0x0050, text=»ANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4«, t00=0x0016, t01=0x0106}
0x02392…023b0               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCRD10 NO!! =4 «, t00=0x0016, t01=0x013c}
0x023b0…023dc               Head {h00=0x0028, h01=0x0050, text=» RF ENDIO YES!! COMPLETE REQUEST =4 «, t00=0x0016, t01=0x015a}
0x023dc…023e8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0186}
0x023e8…023f6 (23, 0, 400)  Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0004}
0x023f6…02400               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0012}
0x02400…0240a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x001c}
0x0240a…02428               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0017, t01=0x0026}
0x02428…02432               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0044}
0x02432…0243c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x004e}
0x0243c…0247e               Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0017, t01=0x0058}
0x0247e…024bc               Head {h00=0x003a, h01=0x0050, text=»*         FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0017, t01=0x009a}
0x024bc…024c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00d8}
0x024c6…024d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00e2}
0x024d0…024e4               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0017, t01=0x00ec}
0x024e4…0250e               Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0017, t01=0x0100}
0x0250e…0251a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x012a}
0x0251a…0252e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0017, t01=0x0136}
0x0252e…02558               Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0017, t01=0x014a}
0x02558…0256c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0017, t01=0x0174}
0x0256c…02582               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x0017, t01=0x0188}
0x02582…025ae               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0018, t01=0x000e}
0x025ae…025c0               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0018, t01=0x003a}
0x025c0…025d4               Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x0018, t01=0x004c}
0x025d4…025fc               Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x0018, t01=0x0060}
0x025fc…02610               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0018, t01=0x0088}
0x02610…0263c               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x0018, t01=0x009c}
0x0263c…02648               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00c8}
0x02648…02674               Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x0018, t01=0x00d4}
0x02674…0267c               Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0100}
0x0267c…02690               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0018, t01=0x0108}
0x02690…026be               Head {h00=0x002a, h01=0x0050, text=» LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS «, t00=0x0018, t01=0x011c}
0x026be…026d6               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTBUF,A6«, t00=0x0018, t01=0x014a}
0x026d6…02702               Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBRL,A8 CURSOR ADDRESS WORD «, t00=0x0018, t01=0x0162}
0x02702…0271a               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTCUR,A6«, t00=0x0018, t01=0x018e}
0x0271a…02726               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0016}
0x02726…0274c               Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x0019, t01=0x0022}
0x0274c…02782               Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!!  SHOULD NOT BE IN DC:TAB «, t00=0x0019, t01=0x0048}
0x02782…027b0               Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x0019, t01=0x007e}
0x027b0…027de               Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x0019, t01=0x00ac}
0x027de…02808               Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x0019, t01=0x00da}
0x02808…02816               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0104}
0x02816…0281e               Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0112}
0x0281e…02826               Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x011a}
0x02826…0283a               Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x0019, t01=0x0122}
0x0283a…02860               Head {h00=0x0022, h01=0x0050, text=» LD A4,DCTAB DC:TAB ADDRESS =3«, t00=0x0019, t01=0x0136}
0x02860…02888               Head {h00=0x0024, h01=0x0050, text=» AD* A4,DCTAB LAST TABLE POS. =3«, t00=0x0019, t01=0x015c}
0x02888…028b6               Head {h00=0x002a, h01=0x0050, text=»DCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3«, t00=0x0019, t01=0x0184}
0x028b6…028e4               Head {h00=0x002a, h01=0x0050, text=» CW A4,DCTAB ALL ENTRIES CHECKED?? =3 «, t00=0x001a, t01=0x0022}
0x028e4…02912               Head {h00=0x002a, h01=0x0050, text=» RF(E) DCTP25 YES.DWT NOT IN TABLE =3 «, t00=0x001a, t01=0x0050}
0x02912…02934               Head {h00=0x001e, h01=0x0050, text=» CWR* A6,A4 IN TABLE ?? =3«, t00=0x001a, t01=0x007e}
0x02934…02952               Head {h00=0x001a, h01=0x0050, text=» RF(E) DCTP30 YES!! =3«, t00=0x001a, t01=0x00a0}
0x02952…02978               Head {h00=0x0022, h01=0x0050, text=» RB DCTP22 CHECK NEXT ENTRY =3«, t00=0x001a, t01=0x00be}
0x02978…02990               Head {h00=0x0014, h01=0x0050, text=»DCTP25 EQU *  =3«, t00=0x001a, t01=0x00e4}
0x02990…02998               Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00fc}
0x02998…029c0               Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x001a, t01=0x0104}
0x029c0…029d2               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x001a, t01=0x012c}
0x029d2…02a00               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x001a, t01=0x013e}
0x02a00…02a08               Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x016c}
0x02a08…02a36               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x001a, t01=0x0174}
0x02a36…02a4a               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x001b, t01=0x0012}
0x02a4a…02a66               Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x001b, t01=0x0026}
0x02a66…02a7e               Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x001b, t01=0x0042}
0x02a7e…02aaa               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x001b, t01=0x005a}
0x02aaa…02ab6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0086}
0x02ab6…02aca               Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x001b, t01=0x0092}
0x02aca…02aee               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x001b, t01=0x00a6}
0x02aee…02b02               Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x001b, t01=0x00ca}
0x02b02…02b2a               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x001b, t01=0x00de}
0x02b2a…02b3c               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001b, t01=0x0106}
0x02b3c…02b4a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0118}
0x02b4a…02b54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0126}
0x02b54…02b5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0130}
0x02b5e…02b6e               Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x001b, t01=0x013a}
0x02b6e…02b78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x014a}
0x02b78…02b82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0154}
0x02b82…02b9a               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001b, t01=0x015e}
0x02b9a…02bbc               Head {h00=0x001e, h01=0x0050, text=»*   SUCCESFUL TRANSMISSION«, t00=0x001b, t01=0x0176}
0x02bbc…02bd0               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001c, t01=0x0008}
0x02bd0…02bda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x001c}
0x02bda…02be4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0026}
0x02be4…02bf6               Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x001c, t01=0x0030}
0x02bf6…02c0c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001c, t01=0x0042}
0x02c0c…02c34               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x001c, t01=0x0058}
0x02c34…02c5a               Head {h00=0x0022, h01=0x0050, text=» CWK A1,BUFLEN ILLEGAL LENGTH?«, t00=0x001c, t01=0x0080}
0x02c5a…02c76               Head {h00=0x0018, h01=0x0050, text=» RF(G) IL:LEN YES!! «, t00=0x001c, t01=0x00a6}
0x02c76…02c82               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00c2}
0x02c82…02ca2               Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x001c, t01=0x00ce}
0x02ca2…02cc6               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ  QUEUE REQUEST«, t00=0x001c, t01=0x00ee}
0x02cc6…02cd8               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001c, t01=0x0112}
0x02cd8…02ce2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0124}
0x02ce2…02cec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x012e}
0x02cec…02cf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0138}
0x02cf6…02d04               Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x001c, t01=0x0142}
0x02d04…02d0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0150}
0x02d0e…02d18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x015a}
0x02d18…02d30               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001c, t01=0x0164}
0x02d30…02d4c               Head {h00=0x0018, h01=0x0050, text=»*   MESSAGE RECEIVED«, t00=0x001c, t01=0x017c}
0x02d4c…02d60               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001d, t01=0x0008}
0x02d60…02d6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x001c}
0x02d6a…02d74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0026}
0x02d74…02d86               Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x001d, t01=0x0030}
0x02d86…02da6               Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x001d, t01=0x0042}
0x02da6…02dd8               Head {h00=0x002e, h01=0x0050, text=» LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x001d, t01=0x0062}
0x02dd8…02dfe               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x001d, t01=0x0094}
0x02dfe…02e06               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00ba}
0x02e06…02e0e               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00c2}
0x02e0e…02e16               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00ca}
0x02e16…02e42               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 TAKE THE FIRST IN QUEUE «, t00=0x001d, t01=0x00d2}
0x02e42…02e5a               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x001d, t01=0x00fe}
0x02e5a…02e6c               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x001d, t01=0x0116}
0x02e6c…02e92               Head {h00=0x0022, h01=0x0050, text=» LD A3,-4,A4 EFFECTIVE LENGTH «, t00=0x001d, t01=0x0128}
0x02e92…02eaa               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x001d, t01=0x014e}
0x02eaa…02eb2               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x0166}
0x02eb2…02ed6               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x001d, t01=0x016e}
0x02ed6…02f04 (30, 0, 400)  Head {h00=0x002a, h01=0x0050, text=» CF A15,DC:MIN MOV DATA TO USER BUFFER«, t00=0x001e, t01=0x0004}
0x02f04…02f16               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001e, t01=0x0032}
0x02f16…02f1e               Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x0044}
0x02f1e…02f46               Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x001e, t01=0x004c}
0x02f46…02f58               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001e, t01=0x0074}
0x02f58…02f66               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x0086}
0x02f66…02f70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0094}
0x02f70…02f7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x009e}
0x02f7a…02f8e               Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x001e, t01=0x00a8}
0x02f8e…02f98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00bc}
0x02f98…02fa2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00c6}
0x02fa2…02fb6               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x001e, t01=0x00d0}
0x02fb6…02fc8               Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x001e, t01=0x00e4}
0x02fc8…02ff6               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x001e, t01=0x00f6}
0x02ff6…03012               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x001e, t01=0x0124}
0x03012…03032               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x001e, t01=0x0140}
0x03032…03046               Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x001e, t01=0x0160}
0x03046…0305e               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x001e, t01=0x0174}
0x0305e…03082               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 COMPLETE REQUEST «, t00=0x001e, t01=0x018c}
0x03082…03096               Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x001f, t01=0x0020}
0x03096…030ae               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x001f, t01=0x0034}
0x030ae…030c0               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x001f, t01=0x004c}
0x030c0…030ec               Head {h00=0x0028, h01=0x0050, text=» RB(Z) DCSS10 WACK HAS NOT BEEN SENT«, t00=0x001f, t01=0x005e}
0x030ec…03100               Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x001f, t01=0x008a}
0x03100…03130               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x001f, t01=0x009e}
0x03130…03148               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x001f, t01=0x00ce}
0x03148…0315a               Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x001f, t01=0x00e6}
0x0315a…03166               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x00f8}
0x03166…03174               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0104}
0x03174…0317c               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0112}
0x0317c…03186               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x011a}
0x03186…031ac               Head {h00=0x0022, h01=0x0050, text=»*   SET REQUEST TIMEOUT VALUE «, t00=0x001f, t01=0x0124}
0x031ac…031b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x014a}
0x031b6…031c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0154}
0x031c0…031c8               Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x015e}
0x031c8…031dc               Head {h00=0x0010, h01=0x0050, text=»REQTIM EQU *«, t00=0x001f, t01=0x0166}
0x031dc…03202               Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBCW,A8 TIMEOUT VALUE «, t00=0x001f, t01=0x017a}
0x03202…0322a               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTTIM,A6 SAVE IT IN DWT «, t00=0x0020, t01=0x0010}
0x0322a…0324e               Head {h00=0x0020, h01=0x0050, text=» RB DCTP30 TENDIO & DISPATCH«, t00=0x0020, t01=0x0038}
0x0324e…03256               Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x005c}
0x03256…03260               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0064}
0x03260…0328c               Head {h00=0x0028, h01=0x0050, text=»*   ILLEGAL APPLICATION BUFFER SIZE «, t00=0x0020, t01=0x006e}
0x0328c…03296               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x009a}
0x03296…0329e               Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00a4}
0x0329e…032da               Head {h00=0x0038, h01=0x0050, text=»IL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH «, t00=0x0020, t01=0x00ac}
0x032da…032fe               Head {h00=0x0020, h01=0x0050, text=» ABL DISEND COMPLETE REQUEST«, t00=0x0020, t01=0x00e8}
0x032fe…0330c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x010c}
0x0330c…03316               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x011a}
0x03316…03320               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0124}
0x03320…0332a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x012e}
0x0332a…03348               Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x0020, t01=0x0138}
0x03348…03352               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0156}
0x03352…0335c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0160}
0x0335c…03366               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x016a}
0x03366…03382               Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x0020, t01=0x0174}
0x03382…0338c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0190}
0x0338c…033a0               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x0021, t01=0x000a}
0x033a0…033b2               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0021, t01=0x001e}
0x033b2…033e4               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0021, t01=0x0030}
0x033e4…03404               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x0021, t01=0x0062}
0x03404…0341a               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x0021, t01=0x0082}
0x0341a…03430               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0021, t01=0x0098}
0x03430…03444               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x0021, t01=0x00ae}
0x03444…0345a               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x0021, t01=0x00c2}
0x0345a…03486               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x0021, t01=0x00d8}
0x03486…0349a               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x0021, t01=0x0104}
0x0349a…034b4               Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x0021, t01=0x0118}
0x034b4…034be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0132}
0x034be…034da               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x0021, t01=0x013c}
0x034da…034e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0158}
0x034e4…034f8               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x0021, t01=0x0162}
0x034f8…03514               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0021, t01=0x0176}
0x03514…03528 (34, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0022, t01=0x0004}
0x03528…0353c               Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x0022, t01=0x0018}
0x0353c…03562               Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x0022, t01=0x002c}
0x03562…0358a               Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x0022, t01=0x0052}
0x0358a…03594               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x007a}
0x03594…035b0               Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x0022, t01=0x0084}
0x035b0…035ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00a0}
0x035ba…035d2               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x0022, t01=0x00aa}
0x035d2…03604               Head {h00=0x002e, h01=0x0050, text=» LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE«, t00=0x0022, t01=0x00c2}
0x03604…03624               Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x0022, t01=0x00f4}
0x03624…03638               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x0022, t01=0x0114}
0x03638…0364e               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0022, t01=0x0128}
0x0364e…03662               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x0022, t01=0x013e}
0x03662…03676               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x0022, t01=0x0152}
0x03676…0368e               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x0022, t01=0x0166}
0x0368e…036a0               Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x0022, t01=0x017e}
0x036a0…036ae               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x0190}
0x036ae…036b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x000e}
0x036b8…036d6               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x0023, t01=0x0018}
0x036d6…036e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0036}
0x036e0…036f4               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x0023, t01=0x0040}
0x036f4…03710               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0023, t01=0x0054}
0x03710…03724               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0023, t01=0x0070}
0x03724…03752               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0023, t01=0x0084}
0x03752…0375c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00b2}
0x0375c…03786               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x0023, t01=0x00bc}
0x03786…037aa               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x0023, t01=0x00e6}
0x037aa…037c0               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x0023, t01=0x010a}
0x037c0…037d2               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0023, t01=0x0120}
0x037d2…03800               Head {h00=0x002a, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT IS NOT WRITING«, t00=0x0023, t01=0x0132}
0x03800…0382c               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x0023, t01=0x0160}
0x0382c…0383e               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0023, t01=0x018c}
0x0383e…03848               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x000e}
0x03848…03852               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0018}
0x03852…03864               Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x0024, t01=0x0022}
0x03864…03872               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x0034}
0x03872…0387c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0042}
0x0387c…03886               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x004c}
0x03886…038a4               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0024, t01=0x0056}
0x038a4…038ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0074}
0x038ae…038d8               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0024, t01=0x007e}
0x038d8…038e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00a8}
0x038e2…038ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00b2}
0x038ec…03900               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0024, t01=0x00bc}
0x03900…0392a               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0024, t01=0x00d0}
0x0392a…0394c               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0024, t01=0x00fa}
0x0394c…03960               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0024, t01=0x011c}
0x03960…03986               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0024, t01=0x0130}
0x03986…039a6               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0024, t01=0x0156}
0x039a6…039ba               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0024, t01=0x0176}
0x039ba…039ce               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0024, t01=0x018a}
0x039ce…039e0               Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0025, t01=0x000e}
0x039e0…039ee               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x0020}
0x039ee…039f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x002e}
0x039f8…03a14               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0025, t01=0x0038}
0x03a14…03a1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0054}
0x03a1e…03a46               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0025, t01=0x005e}
0x03a46…03a6a               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0025, t01=0x0086}
0x03a6a…03a94               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0025, t01=0x00aa}
0x03a94…03ab6               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0025, t01=0x00d4}
0x03ab6…03ac0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00f6}
0x03ac0…03aca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0100}
0x03aca…03af6               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0025, t01=0x010a}
0x03af6…03b06               Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x0025, t01=0x0136}
0x03b06…03b1a               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x0025, t01=0x0146}
0x03b1a…03b3e               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x0025, t01=0x015a}
0x03b3e…03b70               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x0025, t01=0x017e}
0x03b70…03b82               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0026, t01=0x0020}
0x03b82…03bb0               Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0026, t01=0x0032}
0x03bb0…03bd2               Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x0026, t01=0x0060}
0x03bd2…03be0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x0082}
0x03be0…03bea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0090}
0x03bea…03bf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x009a}
0x03bf4…03c20               Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x0026, t01=0x00a4}
0x03c20…03c2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00d0}
0x03c2a…03c46               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0026, t01=0x00da}
0x03c46…03c56               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0026, t01=0x00f6}
0x03c56…03c60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0106}
0x03c60…03c8c               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0026, t01=0x0110}
0x03c8c…03ca8               Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x0026, t01=0x013c}
0x03ca8…03cc2               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0026, t01=0x0158}
0x03cc2…03cea               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0026, t01=0x0172}
0x03cea…03cfc               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0027, t01=0x000a}
0x03cfc…03d0e               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0027, t01=0x001c}
0x03d0e…03d26               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0027, t01=0x002e}
0x03d26…03d48               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0027, t01=0x0046}
0x03d48…03d6e               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0027, t01=0x0068}
0x03d6e…03d88               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0027, t01=0x008e}
0x03d88…03d92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00a8}
0x03d92…03d9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00b2}
0x03d9c…03dca               Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x0027, t01=0x00bc}
0x03dca…03dd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00ea}
0x03dd4…03df0               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0027, t01=0x00f4}
0x03df0…03e00               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0027, t01=0x0110}
0x03e00…03e0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0120}
0x03e0a…03e38               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x0027, t01=0x012a}
0x03e38…03e6e               Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x0027, t01=0x0158}
0x03e6e…03e82               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x0027, t01=0x018e}
0x03e82…03e96               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x0028, t01=0x0012}
0x03e96…03eae               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x0028, t01=0x0026}
0x03eae…03ed8               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x0028, t01=0x003e}
0x03ed8…03eea               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x0028, t01=0x0068}
0x03eea…03efe               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x0028, t01=0x007a}
0x03efe…03f1a               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x0028, t01=0x008e}
0x03f1a…03f2c               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x0028, t01=0x00aa}
0x03f2c…03f4c               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x0028, t01=0x00bc}
0x03f4c…03f5e               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0028, t01=0x00dc}
0x03f5e…03f78               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0028, t01=0x00ee}
0x03f78…03f86               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0108}
0x03f86…03f90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0116}
0x03f90…03f9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0120}
0x03f9a…03fbe               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x0028, t01=0x012a}
0x03fbe…03fc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x014e}
0x03fc8…03fdc               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0028, t01=0x0158}
0x03fdc…03ff8               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0028, t01=0x016c}
0x03ff8…04008               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0028, t01=0x0188}
0x04008…04012               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0008}
0x04012…0403e               Head {h00=0x0028, h01=0x0050, text=»INSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR«, t00=0x0029, t01=0x0012}
0x0403e…04054               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x0029, t01=0x003e}
0x04054…04066               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0029, t01=0x0054}
0x04066…04070               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0066}
0x04070…0407a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0070}
0x0407a…040a0               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x0029, t01=0x007a}
0x040a0…040aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00a0}
0x040aa…040c6               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0029, t01=0x00aa}
0x040c6…040d6               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0029, t01=0x00c6}
0x040d6…040e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00d6}
0x040e0…0410e               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x0029, t01=0x00e0}
0x0410e…04124               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x0029, t01=0x010e}
0x04124…04136               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x0029, t01=0x0124}
0x04136…04142               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x0136}
0x04142…04150               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0142}
0x04150…0415a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0150}
0x0415a…04164               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x015a}
0x04164…0418c               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x0029, t01=0x0164}
0x0418c…04196               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x018c}
0x04196…041ae               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x002a, t01=0x0008}
0x041ae…041c8               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002a, t01=0x0020}
0x041c8…041d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x003a}
0x041d2…041e6               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002a, t01=0x0044}
0x041e6…041fc               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002a, t01=0x0058}
0x041fc…04228               Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002a, t01=0x006e}
0x04228…04234               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x009a}
0x04234…0424a               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002a, t01=0x00a6}
0x0424a…04272               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002a, t01=0x00bc}
0x04272…0427e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x00e4}
0x0427e…042ae               Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002a, t01=0x00f0}
0x042ae…042c2               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002a, t01=0x0120}
0x042c2…042d6               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002a, t01=0x0134}
0x042d6…042fe               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002a, t01=0x0148}
0x042fe…04310               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002a, t01=0x0170}
0x04310…04322               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002a, t01=0x0182}
0x04322…0434c (43, 0, 398)  Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002b, t01=0x0004}
0x0434c…04372               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002b, t01=0x002e}
0x04372…04382               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002b, t01=0x0054}
0x04382…04390               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0064}
0x04390…0439a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0072}
0x0439a…043a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x007c}
0x043a4…043da               Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x002b, t01=0x0086}
0x043da…043e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00bc}
0x043e4…0441c               Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x002b, t01=0x00c6}
0x0441c…04426               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00fe}
0x04426…04444               Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x002b, t01=0x0108}
0x04444…0445c               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x002b, t01=0x0126}
0x0445c…0447c               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x002b, t01=0x013e}
0x0447c…0449c               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x002b, t01=0x015e}
0x0449c…044b4               Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x002b, t01=0x017e}
0x044b4…044ce               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x002c, t01=0x0008}
0x044ce…044f6               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x002c, t01=0x0022}
0x044f6…04524               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x002c, t01=0x004a}
0x04524…0454a               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x002c, t01=0x0078}
0x0454a…04552               Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x009e}
0x04552…0455a               Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x00a6}
0x0455a…0458a               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x002c, t01=0x00ae}
0x0458a…045bc               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x002c, t01=0x00de}
0x045bc…045e2               Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x002c, t01=0x0110}
0x045e2…0460c               Head {h00=0x0026, h01=0x0050, text=»   DONT DESTROY BUFFER ADDRESS =6 «, t00=0x002c, t01=0x0136}
0x0460c…04620               Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x002c, t01=0x0160}
0x04620…04654               Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x002c, t01=0x0174}
0x04654…04668               Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x002d, t01=0x0018}
0x04668…0469a               Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x002d, t01=0x002c}
0x0469a…046a2               Head {h00=0x0004, h01=0x0050, t00=0x002d, t01=0x005e}
0x046a2…046c6               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x002d, t01=0x0066}
0x046c6…046f0               Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 RECEIVE BUFFER ADDRESS «, t00=0x002d, t01=0x008a}
0x046f0…04720               Head {h00=0x002c, h01=0x0050, text=» CF A15,DC:MIN MOVE DATA TO USER BUFFER «, t00=0x002d, t01=0x00b4}
0x04720…0474e               Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x002d, t01=0x00e4}
0x0474e…04766               Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x002d, t01=0x0112}
0x04766…047a2               Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x002d, t01=0x012a}
0x047a2…047d2               Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x002d, t01=0x0166}
0x047d2…047e8               Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x002e, t01=0x0008}
0x047e8…047fe               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x002e, t01=0x001e}
0x047fe…04828               Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x002e, t01=0x0034}
0x04828…04856               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x002e, t01=0x005e}
0x04856…0488a               Head {h00=0x0030, h01=0x0050, text=» CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x002e, t01=0x008c}
0x0488a…0489c               Head {h00=0x000e, h01=0x0050, text=» RB CKM110«, t00=0x002e, t01=0x00c0}
0x0489c…048aa               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x00d2}
0x048aa…048b2               Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x00e0}
0x048b2…048f6               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x002e, t01=0x00e8}
0x048f6…04900               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x012c}
0x04900…0491a               Head {h00=0x0016, h01=0x0050, text=»*    ABORT ROUTINE«, t00=0x002e, t01=0x0136}
0x0491a…04924               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0150}
0x04924…04944               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x002e, t01=0x015a}
0x04944…0494c               Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x017a}
0x0494c…04976               Head {h00=0x0026, h01=0x0050, text=»ABORT LD A1,DWTTP,A6 TIMER POINTER«, t00=0x002e, t01=0x0182}
0x04976…0499c               Head {h00=0x0022, h01=0x0050, text=» RF(Z) AB:10 NO TIMER RUNNING «, t00=0x002f, t01=0x001c}
0x0499c…049bc               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 KILL TIMER«, t00=0x002f, t01=0x0042}
0x049bc…049d0               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x002f, t01=0x0062}
0x049d0…049d8               Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0076}
0x049d8…04a00               Head {h00=0x0024, h01=0x0050, text=»AB:10 LD A1,DWTOR,A6 ORDER CODE «, t00=0x002f, t01=0x007e}
0x04a00…04a12               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x002f, t01=0x00a6}
0x04a12…04a40               Head {h00=0x002a, h01=0x0050, text=» RF(Z) AB:RTN READ REQUEST. NO ACTION «, t00=0x002f, t01=0x00b8}
0x04a40…04a52               Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x002f, t01=0x00e6}
0x04a52…04a84               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE«, t00=0x002f, t01=0x00f8}
0x04a84…04a8c               Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x012a}
0x04a8c…04abe               Head {h00=0x002e, h01=0x0050, text=» CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE«, t00=0x002f, t01=0x0132}
0x04abe…04ae8               Head {h00=0x0026, h01=0x0050, text=» LD A2,FDWTUT WRITING DWT ADDRESS «, t00=0x002f, t01=0x0164}
0x04ae8…04afa               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x002f, t01=0x018e}
0x04afa…04b1e               Head {h00=0x0020, h01=0x0050, text=» RF(NE) AB:RTN NOT THIS DWT «, t00=0x0030, t01=0x0010}
0x04b1e…04b42               Head {h00=0x0020, h01=0x0050, text=» CM XACK RESET ACK EXPECTED «, t00=0x0030, t01=0x0034}
0x04b42…04b66               Head {h00=0x0020, h01=0x0050, text=» CM FDWTUT RESET WRITING DWT«, t00=0x0030, t01=0x0058}
0x04b66…04b6e               Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x007c}
0x04b6e…04b82               Head {h00=0x0010, h01=0x0050, text=»AB:RTN EQU *«, t00=0x0030, t01=0x0084}
0x04b82…04b98               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0030, t01=0x0098}
0x04b98…04bac               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0030, t01=0x00ae}
0x04bac…04bd4               Head {h00=0x0024, h01=0x0050, text=» ABR* A15 RETURN IN INHIBIT MODE«, t00=0x0030, t01=0x00c2}
0x04bd4…04be0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x00ea}
0x04be0…04bf6               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0030, t01=0x00f6}
0x04bf6…04c06               Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0030, t01=0x010c}
0x04c06…04c12               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x011c}
0x04c12…04c20               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0128}
0x04c20…04c28               Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x0136}
0x04c28…04c36               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x013e}
0x04c36…04c40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x014c}
0x04c40…04c4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0156}
0x04c4a…04c68               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0030, t01=0x0160}
0x04c68…04c90               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0030, t01=0x017e}
0x04c90…04c9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0016}
0x04c9a…04cac               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0031, t01=0x0020}
0x04cac…04cd4               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0031, t01=0x0032}
0x04cd4…04cde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x005a}
0x04cde…04ce8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0064}
0x04ce8…04d00               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0031, t01=0x006e}
0x04d00…04d14               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0031, t01=0x0086}
0x04d14…04d28               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0031, t01=0x009a}
0x04d28…04d3c               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0031, t01=0x00ae}
0x04d3c…04d50               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0031, t01=0x00c2}
0x04d50…04d64               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0031, t01=0x00d6}
0x04d64…04d7e               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0031, t01=0x00ea}
0x04d7e…04d8c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x0104}
0x04d8c…04da4               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0031, t01=0x0112}
0x04da4…04db8               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0031, t01=0x012a}
0x04db8…04dca               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0031, t01=0x013e}
0x04dca…04dde               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0031, t01=0x0150}
0x04dde…04df0               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0031, t01=0x0164}
0x04df0…04e04               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0031, t01=0x0176}
0x04e04…04e16               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0031, t01=0x018a}
0x04e16…04e2a               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0032, t01=0x000c}
0x04e2a…04e3c               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0032, t01=0x0020}
0x04e3c…04e50               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0032, t01=0x0032}
0x04e50…04e62               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0032, t01=0x0046}
0x04e62…04e76               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0032, t01=0x0058}
0x04e76…04e8a               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0032, t01=0x006c}
0x04e8a…04e9e               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0032, t01=0x0080}
0x04e9e…04eb0               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0032, t01=0x0094}
0x04eb0…04ebe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x00a6}
0x04ebe…04ec8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00b4}
0x04ec8…04ed2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00be}
0x04ed2…04ee8               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0032, t01=0x00c8}
0x04ee8…04ef2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00de}
0x04ef2…04efc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00e8}
0x04efc…04f28               Head {h00=0x0028, h01=0x0050, text=»TIMPRO EQU 30 PROCEDURE TIMER 3 SEC «, t00=0x0032, t01=0x00f2}
0x04f28…04f32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x011e}
0x04f32…04f3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0128}
0x04f3c…04f58               Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0032, t01=0x0132}
0x04f58…04f62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x014e}
0x04f62…04f8c               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0032, t01=0x0158}
0x04f8c…04fa0               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0032, t01=0x0182}
0x04fa0…04fb4               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0033, t01=0x0008}
0x04fb4…04fc8               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0033, t01=0x001c}
0x04fc8…04fdc               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0033, t01=0x0030}
0x04fdc…04ff0               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0033, t01=0x0044}
0x04ff0…05004               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0033, t01=0x0058}
0x05004…05018               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0033, t01=0x006c}
0x05018…0502c               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0033, t01=0x0080}
0x0502c…05040               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0033, t01=0x0094}
0x05040…05054               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0033, t01=0x00a8}
0x05054…05068               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0033, t01=0x00bc}
0x05068…0507c               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0033, t01=0x00d0}
0x0507c…0508e               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0033, t01=0x00e4}
0x0508e…050a4               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0033, t01=0x00f6}
0x050a4…050ba               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0033, t01=0x010c}
0x050ba…050ce               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0033, t01=0x0122}
0x050ce…050e2               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0033, t01=0x0136}
0x050e2…050f6               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0033, t01=0x014a}
0x050f6…0510a               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0033, t01=0x015e}
0x0510a…0511e               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0033, t01=0x0172}
0x0511e…05132               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0033, t01=0x0186}
0x05132…05146               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0034, t01=0x000a}
0x05146…0515a               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0034, t01=0x001e}
0x0515a…05166               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0032}
0x05166…0517a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0034, t01=0x003e}
0x0517a…0518e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0034, t01=0x0052}
0x0518e…051c2               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0034, t01=0x0066}
0x051c2…051ce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x009a}
0x051ce…051e2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0034, t01=0x00a6}
0x051e2…051f6               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0034, t01=0x00ba}
0x051f6…0520a               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0034, t01=0x00ce}
0x0520a…0521e               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /40 «, t00=0x0034, t01=0x00e2}
0x0521e…05232               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0034, t01=0x00f6}
0x05232…05246               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0034, t01=0x010a}
0x05246…0525c               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0034, t01=0x011e}
0x0525c…05272               Head {h00=0x0012, h01=0x0050, text=»ENQEBC EQU /2D«, t00=0x0034, t01=0x0134}
0x05272…05288               Head {h00=0x0012, h01=0x0050, text=»ETBEBC EQU /26«, t00=0x0034, t01=0x014a}
0x05288…05294               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0160}
0x05294…052a2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x016c}
0x052a2…052ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x017a}
0x052ac…052b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0184}
0x052b6…052d4               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0034, t01=0x018e}
0x052d4…052de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x001c}
0x052de…052e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0026}
0x052e8…05316               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0035, t01=0x0030}
0x05316…05348               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0035, t01=0x005e}
0x05348…05368               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x0035, t01=0x0090}
0x05368…05384               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x0035, t01=0x00b0}
0x05384…053a0               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x0035, t01=0x00cc}
0x053a0…053d6               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x0035, t01=0x00e8}
0x053d6…053fc               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x0035, t01=0x011e}
0x053fc…0541c               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x0035, t01=0x0144}
0x0541c…0544a               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x0035, t01=0x0164}
0x0544a…05474 (54, 0, 400)  Head {h00=0x0026, h01=0x0050, text=»TPM DATA 0 IF =1 TRANSPARENT TEXT «, t00=0x0036, t01=0x0004}
0x05474…0547e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x002e}
0x0547e…0549c               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x0036, t01=0x0038}
0x0549c…054c8               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x0036, t01=0x0056}
0x054c8…054f2               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x0036, t01=0x0082}
0x054f2…05512               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x0036, t01=0x00ac}
0x05512…05546               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x0036, t01=0x00cc}
0x05546…0556e               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x0036, t01=0x0100}
0x0556e…055a0               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x0036, t01=0x0128}
0x055a0…055d0               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x0036, t01=0x015a}
0x055d0…055da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x018a}
0x055da…055e4 (55, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0004}
0x055e4…0560c               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x0037, t01=0x000e}
0x0560c…05616               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0036}
0x05616…05620               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0040}
0x05620…05634               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0037, t01=0x004a}
0x05634…05666               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x0037, t01=0x005e}
0x05666…05670               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0090}
0x05670…0567a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x009a}
0x0567a…0568e               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x0037, t01=0x00a4}
0x0568e…056a2               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x0037, t01=0x00b8}
0x056a2…056ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00cc}
0x056ac…056e2               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x0037, t01=0x00d6}
0x056e2…05712               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x0037, t01=0x010c}
0x05712…0571e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x013c}
0x0571e…0572c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0148}
0x0572c…05736               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0156}
0x05736…05740               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0160}
0x05740…0576e               Head {h00=0x002a, h01=0x0050, text=»*  LINE CONTROL UNIT  FUNCTION CONTROL«, t00=0x0037, t01=0x016a}
0x0576e…05778               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0008}
0x05778…0578c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0038, t01=0x0012}
0x0578c…057a0               Head {h00=0x0010, h01=0x0050, text=»SYNC EQU /16«, t00=0x0038, t01=0x0026}
0x057a0…057ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x003a}
0x057ac…057c0               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0038, t01=0x0046}
0x057c0…057d4               Head {h00=0x0010, h01=0x0050, text=»SYNC EQU /32«, t00=0x0038, t01=0x005a}
0x057d4…057e0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x006e}
0x057e0…057f4               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0038, t01=0x007a}
0x057f4…05812               Head {h00=0x001a, h01=0x0050, text=»CBCARR EQU /100+LSPEED«, t00=0x0038, t01=0x008e}
0x05812…0581e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x00ac}
0x0581e…05832               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0038, t01=0x00b8}
0x05832…05848               Head {h00=0x0012, h01=0x0050, text=»CBSTOP EQU /00«, t00=0x0038, t01=0x00cc}
0x05848…0585c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0038, t01=0x00e2}
0x0585c…05872               Head {h00=0x0012, h01=0x0050, text=»PARITY EQU /0C«, t00=0x0038, t01=0x00f6}
0x05872…0587e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x010c}
0x0587e…05892               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0038, t01=0x0118}
0x05892…058a6               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0038, t01=0x012c}
0x058a6…058bc               Head {h00=0x0012, h01=0x0050, text=»PARITY EQU /00«, t00=0x0038, t01=0x0140}
0x058bc…058c8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0156}
0x058c8…058d6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x0162}
0x058d6…058e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0170}
0x058e0…058ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x017a}
0x058ea…05916               Head {h00=0x0028, h01=0x0050, text=»*  LINE CONTROL UNIT SST STATUS BITS«, t00=0x0038, t01=0x0184}
0x05916…05920               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0020}
0x05920…05944               Head {h00=0x0020, h01=0x0050, text=»SBNOOP EQU /01 NOT OPERABLE «, t00=0x0039, t01=0x002a}
0x05944…0596c               Head {h00=0x0024, h01=0x0050, text=»SBTHRU EQU /02 THROUGHPUT ERROR «, t00=0x0039, t01=0x004e}
0x0596c…0598e               Head {h00=0x001e, h01=0x0050, text=»SBCARR EQU /20 CARRIER OFF«, t00=0x0039, t01=0x0076}
0x0598e…059a2               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0039, t01=0x0098}
0x059a2…059cc               Head {h00=0x0026, h01=0x0050, text=»SBERR EQU /23 SBNOOP+SBTHRU+SBCARR«, t00=0x0039, t01=0x00ac}
0x059cc…059d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x00d6}
0x059d8…059ec               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0039, t01=0x00e2}
0x059ec…05a02               Head {h00=0x0012, h01=0x0050, text=»SBPARI EQU /04«, t00=0x0039, t01=0x00f6}
0x05a02…05a34               Head {h00=0x002e, h01=0x0050, text=»SBERR EQU /27 SBNOOP+SBTHRU+SBPARI+SBCARR «, t00=0x0039, t01=0x010c}
0x05a34…05a40               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x013e}
0x05a40…05a4e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x014a}
0x05a4e…05a58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0158}
0x05a58…05a62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0162}
0x05a62…05a7e               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x0039, t01=0x016c}
0x05a7e…05a88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0188}
0x05a88…05aae (58, 0, 400)  Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x003a, t01=0x0004}
0x05aae…05ad8               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x003a, t01=0x002a}
0x05ad8…05ae2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0054}
0x05ae2…05aec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x005e}
0x05aec…05afe               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x003a, t01=0x0068}
0x05afe…05b22               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x003a, t01=0x007a}
0x05b22…05b44               Head {h00=0x001e, h01=0x0050, text=» CM SYNSW CLEAR SYN-SWITCH«, t00=0x003a, t01=0x009e}
0x05b44…05b6a               Head {h00=0x0022, h01=0x0050, text=» CM TPM CLEAR TRANSPARENT TEXT«, t00=0x003a, t01=0x00c0}
0x05b6a…05b9a               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCI START INPUT WITH SYNC DEF «, t00=0x003a, t01=0x00e6}
0x05b9a…05ba4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0116}
0x05ba4…05bae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0120}
0x05bae…05bb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x012a}
0x05bb8…05bdc               Head {h00=0x0020, h01=0x0050, text=» CF A5,READP READ CHARACTER «, t00=0x003a, t01=0x0134}
0x05bdc…05c00               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003a, t01=0x0158}
0x05c00…05c0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x017c}
0x05c0a…05c14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0186}
0x05c14…05c42               Head {h00=0x002a, h01=0x0050, text=»*  CHECK IF IT IS A CONTROL CHARACTER «, t00=0x003a, t01=0x0190}
0x05c42…05c4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x002e}
0x05c4c…05c5e               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003b, t01=0x0038}
0x05c5e…05c72               Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x003b, t01=0x004a}
0x05c72…05c94               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x003b, t01=0x005e}
0x05c94…05cac               Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x003b, t01=0x0080}
0x05cac…05cce               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x003b, t01=0x0098}
0x05cce…05ce6               Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x003b, t01=0x00ba}
0x05ce6…05d0a               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x003b, t01=0x00d2}
0x05d0a…05d22               Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x003b, t01=0x00f6}
0x05d22…05d46               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x003b, t01=0x010e}
0x05d46…05d5e               Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x003b, t01=0x0132}
0x05d5e…05d82               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x003b, t01=0x014a}
0x05d82…05d90               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003b, t01=0x016e}
0x05d90…05d9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x017c}
0x05d9a…05da4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0186}
0x05da4…05dda               Head {h00=0x0032, h01=0x0050, text=»*  CHECK IF IT IS A POLL OR A SELECT SEQUENCE «, t00=0x003b, t01=0x0190}
0x05dda…05de4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0036}
0x05de4…05df8               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003c, t01=0x0040}
0x05df8…05e0a               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003c, t01=0x0054}
0x05e0a…05e2e               Head {h00=0x0020, h01=0x0050, text=» CF A5,READP READ CHARACTER «, t00=0x003c, t01=0x0066}
0x05e2e…05e40               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003c, t01=0x008a}
0x05e40…05e68               Head {h00=0x0024, h01=0x0050, text=» RF(NE) BRM150 INVALID SEQUENCE «, t00=0x003c, t01=0x009c}
0x05e68…05e74               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x00c4}
0x05e74…05e86               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003c, t01=0x00d0}
0x05e86…05e9e               Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x003c, t01=0x00e2}
0x05e9e…05ebc               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x003c, t01=0x00fa}
0x05ebc…05ece               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x003c, t01=0x0118}
0x05ece…05ee4               Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x003c, t01=0x012a}
0x05ee4…05f0c               Head {h00=0x0024, h01=0x0050, text=» RF(NE) BRM150 INVALID SEQUENCE «, t00=0x003c, t01=0x0140}
0x05f0c…05f20               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x003c, t01=0x0168}
0x05f20…05f42               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x003c, t01=0x017c}
0x05f42…05f62               Head {h00=0x001c, h01=0x0050, text=» RB(NZ) BRM PARITY ERROR«, t00=0x003d, t01=0x000e}
0x05f62…05f74               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003d, t01=0x002e}
0x05f74…05f88               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003d, t01=0x0040}
0x05f88…05faa               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x003d, t01=0x0054}
0x05faa…05fbc               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003d, t01=0x0076}
0x05fbc…05fe4               Head {h00=0x0024, h01=0x0050, text=» RF(NE) BRM150 INVALID SEQUENCE «, t00=0x003d, t01=0x0088}
0x05fe4…05ff0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x00b0}
0x05ff0…0600e               Head {h00=0x001a, h01=0x0050, text=» CF A5,READP READ ENQ «, t00=0x003d, t01=0x00bc}
0x0600e…06022               Head {h00=0x0010, h01=0x0050, text=» SUK A2,ENQ «, t00=0x003d, t01=0x00da}
0x06022…0604a               Head {h00=0x0024, h01=0x0050, text=» RF(NE) BRM150 INVALID SEQUENCE «, t00=0x003d, t01=0x00ee}
0x0604a…06054               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0116}
0x06054…0605e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0120}
0x0605e…06086               Head {h00=0x0024, h01=0x0050, text=»*  YES SEQUENCE OK - HALT INPUT «, t00=0x003d, t01=0x012a}
0x06086…06090               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0152}
0x06090…060a6               Head {h00=0x0012, h01=0x0050, text=» CF A5,CHALTI «, t00=0x003d, t01=0x015c}
0x060a6…060b4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003d, t01=0x0172}
0x060b4…060be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0180}
0x060be…060c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x018a}
0x060c8…060fc (62, 0, 400)  Head {h00=0x0030, h01=0x0050, text=»*  CHECK IF IT IS A SELECT OR A POLL ADDRESS«, t00=0x003e, t01=0x0004}
0x060fc…06106               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0038}
0x06106…06118               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x003e, t01=0x0042}
0x06118…0613c               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK-COUNTER«, t00=0x003e, t01=0x0054}
0x0613c…0614e               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x003e, t01=0x0078}
0x0614e…06160               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x003e, t01=0x008a}
0x06160…06180               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x003e, t01=0x009c}
0x06180…0618a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00bc}
0x0618a…06194               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00c6}
0x06194…061a6               Head {h00=0x000e, h01=0x0050, text=»*  POLLING«, t00=0x003e, t01=0x00d0}
0x061a6…061b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00e2}
0x061b0…061c2               Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x003e, t01=0x00ec}
0x061c2…061e4               Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x003e, t01=0x00fe}
0x061e4…0621e               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x003e, t01=0x0120}
0x0621e…06240               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x003e, t01=0x015a}
0x06240…06264               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x003e, t01=0x017c}
0x06264…06280               Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x003f, t01=0x0010}
0x06280…0628a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x002c}
0x0628a…06294               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0036}
0x06294…062a8               Head {h00=0x0010, h01=0x0050, text=»*  SELECTING«, t00=0x003f, t01=0x0040}
0x062a8…062b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0054}
0x062b2…062c6               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x003f, t01=0x005e}
0x062c6…062f0               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x003f, t01=0x0072}
0x062f0…06312               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x003f, t01=0x009c}
0x06312…06332               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x003f, t01=0x00be}
0x06332…06346               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x003f, t01=0x00de}
0x06346…06366               Head {h00=0x001c, h01=0x0050, text=» RB BRM INVALID ADDRESS «, t00=0x003f, t01=0x00f2}
0x06366…06372               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x0112}
0x06372…06386               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003f, t01=0x011e}
0x06386…063ae               Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x003f, t01=0x0132}
0x063ae…063ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x015a}
0x063ba…063ce               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x003f, t01=0x0166}
0x063ce…063e2               Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x003f, t01=0x017a}
0x063e2…063f0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003f, t01=0x018e}
0x063f0…063fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x000c}
0x063fa…06404               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0016}
0x06404…06420               Head {h00=0x0018, h01=0x0050, text=»*  THROUGHPUT ERROR «, t00=0x0040, t01=0x0020}
0x06420…0642a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x003c}
0x0642a…0643e               Head {h00=0x0010, h01=0x0050, text=»BRM140 EQU *«, t00=0x0040, t01=0x0046}
0x0643e…0646a               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE "INVALID MESSAGE" «, t00=0x0040, t01=0x005a}
0x0646a…06494               Head {h00=0x0026, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE TO A5 «, t00=0x0040, t01=0x0086}
0x06494…064c4               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCI START INPUT WITH SYNC DEF «, t00=0x0040, t01=0x00b0}
0x064c4…064ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00e0}
0x064ce…064d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00ea}
0x064d8…06500               Head {h00=0x0024, h01=0x0050, text=»*  WAIT FOR MARK HOLD TO RESYNC.«, t00=0x0040, t01=0x00f4}
0x06500…0650a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x011c}
0x0650a…0651e               Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0040, t01=0x0126}
0x0651e…06540               Head {h00=0x001e, h01=0x0050, text=» CF A5,READ READ CHARACTER«, t00=0x0040, t01=0x013a}
0x06540…06574               Head {h00=0x0030, h01=0x0050, text=» LD A1,DCSTCU ANY STATUS FROM CONTROL UNIT ?«, t00=0x0040, t01=0x015c}
0x06574…0658e               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) BRM160 YES«, t00=0x0040, t01=0x0190}
0x0658e…065a2               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0041, t01=0x001a}
0x065a2…065b6               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0041, t01=0x002e}
0x065b6…065d0               Head {h00=0x0016, h01=0x0050, text=» RB(NZ) BRM150 NO «, t00=0x0041, t01=0x0042}
0x065d0…065e4               Head {h00=0x0010, h01=0x0050, text=»BRM160 EQU *«, t00=0x0041, t01=0x005c}
0x065e4…06604               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT«, t00=0x0041, t01=0x0070}
0x06604…06614               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0041, t01=0x0090}
0x06614…06622               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x00a0}
0x06622…0662c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00ae}
0x0662c…06636               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00b8}
0x06636…06656               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0041, t01=0x00c2}
0x06656…06660               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00e2}
0x06660…0666a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00ec}
0x0666a…0667e               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0041, t01=0x00f6}
0x0667e…066a8               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0041, t01=0x010a}
0x066a8…066bc               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0041, t01=0x0134}
0x066bc…066de               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0041, t01=0x0148}
0x066de…066ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x016a}
0x066ea…066fe               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0041, t01=0x0176}
0x066fe…06728               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0041, t01=0x018a}
0x06728…0674e               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0042, t01=0x0024}
0x0674e…06772               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0042, t01=0x004a}
0x06772…0678c               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0042, t01=0x006e}
0x0678c…067b8               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0042, t01=0x0088}
0x067b8…067cc               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0042, t01=0x00b4}
0x067cc…067f2               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0042, t01=0x00c8}
0x067f2…06806               Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0042, t01=0x00ee}
0x06806…06828               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0042, t01=0x0102}
0x06828…06838               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0042, t01=0x0124}
0x06838…06846               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0134}
0x06846…06850               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0142}
0x06850…0685a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x014c}
0x0685a…0687a               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0042, t01=0x0156}
0x0687a…06884               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0176}
0x06884…0688e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0180}
0x0688e…068a2               Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0042, t01=0x018a}
0x068a2…068b6               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0043, t01=0x000e}
0x068b6…068cc               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x0043, t01=0x0022}
0x068cc…068ee               Head {h00=0x001e, h01=0x0050, text=» RB BRM150 INVALID SEQENCE«, t00=0x0043, t01=0x0038}
0x068ee…06902               Head {h00=0x0010, h01=0x0050, text=»BRM302 EQU *«, t00=0x0043, t01=0x005a}
0x06902…0690e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x006e}
0x0690e…06922               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0043, t01=0x007a}
0x06922…06944               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0043, t01=0x008e}
0x06944…0695a               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0043, t01=0x00b0}
0x0695a…06986               Head {h00=0x0028, h01=0x0050, text=»*********************CHAINED COMMAND«, t00=0x0043, t01=0x00c6}
0x06986…069b0               Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0043, t01=0x00f2}
0x069b0…069ce               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0043, t01=0x011c}
0x069ce…069e2               Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0043, t01=0x013a}
0x069e2…06a04               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0043, t01=0x014e}
0x06a04…06a16               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0043, t01=0x0170}
0x06a16…06a38               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0043, t01=0x0182}
0x06a38…06a4c               Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0044, t01=0x0014}
0x06a4c…06a78               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0044, t01=0x0028}
0x06a78…06a8c               Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0044, t01=0x0054}
0x06a8c…06aaa               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0044, t01=0x0068}
0x06aaa…06aba               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0044, t01=0x0086}
0x06aba…06ace               Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0044, t01=0x0096}
0x06ace…06ae2               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0044, t01=0x00aa}
0x06ae2…06af6               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0044, t01=0x00be}
0x06af6…06b20               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0044, t01=0x00d2}
0x06b20…06b36               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0044, t01=0x00fc}
0x06b36…06b60               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0044, t01=0x0112}
0x06b60…06b86               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0044, t01=0x013c}
0x06b86…06bba               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0044, t01=0x0162}
0x06bba…06bd6               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0045, t01=0x0008}
0x06bd6…06be2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x0024}
0x06be2…06bf6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0045, t01=0x0030}
0x06bf6…06c26               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0045, t01=0x0044}
0x06c26…06c40               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0045, t01=0x0074}
0x06c40…06c6c               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0045, t01=0x008e}
0x06c6c…06c8c               Head {h00=0x001c, h01=0x0050, text=» CM CACK PRESET ACK-1 =7«, t00=0x0045, t01=0x00ba}
0x06c8c…06cb0               Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x0045, t01=0x00da}
0x06cb0…06cbc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x00fe}
0x06cbc…06ce8               Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x0045, t01=0x010a}
0x06ce8…06d00               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0045, t01=0x0136}
0x06d00…06d18               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0045, t01=0x014e}
0x06d18…06d2a               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0045, t01=0x0166}
0x06d2a…06d42               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0045, t01=0x0178}
0x06d42…06d5a               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ  =8 «, t00=0x0045, t01=0x0190}
0x06d5a…06d6c               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0046, t01=0x0018}
0x06d6c…06d98               Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x0046, t01=0x002a}
0x06d98…06daa               Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x0046, t01=0x0056}
0x06daa…06dbe               Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x0046, t01=0x0068}
0x06dbe…06de2               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0046, t01=0x007c}
0x06de2…06e0a               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0046, t01=0x00a0}
0x06e0a…06e1c               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0046, t01=0x00c8}
0x06e1c…06e30               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0046, t01=0x00da}
0x06e30…06e56               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x0046, t01=0x00ee}
0x06e56…06e6a               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0046, t01=0x0114}
0x06e6a…06e7e               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x0046, t01=0x0128}
0x06e7e…06e90               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x0046, t01=0x013c}
0x06e90…06eb4               Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x0046, t01=0x014e}
0x06eb4…06ec6               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0046, t01=0x0172}
0x06ec6…06eea               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x0046, t01=0x0184}
0x06eea…06efc               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0047, t01=0x0018}
0x06efc…06f12               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x0047, t01=0x002a}
0x06f12…06f3e               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x0047, t01=0x0040}
0x06f3e…06f5c               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x0047, t01=0x006c}
0x06f5c…06f86               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x0047, t01=0x008a}
0x06f86…06f92               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x00b4}
0x06f92…06fa6               Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x0047, t01=0x00c0}
0x06fa6…06fb8               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0047, t01=0x00d4}
0x06fb8…06fe2               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x0047, t01=0x00e6}
0x06fe2…06ff2               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0047, t01=0x0110}
0x06ff2…07020               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0047, t01=0x0120}
0x07020…07032               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0047, t01=0x014e}
0x07032…07056               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x0047, t01=0x0160}
0x07056…07060               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0184}
0x07060…07086               Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x0047, t01=0x018e}
0x07086…07090               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0024}
0x07090…070a4               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0048, t01=0x002e}
0x070a4…070b8               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0048, t01=0x0042}
0x070b8…070d2               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x0048, t01=0x0056}
0x070d2…070e8               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0048, t01=0x0070}
0x070e8…070fe               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x0048, t01=0x0086}
0x070fe…07112               Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x0048, t01=0x009c}
0x07112…0711e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x00b0}
0x0711e…07132               Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x0048, t01=0x00bc}
0x07132…07148               Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x0048, t01=0x00d0}
0x07148…07178               Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x0048, t01=0x00e6}
0x07178…0719a               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x0048, t01=0x0116}
0x0719a…071ba               Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x0048, t01=0x0138}
0x071ba…071d4               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x0048, t01=0x0158}
0x071d4…071f4               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x0048, t01=0x0172}
0x071f4…0721e (73, 0, 400)  Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM327 ANY MESSAGE ORDER =4«, t00=0x0049, t01=0x0004}
0x0721e…07230               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0049, t01=0x002e}
0x07230…07242               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x0049, t01=0x0040}
0x07242…0725a               Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x0049, t01=0x0052}
0x0725a…07280               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x0049, t01=0x006a}
0x07280…07294               Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x0049, t01=0x0090}
0x07294…072ae               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0049, t01=0x00a4}
0x072ae…072d6               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0049, t01=0x00be}
0x072d6…072f6               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x0049, t01=0x00e6}
0x072f6…07324               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x0049, t01=0x0106}
0x07324…0734e               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x0049, t01=0x0134}
0x0734e…0737a               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x0049, t01=0x015e}
0x0737a…07388               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x018a}
0x07388…07392               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0008}
0x07392…0739c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0012}
0x0739c…073d0               Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x004a, t01=0x001c}
0x073d0…073da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0050}
0x073da…073e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x005a}
0x073e4…073f8               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004a, t01=0x0064}
0x073f8…07418               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x004a, t01=0x0078}
0x07418…0742c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004a, t01=0x0098}
0x0742c…0744e               Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x004a, t01=0x00ac}
0x0744e…07460               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x004a, t01=0x00ce}
0x07460…07476               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004a, t01=0x00e0}
0x07476…07498               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004a, t01=0x00f6}
0x07498…074aa               Head {h00=0x000e, h01=0x0050, text=» ORK A2,/A«, t00=0x004a, t01=0x0118}
0x074aa…074c2               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004a, t01=0x012a}
0x074c2…074d6               Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004a, t01=0x0142}
0x074d6…074e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x0156}
0x074e2…074fc               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004a, t01=0x0162}
0x074fc…0751c               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTOR,A6 ORDER =4«, t00=0x004a, t01=0x017c}
0x0751c…0754c               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 «, t00=0x004b, t01=0x000c}
0x0754c…07576               Head {h00=0x0026, h01=0x0050, text=» SUK A4,6 ADJUST BUFFER ADDRESS =4«, t00=0x004b, t01=0x003c}
0x07576…075a2               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE MESSAGE ON DWT =4«, t00=0x004b, t01=0x0066}
0x075a2…075b8               Head {h00=0x0012, h01=0x0050, text=» RF BRM32A  =4«, t00=0x004b, t01=0x0092}
0x075b8…075c8               Head {h00=0x000c, h01=0x0050, text=» XIF  =4«, t00=0x004b, t01=0x00a8}
0x075c8…075e0               Head {h00=0x0014, h01=0x0050, text=»BRM329 EQU *  =4«, t00=0x004b, t01=0x00b8}
0x075e0…075e8               Head {h00=0x0004, h01=0x0050, t00=0x004b, t01=0x00d0}
0x075e8…0760c               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x004b, t01=0x00d8}
0x0760c…07636               Head {h00=0x0026, h01=0x0050, text=» CF A15,DC:MIN MOVE TO USER BUFFER«, t00=0x004b, t01=0x00fc}
0x07636…07648               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004b, t01=0x0126}
0x07648…07660               Head {h00=0x0014, h01=0x0050, text=»BRM32A EQU *  =4«, t00=0x004b, t01=0x0138}
0x07660…07668               Head {h00=0x0004, h01=0x0050, t00=0x004b, t01=0x0150}
0x07668…07690               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004b, t01=0x0158}
0x07690…076a2               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004b, t01=0x0180}
0x076a2…076b0 (76, 0, 400)  Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x0004}
0x076b0…076c4               Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x004c, t01=0x0012}
0x076c4…076de               Head {h00=0x0016, h01=0x0050, text=» IFT EM3270=1  =4 «, t00=0x004c, t01=0x0026}
0x076de…07700               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 STATUS =4 «, t00=0x004c, t01=0x0040}
0x07700…07724               Head {h00=0x0020, h01=0x0050, text=» RF(N) BRM335 NO REQUEST =4 «, t00=0x004c, t01=0x0062}
0x07724…07744               Head {h00=0x001c, h01=0x0050, text=» LD A1,DWTOR,A6 ORDER =4«, t00=0x004c, t01=0x0086}
0x07744…07774               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 «, t00=0x004c, t01=0x00a6}
0x07774…0779e               Head {h00=0x0026, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST =4«, t00=0x004c, t01=0x00d6}
0x0779e…077b6               Head {h00=0x0014, h01=0x0050, text=»BRM335 EQU *  =4«, t00=0x004c, t01=0x0100}
0x077b6…077c8               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x004c, t01=0x0118}
0x077c8…077ea               Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x004c, t01=0x012a}
0x077ea…07816               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x004c, t01=0x014c}
0x07816…07848               Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x004c, t01=0x0178}
0x07848…0785c               Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x004d, t01=0x001a}
0x0785c…0787e               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x004d, t01=0x002e}
0x0787e…0788e               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004d, t01=0x0050}
0x0788e…078a2               Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x004d, t01=0x0060}
0x078a2…078b6               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004d, t01=0x0074}
0x078b6…078ce               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x004d, t01=0x0088}
0x078ce…078e0               Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x004d, t01=0x00a0}
0x078e0…07908               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x004d, t01=0x00b2}
0x07908…07928               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x004d, t01=0x00da}
0x07928…0793a               Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x004d, t01=0x00fa}
0x0793a…07946               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x010c}
0x07946…0795a               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x004d, t01=0x0118}
0x0795a…0796c               Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x004d, t01=0x012c}
0x0796c…07978               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x013e}
0x07978…07986               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004d, t01=0x014a}
0x07986…07990               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0158}
0x07990…0799a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0162}
0x0799a…079ca               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x004d, t01=0x016c}
0x079ca…079d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x000c}
0x079d4…079de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0016}
0x079de…079f2               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x004e, t01=0x0020}
0x079f2…07a1a               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x004e, t01=0x0034}
0x07a1a…07a2e               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x004e, t01=0x005c}
0x07a2e…07a54               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x004e, t01=0x0070}
0x07a54…07a8c               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x004e, t01=0x0096}
0x07a8c…07ab4               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x004e, t01=0x00ce}
0x07ab4…07adc               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x004e, t01=0x00f6}
0x07adc…07b02               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x004e, t01=0x011e}
0x07b02…07b28               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x004e, t01=0x0144}
0x07b28…07b3a               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x004e, t01=0x016a}
0x07b3a…07b4c               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x004e, t01=0x017c}
0x07b4c…07b76               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x004e, t01=0x018e}
0x07b76…07b8a               Head {h00=0x0010, h01=0x0050, text=» ABL POL127 «, t00=0x004f, t01=0x0028}
0x07b8a…07b96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x003c}
0x07b96…07ba4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004f, t01=0x0048}
0x07ba4…07bae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0056}
0x07bae…07bb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0060}
0x07bb8…07bd8               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x004f, t01=0x006a}
0x07bd8…07be2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x008a}
0x07be2…07bec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0094}
0x07bec…07c00               Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x004f, t01=0x009e}
0x07c00…07c2a               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004f, t01=0x00b2}
0x07c2a…07c3e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004f, t01=0x00dc}
0x07c3e…07c6e               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) BRM510 RETRANSMISSION OF MESSAGE«, t00=0x004f, t01=0x00f0}
0x07c6e…07c82               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x004f, t01=0x0120}
0x07c82…07ca8               Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x004f, t01=0x0134}
0x07ca8…07cda               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x004f, t01=0x015a}
0x07cda…07cee               Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x004f, t01=0x018c}
0x07cee…07cfe               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0050, t01=0x0010}
0x07cfe…07d0c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0050, t01=0x0020}
0x07d0c…07d16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x002e}
0x07d16…07d20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0038}
0x07d20…07d40               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x0050, t01=0x0042}
0x07d40…07d4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0062}
0x07d4a…07d54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x006c}
0x07d54…07d68               Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x0050, t01=0x0076}
0x07d68…07d92               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0050, t01=0x008a}
0x07d92…07da6               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0050, t01=0x00b4}
0x07da6…07dca               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x0050, t01=0x00c8}
0x07dca…07dde               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0050, t01=0x00ec}
0x07dde…07e04               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x0050, t01=0x0100}
0x07e04…07e16               Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x0050, t01=0x0126}
0x07e16…07e2a               Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x0050, t01=0x0138}
0x07e2a…07e50               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0050, t01=0x014c}
0x07e50…07e64               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0050, t01=0x0172}
0x07e64…07e78               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0050, t01=0x0186}
0x07e78…07eac               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x0051, t01=0x000a}
0x07eac…07eb8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x003e}
0x07eb8…07eec               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x0051, t01=0x004a}
0x07eec…07f16               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x0051, t01=0x007e}
0x07f16…07f2a               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0051, t01=0x00a8}
0x07f2a…07f3e               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0051, t01=0x00bc}
0x07f3e…07f4c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0051, t01=0x00d0}
0x07f4c…07f56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00de}
0x07f56…07f60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00e8}
0x07f60…07f80               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x0051, t01=0x00f2}
0x07f80…07f8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0112}
0x07f8a…07f94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x011c}
0x07f94…07fa8               Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x0051, t01=0x0126}
0x07fa8…07fd2               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0051, t01=0x013a}
0x07fd2…07fe6               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0051, t01=0x0164}
0x07fe6…07ffc               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) BRM605«, t00=0x0051, t01=0x0178}
0x07ffc…08012               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x0051, t01=0x018e}
0x08012…08026               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x0052, t01=0x0014}
0x08026…0803a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,STX «, t00=0x0052, t01=0x0028}
0x0803a…08068               Head {h00=0x002a, h01=0x0050, text=» ABL(Z) BRM302 YES - TRANSPARENT TEXT «, t00=0x0052, t01=0x003c}
0x08068…08074               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x006a}
0x08074…08086               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0052, t01=0x0076}
0x08086…0809a               Head {h00=0x0010, h01=0x0050, text=»BRM605 EQU *«, t00=0x0052, t01=0x0088}
0x0809a…080c4               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x0052, t01=0x009c}
0x080c4…080dc               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0052, t01=0x00c6}
0x080dc…080f4               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x0052, t01=0x00de}
0x080f4…08106               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0052, t01=0x00f6}
0x08106…0811e               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0052, t01=0x0108}
0x0811e…08136               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0  =8«, t00=0x0052, t01=0x0120}
0x08136…08148               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0052, t01=0x0138}
0x08148…0815e               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x0052, t01=0x014a}
0x0815e…08168               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0160}
0x08168…08182               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x0052, t01=0x016a}
0x08182…0818c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0184}
0x0818c…081ae               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x0052, t01=0x018e}
0x081ae…081d2               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0053, t01=0x0020}
0x081d2…081e6               Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0053, t01=0x0044}
0x081e6…08204               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0053, t01=0x0058}
0x08204…0822e               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0053, t01=0x0076}
0x0822e…08240               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0053, t01=0x00a0}
0x08240…08254               Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0053, t01=0x00b2}
0x08254…08268               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0053, t01=0x00c6}
0x08268…0827e               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0053, t01=0x00da}
0x0827e…08288               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00f0}
0x08288…082a2               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0053, t01=0x00fa}
0x082a2…082ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0114}
0x082ac…082d0               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0053, t01=0x011e}
0x082d0…082f8               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0053, t01=0x0142}
0x082f8…0830c               Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0053, t01=0x016a}
0x0830c…08320               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0053, t01=0x017e}
0x08320…08342 (84, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0054, t01=0x0004}
0x08342…08350               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0054, t01=0x0026}
0x08350…0835a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0034}
0x0835a…0838a               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0054, t01=0x003e}
0x0838a…08394               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x006e}
0x08394…083ae               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0054, t01=0x0078}
0x083ae…083c2               Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0054, t01=0x0092}
0x083c2…083d6               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0054, t01=0x00a6}
0x083d6…083ea               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x0054, t01=0x00ba}
0x083ea…0841c               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x0054, t01=0x00ce}
0x0841c…08428               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x0100}
0x08428…08454               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0054, t01=0x010c}
0x08454…08468               Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x0054, t01=0x0138}
0x08468…08486               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0054, t01=0x014c}
0x08486…0849a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0054, t01=0x016a}
0x0849a…084a2               Head {h00=0x0004, h01=0x0050, t00=0x0054, t01=0x017e}
0x084a2…084c4               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0054, t01=0x0186}
0x084c4…084d0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x0018}
0x084d0…084e2               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0055, t01=0x0024}
0x084e2…084f6               Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x0055, t01=0x0036}
0x084f6…08508               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0055, t01=0x004a}
0x08508…08532               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0055, t01=0x005c}
0x08532…08546               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0055, t01=0x0086}
0x08546…0855a               Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x0055, t01=0x009a}
0x0855a…08572               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =8«, t00=0x0055, t01=0x00ae}
0x08572…0858a               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x0055, t01=0x00c6}
0x0858a…0859c               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0055, t01=0x00de}
0x0859c…085b4               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =8«, t00=0x0055, t01=0x00f0}
0x085b4…085cc               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI  =8 «, t00=0x0055, t01=0x0108}
0x085cc…085de               Head {h00=0x000e, h01=0x0050, text=» XIF   =8 «, t00=0x0055, t01=0x0120}
0x085de…0860a               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x0055, t01=0x0132}
0x0860a…08630               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x0055, t01=0x015e}
0x08630…08644               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0055, t01=0x0184}
0x08644…0866c               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x0056, t01=0x0008}
0x0866c…08686               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0056, t01=0x0030}
0x08686…08698               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0056, t01=0x004a}
0x08698…086ac               Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x0056, t01=0x005c}
0x086ac…086c6               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0056, t01=0x0070}
0x086c6…086d8               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0056, t01=0x008a}
0x086d8…086ec               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0056, t01=0x009c}
0x086ec…086fa               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0056, t01=0x00b0}
0x086fa…08704               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00be}
0x08704…0870e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00c8}
0x0870e…08734               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x0056, t01=0x00d2}
0x08734…0873e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00f8}
0x0873e…08748               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0102}
0x08748…0875c               Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x0056, t01=0x010c}
0x0875c…08782               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x0056, t01=0x0120}
0x08782…087b2               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x0056, t01=0x0146}
0x087b2…087d6               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x0056, t01=0x0176}
0x087d6…087fc               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x0057, t01=0x000a}
0x087fc…0881e               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0057, t01=0x0030}
0x0881e…08830               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0057, t01=0x0052}
0x08830…0884c               Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x0057, t01=0x0064}
0x0884c…08862               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x0057, t01=0x0080}
0x08862…08888               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x0057, t01=0x0096}
0x08888…0889a               Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x0057, t01=0x00bc}
0x0889a…088a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x00ce}
0x088a6…088b4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0057, t01=0x00da}
0x088b4…088be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00e8}
0x088be…088c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00f2}
0x088c8…088ea               Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x0057, t01=0x00fc}
0x088ea…088f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x011e}
0x088f4…088fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0128}
0x088fe…08912               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x0057, t01=0x0132}
0x08912…0892a               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x0057, t01=0x0146}
0x0892a…08958               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) POL010 ERROR. ACK EXPECTED =5 «, t00=0x0057, t01=0x015e}
0x08958…0896c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0057, t01=0x018c}
0x0896c…0898e               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0058, t01=0x0010}
0x0898e…089a0               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0058, t01=0x0032}
0x089a0…089b2               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0058, t01=0x0044}
0x089b2…089da               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x0058, t01=0x0056}
0x089da…089f8               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x0058, t01=0x007e}
0x089f8…08a04               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x009c}
0x08a04…08a18               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0058, t01=0x00a8}
0x08a18…08a2a               Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x0058, t01=0x00bc}
0x08a2a…08a36               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x00ce}
0x08a36…08a4a               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x0058, t01=0x00da}
0x08a4a…08a5a               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0058, t01=0x00ee}
0x08a5a…08a6e               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x0058, t01=0x00fe}
0x08a6e…08a88               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x0058, t01=0x0112}
0x08a88…08a9a               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0058, t01=0x012c}
0x08a9a…08ab6               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x0058, t01=0x013e}
0x08ab6…08ac2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x015a}
0x08ac2…08adc               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x0058, t01=0x0166}
0x08adc…08aee               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0058, t01=0x0180}
0x08aee…08b14 (89, 0, 398)  Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x0059, t01=0x0004}
0x08b14…08b38               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x0059, t01=0x002a}
0x08b38…08b48               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0059, t01=0x004e}
0x08b48…08b5c               Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x0059, t01=0x005e}
0x08b5c…08b68               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x0072}
0x08b68…08b7e               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0059, t01=0x007e}
0x08b7e…08ba6               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x0059, t01=0x0094}
0x08ba6…08bba               Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x0059, t01=0x00bc}
0x08bba…08bd4               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x0059, t01=0x00d0}
0x08bd4…08bf4               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x0059, t01=0x00ea}
0x08bf4…08c00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x010a}
0x08c00…08c12               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x0059, t01=0x0116}
0x08c12…08c26               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x0059, t01=0x0128}
0x08c26…08c56               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0059, t01=0x013c}
0x08c56…08c68               Head {h00=0x000e, h01=0x0050, text=» ADK A1,6 «, t00=0x0059, t01=0x016c}
0x08c68…08c7c               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBLST«, t00=0x0059, t01=0x017e}
0x08c7c…08c9c (90, 0, 400)  Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x005a, t01=0x0004}
0x08c9c…08cae               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x005a, t01=0x0024}
0x08cae…08cbc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005a, t01=0x0036}
0x08cbc…08cc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0044}
0x08cc6…08cd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x004e}
0x08cd0…08cf4               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x005a, t01=0x0058}
0x08cf4…08cfe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x007c}
0x08cfe…08d08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0086}
0x08d08…08d1c               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x005a, t01=0x0090}
0x08d1c…08d3c               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x005a, t01=0x00a4}
0x08d3c…08d60               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005a, t01=0x00c4}
0x08d60…08d74               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x005a, t01=0x00e8}
0x08d74…08da6               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x005a, t01=0x00fc}
0x08da6…08db2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x012e}
0x08db2…08dda               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x005a, t01=0x013a}
0x08dda…08dea               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x005a, t01=0x0162}
0x08dea…08e10               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x005a, t01=0x0172}
0x08e10…08e20               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x005b, t01=0x0008}
0x08e20…08e2e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005b, t01=0x0018}
0x08e2e…08e38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0026}
0x08e38…08e42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0030}
0x08e42…08e6a               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x005b, t01=0x003a}
0x08e6a…08e74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0062}
0x08e74…08e7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x006c}
0x08e7e…08e92               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x005b, t01=0x0076}
0x08e92…08eaa               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005b, t01=0x008a}
0x08eaa…08ed4               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL020 ACK NOT EXPECTED =5 «, t00=0x005b, t01=0x00a2}
0x08ed4…08efa               Head {h00=0x0022, h01=0x0050, text=»POL010 CF A5,TRENQ SEND ENQ =5«, t00=0x005b, t01=0x00cc}
0x08efa…08f28               Head {h00=0x002a, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER =5 «, t00=0x005b, t01=0x00f2}
0x08f28…08f4e               Head {h00=0x0022, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE =5 «, t00=0x005b, t01=0x0120}
0x08f4e…08f66               Head {h00=0x0014, h01=0x0050, text=»POL020 EQU *  =5«, t00=0x005b, t01=0x0146}
0x08f66…08f8c               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x005b, t01=0x015e}
0x08f8c…08fa0               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005b, t01=0x0184}
0x08fa0…08fb6               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x005c, t01=0x0008}
0x08fb6…08fe0               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x005c, t01=0x001e}
0x08fe0…09006               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x005c, t01=0x0048}
0x09006…0901a               Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x005c, t01=0x006e}
0x0901a…0903a               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x005c, t01=0x0082}
0x0903a…09064               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005c, t01=0x00a2}
0x09064…09088               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005c, t01=0x00cc}
0x09088…09094               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x00f0}
0x09094…090a8               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005c, t01=0x00fc}
0x090a8…090ba               Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x005c, t01=0x0110}
0x090ba…090c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x0122}
0x090c6…090da               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x005c, t01=0x012e}
0x090da…090ea               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005c, t01=0x0142}
0x090ea…090fe               Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x005c, t01=0x0152}
0x090fe…09112               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x005c, t01=0x0166}
0x09112…09138               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x005c, t01=0x017a}
0x09138…0914c               Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x005d, t01=0x0010}
0x0914c…0916a               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x005d, t01=0x0024}
0x0916a…0917c               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005d, t01=0x0042}
0x0917c…09190               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x005d, t01=0x0054}
0x09190…091b6               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x005d, t01=0x0068}
0x091b6…091ca               Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x005d, t01=0x008e}
0x091ca…091f2               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x005d, t01=0x00a2}
0x091f2…09208               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x005d, t01=0x00ca}
0x09208…0921e               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x005d, t01=0x00e0}
0x0921e…09230               Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x005d, t01=0x00f6}
0x09230…09244               Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x005d, t01=0x0108}
0x09244…09268               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x005d, t01=0x011c}
0x09268…09286               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x005d, t01=0x0140}
0x09286…0928e               Head {h00=0x0004, h01=0x0050, t00=0x005d, t01=0x015e}
0x0928e…092a4               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x005d, t01=0x0166}
0x092a4…092cc               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,MMUBUF MMU WORK BUFFER «, t00=0x005d, t01=0x017c}
0x092cc…092e4               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x005e, t01=0x0014}
0x092e4…09316               Head {h00=0x002e, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA FROM USER BUFFER «, t00=0x005e, t01=0x002c}
0x09316…09322               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x005e}
0x09322…0934c               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x005e, t01=0x006a}
0x0934c…0936e               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x005e, t01=0x0094}
0x0936e…09382               Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x005e, t01=0x00b6}
0x09382…093ac               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x005e, t01=0x00ca}
0x093ac…093d8               Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x005e, t01=0x00f4}
0x093d8…093fa               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x005e, t01=0x0120}
0x093fa…0941e               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005e, t01=0x0142}
0x0941e…09432               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x005e, t01=0x0166}
0x09432…09454               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x005e, t01=0x017a}
0x09454…09464               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x005f, t01=0x000c}
0x09464…09488               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x005f, t01=0x001c}
0x09488…094b2               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005f, t01=0x0040}
0x094b2…094d6               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005f, t01=0x006a}
0x094d6…094e8               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005f, t01=0x008e}
0x094e8…094f6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x00a0}
0x094f6…09500               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00ae}
0x09500…0950a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00b8}
0x0950a…09534               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x005f, t01=0x00c2}
0x09534…0953e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00ec}
0x0953e…09548               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00f6}
0x09548…0955c               Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x005f, t01=0x0100}
0x0955c…09576               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x005f, t01=0x0114}
0x09576…0958e               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =5 «, t00=0x005f, t01=0x012e}
0x0958e…095b4               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL010 ACK EXPECTED =5«, t00=0x005f, t01=0x0146}
0x095b4…095ce               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x005f, t01=0x016c}
0x095ce…095f2               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x005f, t01=0x0186}
0x095f2…09610               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x0060, t01=0x001a}
0x09610…09624               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0060, t01=0x0038}
0x09624…09646               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0060, t01=0x004c}
0x09646…09658               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x0060, t01=0x006e}
0x09658…0967e               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x0060, t01=0x0080}
0x0967e…0968a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0060, t01=0x00a6}
0x0968a…096a4               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x0060, t01=0x00b2}
0x096a4…096bc               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0060, t01=0x00cc}
0x096bc…096dc               Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x0060, t01=0x00e4}
0x096dc…096fe               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x0060, t01=0x0104}
0x096fe…09710               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x0060, t01=0x0126}
0x09710…09734               Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x0060, t01=0x0138}
0x09734…09746               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0060, t01=0x015c}
0x09746…0976c               Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x0060, t01=0x016e}
0x0976c…09778 (97, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0004}
0x09778…09794               Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x0061, t01=0x0010}
0x09794…097a2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0061, t01=0x002c}
0x097a2…097ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x003a}
0x097ac…097b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0044}
0x097b6…097f2               Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x0061, t01=0x004e}
0x097f2…097fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x008a}
0x097fc…0981e               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x0061, t01=0x0094}
0x0981e…09828               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00b6}
0x09828…09832               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00c0}
0x09832…0984e               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x0061, t01=0x00ca}
0x0984e…09876               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x0061, t01=0x00e6}
0x09876…0988e               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0061, t01=0x010e}
0x0988e…098ae               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x0061, t01=0x0126}
0x098ae…098d0               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0061, t01=0x0146}
0x098d0…098e2               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0061, t01=0x0168}
0x098e2…09906               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x0061, t01=0x017a}
0x09906…09918               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0062, t01=0x000e}
0x09918…09944               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x0062, t01=0x0020}
0x09944…09956               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0062, t01=0x004c}
0x09956…0998c               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x0062, t01=0x005e}
0x0998c…099ac               Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x0062, t01=0x0094}
0x099ac…099d8               Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x0062, t01=0x00b4}
0x099d8…099ea               Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x0062, t01=0x00e0}
0x099ea…09a14               Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x0062, t01=0x00f2}
0x09a14…09a36               Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x0062, t01=0x011c}
0x09a36…09a48               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0062, t01=0x013e}
0x09a48…09a5e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x0062, t01=0x0150}
0x09a5e…09a76               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0062, t01=0x0166}
0x09a76…09a9e               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0062, t01=0x017e}
0x09a9e…09ab2               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x0063, t01=0x0016}
0x09ab2…09ae0               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0063, t01=0x002a}
0x09ae0…09af4               Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x0063, t01=0x0058}
0x09af4…09b08               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x0063, t01=0x006c}
0x09b08…09b2e               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0063, t01=0x0080}
0x09b2e…09b40               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0063, t01=0x00a6}
0x09b40…09b50               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0063, t01=0x00b8}
0x09b50…09b5e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x00c8}
0x09b5e…09b68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00d6}
0x09b68…09b72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00e0}
0x09b72…09b90               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x0063, t01=0x00ea}
0x09b90…09b9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0108}
0x09b9a…09bba               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x0063, t01=0x0112}
0x09bba…09be6               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x0063, t01=0x0132}
0x09be6…09c1c               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x0063, t01=0x015e}
0x09c1c…09c48 (100, 0, 400) Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x0064, t01=0x0004}
0x09c48…09c52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0030}
0x09c52…09c66               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x0064, t01=0x003a}
0x09c66…09c8e               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0064, t01=0x004e}
0x09c8e…09cae               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x0064, t01=0x0076}
0x09cae…09cc0               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0064, t01=0x0096}
0x09cc0…09cd4               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0064, t01=0x00a8}
0x09cd4…09cfc               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x0064, t01=0x00bc}
0x09cfc…09d22               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x0064, t01=0x00e4}
0x09d22…09d34               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x0064, t01=0x010a}
0x09d34…09d48               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0064, t01=0x011c}
0x09d48…09d5c               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x0064, t01=0x0130}
0x09d5c…09d80               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0064, t01=0x0144}
0x09d80…09dac               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0064, t01=0x0168}
0x09dac…09dc0 (101, 0, 400) Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x0065, t01=0x0004}
0x09dc0…09dd0               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0065, t01=0x0018}
0x09dd0…09dec               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0065, t01=0x0028}
0x09dec…09df4               Head {h00=0x0004, h01=0x0050, t00=0x0065, t01=0x0044}
0x09df4…09e0a               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0065, t01=0x004c}
0x09e0a…09e20               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x0065, t01=0x0062}
0x09e20…09e34               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0065, t01=0x0078}
0x09e34…09e5a               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x0065, t01=0x008c}
0x09e5a…09e6e               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0065, t01=0x00b2}
0x09e6e…09e92               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0065, t01=0x00c6}
0x09e92…09ea6               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x0065, t01=0x00ea}
0x09ea6…09ebc               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x0065, t01=0x00fe}
0x09ebc…09eea               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x0065, t01=0x0114}
0x09eea…09efe               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0065, t01=0x0142}
0x09efe…09f0a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0065, t01=0x0156}
0x09f0a…09f20               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x0065, t01=0x0162}
0x09f20…09f34               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x0065, t01=0x0178}
0x09f34…09f5c               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0065, t01=0x018c}
0x09f5c…09f80               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0066, t01=0x0024}
0x09f80…09f94               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x0066, t01=0x0048}
0x09f94…09fa0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x005c}
0x09fa0…09fb6               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x0066, t01=0x0068}
0x09fb6…09fe0               Head {h00=0x0026, h01=0x0050, text=» IM TPM INDICATE TRANSPARENT TEXT «, t00=0x0066, t01=0x007e}
0x09fe0…09ffa               Head {h00=0x0016, h01=0x0050, text=»RDM100 CF A5,READ «, t00=0x0066, t01=0x00a8}
0x09ffa…0a01a               Head {h00=0x001c, h01=0x0050, text=» CWK A2,DLE CHECK IF DLE«, t00=0x0066, t01=0x00c2}
0x0a01a…0a034               Head {h00=0x0016, h01=0x0050, text=» RF(NE) RDM112 NO «, t00=0x0066, t01=0x00e2}
0x0a034…0a068               Head {h00=0x0030, h01=0x0050, text=» CF A5,READ SKIP DLE AND READ NEXT CHARACTER«, t00=0x0066, t01=0x00fc}
0x0a068…0a08c               Head {h00=0x0020, h01=0x0050, text=» CWK A2,SYNEBC CHECK IF SYN «, t00=0x0066, t01=0x0130}
0x0a08c…0a0aa               Head {h00=0x001a, h01=0x0050, text=» RB(E) RDM100 SKIP SYN«, t00=0x0066, t01=0x0154}
0x0a0aa…0a0ce               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x0066, t01=0x0172}
0x0a0ce…0a0f4               Head {h00=0x0022, h01=0x0050, text=» CWK A2,DLE CHECK IF 2:ND DLE «, t00=0x0067, t01=0x0008}
0x0a0f4…0a122               Head {h00=0x002a, h01=0x0050, text=» RF(E) RDM115 YES - STORE DLE AS DATA «, t00=0x0067, t01=0x002e}
0x0a122…0a142               Head {h00=0x001c, h01=0x0050, text=» CWK A2,ETX CHECK IF ETX«, t00=0x0067, t01=0x005c}
0x0a142…0a15c               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM130 YES «, t00=0x0067, t01=0x007c}
0x0a15c…0a180               Head {h00=0x0020, h01=0x0050, text=» CWK A2,ETBEBC CHECK IF ETB «, t00=0x0067, t01=0x0096}
0x0a180…0a19a               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM160 YES «, t00=0x0067, t01=0x00ba}
0x0a19a…0a1ba               Head {h00=0x001c, h01=0x0050, text=» CWK A2,ITB CHECK IF ITB«, t00=0x0067, t01=0x00d4}
0x0a1ba…0a1d4               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM175 YES «, t00=0x0067, t01=0x00f4}
0x0a1d4…0a1f8               Head {h00=0x0020, h01=0x0050, text=» CWK A2,ENQEBC CHECK IF ENQ «, t00=0x0067, t01=0x010e}
0x0a1f8…0a21a               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM135 YES SEND NAK«, t00=0x0067, t01=0x0132}
0x0a21a…0a224               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0154}
0x0a224…0a22e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x015e}
0x0a22e…0a248               Head {h00=0x0016, h01=0x0050, text=»* GET END OF BLOCK«, t00=0x0067, t01=0x0168}
0x0a248…0a252               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0182}
0x0a252…0a266               Head {h00=0x0010, h01=0x0050, text=»RDM105 EQU *«, t00=0x0067, t01=0x018c}
0x0a266…0a27a               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x0068, t01=0x0010}
0x0a27a…0a28e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,DLE «, t00=0x0068, t01=0x0024}
0x0a28e…0a2a4               Head {h00=0x0012, h01=0x0050, text=» RB(NE) RDM105«, t00=0x0068, t01=0x0038}
0x0a2a4…0a2b8               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x0068, t01=0x004e}
0x0a2b8…0a2cc               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x0068, t01=0x0062}
0x0a2cc…0a2f4               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM110 YES - END OF BLOCK«, t00=0x0068, t01=0x0076}
0x0a2f4…0a30a               Head {h00=0x0012, h01=0x0050, text=» CWK A2,ETBEBC«, t00=0x0068, t01=0x009e}
0x0a30a…0a332               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM110 YES - END OF BLOCK«, t00=0x0068, t01=0x00b4}
0x0a332…0a344               Head {h00=0x000e, h01=0x0050, text=» RB RDM105«, t00=0x0068, t01=0x00dc}
0x0a344…0a358               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x0068, t01=0x00ee}
0x0a358…0a380               Head {h00=0x0024, h01=0x0050, text=» CM TPM OUT OF TRANSPARENT TEXT «, t00=0x0068, t01=0x0102}
0x0a380…0a394               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDCRC«, t00=0x0068, t01=0x012a}
0x0a394…0a3c0               Head {h00=0x0028, h01=0x0050, text=» RF RDM140 INDICATE INVALID MESSAGE «, t00=0x0068, t01=0x013e}
0x0a3c0…0a3ea               Head {h00=0x0026, h01=0x0050, text=»RDM112 CF A5,CRCCAL CALCULATE CRC «, t00=0x0068, t01=0x016a}
0x0a3ea…0a3f6 (105, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0069, t01=0x0004}
0x0a3f6…0a40c               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x0069, t01=0x0010}
0x0a40c…0a420               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x0069, t01=0x0026}
0x0a420…0a442               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x0069, t01=0x003a}
0x0a442…0a456               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x0069, t01=0x005c}
0x0a456…0a478               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x0069, t01=0x0070}
0x0a478…0a48c               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x0069, t01=0x0092}
0x0a48c…0a4ae               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x0069, t01=0x00a6}
0x0a4ae…0a4c2               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x0069, t01=0x00c8}
0x0a4c2…0a4f8               Head {h00=0x0032, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE «, t00=0x0069, t01=0x00dc}
0x0a4f8…0a50c               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0069, t01=0x0112}
0x0a50c…0a534               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x0069, t01=0x0126}
0x0a534…0a53c               Head {h00=0x0004, h01=0x0050, t00=0x0069, t01=0x014e}
0x0a53c…0a550               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0069, t01=0x0156}
0x0a550…0a566               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x0069, t01=0x016a}
0x0a566…0a56e               Head {h00=0x0004, h01=0x0050, t00=0x0069, t01=0x0180}
0x0a56e…0a580               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0069, t01=0x0188}
0x0a580…0a596               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x006a, t01=0x000a}
0x0a596…0a5b8               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x006a, t01=0x0020}
0x0a5b8…0a5ca               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x006a, t01=0x0042}
0x0a5ca…0a5ec               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x006a, t01=0x0054}
0x0a5ec…0a5fe               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x006a, t01=0x0076}
0x0a5fe…0a610               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x006a, t01=0x0088}
0x0a610…0a63e               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x006a, t01=0x009a}
0x0a63e…0a662               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x006a, t01=0x00c8}
0x0a662…0a690               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x006a, t01=0x00ec}
0x0a690…0a6a2               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x006a, t01=0x011a}
0x0a6a2…0a6ae               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006a, t01=0x012c}
0x0a6ae…0a6c2               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x006a, t01=0x0138}
0x0a6c2…0a6ca               Head {h00=0x0004, h01=0x0050, t00=0x006a, t01=0x014c}
0x0a6ca…0a6ec               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x006a, t01=0x0154}
0x0a6ec…0a710               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x006a, t01=0x0176}
0x0a710…0a738               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x006b, t01=0x000a}
0x0a738…0a74c               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x006b, t01=0x0032}
0x0a74c…0a768               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x006b, t01=0x0046}
0x0a768…0a78c               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x006b, t01=0x0062}
0x0a78c…0a7a2               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x006b, t01=0x0086}
0x0a7a2…0a7b4               Head {h00=0x000e, h01=0x0050, text=» RF RDM135«, t00=0x006b, t01=0x009c}
0x0a7b4…0a7c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x00ae}
0x0a7c0…0a7ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00ba}
0x0a7ca…0a7e4               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x006b, t01=0x00c4}
0x0a7e4…0a7ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00de}
0x0a7ee…0a80c               Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x006b, t01=0x00e8}
0x0a80c…0a820               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x006b, t01=0x0106}
0x0a820…0a84a               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006b, t01=0x011a}
0x0a84a…0a85e               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x006b, t01=0x0144}
0x0a85e…0a886               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x006b, t01=0x0158}
0x0a886…0a898               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x006b, t01=0x0180}
0x0a898…0a8a2 (108, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0004}
0x0a8a2…0a8b8               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x006c, t01=0x000e}
0x0a8b8…0a8c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0024}
0x0a8c2…0a8d6               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x006c, t01=0x002e}
0x0a8d6…0a8fe               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x006c, t01=0x0042}
0x0a8fe…0a922               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x006c, t01=0x006a}
0x0a922…0a958               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x006c, t01=0x008e}
0x0a958…0a96c               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006c, t01=0x00c4}
0x0a96c…0a980               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006c, t01=0x00d8}
0x0a980…0a9a0               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x006c, t01=0x00ec}
0x0a9a0…0a9ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x010c}
0x0a9ac…0a9c2               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x006c, t01=0x0118}
0x0a9c2…0a9ea               Head {h00=0x0024, h01=0x0050, text=» CM TPM OUT OF TRANSPARENT TEXT «, t00=0x006c, t01=0x012e}
0x0a9ea…0a9f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006c, t01=0x0156}
0x0a9f6…0aa0a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006c, t01=0x0162}
0x0aa0a…0aa34               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006c, t01=0x0176}
0x0aa34…0aa54               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x006d, t01=0x0010}
0x0aa54…0aa60               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x0030}
0x0aa60…0aa76               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x006d, t01=0x003c}
0x0aa76…0aa9e               Head {h00=0x0024, h01=0x0050, text=»RDM135 CM TPM OUT OF TRANSP TEXT«, t00=0x006d, t01=0x0052}
0x0aa9e…0aaaa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x007a}
0x0aaaa…0aabe               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x006d, t01=0x0086}
0x0aabe…0aae8               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x006d, t01=0x009a}
0x0aae8…0aafc               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x006d, t01=0x00c4}
0x0aafc…0ab24               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x006d, t01=0x00d8}
0x0ab24…0ab44               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT«, t00=0x006d, t01=0x0100}
0x0ab44…0ab58               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x006d, t01=0x0120}
0x0ab58…0ab6c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x006d, t01=0x0134}
0x0ab6c…0ab82               Head {h00=0x0012, h01=0x0050, text=» ANK A2,SBPARI«, t00=0x006d, t01=0x0148}
0x0ab82…0ab98               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RDM155 «, t00=0x006d, t01=0x015e}
0x0ab98…0abb6               Head {h00=0x001a, h01=0x0050, text=» LDK A7,1 PARITY ERROR«, t00=0x006d, t01=0x0174}
0x0abb6…0abca (110, 0, 400) Head {h00=0x0010, h01=0x0050, text=»RDM155 EQU *«, t00=0x006e, t01=0x0004}
0x0abca…0abd6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x0018}
0x0abd6…0abe6               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006e, t01=0x0024}
0x0abe6…0abf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0034}
0x0abf0…0ac06               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x006e, t01=0x003e}
0x0ac06…0ac10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0054}
0x0ac10…0ac24               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x006e, t01=0x005e}
0x0ac24…0ac36               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x006e, t01=0x0072}
0x0ac36…0ac5c               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x006e, t01=0x0084}
0x0ac5c…0ac82               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x006e, t01=0x00aa}
0x0ac82…0ac94               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x006e, t01=0x00d0}
0x0ac94…0ac9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00e2}
0x0ac9e…0acb4               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x006e, t01=0x00ec}
0x0acb4…0acbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0102}
0x0acbe…0acd2               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x006e, t01=0x010c}
0x0acd2…0ace6               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x006e, t01=0x0120}
0x0ace6…0acfa               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x006e, t01=0x0134}
0x0acfa…0ad20               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x006e, t01=0x0148}
0x0ad20…0ad2c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x016e}
0x0ad2c…0ad40               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x006e, t01=0x017a}
0x0ad40…0ad6a               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x006e, t01=0x018e}
0x0ad6a…0ad90               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x006f, t01=0x0028}
0x0ad90…0ada6               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x006f, t01=0x004e}
0x0ada6…0add4               Head {h00=0x002a, h01=0x0050, text=»RDM175 CM TPM OUT OF TRANSPARENT TEXT «, t00=0x006f, t01=0x0064}
0x0add4…0adfc               Head {h00=0x0024, h01=0x0050, text=» CF A5,RDCRC READ AND CHECK CRC «, t00=0x006f, t01=0x0092}
0x0adfc…0ae0c               Head {h00=0x000c, h01=0x0050, text=» IM TPM «, t00=0x006f, t01=0x00ba}
0x0ae0c…0ae32               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM105 CRC WAS NOT OK «, t00=0x006f, t01=0x00ca}
0x0ae32…0ae4c               Head {h00=0x0016, h01=0x0050, text=»RDM180 CF A5,READ «, t00=0x006f, t01=0x00f0}
0x0ae4c…0ae62               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x006f, t01=0x010a}
0x0ae62…0ae80               Head {h00=0x001a, h01=0x0050, text=» RB(E) RDM180 SKIP SYN«, t00=0x006f, t01=0x0120}
0x0ae80…0ae94               Head {h00=0x0010, h01=0x0050, text=» CWK A2,DLE «, t00=0x006f, t01=0x013e}
0x0ae94…0aebc               Head {h00=0x0024, h01=0x0050, text=» RB(NE) RDM105 ILLEGAL CHARACTER«, t00=0x006f, t01=0x0152}
0x0aebc…0aed0               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x006f, t01=0x017a}
0x0aed0…0aee4               Head {h00=0x0010, h01=0x0050, text=» CWK A2,STX «, t00=0x006f, t01=0x018e}
0x0aee4…0af0c               Head {h00=0x0024, h01=0x0050, text=» RB(NE) RDM105 ILLEGAL CHARACTER«, t00=0x0070, t01=0x0012}
0x0af0c…0af18               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x003a}
0x0af18…0af2a               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0070, t01=0x0046}
0x0af2a…0af38               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0070, t01=0x0058}
0x0af38…0af42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0066}
0x0af42…0af60               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x0070, t01=0x0070}
0x0af60…0af6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x008e}
0x0af6a…0af80               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x0070, t01=0x0098}
0x0af80…0afa2               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x0070, t01=0x00ae}
0x0afa2…0afcc               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x0070, t01=0x00d0}
0x0afcc…0afe2               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x0070, t01=0x00fa}
0x0afe2…0b000               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x0070, t01=0x0110}
0x0b000…0b012               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0070, t01=0x012e}
0x0b012…0b01c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0140}
0x0b01c…0b034               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x0070, t01=0x014a}
0x0b034…0b03e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0162}
0x0b03e…0b062               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x0070, t01=0x016c}
0x0b062…0b074               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x0070, t01=0x0190}
0x0b074…0b07e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0012}
0x0b07e…0b094               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x0071, t01=0x001c}
0x0b094…0b09e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0032}
0x0b09e…0b0b2               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0071, t01=0x003c}
0x0b0b2…0b0d4               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x0071, t01=0x0050}
0x0b0d4…0b0e0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x0072}
0x0b0e0…0b0ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x007e}
0x0b0ea…0b100               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x0071, t01=0x0088}
0x0b100…0b10a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x009e}
0x0b10a…0b12c               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x0071, t01=0x00a8}
0x0b12c…0b152               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x0071, t01=0x00ca}
0x0b152…0b16a               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x0071, t01=0x00f0}
0x0b16a…0b17c               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x0071, t01=0x0108}
0x0b17c…0b18a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0071, t01=0x011a}
0x0b18a…0b194               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0128}
0x0b194…0b1aa               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x0071, t01=0x0132}
0x0b1aa…0b1b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0148}
0x0b1b4…0b1d6               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x0071, t01=0x0152}
0x0b1d6…0b1e8               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0071, t01=0x0174}
0x0b1e8…0b1f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0186}
0x0b1f2…0b208               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x0071, t01=0x0190}
0x0b208…0b212               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0016}
0x0b212…0b234               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x0072, t01=0x0020}
0x0b234…0b246               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x0072, t01=0x0042}
0x0b246…0b250               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0054}
0x0b250…0b266               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x0072, t01=0x005e}
0x0b266…0b270               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0074}
0x0b270…0b292               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x0072, t01=0x007e}
0x0b292…0b29c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00a0}
0x0b29c…0b2c8               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x0072, t01=0x00aa}
0x0b2c8…0b2dc               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0072, t01=0x00d6}
0x0b2dc…0b2f4               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x0072, t01=0x00ea}
0x0b2f4…0b31c               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x0072, t01=0x0102}
0x0b31c…0b346               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x0072, t01=0x012a}
0x0b346…0b364               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0072, t01=0x0154}
0x0b364…0b38e               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x0072, t01=0x0172}
0x0b38e…0b3ac               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0073, t01=0x000c}
0x0b3ac…0b3c6               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x0073, t01=0x002a}
0x0b3c6…0b3e4               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x0073, t01=0x0044}
0x0b3e4…0b3f8               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x0073, t01=0x0062}
0x0b3f8…0b40e               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x0073, t01=0x0076}
0x0b40e…0b430               Head {h00=0x001e, h01=0x0050, text=» CF A5,CHALTO HALT OUTPUT «, t00=0x0073, t01=0x008c}
0x0b430…0b444               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0073, t01=0x00ae}
0x0b444…0b470               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x0073, t01=0x00c2}
0x0b470…0b47c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x00ee}
0x0b47c…0b48c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0073, t01=0x00fa}
0x0b48c…0b49a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0073, t01=0x010a}
0x0b49a…0b4a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0118}
0x0b4a4…0b4ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0122}
0x0b4ae…0b4d0               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x0073, t01=0x012c}
0x0b4d0…0b4da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x014e}
0x0b4da…0b4e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0158}
0x0b4e4…0b4f8               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x0073, t01=0x0162}
0x0b4f8…0b51a               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0073, t01=0x0176}
0x0b51a…0b530               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x0074, t01=0x0008}
0x0b530…0b546               Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x0074, t01=0x001e}
0x0b546…0b550               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0034}
0x0b550…0b55a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x003e}
0x0b55a…0b57a               Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x0074, t01=0x0048}
0x0b57a…0b584               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0068}
0x0b584…0b58e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0072}
0x0b58e…0b5a2               Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x0074, t01=0x007c}
0x0b5a2…0b5ce               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x0074, t01=0x0090}
0x0b5ce…0b5d6               Head {h00=0x0004, h01=0x0050, t00=0x0074, t01=0x00bc}
0x0b5d6…0b60c               Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x0074, t01=0x00c4}
0x0b60c…0b62a               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x0074, t01=0x00fa}
0x0b62a…0b632               Head {h00=0x0004, h01=0x0050, t00=0x0074, t01=0x0118}
0x0b632…0b648               Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x0074, t01=0x0120}
0x0b648…0b66e               Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x0074, t01=0x0136}
0x0b66e…0b682               Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x0074, t01=0x015c}
0x0b682…0b6aa               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x0074, t01=0x0170}
0x0b6aa…0b6be               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0075, t01=0x0008}
0x0b6be…0b6dc               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0075, t01=0x001c}
0x0b6dc…0b6f8               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x0075, t01=0x003a}
0x0b6f8…0b70c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0075, t01=0x0056}
0x0b70c…0b728               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x0075, t01=0x006a}
0x0b728…0b73c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x0075, t01=0x0086}
0x0b73c…0b758               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x0075, t01=0x009a}
0x0b758…0b76c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0075, t01=0x00b6}
0x0b76c…0b78a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0075, t01=0x00ca}
0x0b78a…0b7b6               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0075, t01=0x00e8}
0x0b7b6…0b7e2               Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x0075, t01=0x0114}
0x0b7e2…0b802               Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x0075, t01=0x0140}
0x0b802…0b814               Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x0075, t01=0x0160}
0x0b814…0b828               Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x0075, t01=0x0172}
0x0b828…0b83a               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0075, t01=0x0186}
0x0b83a…0b84e               Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x0076, t01=0x0008}
0x0b84e…0b858               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x001c}
0x0b858…0b862               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0026}
0x0b862…0b86c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0030}
0x0b86c…0b878               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x003a}
0x0b878…0b88e               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x0076, t01=0x0046}
0x0b88e…0b8a2               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x0076, t01=0x005c}
0x0b8a2…0b8c0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIDLE SEND DLE«, t00=0x0076, t01=0x0070}
0x0b8c0…0b8cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x008e}
0x0b8cc…0b8e0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0076, t01=0x009a}
0x0b8e0…0b8fe               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0076, t01=0x00ae}
0x0b8fe…0b91a               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0076, t01=0x00cc}
0x0b91a…0b942               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0076, t01=0x00e8}
0x0b942…0b966               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0076, t01=0x0110}
0x0b966…0b992               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0076, t01=0x0134}
0x0b992…0b9be               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x0076, t01=0x0160}
0x0b9be…0b9e8               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x0076, t01=0x018c}
0x0b9e8…0ba0c               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x0077, t01=0x0026}
0x0ba0c…0ba32               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x0077, t01=0x004a}
0x0ba32…0ba52               Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x0077, t01=0x0070}
0x0ba52…0ba70               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0077, t01=0x0090}
0x0ba70…0ba8c               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0077, t01=0x00ae}
0x0ba8c…0baaa               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0077, t01=0x00ca}
0x0baaa…0bac0               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0077, t01=0x00e8}
0x0bac0…0bad4               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x0077, t01=0x00fe}
0x0bad4…0bafa               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x0077, t01=0x0112}
0x0bafa…0bb10               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0077, t01=0x0138}
0x0bb10…0bb36               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x0077, t01=0x014e}
0x0bb36…0bb4c               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0077, t01=0x0174}
0x0bb4c…0bb60               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x0077, t01=0x018a}
0x0bb60…0bb76               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0078, t01=0x000e}
0x0bb76…0bb82               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x0024}
0x0bb82…0bb96               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0078, t01=0x0030}
0x0bb96…0bb9e               Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x0044}
0x0bb9e…0bbc8               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0078, t01=0x004c}
0x0bbc8…0bbe2               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x0078, t01=0x0076}
0x0bbe2…0bbea               Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x0090}
0x0bbea…0bc0a               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x0078, t01=0x0098}
0x0bc0a…0bc30               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x0078, t01=0x00b8}
0x0bc30…0bc54               Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x0078, t01=0x00de}
0x0bc54…0bc5c               Head {h00=0x0004, h01=0x0050, t00=0x0078, t01=0x0102}
0x0bc5c…0bc84               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x0078, t01=0x010a}
0x0bc84…0bcb6               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x0078, t01=0x0132}
0x0bcb6…0bcd8               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x0078, t01=0x0164}
0x0bcd8…0bcea               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0078, t01=0x0186}
0x0bcea…0bcfe               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x0079, t01=0x0008}
0x0bcfe…0bd0a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x001c}
0x0bd0a…0bd12               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x0028}
0x0bd12…0bd24               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0079, t01=0x0030}
0x0bd24…0bd38               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x0079, t01=0x0042}
0x0bd38…0bd4e               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x0079, t01=0x0056}
0x0bd4e…0bd6e               Head {h00=0x001c, h01=0x0050, text=» IM TPM TRANSPARENT TEXT«, t00=0x0079, t01=0x006c}
0x0bd6e…0bd82               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x0079, t01=0x008c}
0x0bd82…0bd8e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x00a0}
0x0bd8e…0bdb2               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x0079, t01=0x00ac}
0x0bdb2…0bdd6               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0079, t01=0x00d0}
0x0bdd6…0bdea               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0079, t01=0x00f4}
0x0bdea…0bdfe               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0079, t01=0x0108}
0x0bdfe…0be28               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0079, t01=0x011c}
0x0be28…0be42               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x0079, t01=0x0146}
0x0be42…0be4a               Head {h00=0x0004, h01=0x0050, t00=0x0079, t01=0x0160}
0x0be4a…0be8e               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0079, t01=0x0168}
0x0be8e…0be98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x001c}
0x0be98…0bec8               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x007a, t01=0x0026}
0x0bec8…0bed2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0056}
0x0bed2…0bf0a               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x007a, t01=0x0060}
0x0bf0a…0bf12               Head {h00=0x0004, h01=0x0050, t00=0x007a, t01=0x0098}
0x0bf12…0bf3c               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x007a, t01=0x00a0}
0x0bf3c…0bf58               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x007a, t01=0x00ca}
0x0bf58…0bf64               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x00e6}
0x0bf64…0bf78               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x007a, t01=0x00f2}
0x0bf78…0bf98               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x007a, t01=0x0106}
0x0bf98…0bfbe               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x007a, t01=0x0126}
0x0bfbe…0bfd2               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x007a, t01=0x014c}
0x0bfd2…0bfe6               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x007a, t01=0x0160}
0x0bfe6…0c00a               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x007a, t01=0x0174}
0x0c00a…0c030               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x007b, t01=0x0008}
0x0c030…0c044               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x007b, t01=0x002e}
0x0c044…0c058               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x007b, t01=0x0042}
0x0c058…0c076               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x007b, t01=0x0056}
0x0c076…0c08c               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x007b, t01=0x0074}
0x0c08c…0c09e               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x007b, t01=0x008a}
0x0c09e…0c0aa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007b, t01=0x009c}
0x0c0aa…0c0be               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007b, t01=0x00a8}
0x0c0be…0c0d0               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x007b, t01=0x00bc}
0x0c0d0…0c0d8               Head {h00=0x0004, h01=0x0050, t00=0x007b, t01=0x00ce}
0x0c0d8…0c0ec               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x007b, t01=0x00d6}
0x0c0ec…0c0f4               Head {h00=0x0004, h01=0x0050, t00=0x007b, t01=0x00ea}
0x0c0f4…0c106               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x007b, t01=0x00f2}
0x0c106…0c12c               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x007b, t01=0x0104}
0x0c12c…0c134               Head {h00=0x0004, h01=0x0050, t00=0x007b, t01=0x012a}
0x0c134…0c160               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x007b, t01=0x0132}
0x0c160…0c176               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x007b, t01=0x015e}
0x0c176…0c1a2               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x007b, t01=0x0174}
0x0c1a2…0c1b4               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x007c, t01=0x0010}
0x0c1b4…0c1cc               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x007c, t01=0x0022}
0x0c1cc…0c1de               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x007c, t01=0x003a}
0x0c1de…0c208               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x007c, t01=0x004c}
0x0c208…0c22e               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x007c, t01=0x0076}
0x0c22e…0c246               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x007c, t01=0x009c}
0x0c246…0c270               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x007c, t01=0x00b4}
0x0c270…0c286               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x007c, t01=0x00de}
0x0c286…0c29a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x007c, t01=0x00f4}
0x0c29a…0c2ae               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x007c, t01=0x0108}
0x0c2ae…0c2d2               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x007c, t01=0x011c}
0x0c2d2…0c2e4               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x007c, t01=0x0140}
0x0c2e4…0c2f6               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x007c, t01=0x0152}
0x0c2f6…0c30a               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x007c, t01=0x0164}
0x0c30a…0c316               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x0178}
0x0c316…0c324               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007c, t01=0x0184}
0x0c324…0c33a (125, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x007d, t01=0x0004}
0x0c33a…0c34e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x007d, t01=0x001a}
0x0c34e…0c37a               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x007d, t01=0x002e}
0x0c37a…0c386               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x005a}
0x0c386…0c3aa               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x007d, t01=0x0066}
0x0c3aa…0c3be               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x007d, t01=0x008a}
0x0c3be…0c3e6               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x007d, t01=0x009e}
0x0c3e6…0c410               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x007d, t01=0x00c6}
0x0c410…0c424               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x007d, t01=0x00f0}
0x0c424…0c44a               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x007d, t01=0x0104}
0x0c44a…0c478               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x007d, t01=0x012a}
0x0c478…0c48e               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x007d, t01=0x0158}
0x0c48e…0c4a4               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x007d, t01=0x016e}
0x0c4a4…0c4c8               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT105 NOT FULL BLOCK«, t00=0x007d, t01=0x0184}
0x0c4c8…0c4d4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x0018}
0x0c4d4…0c4f8               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x007e, t01=0x0024}
0x0c4f8…0c50c               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x007e, t01=0x0048}
0x0c50c…0c53c               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x007e, t01=0x005c}
0x0c53c…0c550               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x007e, t01=0x008c}
0x0c550…0c56a               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x007e, t01=0x00a0}
0x0c56a…0c57e               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x007e, t01=0x00ba}
0x0c57e…0c5a0               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x007e, t01=0x00ce}
0x0c5a0…0c5cc               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x007e, t01=0x00f0}
0x0c5cc…0c5ee               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x007e, t01=0x011c}
0x0c5ee…0c60c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007e, t01=0x013e}
0x0c60c…0c62c               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007e, t01=0x015c}
0x0c62c…0c65e               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x007e, t01=0x017c}
0x0c65e…0c67c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007f, t01=0x001e}
0x0c67c…0c69c               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x007f, t01=0x003c}
0x0c69c…0c6a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007f, t01=0x005c}
0x0c6a8…0c6bc               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x007f, t01=0x0068}
0x0c6bc…0c6d2               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x007f, t01=0x007c}
0x0c6d2…0c6e6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x007f, t01=0x0092}
0x0c6e6…0c70e               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRIDLE SEND AN EXTRA DLE «, t00=0x007f, t01=0x00a6}
0x0c70e…0c71a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007f, t01=0x00ce}
0x0c71a…0c736               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x007f, t01=0x00da}
0x0c736…0c74a               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x007f, t01=0x00f6}
0x0c74a…0c760               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x007f, t01=0x010a}
0x0c760…0c770               Head {h00=0x000c, h01=0x0050, text=» CM TPM «, t00=0x007f, t01=0x0120}
0x0c770…0c77c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007f, t01=0x0130}
0x0c77c…0c79a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x007f, t01=0x013c}
0x0c79a…0c7ae               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x007f, t01=0x015a}
0x0c7ae…0c7c8               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x007f, t01=0x016e}
0x0c7c8…0c7e6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x007f, t01=0x0188}
0x0c7e6…0c7f2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x0016}
0x0c7f2…0c806               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0080, t01=0x0022}
0x0c806…0c82a               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x0080, t01=0x0036}
0x0c82a…0c83c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0080, t01=0x005a}
0x0c83c…0c850               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0080, t01=0x006c}
0x0c850…0c876               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x0080, t01=0x0080}
0x0c876…0c888               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x0080, t01=0x00a6}
0x0c888…0c89c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0080, t01=0x00b8}
0x0c89c…0c8c2               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x0080, t01=0x00cc}
0x0c8c2…0c8ce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x00f2}
0x0c8ce…0c8ee               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x0080, t01=0x00fe}
0x0c8ee…0c902               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x0080, t01=0x011e}
0x0c902…0c926               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x0080, t01=0x0132}
0x0c926…0c93a               Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x0080, t01=0x0156}
0x0c93a…0c950               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x0080, t01=0x016a}
0x0c950…0c964               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x0080, t01=0x0180}
0x0c964…0c98c (129, 0, 398) Head {h00=0x0024, h01=0x0050, text=» CF A5,WRIDLE SEND AN EXTRA DLE «, t00=0x0081, t01=0x0004}
0x0c98c…0c998               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x002c}
0x0c998…0c9b4               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x0081, t01=0x0038}
0x0c9b4…0c9d8               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x0081, t01=0x0054}
0x0c9d8…0c9e6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0081, t01=0x0078}
0x0c9e6…0c9f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0086}
0x0c9f0…0c9fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0090}
0x0c9fa…0ca1c               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x0081, t01=0x009a}
0x0ca1c…0ca26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00bc}
0x0ca26…0ca30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00c6}
0x0ca30…0ca44               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0081, t01=0x00d0}
0x0ca44…0ca58               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x0081, t01=0x00e4}
0x0ca58…0ca80               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x0081, t01=0x00f8}
0x0ca80…0ca9e               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0081, t01=0x0120}
0x0ca9e…0cac0               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x0081, t01=0x013e}
0x0cac0…0cad4               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x0081, t01=0x0160}
0x0cad4…0caf2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x0081, t01=0x0174}
0x0caf2…0cb0c (130, 0, 400) Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x0082, t01=0x0004}
0x0cb0c…0cb20               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x0082, t01=0x001e}
0x0cb20…0cb3e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x0082, t01=0x0032}
0x0cb3e…0cb52               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x0082, t01=0x0050}
0x0cb52…0cb70               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x0082, t01=0x0064}
0x0cb70…0cb84               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0082, t01=0x0082}
0x0cb84…0cba2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0082, t01=0x0096}
0x0cba2…0cbba               Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x0082, t01=0x00b4}
0x0cbba…0cbd8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0082, t01=0x00cc}
0x0cbd8…0cbec               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0082, t01=0x00ea}
0x0cbec…0cc0a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0082, t01=0x00fe}
0x0cc0a…0cc2c               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0082, t01=0x011c}
0x0cc2c…0cc4e               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x0082, t01=0x013e}
0x0cc4e…0cc60               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0082, t01=0x0160}
0x0cc60…0cc88               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x0082, t01=0x0172}
0x0cc88…0cca8               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x0083, t01=0x000a}
0x0cca8…0ccca               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x0083, t01=0x002a}
0x0ccca…0ccec               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0083, t01=0x004c}
0x0ccec…0ccfe               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x0083, t01=0x006e}
0x0ccfe…0cd1c               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x0083, t01=0x0080}
0x0cd1c…0cd2e               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0083, t01=0x009e}
0x0cd2e…0cd50               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x0083, t01=0x00b0}
0x0cd50…0cd62               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x0083, t01=0x00d2}
0x0cd62…0cd76               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x0083, t01=0x00e4}
0x0cd76…0cd96               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x0083, t01=0x00f8}
0x0cd96…0cdba               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x0083, t01=0x0118}
0x0cdba…0cdc6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x013c}
0x0cdc6…0cdd4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0083, t01=0x0148}
0x0cdd4…0cdde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0156}
0x0cdde…0cde8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0160}
0x0cde8…0ce12               Head {h00=0x0026, h01=0x0050, text=»*  TRSYNC : TRANSMIT SYNC SEQUENCE«, t00=0x0083, t01=0x016a}
0x0ce12…0ce1c (132, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0004}
0x0ce1c…0ce30               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x0084, t01=0x000e}
0x0ce30…0ce5c               Head {h00=0x0028, h01=0x0050, text=» CF A5,CHALTI HALT INPUT IF NOT DONE«, t00=0x0084, t01=0x0022}
0x0ce5c…0ce8c               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCO START OUTPUT WITH SYNC DEF«, t00=0x0084, t01=0x004e}
0x0ce8c…0ceba               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x0084, t01=0x007e}
0x0ceba…0cec4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00ac}
0x0cec4…0cece               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00b6}
0x0cece…0ceee               Head {h00=0x001c, h01=0x0050, text=»*  SEND 4 SYN-CHARACTERS«, t00=0x0084, t01=0x00c0}
0x0ceee…0cef8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00e0}
0x0cef8…0cf0a               Head {h00=0x000e, h01=0x0050, text=» LDK A3,4 «, t00=0x0084, t01=0x00ea}
0x0cf0a…0cf1e               Head {h00=0x0010, h01=0x0050, text=»TRS100 EQU *«, t00=0x0084, t01=0x00fc}
0x0cf1e…0cf32               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SYN «, t00=0x0084, t01=0x0110}
0x0cf32…0cf56               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITE SEND CHARACTER «, t00=0x0084, t01=0x0124}
0x0cf56…0cf68               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0084, t01=0x0148}
0x0cf68…0cf7e               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x0084, t01=0x015a}
0x0cf7e…0cf9e               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x0084, t01=0x0170}
0x0cf9e…0cfac               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0084, t01=0x0190}
0x0cfac…0cfb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x000e}
0x0cfb6…0cfc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0018}
0x0cfc0…0cff4               Head {h00=0x0030, h01=0x0050, text=»*  CSYNCI :SEND SYNC-PATTERN FOR INPUT DATA «, t00=0x0085, t01=0x0022}
0x0cff4…0cffe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0056}
0x0cffe…0d012               Head {h00=0x0010, h01=0x0050, text=»CSYNCI EQU *«, t00=0x0085, t01=0x0060}
0x0d012…0d028               Head {h00=0x0012, h01=0x0050, text=» LD A2,PFPOST «, t00=0x0085, t01=0x0074}
0x0d028…0d050               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CSYN:I WAIT FOR POWER UP«, t00=0x0085, t01=0x008a}
0x0d050…0d070               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI STOP INPUT«, t00=0x0085, t01=0x00b2}
0x0d070…0d09a               Head {h00=0x0026, h01=0x0050, text=» ST A5,DCLCI SET INPUT ACTIVE FLAG«, t00=0x0085, t01=0x00d2}
0x0d09a…0d0ae               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0085, t01=0x00fc}
0x0d0ae…0d0e0               Head {h00=0x002e, h01=0x0050, text=» LDK A2,PARITY CHAR PARITY FUNCTION FOR LC«, t00=0x0085, t01=0x0110}
0x0d0e0…0d102               Head {h00=0x001e, h01=0x0050, text=» CIO A2,1,LCUIN START I/O «, t00=0x0085, t01=0x0142}
0x0d102…0d124               Head {h00=0x001e, h01=0x0050, text=» LDK A2,SYNC SYNC PATTERN «, t00=0x0085, t01=0x0164}
0x0d124…0d15a               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC «, t00=0x0085, t01=0x0186}
0x0d15a…0d166               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x002c}
0x0d166…0d17a               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0086, t01=0x0038}
0x0d17a…0d1a8               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CBCARR+SYNC DEF SYNC-PATTERN «, t00=0x0086, t01=0x004c}
0x0d1a8…0d1de               Head {h00=0x0032, h01=0x0050, text=» CIO A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC «, t00=0x0086, t01=0x007a}
0x0d1de…0d1ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x00b0}
0x0d1ea…0d1fe               Head {h00=0x0010, h01=0x0050, text=»CSYN:I EQU *«, t00=0x0086, t01=0x00bc}
0x0d1fe…0d21e               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x0086, t01=0x00d0}
0x0d21e…0d22c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0086, t01=0x00f0}
0x0d22c…0d236               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00fe}
0x0d236…0d240               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0108}
0x0d240…0d266               Head {h00=0x0022, h01=0x0050, text=»*  CHALTI : HALT INPUT CHANNEL«, t00=0x0086, t01=0x0112}
0x0d266…0d270               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0138}
0x0d270…0d284               Head {h00=0x0010, h01=0x0050, text=»CHALTI EQU *«, t00=0x0086, t01=0x0142}
0x0d284…0d298               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0086, t01=0x0156}
0x0d298…0d2c0               Head {h00=0x0024, h01=0x0050, text=» LDK A2,CBSTOP STOP FUNCTION BIT«, t00=0x0086, t01=0x016a}
0x0d2c0…0d2cc (135, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x0004}
0x0d2cc…0d2ee               Head {h00=0x001e, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT«, t00=0x0087, t01=0x0010}
0x0d2ee…0d318               Head {h00=0x0026, h01=0x0050, text=» CM DCLCI CLEAR INPUT ACTIVE FLAG «, t00=0x0087, t01=0x0032}
0x0d318…0d33a               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN READ STATUS «, t00=0x0087, t01=0x005c}
0x0d33a…0d34e               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0087, t01=0x007e}
0x0d34e…0d376               Head {h00=0x0024, h01=0x0050, text=» CF A5,LOGSST LOGG INPUT STATUS «, t00=0x0087, t01=0x0092}
0x0d376…0d382               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x00ba}
0x0d382…0d3a2               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x0087, t01=0x00c6}
0x0d3a2…0d3b0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0087, t01=0x00e6}
0x0d3b0…0d3ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00f4}
0x0d3ba…0d3c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00fe}
0x0d3c4…0d3f8               Head {h00=0x0030, h01=0x0050, text=»*  CSYNCO : START TRANSMITTER WITH SYNC DEF «, t00=0x0087, t01=0x0108}
0x0d3f8…0d402               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x013c}
0x0d402…0d416               Head {h00=0x0010, h01=0x0050, text=»CSYNCO EQU *«, t00=0x0087, t01=0x0146}
0x0d416…0d42c               Head {h00=0x0012, h01=0x0050, text=» LD A2,PFPOST «, t00=0x0087, t01=0x015a}
0x0d42c…0d454               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CSYN:O WAIT FOR POWER UP«, t00=0x0087, t01=0x0170}
0x0d454…0d468               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0088, t01=0x0008}
0x0d468…0d496               Head {h00=0x002a, h01=0x0050, text=» LDK A2,PARITY CHAR PARITY CHECK BY CU«, t00=0x0088, t01=0x001c}
0x0d496…0d4b8               Head {h00=0x001e, h01=0x0050, text=» CIO A2,1,LCUUT CIO START «, t00=0x0088, t01=0x004a}
0x0d4b8…0d4d6               Head {h00=0x001a, h01=0x0050, text=» RF(A) CSYNC1 ACCEPTED«, t00=0x0088, t01=0x006c}
0x0d4d6…0d4fe               Head {h00=0x0024, h01=0x0050, text=» SST A2,LCUUT TRY TO READ STATUS«, t00=0x0088, t01=0x008a}
0x0d4fe…0d52c               Head {h00=0x002a, h01=0x0050, text=» ABL BRM NOT ACCEPTED TIMEOUT REQUEST «, t00=0x0088, t01=0x00b2}
0x0d52c…0d540               Head {h00=0x0010, h01=0x0050, text=»CSYNC1 EQU *«, t00=0x0088, t01=0x00e0}
0x0d540…0d566               Head {h00=0x0022, h01=0x0050, text=» LDK A2,SYNC DEF SYNC PATTERN «, t00=0x0088, t01=0x00f4}
0x0d566…0d590               Head {h00=0x0026, h01=0x0050, text=» OTR A2,1,LCUUT SEND SYNC PATTERN «, t00=0x0088, t01=0x011a}
0x0d590…0d59c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x0144}
0x0d59c…0d5b0               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0088, t01=0x0150}
0x0d5b0…0d5da               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x0088, t01=0x0164}
0x0d5da…0d5e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x018e}
0x0d5e6…0d5fa               Head {h00=0x0010, h01=0x0050, text=»CSYN:O EQU *«, t00=0x0089, t01=0x000a}
0x0d5fa…0d61a               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x0089, t01=0x001e}
0x0d61a…0d628               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0089, t01=0x003e}
0x0d628…0d632               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x004c}
0x0d632…0d63c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0056}
0x0d63c…0d664               Head {h00=0x0024, h01=0x0050, text=»*  CHALTO : HALT OUTPUT CHANNEL «, t00=0x0089, t01=0x0060}
0x0d664…0d66e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0088}
0x0d66e…0d682               Head {h00=0x0010, h01=0x0050, text=»CHALTO EQU *«, t00=0x0089, t01=0x0092}
0x0d682…0d696               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0089, t01=0x00a6}
0x0d696…0d6ba               Head {h00=0x0020, h01=0x0050, text=» LDK A2,CBSTOP STOP FUNCTION«, t00=0x0089, t01=0x00ba}
0x0d6ba…0d6c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x00de}
0x0d6c6…0d6ea               Head {h00=0x0020, h01=0x0050, text=» CIO A2,0,LCUUT HALT OUTPUT «, t00=0x0089, t01=0x00ea}
0x0d6ea…0d6fe               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0089, t01=0x010e}
0x0d6fe…0d724               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ WAIT FOR INTERRUPT«, t00=0x0089, t01=0x0122}
0x0d724…0d730               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x0148}
0x0d730…0d750               Head {h00=0x001c, h01=0x0050, text=» SST A2,LCUUT GET STATUS«, t00=0x0089, t01=0x0154}
0x0d750…0d770               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x0089, t01=0x0174}
0x0d770…0d77e (138, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008a, t01=0x0004}
0x0d77e…0d788               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0012}
0x0d788…0d792               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x001c}
0x0d792…0d7b0               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x008a, t01=0x0026}
0x0d7b0…0d7ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0044}
0x0d7ba…0d7c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x004e}
0x0d7c4…0d7d8               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x008a, t01=0x0058}
0x0d7d8…0d7ec               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x008a, t01=0x006c}
0x0d7ec…0d802               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x008a, t01=0x0080}
0x0d802…0d822               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x008a, t01=0x0096}
0x0d822…0d82e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x00b6}
0x0d82e…0d836               Head {h00=0x0004, h01=0x0050, t00=0x008a, t01=0x00c2}
0x0d836…0d84c               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x008a, t01=0x00ca}
0x0d84c…0d86c               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x008a, t01=0x00e0}
0x0d86c…0d878               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x0100}
0x0d878…0d8a6               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x008a, t01=0x010c}
0x0d8a6…0d8c8               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x008a, t01=0x013a}
0x0d8c8…0d8f8               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x008a, t01=0x015c}
0x0d8f8…0d90c               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x008a, t01=0x018c}
0x0d90c…0d938               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x008b, t01=0x0010}
0x0d938…0d944               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x003c}
0x0d944…0d954               Head {h00=0x000c, h01=0x0050, text=» C2 TPM «, t00=0x008b, t01=0x0048}
0x0d954…0d990               Head {h00=0x0038, h01=0x0050, text=» RF(NZ) IHLC10 DO NOT SKIP SYNC IN TRANSPARENT TEXT «, t00=0x008b, t01=0x0058}
0x0d990…0d9a2               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x008b, t01=0x0094}
0x0d9a2…0d9d6               Head {h00=0x0030, h01=0x0050, text=» RF(NZ) IHLC05 DO NOT SKIP SYNS IN BCC FRAME«, t00=0x008b, t01=0x00a6}
0x0d9d6…0d9ea               Head {h00=0x0010, h01=0x0050, text=» CWK A2,SYNC«, t00=0x008b, t01=0x00da}
0x0d9ea…0d9fe               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x008b, t01=0x00ee}
0x0d9fe…0da12               Head {h00=0x0010, h01=0x0050, text=»IHLC05 EQU *«, t00=0x008b, t01=0x0102}
0x0da12…0da26               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x008b, t01=0x0116}
0x0da26…0da46               Head {h00=0x001c, h01=0x0050, text=» XRR A7,A2 CALCULATE LRC«, t00=0x008b, t01=0x012a}
0x0da46…0da52               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x014a}
0x0da52…0da66               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x008b, t01=0x0156}
0x0da66…0da8a               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x008b, t01=0x016a}
0x0da8a…0dab6               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x008b, t01=0x018e}
0x0dab6…0dac2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x002a}
0x0dac2…0dad6               Head {h00=0x0010, h01=0x0050, text=»IHLC10 EQU *«, t00=0x008c, t01=0x0036}
0x0dad6…0dae8               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x008c, t01=0x004a}
0x0dae8…0db16               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/FF00 SET FLAG FOR CARRIER ON«, t00=0x008c, t01=0x005c}
0x0db16…0db40               Head {h00=0x0026, h01=0x0050, text=» ST A1,DCLCI SET INPUT ACTIV FLAG «, t00=0x008c, t01=0x008a}
0x0db40…0db62               Head {h00=0x001e, h01=0x0050, text=» CM DCSTCU CLEAR SST SAVE «, t00=0x008c, t01=0x00b4}
0x0db62…0db76               Head {h00=0x0010, h01=0x0050, text=»IHIN10 EQU *«, t00=0x008c, t01=0x00d6}
0x0db76…0db96               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x008c, t01=0x00ea}
0x0db96…0dbaa               Head {h00=0x0010, h01=0x0050, text=»IHIN20 EQU *«, t00=0x008c, t01=0x010a}
0x0dbaa…0dbc8               Head {h00=0x001a, h01=0x0050, text=» CF A5,SST PERFORM SST«, t00=0x008c, t01=0x011e}
0x0dbc8…0dbd8               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x008c, t01=0x013c}
0x0dbd8…0dbe6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008c, t01=0x014c}
0x0dbe6…0dbf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x015a}
0x0dbf0…0dbfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0164}
0x0dbfa…0dc1c               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x008c, t01=0x016e}
0x0dc1c…0dc26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0190}
0x0dc26…0dc30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x000a}
0x0dc30…0dc44               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x008d, t01=0x0014}
0x0dc44…0dc58               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x008d, t01=0x0028}
0x0dc58…0dc6e               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x008d, t01=0x003c}
0x0dc6e…0dc90               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x008d, t01=0x0052}
0x0dc90…0dc9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0074}
0x0dc9c…0dca4               Head {h00=0x0004, h01=0x0050, t00=0x008d, t01=0x0080}
0x0dca4…0dcba               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x008d, t01=0x0088}
0x0dcba…0dcda               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x008d, t01=0x009e}
0x0dcda…0dce6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x00be}
0x0dce6…0dd14               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x008d, t01=0x00ca}
0x0dd14…0dd26               Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x008d, t01=0x00f8}
0x0dd26…0dd34               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008d, t01=0x010a}
0x0dd34…0dd3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0118}
0x0dd3e…0dd48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0122}
0x0dd48…0dd72               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x008d, t01=0x012c}
0x0dd72…0dd7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0156}
0x0dd7c…0dda8               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x008d, t01=0x0160}
0x0dda8…0ddda               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x008d, t01=0x018c}
0x0ddda…0de0a               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x008e, t01=0x002e}
0x0de0a…0de3a               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x008e, t01=0x005e}
0x0de3a…0de44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x008e}
0x0de44…0de56               Head {h00=0x000e, h01=0x0050, text=»SST EQU * «, t00=0x008e, t01=0x0098}
0x0de56…0de76               Head {h00=0x001c, h01=0x0050, text=» SST A2,LCUIN GET STATUS«, t00=0x008e, t01=0x00aa}
0x0de76…0de88               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x008e, t01=0x00ca}
0x0de88…0de9c               Head {h00=0x0010, h01=0x0050, text=» IFT LOGG=1 «, t00=0x008e, t01=0x00dc}
0x0de9c…0dec6               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOGG SST INFORMATION«, t00=0x008e, t01=0x00f0}
0x0dec6…0ded2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x011a}
0x0ded2…0def6               Head {h00=0x0020, h01=0x0050, text=» ANK A2,SBERR ERROR BIT SET «, t00=0x008e, t01=0x0126}
0x0def6…0df10               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) SST050 YES«, t00=0x008e, t01=0x014a}
0x0df10…0df24               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x008e, t01=0x0164}
0x0df24…0df46               Head {h00=0x001e, h01=0x0050, text=» LD A2,DCLCI INPUT STATUS «, t00=0x008e, t01=0x0178}
0x0df46…0df74               Head {h00=0x002a, h01=0x0050, text=» RF(Z) SST125 INPUT NOT ACTIVE  IGNORE«, t00=0x008f, t01=0x000a}
0x0df74…0dfa0               Head {h00=0x0028, h01=0x0050, text=» RF(N) SST100 INPUT ACTIVE WITH DATA«, t00=0x008f, t01=0x0038}
0x0dfa0…0dfce               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CBCARR+SYNC DEF SYNC PATTERN «, t00=0x008f, t01=0x0064}
0x0dfce…0dff8               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUIN START INPUT AGAIN «, t00=0x008f, t01=0x0092}
0x0dff8…0e020               Head {h00=0x0024, h01=0x0050, text=» RF SST125 RETURN TO DISPATCHER «, t00=0x008f, t01=0x00bc}
0x0e020…0e02c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x00e4}
0x0e02c…0e040               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x008f, t01=0x00f0}
0x0e040…0e052               Head {h00=0x000e, h01=0x0050, text=» RF SST100«, t00=0x008f, t01=0x0104}
0x0e052…0e05e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x0116}
0x0e05e…0e072               Head {h00=0x0010, h01=0x0050, text=»SST050 EQU *«, t00=0x008f, t01=0x0122}
0x0e072…0e094               Head {h00=0x001e, h01=0x0050, text=» ANK A2,SBCARR CARRIR OFF «, t00=0x008f, t01=0x0136}
0x0e094…0e0ac               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SST075 NO«, t00=0x008f, t01=0x0158}
0x0e0ac…0e0ce               Head {h00=0x001e, h01=0x0050, text=» LD A2,DCLCI INPUT STATUS «, t00=0x008f, t01=0x0170}
0x0e0ce…0e102 (144, 0, 398) Head {h00=0x0030, h01=0x0050, text=» RF(Z) SST125 NOT ACTIVE IGNORE CARRIER OFF «, t00=0x0090, t01=0x0004}
0x0e102…0e11c               Head {h00=0x0016, h01=0x0050, text=» RF SST100 ACTIVE «, t00=0x0090, t01=0x0038}
0x0e11c…0e130               Head {h00=0x0010, h01=0x0050, text=»SST075 EQU *«, t00=0x0090, t01=0x0052}
0x0e130…0e142               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0090, t01=0x0066}
0x0e142…0e16a               Head {h00=0x0024, h01=0x0050, text=» ANK A2,SBTHRU THROUGHPUT ERROR «, t00=0x0090, t01=0x0078}
0x0e16a…0e186               Head {h00=0x0018, h01=0x0050, text=» ABL(NZ) BRM140 YES «, t00=0x0090, t01=0x00a0}
0x0e186…0e190               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00bc}
0x0e190…0e1a4               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x0090, t01=0x00c6}
0x0e1a4…0e1b6               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0090, t01=0x00da}
0x0e1b6…0e1d8               Head {h00=0x001e, h01=0x0050, text=» ANK A2,SBNOOP NOT OPRABLE«, t00=0x0090, t01=0x00ec}
0x0e1d8…0e1ee               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST200 «, t00=0x0090, t01=0x010e}
0x0e1ee…0e212               Head {h00=0x0020, h01=0x0050, text=» CF A15,STREG SAVE REGISTERS«, t00=0x0090, t01=0x0124}
0x0e212…0e234               Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME DELAY 1 SEC«, t00=0x0090, t01=0x0148}
0x0e234…0e24c               Head {h00=0x0014, h01=0x0050, text=» DATA SST150,10 «, t00=0x0090, t01=0x016a}
0x0e24c…0e260               Head {h00=0x0010, h01=0x0050, text=»SST125 EQU *«, t00=0x0090, t01=0x0182}
0x0e260…0e288               Head {h00=0x0024, h01=0x0050, text=» ABL TDISP RETURN TO DISPATCHER «, t00=0x0091, t01=0x0008}
0x0e288…0e292               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0030}
0x0e292…0e2a6               Head {h00=0x0010, h01=0x0050, text=»SST150 EQU *«, t00=0x0091, t01=0x003a}
0x0e2a6…0e2ca               Head {h00=0x0020, h01=0x0050, text=» CF A15,LDREG LOAD REGISTERS«, t00=0x0091, t01=0x004e}
0x0e2ca…0e2de               Head {h00=0x0010, h01=0x0050, text=»SST200 EQU *«, t00=0x0091, t01=0x0072}
0x0e2de…0e2f0               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0091, t01=0x0086}
0x0e2f0…0e322               Head {h00=0x002e, h01=0x0050, text=» ANK A2,SBCARR CHECK STATUS IF CARRIER OFF«, t00=0x0091, t01=0x0098}
0x0e322…0e33a               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SST225 NO«, t00=0x0091, t01=0x00ca}
0x0e33a…0e372               Head {h00=0x0034, h01=0x0050, text=» XRK A1,SBCARR CHECK STATUS IF ONLY CARRIER OFF «, t00=0x0091, t01=0x00e2}
0x0e372…0e38c               Head {h00=0x0016, h01=0x0050, text=» RF(Z) SST250 YES «, t00=0x0091, t01=0x011a}
0x0e38c…0e3a0               Head {h00=0x0010, h01=0x0050, text=»SST225 EQU *«, t00=0x0091, t01=0x0134}
0x0e3a0…0e3d4               Head {h00=0x0030, h01=0x0050, text=» ST A1,DCSTCU STORE STATUS AS CURRENT STATUS«, t00=0x0091, t01=0x0148}
0x0e3d4…0e402               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0091, t01=0x017c}
0x0e402…0e416               Head {h00=0x0010, h01=0x0050, text=»SST250 EQU *«, t00=0x0092, t01=0x001a}
0x0e416…0e436               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x0092, t01=0x002e}
0x0e436…0e444               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0092, t01=0x004e}
0x0e444…0e44e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x005c}
0x0e44e…0e458               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0066}
0x0e458…0e488               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x0092, t01=0x0070}
0x0e488…0e492               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x00a0}
0x0e492…0e49c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x00aa}
0x0e49c…0e4b0               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0092, t01=0x00b4}
0x0e4b0…0e4c4               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0092, t01=0x00c8}
0x0e4c4…0e4d4               Head {h00=0x000c, h01=0x0050, text=» C2 TPM «, t00=0x0092, t01=0x00dc}
0x0e4d4…0e4fe               Head {h00=0x0026, h01=0x0050, text=» RF(Z) WRIT02 NOT TRANSPARENT MODE«, t00=0x0092, t01=0x00ec}
0x0e4fe…0e51e               Head {h00=0x001c, h01=0x0050, text=» CWK A2,DLE CHECK IF DLE«, t00=0x0092, t01=0x0116}
0x0e51e…0e538               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRIT05 NO «, t00=0x0092, t01=0x0136}
0x0e538…0e55c               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRIDLE SEND EXTRA DLE«, t00=0x0092, t01=0x0150}
0x0e55c…0e570               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x0092, t01=0x0174}
0x0e570…0e582               Head {h00=0x000e, h01=0x0050, text=» RF WRIT05«, t00=0x0092, t01=0x0188}
0x0e582…0e596               Head {h00=0x0010, h01=0x0050, text=»WRIT02 EQU *«, t00=0x0093, t01=0x000a}
0x0e596…0e5aa               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0093, t01=0x001e}
0x0e5aa…0e5be               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0093, t01=0x0032}
0x0e5be…0e5f2               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x0093, t01=0x0046}
0x0e5f2…0e620               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x0093, t01=0x007a}
0x0e620…0e62c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x00a8}
0x0e62c…0e640               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x0093, t01=0x00b4}
0x0e640…0e666               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x0093, t01=0x00c8}
0x0e666…0e67c               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x0093, t01=0x00ee}
0x0e67c…0e69e               Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x0093, t01=0x0104}
0x0e69e…0e6b2               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0093, t01=0x0126}
0x0e6b2…0e6da               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x0093, t01=0x013a}
0x0e6da…0e6e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x0162}
0x0e6e6…0e6fa               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0093, t01=0x016e}
0x0e6fa…0e724               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x0093, t01=0x0182}
0x0e724…0e730               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x001c}
0x0e730…0e744               Head {h00=0x0010, h01=0x0050, text=»WRIT15 EQU *«, t00=0x0094, t01=0x0028}
0x0e744…0e758               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0094, t01=0x003c}
0x0e758…0e782               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x0094, t01=0x0050}
0x0e782…0e78e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x007a}
0x0e78e…0e798               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0086}
0x0e798…0e7b2               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x0094, t01=0x0090}
0x0e7b2…0e7c4               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0094, t01=0x00aa}
0x0e7c4…0e7d8               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0094, t01=0x00bc}
0x0e7d8…0e7ec               Head {h00=0x0010, h01=0x0050, text=»WRIDLE EQU *«, t00=0x0094, t01=0x00d0}
0x0e7ec…0e804               Head {h00=0x0014, h01=0x0050, text=» OTR A2,0,LCUUT «, t00=0x0094, t01=0x00e4}
0x0e804…0e82a               Head {h00=0x0022, h01=0x0050, text=» RB(NA) READ THROUGHPUT ERROR «, t00=0x0094, t01=0x00fc}
0x0e82a…0e83c               Head {h00=0x000e, h01=0x0050, text=» RB WRIT15«, t00=0x0094, t01=0x0122}
0x0e83c…0e848               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x0134}
0x0e848…0e856               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0094, t01=0x0140}
0x0e856…0e860               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x014e}
0x0e860…0e86a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0158}
0x0e86a…0e87c               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x0094, t01=0x0162}
0x0e87c…0e886               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0174}
0x0e886…0e8a6               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x0094, t01=0x017e}
0x0e8a6…0e8b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x000e}
0x0e8b0…0e8ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0018}
0x0e8ba…0e8dc               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0095, t01=0x0022}
0x0e8dc…0e8f6               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x0095, t01=0x0044}
0x0e8f6…0e908               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0095, t01=0x005e}
0x0e908…0e91c               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x0095, t01=0x0070}
0x0e91c…0e934               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x0095, t01=0x0084}
0x0e934…0e94a               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x0095, t01=0x009c}
0x0e94a…0e964               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x0095, t01=0x00b2}
0x0e964…0e978               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0095, t01=0x00cc}
0x0e978…0e98a               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x0095, t01=0x00e0}
0x0e98a…0e996               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x00f2}
0x0e996…0e9b8               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x0095, t01=0x00fe}
0x0e9b8…0e9d0               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x0095, t01=0x0120}
0x0e9d0…0e9dc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x0138}
0x0e9dc…0e9e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0144}
0x0e9e6…0e9f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x014e}
0x0e9f0…0e9fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0158}
0x0e9fa…0ea0c               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x0095, t01=0x0162}
0x0ea0c…0ea16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0174}
0x0ea16…0ea48               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x0095, t01=0x017e}
0x0ea48…0ea52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0020}
0x0ea52…0ea5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x002a}
0x0ea5c…0ea74               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x0096, t01=0x0034}
0x0ea74…0ea96               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0096, t01=0x004c}
0x0ea96…0eaa8               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0096, t01=0x006e}
0x0eaa8…0eabe               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x0096, t01=0x0080}
0x0eabe…0ead2               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x0096, t01=0x0096}
0x0ead2…0eae8               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x0096, t01=0x00aa}
0x0eae8…0eafc               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0096, t01=0x00c0}
0x0eafc…0eb0e               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x0096, t01=0x00d4}
0x0eb0e…0eb26               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x0096, t01=0x00e6}
0x0eb26…0eb3a               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0096, t01=0x00fe}
0x0eb3a…0eb46               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0096, t01=0x0112}
0x0eb46…0eb68               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x0096, t01=0x011e}
0x0eb68…0eb7c               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x0096, t01=0x0140}
0x0eb7c…0eb88               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0096, t01=0x0154}
0x0eb88…0eb9a               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0096, t01=0x0160}
0x0eb9a…0ebae               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x0096, t01=0x0172}
0x0ebae…0ebc2               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x0096, t01=0x0186}
0x0ebc2…0ebd2               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0097, t01=0x000a}
0x0ebd2…0ebdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x001a}
0x0ebdc…0ebe6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0024}
0x0ebe6…0ebf4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0097, t01=0x002e}
0x0ebf4…0ebfe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x003c}
0x0ebfe…0ec3e               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x0097, t01=0x0046}
0x0ec3e…0ec48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0086}
0x0ec48…0ec70               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x0097, t01=0x0090}
0x0ec70…0ec90               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x0097, t01=0x00b8}
0x0ec90…0eca6               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x0097, t01=0x00d8}
0x0eca6…0eccc               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x0097, t01=0x00ee}
0x0eccc…0ecd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0114}
0x0ecd6…0ed1c               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x0097, t01=0x011e}
0x0ed1c…0ed4a               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x0097, t01=0x0164}
0x0ed4a…0ed7a (152, 0, 400) Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x0098, t01=0x0004}
0x0ed7a…0ed84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0034}
0x0ed84…0edb6               Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x0098, t01=0x003e}
0x0edb6…0edc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0070}
0x0edc0…0edca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x007a}
0x0edca…0edde               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x0098, t01=0x0084}
0x0edde…0edf2               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0098, t01=0x0098}
0x0edf2…0ee06               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0098, t01=0x00ac}
0x0ee06…0ee12               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0098, t01=0x00c0}
0x0ee12…0ee24               Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x0098, t01=0x00cc}
0x0ee24…0ee38               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0098, t01=0x00de}
0x0ee38…0ee4c               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x0098, t01=0x00f2}
0x0ee4c…0ee58               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0098, t01=0x0106}
0x0ee58…0ee82               Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x0098, t01=0x0112}
0x0ee82…0eeb0               Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x0098, t01=0x013c}
0x0eeb0…0eec8               Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x0098, t01=0x016a}
0x0eec8…0eee8               Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x0098, t01=0x0182}
0x0eee8…0ef0a               Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x0099, t01=0x0012}
0x0ef0a…0ef36               Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x0099, t01=0x0034}
0x0ef36…0ef5a               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x0099, t01=0x0060}
0x0ef5a…0ef6e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0099, t01=0x0084}
0x0ef6e…0ef96               Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x0099, t01=0x0098}
0x0ef96…0efc4               Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x0099, t01=0x00c0}
0x0efc4…0efd0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0099, t01=0x00ee}
0x0efd0…0efe4               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0099, t01=0x00fa}
0x0efe4…0f016               Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x0099, t01=0x010e}
0x0f016…0f022               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0099, t01=0x0140}
0x0f022…0f04c               Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x0099, t01=0x014c}
0x0f04c…0f064               Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x0099, t01=0x0176}
0x0f064…0f07a               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x0099, t01=0x018e}
0x0f07a…0f08a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x009a, t01=0x0014}
0x0f08a…0f098               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009a, t01=0x0024}
0x0f098…0f0a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0032}
0x0f0a2…0f0ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x003c}
0x0f0ac…0f0c8               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x009a, t01=0x0046}
0x0f0c8…0f0d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0062}
0x0f0d2…0f0dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x006c}
0x0f0dc…0f0f0               Head {h00=0x0010, h01=0x0050, text=»DC15ON EQU *«, t00=0x009a, t01=0x0076}
0x0f0f0…0f106               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x009a, t01=0x008a}
0x0f106…0f126               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x009a, t01=0x00a0}
0x0f126…0f132               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x00c0}
0x0f132…0f13a               Head {h00=0x0004, h01=0x0050, t00=0x009a, t01=0x00cc}
0x0f13a…0f150               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x009a, t01=0x00d4}
0x0f150…0f170               Head {h00=0x001c, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 =1«, t00=0x009a, t01=0x00ea}
0x0f170…0f17c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x010a}
0x0f17c…0f190               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x009a, t01=0x0116}
0x0f190…0f1b0               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x009a, t01=0x012a}
0x0f1b0…0f1c4               Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x009a, t01=0x014a}
0x0f1c4…0f1f6               Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x009a, t01=0x015e}
0x0f1f6…0f20e               Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x009a, t01=0x0190}
0x0f20e…0f222               Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x009b, t01=0x0018}
0x0f222…0f244               Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x009b, t01=0x002c}
0x0f244…0f268               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x009b, t01=0x004e}
0x0f268…0f29c               Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x009b, t01=0x0072}
0x0f29c…0f2c8               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x009b, t01=0x00a6}
0x0f2c8…0f2da               Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x009b, t01=0x00d2}
0x0f2da…0f2ee               Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x009b, t01=0x00e4}
0x0f2ee…0f2fa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x00f8}
0x0f2fa…0f328               Head {h00=0x002a, h01=0x0050, text=» CM DCLCI INIT LINE CONTROL UNIT INFO «, t00=0x009b, t01=0x0104}
0x0f328…0f33c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x009b, t01=0x0132}
0x0f33c…0f352               Head {h00=0x0012, h01=0x0050, text=» ORS A2,DCONOF«, t00=0x009b, t01=0x0146}
0x0f352…0f368               Head {h00=0x0012, h01=0x0050, text=» CF A15,CKMESS«, t00=0x009b, t01=0x015c}
0x0f368…0f394               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x009b, t01=0x0172}
0x0f394…0f3ba               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x009c, t01=0x000e}
0x0f3ba…0f3e8               Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x009c, t01=0x0034}
0x0f3e8…0f3fe               Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x009c, t01=0x0062}
0x0f3fe…0f40c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x0078}
0x0f40c…0f416               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0086}
0x0f416…0f42e               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x009c, t01=0x0090}
0x0f42e…0f438               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00a8}
0x0f438…0f464               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x009c, t01=0x00b2}
0x0f464…0f478               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x009c, t01=0x00de}
0x0f478…0f4a4               Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x009c, t01=0x00f2}
0x0f4a4…0f4d2               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x009c, t01=0x011e}
0x0f4d2…0f4fa               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x009c, t01=0x014c}
0x0f4fa…0f50c               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x009c, t01=0x0174}
0x0f50c…0f516               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0186}
0x0f516…0f54e               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x009c, t01=0x0190}
0x0f54e…0f558               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0038}
0x0f558…0f56c               Head {h00=0x0010, h01=0x0050, text=»CPTIM EQU * «, t00=0x009d, t01=0x0042}
0x0f56c…0f59e               Head {h00=0x002e, h01=0x0050, text=» LD A1,DCONOF CHECK THE ON-/OFF LINESWITCH«, t00=0x009d, t01=0x0056}
0x0f59e…0f5c8               Head {h00=0x0026, h01=0x0050, text=» ANK A1,/40 IF IT IS POLL TIME OUT«, t00=0x009d, t01=0x0088}
0x0f5c8…0f5e0               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CPTIM1 NO«, t00=0x009d, t01=0x00b2}
0x0f5e0…0f612               Head {h00=0x002e, h01=0x0050, text=» AN A1,DCSTOL IS OLD STATUS POLL TIME OUT «, t00=0x009d, t01=0x00ca}
0x0f612…0f62a               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CPTIM2 NO«, t00=0x009d, t01=0x00fc}
0x0f62a…0f63e               Head {h00=0x0010, h01=0x0050, text=»CPTIM1 EQU *«, t00=0x009d, t01=0x0114}
0x0f63e…0f662               Head {h00=0x0020, h01=0x0050, text=» CM DCONOF INDICATE POLLING «, t00=0x009d, t01=0x0128}
0x0f662…0f676               Head {h00=0x0010, h01=0x0050, text=»CPTIM2 EQU *«, t00=0x009d, t01=0x014c}
0x0f676…0f68e               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x009d, t01=0x0160}
0x0f68e…0f6b2               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x009d, t01=0x0178}
0x0f6b2…0f6e0               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x009e, t01=0x000c}
0x0f6e0…0f6f0               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x009e, t01=0x003a}
0x0f6f0…0f6fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x004a}
0x0f6fa…0f714               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x009e, t01=0x0054}
0x0f714…0f71e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x006e}
0x0f71e…0f746               Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x009e, t01=0x0078}
0x0f746…0f760               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x009e, t01=0x00a0}
0x0f760…0f78a               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x009e, t01=0x00ba}
0x0f78a…0f79e               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x009e, t01=0x00e4}
0x0f79e…0f7b0               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x009e, t01=0x00f8}
0x0f7b0…0f7be               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009e, t01=0x010a}
0x0f7be…0f7c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0118}
0x0f7c8…0f7e8               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x009e, t01=0x0122}
0x0f7e8…0f7f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0142}
0x0f7f2…0f806               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x009e, t01=0x014c}
0x0f806…0f82e               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x009e, t01=0x0160}
0x0f82e…0f844               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x009e, t01=0x0188}
0x0f844…0f860               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x009f, t01=0x000e}
0x0f860…0f888               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x009f, t01=0x002a}
0x0f888…0f898               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x009f, t01=0x0052}
0x0f898…0f8a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0062}
0x0f8a2…0f8be               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x009f, t01=0x006c}
0x0f8be…0f8c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0088}
0x0f8c8…0f8e0               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x009f, t01=0x0092}
0x0f8e0…0f8fc               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x009f, t01=0x00aa}
0x0f8fc…0f920               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x009f, t01=0x00c6}
0x0f920…0f950               Head {h00=0x002c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT IF OPEN SALCUZ «, t00=0x009f, t01=0x00ea}
0x0f950…0f964               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x009f, t01=0x011a}
0x0f964…0f98a               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x009f, t01=0x012e}
0x0f98a…0f9a8               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x009f, t01=0x0154}
0x0f9a8…0f9d2               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x009f, t01=0x0172}
0x0f9d2…0f9e8               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x00a0, t01=0x000c}
0x0f9e8…0f9f6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a0, t01=0x0022}
0x0f9f6…0fa00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0030}
0x0fa00…0fa1e               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x00a0, t01=0x003a}
0x0fa1e…0fa28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0058}
0x0fa28…0fa54               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x00a0, t01=0x0062}
0x0fa54…0fa74               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x00a0, t01=0x008e}
0x0fa74…0fa92               Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x00a0, t01=0x00ae}
0x0fa92…0faa4               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x00a0, t01=0x00cc}
0x0faa4…0fab8               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x00a0, t01=0x00de}
0x0fab8…0fac6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a0, t01=0x00f2}
0x0fac6…0fada               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00a0, t01=0x0100}
0x0fada…0fae4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0114}
0x0fae4…0faee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x011e}
0x0faee…0fb0a               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x00a0, t01=0x0128}
0x0fb0a…0fb14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0144}
0x0fb14…0fb2c               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x00a0, t01=0x014e}
0x0fb2c…0fb4a               Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x00a0, t01=0x0166}
0x0fb4a…0fb54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0184}
0x0fb54…0fb5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x018e}
0x0fb5e…0fb72               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x00a1, t01=0x0008}
0x0fb72…0fb88               Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x00a1, t01=0x001c}
0x0fb88…0fba0               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x00a1, t01=0x0032}
0x0fba0…0fbb8               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x00a1, t01=0x004a}
0x0fbb8…0fbca               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x00a1, t01=0x0062}
0x0fbca…0fbe2               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x00a1, t01=0x0074}
0x0fbe2…0fbf4               Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x00a1, t01=0x008c}
0x0fbf4…0fc06               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x00a1, t01=0x009e}
0x0fc06…0fc18               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x00a1, t01=0x00b0}
0x0fc18…0fc2a               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x00a1, t01=0x00c2}
0x0fc2a…0fc40               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x00a1, t01=0x00d4}
0x0fc40…0fc56               Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x00a1, t01=0x00ea}
0x0fc56…0fc6e               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x00a1, t01=0x0100}
0x0fc6e…0fc84               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x00a1, t01=0x0118}
0x0fc84…0fc9a               Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x00a1, t01=0x012e}
0x0fc9a…0fcb2               Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x00a1, t01=0x0144}
0x0fcb2…0fcca               Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x00a1, t01=0x015c}
0x0fcca…0fcda               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00a1, t01=0x0174}
0x0fcda…0fcee               Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x00a1, t01=0x0184}
0x0fcee…0fcfc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a2, t01=0x0008}
0x0fcfc…0fd06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0016}
0x0fd06…0fd10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0020}
0x0fd10…0fd3c               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x00a2, t01=0x002a}
0x0fd3c…0fd5c               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x00a2, t01=0x0056}
0x0fd5c…0fd66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0076}
0x0fd66…0fd70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0080}
0x0fd70…0fd98               Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x00a2, t01=0x008a}
0x0fd98…0fdc0               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x00a2, t01=0x00b2}
0x0fdc0…0fde0               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x00a2, t01=0x00da}
0x0fde0…0fe00               Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x00a2, t01=0x00fa}
0x0fe00…0fe20               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x00a2, t01=0x011a}
0x0fe20…0fe4c               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x00a2, t01=0x013a}
0x0fe4c…0fe6c               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x00a2, t01=0x0166}
0x0fe6c…0fe7e               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x00a2, t01=0x0186}
0x0fe7e…0fe90               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x00a3, t01=0x0008}
0x0fe90…0fea2               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x00a3, t01=0x001a}
0x0fea2…0fed4               Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x00a3, t01=0x002c}
0x0fed4…0fee4               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00a3, t01=0x005e}
0x0fee4…0fef0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a3, t01=0x006e}
0x0fef0…0ff04               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00a3, t01=0x007a}
0x0ff04…0ff0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x008e}
0x0ff0e…0ff38               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x00a3, t01=0x0098}
0x0ff38…0ff5e               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x00a3, t01=0x00c2}
0x0ff5e…0ff68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00e8}
0x0ff68…0ff7e               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x00a3, t01=0x00f2}
0x0ff7e…0ff92               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x00a3, t01=0x0108}
0x0ff92…0ffa4               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x00a3, t01=0x011c}
0x0ffa4…0ffb6               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x00a3, t01=0x012e}
0x0ffb6…0ffcc               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x00a3, t01=0x0140}
0x0ffcc…0ffe0               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x00a3, t01=0x0156}
0x0ffe0…0fff4               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x00a3, t01=0x016a}
0x0fff4…10006               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x00a3, t01=0x017e}
0x10006…10016               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00a3, t01=0x0190}
0x10016…1001e               Head {h00=0x0004, h01=0x0050, t00=0x00a4, t01=0x0010}
0x1001e…1002a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a4, t01=0x0018}
0x1002a…10038               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a4, t01=0x0024}
0x10038…10042               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x0032}
0x10042…1004c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x003c}
0x1004c…10072               Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x00a4, t01=0x0046}
0x10072…1007c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x006c}
0x1007c…10086               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x0076}
0x10086…100a6               Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x00a4, t01=0x0080}
0x100a6…100c6               Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x00a4, t01=0x00a0}
0x100c6…100e0               Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x00a4, t01=0x00c0}
0x100e0…100fc               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x00a4, t01=0x00da}
0x100fc…10112               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x00a4, t01=0x00f6}
0x10112…10140               Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x00a4, t01=0x010c}
0x10140…1015c               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x00a4, t01=0x013a}
0x1015c…10184               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x00a4, t01=0x0156}
0x10184…1019e               Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x00a4, t01=0x017e}
0x1019e…101a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0008}
0x101a8…101be               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x00a5, t01=0x0012}
0x101be…101de               Head {h00=0x001c, h01=0x0050, text=» DATA 0 USER ECB ADDRESS«, t00=0x00a5, t01=0x0028}
0x101de…10202               Head {h00=0x0020, h01=0x0050, text=» DATA DC:ECB MMU ECB ADDRESS«, t00=0x00a5, t01=0x0048}
0x10202…1020e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a5, t01=0x006c}
0x1020e…10218               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0078}
0x10218…10236               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x00a5, t01=0x0082}
0x10236…10262               Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x00a5, t01=0x00a0}
0x10262…10294               Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x00a5, t01=0x00cc}
0x10294…102ba               Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x00a5, t01=0x00fe}
0x102ba…102ea               Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x00a5, t01=0x0124}
0x102ea…10308               Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x00a5, t01=0x0154}
0x10308…1032e               Head {h00=0x0022, h01=0x0050, text=» DATA 0 REQUEST TIMEOUT VALUE «, t00=0x00a5, t01=0x0172}
0x1032e…10338               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0008}
0x10338…1034e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x00a6, t01=0x0012}
0x1034e…1036a               Head {h00=0x0018, h01=0x0050, text=»DC:ECB EQU * MMU ECB«, t00=0x00a6, t01=0x0028}
0x1036a…10384               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x00a6, t01=0x0044}
0x10384…10390               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a6, t01=0x005e}
0x10390…1039a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x006a}
0x1039a…103a8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a6, t01=0x0074}
0x103a8…103b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0082}
0x103b2…103bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x008c}
0x103bc…103dc               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x00a6, t01=0x0096}
0x103dc…103e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x00b6}
0x103e6…10406               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x00a6, t01=0x00c0}
0x10406…10410               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x00e0}
0x10410…10424               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x00a6, t01=0x00ea}
0x10424…10448               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x00a6, t01=0x00fe}
0x10448…1045e               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x00a6, t01=0x0122}
0x1045e…10474               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a6, t01=0x0138}
0x10474…10488               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a6, t01=0x014e}
0x10488…1049e               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x00a6, t01=0x0162}
0x1049e…104b4               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a6, t01=0x0178}
0x104b4…104c8               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a6, t01=0x018e}
0x104c8…104de               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x00a7, t01=0x0012}
0x104de…104f4               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a7, t01=0x0028}
0x104f4…10508               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a7, t01=0x003e}
0x10508…10514               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a7, t01=0x0052}
0x10514…1052a               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00a7, t01=0x005e}
0x1052a…1053e               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a7, t01=0x0074}
0x1053e…1055a               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x00a7, t01=0x0088}
0x1055a…1056e               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00a7, t01=0x00a4}
0x1056e…10576               Head {h00=0x0004, h01=0x0050, t00=0x00a7, t01=0x00b8}
0x10576…1058c               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x00a7, t01=0x00c0}
0x1058c…105b6               Head {h00=0x0026, h01=0x0050, text=»MMUBUF RES TBUFL+1 MMU WORK BUFFER«, t00=0x00a7, t01=0x00d6}
0x105b6…105c2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a7, t01=0x0100}
0x105c2…105d0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a7, t01=0x010c}
0x105d0…105da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x011a}
0x105da…105e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0124}
0x105e4…10608               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x00a7, t01=0x012e}
0x10608…10612               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0152}
0x10612…1061c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x015c}
0x1061c…10630               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00a7, t01=0x0166}
0x10630…1064a               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x00a7, t01=0x017a}
0x1064a…10660 (168, 0, 400) Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x00a8, t01=0x0004}
0x10660…10672               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a8, t01=0x001a}
0x10672…1068c               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x00a8, t01=0x002c}
0x1068c…106a2               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x00a8, t01=0x0046}
0x106a2…106b4               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00a8, t01=0x005c}
0x106b4…106cc               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x00a8, t01=0x006e}
0x106cc…106e2               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x00a8, t01=0x0086}
0x106e2…106f6               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x00a8, t01=0x009c}
0x106f6…10710               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x00a8, t01=0x00b0}
0x10710…10726               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x00a8, t01=0x00ca}
0x10726…10738               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x00a8, t01=0x00e0}
0x10738…1074a               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x00a8, t01=0x00f2}
0x1074a…10760               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x00a8, t01=0x0104}
0x10760…10776               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x00a8, t01=0x011a}
0x10776…1078e               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x00a8, t01=0x0130}
0x1078e…107aa               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x00a8, t01=0x0148}
0x107aa…107be               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x00a8, t01=0x0164}
0x107be…107d2               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x00a8, t01=0x0178}
0x107d2…107e8               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x00a8, t01=0x018c}
0x107e8…107f6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a9, t01=0x0012}
0x107f6…10800               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0020}
0x10800…1080a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x002a}
0x1080a…10824               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x00a9, t01=0x0034}
0x10824…10838               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x00a9, t01=0x004e}
0x10838…10848               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x00a9, t01=0x0062}
0x10848…1085e               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x00a9, t01=0x0072}
0x1085e…10872               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x00a9, t01=0x0088}
0x10872…10886               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x00a9, t01=0x009c}
0x10886…10892               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a9, t01=0x00b0}
0x10892…1089c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x00bc}
0x1089c…108a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x00c6}
0x108a6…108b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x00d0}
0x108b0…108c4               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00a9, t01=0x00da}
0x108c4…108d2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a9, t01=0x00ee}
0x108d2…10912               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x00a9, t01=0x00fc}
0x10912…1091c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x013c}
0x1091c…10936               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x00a9, t01=0x0146}
0x10936…10940               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0160}
0x10940…1097e               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x00a9, t01=0x016a}
0x1097e…10988               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0018}
0x10988…109ca               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x00aa, t01=0x0022}
0x109ca…109d2               Head {h00=0x0004, h01=0x0050, t00=0x00aa, t01=0x0064}
0x109d2…109e6               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x00aa, t01=0x006c}
0x109e6…10a0c               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x00aa, t01=0x0080}
0x10a0c…10a1e               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x00aa, t01=0x00a6}
0x10a1e…10a34               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00aa, t01=0x00b8}
0x10a34…10a5e               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x00aa, t01=0x00ce}
0x10a5e…10a84               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x00aa, t01=0x00f8}
0x10a84…10a8c               Head {h00=0x0004, h01=0x0050, t00=0x00aa, t01=0x011e}
0x10a8c…10a9e               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x00aa, t01=0x0126}
0x10a9e…10ab4               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00aa, t01=0x0138}
0x10ab4…10ae0               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x00aa, t01=0x014e}
0x10ae0…10b08               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x00aa, t01=0x017a}
0x10b08…10b1e               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x00ab, t01=0x0012}
0x10b1e…10b28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x0028}
0x10b28…10b32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x0032}
0x10b32…10b3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x003c}
0x10b3c…10b4a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ab, t01=0x0046}
0x10b4a…10b52               Head {h00=0x0004, h01=0x0050, t00=0x00ab, t01=0x0054}
0x10b52…10b5a               Head {h00=0x0004, h01=0x0050, t00=0x00ab, t01=0x005c}
0x10b5a…10b6e               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x00ab, t01=0x0064}
0x10b6e…10b9c               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x00ab, t01=0x0078}
0x10b9c…10bca               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 /08-/0F «, t00=0x00ab, t01=0x00a6}
0x10bca…10bf8               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x00ab, t01=0x00d4}
0x10bf8…10c26               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E /18-/1F «, t00=0x00ab, t01=0x0102}
0x10c26…10c54               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x00ab, t01=0x0130}
0x10c54…10c82               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F /28-/2F «, t00=0x00ab, t01=0x015e}
0x10c82…10cae               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x00ab, t01=0x018c}
0x10cae…10cda               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 /38-3F«, t00=0x00ac, t01=0x0028}
0x10cda…10ce6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ac, t01=0x0054}
0x10ce6…10cf4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ac, t01=0x0060}
0x10cf4…10cfc               Head {h00=0x0004, h01=0x0050, t00=0x00ac, t01=0x006e}
0x10cfc…10d18               Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x00ac, t01=0x0076}
0x10d18…10d32               Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x00ac, t01=0x0092}
0x10d32…10d58               Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x00ac, t01=0x00ac}
0x10d58…10d86               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00ac, t01=0x00d2}
0x10d86…10db4               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x00ac, t01=0x0100}
0x10db4…10dc8               Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x00ac, t01=0x012e}
0x10dc8…10dd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0142}
0x10dd2…10ddc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x014c}
0x10ddc…10de8               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00ac, t01=0x0156}
0x10de8…10dec               Head {h00=0x4004, h01=0x0000}
0x10dec…10df0               00 ac 01 62                                                                                                                                                                                                                                       ┆   b┆
0x10df0…10df8 (173, 1, 8)   20 04 00 00 00 ad 00 04                                                                                                                                                                                                                           ┆        ┆
0x10df8…10e48 (174, 0, 400) 43 2d 50 41 54 54 45 52 4e 20 54 4f 20 4c 43 20 00 85 01 72 00 08 00 50 5c 58 49 46 00 86 00 18 00 10 00 50 5c 49 46 54 5c 50 36 38 30 35 3d 30 00 86 00 24 00 2a 00 50 5c 4c 44 4b 4c 5c 41 32 2c 43 42 43 41 52 52 2b 53 59 4e 43 5c 44 45 46   ┆C-PATTERN TO LC    r   P XIF       P IFT P6805=0   $ * P LDKL A2,CBCARR+SYNC DEF┆
0x10e48…10e98               20 53 59 4e 43 2d 50 41 54 54 45 52 4e 20 00 86 00 38 00 32 00 50 5c 43 49 4f 5c 41 32 2c 31 2c 4c 43 55 49 4e 5c 53 45 4e 44 20 49 4e 50 55 54 20 53 59 4e 43 2d 50 41 54 54 45 52 4e 20 54 4f 20 4c 43 20 00 86 00 66 00 08 00 50 5c 58 49 46   ┆ SYNC-PATTERN    8 2 P CIO A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC    f   P XIF┆
0x10e98…10ee8               00 86 00 9c 00 10 00 50 43 53 59 4e 3a 49 5c 45 51 55 5c 2a 00 86 00 a8 00 1c 00 50 5c 52 54 4e 5c 41 35 5c 52 45 54 55 52 4e 20 54 4f 20 43 41 4c 4c 45 52 00 86 00 bc 00 0a 00 50 5c 45 4a 45 43 54 00 86 00 dc 00 06 00 50 2a 20 00 86 00 ea   ┆       PCSYN:I EQU *       P RTN A5 RETURN TO CALLER       P EJECT       P*     ┆
0x10ee8…10f38               00 06 00 50 2a 20 00 86 00 f4 00 22 00 50 2a 5c 5c 43 48 41 4c 54 49 20 3a 20 48 41 4c 54 20 49 4e 50 55 54 20 43 48 41 4e 4e 45 4c 00 86 00 fe 00 06 00 50 2a 20 00 86 01 24 00 10 00 50 43 48 41 4c 54 49 5c 45 51 55 5c 2a 00 86 01 2e 00 10   ┆   P*      " P*  CHALTI : HALT INPUT CHANNEL       P*    $   PCHALTI EQU *   .  ┆
0x10f38…10f88               00 50 5c 49 46 54 5c 50 36 38 30 35 3d 31 00 86 01 42 00 24 00 50 5c 4c 44 4b 5c 41 32 2c 43 42 53 54 4f 50 5c 53 54 4f 50 20 46 55 4e 43 54 49 4f 4e 20 42 49 54 00 86 01 56 00 08 00 50 5c 58 49 46 00 86 01 7e 00 1e 00 50 5c 43 49 4f 5c 41   ┆ P IFT P6805=1   B $ P LDK A2,CBSTOP STOP FUNCTION BIT   V   P XIF   ~   P CIO A┆
0x10f88…10f8e (175, 0, 6)   29 00 29 08 29 10                                                                                                                                                                                                                                 ┆) ) ) ┆
0x10f8e…10fde (176, 0, 400) 00 40 00 40 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 20 20 20 44 52 44 43 31 35 20 20 20 20 20 50 52 52 20 31 30 2e 30 20 38 30 2d 30 35 2d 30 36 20 20 38 37 30 31 30 35 30 34 31 30 30 30 20 00 00 00 04 00 2e 00 2a 01 14 c4 44 43 31 35 41   ┆ @ @        IDENT    DRDC15     PRR 10.0 80-05-06  870105041000      . *   DC15A┆
0x10fde…1102e               44 00 c4 49 48 31 35 30 31 00 c4 49 48 31 35 30 32 00 c4 44 43 31 35 4f 4e 00 c4 44 57 31 35 30 30 00 00 00 00 48 00 10 00 0c 05 05 dc 44 43 31 35 41 44 00 00 1c 00 00 00 7a 00 2c 00 28 03 13 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00   ┆D  IH1501  IH1502  DC15ON  DW1500    H       DC15AD      z , (                  ┆
0x1102e…1107e               00 00 00 00 ff fe 00 00 00 00 00 00 00 06 07 d0 ff fe 00 00 00 00 00 00 00 8e 00 10 00 0c 03 05 00 00 00 21 00 00 00 00 00 06 00 00 00 be 00 2c 00 28 03 13 00 00 00 49 00 00 01 00 1f 02 50 00 1f 04 50 00 1f 31 50 00 1f 01 50 00 1f 01 88 20   ┆                                   !           , (     I      P   P  1P   P     ┆
0x1107e…110ce               00 00 57 00 99 04 1f 02 50 00 00 00 00 d2 00 0e 00 0a 02 04 c2 44 49 53 49 4f 45 00 00 00 01 02 00 0c 00 08 02 03 a2 54 44 49 53 50 00 00 01 14 00 0c 00 08 02 03 a2 45 43 42 43 57 00 00 01 24 00 0c 00 08 02 03 a2 45 43 42 42 41 00 00 01 34   ┆  W     P            DISIOE            TDISP           ECBCW   $       ECBBA   4┆
0x110ce…1111e               00 2a 00 26 03 12 00 00 00 69 10 90 1f 35 50 00 8f 20 00 00 00 02 f7 a1 00 00 8f 20 00 00 00 04 82 42 00 00 00 06 82 39 83 42 00 00 01 44 00 0c 00 08 02 03 a2 45 43 42 52 4c 00 00 01 72 00 2c 00 28 03 13 00 00 00 81 84 00 00 00 00 08 83 59   ┆ * &     i   5P                  B     9 B   D       ECBRL   r , (             Y┆
0x1111e…1116e (177, 0, 400) 00 18 83 42 00 00 00 0a 83 59 00 1a ee 20 00 00 50 00 81 40 00 00 e9 20 00 00 00 00 01 82 00 2c 00 28 03 13 00 00 00 9d 40 00 88 20 00 00 00 02 84 40 00 00 94 60 00 00 1c 02 ec 40 00 00 50 00 ee 30 50 00 5f 0e 86 25 01 02 00 01 00 22 00 0c   ┆   B     Y      P  @           , (      @        @   `     @  P  0P _  %     "  ┆
0x1116e…111be               00 08 02 03 a2 44 57 54 53 54 00 01 00 52 00 0e 00 0a 02 04 c2 54 45 4e 44 49 4f 00 00 01 00 62 00 2c 00 28 03 13 00 00 00 bb 02 08 91 41 00 00 91 41 00 00 01 04 a9 59 00 00 00 0c f7 a1 00 00 99 04 f7 a1 00 00 00 0e 5f 60 f7 a1 00 01 00 74   ┆     DWTST   R       TENDIO    b , (         A   A     Y                _`     t┆
0x111be…1120e               00 0e 00 0a 02 04 c2 44 57 54 45 43 42 00 00 01 00 a4 00 0c 00 08 02 03 a2 45 43 42 45 4c 00 01 00 b6 00 2c 00 28 03 13 00 00 00 d7 04 00 00 00 f7 a1 00 00 5f 6a 80 d8 00 00 00 10 84 58 00 16 50 00 82 30 82 59 00 16 14 06 83 50 ff fc 00 01   ┆       DWTECB            ECBEL     , (              _j       X  P  0 Y     P    ┆
0x1120e…1125e               00 c6 00 0e 00 0a 02 04 c2 44 43 3a 4d 49 4e 00 00 01 00 f6 00 2c 00 28 03 13 00 00 00 f5 44 08 83 43 00 00 00 12 01 00 f7 a1 00 00 00 14 5f 8c f7 a1 00 00 5f 92 81 42 00 00 00 06 21 03 50 00 00 01 01 08 00 2c 00 28 03 13 00 00 01 0f 44 02   ┆         DC:MIN      , (      D  C            _     _  B    ! P      , (      D ┆
0x1125e…112ae               81 59 00 00 00 0c 5f 48 81 58 00 00 00 0c 21 09 58 0e f7 a1 00 00 01 04 5f 16 82 42 00 00 00 06 00 01 01 38 00 0e 00 0a 02 04 c2 44 49 53 45 4e 44 00 00 01 01 68 00 0e 00 0a 02 04 c2 53 45 54 49 4d 45 00 00 01 01 7a 00 2a 00 26 03 12 00 00   ┆ Y    _H X    ! X       _  B       8       DISEND    h       SETIME    z * &    ┆
0x112ae…112fe (178, 0, 400) 01 29 02 00 82 59 00 1c 5f 62 81 20 80 08 8f 20 00 00 00 16 81 18 82 58 00 1c 50 00 82 41 00 00 f7 a1 00 01 01 8c 00 2c 00 28 03 13 00 00 01 45 80 00 00 00 00 18 00 00 00 00 84 59 00 10 57 00 86 04 a0 59 00 10 01 40 5f 8c 81 18 82 58 00 1c   ┆ )   Y  _b             X  P  A         , (     E           Y  W    Y   @_    X  ┆
0x112fe…1134e               58 14 00 02 00 2a 00 2c 00 28 03 13 00 00 01 63 10 00 82 41 00 00 f7 a1 00 00 00 18 00 00 00 00 84 59 00 10 5f 26 86 04 a0 59 00 10 f7 a1 00 00 82 40 00 02 00 5a 00 2c 00 28 03 13 00 00 01 81 00 00 00 00 ea 18 5c 30 a0 41 00 00 a0 41 00 00   ┆X    * , (     c   A             Y  _&   Y       @   Z , (             0 A   A  ┆
0x1134e…1139e               5f 3a 82 58 00 10 50 00 82 28 9a 09 a0 79 00 10 a0 59 00 02 00 8a 00 2c 00 28 03 13 00 04 01 a1 00 00 00 10 57 00 82 20 00 00 20 bf 84 28 50 00 83 30 83 29 97 a0 00 04 8f 3e 82 20 00 06 04 12 83 28 00 02 00 ba 00 2c 00 28 03 13 00 80 01 c1   ┆_: X  P  (   y   Y     , (          W        (P  0 )     >       (     , (      ┆
0x1139e…113ee               00 00 50 00 82 0c 5f 08 94 18 84 29 a0 31 5f 1c 82 20 00 06 04 12 94 18 83 28 58 28 eb 10 50 00 82 0c 00 02 00 ea 00 2c 00 28 03 13 00 00 01 e1 00 00 5f 0c 83 30 83 29 5f 36 82 20 00 00 04 14 5f 32 82 20 00 00 04 14 5f 24 82 18 12 16 83 28   ┆  P   _    ) 1_          (X(  P        , (        _  0 )_6      _2      _$     (┆
0x113ee…1143e               50 00 00 02 01 1a 00 0c 00 08 02 03 a2 44 57 54 4f 52 00 02 01 4a 00 2c 00 28 03 13 00 00 02 01 00 84 82 0c 5f 08 84 29 a0 31 f0 34 86 20 00 00 81 58 00 00 00 0c 52 00 01 02 e9 58 00 00 00 1a 54 00 00 02 01 5a 00 2c 00 28 03 13 00 00 02 1d   ┆P            DWTOR   J , (          _  ) 1 4     X    R    X    T    Z , (      ┆
0x1143e…1148e (179, 0, 400) 40 04 80 d8 00 00 00 10 83 58 00 16 50 00 82 2c 82 59 00 16 13 06 84 4c ff fc 84 43 00 00 00 12 84 4c 00 02 01 8a 00 2c 00 28 03 13 00 05 02 39 21 00 ff fe 84 43 00 00 00 06 01 00 84 0c f7 a1 00 00 00 14 97 a0 00 04 8f 3e 81 40 00 04 a9 40   ┆@        X  P  , Y     L   C     L     , (     9!    C                   > @   @┆
0x1148e…114de               00 00 00 03 00 2a 00 2c 00 28 03 13 50 00 02 55 00 80 e9 40 00 02 81 41 00 02 58 18 a9 20 20 00 f7 a1 00 00 00 0e 5f 22 81 58 00 10 50 00 a0 79 00 10 00 03 00 5a 00 2c 00 28 03 13 00 20 02 73 10 00 a0 59 00 10 81 58 00 00 00 1a 19 02 50 00   ┆     * , (  P  U   @   A  X           _" X  P  y     Z , (     s   Y   X      P ┆
0x114de…1152e               19 04 54 00 f7 a1 01 ce 82 40 00 00 ea 18 54 00 a0 41 00 03 00 8a 00 2c 00 28 03 13 00 00 02 91 00 00 00 00 a0 41 00 00 97 a0 00 04 8f 3e 83 41 00 00 84 41 00 00 85 41 00 00 86 41 00 00 87 41 00 00 00 03 00 ba 00 2c 00 28 03 13 00 00 02 b1   ┆  T      @    T  A     , (           A       > A   A   A   A   A       , (      ┆
0x1152e…1157e               00 00 80 c1 00 00 57 00 83 20 00 00 84 20 00 00 85 20 00 00 86 20 00 00 87 20 00 00 80 a0 00 00 97 a0 00 03 00 ea 00 10 00 0c 03 05 00 00 02 d1 00 00 00 04 8f 3e 00 03 01 1a 00 1c 00 18 03 0b 00 00 02 d9 00 00 00 00 00 00 00 00 00 00 00 00   ┆      W                                              >                          ┆
0x1157e…115ce               00 00 00 00 00 00 00 03 01 2e 00 2c 00 28 03 13 00 a8 02 ef 00 00 00 00 00 00 00 00 00 00 00 00 42 48 42 42 85 20 00 42 a0 41 02 e4 a0 41 02 e6 f5 21 00 00 f5 21 00 03 01 4e 00 2c 00 28 03 13 00 00 03 0f 00 00 00 00 54 00 81 08 19 02 50 00   ┆         . , (                  BHBB   B A   A   !   !   N , (          T     P ┆
0x115ce…1161e (180, 0, 400) 19 02 50 00 19 01 88 20 00 00 19 0b 88 20 00 00 19 05 88 20 00 00 00 03 01 7e 00 2c 00 28 03 13 00 00 03 2f 00 00 80 88 f5 21 00 00 ea 02 54 00 03 00 ea 41 00 00 50 00 03 02 ea 41 00 00 54 00 f5 21 00 00 5c 52 00 04 00 1e 00 2c 00 28 03 13   ┆  P                      ~ , (     /     !    T    A  P    A  T  !   R     , (  ┆
0x1161e…1166e               00 04 03 4f 00 00 80 88 f5 21 00 00 ea 02 54 00 f5 21 00 00 1a 05 54 00 f5 21 00 00 01 01 81 41 02 e2 82 02 1b 02 00 04 00 4e 00 2c 00 28 03 13 00 00 03 6f 00 00 50 00 e8 a0 00 22 88 20 00 00 f5 21 00 00 86 0c 8c 20 00 00 5f 88 f5 21 00 00   ┆   O     !    T  !    T  !     A         N , (     o  P    "     !        _  !  ┆
0x1166e…116be               86 0c 54 00 86 20 00 04 00 7e 00 2c 00 28 03 13 0a 08 03 8f 00 00 00 00 8f 20 00 00 a0 41 02 de 85 20 00 42 f5 21 00 00 f5 21 00 00 81 40 00 04 54 00 22 7f 1a 7f 00 04 00 ae 00 2c 00 28 03 13 01 48 03 af 00 00 5c 10 f5 21 00 00 5f ba f5 21   ┆  T      ~ , (               A     B !   !   @  T "        , (   H       !  _  !┆
0x116be…1170e               00 00 a0 41 02 e0 81 40 02 d8 50 00 86 40 02 d6 50 00 01 02 f5 21 00 04 00 de 00 2c 00 28 03 13 28 40 03 cf 00 00 00 00 a0 41 02 d8 a0 41 02 da 5f de f5 21 00 00 81 40 02 da 50 00 81 40 00 00 58 4a f5 21 00 00 00 04 01 0e 00 2c 00 28 03 13   ┆   A   @  P  @  P    !     , (  (@       A   A  _  !   @  P  @  XJ !       , (  ┆
0x1170e…1175e               11 41 03 ef 00 00 1f 01 54 00 a0 41 02 de f5 21 00 00 8f 20 02 fc 81 40 02 d8 50 00 81 40 00 00 50 00 86 40 02 d6 00 04 01 3e 00 2c 00 28 03 13 40 40 04 0f 00 00 88 20 03 a0 82 38 f5 21 00 00 01 00 f5 21 00 00 a0 41 02 e2 5f 3a f5 21 00 00   ┆ A      T  A   !       @  P  @  P  @     > , (  @@         8 !     !   A  _: !  ┆

Reduced view