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

⟦7a680ef57⟧

    Length: 63996 (0xf9fc)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«

Derivation

└─⟦18bf30ff4⟧ Bits:30009692 Philips computer tape "600409"
    └─⟦this⟧ »DRDCPR/DRDC15.SC« 

PTS(SC)

	IDENT DRDC15 	REL 8.3 79-08-16  870105040830 

			=4, ASCII-MODE FOR SALCUZ
			REL 8.3 79-07-19 
			=3, ACK IN CONVERSATIONAL MODE 
			REL 8.3 79-07-19 
			=2, INCOMPLETE POLL SEQUENCE 
			REL 8.3 79-06-25 
			=1, RETRANSMISSION ON ENQ RESPONSE 
			    ENQ EMBEDDED IN RECEIVED MESSAGE 
			REL 8.2 78-09-15 
			IBM-3270 EMULATION 
			REL 8.1 78-08-25 
			MESSAGE QUEUING ON TERMINALS 
			REL 8.1 78-06-21 
			PTS 6805 ADAPTION
			MSV1. UNDEFINED ADDRESS
			REL 8.1 78-06-16 
			TRANSFER PARAM WHEN POLL ON
			REL 8.1 78-05-18 
			BINARY TRANSMISSION
			REL 8.1 78-04-21 

********************************************* 
* 
*   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 
	EJECT
* 
* 
* 
* 
*   STANDARD INTERFACE PART FOR DATA COMMUNICATION
* 
* 
* 
* 
*	DWT CONTENTS
* 
*	DWTCHP	TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)
* 
*	DWT DISPLACEMENTS 
* 
DWTTP	EQU	/10	TIMER POINTER ORDER PROCESS 
DWTWQ	EQU	/12	WRITE/GET BUFFER QUEUE
DWTSQ	EQU	/14	STATUS QUEUE
DWTRQ	EQU	/16	RECEIVE QUEUE 
DWTBUF	EQU	/18	DEVICE BUFFER ADDRESS
DWTCUR	EQU	/1A	CURSOR ADDRESS 
* 
*	ECB DISPLACEMENTS 
* 
ECBBA	EQU	2	BUFFER ADDRESS
ECBRL	EQU	4	REQUESTED LENGTH
ECBEL	EQU	6	EFFECTIVE LENGTH
ECBRC	EQU	8	RETURN CODE 
ECBCW	EQU	10	CONTROL WORD 
* 
	EJECT
******************************************************* 
* 
*	PARAMETERS FOR CONDITIONAL ASSEMBLY 
* 
* 
X:A	EQU	2200	RECEIVE BUFFER LENGTH
RBUFL	EQU	X:A 
X:B	EQU	2200	TRANSMIT BUFFER LENGTH 
TBUFL	EQU	X:B 
X:C	EQU	/60	DCTASK FILE CODE
DC15FC	EQU	/60
X:D	EQU	1	IF 1 INTERRUPT LOGGING
LOGG	EQU	X:D
X:E	EQU	350	POLL TIMEOUT VALUE
TIMPOL	EQU	X:E
X:F	EQU	0	STATUS AND RVI HANDLING IF=0
STAT	EQU	X:F
X:G	EQU	0	READ COMMAND HANDLING IF=1
RCOM	EQU	X:G
X:H	EQU	254	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	X:H 
X:I	EQU	1	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	X:I
X:J	EQU	0	IF 1 SPECIFIC POLL HANDLING 
SPECP	EQU	X:J 
X:K	EQU	1	IF = 1  LINE SPEED SET TO HIGH
			IF = 0  LINE SPEED IS SET TO LOW 
SPEED	EQU	X:K 
X:L	EQU	0	IF 1 SIEMENS MSV1 PROCEDURE 
MSV1	EQU	X:L
X:M	EQU	2	NUMBER OF RECEIVE BUFFERS (2-5) 
RBUFNR	EQU	X:M
X:N	EQU	0	IF = 1  PTS 6805 ADAPTION	SALCUZ
P6805	EQU	X:N 
X:O	EQU	/0A 
	IFT	P6805=0
LCUIN	EQU	X:O	DEVICE ADDRESS OF RECEIVER
	XIF
	IFT	P6805=1
LCUIN	EQU	/0A	DEVICE ADDRESS OF RECEIVER
	XIF
X:P	EQU	0 
IBMCHR	EQU	X:P	IF 1 IBM CHARACTER HANDLING
X:Q	EQU	1	IF 1 MESSAGE PASSING TO DC TASK 
MESPAS	EQU	X:Q
X:R	EQU	0	IBM-3270 EMULATION PACKAGE, IF NOT = 0
EM3270	EQU	X:R
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 
	EJECT
* 
*	REQUEST HANDLING
* 
* 
* 
*	A7=ORDER
* 
*	/02: READ 
*	/06: WRITE
*	/08: EXCHANGE 
*	/22: RELEASE READ BUFFER
*	/31: GET WRITE BUFFER 
*	/37: TRANSFER PARAMETERS
*	/38: SET STATUS 
* 
* 
*	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
	IFF	TBUFL=0
DCGWQ	DATA	0	GET BUFFER REQUEST QUEUE 
	XIF
DCTPGP	DATA	0	TIMER POINTER GENERAL POLL
DC15DC	DATA	DCACTD	ADDRESS BLOCK DC TASK
DC15AD	DATA	DCACT	ADDRESS BLOCK 
	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
	SUK	A7,/02 
	RF(Z)	DCRD	READ SPECIFIC 
	SUK	A7,/06-/02 
	RF(Z)	DCWR 
	SUK	A7,/08-/06 
	RF(Z)	DCEX	EXCHANGE
	SUK	A7,/22-/08 
	RF(Z)	DCRR	RELEASE READ BUFFER 
	SUK	A7,/37-/22 
	RF(Z)	DCTP	TRANSFER PARAMETERS 
	SUK	A7,/38-/37 
	IFF	STAT=0 
	RF(Z)	DCSS	SET STATUS
	XIF
	IFF	TBUFL=0
	ADK	A7,/38-/31 
	RF(Z)	DCGW	GET WRITE BUFFER
	XIF
	RF	DCA100
	EJECT
* 
* 
*	ACTIVATION FROM DCTASK
* 
* 
DCACTD	EQU	*
	SUK	A7,/02 
	RF(E)	DCRDDC	READ
	SUK	A7,/22-/02 
	RF(E)	DCRR	RELEASE READ BUFFER 
	SUK	A7,/37-/22 
	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 
	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	*
	IFT	EM3270=0 
	LDKL	A5,STB2	LOAD STACK BASE 
	CF	A5,FINTER	DWT ALREADY IN DC:TAB ??? 
	LDR	A3,A3
	RF(NZ)	DCTP30	YES!!! 
	XIF
	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	*
	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	A3,DWTRQ,A6	AND RECEIVE MESSAGE QUEUE 
	RF(Z)	DCRD10	NOTHING IN QUEUE

	LDR*	A2,A3	TAKE THE FIRST IN QUEUE 
	ST	A2,DWTRQ,A6 
	ADK	A3,6 
	ST	A3,ECBBA,A8 
	LD	A4,-4,A3	AND EFFECTIVE LENGTH 
	ST	A4,ECBEL,A8 
	LDK	A1,0 
	CF	A15,TENDIO
	RB	DCRTN 

DCRD10	CF	A15,TIMERE	START TIMER
	RB	DCRTN 
	EJECT
* 
* 
*	GET WRITE BUFFER
* 
* 
	IFF	TBUFL=0
*	COMPLETE WHEN:
*	  BUFFER BEEN ALOCATED
*	  TIME OUT
* 
* 
DCGW	EQU	*
	CF	A15,GTBUF	GET TRANSMIT BUFFER 
	LDR	A4,A4
	RF(Z)	DCGW10	NO FREE BUFFER
	ST	A4,ECBBA,A8 
	LDKL	A1,TBUFL+TBUFL
	ST	A1,ECBEL,A8	STORE BUFFER LENGTH 
	LDK	A1,0 
	RB	ENDIO	COMPLETE REQUEST
DCGW10	EQU	*
	CF	A15,TIMERE	START TIMER
	CF	A15,INSGWQ	QUEUE REQUEST
	RB	DCRTN 
	XIF
	EJECT
* 
* 
*	RELEASE READ BUFFER 
* 
* 
DCRR	LD	A4,ECBBA,A8 
	SUK	A4,6 
	CF	A15,RRBUF 
DCRR10	EQU	*
	LDK	A1,0 
	CF	A15,TENDIO	COMPLETE RRBUF REQUEST 
	RB	DCRTN 
	EJECT
* 
* 
*	EXCHANGE
* 
* 
* 
*	COMPLETE WHEN:
*	  MESSAGE PASSED TO TERMINAL
*	  TIME OUT
* 
DCEX	EQU	*
	RB	DCWR	SAME INITIALIZATION AS WRITE 
* 
* 
*	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	DCRR10	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
* 
* 
* 
*	TIMER HANDLING PART 
* 
* 
* 
*	READ TIMER=TIMERR 
* 
TIMERE	EQU	*
	LDR	A1,A6
	LD	A2,ECBCW,A8	GET 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
	IFF	TBUFL=0
	CF	A15,REMOVG	REMOVE FROM QUEUE
	XIF
TOUTR1	EQU	*
	LDK	A1,/40	INDICATE TIME OUT 
	LD	A2,DWTOR,A6	CHECK IF EXCHANGE ORDER 
	SUK	A2,8 
	RF(NZ)	TOUTR2	NOT EXCHANGE 
	ORK	A1,2	RETURN CODE /42 AT EXCHANGE TIME OUT
TOUTR2	RB	ENDIO	COMPLETE REQUEST
* 
*	WRITE TIMER=TIMWR 
* 
TIMEWR	LDR	A1,A6
	LD	A2,ECBCW,A8	GET 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
	LD	A1,DWTOR,A6	GET ORDER 
	SUK	A1,6 
	RF(Z)	TOUT10	WRITE 
	SUK	A1,2 
	RB(NZ)	TOUTR1	ORDER IS NOT EXCHANGE
TOUT10	LD	A2,DWTECB,A6
	LD	A4,ECBBA,A2	FETCH BUFFER
	IFF	TBUFL=0
	CF	A15,RTBUF	RELEASE TRANSMITBUFFER
	CF	A15,CKGBQ	CHECK GET BUFFER QUEUE
	XIF
	CF	A15,REMOVW	REMOVE FROM WRITE QUEUE
* 
*	THIS INSTRUCTION DOES NOT BELONG
*	TO THE STANDARD INTERFACE 
	CM	XACK	INDICATE 'ACK NOT EXPECTED'
	LD	A2,FDWTUT 
	CWR	A2,A6
	RB(NE)	TOUTR1	THIS DWT NOT WRITING 
	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
* 
* 
*	GET TRANSMIT BUFFER 
* 
	IFF	TBUFL=0
*	CALLING SEQUENCE: CF A15,GTBUF
*	A4=0 IF NO BUFFER IS FREE 
*	ELSE A4 CONTAINS BUFFER ADDRESS 
*	A2 AND A3 ARE DESTROYED 
* 
* 
GTBUF	LDKL	A2,DCTBUF	TRANSMIT BUFFERS 
	RB	GBUF
	EJECT
* 
* 
*	CHECK GET BUFFER QUEUE
* 
* 
CKGBQ	EQU	* 
	LDR	A7,A6	SAVE A6
	LD	A6,DCGWQ	GET QUEUE ANCHOR 
	RF(Z)	CKG110	NO ONE ON QUEUE 
	SUK	A6,DWTWQ 
	LD	A2,DWTST,A6 
	RF(N)	CKG100	NO REQUEST
	LD	A2,DWTOR,A6 
	SUK	A2,/31 
	RF(NZ)	CKG100	NO GET BUFFER REQUEST
	CF	A15,GTBUF	GET TRANSMIT BUFFER 
	LDR	A4,A4
	RF(Z)	CKG110	NO BUFFER FREE
	LD	A3,DWTECB,A6
	ST	A4,ECBBA,A3	STORE BUFFER ADDRESS
	LDKL	A1,TBUFL+TBUFL
	ST	A1,ECBEL,A3	STORE BUFFER LENGTH 
	CF	A15,CTIME	STOP REQUEST TIMING 
	ST	A2,ECBCW,A3	STORE REMAINING TIME
	LDK	A1,0 
	CF	A15,TENDIO	COMPLETE REQUEST 
CKG100	EQU	*
	CF	A15,REMOVG	REMOVE FROM QUEUE
CKG110	LDR	A6,A7	RESTORE A6 
	RB	GBUF10	RETURN 
	XIF
	EJECT
* 
* 
*	RELEASE RECEIVE BUFFER
* 
*	A4 CONTAINS BUFFER ADDRESS
*	CALLING SEQUENCE: CF A15,RRBUF
*	A2 AND A3 ARE DESTROYED 
* 
* 
RRBUF	LDKL	A2,DCRBUF	RECEIVE BUFFERS
RBUF	INH
RBUF10	EQU	*
	LDR*	A3,A2 
	RF(Z)	RBUF20 
	LDR	A2,A3
	RB	RBUF10
RBUF20	EQU	*
	STR	A4,A2
	CMR	A4 
	RB	GBUF10	RETURN TO CALLER 
* 
* 
*	RELEASE TRANSMIT BUFFER 
* 
	IFF	TBUFL=0
*	A4 CONTAINS BUFFER ADDRESS
*	CALLING SEQUENCE: CF A15,RTBUF
*	A2 AND A3 ARE DESTROYED 
* 
* 
RTBUF	LDKL	A2,DCTBUF	TRANSMIT BUFFERS 
	CWK	A4,TBUF1 
	RB(E)	RBUF	DRIVER BUFFER 
	CWK	A4,TBUF2 
	RB(E)	RBUF	DRIVER BUFFER 
	RB	GBUF10	APPLICATION BUFFER 
	XIF
	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 GET WRITE BUFFER QUEUE
* 
	IFF	TBUFL=0
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSGWQ	LDKL	A2,DCGWQ	GET QUEUE ANCHOR 
	RB	INSWQ1
* 
* 
*	REMOVE DWT FROM GET WRITE BUFFER QUEUE
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
REMOVG	LDKL	A2,DCGWQ	GET QUEUE ANCHOR 
	RB	REM05 
	XIF
	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
	ST	A3,ECBBA,A8	SAVE THIS ADDR IN ECB 
	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	PARAMETER=OK
CKM100	CF	A15,TENDIO	COMPLETE READ GENERAL REQUEST
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 
	RB	CKM100
	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
	XIF
	EJECT
* 
* 
*	PROCEDURE WORK AREAS
* 
* 
FDWTIN	RES	1	CURRENT DWT FOR RECEPTION
FDWTUT	RES	1	CURRENT DWT FOR TRANSMISSION 
XACK	DATA	0	ACK EXPECTED
XSEL	DATA	0	SELECTED
XETX	DATA	0	ETX SENT
XSTA	DATA	0	STATUS SENT / MESSAGE INPUT RESULT
XRB	DATA	0	READ BUFFER SWITCH 
CACK	DATA	0	ACK COUNTER 
SYNSW	DATA	0	0=SKIP SYNS, 1=DON'T SKIP
* 
FECB	RES	1	WRITING ECB
FECBBA	RES	1	WRITING BUFFER ADDRESS 
FECBRL	RES	1	WRITING BUFFER LENGTH
FBAX	DATA	0	BUFFER INDEX
FBLST	DATA	0	START OF LAST TRANSMITTED BLOCK
DCSTQ	DATA	0	STATUS QUEUE ANCHOR
DCTPP	DATA	0	POINTER FOR PROCEDURE TIMING 
RESEND	DATA	0	CONTROL SEQUENCE SAVE AREA
* 
* 
*	3270 SENSE/STATUS INFORMATION 
* 
* 
	IFF	STAT=0 
SSTAB	EQU	*	S/S 0 : NO STATUS,DB,DE,DB+DE 
* 
* 
	DATA	/4248 
	DATA	/4242 
* 
NOIR	EQU	/20	S/S 1 : NO INTERVENTION REQUIRED 
IR	EQU	/26	S/S 1 : INTERVENTION REQUIRED
	XIF
	EJECT
* 
* 
*	BASIC RECEIVE MODE
* 
*	ENTERED EVERY TIME A MESSAGE
*	IS EXPECTED FROM THE MASTER SIDE
* 
* 
	IFT	P6805=1		SALCUZ
BRMHLT	CF	A5,HALTIN	HALT RECEIVER	SALCUZ
	XIF			SALCUZ 
BRM	EQU	* 
	LDKL	A5,STB	LOAD STACKBASE 
	IFT	P6805=0		SALCUZ
	CF	A5,HALTIN	HALT RECEIVER AND UPDATE STATUS 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	CF	A15,CKMESS	CHECK IF STATUS CHANGE	SALCUZ
	XIF			SALCUZ 
BRM010	EQU	*
	IFT	CODE+P6805=0		SALCUZ 
	LDKL	A2,/100+LSPEED+SYN	SPECIFY SYN PATTERN
	XIF			SALCUZ 
	IFT	P6805=0		SALCUZ
	IFT	CODE=1 
	LDKL	A2,/100+LSPEED+SYNEBC	SPECIFY SYN PATTERN 
	XIF			SALCUZ 
	IFT	P6805=0		SALCUZ
	CIO	A2,1,LCUIN	START RECEIVER
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	IFF	CODE=1		SALCUZ 
	LDK	A2,/0C		SALCUZ 
	CIO	A2,1,LCUIN	START RECEIVER	SALCUZ 
	LDK	A2,SYN		SALCUZ 
	OTR	A2,1,LCUIN	SPECIFY SYNC CHARACTER	SALCUZ 
	RB(NA)	BRMHLT		SALCUZ
	XIF			SALCUZ 
	IFT	CODE+P6805=2		SALCUZ 
	LDK	A2,0		SALCUZ 
	CIO	A2,1,LCUIN	START RECEIVER	SALCUZ 
	LDK	A2,SYNEBC		SALCUZ
	OTR	A2,1,LCUIN	SPECIFY SYNC CHARACTER	SALCUZ 
	RB(NA)	BRMHLT		SALCUZ
	XIF			SALCUZ 
BRM100	EQU	*
	CF	A5,READP	READ ONE CHARACTER 
	RF(NZ)	BRM150	PARITY ERROR 
	LDR	A1,A2
	SUK	A1,STX 
	RF(Z)	BRM300	STX RECEIVED
	SUK	A1,EOT-STX 
	RF(Z)	BRM200	EOT RECEIVED
	SUK	A1,ENQ-EOT 
	ABL(Z)	BRM400	ENQ RECEIVED 
	SUK	A1,DLE-ENQ 
	ABL(Z)	BRM600	DLE RECEIVED 
	SUK	A1,NAK-DLE 
	ABL(Z)	BRM500	NAK RECEIVED 
	IFT	MSV1=0 
	LDR	A8,A2
	CF	A5,READP	READ ONE CHARACTER 
	RF(NZ)	BRM150	PARITY ERROR 
	CWR	A2,A8
	RF(NE)	BRM150	INVALID ADDRESSING 
	XIF
	LDK	A3,0 
	CC	A2,DW1500+1 
	RF(E)	BRM110	POLLING 
	LDK	A3,2 
	CC	A2,DW1500 
	RF(NE)	BRM150	NOT THIS TCU 
BRM110	EQU	*
	CF	A5,READP	READ 1:ST STA
	RF(NZ)	BRM150	PARITY ERROR 
	LDR	A8,A2
	IFT	MSV1=0 
	CF	A5,READP	READ 2:ND STA
	RF(NZ)	BRM150	PARITY ERROR 
	CWR	A2,A8
	RF(NE)	BRM150	INVALID ADDRESS SEQUENCE 
	XIF
	CF	A5,READ	READ ONE CHARACTER
	IFT	P6805=0		SALCUZ
	SUK	A2,ENQ+PAR 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	SUK	A2,ENQ		SALCUZ 
	XIF			SALCUZ 
	RF(NZ)	BRM150	NOT ENQ
	IFT	P6805=0		SALCUZ
	CF	A5,READ	READ LAST CHARACTER 

*	TRAILING PAD CAN BE CHECKED 

	CIO	A1,0,LCUIN	HALT INPUT
	SST	A1,LCUIN 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	CF	A5,HALTIN	HALT INPUT	SALCUZ 
	RB(NZ)	BRM010	PARITY ERROR	SALCUZ		SALCUZ
	XIF			SALCUZ 
	LDK	A1,1 
	ST	A1,CACK	LOAD ACK COUNTER
	LDR	A2,A8
	SUK	A3,2 
	RF(Z)	BRM120	SELECTING 
	CWK	A8,GP
	ABL(E)	GPOLL	GENERAL POLL
	IFT	MSV1=1 
	CF	A5,FINTEP	CHECK IF STA PRESENT (POLL ADDRESS) 
	XIF
	IFT	MSV1=0 
	CF	A5,FINTER	CHECK IF STA PRESENT
	XIF
	IFF	EM3270=0 
	CF	A5,FINT10	CONTINUE SEARCHING IN DC:TAB
	XIF
	LDR	A6,A3	LOAD DWT TO A6 
	ABL(NZ)	SPOLL	SPECIFIC POLL
	RB	BRM	INVALID POLL
BRM120	EQU	*
	CF	A5,FINTER	CHECK IF STA PRESENT
	LDR	A6,A3	LOAD DWT TO A6 
	RF(NZ)	BRM130	STA FOUND
	IFT	MSV1=0		 
	LDKL	A6,DW1500	SELECT TO DCTASK
BRM130	EQU	*
	ABL	SELECT 
	XIF			 
	IFT	MSV1=1		 
	ABL	BRM	INVALID ADDRESS
	XIF			 
* 
*   WAIT FOR MARK HOLD TO RESYNCHRONIZE 
* 
BRM150	EQU	*
	ANK	A2,/7F 
	SUK	A2,/7F 
	RB(Z)	BRM	RESYNCHRONIZE
	CF	A5,READ	READ ANOTHER CHARACTER
	RB	BRM150
	EJECT
* 
* 
*	EOT HAS BEEN RECEIVED 
* 
* 
BRM200	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	IFT	RCOM=1 
	CM	XRB	RESET READ BUFFER 
	XIF
	LD	A1,XACK 
	RF(Z)	BRM220	ACK IS NOT EXPECTED 
	LD	A6,FDWTUT	GET WRITING DWT 
	RF(Z)	BRM210	NO ONE WRITING
	LDK	A1,2	SET RC=2
	CF	A5,CWRITE	COMPLETE WRITE REQUEST
BRM210	EQU	*
	CM	XACK	RESET 'ACK EXPECTED' 
BRM220	EQU	*
	CM	XSEL	RESET 'SELECTED' 
	RB	BRM 
	EJECT
* 
* 
*	STX HAS BEEN RECEIVED 
* 
* 
BRM300	EQU	*
	CF	A5,HPTIM
	LD	A1,XSEL 
	RF(Z)	BRM315	NOT SELECTED
	LD	A1,DCRBUF 
*********************CHAINED COMMAND
	RB(Z)	BRM150	NO BUFFER AVAILABLE 
********************* 
BRM305	EQU	*
	CF	A5,RDMESS	READ MESSAGE
	SUK	A7,1 
	RF(NZ)	BRM320	MESSAGE OK 
BRM310	EQU	*
	CM	XSTA	INDICATE 'INVALID MESSAGE' 
BRM312	EQU	*
	CF	A5,TRNAK	SEND NAK 
	ABL	BRM
BRM315	EQU	*
	IFT	RCOM=1 
	LD	A1,XACK 
	RF(Z)	BRM316	ACK IS NOT EXPECTED 
	LD	A1,DCRBUF 
	RF(Z)	BRM316	NO BUFFER AVAILABLE 
	LD	A6,FDWTUT	GET WRITING DWT 
	ABL(Z)	BRM150	NO ONE WRITING. RESYNCHRONIZE
	LDR*	A2,A6	GET STA 
	XIF
	IFF	EM3270=0 
	CF	A5,FINTER	GET RECEIVING DWT 
	LDR	A6,A3	DWT-ADDRESS
	LDR*	A2,A6	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	=3
	RB	BRM305	READ THE MESSAGE 
	XIF
BRM316	CF	A5,READ	READ ONE CHARACTER
	IFF	P6805=1		=4
	SUK	A2,ENQ+PAR 
	XIF			=4 
	IFT	P6805=1		=4
	SUK	A2,ENQ	ENQ ??	=4 
	XIF			=4 
	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
	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
	ST	A4,ECBBA,A8	STORE BUFFER 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
	CF	A15,TENDIO	COMPLETE REQUEST 
	RF	BRM345
	EJECT
BRM330	EQU	*
	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
* 
* 
*	ENQ HAS BEEN RECEIVED 
* 
* 
BRM400	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RF(NZ)	BRM510	TEXT RETRANSMISSION	=1 
	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 
* 
* 
*	DLE HAS BEEN RECEIVED 
* 
* 
BRM600	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RB(Z)	BRM410	ACK NOT EXPECTED
	CF	A5,READ	READ SECOND CHARACTER 
	IFF	P6805=1		=4
	CWK	A2,ACK0+PAR
	XIF			=4 
	IFT	P6805=1		=4
	CWK	A2,ACK0		=4
	XIF			=4 
	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		=4
	CWK	A2,RVI+PAR 
	XIF			=4 
	IFT	P6805=1		=4
	CWK	A2,RVI		=4 
	XIF			=4 
	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		=2 
	RF(NZ)	POL010	ERROR. ACK EXPECTED	=2 
	IFF	STAT=0 
	LD	A1,DWTST,A6	GET STATUS
	LDR	A3,A1
	ANK	A1,1 
	RF(Z)	SEL110	NO PENDING STATUS 
	CF	A5,TRRVI	SEND RVI 
	XIF
	IFF	STAT=1 
	RF	SEL110
	XIF
SEL100	EQU	*
	ABL	BRM
SEL110	EQU	*
	IFT	STAT+NOWACK=1
	ANK	A3,8 
	RF(NZ)	SEL115	BUSY 
	XIF
	IFT	STAT+NOWACK=2
	ANK	A3,8 
	RF(Z)	SEL111	DEVICE NOT BUSY 
	CF	A5,TRWACK	TRANSMIT WACK 
	ABL	BRM
SEL111	EQU	*
	XIF
	LD	A1,DCRBUF 
	RF(NZ)	SEL120	BUFFER AVAILABLE 
SEL115	EQU	*
	IFF	STAT+NOWACK=2
	CF	A5,TRWACK	SEND WACK 
	XIF
	RB	SEL100
SEL120	EQU	*
	CF	A5,PRREC	PREPARE FOR TEXT RECEPTION 
	CF	A5,TRACK	SEND ACK,0 
	RB	SEL100
	EJECT
* 
* 
*	PREPARE FOR TEXT RECEPTION
* 
* 
PRREC	EQU	* 
	IM	XSEL	SET 'SELECTED' 
	CM	FBAX	RESET BUFFER INDEX 
	IFT	CODE=1 
	LC	A2,TEBCDIC,A2	TRANSLATE STA TO EBCDIC 
	XIF
	ST	A2,+4,A1	SAVE STA IN BUFFER 
	IM	XSTA
	ST	A6,FDWTIN	STORE INPUT DWT 
	RTN	A5 
	EJECT
* 
* 
*	GENERAL POLL HAS BEEN RECEIVED
* 
* 
GPOLL	EQU	* 
	LD	A1,XACK		=2 
	RF(Z)	POL020	ACK NOT EXPECTED	=2 
POL010	CF	A5,TRENQ	SEND ENQ	=2
	CF	A5,SPTIM	START PROCEDURE TIMER	=2 
	ABL	BRM	WAIT FOR RESPONSE	=2 
POL020	EQU	*		=2
	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 
	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		=2 
	RB(NZ)	POL010	ACK EXPECTED	=2
	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	*
	IFF	TBUFL=0
	LD	A4,FECBBA	GET BUFFER ADDRESS
	CF	A15,RTBUF	RELEASE TRANSMIT BUFFER 
	CF	A15,CKGBQ	CHECK GET BUFFER QUEUE
	XIF
CWR900	EQU	*
	CM	XACK	RESET 'ACK EXPECTED' 
	CM	FDWTUT
	RTN	A5 
	EJECT
* 
* 
*	READ ONE TEXT BLOCK 
* 
*	ON EXIT A3 CONTAINS : 
*	0 : IF CORRECT ETX BLOCK RECEIVED 
*	1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW
*	2 : IF CORRECT ETB BLOCK RECEIVED 
* 
RDMESS	EQU	*
	LD	A4,DCRBUF	GET BUFFER ADDRESS
	ADK	A4,6	RESERVE HEADER
	LDK	A3,0 
	LD	A1,XSTA 
	RF(NZ)	RDM050	LAST INPUT WAS OK
	LD	A1,FBLST	COMPUTE NEW INDEX
	SUR	A1,A4
	ST	A1,FBAX 
RDM050	EQU	*
	AD	A4,FBAX	ADD BUFFER INDEX
	ST	A4,FBLST	REMEMBER START OF BLOCK
RDM075	EQU	*
	CM	XSTA
	LDK	A7,0	RESET LRC 

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

	IFT	CODE=0 
	IFT	BINTRM=1 

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

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

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

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

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

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

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

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

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

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

TRT101	EQU	*

	LDK	A2,SF
	CF	A5,WRITEP	SEND START FIELD

	LC	A2,-1,A4	GET ATTRIBUTE CHARACTER
	ANK	A2,X'7F' 
	LDR	A1,A2	CONVERT TO IBM ATTRIBUTE 
	ANK	A1,1 
	ANK	A2,/1E	MASK
	SLL	A2,1 
	ORR	A2,A1	IBM ATTRIBUTE COMPOSED 
	ORK	A2,/40	BIT ALWAYS SET ONE
	LC	A2,TASCII,A2
	CWK	A2,/18	CHECK SPECIAL ATTRIBUT
	RF(NE)	TRT104
	LDK	A2,/30 
TRT104	EQU	*
	CF	A5,WRITEP	SEND ATTRIBUTE
	ADK	A3,1 
	RF	TRT110
TRT105	EQU	*
	XIF
	EJECT
	CWK	A2,/07 
	RF(L)	TRT110	ILLEGAL CODE : SKIP IT
	CF	A5,WRITEP	SEND CHARACTER
TRT110	EQU	*
	IM	FBAX	INCREMENT BUFFER INDEX 
	LD	A1,FECBRL	GET REQUESTED LENGTH
	CW	A1,FBAX 
	RF(NG)	TRT130	END OF MESSAGE 
	ADK	A3,1	INCREMENT CHARACTER COUNTER 
	CWK	A3,TBLEN 
	RB(L)	TRT100	NOT FULL BLOCK
	IFT	RCOM=1 
	LDK	A1,SBA	CHECK IF SBA AT END OF BLOCK
	CC	A1,-2,A4
	RF(E)	TRT115	YES 
	CC	A1,-1,A4
	RF(NE)	TRT116	NO SEND ETB
	LCR	A2,A4	GET FIRST BYTE AFTER SBA 
	ADK	A4,1	INREMENT POINTER
	CF	A5,WRITEP	SEND IT 
	IM	FBAX	INCREMENT INDEX
TRT115	LCR	A2,A4	GET SECOND BYTE AFTER SBA
	CF	A5,WRITEP	SEND IT 
	IM	FBAX	INCREMENT INDEX
	XIF
TRT116	EQU	*
	LDK	A2,ETB	LOAD ETB
TRT120	EQU	*
	CF	A5,WRITEP	SEND IT 
	IFF	CODE=1 
	LDR	A2,A7	GET LRC
	CF	A5,WRITEP	SEND LRC
	XIF
	IFT	CODE=1 
	LDR	A8,A7	SAVE CURRENT CRC 
	LDR	A2,A7
	ANK	A2,/FF 
	CF	A5,WRIT05	SEND CRC BYTE 1 
	ECR	A2,A8
	ANK	A2,/FF 
	CF	A5,WRIT05	SEND CRC BYTE 2 
	XIF
	ABL	TRRE10	HALT OUTPUT 
TRT130	EQU	*
	IM	XETX	INDICATE 'ETX SENT'
TRT140	EQU	*
	LDK	A2,ETX	LOAD ETX
	RB	TRT120	SEND ETX AND LRC 
	EJECT
* 
* 
*	TRANSMIT STATUS MESSAGE 
* 
* 
	IFF	STAT=0 
TRSTA	EQU	* 
	IM	XSTA	INDICATE 'STATUS SENT' 
	ST	A6,FDWTUT	SAVE A6 
	CF	A5,TRSYNC	START OUTPUT
	LDK	A2,SOH 
	CF	A5,WRITE	SEND SOH 
	LDK	A7,0	REST LRC
	LDK	A2,'%' 
	CF	A5,WRITEP	SEND '%'
	LDK	A2,'R' 
	CF	A5,WRITEP	SEND 'R'
	LDK	A2,STX 
	CF	A5,WRITE	SEND STX 
	LC	A2,DW1500+1 
	CF	A5,WRITEP	SEND TCA
	LDR*	A2,A6 
	CF	A5,WRITEP	SEND STA
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,/06	MASK FOR S/S 0
	SRL	A1,1 
	LC	A2,SSTAB,A1	GET STATUS BYTE 
	CF	A5,WRITEP	SEND S/S 0
	LDK	A2,NOIR	PRELOAD S/S 1
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,5 
	RF(Z)	TRST10	NOT 'IR'
	ANK	A1,4 
	RF(NZ)	TRST10	NO IR IF DE
	LDK	A2,IR
TRST10	EQU	*
	CF	A5,WRITEP	SEND S/S 1
	RB	TRT130	SEND ETX AND LRC 
	XIF
	EJECT
* 
* 
*	TRANSMIT SYNC SEQUENCE
* 
* 
TRSYNC	EQU	*
	LDK	A2,0		SALCUZ 
	CIO	A2,0,LCUIN	HALT INPUT IF NOT DONE
	SST	A2,LCUIN	PERFORM SST 
	IFT	P6805=0		SALCUZ
	CIO	A2,1,LCUUT	START TRANSMITTER 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	IFT	CODE=1		SALCUZ 
	LDK	A2,0		SALCUZ 
	CIO	A2,1,LCUUT	START TRANSMITTER	SALCUZ
	RF(A)	TRS010		SALCUZ 
	SST	A1,LCUUT		SALCUZ 
	RF(A)	TRS005		SALCUZ 
	ABL	BRM		SALCUZ
TRS005	CIO	A2,1,LCUUT		SALCUZ 
TRS010	EQU	*		SALCUZ
	LDK	A2,SYNEBC		SALCUZ
	OTR	A2,1,LCUUT	SPECIFY SYNC CHARACTER	SALCUZ 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	IFT	CODE=0		SALCUZ 
	LDK	A2,/0C		SALCUZ 
	CIO	A2,1,LCUUT		SALCUZ 
	RF(A)	TRS010		SALCUZ 
	SST	A1,LCUUT		SALCUZ 
	RF(A)	TRS005		SALCUZ 
	ABL	BRM		SALCUZ
TRS005	CIO	A2,1,LCUUT		SALCUZ 
TRS010	EQU	*
	LDK	A2,SYN		SALCUZ 
	OTR	A2,1,LCUUT	SPECIFY SYNC CHARACTER	SALCUZ 
	XIF			SALCUZ 
	CF	A5,READ	WAIT FOR OUTPUT INTERRUPT 
	LDK	A3,4	4 SYNS
TRS100	LDK	A2,SYN 
	CF	A5,WRITE	SEND SYN 
	SUK	A3,1 
	RB(NZ)	TRS100
	RTN	A5 
	EJECT
* 
* 
*   RECEIVER INTERRUPT
* 
* 
IH1501	EQU	*
	ST	P,INTSAV
	CF	A15,SAVE8	SAVE A1-A8
	CF	A15,LDREG	RESTORE DC REGS A3 - A8 
	INR	A2,0,LCUIN	READ CHAR 
	RF(NA)	IHIN20	NOT ACCEPTED,CHECK STATUS
	IFF	LOGG=0 
	CF	A5,LOGIN	LOG RECEIVED CHARACTER 
	XIF
	IFF	CODE=1 
	C2	SYNSW 
	RF(NZ)	IHLCI2
	CWK	A2,SYN	SKIP SYNS 
	RF(E)	READ 
IHLCI2	XRR	A7,A2	CALCULATE LRC
	XIF
	IFT	CODE=1 
	C2	SYNSW 
	RF(NZ)	IHLCI1	DO NOT SKIP SYNCS IN BCC FRAME 
	CWK	A2,SYNEBC
	RF(E)	READ	SKIP EBCDIC SYN 
IHLCI1	EQU	*
	CF	A5,CRCCAL	CALCULATE CRC 
	LC	A2,TASCII,A2	TRANSLATE TO ASCII 
	XIF
IHIN10	RTN	A5 
	IFT	P6805=0		SALCUZ
IHIN20	CF	A5,SST	PERFORM SST
	ABL	BRM
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
IHIN20	RF	SST	PERFORM SST	SALCUZ
	XIF			SALCUZ 
	EJECT
* 
* 
*   TRANSMITTER INTERRUPT 
* 
* 
IH1502	EQU	*
	ST	P,INTSAV
	CF	A15,SAVE8	SAVE A1 - A8
	CF	A15,LDREG	RESTORE DC REGS A3 - A8 
	RB	IHIN10
	EJECT
* 
* 
*	SST INSTRUCTION AND STATUS CHECK
* 
*   LCU STATUS : BIT 10=CARRIER OFF 
*		BIT 13=PARITY ERROR (6805 ONLY)	SALCUZ 
*                BIT 14=THROUGHPUT ERROR
*                BIT 15=MODEM NOT READY 
* 
SST	SST	A1,LCUIN
	IFT	P6805=1		SALCUZ
	RF(NA)	SST200	ALREADY INACTIVE	SALCUZ		SALCUZ
	XIF			SALCUZ 
	LDR	A2,A1
	IFF	LOGG=0 
	CF	A5,LOGSST	LOG SST INFORMATION 
	XIF
	IFT	P6805=0		SALCUZ
	ANK	A2,2 
	RF(Z)	SST100 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	ANK	A2,6		SALCUZ 
	RF(Z)	SST100		SALCUZ 
	ANK	A2,2		SALCUZ 
	RF(NZ)	SST050	THROUGH PUT	SALCUZ 
	LDK	A1,1	SET PARITY ERROR	SALCUZ 
	RF	SSTRET		SALCUZ
	XIF			SALCUZ 
SST050	EQU	*		SALCUZ
	CM	XSTA	TROUHHPUT ERROR
	LDKL	A5,STB
	ABL	BRM010 
SST100	EQU	*
	ST	A1,DCSTCU 
	IFT	P6805=0		SALCUZ
	CF	A15,CKMESS	CHECK IF STATUS CHANGE 
	RTN	A5 
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	ANK	A1,/21		SALCUZ 
	RF(Z)	SST200	LSALCUZ 
	CF	A15,SETIME	LINE ERROR, WAIT 0.2 SECONDS	SALCUZ
	DATA	BRM	RESTART	SALCUZ
	DATA	2	WAIT TIME	SALCUZ
	RF	READ		SALCUZ
* 
SST200	LDK	A1,0		SALCUZ 
SSTRET	ADK	A5,4		SALCUZ 
	LDR	A1,A1	SET CR	SALCUZ
	ABR*	A5	RETURN	SALCUZ
	XIF			SALCUZ 
* 
* 
*	HALT INPUT
* 
* 
HALTIN	LDK	A1,0		SALCUZ 
	CIO	A1,0,LCUIN 
	IFT	P6805=0		SALCUZ
	RB	SST	PERFORM SST INSTRUCTION AND STATUS CHECK
	XIF			SALCUZ 
	IFT	P6805=1		SALCUZ
	RF	READ	WAIT FOR SST INTERRUPT	SALCUZ
	XIF			SALCUZ 
	EJECT
* 
* 
*	WRITE FROM OR READ ONE CHARACTER TO A2
* 
* 
WRITE	EQU	* 
	IFT	CODE=1 
	ANK	A2,/FF 
	CWK	A2,/FF 
	RF(E)	WRIT05	NO TRANSLATION OF TRAILING PAD
	LC	A2,TEBCDIC,A2	TRANSLATE TO EBCDIC 
	XIF
WRIT05	EQU	*
	OTR	A2,0,LCUUT	SEND CHARACTER
	RF(A)	WRIT10 
	RF	READ	THROUGHPUT ERROR 
	IFF	CODE=1 
WRIT10	XRR	A7,A2	ACCUMULATE BCC 
	XIF
	IFT	CODE=1 
WRIT10	CF	A5,CRCCAL	CALCULATE CRC 
	XIF
	IFF	LOGG=0 
	CF	A5,LOGOUT	LOG OUTPUT CHARACTER
	XIF
* 
READ	CF	A15,STREG 
	ABL	TDISP
	EJECT
* 
* 
***	WRITEP
* 
*   WRITE A2 WITH PARITY
* 
* 
	IFT	CODE+P6805=0		SALCUZ 
WRITEP	ANK	A2,/FF 
	ECR	A1,A2
	ORK	A2,/80 
WRI100	SLL	A1,1 
	RB(P)	WRI100 
	RB(Z)	WRITE	WRITE
	XRK	A2,/80 
	RB	WRI100
	XIF
	IFF	CODE+P6805=0		SALCUZ 
WRITEP	RB	WRITE 
	XIF
* 
* 
* 
***	READP 
* 
*   READ CHARACTER TO A2 AND CHECK PARITY 
* 
* 
READP	CF	A5,READ
	IFT	CODE+P6805=0		SALCUZ 
	ECR	A1,A2
RE100	SLL	A1,1
	RF(Z)	RE110
	RB(NN)	RE100 
	XRK	A2,/80 
	RB	RE100 
RE110	LDR	A1,A2 
	ANK	A2,/7F 
	XIF
	IFF	CODE+P6805=0		SALCUZ 
	LDK	A1,/80 
	XIF
	ADK	A5,4 
	ANK	A1,/80 
	XRK	A1,/80 
	ABR*	A5
* 
* 
	EJECT
* 
*	FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2
* 
*	CALLING SEQUENCE: CF A5,FINTER
*	A2=SUBTERMINAL ADDRESS
*	A4 DESTROYED
*	A3#0: DWT TO FOUND TERMINAL 
* 
* NOTE:	FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES 
*	ENTRY:	FINTER - CHECK SELECT ADDRESS
*		FINTEP - CHECK SPECIFIC POLL ADDRESS 
* 
RBYTE	DATA	0	IF 1 COMPARE WITH RIGTH BYTE 
* 
* 
FINTEP	EQU	*
	IFT	MSV1=0 
FINTER	EQU	*
	XIF
	IM	RBYTE 
	IFT	MSV1=1 
FINTER	EQU	*
	XIF
	LD	A4,DCTAB	GET ADDRESS TO DC:TAB
	AD*	A4,DCTAB	ADDRESS TO END OF DC:TAB
FINT10	SUK	A4,2 
	LDK	A3,0	DEFAULT VALUE 
	CW	A4,DCTAB	END OF TABLE 
	RF(E)	FINT20	SUBTERMINAL NOT FOUND 
	LDR*	A3,A4	LOAD DWT ADDRESS
	IFT	MSV1=1 
	AD	A3,RBYTE	CHOOSE ADDRESS TYPE
	CCR	A2,A3	COMPARE SUBTERMINAL ADDRESS
	XIF
	IFT	MSV1=0 
	CC	A2,1,A3	COMPARE TO SUBTERMINAL ADDRESS
	XIF
	RB(NE)	FINT10	TAKE NEXT TERMINAL 
FINT20	CM	RBYTE 
	ANKL	A3,/FFFE
	RTN	A5 
	EJECT
* 
* 
*	POWER ON FUNCTIONS
* 
* 
DC15ON	CF	A15,SAVE8	SAVE A1 - A8
	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
	LD	A2,DCTPGP	GET POLL TIMER POINTER
	RF(NZ)	DRDC20	ALREADY STARTED
DRDC10	CF	A15,SPOTIM	START POLL TIMER 
DRDC20	ABL	BRM
	EJECT
* 
*	POLL TIME OUT 
* 
PTOUT	LDKL	A5,STB	LOAD A5 STACK BASE
	LDK	A2,/40 
	ST	A2,DCONOF	INDICATE POLL TIME OUT
	CF	A15,CKMESS	CHECK IF STATUS CHANGE 
	CF	A15,SPOTIM	START POLL TIMER 
	ABL	TDISP
* 
*	RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED
* 
CPTIM	CM	DCONOF	INDICATE POLLING
	LDKL	A2,-TIMPOL
	ST*	A2,DCTPGP	RESTART TIMER
	CF	A15,CKMESS	CHECK IF STATUS CHANGE 
	RTN	A5 
* 
*	START POLL TIMER
* 
SPOTIM	CF	A15,SETIME	START TIMER
	DATA	PTOUT,TIMPOL
	ST	A4,DCTPGP	STORE TIMER POINTER 
	ADKL	A15,4 
	ABR*	A15 
	EJECT
* 
*	START PROCEDURE TIMER 
* 
SPTIM	EQU	* 
	LDR	A1,A6	LOAD DWT AS PARAMETER
	CF	A15,SETIME
	DATA	PRTOUT,TIMPRO 
	ST	A4,DCTPP	SAVE TIMER POINTER 
	RTN	A5 
* 
*	PROCEDURE TIMEOUT 
* 
PRTOUT	CM	DCTPP 
	LDR	A6,A1	RELOAD A6
	LDKL	A5,STB	LOAD STACK BASE
	CF	A5,HALTIN	HALT INPUT IF OPEN	SALCUZ 
	LD	A1,XACK 
	RF(Z)	PRT10	ACK NOT EXPECTED 
	CF	A5,TRENQ	SEND ENQ 
	CF	A5,SPTIM	START PROCEDURE TIMER
PRT10	ABL	BRM 
	EJECT
* 
*	STOP PROCEDURE TIMER
* 
HPTIM	LD	A1,DCTPP	GET TIMER POINTER 
	RF(Z)	HPT10	NOT RUNNING
	CM*	DCTPP	STOP TIMER 
	CM	DCTPP 
HPT10	RTN	A5
	EJECT
	IFT	CODE=1 
* 
* 
*	CALCULATION OF CRC
* 
*	A2 = CHARACTER
*	A7 = ACCUMULATED CRC
* 
* 
CRCCAL	EQU	*
	ST	A1,CRCSAV 
	ST	A2,CRCSAV+2 
	ST	A3,CRCSAV+4 
	LDK	A1,8 
CRC100	LDR	A3,A7
	SRL	A7,1 
	XRR	A3,A2
	SRL	A2,1 
	ANK	A3,1 
	RF(Z)	CRC110 
	XRKL	A7,/A001
CRC110	SUK	A1,1 
	RB(NZ)	CRC100
	LD	A1,CRCSAV 
	LD	A2,CRCSAV+2 
	LD	A3,CRCSAV+4 
	RTN	A5 
CRCSAV	RES	3
	EJECT
* 
* 
*	READ CRC CHARACTERS AND CHECK THEM
*	CR = (E) IF CRC WAS OK
* 
* 
RDCRC	LDR	A6,A7	SAVE CURRENT CRC
	IM	SYNSW	DO NOT SKIP SYNCS NOW 
	CF	A5,READ	READ BYTE 1 
	LD	A8,CRCSAV+2	SAVE IT 
	CF	A5,READ	READ BYTE 2 
	CM	SYNSW	SYNCS CAN BE SKIPPED AGAIN
	LD	A2,CRCSAV+2	SAVE IT 
	SLL	A2,8 
	XRR	A2,A8
	ADK	A5,4 
	CWR	A2,A6	COMPARE RECEIVED WITH COMPUTED 
	ABR*	A5
	XIF
	IFT	CODE=0 
* 
*   RDLRC      READ LRC CHARACTER 
*              CR=0 IF LRC OK 
* 
RDLRC	IM	SYNSW
	CF	A5,READP
	ADK	A5,4 
	LDR	A1,A1
	RF(NZ)	LRCEND
	ANK	A7,/7F 
LRCEND	EQU	*
	CM	SYNSW 
	ABR*	A5

	XIF
	EJECT
* 
* 
*	DEVICE WORK TABLE FOR DCTASK
* 
* 
DW1500	EQU	*	TABLE ENTRY
	DATA	0	CU LINE ADDRESS 
	DATA	/8000	STATUS
	DATA	0	ECB ADDRESS 
	DATA	0	ORDER 
	DATA	DC15DC	POINTER TO ADDRESS BLOCK 
	DATA	0	TTAB ADDRESS
	DATA	0	WAIT/ACTIVATE INDICATOR 
	DATA	0	TASK QUEUE
	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
	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
* 
* 
*	DC TRANSMIT BUFFER POOL 
* 
* 
DCTBUF	EQU	*
* 
* 
	IFF	TBUFL=0
	DATA	TBUF1	POINTER TO FIRST FREE BUFFER
TBUF1	DATA	TBUF2	POINTER TO NEXT FREE BUFFER
	RES	TBUFL	BUFFER AREA 1
TBUF2	DATA	0	END OF CHAIN 
	RES	TBUFL	BUFFER AREA 2
	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

0x0000…0036 (0, 0, 400)   Head {h00=0x0032, h01=0x0050, text=» IDENT DRDC15  REL 8.3 79-08-16  870105040830 «, t00=0x0000, t01=0x0004}
0x0036…003e               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0062               Head {h00=0x0020, h01=0x0050, text=»   =4, ASCII-MODE FOR SALCUZ«, t00=0x0000, t01=0x0042}
0x0062…007e               Head {h00=0x0018, h01=0x0050, text=»   REL 8.3 79-07-19 «, t00=0x0000, t01=0x0066}
0x007e…00a8               Head {h00=0x0026, h01=0x0050, text=»   =3, ACK IN CONVERSATIONAL MODE «, t00=0x0000, t01=0x0082}
0x00a8…00c4               Head {h00=0x0018, h01=0x0050, text=»   REL 8.3 79-07-19 «, t00=0x0000, t01=0x00ac}
0x00c4…00ec               Head {h00=0x0024, h01=0x0050, text=»   =2, INCOMPLETE POLL SEQUENCE «, t00=0x0000, t01=0x00c8}
0x00ec…0108               Head {h00=0x0018, h01=0x0050, text=»   REL 8.3 79-06-25 «, t00=0x0000, t01=0x00f0}
0x0108…0136               Head {h00=0x002a, h01=0x0050, text=»   =1, RETRANSMISSION ON ENQ RESPONSE «, t00=0x0000, t01=0x010c}
0x0136…0166               Head {h00=0x002c, h01=0x0050, text=»       ENQ EMBEDDED IN RECEIVED MESSAGE «, t00=0x0000, t01=0x013a}
0x0166…0182               Head {h00=0x0018, h01=0x0050, text=»   REL 8.2 78-09-15 «, t00=0x0000, t01=0x016a}
0x0182…01a0               Head {h00=0x001a, h01=0x0050, text=»   IBM-3270 EMULATION «, t00=0x0000, t01=0x0186}
0x01a0…01bc               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-08-25 «, t00=0x0001, t01=0x0014}
0x01bc…01e4               Head {h00=0x0024, h01=0x0050, text=»   MESSAGE QUEUING ON TERMINALS «, t00=0x0001, t01=0x0030}
0x01e4…0200               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-06-21 «, t00=0x0001, t01=0x0058}
0x0200…021c               Head {h00=0x0018, h01=0x0050, text=»   PTS 6805 ADAPTION«, t00=0x0001, t01=0x0074}
0x021c…023e               Head {h00=0x001e, h01=0x0050, text=»   MSV1. UNDEFINED ADDRESS«, t00=0x0001, t01=0x0090}
0x023e…025a               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-06-16 «, t00=0x0001, t01=0x00b2}
0x025a…0280               Head {h00=0x0022, h01=0x0050, text=»   TRANSFER PARAM WHEN POLL ON«, t00=0x0001, t01=0x00ce}
0x0280…029c               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-05-18 «, t00=0x0001, t01=0x00f4}
0x029c…02ba               Head {h00=0x001a, h01=0x0050, text=»   BINARY TRANSMISSION«, t00=0x0001, t01=0x0110}
0x02ba…02d6               Head {h00=0x0018, h01=0x0050, text=»   REL 8.1 78-04-21 «, t00=0x0001, t01=0x012e}
0x02d6…02de               Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x014a}
0x02de…0314               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0001, t01=0x0152}
0x0314…031e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0188}
0x031e…0346 (2, 0, 400)   Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x0004}
0x0346…0350               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002c}
0x0350…037e               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x0036}
0x037e…03b0               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0002, t01=0x0064}
0x03b0…03d4               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0002, t01=0x0096}
0x03d4…03de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ba}
0x03de…03e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c4}
0x03e8…03f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ce}
0x03f2…03fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d8}
0x03fc…0406               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e2}
0x0406…0442               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0002, t01=0x00ec}
0x0442…0450               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0128}
0x0450…045a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0136}
0x045a…0464               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0140}
0x0464…047a               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0002, t01=0x014a}
0x047a…0484               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0160}
0x0484…048e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x016a}
0x048e…04c4               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0002, t01=0x0174}
0x04c4…04ea               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x001a}
0x04ea…0510               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x0040}
0x0510…0536               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0003, t01=0x0066}
0x0536…055c               Head {h00=0x0022, h01=0x0050, text=» ENTRY DW1500 DWT FOR DC TASK «, t00=0x0003, t01=0x008c}
0x055c…0566               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00b2}
0x0566…0570               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00bc}
0x0570…058e               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0003, t01=0x00c6}
0x058e…0598               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e4}
0x0598…05a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ee}
0x05a2…05c8               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0003, t01=0x00f8}
0x05c8…05f4               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0003, t01=0x011e}
0x05f4…061c               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0003, t01=0x014a}
0x061c…0640               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0003, t01=0x0172}
0x0640…0660               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x0008}
0x0660…0680               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x0028}
0x0680…069e               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x0048}
0x069e…06bc               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0004, t01=0x0066}
0x06bc…06ea               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x0084}
0x06ea…0716               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0004, t01=0x00b2}
0x0716…0742               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0004, t01=0x00de}
0x0742…0750               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x010a}
0x0750…075a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0118}
0x075a…0764               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0122}
0x0764…076e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x012c}
0x076e…0778               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0136}
0x0778…07b2               Head {h00=0x0036, h01=0x0050, text=»*   STANDARD INTERFACE PART FOR DATA COMMUNICATION«, t00=0x0004, t01=0x0140}
0x07b2…07bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x017a}
0x07bc…07c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0184}
0x07c6…07d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x018e}
0x07d0…07da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0008}
0x07da…07f0               Head {h00=0x0012, h01=0x0050, text=»* DWT CONTENTS«, t00=0x0005, t01=0x0012}
0x07f0…07fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0028}
0x07fa…0848               Head {h00=0x004a, h01=0x0050, text=»* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)«, t00=0x0005, t01=0x0032}
0x0848…0852               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0080}
0x0852…086e               Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x0005, t01=0x008a}
0x086e…0878               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a6}
0x0878…08aa               Head {h00=0x002e, h01=0x0050, text=»DWTTP EQU /10 TIMER POINTER ORDER PROCESS «, t00=0x0005, t01=0x00b0}
0x08aa…08d6               Head {h00=0x0028, h01=0x0050, text=»DWTWQ EQU /12 WRITE/GET BUFFER QUEUE«, t00=0x0005, t01=0x00e2}
0x08d6…08f8               Head {h00=0x001e, h01=0x0050, text=»DWTSQ EQU /14 STATUS QUEUE«, t00=0x0005, t01=0x010e}
0x08f8…091c               Head {h00=0x0020, h01=0x0050, text=»DWTRQ EQU /16 RECEIVE QUEUE «, t00=0x0005, t01=0x0130}
0x091c…0948               Head {h00=0x0028, h01=0x0050, text=»DWTBUF EQU /18 DEVICE BUFFER ADDRESS«, t00=0x0005, t01=0x0154}
0x0948…096e               Head {h00=0x0022, h01=0x0050, text=»DWTCUR EQU /1A CURSOR ADDRESS «, t00=0x0005, t01=0x0180}
0x096e…0978               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0016}
0x0978…0994               Head {h00=0x0018, h01=0x0050, text=»* ECB DISPLACEMENTS «, t00=0x0006, t01=0x0020}
0x0994…099e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x003c}
0x099e…09c0               Head {h00=0x001e, h01=0x0050, text=»ECBBA EQU 2 BUFFER ADDRESS«, t00=0x0006, t01=0x0046}
0x09c0…09e4               Head {h00=0x0020, h01=0x0050, text=»ECBRL EQU 4 REQUESTED LENGTH«, t00=0x0006, t01=0x0068}
0x09e4…0a08               Head {h00=0x0020, h01=0x0050, text=»ECBEL EQU 6 EFFECTIVE LENGTH«, t00=0x0006, t01=0x008c}
0x0a08…0a28               Head {h00=0x001c, h01=0x0050, text=»ECBRC EQU 8 RETURN CODE «, t00=0x0006, t01=0x00b0}
0x0a28…0a4a               Head {h00=0x001e, h01=0x0050, text=»ECBCW EQU 10 CONTROL WORD «, t00=0x0006, t01=0x00d0}
0x0a4a…0a54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f2}
0x0a54…0a62               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x00fc}
0x0a62…0aa2               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0006, t01=0x010a}
0x0aa2…0aac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014a}
0x0aac…0ada               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x0154}
0x0ada…0ae4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0182}
0x0ae4…0aee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018c}
0x0aee…0b18               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 2200 RECEIVE BUFFER LENGTH«, t00=0x0007, t01=0x0008}
0x0b18…0b2e               Head {h00=0x0012, h01=0x0050, text=»RBUFL EQU X:A «, t00=0x0007, t01=0x0032}
0x0b2e…0b5a               Head {h00=0x0028, h01=0x0050, text=»X:B EQU 2200 TRANSMIT BUFFER LENGTH «, t00=0x0007, t01=0x0048}
0x0b5a…0b70               Head {h00=0x0012, h01=0x0050, text=»TBUFL EQU X:B «, t00=0x0007, t01=0x0074}
0x0b70…0b94               Head {h00=0x0020, h01=0x0050, text=»X:C EQU /60 DCTASK FILE CODE«, t00=0x0007, t01=0x008a}
0x0b94…0baa               Head {h00=0x0012, h01=0x0050, text=»DC15FC EQU /60«, t00=0x0007, t01=0x00ae}
0x0baa…0bd2               Head {h00=0x0024, h01=0x0050, text=»X:D EQU 1 IF 1 INTERRUPT LOGGING«, t00=0x0007, t01=0x00c4}
0x0bd2…0be6               Head {h00=0x0010, h01=0x0050, text=»LOGG EQU X:D«, t00=0x0007, t01=0x00ec}
0x0be6…0c0c               Head {h00=0x0022, h01=0x0050, text=»X:E EQU 350 POLL TIMEOUT VALUE«, t00=0x0007, t01=0x0100}
0x0c0c…0c22               Head {h00=0x0012, h01=0x0050, text=»TIMPOL EQU X:E«, t00=0x0007, t01=0x0126}
0x0c22…0c50               Head {h00=0x002a, h01=0x0050, text=»X:F EQU 0 STATUS AND RVI HANDLING IF=0«, t00=0x0007, t01=0x013c}
0x0c50…0c64               Head {h00=0x0010, h01=0x0050, text=»STAT EQU X:F«, t00=0x0007, t01=0x016a}
0x0c64…0c90               Head {h00=0x0028, h01=0x0050, text=»X:G EQU 0 READ COMMAND HANDLING IF=1«, t00=0x0007, t01=0x017e}
0x0c90…0ca4               Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:G«, t00=0x0008, t01=0x001a}
0x0ca4…0cce               Head {h00=0x0026, h01=0x0050, text=»X:H EQU 254 TRANSMIT BLOCK LENGTH «, t00=0x0008, t01=0x002e}
0x0cce…0ce4               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU X:H «, t00=0x0008, t01=0x0058}
0x0ce4…0d10               Head {h00=0x0028, h01=0x0050, text=»X:I EQU 1 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0008, t01=0x006e}
0x0d10…0d24               Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:I«, t00=0x0008, t01=0x009a}
0x0d24…0d52               Head {h00=0x002a, h01=0x0050, text=»X:J EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0008, t01=0x00ae}
0x0d52…0d68               Head {h00=0x0012, h01=0x0050, text=»SPECP EQU X:J «, t00=0x0008, t01=0x00dc}
0x0d68…0d98               Head {h00=0x002c, h01=0x0050, text=»X:K EQU 1 IF = 1  LINE SPEED SET TO HIGH«, t00=0x0008, t01=0x00f2}
0x0d98…0dc4               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0008, t01=0x0122}
0x0dc4…0dda               Head {h00=0x0012, h01=0x0050, text=»SPEED EQU X:K «, t00=0x0008, t01=0x014e}
0x0dda…0e08               Head {h00=0x002a, h01=0x0050, text=»X:L EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0008, t01=0x0164}
0x0e08…0e1c (9, 0, 400)   Head {h00=0x0010, h01=0x0050, text=»MSV1 EQU X:L«, t00=0x0009, t01=0x0004}
0x0e1c…0e4e               Head {h00=0x002e, h01=0x0050, text=»X:M EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0009, t01=0x0018}
0x0e4e…0e64               Head {h00=0x0012, h01=0x0050, text=»RBUFNR EQU X:M«, t00=0x0009, t01=0x004a}
0x0e64…0e96               Head {h00=0x002e, h01=0x0050, text=»X:N EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x0009, t01=0x0060}
0x0e96…0eac               Head {h00=0x0012, h01=0x0050, text=»P6805 EQU X:N «, t00=0x0009, t01=0x0092}
0x0eac…0ec0               Head {h00=0x0010, h01=0x0050, text=»X:O EQU /0A «, t00=0x0009, t01=0x00a8}
0x0ec0…0ed4               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0009, t01=0x00bc}
0x0ed4…0f04               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU X:O DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x00d0}
0x0f04…0f10               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0100}
0x0f10…0f24               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0009, t01=0x010c}
0x0f24…0f54               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x0120}
0x0f54…0f60               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0150}
0x0f60…0f72               Head {h00=0x000e, h01=0x0050, text=»X:P EQU 0 «, t00=0x0009, t01=0x015c}
0x0f72…0fa4               Head {h00=0x002e, h01=0x0050, text=»IBMCHR EQU X:P IF 1 IBM CHARACTER HANDLING«, t00=0x0009, t01=0x016e}
0x0fa4…0fd6               Head {h00=0x002e, h01=0x0050, text=»X:Q EQU 1 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x000a, t01=0x0010}
0x0fd6…0fec               Head {h00=0x0012, h01=0x0050, text=»MESPAS EQU X:Q«, t00=0x000a, t01=0x0042}
0x0fec…1024               Head {h00=0x0034, h01=0x0050, text=»X:R EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000a, t01=0x0058}
0x1024…103a               Head {h00=0x0012, h01=0x0050, text=»EM3270 EQU X:R«, t00=0x000a, t01=0x0090}
0x103a…1068               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000a, t01=0x00a6}
0x1068…1098               Head {h00=0x002c, h01=0x0050, text=»TSTREQ EQU 0 IF 1 TEST REQUEST HANDLING «, t00=0x000a, t01=0x00d4}
0x1098…10c8               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 0 SPECIAL CONDITION FOR DENMARK«, t00=0x000a, t01=0x0104}
0x10c8…1100               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000a, t01=0x0134}
0x1100…1134               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000a, t01=0x016c}
0x1134…1168               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000b, t01=0x0010}
0x1168…1198               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000b, t01=0x0044}
0x1198…11b4               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000b, t01=0x0074}
0x11b4…11f4               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x0090}
0x11f4…120a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x00d0}
0x120a…121e               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x00e6}
0x121e…125e               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x00fa}
0x125e…1274               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x013a}
0x1274…1282               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0150}
0x1282…128c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x015e}
0x128c…12a6               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x000b, t01=0x0168}
0x12a6…12b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0182}
0x12b0…12ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x018c}
0x12ba…12c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0008}
0x12c4…12d6               Head {h00=0x000e, h01=0x0050, text=»* A7=ORDER«, t00=0x000c, t01=0x0012}
0x12d6…12e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0024}
0x12e0…12f4               Head {h00=0x0010, h01=0x0050, text=»* /02: READ «, t00=0x000c, t01=0x002e}
0x12f4…1308               Head {h00=0x0010, h01=0x0050, text=»* /06: WRITE«, t00=0x000c, t01=0x0042}
0x1308…1320               Head {h00=0x0014, h01=0x0050, text=»* /08: EXCHANGE «, t00=0x000c, t01=0x0056}
0x1320…1342               Head {h00=0x001e, h01=0x0050, text=»* /22: RELEASE READ BUFFER«, t00=0x000c, t01=0x006e}
0x1342…1362               Head {h00=0x001c, h01=0x0050, text=»* /31: GET WRITE BUFFER «, t00=0x000c, t01=0x0090}
0x1362…1384               Head {h00=0x001e, h01=0x0050, text=»* /37: TRANSFER PARAMETERS«, t00=0x000c, t01=0x00b0}
0x1384…139e               Head {h00=0x0016, h01=0x0050, text=»* /38: SET STATUS «, t00=0x000c, t01=0x00d2}
0x139e…13a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ec}
0x13a8…13b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f6}
0x13b2…13d4               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x000c, t01=0x0100}
0x13d4…13de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0122}
0x13de…13e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x012c}
0x13e8…1412               Head {h00=0x0026, h01=0x0050, text=»DCONOF DATA 0 ON- / OFFLINESWITCH «, t00=0x000c, t01=0x0136}
0x1412…1440               Head {h00=0x002a, h01=0x0050, text=»DCSTOL DATA 0 OLD DC EQUIPMENT STATUS «, t00=0x000c, t01=0x0160}
0x1440…1464               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x000c, t01=0x018e}
0x1464…148c               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x000d, t01=0x0022}
0x148c…14a0               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x000d, t01=0x004a}
0x14a0…14ce               Head {h00=0x002a, h01=0x0050, text=»DCGWQ DATA 0 GET BUFFER REQUEST QUEUE «, t00=0x000d, t01=0x005e}
0x14ce…14da               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x008c}
0x14da…150a               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x000d, t01=0x0098}
0x150a…153a               Head {h00=0x002c, h01=0x0050, text=»DC15DC DATA DCACTD ADDRESS BLOCK DC TASK«, t00=0x000d, t01=0x00c8}
0x153a…1562               Head {h00=0x0024, h01=0x0050, text=»DC15AD DATA DCACT ADDRESS BLOCK «, t00=0x000d, t01=0x00f8}
0x1562…1592               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x000d, t01=0x0120}
0x1592…15a4               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x000d, t01=0x0150}
0x15a4…15ca               Head {h00=0x0022, h01=0x0050, text=» RES 1 AND FOR TRANSFER PARAM «, t00=0x000d, t01=0x0162}
0x15ca…15dc               Head {h00=0x000e, h01=0x0050, text=»STB2 RES 1«, t00=0x000d, t01=0x0188}
0x15dc…15e4               Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x000a}
0x15e4…15f8               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x000e, t01=0x0012}
0x15f8…1610               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x000e, t01=0x0026}
0x1610…161c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x003e}
0x161c…1630               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x000e, t01=0x004a}
0x1630…1644               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x000e, t01=0x005e}
0x1644…1650               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0072}
0x1650…165e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x007e}
0x165e…1668               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x008c}
0x1668…1672               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0096}
0x1672…169a               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x000e, t01=0x00a0}
0x169a…16a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00c8}
0x16a4…16b8               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x000e, t01=0x00d2}
0x16b8…16dc               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x000e, t01=0x00e6}
0x16dc…16f0               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x000e, t01=0x010a}
0x16f0…1712               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DCRD READ SPECIFIC «, t00=0x000e, t01=0x011e}
0x1712…172a               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x000e, t01=0x0140}
0x172a…173e               Head {h00=0x0010, h01=0x0050, text=» RF(Z) DCWR «, t00=0x000e, t01=0x0158}
0x173e…1756               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/08-/06 «, t00=0x000e, t01=0x016c}
0x1756…1772               Head {h00=0x0018, h01=0x0050, text=» RF(Z) DCEX EXCHANGE«, t00=0x000e, t01=0x0184}
0x1772…178a               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/22-/08 «, t00=0x000f, t01=0x0010}
0x178a…17b2               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCRR RELEASE READ BUFFER «, t00=0x000f, t01=0x0028}
0x17b2…17ca               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/22 «, t00=0x000f, t01=0x0050}
0x17ca…17f2               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DCTP TRANSFER PARAMETERS «, t00=0x000f, t01=0x0068}
0x17f2…180a               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/37 «, t00=0x000f, t01=0x0090}
0x180a…181e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x000f, t01=0x00a8}
0x181e…183c               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DCSS SET STATUS«, t00=0x000f, t01=0x00bc}
0x183c…1848               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x00da}
0x1848…185c               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x000f, t01=0x00e6}
0x185c…1874               Head {h00=0x0014, h01=0x0050, text=» ADK A7,/38-/31 «, t00=0x000f, t01=0x00fa}
0x1874…1898               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DCGW GET WRITE BUFFER«, t00=0x000f, t01=0x0112}
0x1898…18a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0136}
0x18a4…18b6               Head {h00=0x000e, h01=0x0050, text=» RF DCA100«, t00=0x000f, t01=0x0142}
0x18b6…18c4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0154}
0x18c4…18ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0162}
0x18ce…18d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x016c}
0x18d8…18f8               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION FROM DCTASK«, t00=0x000f, t01=0x0176}
0x18f8…1902               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0008}
0x1902…190c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0012}
0x190c…1920               Head {h00=0x0010, h01=0x0050, text=»DCACTD EQU *«, t00=0x0010, t01=0x001c}
0x1920…1934               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/02 «, t00=0x0010, t01=0x0030}
0x1934…194e               Head {h00=0x0016, h01=0x0050, text=» RF(E) DCRDDC READ«, t00=0x0010, t01=0x0044}
0x194e…1966               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/22-/02 «, t00=0x0010, t01=0x005e}
0x1966…198e               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCRR RELEASE READ BUFFER «, t00=0x0010, t01=0x0076}
0x198e…19a6               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/37-/22 «, t00=0x0010, t01=0x009e}
0x19a6…19ce               Head {h00=0x0024, h01=0x0050, text=» RF(E) DCTP TRANSFER PARAMETERS «, t00=0x0010, t01=0x00b6}
0x19ce…19f0               Head {h00=0x001e, h01=0x0050, text=»DCA100 EQU * REQUEST ERROR«, t00=0x0010, t01=0x00de}
0x19f0…1a12               Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE INVALID ORDER «, t00=0x0010, t01=0x0100}
0x1a12…1a1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0122}
0x1a1c…1a26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x012c}
0x1a26…1a40               Head {h00=0x0016, h01=0x0050, text=»* READ FROM DCTASK«, t00=0x0010, t01=0x0136}
0x1a40…1a4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0150}
0x1a4a…1a54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x015a}
0x1a54…1a72               Head {h00=0x001a, h01=0x0050, text=»* REQUEST FROM DC-TASK«, t00=0x0010, t01=0x0164}
0x1a72…1a8a               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0010, t01=0x0182}
0x1a8a…1ab4               Head {h00=0x0026, h01=0x0050, text=»*   STATUS CHANGE ON DC EQUIPMENT «, t00=0x0011, t01=0x000a}
0x1ab4…1adc               Head {h00=0x0024, h01=0x0050, text=»*   SPONTANOUS MESSAGE RECEPTION«, t00=0x0011, t01=0x0034}
0x1adc…1ae6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x005c}
0x1ae6…1afa               Head {h00=0x0010, h01=0x0050, text=»DCRDDC EQU *«, t00=0x0011, t01=0x0066}
0x1afa…1b2a               Head {h00=0x002c, h01=0x0050, text=» CF A15,CKMESS CHECK IF MESSAGE RECEIVED«, t00=0x0011, t01=0x007a}
0x1b2a…1b3e               Head {h00=0x0010, h01=0x0050, text=»DCRTN EQU * «, t00=0x0011, t01=0x00aa}
0x1b3e…1b62               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0011, t01=0x00be}
0x1b62…1b70               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x00e2}
0x1b70…1b7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f0}
0x1b7a…1b84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00fa}
0x1b84…1ba2               Head {h00=0x001a, h01=0x0050, text=»* TRANSFER PARAMETERS «, t00=0x0011, t01=0x0104}
0x1ba2…1bac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0122}
0x1bac…1bb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x012c}
0x1bb6…1bf8               Head {h00=0x003e, h01=0x0050, text=»* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS«, t00=0x0011, t01=0x0136}
0x1bf8…1c36               Head {h00=0x003a, h01=0x0050, text=»*         FROM TERMINALS: TRANSFER TERMINAL ADDRESSES «, t00=0x0011, t01=0x0178}
0x1c36…1c40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0026}
0x1c40…1c4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0030}
0x1c4a…1c5e               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0012, t01=0x003a}
0x1c5e…1c88               Head {h00=0x0026, h01=0x0050, text=»DCTP LD A2,ECBCW,A8 GET PARAMETER «, t00=0x0012, t01=0x004e}
0x1c88…1c94               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0078}
0x1c94…1ca8               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0012, t01=0x0084}
0x1ca8…1cd2               Head {h00=0x0026, h01=0x0050, text=»DCTP LC A2,ECBCW,A8 GET TCS IF ANY«, t00=0x0012, t01=0x0098}
0x1cd2…1ce6               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0012, t01=0x00c2}
0x1ce6…1cfc               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DCTP10 «, t00=0x0012, t01=0x00d6}
0x1cfc…1d28               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0012, t01=0x00ec}
0x1d28…1d3a               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0012, t01=0x0118}
0x1d3a…1d4e               Head {h00=0x0010, h01=0x0050, text=»DCTP10 EQU *«, t00=0x0012, t01=0x012a}
0x1d4e…1d76               Head {h00=0x0024, h01=0x0050, text=» LC A3,ECBCW+1,A8 GET TCP OR DV «, t00=0x0012, t01=0x013e}
0x1d76…1d8a               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0012, t01=0x0166}
0x1d8a…1db6               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A3 TRANSLATE TO ASCII «, t00=0x0012, t01=0x017a}
0x1db6…1dc2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0016}
0x1dc2…1dee               Head {h00=0x0028, h01=0x0050, text=» STR A2,A6 SAVE IN FIRST WORD OF DWT«, t00=0x0013, t01=0x0022}
0x1dee…1df6               Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x004e}
0x1df6…1e0a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0013, t01=0x0056}
0x1e0a…1e38               Head {h00=0x002a, h01=0x0050, text=» LD A3,ECBBA,A8 DEVICE BUFFER ADDRESS «, t00=0x0013, t01=0x006a}
0x1e38…1e50               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTBUF,A6«, t00=0x0013, t01=0x0098}
0x1e50…1e7c               Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBRL,A8 CURSOR ADDRESS WORD «, t00=0x0013, t01=0x00b0}
0x1e7c…1e94               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTCUR,A6«, t00=0x0013, t01=0x00dc}
0x1e94…1ea0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00f4}
0x1ea0…1ec6               Head {h00=0x0022, h01=0x0050, text=» CWK A6,DW1500 DCTASK DWT ??? «, t00=0x0013, t01=0x0100}
0x1ec6…1efc               Head {h00=0x0032, h01=0x0050, text=» RF(E) DCTP30 YES!!!  SHOULD NOT BE IN DC:TAB «, t00=0x0013, t01=0x0126}
0x1efc…1f2a               Head {h00=0x002a, h01=0x0050, text=» LD A1,DC:IN GET DC:TAB INPUT POINTER «, t00=0x0013, t01=0x015c}
0x1f2a…1f58               Head {h00=0x002a, h01=0x0050, text=» CWK A1,DC:END TABLE ALREADY FULL ????«, t00=0x0013, t01=0x018a}
0x1f58…1f82               Head {h00=0x0026, h01=0x0050, text=» ABL(E) DISIOE YES!! REQUEST ERROR«, t00=0x0014, t01=0x0028}
0x1f82…1f90               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0052}
0x1f90…1f98               Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0060}
0x1f98…1fa0               Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0068}
0x1fa0…1fb4               Head {h00=0x0010, h01=0x0050, text=»DCTP20 EQU *«, t00=0x0014, t01=0x0070}
0x1fb4…1fca               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=0 «, t00=0x0014, t01=0x0084}
0x1fca…1ff0               Head {h00=0x0022, h01=0x0050, text=» LDKL A5,STB2 LOAD STACK BASE «, t00=0x0014, t01=0x009a}
0x1ff0…2020               Head {h00=0x002c, h01=0x0050, text=» CF A5,FINTER DWT ALREADY IN DC:TAB ??? «, t00=0x0014, t01=0x00c0}
0x2020…2032               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0014, t01=0x00f0}
0x2032…2050               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) DCTP30 YES!!! «, t00=0x0014, t01=0x0102}
0x2050…205c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0120}
0x205c…2084               Head {h00=0x0024, h01=0x0050, text=» STR A6,A1 INSERT DWT IN DC:TAB «, t00=0x0014, t01=0x012c}
0x2084…2096               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0014, t01=0x0154}
0x2096…20c4               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:IN UPDATE DC:TAB IN POINTER«, t00=0x0014, t01=0x0166}
0x20c4…20cc (21, 0, 400)  Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0004}
0x20cc…20fa               Head {h00=0x002a, h01=0x0050, text=» ADS A1,DC:TAB INCREMENT DC:TAB LENGTH«, t00=0x0015, t01=0x000c}
0x20fa…210e               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x0015, t01=0x003a}
0x210e…212a               Head {h00=0x0018, h01=0x0050, text=» LDK A1,4 DEVICE END«, t00=0x0015, t01=0x004e}
0x212a…2142               Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x0015, t01=0x006a}
0x2142…216e               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x0015, t01=0x0082}
0x216e…217a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x00ae}
0x217a…218e               Head {h00=0x0010, h01=0x0050, text=»DCTP30 EQU *«, t00=0x0015, t01=0x00ba}
0x218e…21b2               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RETURN CODE ::= 0«, t00=0x0015, t01=0x00ce}
0x21b2…21c6               Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0015, t01=0x00f2}
0x21c6…21ee               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0015, t01=0x0106}
0x21ee…2200               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0015, t01=0x012e}
0x2200…220e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0140}
0x220e…2218               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x014e}
0x2218…2222               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0158}
0x2222…2232               Head {h00=0x000c, h01=0x0050, text=»* WRITE «, t00=0x0015, t01=0x0162}
0x2232…223c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0172}
0x223c…2246               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x017c}
0x2246…225e               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0015, t01=0x0186}
0x225e…2280               Head {h00=0x001e, h01=0x0050, text=»*   SUCCESFUL TRANSMISSION«, t00=0x0016, t01=0x000e}
0x2280…2294               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0016, t01=0x0030}
0x2294…229e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0044}
0x229e…22a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x004e}
0x22a8…22ba               Head {h00=0x000e, h01=0x0050, text=»DCWR EQU *«, t00=0x0016, t01=0x0058}
0x22ba…22da               Head {h00=0x001c, h01=0x0050, text=» CF A15,TIMEWR SET TIMER«, t00=0x0016, t01=0x006a}
0x22da…22fe               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSWQ  QUEUE REQUEST«, t00=0x0016, t01=0x008a}
0x22fe…2310               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0016, t01=0x00ae}
0x2310…231a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00c0}
0x231a…2324               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ca}
0x2324…232e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00d4}
0x232e…233c               Head {h00=0x000a, h01=0x0050, text=»* READ«, t00=0x0016, t01=0x00de}
0x233c…2346               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ec}
0x2346…2350               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00f6}
0x2350…2368               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0016, t01=0x0100}
0x2368…2384               Head {h00=0x0018, h01=0x0050, text=»*   MESSAGE RECEIVED«, t00=0x0016, t01=0x0118}
0x2384…2398               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0016, t01=0x0134}
0x2398…23a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0148}
0x23a2…23ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0152}
0x23ac…23be               Head {h00=0x000e, h01=0x0050, text=»DCRD EQU *«, t00=0x0016, t01=0x015c}
0x23be…23de               Head {h00=0x001c, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB«, t00=0x0016, t01=0x016e}
0x23de…2410               Head {h00=0x002e, h01=0x0050, text=» LD A3,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE «, t00=0x0016, t01=0x018e}
0x2410…2436               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DCRD10 NOTHING IN QUEUE«, t00=0x0017, t01=0x0030}
0x2436…243e               Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0056}
0x243e…246a               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A3 TAKE THE FIRST IN QUEUE «, t00=0x0017, t01=0x005e}
0x246a…2482               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRQ,A6 «, t00=0x0017, t01=0x008a}
0x2482…2494               Head {h00=0x000e, h01=0x0050, text=» ADK A3,6 «, t00=0x0017, t01=0x00a2}
0x2494…24ac               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBBA,A8 «, t00=0x0017, t01=0x00b4}
0x24ac…24d6               Head {h00=0x0026, h01=0x0050, text=» LD A4,-4,A3 AND EFFECTIVE LENGTH «, t00=0x0017, t01=0x00cc}
0x24d6…24ee               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBEL,A8 «, t00=0x0017, t01=0x00f6}
0x24ee…2500               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0017, t01=0x010e}
0x2500…2516               Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x0017, t01=0x0120}
0x2516…2528               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0017, t01=0x0136}
0x2528…2530               Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0148}
0x2530…2558               Head {h00=0x0024, h01=0x0050, text=»DCRD10 CF A15,TIMERE START TIMER«, t00=0x0017, t01=0x0150}
0x2558…256a               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0017, t01=0x0178}
0x256a…2578               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x018a}
0x2578…2582               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0008}
0x2582…258c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0012}
0x258c…25a6               Head {h00=0x0016, h01=0x0050, text=»* GET WRITE BUFFER«, t00=0x0018, t01=0x001c}
0x25a6…25b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0036}
0x25b0…25ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0040}
0x25ba…25ce               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0018, t01=0x004a}
0x25ce…25e6               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x0018, t01=0x005e}
0x25e6…2606               Head {h00=0x001c, h01=0x0050, text=»*   BUFFER BEEN ALOCATED«, t00=0x0018, t01=0x0076}
0x2606…261a               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x0018, t01=0x0096}
0x261a…2624               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00aa}
0x2624…262e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00b4}
0x262e…2640               Head {h00=0x000e, h01=0x0050, text=»DCGW EQU *«, t00=0x0018, t01=0x00be}
0x2640…266a               Head {h00=0x0026, h01=0x0050, text=» CF A15,GTBUF GET TRANSMIT BUFFER «, t00=0x0018, t01=0x00d0}
0x266a…267c               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0018, t01=0x00fa}
0x267c…26a0               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DCGW10 NO FREE BUFFER«, t00=0x0018, t01=0x010c}
0x26a0…26b8               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x0018, t01=0x0130}
0x26b8…26d4               Head {h00=0x0018, h01=0x0050, text=» LDKL A1,TBUFL+TBUFL«, t00=0x0018, t01=0x0148}
0x26d4…2700               Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBEL,A8 STORE BUFFER LENGTH «, t00=0x0018, t01=0x0164}
0x2700…2712               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0018, t01=0x0190}
0x2712…2734               Head {h00=0x001e, h01=0x0050, text=» RB ENDIO COMPLETE REQUEST«, t00=0x0019, t01=0x0012}
0x2734…2748               Head {h00=0x0010, h01=0x0050, text=»DCGW10 EQU *«, t00=0x0019, t01=0x0034}
0x2748…276a               Head {h00=0x001e, h01=0x0050, text=» CF A15,TIMERE START TIMER«, t00=0x0019, t01=0x0048}
0x276a…278e               Head {h00=0x0020, h01=0x0050, text=» CF A15,INSGWQ QUEUE REQUEST«, t00=0x0019, t01=0x006a}
0x278e…27a0               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x0019, t01=0x008e}
0x27a0…27ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00a0}
0x27ac…27ba               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x00ac}
0x27ba…27c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00ba}
0x27c4…27ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00c4}
0x27ce…27ec               Head {h00=0x001a, h01=0x0050, text=»* RELEASE READ BUFFER «, t00=0x0019, t01=0x00ce}
0x27ec…27f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00ec}
0x27f6…2800               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00f6}
0x2800…281c               Head {h00=0x0018, h01=0x0050, text=»DCRR LD A4,ECBBA,A8 «, t00=0x0019, t01=0x0100}
0x281c…282e               Head {h00=0x000e, h01=0x0050, text=» SUK A4,6 «, t00=0x0019, t01=0x011c}
0x282e…2844               Head {h00=0x0012, h01=0x0050, text=» CF A15,RRBUF «, t00=0x0019, t01=0x012e}
0x2844…2858               Head {h00=0x0010, h01=0x0050, text=»DCRR10 EQU *«, t00=0x0019, t01=0x0144}
0x2858…286a               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0019, t01=0x0158}
0x286a…2898               Head {h00=0x002a, h01=0x0050, text=» CF A15,TENDIO COMPLETE RRBUF REQUEST «, t00=0x0019, t01=0x016a}
0x2898…28aa               Head {h00=0x000e, h01=0x0050, text=» RB DCRTN «, t00=0x001a, t01=0x0008}
0x28aa…28b8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x001a}
0x28b8…28c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0028}
0x28c2…28cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0032}
0x28cc…28de               Head {h00=0x000e, h01=0x0050, text=»* EXCHANGE«, t00=0x001a, t01=0x003c}
0x28de…28e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x004e}
0x28e8…28f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0058}
0x28f2…28fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0062}
0x28fc…2914               Head {h00=0x0014, h01=0x0050, text=»* COMPLETE WHEN:«, t00=0x001a, t01=0x006c}
0x2914…293a               Head {h00=0x0022, h01=0x0050, text=»*   MESSAGE PASSED TO TERMINAL«, t00=0x001a, t01=0x0084}
0x293a…294e               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x001a, t01=0x00aa}
0x294e…2958               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00be}
0x2958…296a               Head {h00=0x000e, h01=0x0050, text=»DCEX EQU *«, t00=0x001a, t01=0x00c8}
0x296a…2998               Head {h00=0x002a, h01=0x0050, text=» RB DCWR SAME INITIALIZATION AS WRITE «, t00=0x001a, t01=0x00da}
0x2998…29a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0108}
0x29a2…29ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0112}
0x29ac…29c0               Head {h00=0x0010, h01=0x0050, text=»* SET STATUS«, t00=0x001a, t01=0x011c}
0x29c0…29ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0130}
0x29ca…29d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x013a}
0x29d4…29e8               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x001a, t01=0x0144}
0x29e8…29fa               Head {h00=0x000e, h01=0x0050, text=»DCSS EQU *«, t00=0x001a, t01=0x0158}
0x29fa…2a28               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW,A8 GET STATUS INFORMATION«, t00=0x001a, t01=0x016a}
0x2a28…2a44               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x001b, t01=0x0008}
0x2a44…2a64               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DCSS20 DEVICE END«, t00=0x001b, t01=0x0024}
0x2a64…2a78               Head {h00=0x0010, h01=0x0050, text=»DCSS10 EQU *«, t00=0x001b, t01=0x0044}
0x2a78…2a90               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTST,A6 «, t00=0x001b, t01=0x0058}
0x2a90…2ab4               Head {h00=0x0020, h01=0x0050, text=» RB DCRR10 COMPLETE REQUEST «, t00=0x001b, t01=0x0070}
0x2ab4…2ac8               Head {h00=0x0010, h01=0x0050, text=»DCSS20 EQU *«, t00=0x001b, t01=0x0094}
0x2ac8…2ae0               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x001b, t01=0x00a8}
0x2ae0…2af2               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x001b, t01=0x00c0}
0x2af2…2b1e               Head {h00=0x0028, h01=0x0050, text=» RB(Z) DCSS10 WACK HAS NOT BEEN SENT«, t00=0x001b, t01=0x00d2}
0x2b1e…2b32               Head {h00=0x0010, h01=0x0050, text=»DCSS30 EQU *«, t00=0x001b, t01=0x00fe}
0x2b32…2b62               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x001b, t01=0x0112}
0x2b62…2b7a               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x001b, t01=0x0142}
0x2b7a…2b8c               Head {h00=0x000e, h01=0x0050, text=» RB DCSS10«, t00=0x001b, t01=0x015a}
0x2b8c…2b98               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x016c}
0x2b98…2ba6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0178}
0x2ba6…2bb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0186}
0x2bb0…2bba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0190}
0x2bba…2bc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x000a}
0x2bc4…2be2               Head {h00=0x001a, h01=0x0050, text=»* TIMER HANDLING PART «, t00=0x001c, t01=0x0014}
0x2be2…2bec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0032}
0x2bec…2bf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x003c}
0x2bf6…2c00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0046}
0x2c00…2c1c               Head {h00=0x0018, h01=0x0050, text=»* READ TIMER=TIMERR «, t00=0x001c, t01=0x0050}
0x2c1c…2c26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x006c}
0x2c26…2c3a               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x001c, t01=0x0076}
0x2c3a…2c4c               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x001c, t01=0x008a}
0x2c4c…2c76               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBCW,A8 GET TIMEOUT VALUE «, t00=0x001c, t01=0x009c}
0x2c76…2c96               Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME10 NO TIMING «, t00=0x001c, t01=0x00c6}
0x2c96…2cac               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x001c, t01=0x00e6}
0x2cac…2cc2               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x001c, t01=0x00fc}
0x2cc2…2cd6               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x001c, t01=0x0112}
0x2cd6…2cec               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x001c, t01=0x0126}
0x2cec…2d18               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER POINTER «, t00=0x001c, t01=0x013c}
0x2d18…2d2c               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x001c, t01=0x0168}
0x2d2c…2d46               Head {h00=0x0016, h01=0x0050, text=» RF GBUF10 RETURN «, t00=0x001c, t01=0x017c}
0x2d46…2d50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0008}
0x2d50…2d6c               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x001d, t01=0x0012}
0x2d6c…2d76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x002e}
0x2d76…2d8a               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x001d, t01=0x0038}
0x2d8a…2da6               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x001d, t01=0x004c}
0x2da6…2dba               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x001d, t01=0x0068}
0x2dba…2dce               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x001d, t01=0x007c}
0x2dce…2df6               Head {h00=0x0024, h01=0x0050, text=» CF A15,REMOVG REMOVE FROM QUEUE«, t00=0x001d, t01=0x0090}
0x2df6…2e02               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00b8}
0x2e02…2e16               Head {h00=0x0010, h01=0x0050, text=»TOUTR1 EQU *«, t00=0x001d, t01=0x00c4}
0x2e16…2e3c               Head {h00=0x0022, h01=0x0050, text=» LDK A1,/40 INDICATE TIME OUT «, t00=0x001d, t01=0x00d8}
0x2e3c…2e6c               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTOR,A6 CHECK IF EXCHANGE ORDER «, t00=0x001d, t01=0x00fe}
0x2e6c…2e7e               Head {h00=0x000e, h01=0x0050, text=» SUK A2,8 «, t00=0x001d, t01=0x012e}
0x2e7e…2ea2               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TOUTR2 NOT EXCHANGE «, t00=0x001d, t01=0x0140}
0x2ea2…2ed8               Head {h00=0x0032, h01=0x0050, text=» ORK A1,2 RETURN CODE /42 AT EXCHANGE TIME OUT«, t00=0x001d, t01=0x0164}
0x2ed8…2f00               Head {h00=0x0024, h01=0x0050, text=»TOUTR2 RB ENDIO COMPLETE REQUEST«, t00=0x001e, t01=0x000a}
0x2f00…2f0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0032}
0x2f0a…2f26               Head {h00=0x0018, h01=0x0050, text=»* WRITE TIMER=TIMWR «, t00=0x001e, t01=0x003c}
0x2f26…2f30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0058}
0x2f30…2f48               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x001e, t01=0x0062}
0x2f48…2f72               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBCW,A8 GET TIMEOUT VALUE «, t00=0x001e, t01=0x007a}
0x2f72…2f92               Head {h00=0x001c, h01=0x0050, text=» RB(Z) TIME10 NO TIMING «, t00=0x001e, t01=0x00a4}
0x2f92…2fa6               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x001e, t01=0x00c4}
0x2fa6…2fbc               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x001e, t01=0x00d8}
0x2fbc…2fd0               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x001e, t01=0x00ee}
0x2fd0…2fe4               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x001e, t01=0x0102}
0x2fe4…2ffc               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x001e, t01=0x0116}
0x2ffc…300e               Head {h00=0x000e, h01=0x0050, text=» RB TIME10«, t00=0x001e, t01=0x012e}
0x300e…301c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x0140}
0x301c…3026               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x014e}
0x3026…3044               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x001e, t01=0x0158}
0x3044…304e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0176}
0x304e…3062               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x001e, t01=0x0180}
0x3062…307e (31, 0, 400)  Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x001f, t01=0x0004}
0x307e…3092               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x001f, t01=0x0020}
0x3092…30b4               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x001f, t01=0x0034}
0x30b4…30c6               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x001f, t01=0x0056}
0x30c6…30e2               Head {h00=0x0018, h01=0x0050, text=» RF(Z) TOUT10 WRITE «, t00=0x001f, t01=0x0068}
0x30e2…30f4               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x001f, t01=0x0084}
0x30f4…3120               Head {h00=0x0028, h01=0x0050, text=» RB(NZ) TOUTR1 ORDER IS NOT EXCHANGE«, t00=0x001f, t01=0x0096}
0x3120…313e               Head {h00=0x001a, h01=0x0050, text=»TOUT10 LD A2,DWTECB,A6«, t00=0x001f, t01=0x00c2}
0x313e…3162               Head {h00=0x0020, h01=0x0050, text=» LD A4,ECBBA,A2 FETCH BUFFER«, t00=0x001f, t01=0x00e0}
0x3162…3176               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x001f, t01=0x0104}
0x3176…31a2               Head {h00=0x0028, h01=0x0050, text=» CF A15,RTBUF RELEASE TRANSMITBUFFER«, t00=0x001f, t01=0x0118}
0x31a2…31ce               Head {h00=0x0028, h01=0x0050, text=» CF A15,CKGBQ CHECK GET BUFFER QUEUE«, t00=0x001f, t01=0x0144}
0x31ce…31da               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0170}
0x31da…3208               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x001f, t01=0x017c}
0x3208…3212               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x001a}
0x3212…323c               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x0020, t01=0x0024}
0x323c…3260               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x0020, t01=0x004e}
0x3260…328c               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x0020, t01=0x0072}
0x328c…32a2               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x0020, t01=0x009e}
0x32a2…32b4               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0020, t01=0x00b4}
0x32b4…32e0               Head {h00=0x0028, h01=0x0050, text=» RB(NE) TOUTR1 THIS DWT NOT WRITING «, t00=0x0020, t01=0x00c6}
0x32e0…32f2               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0020, t01=0x00f2}
0x32f2…32fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0104}
0x32fc…3306               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x010e}
0x3306…3318               Head {h00=0x000e, h01=0x0050, text=» RB TOUTR1«, t00=0x0020, t01=0x0118}
0x3318…3326               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x012a}
0x3326…3330               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0138}
0x3330…333a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0142}
0x333a…3358               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0020, t01=0x014c}
0x3358…3362               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x016a}
0x3362…338c               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0020, t01=0x0174}
0x338c…3396               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x000e}
0x3396…33a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0018}
0x33a0…33b4               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0021, t01=0x0022}
0x33b4…33de               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTTP,A6 GET TIMER POINTER «, t00=0x0021, t01=0x0036}
0x33de…3400               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0021, t01=0x0060}
0x3400…3414               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0021, t01=0x0082}
0x3414…343a               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0021, t01=0x0096}
0x343a…345a               Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 STOP TIMER«, t00=0x0021, t01=0x00bc}
0x345a…346e               Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0021, t01=0x00dc}
0x346e…3482               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0021, t01=0x00f0}
0x3482…3494               Head {h00=0x000e, h01=0x0050, text=» RF GBUF10«, t00=0x0021, t01=0x0104}
0x3494…34a2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0116}
0x34a2…34ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0124}
0x34ac…34c8               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0021, t01=0x012e}
0x34c8…34d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x014a}
0x34d2…34fa               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0021, t01=0x0154}
0x34fa…351e               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0021, t01=0x017c}
0x351e…3548               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0022, t01=0x0010}
0x3548…356a               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0022, t01=0x003a}
0x356a…3574               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x005c}
0x3574…357e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0066}
0x357e…35aa               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0022, t01=0x0070}
0x35aa…35ba               Head {h00=0x000c, h01=0x0050, text=»GBUF INH«, t00=0x0022, t01=0x009c}
0x35ba…35ce               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x0022, t01=0x00ac}
0x35ce…35f2               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x0022, t01=0x00c0}
0x35f2…3624               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x0022, t01=0x00e4}
0x3624…3636               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0022, t01=0x0116}
0x3636…3664               Head {h00=0x002a, h01=0x0050, text=»GBUF10 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0022, t01=0x0128}
0x3664…3686               Head {h00=0x001e, h01=0x0050, text=» ABR* A15 RETURN TO CALLER«, t00=0x0022, t01=0x0156}
0x3686…3690               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0178}
0x3690…369a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0182}
0x369a…36b8               Head {h00=0x001a, h01=0x0050, text=»* GET TRANSMIT BUFFER «, t00=0x0022, t01=0x018c}
0x36b8…36c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x001a}
0x36c2…36d6               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0023, t01=0x0024}
0x36d6…36fe               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GTBUF«, t00=0x0023, t01=0x0038}
0x36fe…3722               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0023, t01=0x0060}
0x3722…374c               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0023, t01=0x0084}
0x374c…376e               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0023, t01=0x00ae}
0x376e…3778               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00d0}
0x3778…3782               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00da}
0x3782…37b0               Head {h00=0x002a, h01=0x0050, text=»GTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS «, t00=0x0023, t01=0x00e4}
0x37b0…37c0               Head {h00=0x000c, h01=0x0050, text=» RB GBUF«, t00=0x0023, t01=0x0112}
0x37c0…37ce               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x0122}
0x37ce…37d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0130}
0x37d8…37e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x013a}
0x37e2…3802               Head {h00=0x001c, h01=0x0050, text=»* CHECK GET BUFFER QUEUE«, t00=0x0023, t01=0x0144}
0x3802…380c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0164}
0x380c…3816               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x016e}
0x3816…382a               Head {h00=0x0010, h01=0x0050, text=»CKGBQ EQU * «, t00=0x0023, t01=0x0178}
0x382a…3844               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x0023, t01=0x018c}
0x3844…386a               Head {h00=0x0022, h01=0x0050, text=» LD A6,DCGWQ GET QUEUE ANCHOR «, t00=0x0024, t01=0x0016}
0x386a…3890               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKG110 NO ONE ON QUEUE «, t00=0x0024, t01=0x003c}
0x3890…38a6               Head {h00=0x0012, h01=0x0050, text=» SUK A6,DWTWQ «, t00=0x0024, t01=0x0062}
0x38a6…38be               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0024, t01=0x0078}
0x38be…38de               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKG100 NO REQUEST«, t00=0x0024, t01=0x0090}
0x38de…38f6               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTOR,A6 «, t00=0x0024, t01=0x00b0}
0x38f6…390a               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/31 «, t00=0x0024, t01=0x00c8}
0x390a…3936               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CKG100 NO GET BUFFER REQUEST«, t00=0x0024, t01=0x00dc}
0x3936…3960               Head {h00=0x0026, h01=0x0050, text=» CF A15,GTBUF GET TRANSMIT BUFFER «, t00=0x0024, t01=0x0108}
0x3960…3972               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0024, t01=0x0132}
0x3972…3996               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CKG110 NO BUFFER FREE«, t00=0x0024, t01=0x0144}
0x3996…39ae               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTECB,A6«, t00=0x0024, t01=0x0168}
0x39ae…39da               Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBBA,A3 STORE BUFFER ADDRESS«, t00=0x0024, t01=0x0180}
0x39da…39f6               Head {h00=0x0018, h01=0x0050, text=» LDKL A1,TBUFL+TBUFL«, t00=0x0025, t01=0x001c}
0x39f6…3a22               Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBEL,A3 STORE BUFFER LENGTH «, t00=0x0025, t01=0x0038}
0x3a22…3a4c               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x0025, t01=0x0064}
0x3a4c…3a78               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A3 STORE REMAINING TIME«, t00=0x0025, t01=0x008e}
0x3a78…3a8a               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0025, t01=0x00ba}
0x3a8a…3ab2               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0025, t01=0x00cc}
0x3ab2…3ac6               Head {h00=0x0010, h01=0x0050, text=»CKG100 EQU *«, t00=0x0025, t01=0x00f4}
0x3ac6…3aee               Head {h00=0x0024, h01=0x0050, text=» CF A15,REMOVG REMOVE FROM QUEUE«, t00=0x0025, t01=0x0108}
0x3aee…3b12               Head {h00=0x0020, h01=0x0050, text=»CKG110 LDR A6,A7 RESTORE A6 «, t00=0x0025, t01=0x0130}
0x3b12…3b2c               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0025, t01=0x0154}
0x3b2c…3b38               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x016e}
0x3b38…3b46               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x017a}
0x3b46…3b50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0188}
0x3b50…3b5a (38, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0004}
0x3b5a…3b7a               Head {h00=0x001c, h01=0x0050, text=»* RELEASE RECEIVE BUFFER«, t00=0x0026, t01=0x000e}
0x3b7a…3b84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x002e}
0x3b84…3ba8               Head {h00=0x0020, h01=0x0050, text=»* A4 CONTAINS BUFFER ADDRESS«, t00=0x0026, t01=0x0038}
0x3ba8…3bd0               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,RRBUF«, t00=0x0026, t01=0x005c}
0x3bd0…3bf2               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0026, t01=0x0084}
0x3bf2…3bfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00a6}
0x3bfc…3c06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00b0}
0x3c06…3c32               Head {h00=0x0028, h01=0x0050, text=»RRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0026, t01=0x00ba}
0x3c32…3c42               Head {h00=0x000c, h01=0x0050, text=»RBUF INH«, t00=0x0026, t01=0x00e6}
0x3c42…3c56               Head {h00=0x0010, h01=0x0050, text=»RBUF10 EQU *«, t00=0x0026, t01=0x00f6}
0x3c56…3c6a               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x0026, t01=0x010a}
0x3c6a…3c80               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RBUF20 «, t00=0x0026, t01=0x011e}
0x3c80…3c92               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0026, t01=0x0134}
0x3c92…3ca4               Head {h00=0x000e, h01=0x0050, text=» RB RBUF10«, t00=0x0026, t01=0x0146}
0x3ca4…3cb8               Head {h00=0x0010, h01=0x0050, text=»RBUF20 EQU *«, t00=0x0026, t01=0x0158}
0x3cb8…3cca               Head {h00=0x000e, h01=0x0050, text=» STR A4,A2«, t00=0x0026, t01=0x016c}
0x3cca…3cda               Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x0026, t01=0x017e}
0x3cda…3cfe               Head {h00=0x0020, h01=0x0050, text=» RB GBUF10 RETURN TO CALLER «, t00=0x0026, t01=0x018e}
0x3cfe…3d08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0022}
0x3d08…3d12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x002c}
0x3d12…3d34               Head {h00=0x001e, h01=0x0050, text=»* RELEASE TRANSMIT BUFFER «, t00=0x0027, t01=0x0036}
0x3d34…3d3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0058}
0x3d3e…3d52               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0027, t01=0x0062}
0x3d52…3d76               Head {h00=0x0020, h01=0x0050, text=»* A4 CONTAINS BUFFER ADDRESS«, t00=0x0027, t01=0x0076}
0x3d76…3d9e               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,RTBUF«, t00=0x0027, t01=0x009a}
0x3d9e…3dc0               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0027, t01=0x00c2}
0x3dc0…3dca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00e4}
0x3dca…3dd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00ee}
0x3dd4…3e02               Head {h00=0x002a, h01=0x0050, text=»RTBUF LDKL A2,DCTBUF TRANSMIT BUFFERS «, t00=0x0027, t01=0x00f8}
0x3e02…3e18               Head {h00=0x0012, h01=0x0050, text=» CWK A4,TBUF1 «, t00=0x0027, t01=0x0126}
0x3e18…3e3a               Head {h00=0x001e, h01=0x0050, text=» RB(E) RBUF DRIVER BUFFER «, t00=0x0027, t01=0x013c}
0x3e3a…3e50               Head {h00=0x0012, h01=0x0050, text=» CWK A4,TBUF2 «, t00=0x0027, t01=0x015e}
0x3e50…3e72               Head {h00=0x001e, h01=0x0050, text=» RB(E) RBUF DRIVER BUFFER «, t00=0x0027, t01=0x0174}
0x3e72…3e98               Head {h00=0x0022, h01=0x0050, text=» RB GBUF10 APPLICATION BUFFER «, t00=0x0028, t01=0x0008}
0x3e98…3ea4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x002e}
0x3ea4…3eb2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x003a}
0x3eb2…3ebc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0048}
0x3ebc…3ec6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0052}
0x3ec6…3ef2               Head {h00=0x0028, h01=0x0050, text=»* INSERT DWT IN WRITE REQUEST QUEUE «, t00=0x0028, t01=0x005c}
0x3ef2…3efc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0088}
0x3efc…3f18               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0028, t01=0x0092}
0x3f18…3f28               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0028, t01=0x00ae}
0x3f28…3f32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00be}
0x3f32…3f5e               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0028, t01=0x00c8}
0x3f5e…3f7a               Head {h00=0x0018, h01=0x0050, text=»INSWQ1 LDK A4,DWTWQ «, t00=0x0028, t01=0x00f4}
0x3f7a…3f94               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0028, t01=0x0110}
0x3f94…3fbc               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0028, t01=0x012a}
0x3fbc…3fce               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0028, t01=0x0152}
0x3fce…3fe0               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0028, t01=0x0164}
0x3fe0…3ff8               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0028, t01=0x0176}
0x3ff8…401a               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0028, t01=0x018e}
0x401a…4040               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0029, t01=0x0020}
0x4040…405a               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0029, t01=0x0046}
0x405a…4064               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0060}
0x4064…406e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x006a}
0x406e…409c               Head {h00=0x002a, h01=0x0050, text=»* REMOVE DWT FROM WRITE REQUEST QUEUE «, t00=0x0029, t01=0x0074}
0x409c…40a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00a2}
0x40a6…40c2               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0029, t01=0x00ac}
0x40c2…40d2               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0029, t01=0x00c8}
0x40d2…40dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00d8}
0x40dc…410a               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x0029, t01=0x00e2}
0x410a…4140               Head {h00=0x0032, h01=0x0050, text=»REM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED «, t00=0x0029, t01=0x0110}
0x4140…4154               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x0029, t01=0x0146}
0x4154…4168               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x0029, t01=0x015a}
0x4168…4180               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x0029, t01=0x016e}
0x4180…41aa               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x0029, t01=0x0186}
0x41aa…41bc               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x002a, t01=0x0020}
0x41bc…41d0               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x002a, t01=0x0032}
0x41d0…41ec               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x002a, t01=0x0046}
0x41ec…41fe               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x002a, t01=0x0062}
0x41fe…421e               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x002a, t01=0x0074}
0x421e…4230               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x002a, t01=0x0094}
0x4230…424a               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x002a, t01=0x00a6}
0x424a…4258               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x00c0}
0x4258…4262               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00ce}
0x4262…426c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00d8}
0x426c…4276               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00e2}
0x4276…42a4               Head {h00=0x002a, h01=0x0050, text=»* INSERT DWT IN GET WRITE BUFFER QUEUE«, t00=0x002a, t01=0x00ec}
0x42a4…42ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x011a}
0x42ae…42c2               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x002a, t01=0x0124}
0x42c2…42de               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002a, t01=0x0138}
0x42de…42ee               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002a, t01=0x0154}
0x42ee…42f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0164}
0x42f8…4326               Head {h00=0x002a, h01=0x0050, text=»INSGWQ LDKL A2,DCGWQ GET QUEUE ANCHOR «, t00=0x002a, t01=0x016e}
0x4326…4338               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ1«, t00=0x002b, t01=0x000c}
0x4338…4342               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x001e}
0x4342…434c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0028}
0x434c…437c               Head {h00=0x002c, h01=0x0050, text=»* REMOVE DWT FROM GET WRITE BUFFER QUEUE«, t00=0x002b, t01=0x0032}
0x437c…4386               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0062}
0x4386…43a2               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x006c}
0x43a2…43b2               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x0088}
0x43b2…43bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0098}
0x43bc…43ea               Head {h00=0x002a, h01=0x0050, text=»REMOVG LDKL A2,DCGWQ GET QUEUE ANCHOR «, t00=0x002b, t01=0x00a2}
0x43ea…43fc               Head {h00=0x000e, h01=0x0050, text=» RB REM05 «, t00=0x002b, t01=0x00d0}
0x43fc…4408               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x00e2}
0x4408…4416               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x00ee}
0x4416…4420               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00fc}
0x4420…442a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0106}
0x442a…444e               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x002b, t01=0x0110}
0x444e…4458               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0134}
0x4458…446c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x002b, t01=0x013e}
0x446c…4488               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002b, t01=0x0152}
0x4488…4498               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002b, t01=0x016e}
0x4498…44a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x017e}
0x44a2…44ce               Head {h00=0x0028, h01=0x0050, text=»INSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR«, t00=0x002b, t01=0x0188}
0x44ce…44e4               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002c, t01=0x0024}
0x44e4…44f6               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x002c, t01=0x003a}
0x44f6…4500               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x004c}
0x4500…450a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0056}
0x450a…4530               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x002c, t01=0x0060}
0x4530…453a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0086}
0x453a…4556               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x002c, t01=0x0090}
0x4556…4566               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x002c, t01=0x00ac}
0x4566…4570               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00bc}
0x4570…459e               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x002c, t01=0x00c6}
0x459e…45b4               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTSQ «, t00=0x002c, t01=0x00f4}
0x45b4…45c6               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x002c, t01=0x010a}
0x45c6…45d2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x011c}
0x45d2…45e0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x0128}
0x45e0…45ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0136}
0x45ea…45f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0140}
0x45f4…461c               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x002c, t01=0x014a}
0x461c…4626               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0172}
0x4626…463e               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x002c, t01=0x017c}
0x463e…4658 (45, 0, 400)  Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x002d, t01=0x0004}
0x4658…4662               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x001e}
0x4662…4676               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x002d, t01=0x0028}
0x4676…468c               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x002d, t01=0x003c}
0x468c…46b8               Head {h00=0x0028, h01=0x0050, text=» LDKL A2,DW1500 QUEUE ON DC-TASK DWT«, t00=0x002d, t01=0x0052}
0x46b8…46c4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x007e}
0x46c4…46da               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=0 «, t00=0x002d, t01=0x008a}
0x46da…4702               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A6 QUEUE ON TERMINAL DWT«, t00=0x002d, t01=0x00a0}
0x4702…470e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x00c8}
0x470e…473e               Head {h00=0x002c, h01=0x0050, text=» ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE«, t00=0x002d, t01=0x00d4}
0x473e…4752               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x002d, t01=0x0104}
0x4752…4766               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x002d, t01=0x0118}
0x4766…478e               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x002d, t01=0x012c}
0x478e…47a0               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002d, t01=0x0154}
0x47a0…47b2               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x002d, t01=0x0166}
0x47b2…47dc               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x002d, t01=0x0178}
0x47dc…4802               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x002e, t01=0x0012}
0x4802…4812               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002e, t01=0x0038}
0x4812…4820               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0048}
0x4820…482a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0056}
0x482a…4834               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0060}
0x4834…486a               Head {h00=0x0032, h01=0x0050, text=»* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE«, t00=0x002e, t01=0x006a}
0x486a…4874               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00a0}
0x4874…48ac               Head {h00=0x0034, h01=0x0050, text=»* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED «, t00=0x002e, t01=0x00aa}
0x48ac…48b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00e2}
0x48b6…48d4               Head {h00=0x001a, h01=0x0050, text=»CKMESS LDKL A6,DW1500 «, t00=0x002e, t01=0x00ec}
0x48d4…48ec               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x002e, t01=0x010a}
0x48ec…490c               Head {h00=0x001c, h01=0x0050, text=» RF(N) CKM110 NO REQUEST«, t00=0x002e, t01=0x0122}
0x490c…492c               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 READ REQUEST ?«, t00=0x002e, t01=0x0142}
0x492c…4944               Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTOR,A6 «, t00=0x002e, t01=0x0162}
0x4944…495e               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CKM110 NO «, t00=0x002e, t01=0x017a}
0x495e…4986 (47, 0, 398)  Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDR TO A8 «, t00=0x002f, t01=0x0004}
0x4986…49b4               Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE «, t00=0x002f, t01=0x002c}
0x49b4…49da               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CKM200 NO READ IN QUEUE«, t00=0x002f, t01=0x005a}
0x49da…4a0a               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER «, t00=0x002f, t01=0x0080}
0x4a0a…4a3c               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE«, t00=0x002f, t01=0x00b0}
0x4a3c…4a62               Head {h00=0x0022, h01=0x0050, text=» ADK A3,6 MOVE POINTER TO TEXT«, t00=0x002f, t01=0x00e2}
0x4a62…4a90               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBBA,A8 SAVE THIS ADDR IN ECB «, t00=0x002f, t01=0x0108}
0x4a90…4aa4               Head {h00=0x0010, h01=0x0050, text=» LD A4,-4,A3«, t00=0x002f, t01=0x0136}
0x4aa4…4ad8               Head {h00=0x0030, h01=0x0050, text=» ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS «, t00=0x002f, t01=0x014a}
0x4ad8…4aec               Head {h00=0x0010, h01=0x0050, text=» LD A4,-2,A3«, t00=0x002f, t01=0x017e}
0x4aec…4b1e (48, 0, 398)  Head {h00=0x002e, h01=0x0050, text=» ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS «, t00=0x0030, t01=0x0004}
0x4b1e…4b3c               Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 PARAMETER=OK«, t00=0x0030, t01=0x0036}
0x4b3c…4b76               Head {h00=0x0036, h01=0x0050, text=»CKM100 CF A15,TENDIO COMPLETE READ GENERAL REQUEST«, t00=0x0030, t01=0x0054}
0x4b76…4ba4               Head {h00=0x002a, h01=0x0050, text=»CKM110 ADKL A15,4 ADJUST STACK POINTER«, t00=0x0030, t01=0x008e}
0x4ba4…4bbc               Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0030, t01=0x00bc}
0x4bbc…4bf8               Head {h00=0x0038, h01=0x0050, text=»CKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS«, t00=0x0030, t01=0x00d4}
0x4bf8…4c28               Head {h00=0x002c, h01=0x0050, text=» OR A1,DCONOF TAKE CARE OF POLL TIME OUT«, t00=0x0030, t01=0x0110}
0x4c28…4c3e               Head {h00=0x0012, h01=0x0050, text=» CW A1,DCSTOL «, t00=0x0030, t01=0x0140}
0x4c3e…4c54               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTOL «, t00=0x0030, t01=0x0156}
0x4c54…4c7e               Head {h00=0x0026, h01=0x0050, text=» RB(E) CKM110 NO CHANGE OF STATUS «, t00=0x0030, t01=0x016c}
0x4c7e…4cac               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/2000 INDICATE STATUS CHANGE «, t00=0x0031, t01=0x0008}
0x4cac…4cbe               Head {h00=0x000e, h01=0x0050, text=» RB CKM100«, t00=0x0031, t01=0x0036}
0x4cbe…4ccc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x0048}
0x4ccc…4cd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0056}
0x4cd6…4ce0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0060}
0x4ce0…4cfe               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0031, t01=0x006a}
0x4cfe…4d26               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0031, t01=0x0088}
0x4d26…4d30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00b0}
0x4d30…4d42               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0031, t01=0x00ba}
0x4d42…4d6a               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0031, t01=0x00cc}
0x4d6a…4d74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00f4}
0x4d74…4d7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00fe}
0x4d7e…4d96               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0031, t01=0x0108}
0x4d96…4daa               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0031, t01=0x0120}
0x4daa…4dbe               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0031, t01=0x0134}
0x4dbe…4dd2               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0031, t01=0x0148}
0x4dd2…4de6               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0031, t01=0x015c}
0x4de6…4dfa               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0031, t01=0x0170}
0x4dfa…4e14               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0031, t01=0x0184}
0x4e14…4e22               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x000e}
0x4e22…4e3a               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0032, t01=0x001c}
0x4e3a…4e4e               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0032, t01=0x0034}
0x4e4e…4e60               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0032, t01=0x0048}
0x4e60…4e74               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0032, t01=0x005a}
0x4e74…4e86               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0032, t01=0x006e}
0x4e86…4e9a               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0032, t01=0x0080}
0x4e9a…4eac               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0032, t01=0x0094}
0x4eac…4ec0               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0032, t01=0x00a6}
0x4ec0…4ed2               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0032, t01=0x00ba}
0x4ed2…4ee6               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0032, t01=0x00cc}
0x4ee6…4ef8               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0032, t01=0x00e0}
0x4ef8…4f0c               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0032, t01=0x00f2}
0x4f0c…4f20               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0032, t01=0x0106}
0x4f20…4f34               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0032, t01=0x011a}
0x4f34…4f46               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0032, t01=0x012e}
0x4f46…4f54               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x0140}
0x4f54…4f5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x014e}
0x4f5e…4f68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0158}
0x4f68…4f7e               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x0032, t01=0x0162}
0x4f7e…4f88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0178}
0x4f88…4f92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0182}
0x4f92…4fbe               Head {h00=0x0028, h01=0x0050, text=»TIMPRO EQU 30 PROCEDURE TIMER 3 SEC «, t00=0x0032, t01=0x018c}
0x4fbe…4fc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0028}
0x4fc8…4fd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0032}
0x4fd2…4fee               Head {h00=0x0018, h01=0x0050, text=»* CHARACTER EQUATES «, t00=0x0033, t01=0x003c}
0x4fee…4ff8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0058}
0x4ff8…5022               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0033, t01=0x0062}
0x5022…5036               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0033, t01=0x008c}
0x5036…504a               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0033, t01=0x00a0}
0x504a…505e               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0033, t01=0x00b4}
0x505e…5072               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0033, t01=0x00c8}
0x5072…5086               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0033, t01=0x00dc}
0x5086…509a               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0033, t01=0x00f0}
0x509a…50ae               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0033, t01=0x0104}
0x50ae…50c2               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0033, t01=0x0118}
0x50c2…50d6               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0033, t01=0x012c}
0x50d6…50ea               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0033, t01=0x0140}
0x50ea…50fe               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0033, t01=0x0154}
0x50fe…5112               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0033, t01=0x0168}
0x5112…5124               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0033, t01=0x017c}
0x5124…513a               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0033, t01=0x018e}
0x513a…5150               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0034, t01=0x0014}
0x5150…5164               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0034, t01=0x002a}
0x5164…5178               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x0034, t01=0x003e}
0x5178…518c               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x0034, t01=0x0052}
0x518c…51a0               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x0034, t01=0x0066}
0x51a0…51b4               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x0034, t01=0x007a}
0x51b4…51c8               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x0034, t01=0x008e}
0x51c8…51dc               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0034, t01=0x00a2}
0x51dc…51f0               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x0034, t01=0x00b6}
0x51f0…51fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x00ca}
0x51fc…5210               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0034, t01=0x00d6}
0x5210…5224               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0034, t01=0x00ea}
0x5224…5258               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x0034, t01=0x00fe}
0x5258…5264               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0132}
0x5264…5278               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0034, t01=0x013e}
0x5278…528c               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x0034, t01=0x0152}
0x528c…52a0               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x0034, t01=0x0166}
0x52a0…52b4               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /40 «, t00=0x0034, t01=0x017a}
0x52b4…52c8               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x0034, t01=0x018e}
0x52c8…52dc               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x0035, t01=0x0012}
0x52dc…52f2               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x0035, t01=0x0026}
0x52f2…52fe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x003c}
0x52fe…530c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x0048}
0x530c…5316               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0056}
0x5316…5320               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0060}
0x5320…533e               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x0035, t01=0x006a}
0x533e…5348               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0088}
0x5348…5352               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0092}
0x5352…5380               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x0035, t01=0x009c}
0x5380…53b2               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x0035, t01=0x00ca}
0x53b2…53d2               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x0035, t01=0x00fc}
0x53d2…53ee               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x0035, t01=0x011c}
0x53ee…540a               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x0035, t01=0x0138}
0x540a…5440               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x0035, t01=0x0154}
0x5440…5466               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x0035, t01=0x018a}
0x5466…5486               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x0036, t01=0x0020}
0x5486…54b4               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x0036, t01=0x0040}
0x54b4…54be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x006e}
0x54be…54dc               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x0036, t01=0x0078}
0x54dc…5508               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x0036, t01=0x0096}
0x5508…5532               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x0036, t01=0x00c2}
0x5532…5552               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x0036, t01=0x00ec}
0x5552…5586               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x0036, t01=0x010c}
0x5586…55ae               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x0036, t01=0x0140}
0x55ae…55e0               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x0036, t01=0x0168}
0x55e0…5610               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x0037, t01=0x000a}
0x5610…561a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x003a}
0x561a…5624               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0044}
0x5624…564c               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x0037, t01=0x004e}
0x564c…5656               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0076}
0x5656…5660               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0080}
0x5660…5674               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0037, t01=0x008a}
0x5674…56a6               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x0037, t01=0x009e}
0x56a6…56b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00d0}
0x56b0…56ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00da}
0x56ba…56ce               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x0037, t01=0x00e4}
0x56ce…56e2               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x0037, t01=0x00f8}
0x56e2…56ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x010c}
0x56ec…5722               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x0037, t01=0x0116}
0x5722…5752               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x0037, t01=0x014c}
0x5752…575e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x017c}
0x575e…576c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0188}
0x576c…5776               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0008}
0x5776…5780               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0012}
0x5780…579c               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x0038, t01=0x001c}
0x579c…57a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0038}
0x57a6…57cc               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x0038, t01=0x0042}
0x57cc…57f6               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x0038, t01=0x0068}
0x57f6…5800               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0092}
0x5800…580a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x009c}
0x580a…5826               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0038, t01=0x00a6}
0x5826…5856               Head {h00=0x002c, h01=0x0050, text=»BRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ«, t00=0x0038, t01=0x00c2}
0x5856…586c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0038, t01=0x00f2}
0x586c…587e               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x0038, t01=0x0108}
0x587e…58a2               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x0038, t01=0x011a}
0x58a2…58be               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0038, t01=0x013e}
0x58be…58f4               Head {h00=0x0032, h01=0x0050, text=» CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS «, t00=0x0038, t01=0x015a}
0x58f4…590a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0038, t01=0x0190}
0x590a…5926               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0039, t01=0x0016}
0x5926…595a               Head {h00=0x0030, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ«, t00=0x0039, t01=0x0032}
0x595a…5970               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x0066}
0x5970…5984               Head {h00=0x0010, h01=0x0050, text=»BRM010 EQU *«, t00=0x0039, t01=0x007c}
0x5984…59a6               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0039, t01=0x0090}
0x59a6…59da               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN«, t00=0x0039, t01=0x00b2}
0x59da…59f0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x00e6}
0x59f0…5a0c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0039, t01=0x00fc}
0x5a0c…5a20               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0039, t01=0x0118}
0x5a20…5a58               Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN «, t00=0x0039, t01=0x012c}
0x5a58…5a6e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0039, t01=0x0164}
0x5a6e…5a8a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0039, t01=0x017a}
0x5a8a…5ab0               Head {h00=0x0022, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER«, t00=0x003a, t01=0x0008}
0x5ab0…5ac6               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003a, t01=0x002e}
0x5ac6…5ae2               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003a, t01=0x0044}
0x5ae2…5afe               Head {h00=0x0018, h01=0x0050, text=» IFF CODE=1  SALCUZ «, t00=0x003a, t01=0x0060}
0x5afe…5b1a               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x003a, t01=0x007c}
0x5b1a…5b48               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003a, t01=0x0098}
0x5b48…5b64               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x003a, t01=0x00c6}
0x5b64…5b9a               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003a, t01=0x00e2}
0x5b9a…5bb8               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003a, t01=0x0118}
0x5bb8…5bce               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003a, t01=0x0136}
0x5bce…5bf0               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=2  SALCUZ «, t00=0x003a, t01=0x014c}
0x5bf0…5c0a               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x003a, t01=0x016e}
0x5c0a…5c38               Head {h00=0x002a, h01=0x0050, text=» CIO A2,1,LCUIN START RECEIVER SALCUZ «, t00=0x003a, t01=0x0188}
0x5c38…5c56               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x003b, t01=0x0026}
0x5c56…5c8c               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ «, t00=0x003b, t01=0x0044}
0x5c8c…5caa               Head {h00=0x001a, h01=0x0050, text=» RB(NA) BRMHLT  SALCUZ«, t00=0x003b, t01=0x007a}
0x5caa…5cc0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003b, t01=0x0098}
0x5cc0…5cd4               Head {h00=0x0010, h01=0x0050, text=»BRM100 EQU *«, t00=0x003b, t01=0x00ae}
0x5cd4…5cfc               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003b, t01=0x00c2}
0x5cfc…5d20               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003b, t01=0x00ea}
0x5d20…5d32               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003b, t01=0x010e}
0x5d32…5d46               Head {h00=0x0010, h01=0x0050, text=» SUK A1,STX «, t00=0x003b, t01=0x0120}
0x5d46…5d68               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM300 STX RECEIVED«, t00=0x003b, t01=0x0134}
0x5d68…5d80               Head {h00=0x0014, h01=0x0050, text=» SUK A1,EOT-STX «, t00=0x003b, t01=0x0156}
0x5d80…5da2               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM200 EOT RECEIVED«, t00=0x003b, t01=0x016e}
0x5da2…5dba               Head {h00=0x0014, h01=0x0050, text=» SUK A1,ENQ-EOT «, t00=0x003b, t01=0x0190}
0x5dba…5dde               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM400 ENQ RECEIVED «, t00=0x003c, t01=0x0018}
0x5dde…5df6               Head {h00=0x0014, h01=0x0050, text=» SUK A1,DLE-ENQ «, t00=0x003c, t01=0x003c}
0x5df6…5e1a               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM600 DLE RECEIVED «, t00=0x003c, t01=0x0054}
0x5e1a…5e32               Head {h00=0x0014, h01=0x0050, text=» SUK A1,NAK-DLE «, t00=0x003c, t01=0x0078}
0x5e32…5e56               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) BRM500 NAK RECEIVED «, t00=0x003c, t01=0x0090}
0x5e56…5e6a               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003c, t01=0x00b4}
0x5e6a…5e7c               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003c, t01=0x00c8}
0x5e7c…5ea4               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x003c, t01=0x00da}
0x5ea4…5ec8               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003c, t01=0x0102}
0x5ec8…5eda               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003c, t01=0x0126}
0x5eda…5f04               Head {h00=0x0026, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESSING «, t00=0x003c, t01=0x0138}
0x5f04…5f10               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0162}
0x5f10…5f22               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003c, t01=0x016e}
0x5f22…5f3a               Head {h00=0x0014, h01=0x0050, text=» CC A2,DW1500+1 «, t00=0x003c, t01=0x0180}
0x5f3a…5f58               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM110 POLLING «, t00=0x003d, t01=0x0008}
0x5f58…5f6a               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x003d, t01=0x0026}
0x5f6a…5f80               Head {h00=0x0012, h01=0x0050, text=» CC A2,DW1500 «, t00=0x003d, t01=0x0038}
0x5f80…5fa4               Head {h00=0x0020, h01=0x0050, text=» RF(NE) BRM150 NOT THIS TCU «, t00=0x003d, t01=0x004e}
0x5fa4…5fb8               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x003d, t01=0x0072}
0x5fb8…5fda               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x003d, t01=0x0086}
0x5fda…5ffe               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003d, t01=0x00a8}
0x5ffe…6010               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A2«, t00=0x003d, t01=0x00cc}
0x6010…6024               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x003d, t01=0x00de}
0x6024…6046               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x003d, t01=0x00f2}
0x6046…606a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM150 PARITY ERROR «, t00=0x003d, t01=0x0114}
0x606a…607c               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A8«, t00=0x003d, t01=0x0138}
0x607c…60ac               Head {h00=0x002c, h01=0x0050, text=» RF(NE) BRM150 INVALID ADDRESS SEQUENCE «, t00=0x003d, t01=0x014a}
0x60ac…60b8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x017a}
0x60b8…60de               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ READ ONE CHARACTER«, t00=0x003d, t01=0x0186}
0x60de…60fa               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003e, t01=0x001c}
0x60fa…6112               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x003e, t01=0x0038}
0x6112…6128               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x0050}
0x6128…6144               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003e, t01=0x0066}
0x6144…6160               Head {h00=0x0018, h01=0x0050, text=» SUK A2,ENQ  SALCUZ «, t00=0x003e, t01=0x0082}
0x6160…6176               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x009e}
0x6176…6194               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) BRM150 NOT ENQ«, t00=0x003e, t01=0x00b4}
0x6194…61b0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x003e, t01=0x00d2}
0x61b0…61d8               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ READ LAST CHARACTER «, t00=0x003e, t01=0x00ee}
0x61d8…61e0               Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x0116}
0x61e0…6206               Head {h00=0x0022, h01=0x0050, text=»* TRAILING PAD CAN BE CHECKED «, t00=0x003e, t01=0x011e}
0x6206…620e               Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x0144}
0x620e…6230               Head {h00=0x001e, h01=0x0050, text=» CIO A1,0,LCUIN HALT INPUT«, t00=0x003e, t01=0x014c}
0x6230…6246               Head {h00=0x0012, h01=0x0050, text=» SST A1,LCUIN «, t00=0x003e, t01=0x016e}
0x6246…625c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003e, t01=0x0184}
0x625c…6278               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x003f, t01=0x000a}
0x6278…62a0               Head {h00=0x0024, h01=0x0050, text=» CF A5,HALTIN HALT INPUT SALCUZ «, t00=0x003f, t01=0x0026}
0x62a0…62d2               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) BRM010 PARITY ERROR SALCUZ  SALCUZ«, t00=0x003f, t01=0x004e}
0x62d2…62e8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x003f, t01=0x0080}
0x62e8…62fa               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x003f, t01=0x0096}
0x62fa…631e               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK COUNTER«, t00=0x003f, t01=0x00a8}
0x631e…6330               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x003f, t01=0x00cc}
0x6330…6342               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x003f, t01=0x00de}
0x6342…6362               Head {h00=0x001c, h01=0x0050, text=» RF(Z) BRM120 SELECTING «, t00=0x003f, t01=0x00f0}
0x6362…6374               Head {h00=0x000e, h01=0x0050, text=» CWK A8,GP«, t00=0x003f, t01=0x0110}
0x6374…6396               Head {h00=0x001e, h01=0x0050, text=» ABL(E) GPOLL GENERAL POLL«, t00=0x003f, t01=0x0122}
0x6396…63aa               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x003f, t01=0x0144}
0x63aa…63e4               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x003f, t01=0x0158}
0x63e4…63f0 (64, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x0004}
0x63f0…6404               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0040, t01=0x0010}
0x6404…642e               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0040, t01=0x0024}
0x642e…643a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x004e}
0x643a…6450               Head {h00=0x0012, h01=0x0050, text=» IFF EM3270=0 «, t00=0x0040, t01=0x005a}
0x6450…6482               Head {h00=0x002e, h01=0x0050, text=» CF A5,FINT10 CONTINUE SEARCHING IN DC:TAB«, t00=0x0040, t01=0x0070}
0x6482…648e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x00a2}
0x648e…64b0               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0040, t01=0x00ae}
0x64b0…64d4               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) SPOLL SPECIFIC POLL«, t00=0x0040, t01=0x00d0}
0x64d4…64f0               Head {h00=0x0018, h01=0x0050, text=» RB BRM INVALID POLL«, t00=0x0040, t01=0x00f4}
0x64f0…6504               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x0040, t01=0x0110}
0x6504…652e               Head {h00=0x0026, h01=0x0050, text=» CF A5,FINTER CHECK IF STA PRESENT«, t00=0x0040, t01=0x0124}
0x652e…6550               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0040, t01=0x014e}
0x6550…6570               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) BRM130 STA FOUND«, t00=0x0040, t01=0x0170}
0x6570…6586               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=0   «, t00=0x0040, t01=0x0190}
0x6586…65ae               Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DW1500 SELECT TO DCTASK«, t00=0x0041, t01=0x0016}
0x65ae…65c2               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0041, t01=0x003e}
0x65c2…65d6               Head {h00=0x0010, h01=0x0050, text=» ABL SELECT «, t00=0x0041, t01=0x0052}
0x65d6…65e6               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0041, t01=0x0066}
0x65e6…65fc               Head {h00=0x0012, h01=0x0050, text=» IFT MSV1=1   «, t00=0x0041, t01=0x0076}
0x65fc…661c               Head {h00=0x001c, h01=0x0050, text=» ABL BRM INVALID ADDRESS«, t00=0x0041, t01=0x008c}
0x661c…662c               Head {h00=0x000c, h01=0x0050, text=» XIF    «, t00=0x0041, t01=0x00ac}
0x662c…6636               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00bc}
0x6636…6666               Head {h00=0x002c, h01=0x0050, text=»*   WAIT FOR MARK HOLD TO RESYNCHRONIZE «, t00=0x0041, t01=0x00c6}
0x6666…6670               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00f6}
0x6670…6684               Head {h00=0x0010, h01=0x0050, text=»BRM150 EQU *«, t00=0x0041, t01=0x0100}
0x6684…6698               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0041, t01=0x0114}
0x6698…66ac               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0041, t01=0x0128}
0x66ac…66cc               Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM RESYNCHRONIZE«, t00=0x0041, t01=0x013c}
0x66cc…66f6               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ ANOTHER CHARACTER«, t00=0x0041, t01=0x015c}
0x66f6…6708               Head {h00=0x000e, h01=0x0050, text=» RB BRM150«, t00=0x0041, t01=0x0186}
0x6708…6716               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x0008}
0x6716…6720               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0016}
0x6720…672a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0020}
0x672a…674a               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0042, t01=0x002a}
0x674a…6754               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x004a}
0x6754…675e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0054}
0x675e…6772               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0042, t01=0x005e}
0x6772…679c               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0042, t01=0x0072}
0x679c…67b0               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0042, t01=0x009c}
0x67b0…67d2               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0042, t01=0x00b0}
0x67d2…67de               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x00d2}
0x67de…67f2               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0042, t01=0x00de}
0x67f2…681c               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM220 ACK IS NOT EXPECTED «, t00=0x0042, t01=0x00f2}
0x681c…6842               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0042, t01=0x011c}
0x6842…6866               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM210 NO ONE WRITING«, t00=0x0042, t01=0x0142}
0x6866…6880               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0042, t01=0x0166}
0x6880…68ac               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0042, t01=0x0180}
0x68ac…68c0               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0043, t01=0x001c}
0x68c0…68e6               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0043, t01=0x0030}
0x68e6…68fa               Head {h00=0x0010, h01=0x0050, text=»BRM220 EQU *«, t00=0x0043, t01=0x0056}
0x68fa…691c               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0043, t01=0x006a}
0x691c…692c               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0043, t01=0x008c}
0x692c…693a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0043, t01=0x009c}
0x693a…6944               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00aa}
0x6944…694e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00b4}
0x694e…696e               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0043, t01=0x00be}
0x696e…6978               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00de}
0x6978…6982               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00e8}
0x6982…6996               Head {h00=0x0010, h01=0x0050, text=»BRM300 EQU *«, t00=0x0043, t01=0x00f2}
0x6996…69aa               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0043, t01=0x0106}
0x69aa…69be               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0043, t01=0x011a}
0x69be…69e0               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM315 NOT SELECTED«, t00=0x0043, t01=0x012e}
0x69e0…69f6               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0043, t01=0x0150}
0x69f6…6a22               Head {h00=0x0028, h01=0x0050, text=»*********************CHAINED COMMAND«, t00=0x0043, t01=0x0166}
0x6a22…6a4c (68, 0, 400)  Head {h00=0x0026, h01=0x0050, text=» RB(Z) BRM150 NO BUFFER AVAILABLE «, t00=0x0044, t01=0x0004}
0x6a4c…6a6a               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0044, t01=0x002e}
0x6a6a…6a7e               Head {h00=0x0010, h01=0x0050, text=»BRM305 EQU *«, t00=0x0044, t01=0x004c}
0x6a7e…6aa0               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0044, t01=0x0060}
0x6aa0…6ab2               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0044, t01=0x0082}
0x6ab2…6ad4               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BRM320 MESSAGE OK «, t00=0x0044, t01=0x0094}
0x6ad4…6ae8               Head {h00=0x0010, h01=0x0050, text=»BRM310 EQU *«, t00=0x0044, t01=0x00b6}
0x6ae8…6b14               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0044, t01=0x00ca}
0x6b14…6b28               Head {h00=0x0010, h01=0x0050, text=»BRM312 EQU *«, t00=0x0044, t01=0x00f6}
0x6b28…6b46               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0044, t01=0x010a}
0x6b46…6b56               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0044, t01=0x0128}
0x6b56…6b6a               Head {h00=0x0010, h01=0x0050, text=»BRM315 EQU *«, t00=0x0044, t01=0x0138}
0x6b6a…6b7e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0044, t01=0x014c}
0x6b7e…6b92               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0044, t01=0x0160}
0x6b92…6bbc               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 ACK IS NOT EXPECTED «, t00=0x0044, t01=0x0174}
0x6bbc…6bd2               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0045, t01=0x000e}
0x6bd2…6bfc               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM316 NO BUFFER AVAILABLE «, t00=0x0045, t01=0x0024}
0x6bfc…6c22               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0045, t01=0x004e}
0x6c22…6c56               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0045, t01=0x0074}
0x6c56…6c72               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0045, t01=0x00a8}
0x6c72…6c7e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x00c4}
0x6c7e…6c94               Head {h00=0x0012, h01=0x0050, text=» IFF EM3270=0 «, t00=0x0045, t01=0x00d0}
0x6c94…6cbc               Head {h00=0x0024, h01=0x0050, text=» CF A5,FINTER GET RECEIVING DWT «, t00=0x0045, t01=0x00e6}
0x6cbc…6cda               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A3 DWT-ADDRESS«, t00=0x0045, t01=0x010e}
0x6cda…6cf2               Head {h00=0x0014, h01=0x0050, text=» LDR* A2,A6 STA «, t00=0x0045, t01=0x012c}
0x6cf2…6cfe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x0144}
0x6cfe…6d12               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0045, t01=0x0150}
0x6d12…6d42               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0045, t01=0x0164}
0x6d42…6d5c (70, 0, 400)  Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0046, t01=0x0004}
0x6d5c…6d88               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0046, t01=0x001e}
0x6d88…6da8               Head {h00=0x001c, h01=0x0050, text=» CM CACK PRESET ACK-1 =3«, t00=0x0046, t01=0x004a}
0x6da8…6dcc               Head {h00=0x0020, h01=0x0050, text=» RB BRM305 READ THE MESSAGE «, t00=0x0046, t01=0x006a}
0x6dcc…6dd8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x008e}
0x6dd8…6e04               Head {h00=0x0028, h01=0x0050, text=»BRM316 CF A5,READ READ ONE CHARACTER«, t00=0x0046, t01=0x009a}
0x6e04…6e1c               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =4«, t00=0x0046, t01=0x00c6}
0x6e1c…6e34               Head {h00=0x0014, h01=0x0050, text=» SUK A2,ENQ+PAR «, t00=0x0046, t01=0x00de}
0x6e34…6e46               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0046, t01=0x00f6}
0x6e46…6e5e               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =4«, t00=0x0046, t01=0x0108}
0x6e5e…6e7c               Head {h00=0x001a, h01=0x0050, text=» SUK A2,ENQ ENQ ?? =4 «, t00=0x0046, t01=0x0120}
0x6e7c…6e8e               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0046, t01=0x013e}
0x6e8e…6eba               Head {h00=0x0028, h01=0x0050, text=» RB(Z) BRM312 FORWARD ABORT SEQUENCE«, t00=0x0046, t01=0x0150}
0x6eba…6ecc               Head {h00=0x000e, h01=0x0050, text=» RB BRM220«, t00=0x0046, t01=0x017c}
0x6ecc…6ee0               Head {h00=0x0010, h01=0x0050, text=»BRM320 EQU *«, t00=0x0046, t01=0x018e}
0x6ee0…6f04               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0047, t01=0x0012}
0x6f04…6f2c               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0047, t01=0x0036}
0x6f2c…6f3e               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0047, t01=0x005e}
0x6f3e…6f52               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0047, t01=0x0070}
0x6f52…6f78               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM325 NOT FIRST BLOCK«, t00=0x0047, t01=0x0084}
0x6f78…6f8c               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0047, t01=0x00aa}
0x6f8c…6fa0               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x0047, t01=0x00be}
0x6fa0…6fb2               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x0047, t01=0x00d2}
0x6fb2…6fd6               Head {h00=0x0020, h01=0x0050, text=» RB(NE) BRM310 ESC NOT FOUND«, t00=0x0047, t01=0x00e4}
0x6fd6…6fe8               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0047, t01=0x0108}
0x6fe8…700c               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A4 GET COMMAND CODE «, t00=0x0047, t01=0x011a}
0x700c…701e               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0047, t01=0x013e}
0x701e…7034               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x0047, t01=0x0150}
0x7034…7060               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x0047, t01=0x0166}
0x7060…707e (72, 0, 400)  Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x0048, t01=0x0004}
0x707e…70a8               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x0048, t01=0x0022}
0x70a8…70b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x004c}
0x70b4…70c8               Head {h00=0x0010, h01=0x0050, text=»BRM325 EQU *«, t00=0x0048, t01=0x0058}
0x70c8…70da               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0048, t01=0x006c}
0x70da…7104               Head {h00=0x0026, h01=0x0050, text=» RF(Z) BRM340 MESSAGE ENDED BY ETB«, t00=0x0048, t01=0x007e}
0x7104…7114               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0048, t01=0x00a8}
0x7114…7142               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0048, t01=0x00b8}
0x7142…7154               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0048, t01=0x00e6}
0x7154…7178               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x0048, t01=0x00f8}
0x7178…7182               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x011c}
0x7182…71a8               Head {h00=0x0022, h01=0x0050, text=»* PREPARE FOR CHAINED COMMAND «, t00=0x0048, t01=0x0126}
0x71a8…71b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x014c}
0x71b2…71c6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0048, t01=0x0156}
0x71c6…71da               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x0048, t01=0x016a}
0x71da…71f4               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x0048, t01=0x017e}
0x71f4…720a               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0049, t01=0x0008}
0x720a…7220               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM326 «, t00=0x0049, t01=0x001e}
0x7220…7234               Head {h00=0x0010, h01=0x0050, text=» ST A2,+4,A1«, t00=0x0049, t01=0x0034}
0x7234…7240               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0048}
0x7240…7254               Head {h00=0x0010, h01=0x0050, text=»BRM326 EQU *«, t00=0x0049, t01=0x0054}
0x7254…726a               Head {h00=0x0012, h01=0x0050, text=» CWK A6,DW1500«, t00=0x0049, t01=0x0068}
0x726a…729a               Head {h00=0x002c, h01=0x0050, text=» RF(E) BRM330 MESSAGE IS MENT FOR DCTASK«, t00=0x0049, t01=0x007e}
0x729a…72bc               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x0049, t01=0x00ae}
0x72bc…72dc               Head {h00=0x001c, h01=0x0050, text=» RF(N) BRM330 NO REQUEST«, t00=0x0049, t01=0x00d0}
0x72dc…72ee               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x0049, t01=0x00f0}
0x72ee…7306               Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTOR,A6 «, t00=0x0049, t01=0x0102}
0x7306…732c               Head {h00=0x0022, h01=0x0050, text=» RF(NE) BRM330 NO READ REQUEST«, t00=0x0049, t01=0x011a}
0x732c…7340               Head {h00=0x0010, h01=0x0050, text=»BRM327 EQU *«, t00=0x0049, t01=0x0140}
0x7340…735a               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0049, t01=0x0154}
0x735a…7382               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0049, t01=0x016e}
0x7382…73ae               Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBBA,A8 STORE BUFFER ADDRESS«, t00=0x004a, t01=0x0008}
0x73ae…73ce               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x004a, t01=0x0034}
0x73ce…73fc               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x004a, t01=0x0054}
0x73fc…7426               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x004a, t01=0x0082}
0x7426…7452               Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE REMAINING TIME«, t00=0x004a, t01=0x00ac}
0x7452…7460               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004a, t01=0x00d8}
0x7460…746a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00e6}
0x746a…7474               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00f0}
0x7474…74a8               Head {h00=0x0030, h01=0x0050, text=»* CHECK IF START PRINTER BIT SET IN CCC/WCC «, t00=0x004a, t01=0x00fa}
0x74a8…74b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x012e}
0x74b2…74bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0138}
0x74bc…74d0               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004a, t01=0x0142}
0x74d0…74f0               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x004a, t01=0x0156}
0x74f0…7504               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x004a, t01=0x0176}
0x7504…7526               Head {h00=0x001e, h01=0x0050, text=» LC A2,TEBCDI,A2 TRANSLATE«, t00=0x004a, t01=0x018a}
0x7526…7538               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x004b, t01=0x001c}
0x7538…754e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) BRM328 «, t00=0x004b, t01=0x002e}
0x754e…7570               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 GET STATUS«, t00=0x004b, t01=0x0044}
0x7570…7582               Head {h00=0x000e, h01=0x0050, text=» ORK A2,/A«, t00=0x004b, t01=0x0066}
0x7582…759a               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x004b, t01=0x0078}
0x759a…75ae               Head {h00=0x0010, h01=0x0050, text=»BRM328 EQU *«, t00=0x004b, t01=0x0090}
0x75ae…75ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x00a4}
0x75ba…75e2               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004b, t01=0x00b0}
0x75e2…75f4               Head {h00=0x000e, h01=0x0050, text=» RF BRM345«, t00=0x004b, t01=0x00d8}
0x75f4…7602               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004b, t01=0x00ea}
0x7602…7616               Head {h00=0x0010, h01=0x0050, text=»BRM330 EQU *«, t00=0x004b, t01=0x00f8}
0x7616…7638               Head {h00=0x001e, h01=0x0050, text=» SUK A4,6 GET BUFFER BASE «, t00=0x004b, t01=0x010c}
0x7638…7664               Head {h00=0x0028, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER FOR DCTASK«, t00=0x004b, t01=0x012e}
0x7664…7696               Head {h00=0x002e, h01=0x0050, text=» CF A15,CKMESS COMPLETE DCTASK READ IF ANY«, t00=0x004b, t01=0x015a}
0x7696…76aa               Head {h00=0x0010, h01=0x0050, text=»BRM340 EQU *«, t00=0x004b, t01=0x018c}
0x76aa…76cc               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRACK SEND ACK 0/1 «, t00=0x004c, t01=0x0010}
0x76cc…76dc               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004c, t01=0x0032}
0x76dc…76f0               Head {h00=0x0010, h01=0x0050, text=»BRM345 EQU *«, t00=0x004c, t01=0x0042}
0x76f0…7704               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x004c, t01=0x0056}
0x7704…771c               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x004c, t01=0x006a}
0x771c…772e               Head {h00=0x000e, h01=0x0050, text=» ANK A1,8 «, t00=0x004c, t01=0x0082}
0x772e…7756               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM340 ACK SHOULD BE SENT«, t00=0x004c, t01=0x0094}
0x7756…7776               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x004c, t01=0x00bc}
0x7776…7788               Head {h00=0x000e, h01=0x0050, text=» RF BRM410«, t00=0x004c, t01=0x00dc}
0x7788…7794               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x00ee}
0x7794…77a8               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x004c, t01=0x00fa}
0x77a8…77ba               Head {h00=0x000e, h01=0x0050, text=» RB BRM340«, t00=0x004c, t01=0x010e}
0x77ba…77c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x0120}
0x77c6…77d4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x012c}
0x77d4…77de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x013a}
0x77de…77e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0144}
0x77e8…7818               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x004c, t01=0x014e}
0x7818…7822               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x017e}
0x7822…782c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0188}
0x782c…7840 (77, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x004d, t01=0x0004}
0x7840…7868               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x004d, t01=0x0018}
0x7868…787c               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x004d, t01=0x0040}
0x787c…78a2               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x004d, t01=0x0054}
0x78a2…78da               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x004d, t01=0x007a}
0x78da…7902               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x004d, t01=0x00b2}
0x7902…792a               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x004d, t01=0x00da}
0x792a…7950               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x004d, t01=0x0102}
0x7950…7976               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x004d, t01=0x0128}
0x7976…7988               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x004d, t01=0x014e}
0x7988…799a               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x004d, t01=0x0160}
0x799a…79c4               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x004d, t01=0x0172}
0x79c4…79d8               Head {h00=0x0010, h01=0x0050, text=» ABL POL127 «, t00=0x004e, t01=0x000c}
0x79d8…79e4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x0020}
0x79e4…79ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x002c}
0x79ee…79f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0036}
0x79f8…7a18               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x004e, t01=0x0040}
0x7a18…7a22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0060}
0x7a22…7a2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x006a}
0x7a2c…7a40               Head {h00=0x0010, h01=0x0050, text=»BRM400 EQU *«, t00=0x004e, t01=0x0074}
0x7a40…7a6a               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004e, t01=0x0088}
0x7a6a…7a7e               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004e, t01=0x00b2}
0x7a7e…7aac               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) BRM510 TEXT RETRANSMISSION =1 «, t00=0x004e, t01=0x00c6}
0x7aac…7ac0               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x004e, t01=0x00f4}
0x7ac0…7ae6               Head {h00=0x0022, h01=0x0050, text=» RF(Z) BRM410 IN CONTROL STATE«, t00=0x004e, t01=0x0108}
0x7ae6…7b18               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x004e, t01=0x012e}
0x7b18…7b2c               Head {h00=0x0010, h01=0x0050, text=»BRM410 EQU *«, t00=0x004e, t01=0x0160}
0x7b2c…7b3c               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x004e, t01=0x0174}
0x7b3c…7b4a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004e, t01=0x0184}
0x7b4a…7b54 (79, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0004}
0x7b54…7b5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x000e}
0x7b5e…7b7e               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x004f, t01=0x0018}
0x7b7e…7b88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0038}
0x7b88…7b92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0042}
0x7b92…7ba6               Head {h00=0x0010, h01=0x0050, text=»BRM500 EQU *«, t00=0x004f, t01=0x004c}
0x7ba6…7bd0               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x004f, t01=0x0060}
0x7bd0…7be4               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x004f, t01=0x008a}
0x7be4…7c08               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM510 ACK EXPECTED «, t00=0x004f, t01=0x009e}
0x7c08…7c1c               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x004f, t01=0x00c2}
0x7c1c…7c42               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 IN CONTROL STATE«, t00=0x004f, t01=0x00d6}
0x7c42…7c54               Head {h00=0x000e, h01=0x0050, text=» RF BRM636«, t00=0x004f, t01=0x00fc}
0x7c54…7c68               Head {h00=0x0010, h01=0x0050, text=»BRM510 EQU *«, t00=0x004f, t01=0x010e}
0x7c68…7c8e               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x004f, t01=0x0122}
0x7c8e…7ca2               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x004f, t01=0x0148}
0x7ca2…7cb6               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x004f, t01=0x015c}
0x7cb6…7cea               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED «, t00=0x004f, t01=0x0170}
0x7cea…7cf6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0050, t01=0x0014}
0x7cf6…7d2a               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x0050, t01=0x0020}
0x7d2a…7d54               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x0050, t01=0x0054}
0x7d54…7d68               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0050, t01=0x007e}
0x7d68…7d7c               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0050, t01=0x0092}
0x7d7c…7d86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00a6}
0x7d86…7d90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00b0}
0x7d90…7db0               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x0050, t01=0x00ba}
0x7db0…7dba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00da}
0x7dba…7dc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00e4}
0x7dc4…7dd8               Head {h00=0x0010, h01=0x0050, text=»BRM600 EQU *«, t00=0x0050, t01=0x00ee}
0x7dd8…7e02               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0050, t01=0x0102}
0x7e02…7e16               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0050, t01=0x012c}
0x7e16…7e3c               Head {h00=0x0022, h01=0x0050, text=» RB(Z) BRM410 ACK NOT EXPECTED«, t00=0x0050, t01=0x0140}
0x7e3c…7e66               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x0050, t01=0x0166}
0x7e66…7e7e               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =4«, t00=0x0050, t01=0x0190}
0x7e7e…7e96               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0+PAR«, t00=0x0051, t01=0x0018}
0x7e96…7ea8               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0051, t01=0x0030}
0x7ea8…7ec0               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =4«, t00=0x0051, t01=0x0042}
0x7ec0…7ed8               Head {h00=0x0014, h01=0x0050, text=» CWK A2,ACK0  =4«, t00=0x0051, t01=0x005a}
0x7ed8…7eea               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0051, t01=0x0072}
0x7eea…7f00               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM620«, t00=0x0051, t01=0x0084}
0x7f00…7f0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x009a}
0x7f0a…7f24               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x0051, t01=0x00a4}
0x7f24…7f2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00be}
0x7f2e…7f50               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x0051, t01=0x00c8}
0x7f50…7f74               Head {h00=0x0020, h01=0x0050, text=» RF(Z) BRM630 ACK,0 EXPECTED«, t00=0x0051, t01=0x00ea}
0x7f74…7f88               Head {h00=0x0010, h01=0x0050, text=»BRM610 EQU *«, t00=0x0051, t01=0x010e}
0x7f88…7fa6               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0051, t01=0x0122}
0x7fa6…7fd0               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0051, t01=0x0140}
0x7fd0…7fe2               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0051, t01=0x016a}
0x7fe2…7ff6               Head {h00=0x0010, h01=0x0050, text=»BRM620 EQU *«, t00=0x0051, t01=0x017c}
0x7ff6…800a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x0051, t01=0x0190}
0x800a…8020               Head {h00=0x0012, h01=0x0050, text=» RF(NE) BRM650«, t00=0x0052, t01=0x0014}
0x8020…802a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x002a}
0x802a…8044               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x0052, t01=0x0034}
0x8044…804e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x004e}
0x804e…8072               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x0052, t01=0x0058}
0x8072…809a               Head {h00=0x0024, h01=0x0050, text=» RB(Z) BRM610 ACK,1 NOT EXPECTED«, t00=0x0052, t01=0x007c}
0x809a…80ae               Head {h00=0x0010, h01=0x0050, text=»BRM630 EQU *«, t00=0x0052, t01=0x00a4}
0x80ae…80c2               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0052, t01=0x00b8}
0x80c2…80e4               Head {h00=0x001e, h01=0x0050, text=» RF(Z) BRM640 ETX NOT SENT«, t00=0x0052, t01=0x00cc}
0x80e4…80f2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x00ee}
0x80f2…80fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00fc}
0x80fc…812c               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x0052, t01=0x0106}
0x812c…8136               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0136}
0x8136…8150               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0052, t01=0x0140}
0x8150…8164               Head {h00=0x0010, h01=0x0050, text=»BRM635 EQU *«, t00=0x0052, t01=0x015a}
0x8164…8178               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0052, t01=0x016e}
0x8178…818c               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x0052, t01=0x0182}
0x818c…81be               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED«, t00=0x0053, t01=0x0008}
0x81be…81ca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x003a}
0x81ca…81f6               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0053, t01=0x0046}
0x81f6…820a               Head {h00=0x0010, h01=0x0050, text=»BRM636 EQU *«, t00=0x0053, t01=0x0072}
0x820a…8228               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0053, t01=0x0086}
0x8228…823c               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0053, t01=0x00a4}
0x823c…8244               Head {h00=0x0004, h01=0x0050, t00=0x0053, t01=0x00b8}
0x8244…8266               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0053, t01=0x00c0}
0x8266…8272               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x00e2}
0x8272…8284               Head {h00=0x000e, h01=0x0050, text=» RB BRM410«, t00=0x0053, t01=0x00ee}
0x8284…8298               Head {h00=0x0010, h01=0x0050, text=»BRM640 EQU *«, t00=0x0053, t01=0x0100}
0x8298…82aa               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0053, t01=0x0114}
0x82aa…82d4               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0053, t01=0x0126}
0x82d4…82e8               Head {h00=0x0010, h01=0x0050, text=» ABL POL130 «, t00=0x0053, t01=0x0150}
0x82e8…82fc               Head {h00=0x0010, h01=0x0050, text=»BRM650 EQU *«, t00=0x0053, t01=0x0164}
0x82fc…8314               Head {h00=0x0014, h01=0x0050, text=» IFF P6805=1  =4«, t00=0x0053, t01=0x0178}
0x8314…832c               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI+PAR «, t00=0x0053, t01=0x0190}
0x832c…833e               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0054, t01=0x0018}
0x833e…8356               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =4«, t00=0x0054, t01=0x002a}
0x8356…836e               Head {h00=0x0014, h01=0x0050, text=» CWK A2,RVI  =4 «, t00=0x0054, t01=0x0042}
0x836e…8380               Head {h00=0x000e, h01=0x0050, text=» XIF   =4 «, t00=0x0054, t01=0x005a}
0x8380…83ac               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM610 INVALID DLE SEQUENCE «, t00=0x0054, t01=0x006c}
0x83ac…83d2               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x0054, t01=0x0098}
0x83d2…83e6               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x0054, t01=0x00be}
0x83e6…840e               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) BRM660 ETX HAS BEEN SENT«, t00=0x0054, t01=0x00d2}
0x840e…8428               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0054, t01=0x00fa}
0x8428…843a               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0054, t01=0x0114}
0x843a…844e               Head {h00=0x0010, h01=0x0050, text=»BRM660 EQU *«, t00=0x0054, t01=0x0126}
0x844e…8468               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0054, t01=0x013a}
0x8468…847a               Head {h00=0x000e, h01=0x0050, text=» RB BRM635«, t00=0x0054, t01=0x0154}
0x847a…848e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0054, t01=0x0166}
0x848e…849c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0054, t01=0x017a}
0x849c…84a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0188}
0x84a6…84b0 (85, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0004}
0x84b0…84d6               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x0055, t01=0x000e}
0x84d6…84e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0034}
0x84e0…84ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x003e}
0x84ea…84fe               Head {h00=0x0010, h01=0x0050, text=»BRM670 EQU *«, t00=0x0055, t01=0x0048}
0x84fe…8524               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x0055, t01=0x005c}
0x8524…8554               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x0055, t01=0x0082}
0x8554…8578               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x0055, t01=0x00b2}
0x8578…859e               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x0055, t01=0x00d6}
0x859e…85c0               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0055, t01=0x00fc}
0x85c0…85d2               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x0055, t01=0x011e}
0x85d2…85ee               Head {h00=0x0018, h01=0x0050, text=» RB(Z) BRM636 NOT DE«, t00=0x0055, t01=0x0130}
0x85ee…8604               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x0055, t01=0x014c}
0x8604…862a               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x0055, t01=0x0162}
0x862a…863c               Head {h00=0x000e, h01=0x0050, text=» RB BRM636«, t00=0x0055, t01=0x0188}
0x863c…8648               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x000a}
0x8648…8656               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0056, t01=0x0016}
0x8656…8660               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0024}
0x8660…866a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x002e}
0x866a…868c               Head {h00=0x001e, h01=0x0050, text=»* SELECT HAS BEEN RECEIVED«, t00=0x0056, t01=0x0038}
0x868c…8696               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x005a}
0x8696…86a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0064}
0x86a0…86b4               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x0056, t01=0x006e}
0x86b4…86cc               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =2 «, t00=0x0056, t01=0x0082}
0x86cc…86fa               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) POL010 ERROR. ACK EXPECTED =2 «, t00=0x0056, t01=0x009a}
0x86fa…870e               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x0056, t01=0x00c8}
0x870e…8730               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0056, t01=0x00dc}
0x8730…8742               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0056, t01=0x00fe}
0x8742…8754               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0056, t01=0x0110}
0x8754…877c               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL110 NO PENDING STATUS «, t00=0x0056, t01=0x0122}
0x877c…879a               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x0056, t01=0x014a}
0x879a…87a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x0168}
0x87a6…87ba               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x0056, t01=0x0174}
0x87ba…87cc               Head {h00=0x000e, h01=0x0050, text=» RF SEL110«, t00=0x0056, t01=0x0188}
0x87cc…87d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x000a}
0x87d8…87ec               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x0057, t01=0x0016}
0x87ec…87fc               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0057, t01=0x002a}
0x87fc…8810               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x0057, t01=0x003a}
0x8810…882a               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=1«, t00=0x0057, t01=0x004e}
0x882a…883c               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0057, t01=0x0068}
0x883c…8858               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL115 BUSY «, t00=0x0057, t01=0x007a}
0x8858…8864               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x0096}
0x8864…887e               Head {h00=0x0016, h01=0x0050, text=» IFT STAT+NOWACK=2«, t00=0x0057, t01=0x00a2}
0x887e…8890               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0057, t01=0x00bc}
0x8890…88b6               Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL111 DEVICE NOT BUSY «, t00=0x0057, t01=0x00ce}
0x88b6…88da               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x0057, t01=0x00f4}
0x88da…88ea               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0057, t01=0x0118}
0x88ea…88fe               Head {h00=0x0010, h01=0x0050, text=»SEL111 EQU *«, t00=0x0057, t01=0x0128}
0x88fe…890a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x013c}
0x890a…8920               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0057, t01=0x0148}
0x8920…8948               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL120 BUFFER AVAILABLE «, t00=0x0057, t01=0x015e}
0x8948…895c               Head {h00=0x0010, h01=0x0050, text=»SEL115 EQU *«, t00=0x0057, t01=0x0186}
0x895c…8976               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+NOWACK=2«, t00=0x0058, t01=0x000a}
0x8976…8996               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x0058, t01=0x0024}
0x8996…89a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0044}
0x89a2…89b4               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x0058, t01=0x0050}
0x89b4…89c8               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x0058, t01=0x0062}
0x89c8…89f8               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0058, t01=0x0076}
0x89f8…8a18               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x0058, t01=0x00a6}
0x8a18…8a2a               Head {h00=0x000e, h01=0x0050, text=» RB SEL100«, t00=0x0058, t01=0x00c6}
0x8a2a…8a38               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0058, t01=0x00d8}
0x8a38…8a42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00e6}
0x8a42…8a4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00f0}
0x8a4c…8a70               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x0058, t01=0x00fa}
0x8a70…8a7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x011e}
0x8a7a…8a84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0128}
0x8a84…8a98               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x0058, t01=0x0132}
0x8a98…8ab8               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x0058, t01=0x0146}
0x8ab8…8adc               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x0058, t01=0x0166}
0x8adc…8af0               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0058, t01=0x018a}
0x8af0…8b22               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x0059, t01=0x000e}
0x8b22…8b2e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x0040}
0x8b2e…8b56               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x0059, t01=0x004c}
0x8b56…8b66               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x0059, t01=0x0074}
0x8b66…8b8c               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x0059, t01=0x0084}
0x8b8c…8b9c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0059, t01=0x00aa}
0x8b9c…8baa               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0059, t01=0x00ba}
0x8baa…8bb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00c8}
0x8bb4…8bbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00d2}
0x8bbe…8be6               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x0059, t01=0x00dc}
0x8be6…8bf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0104}
0x8bf0…8bfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x010e}
0x8bfa…8c0e               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x0059, t01=0x0118}
0x8c0e…8c26               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =2 «, t00=0x0059, t01=0x012c}
0x8c26…8c50               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL020 ACK NOT EXPECTED =2 «, t00=0x0059, t01=0x0144}
0x8c50…8c76               Head {h00=0x0022, h01=0x0050, text=»POL010 CF A5,TRENQ SEND ENQ =2«, t00=0x0059, t01=0x016e}
0x8c76…8ca4 (90, 0, 398)  Head {h00=0x002a, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER =2 «, t00=0x005a, t01=0x0004}
0x8ca4…8cca               Head {h00=0x0022, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE =2 «, t00=0x005a, t01=0x0032}
0x8cca…8ce2               Head {h00=0x0014, h01=0x0050, text=»POL020 EQU *  =2«, t00=0x005a, t01=0x0058}
0x8ce2…8d08               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x005a, t01=0x0070}
0x8d08…8d1c               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x005a, t01=0x0096}
0x8d1c…8d32               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x005a, t01=0x00aa}
0x8d32…8d5c               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL110 NO STATUS TO BE SENT«, t00=0x005a, t01=0x00c0}
0x8d5c…8d82               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTSQ GET DWT ADDRESS «, t00=0x005a, t01=0x00ea}
0x8d82…8d96               Head {h00=0x0010, h01=0x0050, text=»POL050 EQU *«, t00=0x005a, t01=0x0110}
0x8d96…8db6               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x005a, t01=0x0124}
0x8db6…8de0               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005a, t01=0x0144}
0x8de0…8e04               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005a, t01=0x016e}
0x8e04…8e10 (91, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0004}
0x8e10…8e24               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=1 «, t00=0x005b, t01=0x0010}
0x8e24…8e36               Head {h00=0x000e, h01=0x0050, text=» RF POL110«, t00=0x005b, t01=0x0024}
0x8e36…8e42               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0036}
0x8e42…8e56               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x005b, t01=0x0042}
0x8e56…8e66               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x005b, t01=0x0056}
0x8e66…8e7a               Head {h00=0x0010, h01=0x0050, text=»POL110 EQU *«, t00=0x005b, t01=0x0066}
0x8e7a…8e8e               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x005b, t01=0x007a}
0x8e8e…8eb4               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 WRITE ON QUEUE «, t00=0x005b, t01=0x008e}
0x8eb4…8ec8               Head {h00=0x0010, h01=0x0050, text=»POL115 EQU *«, t00=0x005b, t01=0x00b4}
0x8ec8…8ee6               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x005b, t01=0x00c8}
0x8ee6…8ef8               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005b, t01=0x00e6}
0x8ef8…8f0c               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x005b, t01=0x00f8}
0x8f0c…8f32               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTWQ GET DWT ADDRESS «, t00=0x005b, t01=0x010c}
0x8f32…8f46               Head {h00=0x0010, h01=0x0050, text=»POL125 EQU *«, t00=0x005b, t01=0x0132}
0x8f46…8f6e               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x005b, t01=0x0146}
0x8f6e…8f84               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL126«, t00=0x005b, t01=0x016e}
0x8f84…8f9a               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x005b, t01=0x0184}
0x8f9a…8fac               Head {h00=0x000e, h01=0x0050, text=» RB POL115«, t00=0x005c, t01=0x000a}
0x8fac…8fc0               Head {h00=0x0010, h01=0x0050, text=»POL126 EQU *«, t00=0x005c, t01=0x001c}
0x8fc0…8fe4               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x005c, t01=0x0030}
0x8fe4…9002               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x005c, t01=0x0054}
0x9002…902c               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x005c, t01=0x0072}
0x902c…904e               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x005c, t01=0x009c}
0x904e…9062               Head {h00=0x0010, h01=0x0050, text=»POL127 EQU *«, t00=0x005c, t01=0x00be}
0x9062…908c               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x005c, t01=0x00d2}
0x908c…90b8               Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x005c, t01=0x00fc}
0x90b8…90da               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x005c, t01=0x0128}
0x90da…90fe               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x005c, t01=0x014a}
0x90fe…9112               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x005c, t01=0x016e}
0x9112…9134               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x005c, t01=0x0182}
0x9134…9144               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x005d, t01=0x0014}
0x9144…9168               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x005d, t01=0x0024}
0x9168…9192               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x005d, t01=0x0048}
0x9192…91b6               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x005d, t01=0x0072}
0x91b6…91c8               Head {h00=0x000e, h01=0x0050, text=» RB POL100«, t00=0x005d, t01=0x0096}
0x91c8…91d6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005d, t01=0x00a8}
0x91d6…91e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00b6}
0x91e0…91ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00c0}
0x91ea…9214               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x005d, t01=0x00ca}
0x9214…921e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00f4}
0x921e…9228               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00fe}
0x9228…923c               Head {h00=0x0010, h01=0x0050, text=»SPOLL EQU * «, t00=0x005d, t01=0x0108}
0x923c…9256               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x005d, t01=0x011c}
0x9256…926e               Head {h00=0x0014, h01=0x0050, text=» LD A1,XACK  =2 «, t00=0x005d, t01=0x0136}
0x926e…9294               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL010 ACK EXPECTED =2«, t00=0x005d, t01=0x014e}
0x9294…92ae               Head {h00=0x0016, h01=0x0050, text=» LDR A7,A6 SAVE A6«, t00=0x005d, t01=0x0174}
0x92ae…92d2               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x005d, t01=0x018e}
0x92d2…92f0               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A7 RESTORE A6 «, t00=0x005e, t01=0x0022}
0x92f0…9304               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x005e, t01=0x0040}
0x9304…9326               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x005e, t01=0x0054}
0x9326…9338               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x005e, t01=0x0076}
0x9338…935e               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) POL050 PENDING STATUS «, t00=0x005e, t01=0x0088}
0x935e…936a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x00ae}
0x936a…9384               Head {h00=0x0016, h01=0x0050, text=» IFF STAT+SPECP=0 «, t00=0x005e, t01=0x00ba}
0x9384…939c               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x005e, t01=0x00d4}
0x939c…93bc               Head {h00=0x001c, h01=0x0050, text=» RB(N) POL115 NO REQUEST«, t00=0x005e, t01=0x00ec}
0x93bc…93de               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x005e, t01=0x010c}
0x93de…93f0               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x005e, t01=0x012e}
0x93f0…9414               Head {h00=0x0020, h01=0x0050, text=» RB(Z) POL125 WRITE REQUEST «, t00=0x005e, t01=0x0140}
0x9414…9426               Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x005e, t01=0x0164}
0x9426…944c               Head {h00=0x0022, h01=0x0050, text=» RB(Z) POL125 EXCHANGE REQUEST«, t00=0x005e, t01=0x0176}
0x944c…9458               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x000c}
0x9458…9474               Head {h00=0x0018, h01=0x0050, text=» RB POL115 SEND EOT «, t00=0x005f, t01=0x0018}
0x9474…9482               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x0034}
0x9482…948c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0042}
0x948c…9496               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x004c}
0x9496…94d2               Head {h00=0x0038, h01=0x0050, text=»* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED «, t00=0x005f, t01=0x0056}
0x94d2…94dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0092}
0x94dc…94fe               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x005f, t01=0x009c}
0x94fe…9508               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00be}
0x9508…9512               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00c8}
0x9512…952e               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x005f, t01=0x00d2}
0x952e…9556               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x005f, t01=0x00ee}
0x9556…956e               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x005f, t01=0x0116}
0x956e…958e               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x005f, t01=0x012e}
0x958e…95b0               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x005f, t01=0x014e}
0x95b0…95c2               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x005f, t01=0x0170}
0x95c2…95e6               Head {h00=0x0020, h01=0x0050, text=» RF(Z) CWR100 WRITE REQUEST «, t00=0x005f, t01=0x0182}
0x95e6…95f8               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0060, t01=0x0016}
0x95f8…9624               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CWR900 NOT EXCHANGE REQUEST «, t00=0x0060, t01=0x0028}
0x9624…9636               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0060, t01=0x0054}
0x9636…966c               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO«, t00=0x0060, t01=0x0066}
0x966c…968c               Head {h00=0x001c, h01=0x0050, text=» LDK A2,2 TRANMISSION OK«, t00=0x0060, t01=0x009c}
0x968c…96b8               Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTOR,A6 INDICATE READ ORDER «, t00=0x0060, t01=0x00bc}
0x96b8…96ca               Head {h00=0x000e, h01=0x0050, text=» RF CWR150«, t00=0x0060, t01=0x00e8}
0x96ca…96f4               Head {h00=0x0026, h01=0x0050, text=»CWR100 LD A8,FECB GET ECB ADDRESS «, t00=0x0060, t01=0x00fa}
0x96f4…9716               Head {h00=0x001e, h01=0x0050, text=» CF A15,CTIME STOP TIMING «, t00=0x0060, t01=0x0124}
0x9716…9728               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A8«, t00=0x0060, t01=0x0146}
0x9728…973e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CWR150 «, t00=0x0060, t01=0x0158}
0x973e…9756               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW,A8 «, t00=0x0060, t01=0x016e}
0x9756…977e               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0060, t01=0x0186}
0x977e…9792               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x0061, t01=0x001e}
0x9792…97c0               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0061, t01=0x0032}
0x97c0…97d4               Head {h00=0x0010, h01=0x0050, text=»CWR200 EQU *«, t00=0x0061, t01=0x0060}
0x97d4…97e8               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x0061, t01=0x0074}
0x97e8…9810               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0061, t01=0x0088}
0x9810…983e               Head {h00=0x002a, h01=0x0050, text=» CF A15,RTBUF RELEASE TRANSMIT BUFFER «, t00=0x0061, t01=0x00b0}
0x983e…986a               Head {h00=0x0028, h01=0x0050, text=» CF A15,CKGBQ CHECK GET BUFFER QUEUE«, t00=0x0061, t01=0x00de}
0x986a…9876               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x010a}
0x9876…988a               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x0061, t01=0x0116}
0x988a…98b0               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0061, t01=0x012a}
0x98b0…98c2               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0061, t01=0x0150}
0x98c2…98d2               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0061, t01=0x0162}
0x98d2…98e0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0061, t01=0x0172}
0x98e0…98ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0180}
0x98ea…98f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x018a}
0x98f4…9912 (98, 0, 400)  Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x0062, t01=0x0004}
0x9912…991c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0022}
0x991c…993c               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x0062, t01=0x002c}
0x993c…9968               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x0062, t01=0x004c}
0x9968…999e               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x0062, t01=0x0078}
0x999e…99ca               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x0062, t01=0x00ae}
0x99ca…99d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x00da}
0x99d4…99e8               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x0062, t01=0x00e4}
0x99e8…9a10               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0062, t01=0x00f8}
0x9a10…9a30               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x0062, t01=0x0120}
0x9a30…9a42               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0062, t01=0x0140}
0x9a42…9a56               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0062, t01=0x0152}
0x9a56…9a7e               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x0062, t01=0x0166}
0x9a7e…9aa4               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x0062, t01=0x018e}
0x9aa4…9ab6               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x0063, t01=0x0024}
0x9ab6…9aca               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x0063, t01=0x0036}
0x9aca…9ade               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x0063, t01=0x004a}
0x9ade…9b02               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0063, t01=0x005e}
0x9b02…9b2e               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0063, t01=0x0082}
0x9b2e…9b42               Head {h00=0x0010, h01=0x0050, text=»RDM075 EQU *«, t00=0x0063, t01=0x00ae}
0x9b42…9b52               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0063, t01=0x00c2}
0x9b52…9b6e               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0063, t01=0x00d2}
0x9b6e…9b76               Head {h00=0x0004, h01=0x0050, t00=0x0063, t01=0x00ee}
0x9b76…9b8c               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0063, t01=0x00f6}
0x9b8c…9ba0               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0063, t01=0x010c}
0x9ba0…9bc6               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x0063, t01=0x0120}
0x9bc6…9bda               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0063, t01=0x0146}
0x9bda…9bfe               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0063, t01=0x015a}
0x9bfe…9c12               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x0063, t01=0x017e}
0x9c12…9c28 (100, 0, 398) Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x0064, t01=0x0004}
0x9c28…9c56               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x0064, t01=0x001a}
0x9c56…9c6a               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0064, t01=0x0048}
0x9c6a…9c76               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0064, t01=0x005c}
0x9c76…9c8a               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x0064, t01=0x0068}
0x9c8a…9cb2               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x0064, t01=0x007c}
0x9cb2…9cd6               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0064, t01=0x00a4}
0x9cd6…9cea               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x0064, t01=0x00c8}
0x9cea…9cfe               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x0064, t01=0x00dc}
0x9cfe…9d20               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x0064, t01=0x00f0}
0x9d20…9d34               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x0064, t01=0x0112}
0x9d34…9d56               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x0064, t01=0x0126}
0x9d56…9d6a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x0064, t01=0x0148}
0x9d6a…9d8c               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x0064, t01=0x015c}
0x9d8c…9da0               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x0064, t01=0x017e}
0x9da0…9dcc (101, 0, 400) Head {h00=0x0028, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ IN TEXT =1«, t00=0x0065, t01=0x0004}
0x9dcc…9de0               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0065, t01=0x0030}
0x9de0…9e08               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x0065, t01=0x0044}
0x9e08…9e10               Head {h00=0x0004, h01=0x0050, t00=0x0065, t01=0x006c}
0x9e10…9e24               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0065, t01=0x0074}
0x9e24…9e3a               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x0065, t01=0x0088}
0x9e3a…9e42               Head {h00=0x0004, h01=0x0050, t00=0x0065, t01=0x009e}
0x9e42…9e54               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0065, t01=0x00a6}
0x9e54…9e6a               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x0065, t01=0x00b8}
0x9e6a…9e8c               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x0065, t01=0x00ce}
0x9e8c…9e9e               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x0065, t01=0x00f0}
0x9e9e…9ec0               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x0065, t01=0x0102}
0x9ec0…9ed2               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x0065, t01=0x0124}
0x9ed2…9ee4               Head {h00=0x000e, h01=0x0050, text=» LDR A8,A1«, t00=0x0065, t01=0x0136}
0x9ee4…9f12               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x0065, t01=0x0148}
0x9f12…9f36               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x0065, t01=0x0176}
0x9f36…9f64               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x0066, t01=0x000a}
0x9f64…9f76               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A8«, t00=0x0066, t01=0x0038}
0x9f76…9f8a               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x0066, t01=0x004a}
0x9f8a…9f96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x005e}
0x9f96…9f9e               Head {h00=0x0004, h01=0x0050, t00=0x0066, t01=0x006a}
0x9f9e…9fc0               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x0066, t01=0x0072}
0x9fc0…9fe4               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0066, t01=0x0094}
0x9fe4…a00c               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x0066, t01=0x00b8}
0xa00c…a020               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x0066, t01=0x00e0}
0xa020…a03c               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x0066, t01=0x00f4}
0xa03c…a060               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x0066, t01=0x0110}
0xa060…a06a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0134}
0xa06a…a084               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x0066, t01=0x013e}
0xa084…a08e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0158}
0xa08e…a0ac               Head {h00=0x001a, h01=0x0050, text=» RF RDM140 ABORT INPUT«, t00=0x0066, t01=0x0162}
0xa0ac…a0c0               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x0066, t01=0x0180}
0xa0c0…a0ea (103, 0, 400) Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x0067, t01=0x0004}
0xa0ea…a0fe               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0067, t01=0x002e}
0xa0fe…a126               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x0067, t01=0x0042}
0xa126…a138               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0067, t01=0x006a}
0xa138…a142               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x007c}
0xa142…a158               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x0067, t01=0x0086}
0xa158…a162               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x009c}
0xa162…a176               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x0067, t01=0x00a6}
0xa176…a19e               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x0067, t01=0x00ba}
0xa19e…a1c2               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x0067, t01=0x00e2}
0xa1c2…a1f8               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x0067, t01=0x0106}
0xa1f8…a20c               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0067, t01=0x013c}
0xa20c…a220               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0067, t01=0x0150}
0xa220…a240               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x0067, t01=0x0164}
0xa240…a24c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0067, t01=0x0184}
0xa24c…a260               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0067, t01=0x0190}
0xa260…a28a               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x0068, t01=0x0014}
0xa28a…a2aa               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x0068, t01=0x003e}
0xa2aa…a2b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0068, t01=0x005e}
0xa2b6…a2ca               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x0068, t01=0x006a}
0xa2ca…a2f4               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x0068, t01=0x007e}
0xa2f4…a308               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x0068, t01=0x00a8}
0xa308…a330               Head {h00=0x0024, h01=0x0050, text=» LDR A7,A3 SAVE RESULT REGISTER «, t00=0x0068, t01=0x00bc}
0xa330…a350               Head {h00=0x001c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT«, t00=0x0068, t01=0x00e4}
0xa350…a364               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0068, t01=0x0104}
0xa364…a38a               Head {h00=0x0022, h01=0x0050, text=» ORR A7,A1 PARITY ERROR SALCUZ«, t00=0x0068, t01=0x0118}
0xa38a…a3a0               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0068, t01=0x013e}
0xa3a0…a3b0               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0068, t01=0x0154}
0xa3b0…a3ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0164}
0xa3ba…a3d0               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x0068, t01=0x016e}
0xa3d0…a3da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0184}
0xa3da…a3ee               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x0068, t01=0x018e}
0xa3ee…a400               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0069, t01=0x0012}
0xa400…a426               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x0069, t01=0x0024}
0xa426…a44c               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x0069, t01=0x004a}
0xa44c…a45e               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x0069, t01=0x0070}
0xa45e…a468               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0082}
0xa468…a47e               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x0069, t01=0x008c}
0xa47e…a488               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00a2}
0xa488…a49c               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x0069, t01=0x00ac}
0xa49c…a4b0               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0069, t01=0x00c0}
0xa4b0…a4c4               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x0069, t01=0x00d4}
0xa4c4…a4ea               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x0069, t01=0x00e8}
0xa4ea…a4f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0069, t01=0x010e}
0xa4f6…a50a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0069, t01=0x011a}
0xa50a…a534               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x0069, t01=0x012e}
0xa534…a55a               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x0069, t01=0x0158}
0xa55a…a566               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0069, t01=0x017e}
0xa566…a578               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x0069, t01=0x018a}
0xa578…a586               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006a, t01=0x000c}
0xa586…a590               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x001a}
0xa590…a5ae               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x006a, t01=0x0024}
0xa5ae…a5b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0042}
0xa5b8…a5ce               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x006a, t01=0x004c}
0xa5ce…a5f0               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x006a, t01=0x0062}
0xa5f0…a61a               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x006a, t01=0x0084}
0xa61a…a630               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x006a, t01=0x00ae}
0xa630…a64e               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x006a, t01=0x00c4}
0xa64e…a660               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006a, t01=0x00e2}
0xa660…a66a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x00f4}
0xa66a…a682               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x006a, t01=0x00fe}
0xa682…a68c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0116}
0xa68c…a6b0               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x006a, t01=0x0120}
0xa6b0…a6c2               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x006a, t01=0x0144}
0xa6c2…a6cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0156}
0xa6cc…a6e2               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x006a, t01=0x0160}
0xa6e2…a6ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0176}
0xa6ec…a700               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x006a, t01=0x0180}
0xa700…a722 (107, 0, 400) Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x006b, t01=0x0004}
0xa722…a72e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x0026}
0xa72e…a738               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0032}
0xa738…a74e               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x006b, t01=0x003c}
0xa74e…a758               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0052}
0xa758…a77a               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x006b, t01=0x005c}
0xa77a…a7a0               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x006b, t01=0x007e}
0xa7a0…a7b8               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x006b, t01=0x00a4}
0xa7b8…a7ca               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x006b, t01=0x00bc}
0xa7ca…a7d8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006b, t01=0x00ce}
0xa7d8…a7e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00dc}
0xa7e2…a7f8               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x006b, t01=0x00e6}
0xa7f8…a802               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00fc}
0xa802…a824               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x006b, t01=0x0106}
0xa824…a836               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x006b, t01=0x0128}
0xa836…a840               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x013a}
0xa840…a856               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x006b, t01=0x0144}
0xa856…a860               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x015a}
0xa860…a882               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x006b, t01=0x0164}
0xa882…a894               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x006b, t01=0x0186}
0xa894…a89e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0008}
0xa89e…a8b4               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x006c, t01=0x0012}
0xa8b4…a8be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0028}
0xa8be…a8e0               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x006c, t01=0x0032}
0xa8e0…a8ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0054}
0xa8ea…a916               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x006c, t01=0x005e}
0xa916…a92a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x006c, t01=0x008a}
0xa92a…a942               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x006c, t01=0x009e}
0xa942…a96a               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x006c, t01=0x00b6}
0xa96a…a994               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x006c, t01=0x00de}
0xa994…a9b2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x006c, t01=0x0108}
0xa9b2…a9dc               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x006c, t01=0x0126}
0xa9dc…a9fa               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x006c, t01=0x0150}
0xa9fa…aa14               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x006c, t01=0x016e}
0xaa14…aa32               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x006c, t01=0x0188}
0xaa32…aa46               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x006d, t01=0x0016}
0xaa46…aa5c               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x006d, t01=0x002a}
0xaa5c…aa76               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x006d, t01=0x0040}
0xaa76…aa9e               Head {h00=0x0024, h01=0x0050, text=» CIO A2,0,LCUUT STOP TRANSMITTER«, t00=0x006d, t01=0x005a}
0xaa9e…aaba               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x006d, t01=0x0082}
0xaaba…aae2               Head {h00=0x0024, h01=0x0050, text=» CF A5,READ WAIT FOR END SALCUZ «, t00=0x006d, t01=0x009e}
0xaae2…aaf8               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x006d, t01=0x00c6}
0xaaf8…ab22               Head {h00=0x0026, h01=0x0050, text=» SST A2,LCUUT PERFORM SST AT ONCE «, t00=0x006d, t01=0x00dc}
0xab22…ab36               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x006d, t01=0x0106}
0xab36…ab62               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x006d, t01=0x011a}
0xab62…ab6e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x0146}
0xab6e…ab7e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006d, t01=0x0152}
0xab7e…ab8c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006d, t01=0x0162}
0xab8c…ab96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0170}
0xab96…aba0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x017a}
0xaba0…abc2               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x006d, t01=0x0184}
0xabc2…abcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0016}
0xabcc…abd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0020}
0xabd6…abea               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x006e, t01=0x002a}
0xabea…ac0c               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x006e, t01=0x003e}
0xac0c…ac22               Head {h00=0x0012, h01=0x0050, text=» IFT TSTREQ=1 «, t00=0x006e, t01=0x0060}
0xac22…ac2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0076}
0xac2c…ac36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0080}
0xac36…ac56               Head {h00=0x001c, h01=0x0050, text=»* TEST REQUEST HANDLING «, t00=0x006e, t01=0x008a}
0xac56…ac60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00aa}
0xac60…ac6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00b4}
0xac6a…ac7e               Head {h00=0x0010, h01=0x0050, text=» LD A4,FBAX «, t00=0x006e, t01=0x00be}
0xac7e…acaa               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TRT050 NOT START OF MESSAGE «, t00=0x006e, t01=0x00d2}
0xacaa…acb2               Head {h00=0x0004, h01=0x0050, t00=0x006e, t01=0x00fe}
0xacb2…ace8               Head {h00=0x0032, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? «, t00=0x006e, t01=0x0106}
0xace8…ad06               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) TRT050 YES !! «, t00=0x006e, t01=0x013c}
0xad06…ad0e               Head {h00=0x0004, h01=0x0050, t00=0x006e, t01=0x015a}
0xad0e…ad24               Head {h00=0x0012, h01=0x0050, text=» LD A4,FECBBA «, t00=0x006e, t01=0x0162}
0xad24…ad4a               Head {h00=0x0022, h01=0x0050, text=» LC A3,+2,A4 GET AID CHARACTER«, t00=0x006e, t01=0x0178}
0xad4a…ad5e               Head {h00=0x0010, h01=0x0050, text=» SUK A3,/30 «, t00=0x006f, t01=0x000e}
0xad5e…ad86               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TRT050 NOT TEST REQUEST «, t00=0x006f, t01=0x0022}
0xad86…ad9a               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x006f, t01=0x004a}
0xad9a…adb8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x006f, t01=0x005e}
0xadb8…add4               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET BCC «, t00=0x006f, t01=0x007c}
0xadd4…ade8               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x006f, t01=0x0098}
0xade8…ae04               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND % «, t00=0x006f, t01=0x00ac}
0xae04…ae18               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'/' «, t00=0x006f, t01=0x00c8}
0xae18…ae34               Head {h00=0x0018, h01=0x0050, text=» CF A5,WRITE SEND / «, t00=0x006f, t01=0x00dc}
0xae34…ae48               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x006f, t01=0x00f8}
0xae48…ae66               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x006f, t01=0x010c}
0xae66…ae92               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x006f, t01=0x012a}
0xae92…aebe               Head {h00=0x0028, h01=0x0050, text=» ADK A4,5 SKIP AID + CURSOR ADDRESS «, t00=0x006f, t01=0x0156}
0xaebe…aede               Head {h00=0x001c, h01=0x0050, text=» LDK A3,5 ADJUST LENGTH «, t00=0x006f, t01=0x0182}
0xaede…aef0               Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x0070, t01=0x0012}
0xaef0…af04               Head {h00=0x0010, h01=0x0050, text=» ST A2,FBAX «, t00=0x0070, t01=0x0024}
0xaf04…af16               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0070, t01=0x0038}
0xaf16…af2a               Head {h00=0x0010, h01=0x0050, text=»TRT050 EQU *«, t00=0x0070, t01=0x004a}
0xaf2a…af34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x005e}
0xaf34…af3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0068}
0xaf3e…af48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0072}
0xaf48…af54               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x007c}
0xaf54…af68               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0070, t01=0x0088}
0xaf68…af86               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x0070, t01=0x009c}
0xaf86…afa2               Head {h00=0x0018, h01=0x0050, text=» LDK A7,0 RESET LRC «, t00=0x0070, t01=0x00ba}
0xafa2…afca               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x0070, t01=0x00d6}
0xafca…afee               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x0070, t01=0x00fe}
0xafee…b01a               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x0070, t01=0x0122}
0xb01a…b046               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x0070, t01=0x014e}
0xb046…b070               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x0070, t01=0x017a}
0xb070…b094               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x0071, t01=0x0014}
0xb094…b0ba               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x0071, t01=0x0038}
0xb0ba…b0da               Head {h00=0x001c, h01=0x0050, text=» LC A2,DW1500+1 GET TCA «, t00=0x0071, t01=0x005e}
0xb0da…b0f8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x0071, t01=0x007e}
0xb0f8…b114               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0071, t01=0x009c}
0xb114…b132               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x0071, t01=0x00b8}
0xb132…b148               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x0071, t01=0x00d6}
0xb148…b15c               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x0071, t01=0x00ec}
0xb15c…b182               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x0071, t01=0x0100}
0xb182…b198               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0071, t01=0x0126}
0xb198…b1be               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x0071, t01=0x013c}
0xb1be…b1d4               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0071, t01=0x0162}
0xb1d4…b1e8               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x0071, t01=0x0178}
0xb1e8…b1fe               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x0071, t01=0x018c}
0xb1fe…b20a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x0012}
0xb20a…b21e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0072, t01=0x001e}
0xb21e…b226               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x0032}
0xb226…b250               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0072, t01=0x003a}
0xb250…b26a               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x0072, t01=0x0064}
0xb26a…b272               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x007e}
0xb272…b292               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x0072, t01=0x0086}
0xb292…b2b8               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x0072, t01=0x00a6}
0xb2b8…b2dc               Head {h00=0x0020, h01=0x0050, text=»TRT060 CF A5,WRITEP SEND AID«, t00=0x0072, t01=0x00cc}
0xb2dc…b2e4               Head {h00=0x0004, h01=0x0050, t00=0x0072, t01=0x00f0}
0xb2e4…b30c               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x0072, t01=0x00f8}
0xb30c…b33e               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x0072, t01=0x0120}
0xb33e…b360               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x0072, t01=0x0152}
0xb360…b372               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x0072, t01=0x0174}
0xb372…b386               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x0072, t01=0x0186}
0xb386…b392               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x000a}
0xb392…b39a               Head {h00=0x0004, h01=0x0050, t00=0x0073, t01=0x0016}
0xb39a…b3ac               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0073, t01=0x001e}
0xb3ac…b3c0               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x0073, t01=0x0030}
0xb3c0…b3e4               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x0073, t01=0x0044}
0xb3e4…b408               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x0073, t01=0x0068}
0xb408…b41c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0073, t01=0x008c}
0xb41c…b430               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0073, t01=0x00a0}
0xb430…b45a               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x0073, t01=0x00b4}
0xb45a…b474               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x0073, t01=0x00de}
0xb474…b47c               Head {h00=0x0004, h01=0x0050, t00=0x0073, t01=0x00f8}
0xb47c…b4c0               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0073, t01=0x0100}
0xb4c0…b4ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0144}
0xb4ca…b4fa               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x0073, t01=0x014e}
0xb4fa…b504               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x017e}
0xb504…b53c               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0073, t01=0x0188}
0xb53c…b544               Head {h00=0x0004, h01=0x0050, t00=0x0074, t01=0x0030}
0xb544…b56e               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x0074, t01=0x0038}
0xb56e…b58a               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x0074, t01=0x0062}
0xb58a…b596               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x007e}
0xb596…b5aa               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x0074, t01=0x008a}
0xb5aa…b5ca               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x0074, t01=0x009e}
0xb5ca…b5f0               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x0074, t01=0x00be}
0xb5f0…b604               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x0074, t01=0x00e4}
0xb604…b618               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x0074, t01=0x00f8}
0xb618…b63c               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x0074, t01=0x010c}
0xb63c…b662               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x0074, t01=0x0130}
0xb662…b676               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x0074, t01=0x0156}
0xb676…b68a               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x0074, t01=0x016a}
0xb68a…b6a8               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x0074, t01=0x017e}
0xb6a8…b6be               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x0075, t01=0x000c}
0xb6be…b6d0               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0075, t01=0x0022}
0xb6d0…b6dc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x0034}
0xb6dc…b6f0               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0075, t01=0x0040}
0xb6f0…b702               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x0075, t01=0x0054}
0xb702…b70a               Head {h00=0x0004, h01=0x0050, t00=0x0075, t01=0x0066}
0xb70a…b71e               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x0075, t01=0x006e}
0xb71e…b726               Head {h00=0x0004, h01=0x0050, t00=0x0075, t01=0x0082}
0xb726…b738               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x0075, t01=0x008a}
0xb738…b75e               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x0075, t01=0x009c}
0xb75e…b766               Head {h00=0x0004, h01=0x0050, t00=0x0075, t01=0x00c2}
0xb766…b792               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x0075, t01=0x00ca}
0xb792…b7a8               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x0075, t01=0x00f6}
0xb7a8…b7d4               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x0075, t01=0x010c}
0xb7d4…b7e6               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0075, t01=0x0138}
0xb7e6…b7fe               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x0075, t01=0x014a}
0xb7fe…b810               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0075, t01=0x0162}
0xb810…b83a               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x0075, t01=0x0174}
0xb83a…b860               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x0076, t01=0x000e}
0xb860…b878               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x0076, t01=0x0034}
0xb878…b8a2               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x0076, t01=0x004c}
0xb8a2…b8b8               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x0076, t01=0x0076}
0xb8b8…b8cc               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x0076, t01=0x008c}
0xb8cc…b8e0               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x0076, t01=0x00a0}
0xb8e0…b904               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x0076, t01=0x00b4}
0xb904…b916               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0076, t01=0x00d8}
0xb916…b928               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x0076, t01=0x00ea}
0xb928…b93c               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x0076, t01=0x00fc}
0xb93c…b948               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x0110}
0xb948…b956               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0076, t01=0x011c}
0xb956…b96a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x0076, t01=0x012a}
0xb96a…b996               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x0076, t01=0x013e}
0xb996…b9ba               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x0076, t01=0x016a}
0xb9ba…b9ce               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x0076, t01=0x018e}
0xb9ce…b9f6               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x0077, t01=0x0012}
0xb9f6…ba20               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x0077, t01=0x003a}
0xba20…ba34               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x0077, t01=0x0064}
0xba34…ba5a               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x0077, t01=0x0078}
0xba5a…ba88               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x0077, t01=0x009e}
0xba88…ba9e               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x0077, t01=0x00cc}
0xba9e…bac2               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x0077, t01=0x00e2}
0xbac2…bad6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0077, t01=0x0106}
0xbad6…bb06               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x0077, t01=0x011a}
0xbb06…bb1a               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x0077, t01=0x014a}
0xbb1a…bb34               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x0077, t01=0x015e}
0xbb34…bb48               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x0077, t01=0x0178}
0xbb48…bb6a               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x0077, t01=0x018c}
0xbb6a…bb96               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x0078, t01=0x001e}
0xbb96…bbb8               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x0078, t01=0x004a}
0xbbb8…bbd6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0078, t01=0x006c}
0xbbd6…bbf6               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x0078, t01=0x008a}
0xbbf6…bc28               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x0078, t01=0x00aa}
0xbc28…bc46               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0078, t01=0x00dc}
0xbc46…bc66               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x0078, t01=0x00fa}
0xbc66…bc72               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x011a}
0xbc72…bc86               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x0078, t01=0x0126}
0xbc86…bca2               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x0078, t01=0x013a}
0xbca2…bcb6               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x0078, t01=0x0156}
0xbcb6…bcd4               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x0078, t01=0x016a}
0xbcd4…bce8               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0078, t01=0x0188}
0xbce8…bd02               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A7 GET LRC«, t00=0x0079, t01=0x000c}
0xbd02…bd20               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x0079, t01=0x0026}
0xbd20…bd2c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0044}
0xbd2c…bd40               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0079, t01=0x0050}
0xbd40…bd64               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A7 SAVE CURRENT CRC «, t00=0x0079, t01=0x0064}
0xbd64…bd76               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0079, t01=0x0088}
0xbd76…bd8a               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0079, t01=0x009a}
0xbd8a…bdb0               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x0079, t01=0x00ae}
0xbdb0…bdc2               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A8«, t00=0x0079, t01=0x00d4}
0xbdc2…bdd6               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0079, t01=0x00e6}
0xbdd6…bdfc               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x0079, t01=0x00fa}
0xbdfc…be08               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0120}
0xbe08…be28               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x0079, t01=0x012c}
0xbe28…be3c               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x0079, t01=0x014c}
0xbe3c…be60               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x0079, t01=0x0160}
0xbe60…be74               Head {h00=0x0010, h01=0x0050, text=»TRT140 EQU *«, t00=0x0079, t01=0x0184}
0xbe74…be90               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x007a, t01=0x0008}
0xbe90…beb4               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x007a, t01=0x0024}
0xbeb4…bec2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007a, t01=0x0048}
0xbec2…becc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0056}
0xbecc…bed6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0060}
0xbed6…bef8               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x007a, t01=0x006a}
0xbef8…bf02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x008c}
0xbf02…bf0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0096}
0xbf0c…bf20               Head {h00=0x0010, h01=0x0050, text=» IFF STAT=0 «, t00=0x007a, t01=0x00a0}
0xbf20…bf34               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x007a, t01=0x00b4}
0xbf34…bf5c               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x007a, t01=0x00c8}
0xbf5c…bf7a               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x007a, t01=0x00f0}
0xbf7a…bf9c               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x007a, t01=0x010e}
0xbf9c…bfb0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x007a, t01=0x0130}
0xbfb0…bfce               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x007a, t01=0x0144}
0xbfce…bfe8               Head {h00=0x0016, h01=0x0050, text=» LDK A7,0 REST LRC«, t00=0x007a, t01=0x0162}
0xbfe8…bffc               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x007a, t01=0x017c}
0xbffc…c01a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x007a, t01=0x0190}
0xc01a…c02e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x007b, t01=0x001e}
0xc02e…c04c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x007b, t01=0x0032}
0xc04c…c060               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x007b, t01=0x0050}
0xc060…c07e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x007b, t01=0x0064}
0xc07e…c096               Head {h00=0x0014, h01=0x0050, text=» LC A2,DW1500+1 «, t00=0x007b, t01=0x0082}
0xc096…c0b4               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x007b, t01=0x009a}
0xc0b4…c0c8               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A6 «, t00=0x007b, t01=0x00b8}
0xc0c8…c0e6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x007b, t01=0x00cc}
0xc0e6…c108               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x007b, t01=0x00ea}
0xc108…c12a               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x007b, t01=0x010c}
0xc12a…c13c               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x007b, t01=0x012e}
0xc13c…c164               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x007b, t01=0x0140}
0xc164…c184               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x007b, t01=0x0168}
0xc184…c1a6               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x007b, t01=0x0188}
0xc1a6…c1c8               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x007c, t01=0x001a}
0xc1c8…c1da               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x007c, t01=0x003c}
0xc1da…c1f8               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x007c, t01=0x004e}
0xc1f8…c20a               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x007c, t01=0x006c}
0xc20a…c22c               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x007c, t01=0x007e}
0xc22c…c23e               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x007c, t01=0x00a0}
0xc23e…c252               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x007c, t01=0x00b2}
0xc252…c272               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x007c, t01=0x00c6}
0xc272…c296               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x007c, t01=0x00e6}
0xc296…c2a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x010a}
0xc2a2…c2b0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007c, t01=0x0116}
0xc2b0…c2ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0124}
0xc2ba…c2c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x012e}
0xc2c4…c2e4               Head {h00=0x001c, h01=0x0050, text=»* TRANSMIT SYNC SEQUENCE«, t00=0x007c, t01=0x0138}
0xc2e4…c2ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0158}
0xc2ee…c2f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0162}
0xc2f8…c30c               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x007c, t01=0x016c}
0xc30c…c326               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x007c, t01=0x0180}
0xc326…c354               Head {h00=0x002a, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT IF NOT DONE«, t00=0x007d, t01=0x000a}
0xc354…c376               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN PERFORM SST «, t00=0x007d, t01=0x0038}
0xc376…c392               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x007d, t01=0x005a}
0xc392…c3bc               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x007d, t01=0x0076}
0xc3bc…c3d2               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007d, t01=0x00a0}
0xc3d2…c3ee               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x007d, t01=0x00b6}
0xc3ee…c40a               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=1  SALCUZ «, t00=0x007d, t01=0x00d2}
0xc40a…c424               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0  SALCUZ «, t00=0x007d, t01=0x00ee}
0xc424…c454               Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER SALCUZ«, t00=0x007d, t01=0x0108}
0xc454…c472               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x007d, t01=0x0138}
0xc472…c490               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x007d, t01=0x0156}
0xc490…c4ae               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x007d, t01=0x0174}
0xc4ae…c4c6 (126, 0, 398) Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x007e, t01=0x0004}
0xc4c6…c4ec               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x007e, t01=0x001c}
0xc4ec…c508               Head {h00=0x0018, h01=0x0050, text=»TRS010 EQU *  SALCUZ«, t00=0x007e, t01=0x0042}
0xc508…c526               Head {h00=0x001a, h01=0x0050, text=» LDK A2,SYNEBC  SALCUZ«, t00=0x007e, t01=0x005e}
0xc526…c55c               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x007e, t01=0x007c}
0xc55c…c572               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007e, t01=0x00b2}
0xc572…c58e               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x007e, t01=0x00c8}
0xc58e…c5aa               Head {h00=0x0018, h01=0x0050, text=» IFT CODE=0  SALCUZ «, t00=0x007e, t01=0x00e4}
0xc5aa…c5c6               Head {h00=0x0018, h01=0x0050, text=» LDK A2,/0C  SALCUZ «, t00=0x007e, t01=0x0100}
0xc5c6…c5e6               Head {h00=0x001c, h01=0x0050, text=» CIO A2,1,LCUUT  SALCUZ «, t00=0x007e, t01=0x011c}
0xc5e6…c604               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS010  SALCUZ «, t00=0x007e, t01=0x013c}
0xc604…c622               Head {h00=0x001a, h01=0x0050, text=» SST A1,LCUUT  SALCUZ «, t00=0x007e, t01=0x015a}
0xc622…c640               Head {h00=0x001a, h01=0x0050, text=» RF(A) TRS005  SALCUZ «, t00=0x007e, t01=0x0178}
0xc640…c658               Head {h00=0x0014, h01=0x0050, text=» ABL BRM  SALCUZ«, t00=0x007f, t01=0x0008}
0xc658…c67e               Head {h00=0x0022, h01=0x0050, text=»TRS005 CIO A2,1,LCUUT  SALCUZ «, t00=0x007f, t01=0x0020}
0xc67e…c692               Head {h00=0x0010, h01=0x0050, text=»TRS010 EQU *«, t00=0x007f, t01=0x0046}
0xc692…c6ae               Head {h00=0x0018, h01=0x0050, text=» LDK A2,SYN  SALCUZ «, t00=0x007f, t01=0x005a}
0xc6ae…c6e4               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ «, t00=0x007f, t01=0x0076}
0xc6e4…c6fa               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x007f, t01=0x00ac}
0xc6fa…c728               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x007f, t01=0x00c2}
0xc728…c740               Head {h00=0x0014, h01=0x0050, text=» LDK A3,4 4 SYNS«, t00=0x007f, t01=0x00f0}
0xc740…c75a               Head {h00=0x0016, h01=0x0050, text=»TRS100 LDK A2,SYN «, t00=0x007f, t01=0x0108}
0xc75a…c778               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SYN «, t00=0x007f, t01=0x0122}
0xc778…c78a               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x007f, t01=0x0140}
0xc78a…c7a0               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x007f, t01=0x0152}
0xc7a0…c7b0               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007f, t01=0x0168}
0xc7b0…c7be               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007f, t01=0x0178}
0xc7be…c7c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0186}
0xc7c8…c7d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0190}
0xc7d2…c7f0               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x0080, t01=0x000a}
0xc7f0…c7fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0028}
0xc7fa…c804               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0032}
0xc804…c818               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x0080, t01=0x003c}
0xc818…c82c               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0080, t01=0x0050}
0xc82c…c84c               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0080, t01=0x0064}
0xc84c…c87a               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0080, t01=0x0084}
0xc87a…c89c               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x0080, t01=0x00b2}
0xc89c…c8cc               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x0080, t01=0x00d4}
0xc8cc…c8e0               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0080, t01=0x0104}
0xc8e0…c90c               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x0080, t01=0x0118}
0xc90c…c918               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x0144}
0xc918…c92c               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0080, t01=0x0150}
0xc92c…c93e               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0080, t01=0x0164}
0xc93e…c954               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) IHLCI2«, t00=0x0080, t01=0x0176}
0xc954…c972               Head {h00=0x001a, h01=0x0050, text=» CWK A2,SYN SKIP SYNS «, t00=0x0080, t01=0x018c}
0xc972…c986               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x0081, t01=0x001a}
0xc986…c9ac               Head {h00=0x0022, h01=0x0050, text=»IHLCI2 XRR A7,A2 CALCULATE LRC«, t00=0x0081, t01=0x002e}
0xc9ac…c9b8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x0054}
0xc9b8…c9cc               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0081, t01=0x0060}
0xc9cc…c9de               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x0081, t01=0x0074}
0xc9de…ca14               Head {h00=0x0032, h01=0x0050, text=» RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME «, t00=0x0081, t01=0x0086}
0xca14…ca2a               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x0081, t01=0x00bc}
0xca2a…ca4e               Head {h00=0x0020, h01=0x0050, text=» RF(E) READ SKIP EBCDIC SYN «, t00=0x0081, t01=0x00d2}
0xca4e…ca62               Head {h00=0x0010, h01=0x0050, text=»IHLCI1 EQU *«, t00=0x0081, t01=0x00f6}
0xca62…ca86               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x0081, t01=0x010a}
0xca86…cab2               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x0081, t01=0x012e}
0xcab2…cabe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x015a}
0xcabe…cad4               Head {h00=0x0012, h01=0x0050, text=»IHIN10 RTN A5 «, t00=0x0081, t01=0x0166}
0xcad4…caf0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0081, t01=0x017c}
0xcaf0…cb14               Head {h00=0x0020, h01=0x0050, text=»IHIN20 CF A5,SST PERFORM SST«, t00=0x0082, t01=0x0008}
0xcb14…cb24               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0082, t01=0x002c}
0xcb24…cb3a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0082, t01=0x003c}
0xcb3a…cb56               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0082, t01=0x0052}
0xcb56…cb7e               Head {h00=0x0024, h01=0x0050, text=»IHIN20 RF SST PERFORM SST SALCUZ«, t00=0x0082, t01=0x006e}
0xcb7e…cb94               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0082, t01=0x0096}
0xcb94…cba2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0082, t01=0x00ac}
0xcba2…cbac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00ba}
0xcbac…cbb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00c4}
0xcbb6…cbd8               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x0082, t01=0x00ce}
0xcbd8…cbe2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00f0}
0xcbe2…cbec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00fa}
0xcbec…cc00               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x0082, t01=0x0104}
0xcc00…cc14               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x0082, t01=0x0118}
0xcc14…cc36               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x0082, t01=0x012c}
0xcc36…cc64               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x0082, t01=0x014e}
0xcc64…cc76               Head {h00=0x000e, h01=0x0050, text=» RB IHIN10«, t00=0x0082, t01=0x017c}
0xcc76…cc84               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0082, t01=0x018e}
0xcc84…cc8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x000c}
0xcc8e…cc98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0016}
0xcc98…ccc2               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x0083, t01=0x0020}
0xccc2…cccc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x004a}
0xcccc…ccf8               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x0083, t01=0x0054}
0xccf8…cd2a               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x0083, t01=0x0080}
0xcd2a…cd5a               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x0083, t01=0x00b2}
0xcd5a…cd8a               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x0083, t01=0x00e2}
0xcd8a…cd94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0112}
0xcd94…cdac               Head {h00=0x0014, h01=0x0050, text=»SST SST A1,LCUIN«, t00=0x0083, t01=0x011c}
0xcdac…cdc8               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0083, t01=0x0134}
0xcdc8…cdfe               Head {h00=0x0032, h01=0x0050, text=» RF(NA) SST200 ALREADY INACTIVE SALCUZ  SALCUZ«, t00=0x0083, t01=0x0150}
0xcdfe…ce14               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0083, t01=0x0186}
0xce14…ce26               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0084, t01=0x000c}
0xce26…ce3a               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0084, t01=0x001e}
0xce3a…ce64               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOG SST INFORMATION «, t00=0x0084, t01=0x0032}
0xce64…ce70               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x005c}
0xce70…ce8c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0084, t01=0x0068}
0xce8c…ce9e               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0084, t01=0x0084}
0xce9e…ceb4               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST100 «, t00=0x0084, t01=0x0096}
0xceb4…ceca               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0084, t01=0x00ac}
0xceca…cee6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0084, t01=0x00c2}
0xcee6…cf00               Head {h00=0x0016, h01=0x0050, text=» ANK A2,6  SALCUZ «, t00=0x0084, t01=0x00de}
0xcf00…cf1e               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST100  SALCUZ «, t00=0x0084, t01=0x00f8}
0xcf1e…cf38               Head {h00=0x0016, h01=0x0050, text=» ANK A2,2  SALCUZ «, t00=0x0084, t01=0x0116}
0xcf38…cf62               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) SST050 THROUGH PUT SALCUZ «, t00=0x0084, t01=0x0130}
0xcf62…cf8c               Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 SET PARITY ERROR SALCUZ «, t00=0x0084, t01=0x015a}
0xcf8c…cfa6               Head {h00=0x0016, h01=0x0050, text=» RF SSTRET  SALCUZ«, t00=0x0084, t01=0x0184}
0xcfa6…cfbc               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0085, t01=0x000e}
0xcfbc…cfd8               Head {h00=0x0018, h01=0x0050, text=»SST050 EQU *  SALCUZ«, t00=0x0085, t01=0x0024}
0xcfd8…cff8               Head {h00=0x001c, h01=0x0050, text=» CM XSTA TROUHHPUT ERROR«, t00=0x0085, t01=0x0040}
0xcff8…d00c               Head {h00=0x0010, h01=0x0050, text=» LDKL A5,STB«, t00=0x0085, t01=0x0060}
0xd00c…d020               Head {h00=0x0010, h01=0x0050, text=» ABL BRM010 «, t00=0x0085, t01=0x0074}
0xd020…d034               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x0085, t01=0x0088}
0xd034…d04a               Head {h00=0x0012, h01=0x0050, text=» ST A1,DCSTCU «, t00=0x0085, t01=0x009c}
0xd04a…d066               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0085, t01=0x00b2}
0xd066…d094               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0085, t01=0x00ce}
0xd094…d0a4               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0085, t01=0x00fc}
0xd0a4…d0ba               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0085, t01=0x010c}
0xd0ba…d0d6               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0085, t01=0x0122}
0xd0d6…d0f2               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/21  SALCUZ «, t00=0x0085, t01=0x013e}
0xd0f2…d110               Head {h00=0x001a, h01=0x0050, text=» RF(Z) SST200 LSALCUZ «, t00=0x0085, t01=0x015a}
0xd110…d14a               Head {h00=0x0036, h01=0x0050, text=» CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ«, t00=0x0085, t01=0x0178}
0xd14a…d16a               Head {h00=0x001c, h01=0x0050, text=» DATA BRM RESTART SALCUZ«, t00=0x0086, t01=0x0022}
0xd16a…d18a               Head {h00=0x001c, h01=0x0050, text=» DATA 2 WAIT TIME SALCUZ«, t00=0x0086, t01=0x0042}
0xd18a…d1a2               Head {h00=0x0014, h01=0x0050, text=» RF READ  SALCUZ«, t00=0x0086, t01=0x0062}
0xd1a2…d1ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x007a}
0xd1ac…d1cc               Head {h00=0x001c, h01=0x0050, text=»SST200 LDK A1,0  SALCUZ «, t00=0x0086, t01=0x0084}
0xd1cc…d1ec               Head {h00=0x001c, h01=0x0050, text=»SSTRET ADK A5,4  SALCUZ «, t00=0x0086, t01=0x00a4}
0xd1ec…d20c               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 SET CR SALCUZ«, t00=0x0086, t01=0x00c4}
0xd20c…d22a               Head {h00=0x001a, h01=0x0050, text=» ABR* A5 RETURN SALCUZ«, t00=0x0086, t01=0x00e4}
0xd22a…d240               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0086, t01=0x0102}
0xd240…d24a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0118}
0xd24a…d254               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0122}
0xd254…d268               Head {h00=0x0010, h01=0x0050, text=»* HALT INPUT«, t00=0x0086, t01=0x012c}
0xd268…d272               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0140}
0xd272…d27c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x014a}
0xd27c…d29c               Head {h00=0x001c, h01=0x0050, text=»HALTIN LDK A1,0  SALCUZ «, t00=0x0086, t01=0x0154}
0xd29c…d2b4               Head {h00=0x0014, h01=0x0050, text=» CIO A1,0,LCUIN «, t00=0x0086, t01=0x0174}
0xd2b4…d2d0               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0086, t01=0x018c}
0xd2d0…d308               Head {h00=0x0034, h01=0x0050, text=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK«, t00=0x0087, t01=0x0018}
0xd308…d31e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0087, t01=0x0050}
0xd31e…d33a               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=1  SALCUZ«, t00=0x0087, t01=0x0066}
0xd33a…d368               Head {h00=0x002a, h01=0x0050, text=» RF READ WAIT FOR SST INTERRUPT SALCUZ«, t00=0x0087, t01=0x0082}
0xd368…d37e               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0087, t01=0x00b0}
0xd37e…d38c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0087, t01=0x00c6}
0xd38c…d396               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00d4}
0xd396…d3a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00de}
0xd3a0…d3d0               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x0087, t01=0x00e8}
0xd3d0…d3da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0118}
0xd3da…d3e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0122}
0xd3e4…d3f8               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0087, t01=0x012c}
0xd3f8…d40c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0087, t01=0x0140}
0xd40c…d420               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0087, t01=0x0154}
0xd420…d434               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0087, t01=0x0168}
0xd434…d468               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x0087, t01=0x017c}
0xd468…d496               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x0088, t01=0x0020}
0xd496…d4a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x004e}
0xd4a2…d4b6               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x0088, t01=0x005a}
0xd4b6…d4dc               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x0088, t01=0x006e}
0xd4dc…d4f2               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x0088, t01=0x0094}
0xd4f2…d514               Head {h00=0x001e, h01=0x0050, text=» RF READ THROUGHPUT ERROR «, t00=0x0088, t01=0x00aa}
0xd514…d528               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x0088, t01=0x00cc}
0xd528…d550               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A7,A2 ACCUMULATE BCC «, t00=0x0088, t01=0x00e0}
0xd550…d55c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x0108}
0xd55c…d570               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0088, t01=0x0114}
0xd570…d59a               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x0088, t01=0x0128}
0xd59a…d5a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x0152}
0xd5a6…d5ba               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x0088, t01=0x015e}
0xd5ba…d5e4               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x0088, t01=0x0172}
0xd5e4…d5f0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x000c}
0xd5f0…d5fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0018}
0xd5fa…d614               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x0089, t01=0x0022}
0xd614…d626               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0089, t01=0x003c}
0xd626…d634               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0089, t01=0x004e}
0xd634…d63e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x005c}
0xd63e…d648               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0066}
0xd648…d65a               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x0089, t01=0x0070}
0xd65a…d664               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0082}
0xd664…d684               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x0089, t01=0x008c}
0xd684…d68e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00ac}
0xd68e…d698               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00b6}
0xd698…d6ba               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x0089, t01=0x00c0}
0xd6ba…d6d4               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x0089, t01=0x00e2}
0xd6d4…d6e6               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0089, t01=0x00fc}
0xd6e6…d6fa               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x0089, t01=0x010e}
0xd6fa…d712               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x0089, t01=0x0122}
0xd712…d728               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x0089, t01=0x013a}
0xd728…d742               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x0089, t01=0x0150}
0xd742…d756               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x0089, t01=0x016a}
0xd756…d768               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x0089, t01=0x017e}
0xd768…d774               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x0190}
0xd774…d796               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008a, t01=0x000c}
0xd796…d7ae               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x008a, t01=0x002e}
0xd7ae…d7ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x0046}
0xd7ba…d7c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0052}
0xd7c4…d7ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x005c}
0xd7ce…d7d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0066}
0xd7d8…d7ea               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x008a, t01=0x0070}
0xd7ea…d7f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0082}
0xd7f4…d826               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x008a, t01=0x008c}
0xd826…d830               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x00be}
0xd830…d83a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x00c8}
0xd83a…d852               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x008a, t01=0x00d2}
0xd852…d874               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x008a, t01=0x00ea}
0xd874…d886               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x008a, t01=0x010c}
0xd886…d89c               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x008a, t01=0x011e}
0xd89c…d8b0               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x008a, t01=0x0134}
0xd8b0…d8c6               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x008a, t01=0x0148}
0xd8c6…d8da               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x008a, t01=0x015e}
0xd8da…d8ec               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x008a, t01=0x0172}
0xd8ec…d904               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x008a, t01=0x0184}
0xd904…d918               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x008b, t01=0x000c}
0xd918…d924               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x0020}
0xd924…d946               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x008b, t01=0x002c}
0xd946…d95a               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x008b, t01=0x004e}
0xd95a…d966               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x0062}
0xd966…d978               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x008b, t01=0x006e}
0xd978…d98c               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x008b, t01=0x0080}
0xd98c…d9a0               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x008b, t01=0x0094}
0xd9a0…d9b0               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x008b, t01=0x00a8}
0xd9b0…d9ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00b8}
0xd9ba…d9c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00c2}
0xd9c4…d9d2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008b, t01=0x00cc}
0xd9d2…d9dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00da}
0xd9dc…da1c               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x008b, t01=0x00e4}
0xda1c…da26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0124}
0xda26…da4e               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER«, t00=0x008b, t01=0x012e}
0xda4e…da6e               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x008b, t01=0x0156}
0xda6e…da84               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x008b, t01=0x0176}
0xda84…daaa               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x008b, t01=0x018c}
0xdaaa…dab4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0022}
0xdab4…dafa               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x008c, t01=0x002c}
0xdafa…db28               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTER - CHECK SELECT ADDRESS«, t00=0x008c, t01=0x0072}
0xdb28…db58               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x008c, t01=0x00a0}
0xdb58…db62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x00d0}
0xdb62…db94               Head {h00=0x002e, h01=0x0050, text=»RBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE «, t00=0x008c, t01=0x00da}
0xdb94…db9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x010c}
0xdb9e…dba8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0116}
0xdba8…dbbc               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x008c, t01=0x0120}
0xdbbc…dbd0               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x008c, t01=0x0134}
0xdbd0…dbe4               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x008c, t01=0x0148}
0xdbe4…dbf0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x015c}
0xdbf0…dc02               Head {h00=0x000e, h01=0x0050, text=» IM RBYTE «, t00=0x008c, t01=0x0168}
0xdc02…dc16               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x008c, t01=0x017a}
0xdc16…dc2a               Head {h00=0x0010, h01=0x0050, text=»FINTER EQU *«, t00=0x008c, t01=0x018e}
0xdc2a…dc36               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0012}
0xdc36…dc60               Head {h00=0x0026, h01=0x0050, text=» LD A4,DCTAB GET ADDRESS TO DC:TAB«, t00=0x008d, t01=0x001e}
0xdc60…dc8e               Head {h00=0x002a, h01=0x0050, text=» AD* A4,DCTAB ADDRESS TO END OF DC:TAB«, t00=0x008d, t01=0x0048}
0xdc8e…dca6               Head {h00=0x0014, h01=0x0050, text=»FINT10 SUK A4,2 «, t00=0x008d, t01=0x0076}
0xdca6…dcc6               Head {h00=0x001c, h01=0x0050, text=» LDK A3,0 DEFAULT VALUE «, t00=0x008d, t01=0x008e}
0xdcc6…dce8               Head {h00=0x001e, h01=0x0050, text=» CW A4,DCTAB END OF TABLE «, t00=0x008d, t01=0x00ae}
0xdce8…dd14               Head {h00=0x0028, h01=0x0050, text=» RF(E) FINT20 SUBTERMINAL NOT FOUND «, t00=0x008d, t01=0x00d0}
0xdd14…dd38               Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 LOAD DWT ADDRESS«, t00=0x008d, t01=0x00fc}
0xdd38…dd4c               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x008d, t01=0x0120}
0xdd4c…dd74               Head {h00=0x0024, h01=0x0050, text=» AD A3,RBYTE CHOOSE ADDRESS TYPE«, t00=0x008d, t01=0x0134}
0xdd74…dda2               Head {h00=0x002a, h01=0x0050, text=» CCR A2,A3 COMPARE SUBTERMINAL ADDRESS«, t00=0x008d, t01=0x015c}
0xdda2…ddae               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x018a}
0xddae…ddc2               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x008e, t01=0x0008}
0xddc2…ddf4               Head {h00=0x002e, h01=0x0050, text=» CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS«, t00=0x008e, t01=0x001c}
0xddf4…de00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x004e}
0xde00…de2a               Head {h00=0x0026, h01=0x0050, text=» RB(NE) FINT10 TAKE NEXT TERMINAL «, t00=0x008e, t01=0x005a}
0xde2a…de42               Head {h00=0x0014, h01=0x0050, text=»FINT20 CM RBYTE «, t00=0x008e, t01=0x0084}
0xde42…de58               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x008e, t01=0x009c}
0xde58…de68               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x008e, t01=0x00b2}
0xde68…de76               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008e, t01=0x00c2}
0xde76…de80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00d0}
0xde80…de8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00da}
0xde8a…dea6               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x008e, t01=0x00e4}
0xdea6…deb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0100}
0xdeb0…deba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x010a}
0xdeba…dee2               Head {h00=0x0024, h01=0x0050, text=»DC15ON CF A15,SAVE8 SAVE A1 - A8«, t00=0x008e, t01=0x0114}
0xdee2…def6               Head {h00=0x0010, h01=0x0050, text=» IFT STAT=1 «, t00=0x008e, t01=0x013c}
0xdef6…df16               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x008e, t01=0x0150}
0xdf16…df2a               Head {h00=0x0010, h01=0x0050, text=» LD A1,DCTAB«, t00=0x008e, t01=0x0170}
0xdf2a…df5c               Head {h00=0x002e, h01=0x0050, text=» AD* A1,DCTAB GET ADDRESS TO END OF TABLE «, t00=0x008e, t01=0x0184}
0xdf5c…df74               Head {h00=0x0014, h01=0x0050, text=»DRDC05 SUK A1,2 «, t00=0x008f, t01=0x0026}
0xdf74…df88               Head {h00=0x0010, h01=0x0050, text=» CW A1,DCTAB«, t00=0x008f, t01=0x003e}
0xdf88…dfaa               Head {h00=0x001e, h01=0x0050, text=» RF(E) DRDC06 END OF TABLE«, t00=0x008f, t01=0x0052}
0xdfaa…dfce               Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A1 GET DWT ADDRESS «, t00=0x008f, t01=0x0074}
0xdfce…e002               Head {h00=0x0030, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE«, t00=0x008f, t01=0x0098}
0xe002…e02e               Head {h00=0x0028, h01=0x0050, text=» CF A15,INSSQ INSERT IN STATUS QUEUE«, t00=0x008f, t01=0x00cc}
0xe02e…e040               Head {h00=0x000e, h01=0x0050, text=» RB DRDC05«, t00=0x008f, t01=0x00f8}
0xe040…e054               Head {h00=0x0010, h01=0x0050, text=»DRDC06 EQU *«, t00=0x008f, t01=0x010a}
0xe054…e060               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x011e}
0xe060…e08c               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x008f, t01=0x012a}
0xe08c…e0b2               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DRDC20 ALREADY STARTED«, t00=0x008f, t01=0x0156}
0xe0b2…e0e0               Head {h00=0x002a, h01=0x0050, text=»DRDC10 CF A15,SPOTIM START POLL TIMER «, t00=0x008f, t01=0x017c}
0xe0e0…e0f6               Head {h00=0x0012, h01=0x0050, text=»DRDC20 ABL BRM«, t00=0x0090, t01=0x001a}
0xe0f6…e104               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0090, t01=0x0030}
0xe104…e10e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x003e}
0xe10e…e126               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0090, t01=0x0048}
0xe126…e130               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0060}
0xe130…e15c               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0090, t01=0x006a}
0xe15c…e170               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/40 «, t00=0x0090, t01=0x0096}
0xe170…e19c               Head {h00=0x0028, h01=0x0050, text=» ST A2,DCONOF INDICATE POLL TIME OUT«, t00=0x0090, t01=0x00aa}
0xe19c…e1ca               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0090, t01=0x00d6}
0xe1ca…e1f2               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0090, t01=0x0104}
0xe1f2…e204               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0090, t01=0x012c}
0xe204…e20e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x013e}
0xe20e…e246               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x0090, t01=0x0148}
0xe246…e250               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0180}
0xe250…e278               Head {h00=0x0024, h01=0x0050, text=»CPTIM CM DCONOF INDICATE POLLING«, t00=0x0090, t01=0x018a}
0xe278…e290               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x0091, t01=0x0022}
0xe290…e2b4               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x0091, t01=0x003a}
0xe2b4…e2e2               Head {h00=0x002a, h01=0x0050, text=» CF A15,CKMESS CHECK IF STATUS CHANGE «, t00=0x0091, t01=0x005e}
0xe2e2…e2f2               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0091, t01=0x008c}
0xe2f2…e2fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x009c}
0xe2fc…e316               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x0091, t01=0x00a6}
0xe316…e320               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00c0}
0xe320…e348               Head {h00=0x0024, h01=0x0050, text=»SPOTIM CF A15,SETIME START TIMER«, t00=0x0091, t01=0x00ca}
0xe348…e362               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x0091, t01=0x00f2}
0xe362…e38c               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x0091, t01=0x010c}
0xe38c…e3a0               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0091, t01=0x0136}
0xe3a0…e3b2               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0091, t01=0x014a}
0xe3b2…e3c0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0091, t01=0x015c}
0xe3c0…e3ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x016a}
0xe3ca…e3ea               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x0091, t01=0x0174}
0xe3ea…e3f4 (146, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0004}
0xe3f4…e408               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x0092, t01=0x000e}
0xe408…e430               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x0092, t01=0x0022}
0xe430…e446               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0092, t01=0x004a}
0xe446…e462               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x0092, t01=0x0060}
0xe462…e48a               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x0092, t01=0x007c}
0xe48a…e49a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0092, t01=0x00a4}
0xe49a…e4a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x00b4}
0xe4a4…e4c0               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x0092, t01=0x00be}
0xe4c0…e4ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x00da}
0xe4ca…e4e2               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x0092, t01=0x00e4}
0xe4e2…e4fe               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x0092, t01=0x00fc}
0xe4fe…e522               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x0092, t01=0x0118}
0xe522…e552               Head {h00=0x002c, h01=0x0050, text=» CF A5,HALTIN HALT INPUT IF OPEN SALCUZ «, t00=0x0092, t01=0x013c}
0xe552…e566               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0092, t01=0x016c}
0xe566…e58c               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x0092, t01=0x0180}
0xe58c…e5aa               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0093, t01=0x0016}
0xe5aa…e5d4               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0093, t01=0x0034}
0xe5d4…e5ea               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x0093, t01=0x005e}
0xe5ea…e5f8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0093, t01=0x0074}
0xe5f8…e602               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0082}
0xe602…e620               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x0093, t01=0x008c}
0xe620…e62a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00aa}
0xe62a…e656               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x0093, t01=0x00b4}
0xe656…e676               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x0093, t01=0x00e0}
0xe676…e694               Head {h00=0x001a, h01=0x0050, text=» CM* DCTPP STOP TIMER «, t00=0x0093, t01=0x0100}
0xe694…e6a6               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x0093, t01=0x011e}
0xe6a6…e6ba               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x0093, t01=0x0130}
0xe6ba…e6c8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0093, t01=0x0144}
0xe6c8…e6dc               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0093, t01=0x0152}
0xe6dc…e6e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0166}
0xe6e6…e6f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0170}
0xe6f0…e70c               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x0093, t01=0x017a}
0xe70c…e716               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0008}
0xe716…e72e               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x0094, t01=0x0012}
0xe72e…e74c               Head {h00=0x001a, h01=0x0050, text=»* A7 = ACCUMULATED CRC«, t00=0x0094, t01=0x002a}
0xe74c…e756               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0048}
0xe756…e760               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0052}
0xe760…e774               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x0094, t01=0x005c}
0xe774…e78a               Head {h00=0x0012, h01=0x0050, text=» ST A1,CRCSAV «, t00=0x0094, t01=0x0070}
0xe78a…e7a2               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+2 «, t00=0x0094, t01=0x0086}
0xe7a2…e7ba               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+4 «, t00=0x0094, t01=0x009e}
0xe7ba…e7cc               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x0094, t01=0x00b6}
0xe7cc…e7e4               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A7«, t00=0x0094, t01=0x00c8}
0xe7e4…e7f6               Head {h00=0x000e, h01=0x0050, text=» SRL A7,1 «, t00=0x0094, t01=0x00e0}
0xe7f6…e808               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x0094, t01=0x00f2}
0xe808…e81a               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x0094, t01=0x0104}
0xe81a…e82c               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0094, t01=0x0116}
0xe82c…e842               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x0094, t01=0x0128}
0xe842…e858               Head {h00=0x0012, h01=0x0050, text=» XRKL A7,/A001«, t00=0x0094, t01=0x013e}
0xe858…e870               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x0094, t01=0x0154}
0xe870…e886               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x0094, t01=0x016c}
0xe886…e89c               Head {h00=0x0012, h01=0x0050, text=» LD A1,CRCSAV «, t00=0x0094, t01=0x0182}
0xe89c…e8b4               Head {h00=0x0014, h01=0x0050, text=» LD A2,CRCSAV+2 «, t00=0x0095, t01=0x0008}
0xe8b4…e8cc               Head {h00=0x0014, h01=0x0050, text=» LD A3,CRCSAV+4 «, t00=0x0095, t01=0x0020}
0xe8cc…e8dc               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0095, t01=0x0038}
0xe8dc…e8f0               Head {h00=0x0010, h01=0x0050, text=»CRCSAV RES 3«, t00=0x0095, t01=0x0048}
0xe8f0…e8fe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0095, t01=0x005c}
0xe8fe…e908               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x006a}
0xe908…e912               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0074}
0xe912…e93e               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x0095, t01=0x007e}
0xe93e…e95e               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x0095, t01=0x00aa}
0xe95e…e968               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00ca}
0xe968…e972               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00d4}
0xe972…e99a               Head {h00=0x0024, h01=0x0050, text=»RDCRC LDR A6,A7 SAVE CURRENT CRC«, t00=0x0095, t01=0x00de}
0xe99a…e9c2               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x0095, t01=0x0106}
0xe9c2…e9e2               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x0095, t01=0x012e}
0xe9e2…ea02               Head {h00=0x001c, h01=0x0050, text=» LD A8,CRCSAV+2 SAVE IT «, t00=0x0095, t01=0x014e}
0xea02…ea22               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x0095, t01=0x016e}
0xea22…ea4e               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x0095, t01=0x018e}
0xea4e…ea6e               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+2 SAVE IT «, t00=0x0096, t01=0x002a}
0xea6e…ea80               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0096, t01=0x004a}
0xea80…ea92               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A8«, t00=0x0096, t01=0x005c}
0xea92…eaa4               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0096, t01=0x006e}
0xeaa4…ead6               Head {h00=0x002e, h01=0x0050, text=» CWR A2,A6 COMPARE RECEIVED WITH COMPUTED «, t00=0x0096, t01=0x0080}
0xead6…eae6               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0096, t01=0x00b2}
0xeae6…eaf2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0096, t01=0x00c2}
0xeaf2…eb06               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0096, t01=0x00ce}
0xeb06…eb10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00e2}
0xeb10…eb3a               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x0096, t01=0x00ec}
0xeb3a…eb60               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x0096, t01=0x0116}
0xeb60…eb6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x013c}
0xeb6a…eb80               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x0096, t01=0x0146}
0xeb80…eb94               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x0096, t01=0x015c}
0xeb94…eba6               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x0096, t01=0x0170}
0xeba6…ebb8               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0096, t01=0x0182}
0xebb8…ebce (151, 0, 400) Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x0097, t01=0x0004}
0xebce…ebe2               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x0097, t01=0x001a}
0xebe2…ebf6               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x0097, t01=0x002e}
0xebf6…ec08               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x0097, t01=0x0042}
0xec08…ec18               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x0097, t01=0x0054}
0xec18…ec20               Head {h00=0x0004, h01=0x0050, t00=0x0097, t01=0x0064}
0xec20…ec2c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0097, t01=0x006c}
0xec2c…ec3a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0097, t01=0x0078}
0xec3a…ec44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0086}
0xec44…ec4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0090}
0xec4e…ec74               Head {h00=0x0022, h01=0x0050, text=»* DEVICE WORK TABLE FOR DCTASK«, t00=0x0097, t01=0x009a}
0xec74…ec7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00c0}
0xec7e…ec88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00ca}
0xec88…eca8               Head {h00=0x001c, h01=0x0050, text=»DW1500 EQU * TABLE ENTRY«, t00=0x0097, t01=0x00d4}
0xeca8…ecc8               Head {h00=0x001c, h01=0x0050, text=» DATA 0 CU LINE ADDRESS «, t00=0x0097, t01=0x00f4}
0xecc8…ece2               Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x0097, t01=0x0114}
0xece2…ecfe               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0097, t01=0x012e}
0xecfe…ed14               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0097, t01=0x014a}
0xed14…ed42               Head {h00=0x002a, h01=0x0050, text=» DATA DC15DC POINTER TO ADDRESS BLOCK «, t00=0x0097, t01=0x0160}
0xed42…ed5e               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x0097, t01=0x018e}
0xed5e…ed86               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0098, t01=0x001a}
0xed86…eda0               Head {h00=0x0016, h01=0x0050, text=» DATA 0 TASK QUEUE«, t00=0x0098, t01=0x0042}
0xeda0…edbe               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TIMER POINTER «, t00=0x0098, t01=0x005c}
0xedbe…edea               Head {h00=0x0028, h01=0x0050, text=» DATA 0 WRITE QUEUE OR BUFFER QUEUE «, t00=0x0098, t01=0x007a}
0xedea…ee1c               Head {h00=0x002e, h01=0x0050, text=» DATA 0 STATUS QUEUE (NOT USED BY DC-TASK)«, t00=0x0098, t01=0x00a6}
0xee1c…ee42               Head {h00=0x0022, h01=0x0050, text=» DATA 0 RECEIVE MESSAGE QUEUE «, t00=0x0098, t01=0x00d8}
0xee42…ee72               Head {h00=0x002c, h01=0x0050, text=» DATA 0 SIMULATED DEVICE BUFFER ADDRESS «, t00=0x0098, t01=0x00fe}
0xee72…ee90               Head {h00=0x001a, h01=0x0050, text=» DATA 0 CURSOR ADDRESS«, t00=0x0098, t01=0x012e}
0xee90…ee9e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0098, t01=0x014c}
0xee9e…eea8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x015a}
0xeea8…eeb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0164}
0xeeb2…eed2               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x0098, t01=0x016e}
0xeed2…eedc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x018e}
0xeedc…eefc               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x0099, t01=0x0008}
0xeefc…ef06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0028}
0xef06…ef1a               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x0099, t01=0x0032}
0xef1a…ef3e               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x0099, t01=0x0046}
0xef3e…ef54               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x0099, t01=0x006a}
0xef54…ef6a               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0099, t01=0x0080}
0xef6a…ef7e               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0099, t01=0x0096}
0xef7e…ef94               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x0099, t01=0x00aa}
0xef94…efaa               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0099, t01=0x00c0}
0xefaa…efbe               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0099, t01=0x00d6}
0xefbe…efd4               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x0099, t01=0x00ea}
0xefd4…efea               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0099, t01=0x0100}
0xefea…effe               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0099, t01=0x0116}
0xeffe…f00a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0099, t01=0x012a}
0xf00a…f020               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x0099, t01=0x0136}
0xf020…f034               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0099, t01=0x014c}
0xf034…f050               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x0099, t01=0x0160}
0xf050…f064               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x0099, t01=0x017c}
0xf064…f06e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0190}
0xf06e…f078               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x000a}
0xf078…f09a               Head {h00=0x001e, h01=0x0050, text=»* DC TRANSMIT BUFFER POOL «, t00=0x009a, t01=0x0014}
0xf09a…f0a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0036}
0xf0a4…f0ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0040}
0xf0ae…f0c2               Head {h00=0x0010, h01=0x0050, text=»DCTBUF EQU *«, t00=0x009a, t01=0x004a}
0xf0c2…f0cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x005e}
0xf0cc…f0d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0068}
0xf0d6…f0ea               Head {h00=0x0010, h01=0x0050, text=» IFF TBUFL=0«, t00=0x009a, t01=0x0072}
0xf0ea…f11a               Head {h00=0x002c, h01=0x0050, text=» DATA TBUF1 POINTER TO FIRST FREE BUFFER«, t00=0x009a, t01=0x0086}
0xf11a…f14e               Head {h00=0x0030, h01=0x0050, text=»TBUF1 DATA TBUF2 POINTER TO NEXT FREE BUFFER«, t00=0x009a, t01=0x00b6}
0xf14e…f16e               Head {h00=0x001c, h01=0x0050, text=» RES TBUFL BUFFER AREA 1«, t00=0x009a, t01=0x00ea}
0xf16e…f190               Head {h00=0x001e, h01=0x0050, text=»TBUF2 DATA 0 END OF CHAIN «, t00=0x009a, t01=0x010a}
0xf190…f1b0               Head {h00=0x001c, h01=0x0050, text=» RES TBUFL BUFFER AREA 2«, t00=0x009a, t01=0x012c}
0xf1b0…f1bc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x014c}
0xf1bc…f1c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0158}
0xf1c6…f1d4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009a, t01=0x0162}
0xf1d4…f1de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0170}
0xf1de…f1e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x017a}
0xf1e8…f20c               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x009a, t01=0x0184}
0xf20c…f216               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0018}
0xf216…f220               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0022}
0xf220…f234               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x009b, t01=0x002c}
0xf234…f24e               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x009b, t01=0x0040}
0xf24e…f264               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x009b, t01=0x005a}
0xf264…f276               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x009b, t01=0x0070}
0xf276…f290               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x009b, t01=0x0082}
0xf290…f2a6               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x009b, t01=0x009c}
0xf2a6…f2b8               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x009b, t01=0x00b2}
0xf2b8…f2d0               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x009b, t01=0x00c4}
0xf2d0…f2e6               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x009b, t01=0x00dc}
0xf2e6…f2fa               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x009b, t01=0x00f2}
0xf2fa…f314               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x009b, t01=0x0106}
0xf314…f32a               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x009b, t01=0x0120}
0xf32a…f33c               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x009b, t01=0x0136}
0xf33c…f34e               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x009b, t01=0x0148}
0xf34e…f364               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x009b, t01=0x015a}
0xf364…f37a               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x009b, t01=0x0170}
0xf37a…f392               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x009b, t01=0x0186}
0xf392…f3ae               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x009c, t01=0x000e}
0xf3ae…f3c2               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x009c, t01=0x002a}
0xf3c2…f3d6               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x009c, t01=0x003e}
0xf3d6…f3ec               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x009c, t01=0x0052}
0xf3ec…f3fa               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x0068}
0xf3fa…f404               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0076}
0xf404…f40e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0080}
0xf40e…f428               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x009c, t01=0x008a}
0xf428…f43c               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x009c, t01=0x00a4}
0xf43c…f44c               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x009c, t01=0x00b8}
0xf44c…f462               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x009c, t01=0x00c8}
0xf462…f476               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x009c, t01=0x00de}
0xf476…f48a               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x009c, t01=0x00f2}
0xf48a…f496               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x0106}
0xf496…f4a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0112}
0xf4a0…f4aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x011c}
0xf4aa…f4b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0126}
0xf4b4…f4c8               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x009c, t01=0x0130}
0xf4c8…f4d6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x0144}
0xf4d6…f516               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x009c, t01=0x0152}
0xf516…f520 (157, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0004}
0xf520…f53a               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x009d, t01=0x000e}
0xf53a…f544               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0028}
0xf544…f582               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x009d, t01=0x0032}
0xf582…f58c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0070}
0xf58c…f5ce               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x009d, t01=0x007a}
0xf5ce…f5d6               Head {h00=0x0004, h01=0x0050, t00=0x009d, t01=0x00bc}
0xf5d6…f5ea               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x009d, t01=0x00c4}
0xf5ea…f610               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x009d, t01=0x00d8}
0xf610…f622               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x009d, t01=0x00fe}
0xf622…f638               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x009d, t01=0x0110}
0xf638…f662               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x009d, t01=0x0126}
0xf662…f688               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x009d, t01=0x0150}
0xf688…f690               Head {h00=0x0004, h01=0x0050, t00=0x009d, t01=0x0176}
0xf690…f6a2               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x009d, t01=0x017e}
0xf6a2…f6b8               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x009d, t01=0x0190}
0xf6b8…f6e4               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x009e, t01=0x0016}
0xf6e4…f70c               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x009e, t01=0x0042}
0xf70c…f722               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x009e, t01=0x006a}
0xf722…f72c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0080}
0xf72c…f736               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x008a}
0xf736…f740               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0094}
0xf740…f74e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009e, t01=0x009e}
0xf74e…f756               Head {h00=0x0004, h01=0x0050, t00=0x009e, t01=0x00ac}
0xf756…f75e               Head {h00=0x0004, h01=0x0050, t00=0x009e, t01=0x00b4}
0xf75e…f772               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x009e, t01=0x00bc}
0xf772…f7a0               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x009e, t01=0x00d0}
0xf7a0…f7ce               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 /08-/0F «, t00=0x009e, t01=0x00fe}
0xf7ce…f7fc               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x009e, t01=0x012c}
0xf7fc…f82a               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E /18-/1F «, t00=0x009e, t01=0x015a}
0xf82a…f858               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x009e, t01=0x0188}
0xf858…f886               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F /28-/2F «, t00=0x009f, t01=0x0026}
0xf886…f8b2               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x009f, t01=0x0054}
0xf8b2…f8de               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 /38-3F«, t00=0x009f, t01=0x0080}
0xf8de…f8ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x00ac}
0xf8ea…f8f8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009f, t01=0x00b8}
0xf8f8…f900               Head {h00=0x0004, h01=0x0050, t00=0x009f, t01=0x00c6}
0xf900…f91c               Head {h00=0x0018, h01=0x0050, text=»DC:IN DATA DC:TAB+2 «, t00=0x009f, t01=0x00ce}
0xf91c…f936               Head {h00=0x0016, h01=0x0050, text=»DCTAB DATA DC:TAB «, t00=0x009f, t01=0x00ea}
0xf936…f95c               Head {h00=0x0022, h01=0x0050, text=»DC:TAB DATA 2 LENGTH OF DC:TAB«, t00=0x009f, t01=0x0104}
0xf95c…f98a               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x009f, t01=0x012a}
0xf98a…f9b8               Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x009f, t01=0x0158}
0xf9b8…f9cc               Head {h00=0x0010, h01=0x0050, text=»DC:END EQU *«, t00=0x009f, t01=0x0186}
0xf9cc…f9d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x000a}
0xf9d6…f9e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0014}
0xf9e0…f9ec               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00a0, t01=0x001e}
0xf9ec…f9f0               Head {h00=0x4004, h01=0x0000}
0xf9f0…f9f4               00 a0 00 2a                                                                                                                                                                                                                                       ┆   *┆
0xf9f4…f9fc (161, 1, 8)   20 04 00 00 00 a1 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view