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

⟦ca4e44ff5⟧

    Length: 100522 (0x188aa)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«

Derivation

└─⟦7a1dcd5a9⟧ Bits:30009673 Philips computer tape "600134"
    └─⟦this⟧ »PTMON/DRDC15.SC« 

PTS(SC)

	IDENT	DRDC15	REL 11.0 DK 83-11-21 870105041100 

			DK3, IR IN STATUS TABLE
			DK2, NAK AT SELECT 
			DK1, DEVICE STATUS AT CONNECT
			=17, RETURN CODE AT CONNECT
			=16, DLOBUF DESTROYED AT CONNECT 
			=15, NO NEED TO RES 1 WORD BEFORE DATA 
			=14, LOSS OF DRIVER RECEIVE BUFFER 
			REL 11.0 81-05-21
			=13, ERRONEOUS DISCARD DWT HANDLING
			=12, SUB-ADDR IN CW2 AT RECEIVE REQ COMPL
			REL 11.0 81-05-12
			=11, PROCEDURE TIMER PROBLEM 
			=10, EOT ON SPECIFIC POLL
			=9, REMAINING TIME IN ECBCW1 
			REL 11.0 81-04-12
			=8, ODD USER BUFFER ADDRESS
			=7, BINARY STORE PROBLEM 
			REL 11.0 81-04-07
			=6, ERROR IN POLL TIMER HANDLING 
			=5, WRONG STATISTIC HANDLING 
			REL 11.0 81-03-27
			=4, ERROR IN POWER UP
			=3, DELETE INSTRUCTIONS NOT USED 
			=2, CHANGES IN STATUS HANLING
			=1, ERROR IN OPEN/CLOSE REQUESTS 
			REL 11.0 81-01-26
* 
* 
********************************************* 
* 
*   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	DUMMY DWT 
* 
	EJECT
* 
* 
*	EXTERNAL REFERENCES 
* 
	EXTRN	TDISP	DISPATCHER ENTRY 
	EXTRN	SAVE8	SAVE A1-A8 ON A15 STACK
	EXTRN	TENDIO	COMPLETE I/O EVENT
	EXTRN	SETIME	SET TIMER 
	EXTRN	DWTCHP	DWT ADDRESS 
	EXTRN	DWTST	DWT STATUS 
	EXTRN	DWTOR	DWT ORDER
	EXTRN	DWTECB	DWT ECB 
	EXTRN	DWTOPT	OPTION CODE 
	EXTRN	DWTUEC	USER ECB IF MMU 
	EXTRN	DWTMEC	MMU ECB 
	EXTRN	ECBFC	FILE CODE
	EXTRN	ECBBA	BUFFER ADDRESS 
	EXTRN	ECBRL	REQUESTED LENGTH 
	EXTRN	ECBEL	EFFECTIVE LENGTH 
	EXTRN	ECBCW1	CONTROL WORD 1
	EXTRN	ECBCW2	CONTROL WORD 2
	EXTRN	GETSSA 
	EXTRN	INTSAV	SAVE AREA LAST INTERRUPT
	EXTRN	TEBCDIC	ASCII TO EBCDIC TABLE
	EXTRN	TASCII	EBCDIC TO ASCII TABLE 
	EXTRN	DCSRED	READ STATISTICS ENTRY POINT 
	EXTRN	DCSRLL	RESET ALL STATISTICS BUFFERS ENTRY POINT
	EXTRN	DCSUPS	UPDATE STATISTICS ENTRY POINT IN DCSTAT 
	EXTRN	GETDNA	VALIDATE AND CONVERT SYMBOLIC DTE ADDR
	EXTRN	GETSNA	VALIDATE AND CONVERT SYMBOLIC SUB ADDR
	EXTRN	DC:MIN	MOVE DATA TO USER BUFFER
	EXTRN	DC:MOT	MOVE DATA FROM USER BUFFER
	EXTRN	DISEND	COMPLETE REQUEST AND DISPATCH 
	EXTRN	PFPOST	WAIT FOR POWER UP IF SET
	EJECT		
**********************************************************************
* 
*	REGISTER USAGE:	
* 
*	A1	WORK (RETURN CODE) 
*	A2	WORK 
*	A3	WORK (BUFFER LENGTH) 
*	A4	WORK (BUFFER POINTER)
*	A5	DRIVER STACK POINTER 
*	A6	DWT ADDRESS
*	A7	ORDER CODE, DTETAB ADDRESS 
*	A8	ECB ADDRESS
* 
************************************************************************
	EJECT
******************************************************* 
* 
*	PARAMETERS FOR CONDITIONAL ASSEMBLY 
* 
* 
X:A	EQU	1000	RECEIVE BUFFER LENGTH
RBUFL	EQU	1150
X:B	EQU	0	IF 1 INTERRUPT LOGGING
LOGG	EQU	X:B
X:C	EQU	600	POLL TIMEOUT VALUE
TIMPOL	EQU	X:C
X:D	EQU	0	STATUS AND RVI HANDLING IF=1
STARVI	EQU	1
X:E	EQU	0	READ COMMAND HANDLING IF =1 
RCOM	EQU	1	 
X:F	EQU	252	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	X:F 
X:G	EQU	0	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	1
X:H	EQU	0	IF 1 SPECIFIC POLL HANDLING 
SPECP	EQU	X:H 
X:I	EQU	0	IF = 1 LINE SPEED SET TO HIGH 
			IF = 0  LINE SPEED IS SET TO LOW 
SPEED	EQU	1 
X:J	EQU	0	IF 1 SIEMENS MSV1 PROCEDURE 
MSV1	EQU	X:J
X:K	EQU	2	NUMBER OF RECEIVE BUFFERS (2-5) 
RBUFNR	EQU	2
X:L	EQU	0	IF = 1  PTS 6805 ADAPTION	SALCUZ
P6805	EQU	X:L 
X:M	EQU	/02 
	IFT	P6805=0
LCUIN	EQU	X:M	DEVICE ADDRESS OF RECEIVER
	XIF
	IFT	P6805=1
LCUIN	EQU	/0A	DEVICE ADDRESS OF RECEIVER
	XIF
	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 
X:N	EQU	0 
IBMCHR	EQU	X:N	IF 1 IBM CHARACTER HANDLING
X:O	EQU	0	IF 1 MESSAGE PASSING TO DC TASK 
MESPAS	EQU	X:O
X:P	EQU	0	IBM-3270 EMULATION PACKAGE, IF NOT = 0
EM3270	EQU	1
X:Q	EQU	0 
TPMODE	EQU	X:Q	IF = 1 TRANSPARANT MODE
X:R	EQU	0 
STTSTS	EQU	X:R	IF = 1 STATISTICS INCLUDED 
X:S	EQU	500 
TBUFL	EQU	1150	MMU BUFFER LENGTH
BINTRM	EQU	0	IF 1 BINARY TRANSMISSION 
DMRK	EQU	1	SPECIAL CONDITION FOR DENMARK
NOWACK	EQU	0	WHEN WORKING WITH A MAIN-FRAME THAT
			DOESN'T ACCEPT WACK RESPONSE TO A SELECT 
			SEQUENCE, NOWACK SHOULD BE SET TO "ONE". 
				=2

REMTIM	EQU	0		=9
			IF = 1 THE REMAINING TIME UNTIL TIMEOUT	=9 
			IS DELIVERED IN ECBCW1 AT COMPLETION 	=9 
			OF SEND AND RECEIVE REQUESTS	=9
* 
	IFT	SPEED=1
LSPEED	EQU	/0200
	XIF
	IFT	SPEED=0
LSPEED	EQU	0
	XIF
	EJECT
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	1
* 
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	0
* 
DEVIND	EQU	0	DEVICE INDEX DATA COMMUNICATION
BUFLEN	EQU	TBUFL+TBUFL	MMU BUFFER SIZE
* 
	EJECT
* 
**************************************
* 
*	DCDEFS  COMMON DEFS FOR DC DRIVERS/PACKAGES 
*	
**************************************
	 
*************************************** 
* 
*	TABLE AND PACKET LAYOUTS
* 
*************************************** 
	 
	 
	EJECT
**********************************************************************
* 
*	DWT, DEVICE WORK TABLE
* 
************************************************************************
* 
*	    ................... 
*	  0 .  DWTCHP         . 
*	    ................... 
*	  2 .  DWTST          . 
*	    ................... 
*	  4 .  DWTECB         . 
*	    ................... 
*	  6 . DWTOPT . DWTOR  . 
*	    ................... 
*	  8 .  DWTADR         . 
*	    ................... 
*	 10 .  DWTTAB         . 
*	    ................... 
*	 12 .  DWTWAT         . 
*	    ................... 
*	 14 .  DWTTQ          . 
*	    ................... 
*	(16).  DWTUEC         .   IF   MMUPAG 
*	    ................... 
*	(18).  DWTMEC         .   IF   MMUPAG 
*	    ................... 
* DWTDRD	 +2 .  DWTSTB         .
*            ...................
*	 +4 .  DWTCHD         . 
*	    ................... 
*	 +6 .  DWTCHN         . 
*	    ................... 
*	 +8 .  DWTLAD         . 
*	    ................... 
*	+10 .  DWTRAD         . 
*	    ................... 
*	+12 .  DWTDR1/SUB     . 
*	    ................... 
*	+14 .  DWTRCL         . 
*	    ................... 
*	+16 .  DWTRTV         . 
*	    ................... 
*	+18 .  DWTRTP         . 
*	    ................... 
*	+20 .  DWTOPE         . 
*	    ................... 
*	+22 .  DWTOPN         . 
*	    ................... 
*	+24 .  DWTIPC         . 
*	    ................... 
*	+26 .  DWTIPT         . 
*	    ................... 
*	+28 .                 . 
*	    /  DRIVER DEPEND  / 
*	    /                 / 
*	    /                 / 
*	    ................... 
*	    .  STATISTIC      .   IF STAT   AND DWTSTB /=0
*	    /  BUFFER         / 
*	    ................... 
* 
	EJECT
* 
********************************************************* 
* 
*	D W T  D I S P L A C E M E N T S
* 
********************************************************* 
* 
DWTTQ	EQU	/0E	TERMINAL QUEUE
	IFT	MMUPAG=0 
DWTDRD	EQU	DWTTQ+2	START OF DRIVER DEPENDENT AREA 
	XIF
	IFT	MMUPAG=1 
DWTDRD	EQU	DWTTQ+6	START OF DRIVER DEPENDENT AREA 
	XIF
DWTSTB	EQU	DWTDRD	OFFSET REL START DWT TO STATISTIC BUFF IF ANY 
DWTCHD	EQU	DWTDRD+2	CONFIG CHAIN LINK HEAD DWT
DWTCHN	EQU	DWTDRD+4	CONFIG CHAIN LINK NEXT DWT
DWTLAD	EQU	DWTDRD+6	LOCAL SYMBOLIC DTE ADDRESS
DWTRAD	EQU	DWTDRD+8	REMOTE SYMBOLIC DTE ADDRESS 
DWTDR1	EQU	DWTDRD+10	DRIVER DEP WORD 1
DWTSUB	EQU	DWTDR1	SYMBOLIC SUBADDRESS 
DWTRCL	EQU	DWTDRD+12	REQUEST CONTROL WORD 
DWTRTV	EQU	DWTDRD+14	REQUEST TIMER VALUE
DWTRTP	EQU	DWTDRD+16	REQUEST TIMER POINTER
DWTOPE	EQU	DWTDRD+18	O/P DATA Q EXPEDITED/STATUS LINK NXT DWT 
DWTOPN	EQU	DWTDRD+20	O/P DATA Q NORMAL LINK NXT DWT 
DWTIPC	EQU	DWTDRD+22	I/P DATA Q LINK TO BUFFER
DWTIPT	EQU	DWTDRD+24	I/P DATA TIMER POINTER 
DWTCUR	EQU	DWTDRD+26	CURSOR ADDRESS 
DWTBUF	EQU	DWTDRD+28	DEVICE BUFFER ADDRESS
DWTSTA	EQU	DWTDRD+30	DWT STATUS 
	EJECT
**********************************************************************
* 
*	DTE, DTE CONTROL TABLE
* 
************************************************************************
* 
*	    ................... 
*	  0 .  DTECHP         . 
*	    ................... 
*	  2 .  DTEST          . 
*	    ................... 
*	  4 .  DTEECB         . 
*	    ................... 
*	  6 . DTEOPT . DTEOR  . 
*	    ................... 
*	  8 .  DTEADR         . 
*	    ................... 
*	 10 .  DTETAB         . 
*	    ................... 
*	 12 .  DTEWAT         . 
*	    ................... 
*	 14 .  DTETQ          . 
*	    ................... 
*	(16).  DTEUEC         .   IF   MMUPAG 
*	    ................... 
*	(18).  DTEMEC         .   IF   MMUPAG 
*	    ................... 
* DTEDRD	 +2 .  DTESTB         .
*            ...................
*	 +4 .  DTECHD         . 
*	    ................... 
*	 +6 .  DTECHN         . 
*	    ................... 
*	 +8 .  DTELAD         . 
*	    ................... 
*	+10 .                 . 
*	    /  DRIVER DEPEND  / 
*	    /                 / 
*	    /                 / 
*	    ................... 
*	    .  STATISTIC      .   IF STAT   AND DTESTB /=0
*	    /  BUFFER         / 
*	    ................... 
* 
DTETQ	EQU	14
DTEUEC	EQU	DTETQ+2
DTEMEC	EQU	DTEUEC+2 

	IFT	MMUPAG=0 
DTEDRD	EQU	DTETQ+2	START OF DC DEPENDENT AREA 
	XIF
	IFT	MMUPAG=1 
DTEDRD	EQU	DTEMEC+2	START OF DC DEPENDENT AREA
	XIF
DTESTB	EQU	DTEDRD	OFFSET REL START DTE TO STATISTIC BUFF IF ANY 
DTECHD	EQU	DTEDRD+2	CONFIG CHAIN LINK HEAD DTE
DTECHN	EQU	DTEDRD+4	CONFIG CHAIN LINK NEXT DTE
DTELAD	EQU	DTEDRD+6	LOCAL SYMBOLIC DTE ADDRESS
*	DRIVER DEPENDENT
DTEPLS	EQU	DTEDRD+8	PHYSICAL LINK STATUS
DTEDLS	EQU	DTEDRD+10	DATA LINK STATUS 
DTESTA	EQU	DTEDRD+12	DTE STATUS 
DTEDWT	EQU	DTEDRD+14	CHAIN LINK  DWT
DTEDDT	EQU	DTEDRD+16	CHAIN LINK  DISCARD DWT
*	STATITICS BUFFER
STWSID	EQU	DTEDRD+18	RESERVED FOR SYMBOLIC ID 
STWCST	EQU	DTEDRD+20	COUNTER STATUS INDEX 
STWMIX	EQU	DTEDRD+22	MAX COUNTER INDEX
STWCTA	EQU	DTEDRD+24	COUNTERS 
	EJECT
**********************************************************************
* 
*	COUNTER INDECES - PARAMETER-1 EQUATES 
* 
*	REQUEST LEVEL COUNTERS: 
* 
*************************************************************** 
* 
CSRCON	EQU	/01	CONNECTIONS ESTABLISHED
CSRCBY	EQU	/02	CONNECTION NOT ESTABLISHED - BUSY
CSRMSR	EQU	/03	MESSAGES RECEIVED
CSRCHR	EQU	/C5	CHARACTERS RECEIVED
CSRMST	EQU	/06	MESSAGES TRANSMITTED 
CSRCHT	EQU	/C8	CHARACTERS TRANSMITTED 
CSRTOP	EQU	/09	TIMEOUT
CSRABT	EQU	/0A	ABORTED
CSRERR	EQU	/0B	ERROR
CSRTRE	EQU	/0C	TRANSMISSION ERROR 
CSRXC1	EQU	/0D	PROTOCOL DEPENDENT 
* 
*	LINK LEVEL COUNTERS 
	 
CSSRBL	EQU	/10	SYNCH DATA BLOCKS RECEIVED 
CSSRBY	EQU	/11	  "   DATA BLOCKS REJECTED BUFFER BUSY 
CSSRBO	EQU	/12	  "   DATA BLOCKS REJECTED BUFFER OVERFLOW 
CSSRAB	EQU	/13	  "   DATA BLOCKS REJECTED ABORTED 
CSSRPE	EQU	/14	  "   DATA BLOCKS REJECTED PARITY ERROR
CSSTBL	EQU	/15	  "   DATA BLOCKS TRANSMITTED
CSSTRT	EQU	/16	  "   DATA BLOCKS RETRANSMITTED
CSSTAB	EQU	/17	  "   DATA BLOCKS ABORTED
CSSXC1	EQU	/18	NBR OF REPLY REQUESTS TRANSMITTED
CSSXC2	EQU	/19	PROCEDURE TIME OUTS
CSSXC3	EQU	/1A	NBR OF TIMES POLL TIMEOUT HAS OCCURED
	 
	 
	EJECT
*	DTE/DCE LEVEL COUNTERS
	 
CSCDTE	EQU	/28	DTE NOT OPERABLE 
CSCDIT	EQU	/29	I/P THROUGHPUT ERROR 
CSCDOT	EQU	/2A	O/P THROUGHPUT ERROR 
CSCDCE	EQU	/2B	DCE NOT OPERABLE 
CSCXC1	EQU	/2C	CONTROL UNIT DEPENDENT 
CSCXC2	EQU	/2D	    "
CSCXC3	EQU	/2E	    "
	EJECT
* 
* 
*	REQUEST HANDLING
* 
* 
*	ORDER CODE (A7) 
* 
OPEN	EQU	/21	OPEN 
CLOSE	EQU	/22	CLOSE 
CONPAS	EQU	/27	CONNECT PASSIVE
DISCO	EQU	/2F	DISCONNECT
RECEIVE	EQU	/02	RECEIVE 
SEND	EQU	/06	SEND 
RSTAT	EQU	/00	READ STATUS 
SSTAT	EQU	/38	SET STATUS
STATIS	EQU	/2D	READ/RESET STATISTICS
STIMOT	EQU	/39	SET TIMEOUT VALUE
* 
*	OPTIONS:
* 
TYPRR	EQU	/4343	RESET STATISTICS AFTER READ	=5
	EJECT
* 
**********************************************************
* 
*	S O F T W A R E  R E T U R N  C O D E S 
* 
**********************************************************
* 
*---------------------------------------------------------------------- 
R:REQ	EQU	/8000	REQUEST ERROR 
R:ABRT	EQU	/4000	REQUEST ABORTED
R:2	EQU	/2000 
R:3	EQU	/1000 
*---------------------------------------------------------------------
R:4	EQU	/0800 
R:5	EQU	/0400 
R:6	EQU	/0200 
R:DATA	EQU	/0100	DATA AVAILABLE (QUEUED)
*---------------------------------------------------------------------
R:8	EQU	/0080 
R:TIME	EQU	/0040	TIME OUT 
R:10	EQU	/0020
R:SEQ	EQU	/0010	SEQUENCE ERROR
*---------------------------------------------------------------------
R:LGTH	EQU	/0008	ILLEGAL LENGTH 
R:13	EQU	/0004
R:LOGC	EQU	/0002	LOGICAL CONNECTION ERROR 
R:PHYC	EQU	/0001	PHYSICAL CONNECTION ERROR
*---------------------------------------------------------------------- 
* 
	EJECT
* 
********************************************************
* 
*	H A R D W A R E  R E T U R N  C O D E S 
* 
*********************************************************=
* 
*---------------------------------------------------------------------- 
H:0	EQU	/8000 
H:1	EQU	/4000 
H:2	EQU	/2000 
H:3	EQU	/1000 
*---------------------------------------------------------------------- 
H:4	EQU	/0800 
H:5	EQU	/0400 
H:6	EQU	/0200 
H:7	EQU	/0100 
*---------------------------------------------------------------------- 
H:8	EQU	/0080 
H:9	EQU	/0040 
H:CARR	EQU	/0020	CARRIER OFF
H:11	EQU	/0010
*-------------------------------------------------------------------- 
H:12	EQU	/0008
H:PARI	EQU	/0004	PARITY ERROR 
H:THRU	EQU	/0002	THROUGHPUT ERROR 
H:NOOP	EQU	/0001	NOT OPERABLE 
*---------------------------------------------------------------------- 
	EJECT			 
**********************************************************
* 
*	LINE CONTROL CHAR EQU:S		 
*				 
**********************************************************
* 
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
	EJECT
	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	/5C 
ACK0	EQU	/18
ACK1	EQU	/2F
SYNEBC	EQU	/32
ENQEBC	EQU	/2D
ETBEBC	EQU	/26
PAD	EQU	/FF	DK1 
	XIF
	IFT	P6805=0
ENQPAR	EQU	ENQ+PAR
RVIPAR	EQU	RVI+PAR
ACKPAR	EQU	ACK0+PAR 
	XIF
	IFT	P6805=1
ENQPAR	EQU	ENQ
RVIPAR	EQU	RVI
ACKPAR	EQU	ACK0 
	XIF
	EJECT
* 
* 
*	3270 SENSE/STATUS INFORMATION 
* 
* 
	IFF	STARVI=0 
SSTAB	EQU	*	S/S 0 : SENSE INFO,DB,DE,DB+DE
* 
* 
	DATA	/4448 
	DATA	/4242 
* 
NOIR	EQU	/20	S/S 1 : NO INTERVENTION REQUIRED 
IR	EQU	/26	S/S 1 : INTERVENTION REQUIRED
	XIF
* 
PENDST	EQU	/4000	PENDING STATUS FLAG
* 
*	TIMER VALUES
* 
* 
TIMPRO	EQU	30	PROCEDURE TIMER 3 SEC 
* 
* 
	EJECT
************************************************************* 
* 
*	LINE CONTROL UNIT FUNCTION CONTROL EQU:S
* 
************************************************************* 
* 
	IFT	CODE=0 
SYNC	EQU	/16
	XIF
	IFT	CODE=1 
SYNC	EQU	/32
	XIF
	IFT	P6805=0
CBCARR	EQU	/100+LSPEED
	XIF
	IFT	P6805=1
CBSTOP	EQU	/00
	IFT	CODE=0 
PARITY	EQU	/0C
	XIF
	IFT	P6805=1
	IFT	CODE=1 
PARITY	EQU	/00
	XIF
	EJECT
*************************************************** 
* 
*	LINE CONTROL UNIT SST STATUS BITS 
* 
*************************************************** 
* 
	IFT	P6805=0
H:ERR	EQU	/23	H:NOOP+H:THRU+H:CARR
	XIF
	IFT	P6805=1
H:ERR	EQU	/27	H:NOOP+H:THRU+H:CARR+H:PARI 
	XIF
	EJECT			 
****************************************************************
* 
*	DRIVER ADDRESS BLOCK
* 
*************************************************************** 
* 
	DATA	BUFLEN	MMU BUFFER SIZE
	DATA	DEVIND	DEVICE INDEX 
DC15AD	DATA	DCACT	ACTIVATION ADDRESS
	DATA	ABORT	ABORT ROUTINE 
	DATA	DCRBUF	REC. BUFFER ANCHOR 
	DATA	6	HEADER LENGTH 
* 
	RES	15	SUBROUTINE STACK FOR INTERRUPTS 
STB	RES	1 
	EJECT

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

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

AB:10	LD	A2,DWTOR,A6	ORDER CODE 
	ANK	A2,/7F 
	SUK	A2,6 
	RF(NE)	AB:RTN
	CF	A15,REMOVW	REMOVE DWT FROM WRITE QUEUE
	LD	A2,FDWTUT	WRITING DWT ADDRESS 
	CWR	A2,A6
	RF(NE)	AB:RTN	NOT THIS DWT 
	CM	FDWTUT	REST SENDING DWT 
	CM	XACK	RESET ACK EXPECTED 

AB:RTN	EQU	*
	ABL	RTABRT 
	EJECT
**********************************************************************
**********************************************************************
* 
* 
*	REQUEST HANDLER/APPLICATION INTERFACE 
* 
* 
**********************************************************************
**********************************************************************
* 
*	ACTIVATION FROM TERMINAL TASKS
* 
DCACT	EQU	* 
	LDK	A1,0	PRESET RETURN CODE
	LDR	A2,A7	ORDER CODE AS PARAMETER
	LDKL	A7,DTETAB	DTE TAB ADDR
	ANK	A2,/FF	STRIP OFF OPTION BITS 
	CF	A15,LOOKUP	BRANCH ON CODES, TABLE ADDRESS TO STACK
	DATA	TREQX,RTREQ	LAST ENTRY; ERROR ADDRESS 
	DATA	RECEIVE,RQRECE	RECEIVE REQUEST
	DATA	SEND,RQSEND	SEND REQUEST
	DATA	OPEN,RQOPEN	OPEN REQUEST
	DATA	CLOSE,RQCLOS	CLOSE REQUEST
	DATA	CONPAS,RQCON	CONNECT PASSIVE REQUEST
	DATA	DISCO,RQDIS	DISCONNECT REQUEST
	DATA	RSTAT,RQRSTS	READ STATUS REQUEST
	DATA	SSTAT,RQSST	SET STATUS REQUEST
	DATA	STIMOT,RQTIME	SET REQUEST TIMEOUT 
TREQX	DATA	STATIS,RQSTAT	READ/RESET STATISTICS REQUEST
	EJECT
* 
* 
*	OPEN REQUEST
* 
*	ACTIVATION PARAMETERS:
*		SYMBOLIC DTE-ADDRESS (ECBCW2)
* 
*	FUNCTIONS:
*		1. CHECK IF ALREADY OPEN & IF SO SAME DTE-ADDRESS
*		2. CONVERT & VERIFY DTE ADDRESS
* 
RQOPEN	EQU	*
	LD	A1,ECBCW2,A8	GET SYMBOLIC DTE-ADDRESS 
	LD	A2,DTESTA,A7	GET DTE STATUS 
	ADR	A2,A2	WORD ALIGNED INDEX VALUE 
	ABI	RQOPTB,A2	BRANCH ON INDEX IN TABLE 
RQOPTB	DATA	RQOP20	CLOSED/INACTIVE
	DATA	RQOP15	OPEN IN PROGRESS 
	DATA	RQOP10	OPEN 
	DATA	RQOP15	CLOSE IN PROGRESS
RQOP10	EQU	*
	CW	A1,DTELAD,A7	SAME AS THE ONE WHO OPENED ? 
	RF(E)	RQOP90	YES - OK
RQOP15	EQU	*
	ABL	RTSEQ	RETURN: SEQUENCE ERROR 
* 
RQOP20	EQU	*
	IM	DTESTA,A7	SET OPEN IN PROGRESS
	ST	A1,DTELAD,A7	SAVE SYMBOLIC DTE ADDRESS
	LDR	A2,A7	ADDR TO SELECT AND POLL IN DTE TAB 
	CF	A15,GETDNA	CONVERT AND VALIDATE DTE ADDR
	LDR	A1,A1
	RF(NN)	RQOP80	OK 
	CM	DTELAD,A7	CLEAR DTE ADDR
	CM	DTESTA,A7	CLEAR DTE STATUS
	ABL	RTREQ	RETURN: REQUEST ERROR
* 
RQOP80	EQU	*
	IFT	CODE=1 
	LDR*	A2,A7	DTE ADDRESS IN EBCDIC 
	LDR	A1,A2
	ANK	A2,/FF 
	RF(Z)	RQOP30	ONLY ONE BYTE 
	LC	A2,TASCII,A2	CONVERT INTO ASCII 
	SLL	A2,8 
RQOP30	EQU	*
	ECR	A1,A1
	ANK	A1,/FF 
	LC	A2,TASCII,A1
	STR	A2,A7	SAVE ASCII VALUE IN DTETAB 
	XIF
				=1
	ABL	DTE:ON	CONNECT MODEM 
RQOP90	EQU	*
	LD	A2,DTEPLS,A7	PHYSICAL CONNECTION ?
	ABL(NZ)	RTOK	YES RETURN OK 
	ABL	RTPHYC	RETURN PHYSICAL CONNECTION
	EJECT
* 
*	CLOSE REQUEST 
* 
*	ACTIVATION PARAMETERS:
*		OPTION	/00 = UNCONDITIONAL 
*			/80 = CONDITIONAL 
*	FUNCTIONS:
*		1. IF CONDITIONAL, CHECK IF ANY LOGICAL CONNECTIONS (DWTS) ARE ACTIVE
*		   ACTIVE. 
*		2. IF UNCONDITIONAL, DISCONNECT ALL DWT:S
* 
RQCLOS	EQU	*
	LD	A5,DWTOR,A6	GET OPTION AND ORDER
	LD	A2,ECBCW2,A8	GET SYMBOLIC DTE - ADDR
	RF(Z)	RQCL20 
	CW	A2,DTELAD,A7	CORRECT DTE ?
	ABL(NE)	RTREQ	RETURN: REQUEST ERROR
RQCL20	EQU	*
	LD	A2,DTESTA,A7	GET DTE STATUS 
	ABL(Z)	RTOK	RETURN : OK
	SUK	A2,2	DTE OPENED ?
	ABL(NZ)	RTSEQ	RETURN: SEQUENCE ERROR 
	IM	DTESTA,A7	CLOSE IN PROGRESS 
	LDR	A8,A6	SAVE REQUESTING DWT-ADDR 
* 
RQCL40	EQU	*
	IFT	MESPAS=1 
	LD	A6,DTEDDT,A7	GET DISCARD DWT ADDR 
	RF(Z)	RQCL50 
	LDR	A5,A5	CONDITIONAL CLOSE ?
	RF(N)	RQCL95	YES ! 
	LD	A2,DWTCHN,A6	GET POINTER TO NEXT DWT
	ST	A2,DTEDDT,A7	DISCARD DWT ADDR REMOVED 
	RF	RQCL60
RQCL50	EQU	*
	XIF
	LD	A6,DTEDWT,A7	GET DWT ADDR 
	RF(Z)	RQCL90	NO DWT IN QUEUE 
	LDR	A5,A5	CONDITIONAL CLOSE ?
	RF(N)	RQCL95	YES ! 
	LD	A2,DWTCHN,A6	GET POINTER TO NEXT DWT IN CHAIN 
	ST	A2,DTEDWT,A7	DWT FIRST IN QUEUE REMOVED 
	IFT	MESPAS=1 
RQCL60	EQU	*
	XIF
	CF	A15,RELBUF	REMOVE BUFFERS QUEUED ON DWT 
	CM	DWTSTA,A6	CLEAR DWT-STATUS
	LDK	A1,0	PRESET RETURN CODE
	CWR	A8,A6	REQUESTING DWT ? 
	RF(E)	RQCL80	YES-COMPLETE REQUEST
	LD	A2,DWTST,A6	A PENDING REQUEST ? 
	RB(N)	RQCL40	NO TAKE NEXT DWT
	LDK	A1,R:SEQ	COMPLETE REQUEST WITH SEQUENCE ERROR
RQCL80	EQU	*
	CF	A15,TENDIO	COMPLETE THE REQUEST 
	RB	RQCL40	TAKE NEXT ON QUEUE 
RQCL90	EQU	*
				=1
	LDR	A6,A8	GET REQUESTING DWT ADDR
	LD	A8,DWTECB,A6	RESTORE ECB ADDRESS
				=1
	RF(Z)	RQCL92	REQUEST ALREADY COMPLETED	=1
	LDK	A1,0	RC=0	=1 
	CF	A15,TENDIO	COMPLETE CLOSE REQUEST	=1
RQCL92	EQU	*		=1
	IFT	P6805=0		=1
	LDKL	A5,STB		=1
	CF	A5,CHALTI	HALT I/P DEVICE	=1
	CF	A5,CHALTO	HALT O/P DEVICE	=1
	LDK	A2,0		=1 
	CIO	A2,1,LCUIN	DISCONNECT MODEM	=1 
	XIF			=1 
	IFT	P6805=1		=1
	LDK	A2,1	DISCONNECT ORDER	=1 
	CIO	A2,0,LCUIN	DISCONNECT MODEM	=1 
	XIF			=1 
	CMR	A7	REMOVE NETWORK ADDRESS	=1 
	CM	DTESTA,A7	CLEAR STATUS	=1 
	LD	A1,DCTPGP	POLL TIMER RUNNING ?	=6 
	RF(Z)	RQCL94	NO	=6 
	CM*	DCTPGP	KILL TIMER	=6 
	CM	DCTPGP	CLEAR POINTER	=6 
RQCL94	EQU	*		=6
	CM	DTEDLS,A7	INDICATE DATA LINK DOWN	=6
	ABL	TDISP		=1
RQCL95	EQU	*
	LDK	A2,2 
	ST	A2,DTESTA,A7	SET DTE OPEN AGAIN 
	LDR	A6,A8	RESTORE DWT ADDRESS
	ABL	RTSEQ	SEQUENCE ERROR 
	EJECT
* 
*	CONNECT PASSIVE REQUEST 
* 
*	ACTIVATION PARAMETERS:
*		- SYMBOLIC SUBADDRESS (RIGHTMOST BYTE IN ECBBA-BFR)
*		- DEVICE ADDRESSES IN ECBBA-BFR
*		- LENGTH OF BUFFER (ECBRL) 
*		- SYMBOLIC DTE-ADDRESS (ECBCW2)
* 
*	FUNCTIONS:
*		1. VERIFY DTE-ADDRESS AS PER OPEN REQUEST
*		2. VERIFY & CONVERT SUBTERMINAL ADDRESS
*		3. VERIFY AND STORE DEVICE ADDRESSES 
*		4. LINK CALLING DWT TO QUEUE 
* 
RQCON	EQU	* 
	LD	A2,DTELAD,A7	SYMBOLIC DTE-ADDR
	CW	A2,ECBCW2,A8	CORRECT DTE ?
	ABL(NE)	RTREQ	NO, RETURN: REQUEST ERROR
	LD	A2,DTESTA,A7	GET DTE STATUS 
	SUK	A2,2	OPEN ?
	ABL(NZ)	RTSEQ	NO, RETURN: SEQUENCE ERROR 
	LD	A2,DWTSTA,A6	GET DWT STATUS 
	SUK	A2,2	ALREADY CONNECTED ? 
	ABL(Z)	RTOK	ALREADY CONNECTED	=17
	IFT	MESPAS=1		=13
	LDK	A2,/40	OPTION CODE	=13 
	CC	A2,DWTOPT,A6	DISCARD DWT ?	=13
	RF(NE)	RQCN10	NO	=13 
	CM	DWTCHP,A6	INDICATE DISCARD DWT	=13
	LD	A1,DTEDDT,A7	POINTER TO DISCARD DWT	=13 
	RF(NZ)	RQCN50	MORE THAN ONE DISC. DWT ?	=13
	ST	A6,DTEDDT,A7	SAVE POINTER TO TO DISCARD DWT	=13 
	RF	RQCN60		=13 
RQCN10	EQU	*		=13 
	XIF			=13
	IFF	MMUPAG=0 
	LDKL	A4,SUBBUF	MMU BUFFER ADDRESS	=16
	ST	A4,ECBBA,A8	TO ECB
	CF	A15,DC:MOT	MOVE DATA TO MMU BUFFER
	XIF
	LD	A4,ECBBA,A8	GET ECB-BUFFER ADDRESS
	IFT	MSV1=1 
	LDK	A2,0	RESET A2
	LCR	A2,A4	GET SELECT SUB-ADDRESS 
	SC	A2,DWTSUB,A6	SAVE IT IN THE DWT 
	LD	A1,ECBCW2,A8	GET SYMBOLIC DTE-ADDRESS 
	CF	A15,GETSNA	VALIDATE AND TRANSLATE THE SUB-ADDR
	LDR	A1,A1	IS IT OK ? 
	RF(NN)	RQCN20	YES
	CM	DWTSUB,A7	CLEAR SUB-ADDRESS 
	ABL	RTREQ	RETURN REQUEST ERROR 
RQCN20	EQU	*
	IFT	CODE=1 
	LC	A1,TASCII,A1	CONVERT FROM EBCDIC TO ASCII 
	XIF
	IFT	MSV1=1 
	SC	A1,DWTCHP,A6	SAVE NETWORK ADDRESS 
	XIF
	LC	A2,1,A4	GET SYMBOLIC ADDRESS	=8 
	SC	A2,DWTSUB+1,A6	SAVE IT IN THE DWT 
	LD	A1,ECBCW2,A8	GET SYMBOLIC DTE ADDRESS 
	ST	A1,DWTLAD,A6	SAVE IT IN THE DWT 
	CF	A15,GETSNA	VALIDATE AND TRANSLATE THE SUB-ADDRESS 
	LDR	A1,A1	IS IT OK ? 
	RF(NN)	RQCN30	YES
	CM	DWTSUB,A6	CLEAR SUB-ADDRESS 
	CM	DWTLAD,A6	CLEAR DTE ADDRESS 
	ABL	RTREQ	RETURN REQUEST ERROR 
RQCN30	EQU	*
	IFT	CODE=1 
	LC	A1,TASCII,A1	CONVERT FROM EBCDIC TO ASCII 
	XIF
	SC	A1,DWTCHP+1,A6	SAVE NETWORK ADDRESS 
	IFT	EM3270=1 
	ST	A1,ECBCW2,A8
	XIF
* 
* 
*		LINK DWT TO CONFIGURATION CHAIN
* 
				=13 
RQCN40	EQU	*
	LD	A1,DTEDWT,A7	GET POINTER TO DWT QUEUE 
	RF(NZ)	RQCN50	YES
	ST	A6,DTEDWT,A7	SAVE POINTER TO DWT QUEUE
	RF	RQCN60
RQCN50	EQU	*
	LDR	A2,A1	MOV ADDR TO A2 
	LD	A1,DWTCHN,A2	POINTER TO NEXT DWT
	RB(NZ)	RQCN50	KEEP ON UNTIL LAST IN CHAIN
	ST	A6,DWTCHN,A2	ADD NEW DWT TO CHAIN 
RQCN60	EQU	*
	CM	DWTCHN,A6	END OF CHAIN MARKER 
	ST	A7,DWTCHD,A6	BACKWARD LINK TO ANCHOR
	LDK	A2,2	
	ST	A2,DWTSTA,A6	SET STATUS: CONNECTED
	LDKL	A2,/8000
	ST	A2,DWTRTV,A6	STORE NO TIMING
				=13 
	IFT	STARVI=1 
	LD	A1,DWTCHP,A6	DISCARD DWT ?	=13
	RF(Z)	RQCN65	YES, DO NOT SEND DE	=13 
	LD	A1,ECBCW1,A8	GET DEVICE STATUS	DK1
	RF(NZ)	RQCN63	NOT DE 
	LDK	A1,4	DE
RQCN63	EQU	*	 
	ORS	A1,DWTST,A6	PUT IT IN DWT	DK1
	CF	A15,INSSQ	INSERT DWT IN STATUS QUEUE
RQCN65	EQU	*		=13 
	XIF
* 
*	START POLL TIMER
* 
	LD	A2,DCTPGP	POLL TIMER POINTER
	RF(NZ)	RQCN70	TIMER ALREADY STARTED	=6 
	CF	A15,SPOTIM
RQCN70	EQU	*
	ABL	RQOP90 
	EJECT
* 
*	DISCONNECT REQUEST
* 
*	ACTIVATION PARAMETERS:
*		DWT-ADDRESS (A6) 
* 
*	FUNCTIONS:
*		1. CHECK IF IN CONNECTED STATE 
*		2. REMOVE DWT-ADDRESS FROM CONFIGURATION CHAIN 
*		3. SET DWT STATUS DISCONNECTED 
* 
*	COMPLETION PARAMETERS:
*		RETURN CODE (A1) 
* 
RQDIS	EQU	* 
	LD	A2,DWTSTA,A6	DWT STATUS = DISCONNECTED ?
	ABL(Z)	RTOK	YES, RETURN: OK
	LD	A3,DTEDWT,A7	FIRST DWT ADDR TO A3 
	RF(Z)	RQDI20	END OF CHAIN
	CWR	A3,A6	OUR DWT ?
	RF(NE)	RQDI10	NO 
	CF	A15,RELBUF	RELEASE QUEUED BUFFERS 
	LD	A3,DWTCHN,A6	YES-TAKE POINTER TO NEXT DWT 
	CM	DWTSTA,A6	SET DWT FREE
	ST	A3,DTEDWT,A7	STORE DWT-ADDR IN DTETAB 
	RB	RQCN70
RQDI10	EQU	*
	LDR	A5,A3	A5 CONTAINES PREVIOUS DWT-ADDR 
	LD	A3,DWTCHN,A5	A3 CONTAINES ADDR TO NEXT DWT ON CHAIN 
	RF(Z)	RQDI20	END OF CHAIN
	CWR	A3,A6	OUR DWT ?
	RB(NE)	RQDI10	NO TAKE NEXT IN CHAIN
	CF	A15,RELBUF	RELEASE QUEUED BUFFERS 
	LD	A3,DWTCHN,A6	YES-TAKE POINTER TO NEXT DWT 
	ST	A3,DWTCHN,A5	AND STORE IT IN PREVIOUS DWT 
	CM	DWTSTA,A6	SET DWT FREE
	RB	RQCN70
RQDI20	EQU	*
	IFT	MESPAS=1 
	LD	A3,DTEDDT,A7	TAKE THE DISCARD DWT ADDR
	CWR	A3,A6	OUR DWT ?
	RF(NE)	RQDI30	SEQUENCE ERROR 
	CF	A15,RELBUF	RELEASE BUFFERS QUEUED 
	CM	DTEDDT,A7 
	CM	DWTSTA,A6	SET DWT FREE
	RB	RQCN70
RQDI30	EQU	*
	XIF
	ABL	RTSEQ	SEQUENCE ERROR 
	EJECT
* 
* 
*	READ STATUS REQUEST 
* 
*	ACTIVATION PARAMETERS:
*		DWT - ADDRESS (A6) 
* 
*	FUNCTIONS:
*		1. TRANSFER LOGICAL CONNECTION STATUS TO APPLICATION 
* 
*	COMPLETION PARAMETERS:
*		LOGICAL CONNECTION STATUS (ECBCW1) 
* 
*	0       3 4       7 8      11 12      15
*	........................................
*	.  DWT   .  DTE    .  DATA   .  PHYS   .
*	.  STATE .  STATE  .  LINK   .  LINK   .
*	.        .         .  STATUS .  STATUS .
*	........................................
* 
RQRSTS	EQU	*
	IFT	EM3270=1 
	LD	A2,ECBCW1,A8	GET OPTION CODE
	RF(NZ)	RQRS10	TEST IF ANY MESSAGE
	XIF
	LD	A2,DWTSTA,A6	DWT STATUS 
	SLL	A2,4	BITS 0-3
	AD	A2,DTESTA,A7	DTE STATUS 
	SLL	A2,4	BITS 4-7
	AD	A2,DTEDLS,A7	DATA LINK STATUS 
	SLL	A2,4	BITS 8-11 
	AD	A2,DTEPLS,A7	PHYSICAL LINK STATUS (BITS 12 - 15)
	ST	A2,ECBCW1,A8	STATUS TO ECB CONTROL WORD 1 
	ABL	RTOK	RETURN: OK
	IFT	EM3270=1 
* 
* 
*		ANY MESSAGE ORDER (ONLY IF EM3270 = 1) 
* 
RQRS10	EQU	*
	LD	A2,DTESTA,A7	GET DTE STATUS 
	SUK	A2,2	OPEN ?
	ABL(NZ)	RTSEQ	NO,SEQUENCE ERROR
	LD	A2,DWTSTA,A6	GET DWT STATUS 
	SUK	A2,2	CONNECTED ? 
	ABL(NZ)	RTSEQ	NO,SEQUENCE ERROR
	LD	A4,DWTIPC,A6	ANY QUEUED MESSAGE ON THIS DWT ? 
	ABL(NZ)	RTOK	YES COMPLETE THE REQUEST
	ABL TDISP	TO DISPATCHER
	XIF
	EJECT
* 
*	SET STATUS REQUEST
* 
* 
*	ACTIVATION PARAMETERS 
*		DWT ADDRESS (A6) 
* 
*	FUNCTIONS:
*		SET DEVICE STATUS (ONLY IF STARVI = 1) 
* 
*		DE DEVICE END : X`'00' 
* 
*		IR INTERVENTION REQUIRED : X'01' 
* 
*		DB DEVICE BUSY :X'10'
* 
*	COMPLETION PARAMETERS:
*		RETURN CODE (A1) 
* 
RQSST	EQU	* 
	IFT	STARVI=0 
	ABL	RTREQ	SET STATUS NOT INCLUDED
	XIF
	IFT	STARVI=1 
	LD	A1,ECBCW1,A8	GET DEVICE STATUS
	ANK	A1,/1	'IR' ?	DK1 
	RF(Z)	RQST20	NO	DK1
	CF	A15,INSSQ	QUEUE THE DWT (STATUS)	DK1
	RF	RQST90	 	DK1
RQST20	EQU	*	 	DK1
	LD	A1,ECBCW1,A8	 	DK1
	ANK	A1,3	MASK DB,IR
	RF(NZ)	RQST90	NOT DE 
	LD	A1,DWTST,A6	GET DEVICE STATUS 
	ANK	A1,/B	WACK SENT, DB OR IR ?	=2 
	RF(Z)	RQST90	NO	=2 
	CF	A15,INSSQ	INSERT DWT IN STATUS QUEUE
	LDK	A1,4	SET DE
RQST90	EQU	*
	ORS	A1,DWTST,A6	SAVE STATUS
	ABL	RTOK	RETYURN : OK
	XIF
	EJECT
* 
*	READ/RESET STATISTICS REQUEST 
* 
*	ACTIVATION PARAMETERS:
*		TYPE = BITS 0-7 OF ECBCW1
*		ECB-ADDRESS (A8) 
*		DWT-ADDRESS OF LOW-LEVEL DWT (A6)
* 
*	FUNCTIONS:
*		1. READ STATISTICS TO USER AREA
*		2. RESET ALL STATISTICS BUFFERS
* 
*	COMPLETION PARAMETERS:
*		NUMBER OF BYTES TRANSFERRED (ECBEL)
*		RETURN CODE (A1) 
* 
RQSTAT	EQU	*
	IFT	STTSTS=0 
	ABL	RTREQ	RC : REQUEST ERROR NO STATISTICS INCLUDED
	XIF
	IFF	STTSTS=0 
	CF	A15,DCSRED	READ STATISTICS
	LDR	A1,A1	OK?
	ABL(NZ)	RTREQ	NO, RETURN: REQUEST ERROR
	LD	A1,ECBCW1,A8	GET TYPE 
	SRL	A1,8	TYPE FIELD TO LEFT BYTE 
	CCK	A1,TYPRR	CORRECT TYPE? 
	RF(NE)	RQST40
	CF	A15,DCSRLL	RESET ALL STATISTICS BUFFERS 
	LDR	A1,A1	LUCKY AGAIN? 
	ABL(NZ)	RTREQ	NO, RETURN: REQUEST ERROR
RQST40	EQU	*
	ABL	RTOK	RETURN: OK
	XIF
	EJECT
* 
*	SET TIMEOUT VALUE 
* 
*	ACTIVATION PARAMETERS:
*		ECBCW1 >= 0 : ACTIVATE TIMING CONTROL
*		              TIMEOUT VALUE IN MULTIPLES OF 100 MS;
*		              0 = IMMEDIATE TIMEOUT. 
*		       < 0:   DE-ACTIVATE TIMING CONTROL 
* 
*	FUNCTIONS:
*		STORE VALUE DIRECTLY IN CALLER'S DWT 
* 
*	COMPLETION PARAMETERS:
*		DWTRTV = TIMEOUT VALUE = ECBCW1
* 
RQTIME	EQU	*
	LD	A2,ECBCW1,A8	GET TIMEOUT VALUE FROM ECB 
	ST	A2,DWTRTV,A6	STORE IN DWT 
	ABL	RTOK	RETURN: OK
	EJECT
* 
*	SEND REQUEST
* 
*	ACTIVATION PARAMETERS:
*		BUFFER ADDRESS (ECBBA) 
*		BUFFER LENGTH (ECBRL)
*		SUBTERMINAL ADDRESS (DWT)
*		ECB CONTROL WORD 1 
*	
*	FUNCTIONS:
*		1. VERIFY THAT LOGICAL & PHYSICAL CONNECTIONS EXIST. 
*		2. VERIFY BUFFER SIZE IF MMU 
*		3. QUEUE REQUESTING DWT
*		4. COMPLETE WHEN ACK'D OR TIMEOUT. 
* 
RQSEND	EQU	*
	LD	A2,DWTSTA,A6	GET DWT STATUS 
	SUK	A2,2	CONNECTED ? 
	ABL(NZ)	RTSEQ	NO, RETURN: SEQUENCE ERROR 
	LD	A2,DTEPLS,A7	PHYSICAL CONNECTION ACTICE ? 
	ABL(Z)	RTPHYC	NO, RETURN: PHYSICAL CONNECTION ERROR
	LD	A2,DTEDLS,A7	LOGICAL CONNECTION ACTIVE ?
	ABL(Z)	RTLOGC	NO, RETURN: LOGICAL CONNECTION ERROR 
	LC	A2,DWTOPT,A6	GET OPTION 
	ANK	A2,/FF 
	RF(Z)	RQSE10	THERE IS NO OPTION
	SUK	A2,/20	WHICH OPTION ?
	ABL(NZ)	RTREQ	WRONG OPTION :REQUEST ERROR
	CF	A15,RELBUF	RELEASE BUFFERS QUEUED 
RQSE10	EQU	*
	IFT	MMUPAG=1 
	LD	A2,ECBRL,A8	REQUESTED LENGTH
	CWK	A2,BUFLEN	ILLEGAL LENGTH ? 
	ABL(G)	RTLGTH	YES, RETURN: ILLEGAL BUFFER LENGTH 
	XIF
	CF	A15,TIMEWR	START TIMER
	CF	A15,INSWQ	QUEUE SEND REQUEST
	ABL	TDISP
* 
	EJECT
* 
*	RECEIVE REQUEST 
* 
*	ACTIVATION PARAMETERS:
*		BUFFER ADDRESS (ECBBA) 
*		REQUESTED BUFFER LENGTH IN CHARS. (ECBRL)
*		SUBTERMINAL ADDRESS (DWT)
* 
*	FUNCTIONS:
*		1. VERIFY THAT LOGICAL & PHYSICAL CONNECTIONS EXIST. 
*		2. TRANSFER TO THE APPLICATION ANY MESSAGE QUEUED FOR THE DWT, 
*		3. COMPLETE WHEN MESSAGE RECEIVED OR NO MESSAGE RECEIVED 
*		   WITHIN TIMEOUT PERIOD.
* 
*	COMPLETION PARAMETERS:
*		ACTUAL LENGTH OF RECEIVED MESSAGE (ECBEL)
*		RETURN CODE (A1) 
* 
RQRECE	EQU	*
	LD	A2,DWTSTA,A6	GET DWT STATUS 
	SUK	A2,2	CONNECTED ? 
	ABL(NZ)	RTSEQ	NO, RETURN: SEQUENCE ERROR 
	LD	A2,DTEPLS,A7	PHYSICAL CONNECTION ACTIVE ? 
	ABL(Z)	RTPHYC	NO, RETURN: PHYSICAL CONNECTION ERROR
	LD	A4,DWTIPC,A6	ANY BUFFER ON QUEUE ?
	RF(NZ)	RQRE10	YES
	LD	A2,DTEDLS,A7	LOGICAL CONNECTION ACTIVE ?
	ABL(Z)	RTLOGC	NO, RETURN: LOGICAL CONNECTION ERROR 
	CF	A15,TIMERE	START TIMER
	RF	RQRE40	GO TO DISPATCHER 
RQRE10	EQU	*
	LD	A3,2,A4	EFFECTIVE LENGTH
	ST	A3,ECBEL,A8 
	LD	A1,DWTLAD,A6	SYMBOLIC DTE-ADDRESS 
	LD	A2,4,A4	NETWORK SUB-ADDRESS 
	CF	A15,GETSSA	GET SYMBOLIC SUB-ADDRESS 
	ST	A1,ECBCW2,A8	AND SAVE IT IN ECB 
	IFT	REMTIM=1		=9 
	LD	A1,DWTRTV,A6	GET REQUESTED TIMEOUT VALUE	=9 
	ST	A1,ECBCW1,A8	STORE IN CONTROL WORD 1	=9 
	XIF			=9 
	LDK	A1,0	RC : ACCEPTED AND COMPLETED 
	LDR*	A2,A4	GET NEXT BUFFER IN QUEUE
	RF(Z)	RQRE20	NO MORE BUFFERS IN QUEUE
	ORKL	A1,R:DATA	RC: AND MORE DATA AVAILABLE 
RQRE20	EQU	*
	ST	A2,DWTIPC,A6 	STORE AS FIRST IN QUEUE 
	ADK	A4,6 
	CF	A15,DC:MIN	MOVE DATA TO USER BUFFER 
RQRE40	EQU	*
	ABL	TDISP	GO TO DISPATCHER 
	EJECT
* 
* 
*		COMPLETE APPLICATION REQUEST 
* 
RTREQ	EQU	* 
	LDKL	A1,R:REQ	RC = REQUEST ERROR 
	RF	RQRTN 
RTABRT	EQU	*
	LDKL	A1,R:ABRT	RC = ABORTED
	RF	RQRTN 
RTTIME	EQU	*
	LDK	A1,R:TIME	RC = TIME OUT
	RF	RQRTN 
RTSEQ	EQU	* 
	LDK	A1,R:SEQ	RC = SEQUENCE ERROR 
	RF	RQRTN 
RTLGTH	EQU	*
	LDK	A1,R:LGTH	RC = ILLEGAL LENGTH
	RF	RQRTN 
RTLOGC	EQU	*
	LDK	A1,R:LOGC	RC = LOGICAL CONNECTION ERROR
	RF	RQRTN 
RTPHYC	EQU	*
	LDK	A1,R:PHYC	RC = PHYSICAL CONNECTION ERROR 
	RF	RQRTN 
RTOK	EQU	*
	LDK	A1,0	RC = OK 
RQRTN	EQU	* 
	ABL	DISEND	COMPLETE REQUEST AND GO TO DISPATCHER 
	EJECT
* 
*	LOOKUP - LOOK UP KEY IN TABLE & BRANCH ON ADDRESS 
* 
*	CALL: 
*		CF     A15,LOOKUP          TABLE ADDRESS TO STACK
*		DATA   LAST,ADDRE          LAST ENTRY; ERROR ADDRESS 
*		DATA   KEY1,ADDR1          KEY (A2); ADDRESS FOR BRANCH
*		 "       "    "
*	LAST	DATA   KEYN,ADDRN
* 
*	ENTRY: A2 = KEY VALUE 
*	EXIT: A3 & A4 DESTROYED 
* 
LOOKUP	EQU	*
	LDR*	A3,A15	POINT TO NEXT INSTRUCTION ADDRESS IN STACK 
	LDR*	A3,A15	GET CONTENTS = TABLE ADDRESS 
	LDR*	A4,A3	GET LAST LEGAL ADDRESS
	LD	A1,2,A3	ERROR ADDRESS 
* 
LOOK50	EQU	*	LOOP ENTRY 
	ADK	A3,4	GET NEXT TABLE ENTRY ADDRESS
	CWR	A3,A4	PAST THE END?
	RF(G)	LOOK90	YES = NOT FOUND 
	CWR*	A2,A3	KEY = VALUE IN TABLE? 
	RB(NE)	LOOK50	NO - CHECK NEXT ENTRY
	ABI	2,A3	BRANCH TO TABLE ADDRESS 
*		KEY NOT FOUND
LOOK90	EQU	*
	LDR	P,A1	GO TO ERROR ADDRESS 
	EJECT
* 
* 
* 
*	REQUEST TIMER HANDLING PART 
* 
* 
* 
*	RECEIVE TIMER=TIMERR
* 
TIMERE	EQU	*
	LDR	A1,A6
	LD	A2,DWTRTV,A6	GET TIMEOUT VALUE
	RF(N)	TIMRTN	NO TIMING 
	RF(Z)	ITOUTR	TIMER=0 => IMMEDIATE TIMEOUT
	ST	A2,TIMERR 
	CF	A15,SETIME
	DATA	TOUTRE
TIMERR	DATA	0 
	ST	A4,DWTRTP,A6	STORE TIMER POINTER
TIMRTN	EQU	*
	ABL	RTNA15 
* 
*	TIMEOUT READ TIMER
* 
ITOUTR	EQU	*
	ADKL	A15,4 
	RF	TIMOUT
TOUTRE	EQU	*
	LDR	A6,A1	FETCH DWT
	CM	DWTRTP,A6 
	RF	TIMOUT	COMPLETE REQUEST RC=TIMEOUT
* 
* 
*		 RETURN FROM TIMER HANDLING
* 
	EJECT
* 
*	SEND TIMER=TIMWR
* 
TIMEWR	LDR	A1,A6
	LD	A2,DWTRTV,A6	GET TIMEOUT VALUE
	RB(N)	TIMRTN	NO TIMING 
	RB(Z)	ITOUTR	TIMER=0 => IMMEDIATE TIMEOUT
	ST	A2,TIMWR
	CF	A15,SETIME
	DATA	TOUTWR
TIMWR	DATA	0
	ST	A4,DWTRTP,A6
	RB	TIMRTN
* 
*	TIMEOUT WRITE TIMER 
* 
TOUTWR	EQU	*
	LDR	A6,A1	FETCH DWT
	CM	DWTRTP,A6 
	CF	A15,REMOVW	REMOVE FROM WRITE QUEUE
* 
* 
*	THIS INSTRUCTION DOES NOT BELONG
*	TO THE STANDARD INTERFACE 
	LD	A2,FDWTUT 
	CWR	A2,A6
	RF(NE)	TIMOUT	THIS DWT IS NOT WRITING
	CM	XACK	INDICATE 'ACK NOT EXPECTED'
	CM	FDWTUT
TIMOUT	EQU	*
	ABL	RTTIME	COMPLETE REQUEST RC=TIMEOUT 
	EJECT
* 
* 
*	STOP REQUEST TIMING 
* 
*	REMAINING TIME IS RETURNED IN A2
* 
* 
CTIME	EQU	* 
	LD	A2,DWTRTP,A6	GET TIMER POINTER
	RF(Z)	CTIM10	NOT RUNNING 
	IFT	REMTIM=1		=9 
	LDR*	A2,A2		=9 
	NGR	A2,A2	GET REMAINING TIME	=9
	XIF			=9 
	CM*	DWTRTP,A6	KILL TIMER	=9
	CM	DWTRTP,A6 
				=3
CTIM10	EQU	*
	ABL	RTNA15 
	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
	INH
	LDR*	A4,A2 
	RF(Z)	GBUF10	NO BUFFER FREE
	LDR*	A3,A4	REMOVE BUFFER FROM FREE CHAIN 
	STR	A3,A2
GBUF10	EQU	*
	ABL	RTNA15 
	EJECT
* 
* 
*	RELEASE RECEIVE BUFFER
* 
*	A4 CONTAINS BUFFER ADDRESS
*	CALLING SEQUENCE: CF A15,RRBUF
*	A2 AND A3 ARE DESTROYED 
* 
* 
RRBUF	LDKL	A2,DCRBUF	RECEIVE BUFFERS
	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 
	EJECT
* 
*	RELEASE ALL RECEIVE BUFFERS QUEUED ON A DWT 
* 
*	A6 - DWT ADDR 
*	A1 AND A4 ARE DESTROYED 
*	CALLING SEQUENCE: CF    A15,RELBUF
* 
* 
RELBUF	EQU	*
	LDK	A1,DWTIPC	SET BUFFER QUEUE DISP. 
	ADR	A1,A6
RLBU10	EQU	*
	LDR*	A4,A1	NEXT IN BUFFER QUEUE
	RB(Z)	GBUF10 
	LDR*	A2,A4	REMOVE FROM QUEUE 
	STR	A2,A1	.
	CF	A15,RRBUF	RELEASE BUFFER
	RB	RLBU10
	EJECT
* 
* 
*	INSERT DWT IN SEND REQUEST QUEUE
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSWQ	LDKL	A2,DCWRQ	GET QUEUE ANCHOR
	LDK	A4,DWTOPN
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 
	EJECT
* 
* 
*	REMOVE DWT FROM SEND REQUEST QUEUE
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
REMOVW	LDKL	A2,DCWRQ	GET QUEUE ANCHOR 
	LDK	A4,DWTOPN	GET DWT-LINK TO BE REMOVED 
REM06	EQU	* 
	ADR	A4,A6	 
REM10	LDR*	A3,A2
	RB(Z)	GBUF10	NOT ON QUEUE: RETURN
	CWR	A3,A4
	RF(E)	REM15
	LDR	A2,A3	GET NEXT 
	RB	REM10 
REM15	LDR*	A3,A4	REMOVE 
	STR	A3,A2
	RB	GBUF10	RETURN 
	EJECT
* 
* 
*	INSERT DWT IN STATUS QUEUE
* 
	IFF	STARVI=0 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSSQ	EQU	*	
	LDKL	A1,PENDST	INDICATE STATUS MESSAGE	DK2 
	ORS	A1,DWTST,A6	PENDING	DK2
	LDKL	A2,DCSTQ	GET QUEUE ANCHOR	
	LDK	A4,DWTOPE
	RB	INSWQ2
* 
* 
*	REMOVE DWT FROM STATUS QUEUE
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
REMOVS	EQU	*	 
	LDKL	A1,PENDST	CLEAR STATUS PENDING	DK2
	C1R	A1,A1	INDICATION	DK2 
	ANS	A1,DWTST,A6	.	DK2
	LDKL	A2,DCSTQ	GET QUEUE ANCHOR	
	LDK	A4,DWTOPE
	RB	REM06 
	XIF
	EJECT
* 
* 
*	QUEUE ALLOCATED RECEIVE BUFFER
* 
*	A4=BUFFER ADDR
*	A2,A3 DESTROYED 
* 
QRBUF	EQU	* 
	SUK	A4,6 
	LDK	A2,DWTIPC	SET BUFFER QUEUE DISP. 
	ADR	A2,A6
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
* 
* 
*	STORE REGISTER A3-A8
*	CALLING SEQUENSE: CF A15,STREG
* 
STREG	ST	A3,LCA3
	ST	A4,LCA4 
	ST	A5,LCA5 
	ST	A6,LCA6 
	ST	A7,LCA7 
	ST	A8,LCA8 
	RF	RTNA15	RETURN 
* 
* 
*	RESTORE 
*	CALLING SEQUENCE: CF A15,LDREG
* 
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
* 
* 
*		RETURN VIA REGISTER 15 
* 
RTNA15	EQU	*
	ADKL	A15,4 
	ABR*	A15 
	EJECT
* 
*	POLL TIME OUT 
* 
PTOUT	LDKL	A5,STB	LOAD A5 STACK BASE
	LDR	A6,A1	RELOAD DWT ADDRESS 
	LDKL	A7,DTETAB 
	CM	DTEDLS,A7 
	IFT	STTSTS=1 
* 
* 
*		COUNT POLL TIME OUT
* 
	LDK	A1,CSSXC3
	CF	A15,DCSUPS
	XIF
	CF	A15,SPOTIM	START POLL TIMER 
	ABL	TDISP
* 
*	RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED
* 
CPTIM	EQU	* 
	LDK	A2,1	INDICATE
	ST	A2,DTEDLS,A7	DATA LINK UP 
	LDKL	A2,-TIMPOL
	ST*	A2,DCTPGP	RESTART TIMER
	RTN	A5 
* 
*	START POLL TIMER
* 
SPOTIM	EQU	*
	LDR	A1,A6	LOAD DWT ADDRESS AS PARAMETER
	CF	A15,SETIME	START TIMER
	DATA	PTOUT,TIMPOL
	ST	A4,DCTPGP	STORE TIMER POINTER 
	RB	RTNA15	RETURN 
	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
	LDKL	A7,DTETAB 
	IFT	STTSTS=1 
* 
* 
*		COUNT PROCEDURE TIME OUT 
* 
	LDK	A1,CSSXC2
	CF	A15,DCSUPS
	XIF
	CF	A5,CHALTI	HALT INPUT IF OPEN	SALCUZ 
	LD	A1,XACK 
	RF(Z)	PRT10	ACK NOT EXPECTED 
	CF	A5,TRENQ	SEND ENQ 
	CF	A5,SPTIM	START PROCEDURE TIMER
PRT10	ABL	BRM 
	EJECT
* 
*	STOP PROCEDURE TIMER
* 
HPTIM	LD	A1,DCTPP	GET TIMER POINTER 
	RF(Z)	HPT10	NOT RUNNING
	CMR	A1	STOP TIMER
	CM	DCTPP 
HPT10	RTN	A5

* 
* 
*   WAIT 1 SEC. FOR MODEM CONNECTION
* 

DTE:ON	LDR	A1,A6	DWT ADDRESS
	CF	A15,SETIME	WAIT 1 SEC.
	DATA	DTE:10,10 
				=1
	LDKL	A5,STB		=1
	CF	A5,CSYNCI	CONNECT MODEM	=1
	CF	A5,CHALTI	NO INTERRUPTS ALLOWED	=1
	ABL	TDISP	=1 


* 
* 
*   MODEM-CONNECT TIMEOUT 
* 

DTE:10	LDR	A6,A1	DWT ADDRESS
	LDKL	A7,DTETAB 
	IM	DTESTA,A7	SET OPEN STATUS	=1
	LDKL	A5,STB		=1
	CF	A5,CSYNCI	PUT CU IN ACTIVE MODE	=1
	CF	A5,CHALTI	HALT I/P DEVICE TO GET MODEM STATUS	=1
	IM	DTEPLS,A7	PRESET PHYSICAL STATUS = OK	=1
	ANK	A2,1	MODEM OK ?	=1 
	RF(Z)	DTE:20	YES	=1
	CM	DTEPLS,A7	INDICATE PHYSICAL ERROR	=1
DTE:20	EQU	*		=1
	LDR	A1,A2	SET RETURN CODE	=1 
	CF	A15,TENDIO	COMPLETE THE REQUEST	=1
	CF	A15,SPOTIM	START POLL TIMER	=6
	ABL	BRM	START I/P	=1 
	EJECT
	IFT	MESPAS=1 
* 
* 
*		GET DWT ADDRESS
* 
MESDWT	EQU	*
	CWR	A6,A7	IS IT DTETAB-ADDRESS ? 
	RF(E)	MES200	YES 
	LD	A2,DTEDDT,A7	GET ADDR TO DDT
	CWR	A6,A2	IS IT DDT-ADDR 
	RF(E)	MES200	YES 
	LD	A2,DWTST,A6	ANY REQUEST ? 
	RF(N)	MESD50	NO
	LD	A2,DWTOR,A6	ANY MESSAGE ORDER ? 
	ANK	A2,/FF 
	RF(Z)	MES200	YES 
	SUK	A2,RECEIVE	A RECEIVE ORDER ? 
	RF(Z)	MES200	YES 
MESD50	EQU	*
	LD	A2,DTEDDT,A7	IS THERE A DDT CONNECTED ? 
	RF(Z)	MES100	NO
	LDR	A6,A2	GET DDT-ADDR 
	RF	MES200
MES100	EQU	*
	LDR	A6,A7	GET DTETAB-ADDR
MES200	EQU	*
	ABL	RTNA15	RETURN VIA A15
	XIF
	EJECT
* 
* 
*	BASIC RECEIVE MODE
* 
*	ENTERED EVERY TIME A MESSAGE
*	IS EXPECTED FROM THE MASTER SIDE
* 
* 
BRM	EQU	* 
	LDKL	A5,STB	LOAD STACKBASE 
	CM	SYNSW	CLEAR SYN-SWITCH
	CM	TPM	CLEAR TRANSPARENT TEXT
	CF	A5,CSYNCI	START INPUT WITH SYNC DEF 
* 
* 
* 
	CF	A5,READP	READ CHARACTER 
	RF(NZ)	BRM120	PARITY ERROR 
* 
* 
*		CHECK IF IT IS A CONTROL CHARACTER 
* 
	LDR	A1,A2
	CF	A15,LOOKUP	BRANCH ON CODES, TABLE ADDRESS TO STACK
	DATA	BRM100,BRM200	LAST ENTRY,POLL OR SELECT SEQUENCE
	DATA	PAD,BRM130	PAD RECEIVED	DK1 
	DATA	STX,STX100	STX RECEIVED 
	DATA	EOT,EOT100	EOT RECEIVED 
	DATA	ENQ,ENQ100	ENQ RECEIVED 
	DATA	DLE,DLE100	DLE RECEIVED 
BRM100	DATA	NAK,NAK100	NAK RECEIVED 
	EJECT
* 
* 
*		THROUGHPUT ERROR 
* 
BRM110	EQU	*
	CM	XSTA	INDICATE "INVALID MESSAGE" 
	LDKL	A5,STB	LOAD STACKBASE TO A5 
	CF	A5,CSYNCI	START INPUT WITH SYNC DEF 
* 
* 
*		WAIT FOR MARK HOLD TO RESYNC.
* 
BRM120	EQU	*
	CF	A5,READ	READ CHARACTER
	LD	A1,DCSTCU	ANY STATUS FROM CONTROL UNIT ?
	RF(NZ)	BRM130	YES
BRM125	EQU	*		DK1 
	ANK	A2,/7F 
	SUK	A2,/7F 
	RB(NZ)	BRM120	NO 
BRM130	EQU	*
	CF	A5,CHALTI	HALT INPUT
	RB	BRM 
	EJECT
* 
* 
*		CHECK IF IT IS A POLL OR A SELECT SEQUENCE 
* 
BRM200	EQU	*
	IFT	MSV1=0 
	LDR	A4,A2
	CF	A5,READP	READ CHARACTER 
	CWR	A2,A4
	RB(NE)	BRM125	INVALID SEQUENCE	DK1 
	XIF
	LDK	A3,0 
	CC	A2,1,A7	IS IT A POLL ?
	RF(E)	BRM210	POLLING 
	LDK	A3,2 
	CCR	A2,A7	IS IT A SELECT ? 
	RB(NE)	BRM125	INVALID SEQUENCE	DK1 
BRM210	EQU	*
	CF	A5,READP	READ 1:ST STA
	RB(NZ)	BRM	PARITY ERROR
	LDR	A4,A2
	IFT	MSV1=0 
	CF	A5,READP	READ 2:ND STA
	CWR	A2,A4
	RB(NE)	BRM120	INVALID SEQUENCE 
	XIF
	CF	A5,READP	READ ENQ 
	SUK	A2,ENQ 
	RB(NE)	BRM120	INVALID SEQUENCE 
* 
* 
*		YES SEQUENCE OK - HALT INPUT 
* 
	CF	A5,CHALTI 
	EJECT
* 
* 
*		CHECK IF IT IS A SELECT OR A POLL ADDRESS
* 
	LDK	A1,1 
	ST	A1,CACK	LOAD ACK-COUNTER
	LDR	A2,A4
	SUK	A3,2 
	RF(Z)	SELECT	SELECTING 
* 
* 
*		POLLING
* 
	CWK	A4,GP
	RF(E)	GPOLL	GENERAL POLL 
	CF	A5,FINTEP	CHECK IF STA PRESENT (POLL ADDRESS) 
				=10 
* 
	EJECT
* 
* 
*	SPECIFIC POLL HAS BEEN RECEIVED 
* 
* 
	IFF	STARVI+SPECP=0 
	LD	A1,XACK	
	RF(NZ)	POL100	ACK EXPECTED 
	LDR	A6,A3	LOAD DWT ADDRESS IN A6	=10 
	RF(Z)	POL150	REQ. DEV. NOT CONNECTED, SEND EOT	=10 
	CF	A5,CPTIM	CHECK POLLTIMER
	IFT	STARVI=1 
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,7 
	RF(NZ)	POL120	PENDING STATUS 
	XIF
	IFF	STARVI+SPECP=0 
	LD	A1,DWTST,A6 
	RF(N)	POL150	NO REQUEST
	LD	A1,DWTOR,A6	GET ORDER 
	ANK	A1,/FF	MASK AWAY OPTION PART 
	SUK	A1,6 
	RF(Z)	POL170	WRITE REQUEST 
	XIF
	RF	POL150	SEND EOT 
	EJECT
* 
* 
*	GENERAL POLL HAS BEEN RECEIVED
* 
* 
GPOLL	EQU	* 
	LD	A1,XACK	
	RF(Z)	POL110	ACK NOT EXPECTED
				=11 
POL100	EQU	*
	CF	A5,HPTIM	KILL PROCEDURE TIMER	=11 
	CF	A5,TRENQ	SEND ENQ 
	CF	A5,SPTIM	START PROCEDURE TIMER
	ABL	BRM	WAIT FOR RESPONSE
POL110	EQU	*	 
	CF	A5,CPTIM	CHECK POLL TIMER 
	IFF	STARVI=0 
	LD	A6,DCSTQ	 
	RF(Z)	POL140	NO STATUS TO BE SENT
	SUK	A6,DWTOPE	GET DWT ADDRESS
POL120	EQU	*
	CF	A5,TRSTA	SEND STATUS
	CF	A5,SPTIM	START PROCEDURE TIMER
	IM	XACK	SET 'ACK EXPECTED' 
	XIF
	IFF	STARVI=1 
	RF	POL140
	XIF
POL130	EQU	*
	ABL	BRM
POL140	EQU	*
	LD	A6,DCWRQ
	RF(NZ)	POL160	WRITE ON QUEUE 
POL150	EQU	*
	CF	A5,TREOT	SEND EOT 
	RB	POL130
POL160	EQU	*
	SUK	A6,DWTOPN	GET DWT ADDRESS
POL170	EQU	*
	LD	A8,DWTECB,A6	GET ECB ADDRESS
	RF(NZ)	POL180
	CF	A15,REMOVW
	RB	POL150
POL180	EQU	*
	ST	A8,FECB	SAVE ECB ADDRESS
	ST	A6,FDWTUT	SAVE A6 
	IFF	MMUPAG=0 
	LDKL	A4,MMUBUF	MMU WORK BUFFER 
	ST	A4,ECBBA,A8 
	CF	A15,DC:MOT	MOVE DATA FROM USER BUFFER 
	XIF
	LD	A4,ECBBA,A8	GET BUFFER ADDRESS
	LD	A3,ECBRL,A8	GET LENGTH
POL190	EQU	*
	ST	A4,FECBBA	SAVE BUFFER ADDRESS 
			.	=15
	ST	A3,FECBRL	SAVE LENGTH 
	CM	FBAX	RESET BUFFER INDEX 
POL200	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	POL130
	EJECT
* 
* 
*		SELECT HAS BEEN RECEIVED 
* 
SELECT	EQU	*
	CF	A5,FINTES 
	LDR	A6,A3	GET DWT-ADDR 
	RF(NZ)	SEL100
	IFT	MESPAS=1 
	LD	A6,DTEDDT,A7	GET DDT-ADDR 
	RF(NZ)	SEL100
	XIF
	LDKL	A6,DTETAB	DTETAB ADRR 
SEL100	EQU	*
	LD	A1,XACK	
	RB(NZ)	POL100	ERROR. ACK EXPECTED
	IFF	STARVI=0 
	LD	A1,DWTST,A6	GET STATUS
	LDR	A3,A1
	ANKL	A1,PENDST	STAT. MESSAGE PENDING?	DK2
	RF(Z)	SEL120	NO PENDING STATUS 
	CF	A5,TRRVI	SEND RVI 
	XIF
	IFF	STARVI=1 
	RF	SEL120
	XIF
SEL110	EQU	*
	ABL	BRM
SEL120	EQU	*
				=2
	IFT	STARVI=1		=2 
	ANK	A3,/A	WACK SENT OR DB ?	=2 
	RF(NZ)	SEL140	YES	=2 
	LD	A1,DWTST,A6	CHECK IR	DK2
	ANK	A1,1	.	DK2 
	RF(Z)	SEL130	NO, OPERABLE
	CF	A5,TRNAK	INOPERABLE	DK2 
	RB	SEL110	.	DK2
SEL130	EQU	*	 
	XIF
				=2
	LD	A1,DCRBUF 
	RF(NZ)	SEL150	BUFFER AVAILABLE 
	IFT	STTSTS=1 
	LDK	A1,CSSRBY	BUFFER NOT AVAILABLE 
	CF	A15,DCSUPS	INCREMENT COUNTER
	XIF
SEL140	EQU	*
				=2
	IFF	NOWACK=1		=2 
	CF	A5,TRWACK	SEND WACK 
	XIF
	RB	SEL110
SEL150	EQU	*
	CF	A5,PRREC	PREPARE FOR TEXT RECEPTION 
	ADK	A1,6 
	ST	A1,FBLST
	CF	A5,TRACK	SEND ACK,0 
	RB	SEL110
	EJECT
* 
* 
*	EOT HAS BEEN RECEIVED 
* 
* 
EOT100	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	IFT	RCOM=1 
	CM	XRB	RESET READ BUFFER 
	XIF
	LD	A1,XACK 
	RF(Z)	EOT120	ACK IS NOT EXPECTED 
	LD	A6,FDWTUT	GET WRITING DWT 
	RF(Z)	EOT110	NO ONE WRITING
	LDK	A1,2	SET RC=2
	CF	A5,CWRITE	COMPLETE WRITE REQUEST
EOT110	EQU	*
	CM	XACK	RESET 'ACK EXPECTED' 
EOT120	EQU	*
	CM	XSEL	RESET 'SELECTED' 
	ABL	BRM
	EJECT
* 
* 
*	STX HAS BEEN RECEIVED 
* 
* 
STX100	EQU	*
	CF	A5,HPTIM
	IFT	TPMODE=1 
	ABL	BRM120	INVALID SEQENCE 
STX110	EQU	*
	XIF
	LD	A1,XSEL 
	RF(Z)	STX150	NOT SELECTED
	LD	A1,DCRBUF 
	IFF	STTSTS=1 
	ABL(Z)	BRM120	NO BUFFER AVAILABLE
	XIF
	IFT	STTSTS=1 
	RF(NZ)	STX120
* 
*	NO BUFFER AVAILABLE 
* 
	LDK	A1,CSSRBY
	CF	A15,DCSUPS	INCREMENT COUNTER
	ABL	BRM120 
	XIF
STX120	EQU	*
	CF	A5,RDMESS	READ MESSAGE
	IFT	STTSTS=1 
* 
* 
*		COUNT MESSAGES RECEIVED
* 
	LDK	A1,CSSRBL
	CF	A15,DCSUPS
	XIF
	SUK	A3,1 
	RF(NZ)	STX170	MESSAGE OK 
STX130	EQU	*
	CM	XSTA	INDICATE 'INVALID MESSAGE' 
STX140	EQU	*
	CF	A5,TRNAK	SEND NAK 
	ABL	BRM
STX150	EQU	*
	IFT	RCOM=1 
	LD	A1,XACK 
	RF(Z)	STX160	ACK IS NOT EXPECTED 
	LD	A1,DCRBUF 
	RF(Z)	STX160	NO BUFFER AVAILABLE 
	LD	A6,FDWTUT	GET WRITING DWT 
	ABL(Z)	BRM120	NO ONE WRITING. RESYNCHRONIZE
	LDR*	A2,A6	GET STA 
	CF	A5,PRREC	PREPARE FOR TEXT RECEPTION 
	LDK	A1,0	SET RC=0
	CF	A5,CWRITE	COMPLETE WRITE REQUEST
	CM	CACK	PRESET ACK-1 
	RB	STX120	READ THE MESSAGE 
	XIF
STX160	CF	A5,READ	READ ONE CHARACTER
	CWK	A2,ENQPAR	IS IT ENQ ?
	RB(Z)	STX140	FORWARD ABORT SEQUENCE
	RB	EOT120
STX170	EQU	*
	IM	XSTA	INDICATE MESSAGE OK
	LD	A4,DCRBUF	GET BUFFER ADDRESS
	ADK	A4,6 
	CW	A4,FBLST
	RF(NE)	STX180	NOT FIRST BLOCK
	IFF	RCOM=0 
	LDK	A1,ESC 
	CCR	A1,A4
	RB(NE)	STX130	ESC NOT FOUND
	LC	A1,1,A4	GET COMMAND CODE
	SUK	A1,RDBCOM
	RF(Z)	RDBUF	READ MODIFIED RECEIVED 
	SUK	A1,RDMCOM-RDBCOM 
	RF(Z)	RDMOD	READ BUFFER RECEIVED 
	XIF
STX180	EQU	*
	SUK	A3,1 
	RF(Z)	STX280	SEND ACK
	LD	A6,FDWTIN	GET INPUT DWT 
	IFT	MESPAS=1 
	CF	A15,MESDWT
	XIF
	CWR	A7,A6	IS IT DTETAB ? 
	RF(E)	STX280	SEND ACK
	LD	A2,DWTSTA,A6	.	=14
	RF(Z)	STX280	TERMINAL DISCONNECTED	=14 
	CM	FBAX
	CF	A15,GRBUF	ALLOCATE RECEIVE BUFFER 
	ADK	A4,6 
	IFT	RCOM=1 
	LDR*	A2,A6	GET ADDRESS 
	LC	A2,TEBCDIC,A2	TRANSLATE IT TO EBCDIC
	LD	A1,DCRBUF	IS THERE A BUFFER 
	RF(Z)	STX200	NO
	ST	A2,+4,A1	STORE THE ADDR 
STX200	EQU	*
	XIF
	LD	A2,DWTST,A6	ANY REQUEST ? 
	RF(N)	STX220	NO
	LD	A2,DWTOR,A6	GET ORDER 
	IFT	EM3270=1 
	RF(Z)	STX210	ANY MESSAGE ORDER ? 
	XIF
	CWK	A2,RECEIVE	A RECEIVE ? 
	RF(NE)	STX220	NO 
STX210	EQU	*
				=12 
	LD	A8,DWTECB,A6	GET ECB ADDRESS
	LD	A3,-4,A4	GET LENGTH 
	ST	A3,ECBEL,A8	STORE EFFECTIVE LENGTH
	LD	A1,DWTLAD,A6	SYMBOLIC DTE ADDRESS	=12 
	LD	A2,-2,A4	NETWORK SUB-ADDRESS	=12
	CF	A15,GETSSA	GET SYMBOLIC SUB ADDRESS	=12 
	ST	A1,ECBCW2,A8	AND SAVE IT IN ECB	=12 
	LDK	A1,0	RESET RETURN CODE	=12 
	CF	A15,CTIME	STOP REQUEST TIMING 
	IFT	REMTIM=1		=9 
	ST	A2,ECBCW1,A8	STORE REMAINING TIME 
	XIF			=9 
STX220	EQU	*
	IFT	STARVI=1 
	LC	A2,+2,A4	GET WCC/CCC
	ANK	A2,/FF 
	LC	A2,TEBCDIC,A2 
	ANK	A2,8 
	RF(Z)	STX230 
	LD	A2,DWTST,A6 
	ORK	A2,/A
	ST	A2,DWTST,A6 
STX230	EQU	*
	XIF
	LD	A2,DWTST,A6	ANY REQUEST ? 
	RF(NN)	STX240	YES
	CF	A5,QRBUF	QUEUE BUFFER 
	RF	STX270
STX240	EQU	*
	LD	A2,DWTOR,A6	GET ORDER 
	CWK	A2,RECEIVE	RECEIVE ORDER ? 
	RF(NE)	STX260	NO 
				=12 
	LDK	A1,0	RESET RETURN CODE 
	LD	A2,DWTIPC,A6	ANY QUEUED MESSAGES ?
	RF(Z)	STX250	NO
	ORKL	A1,R:DATA	YES 
STX250	EQU	*
	CF	A15,DC:MIN	MOVE TO USER BUFFER
	RF	STX270
STX260	EQU	*
	CF	A5,QRBUF	QUEUE BUFFER 
	IFT	EM3270=1 
	LD	A2,DWTOR,A6	GET ORDER 
	RF(NZ)	STX270	NOT ANY MESSAGE ORDER
	CF	A15,TENDIO	COMPLETE REQUEST 
	XIF
STX270	EQU	*
	IFT	STARVI=1 
	LD	A1,DWTST,A6	GET STATUS
	ANK	A1,8	MASK A1 
	RF(Z)	STX280 
	CF	A5,TRWACK	SEN WACK
	RF	STX290
	XIF
STX280	EQU	*
	CF	A5,TRACK	SEND ACK 
STX290	EQU	*
	ABL	BRM
	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	POL190 
	XIF
	EJECT
* 
* 
*	ENQ HAS BEEN RECEIVED 
* 
* 
ENQ100	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RF(NZ)	NAK110	RETRANSMISSION OF MESSAGE
	OR	A1,XSEL 
	RF(Z)	ENQ110	IN CONTROL STATE
	CF	A5,TRREP	REPEAT LAST CONTROL SEQUENCE 
ENQ110	EQU	*
	ABL	BRM
	EJECT
* 
* 
*	NAK HAS BEEN RECEIVED 
* 
* 
NAK100	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RF(NZ)	NAK110	ACK EXPECTED 
	OR	A1,XSEL 
	RB(Z)	ENQ110	IN CONTROL STATE
	RF	DLE160
NAK110	EQU	*
	LD	A6,FDWTUT	GET WRITING DWT 
	IFF	STARVI=0 
	LD	A1,XSTA 
	ABL(NZ)	POL120	STATUS HAS BEEN TRANSMITTED 
	XIF
	LD	A1,FBLST	GET START POINT FOR LAST BLOCK 
	SU	A1,FECBBA	COMPUTE BUFFER INDEX
	ST	A1,FBAX 
	IFT	STTSTS=1 
* 
* 
*		COUNT MESSAGES RETRANSMITTED 
* 
	LDK	A1,CSSTRT
	CF	A15,DCSUPS
	XIF
	ABL	POL200 
	EJECT
* 
* 
*	DLE HAS BEEN RECEIVED 
* 
* 
DLE100	EQU	*
	CF	A5,HPTIM	STOP PROCEDURE TIMER 
	LD	A1,XACK 
	RF(NZ)	DLE110
	IFT	TPMODE=1 
	CF	A5,READ 
	CWK	A2,STX 
	ABL(Z)	STX110	YES - TRANSPARENT TEXT 
	XIF
	RB	ENQ110
DLE110	EQU	*
	CF	A5,READ	READ SECOND CHARACTER 
	CWK	A2,ACKPAR	IS IT ACK 0 ?
	RF(NE)	DLE130
* 
*	ACK , 0 RECEIVED
* 
	LD	A1,CACK	GET ACKCOUNTER
	RF(Z)	DLE140	ACK,0 EXPECTED
DLE120	EQU	*
	CF	A5,TRENQ	SEND ENQ 
	CF	A5,SPTIM	START PROCEDURE TIMER
	RB	ENQ110
DLE130	EQU	*
	CWK	A2,ACK1
	RF(NE)	DLE180
* 
*	ACK , 1 RECEIVED
* 
	LD	A1,CACK	GET ACK COUNTER 
	RB(Z)	DLE120	ACK,1 NOT EXPECTED
DLE140	EQU	*
	LD	A1,XETX 
	RF(Z)	DLE170	ETX NOT SENT
	EJECT
* 
*	ACK HAS BEEN RECEIVED TO AN ETX BLOCK 
* 
	LDK	A1,0	SET RC=0
DLE150	EQU	*
	IFF	STARVI=0 
	LD	A2,XSTA 
	RF(NZ)	DLE200	STATUS HAS BEEN TRANSMITTED
	XIF
	CF	A5,CWRITE	COMPLETE WRITE REQUEST
DLE160	EQU	*
	CF	A5,TREOT	SEND EOT 
	IFT	RCOM=1 
	CM	XRB	RESET READ BUFFER 
	XIF
	RB	ENQ110
DLE170	EQU	*
	LDK	A1,1 
	XRS	A1,CACK	INCREMENT ACK COUNTER
	ABL	POL200 
DLE180	EQU	*
	CWK	A2,RVIPAR	IS IT RVI ?
	RB(NE)	DLE120	INVALID DLE SEQUENCE 
	CM	XACK	RESET 'EXPECTING ACK'
	LD	A1,XETX 
	RF(NZ)	DLE190	ETX HAS BEEN SENT
	LDK	A1,2	SET RC=2
	RB	DLE150
DLE190	EQU	*
	LDK	A1,0	SET RC=0
	RB	DLE150
	EJECT
	IFF	STARVI=0 
* 
* 
*	STATUS HAS BEEN TRANSMITTED 
* 
* 
DLE200	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)	DLE160	NOT DE
	LDKL	A1,/8000
	ANS	A1,DWTST,A6	CLEAR STATUS 
	RB	DLE160
	XIF
	EJECT
* 
*	FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2
* 
*	CALLING SEQUENCE: CF A5,FINTER(S) 
*	A2=SUBTERMINAL ADDRESS
*	A4 DESTROYED
*	A3#0: DWT TO FOUND TERMINAL 
* 
* NOTE:	FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES 
*	ENTRY:	FINTES - CHECK SELECT ADDRESS
*		FINTEP - CHECK SPECIFIC POLL ADDRESS 
* 
* 
* 
FINTES	EQU	*
	IFT	MSV1=1 
	LDK	A4,0 
	RF	FINT05
	XIF
FINTEP	EQU	*
	LDK	A4,1	RIGTH BYTE
FINT05	EQU	*
	LD	A3,DTEDWT,A7	GET FIRST DWT
FINT10	EQU	*
	RF(Z)	FINT20	END QUEUE 
	ADR	A3,A4
	CCR	A2,A3	THIS SUB-ADDRESS ? 
	RF(E)	FINT20	YES 
	SUR	A3,A4
	LD	A3,DWTCHN,A3	GET NEXT DWT 
	RB	FINT10
FINT20	EQU	*
	ANKL	A3,/FFFE
	RTN	A5 
	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
* 
* 
*	CHECK IF THERE IS A SEND 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 
	ANK	A2,/FF	MASK AWAY OPTION PART 
	SUK	A2,6 
	RF(NZ)	CWR900	NOT SEND REQUEST 
	LD	A2,DWTIPC,A6	ANY RECEIVED BUFFERS ON QUEU ? 
	RF(Z)	CWR110	NO
	ORKL	A1,R:DATA	ACCEPTED AND DATA AVAILABLE 
CWR110	EQU	*
	LD	A8,DWTECB,A6
	CF	A15,CTIME	STOP TIMER
	IFT	REMTIM=1		=9 
	ST	A2,ECBCW1,A8
	XIF			=9 
	CF	A15,TENDIO	COMPLETE REQUEST 
CWR150	EQU	*
	CF	A15,REMOVW	REMOVE FROM WRITE QUEUE
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
	CM	XSTA
	SUR	A8,A8	RESET LRC

	IFT	IBMCHR=1 
	IFF	TPMODE=1 
	LD	A1,FBAX 
	RF(NZ)	RDM100	NOT FIRST BLOCK
	CF	A5,READP
	RF(NZ)	RDM120	PARITY ERROR 
	CWK	A2,ESC 
	RF(NE)	RDM110
	CF	A5,READP	SKIP NEXT TWO CHARACTERS 
	CF	A5,READP
	XIF
	IFF	TPMODE=1 
RDM100	EQU	*
	CF	A5,READP	READ ONE CHARACTER 
	RF(NZ)	RDM120	PARITY ERROR 
RDM110	EQU	*
	XIF
	IFT	TPMODE=1 
	IM	TPM	INDICATE TRANSPARENT TEXT 
RDM100	CF	A5,READ 
	CWK	A2,DLE	CHECK IF DLE
	RF(NE)	RDM112	NO 
	CF	A5,READ	SKIP DLE AND READ NEXT CHARACTER
	CWK	A2,SYNEBC	CHECK IF SYN 
	RB(E)	RDM100	SKIP SYN
	CF	A5,CRCCAL	CALCULATE CRC 
	CWK	A2,DLE	CHECK IF 2:ND DLE 
	RF(E)	RDM115	YES - STORE DLE AS DATA 
	CWK	A2,ETX	CHECK IF ETX
	RF(E)	RDM130	YES 
	CWK	A2,ETBEBC	CHECK IF ETB 
	RF(E)	RDM160	YES 
	CWK	A2,ITB	CHECK IF ITB
	RF(E)	RDM175	YES 
	CWK	A2,ENQEBC	CHECK IF ENQ 
	RF(E)	RDM140	YES SEND NAK
* 
* 
*	GET END OF BLOCK
* 
RDM105	EQU	*
	CF	A5,READ 
	CWK	A2,DLE 
	RB(NE)	RDM105
	CF	A5,READ 
	CWK	A2,ETX 
	RF(E)	RDM110	YES - END OF BLOCK
	CWK	A2,ETBEBC
	RB(NE)	RDM105	NOT END OF BLOCK 
RDM110	EQU	*
	CM	TPM	OUT OF TRANSPARENT TEXT 
	CF	A5,RDCRC
	RF	RDM140	INDICATE INVALID MESSAGE 
RDM112	CF	A5,CRCCAL	CALCULATE CRC 
	XIF
	IFF	TPMODE=1 
	CWK	A2,ETX 
	RF(E)	RDM130	ETX RECEIVED
	CWK	A2,ETB 
	RF(E)	RDM160	ETB RECEIVED
	CWK	A2,ITB 
	RF(E)	RDM170	ITB RECEIVED
	CWK	A2,ENQ 
	RF(E)	RDM120	SKIP IF ENQ EMBEDDED IN MESSAGE 
	CWK	A2,/FF 
	RF(E)	RDM140	MARK HOLD RECEIVED
	IFT	CODE=0 
	IFT	BINTRM=1 
	LDR	A1,A2
	SUK	A1,DC1+3 
	RF(P)	RDM115	NOT DC1-DC3 
	ADK	A1,3 
	RF(N)	RDM115	NOT DC1-DC3 
	SLL	A1,6 
	SCR	A1,A4		=7
	CF	A5,READP	8-BIT CHAR GET NEXT PART 
	RF(NZ)	RDM120	PARITY ERROR 
	LCR	A1,A4		=7
	SUK	A2,/20	ASSEMBLE TO ONE CHARACTER 
	ORR	A2,A1		=7
	XIF
RDM115	EQU	*
	ADK	A3,0	ERROR DETECTED EARLIER ?
	RB(NZ)	RDM100	YES !!!
	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 
* 
	LDK	A3,1	INDICATE BUFFER OVERFLOW
	IFT	STTSTS=1 
	LDK	A1,CSSRBO	BUFFER OVERFLOW
	CF	A15,DCSUPS	INCREMENT COUNTER
	XIF
	RB	RDM100
* 
*	PARITY ERROR DETECTED 
* 
RDM120	EQU	*
	IFT	STTSTS=1 
	LDK	A1,CSSRPE
	CF	A15,DCSUPS	INCREMENT COUNTER
	XIF
	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	*
	CF	A5,CHALTI	HALT INPUT
	IFT	P6805=1
	IFT	CODE=0 
	ANK	A2,H:PARI
	RF(Z)	RDM155 
	LDK	A3,1	PARITY ERROR
RDM155	EQU	*
	XIF
	IFT	TPMODE=1 
	CWK	A3,1	ERROR DETECTED EARLIER ?
	RF(NE)	RDM158	NO 
	CM	TPM	OUT OF TRANSPARENT TEXT 
RDM158	EQU	*
	XIF
	RTN	A5 
* 
*	ETB RECEIVED
* 
RDM160	EQU	*
	LDR	A3,A3
	RB(NZ)	RDM130	ALREADY INVALID
	LDK	A3,2	INDICATE CORRECT ETB
	RB	RDM130
* 
*	ITB RECEIVED
* 
RDM170	EQU	*
	IFF	CODE=1 
	CF	A5,RDLRC
	RB(NZ)	RDM120	LRC WAS NOT OK 
	XIF
	IFT	CODE=1 
	CF	A5,RDCRC	READ CRC AND CHECK IT
	RB(NE)	RDM120	CRC WAS NOT OK 
	IFT	TPMODE=1 
RDM175	CM	TPM	OUT OF TRANSPARENT TEXT 
	CF	A5,RDCRC	READ AND CHECK CRC 
	IM	TPM 
	RB(NE)	RDM105	CRC WAS NOT OK 
RDM180	CF	A5,READ 
	CWK	A2,SYNEBC
	RB(E)	RDM180	SKIP SYN
	CWK	A2,DLE 
	RB(NE)	RDM105	ILLEGAL CHARACTER
	CF	A5,READ 
	CWK	A2,STX 
	RB(NE)	RDM105	ILLEGAL CHARACTER
	XIF
	RB	RDM100
	EJECT
* 
*	TRANSMIT ACK 0 OR 1 
* 
TRACK	LDK	A2,1
	LDK	A3,ACK1	PRELOAD ACK1 
	XRS	A2,CACK	INCREMENT ACK COUNTER
	RF(NZ)	TRDLE 
	LDK	A3,ACK0	LOAD ACK0
	RF	TRDLE 
* 
*	TRANSMIT WACK 
* 
TRWACK	LDK	A3,WACK	LOAD WACK
	RF	TRDLE 
* 
*	TRANSMIT RVI
* 
	IFF	STARVI=0 
TRRVI	LDK	A3,RVI	LOAD RVI 
	XIF
* 
*	TRANSMIT DLE
* 
TRDLE	LDK	A2,DLE	LOAD DLE 
	SC	A2,RESEND	PUT INSAVE AREA 
	SC	A3,RESEND+1	
	RF	TRREP 
	EJECT
* 
*	TRANSMIT NAK
* 
TRNAK	LDK	A3,NAK	LOAD NAK 
	RF	TREN10
* 
*	TRANSMIT EOT
* 
TREOT	LDK	A3,EOT	LOAD EOT 
	RF	TREN10
* 
*	TRANSMIT ENQ
* 
TRENQ	LDK	A3,ENQ	LOAD ENQ 
* 
TREN10	SC	A3,RESEND	PUT IN SAVE AREA
	LDK	A2,/FF 
	SC	A2,RESEND+1 
TRREP	CF	A5,TRSYNC	START OUTPUT 
	LC	A2,RESEND	GET FIRST CHARACTER 
	CF	A5,WRITEP	SEND IT 
	LC	A2,RESEND+1	GET NEXT CHARACTER
	CF	A5,WRITEP	SEND IT 
TRRE10	LDK	A2,/FF 
	CF	A5,WRIT05	SEND PAD
	LDK	A2,/FF 
	CF	A5,WRIT05 
	CF	A5,CHALTO	HALT OUTPUT 
	IFF	LOGG=0 
	CF	A5,LOGSST	LOG TRANSMITTER STATUS
	XIF
	RTN	A5 
	EJECT
* 
* 
*	TRANSMIT ONE TEXT BLOCK 
* 
* 
TRTEXT	EQU	*
	CF	A5,TRSYNC	START OUTPUT
	IFF	TPMODE=0 
	LDK	A2,DLE 
	CF	A5,WRIDLE	SEND DLE
	XIF
	LDK	A2,STX 
	CF	A5,WRITE	SEND STX 
	SUR	A8,A8	RESET LRC
	LD	A4,FECBBA	GET BUFFER ADDRESS
	AD	A4,FBAX	ADD BUFFER INDEX
	ST	A4,FBLST	REMEMBER START OF BLOCK
			.	=15
	LDK	A3,0	RESET CHARACTER COUNTER 
	LD	A1,FBAX	GET BUFFER INDEX
	RF(NZ)	TRT100	NOT FIRST BLOCK
	LDR*	A2,A7	NETWORK POLL ADDR 
	CF	A5,WRITEP	SEND TCA
	LD	A2,FDWTUT	GET DWT-ADDRESS 
	LDR*	A2,A2	GET NETWORK SUB-ADDRESS 
	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 
	CF	A5,WRITEP	SEND AID

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

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

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

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

TRT101	EQU	*

	LDK	A2,SF
	CF	A5,WRITEP	SEND START FIELD

	LC	A2,-1,A4	GET ATTRIBUTE CHARACTER
	ANK	A2,X'7F' 
	LDR	A1,A2	CONVERT TO IBM ATTRIBUTE 
	ANK	A1,1 
	ANK	A2,/1E	MASK
	SLL	A2,1 
	ORR	A2,A1	IBM ATTRIBUTE COMPOSED 
	ORK	A2,/40	BIT ALWAYS SET ONE
	LC	A2,TASCII,A2
	CWK	A2,/18	CHECK SPECIAL ATTRIBUT
	RF(NE)	TRT104
	LDK	A2,/30 
TRT104	EQU	*
	CF	A5,WRITEP	SEND ATTRIBUTE
	ADK	A3,1 
	RF	TRT110
TRT105	EQU	*
	XIF
	EJECT
	IFF	TPMODE=1 
	CWK	A2,/07 
	RF(L)	TRT110	ILLEGAL CODE : SKIP IT
	XIF
	CF	A5,WRITEP	SEND CHARACTER
TRT110	EQU	*
	IM	FBAX	INCREMENT BUFFER INDEX 
	LD	A1,FECBRL	GET REQUESTED LENGTH
	CW	A1,FBAX 
	RF(NG)	TRT130	END OF MESSAGE 
	ADK	A3,1	INCREMENT CHARACTER COUNTER 
	CWK	A3,TBLEN 
	IFT	TPMODE=1 
	RB(L)	TRT105	NOT FULL BLOCK
	XIF
	RB(L)	TRT100	NOT FULL BLOCK
	IFT	RCOM=1 
	LDK	A1,SBA	CHECK IF SBA AT END OF BLOCK
	CC	A1,-2,A4
	RF(E)	TRT115	YES 
	CC	A1,-1,A4
	RF(NE)	TRT116	NO SEND ETB
	LCR	A2,A4	GET FIRST BYTE AFTER SBA 
	ADK	A4,1	INREMENT POINTER
	CF	A5,WRITEP	SEND IT 
	IM	FBAX	INCREMENT INDEX
TRT115	LCR	A2,A4	GET SECOND BYTE AFTER SBA
	CF	A5,WRITEP	SEND IT 
	IM	FBAX	INCREMENT INDEX
	XIF
TRT116	EQU	*
	IFT	TPMODE=1 
	LDK	A2,DLE 
	CF	A5,WRIDLE	SEND AN EXTRA DLE 
	XIF
	LDK	A2,ETB	LOAD ETB
TRT120	EQU	*
	IFT	TPMODE=1 
	CM	TPM 
	XIF
	CF	A5,WRITEP	SEND IT 
	IFF	CODE=1 
	LDR	A2,A8	GET LRC
	CF	A5,WRITEP	SEND LRC
	XIF
	IFT	CODE=1 
	LDR	A6,A8	GET CRC	DK 
	LDR	A2,A6
	ANK	A2,/FF 
	CF	A5,WRIT05	SEND CRC BYTE 1 
	ECR	A2,A6
	ANK	A2,/FF 
	CF	A5,WRIT05	SEND CRC BYTE 2 
	XIF
	IFT	STTSTS=1 
* 
* 
*		COUNT MESSAGES TRANSMITTED 
* 
	LDK	A1,CSSTBL
	CF	A15,DCSUPS
	XIF
	ABL	TRRE10	HALT OUTPUT 
TRT130	EQU	*
	IM	XETX	INDICATE 'ETX SENT'
	IFT	TPMODE=1 
	LDK	A2,DLE 
	CF	A5,WRIDLE	SEND AN EXTRA DLE 
	XIF
	LDK	A2,ETX	LOAD ETX
	RB	TRT120	SEND ETX AND LRC 
	EJECT
* 
* 
*	TRANSMIT STATUS MESSAGE 
* 
* 
	IFF	STARVI=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 
	SUR	A8,A8	RESET LRC
	LDK	A2,'%' 
	CF	A5,WRITEP	SEND '%'
	LDK	A2,'R' 
	CF	A5,WRITEP	SEND 'R'
	LDK	A2,STX 
	CF	A5,WRITE	SEND STX 
	LDR*	A2,A7 
	CF	A5,WRITEP	SEND TCA
	LD	A4,FDWTUT	GET DWT-ADDRESS 
	LDR*	A2,A4	GET NETWORK SUB-ADDRESS 
	CF	A5,WRITEP	SEND STA
	LD	A1,DWTST,A4	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,A4	GET STATUS
	ANK	A1,5 
	RF(Z)	TRST10	NOT 'IR'
	ANK	A1,4 
	RF(NZ)	TRST10	NO IR IF DE
	LDK	A2,IR
TRST10	EQU	*
	CF	A5,WRITEP	SEND S/S 1
	RB	TRT130	SEND ETX AND LRC 
	XIF
	EJECT
* 
* 
*		TRSYNC : TRANSMIT SYNC SEQUENCE
* 
TRSYNC	EQU	*
	CF	A5,CHALTI	HALT INPUT IF NOT DONE
	CF	A5,CSYNCO	START OUTPUT WITH SYNC DEF
	CF	A5,READ	WAIT FOR OUTPUT INTERRUPT 
* 
* 
*		SEND 4 SYN-CHARACTERS
* 
	LDK	A3,4 
TRS100	EQU	*
	LDK	A2,SYN 
	CF	A5,WRITE	SEND CHARACTER 
	SUK	A3,1 
	RB(NZ)	TRS100
	RTN	A5	RETURN TO CALLER
	EJECT
* 
* 
*		CSYNCI :SEND SYNC-PATTERN FOR INPUT DATA 
* 
CSYNCI	EQU	*
	LD	A2,PFPOST 
	RF(NZ)	CSYN:I	WAIT FOR POWER UP
	CF	A5,CHALTI	STOP INPUT
	ST	A5,DCLCI	SET INPUT ACTIVE FLAG
	IFT	P6805=1
	LDK	A2,PARITY	CHAR PARITY FUNCTION FOR LC
	CIO	A2,1,LCUIN	START I/O 
	LDK	A2,SYNC	SYNC PATTERN 
	OTR	A2,1,LCUIN	SEND INPUT SYNC-PATTERN TO LC 
	XIF
	IFT	P6805=0
	LDKL	A2,CBCARR+SYNC	DEF SYNC-PATTERN 
	CIO	A2,1,LCUIN	SEND INPUT SYNC-PATTERN TO LC 
				=1
	XIF
CSYN:I	EQU	*
	RTN	A5	RETURN TO CALLER
* 
* 
*		CHALTI : HALT INPUT CHANNEL
* 
CHALTI	EQU	*
	IFT	P6805=1
	LDK	A2,CBSTOP	STOP FUNCTION BIT
	XIF
	CIO	A2,0,LCUIN	HALT INPUT
	CM	DCLCI	CLEAR INPUT ACTIVE FLAG 
	SST	A2,LCUIN	READ STATUS 
	RF(A)	CHALTR	SST ACCEPTED	=1 
	LDK	A2,1	INSTRUCTION NOT ACCEPTED, SET MODEM ERR.	=1 
CHALTR	EQU	*		=1
	IFF	LOGG=0 
	CF	A5,LOGSST	LOGG INPUT STATUS 
	XIF
	RTN	A5	RETURN TO CALLER
	EJECT
* 
* 
*		CSYNCO : START TRANSMITTER WITH SYNC DEF 
* 
CSYNCO	EQU	*
	LD	A2,PFPOST 
	RF(NZ)	CSYN:O	WAIT FOR POWER UP
	IFT	P6805=1
	LDK	A2,PARITY	CHAR PARITY CHECK BY CU
	CIO	A2,1,LCUUT	CIO START 
	RF(A)	CSYNC1	ACCEPTED
	SST	A2,LCUUT	TRY TO READ STATUS
	ABL	BRM	NOT ACCEPTED TIMEOUT REQUEST 
CSYNC1	EQU	*
	LDK	A2,SYNC	DEF SYNC PATTERN 
	OTR	A2,1,LCUUT	SEND SYNC PATTERN 
	XIF
	IFT	P6805=0
	CIO	A2,1,LCUUT	START TRANSMITTER 
	XIF
CSYN:O	EQU	*
	RTN	A5	RETURN TO CALLER
* 
* 
*		CHALTO : HALT OUTPUT CHANNEL 
* 
CHALTO	EQU	*
	IFT	P6805=1
	LDK	A2,CBSTOP	STOP FUNCTION
	XIF
	CIO	A2,0,LCUUT	HALT OUTPUT 
	IFT	P6805=1
	LDK	A2,1	PRESET STATUS = MODEM ERROR	=1
	RF(NA)	CHLT00	INSTRUCTION NOT ACCEPTED	=1
	CF	A5,READ	WAIT FOR INTERRUPT
	XIF
	SST	A2,LCUUT	GET STATUS
CHLT00	EQU	*
	IFT	STTSTS=1 
	ANK	A2,H:NOOP+H:THRU 
	RF(Z)	CHLTO2 
	LDK	A1,CSCDCE	DCE NOT OPERABLE 
	ANK	A2,H:NOOP
	RF(NZ)	CHLTO1	YES
	LDK	A1,CSCDOT	OUTPUT THROUGHPUT ERROR
CHLTO1	EQU	*
	CF	A15,DCSUPS	INCREMENT COUNTER
CHLTO2	EQU	*
	XIF
	RTN	A5	RETURN TO CALLER
	EJECT
* 
* 
*   RECEIVER INTERRUPT
* 
* 
IH1501	EQU	*
	ST	P,INTSAV
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8
	XIF

	IFF	CPU852=1 
	MSR	8,A15	SAVE A1-A8 
	XIF
	CF	A15,LDREG	RESTORE DC REGS A3 - A8 
	INR	A2,0,LCUIN	READ CHAR 
	RF(NA)	IHIN20	NOT ACCEPTED,CHECK STATUS
	IFF	LOGG=0 
	CF	A5,LOGIN	LOG RECEIVED CHARACTER 
	XIF
	IFT	TPMODE=1 
	C2	TPM 
	RF(NZ)	IHLC10	DO NOT SKIP SYNC IN TRANSPARENT TEXT 
	XIF
	C2	SYNSW 
	RF(NZ)	IHLC05	DO NOT SKIP SYNS IN BCC FRAME
	CWK	A2,SYNC
	RF(E)	READ 
IHLC05	EQU	*
	IFT	CODE=0 
	XRR	A8,A2	CALCULATE LRC
	XIF
	IFT	CODE=1 
	LD	A1,XSEL	SEE IF SELECTED	DK1 
	RF(Z)	IHLC07	NO, SKIP IT	DK1 
	CF	A5,CRCCAL	CALCULATE CRC 
IHLC07	EQU	*		DK1 
	LC	A2,TASCII,A2	TRANSLATE TO ASCII 
	XIF
IHLC10	EQU	*
	LDR	A1,A2
	ORKL	A1,/FF00	SET FLAG FOR CARRIER ON
	ST	A1,DCLCI	SET INPUT ACTIV FLAG 
	CM	DCSTCU	CLEAR SST SAVE 
	LDK	A1,1 
	ST A1,DTEPLS,A7	CU OPERABLE
	RTN	A5	RETURN TO CALLER
IHIN20	EQU	*
	CF	A5,SST	PERFORM SST
	ABL	BRM
	EJECT
* 
* 
*   TRANSMITTER INTERRUPT 
* 
* 
IH1502	EQU	*
	ST	P,INTSAV
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1 - A8
	XIF

	IFF	CPU852=1 
	MSR	8,A15	SAVE A1-A8 
	XIF
	CF	A15,LDREG	RESTORE DC REGS A3 - A8 
	RTN	A5 
	EJECT
* 
* 
*	SST INSTRUCTION AND STATUS CHECK
* 
*   LCU STATUS : BIT 10=CARRIER OFF 
*		BIT 13=PARITY ERROR (6805 ONLY)	SALCUZ 
*                BIT 14=THROUGHPUT ERROR
*                BIT 15=MODEM NOT READY 
* 
SST	EQU	* 
	SST	A2,LCUIN	GET STATUS
	LDR	A1,A2
	IFT	LOGG=1 
	CF	A5,LOGSST	LOGG SST INFORMATION
	XIF
	ANK	A2,H:ERR	ERROR BIT SET 
	RF(NZ)	SST050	YES
	IFT	P6805=0
	LD	A2,DCLCI	INPUT STATUS 
	RF(Z)	SST125	INPUT NOT ACTIVE  IGNORE
	RF(N)	SST100	INPUT ACTIVE WITH DATA
	LDKL	A2,CBCARR+SYNC	DEF SYNC PATTERN 
	CIO	A2,1,LCUIN	START INPUT AGAIN 
	RF	SST125	RETURN TO DISPATCHER 
	XIF
	IFT	P6805=1
	RF	SST100
	XIF
SST050	EQU	*
	ANK	A2,H:CARR	CARRIR OFF 
	RF(Z)	SST075	NO
	LD	A2,DCLCI	INPUT STATUS 
	RF(Z)	SST125	NOT ACTIVE IGNORE CARRIER OFF 
	RF	SST100	ACTIVE 
SST075	EQU	*
	CM	DTEPLS,A7	CLEAR PHYS. LINK STATUS	DK
	LDR	A2,A1
	ANK	A2,H:THRU	THROUGHPUT ERROR 
	RF(Z)	SST100	NO
	IFT	STTSTS=1 
* 
* 
*		COUNT INPUT THROUGHPUT ERROR 
* 
	LDK	A1,CSCDIT
	CF	A15,DCSUPS
	XIF
	ABL	BRM110 
* 
SST100	EQU	*
	LDR	A2,A1
	ANK	A2,H:NOOP	NOT OPERABLE 
	RF(Z)	SST200 
	IFT	STTSTS=1 
* 
* 
*		COUNT DCE NOT OPERABLE 
* 
	LDK	A1,CSCDCE
	CF	A15,DCSUPS
	XIF
	CF	A15,STREG	SAVE REGISTERS
	CF	A15,SETIME	DELAY 1 SEC
	DATA	SST150,10 
SST125	EQU	*
	ABL	TDISP	RETURN TO DISPATCHER 
* 
SST150	EQU	*
	CF	A15,LDREG	LOAD REGISTERS
SST200	EQU	*
	LDR	A2,A1
	ANK	A2,H:CARR	CHECK STATUS IF CARRIER OFF
	RF(Z)	SST225	NO
	XRK	A1,H:CARR	CHECK STATUS IF ONLY CARRIER OFF 
	RF(Z)	SST250	YES 
SST225	EQU	*
	ST	A1,DCSTCU	STORE STATUS AS CURRENT STATUS
SST250	EQU	*
	RTN	A5	RETURN TO CALLER
	EJECT
* 
* 
*	WRITE FROM OR READ ONE CHARACTER TO A2
* 
* 
WRITE	EQU	* 
	IFT	CODE=1 
	C2	TPM 
	RF(Z)	WRIT02	NOT TRANSPARENT MODE
	CWK	A2,DLE	CHECK IF DLE
	RF(NZ)	WRIT05	NO 
	CF	A5,WRIDLE	SEND EXTRA DLE
	LDK	A2,DLE 
	RF	WRIT05
WRIT02	EQU	*
	ANK	A2,/FF 
	CWK	A2,/FF 
	RF(E)	WRIT05	NO TRANSLATION OF TRAILING PAD
	LC	A2,TEBCDIC,A2	TRANSLATE TO EBCDIC 
	XIF
WRIT05	EQU	*
	OTR	A2,0,LCUUT	SEND CHARACTER
	RF(A)	WRIT10 
	IFF	CODE=1 
WRIT10	XRR	A8,A2	ACCUMULATE BCC 
	XIF
	IFT	CODE=1 
WRIT10	CF	A5,CRCCAL	CALCULATE CRC 
	XIF
WRIT15	EQU	*
	IFF	LOGG=0 
	CF	A5,LOGOUT	LOG OUTPUT CHARACTER
	XIF
* 
READ	CF	A15,STREG 
	ABL	TDISP
* 
* 
*		THESE INSTRUCTIONS ARE ONLY USED TO SEND AN EXTRA DLE
*		WHEN TRANSPARENT MODE IS CONFIGURED
* 
WRIDLE	EQU	*
	OTR	A2,0,LCUUT	SEND CHARACTER
	RB(A)	WRIT15	ACCEPTED
	RB	READ	OUTPUT THROUGHPUT ERROR
	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
* 
* 
*	POWER ON FUNCTIONS
* 
* 
DC15ON	EQU	*
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8
	XIF

	IFF	CPU852=1 
	MSR	8,A15	SAVE A1-A8 
	XIF
	LDKL	A7,DTETAB	DTETAB ADDRESS
	IFT	STARVI=1 
	LDK	A5,4	SET DEVICE END
	LD	A6,DTEDWT,A7	GET FIRST DWT ADDR 
DC1510	EQU	*
	RF(Z)	DC1520	END OF CHAIN
	ORS	A5,DWTST,A6	STORE DEVICE END 
	CF	A15,INSSQ	INSERT DWT IN STAUS QUEUE 
	LD	A6,DWTCHN,A6	GET NEXT DWT IN CHAIN
	RB	DC1510
DC1520	EQU	*
				=4
				=13 
	XIF
	LD	A2,DTESTA,A7	DTE STATUS 
	SUK	A2,2 
	ABL(NZ)	TDISP	OPEN NOT EXECUTED
	CM	DCLCI	INIT LINE CONTROL UNIT INFO 
	LD	A2,DCTPGP	GET POLL TIMER POINTER
	RF(NZ)	DC1540	ALREADY STARTED
	CF	A15,SPOTIM	START POLL TIMER 
DC1540	EQU	*
	ABL	BRM
	EJECT
	IFT	CODE=1 
* 
* 
*	CALCULATION OF CRC
* 
*	A2 = CHARACTER
*	A8 = ACCUMULATED CRC
* 
* 
CRCCAL	EQU	*
	ST	A1,CRCSAV+2 
	ST	A2,CRCSAV+6 
	ST	A3,CRCSAV+10
	ST	A4,CRCSAV+14
	LDK	A1,8 
	LDR	A4,A8	GET OLD CRC
CRC100	LDR	A3,A4
	SRL	A4,1 
	XRR	A3,A2
	SRL	A2,1 
	ANK	A3,1 
	RF(Z)	CRC110 
	XRKL	A4,/A001
CRC110	SUK	A1,1 
	RB(NZ)	CRC100
	LDR	A8,A4	SAVE NEW CRC 
CRCSAV	EQU	*
	LDKL	A1,0
	LDKL	A2,0
	LDKL	A3,0
	LDKL	A4,0
	RTN	A5 
	EJECT
* 
* 
*	READ CRC CHARACTERS AND CHECK THEM
*	CR = (E) IF CRC WAS OK
* 
* 
RDCRC	EQU	* 
	STR	A8,A5	SAVE CURRENT CRC 
	SUK	A5,2	ADJUST STACK POINTER
	IM	SYNSW	DO NOT SKIP SYNCS NOW 
	CF	A5,READ	READ BYTE 1 
	LD	A4,CRCSAV+6	SAVE IT 
	CF	A5,READ	READ BYTE 2 
	CM	SYNSW	SYNCS CAN BE SKIPPED AGAIN
	LD	A2,CRCSAV+6	SAVE IT 
	SLL	A2,8 
	XRR	A2,A4
	ADK	A5,6 
	CW	A2,-4,A5
	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
	ANKL	A8,/007F
LRCEND	EQU	*
	CM	SYNSW 
	ABR*	A5

	XIF
	EJECT
****************************************
* 
*		DRIVER WORK AREAS
* 
****************************************
* 
* 
*	DC RECEIVE BUFFER POOL
* 
RLINK	EQU	RBUFL+RBUFL+8 
* 
DCRBUF	EQU	*
	DATA	*+2	FREE BUFFER ANCHOR
	IFF	RBUFNR=2 
	DATA	*+RLINK 
	RES	RBUFL+3
	IFF	RBUFNR=3 
	DATA	*+RLINK 
	RES	RBUFL+3
	IFF	RBUFNR=4 
	DATA	*+RLINK 
	RES	RBUFL+3
	XIF
	DATA	*+RLINK 
	RES	RBUFL+3
	DATA	0	END OF CHAIN
	RES	RBUFL+3

	IFF	MMUPAG=0 
MMUBUF	RES	TBUFL+1	MMU WORK BUFFER
SUBBUF	RES	3	MMU BUFFER FOR CONNECT REQUEST	=16 
	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
* 
*	DTETAB
* 
*	FIXED PART
* 
DW1500	EQU	*
DTETAB	DATA	0,0 
	DATA	0,0,0,0,0,0 
	IFT	MMUPAG=1 
	DATA	0,0 
	XIF
*	DRIVER DEPENDENT PART 
	DATA	DTESBU-DTETAB	START OF STATISTIC BUFFER 
	DATA	0,0,0,0,0,0 
	DATA	0,0,0,0,0,0	 *
DTESBU	EQU	*
	DATA	0	SYMBOLIC ID 
	DATA	0	COUNTER STATUS WORD 
	DATA	/20	MAX NUMBER OF COUNTERS
	RES	/20	STATISTIC BUFFER 
	EJECT
* 
* 
*	PROCEDURE WORK AREAS
* 
* 
FDWTIN	RES	1	CURRENT DWT FOR RECEPTION
FDWTUT	RES	1	CURRENT DWT FOR TRANSMISSION 
XACK	DATA	0	ACK EXPECTED
XSEL	DATA	0	SELECTED
XETX	DATA	0	ETX SENT
XSTA	DATA	0	STATUS SENT / MESSAGE INPUT RESULT
XRB	DATA	0	READ BUFFER SWITCH 
CACK	DATA	0	ACK COUNTER 
SYNSW	DATA	0	0=SKIP SYNS, 1=DON'T SKIP
TPM	DATA	0	IF =1 TRANSPARENT TEXT 
* 
FECB	RES	1	WRITING ECB
FECBBA	RES	1	WRITING BUFFER ADDRESS 
FECBRL	RES	1	WRITING BUFFER LENGTH
FBAX	DATA	0	BUFFER INDEX
FBLST	DATA	0	START OF LAST TRANSMITTED BLOCK
DCSTQ	DATA	0	STATUS QUEUE ANCHOR
DCTPP	DATA	0	POINTER FOR PROCEDURE TIMING 
DCWRQ	DATA	0	WRITE REQUEST QUEUE
RESEND	DATA	0	CONTROL SEQUENCE SAVE AREA
* 
	EJECT
* 
* 
*	CONSTANTS AND WORK AREAS
* 
* 
DCSTCU	DATA	0	CURRENT STATUS
DCTPGP	DATA	0	TIMER POINTER GENERAL POLL
DCLCI	DATA	0	DC UNIT INPUT STATUS 
	END

HexDump

0x00000…00038 (0, 0, 400)   Head {h00=0x0034, h01=0x0050, text=» IDENT DRDC15 REL 11.0 DK 83-11-21 870105041100 «, t00=0x0000, t01=0x0004}
0x00038…00040               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003c}
0x00040…00062               Head {h00=0x001e, h01=0x0050, text=»   DK3, IR IN STATUS TABLE«, t00=0x0000, t01=0x0044}
0x00062…00080               Head {h00=0x001a, h01=0x0050, text=»   DK2, NAK AT SELECT «, t00=0x0000, t01=0x0066}
0x00080…000a8               Head {h00=0x0024, h01=0x0050, text=»   DK1, DEVICE STATUS AT CONNECT«, t00=0x0000, t01=0x0084}
0x000a8…000ce               Head {h00=0x0022, h01=0x0050, text=»   =17, RETURN CODE AT CONNECT«, t00=0x0000, t01=0x00ac}
0x000ce…000fa               Head {h00=0x0028, h01=0x0050, text=»   =16, DLOBUF DESTROYED AT CONNECT «, t00=0x0000, t01=0x00d2}
0x000fa…0012c               Head {h00=0x002e, h01=0x0050, text=»   =15, NO NEED TO RES 1 WORD BEFORE DATA «, t00=0x0000, t01=0x00fe}
0x0012c…0015a               Head {h00=0x002a, h01=0x0050, text=»   =14, LOSS OF DRIVER RECEIVE BUFFER «, t00=0x0000, t01=0x0130}
0x0015a…00176               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-05-21«, t00=0x0000, t01=0x015e}
0x00176…001a4               Head {h00=0x002a, h01=0x0050, text=»   =13, ERRONEOUS DISCARD DWT HANDLING«, t00=0x0000, t01=0x017a}
0x001a4…001d8               Head {h00=0x0030, h01=0x0050, text=»   =12, SUB-ADDR IN CW2 AT RECEIVE REQ COMPL«, t00=0x0001, t01=0x0018}
0x001d8…001f4               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-05-12«, t00=0x0001, t01=0x004c}
0x001f4…0021c               Head {h00=0x0024, h01=0x0050, text=»   =11, PROCEDURE TIMER PROBLEM «, t00=0x0001, t01=0x0068}
0x0021c…00240               Head {h00=0x0020, h01=0x0050, text=»   =10, EOT ON SPECIFIC POLL«, t00=0x0001, t01=0x0090}
0x00240…00268               Head {h00=0x0024, h01=0x0050, text=»   =9, REMAINING TIME IN ECBCW1 «, t00=0x0001, t01=0x00b4}
0x00268…00284               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-04-12«, t00=0x0001, t01=0x00dc}
0x00284…002aa               Head {h00=0x0022, h01=0x0050, text=»   =8, ODD USER BUFFER ADDRESS«, t00=0x0001, t01=0x00f8}
0x002aa…002ce               Head {h00=0x0020, h01=0x0050, text=»   =7, BINARY STORE PROBLEM «, t00=0x0001, t01=0x011e}
0x002ce…002ea               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-04-07«, t00=0x0001, t01=0x0142}
0x002ea…00316               Head {h00=0x0028, h01=0x0050, text=»   =6, ERROR IN POLL TIMER HANDLING «, t00=0x0001, t01=0x015e}
0x00316…0033e               Head {h00=0x0024, h01=0x0050, text=»   =5, WRONG STATISTIC HANDLING «, t00=0x0001, t01=0x018a}
0x0033e…0035a               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-03-27«, t00=0x0002, t01=0x0022}
0x0035a…0037a               Head {h00=0x001c, h01=0x0050, text=»   =4, ERROR IN POWER UP«, t00=0x0002, t01=0x003e}
0x0037a…003a6               Head {h00=0x0028, h01=0x0050, text=»   =3, DELETE INSTRUCTIONS NOT USED «, t00=0x0002, t01=0x005e}
0x003a6…003ce               Head {h00=0x0024, h01=0x0050, text=»   =2, CHANGES IN STATUS HANLING«, t00=0x0002, t01=0x008a}
0x003ce…003fa               Head {h00=0x0028, h01=0x0050, text=»   =1, ERROR IN OPEN/CLOSE REQUESTS «, t00=0x0002, t01=0x00b2}
0x003fa…00416               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-01-26«, t00=0x0002, t01=0x00de}
0x00416…00420               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fa}
0x00420…0042a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0104}
0x0042a…00460               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x010e}
0x00460…0046a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0144}
0x0046a…00492               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x014e}
0x00492…0049c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0176}
0x0049c…004ca               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x0180}
0x004ca…004fc               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0003, t01=0x001e}
0x004fc…00520               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0003, t01=0x0050}
0x00520…0052a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0074}
0x0052a…00534               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x007e}
0x00534…0053e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0088}
0x0053e…00548               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0092}
0x00548…00552               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x009c}
0x00552…0058e               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0003, t01=0x00a6}
0x0058e…0059c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x00e2}
0x0059c…005a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f0}
0x005a6…005b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00fa}
0x005b0…005c6               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0003, t01=0x0104}
0x005c6…005d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x011a}
0x005d0…00606               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0003, t01=0x0124}
0x00606…0062c               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x015a}
0x0062c…00652               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x0180}
0x00652…00678               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0004, t01=0x0016}
0x00678…00698               Head {h00=0x001c, h01=0x0050, text=» ENTRY DW1500 DUMMY DWT «, t00=0x0004, t01=0x003c}
0x00698…006a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x005c}
0x006a2…006b0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0066}
0x006b0…006ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0074}
0x006ba…006c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x007e}
0x006c4…006e2               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0004, t01=0x0088}
0x006e2…006ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a6}
0x006ec…00712               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0004, t01=0x00b0}
0x00712…0073e               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0004, t01=0x00d6}
0x0073e…00766               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0004, t01=0x0102}
0x00766…00786               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x012a}
0x00786…007a8               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTCHP DWT ADDRESS «, t00=0x0004, t01=0x014a}
0x007a8…007c8               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x016c}
0x007c8…007e6               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x018c}
0x007e6…00804               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0005, t01=0x001a}
0x00804…00826               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTOPT OPTION CODE «, t00=0x0005, t01=0x0038}
0x00826…0084c               Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTUEC USER ECB IF MMU «, t00=0x0005, t01=0x005a}
0x0084c…0086a               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTMEC MMU ECB «, t00=0x0005, t01=0x0080}
0x0086a…00888               Head {h00=0x001a, h01=0x0050, text=» EXTRN ECBFC FILE CODE«, t00=0x0005, t01=0x009e}
0x00888…008ac               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBBA BUFFER ADDRESS «, t00=0x0005, t01=0x00bc}
0x008ac…008d2               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBRL REQUESTED LENGTH «, t00=0x0005, t01=0x00e0}
0x008d2…008f8               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBEL EFFECTIVE LENGTH «, t00=0x0005, t01=0x0106}
0x008f8…0091c               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBCW1 CONTROL WORD 1«, t00=0x0005, t01=0x012c}
0x0091c…00940               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBCW2 CONTROL WORD 2«, t00=0x0005, t01=0x0150}
0x00940…00956               Head {h00=0x0012, h01=0x0050, text=» EXTRN GETSSA «, t00=0x0005, t01=0x0174}
0x00956…00984               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0005, t01=0x018a}
0x00984…009b0               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0006, t01=0x0028}
0x009b0…009dc               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0006, t01=0x0054}
0x009dc…00a0e               Head {h00=0x002e, h01=0x0050, text=» EXTRN DCSRED READ STATISTICS ENTRY POINT «, t00=0x0006, t01=0x0080}
0x00a0e…00a4c               Head {h00=0x003a, h01=0x0050, text=» EXTRN DCSRLL RESET ALL STATISTICS BUFFERS ENTRY POINT«, t00=0x0006, t01=0x00b2}
0x00a4c…00a8a               Head {h00=0x003a, h01=0x0050, text=» EXTRN DCSUPS UPDATE STATISTICS ENTRY POINT IN DCSTAT «, t00=0x0006, t01=0x00f0}
0x00a8a…00ac6               Head {h00=0x0038, h01=0x0050, text=» EXTRN GETDNA VALIDATE AND CONVERT SYMBOLIC DTE ADDR«, t00=0x0006, t01=0x012e}
0x00ac6…00b02               Head {h00=0x0038, h01=0x0050, text=» EXTRN GETSNA VALIDATE AND CONVERT SYMBOLIC SUB ADDR«, t00=0x0006, t01=0x016a}
0x00b02…00b30               Head {h00=0x002a, h01=0x0050, text=» EXTRN DC:MIN MOVE DATA TO USER BUFFER«, t00=0x0007, t01=0x0016}
0x00b30…00b60               Head {h00=0x002c, h01=0x0050, text=» EXTRN DC:MOT MOVE DATA FROM USER BUFFER«, t00=0x0007, t01=0x0044}
0x00b60…00b94               Head {h00=0x0030, h01=0x0050, text=» EXTRN DISEND COMPLETE REQUEST AND DISPATCH «, t00=0x0007, t01=0x0074}
0x00b94…00bc2               Head {h00=0x002a, h01=0x0050, text=» EXTRN PFPOST WAIT FOR POWER UP IF SET«, t00=0x0007, t01=0x00a8}
0x00bc2…00bd2               Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x0007, t01=0x00d6}
0x00bd2…00c20               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0007, t01=0x00e6}
0x00c20…00c2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0134}
0x00c2a…00c44               Head {h00=0x0016, h01=0x0050, text=»* REGISTER USAGE: «, t00=0x0007, t01=0x013e}
0x00c44…00c4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0158}
0x00c4e…00c6e               Head {h00=0x001c, h01=0x0050, text=»* A1 WORK (RETURN CODE) «, t00=0x0007, t01=0x0162}
0x00c6e…00c80               Head {h00=0x000e, h01=0x0050, text=»* A2 WORK «, t00=0x0007, t01=0x0182}
0x00c80…00ca2 (8, 0, 400)   Head {h00=0x001e, h01=0x0050, text=»* A3 WORK (BUFFER LENGTH) «, t00=0x0008, t01=0x0004}
0x00ca2…00cc4               Head {h00=0x001e, h01=0x0050, text=»* A4 WORK (BUFFER POINTER)«, t00=0x0008, t01=0x0026}
0x00cc4…00ce6               Head {h00=0x001e, h01=0x0050, text=»* A5 DRIVER STACK POINTER «, t00=0x0008, t01=0x0048}
0x00ce6…00cfe               Head {h00=0x0014, h01=0x0050, text=»* A6 DWT ADDRESS«, t00=0x0008, t01=0x006a}
0x00cfe…00d26               Head {h00=0x0024, h01=0x0050, text=»* A7 ORDER CODE, DTETAB ADDRESS «, t00=0x0008, t01=0x0082}
0x00d26…00d3e               Head {h00=0x0014, h01=0x0050, text=»* A8 ECB ADDRESS«, t00=0x0008, t01=0x00aa}
0x00d3e…00d48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00c2}
0x00d48…00d98               Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0008, t01=0x00cc}
0x00d98…00da6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x011c}
0x00da6…00de6               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0008, t01=0x012a}
0x00de6…00df0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x016a}
0x00df0…00e1e               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0008, t01=0x0174}
0x00e1e…00e28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0012}
0x00e28…00e32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x001c}
0x00e32…00e5c               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 1000 RECEIVE BUFFER LENGTH«, t00=0x0009, t01=0x0026}
0x00e5c…00e72               Head {h00=0x0012, h01=0x0050, text=»RBUFL EQU 1150«, t00=0x0009, t01=0x0050}
0x00e72…00e9a               Head {h00=0x0024, h01=0x0050, text=»X:B EQU 0 IF 1 INTERRUPT LOGGING«, t00=0x0009, t01=0x0066}
0x00e9a…00eae               Head {h00=0x0010, h01=0x0050, text=»LOGG EQU X:B«, t00=0x0009, t01=0x008e}
0x00eae…00ed4               Head {h00=0x0022, h01=0x0050, text=»X:C EQU 600 POLL TIMEOUT VALUE«, t00=0x0009, t01=0x00a2}
0x00ed4…00eea               Head {h00=0x0012, h01=0x0050, text=»TIMPOL EQU X:C«, t00=0x0009, t01=0x00c8}
0x00eea…00f18               Head {h00=0x002a, h01=0x0050, text=»X:D EQU 0 STATUS AND RVI HANDLING IF=1«, t00=0x0009, t01=0x00de}
0x00f18…00f2c               Head {h00=0x0010, h01=0x0050, text=»STARVI EQU 1«, t00=0x0009, t01=0x010c}
0x00f2c…00f5a               Head {h00=0x002a, h01=0x0050, text=»X:E EQU 0 READ COMMAND HANDLING IF =1 «, t00=0x0009, t01=0x0120}
0x00f5a…00f6e               Head {h00=0x0010, h01=0x0050, text=»RCOM EQU 1  «, t00=0x0009, t01=0x014e}
0x00f6e…00f98               Head {h00=0x0026, h01=0x0050, text=»X:F EQU 252 TRANSMIT BLOCK LENGTH «, t00=0x0009, t01=0x0162}
0x00f98…00fae               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU X:F «, t00=0x0009, t01=0x018c}
0x00fae…00fda               Head {h00=0x0028, h01=0x0050, text=»X:G EQU 0 CODE , 0=ASCII , 1=EBCDIC «, t00=0x000a, t01=0x0012}
0x00fda…00fec               Head {h00=0x000e, h01=0x0050, text=»CODE EQU 1«, t00=0x000a, t01=0x003e}
0x00fec…0101a               Head {h00=0x002a, h01=0x0050, text=»X:H EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x000a, t01=0x0050}
0x0101a…01030               Head {h00=0x0012, h01=0x0050, text=»SPECP EQU X:H «, t00=0x000a, t01=0x007e}
0x01030…01060               Head {h00=0x002c, h01=0x0050, text=»X:I EQU 0 IF = 1 LINE SPEED SET TO HIGH «, t00=0x000a, t01=0x0094}
0x01060…0108c               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x000a, t01=0x00c4}
0x0108c…010a0               Head {h00=0x0010, h01=0x0050, text=»SPEED EQU 1 «, t00=0x000a, t01=0x00f0}
0x010a0…010ce               Head {h00=0x002a, h01=0x0050, text=»X:J EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x000a, t01=0x0104}
0x010ce…010e2               Head {h00=0x0010, h01=0x0050, text=»MSV1 EQU X:J«, t00=0x000a, t01=0x0132}
0x010e2…01114               Head {h00=0x002e, h01=0x0050, text=»X:K EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x000a, t01=0x0146}
0x01114…01128               Head {h00=0x0010, h01=0x0050, text=»RBUFNR EQU 2«, t00=0x000a, t01=0x0178}
0x01128…0115a               Head {h00=0x002e, h01=0x0050, text=»X:L EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x000a, t01=0x018c}
0x0115a…01170               Head {h00=0x0012, h01=0x0050, text=»P6805 EQU X:L «, t00=0x000b, t01=0x002e}
0x01170…01184               Head {h00=0x0010, h01=0x0050, text=»X:M EQU /02 «, t00=0x000b, t01=0x0044}
0x01184…01198               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x000b, t01=0x0058}
0x01198…011c8               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU X:M DEVICE ADDRESS OF RECEIVER«, t00=0x000b, t01=0x006c}
0x011c8…011d4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x009c}
0x011d4…011e8               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x00a8}
0x011e8…01218               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x000b, t01=0x00bc}
0x01218…01224               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x00ec}
0x01224…01240               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000b, t01=0x00f8}
0x01240…01280               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x0114}
0x01280…01296               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x0154}
0x01296…012aa               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x016a}
0x012aa…012ea               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x017e}
0x012ea…01300               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000c, t01=0x002e}
0x01300…01312               Head {h00=0x000e, h01=0x0050, text=»X:N EQU 0 «, t00=0x000c, t01=0x0044}
0x01312…01344               Head {h00=0x002e, h01=0x0050, text=»IBMCHR EQU X:N IF 1 IBM CHARACTER HANDLING«, t00=0x000c, t01=0x0056}
0x01344…01376               Head {h00=0x002e, h01=0x0050, text=»X:O EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x000c, t01=0x0088}
0x01376…0138c               Head {h00=0x0012, h01=0x0050, text=»MESPAS EQU X:O«, t00=0x000c, t01=0x00ba}
0x0138c…013c4               Head {h00=0x0034, h01=0x0050, text=»X:P EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000c, t01=0x00d0}
0x013c4…013d8               Head {h00=0x0010, h01=0x0050, text=»EM3270 EQU 1«, t00=0x000c, t01=0x0108}
0x013d8…013ea               Head {h00=0x000e, h01=0x0050, text=»X:Q EQU 0 «, t00=0x000c, t01=0x011c}
0x013ea…01418               Head {h00=0x002a, h01=0x0050, text=»TPMODE EQU X:Q IF = 1 TRANSPARANT MODE«, t00=0x000c, t01=0x012e}
0x01418…0142a               Head {h00=0x000e, h01=0x0050, text=»X:R EQU 0 «, t00=0x000c, t01=0x015c}
0x0142a…0145c               Head {h00=0x002e, h01=0x0050, text=»STTSTS EQU X:R IF = 1 STATISTICS INCLUDED «, t00=0x000c, t01=0x016e}
0x0145c…01470               Head {h00=0x0010, h01=0x0050, text=»X:S EQU 500 «, t00=0x000d, t01=0x0010}
0x01470…01498               Head {h00=0x0024, h01=0x0050, text=»TBUFL EQU 1150 MMU BUFFER LENGTH«, t00=0x000d, t01=0x0024}
0x01498…014c6               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000d, t01=0x004c}
0x014c6…014f6               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 1 SPECIAL CONDITION FOR DENMARK«, t00=0x000d, t01=0x007a}
0x014f6…0152e               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000d, t01=0x00aa}
0x0152e…01562               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000d, t01=0x00e2}
0x01562…01596               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000d, t01=0x0116}
0x01596…015a4               Head {h00=0x000a, h01=0x0050, text=»    =2«, t00=0x000d, t01=0x014a}
0x015a4…015ac               Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0158}
0x015ac…015c4               Head {h00=0x0014, h01=0x0050, text=»REMTIM EQU 0  =9«, t00=0x000d, t01=0x0160}
0x015c4…015fa               Head {h00=0x0032, h01=0x0050, text=»   IF = 1 THE REMAINING TIME UNTIL TIMEOUT =9 «, t00=0x000d, t01=0x0178}
0x015fa…0162e               Head {h00=0x0030, h01=0x0050, text=»   IS DELIVERED IN ECBCW1 AT COMPLETION  =9 «, t00=0x000e, t01=0x001e}
0x0162e…01658               Head {h00=0x0026, h01=0x0050, text=»   OF SEND AND RECEIVE REQUESTS =9«, t00=0x000e, t01=0x0052}
0x01658…01662               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x007c}
0x01662…01676               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x000e, t01=0x0086}
0x01676…0168e               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x000e, t01=0x009a}
0x0168e…0169a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x00b2}
0x0169a…016ae               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x000e, t01=0x00be}
0x016ae…016c2               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x000e, t01=0x00d2}
0x016c2…016ce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x00e6}
0x016ce…016dc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x00f2}
0x016dc…016e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0100}
0x016e6…016f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x010a}
0x016f0…01722               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000e, t01=0x0114}
0x01722…0172c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0146}
0x0172c…0174a               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000e, t01=0x0150}
0x0174a…01754               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x016e}
0x01754…01786               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000e, t01=0x0178}
0x01786…01790               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x001a}
0x01790…017c2               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000f, t01=0x0024}
0x017c2…017f0               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000f, t01=0x0056}
0x017f0…017fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0084}
0x017fa…0180e               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000f, t01=0x008e}
0x0180e…01818               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a2}
0x01818…01822               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ac}
0x01822…0185c               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000f, t01=0x00b6}
0x0185c…0188e               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000f, t01=0x00f0}
0x0188e…01898               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0122}
0x01898…018ac               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000f, t01=0x012c}
0x018ac…018b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0140}
0x018b6…018ea               Head {h00=0x0030, h01=0x0050, text=»DEVIND EQU 0 DEVICE INDEX DATA COMMUNICATION«, t00=0x000f, t01=0x014a}
0x018ea…01918               Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE«, t00=0x000f, t01=0x017e}
0x01918…01922               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x001c}
0x01922…01930               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0026}
0x01930…0193a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0034}
0x0193a…01968               Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0010, t01=0x003e}
0x01968…01972               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006c}
0x01972…019a8               Head {h00=0x0032, h01=0x0050, text=»* DCDEFS  COMMON DEFS FOR DC DRIVERS/PACKAGES «, t00=0x0010, t01=0x0076}
0x019a8…019b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ac}
0x019b2…019e0               Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0010, t01=0x00b6}
0x019e0…019ea               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0010, t01=0x00e4}
0x019ea…01a1a               Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0010, t01=0x00ee}
0x01a1a…01a24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x011e}
0x01a24…01a46               Head {h00=0x001e, h01=0x0050, text=»* TABLE AND PACKET LAYOUTS«, t00=0x0010, t01=0x0128}
0x01a46…01a50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x014a}
0x01a50…01a80               Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0010, t01=0x0154}
0x01a80…01a8a               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0010, t01=0x0184}
0x01a8a…01a94               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0010, t01=0x018e}
0x01a94…01aa2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0008}
0x01aa2…01af0               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0011, t01=0x0016}
0x01af0…01afa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0064}
0x01afa…01b1a               Head {h00=0x001c, h01=0x0050, text=»* DWT, DEVICE WORK TABLE«, t00=0x0011, t01=0x006e}
0x01b1a…01b24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x008e}
0x01b24…01b74               Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0011, t01=0x0098}
0x01b74…01b7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00e8}
0x01b7e…01ba0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x00f2}
0x01ba0…01bc2               Head {h00=0x001e, h01=0x0050, text=»*   0 .  DWTCHP         . «, t00=0x0011, t01=0x0114}
0x01bc2…01be4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x0136}
0x01be4…01c06               Head {h00=0x001e, h01=0x0050, text=»*   2 .  DWTST          . «, t00=0x0011, t01=0x0158}
0x01c06…01c28               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x017a}
0x01c28…01c4a               Head {h00=0x001e, h01=0x0050, text=»*   4 .  DWTECB         . «, t00=0x0012, t01=0x000c}
0x01c4a…01c6c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x002e}
0x01c6c…01c8e               Head {h00=0x001e, h01=0x0050, text=»*   6 . DWTOPT . DWTOR  . «, t00=0x0012, t01=0x0050}
0x01c8e…01cb0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x0072}
0x01cb0…01cd2               Head {h00=0x001e, h01=0x0050, text=»*   8 .  DWTADR         . «, t00=0x0012, t01=0x0094}
0x01cd2…01cf4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x00b6}
0x01cf4…01d16               Head {h00=0x001e, h01=0x0050, text=»*  10 .  DWTTAB         . «, t00=0x0012, t01=0x00d8}
0x01d16…01d38               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x00fa}
0x01d38…01d5a               Head {h00=0x001e, h01=0x0050, text=»*  12 .  DWTWAT         . «, t00=0x0012, t01=0x011c}
0x01d5a…01d7c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x013e}
0x01d7c…01d9e               Head {h00=0x001e, h01=0x0050, text=»*  14 .  DWTTQ          . «, t00=0x0012, t01=0x0160}
0x01d9e…01dc0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x0182}
0x01dc0…01df0               Head {h00=0x002c, h01=0x0050, text=»* (16).  DWTUEC         .   IF   MMUPAG «, t00=0x0013, t01=0x0014}
0x01df0…01e12               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0013, t01=0x0044}
0x01e12…01e42               Head {h00=0x002c, h01=0x0050, text=»* (18).  DWTMEC         .   IF   MMUPAG «, t00=0x0013, t01=0x0066}
0x01e42…01e64               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0013, t01=0x0096}
0x01e64…01e8c               Head {h00=0x0024, h01=0x0050, text=»* DWTDRD  +2 .  DWTSTB         .«, t00=0x0013, t01=0x00b8}
0x01e8c…01eb4               Head {h00=0x0024, h01=0x0050, text=»*            ...................«, t00=0x0013, t01=0x00e0}
0x01eb4…01ed6               Head {h00=0x001e, h01=0x0050, text=»*  +4 .  DWTCHD         . «, t00=0x0013, t01=0x0108}
0x01ed6…01ef8               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0013, t01=0x012a}
0x01ef8…01f1a               Head {h00=0x001e, h01=0x0050, text=»*  +6 .  DWTCHN         . «, t00=0x0013, t01=0x014c}
0x01f1a…01f3c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0013, t01=0x016e}
0x01f3c…01f5e               Head {h00=0x001e, h01=0x0050, text=»*  +8 .  DWTLAD         . «, t00=0x0013, t01=0x0190}
0x01f5e…01f80               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x0022}
0x01f80…01fa2               Head {h00=0x001e, h01=0x0050, text=»* +10 .  DWTRAD         . «, t00=0x0014, t01=0x0044}
0x01fa2…01fc4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x0066}
0x01fc4…01fe6               Head {h00=0x001e, h01=0x0050, text=»* +12 .  DWTDR1/SUB     . «, t00=0x0014, t01=0x0088}
0x01fe6…02008               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x00aa}
0x02008…0202a               Head {h00=0x001e, h01=0x0050, text=»* +14 .  DWTRCL         . «, t00=0x0014, t01=0x00cc}
0x0202a…0204c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x00ee}
0x0204c…0206e               Head {h00=0x001e, h01=0x0050, text=»* +16 .  DWTRTV         . «, t00=0x0014, t01=0x0110}
0x0206e…02090               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x0132}
0x02090…020b2               Head {h00=0x001e, h01=0x0050, text=»* +18 .  DWTRTP         . «, t00=0x0014, t01=0x0154}
0x020b2…020d4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x0176}
0x020d4…020f6               Head {h00=0x001e, h01=0x0050, text=»* +20 .  DWTOPE         . «, t00=0x0015, t01=0x0008}
0x020f6…02118               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0015, t01=0x002a}
0x02118…0213a               Head {h00=0x001e, h01=0x0050, text=»* +22 .  DWTOPN         . «, t00=0x0015, t01=0x004c}
0x0213a…0215c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0015, t01=0x006e}
0x0215c…0217e               Head {h00=0x001e, h01=0x0050, text=»* +24 .  DWTIPC         . «, t00=0x0015, t01=0x0090}
0x0217e…021a0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0015, t01=0x00b2}
0x021a0…021c2               Head {h00=0x001e, h01=0x0050, text=»* +26 .  DWTIPT         . «, t00=0x0015, t01=0x00d4}
0x021c2…021e4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0015, t01=0x00f6}
0x021e4…02206               Head {h00=0x001e, h01=0x0050, text=»* +28 .                 . «, t00=0x0015, t01=0x0118}
0x02206…02228               Head {h00=0x001e, h01=0x0050, text=»*     /  DRIVER DEPEND  / «, t00=0x0015, t01=0x013a}
0x02228…0224a               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x0015, t01=0x015c}
0x0224a…0226c               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x0015, t01=0x017e}
0x0226c…0228e               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0016, t01=0x0010}
0x0228e…022ca               Head {h00=0x0038, h01=0x0050, text=»*     .  STATISTIC      .   IF STAT   AND DWTSTB /=0«, t00=0x0016, t01=0x0032}
0x022ca…022ec               Head {h00=0x001e, h01=0x0050, text=»*     /  BUFFER         / «, t00=0x0016, t01=0x006e}
0x022ec…0230e               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0016, t01=0x0090}
0x0230e…02318               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00b2}
0x02318…02326               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x00bc}
0x02326…02330               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ca}
0x02330…02372               Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0016, t01=0x00d4}
0x02372…0237c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0116}
0x0237c…023a6               Head {h00=0x0026, h01=0x0050, text=»* D W T  D I S P L A C E M E N T S«, t00=0x0016, t01=0x0120}
0x023a6…023b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x014a}
0x023b0…023f2               Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0016, t01=0x0154}
0x023f2…023fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0008}
0x023fc…02420               Head {h00=0x0020, h01=0x0050, text=»DWTTQ EQU /0E TERMINAL QUEUE«, t00=0x0017, t01=0x0012}
0x02420…02436               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0017, t01=0x0036}
0x02436…02470               Head {h00=0x0036, h01=0x0050, text=»DWTDRD EQU DWTTQ+2 START OF DRIVER DEPENDENT AREA «, t00=0x0017, t01=0x004c}
0x02470…0247c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0086}
0x0247c…02492               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0017, t01=0x0092}
0x02492…024cc               Head {h00=0x0036, h01=0x0050, text=»DWTDRD EQU DWTTQ+6 START OF DRIVER DEPENDENT AREA «, t00=0x0017, t01=0x00a8}
0x024cc…024d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00e2}
0x024d8…02520               Head {h00=0x0044, h01=0x0050, text=»DWTSTB EQU DWTDRD OFFSET REL START DWT TO STATISTIC BUFF IF ANY «, t00=0x0017, t01=0x00ee}
0x02520…02556               Head {h00=0x0032, h01=0x0050, text=»DWTCHD EQU DWTDRD+2 CONFIG CHAIN LINK HEAD DWT«, t00=0x0017, t01=0x0136}
0x02556…0258c               Head {h00=0x0032, h01=0x0050, text=»DWTCHN EQU DWTDRD+4 CONFIG CHAIN LINK NEXT DWT«, t00=0x0017, t01=0x016c}
0x0258c…025c2               Head {h00=0x0032, h01=0x0050, text=»DWTLAD EQU DWTDRD+6 LOCAL SYMBOLIC DTE ADDRESS«, t00=0x0018, t01=0x0012}
0x025c2…025fa               Head {h00=0x0034, h01=0x0050, text=»DWTRAD EQU DWTDRD+8 REMOTE SYMBOLIC DTE ADDRESS «, t00=0x0018, t01=0x0048}
0x025fa…02628               Head {h00=0x002a, h01=0x0050, text=»DWTDR1 EQU DWTDRD+10 DRIVER DEP WORD 1«, t00=0x0018, t01=0x0080}
0x02628…02656               Head {h00=0x002a, h01=0x0050, text=»DWTSUB EQU DWTDR1 SYMBOLIC SUBADDRESS «, t00=0x0018, t01=0x00ae}
0x02656…02688               Head {h00=0x002e, h01=0x0050, text=»DWTRCL EQU DWTDRD+12 REQUEST CONTROL WORD «, t00=0x0018, t01=0x00dc}
0x02688…026b8               Head {h00=0x002c, h01=0x0050, text=»DWTRTV EQU DWTDRD+14 REQUEST TIMER VALUE«, t00=0x0018, t01=0x010e}
0x026b8…026ea               Head {h00=0x002e, h01=0x0050, text=»DWTRTP EQU DWTDRD+16 REQUEST TIMER POINTER«, t00=0x0018, t01=0x013e}
0x026ea…02730               Head {h00=0x0042, h01=0x0050, text=»DWTOPE EQU DWTDRD+18 O/P DATA Q EXPEDITED/STATUS LINK NXT DWT «, t00=0x0018, t01=0x0170}
0x02730…0276c               Head {h00=0x0038, h01=0x0050, text=»DWTOPN EQU DWTDRD+20 O/P DATA Q NORMAL LINK NXT DWT «, t00=0x0019, t01=0x0026}
0x0276c…027a2               Head {h00=0x0032, h01=0x0050, text=»DWTIPC EQU DWTDRD+22 I/P DATA Q LINK TO BUFFER«, t00=0x0019, t01=0x0062}
0x027a2…027d6               Head {h00=0x0030, h01=0x0050, text=»DWTIPT EQU DWTDRD+24 I/P DATA TIMER POINTER «, t00=0x0019, t01=0x0098}
0x027d6…02802               Head {h00=0x0028, h01=0x0050, text=»DWTCUR EQU DWTDRD+26 CURSOR ADDRESS «, t00=0x0019, t01=0x00cc}
0x02802…02834               Head {h00=0x002e, h01=0x0050, text=»DWTBUF EQU DWTDRD+28 DEVICE BUFFER ADDRESS«, t00=0x0019, t01=0x00f8}
0x02834…0285c               Head {h00=0x0024, h01=0x0050, text=»DWTSTA EQU DWTDRD+30 DWT STATUS «, t00=0x0019, t01=0x012a}
0x0285c…0286a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0152}
0x0286a…028b8               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0019, t01=0x0160}
0x028b8…028c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x001e}
0x028c2…028e2               Head {h00=0x001c, h01=0x0050, text=»* DTE, DTE CONTROL TABLE«, t00=0x001a, t01=0x0028}
0x028e2…028ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0048}
0x028ec…0293c               Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x001a, t01=0x0052}
0x0293c…02946               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00a2}
0x02946…02968               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x00ac}
0x02968…0298a               Head {h00=0x001e, h01=0x0050, text=»*   0 .  DTECHP         . «, t00=0x001a, t01=0x00ce}
0x0298a…029ac               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x00f0}
0x029ac…029ce               Head {h00=0x001e, h01=0x0050, text=»*   2 .  DTEST          . «, t00=0x001a, t01=0x0112}
0x029ce…029f0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x0134}
0x029f0…02a12               Head {h00=0x001e, h01=0x0050, text=»*   4 .  DTEECB         . «, t00=0x001a, t01=0x0156}
0x02a12…02a34               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x0178}
0x02a34…02a56               Head {h00=0x001e, h01=0x0050, text=»*   6 . DTEOPT . DTEOR  . «, t00=0x001b, t01=0x000a}
0x02a56…02a78               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x002c}
0x02a78…02a9a               Head {h00=0x001e, h01=0x0050, text=»*   8 .  DTEADR         . «, t00=0x001b, t01=0x004e}
0x02a9a…02abc               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x0070}
0x02abc…02ade               Head {h00=0x001e, h01=0x0050, text=»*  10 .  DTETAB         . «, t00=0x001b, t01=0x0092}
0x02ade…02b00               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x00b4}
0x02b00…02b22               Head {h00=0x001e, h01=0x0050, text=»*  12 .  DTEWAT         . «, t00=0x001b, t01=0x00d6}
0x02b22…02b44               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x00f8}
0x02b44…02b66               Head {h00=0x001e, h01=0x0050, text=»*  14 .  DTETQ          . «, t00=0x001b, t01=0x011a}
0x02b66…02b88               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x013c}
0x02b88…02bb8               Head {h00=0x002c, h01=0x0050, text=»* (16).  DTEUEC         .   IF   MMUPAG «, t00=0x001b, t01=0x015e}
0x02bb8…02bda               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x018e}
0x02bda…02c0a               Head {h00=0x002c, h01=0x0050, text=»* (18).  DTEMEC         .   IF   MMUPAG «, t00=0x001c, t01=0x0020}
0x02c0a…02c2c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001c, t01=0x0050}
0x02c2c…02c54               Head {h00=0x0024, h01=0x0050, text=»* DTEDRD  +2 .  DTESTB         .«, t00=0x001c, t01=0x0072}
0x02c54…02c7c               Head {h00=0x0024, h01=0x0050, text=»*            ...................«, t00=0x001c, t01=0x009a}
0x02c7c…02c9e               Head {h00=0x001e, h01=0x0050, text=»*  +4 .  DTECHD         . «, t00=0x001c, t01=0x00c2}
0x02c9e…02cc0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001c, t01=0x00e4}
0x02cc0…02ce2               Head {h00=0x001e, h01=0x0050, text=»*  +6 .  DTECHN         . «, t00=0x001c, t01=0x0106}
0x02ce2…02d04               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001c, t01=0x0128}
0x02d04…02d26               Head {h00=0x001e, h01=0x0050, text=»*  +8 .  DTELAD         . «, t00=0x001c, t01=0x014a}
0x02d26…02d48               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001c, t01=0x016c}
0x02d48…02d6a               Head {h00=0x001e, h01=0x0050, text=»* +10 .                 . «, t00=0x001c, t01=0x018e}
0x02d6a…02d8c               Head {h00=0x001e, h01=0x0050, text=»*     /  DRIVER DEPEND  / «, t00=0x001d, t01=0x0020}
0x02d8c…02dae               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x001d, t01=0x0042}
0x02dae…02dd0               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x001d, t01=0x0064}
0x02dd0…02df2               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001d, t01=0x0086}
0x02df2…02e2e               Head {h00=0x0038, h01=0x0050, text=»*     .  STATISTIC      .   IF STAT   AND DTESTB /=0«, t00=0x001d, t01=0x00a8}
0x02e2e…02e50               Head {h00=0x001e, h01=0x0050, text=»*     /  BUFFER         / «, t00=0x001d, t01=0x00e4}
0x02e50…02e72               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001d, t01=0x0106}
0x02e72…02e7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0128}
0x02e7c…02e90               Head {h00=0x0010, h01=0x0050, text=»DTETQ EQU 14«, t00=0x001d, t01=0x0132}
0x02e90…02eaa               Head {h00=0x0016, h01=0x0050, text=»DTEUEC EQU DTETQ+2«, t00=0x001d, t01=0x0146}
0x02eaa…02ec6               Head {h00=0x0018, h01=0x0050, text=»DTEMEC EQU DTEUEC+2 «, t00=0x001d, t01=0x0160}
0x02ec6…02ece               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x017c}
0x02ece…02ee4               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001d, t01=0x0184}
0x02ee4…02f1a               Head {h00=0x0032, h01=0x0050, text=»DTEDRD EQU DTETQ+2 START OF DC DEPENDENT AREA «, t00=0x001e, t01=0x000a}
0x02f1a…02f26               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0040}
0x02f26…02f3c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001e, t01=0x004c}
0x02f3c…02f72               Head {h00=0x0032, h01=0x0050, text=»DTEDRD EQU DTEMEC+2 START OF DC DEPENDENT AREA«, t00=0x001e, t01=0x0062}
0x02f72…02f7e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0098}
0x02f7e…02fc6               Head {h00=0x0044, h01=0x0050, text=»DTESTB EQU DTEDRD OFFSET REL START DTE TO STATISTIC BUFF IF ANY «, t00=0x001e, t01=0x00a4}
0x02fc6…02ffc               Head {h00=0x0032, h01=0x0050, text=»DTECHD EQU DTEDRD+2 CONFIG CHAIN LINK HEAD DTE«, t00=0x001e, t01=0x00ec}
0x02ffc…03032               Head {h00=0x0032, h01=0x0050, text=»DTECHN EQU DTEDRD+4 CONFIG CHAIN LINK NEXT DTE«, t00=0x001e, t01=0x0122}
0x03032…03068               Head {h00=0x0032, h01=0x0050, text=»DTELAD EQU DTEDRD+6 LOCAL SYMBOLIC DTE ADDRESS«, t00=0x001e, t01=0x0158}
0x03068…03082               Head {h00=0x0016, h01=0x0050, text=»* DRIVER DEPENDENT«, t00=0x001e, t01=0x018e}
0x03082…030b2               Head {h00=0x002c, h01=0x0050, text=»DTEPLS EQU DTEDRD+8 PHYSICAL LINK STATUS«, t00=0x001f, t01=0x0018}
0x030b2…030e0               Head {h00=0x002a, h01=0x0050, text=»DTEDLS EQU DTEDRD+10 DATA LINK STATUS «, t00=0x001f, t01=0x0048}
0x030e0…03108               Head {h00=0x0024, h01=0x0050, text=»DTESTA EQU DTEDRD+12 DTE STATUS «, t00=0x001f, t01=0x0076}
0x03108…03134               Head {h00=0x0028, h01=0x0050, text=»DTEDWT EQU DTEDRD+14 CHAIN LINK  DWT«, t00=0x001f, t01=0x009e}
0x03134…03168               Head {h00=0x0030, h01=0x0050, text=»DTEDDT EQU DTEDRD+16 CHAIN LINK  DISCARD DWT«, t00=0x001f, t01=0x00ca}
0x03168…03182               Head {h00=0x0016, h01=0x0050, text=»* STATITICS BUFFER«, t00=0x001f, t01=0x00fe}
0x03182…031b8               Head {h00=0x0032, h01=0x0050, text=»STWSID EQU DTEDRD+18 RESERVED FOR SYMBOLIC ID «, t00=0x001f, t01=0x0118}
0x031b8…031ea               Head {h00=0x002e, h01=0x0050, text=»STWCST EQU DTEDRD+20 COUNTER STATUS INDEX «, t00=0x001f, t01=0x014e}
0x031ea…03218               Head {h00=0x002a, h01=0x0050, text=»STWMIX EQU DTEDRD+22 MAX COUNTER INDEX«, t00=0x001f, t01=0x0180}
0x03218…0323e               Head {h00=0x0022, h01=0x0050, text=»STWCTA EQU DTEDRD+24 COUNTERS «, t00=0x0020, t01=0x001e}
0x0323e…0324c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x0044}
0x0324c…0329a               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0020, t01=0x0052}
0x0329a…032a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00a0}
0x032a4…032d4               Head {h00=0x002c, h01=0x0050, text=»* COUNTER INDECES - PARAMETER-1 EQUATES «, t00=0x0020, t01=0x00aa}
0x032d4…032de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00da}
0x032de…03300               Head {h00=0x001e, h01=0x0050, text=»* REQUEST LEVEL COUNTERS: «, t00=0x0020, t01=0x00e4}
0x03300…0330a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0106}
0x0330a…03352               Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0020, t01=0x0110}
0x03352…0335c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0158}
0x0335c…0338a               Head {h00=0x002a, h01=0x0050, text=»CSRCON EQU /01 CONNECTIONS ESTABLISHED«, t00=0x0020, t01=0x0162}
0x0338a…033c2               Head {h00=0x0034, h01=0x0050, text=»CSRCBY EQU /02 CONNECTION NOT ESTABLISHED - BUSY«, t00=0x0020, t01=0x0190}
0x033c2…033ea               Head {h00=0x0024, h01=0x0050, text=»CSRMSR EQU /03 MESSAGES RECEIVED«, t00=0x0021, t01=0x0038}
0x033ea…03414               Head {h00=0x0026, h01=0x0050, text=»CSRCHR EQU /C5 CHARACTERS RECEIVED«, t00=0x0021, t01=0x0060}
0x03414…03440               Head {h00=0x0028, h01=0x0050, text=»CSRMST EQU /06 MESSAGES TRANSMITTED «, t00=0x0021, t01=0x008a}
0x03440…0346e               Head {h00=0x002a, h01=0x0050, text=»CSRCHT EQU /C8 CHARACTERS TRANSMITTED «, t00=0x0021, t01=0x00b6}
0x0346e…0348c               Head {h00=0x001a, h01=0x0050, text=»CSRTOP EQU /09 TIMEOUT«, t00=0x0021, t01=0x00e4}
0x0348c…034aa               Head {h00=0x001a, h01=0x0050, text=»CSRABT EQU /0A ABORTED«, t00=0x0021, t01=0x0102}
0x034aa…034c6               Head {h00=0x0018, h01=0x0050, text=»CSRERR EQU /0B ERROR«, t00=0x0021, t01=0x0120}
0x034c6…034f0               Head {h00=0x0026, h01=0x0050, text=»CSRTRE EQU /0C TRANSMISSION ERROR «, t00=0x0021, t01=0x013c}
0x034f0…0351a               Head {h00=0x0026, h01=0x0050, text=»CSRXC1 EQU /0D PROTOCOL DEPENDENT «, t00=0x0021, t01=0x0166}
0x0351a…03524               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0190}
0x03524…03542               Head {h00=0x001a, h01=0x0050, text=»* LINK LEVEL COUNTERS «, t00=0x0022, t01=0x000a}
0x03542…0354c               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0022, t01=0x0028}
0x0354c…0357e               Head {h00=0x002e, h01=0x0050, text=»CSSRBL EQU /10 SYNCH DATA BLOCKS RECEIVED «, t00=0x0022, t01=0x0032}
0x0357e…035bc               Head {h00=0x003a, h01=0x0050, text=»CSSRBY EQU /11   "   DATA BLOCKS REJECTED BUFFER BUSY «, t00=0x0022, t01=0x0064}
0x035bc…035fe               Head {h00=0x003e, h01=0x0050, text=»CSSRBO EQU /12   "   DATA BLOCKS REJECTED BUFFER OVERFLOW «, t00=0x0022, t01=0x00a2}
0x035fe…03638               Head {h00=0x0036, h01=0x0050, text=»CSSRAB EQU /13   "   DATA BLOCKS REJECTED ABORTED «, t00=0x0022, t01=0x00e4}
0x03638…03676               Head {h00=0x003a, h01=0x0050, text=»CSSRPE EQU /14   "   DATA BLOCKS REJECTED PARITY ERROR«, t00=0x0022, t01=0x011e}
0x03676…036aa               Head {h00=0x0030, h01=0x0050, text=»CSSTBL EQU /15   "   DATA BLOCKS TRANSMITTED«, t00=0x0022, t01=0x015c}
0x036aa…036e0               Head {h00=0x0032, h01=0x0050, text=»CSSTRT EQU /16   "   DATA BLOCKS RETRANSMITTED«, t00=0x0022, t01=0x0190}
0x036e0…03710               Head {h00=0x002c, h01=0x0050, text=»CSSTAB EQU /17   "   DATA BLOCKS ABORTED«, t00=0x0023, t01=0x0036}
0x03710…03748               Head {h00=0x0034, h01=0x0050, text=»CSSXC1 EQU /18 NBR OF REPLY REQUESTS TRANSMITTED«, t00=0x0023, t01=0x0066}
0x03748…03772               Head {h00=0x0026, h01=0x0050, text=»CSSXC2 EQU /19 PROCEDURE TIME OUTS«, t00=0x0023, t01=0x009e}
0x03772…037ae               Head {h00=0x0038, h01=0x0050, text=»CSSXC3 EQU /1A NBR OF TIMES POLL TIMEOUT HAS OCCURED«, t00=0x0023, t01=0x00c8}
0x037ae…037b8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0023, t01=0x0104}
0x037b8…037c2               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0023, t01=0x010e}
0x037c2…037d0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x0118}
0x037d0…037f0               Head {h00=0x001c, h01=0x0050, text=»* DTE/DCE LEVEL COUNTERS«, t00=0x0023, t01=0x0126}
0x037f0…037fa               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0023, t01=0x0146}
0x037fa…03822               Head {h00=0x0024, h01=0x0050, text=»CSCDTE EQU /28 DTE NOT OPERABLE «, t00=0x0023, t01=0x0150}
0x03822…0384e               Head {h00=0x0028, h01=0x0050, text=»CSCDIT EQU /29 I/P THROUGHPUT ERROR «, t00=0x0023, t01=0x0178}
0x0384e…0387a               Head {h00=0x0028, h01=0x0050, text=»CSCDOT EQU /2A O/P THROUGHPUT ERROR «, t00=0x0024, t01=0x0014}
0x0387a…038a2               Head {h00=0x0024, h01=0x0050, text=»CSCDCE EQU /2B DCE NOT OPERABLE «, t00=0x0024, t01=0x0040}
0x038a2…038d0               Head {h00=0x002a, h01=0x0050, text=»CSCXC1 EQU /2C CONTROL UNIT DEPENDENT «, t00=0x0024, t01=0x0068}
0x038d0…038ec               Head {h00=0x0018, h01=0x0050, text=»CSCXC2 EQU /2D     "«, t00=0x0024, t01=0x0096}
0x038ec…03908               Head {h00=0x0018, h01=0x0050, text=»CSCXC3 EQU /2E     "«, t00=0x0024, t01=0x00b2}
0x03908…03916               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x00ce}
0x03916…03920               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00dc}
0x03920…0392a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00e6}
0x0392a…03944               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x0024, t01=0x00f0}
0x03944…0394e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x010a}
0x0394e…03958               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0114}
0x03958…03972               Head {h00=0x0016, h01=0x0050, text=»* ORDER CODE (A7) «, t00=0x0024, t01=0x011e}
0x03972…0397c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0138}
0x0397c…03996               Head {h00=0x0016, h01=0x0050, text=»OPEN EQU /21 OPEN «, t00=0x0024, t01=0x0142}
0x03996…039b2               Head {h00=0x0018, h01=0x0050, text=»CLOSE EQU /22 CLOSE «, t00=0x0024, t01=0x015c}
0x039b2…039d8               Head {h00=0x0022, h01=0x0050, text=»CONPAS EQU /27 CONNECT PASSIVE«, t00=0x0024, t01=0x0178}
0x039d8…039f8               Head {h00=0x001c, h01=0x0050, text=»DISCO EQU /2F DISCONNECT«, t00=0x0025, t01=0x000e}
0x039f8…03a18               Head {h00=0x001c, h01=0x0050, text=»RECEIVE EQU /02 RECEIVE «, t00=0x0025, t01=0x002e}
0x03a18…03a32               Head {h00=0x0016, h01=0x0050, text=»SEND EQU /06 SEND «, t00=0x0025, t01=0x004e}
0x03a32…03a54               Head {h00=0x001e, h01=0x0050, text=»RSTAT EQU /00 READ STATUS «, t00=0x0025, t01=0x0068}
0x03a54…03a74               Head {h00=0x001c, h01=0x0050, text=»SSTAT EQU /38 SET STATUS«, t00=0x0025, t01=0x008a}
0x03a74…03aa0               Head {h00=0x0028, h01=0x0050, text=»STATIS EQU /2D READ/RESET STATISTICS«, t00=0x0025, t01=0x00aa}
0x03aa0…03ac8               Head {h00=0x0024, h01=0x0050, text=»STIMOT EQU /39 SET TIMEOUT VALUE«, t00=0x0025, t01=0x00d6}
0x03ac8…03ad2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00fe}
0x03ad2…03ae4               Head {h00=0x000e, h01=0x0050, text=»* OPTIONS:«, t00=0x0025, t01=0x0108}
0x03ae4…03aee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x011a}
0x03aee…03b24               Head {h00=0x0032, h01=0x0050, text=»TYPRR EQU /4343 RESET STATISTICS AFTER READ =5«, t00=0x0025, t01=0x0124}
0x03b24…03b32               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x015a}
0x03b32…03b3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0168}
0x03b3c…03b7e               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0025, t01=0x0172}
0x03b7e…03b88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0024}
0x03b88…03bba               Head {h00=0x002e, h01=0x0050, text=»* S O F T W A R E  R E T U R N  C O D E S «, t00=0x0026, t01=0x002e}
0x03bba…03bc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0060}
0x03bc4…03c06               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0026, t01=0x006a}
0x03c06…03c10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00ac}
0x03c10…03c60               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0026, t01=0x00b6}
0x03c60…03c86               Head {h00=0x0022, h01=0x0050, text=»R:REQ EQU /8000 REQUEST ERROR «, t00=0x0026, t01=0x0106}
0x03c86…03cae               Head {h00=0x0024, h01=0x0050, text=»R:ABRT EQU /4000 REQUEST ABORTED«, t00=0x0026, t01=0x012c}
0x03cae…03cc4               Head {h00=0x0012, h01=0x0050, text=»R:2 EQU /2000 «, t00=0x0026, t01=0x0154}
0x03cc4…03cda               Head {h00=0x0012, h01=0x0050, text=»R:3 EQU /1000 «, t00=0x0026, t01=0x016a}
0x03cda…03d28               Head {h00=0x004a, h01=0x0050, text=»*---------------------------------------------------------------------«, t00=0x0026, t01=0x0180}
0x03d28…03d3e               Head {h00=0x0012, h01=0x0050, text=»R:4 EQU /0800 «, t00=0x0027, t01=0x003e}
0x03d3e…03d54               Head {h00=0x0012, h01=0x0050, text=»R:5 EQU /0400 «, t00=0x0027, t01=0x0054}
0x03d54…03d6a               Head {h00=0x0012, h01=0x0050, text=»R:6 EQU /0200 «, t00=0x0027, t01=0x006a}
0x03d6a…03d9a               Head {h00=0x002c, h01=0x0050, text=»R:DATA EQU /0100 DATA AVAILABLE (QUEUED)«, t00=0x0027, t01=0x0080}
0x03d9a…03de8               Head {h00=0x004a, h01=0x0050, text=»*---------------------------------------------------------------------«, t00=0x0027, t01=0x00b0}
0x03de8…03dfe               Head {h00=0x0012, h01=0x0050, text=»R:8 EQU /0080 «, t00=0x0027, t01=0x00fe}
0x03dfe…03e20               Head {h00=0x001e, h01=0x0050, text=»R:TIME EQU /0040 TIME OUT «, t00=0x0027, t01=0x0114}
0x03e20…03e36               Head {h00=0x0012, h01=0x0050, text=»R:10 EQU /0020«, t00=0x0027, t01=0x0136}
0x03e36…03e5c               Head {h00=0x0022, h01=0x0050, text=»R:SEQ EQU /0010 SEQUENCE ERROR«, t00=0x0027, t01=0x014c}
0x03e5c…03eaa               Head {h00=0x004a, h01=0x0050, text=»*---------------------------------------------------------------------«, t00=0x0027, t01=0x0172}
0x03eaa…03ed2               Head {h00=0x0024, h01=0x0050, text=»R:LGTH EQU /0008 ILLEGAL LENGTH «, t00=0x0028, t01=0x0030}
0x03ed2…03ee8               Head {h00=0x0012, h01=0x0050, text=»R:13 EQU /0004«, t00=0x0028, t01=0x0058}
0x03ee8…03f1a               Head {h00=0x002e, h01=0x0050, text=»R:LOGC EQU /0002 LOGICAL CONNECTION ERROR «, t00=0x0028, t01=0x006e}
0x03f1a…03f4c               Head {h00=0x002e, h01=0x0050, text=»R:PHYC EQU /0001 PHYSICAL CONNECTION ERROR«, t00=0x0028, t01=0x00a0}
0x03f4c…03f9c               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0028, t01=0x00d2}
0x03f9c…03fa6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0122}
0x03fa6…03fb4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x012c}
0x03fb4…03fbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x013a}
0x03fbe…03ffe               Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0028, t01=0x0144}
0x03ffe…04008               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0184}
0x04008…0403a               Head {h00=0x002e, h01=0x0050, text=»* H A R D W A R E  R E T U R N  C O D E S «, t00=0x0028, t01=0x018e}
0x0403a…04044               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0030}
0x04044…04086               Head {h00=0x003e, h01=0x0050, text=»*********************************************************=«, t00=0x0029, t01=0x003a}
0x04086…04090               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x007c}
0x04090…040e0               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0029, t01=0x0086}
0x040e0…040f6               Head {h00=0x0012, h01=0x0050, text=»H:0 EQU /8000 «, t00=0x0029, t01=0x00d6}
0x040f6…0410c               Head {h00=0x0012, h01=0x0050, text=»H:1 EQU /4000 «, t00=0x0029, t01=0x00ec}
0x0410c…04122               Head {h00=0x0012, h01=0x0050, text=»H:2 EQU /2000 «, t00=0x0029, t01=0x0102}
0x04122…04138               Head {h00=0x0012, h01=0x0050, text=»H:3 EQU /1000 «, t00=0x0029, t01=0x0118}
0x04138…04188               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0029, t01=0x012e}
0x04188…0419e               Head {h00=0x0012, h01=0x0050, text=»H:4 EQU /0800 «, t00=0x0029, t01=0x017e}
0x0419e…041b4 (42, 0, 400)  Head {h00=0x0012, h01=0x0050, text=»H:5 EQU /0400 «, t00=0x002a, t01=0x0004}
0x041b4…041ca               Head {h00=0x0012, h01=0x0050, text=»H:6 EQU /0200 «, t00=0x002a, t01=0x001a}
0x041ca…041e0               Head {h00=0x0012, h01=0x0050, text=»H:7 EQU /0100 «, t00=0x002a, t01=0x0030}
0x041e0…04230               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x002a, t01=0x0046}
0x04230…04246               Head {h00=0x0012, h01=0x0050, text=»H:8 EQU /0080 «, t00=0x002a, t01=0x0096}
0x04246…0425c               Head {h00=0x0012, h01=0x0050, text=»H:9 EQU /0040 «, t00=0x002a, t01=0x00ac}
0x0425c…04280               Head {h00=0x0020, h01=0x0050, text=»H:CARR EQU /0020 CARRIER OFF«, t00=0x002a, t01=0x00c2}
0x04280…04296               Head {h00=0x0012, h01=0x0050, text=»H:11 EQU /0010«, t00=0x002a, t01=0x00e6}
0x04296…042e4               Head {h00=0x004a, h01=0x0050, text=»*-------------------------------------------------------------------- «, t00=0x002a, t01=0x00fc}
0x042e4…042fa               Head {h00=0x0012, h01=0x0050, text=»H:12 EQU /0008«, t00=0x002a, t01=0x014a}
0x042fa…04320               Head {h00=0x0022, h01=0x0050, text=»H:PARI EQU /0004 PARITY ERROR «, t00=0x002a, t01=0x0160}
0x04320…0434a               Head {h00=0x0026, h01=0x0050, text=»H:THRU EQU /0002 THROUGHPUT ERROR «, t00=0x002a, t01=0x0186}
0x0434a…04370               Head {h00=0x0022, h01=0x0050, text=»H:NOOP EQU /0001 NOT OPERABLE «, t00=0x002b, t01=0x0020}
0x04370…043c0               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x002b, t01=0x0046}
0x043c0…043d2               Head {h00=0x000e, h01=0x0050, text=» EJECT    «, t00=0x002b, t01=0x0096}
0x043d2…04414               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x002b, t01=0x00a8}
0x04414…0441e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00ea}
0x0441e…04442               Head {h00=0x0020, h01=0x0050, text=»* LINE CONTROL CHAR EQU:S   «, t00=0x002b, t01=0x00f4}
0x04442…04450               Head {h00=0x000a, h01=0x0050, text=»*     «, t00=0x002b, t01=0x0118}
0x04450…04492               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x002b, t01=0x0126}
0x04492…0449c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0168}
0x0449c…044c6               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x002b, t01=0x0172}
0x044c6…044da               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x002c, t01=0x000c}
0x044da…044ee               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x002c, t01=0x0020}
0x044ee…04502               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x002c, t01=0x0034}
0x04502…04516               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x002c, t01=0x0048}
0x04516…0452a               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x002c, t01=0x005c}
0x0452a…0453e               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x002c, t01=0x0070}
0x0453e…04552               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x002c, t01=0x0084}
0x04552…04566               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x002c, t01=0x0098}
0x04566…0457a               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x002c, t01=0x00ac}
0x0457a…0458e               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x002c, t01=0x00c0}
0x0458e…045a2               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x002c, t01=0x00d4}
0x045a2…045b6               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x002c, t01=0x00e8}
0x045b6…045c8               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x002c, t01=0x00fc}
0x045c8…045de               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x002c, t01=0x010e}
0x045de…045f4               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x002c, t01=0x0124}
0x045f4…04602               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x013a}
0x04602…04616               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x002c, t01=0x0148}
0x04616…0462a               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x002c, t01=0x015c}
0x0462a…0463e               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x002c, t01=0x0170}
0x0463e…04652               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x002c, t01=0x0184}
0x04652…04666               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x002d, t01=0x0008}
0x04666…0467a               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x002d, t01=0x001c}
0x0467a…0468e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x002d, t01=0x0030}
0x0468e…046a2               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x002d, t01=0x0044}
0x046a2…046ae               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0058}
0x046ae…046c2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x002d, t01=0x0064}
0x046c2…046d6               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x002d, t01=0x0078}
0x046d6…0470a               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x002d, t01=0x008c}
0x0470a…04716               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x00c0}
0x04716…0472a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x002d, t01=0x00cc}
0x0472a…0473e               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x002d, t01=0x00e0}
0x0473e…04752               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x002d, t01=0x00f4}
0x04752…04766               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /5C «, t00=0x002d, t01=0x0108}
0x04766…0477a               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x002d, t01=0x011c}
0x0477a…0478e               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x002d, t01=0x0130}
0x0478e…047a4               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x002d, t01=0x0144}
0x047a4…047ba               Head {h00=0x0012, h01=0x0050, text=»ENQEBC EQU /2D«, t00=0x002d, t01=0x015a}
0x047ba…047d0               Head {h00=0x0012, h01=0x0050, text=»ETBEBC EQU /26«, t00=0x002d, t01=0x0170}
0x047d0…047e8               Head {h00=0x0014, h01=0x0050, text=»PAD EQU /FF DK1 «, t00=0x002d, t01=0x0186}
0x047e8…047f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x000e}
0x047f4…04808               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x002e, t01=0x001a}
0x04808…04822               Head {h00=0x0016, h01=0x0050, text=»ENQPAR EQU ENQ+PAR«, t00=0x002e, t01=0x002e}
0x04822…0483c               Head {h00=0x0016, h01=0x0050, text=»RVIPAR EQU RVI+PAR«, t00=0x002e, t01=0x0048}
0x0483c…04858               Head {h00=0x0018, h01=0x0050, text=»ACKPAR EQU ACK0+PAR «, t00=0x002e, t01=0x0062}
0x04858…04864               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x007e}
0x04864…04878               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x002e, t01=0x008a}
0x04878…0488e               Head {h00=0x0012, h01=0x0050, text=»ENQPAR EQU ENQ«, t00=0x002e, t01=0x009e}
0x0488e…048a4               Head {h00=0x0012, h01=0x0050, text=»RVIPAR EQU RVI«, t00=0x002e, t01=0x00b4}
0x048a4…048bc               Head {h00=0x0014, h01=0x0050, text=»ACKPAR EQU ACK0 «, t00=0x002e, t01=0x00ca}
0x048bc…048c8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x00e2}
0x048c8…048d6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x00ee}
0x048d6…048e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00fc}
0x048e0…048ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0106}
0x048ea…04912               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x002e, t01=0x0110}
0x04912…0491c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0138}
0x0491c…04926               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0142}
0x04926…0493c               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x002e, t01=0x014c}
0x0493c…0496e               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : SENSE INFO,DB,DE,DB+DE«, t00=0x002e, t01=0x0162}
0x0496e…04978 (47, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0004}
0x04978…04982               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x000e}
0x04982…04996               Head {h00=0x0010, h01=0x0050, text=» DATA /4448 «, t00=0x002f, t01=0x0018}
0x04996…049aa               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x002f, t01=0x002c}
0x049aa…049b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0040}
0x049b4…049ea               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x002f, t01=0x004a}
0x049ea…04a1a               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x002f, t01=0x0080}
0x04a1a…04a26               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x00b0}
0x04a26…04a30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00bc}
0x04a30…04a5c               Head {h00=0x0028, h01=0x0050, text=»PENDST EQU /4000 PENDING STATUS FLAG«, t00=0x002f, t01=0x00c6}
0x04a5c…04a66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00f2}
0x04a66…04a7c               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x002f, t01=0x00fc}
0x04a7c…04a86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0112}
0x04a86…04a90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x011c}
0x04a90…04abc               Head {h00=0x0028, h01=0x0050, text=»TIMPRO EQU 30 PROCEDURE TIMER 3 SEC «, t00=0x002f, t01=0x0126}
0x04abc…04ac6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0152}
0x04ac6…04ad0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x015c}
0x04ad0…04ade               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x0166}
0x04ade…04b24               Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x002f, t01=0x0174}
0x04b24…04b2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x002a}
0x04b2e…04b60               Head {h00=0x002e, h01=0x0050, text=»* LINE CONTROL UNIT FUNCTION CONTROL EQU:S«, t00=0x0030, t01=0x0034}
0x04b60…04b6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0066}
0x04b6a…04bb0               Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x0030, t01=0x0070}
0x04bb0…04bba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00b6}
0x04bba…04bce               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0030, t01=0x00c0}
0x04bce…04be2               Head {h00=0x0010, h01=0x0050, text=»SYNC EQU /16«, t00=0x0030, t01=0x00d4}
0x04be2…04bee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x00e8}
0x04bee…04c02               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0030, t01=0x00f4}
0x04c02…04c16               Head {h00=0x0010, h01=0x0050, text=»SYNC EQU /32«, t00=0x0030, t01=0x0108}
0x04c16…04c22               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x011c}
0x04c22…04c36               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0030, t01=0x0128}
0x04c36…04c54               Head {h00=0x001a, h01=0x0050, text=»CBCARR EQU /100+LSPEED«, t00=0x0030, t01=0x013c}
0x04c54…04c60               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x015a}
0x04c60…04c74               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0030, t01=0x0166}
0x04c74…04c8a               Head {h00=0x0012, h01=0x0050, text=»CBSTOP EQU /00«, t00=0x0030, t01=0x017a}
0x04c8a…04c9e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0030, t01=0x0190}
0x04c9e…04cb4               Head {h00=0x0012, h01=0x0050, text=»PARITY EQU /0C«, t00=0x0031, t01=0x0014}
0x04cb4…04cc0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x002a}
0x04cc0…04cd4               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0031, t01=0x0036}
0x04cd4…04ce8               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0031, t01=0x004a}
0x04ce8…04cfe               Head {h00=0x0012, h01=0x0050, text=»PARITY EQU /00«, t00=0x0031, t01=0x005e}
0x04cfe…04d0a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0074}
0x04d0a…04d18               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x0080}
0x04d18…04d54               Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x0031, t01=0x008e}
0x04d54…04d5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00ca}
0x04d5e…04d8a               Head {h00=0x0028, h01=0x0050, text=»* LINE CONTROL UNIT SST STATUS BITS «, t00=0x0031, t01=0x00d4}
0x04d8a…04d94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0100}
0x04d94…04dd0               Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x0031, t01=0x010a}
0x04dd0…04dda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0146}
0x04dda…04dee               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0031, t01=0x0150}
0x04dee…04e18               Head {h00=0x0026, h01=0x0050, text=»H:ERR EQU /23 H:NOOP+H:THRU+H:CARR«, t00=0x0031, t01=0x0164}
0x04e18…04e24               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x018e}
0x04e24…04e38               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0032, t01=0x000a}
0x04e38…04e6a               Head {h00=0x002e, h01=0x0050, text=»H:ERR EQU /27 H:NOOP+H:THRU+H:CARR+H:PARI «, t00=0x0032, t01=0x001e}
0x04e6a…04e76               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x0050}
0x04e76…04e88               Head {h00=0x000e, h01=0x0050, text=» EJECT    «, t00=0x0032, t01=0x005c}
0x04e88…04ed0               Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0032, t01=0x006e}
0x04ed0…04eda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00b6}
0x04eda…04ef8               Head {h00=0x001a, h01=0x0050, text=»* DRIVER ADDRESS BLOCK«, t00=0x0032, t01=0x00c0}
0x04ef8…04f02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00de}
0x04f02…04f4a               Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0032, t01=0x00e8}
0x04f4a…04f54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0130}
0x04f54…04f78               Head {h00=0x0020, h01=0x0050, text=» DATA BUFLEN MMU BUFFER SIZE«, t00=0x0032, t01=0x013a}
0x04f78…04f9a               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0032, t01=0x015e}
0x04f9a…04fc6               Head {h00=0x0028, h01=0x0050, text=»DC15AD DATA DCACT ACTIVATION ADDRESS«, t00=0x0032, t01=0x0180}
0x04fc6…04fe8               Head {h00=0x001e, h01=0x0050, text=» DATA ABORT ABORT ROUTINE «, t00=0x0033, t01=0x001c}
0x04fe8…05010               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0033, t01=0x003e}
0x05010…0502e               Head {h00=0x001a, h01=0x0050, text=» DATA 6 HEADER LENGTH «, t00=0x0033, t01=0x0066}
0x0502e…05038               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0084}
0x05038…05068               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x0033, t01=0x008e}
0x05068…0507a               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x0033, t01=0x00be}
0x0507a…05088               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x00d0}
0x05088…05090               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x00de}
0x05090…050d4               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0033, t01=0x00e6}
0x050d4…050de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x012a}
0x050de…050f8               Head {h00=0x0016, h01=0x0050, text=»*    ABORT ROUTINE«, t00=0x0033, t01=0x0134}
0x050f8…05102               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x014e}
0x05102…05122               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0033, t01=0x0158}
0x05122…0512a               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x0178}
0x0512a…05156               Head {h00=0x0028, h01=0x0050, text=»ABORT LD A1,DWTRTP,A6 TIMER POINTER «, t00=0x0033, t01=0x0180}
0x05156…0517c               Head {h00=0x0022, h01=0x0050, text=» RF(Z) AB:10 NO TIMER RUNNING «, t00=0x0034, t01=0x001c}
0x0517c…05196               Head {h00=0x0016, h01=0x0050, text=» CMR A1 KILL TIMER«, t00=0x0034, t01=0x0042}
0x05196…051ac               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x0034, t01=0x005c}
0x051ac…051b4               Head {h00=0x0004, h01=0x0050, t00=0x0034, t01=0x0072}
0x051b4…051dc               Head {h00=0x0024, h01=0x0050, text=»AB:10 LD A2,DWTOR,A6 ORDER CODE «, t00=0x0034, t01=0x007a}
0x051dc…051f0               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0034, t01=0x00a2}
0x051f0…05202               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0034, t01=0x00b6}
0x05202…05218               Head {h00=0x0012, h01=0x0050, text=» RF(NE) AB:RTN«, t00=0x0034, t01=0x00c8}
0x05218…0524a               Head {h00=0x002e, h01=0x0050, text=» CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE«, t00=0x0034, t01=0x00de}
0x0524a…05274               Head {h00=0x0026, h01=0x0050, text=» LD A2,FDWTUT WRITING DWT ADDRESS «, t00=0x0034, t01=0x0110}
0x05274…05286               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0034, t01=0x013a}
0x05286…052aa               Head {h00=0x0020, h01=0x0050, text=» RF(NE) AB:RTN NOT THIS DWT «, t00=0x0034, t01=0x014c}
0x052aa…052ce               Head {h00=0x0020, h01=0x0050, text=» CM FDWTUT REST SENDING DWT «, t00=0x0034, t01=0x0170}
0x052ce…052f2 (53, 0, 400)  Head {h00=0x0020, h01=0x0050, text=» CM XACK RESET ACK EXPECTED «, t00=0x0035, t01=0x0004}
0x052f2…052fa               Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x0028}
0x052fa…0530e               Head {h00=0x0010, h01=0x0050, text=»AB:RTN EQU *«, t00=0x0035, t01=0x0030}
0x0530e…05322               Head {h00=0x0010, h01=0x0050, text=» ABL RTABRT «, t00=0x0035, t01=0x0044}
0x05322…05330               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x0058}
0x05330…0537e               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0035, t01=0x0066}
0x0537e…053cc               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0035, t01=0x00b4}
0x053cc…053d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0102}
0x053d6…053e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x010c}
0x053e0…05410               Head {h00=0x002c, h01=0x0050, text=»* REQUEST HANDLER/APPLICATION INTERFACE «, t00=0x0035, t01=0x0116}
0x05410…0541a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0146}
0x0541a…05424               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0150}
0x05424…05472               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0035, t01=0x015a}
0x05472…054c0               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0036, t01=0x0018}
0x054c0…054ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0066}
0x054ca…054f2               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x0036, t01=0x0070}
0x054f2…054fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0098}
0x054fc…05510               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x0036, t01=0x00a2}
0x05510…05534               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0036, t01=0x00b6}
0x05534…0555e               Head {h00=0x0026, h01=0x0050, text=» LDR A2,A7 ORDER CODE AS PARAMETER«, t00=0x0036, t01=0x00da}
0x0555e…05582               Head {h00=0x0020, h01=0x0050, text=» LDKL A7,DTETAB DTE TAB ADDR«, t00=0x0036, t01=0x0104}
0x05582…055ac               Head {h00=0x0026, h01=0x0050, text=» ANK A2,/FF STRIP OFF OPTION BITS «, t00=0x0036, t01=0x0128}
0x055ac…055ea               Head {h00=0x003a, h01=0x0050, text=» CF A15,LOOKUP BRANCH ON CODES, TABLE ADDRESS TO STACK«, t00=0x0036, t01=0x0152}
0x055ea…0561e               Head {h00=0x0030, h01=0x0050, text=» DATA TREQX,RTREQ LAST ENTRY; ERROR ADDRESS «, t00=0x0036, t01=0x0190}
0x0561e…0564a               Head {h00=0x0028, h01=0x0050, text=» DATA RECEIVE,RQRECE RECEIVE REQUEST«, t00=0x0037, t01=0x0034}
0x0564a…05670               Head {h00=0x0022, h01=0x0050, text=» DATA SEND,RQSEND SEND REQUEST«, t00=0x0037, t01=0x0060}
0x05670…05696               Head {h00=0x0022, h01=0x0050, text=» DATA OPEN,RQOPEN OPEN REQUEST«, t00=0x0037, t01=0x0086}
0x05696…056be               Head {h00=0x0024, h01=0x0050, text=» DATA CLOSE,RQCLOS CLOSE REQUEST«, t00=0x0037, t01=0x00ac}
0x056be…056f0               Head {h00=0x002e, h01=0x0050, text=» DATA CONPAS,RQCON CONNECT PASSIVE REQUEST«, t00=0x0037, t01=0x00d4}
0x056f0…0571c               Head {h00=0x0028, h01=0x0050, text=» DATA DISCO,RQDIS DISCONNECT REQUEST«, t00=0x0037, t01=0x0106}
0x0571c…0574a               Head {h00=0x002a, h01=0x0050, text=» DATA RSTAT,RQRSTS READ STATUS REQUEST«, t00=0x0037, t01=0x0132}
0x0574a…05776               Head {h00=0x0028, h01=0x0050, text=» DATA SSTAT,RQSST SET STATUS REQUEST«, t00=0x0037, t01=0x0160}
0x05776…057a6               Head {h00=0x002c, h01=0x0050, text=» DATA STIMOT,RQTIME SET REQUEST TIMEOUT «, t00=0x0037, t01=0x018c}
0x057a6…057e4               Head {h00=0x003a, h01=0x0050, text=»TREQX DATA STATIS,RQSTAT READ/RESET STATISTICS REQUEST«, t00=0x0038, t01=0x002c}
0x057e4…057f2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0038, t01=0x006a}
0x057f2…057fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0078}
0x057fc…05806               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0082}
0x05806…0581c               Head {h00=0x0012, h01=0x0050, text=»* OPEN REQUEST«, t00=0x0038, t01=0x008c}
0x0581c…05826               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00a2}
0x05826…05846               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0038, t01=0x00ac}
0x05846…0586e               Head {h00=0x0024, h01=0x0050, text=»*  SYMBOLIC DTE-ADDRESS (ECBCW2)«, t00=0x0038, t01=0x00cc}
0x0586e…05878               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00f4}
0x05878…0588c               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0038, t01=0x00fe}
0x0588c…058c8               Head {h00=0x0038, h01=0x0050, text=»*  1. CHECK IF ALREADY OPEN & IF SO SAME DTE-ADDRESS«, t00=0x0038, t01=0x0112}
0x058c8…058f2               Head {h00=0x0026, h01=0x0050, text=»*  2. CONVERT & VERIFY DTE ADDRESS«, t00=0x0038, t01=0x014e}
0x058f2…058fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0178}
0x058fc…05910               Head {h00=0x0010, h01=0x0050, text=»RQOPEN EQU *«, t00=0x0038, t01=0x0182}
0x05910…05942               Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET SYMBOLIC DTE-ADDRESS «, t00=0x0039, t01=0x0008}
0x05942…0596a               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x0039, t01=0x003a}
0x0596a…05996               Head {h00=0x0028, h01=0x0050, text=» ADR A2,A2 WORD ALIGNED INDEX VALUE «, t00=0x0039, t01=0x0062}
0x05996…059c6               Head {h00=0x002c, h01=0x0050, text=» ABI RQOPTB,A2 BRANCH ON INDEX IN TABLE «, t00=0x0039, t01=0x008e}
0x059c6…059f0               Head {h00=0x0026, h01=0x0050, text=»RQOPTB DATA RQOP20 CLOSED/INACTIVE«, t00=0x0039, t01=0x00be}
0x059f0…05a16               Head {h00=0x0022, h01=0x0050, text=» DATA RQOP15 OPEN IN PROGRESS «, t00=0x0039, t01=0x00e8}
0x05a16…05a30               Head {h00=0x0016, h01=0x0050, text=» DATA RQOP10 OPEN «, t00=0x0039, t01=0x010e}
0x05a30…05a56               Head {h00=0x0022, h01=0x0050, text=» DATA RQOP15 CLOSE IN PROGRESS«, t00=0x0039, t01=0x0128}
0x05a56…05a6a               Head {h00=0x0010, h01=0x0050, text=»RQOP10 EQU *«, t00=0x0039, t01=0x014e}
0x05a6a…05aa0               Head {h00=0x0032, h01=0x0050, text=» CW A1,DTELAD,A7 SAME AS THE ONE WHO OPENED ? «, t00=0x0039, t01=0x0162}
0x05aa0…05abe               Head {h00=0x001a, h01=0x0050, text=» RF(E) RQOP90 YES - OK«, t00=0x003a, t01=0x0008}
0x05abe…05ad2               Head {h00=0x0010, h01=0x0050, text=»RQOP15 EQU *«, t00=0x003a, t01=0x0026}
0x05ad2…05afc               Head {h00=0x0026, h01=0x0050, text=» ABL RTSEQ RETURN: SEQUENCE ERROR «, t00=0x003a, t01=0x003a}
0x05afc…05b06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0064}
0x05b06…05b1a               Head {h00=0x0010, h01=0x0050, text=»RQOP20 EQU *«, t00=0x003a, t01=0x006e}
0x05b1a…05b44               Head {h00=0x0026, h01=0x0050, text=» IM DTESTA,A7 SET OPEN IN PROGRESS«, t00=0x003a, t01=0x0082}
0x05b44…05b76               Head {h00=0x002e, h01=0x0050, text=» ST A1,DTELAD,A7 SAVE SYMBOLIC DTE ADDRESS«, t00=0x003a, t01=0x00ac}
0x05b76…05bac               Head {h00=0x0032, h01=0x0050, text=» LDR A2,A7 ADDR TO SELECT AND POLL IN DTE TAB «, t00=0x003a, t01=0x00de}
0x05bac…05be0               Head {h00=0x0030, h01=0x0050, text=» CF A15,GETDNA CONVERT AND VALIDATE DTE ADDR«, t00=0x003a, t01=0x0114}
0x05be0…05bf2               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x003a, t01=0x0148}
0x05bf2…05c0c               Head {h00=0x0016, h01=0x0050, text=» RF(NN) RQOP80 OK «, t00=0x003a, t01=0x015a}
0x05c0c…05c30               Head {h00=0x0020, h01=0x0050, text=» CM DTELAD,A7 CLEAR DTE ADDR«, t00=0x003a, t01=0x0174}
0x05c30…05c56               Head {h00=0x0022, h01=0x0050, text=» CM DTESTA,A7 CLEAR DTE STATUS«, t00=0x003b, t01=0x0008}
0x05c56…05c7e               Head {h00=0x0024, h01=0x0050, text=» ABL RTREQ RETURN: REQUEST ERROR«, t00=0x003b, t01=0x002e}
0x05c7e…05c88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0056}
0x05c88…05c9c               Head {h00=0x0010, h01=0x0050, text=»RQOP80 EQU *«, t00=0x003b, t01=0x0060}
0x05c9c…05cb0               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x003b, t01=0x0074}
0x05cb0…05cda               Head {h00=0x0026, h01=0x0050, text=» LDR* A2,A7 DTE ADDRESS IN EBCDIC «, t00=0x003b, t01=0x0088}
0x05cda…05cec               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003b, t01=0x00b2}
0x05cec…05d00               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x003b, t01=0x00c4}
0x05d00…05d24               Head {h00=0x0020, h01=0x0050, text=» RF(Z) RQOP30 ONLY ONE BYTE «, t00=0x003b, t01=0x00d8}
0x05d24…05d50               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 CONVERT INTO ASCII «, t00=0x003b, t01=0x00fc}
0x05d50…05d62               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x003b, t01=0x0128}
0x05d62…05d76               Head {h00=0x0010, h01=0x0050, text=»RQOP30 EQU *«, t00=0x003b, t01=0x013a}
0x05d76…05d88               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A1«, t00=0x003b, t01=0x014e}
0x05d88…05d9c               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x003b, t01=0x0160}
0x05d9c…05db4               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A1«, t00=0x003b, t01=0x0174}
0x05db4…05de2               Head {h00=0x002a, h01=0x0050, text=» STR A2,A7 SAVE ASCII VALUE IN DTETAB «, t00=0x003b, t01=0x018c}
0x05de2…05dee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x002a}
0x05dee…05dfc               Head {h00=0x000a, h01=0x0050, text=»    =1«, t00=0x003c, t01=0x0036}
0x05dfc…05e1e               Head {h00=0x001e, h01=0x0050, text=» ABL DTE:ON CONNECT MODEM «, t00=0x003c, t01=0x0044}
0x05e1e…05e32               Head {h00=0x0010, h01=0x0050, text=»RQOP90 EQU *«, t00=0x003c, t01=0x0066}
0x05e32…05e60               Head {h00=0x002a, h01=0x0050, text=» LD A2,DTEPLS,A7 PHYSICAL CONNECTION ?«, t00=0x003c, t01=0x007a}
0x05e60…05e84               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) RTOK YES RETURN OK «, t00=0x003c, t01=0x00a8}
0x05e84…05eb2               Head {h00=0x002a, h01=0x0050, text=» ABL RTPHYC RETURN PHYSICAL CONNECTION«, t00=0x003c, t01=0x00cc}
0x05eb2…05ec0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x00fa}
0x05ec0…05eca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0108}
0x05eca…05ee2               Head {h00=0x0014, h01=0x0050, text=»* CLOSE REQUEST «, t00=0x003c, t01=0x0112}
0x05ee2…05eec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x012a}
0x05eec…05f0c               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x003c, t01=0x0134}
0x05f0c…05f32               Head {h00=0x0022, h01=0x0050, text=»*  OPTION /00 = UNCONDITIONAL «, t00=0x003c, t01=0x0154}
0x05f32…05f50               Head {h00=0x001a, h01=0x0050, text=»*   /80 = CONDITIONAL «, t00=0x003c, t01=0x017a}
0x05f50…05f64               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x003d, t01=0x0008}
0x05f64…05fb4               Head {h00=0x004c, h01=0x0050, text=»*  1. IF CONDITIONAL, CHECK IF ANY LOGICAL CONNECTIONS (DWTS) ARE ACTIVE«, t00=0x003d, t01=0x001c}
0x05fb4…05fca               Head {h00=0x0012, h01=0x0050, text=»*     ACTIVE. «, t00=0x003d, t01=0x006c}
0x05fca…05ffe               Head {h00=0x0030, h01=0x0050, text=»*  2. IF UNCONDITIONAL, DISCONNECT ALL DWT:S«, t00=0x003d, t01=0x0082}
0x05ffe…06008               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00b6}
0x06008…0601c               Head {h00=0x0010, h01=0x0050, text=»RQCLOS EQU *«, t00=0x003d, t01=0x00c0}
0x0601c…06048               Head {h00=0x0028, h01=0x0050, text=» LD A5,DWTOR,A6 GET OPTION AND ORDER«, t00=0x003d, t01=0x00d4}
0x06048…06078               Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBCW2,A8 GET SYMBOLIC DTE - ADDR«, t00=0x003d, t01=0x0100}
0x06078…0608e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RQCL20 «, t00=0x003d, t01=0x0130}
0x0608e…060b4               Head {h00=0x0022, h01=0x0050, text=» CW A2,DTELAD,A7 CORRECT DTE ?«, t00=0x003d, t01=0x0146}
0x060b4…060e0               Head {h00=0x0028, h01=0x0050, text=» ABL(NE) RTREQ RETURN: REQUEST ERROR«, t00=0x003d, t01=0x016c}
0x060e0…060f4               Head {h00=0x0010, h01=0x0050, text=»RQCL20 EQU *«, t00=0x003e, t01=0x0008}
0x060f4…0611c               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x003e, t01=0x001c}
0x0611c…0613c               Head {h00=0x001c, h01=0x0050, text=» ABL(Z) RTOK RETURN : OK«, t00=0x003e, t01=0x0044}
0x0613c…0615a               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 DTE OPENED ?«, t00=0x003e, t01=0x0064}
0x0615a…06188               Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) RTSEQ RETURN: SEQUENCE ERROR «, t00=0x003e, t01=0x0082}
0x06188…061b0               Head {h00=0x0024, h01=0x0050, text=» IM DTESTA,A7 CLOSE IN PROGRESS «, t00=0x003e, t01=0x00b0}
0x061b0…061dc               Head {h00=0x0028, h01=0x0050, text=» LDR A8,A6 SAVE REQUESTING DWT-ADDR «, t00=0x003e, t01=0x00d8}
0x061dc…061e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0104}
0x061e6…061fa               Head {h00=0x0010, h01=0x0050, text=»RQCL40 EQU *«, t00=0x003e, t01=0x010e}
0x061fa…06210               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x003e, t01=0x0122}
0x06210…0623e               Head {h00=0x002a, h01=0x0050, text=» LD A6,DTEDDT,A7 GET DISCARD DWT ADDR «, t00=0x003e, t01=0x0138}
0x0623e…06254               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RQCL50 «, t00=0x003e, t01=0x0166}
0x06254…0627a               Head {h00=0x0022, h01=0x0050, text=» LDR A5,A5 CONDITIONAL CLOSE ?«, t00=0x003e, t01=0x017c}
0x0627a…06296               Head {h00=0x0018, h01=0x0050, text=» RF(N) RQCL95 YES ! «, t00=0x003f, t01=0x0012}
0x06296…062c6               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTCHN,A6 GET POINTER TO NEXT DWT«, t00=0x003f, t01=0x002e}
0x062c6…062f8               Head {h00=0x002e, h01=0x0050, text=» ST A2,DTEDDT,A7 DISCARD DWT ADDR REMOVED «, t00=0x003f, t01=0x005e}
0x062f8…0630a               Head {h00=0x000e, h01=0x0050, text=» RF RQCL60«, t00=0x003f, t01=0x0090}
0x0630a…0631e               Head {h00=0x0010, h01=0x0050, text=»RQCL50 EQU *«, t00=0x003f, t01=0x00a2}
0x0631e…0632a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x00b6}
0x0632a…06350               Head {h00=0x0022, h01=0x0050, text=» LD A6,DTEDWT,A7 GET DWT ADDR «, t00=0x003f, t01=0x00c2}
0x06350…06376               Head {h00=0x0022, h01=0x0050, text=» RF(Z) RQCL90 NO DWT IN QUEUE «, t00=0x003f, t01=0x00e8}
0x06376…0639c               Head {h00=0x0022, h01=0x0050, text=» LDR A5,A5 CONDITIONAL CLOSE ?«, t00=0x003f, t01=0x010e}
0x0639c…063b8               Head {h00=0x0018, h01=0x0050, text=» RF(N) RQCL95 YES ! «, t00=0x003f, t01=0x0134}
0x063b8…063f2               Head {h00=0x0036, h01=0x0050, text=» LD A2,DWTCHN,A6 GET POINTER TO NEXT DWT IN CHAIN «, t00=0x003f, t01=0x0150}
0x063f2…06426               Head {h00=0x0030, h01=0x0050, text=» ST A2,DTEDWT,A7 DWT FIRST IN QUEUE REMOVED «, t00=0x003f, t01=0x018a}
0x06426…0643c               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0040, t01=0x002e}
0x0643c…06450               Head {h00=0x0010, h01=0x0050, text=»RQCL60 EQU *«, t00=0x0040, t01=0x0044}
0x06450…0645c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x0058}
0x0645c…06490               Head {h00=0x0030, h01=0x0050, text=» CF A15,RELBUF REMOVE BUFFERS QUEUED ON DWT «, t00=0x0040, t01=0x0064}
0x06490…064b6               Head {h00=0x0022, h01=0x0050, text=» CM DWTSTA,A6 CLEAR DWT-STATUS«, t00=0x0040, t01=0x0098}
0x064b6…064da               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0040, t01=0x00be}
0x064da…064fe               Head {h00=0x0020, h01=0x0050, text=» CWR A8,A6 REQUESTING DWT ? «, t00=0x0040, t01=0x00e2}
0x064fe…06528               Head {h00=0x0026, h01=0x0050, text=» RF(E) RQCL80 YES-COMPLETE REQUEST«, t00=0x0040, t01=0x0106}
0x06528…06554               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTST,A6 A PENDING REQUEST ? «, t00=0x0040, t01=0x0130}
0x06554…0657a               Head {h00=0x0022, h01=0x0050, text=» RB(N) RQCL40 NO TAKE NEXT DWT«, t00=0x0040, t01=0x015c}
0x0657a…065b4               Head {h00=0x0036, h01=0x0050, text=» LDK A1,R:SEQ COMPLETE REQUEST WITH SEQUENCE ERROR«, t00=0x0040, t01=0x0182}
0x065b4…065c8               Head {h00=0x0010, h01=0x0050, text=»RQCL80 EQU *«, t00=0x0041, t01=0x002c}
0x065c8…065f4               Head {h00=0x0028, h01=0x0050, text=» CF A15,TENDIO COMPLETE THE REQUEST «, t00=0x0041, t01=0x0040}
0x065f4…0661a               Head {h00=0x0022, h01=0x0050, text=» RB RQCL40 TAKE NEXT ON QUEUE «, t00=0x0041, t01=0x006c}
0x0661a…0662e               Head {h00=0x0010, h01=0x0050, text=»RQCL90 EQU *«, t00=0x0041, t01=0x0092}
0x0662e…0663c               Head {h00=0x000a, h01=0x0050, text=»    =1«, t00=0x0041, t01=0x00a6}
0x0663c…06666               Head {h00=0x0026, h01=0x0050, text=» LDR A6,A8 GET REQUESTING DWT ADDR«, t00=0x0041, t01=0x00b4}
0x06666…06692               Head {h00=0x0028, h01=0x0050, text=» LD A8,DWTECB,A6 RESTORE ECB ADDRESS«, t00=0x0041, t01=0x00de}
0x06692…066a0               Head {h00=0x000a, h01=0x0050, text=»    =1«, t00=0x0041, t01=0x010a}
0x066a0…066d2               Head {h00=0x002e, h01=0x0050, text=» RF(Z) RQCL92 REQUEST ALREADY COMPLETED =1«, t00=0x0041, t01=0x0118}
0x066d2…066ec               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RC=0 =1 «, t00=0x0041, t01=0x014a}
0x066ec…0671c               Head {h00=0x002c, h01=0x0050, text=» CF A15,TENDIO COMPLETE CLOSE REQUEST =1«, t00=0x0041, t01=0x0164}
0x0671c…06734 (66, 0, 398)  Head {h00=0x0014, h01=0x0050, text=»RQCL92 EQU *  =1«, t00=0x0042, t01=0x0004}
0x06734…0674c               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=0  =1«, t00=0x0042, t01=0x001c}
0x0674c…06764               Head {h00=0x0014, h01=0x0050, text=» LDKL A5,STB  =1«, t00=0x0042, t01=0x0034}
0x06764…0678c               Head {h00=0x0024, h01=0x0050, text=» CF A5,CHALTI HALT I/P DEVICE =1«, t00=0x0042, t01=0x004c}
0x0678c…067b4               Head {h00=0x0024, h01=0x0050, text=» CF A5,CHALTO HALT O/P DEVICE =1«, t00=0x0042, t01=0x0074}
0x067b4…067ca               Head {h00=0x0012, h01=0x0050, text=» LDK A2,0  =1 «, t00=0x0042, t01=0x009c}
0x067ca…067f6               Head {h00=0x0028, h01=0x0050, text=» CIO A2,1,LCUIN DISCONNECT MODEM =1 «, t00=0x0042, t01=0x00b2}
0x067f6…06808               Head {h00=0x000e, h01=0x0050, text=» XIF   =1 «, t00=0x0042, t01=0x00de}
0x06808…06820               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =1«, t00=0x0042, t01=0x00f0}
0x06820…06846               Head {h00=0x0022, h01=0x0050, text=» LDK A2,1 DISCONNECT ORDER =1 «, t00=0x0042, t01=0x0108}
0x06846…06872               Head {h00=0x0028, h01=0x0050, text=» CIO A2,0,LCUIN DISCONNECT MODEM =1 «, t00=0x0042, t01=0x012e}
0x06872…06884               Head {h00=0x000e, h01=0x0050, text=» XIF   =1 «, t00=0x0042, t01=0x015a}
0x06884…068ae               Head {h00=0x0026, h01=0x0050, text=» CMR A7 REMOVE NETWORK ADDRESS =1 «, t00=0x0042, t01=0x016c}
0x068ae…068d4               Head {h00=0x0022, h01=0x0050, text=» CM DTESTA,A7 CLEAR STATUS =1 «, t00=0x0043, t01=0x0008}
0x068d4…06902               Head {h00=0x002a, h01=0x0050, text=» LD A1,DCTPGP POLL TIMER RUNNING ? =6 «, t00=0x0043, t01=0x002e}
0x06902…0691e               Head {h00=0x0018, h01=0x0050, text=» RF(Z) RQCL94 NO =6 «, t00=0x0043, t01=0x005c}
0x0691e…06940               Head {h00=0x001e, h01=0x0050, text=» CM* DCTPGP KILL TIMER =6 «, t00=0x0043, t01=0x0078}
0x06940…06964               Head {h00=0x0020, h01=0x0050, text=» CM DCTPGP CLEAR POINTER =6 «, t00=0x0043, t01=0x009a}
0x06964…0697c               Head {h00=0x0014, h01=0x0050, text=»RQCL94 EQU *  =6«, t00=0x0043, t01=0x00be}
0x0697c…069ac               Head {h00=0x002c, h01=0x0050, text=» CM DTEDLS,A7 INDICATE DATA LINK DOWN =6«, t00=0x0043, t01=0x00d6}
0x069ac…069c2               Head {h00=0x0012, h01=0x0050, text=» ABL TDISP  =1«, t00=0x0043, t01=0x0106}
0x069c2…069d6               Head {h00=0x0010, h01=0x0050, text=»RQCL95 EQU *«, t00=0x0043, t01=0x011c}
0x069d6…069e8               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x0043, t01=0x0130}
0x069e8…06a14               Head {h00=0x0028, h01=0x0050, text=» ST A2,DTESTA,A7 SET DTE OPEN AGAIN «, t00=0x0043, t01=0x0142}
0x06a14…06a3a               Head {h00=0x0022, h01=0x0050, text=» LDR A6,A8 RESTORE DWT ADDRESS«, t00=0x0043, t01=0x016e}
0x06a3a…06a5c (68, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» ABL RTSEQ SEQUENCE ERROR «, t00=0x0044, t01=0x0004}
0x06a5c…06a6a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0044, t01=0x0026}
0x06a6a…06a74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0034}
0x06a74…06a96               Head {h00=0x001e, h01=0x0050, text=»* CONNECT PASSIVE REQUEST «, t00=0x0044, t01=0x003e}
0x06a96…06aa0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0060}
0x06aa0…06ac0               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0044, t01=0x006a}
0x06ac0…06afe               Head {h00=0x003a, h01=0x0050, text=»*  - SYMBOLIC SUBADDRESS (RIGHTMOST BYTE IN ECBBA-BFR)«, t00=0x0044, t01=0x008a}
0x06afe…06b28               Head {h00=0x0026, h01=0x0050, text=»*  - DEVICE ADDRESSES IN ECBBA-BFR«, t00=0x0044, t01=0x00c8}
0x06b28…06b4e               Head {h00=0x0022, h01=0x0050, text=»*  - LENGTH OF BUFFER (ECBRL) «, t00=0x0044, t01=0x00f2}
0x06b4e…06b78               Head {h00=0x0026, h01=0x0050, text=»*  - SYMBOLIC DTE-ADDRESS (ECBCW2)«, t00=0x0044, t01=0x0118}
0x06b78…06b82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0142}
0x06b82…06b96               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0044, t01=0x014c}
0x06b96…06bca               Head {h00=0x0030, h01=0x0050, text=»*  1. VERIFY DTE-ADDRESS AS PER OPEN REQUEST«, t00=0x0044, t01=0x0160}
0x06bca…06bfc (69, 0, 400)  Head {h00=0x002e, h01=0x0050, text=»*  2. VERIFY & CONVERT SUBTERMINAL ADDRESS«, t00=0x0045, t01=0x0004}
0x06bfc…06c2c               Head {h00=0x002c, h01=0x0050, text=»*  3. VERIFY AND STORE DEVICE ADDRESSES «, t00=0x0045, t01=0x0036}
0x06c2c…06c54               Head {h00=0x0024, h01=0x0050, text=»*  4. LINK CALLING DWT TO QUEUE «, t00=0x0045, t01=0x0066}
0x06c54…06c5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x008e}
0x06c5e…06c72               Head {h00=0x0010, h01=0x0050, text=»RQCON EQU * «, t00=0x0045, t01=0x0098}
0x06c72…06c9c               Head {h00=0x0026, h01=0x0050, text=» LD A2,DTELAD,A7 SYMBOLIC DTE-ADDR«, t00=0x0045, t01=0x00ac}
0x06c9c…06cc2               Head {h00=0x0022, h01=0x0050, text=» CW A2,ECBCW2,A8 CORRECT DTE ?«, t00=0x0045, t01=0x00d6}
0x06cc2…06cf2               Head {h00=0x002c, h01=0x0050, text=» ABL(NE) RTREQ NO, RETURN: REQUEST ERROR«, t00=0x0045, t01=0x00fc}
0x06cf2…06d1a               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x0045, t01=0x012c}
0x06d1a…06d32               Head {h00=0x0014, h01=0x0050, text=» SUK A2,2 OPEN ?«, t00=0x0045, t01=0x0154}
0x06d32…06d64               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTSEQ NO, RETURN: SEQUENCE ERROR «, t00=0x0045, t01=0x016c}
0x06d64…06d8c               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x0046, t01=0x000e}
0x06d8c…06db2               Head {h00=0x0022, h01=0x0050, text=» SUK A2,2 ALREADY CONNECTED ? «, t00=0x0046, t01=0x0036}
0x06db2…06ddc               Head {h00=0x0026, h01=0x0050, text=» ABL(Z) RTOK ALREADY CONNECTED =17«, t00=0x0046, t01=0x005c}
0x06ddc…06df6               Head {h00=0x0016, h01=0x0050, text=» IFT MESPAS=1  =13«, t00=0x0046, t01=0x0086}
0x06df6…06e1a               Head {h00=0x0020, h01=0x0050, text=» LDK A2,/40 OPTION CODE =13 «, t00=0x0046, t01=0x00a0}
0x06e1a…06e44               Head {h00=0x0026, h01=0x0050, text=» CC A2,DWTOPT,A6 DISCARD DWT ? =13«, t00=0x0046, t01=0x00c4}
0x06e44…06e62               Head {h00=0x001a, h01=0x0050, text=» RF(NE) RQCN10 NO =13 «, t00=0x0046, t01=0x00ee}
0x06e62…06e90               Head {h00=0x002a, h01=0x0050, text=» CM DWTCHP,A6 INDICATE DISCARD DWT =13«, t00=0x0046, t01=0x010c}
0x06e90…06ec4               Head {h00=0x0030, h01=0x0050, text=» LD A1,DTEDDT,A7 POINTER TO DISCARD DWT =13 «, t00=0x0046, t01=0x013a}
0x06ec4…06ef8               Head {h00=0x0030, h01=0x0050, text=» RF(NZ) RQCN50 MORE THAN ONE DISC. DWT ? =13«, t00=0x0046, t01=0x016e}
0x06ef8…06f34               Head {h00=0x0038, h01=0x0050, text=» ST A6,DTEDDT,A7 SAVE POINTER TO TO DISCARD DWT =13 «, t00=0x0047, t01=0x0012}
0x06f34…06f4c               Head {h00=0x0014, h01=0x0050, text=» RF RQCN60  =13 «, t00=0x0047, t01=0x004e}
0x06f4c…06f66               Head {h00=0x0016, h01=0x0050, text=»RQCN10 EQU *  =13 «, t00=0x0047, t01=0x0066}
0x06f66…06f78               Head {h00=0x000e, h01=0x0050, text=» XIF   =13«, t00=0x0047, t01=0x0080}
0x06f78…06f8e               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x0047, t01=0x0092}
0x06f8e…06fbc               Head {h00=0x002a, h01=0x0050, text=» LDKL A4,SUBBUF MMU BUFFER ADDRESS =16«, t00=0x0047, t01=0x00a8}
0x06fbc…06fda               Head {h00=0x001a, h01=0x0050, text=» ST A4,ECBBA,A8 TO ECB«, t00=0x0047, t01=0x00d6}
0x06fda…07008               Head {h00=0x002a, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA TO MMU BUFFER«, t00=0x0047, t01=0x00f4}
0x07008…07014               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0122}
0x07014…07042               Head {h00=0x002a, h01=0x0050, text=» LD A4,ECBBA,A8 GET ECB-BUFFER ADDRESS«, t00=0x0047, t01=0x012e}
0x07042…07056               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0047, t01=0x015c}
0x07056…07070               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0 RESET A2«, t00=0x0047, t01=0x0170}
0x07070…0709a               Head {h00=0x0026, h01=0x0050, text=» LCR A2,A4 GET SELECT SUB-ADDRESS «, t00=0x0047, t01=0x018a}
0x0709a…070c6               Head {h00=0x0028, h01=0x0050, text=» SC A2,DWTSUB,A6 SAVE IT IN THE DWT «, t00=0x0048, t01=0x0024}
0x070c6…070f8               Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET SYMBOLIC DTE-ADDRESS «, t00=0x0048, t01=0x0050}
0x070f8…07132               Head {h00=0x0036, h01=0x0050, text=» CF A15,GETSNA VALIDATE AND TRANSLATE THE SUB-ADDR«, t00=0x0048, t01=0x0082}
0x07132…07150               Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 IS IT OK ? «, t00=0x0048, t01=0x00bc}
0x07150…0716a               Head {h00=0x0016, h01=0x0050, text=» RF(NN) RQCN20 YES«, t00=0x0048, t01=0x00da}
0x0716a…07192               Head {h00=0x0024, h01=0x0050, text=» CM DWTSUB,A7 CLEAR SUB-ADDRESS «, t00=0x0048, t01=0x00f4}
0x07192…071ba               Head {h00=0x0024, h01=0x0050, text=» ABL RTREQ RETURN REQUEST ERROR «, t00=0x0048, t01=0x011c}
0x071ba…071ce               Head {h00=0x0010, h01=0x0050, text=»RQCN20 EQU *«, t00=0x0048, t01=0x0144}
0x071ce…071e2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0048, t01=0x0158}
0x071e2…07218               Head {h00=0x0032, h01=0x0050, text=» LC A1,TASCII,A1 CONVERT FROM EBCDIC TO ASCII «, t00=0x0048, t01=0x016c}
0x07218…07224               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0012}
0x07224…07238               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0049, t01=0x001e}
0x07238…07266               Head {h00=0x002a, h01=0x0050, text=» SC A1,DWTCHP,A6 SAVE NETWORK ADDRESS «, t00=0x0049, t01=0x0032}
0x07266…07272               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0060}
0x07272…0729e               Head {h00=0x0028, h01=0x0050, text=» LC A2,1,A4 GET SYMBOLIC ADDRESS =8 «, t00=0x0049, t01=0x006c}
0x0729e…072cc               Head {h00=0x002a, h01=0x0050, text=» SC A2,DWTSUB+1,A6 SAVE IT IN THE DWT «, t00=0x0049, t01=0x0098}
0x072cc…072fe               Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET SYMBOLIC DTE ADDRESS «, t00=0x0049, t01=0x00c6}
0x072fe…0732a               Head {h00=0x0028, h01=0x0050, text=» ST A1,DWTLAD,A6 SAVE IT IN THE DWT «, t00=0x0049, t01=0x00f8}
0x0732a…07368               Head {h00=0x003a, h01=0x0050, text=» CF A15,GETSNA VALIDATE AND TRANSLATE THE SUB-ADDRESS «, t00=0x0049, t01=0x0124}
0x07368…07386               Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 IS IT OK ? «, t00=0x0049, t01=0x0162}
0x07386…073a0               Head {h00=0x0016, h01=0x0050, text=» RF(NN) RQCN30 YES«, t00=0x0049, t01=0x0180}
0x073a0…073c8               Head {h00=0x0024, h01=0x0050, text=» CM DWTSUB,A6 CLEAR SUB-ADDRESS «, t00=0x004a, t01=0x000a}
0x073c8…073f0               Head {h00=0x0024, h01=0x0050, text=» CM DWTLAD,A6 CLEAR DTE ADDRESS «, t00=0x004a, t01=0x0032}
0x073f0…07418               Head {h00=0x0024, h01=0x0050, text=» ABL RTREQ RETURN REQUEST ERROR «, t00=0x004a, t01=0x005a}
0x07418…0742c               Head {h00=0x0010, h01=0x0050, text=»RQCN30 EQU *«, t00=0x004a, t01=0x0082}
0x0742c…07440               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x004a, t01=0x0096}
0x07440…07476               Head {h00=0x0032, h01=0x0050, text=» LC A1,TASCII,A1 CONVERT FROM EBCDIC TO ASCII «, t00=0x004a, t01=0x00aa}
0x07476…07482               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x00e0}
0x07482…074b2               Head {h00=0x002c, h01=0x0050, text=» SC A1,DWTCHP+1,A6 SAVE NETWORK ADDRESS «, t00=0x004a, t01=0x00ec}
0x074b2…074c8               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x004a, t01=0x011c}
0x074c8…074e0               Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW2,A8«, t00=0x004a, t01=0x0132}
0x074e0…074ec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x014a}
0x074ec…074f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0156}
0x074f6…07500               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0160}
0x07500…0752a               Head {h00=0x0026, h01=0x0050, text=»*  LINK DWT TO CONFIGURATION CHAIN«, t00=0x004a, t01=0x016a}
0x0752a…07534 (75, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0004}
0x07534…07544               Head {h00=0x000c, h01=0x0050, text=»    =13 «, t00=0x004b, t01=0x000e}
0x07544…07558               Head {h00=0x0010, h01=0x0050, text=»RQCN40 EQU *«, t00=0x004b, t01=0x001e}
0x07558…0758a               Head {h00=0x002e, h01=0x0050, text=» LD A1,DTEDWT,A7 GET POINTER TO DWT QUEUE «, t00=0x004b, t01=0x0032}
0x0758a…075a4               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) RQCN50 YES«, t00=0x004b, t01=0x0064}
0x075a4…075d6               Head {h00=0x002e, h01=0x0050, text=» ST A6,DTEDWT,A7 SAVE POINTER TO DWT QUEUE«, t00=0x004b, t01=0x007e}
0x075d6…075e8               Head {h00=0x000e, h01=0x0050, text=» RF RQCN60«, t00=0x004b, t01=0x00b0}
0x075e8…075fc               Head {h00=0x0010, h01=0x0050, text=»RQCN50 EQU *«, t00=0x004b, t01=0x00c2}
0x075fc…0761e               Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 MOV ADDR TO A2 «, t00=0x004b, t01=0x00d6}
0x0761e…0764a               Head {h00=0x0028, h01=0x0050, text=» LD A1,DWTCHN,A2 POINTER TO NEXT DWT«, t00=0x004b, t01=0x00f8}
0x0764a…0767c               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) RQCN50 KEEP ON UNTIL LAST IN CHAIN«, t00=0x004b, t01=0x0124}
0x0767c…076aa               Head {h00=0x002a, h01=0x0050, text=» ST A6,DWTCHN,A2 ADD NEW DWT TO CHAIN «, t00=0x004b, t01=0x0156}
0x076aa…076be               Head {h00=0x0010, h01=0x0050, text=»RQCN60 EQU *«, t00=0x004b, t01=0x0184}
0x076be…076e8               Head {h00=0x0026, h01=0x0050, text=» CM DWTCHN,A6 END OF CHAIN MARKER «, t00=0x004c, t01=0x0008}
0x076e8…07718               Head {h00=0x002c, h01=0x0050, text=» ST A7,DWTCHD,A6 BACKWARD LINK TO ANCHOR«, t00=0x004c, t01=0x0032}
0x07718…0772a               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x004c, t01=0x0062}
0x0772a…07758               Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTSTA,A6 SET STATUS: CONNECTED«, t00=0x004c, t01=0x0074}
0x07758…0776e               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/8000«, t00=0x004c, t01=0x00a2}
0x0776e…07796               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTRTV,A6 STORE NO TIMING«, t00=0x004c, t01=0x00b8}
0x07796…077a6               Head {h00=0x000c, h01=0x0050, text=»    =13 «, t00=0x004c, t01=0x00e0}
0x077a6…077bc               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x004c, t01=0x00f0}
0x077bc…077e6               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTCHP,A6 DISCARD DWT ? =13«, t00=0x004c, t01=0x0106}
0x077e6…07814               Head {h00=0x002a, h01=0x0050, text=» RF(Z) RQCN65 YES, DO NOT SEND DE =13 «, t00=0x004c, t01=0x0130}
0x07814…07842               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW1,A8 GET DEVICE STATUS DK1«, t00=0x004c, t01=0x015e}
0x07842…07860               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) RQCN63 NOT DE «, t00=0x004c, t01=0x018c}
0x07860…07874               Head {h00=0x0010, h01=0x0050, text=» LDK A1,4 DE«, t00=0x004d, t01=0x001a}
0x07874…0788a               Head {h00=0x0012, h01=0x0050, text=»RQCN63 EQU *  «, t00=0x004d, t01=0x002e}
0x0788a…078b4               Head {h00=0x0026, h01=0x0050, text=» ORS A1,DWTST,A6 PUT IT IN DWT DK1«, t00=0x004d, t01=0x0044}
0x078b4…078e4               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x004d, t01=0x006e}
0x078e4…078fe               Head {h00=0x0016, h01=0x0050, text=»RQCN65 EQU *  =13 «, t00=0x004d, t01=0x009e}
0x078fe…0790a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x00b8}
0x0790a…07914               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00c4}
0x07914…0792e               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x004d, t01=0x00ce}
0x0792e…07938               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00e8}
0x07938…07960               Head {h00=0x0024, h01=0x0050, text=» LD A2,DCTPGP POLL TIMER POINTER«, t00=0x004d, t01=0x00f2}
0x07960…07990               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) RQCN70 TIMER ALREADY STARTED =6 «, t00=0x004d, t01=0x011a}
0x07990…079a6               Head {h00=0x0012, h01=0x0050, text=» CF A15,SPOTIM«, t00=0x004d, t01=0x014a}
0x079a6…079ba               Head {h00=0x0010, h01=0x0050, text=»RQCN70 EQU *«, t00=0x004d, t01=0x0160}
0x079ba…079ce               Head {h00=0x0010, h01=0x0050, text=» ABL RQOP90 «, t00=0x004d, t01=0x0174}
0x079ce…079dc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004d, t01=0x0188}
0x079dc…079e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0008}
0x079e6…07a02               Head {h00=0x0018, h01=0x0050, text=»* DISCONNECT REQUEST«, t00=0x004e, t01=0x0012}
0x07a02…07a0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x002e}
0x07a0c…07a2c               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x004e, t01=0x0038}
0x07a2c…07a48               Head {h00=0x0018, h01=0x0050, text=»*  DWT-ADDRESS (A6) «, t00=0x004e, t01=0x0058}
0x07a48…07a52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0074}
0x07a52…07a66               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x004e, t01=0x007e}
0x07a66…07a90               Head {h00=0x0026, h01=0x0050, text=»*  1. CHECK IF IN CONNECTED STATE «, t00=0x004e, t01=0x0092}
0x07a90…07aca               Head {h00=0x0036, h01=0x0050, text=»*  2. REMOVE DWT-ADDRESS FROM CONFIGURATION CHAIN «, t00=0x004e, t01=0x00bc}
0x07aca…07af4               Head {h00=0x0026, h01=0x0050, text=»*  3. SET DWT STATUS DISCONNECTED «, t00=0x004e, t01=0x00f6}
0x07af4…07afe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0120}
0x07afe…07b1e               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x004e, t01=0x012a}
0x07b1e…07b3a               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x004e, t01=0x014a}
0x07b3a…07b44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0166}
0x07b44…07b58               Head {h00=0x0010, h01=0x0050, text=»RQDIS EQU * «, t00=0x004e, t01=0x0170}
0x07b58…07b8c               Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTSTA,A6 DWT STATUS = DISCONNECTED ?«, t00=0x004e, t01=0x0184}
0x07b8c…07bb0               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) RTOK YES, RETURN: OK«, t00=0x004f, t01=0x0028}
0x07bb0…07bde               Head {h00=0x002a, h01=0x0050, text=» LD A3,DTEDWT,A7 FIRST DWT ADDR TO A3 «, t00=0x004f, t01=0x004c}
0x07bde…07c00               Head {h00=0x001e, h01=0x0050, text=» RF(Z) RQDI20 END OF CHAIN«, t00=0x004f, t01=0x007a}
0x07c00…07c1c               Head {h00=0x0018, h01=0x0050, text=» CWR A3,A6 OUR DWT ?«, t00=0x004f, t01=0x009c}
0x07c1c…07c36               Head {h00=0x0016, h01=0x0050, text=» RF(NE) RQDI10 NO «, t00=0x004f, t01=0x00b8}
0x07c36…07c64               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE QUEUED BUFFERS «, t00=0x004f, t01=0x00d2}
0x07c64…07c9a               Head {h00=0x0032, h01=0x0050, text=» LD A3,DWTCHN,A6 YES-TAKE POINTER TO NEXT DWT «, t00=0x004f, t01=0x0100}
0x07c9a…07cbc               Head {h00=0x001e, h01=0x0050, text=» CM DWTSTA,A6 SET DWT FREE«, t00=0x004f, t01=0x0136}
0x07cbc…07cee               Head {h00=0x002e, h01=0x0050, text=» ST A3,DTEDWT,A7 STORE DWT-ADDR IN DTETAB «, t00=0x004f, t01=0x0158}
0x07cee…07d00               Head {h00=0x000e, h01=0x0050, text=» RB RQCN70«, t00=0x004f, t01=0x018a}
0x07d00…07d14               Head {h00=0x0010, h01=0x0050, text=»RQDI10 EQU *«, t00=0x0050, t01=0x000c}
0x07d14…07d46               Head {h00=0x002e, h01=0x0050, text=» LDR A5,A3 A5 CONTAINES PREVIOUS DWT-ADDR «, t00=0x0050, t01=0x0020}
0x07d46…07d86               Head {h00=0x003c, h01=0x0050, text=» LD A3,DWTCHN,A5 A3 CONTAINES ADDR TO NEXT DWT ON CHAIN «, t00=0x0050, t01=0x0052}
0x07d86…07da8               Head {h00=0x001e, h01=0x0050, text=» RF(Z) RQDI20 END OF CHAIN«, t00=0x0050, t01=0x0092}
0x07da8…07dc4               Head {h00=0x0018, h01=0x0050, text=» CWR A3,A6 OUR DWT ?«, t00=0x0050, t01=0x00b4}
0x07dc4…07df0               Head {h00=0x0028, h01=0x0050, text=» RB(NE) RQDI10 NO TAKE NEXT IN CHAIN«, t00=0x0050, t01=0x00d0}
0x07df0…07e1e               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE QUEUED BUFFERS «, t00=0x0050, t01=0x00fc}
0x07e1e…07e54               Head {h00=0x0032, h01=0x0050, text=» LD A3,DWTCHN,A6 YES-TAKE POINTER TO NEXT DWT «, t00=0x0050, t01=0x012a}
0x07e54…07e8a               Head {h00=0x0032, h01=0x0050, text=» ST A3,DWTCHN,A5 AND STORE IT IN PREVIOUS DWT «, t00=0x0050, t01=0x0160}
0x07e8a…07eac               Head {h00=0x001e, h01=0x0050, text=» CM DWTSTA,A6 SET DWT FREE«, t00=0x0051, t01=0x0008}
0x07eac…07ebe               Head {h00=0x000e, h01=0x0050, text=» RB RQCN70«, t00=0x0051, t01=0x002a}
0x07ebe…07ed2               Head {h00=0x0010, h01=0x0050, text=»RQDI20 EQU *«, t00=0x0051, t01=0x003c}
0x07ed2…07ee8               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0051, t01=0x0050}
0x07ee8…07f1a               Head {h00=0x002e, h01=0x0050, text=» LD A3,DTEDDT,A7 TAKE THE DISCARD DWT ADDR«, t00=0x0051, t01=0x0066}
0x07f1a…07f36               Head {h00=0x0018, h01=0x0050, text=» CWR A3,A6 OUR DWT ?«, t00=0x0051, t01=0x0098}
0x07f36…07f5c               Head {h00=0x0022, h01=0x0050, text=» RF(NE) RQDI30 SEQUENCE ERROR «, t00=0x0051, t01=0x00b4}
0x07f5c…07f8a               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE BUFFERS QUEUED «, t00=0x0051, t01=0x00da}
0x07f8a…07fa0               Head {h00=0x0012, h01=0x0050, text=» CM DTEDDT,A7 «, t00=0x0051, t01=0x0108}
0x07fa0…07fc2               Head {h00=0x001e, h01=0x0050, text=» CM DWTSTA,A6 SET DWT FREE«, t00=0x0051, t01=0x011e}
0x07fc2…07fd4               Head {h00=0x000e, h01=0x0050, text=» RB RQCN70«, t00=0x0051, t01=0x0140}
0x07fd4…07fe8               Head {h00=0x0010, h01=0x0050, text=»RQDI30 EQU *«, t00=0x0051, t01=0x0152}
0x07fe8…07ff4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x0166}
0x07ff4…08016               Head {h00=0x001e, h01=0x0050, text=» ABL RTSEQ SEQUENCE ERROR «, t00=0x0051, t01=0x0172}
0x08016…08024 (82, 0, 400)  Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x0004}
0x08024…0802e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0012}
0x0802e…08038               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x001c}
0x08038…08056               Head {h00=0x001a, h01=0x0050, text=»* READ STATUS REQUEST «, t00=0x0052, t01=0x0026}
0x08056…08060               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0044}
0x08060…08080               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0052, t01=0x004e}
0x08080…0809e               Head {h00=0x001a, h01=0x0050, text=»*  DWT - ADDRESS (A6) «, t00=0x0052, t01=0x006e}
0x0809e…080a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x008c}
0x080a8…080bc               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0052, t01=0x0096}
0x080bc…080fc               Head {h00=0x003c, h01=0x0050, text=»*  1. TRANSFER LOGICAL CONNECTION STATUS TO APPLICATION «, t00=0x0052, t01=0x00aa}
0x080fc…08106               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00ea}
0x08106…08126               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0052, t01=0x00f4}
0x08126…08154               Head {h00=0x002a, h01=0x0050, text=»*  LOGICAL CONNECTION STATUS (ECBCW1) «, t00=0x0052, t01=0x0114}
0x08154…0815e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0142}
0x0815e…08190               Head {h00=0x002e, h01=0x0050, text=»* 0       3 4       7 8      11 12      15«, t00=0x0052, t01=0x014c}
0x08190…081c2               Head {h00=0x002e, h01=0x0050, text=»* ........................................«, t00=0x0052, t01=0x017e}
0x081c2…081f4               Head {h00=0x002e, h01=0x0050, text=»* .  DWT   .  DTE    .  DATA   .  PHYS   .«, t00=0x0053, t01=0x0020}
0x081f4…08226               Head {h00=0x002e, h01=0x0050, text=»* .  STATE .  STATE  .  LINK   .  LINK   .«, t00=0x0053, t01=0x0052}
0x08226…08258               Head {h00=0x002e, h01=0x0050, text=»* .        .         .  STATUS .  STATUS .«, t00=0x0053, t01=0x0084}
0x08258…0828a               Head {h00=0x002e, h01=0x0050, text=»* ........................................«, t00=0x0053, t01=0x00b6}
0x0828a…08294               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00e8}
0x08294…082a8               Head {h00=0x0010, h01=0x0050, text=»RQRSTS EQU *«, t00=0x0053, t01=0x00f2}
0x082a8…082be               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x0053, t01=0x0106}
0x082be…082e6               Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBCW1,A8 GET OPTION CODE«, t00=0x0053, t01=0x011c}
0x082e6…08310               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) RQRS10 TEST IF ANY MESSAGE«, t00=0x0053, t01=0x0144}
0x08310…0831c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x016e}
0x0831c…08340               Head {h00=0x0020, h01=0x0050, text=» LD A2,DWTSTA,A6 DWT STATUS «, t00=0x0053, t01=0x017a}
0x08340…0835a               Head {h00=0x0016, h01=0x0050, text=» SLL A2,4 BITS 0-3«, t00=0x0054, t01=0x000e}
0x0835a…0837e               Head {h00=0x0020, h01=0x0050, text=» AD A2,DTESTA,A7 DTE STATUS «, t00=0x0054, t01=0x0028}
0x0837e…08398               Head {h00=0x0016, h01=0x0050, text=» SLL A2,4 BITS 4-7«, t00=0x0054, t01=0x004c}
0x08398…083c2               Head {h00=0x0026, h01=0x0050, text=» AD A2,DTEDLS,A7 DATA LINK STATUS «, t00=0x0054, t01=0x0066}
0x083c2…083de               Head {h00=0x0018, h01=0x0050, text=» SLL A2,4 BITS 8-11 «, t00=0x0054, t01=0x0090}
0x083de…0841a               Head {h00=0x0038, h01=0x0050, text=» AD A2,DTEPLS,A7 PHYSICAL LINK STATUS (BITS 12 - 15)«, t00=0x0054, t01=0x00ac}
0x0841a…08450               Head {h00=0x0032, h01=0x0050, text=» ST A2,ECBCW1,A8 STATUS TO ECB CONTROL WORD 1 «, t00=0x0054, t01=0x00e8}
0x08450…0846c               Head {h00=0x0018, h01=0x0050, text=» ABL RTOK RETURN: OK«, t00=0x0054, t01=0x011e}
0x0846c…08482               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x0054, t01=0x013a}
0x08482…0848c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0150}
0x0848c…08496               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x015a}
0x08496…084c8               Head {h00=0x002e, h01=0x0050, text=»*  ANY MESSAGE ORDER (ONLY IF EM3270 = 1) «, t00=0x0054, t01=0x0164}
0x084c8…084d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0008}
0x084d2…084e6               Head {h00=0x0010, h01=0x0050, text=»RQRS10 EQU *«, t00=0x0055, t01=0x0012}
0x084e6…0850e               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x0055, t01=0x0026}
0x0850e…08526               Head {h00=0x0014, h01=0x0050, text=» SUK A2,2 OPEN ?«, t00=0x0055, t01=0x004e}
0x08526…0854e               Head {h00=0x0024, h01=0x0050, text=» ABL(NZ) RTSEQ NO,SEQUENCE ERROR«, t00=0x0055, t01=0x0066}
0x0854e…08576               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x0055, t01=0x008e}
0x08576…08594               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 CONNECTED ? «, t00=0x0055, t01=0x00b6}
0x08594…085bc               Head {h00=0x0024, h01=0x0050, text=» ABL(NZ) RTSEQ NO,SEQUENCE ERROR«, t00=0x0055, t01=0x00d4}
0x085bc…085f6               Head {h00=0x0036, h01=0x0050, text=» LD A4,DWTIPC,A6 ANY QUEUED MESSAGE ON THIS DWT ? «, t00=0x0055, t01=0x00fc}
0x085f6…08624               Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) RTOK YES COMPLETE THE REQUEST«, t00=0x0055, t01=0x0136}
0x08624…08644               Head {h00=0x001c, h01=0x0050, text=» ABL TDISP TO DISPATCHER«, t00=0x0055, t01=0x0164}
0x08644…08650               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x0184}
0x08650…0865e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0055, t01=0x0190}
0x0865e…08668               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x000e}
0x08668…08684               Head {h00=0x0018, h01=0x0050, text=»* SET STATUS REQUEST«, t00=0x0056, t01=0x0018}
0x08684…0868e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0034}
0x0868e…08698               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x003e}
0x08698…086b8               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS «, t00=0x0056, t01=0x0048}
0x086b8…086d4               Head {h00=0x0018, h01=0x0050, text=»*  DWT ADDRESS (A6) «, t00=0x0056, t01=0x0068}
0x086d4…086de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0084}
0x086de…086f2               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0056, t01=0x008e}
0x086f2…08724               Head {h00=0x002e, h01=0x0050, text=»*  SET DEVICE STATUS (ONLY IF STARVI = 1) «, t00=0x0056, t01=0x00a2}
0x08724…0872e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00d4}
0x0872e…08750               Head {h00=0x001e, h01=0x0050, text=»*  DE DEVICE END : X`'00' «, t00=0x0056, t01=0x00de}
0x08750…0875a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0100}
0x0875a…08786               Head {h00=0x0028, h01=0x0050, text=»*  IR INTERVENTION REQUIRED : X'01' «, t00=0x0056, t01=0x010a}
0x08786…08790               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0136}
0x08790…087b0               Head {h00=0x001c, h01=0x0050, text=»*  DB DEVICE BUSY :X'10'«, t00=0x0056, t01=0x0140}
0x087b0…087ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0160}
0x087ba…087da               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0056, t01=0x016a}
0x087da…087f6               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x0056, t01=0x018a}
0x087f6…08800               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0016}
0x08800…08814               Head {h00=0x0010, h01=0x0050, text=»RQSST EQU * «, t00=0x0057, t01=0x0020}
0x08814…0882a               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=0 «, t00=0x0057, t01=0x0034}
0x0882a…08854               Head {h00=0x0026, h01=0x0050, text=» ABL RTREQ SET STATUS NOT INCLUDED«, t00=0x0057, t01=0x004a}
0x08854…08860               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x0074}
0x08860…08876               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x0057, t01=0x0080}
0x08876…088a0               Head {h00=0x0026, h01=0x0050, text=» LD A1,ECBCW1,A8 GET DEVICE STATUS«, t00=0x0057, t01=0x0096}
0x088a0…088be               Head {h00=0x001a, h01=0x0050, text=» ANK A1,/1 'IR' ? DK1 «, t00=0x0057, t01=0x00c0}
0x088be…088da               Head {h00=0x0018, h01=0x0050, text=» RF(Z) RQST20 NO DK1«, t00=0x0057, t01=0x00de}
0x088da…0890a               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ QUEUE THE DWT (STATUS) DK1«, t00=0x0057, t01=0x00fa}
0x0890a…08922               Head {h00=0x0014, h01=0x0050, text=» RF RQST90   DK1«, t00=0x0057, t01=0x012a}
0x08922…0893c               Head {h00=0x0016, h01=0x0050, text=»RQST20 EQU *   DK1«, t00=0x0057, t01=0x0142}
0x0893c…0895a               Head {h00=0x001a, h01=0x0050, text=» LD A1,ECBCW1,A8   DK1«, t00=0x0057, t01=0x015c}
0x0895a…08976               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x0057, t01=0x017a}
0x08976…08994               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) RQST90 NOT DE «, t00=0x0058, t01=0x0008}
0x08994…089be               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTST,A6 GET DEVICE STATUS «, t00=0x0058, t01=0x0026}
0x089be…089ea               Head {h00=0x0028, h01=0x0050, text=» ANK A1,/B WACK SENT, DB OR IR ? =2 «, t00=0x0058, t01=0x0050}
0x089ea…08a06               Head {h00=0x0018, h01=0x0050, text=» RF(Z) RQST90 NO =2 «, t00=0x0058, t01=0x007c}
0x08a06…08a36               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x0058, t01=0x0098}
0x08a36…08a4e               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x0058, t01=0x00c8}
0x08a4e…08a62               Head {h00=0x0010, h01=0x0050, text=»RQST90 EQU *«, t00=0x0058, t01=0x00e0}
0x08a62…08a86               Head {h00=0x0020, h01=0x0050, text=» ORS A1,DWTST,A6 SAVE STATUS«, t00=0x0058, t01=0x00f4}
0x08a86…08aa4               Head {h00=0x001a, h01=0x0050, text=» ABL RTOK RETYURN : OK«, t00=0x0058, t01=0x0118}
0x08aa4…08ab0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0136}
0x08ab0…08abe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0058, t01=0x0142}
0x08abe…08ac8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0150}
0x08ac8…08af0               Head {h00=0x0024, h01=0x0050, text=»* READ/RESET STATISTICS REQUEST «, t00=0x0058, t01=0x015a}
0x08af0…08afa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0182}
0x08afa…08b1a               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0058, t01=0x018c}
0x08b1a…08b3e               Head {h00=0x0020, h01=0x0050, text=»*  TYPE = BITS 0-7 OF ECBCW1«, t00=0x0059, t01=0x001c}
0x08b3e…08b5a               Head {h00=0x0018, h01=0x0050, text=»*  ECB-ADDRESS (A8) «, t00=0x0059, t01=0x0040}
0x08b5a…08b86               Head {h00=0x0028, h01=0x0050, text=»*  DWT-ADDRESS OF LOW-LEVEL DWT (A6)«, t00=0x0059, t01=0x005c}
0x08b86…08b90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0088}
0x08b90…08ba4               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0059, t01=0x0092}
0x08ba4…08bce               Head {h00=0x0026, h01=0x0050, text=»*  1. READ STATISTICS TO USER AREA«, t00=0x0059, t01=0x00a6}
0x08bce…08bf8               Head {h00=0x0026, h01=0x0050, text=»*  2. RESET ALL STATISTICS BUFFERS«, t00=0x0059, t01=0x00d0}
0x08bf8…08c02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00fa}
0x08c02…08c22               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0059, t01=0x0104}
0x08c22…08c50               Head {h00=0x002a, h01=0x0050, text=»*  NUMBER OF BYTES TRANSFERRED (ECBEL)«, t00=0x0059, t01=0x0124}
0x08c50…08c6c               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x0059, t01=0x0152}
0x08c6c…08c76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x016e}
0x08c76…08c8a               Head {h00=0x0010, h01=0x0050, text=»RQSTAT EQU *«, t00=0x0059, t01=0x0178}
0x08c8a…08ca0               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=0 «, t00=0x0059, t01=0x018c}
0x08ca0…08cdc               Head {h00=0x0038, h01=0x0050, text=» ABL RTREQ RC : REQUEST ERROR NO STATISTICS INCLUDED«, t00=0x005a, t01=0x0012}
0x08cdc…08ce8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x004e}
0x08ce8…08cfe               Head {h00=0x0012, h01=0x0050, text=» IFF STTSTS=0 «, t00=0x005a, t01=0x005a}
0x08cfe…08d24               Head {h00=0x0022, h01=0x0050, text=» CF A15,DCSRED READ STATISTICS«, t00=0x005a, t01=0x0070}
0x08d24…08d3a               Head {h00=0x0012, h01=0x0050, text=» LDR A1,A1 OK?«, t00=0x005a, t01=0x0096}
0x08d3a…08d6a               Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) RTREQ NO, RETURN: REQUEST ERROR«, t00=0x005a, t01=0x00ac}
0x08d6a…08d8c               Head {h00=0x001e, h01=0x0050, text=» LD A1,ECBCW1,A8 GET TYPE «, t00=0x005a, t01=0x00dc}
0x08d8c…08db6               Head {h00=0x0026, h01=0x0050, text=» SRL A1,8 TYPE FIELD TO LEFT BYTE «, t00=0x005a, t01=0x00fe}
0x08db6…08dda               Head {h00=0x0020, h01=0x0050, text=» CCK A1,TYPRR CORRECT TYPE? «, t00=0x005a, t01=0x0128}
0x08dda…08df0               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RQST40«, t00=0x005a, t01=0x014c}
0x08df0…08e24               Head {h00=0x0030, h01=0x0050, text=» CF A15,DCSRLL RESET ALL STATISTICS BUFFERS «, t00=0x005a, t01=0x0162}
0x08e24…08e44               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 LUCKY AGAIN? «, t00=0x005b, t01=0x0008}
0x08e44…08e74               Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) RTREQ NO, RETURN: REQUEST ERROR«, t00=0x005b, t01=0x0028}
0x08e74…08e88               Head {h00=0x0010, h01=0x0050, text=»RQST40 EQU *«, t00=0x005b, t01=0x0058}
0x08e88…08ea4               Head {h00=0x0018, h01=0x0050, text=» ABL RTOK RETURN: OK«, t00=0x005b, t01=0x006c}
0x08ea4…08eb0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0088}
0x08eb0…08ebe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005b, t01=0x0094}
0x08ebe…08ec8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00a2}
0x08ec8…08ee4               Head {h00=0x0018, h01=0x0050, text=»* SET TIMEOUT VALUE «, t00=0x005b, t01=0x00ac}
0x08ee4…08eee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00c8}
0x08eee…08f0e               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x005b, t01=0x00d2}
0x08f0e…08f3e               Head {h00=0x002c, h01=0x0050, text=»*  ECBCW1 >= 0 : ACTIVATE TIMING CONTROL«, t00=0x005b, t01=0x00f2}
0x08f3e…08f7c               Head {h00=0x003a, h01=0x0050, text=»*                TIMEOUT VALUE IN MULTIPLES OF 100 MS;«, t00=0x005b, t01=0x0122}
0x08f7c…08fac               Head {h00=0x002c, h01=0x0050, text=»*                0 = IMMEDIATE TIMEOUT. «, t00=0x005b, t01=0x0160}
0x08fac…08fe0               Head {h00=0x0030, h01=0x0050, text=»*         < 0:   DE-ACTIVATE TIMING CONTROL «, t00=0x005b, t01=0x0190}
0x08fe0…08fea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0034}
0x08fea…08ffe               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x005c, t01=0x003e}
0x08ffe…0902e               Head {h00=0x002c, h01=0x0050, text=»*  STORE VALUE DIRECTLY IN CALLER'S DWT «, t00=0x005c, t01=0x0052}
0x0902e…09038               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0082}
0x09038…09058               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x005c, t01=0x008c}
0x09058…09082               Head {h00=0x0026, h01=0x0050, text=»*  DWTRTV = TIMEOUT VALUE = ECBCW1«, t00=0x005c, t01=0x00ac}
0x09082…0908c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00d6}
0x0908c…090a0               Head {h00=0x0010, h01=0x0050, text=»RQTIME EQU *«, t00=0x005c, t01=0x00e0}
0x090a0…090d4               Head {h00=0x0030, h01=0x0050, text=» LD A2,ECBCW1,A8 GET TIMEOUT VALUE FROM ECB «, t00=0x005c, t01=0x00f4}
0x090d4…090fa               Head {h00=0x0022, h01=0x0050, text=» ST A2,DWTRTV,A6 STORE IN DWT «, t00=0x005c, t01=0x0128}
0x090fa…09116               Head {h00=0x0018, h01=0x0050, text=» ABL RTOK RETURN: OK«, t00=0x005c, t01=0x014e}
0x09116…09124               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005c, t01=0x016a}
0x09124…0912e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0178}
0x0912e…09144               Head {h00=0x0012, h01=0x0050, text=»* SEND REQUEST«, t00=0x005c, t01=0x0182}
0x09144…0914e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0008}
0x0914e…0916e               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x005d, t01=0x0012}
0x0916e…09190               Head {h00=0x001e, h01=0x0050, text=»*  BUFFER ADDRESS (ECBBA) «, t00=0x005d, t01=0x0032}
0x09190…091b0               Head {h00=0x001c, h01=0x0050, text=»*  BUFFER LENGTH (ECBRL)«, t00=0x005d, t01=0x0054}
0x091b0…091d4               Head {h00=0x0020, h01=0x0050, text=»*  SUBTERMINAL ADDRESS (DWT)«, t00=0x005d, t01=0x0074}
0x091d4…091f2               Head {h00=0x001a, h01=0x0050, text=»*  ECB CONTROL WORD 1 «, t00=0x005d, t01=0x0098}
0x091f2…091fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00b6}
0x091fc…09210               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x005d, t01=0x00c0}
0x09210…09250               Head {h00=0x003c, h01=0x0050, text=»*  1. VERIFY THAT LOGICAL & PHYSICAL CONNECTIONS EXIST. «, t00=0x005d, t01=0x00d4}
0x09250…09278               Head {h00=0x0024, h01=0x0050, text=»*  2. VERIFY BUFFER SIZE IF MMU «, t00=0x005d, t01=0x0114}
0x09278…0929a               Head {h00=0x001e, h01=0x0050, text=»*  3. QUEUE REQUESTING DWT«, t00=0x005d, t01=0x013c}
0x0929a…092c8               Head {h00=0x002a, h01=0x0050, text=»*  4. COMPLETE WHEN ACK'D OR TIMEOUT. «, t00=0x005d, t01=0x015e}
0x092c8…092d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x018c}
0x092d2…092e6               Head {h00=0x0010, h01=0x0050, text=»RQSEND EQU *«, t00=0x005e, t01=0x0008}
0x092e6…0930e               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x005e, t01=0x001c}
0x0930e…0932c               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 CONNECTED ? «, t00=0x005e, t01=0x0044}
0x0932c…0935e               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTSEQ NO, RETURN: SEQUENCE ERROR «, t00=0x005e, t01=0x0062}
0x0935e…09394               Head {h00=0x0032, h01=0x0050, text=» LD A2,DTEPLS,A7 PHYSICAL CONNECTION ACTICE ? «, t00=0x005e, t01=0x0094}
0x09394…093d0               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTPHYC NO, RETURN: PHYSICAL CONNECTION ERROR«, t00=0x005e, t01=0x00ca}
0x093d0…09404               Head {h00=0x0030, h01=0x0050, text=» LD A2,DTEDLS,A7 LOGICAL CONNECTION ACTIVE ?«, t00=0x005e, t01=0x0106}
0x09404…09440               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTLOGC NO, RETURN: LOGICAL CONNECTION ERROR «, t00=0x005e, t01=0x013a}
0x09440…09464               Head {h00=0x0020, h01=0x0050, text=» LC A2,DWTOPT,A6 GET OPTION «, t00=0x005e, t01=0x0176}
0x09464…09478               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x005f, t01=0x000a}
0x09478…094a0               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RQSE10 THERE IS NO OPTION«, t00=0x005f, t01=0x001e}
0x094a0…094c2               Head {h00=0x001e, h01=0x0050, text=» SUK A2,/20 WHICH OPTION ?«, t00=0x005f, t01=0x0046}
0x094c2…094f4               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTREQ WRONG OPTION :REQUEST ERROR«, t00=0x005f, t01=0x0068}
0x094f4…09522               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE BUFFERS QUEUED «, t00=0x005f, t01=0x009a}
0x09522…09536               Head {h00=0x0010, h01=0x0050, text=»RQSE10 EQU *«, t00=0x005f, t01=0x00c8}
0x09536…0954c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005f, t01=0x00dc}
0x0954c…09574               Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBRL,A8 REQUESTED LENGTH«, t00=0x005f, t01=0x00f2}
0x09574…0959c               Head {h00=0x0024, h01=0x0050, text=» CWK A2,BUFLEN ILLEGAL LENGTH ? «, t00=0x005f, t01=0x011a}
0x0959c…095d6               Head {h00=0x0036, h01=0x0050, text=» ABL(G) RTLGTH YES, RETURN: ILLEGAL BUFFER LENGTH «, t00=0x005f, t01=0x0142}
0x095d6…095e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x017c}
0x095e2…09604               Head {h00=0x001e, h01=0x0050, text=» CF A15,TIMEWR START TIMER«, t00=0x005f, t01=0x0188}
0x09604…0962c               Head {h00=0x0024, h01=0x0050, text=» CF A15,INSWQ QUEUE SEND REQUEST«, t00=0x0060, t01=0x001a}
0x0962c…0963e               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0060, t01=0x0042}
0x0963e…09648               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0054}
0x09648…09656               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0060, t01=0x005e}
0x09656…09660               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x006c}
0x09660…0967a               Head {h00=0x0016, h01=0x0050, text=»* RECEIVE REQUEST «, t00=0x0060, t01=0x0076}
0x0967a…09684               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0090}
0x09684…096a4               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0060, t01=0x009a}
0x096a4…096c6               Head {h00=0x001e, h01=0x0050, text=»*  BUFFER ADDRESS (ECBBA) «, t00=0x0060, t01=0x00ba}
0x096c6…096fa               Head {h00=0x0030, h01=0x0050, text=»*  REQUESTED BUFFER LENGTH IN CHARS. (ECBRL)«, t00=0x0060, t01=0x00dc}
0x096fa…0971e               Head {h00=0x0020, h01=0x0050, text=»*  SUBTERMINAL ADDRESS (DWT)«, t00=0x0060, t01=0x0110}
0x0971e…09728               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0134}
0x09728…0973c               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0060, t01=0x013e}
0x0973c…0977c               Head {h00=0x003c, h01=0x0050, text=»*  1. VERIFY THAT LOGICAL & PHYSICAL CONNECTIONS EXIST. «, t00=0x0060, t01=0x0152}
0x0977c…097c6 (97, 0, 400)  Head {h00=0x0046, h01=0x0050, text=»*  2. TRANSFER TO THE APPLICATION ANY MESSAGE QUEUED FOR THE DWT, «, t00=0x0061, t01=0x0004}
0x097c6…0980a               Head {h00=0x0040, h01=0x0050, text=»*  3. COMPLETE WHEN MESSAGE RECEIVED OR NO MESSAGE RECEIVED «, t00=0x0061, t01=0x004e}
0x0980a…0982e               Head {h00=0x0020, h01=0x0050, text=»*     WITHIN TIMEOUT PERIOD.«, t00=0x0061, t01=0x0092}
0x0982e…09838               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00b6}
0x09838…09858               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0061, t01=0x00c0}
0x09858…0988c               Head {h00=0x0030, h01=0x0050, text=»*  ACTUAL LENGTH OF RECEIVED MESSAGE (ECBEL)«, t00=0x0061, t01=0x00e0}
0x0988c…098a8               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x0061, t01=0x0114}
0x098a8…098b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0130}
0x098b2…098c6               Head {h00=0x0010, h01=0x0050, text=»RQRECE EQU *«, t00=0x0061, t01=0x013a}
0x098c6…098ee               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x0061, t01=0x014e}
0x098ee…0990c               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 CONNECTED ? «, t00=0x0061, t01=0x0176}
0x0990c…0993e (98, 0, 400)  Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTSEQ NO, RETURN: SEQUENCE ERROR «, t00=0x0062, t01=0x0004}
0x0993e…09974               Head {h00=0x0032, h01=0x0050, text=» LD A2,DTEPLS,A7 PHYSICAL CONNECTION ACTIVE ? «, t00=0x0062, t01=0x0036}
0x09974…099b0               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTPHYC NO, RETURN: PHYSICAL CONNECTION ERROR«, t00=0x0062, t01=0x006c}
0x099b0…099de               Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTIPC,A6 ANY BUFFER ON QUEUE ?«, t00=0x0062, t01=0x00a8}
0x099de…099f8               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) RQRE10 YES«, t00=0x0062, t01=0x00d6}
0x099f8…09a2c               Head {h00=0x0030, h01=0x0050, text=» LD A2,DTEDLS,A7 LOGICAL CONNECTION ACTIVE ?«, t00=0x0062, t01=0x00f0}
0x09a2c…09a68               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTLOGC NO, RETURN: LOGICAL CONNECTION ERROR «, t00=0x0062, t01=0x0124}
0x09a68…09a8a               Head {h00=0x001e, h01=0x0050, text=» CF A15,TIMERE START TIMER«, t00=0x0062, t01=0x0160}
0x09a8a…09aae               Head {h00=0x0020, h01=0x0050, text=» RF RQRE40 GO TO DISPATCHER «, t00=0x0062, t01=0x0182}
0x09aae…09ac2               Head {h00=0x0010, h01=0x0050, text=»RQRE10 EQU *«, t00=0x0063, t01=0x0016}
0x09ac2…09ae6               Head {h00=0x0020, h01=0x0050, text=» LD A3,2,A4 EFFECTIVE LENGTH«, t00=0x0063, t01=0x002a}
0x09ae6…09afe               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x0063, t01=0x004e}
0x09afe…09b2c               Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTLAD,A6 SYMBOLIC DTE-ADDRESS «, t00=0x0063, t01=0x0066}
0x09b2c…09b54               Head {h00=0x0024, h01=0x0050, text=» LD A2,4,A4 NETWORK SUB-ADDRESS «, t00=0x0063, t01=0x0094}
0x09b54…09b84               Head {h00=0x002c, h01=0x0050, text=» CF A15,GETSSA GET SYMBOLIC SUB-ADDRESS «, t00=0x0063, t01=0x00bc}
0x09b84…09bb0               Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBCW2,A8 AND SAVE IT IN ECB «, t00=0x0063, t01=0x00ec}
0x09bb0…09bca               Head {h00=0x0016, h01=0x0050, text=» IFT REMTIM=1  =9 «, t00=0x0063, t01=0x0118}
0x09bca…09c02               Head {h00=0x0034, h01=0x0050, text=» LD A1,DWTRTV,A6 GET REQUESTED TIMEOUT VALUE =9 «, t00=0x0063, t01=0x0132}
0x09c02…09c36               Head {h00=0x0030, h01=0x0050, text=» ST A1,ECBCW1,A8 STORE IN CONTROL WORD 1 =9 «, t00=0x0063, t01=0x016a}
0x09c36…09c48               Head {h00=0x000e, h01=0x0050, text=» XIF   =9 «, t00=0x0064, t01=0x000e}
0x09c48…09c76               Head {h00=0x002a, h01=0x0050, text=» LDK A1,0 RC : ACCEPTED AND COMPLETED «, t00=0x0064, t01=0x0020}
0x09c76…09ca2               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 GET NEXT BUFFER IN QUEUE«, t00=0x0064, t01=0x004e}
0x09ca2…09cd0               Head {h00=0x002a, h01=0x0050, text=» RF(Z) RQRE20 NO MORE BUFFERS IN QUEUE«, t00=0x0064, t01=0x007a}
0x09cd0…09d04               Head {h00=0x0030, h01=0x0050, text=» ORKL A1,R:DATA RC: AND MORE DATA AVAILABLE «, t00=0x0064, t01=0x00a8}
0x09d04…09d18               Head {h00=0x0010, h01=0x0050, text=»RQRE20 EQU *«, t00=0x0064, t01=0x00dc}
0x09d18…09d4a               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTIPC,A6  STORE AS FIRST IN QUEUE «, t00=0x0064, t01=0x00f0}
0x09d4a…09d5c               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0064, t01=0x0122}
0x09d5c…09d8c               Head {h00=0x002c, h01=0x0050, text=» CF A15,DC:MIN MOVE DATA TO USER BUFFER «, t00=0x0064, t01=0x0134}
0x09d8c…09da0               Head {h00=0x0010, h01=0x0050, text=»RQRE40 EQU *«, t00=0x0064, t01=0x0164}
0x09da0…09dc4               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0064, t01=0x0178}
0x09dc4…09dd2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0065, t01=0x000c}
0x09dd2…09ddc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x001a}
0x09ddc…09de6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0024}
0x09de6…09e0e               Head {h00=0x0024, h01=0x0050, text=»*  COMPLETE APPLICATION REQUEST «, t00=0x0065, t01=0x002e}
0x09e0e…09e18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0056}
0x09e18…09e2c               Head {h00=0x0010, h01=0x0050, text=»RTREQ EQU * «, t00=0x0065, t01=0x0060}
0x09e2c…09e56               Head {h00=0x0026, h01=0x0050, text=» LDKL A1,R:REQ RC = REQUEST ERROR «, t00=0x0065, t01=0x0074}
0x09e56…09e68               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0065, t01=0x009e}
0x09e68…09e7c               Head {h00=0x0010, h01=0x0050, text=»RTABRT EQU *«, t00=0x0065, t01=0x00b0}
0x09e7c…09ea0               Head {h00=0x0020, h01=0x0050, text=» LDKL A1,R:ABRT RC = ABORTED«, t00=0x0065, t01=0x00c4}
0x09ea0…09eb2               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0065, t01=0x00e8}
0x09eb2…09ec6               Head {h00=0x0010, h01=0x0050, text=»RTTIME EQU *«, t00=0x0065, t01=0x00fa}
0x09ec6…09eea               Head {h00=0x0020, h01=0x0050, text=» LDK A1,R:TIME RC = TIME OUT«, t00=0x0065, t01=0x010e}
0x09eea…09efc               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0065, t01=0x0132}
0x09efc…09f10               Head {h00=0x0010, h01=0x0050, text=»RTSEQ EQU * «, t00=0x0065, t01=0x0144}
0x09f10…09f3a               Head {h00=0x0026, h01=0x0050, text=» LDK A1,R:SEQ RC = SEQUENCE ERROR «, t00=0x0065, t01=0x0158}
0x09f3a…09f4c               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0065, t01=0x0182}
0x09f4c…09f60 (102, 0, 398) Head {h00=0x0010, h01=0x0050, text=»RTLGTH EQU *«, t00=0x0066, t01=0x0004}
0x09f60…09f8a               Head {h00=0x0026, h01=0x0050, text=» LDK A1,R:LGTH RC = ILLEGAL LENGTH«, t00=0x0066, t01=0x0018}
0x09f8a…09f9c               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0066, t01=0x0042}
0x09f9c…09fb0               Head {h00=0x0010, h01=0x0050, text=»RTLOGC EQU *«, t00=0x0066, t01=0x0054}
0x09fb0…09fe4               Head {h00=0x0030, h01=0x0050, text=» LDK A1,R:LOGC RC = LOGICAL CONNECTION ERROR«, t00=0x0066, t01=0x0068}
0x09fe4…09ff6               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0066, t01=0x009c}
0x09ff6…0a00a               Head {h00=0x0010, h01=0x0050, text=»RTPHYC EQU *«, t00=0x0066, t01=0x00ae}
0x0a00a…0a040               Head {h00=0x0032, h01=0x0050, text=» LDK A1,R:PHYC RC = PHYSICAL CONNECTION ERROR «, t00=0x0066, t01=0x00c2}
0x0a040…0a052               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0066, t01=0x00f8}
0x0a052…0a064               Head {h00=0x000e, h01=0x0050, text=»RTOK EQU *«, t00=0x0066, t01=0x010a}
0x0a064…0a07e               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RC = OK «, t00=0x0066, t01=0x011c}
0x0a07e…0a092               Head {h00=0x0010, h01=0x0050, text=»RQRTN EQU * «, t00=0x0066, t01=0x0136}
0x0a092…0a0cc               Head {h00=0x0036, h01=0x0050, text=» ABL DISEND COMPLETE REQUEST AND GO TO DISPATCHER «, t00=0x0066, t01=0x014a}
0x0a0cc…0a0da               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0066, t01=0x0184}
0x0a0da…0a0e4 (103, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0004}
0x0a0e4…0a120               Head {h00=0x0038, h01=0x0050, text=»* LOOKUP - LOOK UP KEY IN TABLE & BRANCH ON ADDRESS «, t00=0x0067, t01=0x000e}
0x0a120…0a12a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x004a}
0x0a12a…0a13a               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0067, t01=0x0054}
0x0a13a…0a176               Head {h00=0x0038, h01=0x0050, text=»*  CF     A15,LOOKUP          TABLE ADDRESS TO STACK«, t00=0x0067, t01=0x0064}
0x0a176…0a1b6               Head {h00=0x003c, h01=0x0050, text=»*  DATA   LAST,ADDRE          LAST ENTRY; ERROR ADDRESS «, t00=0x0067, t01=0x00a0}
0x0a1b6…0a1f8               Head {h00=0x003e, h01=0x0050, text=»*  DATA   KEY1,ADDR1          KEY (A2); ADDRESS FOR BRANCH«, t00=0x0067, t01=0x00e0}
0x0a1f8…0a212               Head {h00=0x0016, h01=0x0050, text=»*   "       "    "«, t00=0x0067, t01=0x0122}
0x0a212…0a232               Head {h00=0x001c, h01=0x0050, text=»* LAST DATA   KEYN,ADDRN«, t00=0x0067, t01=0x013c}
0x0a232…0a23c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x015c}
0x0a23c…0a25c               Head {h00=0x001c, h01=0x0050, text=»* ENTRY: A2 = KEY VALUE «, t00=0x0067, t01=0x0166}
0x0a25c…0a27e               Head {h00=0x001e, h01=0x0050, text=»* EXIT: A3 & A4 DESTROYED «, t00=0x0067, t01=0x0186}
0x0a27e…0a288               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0018}
0x0a288…0a29c               Head {h00=0x0010, h01=0x0050, text=»LOOKUP EQU *«, t00=0x0068, t01=0x0022}
0x0a29c…0a2dc               Head {h00=0x003c, h01=0x0050, text=» LDR* A3,A15 POINT TO NEXT INSTRUCTION ADDRESS IN STACK «, t00=0x0068, t01=0x0036}
0x0a2dc…0a30e               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A15 GET CONTENTS = TABLE ADDRESS «, t00=0x0068, t01=0x0076}
0x0a30e…0a338               Head {h00=0x0026, h01=0x0050, text=» LDR* A4,A3 GET LAST LEGAL ADDRESS«, t00=0x0068, t01=0x00a8}
0x0a338…0a35a               Head {h00=0x001e, h01=0x0050, text=» LD A1,2,A3 ERROR ADDRESS «, t00=0x0068, t01=0x00d2}
0x0a35a…0a364               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00f4}
0x0a364…0a384               Head {h00=0x001c, h01=0x0050, text=»LOOK50 EQU * LOOP ENTRY «, t00=0x0068, t01=0x00fe}
0x0a384…0a3b2               Head {h00=0x002a, h01=0x0050, text=» ADK A3,4 GET NEXT TABLE ENTRY ADDRESS«, t00=0x0068, t01=0x011e}
0x0a3b2…0a3d2               Head {h00=0x001c, h01=0x0050, text=» CWR A3,A4 PAST THE END?«, t00=0x0068, t01=0x014c}
0x0a3d2…0a3f8               Head {h00=0x0022, h01=0x0050, text=» RF(G) LOOK90 YES = NOT FOUND «, t00=0x0068, t01=0x016c}
0x0a3f8…0a422 (105, 0, 400) Head {h00=0x0026, h01=0x0050, text=» CWR* A2,A3 KEY = VALUE IN TABLE? «, t00=0x0069, t01=0x0004}
0x0a422…0a44e               Head {h00=0x0028, h01=0x0050, text=» RB(NE) LOOK50 NO - CHECK NEXT ENTRY«, t00=0x0069, t01=0x002e}
0x0a44e…0a478               Head {h00=0x0026, h01=0x0050, text=» ABI 2,A3 BRANCH TO TABLE ADDRESS «, t00=0x0069, t01=0x005a}
0x0a478…0a490               Head {h00=0x0014, h01=0x0050, text=»*  KEY NOT FOUND«, t00=0x0069, t01=0x0084}
0x0a490…0a4a4               Head {h00=0x0010, h01=0x0050, text=»LOOK90 EQU *«, t00=0x0069, t01=0x009c}
0x0a4a4…0a4ca               Head {h00=0x0022, h01=0x0050, text=» LDR P,A1 GO TO ERROR ADDRESS «, t00=0x0069, t01=0x00b0}
0x0a4ca…0a4d8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0069, t01=0x00d6}
0x0a4d8…0a4e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00e4}
0x0a4e2…0a4ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00ee}
0x0a4ec…0a4f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00f8}
0x0a4f6…0a51c               Head {h00=0x0022, h01=0x0050, text=»* REQUEST TIMER HANDLING PART «, t00=0x0069, t01=0x0102}
0x0a51c…0a526               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0128}
0x0a526…0a530               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0132}
0x0a530…0a53a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x013c}
0x0a53a…0a558               Head {h00=0x001a, h01=0x0050, text=»* RECEIVE TIMER=TIMERR«, t00=0x0069, t01=0x0146}
0x0a558…0a562               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0164}
0x0a562…0a576               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x0069, t01=0x016e}
0x0a576…0a588               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0069, t01=0x0182}
0x0a588…0a5b2 (106, 0, 400) Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTRTV,A6 GET TIMEOUT VALUE«, t00=0x006a, t01=0x0004}
0x0a5b2…0a5d2               Head {h00=0x001c, h01=0x0050, text=» RF(N) TIMRTN NO TIMING «, t00=0x006a, t01=0x002e}
0x0a5d2…0a604               Head {h00=0x002e, h01=0x0050, text=» RF(Z) ITOUTR TIMER=0 => IMMEDIATE TIMEOUT«, t00=0x006a, t01=0x004e}
0x0a604…0a61a               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x006a, t01=0x0080}
0x0a61a…0a630               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x006a, t01=0x0096}
0x0a630…0a644               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x006a, t01=0x00ac}
0x0a644…0a65a               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x006a, t01=0x00c0}
0x0a65a…0a686               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTRTP,A6 STORE TIMER POINTER«, t00=0x006a, t01=0x00d6}
0x0a686…0a69a               Head {h00=0x0010, h01=0x0050, text=»TIMRTN EQU *«, t00=0x006a, t01=0x0102}
0x0a69a…0a6ae               Head {h00=0x0010, h01=0x0050, text=» ABL RTNA15 «, t00=0x006a, t01=0x0116}
0x0a6ae…0a6b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x012a}
0x0a6b8…0a6d4               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x006a, t01=0x0134}
0x0a6d4…0a6de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0150}
0x0a6de…0a6f2               Head {h00=0x0010, h01=0x0050, text=»ITOUTR EQU *«, t00=0x006a, t01=0x015a}
0x0a6f2…0a706               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x006a, t01=0x016e}
0x0a706…0a718               Head {h00=0x000e, h01=0x0050, text=» RF TIMOUT«, t00=0x006a, t01=0x0182}
0x0a718…0a72c (107, 0, 400) Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x006b, t01=0x0004}
0x0a72c…0a748               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x006b, t01=0x0018}
0x0a748…0a75e               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x006b, t01=0x0034}
0x0a75e…0a78c               Head {h00=0x002a, h01=0x0050, text=» RF TIMOUT COMPLETE REQUEST RC=TIMEOUT«, t00=0x006b, t01=0x004a}
0x0a78c…0a796               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0078}
0x0a796…0a7a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0082}
0x0a7a0…0a7c6               Head {h00=0x0022, h01=0x0050, text=»*   RETURN FROM TIMER HANDLING«, t00=0x006b, t01=0x008c}
0x0a7c6…0a7d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00b2}
0x0a7d0…0a7de               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006b, t01=0x00bc}
0x0a7de…0a7e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00ca}
0x0a7e8…0a802               Head {h00=0x0016, h01=0x0050, text=»* SEND TIMER=TIMWR«, t00=0x006b, t01=0x00d4}
0x0a802…0a80c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00ee}
0x0a80c…0a824               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x006b, t01=0x00f8}
0x0a824…0a84e               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTRTV,A6 GET TIMEOUT VALUE«, t00=0x006b, t01=0x0110}
0x0a84e…0a86e               Head {h00=0x001c, h01=0x0050, text=» RB(N) TIMRTN NO TIMING «, t00=0x006b, t01=0x013a}
0x0a86e…0a8a0               Head {h00=0x002e, h01=0x0050, text=» RB(Z) ITOUTR TIMER=0 => IMMEDIATE TIMEOUT«, t00=0x006b, t01=0x015a}
0x0a8a0…0a8b4               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x006b, t01=0x018c}
0x0a8b4…0a8ca               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x006c, t01=0x0010}
0x0a8ca…0a8de               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x006c, t01=0x0026}
0x0a8de…0a8f2               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x006c, t01=0x003a}
0x0a8f2…0a90a               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTRTP,A6«, t00=0x006c, t01=0x004e}
0x0a90a…0a91c               Head {h00=0x000e, h01=0x0050, text=» RB TIMRTN«, t00=0x006c, t01=0x0066}
0x0a91c…0a926               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0078}
0x0a926…0a944               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x006c, t01=0x0082}
0x0a944…0a94e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00a0}
0x0a94e…0a962               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x006c, t01=0x00aa}
0x0a962…0a97e               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x006c, t01=0x00be}
0x0a97e…0a994               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x006c, t01=0x00da}
0x0a994…0a9c2               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x006c, t01=0x00f0}
0x0a9c2…0a9cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x011e}
0x0a9cc…0a9d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0128}
0x0a9d6…0aa00               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x006c, t01=0x0132}
0x0aa00…0aa24               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x006c, t01=0x015c}
0x0aa24…0aa3a               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x006c, t01=0x0180}
0x0aa3a…0aa4c               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x006d, t01=0x0008}
0x0aa4c…0aa7a               Head {h00=0x002a, h01=0x0050, text=» RF(NE) TIMOUT THIS DWT IS NOT WRITING«, t00=0x006d, t01=0x001a}
0x0aa7a…0aaa6               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x006d, t01=0x0048}
0x0aaa6…0aab8               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x006d, t01=0x0074}
0x0aab8…0aacc               Head {h00=0x0010, h01=0x0050, text=»TIMOUT EQU *«, t00=0x006d, t01=0x0086}
0x0aacc…0aafc               Head {h00=0x002c, h01=0x0050, text=» ABL RTTIME COMPLETE REQUEST RC=TIMEOUT «, t00=0x006d, t01=0x009a}
0x0aafc…0ab0a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006d, t01=0x00ca}
0x0ab0a…0ab14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00d8}
0x0ab14…0ab1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00e2}
0x0ab1e…0ab3c               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x006d, t01=0x00ec}
0x0ab3c…0ab46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x010a}
0x0ab46…0ab70               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x006d, t01=0x0114}
0x0ab70…0ab7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x013e}
0x0ab7a…0ab84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0148}
0x0ab84…0ab98               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x006d, t01=0x0152}
0x0ab98…0abc2               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTRTP,A6 GET TIMER POINTER«, t00=0x006d, t01=0x0166}
0x0abc2…0abe4               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x006d, t01=0x0190}
0x0abe4…0abfe               Head {h00=0x0016, h01=0x0050, text=» IFT REMTIM=1  =9 «, t00=0x006e, t01=0x0022}
0x0abfe…0ac16               Head {h00=0x0014, h01=0x0050, text=» LDR* A2,A2  =9 «, t00=0x006e, t01=0x003c}
0x0ac16…0ac3e               Head {h00=0x0024, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME =9«, t00=0x006e, t01=0x0054}
0x0ac3e…0ac50               Head {h00=0x000e, h01=0x0050, text=» XIF   =9 «, t00=0x006e, t01=0x007c}
0x0ac50…0ac74               Head {h00=0x0020, h01=0x0050, text=» CM* DWTRTP,A6 KILL TIMER =9«, t00=0x006e, t01=0x008e}
0x0ac74…0ac8a               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x006e, t01=0x00b2}
0x0ac8a…0ac98               Head {h00=0x000a, h01=0x0050, text=»    =3«, t00=0x006e, t01=0x00c8}
0x0ac98…0acac               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x006e, t01=0x00d6}
0x0acac…0acc0               Head {h00=0x0010, h01=0x0050, text=» ABL RTNA15 «, t00=0x006e, t01=0x00ea}
0x0acc0…0acce               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006e, t01=0x00fe}
0x0acce…0acd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x010c}
0x0acd8…0acf4               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x006e, t01=0x0116}
0x0acf4…0acfe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0132}
0x0acfe…0ad26               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x006e, t01=0x013c}
0x0ad26…0ad4a               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x006e, t01=0x0164}
0x0ad4a…0ad74               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x006e, t01=0x0188}
0x0ad74…0ad96               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x006f, t01=0x0022}
0x0ad96…0ada0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0044}
0x0ada0…0adaa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x004e}
0x0adaa…0add6               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x006f, t01=0x0058}
0x0add6…0ade2               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x006f, t01=0x0084}
0x0ade2…0adf6               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x006f, t01=0x0090}
0x0adf6…0ae1a               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x006f, t01=0x00a4}
0x0ae1a…0ae4c               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x006f, t01=0x00c8}
0x0ae4c…0ae5e               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x006f, t01=0x00fa}
0x0ae5e…0ae72               Head {h00=0x0010, h01=0x0050, text=»GBUF10 EQU *«, t00=0x006f, t01=0x010c}
0x0ae72…0ae86               Head {h00=0x0010, h01=0x0050, text=» ABL RTNA15 «, t00=0x006f, t01=0x0120}
0x0ae86…0ae94               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006f, t01=0x0134}
0x0ae94…0ae9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0142}
0x0ae9e…0aea8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x014c}
0x0aea8…0aec8               Head {h00=0x001c, h01=0x0050, text=»* RELEASE RECEIVE BUFFER«, t00=0x006f, t01=0x0156}
0x0aec8…0aed2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0176}
0x0aed2…0aef6               Head {h00=0x0020, h01=0x0050, text=»* A4 CONTAINS BUFFER ADDRESS«, t00=0x006f, t01=0x0180}
0x0aef6…0af1e               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,RRBUF«, t00=0x0070, t01=0x0014}
0x0af1e…0af40               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0070, t01=0x003c}
0x0af40…0af4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x005e}
0x0af4a…0af54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0068}
0x0af54…0af80               Head {h00=0x0028, h01=0x0050, text=»RRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0070, t01=0x0072}
0x0af80…0af8c               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0070, t01=0x009e}
0x0af8c…0afa0               Head {h00=0x0010, h01=0x0050, text=»RBUF10 EQU *«, t00=0x0070, t01=0x00aa}
0x0afa0…0afb4               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x0070, t01=0x00be}
0x0afb4…0afca               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RBUF20 «, t00=0x0070, t01=0x00d2}
0x0afca…0afdc               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0070, t01=0x00e8}
0x0afdc…0afee               Head {h00=0x000e, h01=0x0050, text=» RB RBUF10«, t00=0x0070, t01=0x00fa}
0x0afee…0b002               Head {h00=0x0010, h01=0x0050, text=»RBUF20 EQU *«, t00=0x0070, t01=0x010c}
0x0b002…0b014               Head {h00=0x000e, h01=0x0050, text=» STR A4,A2«, t00=0x0070, t01=0x0120}
0x0b014…0b024               Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x0070, t01=0x0132}
0x0b024…0b048               Head {h00=0x0020, h01=0x0050, text=» RB GBUF10 RETURN TO CALLER «, t00=0x0070, t01=0x0142}
0x0b048…0b056               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0070, t01=0x0166}
0x0b056…0b060               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0174}
0x0b060…0b096               Head {h00=0x0032, h01=0x0050, text=»* RELEASE ALL RECEIVE BUFFERS QUEUED ON A DWT «, t00=0x0070, t01=0x017e}
0x0b096…0b0a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0024}
0x0b0a0…0b0b8               Head {h00=0x0014, h01=0x0050, text=»* A6 - DWT ADDR «, t00=0x0071, t01=0x002e}
0x0b0b8…0b0da               Head {h00=0x001e, h01=0x0050, text=»* A1 AND A4 ARE DESTROYED «, t00=0x0071, t01=0x0046}
0x0b0da…0b106               Head {h00=0x0028, h01=0x0050, text=»* CALLING SEQUENCE: CF    A15,RELBUF«, t00=0x0071, t01=0x0068}
0x0b106…0b110               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0094}
0x0b110…0b11a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x009e}
0x0b11a…0b12e               Head {h00=0x0010, h01=0x0050, text=»RELBUF EQU *«, t00=0x0071, t01=0x00a8}
0x0b12e…0b15c               Head {h00=0x002a, h01=0x0050, text=» LDK A1,DWTIPC SET BUFFER QUEUE DISP. «, t00=0x0071, t01=0x00bc}
0x0b15c…0b16e               Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x0071, t01=0x00ea}
0x0b16e…0b182               Head {h00=0x0010, h01=0x0050, text=»RLBU10 EQU *«, t00=0x0071, t01=0x00fc}
0x0b182…0b1aa               Head {h00=0x0024, h01=0x0050, text=» LDR* A4,A1 NEXT IN BUFFER QUEUE«, t00=0x0071, t01=0x0110}
0x0b1aa…0b1c0               Head {h00=0x0012, h01=0x0050, text=» RB(Z) GBUF10 «, t00=0x0071, t01=0x0138}
0x0b1c0…0b1e6               Head {h00=0x0022, h01=0x0050, text=» LDR* A2,A4 REMOVE FROM QUEUE «, t00=0x0071, t01=0x014e}
0x0b1e6…0b1fa               Head {h00=0x0010, h01=0x0050, text=» STR A2,A1 .«, t00=0x0071, t01=0x0174}
0x0b1fa…0b21e               Head {h00=0x0020, h01=0x0050, text=» CF A15,RRBUF RELEASE BUFFER«, t00=0x0071, t01=0x0188}
0x0b21e…0b230               Head {h00=0x000e, h01=0x0050, text=» RB RLBU10«, t00=0x0072, t01=0x001c}
0x0b230…0b23e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0072, t01=0x002e}
0x0b23e…0b248               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x003c}
0x0b248…0b252               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0046}
0x0b252…0b27c               Head {h00=0x0026, h01=0x0050, text=»* INSERT DWT IN SEND REQUEST QUEUE«, t00=0x0072, t01=0x0050}
0x0b27c…0b286               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x007a}
0x0b286…0b2a2               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0072, t01=0x0084}
0x0b2a2…0b2b2               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0072, t01=0x00a0}
0x0b2b2…0b2bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00b0}
0x0b2bc…0b2e8               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0072, t01=0x00ba}
0x0b2e8…0b2fe               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTOPN«, t00=0x0072, t01=0x00e6}
0x0b2fe…0b318               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0072, t01=0x00fc}
0x0b318…0b340               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0072, t01=0x0116}
0x0b340…0b352               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0072, t01=0x013e}
0x0b352…0b364               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0072, t01=0x0150}
0x0b364…0b37c               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0072, t01=0x0162}
0x0b37c…0b39e               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0072, t01=0x017a}
0x0b39e…0b3c4               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0073, t01=0x000c}
0x0b3c4…0b3de               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0073, t01=0x0032}
0x0b3de…0b3ec               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0073, t01=0x004c}
0x0b3ec…0b3f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x005a}
0x0b3f6…0b400               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0064}
0x0b400…0b42c               Head {h00=0x0028, h01=0x0050, text=»* REMOVE DWT FROM SEND REQUEST QUEUE«, t00=0x0073, t01=0x006e}
0x0b42c…0b436               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x009a}
0x0b436…0b452               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0073, t01=0x00a4}
0x0b452…0b462               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0073, t01=0x00c0}
0x0b462…0b46c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00d0}
0x0b46c…0b49a               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x0073, t01=0x00da}
0x0b49a…0b4cc               Head {h00=0x002e, h01=0x0050, text=» LDK A4,DWTOPN GET DWT-LINK TO BE REMOVED «, t00=0x0073, t01=0x0108}
0x0b4cc…0b4e0               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x0073, t01=0x013a}
0x0b4e0…0b4f4               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x0073, t01=0x014e}
0x0b4f4…0b50c               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x0073, t01=0x0162}
0x0b50c…0b536               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x0073, t01=0x017a}
0x0b536…0b548               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x0074, t01=0x0014}
0x0b548…0b55c               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x0074, t01=0x0026}
0x0b55c…0b578               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x0074, t01=0x003a}
0x0b578…0b58a               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x0074, t01=0x0056}
0x0b58a…0b5aa               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x0074, t01=0x0068}
0x0b5aa…0b5bc               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0074, t01=0x0088}
0x0b5bc…0b5d6               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0074, t01=0x009a}
0x0b5d6…0b5e4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x00b4}
0x0b5e4…0b5ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00c2}
0x0b5ee…0b5f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00cc}
0x0b5f8…0b61c               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x0074, t01=0x00d6}
0x0b61c…0b626               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00fa}
0x0b626…0b63c               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x0074, t01=0x0104}
0x0b63c…0b658               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0074, t01=0x011a}
0x0b658…0b668               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0074, t01=0x0136}
0x0b668…0b672               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0146}
0x0b672…0b686               Head {h00=0x0010, h01=0x0050, text=»INSSQ EQU * «, t00=0x0074, t01=0x0150}
0x0b686…0b6ba               Head {h00=0x0030, h01=0x0050, text=» LDKL A1,PENDST INDICATE STATUS MESSAGE DK2 «, t00=0x0074, t01=0x0164}
0x0b6ba…0b6de               Head {h00=0x0020, h01=0x0050, text=» ORS A1,DWTST,A6 PENDING DK2«, t00=0x0075, t01=0x0008}
0x0b6de…0b706               Head {h00=0x0024, h01=0x0050, text=» LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x0075, t01=0x002c}
0x0b706…0b71c               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTOPE«, t00=0x0075, t01=0x0054}
0x0b71c…0b72e               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0075, t01=0x006a}
0x0b72e…0b738               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x007c}
0x0b738…0b742               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0086}
0x0b742…0b768               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x0075, t01=0x0090}
0x0b768…0b772               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00b6}
0x0b772…0b78e               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0075, t01=0x00c0}
0x0b78e…0b79e               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0075, t01=0x00dc}
0x0b79e…0b7a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00ec}
0x0b7a8…0b7be               Head {h00=0x0012, h01=0x0050, text=»REMOVS EQU *  «, t00=0x0075, t01=0x00f6}
0x0b7be…0b7ee               Head {h00=0x002c, h01=0x0050, text=» LDKL A1,PENDST CLEAR STATUS PENDING DK2«, t00=0x0075, t01=0x010c}
0x0b7ee…0b810               Head {h00=0x001e, h01=0x0050, text=» C1R A1,A1 INDICATION DK2 «, t00=0x0075, t01=0x013c}
0x0b810…0b82e               Head {h00=0x001a, h01=0x0050, text=» ANS A1,DWTST,A6 . DK2«, t00=0x0075, t01=0x015e}
0x0b82e…0b856               Head {h00=0x0024, h01=0x0050, text=» LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x0075, t01=0x017c}
0x0b856…0b86c               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTOPE«, t00=0x0076, t01=0x0014}
0x0b86c…0b87e               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x0076, t01=0x002a}
0x0b87e…0b88a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x003c}
0x0b88a…0b898               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0076, t01=0x0048}
0x0b898…0b8a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0056}
0x0b8a2…0b8ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0060}
0x0b8ac…0b8d4               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x0076, t01=0x006a}
0x0b8d4…0b8de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0092}
0x0b8de…0b8f6               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x0076, t01=0x009c}
0x0b8f6…0b910               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x0076, t01=0x00b4}
0x0b910…0b91a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00ce}
0x0b91a…0b92e               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x0076, t01=0x00d8}
0x0b92e…0b940               Head {h00=0x000e, h01=0x0050, text=» SUK A4,6 «, t00=0x0076, t01=0x00ec}
0x0b940…0b96e               Head {h00=0x002a, h01=0x0050, text=» LDK A2,DWTIPC SET BUFFER QUEUE DISP. «, t00=0x0076, t01=0x00fe}
0x0b96e…0b980               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0076, t01=0x012c}
0x0b980…0b994               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x0076, t01=0x013e}
0x0b994…0b9a8               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x0076, t01=0x0152}
0x0b9a8…0b9d0               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x0076, t01=0x0166}
0x0b9d0…0b9e2               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0076, t01=0x018e}
0x0b9e2…0b9f4               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x0077, t01=0x0010}
0x0b9f4…0ba1e               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x0077, t01=0x0022}
0x0ba1e…0ba44               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0077, t01=0x004c}
0x0ba44…0ba54               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0077, t01=0x0072}
0x0ba54…0ba62               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0077, t01=0x0082}
0x0ba62…0ba6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0090}
0x0ba6c…0ba76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x009a}
0x0ba76…0ba94               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0077, t01=0x00a4}
0x0ba94…0babc               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0077, t01=0x00c2}
0x0babc…0bac6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x00ea}
0x0bac6…0bade               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0077, t01=0x00f4}
0x0bade…0baf2               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0077, t01=0x010c}
0x0baf2…0bb06               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0077, t01=0x0120}
0x0bb06…0bb1a               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0077, t01=0x0134}
0x0bb1a…0bb2e               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0077, t01=0x0148}
0x0bb2e…0bb42               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0077, t01=0x015c}
0x0bb42…0bb5c               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0077, t01=0x0170}
0x0bb5c…0bb66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x018a}
0x0bb66…0bb70 (120, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0004}
0x0bb70…0bb82               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0078, t01=0x000e}
0x0bb82…0bbaa               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0078, t01=0x0020}
0x0bbaa…0bbb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0048}
0x0bbb4…0bbcc               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0078, t01=0x0052}
0x0bbcc…0bbe0               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0078, t01=0x006a}
0x0bbe0…0bbf2               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0078, t01=0x007e}
0x0bbf2…0bc06               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0078, t01=0x0090}
0x0bc06…0bc18               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0078, t01=0x00a4}
0x0bc18…0bc2c               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0078, t01=0x00b6}
0x0bc2c…0bc3e               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0078, t01=0x00ca}
0x0bc3e…0bc52               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0078, t01=0x00dc}
0x0bc52…0bc64               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0078, t01=0x00f0}
0x0bc64…0bc78               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0078, t01=0x0102}
0x0bc78…0bc8a               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0078, t01=0x0116}
0x0bc8a…0bc9e               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0078, t01=0x0128}
0x0bc9e…0bca8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x013c}
0x0bca8…0bcb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0146}
0x0bcb2…0bcd4               Head {h00=0x001e, h01=0x0050, text=»*  RETURN VIA REGISTER 15 «, t00=0x0078, t01=0x0150}
0x0bcd4…0bcde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0172}
0x0bcde…0bcf2               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0078, t01=0x017c}
0x0bcf2…0bd06               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0078, t01=0x0190}
0x0bd06…0bd18               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0079, t01=0x0014}
0x0bd18…0bd26               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0079, t01=0x0026}
0x0bd26…0bd30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0034}
0x0bd30…0bd48               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0079, t01=0x003e}
0x0bd48…0bd52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0056}
0x0bd52…0bd7e               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0079, t01=0x0060}
0x0bd7e…0bda4               Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 RELOAD DWT ADDRESS «, t00=0x0079, t01=0x008c}
0x0bda4…0bdbc               Head {h00=0x0014, h01=0x0050, text=» LDKL A7,DTETAB «, t00=0x0079, t01=0x00b2}
0x0bdbc…0bdd2               Head {h00=0x0012, h01=0x0050, text=» CM DTEDLS,A7 «, t00=0x0079, t01=0x00ca}
0x0bdd2…0bde8               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x0079, t01=0x00e0}
0x0bde8…0bdf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00f6}
0x0bdf2…0bdfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0100}
0x0bdfc…0be1a               Head {h00=0x001a, h01=0x0050, text=»*  COUNT POLL TIME OUT«, t00=0x0079, t01=0x010a}
0x0be1a…0be24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0128}
0x0be24…0be3a               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSXC3«, t00=0x0079, t01=0x0132}
0x0be3a…0be50               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x0079, t01=0x0148}
0x0be50…0be5c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x015e}
0x0be5c…0be84               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0079, t01=0x016a}
0x0be84…0be96 (122, 0, 398) Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x007a, t01=0x0004}
0x0be96…0bea0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0016}
0x0bea0…0bed8               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x007a, t01=0x0020}
0x0bed8…0bee2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0058}
0x0bee2…0bef6               Head {h00=0x0010, h01=0x0050, text=»CPTIM EQU * «, t00=0x007a, t01=0x0062}
0x0bef6…0bf10               Head {h00=0x0016, h01=0x0050, text=» LDK A2,1 INDICATE«, t00=0x007a, t01=0x0076}
0x0bf10…0bf36               Head {h00=0x0022, h01=0x0050, text=» ST A2,DTEDLS,A7 DATA LINK UP «, t00=0x007a, t01=0x0090}
0x0bf36…0bf4e               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x007a, t01=0x00b6}
0x0bf4e…0bf72               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x007a, t01=0x00ce}
0x0bf72…0bf82               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007a, t01=0x00f2}
0x0bf82…0bf8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0102}
0x0bf8c…0bfa6               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x007a, t01=0x010c}
0x0bfa6…0bfb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0126}
0x0bfb0…0bfc4               Head {h00=0x0010, h01=0x0050, text=»SPOTIM EQU *«, t00=0x007a, t01=0x0130}
0x0bfc4…0bff4               Head {h00=0x002c, h01=0x0050, text=» LDR A1,A6 LOAD DWT ADDRESS AS PARAMETER«, t00=0x007a, t01=0x0144}
0x0bff4…0c016               Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME START TIMER«, t00=0x007a, t01=0x0174}
0x0c016…0c030               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x007b, t01=0x0008}
0x0c030…0c05a               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x007b, t01=0x0022}
0x0c05a…0c074               Head {h00=0x0016, h01=0x0050, text=» RB RTNA15 RETURN «, t00=0x007b, t01=0x004c}
0x0c074…0c082               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007b, t01=0x0066}
0x0c082…0c08c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0074}
0x0c08c…0c0ac               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x007b, t01=0x007e}
0x0c0ac…0c0b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x009e}
0x0c0b6…0c0ca               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x007b, t01=0x00a8}
0x0c0ca…0c0f2               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x007b, t01=0x00bc}
0x0c0f2…0c108               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x007b, t01=0x00e4}
0x0c108…0c124               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x007b, t01=0x00fa}
0x0c124…0c14c               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x007b, t01=0x0116}
0x0c14c…0c15c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007b, t01=0x013e}
0x0c15c…0c166               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x014e}
0x0c166…0c182               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x007b, t01=0x0158}
0x0c182…0c18c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0174}
0x0c18c…0c1a4               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x007b, t01=0x017e}
0x0c1a4…0c1c0               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x007c, t01=0x0008}
0x0c1c0…0c1e4               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x007c, t01=0x0024}
0x0c1e4…0c1fc               Head {h00=0x0014, h01=0x0050, text=» LDKL A7,DTETAB «, t00=0x007c, t01=0x0048}
0x0c1fc…0c212               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x007c, t01=0x0060}
0x0c212…0c21c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0076}
0x0c21c…0c226               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0080}
0x0c226…0c24a               Head {h00=0x0020, h01=0x0050, text=»*  COUNT PROCEDURE TIME OUT «, t00=0x007c, t01=0x008a}
0x0c24a…0c254               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00ae}
0x0c254…0c26a               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSXC2«, t00=0x007c, t01=0x00b8}
0x0c26a…0c280               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x007c, t01=0x00ce}
0x0c280…0c28c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x00e4}
0x0c28c…0c2bc               Head {h00=0x002c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT IF OPEN SALCUZ «, t00=0x007c, t01=0x00f0}
0x0c2bc…0c2d0               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x007c, t01=0x0120}
0x0c2d0…0c2f6               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x007c, t01=0x0134}
0x0c2f6…0c314               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x007c, t01=0x015a}
0x0c314…0c33e               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x007c, t01=0x0178}
0x0c33e…0c354               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x007d, t01=0x0012}
0x0c354…0c362               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007d, t01=0x0028}
0x0c362…0c36c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0036}
0x0c36c…0c38a               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x007d, t01=0x0040}
0x0c38a…0c394               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x005e}
0x0c394…0c3c0               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x007d, t01=0x0068}
0x0c3c0…0c3e0               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x007d, t01=0x0094}
0x0c3e0…0c3fa               Head {h00=0x0016, h01=0x0050, text=» CMR A1 STOP TIMER«, t00=0x007d, t01=0x00b4}
0x0c3fa…0c40c               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x007d, t01=0x00ce}
0x0c40c…0c420               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x007d, t01=0x00e0}
0x0c420…0c428               Head {h00=0x0004, h01=0x0050, t00=0x007d, t01=0x00f4}
0x0c428…0c432               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00fc}
0x0c432…0c43c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0106}
0x0c43c…0c468               Head {h00=0x0028, h01=0x0050, text=»*   WAIT 1 SEC. FOR MODEM CONNECTION«, t00=0x007d, t01=0x0110}
0x0c468…0c472               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x013c}
0x0c472…0c47a               Head {h00=0x0004, h01=0x0050, t00=0x007d, t01=0x0146}
0x0c47a…0c49e               Head {h00=0x0020, h01=0x0050, text=»DTE:ON LDR A1,A6 DWT ADDRESS«, t00=0x007d, t01=0x014e}
0x0c49e…0c4c0               Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME WAIT 1 SEC.«, t00=0x007d, t01=0x0172}
0x0c4c0…0c4d8 (126, 0, 400) Head {h00=0x0014, h01=0x0050, text=» DATA DTE:10,10 «, t00=0x007e, t01=0x0004}
0x0c4d8…0c4e6               Head {h00=0x000a, h01=0x0050, text=»    =1«, t00=0x007e, t01=0x001c}
0x0c4e6…0c4fe               Head {h00=0x0014, h01=0x0050, text=» LDKL A5,STB  =1«, t00=0x007e, t01=0x002a}
0x0c4fe…0c524               Head {h00=0x0022, h01=0x0050, text=» CF A5,CSYNCI CONNECT MODEM =1«, t00=0x007e, t01=0x0042}
0x0c524…0c552               Head {h00=0x002a, h01=0x0050, text=» CF A5,CHALTI NO INTERRUPTS ALLOWED =1«, t00=0x007e, t01=0x0068}
0x0c552…0c568               Head {h00=0x0012, h01=0x0050, text=» ABL TDISP =1 «, t00=0x007e, t01=0x0096}
0x0c568…0c570               Head {h00=0x0004, h01=0x0050, t00=0x007e, t01=0x00ac}
0x0c570…0c578               Head {h00=0x0004, h01=0x0050, t00=0x007e, t01=0x00b4}
0x0c578…0c582               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00bc}
0x0c582…0c58c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00c6}
0x0c58c…0c5ae               Head {h00=0x001e, h01=0x0050, text=»*   MODEM-CONNECT TIMEOUT «, t00=0x007e, t01=0x00d0}
0x0c5ae…0c5b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00f2}
0x0c5b8…0c5c0               Head {h00=0x0004, h01=0x0050, t00=0x007e, t01=0x00fc}
0x0c5c0…0c5e4               Head {h00=0x0020, h01=0x0050, text=»DTE:10 LDR A6,A1 DWT ADDRESS«, t00=0x007e, t01=0x0104}
0x0c5e4…0c5fc               Head {h00=0x0014, h01=0x0050, text=» LDKL A7,DTETAB «, t00=0x007e, t01=0x0128}
0x0c5fc…0c624               Head {h00=0x0024, h01=0x0050, text=» IM DTESTA,A7 SET OPEN STATUS =1«, t00=0x007e, t01=0x0140}
0x0c624…0c63c               Head {h00=0x0014, h01=0x0050, text=» LDKL A5,STB  =1«, t00=0x007e, t01=0x0168}
0x0c63c…0c66a               Head {h00=0x002a, h01=0x0050, text=» CF A5,CSYNCI PUT CU IN ACTIVE MODE =1«, t00=0x007e, t01=0x0180}
0x0c66a…0c6a6               Head {h00=0x0038, h01=0x0050, text=» CF A5,CHALTI HALT I/P DEVICE TO GET MODEM STATUS =1«, t00=0x007f, t01=0x001e}
0x0c6a6…0c6da               Head {h00=0x0030, h01=0x0050, text=» IM DTEPLS,A7 PRESET PHYSICAL STATUS = OK =1«, t00=0x007f, t01=0x005a}
0x0c6da…0c6fa               Head {h00=0x001c, h01=0x0050, text=» ANK A2,1 MODEM OK ? =1 «, t00=0x007f, t01=0x008e}
0x0c6fa…0c716               Head {h00=0x0018, h01=0x0050, text=» RF(Z) DTE:20 YES =1«, t00=0x007f, t01=0x00ae}
0x0c716…0c746               Head {h00=0x002c, h01=0x0050, text=» CM DTEPLS,A7 INDICATE PHYSICAL ERROR =1«, t00=0x007f, t01=0x00ca}
0x0c746…0c75e               Head {h00=0x0014, h01=0x0050, text=»DTE:20 EQU *  =1«, t00=0x007f, t01=0x00fa}
0x0c75e…0c784               Head {h00=0x0022, h01=0x0050, text=» LDR A1,A2 SET RETURN CODE =1 «, t00=0x007f, t01=0x0112}
0x0c784…0c7b2               Head {h00=0x002a, h01=0x0050, text=» CF A15,TENDIO COMPLETE THE REQUEST =1«, t00=0x007f, t01=0x0138}
0x0c7b2…0c7dc               Head {h00=0x0026, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER =6«, t00=0x007f, t01=0x0166}
0x0c7dc…0c7fa               Head {h00=0x001a, h01=0x0050, text=» ABL BRM START I/P =1 «, t00=0x007f, t01=0x0190}
0x0c7fa…0c808               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0080, t01=0x001e}
0x0c808…0c81e               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0080, t01=0x002c}
0x0c81e…0c828               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0042}
0x0c828…0c832               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x004c}
0x0c832…0c84c               Head {h00=0x0016, h01=0x0050, text=»*  GET DWT ADDRESS«, t00=0x0080, t01=0x0056}
0x0c84c…0c856               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0070}
0x0c856…0c86a               Head {h00=0x0010, h01=0x0050, text=»MESDWT EQU *«, t00=0x0080, t01=0x007a}
0x0c86a…0c894               Head {h00=0x0026, h01=0x0050, text=» CWR A6,A7 IS IT DTETAB-ADDRESS ? «, t00=0x0080, t01=0x008e}
0x0c894…0c8ae               Head {h00=0x0016, h01=0x0050, text=» RF(E) MES200 YES «, t00=0x0080, t01=0x00b8}
0x0c8ae…0c8d6               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTEDDT,A7 GET ADDR TO DDT«, t00=0x0080, t01=0x00d2}
0x0c8d6…0c8f8               Head {h00=0x001e, h01=0x0050, text=» CWR A6,A2 IS IT DDT-ADDR «, t00=0x0080, t01=0x00fa}
0x0c8f8…0c912               Head {h00=0x0016, h01=0x0050, text=» RF(E) MES200 YES «, t00=0x0080, t01=0x011c}
0x0c912…0c938               Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY REQUEST ? «, t00=0x0080, t01=0x0136}
0x0c938…0c950               Head {h00=0x0014, h01=0x0050, text=» RF(N) MESD50 NO«, t00=0x0080, t01=0x015c}
0x0c950…0c97c               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTOR,A6 ANY MESSAGE ORDER ? «, t00=0x0080, t01=0x0174}
0x0c97c…0c990               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0081, t01=0x0010}
0x0c990…0c9aa               Head {h00=0x0016, h01=0x0050, text=» RF(Z) MES200 YES «, t00=0x0081, t01=0x0024}
0x0c9aa…0c9d4               Head {h00=0x0026, h01=0x0050, text=» SUK A2,RECEIVE A RECEIVE ORDER ? «, t00=0x0081, t01=0x003e}
0x0c9d4…0c9ee               Head {h00=0x0016, h01=0x0050, text=» RF(Z) MES200 YES «, t00=0x0081, t01=0x0068}
0x0c9ee…0ca02               Head {h00=0x0010, h01=0x0050, text=»MESD50 EQU *«, t00=0x0081, t01=0x0082}
0x0ca02…0ca36               Head {h00=0x0030, h01=0x0050, text=» LD A2,DTEDDT,A7 IS THERE A DDT CONNECTED ? «, t00=0x0081, t01=0x0096}
0x0ca36…0ca4e               Head {h00=0x0014, h01=0x0050, text=» RF(Z) MES100 NO«, t00=0x0081, t01=0x00ca}
0x0ca4e…0ca6e               Head {h00=0x001c, h01=0x0050, text=» LDR A6,A2 GET DDT-ADDR «, t00=0x0081, t01=0x00e2}
0x0ca6e…0ca80               Head {h00=0x000e, h01=0x0050, text=» RF MES200«, t00=0x0081, t01=0x0102}
0x0ca80…0ca94               Head {h00=0x0010, h01=0x0050, text=»MES100 EQU *«, t00=0x0081, t01=0x0114}
0x0ca94…0cab6               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A7 GET DTETAB-ADDR«, t00=0x0081, t01=0x0128}
0x0cab6…0caca               Head {h00=0x0010, h01=0x0050, text=»MES200 EQU *«, t00=0x0081, t01=0x014a}
0x0caca…0caec               Head {h00=0x001e, h01=0x0050, text=» ABL RTNA15 RETURN VIA A15«, t00=0x0081, t01=0x015e}
0x0caec…0caf8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x0180}
0x0caf8…0cb06               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0081, t01=0x018c}
0x0cb06…0cb10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x000a}
0x0cb10…0cb1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0014}
0x0cb1a…0cb36               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x0082, t01=0x001e}
0x0cb36…0cb40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x003a}
0x0cb40…0cb66               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x0082, t01=0x0044}
0x0cb66…0cb90               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x0082, t01=0x006a}
0x0cb90…0cb9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0094}
0x0cb9a…0cba4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x009e}
0x0cba4…0cbb6               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x0082, t01=0x00a8}
0x0cbb6…0cbda               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x0082, t01=0x00ba}
0x0cbda…0cbfc               Head {h00=0x001e, h01=0x0050, text=» CM SYNSW CLEAR SYN-SWITCH«, t00=0x0082, t01=0x00de}
0x0cbfc…0cc22               Head {h00=0x0022, h01=0x0050, text=» CM TPM CLEAR TRANSPARENT TEXT«, t00=0x0082, t01=0x0100}
0x0cc22…0cc52               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCI START INPUT WITH SYNC DEF «, t00=0x0082, t01=0x0126}
0x0cc52…0cc5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0156}
0x0cc5c…0cc66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0160}
0x0cc66…0cc70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x016a}
0x0cc70…0cc94               Head {h00=0x0020, h01=0x0050, text=» CF A5,READP READ CHARACTER «, t00=0x0082, t01=0x0174}
0x0cc94…0ccb8               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM120 PARITY ERROR «, t00=0x0083, t01=0x0008}
0x0ccb8…0ccc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x002c}
0x0ccc2…0cccc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0036}
0x0cccc…0ccfa               Head {h00=0x002a, h01=0x0050, text=»*  CHECK IF IT IS A CONTROL CHARACTER «, t00=0x0083, t01=0x0040}
0x0ccfa…0cd04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x006e}
0x0cd04…0cd16               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0083, t01=0x0078}
0x0cd16…0cd54               Head {h00=0x003a, h01=0x0050, text=» CF A15,LOOKUP BRANCH ON CODES, TABLE ADDRESS TO STACK«, t00=0x0083, t01=0x008a}
0x0cd54…0cd92               Head {h00=0x003a, h01=0x0050, text=» DATA BRM100,BRM200 LAST ENTRY,POLL OR SELECT SEQUENCE«, t00=0x0083, t01=0x00c8}
0x0cd92…0cdbc               Head {h00=0x0026, h01=0x0050, text=» DATA PAD,BRM130 PAD RECEIVED DK1 «, t00=0x0083, t01=0x0106}
0x0cdbc…0cde2               Head {h00=0x0022, h01=0x0050, text=» DATA STX,STX100 STX RECEIVED «, t00=0x0083, t01=0x0130}
0x0cde2…0ce08               Head {h00=0x0022, h01=0x0050, text=» DATA EOT,EOT100 EOT RECEIVED «, t00=0x0083, t01=0x0156}
0x0ce08…0ce2e               Head {h00=0x0022, h01=0x0050, text=» DATA ENQ,ENQ100 ENQ RECEIVED «, t00=0x0083, t01=0x017c}
0x0ce2e…0ce54               Head {h00=0x0022, h01=0x0050, text=» DATA DLE,DLE100 DLE RECEIVED «, t00=0x0084, t01=0x0012}
0x0ce54…0ce80               Head {h00=0x0028, h01=0x0050, text=»BRM100 DATA NAK,NAK100 NAK RECEIVED «, t00=0x0084, t01=0x0038}
0x0ce80…0ce8e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0084, t01=0x0064}
0x0ce8e…0ce98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0072}
0x0ce98…0cea2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x007c}
0x0cea2…0cebe               Head {h00=0x0018, h01=0x0050, text=»*  THROUGHPUT ERROR «, t00=0x0084, t01=0x0086}
0x0cebe…0cec8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00a2}
0x0cec8…0cedc               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x0084, t01=0x00ac}
0x0cedc…0cf08               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE "INVALID MESSAGE" «, t00=0x0084, t01=0x00c0}
0x0cf08…0cf32               Head {h00=0x0026, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE TO A5 «, t00=0x0084, t01=0x00ec}
0x0cf32…0cf62               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCI START INPUT WITH SYNC DEF «, t00=0x0084, t01=0x0116}
0x0cf62…0cf6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0146}
0x0cf6c…0cf76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0150}
0x0cf76…0cf9e               Head {h00=0x0024, h01=0x0050, text=»*  WAIT FOR MARK HOLD TO RESYNC.«, t00=0x0084, t01=0x015a}
0x0cf9e…0cfa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0182}
0x0cfa8…0cfbc               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x0084, t01=0x018c}
0x0cfbc…0cfde               Head {h00=0x001e, h01=0x0050, text=» CF A5,READ READ CHARACTER«, t00=0x0085, t01=0x0010}
0x0cfde…0d012               Head {h00=0x0030, h01=0x0050, text=» LD A1,DCSTCU ANY STATUS FROM CONTROL UNIT ?«, t00=0x0085, t01=0x0032}
0x0d012…0d02c               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) BRM130 YES«, t00=0x0085, t01=0x0066}
0x0d02c…0d046               Head {h00=0x0016, h01=0x0050, text=»BRM125 EQU *  DK1 «, t00=0x0085, t01=0x0080}
0x0d046…0d05a               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0085, t01=0x009a}
0x0d05a…0d06e               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0085, t01=0x00ae}
0x0d06e…0d088               Head {h00=0x0016, h01=0x0050, text=» RB(NZ) BRM120 NO «, t00=0x0085, t01=0x00c2}
0x0d088…0d09c               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0085, t01=0x00dc}
0x0d09c…0d0bc               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT«, t00=0x0085, t01=0x00f0}
0x0d0bc…0d0cc               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0085, t01=0x0110}
0x0d0cc…0d0da               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0085, t01=0x0120}
0x0d0da…0d0e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x012e}
0x0d0e4…0d0ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0138}
0x0d0ee…0d124               Head {h00=0x0032, h01=0x0050, text=»*  CHECK IF IT IS A POLL OR A SELECT SEQUENCE «, t00=0x0085, t01=0x0142}
0x0d124…0d12e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0178}
0x0d12e…0d142               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0085, t01=0x0182}
0x0d142…0d156               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0086, t01=0x0008}
0x0d156…0d168               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0086, t01=0x001c}
0x0d168…0d18c               Head {h00=0x0020, h01=0x0050, text=» CF A5,READP READ CHARACTER «, t00=0x0086, t01=0x002e}
0x0d18c…0d19e               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A4«, t00=0x0086, t01=0x0052}
0x0d19e…0d1ca               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM125 INVALID SEQUENCE DK1 «, t00=0x0086, t01=0x0064}
0x0d1ca…0d1d6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x0090}
0x0d1d6…0d1e8               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0086, t01=0x009c}
0x0d1e8…0d20a               Head {h00=0x001e, h01=0x0050, text=» CC A2,1,A7 IS IT A POLL ?«, t00=0x0086, t01=0x00ae}
0x0d20a…0d228               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM210 POLLING «, t00=0x0086, t01=0x00d0}
0x0d228…0d23a               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0086, t01=0x00ee}
0x0d23a…0d25e               Head {h00=0x0020, h01=0x0050, text=» CCR A2,A7 IS IT A SELECT ? «, t00=0x0086, t01=0x0100}
0x0d25e…0d28a               Head {h00=0x0028, h01=0x0050, text=» RB(NE) BRM125 INVALID SEQUENCE DK1 «, t00=0x0086, t01=0x0124}
0x0d28a…0d29e               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0086, t01=0x0150}
0x0d29e…0d2c0               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x0086, t01=0x0164}
0x0d2c0…0d2e0               Head {h00=0x001c, h01=0x0050, text=» RB(NZ) BRM PARITY ERROR«, t00=0x0086, t01=0x0186}
0x0d2e0…0d2f2               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0087, t01=0x0016}
0x0d2f2…0d306               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0087, t01=0x0028}
0x0d306…0d328               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x0087, t01=0x003c}
0x0d328…0d33a               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A4«, t00=0x0087, t01=0x005e}
0x0d33a…0d362               Head {h00=0x0024, h01=0x0050, text=» RB(NE) BRM120 INVALID SEQUENCE «, t00=0x0087, t01=0x0070}
0x0d362…0d36e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x0098}
0x0d36e…0d38c               Head {h00=0x001a, h01=0x0050, text=» CF A5,READP READ ENQ «, t00=0x0087, t01=0x00a4}
0x0d38c…0d3a0               Head {h00=0x0010, h01=0x0050, text=» SUK A2,ENQ «, t00=0x0087, t01=0x00c2}
0x0d3a0…0d3c8               Head {h00=0x0024, h01=0x0050, text=» RB(NE) BRM120 INVALID SEQUENCE «, t00=0x0087, t01=0x00d6}
0x0d3c8…0d3d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00fe}
0x0d3d2…0d3dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0108}
0x0d3dc…0d404               Head {h00=0x0024, h01=0x0050, text=»*  YES SEQUENCE OK - HALT INPUT «, t00=0x0087, t01=0x0112}
0x0d404…0d40e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x013a}
0x0d40e…0d424               Head {h00=0x0012, h01=0x0050, text=» CF A5,CHALTI «, t00=0x0087, t01=0x0144}
0x0d424…0d432               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0087, t01=0x015a}
0x0d432…0d43c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0168}
0x0d43c…0d446               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0172}
0x0d446…0d47a               Head {h00=0x0030, h01=0x0050, text=»*  CHECK IF IT IS A SELECT OR A POLL ADDRESS«, t00=0x0087, t01=0x017c}
0x0d47a…0d484               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0020}
0x0d484…0d496               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0088, t01=0x002a}
0x0d496…0d4ba               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK-COUNTER«, t00=0x0088, t01=0x003c}
0x0d4ba…0d4cc               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x0088, t01=0x0060}
0x0d4cc…0d4de               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x0088, t01=0x0072}
0x0d4de…0d4fe               Head {h00=0x001c, h01=0x0050, text=» RF(Z) SELECT SELECTING «, t00=0x0088, t01=0x0084}
0x0d4fe…0d508               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00a4}
0x0d508…0d512               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00ae}
0x0d512…0d524               Head {h00=0x000e, h01=0x0050, text=»*  POLLING«, t00=0x0088, t01=0x00b8}
0x0d524…0d52e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00ca}
0x0d52e…0d540               Head {h00=0x000e, h01=0x0050, text=» CWK A4,GP«, t00=0x0088, t01=0x00d4}
0x0d540…0d562               Head {h00=0x001e, h01=0x0050, text=» RF(E) GPOLL GENERAL POLL «, t00=0x0088, t01=0x00e6}
0x0d562…0d59c               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x0088, t01=0x0108}
0x0d59c…0d5ac               Head {h00=0x000c, h01=0x0050, text=»    =10 «, t00=0x0088, t01=0x0142}
0x0d5ac…0d5b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0152}
0x0d5b6…0d5c4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0088, t01=0x015c}
0x0d5c4…0d5ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x016a}
0x0d5ce…0d5d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0174}
0x0d5d8…0d602               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x0088, t01=0x017e}
0x0d602…0d60c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0018}
0x0d60c…0d616               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0022}
0x0d616…0d632               Head {h00=0x0018, h01=0x0050, text=» IFF STARVI+SPECP=0 «, t00=0x0089, t01=0x002c}
0x0d632…0d646               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0089, t01=0x0048}
0x0d646…0d66a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) POL100 ACK EXPECTED «, t00=0x0089, t01=0x005c}
0x0d66a…0d698               Head {h00=0x002a, h01=0x0050, text=» LDR A6,A3 LOAD DWT ADDRESS IN A6 =10 «, t00=0x0089, t01=0x0080}
0x0d698…0d6d4               Head {h00=0x0038, h01=0x0050, text=» RF(Z) POL150 REQ. DEV. NOT CONNECTED, SEND EOT =10 «, t00=0x0089, t01=0x00ae}
0x0d6d4…0d6f8               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x0089, t01=0x00ea}
0x0d6f8…0d70e               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x0089, t01=0x010e}
0x0d70e…0d730               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0089, t01=0x0124}
0x0d730…0d742               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x0089, t01=0x0146}
0x0d742…0d768               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 PENDING STATUS «, t00=0x0089, t01=0x0158}
0x0d768…0d774               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x017e}
0x0d774…0d790               Head {h00=0x0018, h01=0x0050, text=» IFF STARVI+SPECP=0 «, t00=0x0089, t01=0x018a}
0x0d790…0d7a8               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x008a, t01=0x0016}
0x0d7a8…0d7c8               Head {h00=0x001c, h01=0x0050, text=» RF(N) POL150 NO REQUEST«, t00=0x008a, t01=0x002e}
0x0d7c8…0d7ea               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x008a, t01=0x004e}
0x0d7ea…0d814               Head {h00=0x0026, h01=0x0050, text=» ANK A1,/FF MASK AWAY OPTION PART «, t00=0x008a, t01=0x0070}
0x0d814…0d826               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x008a, t01=0x009a}
0x0d826…0d84a               Head {h00=0x0020, h01=0x0050, text=» RF(Z) POL170 WRITE REQUEST «, t00=0x008a, t01=0x00ac}
0x0d84a…0d856               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x00d0}
0x0d856…0d872               Head {h00=0x0018, h01=0x0050, text=» RF POL150 SEND EOT «, t00=0x008a, t01=0x00dc}
0x0d872…0d880               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008a, t01=0x00f8}
0x0d880…0d88a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0106}
0x0d88a…0d894               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0110}
0x0d894…0d8bc               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x008a, t01=0x011a}
0x0d8bc…0d8c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0142}
0x0d8c6…0d8d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x014c}
0x0d8d0…0d8e4               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x008a, t01=0x0156}
0x0d8e4…0d8f8               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x008a, t01=0x016a}
0x0d8f8…0d91e               Head {h00=0x0022, h01=0x0050, text=» RF(Z) POL110 ACK NOT EXPECTED«, t00=0x008a, t01=0x017e}
0x0d91e…0d92e               Head {h00=0x000c, h01=0x0050, text=»    =11 «, t00=0x008b, t01=0x0014}
0x0d92e…0d942               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x008b, t01=0x0024}
0x0d942…0d970               Head {h00=0x002a, h01=0x0050, text=» CF A5,HPTIM KILL PROCEDURE TIMER =11 «, t00=0x008b, t01=0x0038}
0x0d970…0d98e               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x008b, t01=0x0066}
0x0d98e…0d9b8               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x008b, t01=0x0084}
0x0d9b8…0d9da               Head {h00=0x001e, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE«, t00=0x008b, t01=0x00ae}
0x0d9da…0d9f0               Head {h00=0x0012, h01=0x0050, text=»POL110 EQU *  «, t00=0x008b, t01=0x00d0}
0x0d9f0…0da16               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x008b, t01=0x00e6}
0x0da16…0da2c               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x008b, t01=0x010c}
0x0da2c…0da42               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x008b, t01=0x0122}
0x0da42…0da6c               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL140 NO STATUS TO BE SENT«, t00=0x008b, t01=0x0138}
0x0da6c…0da92               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTOPE GET DWT ADDRESS«, t00=0x008b, t01=0x0162}
0x0da92…0daa6               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x008b, t01=0x0188}
0x0daa6…0dac6               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x008c, t01=0x000c}
0x0dac6…0daf0               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x008c, t01=0x002c}
0x0daf0…0db14               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x008c, t01=0x0056}
0x0db14…0db20               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x007a}
0x0db20…0db36               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=1 «, t00=0x008c, t01=0x0086}
0x0db36…0db48               Head {h00=0x000e, h01=0x0050, text=» RF POL140«, t00=0x008c, t01=0x009c}
0x0db48…0db54               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x00ae}
0x0db54…0db68               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x008c, t01=0x00ba}
0x0db68…0db78               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x008c, t01=0x00ce}
0x0db78…0db8c               Head {h00=0x0010, h01=0x0050, text=»POL140 EQU *«, t00=0x008c, t01=0x00de}
0x0db8c…0dba0               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x008c, t01=0x00f2}
0x0dba0…0dbc6               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL160 WRITE ON QUEUE «, t00=0x008c, t01=0x0106}
0x0dbc6…0dbda               Head {h00=0x0010, h01=0x0050, text=»POL150 EQU *«, t00=0x008c, t01=0x012c}
0x0dbda…0dbf8               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x008c, t01=0x0140}
0x0dbf8…0dc0a               Head {h00=0x000e, h01=0x0050, text=» RB POL130«, t00=0x008c, t01=0x015e}
0x0dc0a…0dc1e               Head {h00=0x0010, h01=0x0050, text=»POL160 EQU *«, t00=0x008c, t01=0x0170}
0x0dc1e…0dc44               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTOPN GET DWT ADDRESS«, t00=0x008c, t01=0x0184}
0x0dc44…0dc58               Head {h00=0x0010, h01=0x0050, text=»POL170 EQU *«, t00=0x008d, t01=0x001a}
0x0dc58…0dc80               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x008d, t01=0x002e}
0x0dc80…0dc96               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL180«, t00=0x008d, t01=0x0056}
0x0dc96…0dcac               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x008d, t01=0x006c}
0x0dcac…0dcbe               Head {h00=0x000e, h01=0x0050, text=» RB POL150«, t00=0x008d, t01=0x0082}
0x0dcbe…0dcd2               Head {h00=0x0010, h01=0x0050, text=»POL180 EQU *«, t00=0x008d, t01=0x0094}
0x0dcd2…0dcf6               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x008d, t01=0x00a8}
0x0dcf6…0dd14               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x008d, t01=0x00cc}
0x0dd14…0dd2a               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x008d, t01=0x00ea}
0x0dd2a…0dd52               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,MMUBUF MMU WORK BUFFER «, t00=0x008d, t01=0x0100}
0x0dd52…0dd6a               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x008d, t01=0x0128}
0x0dd6a…0dd9c               Head {h00=0x002e, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA FROM USER BUFFER «, t00=0x008d, t01=0x0140}
0x0dd9c…0dda8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0172}
0x0dda8…0ddd2               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x008d, t01=0x017e}
0x0ddd2…0ddf4               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x008e, t01=0x0018}
0x0ddf4…0de08               Head {h00=0x0010, h01=0x0050, text=»POL190 EQU *«, t00=0x008e, t01=0x003a}
0x0de08…0de32               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x008e, t01=0x004e}
0x0de32…0de42               Head {h00=0x000c, h01=0x0050, text=»   . =15«, t00=0x008e, t01=0x0078}
0x0de42…0de64               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x008e, t01=0x0088}
0x0de64…0de88               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x008e, t01=0x00aa}
0x0de88…0de9c               Head {h00=0x0010, h01=0x0050, text=»POL200 EQU *«, t00=0x008e, t01=0x00ce}
0x0de9c…0debe               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x008e, t01=0x00e2}
0x0debe…0dece               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x008e, t01=0x0104}
0x0dece…0def2               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x008e, t01=0x0114}
0x0def2…0df1c               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x008e, t01=0x0138}
0x0df1c…0df40               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x008e, t01=0x0162}
0x0df40…0df52               Head {h00=0x000e, h01=0x0050, text=» RB POL130«, t00=0x008e, t01=0x0186}
0x0df52…0df60               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008f, t01=0x0008}
0x0df60…0df6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0016}
0x0df6a…0df74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0020}
0x0df74…0df98               Head {h00=0x0020, h01=0x0050, text=»*  SELECT HAS BEEN RECEIVED «, t00=0x008f, t01=0x002a}
0x0df98…0dfa2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x004e}
0x0dfa2…0dfb6               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x008f, t01=0x0058}
0x0dfb6…0dfcc               Head {h00=0x0012, h01=0x0050, text=» CF A5,FINTES «, t00=0x008f, t01=0x006c}
0x0dfcc…0dfec               Head {h00=0x001c, h01=0x0050, text=» LDR A6,A3 GET DWT-ADDR «, t00=0x008f, t01=0x0082}
0x0dfec…0e002               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SEL100«, t00=0x008f, t01=0x00a2}
0x0e002…0e018               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x008f, t01=0x00b8}
0x0e018…0e03e               Head {h00=0x0022, h01=0x0050, text=» LD A6,DTEDDT,A7 GET DDT-ADDR «, t00=0x008f, t01=0x00ce}
0x0e03e…0e054               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SEL100«, t00=0x008f, t01=0x00f4}
0x0e054…0e060               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x010a}
0x0e060…0e084               Head {h00=0x0020, h01=0x0050, text=» LDKL A6,DTETAB DTETAB ADRR «, t00=0x008f, t01=0x0116}
0x0e084…0e098               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x008f, t01=0x013a}
0x0e098…0e0ac               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x008f, t01=0x014e}
0x0e0ac…0e0d6               Head {h00=0x0026, h01=0x0050, text=» RB(NZ) POL100 ERROR. ACK EXPECTED«, t00=0x008f, t01=0x0162}
0x0e0d6…0e0ec               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x008f, t01=0x018c}
0x0e0ec…0e10e               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0090, t01=0x0012}
0x0e10e…0e120               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0090, t01=0x0034}
0x0e120…0e152               Head {h00=0x002e, h01=0x0050, text=» ANKL A1,PENDST STAT. MESSAGE PENDING? DK2«, t00=0x0090, t01=0x0046}
0x0e152…0e17a               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL120 NO PENDING STATUS «, t00=0x0090, t01=0x0078}
0x0e17a…0e198               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x0090, t01=0x00a0}
0x0e198…0e1a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0090, t01=0x00be}
0x0e1a4…0e1ba               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=1 «, t00=0x0090, t01=0x00ca}
0x0e1ba…0e1cc               Head {h00=0x000e, h01=0x0050, text=» RF SEL120«, t00=0x0090, t01=0x00e0}
0x0e1cc…0e1d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0090, t01=0x00f2}
0x0e1d8…0e1ec               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x0090, t01=0x00fe}
0x0e1ec…0e1fc               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0090, t01=0x0112}
0x0e1fc…0e210               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x0090, t01=0x0122}
0x0e210…0e21e               Head {h00=0x000a, h01=0x0050, text=»    =2«, t00=0x0090, t01=0x0136}
0x0e21e…0e238               Head {h00=0x0016, h01=0x0050, text=» IFT STARVI=1  =2 «, t00=0x0090, t01=0x0144}
0x0e238…0e260               Head {h00=0x0024, h01=0x0050, text=» ANK A3,/A WACK SENT OR DB ? =2 «, t00=0x0090, t01=0x015e}
0x0e260…0e27e               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) SEL140 YES =2 «, t00=0x0090, t01=0x0186}
0x0e27e…0e2a2               Head {h00=0x0020, h01=0x0050, text=» LD A1,DWTST,A6 CHECK IR DK2«, t00=0x0091, t01=0x0014}
0x0e2a2…0e2ba               Head {h00=0x0014, h01=0x0050, text=» ANK A1,1 . DK2 «, t00=0x0091, t01=0x0038}
0x0e2ba…0e2dc               Head {h00=0x001e, h01=0x0050, text=» RF(Z) SEL130 NO, OPERABLE«, t00=0x0091, t01=0x0050}
0x0e2dc…0e300               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRNAK INOPERABLE DK2 «, t00=0x0091, t01=0x0072}
0x0e300…0e318               Head {h00=0x0014, h01=0x0050, text=» RB SEL110 . DK2«, t00=0x0091, t01=0x0096}
0x0e318…0e32e               Head {h00=0x0012, h01=0x0050, text=»SEL130 EQU *  «, t00=0x0091, t01=0x00ae}
0x0e32e…0e33a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x00c4}
0x0e33a…0e348               Head {h00=0x000a, h01=0x0050, text=»    =2«, t00=0x0091, t01=0x00d0}
0x0e348…0e35e               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0091, t01=0x00de}
0x0e35e…0e386               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL150 BUFFER AVAILABLE «, t00=0x0091, t01=0x00f4}
0x0e386…0e39c               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x0091, t01=0x011c}
0x0e39c…0e3c8               Head {h00=0x0028, h01=0x0050, text=» LDK A1,CSSRBY BUFFER NOT AVAILABLE «, t00=0x0091, t01=0x0132}
0x0e3c8…0e3f0               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x0091, t01=0x015e}
0x0e3f0…0e3fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x0186}
0x0e3fc…0e410 (146, 0, 400) Head {h00=0x0010, h01=0x0050, text=»SEL140 EQU *«, t00=0x0092, t01=0x0004}
0x0e410…0e41e               Head {h00=0x000a, h01=0x0050, text=»    =2«, t00=0x0092, t01=0x0018}
0x0e41e…0e438               Head {h00=0x0016, h01=0x0050, text=» IFF NOWACK=1  =2 «, t00=0x0092, t01=0x0026}
0x0e438…0e458               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x0092, t01=0x0040}
0x0e458…0e464               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0092, t01=0x0060}
0x0e464…0e476               Head {h00=0x000e, h01=0x0050, text=» RB SEL110«, t00=0x0092, t01=0x006c}
0x0e476…0e48a               Head {h00=0x0010, h01=0x0050, text=»SEL150 EQU *«, t00=0x0092, t01=0x007e}
0x0e48a…0e4ba               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0092, t01=0x0092}
0x0e4ba…0e4cc               Head {h00=0x000e, h01=0x0050, text=» ADK A1,6 «, t00=0x0092, t01=0x00c2}
0x0e4cc…0e4e0               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBLST«, t00=0x0092, t01=0x00d4}
0x0e4e0…0e500               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x0092, t01=0x00e8}
0x0e500…0e512               Head {h00=0x000e, h01=0x0050, text=» RB SEL110«, t00=0x0092, t01=0x0108}
0x0e512…0e520               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0092, t01=0x011a}
0x0e520…0e52a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0128}
0x0e52a…0e534               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0132}
0x0e534…0e554               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0092, t01=0x013c}
0x0e554…0e55e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x015c}
0x0e55e…0e568               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0166}
0x0e568…0e57c               Head {h00=0x0010, h01=0x0050, text=»EOT100 EQU *«, t00=0x0092, t01=0x0170}
0x0e57c…0e5a6               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0092, t01=0x0184}
0x0e5a6…0e5ba               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0093, t01=0x001e}
0x0e5ba…0e5dc               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0093, t01=0x0032}
0x0e5dc…0e5e8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x0054}
0x0e5e8…0e5fc               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0093, t01=0x0060}
0x0e5fc…0e626               Head {h00=0x0026, h01=0x0050, text=» RF(Z) EOT120 ACK IS NOT EXPECTED «, t00=0x0093, t01=0x0074}
0x0e626…0e64c               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0093, t01=0x009e}
0x0e64c…0e670               Head {h00=0x0020, h01=0x0050, text=» RF(Z) EOT110 NO ONE WRITING«, t00=0x0093, t01=0x00c4}
0x0e670…0e68a               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0093, t01=0x00e8}
0x0e68a…0e6b6               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0093, t01=0x0102}
0x0e6b6…0e6ca               Head {h00=0x0010, h01=0x0050, text=»EOT110 EQU *«, t00=0x0093, t01=0x012e}
0x0e6ca…0e6f0               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0093, t01=0x0142}
0x0e6f0…0e704               Head {h00=0x0010, h01=0x0050, text=»EOT120 EQU *«, t00=0x0093, t01=0x0168}
0x0e704…0e726               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0093, t01=0x017c}
0x0e726…0e736               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0094, t01=0x000e}
0x0e736…0e744               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0094, t01=0x001e}
0x0e744…0e74e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x002c}
0x0e74e…0e758               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0036}
0x0e758…0e778               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0094, t01=0x0040}
0x0e778…0e782               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0060}
0x0e782…0e78c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x006a}
0x0e78c…0e7a0               Head {h00=0x0010, h01=0x0050, text=»STX100 EQU *«, t00=0x0094, t01=0x0074}
0x0e7a0…0e7b4               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0094, t01=0x0088}
0x0e7b4…0e7ca               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x0094, t01=0x009c}
0x0e7ca…0e7ee               Head {h00=0x0020, h01=0x0050, text=» ABL BRM120 INVALID SEQENCE «, t00=0x0094, t01=0x00b2}
0x0e7ee…0e802               Head {h00=0x0010, h01=0x0050, text=»STX110 EQU *«, t00=0x0094, t01=0x00d6}
0x0e802…0e80e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x00ea}
0x0e80e…0e822               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0094, t01=0x00f6}
0x0e822…0e844               Head {h00=0x001e, h01=0x0050, text=» RF(Z) STX150 NOT SELECTED«, t00=0x0094, t01=0x010a}
0x0e844…0e85a               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0094, t01=0x012c}
0x0e85a…0e870               Head {h00=0x0012, h01=0x0050, text=» IFF STTSTS=1 «, t00=0x0094, t01=0x0142}
0x0e870…0e89a               Head {h00=0x0026, h01=0x0050, text=» ABL(Z) BRM120 NO BUFFER AVAILABLE«, t00=0x0094, t01=0x0158}
0x0e89a…0e8a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x0182}
0x0e8a6…0e8bc               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x0094, t01=0x018e}
0x0e8bc…0e8d2               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) STX120«, t00=0x0095, t01=0x0014}
0x0e8d2…0e8dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x002a}
0x0e8dc…0e8fa               Head {h00=0x001a, h01=0x0050, text=»* NO BUFFER AVAILABLE «, t00=0x0095, t01=0x0034}
0x0e8fa…0e904               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0052}
0x0e904…0e91a               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSRBY«, t00=0x0095, t01=0x005c}
0x0e91a…0e942               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x0095, t01=0x0072}
0x0e942…0e956               Head {h00=0x0010, h01=0x0050, text=» ABL BRM120 «, t00=0x0095, t01=0x009a}
0x0e956…0e962               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x00ae}
0x0e962…0e976               Head {h00=0x0010, h01=0x0050, text=»STX120 EQU *«, t00=0x0095, t01=0x00ba}
0x0e976…0e998               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0095, t01=0x00ce}
0x0e998…0e9ae               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x0095, t01=0x00f0}
0x0e9ae…0e9b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0106}
0x0e9b8…0e9c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0110}
0x0e9c2…0e9e4               Head {h00=0x001e, h01=0x0050, text=»*  COUNT MESSAGES RECEIVED«, t00=0x0095, t01=0x011a}
0x0e9e4…0e9ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x013c}
0x0e9ee…0ea04               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSRBL«, t00=0x0095, t01=0x0146}
0x0ea04…0ea1a               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x0095, t01=0x015c}
0x0ea1a…0ea26               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x0172}
0x0ea26…0ea38               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0095, t01=0x017e}
0x0ea38…0ea5a               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) STX170 MESSAGE OK «, t00=0x0095, t01=0x0190}
0x0ea5a…0ea6e               Head {h00=0x0010, h01=0x0050, text=»STX130 EQU *«, t00=0x0096, t01=0x0022}
0x0ea6e…0ea9a               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0096, t01=0x0036}
0x0ea9a…0eaae               Head {h00=0x0010, h01=0x0050, text=»STX140 EQU *«, t00=0x0096, t01=0x0062}
0x0eaae…0eacc               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0096, t01=0x0076}
0x0eacc…0eadc               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0096, t01=0x0094}
0x0eadc…0eaf0               Head {h00=0x0010, h01=0x0050, text=»STX150 EQU *«, t00=0x0096, t01=0x00a4}
0x0eaf0…0eb04               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0096, t01=0x00b8}
0x0eb04…0eb18               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0096, t01=0x00cc}
0x0eb18…0eb42               Head {h00=0x0026, h01=0x0050, text=» RF(Z) STX160 ACK IS NOT EXPECTED «, t00=0x0096, t01=0x00e0}
0x0eb42…0eb58               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0096, t01=0x010a}
0x0eb58…0eb82               Head {h00=0x0026, h01=0x0050, text=» RF(Z) STX160 NO BUFFER AVAILABLE «, t00=0x0096, t01=0x0120}
0x0eb82…0eba8               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0096, t01=0x014a}
0x0eba8…0ebdc               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM120 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0096, t01=0x0170}
0x0ebdc…0ebf8               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0097, t01=0x0014}
0x0ebf8…0ec28               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0097, t01=0x0030}
0x0ec28…0ec42               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0097, t01=0x0060}
0x0ec42…0ec6e               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0097, t01=0x007a}
0x0ec6e…0ec8c               Head {h00=0x001a, h01=0x0050, text=» CM CACK PRESET ACK-1 «, t00=0x0097, t01=0x00a6}
0x0ec8c…0ecb0               Head {h00=0x0020, h01=0x0050, text=» RB STX120 READ THE MESSAGE «, t00=0x0097, t01=0x00c4}
0x0ecb0…0ecbc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0097, t01=0x00e8}
0x0ecbc…0ece8               Head {h00=0x0028, h01=0x0050, text=»STX160 CF A5,READ READ ONE CHARACTER«, t00=0x0097, t01=0x00f4}
0x0ece8…0ed0a               Head {h00=0x001e, h01=0x0050, text=» CWK A2,ENQPAR IS IT ENQ ?«, t00=0x0097, t01=0x0120}
0x0ed0a…0ed36               Head {h00=0x0028, h01=0x0050, text=» RB(Z) STX140 FORWARD ABORT SEQUENCE«, t00=0x0097, t01=0x0142}
0x0ed36…0ed48               Head {h00=0x000e, h01=0x0050, text=» RB EOT120«, t00=0x0097, t01=0x016e}
0x0ed48…0ed5c               Head {h00=0x0010, h01=0x0050, text=»STX170 EQU *«, t00=0x0097, t01=0x0180}
0x0ed5c…0ed80 (152, 0, 400) Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0098, t01=0x0004}
0x0ed80…0eda8               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0098, t01=0x0028}
0x0eda8…0edba               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0098, t01=0x0050}
0x0edba…0edce               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0098, t01=0x0062}
0x0edce…0edf4               Head {h00=0x0022, h01=0x0050, text=» RF(NE) STX180 NOT FIRST BLOCK«, t00=0x0098, t01=0x0076}
0x0edf4…0ee08               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0098, t01=0x009c}
0x0ee08…0ee1c               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x0098, t01=0x00b0}
0x0ee1c…0ee2e               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x0098, t01=0x00c4}
0x0ee2e…0ee52               Head {h00=0x0020, h01=0x0050, text=» RB(NE) STX130 ESC NOT FOUND«, t00=0x0098, t01=0x00d6}
0x0ee52…0ee76               Head {h00=0x0020, h01=0x0050, text=» LC A1,1,A4 GET COMMAND CODE«, t00=0x0098, t01=0x00fa}
0x0ee76…0ee8c               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x0098, t01=0x011e}
0x0ee8c…0eeb8               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x0098, t01=0x0134}
0x0eeb8…0eed6               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x0098, t01=0x0160}
0x0eed6…0ef00               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x0098, t01=0x017e}
0x0ef00…0ef0c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0099, t01=0x0018}
0x0ef0c…0ef20               Head {h00=0x0010, h01=0x0050, text=»STX180 EQU *«, t00=0x0099, t01=0x0024}
0x0ef20…0ef32               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0099, t01=0x0038}
0x0ef32…0ef50               Head {h00=0x001a, h01=0x0050, text=» RF(Z) STX280 SEND ACK«, t00=0x0099, t01=0x004a}
0x0ef50…0ef74               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x0099, t01=0x0068}
0x0ef74…0ef8a               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0099, t01=0x008c}
0x0ef8a…0efa0               Head {h00=0x0012, h01=0x0050, text=» CF A15,MESDWT«, t00=0x0099, t01=0x00a2}
0x0efa0…0efac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0099, t01=0x00b8}
0x0efac…0efce               Head {h00=0x001e, h01=0x0050, text=» CWR A7,A6 IS IT DTETAB ? «, t00=0x0099, t01=0x00c4}
0x0efce…0efec               Head {h00=0x001a, h01=0x0050, text=» RF(E) STX280 SEND ACK«, t00=0x0099, t01=0x00e6}
0x0efec…0f00a               Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTSTA,A6 . =14«, t00=0x0099, t01=0x0104}
0x0f00a…0f03a               Head {h00=0x002c, h01=0x0050, text=» RF(Z) STX280 TERMINAL DISCONNECTED =14 «, t00=0x0099, t01=0x0122}
0x0f03a…0f04a               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0099, t01=0x0152}
0x0f04a…0f078               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0099, t01=0x0162}
0x0f078…0f08a               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0099, t01=0x0190}
0x0f08a…0f09e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x009a, t01=0x0012}
0x0f09e…0f0be               Head {h00=0x001c, h01=0x0050, text=» LDR* A2,A6 GET ADDRESS «, t00=0x009a, t01=0x0026}
0x0f0be…0f0ee               Head {h00=0x002c, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE IT TO EBCDIC«, t00=0x009a, t01=0x0046}
0x0f0ee…0f116               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF IS THERE A BUFFER «, t00=0x009a, t01=0x0076}
0x0f116…0f12e               Head {h00=0x0014, h01=0x0050, text=» RF(Z) STX200 NO«, t00=0x009a, t01=0x009e}
0x0f12e…0f152               Head {h00=0x0020, h01=0x0050, text=» ST A2,+4,A1 STORE THE ADDR «, t00=0x009a, t01=0x00b6}
0x0f152…0f166               Head {h00=0x0010, h01=0x0050, text=»STX200 EQU *«, t00=0x009a, t01=0x00da}
0x0f166…0f172               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x00ee}
0x0f172…0f198               Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY REQUEST ? «, t00=0x009a, t01=0x00fa}
0x0f198…0f1b0               Head {h00=0x0014, h01=0x0050, text=» RF(N) STX220 NO«, t00=0x009a, t01=0x0120}
0x0f1b0…0f1d2               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x009a, t01=0x0138}
0x0f1d2…0f1e8               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x009a, t01=0x015a}
0x0f1e8…0f212               Head {h00=0x0026, h01=0x0050, text=» RF(Z) STX210 ANY MESSAGE ORDER ? «, t00=0x009a, t01=0x0170}
0x0f212…0f21e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x000a}
0x0f21e…0f242               Head {h00=0x0020, h01=0x0050, text=» CWK A2,RECEIVE A RECEIVE ? «, t00=0x009b, t01=0x0016}
0x0f242…0f25c               Head {h00=0x0016, h01=0x0050, text=» RF(NE) STX220 NO «, t00=0x009b, t01=0x003a}
0x0f25c…0f270               Head {h00=0x0010, h01=0x0050, text=»STX210 EQU *«, t00=0x009b, t01=0x0054}
0x0f270…0f280               Head {h00=0x000c, h01=0x0050, text=»    =12 «, t00=0x009b, t01=0x0068}
0x0f280…0f2a8               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x009b, t01=0x0078}
0x0f2a8…0f2c8               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x009b, t01=0x00a0}
0x0f2c8…0f2f6               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x009b, t01=0x00c0}
0x0f2f6…0f328               Head {h00=0x002e, h01=0x0050, text=» LD A1,DWTLAD,A6 SYMBOLIC DTE ADDRESS =12 «, t00=0x009b, t01=0x00ee}
0x0f328…0f354               Head {h00=0x0028, h01=0x0050, text=» LD A2,-2,A4 NETWORK SUB-ADDRESS =12«, t00=0x009b, t01=0x0120}
0x0f354…0f388               Head {h00=0x0030, h01=0x0050, text=» CF A15,GETSSA GET SYMBOLIC SUB ADDRESS =12 «, t00=0x009b, t01=0x014c}
0x0f388…0f3b8               Head {h00=0x002c, h01=0x0050, text=» ST A1,ECBCW2,A8 AND SAVE IT IN ECB =12 «, t00=0x009b, t01=0x0180}
0x0f3b8…0f3e0               Head {h00=0x0024, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE =12 «, t00=0x009c, t01=0x0020}
0x0f3e0…0f40a               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x009c, t01=0x0048}
0x0f40a…0f424               Head {h00=0x0016, h01=0x0050, text=» IFT REMTIM=1  =9 «, t00=0x009c, t01=0x0072}
0x0f424…0f452               Head {h00=0x002a, h01=0x0050, text=» ST A2,ECBCW1,A8 STORE REMAINING TIME «, t00=0x009c, t01=0x008c}
0x0f452…0f464               Head {h00=0x000e, h01=0x0050, text=» XIF   =9 «, t00=0x009c, t01=0x00ba}
0x0f464…0f478               Head {h00=0x0010, h01=0x0050, text=»STX220 EQU *«, t00=0x009c, t01=0x00cc}
0x0f478…0f48e               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x009c, t01=0x00e0}
0x0f48e…0f4ae               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x009c, t01=0x00f6}
0x0f4ae…0f4c2               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x009c, t01=0x0116}
0x0f4c2…0f4dc               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x009c, t01=0x012a}
0x0f4dc…0f4ee               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x009c, t01=0x0144}
0x0f4ee…0f504               Head {h00=0x0012, h01=0x0050, text=» RF(Z) STX230 «, t00=0x009c, t01=0x0156}
0x0f504…0f51c               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x009c, t01=0x016c}
0x0f51c…0f52e               Head {h00=0x000e, h01=0x0050, text=» ORK A2,/A«, t00=0x009c, t01=0x0184}
0x0f52e…0f546               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x009d, t01=0x0008}
0x0f546…0f55a               Head {h00=0x0010, h01=0x0050, text=»STX230 EQU *«, t00=0x009d, t01=0x0020}
0x0f55a…0f566               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009d, t01=0x0034}
0x0f566…0f58c               Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY REQUEST ? «, t00=0x009d, t01=0x0040}
0x0f58c…0f5a6               Head {h00=0x0016, h01=0x0050, text=» RF(NN) STX240 YES«, t00=0x009d, t01=0x0066}
0x0f5a6…0f5c8               Head {h00=0x001e, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER «, t00=0x009d, t01=0x0080}
0x0f5c8…0f5da               Head {h00=0x000e, h01=0x0050, text=» RF STX270«, t00=0x009d, t01=0x00a2}
0x0f5da…0f5ee               Head {h00=0x0010, h01=0x0050, text=»STX240 EQU *«, t00=0x009d, t01=0x00b4}
0x0f5ee…0f610               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x009d, t01=0x00c8}
0x0f610…0f638               Head {h00=0x0024, h01=0x0050, text=» CWK A2,RECEIVE RECEIVE ORDER ? «, t00=0x009d, t01=0x00ea}
0x0f638…0f652               Head {h00=0x0016, h01=0x0050, text=» RF(NE) STX260 NO «, t00=0x009d, t01=0x0112}
0x0f652…0f662               Head {h00=0x000c, h01=0x0050, text=»    =12 «, t00=0x009d, t01=0x012c}
0x0f662…0f686               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x009d, t01=0x013c}
0x0f686…0f6b4               Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTIPC,A6 ANY QUEUED MESSAGES ?«, t00=0x009d, t01=0x0160}
0x0f6b4…0f6cc               Head {h00=0x0014, h01=0x0050, text=» RF(Z) STX250 NO«, t00=0x009d, t01=0x018e}
0x0f6cc…0f6e8               Head {h00=0x0018, h01=0x0050, text=» ORKL A1,R:DATA YES «, t00=0x009e, t01=0x0016}
0x0f6e8…0f6fc               Head {h00=0x0010, h01=0x0050, text=»STX250 EQU *«, t00=0x009e, t01=0x0032}
0x0f6fc…0f726               Head {h00=0x0026, h01=0x0050, text=» CF A15,DC:MIN MOVE TO USER BUFFER«, t00=0x009e, t01=0x0046}
0x0f726…0f738               Head {h00=0x000e, h01=0x0050, text=» RF STX270«, t00=0x009e, t01=0x0070}
0x0f738…0f74c               Head {h00=0x0010, h01=0x0050, text=»STX260 EQU *«, t00=0x009e, t01=0x0082}
0x0f74c…0f76e               Head {h00=0x001e, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER «, t00=0x009e, t01=0x0096}
0x0f76e…0f784               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x009e, t01=0x00b8}
0x0f784…0f7a6               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x009e, t01=0x00ce}
0x0f7a6…0f7d2               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) STX270 NOT ANY MESSAGE ORDER«, t00=0x009e, t01=0x00f0}
0x0f7d2…0f7fa               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x009e, t01=0x011c}
0x0f7fa…0f806               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009e, t01=0x0144}
0x0f806…0f81a               Head {h00=0x0010, h01=0x0050, text=»STX270 EQU *«, t00=0x009e, t01=0x0150}
0x0f81a…0f830               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x009e, t01=0x0164}
0x0f830…0f852               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x009e, t01=0x017a}
0x0f852…0f86c               Head {h00=0x0016, h01=0x0050, text=» ANK A1,8 MASK A1 «, t00=0x009f, t01=0x000c}
0x0f86c…0f882               Head {h00=0x0012, h01=0x0050, text=» RF(Z) STX280 «, t00=0x009f, t01=0x0026}
0x0f882…0f8a0               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRWACK SEN WACK«, t00=0x009f, t01=0x003c}
0x0f8a0…0f8b2               Head {h00=0x000e, h01=0x0050, text=» RF STX290«, t00=0x009f, t01=0x005a}
0x0f8b2…0f8be               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x006c}
0x0f8be…0f8d2               Head {h00=0x0010, h01=0x0050, text=»STX280 EQU *«, t00=0x009f, t01=0x0078}
0x0f8d2…0f8f0               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRACK SEND ACK «, t00=0x009f, t01=0x008c}
0x0f8f0…0f904               Head {h00=0x0010, h01=0x0050, text=»STX290 EQU *«, t00=0x009f, t01=0x00aa}
0x0f904…0f914               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x009f, t01=0x00be}
0x0f914…0f922               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009f, t01=0x00ce}
0x0f922…0f92c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00dc}
0x0f92c…0f936               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00e6}
0x0f936…0f966               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x009f, t01=0x00f0}
0x0f966…0f970               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0120}
0x0f970…0f97a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x012a}
0x0f97a…0f98e               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x009f, t01=0x0134}
0x0f98e…0f9b6               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x009f, t01=0x0148}
0x0f9b6…0f9ca               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x009f, t01=0x0170}
0x0f9ca…0f9f0               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x009f, t01=0x0184}
0x0f9f0…0fa28               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x00a0, t01=0x001a}
0x0fa28…0fa50               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x00a0, t01=0x0052}
0x0fa50…0fa78               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x00a0, t01=0x007a}
0x0fa78…0fa9e               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x00a0, t01=0x00a2}
0x0fa9e…0fac4               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x00a0, t01=0x00c8}
0x0fac4…0fad6               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x00a0, t01=0x00ee}
0x0fad6…0fae8               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x00a0, t01=0x0100}
0x0fae8…0fb12               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x00a0, t01=0x0112}
0x0fb12…0fb26               Head {h00=0x0010, h01=0x0050, text=» ABL POL190 «, t00=0x00a0, t01=0x013c}
0x0fb26…0fb32               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a0, t01=0x0150}
0x0fb32…0fb40               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a0, t01=0x015c}
0x0fb40…0fb4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x016a}
0x0fb4a…0fb54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0174}
0x0fb54…0fb74               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x00a0, t01=0x017e}
0x0fb74…0fb7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x000e}
0x0fb7e…0fb88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0018}
0x0fb88…0fb9c               Head {h00=0x0010, h01=0x0050, text=»ENQ100 EQU *«, t00=0x00a1, t01=0x0022}
0x0fb9c…0fbc6               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x00a1, t01=0x0036}
0x0fbc6…0fbda               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x00a1, t01=0x0060}
0x0fbda…0fc0a               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) NAK110 RETRANSMISSION OF MESSAGE«, t00=0x00a1, t01=0x0074}
0x0fc0a…0fc1e               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x00a1, t01=0x00a4}
0x0fc1e…0fc44               Head {h00=0x0022, h01=0x0050, text=» RF(Z) ENQ110 IN CONTROL STATE«, t00=0x00a1, t01=0x00b8}
0x0fc44…0fc76               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x00a1, t01=0x00de}
0x0fc76…0fc8a               Head {h00=0x0010, h01=0x0050, text=»ENQ110 EQU *«, t00=0x00a1, t01=0x0110}
0x0fc8a…0fc9a               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x00a1, t01=0x0124}
0x0fc9a…0fca8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a1, t01=0x0134}
0x0fca8…0fcb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0142}
0x0fcb2…0fcbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x014c}
0x0fcbc…0fcdc               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x00a1, t01=0x0156}
0x0fcdc…0fce6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0176}
0x0fce6…0fcf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0180}
0x0fcf0…0fd04               Head {h00=0x0010, h01=0x0050, text=»NAK100 EQU *«, t00=0x00a1, t01=0x018a}
0x0fd04…0fd2e               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x00a2, t01=0x000e}
0x0fd2e…0fd42               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x00a2, t01=0x0038}
0x0fd42…0fd66               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) NAK110 ACK EXPECTED «, t00=0x00a2, t01=0x004c}
0x0fd66…0fd7a               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x00a2, t01=0x0070}
0x0fd7a…0fda0               Head {h00=0x0022, h01=0x0050, text=» RB(Z) ENQ110 IN CONTROL STATE«, t00=0x00a2, t01=0x0084}
0x0fda0…0fdb2               Head {h00=0x000e, h01=0x0050, text=» RF DLE160«, t00=0x00a2, t01=0x00aa}
0x0fdb2…0fdc6               Head {h00=0x0010, h01=0x0050, text=»NAK110 EQU *«, t00=0x00a2, t01=0x00bc}
0x0fdc6…0fdec               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x00a2, t01=0x00d0}
0x0fdec…0fe02               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00a2, t01=0x00f6}
0x0fe02…0fe16               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x00a2, t01=0x010c}
0x0fe16…0fe4a               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL120 STATUS HAS BEEN TRANSMITTED «, t00=0x00a2, t01=0x0120}
0x0fe4a…0fe56               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a2, t01=0x0154}
0x0fe56…0fe8a               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x00a2, t01=0x0160}
0x0fe8a…0feb4 (163, 0, 398) Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x00a3, t01=0x0004}
0x0feb4…0fec8               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x00a3, t01=0x002e}
0x0fec8…0fede               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00a3, t01=0x0042}
0x0fede…0fee8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0058}
0x0fee8…0fef2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0062}
0x0fef2…0ff1a               Head {h00=0x0024, h01=0x0050, text=»*  COUNT MESSAGES RETRANSMITTED «, t00=0x00a3, t01=0x006c}
0x0ff1a…0ff24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0094}
0x0ff24…0ff3a               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSTRT«, t00=0x00a3, t01=0x009e}
0x0ff3a…0ff50               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x00a3, t01=0x00b4}
0x0ff50…0ff5c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a3, t01=0x00ca}
0x0ff5c…0ff70               Head {h00=0x0010, h01=0x0050, text=» ABL POL200 «, t00=0x00a3, t01=0x00d6}
0x0ff70…0ff7e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a3, t01=0x00ea}
0x0ff7e…0ff88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00f8}
0x0ff88…0ff92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0102}
0x0ff92…0ffb2               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x00a3, t01=0x010c}
0x0ffb2…0ffbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x012c}
0x0ffbc…0ffc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0136}
0x0ffc6…0ffda               Head {h00=0x0010, h01=0x0050, text=»DLE100 EQU *«, t00=0x00a3, t01=0x0140}
0x0ffda…10004               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x00a3, t01=0x0154}
0x10004…10018               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x00a3, t01=0x017e}
0x10018…1002e (164, 0, 400) Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DLE110«, t00=0x00a4, t01=0x0004}
0x1002e…10044               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00a4, t01=0x001a}
0x10044…10058               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x00a4, t01=0x0030}
0x10058…1006c               Head {h00=0x0010, h01=0x0050, text=» CWK A2,STX «, t00=0x00a4, t01=0x0044}
0x1006c…1009a               Head {h00=0x002a, h01=0x0050, text=» ABL(Z) STX110 YES - TRANSPARENT TEXT «, t00=0x00a4, t01=0x0058}
0x1009a…100a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a4, t01=0x0086}
0x100a6…100b8               Head {h00=0x000e, h01=0x0050, text=» RB ENQ110«, t00=0x00a4, t01=0x0092}
0x100b8…100cc               Head {h00=0x0010, h01=0x0050, text=»DLE110 EQU *«, t00=0x00a4, t01=0x00a4}
0x100cc…100f6               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x00a4, t01=0x00b8}
0x100f6…1011a               Head {h00=0x0020, h01=0x0050, text=» CWK A2,ACKPAR IS IT ACK 0 ?«, t00=0x00a4, t01=0x00e2}
0x1011a…10130               Head {h00=0x0012, h01=0x0050, text=» RF(NE) DLE130«, t00=0x00a4, t01=0x0106}
0x10130…1013a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x011c}
0x1013a…10154               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x00a4, t01=0x0126}
0x10154…1015e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x0140}
0x1015e…10180               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x00a4, t01=0x014a}
0x10180…101a4               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DLE140 ACK,0 EXPECTED«, t00=0x00a4, t01=0x016c}
0x101a4…101b8               Head {h00=0x0010, h01=0x0050, text=»DLE120 EQU *«, t00=0x00a4, t01=0x0190}
0x101b8…101d6               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x00a5, t01=0x0014}
0x101d6…10200               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x00a5, t01=0x0032}
0x10200…10212               Head {h00=0x000e, h01=0x0050, text=» RB ENQ110«, t00=0x00a5, t01=0x005c}
0x10212…10226               Head {h00=0x0010, h01=0x0050, text=»DLE130 EQU *«, t00=0x00a5, t01=0x006e}
0x10226…1023a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x00a5, t01=0x0082}
0x1023a…10250               Head {h00=0x0012, h01=0x0050, text=» RF(NE) DLE180«, t00=0x00a5, t01=0x0096}
0x10250…1025a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x00ac}
0x1025a…10274               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x00a5, t01=0x00b6}
0x10274…1027e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x00d0}
0x1027e…102a2               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x00a5, t01=0x00da}
0x102a2…102ca               Head {h00=0x0024, h01=0x0050, text=» RB(Z) DLE120 ACK,1 NOT EXPECTED«, t00=0x00a5, t01=0x00fe}
0x102ca…102de               Head {h00=0x0010, h01=0x0050, text=»DLE140 EQU *«, t00=0x00a5, t01=0x0126}
0x102de…102f2               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x00a5, t01=0x013a}
0x102f2…10314               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DLE170 ETX NOT SENT«, t00=0x00a5, t01=0x014e}
0x10314…10322               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a5, t01=0x0170}
0x10322…1032c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x017e}
0x1032c…1035c               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x00a5, t01=0x0188}
0x1035c…10366               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0028}
0x10366…10380               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x00a6, t01=0x0032}
0x10380…10394               Head {h00=0x0010, h01=0x0050, text=»DLE150 EQU *«, t00=0x00a6, t01=0x004c}
0x10394…103aa               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00a6, t01=0x0060}
0x103aa…103be               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x00a6, t01=0x0076}
0x103be…103f0               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) DLE200 STATUS HAS BEEN TRANSMITTED«, t00=0x00a6, t01=0x008a}
0x103f0…103fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a6, t01=0x00bc}
0x103fc…10428               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x00a6, t01=0x00c8}
0x10428…1043c               Head {h00=0x0010, h01=0x0050, text=»DLE160 EQU *«, t00=0x00a6, t01=0x00f4}
0x1043c…1045a               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x00a6, t01=0x0108}
0x1045a…1046e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00a6, t01=0x0126}
0x1046e…10490               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x00a6, t01=0x013a}
0x10490…1049c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a6, t01=0x015c}
0x1049c…104ae               Head {h00=0x000e, h01=0x0050, text=» RB ENQ110«, t00=0x00a6, t01=0x0168}
0x104ae…104c2               Head {h00=0x0010, h01=0x0050, text=»DLE170 EQU *«, t00=0x00a6, t01=0x017a}
0x104c2…104d4               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x00a6, t01=0x018e}
0x104d4…104fe               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x00a7, t01=0x0010}
0x104fe…10512               Head {h00=0x0010, h01=0x0050, text=» ABL POL200 «, t00=0x00a7, t01=0x003a}
0x10512…10526               Head {h00=0x0010, h01=0x0050, text=»DLE180 EQU *«, t00=0x00a7, t01=0x004e}
0x10526…10548               Head {h00=0x001e, h01=0x0050, text=» CWK A2,RVIPAR IS IT RVI ?«, t00=0x00a7, t01=0x0062}
0x10548…10574               Head {h00=0x0028, h01=0x0050, text=» RB(NE) DLE120 INVALID DLE SEQUENCE «, t00=0x00a7, t01=0x0084}
0x10574…1059a               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x00a7, t01=0x00b0}
0x1059a…105ae               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x00a7, t01=0x00d6}
0x105ae…105d6               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DLE190 ETX HAS BEEN SENT«, t00=0x00a7, t01=0x00ea}
0x105d6…105f0               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x00a7, t01=0x0112}
0x105f0…10602               Head {h00=0x000e, h01=0x0050, text=» RB DLE150«, t00=0x00a7, t01=0x012c}
0x10602…10616               Head {h00=0x0010, h01=0x0050, text=»DLE190 EQU *«, t00=0x00a7, t01=0x013e}
0x10616…10630               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x00a7, t01=0x0152}
0x10630…10642               Head {h00=0x000e, h01=0x0050, text=» RB DLE150«, t00=0x00a7, t01=0x016c}
0x10642…10650               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a7, t01=0x017e}
0x10650…10666               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00a7, t01=0x018c}
0x10666…10670               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0012}
0x10670…1067a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x001c}
0x1067a…106a0               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x00a8, t01=0x0026}
0x106a0…106aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x004c}
0x106aa…106b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0056}
0x106b4…106c8               Head {h00=0x0010, h01=0x0050, text=»DLE200 EQU *«, t00=0x00a8, t01=0x0060}
0x106c8…106ee               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x00a8, t01=0x0074}
0x106ee…1071e               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x00a8, t01=0x009a}
0x1071e…10742               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x00a8, t01=0x00ca}
0x10742…10768               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x00a8, t01=0x00ee}
0x10768…1078a               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x00a8, t01=0x0114}
0x1078a…1079c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x00a8, t01=0x0136}
0x1079c…107b8               Head {h00=0x0018, h01=0x0050, text=» RB(Z) DLE160 NOT DE«, t00=0x00a8, t01=0x0148}
0x107b8…107ce               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x00a8, t01=0x0164}
0x107ce…107f4               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x00a8, t01=0x017a}
0x107f4…10806               Head {h00=0x000e, h01=0x0050, text=» RB DLE160«, t00=0x00a9, t01=0x0010}
0x10806…10812               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a9, t01=0x0022}
0x10812…10820               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a9, t01=0x002e}
0x10820…1082a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x003c}
0x1082a…1086a               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x00a9, t01=0x0046}
0x1086a…10874               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0086}
0x10874…108a0               Head {h00=0x0028, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER(S) «, t00=0x00a9, t01=0x0090}
0x108a0…108c0               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x00a9, t01=0x00bc}
0x108c0…108d6               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x00a9, t01=0x00dc}
0x108d6…108fc               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x00a9, t01=0x00f2}
0x108fc…10906               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0118}
0x10906…1094c               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x00a9, t01=0x0122}
0x1094c…1097a               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTES - CHECK SELECT ADDRESS«, t00=0x00a9, t01=0x0168}
0x1097a…109aa               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x00aa, t01=0x0008}
0x109aa…109b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0038}
0x109b4…109be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0042}
0x109be…109c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x004c}
0x109c8…109dc               Head {h00=0x0010, h01=0x0050, text=»FINTES EQU *«, t00=0x00aa, t01=0x0056}
0x109dc…109f0               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x00aa, t01=0x006a}
0x109f0…10a02               Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x00aa, t01=0x007e}
0x10a02…10a14               Head {h00=0x000e, h01=0x0050, text=» RF FINT05«, t00=0x00aa, t01=0x0090}
0x10a14…10a20               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00aa, t01=0x00a2}
0x10a20…10a34               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x00aa, t01=0x00ae}
0x10a34…10a50               Head {h00=0x0018, h01=0x0050, text=» LDK A4,1 RIGTH BYTE«, t00=0x00aa, t01=0x00c2}
0x10a50…10a64               Head {h00=0x0010, h01=0x0050, text=»FINT05 EQU *«, t00=0x00aa, t01=0x00de}
0x10a64…10a8a               Head {h00=0x0022, h01=0x0050, text=» LD A3,DTEDWT,A7 GET FIRST DWT«, t00=0x00aa, t01=0x00f2}
0x10a8a…10a9e               Head {h00=0x0010, h01=0x0050, text=»FINT10 EQU *«, t00=0x00aa, t01=0x0118}
0x10a9e…10abe               Head {h00=0x001c, h01=0x0050, text=» RF(Z) FINT20 END QUEUE «, t00=0x00aa, t01=0x012c}
0x10abe…10ad0               Head {h00=0x000e, h01=0x0050, text=» ADR A3,A4«, t00=0x00aa, t01=0x014c}
0x10ad0…10af6               Head {h00=0x0022, h01=0x0050, text=» CCR A2,A3 THIS SUB-ADDRESS ? «, t00=0x00aa, t01=0x015e}
0x10af6…10b10               Head {h00=0x0016, h01=0x0050, text=» RF(E) FINT20 YES «, t00=0x00aa, t01=0x0184}
0x10b10…10b22               Head {h00=0x000e, h01=0x0050, text=» SUR A3,A4«, t00=0x00ab, t01=0x000e}
0x10b22…10b48               Head {h00=0x0022, h01=0x0050, text=» LD A3,DWTCHN,A3 GET NEXT DWT «, t00=0x00ab, t01=0x0020}
0x10b48…10b5a               Head {h00=0x000e, h01=0x0050, text=» RB FINT10«, t00=0x00ab, t01=0x0046}
0x10b5a…10b6e               Head {h00=0x0010, h01=0x0050, text=»FINT20 EQU *«, t00=0x00ab, t01=0x0058}
0x10b6e…10b84               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x00ab, t01=0x006c}
0x10b84…10b94               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00ab, t01=0x0082}
0x10b94…10ba2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ab, t01=0x0092}
0x10ba2…10bac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x00a0}
0x10bac…10bb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x00aa}
0x10bb6…10bda               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x00ab, t01=0x00b4}
0x10bda…10be4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x00d8}
0x10be4…10bee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x00e2}
0x10bee…10c02               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x00ab, t01=0x00ec}
0x10c02…10c22               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x00ab, t01=0x0100}
0x10c22…10c46               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x00ab, t01=0x0120}
0x10c46…10c5a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00ab, t01=0x0144}
0x10c5a…10c8c               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x00ab, t01=0x0158}
0x10c8c…10c98               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ab, t01=0x018a}
0x10c98…10cc0               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x00ac, t01=0x0008}
0x10cc0…10cd0               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x00ac, t01=0x0030}
0x10cd0…10cf6               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x00ac, t01=0x0040}
0x10cf6…10d06               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00ac, t01=0x0066}
0x10d06…10d14               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ac, t01=0x0076}
0x10d14…10d1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0084}
0x10d1e…10d28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x008e}
0x10d28…10d62               Head {h00=0x0036, h01=0x0050, text=»* CHECK IF THERE IS A SEND REQUEST TO BE COMPLETED«, t00=0x00ac, t01=0x0098}
0x10d62…10d6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x00d2}
0x10d6c…10d8e               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x00ac, t01=0x00dc}
0x10d8e…10d98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x00fe}
0x10d98…10da2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0108}
0x10da2…10dbe               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x00ac, t01=0x0112}
0x10dbe…10de6               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x00ac, t01=0x012e}
0x10de6…10dfe               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x00ac, t01=0x0156}
0x10dfe…10e1e               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x00ac, t01=0x016e}
0x10e1e…10e40               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x00ac, t01=0x018e}
0x10e40…10e6a               Head {h00=0x0026, h01=0x0050, text=» ANK A2,/FF MASK AWAY OPTION PART «, t00=0x00ad, t01=0x0020}
0x10e6a…10e7c               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x00ad, t01=0x004a}
0x10e7c…10ea4               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CWR900 NOT SEND REQUEST «, t00=0x00ad, t01=0x005c}
0x10ea4…10edc               Head {h00=0x0034, h01=0x0050, text=» LD A2,DWTIPC,A6 ANY RECEIVED BUFFERS ON QUEU ? «, t00=0x00ad, t01=0x0084}
0x10edc…10ef4               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CWR110 NO«, t00=0x00ad, t01=0x00bc}
0x10ef4…10f28               Head {h00=0x0030, h01=0x0050, text=» ORKL A1,R:DATA ACCEPTED AND DATA AVAILABLE «, t00=0x00ad, t01=0x00d4}
0x10f28…10f3c               Head {h00=0x0010, h01=0x0050, text=»CWR110 EQU *«, t00=0x00ad, t01=0x0108}
0x10f3c…10f54               Head {h00=0x0014, h01=0x0050, text=» LD A8,DWTECB,A6«, t00=0x00ad, t01=0x011c}
0x10f54…10f74               Head {h00=0x001c, h01=0x0050, text=» CF A15,CTIME STOP TIMER«, t00=0x00ad, t01=0x0134}
0x10f74…10f8e               Head {h00=0x0016, h01=0x0050, text=» IFT REMTIM=1  =9 «, t00=0x00ad, t01=0x0154}
0x10f8e…10fa6               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW1,A8«, t00=0x00ad, t01=0x016e}
0x10fa6…10fb8               Head {h00=0x000e, h01=0x0050, text=» XIF   =9 «, t00=0x00ad, t01=0x0186}
0x10fb8…10fe0               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x00ae, t01=0x0008}
0x10fe0…10ff4               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x00ae, t01=0x0030}
0x10ff4…11022               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x00ae, t01=0x0044}
0x11022…11036               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x00ae, t01=0x0072}
0x11036…1105c               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x00ae, t01=0x0086}
0x1105c…1106e               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x00ae, t01=0x00ac}
0x1106e…1107e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00ae, t01=0x00be}
0x1107e…1108c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ae, t01=0x00ce}
0x1108c…11096               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x00dc}
0x11096…110a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x00e6}
0x110a0…110be               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x00ae, t01=0x00f0}
0x110be…110c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x010e}
0x110c8…110e8               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x00ae, t01=0x0118}
0x110e8…11114               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x00ae, t01=0x0138}
0x11114…1114a               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x00ae, t01=0x0164}
0x1114a…11176               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x00af, t01=0x000a}
0x11176…11180               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x0036}
0x11180…11194               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x00af, t01=0x0040}
0x11194…111bc               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x00af, t01=0x0054}
0x111bc…111dc               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x00af, t01=0x007c}
0x111dc…111ee               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x00af, t01=0x009c}
0x111ee…11202               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x00af, t01=0x00ae}
0x11202…1122a               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x00af, t01=0x00c2}
0x1122a…11250               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x00af, t01=0x00ea}
0x11250…11262               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x00af, t01=0x0110}
0x11262…11276               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x00af, t01=0x0122}
0x11276…1128a               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x00af, t01=0x0136}
0x1128a…112ae               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x00af, t01=0x014a}
0x112ae…112da               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x00af, t01=0x016e}
0x112da…112ea               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x00b0, t01=0x000a}
0x112ea…11306               Head {h00=0x0018, h01=0x0050, text=» SUR A8,A8 RESET LRC«, t00=0x00b0, t01=0x001a}
0x11306…1130e               Head {h00=0x0004, h01=0x0050, t00=0x00b0, t01=0x0036}
0x1130e…11324               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x00b0, t01=0x003e}
0x11324…1133a               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00b0, t01=0x0054}
0x1133a…1134e               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x00b0, t01=0x006a}
0x1134e…11374               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x00b0, t01=0x007e}
0x11374…11388               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x00b0, t01=0x00a4}
0x11388…113ac               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x00b0, t01=0x00b8}
0x113ac…113c0               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x00b0, t01=0x00dc}
0x113c0…113d6               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x00b0, t01=0x00f0}
0x113d6…11404               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x00b0, t01=0x0106}
0x11404…11418               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x00b0, t01=0x0134}
0x11418…11424               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b0, t01=0x0148}
0x11424…1143a               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00b0, t01=0x0154}
0x1143a…1144e               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x00b0, t01=0x016a}
0x1144e…11476               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x00b0, t01=0x017e}
0x11476…1149a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x00b1, t01=0x0016}
0x1149a…114ae               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x00b1, t01=0x003a}
0x114ae…114ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b1, t01=0x004e}
0x114ba…114d0               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00b1, t01=0x005a}
0x114d0…114fa               Head {h00=0x0026, h01=0x0050, text=» IM TPM INDICATE TRANSPARENT TEXT «, t00=0x00b1, t01=0x0070}
0x114fa…11514               Head {h00=0x0016, h01=0x0050, text=»RDM100 CF A5,READ «, t00=0x00b1, t01=0x009a}
0x11514…11534               Head {h00=0x001c, h01=0x0050, text=» CWK A2,DLE CHECK IF DLE«, t00=0x00b1, t01=0x00b4}
0x11534…1154e               Head {h00=0x0016, h01=0x0050, text=» RF(NE) RDM112 NO «, t00=0x00b1, t01=0x00d4}
0x1154e…11582               Head {h00=0x0030, h01=0x0050, text=» CF A5,READ SKIP DLE AND READ NEXT CHARACTER«, t00=0x00b1, t01=0x00ee}
0x11582…115a6               Head {h00=0x0020, h01=0x0050, text=» CWK A2,SYNEBC CHECK IF SYN «, t00=0x00b1, t01=0x0122}
0x115a6…115c4               Head {h00=0x001a, h01=0x0050, text=» RB(E) RDM100 SKIP SYN«, t00=0x00b1, t01=0x0146}
0x115c4…115e8               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x00b1, t01=0x0164}
0x115e8…1160e               Head {h00=0x0022, h01=0x0050, text=» CWK A2,DLE CHECK IF 2:ND DLE «, t00=0x00b1, t01=0x0188}
0x1160e…1163c               Head {h00=0x002a, h01=0x0050, text=» RF(E) RDM115 YES - STORE DLE AS DATA «, t00=0x00b2, t01=0x001e}
0x1163c…1165c               Head {h00=0x001c, h01=0x0050, text=» CWK A2,ETX CHECK IF ETX«, t00=0x00b2, t01=0x004c}
0x1165c…11676               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM130 YES «, t00=0x00b2, t01=0x006c}
0x11676…1169a               Head {h00=0x0020, h01=0x0050, text=» CWK A2,ETBEBC CHECK IF ETB «, t00=0x00b2, t01=0x0086}
0x1169a…116b4               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM160 YES «, t00=0x00b2, t01=0x00aa}
0x116b4…116d4               Head {h00=0x001c, h01=0x0050, text=» CWK A2,ITB CHECK IF ITB«, t00=0x00b2, t01=0x00c4}
0x116d4…116ee               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM175 YES «, t00=0x00b2, t01=0x00e4}
0x116ee…11712               Head {h00=0x0020, h01=0x0050, text=» CWK A2,ENQEBC CHECK IF ENQ «, t00=0x00b2, t01=0x00fe}
0x11712…11734               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM140 YES SEND NAK«, t00=0x00b2, t01=0x0122}
0x11734…1173e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x0144}
0x1173e…11748               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x014e}
0x11748…11762               Head {h00=0x0016, h01=0x0050, text=»* GET END OF BLOCK«, t00=0x00b2, t01=0x0158}
0x11762…1176c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x0172}
0x1176c…11780               Head {h00=0x0010, h01=0x0050, text=»RDM105 EQU *«, t00=0x00b2, t01=0x017c}
0x11780…11794               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x00b2, t01=0x0190}
0x11794…117a8               Head {h00=0x0010, h01=0x0050, text=» CWK A2,DLE «, t00=0x00b3, t01=0x0014}
0x117a8…117be               Head {h00=0x0012, h01=0x0050, text=» RB(NE) RDM105«, t00=0x00b3, t01=0x0028}
0x117be…117d2               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x00b3, t01=0x003e}
0x117d2…117e6               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x00b3, t01=0x0052}
0x117e6…1180e               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM110 YES - END OF BLOCK«, t00=0x00b3, t01=0x0066}
0x1180e…11824               Head {h00=0x0012, h01=0x0050, text=» CWK A2,ETBEBC«, t00=0x00b3, t01=0x008e}
0x11824…1184c               Head {h00=0x0024, h01=0x0050, text=» RB(NE) RDM105 NOT END OF BLOCK «, t00=0x00b3, t01=0x00a4}
0x1184c…11860               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x00b3, t01=0x00cc}
0x11860…11888               Head {h00=0x0024, h01=0x0050, text=» CM TPM OUT OF TRANSPARENT TEXT «, t00=0x00b3, t01=0x00e0}
0x11888…1189c               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDCRC«, t00=0x00b3, t01=0x0108}
0x1189c…118c8               Head {h00=0x0028, h01=0x0050, text=» RF RDM140 INDICATE INVALID MESSAGE «, t00=0x00b3, t01=0x011c}
0x118c8…118f2               Head {h00=0x0026, h01=0x0050, text=»RDM112 CF A5,CRCCAL CALCULATE CRC «, t00=0x00b3, t01=0x0148}
0x118f2…118fe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b3, t01=0x0172}
0x118fe…11914               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00b3, t01=0x017e}
0x11914…11928 (180, 0, 400) Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x00b4, t01=0x0004}
0x11928…1194a               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x00b4, t01=0x0018}
0x1194a…1195e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x00b4, t01=0x003a}
0x1195e…11980               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x00b4, t01=0x004e}
0x11980…11994               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x00b4, t01=0x0070}
0x11994…119b6               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x00b4, t01=0x0084}
0x119b6…119ca               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x00b4, t01=0x00a6}
0x119ca…11a00               Head {h00=0x0032, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE «, t00=0x00b4, t01=0x00ba}
0x11a00…11a14               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x00b4, t01=0x00f0}
0x11a14…11a3c               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x00b4, t01=0x0104}
0x11a3c…11a50               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00b4, t01=0x012c}
0x11a50…11a66               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x00b4, t01=0x0140}
0x11a66…11a78               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x00b4, t01=0x0156}
0x11a78…11a8e               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x00b4, t01=0x0168}
0x11a8e…11ab0               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x00b4, t01=0x017e}
0x11ab0…11ac2               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x00b5, t01=0x0010}
0x11ac2…11ae4               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x00b5, t01=0x0022}
0x11ae4…11af6               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x00b5, t01=0x0044}
0x11af6…11b0c               Head {h00=0x0012, h01=0x0050, text=» SCR A1,A4  =7«, t00=0x00b5, t01=0x0056}
0x11b0c…11b3a               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x00b5, t01=0x006c}
0x11b3a…11b5e               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x00b5, t01=0x009a}
0x11b5e…11b74               Head {h00=0x0012, h01=0x0050, text=» LCR A1,A4  =7«, t00=0x00b5, t01=0x00be}
0x11b74…11ba2               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x00b5, t01=0x00d4}
0x11ba2…11bb8               Head {h00=0x0012, h01=0x0050, text=» ORR A2,A1  =7«, t00=0x00b5, t01=0x0102}
0x11bb8…11bc4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b5, t01=0x0118}
0x11bc4…11bd8               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x00b5, t01=0x0124}
0x11bd8…11c02               Head {h00=0x0026, h01=0x0050, text=» ADK A3,0 ERROR DETECTED EARLIER ?«, t00=0x00b5, t01=0x0138}
0x11c02…11c20               Head {h00=0x001a, h01=0x0050, text=» RB(NZ) RDM100 YES !!!«, t00=0x00b5, t01=0x0162}
0x11c20…11c42               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x00b5, t01=0x0180}
0x11c42…11c66               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x00b6, t01=0x0012}
0x11c66…11c8e               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x00b6, t01=0x0036}
0x11c8e…11ca2               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x00b6, t01=0x005e}
0x11ca2…11cbe               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x00b6, t01=0x0072}
0x11cbe…11ce2               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x00b6, t01=0x008e}
0x11ce2…11cec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x00b2}
0x11cec…11d06               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x00b6, t01=0x00bc}
0x11d06…11d10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x00d6}
0x11d10…11d3a               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE BUFFER OVERFLOW«, t00=0x00b6, t01=0x00e0}
0x11d3a…11d50               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00b6, t01=0x010a}
0x11d50…11d76               Head {h00=0x0022, h01=0x0050, text=» LDK A1,CSSRBO BUFFER OVERFLOW«, t00=0x00b6, t01=0x0120}
0x11d76…11d9e               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x00b6, t01=0x0146}
0x11d9e…11daa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b6, t01=0x016e}
0x11daa…11dbc               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x00b6, t01=0x017a}
0x11dbc…11dc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x018c}
0x11dc6…11de6               Head {h00=0x001c, h01=0x0050, text=»* PARITY ERROR DETECTED «, t00=0x00b7, t01=0x0008}
0x11de6…11df0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x0028}
0x11df0…11e04               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x00b7, t01=0x0032}
0x11e04…11e1a               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00b7, t01=0x0046}
0x11e1a…11e30               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSRPE«, t00=0x00b7, t01=0x005c}
0x11e30…11e58               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x00b7, t01=0x0072}
0x11e58…11e64               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b7, t01=0x009a}
0x11e64…11e8e               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x00b7, t01=0x00a6}
0x11e8e…11ea2               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x00b7, t01=0x00d0}
0x11ea2…11eca               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x00b7, t01=0x00e4}
0x11eca…11edc               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x00b7, t01=0x010c}
0x11edc…11ee6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x011e}
0x11ee6…11efc               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x00b7, t01=0x0128}
0x11efc…11f06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x013e}
0x11f06…11f1a               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x00b7, t01=0x0148}
0x11f1a…11f42               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x00b7, t01=0x015c}
0x11f42…11f66               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x00b7, t01=0x0184}
0x11f66…11f9c               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x00b8, t01=0x0018}
0x11f9c…11fb0               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00b8, t01=0x004e}
0x11fb0…11fc4               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x00b8, t01=0x0062}
0x11fc4…11fe4               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x00b8, t01=0x0076}
0x11fe4…11ff0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b8, t01=0x0096}
0x11ff0…12004               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00b8, t01=0x00a2}
0x12004…1202e               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x00b8, t01=0x00b6}
0x1202e…1204e               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x00b8, t01=0x00e0}
0x1204e…1205a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b8, t01=0x0100}
0x1205a…1206e               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x00b8, t01=0x010c}
0x1206e…12098               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x00b8, t01=0x0120}
0x12098…120ac               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x00b8, t01=0x014a}
0x120ac…120cc               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT«, t00=0x00b8, t01=0x015e}
0x120cc…120e0               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00b8, t01=0x017e}
0x120e0…120f4 (185, 0, 400) Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00b9, t01=0x0004}
0x120f4…1210a               Head {h00=0x0012, h01=0x0050, text=» ANK A2,H:PARI«, t00=0x00b9, t01=0x0018}
0x1210a…12120               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RDM155 «, t00=0x00b9, t01=0x002e}
0x12120…1213e               Head {h00=0x001a, h01=0x0050, text=» LDK A3,1 PARITY ERROR«, t00=0x00b9, t01=0x0044}
0x1213e…12152               Head {h00=0x0010, h01=0x0050, text=»RDM155 EQU *«, t00=0x00b9, t01=0x0062}
0x12152…1215e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b9, t01=0x0076}
0x1215e…12174               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00b9, t01=0x0082}
0x12174…1219e               Head {h00=0x0026, h01=0x0050, text=» CWK A3,1 ERROR DETECTED EARLIER ?«, t00=0x00b9, t01=0x0098}
0x1219e…121b8               Head {h00=0x0016, h01=0x0050, text=» RF(NE) RDM158 NO «, t00=0x00b9, t01=0x00c2}
0x121b8…121e0               Head {h00=0x0024, h01=0x0050, text=» CM TPM OUT OF TRANSPARENT TEXT «, t00=0x00b9, t01=0x00dc}
0x121e0…121f4               Head {h00=0x0010, h01=0x0050, text=»RDM158 EQU *«, t00=0x00b9, t01=0x0104}
0x121f4…12200               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b9, t01=0x0118}
0x12200…12210               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00b9, t01=0x0124}
0x12210…1221a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0134}
0x1221a…12230               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x00b9, t01=0x013e}
0x12230…1223a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0154}
0x1223a…1224e               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x00b9, t01=0x015e}
0x1224e…12260               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x00b9, t01=0x0172}
0x12260…12286               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x00b9, t01=0x0184}
0x12286…122ac               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x00ba, t01=0x001a}
0x122ac…122be               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x00ba, t01=0x0040}
0x122be…122c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x0052}
0x122c8…122de               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x00ba, t01=0x005c}
0x122de…122e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x0072}
0x122e8…122fc               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x00ba, t01=0x007c}
0x122fc…12310               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00ba, t01=0x0090}
0x12310…12324               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x00ba, t01=0x00a4}
0x12324…1234a               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x00ba, t01=0x00b8}
0x1234a…12356               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ba, t01=0x00de}
0x12356…1236a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00ba, t01=0x00ea}
0x1236a…12394               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x00ba, t01=0x00fe}
0x12394…123ba               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x00ba, t01=0x0128}
0x123ba…123d0               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00ba, t01=0x014e}
0x123d0…123fe               Head {h00=0x002a, h01=0x0050, text=»RDM175 CM TPM OUT OF TRANSPARENT TEXT «, t00=0x00ba, t01=0x0164}
0x123fe…12426 (187, 0, 400) Head {h00=0x0024, h01=0x0050, text=» CF A5,RDCRC READ AND CHECK CRC «, t00=0x00bb, t01=0x0004}
0x12426…12436               Head {h00=0x000c, h01=0x0050, text=» IM TPM «, t00=0x00bb, t01=0x002c}
0x12436…1245c               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM105 CRC WAS NOT OK «, t00=0x00bb, t01=0x003c}
0x1245c…12476               Head {h00=0x0016, h01=0x0050, text=»RDM180 CF A5,READ «, t00=0x00bb, t01=0x0062}
0x12476…1248c               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x00bb, t01=0x007c}
0x1248c…124aa               Head {h00=0x001a, h01=0x0050, text=» RB(E) RDM180 SKIP SYN«, t00=0x00bb, t01=0x0092}
0x124aa…124be               Head {h00=0x0010, h01=0x0050, text=» CWK A2,DLE «, t00=0x00bb, t01=0x00b0}
0x124be…124e6               Head {h00=0x0024, h01=0x0050, text=» RB(NE) RDM105 ILLEGAL CHARACTER«, t00=0x00bb, t01=0x00c4}
0x124e6…124fa               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x00bb, t01=0x00ec}
0x124fa…1250e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,STX «, t00=0x00bb, t01=0x0100}
0x1250e…12536               Head {h00=0x0024, h01=0x0050, text=» RB(NE) RDM105 ILLEGAL CHARACTER«, t00=0x00bb, t01=0x0114}
0x12536…12542               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bb, t01=0x013c}
0x12542…12554               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x00bb, t01=0x0148}
0x12554…12562               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bb, t01=0x015a}
0x12562…1256c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0168}
0x1256c…1258a               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x00bb, t01=0x0172}
0x1258a…12594               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0190}
0x12594…125aa               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x00bc, t01=0x000a}
0x125aa…125cc               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x00bc, t01=0x0020}
0x125cc…125f6               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x00bc, t01=0x0042}
0x125f6…1260c               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x00bc, t01=0x006c}
0x1260c…1262a               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x00bc, t01=0x0082}
0x1262a…1263c               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x00bc, t01=0x00a0}
0x1263c…12646               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x00b2}
0x12646…1265e               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x00bc, t01=0x00bc}
0x1265e…12668               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x00d4}
0x12668…1268c               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x00bc, t01=0x00de}
0x1268c…1269e               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x00bc, t01=0x0102}
0x1269e…126a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0114}
0x126a8…126be               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x00bc, t01=0x011e}
0x126be…126c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0134}
0x126c8…126de               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00bc, t01=0x013e}
0x126de…12700               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x00bc, t01=0x0154}
0x12700…1270c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bc, t01=0x0176}
0x1270c…12716               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0182}
0x12716…1272c               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x00bc, t01=0x018c}
0x1272c…12736               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0012}
0x12736…12758               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x00bd, t01=0x001c}
0x12758…1277e               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x00bd, t01=0x003e}
0x1277e…12796               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x00bd, t01=0x0064}
0x12796…127a8               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x00bd, t01=0x007c}
0x127a8…127b6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bd, t01=0x008e}
0x127b6…127c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x009c}
0x127c0…127d6               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x00bd, t01=0x00a6}
0x127d6…127e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x00bc}
0x127e0…12802               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x00bd, t01=0x00c6}
0x12802…12814               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x00bd, t01=0x00e8}
0x12814…1281e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x00fa}
0x1281e…12834               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x00bd, t01=0x0104}
0x12834…1283e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x011a}
0x1283e…12860               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x00bd, t01=0x0124}
0x12860…12872               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x00bd, t01=0x0146}
0x12872…1287c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0158}
0x1287c…12892               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x00bd, t01=0x0162}
0x12892…1289c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0178}
0x1289c…128be               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x00bd, t01=0x0182}
0x128be…128c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0014}
0x128c8…128f4               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x00be, t01=0x001e}
0x128f4…12908               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x00be, t01=0x004a}
0x12908…12920               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x00be, t01=0x005e}
0x12920…12948               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x00be, t01=0x0076}
0x12948…12972               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x00be, t01=0x009e}
0x12972…12990               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00be, t01=0x00c8}
0x12990…129ba               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x00be, t01=0x00e6}
0x129ba…129d8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00be, t01=0x0110}
0x129d8…129f2               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x00be, t01=0x012e}
0x129f2…12a10               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x00be, t01=0x0148}
0x12a10…12a24               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x00be, t01=0x0166}
0x12a24…12a3a               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x00be, t01=0x017a}
0x12a3a…12a5c               Head {h00=0x001e, h01=0x0050, text=» CF A5,CHALTO HALT OUTPUT «, t00=0x00be, t01=0x0190}
0x12a5c…12a70               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00bf, t01=0x0022}
0x12a70…12a9c               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x00bf, t01=0x0036}
0x12a9c…12aa8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bf, t01=0x0062}
0x12aa8…12ab8               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00bf, t01=0x006e}
0x12ab8…12ac6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bf, t01=0x007e}
0x12ac6…12ad0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x008c}
0x12ad0…12ada               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x0096}
0x12ada…12afc               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x00bf, t01=0x00a0}
0x12afc…12b06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x00c2}
0x12b06…12b10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x00cc}
0x12b10…12b24               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x00bf, t01=0x00d6}
0x12b24…12b46               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x00bf, t01=0x00ea}
0x12b46…12b5c               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=0 «, t00=0x00bf, t01=0x010c}
0x12b5c…12b70               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00bf, t01=0x0122}
0x12b70…12b8e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIDLE SEND DLE«, t00=0x00bf, t01=0x0136}
0x12b8e…12b9a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bf, t01=0x0154}
0x12b9a…12bae               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x00bf, t01=0x0160}
0x12bae…12bcc               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x00bf, t01=0x0174}
0x12bcc…12be8 (192, 0, 400) Head {h00=0x0018, h01=0x0050, text=» SUR A8,A8 RESET LRC«, t00=0x00c0, t01=0x0004}
0x12be8…12c10               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x00c0, t01=0x0020}
0x12c10…12c34               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x00c0, t01=0x0048}
0x12c34…12c60               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x00c0, t01=0x006c}
0x12c60…12c70               Head {h00=0x000c, h01=0x0050, text=»   . =15«, t00=0x00c0, t01=0x0098}
0x12c70…12c9a               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x00c0, t01=0x00a8}
0x12c9a…12cbe               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x00c0, t01=0x00d2}
0x12cbe…12ce4               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x00c0, t01=0x00f6}
0x12ce4…12d0a               Head {h00=0x0022, h01=0x0050, text=» LDR* A2,A7 NETWORK POLL ADDR «, t00=0x00c0, t01=0x011c}
0x12d0a…12d28               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x00c0, t01=0x0142}
0x12d28…12d4e               Head {h00=0x0022, h01=0x0050, text=» LD A2,FDWTUT GET DWT-ADDRESS «, t00=0x00c0, t01=0x0160}
0x12d4e…12d7a               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A2 GET NETWORK SUB-ADDRESS «, t00=0x00c0, t01=0x0186}
0x12d7a…12d98               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x00c1, t01=0x0022}
0x12d98…12dae               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x00c1, t01=0x0040}
0x12dae…12dc2               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x00c1, t01=0x0056}
0x12dc2…12de8               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x00c1, t01=0x006a}
0x12de8…12dfe               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x00c1, t01=0x0090}
0x12dfe…12e24               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x00c1, t01=0x00a6}
0x12e24…12e3a               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x00c1, t01=0x00cc}
0x12e3a…12e4e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x00c1, t01=0x00e2}
0x12e4e…12e64               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x00c1, t01=0x00f6}
0x12e64…12e70               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c1, t01=0x010c}
0x12e70…12e84               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00c1, t01=0x0118}
0x12e84…12e8c               Head {h00=0x0004, h01=0x0050, t00=0x00c1, t01=0x012c}
0x12e8c…12eb6               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x00c1, t01=0x0134}
0x12eb6…12ed0               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x00c1, t01=0x015e}
0x12ed0…12ed8               Head {h00=0x0004, h01=0x0050, t00=0x00c1, t01=0x0178}
0x12ed8…12ef8               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x00c1, t01=0x0180}
0x12ef8…12f1e               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x00c2, t01=0x0010}
0x12f1e…12f3c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND AID«, t00=0x00c2, t01=0x0036}
0x12f3c…12f44               Head {h00=0x0004, h01=0x0050, t00=0x00c2, t01=0x0054}
0x12f44…12f6c               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x00c2, t01=0x005c}
0x12f6c…12f9e               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x00c2, t01=0x0084}
0x12f9e…12fc0               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x00c2, t01=0x00b6}
0x12fc0…12fd2               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x00c2, t01=0x00d8}
0x12fd2…12fe6               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x00c2, t01=0x00ea}
0x12fe6…12ff2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c2, t01=0x00fe}
0x12ff2…12ffa               Head {h00=0x0004, h01=0x0050, t00=0x00c2, t01=0x010a}
0x12ffa…1300c               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x00c2, t01=0x0112}
0x1300c…13020               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x00c2, t01=0x0124}
0x13020…13036               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00c2, t01=0x0138}
0x13036…13056               Head {h00=0x001c, h01=0x0050, text=» IM TPM TRANSPARENT TEXT«, t00=0x00c2, t01=0x014e}
0x13056…13062               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c2, t01=0x016e}
0x13062…13086               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x00c2, t01=0x017a}
0x13086…130aa               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x00c3, t01=0x000e}
0x130aa…130be               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x00c3, t01=0x0032}
0x130be…130d2               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00c3, t01=0x0046}
0x130d2…130fc               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x00c3, t01=0x005a}
0x130fc…13116               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x00c3, t01=0x0084}
0x13116…1311e               Head {h00=0x0004, h01=0x0050, t00=0x00c3, t01=0x009e}
0x1311e…13162               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c3, t01=0x00a6}
0x13162…1316c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x00ea}
0x1316c…1319c               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x00c3, t01=0x00f4}
0x1319c…131a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x0124}
0x131a6…131de               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x00c3, t01=0x012e}
0x131de…131e6               Head {h00=0x0004, h01=0x0050, t00=0x00c3, t01=0x0166}
0x131e6…13210               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x00c3, t01=0x016e}
0x13210…1322c               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x00c4, t01=0x0008}
0x1322c…13238               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c4, t01=0x0024}
0x13238…1324c               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x00c4, t01=0x0030}
0x1324c…1326c               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x00c4, t01=0x0044}
0x1326c…13292               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x00c4, t01=0x0064}
0x13292…132a6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x00c4, t01=0x008a}
0x132a6…132ba               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x00c4, t01=0x009e}
0x132ba…132de               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x00c4, t01=0x00b2}
0x132de…13304               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x00c4, t01=0x00d6}
0x13304…13318               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x00c4, t01=0x00fc}
0x13318…1332c               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x00c4, t01=0x0110}
0x1332c…1334a               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x00c4, t01=0x0124}
0x1334a…13360               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x00c4, t01=0x0142}
0x13360…13372               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x00c4, t01=0x0158}
0x13372…1337e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c4, t01=0x016a}
0x1337e…13392               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00c4, t01=0x0176}
0x13392…133a4               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x00c4, t01=0x018a}
0x133a4…133ac               Head {h00=0x0004, h01=0x0050, t00=0x00c5, t01=0x000c}
0x133ac…133c0               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x00c5, t01=0x0014}
0x133c0…133c8               Head {h00=0x0004, h01=0x0050, t00=0x00c5, t01=0x0028}
0x133c8…133da               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x00c5, t01=0x0030}
0x133da…13400               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x00c5, t01=0x0042}
0x13400…13408               Head {h00=0x0004, h01=0x0050, t00=0x00c5, t01=0x0068}
0x13408…13434               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x00c5, t01=0x0070}
0x13434…1344a               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x00c5, t01=0x009c}
0x1344a…13476               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x00c5, t01=0x00b2}
0x13476…13488               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x00c5, t01=0x00de}
0x13488…134a0               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x00c5, t01=0x00f0}
0x134a0…134b2               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x00c5, t01=0x0108}
0x134b2…134dc               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x00c5, t01=0x011a}
0x134dc…13502               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x00c5, t01=0x0144}
0x13502…1351a               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x00c5, t01=0x016a}
0x1351a…13544               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x00c5, t01=0x0182}
0x13544…1355a               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x00c6, t01=0x001c}
0x1355a…1356e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x00c6, t01=0x0032}
0x1356e…13582               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x00c6, t01=0x0046}
0x13582…135a6               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x00c6, t01=0x005a}
0x135a6…135b8               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x00c6, t01=0x007e}
0x135b8…135ca               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x00c6, t01=0x0090}
0x135ca…135de               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x00c6, t01=0x00a2}
0x135de…135ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c6, t01=0x00b6}
0x135ea…135f8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c6, t01=0x00c2}
0x135f8…1360e               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00c6, t01=0x00d0}
0x1360e…13622               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x00c6, t01=0x00e6}
0x13622…1364e               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x00c6, t01=0x00fa}
0x1364e…1365a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c6, t01=0x0126}
0x1365a…1367e               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x00c6, t01=0x0132}
0x1367e…13692               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x00c6, t01=0x0156}
0x13692…136ba               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x00c6, t01=0x016a}
0x136ba…136e4 (199, 0, 400) Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x00c7, t01=0x0004}
0x136e4…136f8               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x00c7, t01=0x002e}
0x136f8…1371e               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x00c7, t01=0x0042}
0x1371e…1374c               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x00c7, t01=0x0068}
0x1374c…13762               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x00c7, t01=0x0096}
0x13762…13778               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00c7, t01=0x00ac}
0x13778…1379c               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT105 NOT FULL BLOCK«, t00=0x00c7, t01=0x00c2}
0x1379c…137a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c7, t01=0x00e6}
0x137a8…137cc               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x00c7, t01=0x00f2}
0x137cc…137e0               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00c7, t01=0x0116}
0x137e0…13810               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x00c7, t01=0x012a}
0x13810…13824               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x00c7, t01=0x015a}
0x13824…1383e               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x00c7, t01=0x016e}
0x1383e…13852               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x00c7, t01=0x0188}
0x13852…13874               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x00c8, t01=0x000c}
0x13874…138a0               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x00c8, t01=0x002e}
0x138a0…138c2               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x00c8, t01=0x005a}
0x138c2…138e0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00c8, t01=0x007c}
0x138e0…13900               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x00c8, t01=0x009a}
0x13900…13932               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x00c8, t01=0x00ba}
0x13932…13950               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00c8, t01=0x00ec}
0x13950…13970               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x00c8, t01=0x010a}
0x13970…1397c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c8, t01=0x012a}
0x1397c…13990               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x00c8, t01=0x0136}
0x13990…139a6               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00c8, t01=0x014a}
0x139a6…139ba               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00c8, t01=0x0160}
0x139ba…139e2               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRIDLE SEND AN EXTRA DLE «, t00=0x00c8, t01=0x0174}
0x139e2…139ee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c9, t01=0x000c}
0x139ee…13a0a               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x00c9, t01=0x0018}
0x13a0a…13a1e               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x00c9, t01=0x0034}
0x13a1e…13a34               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00c9, t01=0x0048}
0x13a34…13a44               Head {h00=0x000c, h01=0x0050, text=» CM TPM «, t00=0x00c9, t01=0x005e}
0x13a44…13a50               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c9, t01=0x006e}
0x13a50…13a6e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00c9, t01=0x007a}
0x13a6e…13a82               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00c9, t01=0x0098}
0x13a82…13a9c               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A8 GET LRC«, t00=0x00c9, t01=0x00ac}
0x13a9c…13aba               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x00c9, t01=0x00c6}
0x13aba…13ac6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c9, t01=0x00e4}
0x13ac6…13ada               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00c9, t01=0x00f0}
0x13ada…13af8               Head {h00=0x001a, h01=0x0050, text=» LDR A6,A8 GET CRC DK «, t00=0x00c9, t01=0x0104}
0x13af8…13b0a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x00c9, t01=0x0122}
0x13b0a…13b1e               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x00c9, t01=0x0134}
0x13b1e…13b44               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x00c9, t01=0x0148}
0x13b44…13b56               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A6«, t00=0x00c9, t01=0x016e}
0x13b56…13b6a               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x00c9, t01=0x0180}
0x13b6a…13b90 (202, 0, 400) Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x00ca, t01=0x0004}
0x13b90…13b9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ca, t01=0x002a}
0x13b9c…13bb2               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00ca, t01=0x0036}
0x13bb2…13bbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x004c}
0x13bbc…13bc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0056}
0x13bc6…13bec               Head {h00=0x0022, h01=0x0050, text=»*  COUNT MESSAGES TRANSMITTED «, t00=0x00ca, t01=0x0060}
0x13bec…13bf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0086}
0x13bf6…13c0c               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSTBL«, t00=0x00ca, t01=0x0090}
0x13c0c…13c22               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x00ca, t01=0x00a6}
0x13c22…13c2e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ca, t01=0x00bc}
0x13c2e…13c4e               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x00ca, t01=0x00c8}
0x13c4e…13c62               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x00ca, t01=0x00e8}
0x13c62…13c86               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x00ca, t01=0x00fc}
0x13c86…13c9c               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00ca, t01=0x0120}
0x13c9c…13cb0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00ca, t01=0x0136}
0x13cb0…13cd8               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRIDLE SEND AN EXTRA DLE «, t00=0x00ca, t01=0x014a}
0x13cd8…13ce4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ca, t01=0x0172}
0x13ce4…13d00               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x00ca, t01=0x017e}
0x13d00…13d24               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x00cb, t01=0x000a}
0x13d24…13d32               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cb, t01=0x002e}
0x13d32…13d3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x003c}
0x13d3c…13d46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x0046}
0x13d46…13d68               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x00cb, t01=0x0050}
0x13d68…13d72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x0072}
0x13d72…13d7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x007c}
0x13d7c…13d92               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00cb, t01=0x0086}
0x13d92…13da6               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x00cb, t01=0x009c}
0x13da6…13dce               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x00cb, t01=0x00b0}
0x13dce…13dec               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x00cb, t01=0x00d8}
0x13dec…13e0e               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x00cb, t01=0x00f6}
0x13e0e…13e22               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x00cb, t01=0x0118}
0x13e22…13e40               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x00cb, t01=0x012c}
0x13e40…13e5c               Head {h00=0x0018, h01=0x0050, text=» SUR A8,A8 RESET LRC«, t00=0x00cb, t01=0x014a}
0x13e5c…13e70               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x00cb, t01=0x0166}
0x13e70…13e8e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x00cb, t01=0x017a}
0x13e8e…13ea2               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x00cc, t01=0x0008}
0x13ea2…13ec0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x00cc, t01=0x001c}
0x13ec0…13ed4               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x00cc, t01=0x003a}
0x13ed4…13ef2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x00cc, t01=0x004e}
0x13ef2…13f06               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A7 «, t00=0x00cc, t01=0x006c}
0x13f06…13f24               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x00cc, t01=0x0080}
0x13f24…13f4a               Head {h00=0x0022, h01=0x0050, text=» LD A4,FDWTUT GET DWT-ADDRESS «, t00=0x00cc, t01=0x009e}
0x13f4a…13f76               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 GET NETWORK SUB-ADDRESS «, t00=0x00cc, t01=0x00c4}
0x13f76…13f94               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x00cc, t01=0x00f0}
0x13f94…13fb6               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A4 GET STATUS«, t00=0x00cc, t01=0x010e}
0x13fb6…13fd8               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x00cc, t01=0x0130}
0x13fd8…13fea               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x00cc, t01=0x0152}
0x13fea…14012               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x00cc, t01=0x0164}
0x14012…14032               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x00cc, t01=0x018c}
0x14032…14054               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x00cd, t01=0x001c}
0x14054…14076               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A4 GET STATUS«, t00=0x00cd, t01=0x003e}
0x14076…14088               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x00cd, t01=0x0060}
0x14088…140a6               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x00cd, t01=0x0072}
0x140a6…140b8               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x00cd, t01=0x0090}
0x140b8…140da               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x00cd, t01=0x00a2}
0x140da…140ec               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x00cd, t01=0x00c4}
0x140ec…14100               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x00cd, t01=0x00d6}
0x14100…14120               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x00cd, t01=0x00ea}
0x14120…14144               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x00cd, t01=0x010a}
0x14144…14150               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cd, t01=0x012e}
0x14150…1415e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cd, t01=0x013a}
0x1415e…14168               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0148}
0x14168…14172               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0152}
0x14172…1419c               Head {h00=0x0026, h01=0x0050, text=»*  TRSYNC : TRANSMIT SYNC SEQUENCE«, t00=0x00cd, t01=0x015c}
0x1419c…141a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0186}
0x141a6…141ba               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x00cd, t01=0x0190}
0x141ba…141e6               Head {h00=0x0028, h01=0x0050, text=» CF A5,CHALTI HALT INPUT IF NOT DONE«, t00=0x00ce, t01=0x0014}
0x141e6…14216               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCO START OUTPUT WITH SYNC DEF«, t00=0x00ce, t01=0x0040}
0x14216…14244               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x00ce, t01=0x0070}
0x14244…1424e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x009e}
0x1424e…14258               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x00a8}
0x14258…14278               Head {h00=0x001c, h01=0x0050, text=»*  SEND 4 SYN-CHARACTERS«, t00=0x00ce, t01=0x00b2}
0x14278…14282               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x00d2}
0x14282…14294               Head {h00=0x000e, h01=0x0050, text=» LDK A3,4 «, t00=0x00ce, t01=0x00dc}
0x14294…142a8               Head {h00=0x0010, h01=0x0050, text=»TRS100 EQU *«, t00=0x00ce, t01=0x00ee}
0x142a8…142bc               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SYN «, t00=0x00ce, t01=0x0102}
0x142bc…142e0               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITE SEND CHARACTER «, t00=0x00ce, t01=0x0116}
0x142e0…142f2               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x00ce, t01=0x013a}
0x142f2…14308               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x00ce, t01=0x014c}
0x14308…14328               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00ce, t01=0x0162}
0x14328…14336               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ce, t01=0x0182}
0x14336…14340               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0190}
0x14340…1434a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x000a}
0x1434a…1437e               Head {h00=0x0030, h01=0x0050, text=»*  CSYNCI :SEND SYNC-PATTERN FOR INPUT DATA «, t00=0x00cf, t01=0x0014}
0x1437e…14388               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x0048}
0x14388…1439c               Head {h00=0x0010, h01=0x0050, text=»CSYNCI EQU *«, t00=0x00cf, t01=0x0052}
0x1439c…143b2               Head {h00=0x0012, h01=0x0050, text=» LD A2,PFPOST «, t00=0x00cf, t01=0x0066}
0x143b2…143da               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CSYN:I WAIT FOR POWER UP«, t00=0x00cf, t01=0x007c}
0x143da…143fa               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI STOP INPUT«, t00=0x00cf, t01=0x00a4}
0x143fa…14424               Head {h00=0x0026, h01=0x0050, text=» ST A5,DCLCI SET INPUT ACTIVE FLAG«, t00=0x00cf, t01=0x00c4}
0x14424…14438               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00cf, t01=0x00ee}
0x14438…1446a               Head {h00=0x002e, h01=0x0050, text=» LDK A2,PARITY CHAR PARITY FUNCTION FOR LC«, t00=0x00cf, t01=0x0102}
0x1446a…1448c               Head {h00=0x001e, h01=0x0050, text=» CIO A2,1,LCUIN START I/O «, t00=0x00cf, t01=0x0134}
0x1448c…144ae               Head {h00=0x001e, h01=0x0050, text=» LDK A2,SYNC SYNC PATTERN «, t00=0x00cf, t01=0x0156}
0x144ae…144e4               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC «, t00=0x00cf, t01=0x0178}
0x144e4…144f0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d0, t01=0x001e}
0x144f0…14504               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x00d0, t01=0x002a}
0x14504…14532               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CBCARR+SYNC DEF SYNC-PATTERN «, t00=0x00d0, t01=0x003e}
0x14532…14568               Head {h00=0x0032, h01=0x0050, text=» CIO A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC «, t00=0x00d0, t01=0x006c}
0x14568…14576               Head {h00=0x000a, h01=0x0050, text=»    =1«, t00=0x00d0, t01=0x00a2}
0x14576…14582               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d0, t01=0x00b0}
0x14582…14596               Head {h00=0x0010, h01=0x0050, text=»CSYN:I EQU *«, t00=0x00d0, t01=0x00bc}
0x14596…145b6               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00d0, t01=0x00d0}
0x145b6…145c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x00f0}
0x145c0…145ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x00fa}
0x145ca…145f0               Head {h00=0x0022, h01=0x0050, text=»*  CHALTI : HALT INPUT CHANNEL«, t00=0x00d0, t01=0x0104}
0x145f0…145fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x012a}
0x145fa…1460e               Head {h00=0x0010, h01=0x0050, text=»CHALTI EQU *«, t00=0x00d0, t01=0x0134}
0x1460e…14622               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00d0, t01=0x0148}
0x14622…1464a               Head {h00=0x0024, h01=0x0050, text=» LDK A2,CBSTOP STOP FUNCTION BIT«, t00=0x00d0, t01=0x015c}
0x1464a…14656               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d0, t01=0x0184}
0x14656…14678               Head {h00=0x001e, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT«, t00=0x00d0, t01=0x0190}
0x14678…146a2               Head {h00=0x0026, h01=0x0050, text=» CM DCLCI CLEAR INPUT ACTIVE FLAG «, t00=0x00d1, t01=0x0022}
0x146a2…146c4               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN READ STATUS «, t00=0x00d1, t01=0x004c}
0x146c4…146ea               Head {h00=0x0022, h01=0x0050, text=» RF(A) CHALTR SST ACCEPTED =1 «, t00=0x00d1, t01=0x006e}
0x146ea…14728               Head {h00=0x003a, h01=0x0050, text=» LDK A2,1 INSTRUCTION NOT ACCEPTED, SET MODEM ERR. =1 «, t00=0x00d1, t01=0x0094}
0x14728…14740               Head {h00=0x0014, h01=0x0050, text=»CHALTR EQU *  =1«, t00=0x00d1, t01=0x00d2}
0x14740…14754               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00d1, t01=0x00ea}
0x14754…1477c               Head {h00=0x0024, h01=0x0050, text=» CF A5,LOGSST LOGG INPUT STATUS «, t00=0x00d1, t01=0x00fe}
0x1477c…14788               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d1, t01=0x0126}
0x14788…147a8               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00d1, t01=0x0132}
0x147a8…147b6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d1, t01=0x0152}
0x147b6…147c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0160}
0x147c0…147ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x016a}
0x147ca…147fe               Head {h00=0x0030, h01=0x0050, text=»*  CSYNCO : START TRANSMITTER WITH SYNC DEF «, t00=0x00d1, t01=0x0174}
0x147fe…14808               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x0018}
0x14808…1481c               Head {h00=0x0010, h01=0x0050, text=»CSYNCO EQU *«, t00=0x00d2, t01=0x0022}
0x1481c…14832               Head {h00=0x0012, h01=0x0050, text=» LD A2,PFPOST «, t00=0x00d2, t01=0x0036}
0x14832…1485a               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CSYN:O WAIT FOR POWER UP«, t00=0x00d2, t01=0x004c}
0x1485a…1486e               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00d2, t01=0x0074}
0x1486e…1489c               Head {h00=0x002a, h01=0x0050, text=» LDK A2,PARITY CHAR PARITY CHECK BY CU«, t00=0x00d2, t01=0x0088}
0x1489c…148be               Head {h00=0x001e, h01=0x0050, text=» CIO A2,1,LCUUT CIO START «, t00=0x00d2, t01=0x00b6}
0x148be…148dc               Head {h00=0x001a, h01=0x0050, text=» RF(A) CSYNC1 ACCEPTED«, t00=0x00d2, t01=0x00d8}
0x148dc…14904               Head {h00=0x0024, h01=0x0050, text=» SST A2,LCUUT TRY TO READ STATUS«, t00=0x00d2, t01=0x00f6}
0x14904…14932               Head {h00=0x002a, h01=0x0050, text=» ABL BRM NOT ACCEPTED TIMEOUT REQUEST «, t00=0x00d2, t01=0x011e}
0x14932…14946               Head {h00=0x0010, h01=0x0050, text=»CSYNC1 EQU *«, t00=0x00d2, t01=0x014c}
0x14946…1496c               Head {h00=0x0022, h01=0x0050, text=» LDK A2,SYNC DEF SYNC PATTERN «, t00=0x00d2, t01=0x0160}
0x1496c…14996               Head {h00=0x0026, h01=0x0050, text=» OTR A2,1,LCUUT SEND SYNC PATTERN «, t00=0x00d2, t01=0x0186}
0x14996…149a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d3, t01=0x0020}
0x149a2…149b6               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x00d3, t01=0x002c}
0x149b6…149e0               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x00d3, t01=0x0040}
0x149e0…149ec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d3, t01=0x006a}
0x149ec…14a00               Head {h00=0x0010, h01=0x0050, text=»CSYN:O EQU *«, t00=0x00d3, t01=0x0076}
0x14a00…14a20               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00d3, t01=0x008a}
0x14a20…14a2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x00aa}
0x14a2a…14a34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x00b4}
0x14a34…14a5c               Head {h00=0x0024, h01=0x0050, text=»*  CHALTO : HALT OUTPUT CHANNEL «, t00=0x00d3, t01=0x00be}
0x14a5c…14a66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x00e6}
0x14a66…14a7a               Head {h00=0x0010, h01=0x0050, text=»CHALTO EQU *«, t00=0x00d3, t01=0x00f0}
0x14a7a…14a8e               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00d3, t01=0x0104}
0x14a8e…14ab2               Head {h00=0x0020, h01=0x0050, text=» LDK A2,CBSTOP STOP FUNCTION«, t00=0x00d3, t01=0x0118}
0x14ab2…14abe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d3, t01=0x013c}
0x14abe…14ae2               Head {h00=0x0020, h01=0x0050, text=» CIO A2,0,LCUUT HALT OUTPUT «, t00=0x00d3, t01=0x0148}
0x14ae2…14af6               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00d3, t01=0x016c}
0x14af6…14b26               Head {h00=0x002c, h01=0x0050, text=» LDK A2,1 PRESET STATUS = MODEM ERROR =1«, t00=0x00d3, t01=0x0180}
0x14b26…14b58               Head {h00=0x002e, h01=0x0050, text=» RF(NA) CHLT00 INSTRUCTION NOT ACCEPTED =1«, t00=0x00d4, t01=0x0020}
0x14b58…14b7e               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ WAIT FOR INTERRUPT«, t00=0x00d4, t01=0x0052}
0x14b7e…14b8a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d4, t01=0x0078}
0x14b8a…14baa               Head {h00=0x001c, h01=0x0050, text=» SST A2,LCUUT GET STATUS«, t00=0x00d4, t01=0x0084}
0x14baa…14bbe               Head {h00=0x0010, h01=0x0050, text=»CHLT00 EQU *«, t00=0x00d4, t01=0x00a4}
0x14bbe…14bd4               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00d4, t01=0x00b8}
0x14bd4…14bf2               Head {h00=0x001a, h01=0x0050, text=» ANK A2,H:NOOP+H:THRU «, t00=0x00d4, t01=0x00ce}
0x14bf2…14c08               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CHLTO2 «, t00=0x00d4, t01=0x00ec}
0x14c08…14c30               Head {h00=0x0024, h01=0x0050, text=» LDK A1,CSCDCE DCE NOT OPERABLE «, t00=0x00d4, t01=0x0102}
0x14c30…14c46               Head {h00=0x0012, h01=0x0050, text=» ANK A2,H:NOOP«, t00=0x00d4, t01=0x012a}
0x14c46…14c60               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CHLTO1 YES«, t00=0x00d4, t01=0x0140}
0x14c60…14c8e               Head {h00=0x002a, h01=0x0050, text=» LDK A1,CSCDOT OUTPUT THROUGHPUT ERROR«, t00=0x00d4, t01=0x015a}
0x14c8e…14ca2               Head {h00=0x0010, h01=0x0050, text=»CHLTO1 EQU *«, t00=0x00d4, t01=0x0188}
0x14ca2…14cca               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x00d5, t01=0x000c}
0x14cca…14cde               Head {h00=0x0010, h01=0x0050, text=»CHLTO2 EQU *«, t00=0x00d5, t01=0x0034}
0x14cde…14cea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d5, t01=0x0048}
0x14cea…14d0a               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00d5, t01=0x0054}
0x14d0a…14d18               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d5, t01=0x0074}
0x14d18…14d22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0082}
0x14d22…14d2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x008c}
0x14d2c…14d4a               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x00d5, t01=0x0096}
0x14d4a…14d54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x00b4}
0x14d54…14d5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x00be}
0x14d5e…14d72               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x00d5, t01=0x00c8}
0x14d72…14d86               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x00d5, t01=0x00dc}
0x14d86…14d9c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00d5, t01=0x00f0}
0x14d9c…14dbc               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x00d5, t01=0x0106}
0x14dbc…14dc8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d5, t01=0x0126}
0x14dc8…14dd0               Head {h00=0x0004, h01=0x0050, t00=0x00d5, t01=0x0132}
0x14dd0…14de6               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00d5, t01=0x013a}
0x14de6…14e04               Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 «, t00=0x00d5, t01=0x0150}
0x14e04…14e10               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d5, t01=0x016e}
0x14e10…14e3e               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x00d5, t01=0x017a}
0x14e3e…14e60               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x00d6, t01=0x0018}
0x14e60…14e90               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x00d6, t01=0x003a}
0x14e90…14ea4               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00d6, t01=0x006a}
0x14ea4…14ed0               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x00d6, t01=0x007e}
0x14ed0…14edc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d6, t01=0x00aa}
0x14edc…14ef2               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00d6, t01=0x00b6}
0x14ef2…14f02               Head {h00=0x000c, h01=0x0050, text=» C2 TPM «, t00=0x00d6, t01=0x00cc}
0x14f02…14f3e               Head {h00=0x0038, h01=0x0050, text=» RF(NZ) IHLC10 DO NOT SKIP SYNC IN TRANSPARENT TEXT «, t00=0x00d6, t01=0x00dc}
0x14f3e…14f4a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d6, t01=0x0118}
0x14f4a…14f5c               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x00d6, t01=0x0124}
0x14f5c…14f90               Head {h00=0x0030, h01=0x0050, text=» RF(NZ) IHLC05 DO NOT SKIP SYNS IN BCC FRAME«, t00=0x00d6, t01=0x0136}
0x14f90…14fa4               Head {h00=0x0010, h01=0x0050, text=» CWK A2,SYNC«, t00=0x00d6, t01=0x016a}
0x14fa4…14fb8               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x00d6, t01=0x017e}
0x14fb8…14fcc (215, 0, 400) Head {h00=0x0010, h01=0x0050, text=»IHLC05 EQU *«, t00=0x00d7, t01=0x0004}
0x14fcc…14fe0               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00d7, t01=0x0018}
0x14fe0…15000               Head {h00=0x001c, h01=0x0050, text=» XRR A8,A2 CALCULATE LRC«, t00=0x00d7, t01=0x002c}
0x15000…1500c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d7, t01=0x004c}
0x1500c…15020               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00d7, t01=0x0058}
0x15020…15048               Head {h00=0x0024, h01=0x0050, text=» LD A1,XSEL SEE IF SELECTED DK1 «, t00=0x00d7, t01=0x006c}
0x15048…1506e               Head {h00=0x0022, h01=0x0050, text=» RF(Z) IHLC07 NO, SKIP IT DK1 «, t00=0x00d7, t01=0x0094}
0x1506e…15092               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x00d7, t01=0x00ba}
0x15092…150ac               Head {h00=0x0016, h01=0x0050, text=»IHLC07 EQU *  DK1 «, t00=0x00d7, t01=0x00de}
0x150ac…150d8               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x00d7, t01=0x00f8}
0x150d8…150e4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d7, t01=0x0124}
0x150e4…150f8               Head {h00=0x0010, h01=0x0050, text=»IHLC10 EQU *«, t00=0x00d7, t01=0x0130}
0x150f8…1510a               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x00d7, t01=0x0144}
0x1510a…15138               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/FF00 SET FLAG FOR CARRIER ON«, t00=0x00d7, t01=0x0156}
0x15138…15162               Head {h00=0x0026, h01=0x0050, text=» ST A1,DCLCI SET INPUT ACTIV FLAG «, t00=0x00d7, t01=0x0184}
0x15162…15184               Head {h00=0x001e, h01=0x0050, text=» CM DCSTCU CLEAR SST SAVE «, t00=0x00d8, t01=0x001e}
0x15184…15196               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x00d8, t01=0x0040}
0x15196…151ba               Head {h00=0x0020, h01=0x0050, text=» ST A1,DTEPLS,A7 CU OPERABLE«, t00=0x00d8, t01=0x0052}
0x151ba…151da               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00d8, t01=0x0076}
0x151da…151ee               Head {h00=0x0010, h01=0x0050, text=»IHIN20 EQU *«, t00=0x00d8, t01=0x0096}
0x151ee…1520c               Head {h00=0x001a, h01=0x0050, text=» CF A5,SST PERFORM SST«, t00=0x00d8, t01=0x00aa}
0x1520c…1521c               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x00d8, t01=0x00c8}
0x1521c…1522a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d8, t01=0x00d8}
0x1522a…15234               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x00e6}
0x15234…1523e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x00f0}
0x1523e…15260               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x00d8, t01=0x00fa}
0x15260…1526a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x011c}
0x1526a…15274               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0126}
0x15274…15288               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x00d8, t01=0x0130}
0x15288…1529c               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x00d8, t01=0x0144}
0x1529c…152b2               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00d8, t01=0x0158}
0x152b2…152d4               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x00d8, t01=0x016e}
0x152d4…152e0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d8, t01=0x0190}
0x152e0…152e8               Head {h00=0x0004, h01=0x0050, t00=0x00d9, t01=0x000c}
0x152e8…152fe               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00d9, t01=0x0014}
0x152fe…1531c               Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 «, t00=0x00d9, t01=0x002a}
0x1531c…15328               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d9, t01=0x0048}
0x15328…15356               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x00d9, t01=0x0054}
0x15356…15366               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00d9, t01=0x0082}
0x15366…15374               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d9, t01=0x0092}
0x15374…1537e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x00a0}
0x1537e…15388               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x00aa}
0x15388…153b2               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x00d9, t01=0x00b4}
0x153b2…153bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x00de}
0x153bc…153e8               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x00d9, t01=0x00e8}
0x153e8…1541a               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x00d9, t01=0x0114}
0x1541a…1544a               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x00d9, t01=0x0146}
0x1544a…1547a               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x00d9, t01=0x0176}
0x1547a…15484               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x0016}
0x15484…15496               Head {h00=0x000e, h01=0x0050, text=»SST EQU * «, t00=0x00da, t01=0x0020}
0x15496…154b6               Head {h00=0x001c, h01=0x0050, text=» SST A2,LCUIN GET STATUS«, t00=0x00da, t01=0x0032}
0x154b6…154c8               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x00da, t01=0x0052}
0x154c8…154dc               Head {h00=0x0010, h01=0x0050, text=» IFT LOGG=1 «, t00=0x00da, t01=0x0064}
0x154dc…15506               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOGG SST INFORMATION«, t00=0x00da, t01=0x0078}
0x15506…15512               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00da, t01=0x00a2}
0x15512…15536               Head {h00=0x0020, h01=0x0050, text=» ANK A2,H:ERR ERROR BIT SET «, t00=0x00da, t01=0x00ae}
0x15536…15550               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) SST050 YES«, t00=0x00da, t01=0x00d2}
0x15550…15564               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x00da, t01=0x00ec}
0x15564…15586               Head {h00=0x001e, h01=0x0050, text=» LD A2,DCLCI INPUT STATUS «, t00=0x00da, t01=0x0100}
0x15586…155b4               Head {h00=0x002a, h01=0x0050, text=» RF(Z) SST125 INPUT NOT ACTIVE  IGNORE«, t00=0x00da, t01=0x0122}
0x155b4…155e0               Head {h00=0x0028, h01=0x0050, text=» RF(N) SST100 INPUT ACTIVE WITH DATA«, t00=0x00da, t01=0x0150}
0x155e0…1560e               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CBCARR+SYNC DEF SYNC PATTERN «, t00=0x00da, t01=0x017c}
0x1560e…15638               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUIN START INPUT AGAIN «, t00=0x00db, t01=0x001a}
0x15638…15660               Head {h00=0x0024, h01=0x0050, text=» RF SST125 RETURN TO DISPATCHER «, t00=0x00db, t01=0x0044}
0x15660…1566c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00db, t01=0x006c}
0x1566c…15680               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00db, t01=0x0078}
0x15680…15692               Head {h00=0x000e, h01=0x0050, text=» RF SST100«, t00=0x00db, t01=0x008c}
0x15692…1569e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00db, t01=0x009e}
0x1569e…156b2               Head {h00=0x0010, h01=0x0050, text=»SST050 EQU *«, t00=0x00db, t01=0x00aa}
0x156b2…156d4               Head {h00=0x001e, h01=0x0050, text=» ANK A2,H:CARR CARRIR OFF «, t00=0x00db, t01=0x00be}
0x156d4…156ec               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SST075 NO«, t00=0x00db, t01=0x00e0}
0x156ec…1570e               Head {h00=0x001e, h01=0x0050, text=» LD A2,DCLCI INPUT STATUS «, t00=0x00db, t01=0x00f8}
0x1570e…15742               Head {h00=0x0030, h01=0x0050, text=» RF(Z) SST125 NOT ACTIVE IGNORE CARRIER OFF «, t00=0x00db, t01=0x011a}
0x15742…1575c               Head {h00=0x0016, h01=0x0050, text=» RF SST100 ACTIVE «, t00=0x00db, t01=0x014e}
0x1575c…15770               Head {h00=0x0010, h01=0x0050, text=»SST075 EQU *«, t00=0x00db, t01=0x0168}
0x15770…157a0               Head {h00=0x002c, h01=0x0050, text=» CM DTEPLS,A7 CLEAR PHYS. LINK STATUS DK«, t00=0x00db, t01=0x017c}
0x157a0…157b2               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x00dc, t01=0x001c}
0x157b2…157da               Head {h00=0x0024, h01=0x0050, text=» ANK A2,H:THRU THROUGHPUT ERROR «, t00=0x00dc, t01=0x002e}
0x157da…157f2               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SST100 NO«, t00=0x00dc, t01=0x0056}
0x157f2…15808               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00dc, t01=0x006e}
0x15808…15812               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x0084}
0x15812…1581c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x008e}
0x1581c…15844               Head {h00=0x0024, h01=0x0050, text=»*  COUNT INPUT THROUGHPUT ERROR «, t00=0x00dc, t01=0x0098}
0x15844…1584e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x00c0}
0x1584e…15864               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSCDIT«, t00=0x00dc, t01=0x00ca}
0x15864…1587a               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x00dc, t01=0x00e0}
0x1587a…15886               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dc, t01=0x00f6}
0x15886…1589a               Head {h00=0x0010, h01=0x0050, text=» ABL BRM110 «, t00=0x00dc, t01=0x0102}
0x1589a…158a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x0116}
0x158a4…158b8               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x00dc, t01=0x0120}
0x158b8…158ca               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x00dc, t01=0x0134}
0x158ca…158ee               Head {h00=0x0020, h01=0x0050, text=» ANK A2,H:NOOP NOT OPERABLE «, t00=0x00dc, t01=0x0146}
0x158ee…15904               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST200 «, t00=0x00dc, t01=0x016a}
0x15904…1591a               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00dc, t01=0x0180}
0x1591a…15924               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x0008}
0x15924…1592e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x0012}
0x1592e…15950               Head {h00=0x001e, h01=0x0050, text=»*  COUNT DCE NOT OPERABLE «, t00=0x00dd, t01=0x001c}
0x15950…1595a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x003e}
0x1595a…15970               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSCDCE«, t00=0x00dd, t01=0x0048}
0x15970…15986               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x00dd, t01=0x005e}
0x15986…15992               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dd, t01=0x0074}
0x15992…159b6               Head {h00=0x0020, h01=0x0050, text=» CF A15,STREG SAVE REGISTERS«, t00=0x00dd, t01=0x0080}
0x159b6…159d8               Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME DELAY 1 SEC«, t00=0x00dd, t01=0x00a4}
0x159d8…159f0               Head {h00=0x0014, h01=0x0050, text=» DATA SST150,10 «, t00=0x00dd, t01=0x00c6}
0x159f0…15a04               Head {h00=0x0010, h01=0x0050, text=»SST125 EQU *«, t00=0x00dd, t01=0x00de}
0x15a04…15a2c               Head {h00=0x0024, h01=0x0050, text=» ABL TDISP RETURN TO DISPATCHER «, t00=0x00dd, t01=0x00f2}
0x15a2c…15a36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x011a}
0x15a36…15a4a               Head {h00=0x0010, h01=0x0050, text=»SST150 EQU *«, t00=0x00dd, t01=0x0124}
0x15a4a…15a6e               Head {h00=0x0020, h01=0x0050, text=» CF A15,LDREG LOAD REGISTERS«, t00=0x00dd, t01=0x0138}
0x15a6e…15a82               Head {h00=0x0010, h01=0x0050, text=»SST200 EQU *«, t00=0x00dd, t01=0x015c}
0x15a82…15a94               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x00dd, t01=0x0170}
0x15a94…15ac6               Head {h00=0x002e, h01=0x0050, text=» ANK A2,H:CARR CHECK STATUS IF CARRIER OFF«, t00=0x00dd, t01=0x0182}
0x15ac6…15ade               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SST225 NO«, t00=0x00de, t01=0x0024}
0x15ade…15b16               Head {h00=0x0034, h01=0x0050, text=» XRK A1,H:CARR CHECK STATUS IF ONLY CARRIER OFF «, t00=0x00de, t01=0x003c}
0x15b16…15b30               Head {h00=0x0016, h01=0x0050, text=» RF(Z) SST250 YES «, t00=0x00de, t01=0x0074}
0x15b30…15b44               Head {h00=0x0010, h01=0x0050, text=»SST225 EQU *«, t00=0x00de, t01=0x008e}
0x15b44…15b78               Head {h00=0x0030, h01=0x0050, text=» ST A1,DCSTCU STORE STATUS AS CURRENT STATUS«, t00=0x00de, t01=0x00a2}
0x15b78…15b8c               Head {h00=0x0010, h01=0x0050, text=»SST250 EQU *«, t00=0x00de, t01=0x00d6}
0x15b8c…15bac               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00de, t01=0x00ea}
0x15bac…15bba               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00de, t01=0x010a}
0x15bba…15bc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0118}
0x15bc4…15bce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0122}
0x15bce…15bfe               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x00de, t01=0x012c}
0x15bfe…15c08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x015c}
0x15c08…15c12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0166}
0x15c12…15c26               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x00de, t01=0x0170}
0x15c26…15c3a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00de, t01=0x0184}
0x15c3a…15c4a               Head {h00=0x000c, h01=0x0050, text=» C2 TPM «, t00=0x00df, t01=0x0008}
0x15c4a…15c74               Head {h00=0x0026, h01=0x0050, text=» RF(Z) WRIT02 NOT TRANSPARENT MODE«, t00=0x00df, t01=0x0018}
0x15c74…15c94               Head {h00=0x001c, h01=0x0050, text=» CWK A2,DLE CHECK IF DLE«, t00=0x00df, t01=0x0042}
0x15c94…15cae               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRIT05 NO «, t00=0x00df, t01=0x0062}
0x15cae…15cd2               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRIDLE SEND EXTRA DLE«, t00=0x00df, t01=0x007c}
0x15cd2…15ce6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00df, t01=0x00a0}
0x15ce6…15cf8               Head {h00=0x000e, h01=0x0050, text=» RF WRIT05«, t00=0x00df, t01=0x00b4}
0x15cf8…15d0c               Head {h00=0x0010, h01=0x0050, text=»WRIT02 EQU *«, t00=0x00df, t01=0x00c6}
0x15d0c…15d20               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x00df, t01=0x00da}
0x15d20…15d34               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x00df, t01=0x00ee}
0x15d34…15d68               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x00df, t01=0x0102}
0x15d68…15d96               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x00df, t01=0x0136}
0x15d96…15da2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x0164}
0x15da2…15db6               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x00df, t01=0x0170}
0x15db6…15ddc               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x00df, t01=0x0184}
0x15ddc…15df2               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x00e0, t01=0x001a}
0x15df2…15e06               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00e0, t01=0x0030}
0x15e06…15e2e               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A8,A2 ACCUMULATE BCC «, t00=0x00e0, t01=0x0044}
0x15e2e…15e3a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e0, t01=0x006c}
0x15e3a…15e4e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00e0, t01=0x0078}
0x15e4e…15e78               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x00e0, t01=0x008c}
0x15e78…15e84               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e0, t01=0x00b6}
0x15e84…15e98               Head {h00=0x0010, h01=0x0050, text=»WRIT15 EQU *«, t00=0x00e0, t01=0x00c2}
0x15e98…15eac               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00e0, t01=0x00d6}
0x15eac…15ed6               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x00e0, t01=0x00ea}
0x15ed6…15ee2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e0, t01=0x0114}
0x15ee2…15eec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0120}
0x15eec…15f06               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x00e0, t01=0x012a}
0x15f06…15f18               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x00e0, t01=0x0144}
0x15f18…15f22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0156}
0x15f22…15f2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0160}
0x15f2c…15f6c               Head {h00=0x003c, h01=0x0050, text=»*  THESE INSTRUCTIONS ARE ONLY USED TO SEND AN EXTRA DLE«, t00=0x00e0, t01=0x016a}
0x15f6c…15f9a               Head {h00=0x002a, h01=0x0050, text=»*  WHEN TRANSPARENT MODE IS CONFIGURED«, t00=0x00e1, t01=0x001a}
0x15f9a…15fa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0048}
0x15fa4…15fb8               Head {h00=0x0010, h01=0x0050, text=»WRIDLE EQU *«, t00=0x00e1, t01=0x0052}
0x15fb8…15fde               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x00e1, t01=0x0066}
0x15fde…15ffc               Head {h00=0x001a, h01=0x0050, text=» RB(A) WRIT15 ACCEPTED«, t00=0x00e1, t01=0x008c}
0x15ffc…16024               Head {h00=0x0024, h01=0x0050, text=» RB READ OUTPUT THROUGHPUT ERROR«, t00=0x00e1, t01=0x00aa}
0x16024…16032               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e1, t01=0x00d2}
0x16032…1603c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x00e0}
0x1603c…16046               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x00ea}
0x16046…16058               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x00e1, t01=0x00f4}
0x16058…16062               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0106}
0x16062…16082               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x00e1, t01=0x0110}
0x16082…1608c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0130}
0x1608c…16096               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x013a}
0x16096…160b8               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x00e1, t01=0x0144}
0x160b8…160d2               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x00e1, t01=0x0166}
0x160d2…160e4               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x00e1, t01=0x0180}
0x160e4…160f8 (226, 0, 398) Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x00e2, t01=0x0004}
0x160f8…16110               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x00e2, t01=0x0018}
0x16110…16126               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x00e2, t01=0x0030}
0x16126…16140               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x00e2, t01=0x0046}
0x16140…16154               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x00e2, t01=0x0060}
0x16154…16166               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x00e2, t01=0x0074}
0x16166…16172               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e2, t01=0x0086}
0x16172…16194               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x00e2, t01=0x0092}
0x16194…161ac               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x00e2, t01=0x00b4}
0x161ac…161b8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e2, t01=0x00cc}
0x161b8…161c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00d8}
0x161c2…161cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00e2}
0x161cc…161d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00ec}
0x161d6…161e8               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x00e2, t01=0x00f6}
0x161e8…161f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x0108}
0x161f2…16224               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x00e2, t01=0x0112}
0x16224…1622e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x0144}
0x1622e…16238               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x014e}
0x16238…16250               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x00e2, t01=0x0158}
0x16250…16272               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x00e2, t01=0x0170}
0x16272…16284 (227, 0, 398) Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x00e3, t01=0x0004}
0x16284…1629a               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x00e3, t01=0x0016}
0x1629a…162ae               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x00e3, t01=0x002c}
0x162ae…162c4               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x00e3, t01=0x0040}
0x162c4…162d8               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x00e3, t01=0x0056}
0x162d8…162ea               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x00e3, t01=0x006a}
0x162ea…16302               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x00e3, t01=0x007c}
0x16302…16316               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x00e3, t01=0x0094}
0x16316…16322               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e3, t01=0x00a8}
0x16322…16344               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x00e3, t01=0x00b4}
0x16344…16358               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x00e3, t01=0x00d6}
0x16358…16364               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e3, t01=0x00ea}
0x16364…16376               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x00e3, t01=0x00f6}
0x16376…1638a               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x00e3, t01=0x0108}
0x1638a…1639e               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x00e3, t01=0x011c}
0x1639e…163ae               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00e3, t01=0x0130}
0x163ae…163b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x0140}
0x163b8…163c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x014a}
0x163c2…163d0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e3, t01=0x0154}
0x163d0…163da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x0162}
0x163da…163e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x016c}
0x163e4…16400               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x00e3, t01=0x0176}
0x16400…1640a (228, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x0004}
0x1640a…16414               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x000e}
0x16414…16428               Head {h00=0x0010, h01=0x0050, text=»DC15ON EQU *«, t00=0x00e4, t01=0x0018}
0x16428…1643e               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00e4, t01=0x002c}
0x1643e…1645e               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x00e4, t01=0x0042}
0x1645e…1646a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e4, t01=0x0062}
0x1646a…16472               Head {h00=0x0004, h01=0x0050, t00=0x00e4, t01=0x006e}
0x16472…16488               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00e4, t01=0x0076}
0x16488…164a6               Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 «, t00=0x00e4, t01=0x008c}
0x164a6…164b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e4, t01=0x00aa}
0x164b2…164d8               Head {h00=0x0022, h01=0x0050, text=» LDKL A7,DTETAB DTETAB ADDRESS«, t00=0x00e4, t01=0x00b6}
0x164d8…164ee               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x00e4, t01=0x00dc}
0x164ee…1650e               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x00e4, t01=0x00f2}
0x1650e…1653a               Head {h00=0x0028, h01=0x0050, text=» LD A6,DTEDWT,A7 GET FIRST DWT ADDR «, t00=0x00e4, t01=0x0112}
0x1653a…1654e               Head {h00=0x0010, h01=0x0050, text=»DC1510 EQU *«, t00=0x00e4, t01=0x013e}
0x1654e…16570               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DC1520 END OF CHAIN«, t00=0x00e4, t01=0x0152}
0x16570…1659a               Head {h00=0x0026, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END «, t00=0x00e4, t01=0x0174}
0x1659a…165ca               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STAUS QUEUE «, t00=0x00e5, t01=0x000e}
0x165ca…165f8               Head {h00=0x002a, h01=0x0050, text=» LD A6,DWTCHN,A6 GET NEXT DWT IN CHAIN«, t00=0x00e5, t01=0x003e}
0x165f8…1660a               Head {h00=0x000e, h01=0x0050, text=» RB DC1510«, t00=0x00e5, t01=0x006c}
0x1660a…1661e               Head {h00=0x0010, h01=0x0050, text=»DC1520 EQU *«, t00=0x00e5, t01=0x007e}
0x1661e…1662c               Head {h00=0x000a, h01=0x0050, text=»    =4«, t00=0x00e5, t01=0x0092}
0x1662c…1663c               Head {h00=0x000c, h01=0x0050, text=»    =13 «, t00=0x00e5, t01=0x00a0}
0x1663c…16648               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e5, t01=0x00b0}
0x16648…1666c               Head {h00=0x0020, h01=0x0050, text=» LD A2,DTESTA,A7 DTE STATUS «, t00=0x00e5, t01=0x00bc}
0x1666c…1667e               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x00e5, t01=0x00e0}
0x1667e…166a6               Head {h00=0x0024, h01=0x0050, text=» ABL(NZ) TDISP OPEN NOT EXECUTED«, t00=0x00e5, t01=0x00f2}
0x166a6…166d4               Head {h00=0x002a, h01=0x0050, text=» CM DCLCI INIT LINE CONTROL UNIT INFO «, t00=0x00e5, t01=0x011a}
0x166d4…16700               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x00e5, t01=0x0148}
0x16700…16726               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DC1540 ALREADY STARTED«, t00=0x00e5, t01=0x0174}
0x16726…1674e               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x00e6, t01=0x000a}
0x1674e…16762               Head {h00=0x0010, h01=0x0050, text=»DC1540 EQU *«, t00=0x00e6, t01=0x0032}
0x16762…16772               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x00e6, t01=0x0046}
0x16772…16780               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e6, t01=0x0056}
0x16780…16794               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00e6, t01=0x0064}
0x16794…1679e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x0078}
0x1679e…167a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x0082}
0x167a8…167c4               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x00e6, t01=0x008c}
0x167c4…167ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x00a8}
0x167ce…167e6               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x00e6, t01=0x00b2}
0x167e6…16804               Head {h00=0x001a, h01=0x0050, text=»* A8 = ACCUMULATED CRC«, t00=0x00e6, t01=0x00ca}
0x16804…1680e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x00e8}
0x1680e…16818               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x00f2}
0x16818…1682c               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x00e6, t01=0x00fc}
0x1682c…16844               Head {h00=0x0014, h01=0x0050, text=» ST A1,CRCSAV+2 «, t00=0x00e6, t01=0x0110}
0x16844…1685c               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+6 «, t00=0x00e6, t01=0x0128}
0x1685c…16874               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+10«, t00=0x00e6, t01=0x0140}
0x16874…1688c               Head {h00=0x0014, h01=0x0050, text=» ST A4,CRCSAV+14«, t00=0x00e6, t01=0x0158}
0x1688c…1689e               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x00e6, t01=0x0170}
0x1689e…168bc               Head {h00=0x001a, h01=0x0050, text=» LDR A4,A8 GET OLD CRC«, t00=0x00e6, t01=0x0182}
0x168bc…168d4               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A4«, t00=0x00e7, t01=0x0010}
0x168d4…168e6               Head {h00=0x000e, h01=0x0050, text=» SRL A4,1 «, t00=0x00e7, t01=0x0028}
0x168e6…168f8               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x00e7, t01=0x003a}
0x168f8…1690a               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x00e7, t01=0x004c}
0x1690a…1691c               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x00e7, t01=0x005e}
0x1691c…16932               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x00e7, t01=0x0070}
0x16932…16948               Head {h00=0x0012, h01=0x0050, text=» XRKL A4,/A001«, t00=0x00e7, t01=0x0086}
0x16948…16960               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x00e7, t01=0x009c}
0x16960…16976               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x00e7, t01=0x00b4}
0x16976…16996               Head {h00=0x001c, h01=0x0050, text=» LDR A8,A4 SAVE NEW CRC «, t00=0x00e7, t01=0x00ca}
0x16996…169aa               Head {h00=0x0010, h01=0x0050, text=»CRCSAV EQU *«, t00=0x00e7, t01=0x00ea}
0x169aa…169bc               Head {h00=0x000e, h01=0x0050, text=» LDKL A1,0«, t00=0x00e7, t01=0x00fe}
0x169bc…169ce               Head {h00=0x000e, h01=0x0050, text=» LDKL A2,0«, t00=0x00e7, t01=0x0110}
0x169ce…169e0               Head {h00=0x000e, h01=0x0050, text=» LDKL A3,0«, t00=0x00e7, t01=0x0122}
0x169e0…169f2               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x00e7, t01=0x0134}
0x169f2…16a02               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00e7, t01=0x0146}
0x16a02…16a10               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e7, t01=0x0156}
0x16a10…16a1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x0164}
0x16a1a…16a24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x016e}
0x16a24…16a50               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x00e7, t01=0x0178}
0x16a50…16a70               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x00e8, t01=0x0014}
0x16a70…16a7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x0034}
0x16a7a…16a84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x003e}
0x16a84…16a98               Head {h00=0x0010, h01=0x0050, text=»RDCRC EQU * «, t00=0x00e8, t01=0x0048}
0x16a98…16abc               Head {h00=0x0020, h01=0x0050, text=» STR A8,A5 SAVE CURRENT CRC «, t00=0x00e8, t01=0x005c}
0x16abc…16ae2               Head {h00=0x0022, h01=0x0050, text=» SUK A5,2 ADJUST STACK POINTER«, t00=0x00e8, t01=0x0080}
0x16ae2…16b0a               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x00e8, t01=0x00a6}
0x16b0a…16b2a               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x00e8, t01=0x00ce}
0x16b2a…16b4a               Head {h00=0x001c, h01=0x0050, text=» LD A4,CRCSAV+6 SAVE IT «, t00=0x00e8, t01=0x00ee}
0x16b4a…16b6a               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x00e8, t01=0x010e}
0x16b6a…16b96               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x00e8, t01=0x012e}
0x16b96…16bb6               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+6 SAVE IT «, t00=0x00e8, t01=0x015a}
0x16bb6…16bc8               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x00e8, t01=0x017a}
0x16bc8…16bda               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A4«, t00=0x00e8, t01=0x018c}
0x16bda…16bec               Head {h00=0x000e, h01=0x0050, text=» ADK A5,6 «, t00=0x00e9, t01=0x000e}
0x16bec…16c00               Head {h00=0x0010, h01=0x0050, text=» CW A2,-4,A5«, t00=0x00e9, t01=0x0020}
0x16c00…16c10               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00e9, t01=0x0034}
0x16c10…16c1c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e9, t01=0x0044}
0x16c1c…16c30               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00e9, t01=0x0050}
0x16c30…16c3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x0064}
0x16c3a…16c64               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x00e9, t01=0x006e}
0x16c64…16c8a               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x00e9, t01=0x0098}
0x16c8a…16c94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x00be}
0x16c94…16caa               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x00e9, t01=0x00c8}
0x16caa…16cbe               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x00e9, t01=0x00de}
0x16cbe…16cd0               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x00e9, t01=0x00f2}
0x16cd0…16ce2               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x00e9, t01=0x0104}
0x16ce2…16cf8               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x00e9, t01=0x0116}
0x16cf8…16d0e               Head {h00=0x0012, h01=0x0050, text=» ANKL A8,/007F«, t00=0x00e9, t01=0x012c}
0x16d0e…16d22               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x00e9, t01=0x0142}
0x16d22…16d34               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x00e9, t01=0x0156}
0x16d34…16d44               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00e9, t01=0x0168}
0x16d44…16d4c               Head {h00=0x0004, h01=0x0050, t00=0x00e9, t01=0x0178}
0x16d4c…16d58               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e9, t01=0x0180}
0x16d58…16d66               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e9, t01=0x018c}
0x16d66…16d96               Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x00ea, t01=0x000a}
0x16d96…16da0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x003a}
0x16da0…16dbc               Head {h00=0x0018, h01=0x0050, text=»*  DRIVER WORK AREAS«, t00=0x00ea, t01=0x0044}
0x16dbc…16dc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x0060}
0x16dc6…16df6               Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x00ea, t01=0x006a}
0x16df6…16e00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x009a}
0x16e00…16e0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00a4}
0x16e0a…16e2a               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x00ea, t01=0x00ae}
0x16e2a…16e34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00ce}
0x16e34…16e54               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x00ea, t01=0x00d8}
0x16e54…16e5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00f8}
0x16e5e…16e72               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x00ea, t01=0x0102}
0x16e72…16e96               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x00ea, t01=0x0116}
0x16e96…16eac               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x00ea, t01=0x013a}
0x16eac…16ec2               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00ea, t01=0x0150}
0x16ec2…16ed6               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00ea, t01=0x0166}
0x16ed6…16eec               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x00ea, t01=0x017a}
0x16eec…16f02               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00ea, t01=0x0190}
0x16f02…16f16               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00eb, t01=0x0016}
0x16f16…16f2c               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x00eb, t01=0x002a}
0x16f2c…16f42               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00eb, t01=0x0040}
0x16f42…16f56               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00eb, t01=0x0056}
0x16f56…16f62               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00eb, t01=0x006a}
0x16f62…16f78               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00eb, t01=0x0076}
0x16f78…16f8c               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00eb, t01=0x008c}
0x16f8c…16fa8               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x00eb, t01=0x00a0}
0x16fa8…16fbc               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00eb, t01=0x00bc}
0x16fbc…16fc4               Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x00d0}
0x16fc4…16fda               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x00eb, t01=0x00d8}
0x16fda…17004               Head {h00=0x0026, h01=0x0050, text=»MMUBUF RES TBUFL+1 MMU WORK BUFFER«, t00=0x00eb, t01=0x00ee}
0x17004…1703c               Head {h00=0x0034, h01=0x0050, text=»SUBBUF RES 3 MMU BUFFER FOR CONNECT REQUEST =16 «, t00=0x00eb, t01=0x0118}
0x1703c…17048               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00eb, t01=0x0150}
0x17048…17056               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00eb, t01=0x015c}
0x17056…17060               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x016a}
0x17060…1706a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x0174}
0x1706a…1708e               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x00eb, t01=0x017e}
0x1708e…17098               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ec, t01=0x0012}
0x17098…170a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ec, t01=0x001c}
0x170a2…170b6               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00ec, t01=0x0026}
0x170b6…170d0               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x00ec, t01=0x003a}
0x170d0…170e6               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x00ec, t01=0x0054}
0x170e6…170f8               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00ec, t01=0x006a}
0x170f8…17112               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x00ec, t01=0x007c}
0x17112…17128               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x00ec, t01=0x0096}
0x17128…1713a               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00ec, t01=0x00ac}
0x1713a…17152               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x00ec, t01=0x00be}
0x17152…17168               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x00ec, t01=0x00d6}
0x17168…1717c               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x00ec, t01=0x00ec}
0x1717c…17196               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x00ec, t01=0x0100}
0x17196…171ac               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x00ec, t01=0x011a}
0x171ac…171be               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x00ec, t01=0x0130}
0x171be…171d0               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x00ec, t01=0x0142}
0x171d0…171e6               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x00ec, t01=0x0154}
0x171e6…171fc               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x00ec, t01=0x016a}
0x171fc…17214               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x00ec, t01=0x0180}
0x17214…17230               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x00ed, t01=0x0008}
0x17230…17244               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x00ed, t01=0x0024}
0x17244…17258               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x00ed, t01=0x0038}
0x17258…1726e               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x00ed, t01=0x004c}
0x1726e…1727c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ed, t01=0x0062}
0x1727c…17286               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0070}
0x17286…17290               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x007a}
0x17290…172aa               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x00ed, t01=0x0084}
0x172aa…172be               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x00ed, t01=0x009e}
0x172be…172ce               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x00ed, t01=0x00b2}
0x172ce…172e4               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x00ed, t01=0x00c2}
0x172e4…172f8               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x00ed, t01=0x00d8}
0x172f8…1730c               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x00ed, t01=0x00ec}
0x1730c…17318               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ed, t01=0x0100}
0x17318…17322               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x010c}
0x17322…1732c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0116}
0x1732c…17336               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0120}
0x17336…1734a               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00ed, t01=0x012a}
0x1734a…17358               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ed, t01=0x013e}
0x17358…17398               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x00ed, t01=0x014c}
0x17398…173a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x018c}
0x173a2…173bc               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x00ee, t01=0x0008}
0x173bc…173c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ee, t01=0x0022}
0x173c6…17404               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x00ee, t01=0x002c}
0x17404…1740e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ee, t01=0x006a}
0x1740e…17450               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x00ee, t01=0x0074}
0x17450…17458               Head {h00=0x0004, h01=0x0050, t00=0x00ee, t01=0x00b6}
0x17458…1746c               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x00ee, t01=0x00be}
0x1746c…17492               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x00ee, t01=0x00d2}
0x17492…174a4               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x00ee, t01=0x00f8}
0x174a4…174ba               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00ee, t01=0x010a}
0x174ba…174e4               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x00ee, t01=0x0120}
0x174e4…1750a               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x00ee, t01=0x014a}
0x1750a…17512               Head {h00=0x0004, h01=0x0050, t00=0x00ee, t01=0x0170}
0x17512…17524               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x00ee, t01=0x0178}
0x17524…1753a               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00ee, t01=0x018a}
0x1753a…17566               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x00ef, t01=0x0010}
0x17566…1758e               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x00ef, t01=0x003c}
0x1758e…175a4               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x00ef, t01=0x0064}
0x175a4…175ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x007a}
0x175ae…175b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x0084}
0x175b8…175c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x008e}
0x175c2…175d0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ef, t01=0x0098}
0x175d0…175d8               Head {h00=0x0004, h01=0x0050, t00=0x00ef, t01=0x00a6}
0x175d8…175e0               Head {h00=0x0004, h01=0x0050, t00=0x00ef, t01=0x00ae}
0x175e0…175f4               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x00ef, t01=0x00b6}
0x175f4…17622               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x00ef, t01=0x00ca}
0x17622…17650               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 /08-/0F «, t00=0x00ef, t01=0x00f8}
0x17650…1767e               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x00ef, t01=0x0126}
0x1767e…176ac               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E /18-/1F «, t00=0x00ef, t01=0x0154}
0x176ac…176da               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x00ef, t01=0x0182}
0x176da…17708               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F /28-/2F «, t00=0x00f0, t01=0x0020}
0x17708…17734               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x00f0, t01=0x004e}
0x17734…17760               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 /38-3F«, t00=0x00f0, t01=0x007a}
0x17760…1776c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00f0, t01=0x00a6}
0x1776c…1777a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f0, t01=0x00b2}
0x1777a…17784               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x00c0}
0x17784…17794               Head {h00=0x000c, h01=0x0050, text=»* DTETAB«, t00=0x00f0, t01=0x00ca}
0x17794…1779e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x00da}
0x1779e…177b2               Head {h00=0x0010, h01=0x0050, text=»* FIXED PART«, t00=0x00f0, t01=0x00e4}
0x177b2…177bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x00f8}
0x177bc…177d0               Head {h00=0x0010, h01=0x0050, text=»DW1500 EQU *«, t00=0x00f0, t01=0x0102}
0x177d0…177e8               Head {h00=0x0014, h01=0x0050, text=»DTETAB DATA 0,0 «, t00=0x00f0, t01=0x0116}
0x177e8…17802               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x00f0, t01=0x012e}
0x17802…17818               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x00f0, t01=0x0148}
0x17818…1782a               Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x00f0, t01=0x015e}
0x1782a…17836               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00f0, t01=0x0170}
0x17836…17856               Head {h00=0x001c, h01=0x0050, text=»* DRIVER DEPENDENT PART «, t00=0x00f0, t01=0x017c}
0x17856…1788c               Head {h00=0x0032, h01=0x0050, text=» DATA DTESBU-DTETAB START OF STATISTIC BUFFER «, t00=0x00f1, t01=0x000c}
0x1788c…178a6               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x00f1, t01=0x0042}
0x178a6…178c2               Head {h00=0x0018, h01=0x0050, text=» DATA 0,0,0,0,0,0  *«, t00=0x00f1, t01=0x005c}
0x178c2…178d6               Head {h00=0x0010, h01=0x0050, text=»DTESBU EQU *«, t00=0x00f1, t01=0x0078}
0x178d6…178f2               Head {h00=0x0018, h01=0x0050, text=» DATA 0 SYMBOLIC ID «, t00=0x00f1, t01=0x008c}
0x178f2…17916               Head {h00=0x0020, h01=0x0050, text=» DATA 0 COUNTER STATUS WORD «, t00=0x00f1, t01=0x00a8}
0x17916…1793e               Head {h00=0x0024, h01=0x0050, text=» DATA /20 MAX NUMBER OF COUNTERS«, t00=0x00f1, t01=0x00cc}
0x1793e…17960               Head {h00=0x001e, h01=0x0050, text=» RES /20 STATISTIC BUFFER «, t00=0x00f1, t01=0x00f4}
0x17960…1796e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f1, t01=0x0116}
0x1796e…17978               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0124}
0x17978…17982               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x012e}
0x17982…179a0               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x00f1, t01=0x0138}
0x179a0…179aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0156}
0x179aa…179b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0160}
0x179b4…179e2               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x00f1, t01=0x016a}
0x179e2…17a14               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x00f2, t01=0x0008}
0x17a14…17a34               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x00f2, t01=0x003a}
0x17a34…17a50               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x00f2, t01=0x005a}
0x17a50…17a6c               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x00f2, t01=0x0076}
0x17a6c…17aa2               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x00f2, t01=0x0092}
0x17aa2…17ac8               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x00f2, t01=0x00c8}
0x17ac8…17ae8               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x00f2, t01=0x00ee}
0x17ae8…17b16               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x00f2, t01=0x010e}
0x17b16…17b40               Head {h00=0x0026, h01=0x0050, text=»TPM DATA 0 IF =1 TRANSPARENT TEXT «, t00=0x00f2, t01=0x013c}
0x17b40…17b4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x0166}
0x17b4a…17b68               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x00f2, t01=0x0170}
0x17b68…17b94               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x00f2, t01=0x018e}
0x17b94…17bbe               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x00f3, t01=0x002a}
0x17bbe…17bde               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x00f3, t01=0x0054}
0x17bde…17c12               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x00f3, t01=0x0074}
0x17c12…17c3a               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x00f3, t01=0x00a8}
0x17c3a…17c6c               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x00f3, t01=0x00d0}
0x17c6c…17c94               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x00f3, t01=0x0102}
0x17c94…17cc4               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x00f3, t01=0x012a}
0x17cc4…17cce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x015a}
0x17cce…17cdc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f3, t01=0x0164}
0x17cdc…17ce6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x0172}
0x17ce6…17cf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x017c}
0x17cf0…17d12               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x00f3, t01=0x0186}
0x17d12…17d1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x0018}
0x17d1c…17d26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x0022}
0x17d26…17d4a               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x00f4, t01=0x002c}
0x17d4a…17d7a               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x00f4, t01=0x0050}
0x17d7a…17da4               Head {h00=0x0026, h01=0x0050, text=»DCLCI DATA 0 DC UNIT INPUT STATUS «, t00=0x00f4, t01=0x0080}
0x17da4…17db0               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00f4, t01=0x00aa}
0x17db0…17db4               Head {h00=0x4004, h01=0x0000}
0x17db4…17db8               00 f4 00 b6                                                                                                                                                                                                                                       ┆    ┆
0x17db8…17dc0 (245, 1, 8)   20 04 00 00 00 f5 00 04                                                                                                                                                                                                                           ┆        ┆
0x17dc0…17e10 (246, 0, 400) 55 45 55 45 20 41 4e 43 48 4f 52 5c 00 75 01 7c 00 12 00 50 5c 4c 44 4b 5c 41 34 2c 44 57 54 4f 50 45 00 76 00 14 00 0e 00 50 5c 52 42 5c 52 45 4d 30 36 20 00 76 00 2a 00 08 00 50 5c 58 49 46 00 76 00 3c 00 0a 00 50 5c 45 4a 45 43 54 00 76   ┆UEUE ANCHOR  u |   P LDK A4,DWTOPE v     P RB REM06  v *   P XIF v <   P EJECT v┆
0x17e10…17e60               00 48 00 06 00 50 2a 20 00 76 00 56 00 06 00 50 2a 20 00 76 00 60 00 24 00 50 2a 5c 51 55 45 55 45 20 41 4c 4c 4f 43 41 54 45 44 20 52 45 43 45 49 56 45 20 42 55 46 46 45 52 00 76 00 6a 00 06 00 50 2a 20 00 76 00 92 00 14 00 50 2a 5c 41 34   ┆ H   P*  v V   P*  v ` $ P* QUEUE ALLOCATED RECEIVE BUFFER v j   P*  v     P* A4┆
0x17e60…17eb0               3d 42 55 46 46 45 52 20 41 44 44 52 00 76 00 9c 00 16 00 50 2a 5c 41 32 2c 41 33 20 44 45 53 54 52 4f 59 45 44 20 00 76 00 b4 00 06 00 50 2a 20 00 76 00 ce 00 10 00 50 51 52 42 55 46 5c 45 51 55 5c 2a 20 00 76 00 d8 00 0e 00 50 5c 53 55 4b   ┆=BUFFER ADDR v     P* A2,A3 DESTROYED  v     P*  v     PQRBUF EQU *  v     P SUK┆
0x17eb0…17f00               5c 41 34 2c 36 20 00 76 00 ec 00 2a 00 50 5c 4c 44 4b 5c 41 32 2c 44 57 54 49 50 43 5c 53 45 54 20 42 55 46 46 45 52 20 51 55 45 55 45 20 44 49 53 50 2e 20 00 76 00 fe 00 0e 00 50 5c 41 44 52 5c 41 32 2c 41 36 00 76 01 2c 00 10 00 50 51 52   ┆ A4,6  v   * P LDK A2,DWTIPC SET BUFFER QUEUE DISP.  v     P ADR A2,A6 v ,   PQR┆
0x17f00…17f50               31 30 30 5c 45 51 55 5c 2a 20 00 76 01 3e 00 10 00 50 5c 4c 44 52 2a 5c 41 33 2c 41 32 20 00 76 01 52 00 24 00 50 5c 52 46 28 5a 29 5c 51 52 32 30 30 5c 45 4e 44 20 4f 46 20 51 55 45 55 45 20 46 4f 55 4e 44 20 00 76 01 66 00 0e 00 50 5c 4c   ┆100 EQU *  v >   P LDR* A3,A2  v R $ P RF(Z) QR200 END OF QUEUE FOUND  v f   P L┆
0x17f50…17fa0 (247, 0, 400) 44 52 5c 41 32 2c 41 33 00 76 01 8e 00 0e 00 50 5c 52 42 5c 51 52 31 30 30 20 00 77 00 10 00 26 00 50 51 52 32 30 30 5c 53 54 52 5c 41 34 2c 41 32 5c 49 4e 53 45 52 54 20 49 4e 54 4f 20 51 55 45 55 45 20 00 77 00 22 00 22 00 50 5c 43 4d 52   ┆DR A2,A3 v     P RB QR100  w   & PQR200 STR A4,A2 INSERT INTO QUEUE  w " " P CMR┆
0x17fa0…17ff0               5c 41 34 5c 49 4e 44 49 43 41 54 45 20 45 4e 44 20 4f 46 20 51 55 45 55 45 20 00 77 00 4c 00 0c 00 50 5c 52 54 4e 5c 41 35 20 00 77 00 72 00 0a 00 50 5c 45 4a 45 43 54 00 77 00 82 00 06 00 50 2a 20 00 77 00 90 00 06 00 50 2a 20 00 77 00 9a   ┆ A4 INDICATE END OF QUEUE  w L   P RTN A5  w r   P EJECT w     P*  w     P*  w  ┆
0x17ff0…18040               00 1a 00 50 2a 5c 53 54 4f 52 45 20 52 45 47 49 53 54 45 52 20 41 33 2d 41 38 00 77 00 a4 00 24 00 50 2a 5c 43 41 4c 4c 49 4e 47 20 53 45 51 55 45 4e 53 45 3a 20 43 46 20 41 31 35 2c 53 54 52 45 47 00 77 00 c2 00 06 00 50 2a 20 00 77 00 ea   ┆   P* STORE REGISTER A3-A8 w   $ P* CALLING SEQUENSE: CF A15,STREG w     P*  w  ┆
0x18040…18090               00 14 00 50 53 54 52 45 47 5c 53 54 5c 41 33 2c 4c 43 41 33 00 77 00 f4 00 10 00 50 5c 53 54 5c 41 34 2c 4c 43 41 34 20 00 77 01 0c 00 10 00 50 5c 53 54 5c 41 35 2c 4c 43 41 35 20 00 77 01 20 00 10 00 50 5c 53 54 5c 41 36 2c 4c 43 41 36 20   ┆   PSTREG ST A3,LCA3 w     P ST A4,LCA4  w     P ST A5,LCA5  w     P ST A6,LCA6 ┆
0x18090…180e0               00 77 01 34 00 10 00 50 5c 53 54 5c 41 37 2c 4c 43 41 37 20 00 77 01 48 00 10 00 50 5c 53 54 5c 41 38 2c 4c 43 41 38 20 00 77 01 5c 00 16 00 50 5c 52 46 5c 52 54 4e 41 31 35 5c 52 45 54 55 52 4e 20 00 77 01 70 00 06 00 50 2a 20 00 77 01 8a   ┆ w 4   P ST A7,LCA7  w H   P ST A8,LCA8  w     P RF RTNA15 RETURN  w p   P*  w  ┆
0x180e0…18130 (248, 0, 400) 00 06 00 50 2a 20 00 78 00 04 00 0e 00 50 2a 5c 52 45 53 54 4f 52 45 20 00 78 00 0e 00 24 00 50 2a 5c 43 41 4c 4c 49 4e 47 20 53 45 51 55 45 4e 43 45 3a 20 43 46 20 41 31 35 2c 4c 44 52 45 47 00 78 00 20 00 06 00 50 2a 20 00 78 00 48 00 14   ┆   P*  x     P* RESTORE  x   $ P* CALLING SEQUENCE: CF A15,LDREG x     P*  x H  ┆
0x18130…18180               00 50 4c 44 52 45 47 5c 4c 44 4b 4c 5c 41 33 2c 30 20 00 78 00 52 00 10 00 50 4c 43 41 33 5c 45 51 55 5c 2a 2d 32 00 78 00 6a 00 0e 00 50 5c 4c 44 4b 4c 5c 41 34 2c 30 00 78 00 7e 00 10 00 50 4c 43 41 34 5c 45 51 55 5c 2a 2d 32 00 78 00 90   ┆ PLDREG LDKL A3,0  x R   PLCA3 EQU *-2 x j   P LDKL A4,0 x ~   PLCA4 EQU *-2 x  ┆
0x18180…181d0               00 0e 00 50 5c 4c 44 4b 4c 5c 41 35 2c 30 00 78 00 a4 00 10 00 50 4c 43 41 35 5c 45 51 55 5c 2a 2d 32 00 78 00 b6 00 0e 00 50 5c 4c 44 4b 4c 5c 41 36 2c 30 00 78 00 ca 00 10 00 50 4c 43 41 36 5c 45 51 55 5c 2a 2d 32 00 78 00 dc 00 0e 00 50   ┆   P LDKL A5,0 x     PLCA5 EQU *-2 x     P LDKL A6,0 x     PLCA6 EQU *-2 x     P┆
0x181d0…18220               5c 4c 44 4b 4c 5c 41 37 2c 30 00 78 00 f0 00 10 00 50 4c 43 41 37 5c 45 51 55 5c 2a 2d 32 00 78 01 02 00 0e 00 50 5c 4c 44 4b 4c 5c 41 38 2c 30 00 78 01 16 00 10 00 50 4c 43 41 38 5c 45 51 55 5c 2a 2d 32 00 78 01 28 00 06 00 50 2a 20 00 78   ┆ LDKL A7,0 x     PLCA7 EQU *-2 x     P LDKL A8,0 x     PLCA8 EQU *-2 x (   P*  x┆
0x18220…18270               01 3c 00 06 00 50 2a 20 00 78 01 46 00 1e 00 50 2a 5c 5c 52 45 54 55 52 4e 20 56 49 41 20 52 45 47 49 53 54 45 52 20 31 35 20 00 78 01 50 00 06 00 50 2a 20 00 78 01 72 00 10 00 50 52 54 4e 41 31 35 5c 45 51 55 5c 2a 00 78 01 7c 00 10 00 50   ┆ <   P*  x F   P*  RETURN VIA REGISTER 15  x P   P*  x r   PRTNA15 EQU * x |   P┆
0x18270…182c0 (249, 0, 398) 5c 41 44 4b 4c 5c 41 31 35 2c 34 20 00 78 01 90 00 0e 00 50 5c 41 42 52 2a 5c 41 31 35 20 00 79 00 14 00 0a 00 50 5c 45 4a 45 43 54 00 79 00 26 00 06 00 50 2a 20 00 79 00 34 00 14 00 50 2a 5c 50 4f 4c 4c 20 54 49 4d 45 20 4f 55 54 20 00 79   ┆ ADKL A15,4  x     P ABR* A15  y     P EJECT y &   P*  y 4   P* POLL TIME OUT  y┆
0x182c0…18310               00 3e 00 06 00 50 2a 20 00 79 00 56 00 28 00 50 50 54 4f 55 54 5c 4c 44 4b 4c 5c 41 35 2c 53 54 42 5c 4c 4f 41 44 20 41 35 20 53 54 41 43 4b 20 42 41 53 45 00 79 00 60 00 22 00 50 5c 4c 44 52 5c 41 36 2c 41 31 5c 52 45 4c 4f 41 44 20 44 57   ┆ >   P*  y V ( PPTOUT LDKL A5,STB LOAD A5 STACK BASE y ` " P LDR A6,A1 RELOAD DW┆
0x18310…18360               54 20 41 44 44 52 45 53 53 20 00 79 00 8c 00 14 00 50 5c 4c 44 4b 4c 5c 41 37 2c 44 54 45 54 41 42 20 00 79 00 b2 00 12 00 50 5c 43 4d 5c 44 54 45 44 4c 53 2c 41 37 20 00 79 00 ca 00 12 00 50 5c 49 46 54 5c 53 54 54 53 54 53 3d 31 20 00 79   ┆T ADDRESS  y     P LDKL A7,DTETAB  y     P CM DTEDLS,A7  y     P IFT STTSTS=1  y┆
0x18360…183b0               00 e0 00 06 00 50 2a 20 00 79 00 f6 00 06 00 50 2a 20 00 79 01 00 00 1a 00 50 2a 5c 5c 43 4f 55 4e 54 20 50 4f 4c 4c 20 54 49 4d 45 20 4f 55 54 00 79 01 0a 00 06 00 50 2a 20 00 79 01 28 00 12 00 50 5c 4c 44 4b 5c 41 31 2c 43 53 53 58 43 33   ┆     P*  y     P*  y     P*  COUNT POLL TIME OUT y     P*  y (   P LDK A1,CSSXC3┆
0x183b0…183fe               00 79 01 32 00 12 00 50 5c 43 46 5c 41 31 35 2c 44 43 53 55 50 53 00 79 01 48 00 08 00 50 5c 58 49 46 00 79 01 5e 00 24 00 50 5c 43 46 5c 41 31 35 2c 53 50 4f 54 49 4d 5c 53 54 41 52 54 20 50 4f 4c 4c 20 54 49 4d 45 52 20 00 79 01 6a         ┆ y 2   P CF A15,DCSUPS y H   P XIF y ^ $ P CF A15,SPOTIM START POLL TIMER  y j┆
0x183fe…1844e (250, 0, 398) 00 0e 00 50 5c 41 42 4c 5c 54 44 49 53 50 00 7a 00 04 00 06 00 50 2a 20 00 7a 00 16 00 34 00 50 2a 5c 52 45 53 54 41 52 54 20 50 4f 4c 4c 20 54 49 4d 45 52 20 57 48 45 4e 20 50 4f 4c 4c 20 48 41 53 20 42 45 45 4e 20 52 45 43 45 49 56 45 44   ┆   P ABL TDISP z     P*  z   4 P* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED┆
0x1844e…1849e               00 7a 00 20 00 06 00 50 2a 20 00 7a 00 58 00 10 00 50 43 50 54 49 4d 5c 45 51 55 5c 2a 20 00 7a 00 62 00 16 00 50 5c 4c 44 4b 5c 41 32 2c 31 5c 49 4e 44 49 43 41 54 45 00 7a 00 76 00 22 00 50 5c 53 54 5c 41 32 2c 44 54 45 44 4c 53 2c 41 37   ┆ z     P*  z X   PCPTIM EQU *  z b   P LDK A2,1 INDICATE z v " P ST A2,DTEDLS,A7┆
0x1849e…184ee               5c 44 41 54 41 20 4c 49 4e 4b 20 55 50 20 00 7a 00 90 00 14 00 50 5c 4c 44 4b 4c 5c 41 32 2c 2d 54 49 4d 50 4f 4c 00 7a 00 b6 00 20 00 50 5c 53 54 2a 5c 41 32 2c 44 43 54 50 47 50 5c 52 45 53 54 41 52 54 20 54 49 4d 45 52 00 7a 00 ce 00 0c   ┆ DATA LINK UP  z     P LDKL A2,-TIMPOL z     P ST* A2,DCTPGP RESTART TIMER z    ┆
0x184ee…1853e               00 50 5c 52 54 4e 5c 41 35 20 00 7a 00 f2 00 06 00 50 2a 20 00 7a 01 02 00 16 00 50 2a 5c 53 54 41 52 54 20 50 4f 4c 4c 20 54 49 4d 45 52 00 7a 01 0c 00 06 00 50 2a 20 00 7a 01 26 00 10 00 50 53 50 4f 54 49 4d 5c 45 51 55 5c 2a 00 7a 01 30   ┆ P RTN A5  z     P*  z     P* START POLL TIMER z     P*  z &   PSPOTIM EQU * z 0┆
0x1853e…1858c               00 2c 00 50 5c 4c 44 52 5c 41 31 2c 41 36 5c 4c 4f 41 44 20 44 57 54 20 41 44 44 52 45 53 53 20 41 53 20 50 41 52 41 4d 45 54 45 52 00 7a 01 44 00 1e 00 50 5c 43 46 5c 41 31 35 2c 53 45 54 49 4d 45 5c 53 54 41 52 54 20 54 49 4d 45 52         ┆ , P LDR A1,A6 LOAD DWT ADDRESS AS PARAMETER z D   P CF A15,SETIME START TIMER┆
0x1858c…185dc (251, 0, 398) 00 7a 01 74 00 16 00 50 5c 44 41 54 41 5c 50 54 4f 55 54 2c 54 49 4d 50 4f 4c 00 7b 00 08 00 26 00 50 5c 53 54 5c 41 34 2c 44 43 54 50 47 50 5c 53 54 4f 52 45 20 54 49 4d 45 52 20 50 4f 49 4e 54 45 52 20 00 7b 00 22 00 16 00 50 5c 52 42 5c   ┆ z t   P DATA PTOUT,TIMPOL {   & P ST A4,DCTPGP STORE TIMER POINTER  { "   P RB ┆
0x185dc…1862c               52 54 4e 41 31 35 5c 52 45 54 55 52 4e 20 00 7b 00 4c 00 0a 00 50 5c 45 4a 45 43 54 00 7b 00 66 00 06 00 50 2a 20 00 7b 00 74 00 1c 00 50 2a 5c 53 54 41 52 54 20 50 52 4f 43 45 44 55 52 45 20 54 49 4d 45 52 20 00 7b 00 7e 00 06 00 50 2a 20   ┆RTNA15 RETURN  { L   P EJECT { f   P*  { t   P* START PROCEDURE TIMER  { ~   P* ┆
0x1862c…1867c               00 7b 00 9e 00 10 00 50 53 50 54 49 4d 5c 45 51 55 5c 2a 20 00 7b 00 a8 00 24 00 50 5c 4c 44 52 5c 41 31 2c 41 36 5c 4c 4f 41 44 20 44 57 54 20 41 53 20 50 41 52 41 4d 45 54 45 52 00 7b 00 bc 00 12 00 50 5c 43 46 5c 41 31 35 2c 53 45 54 49   ┆ {     PSPTIM EQU *  {   $ P LDR A1,A6 LOAD DWT AS PARAMETER {     P CF A15,SETI┆
0x1867c…186cc               4d 45 00 7b 00 e4 00 18 00 50 5c 44 41 54 41 5c 50 52 54 4f 55 54 2c 54 49 4d 50 52 4f 20 00 7b 00 fa 00 24 00 50 5c 53 54 5c 41 34 2c 44 43 54 50 50 5c 53 41 56 45 20 54 49 4d 45 52 20 50 4f 49 4e 54 45 52 20 00 7b 01 16 00 0c 00 50 5c 52   ┆ME {     P DATA PRTOUT,TIMPRO  {   $ P ST A4,DCTPP SAVE TIMER POINTER  {     P R┆
0x186cc…1871a               54 4e 5c 41 35 20 00 7b 01 3e 00 06 00 50 2a 20 00 7b 01 4e 00 18 00 50 2a 5c 50 52 4f 43 45 44 55 52 45 20 54 49 4d 45 4f 55 54 20 00 7b 01 58 00 06 00 50 2a 20 00 7b 01 74 00 14 00 50 50 52 54 4f 55 54 5c 43 4d 5c 44 43 54 50 50 20         ┆TN A5  { >   P*  { N   P* PROCEDURE TIMEOUT  { X   P*  { t   PPRTOUT CM DCTPP ┆
0x1871a…1876a (252, 0, 400) 00 7b 01 7e 00 18 00 50 5c 4c 44 52 5c 41 36 2c 41 31 5c 52 45 4c 4f 41 44 20 41 36 00 7c 00 08 00 20 00 50 5c 4c 44 4b 4c 5c 41 35 2c 53 54 42 5c 4c 4f 41 44 20 53 54 41 43 4b 20 42 41 53 45 00 7c 00 24 00 14 00 50 5c 4c 44 4b 4c 5c 41 37   ┆ { ~   P LDR A6,A1 RELOAD A6 |     P LDKL A5,STB LOAD STACK BASE | $   P LDKL A7┆
0x1876a…187ba               2c 44 54 45 54 41 42 20 00 7c 00 48 00 12 00 50 5c 49 46 54 5c 53 54 54 53 54 53 3d 31 20 00 7c 00 60 00 06 00 50 2a 20 00 7c 00 76 00 06 00 50 2a 20 00 7c 00 80 00 20 00 50 2a 5c 5c 43 4f 55 4e 54 20 50 52 4f 43 45 44 55 52 45 20 54 49 4d   ┆,DTETAB  | H   P IFT STTSTS=1  | `   P*  | v   P*  |     P*  COUNT PROCEDURE TIM┆
0x187ba…1880a               45 20 4f 55 54 20 00 7c 00 8a 00 06 00 50 2a 20 00 7c 00 ae 00 12 00 50 5c 4c 44 4b 5c 41 31 2c 43 53 53 58 43 32 00 7c 00 b8 00 12 00 50 5c 43 46 5c 41 31 35 2c 44 43 53 55 50 53 00 7c 00 ce 00 08 00 50 5c 58 49 46 00 7c 00 e4 00 2c 00 50   ┆E OUT  |     P*  |     P LDK A1,CSSXC2 |     P CF A15,DCSUPS |     P XIF |   , P┆
0x1880a…1885a               5c 43 46 5c 41 35 2c 43 48 41 4c 54 49 5c 48 41 4c 54 20 49 4e 50 55 54 20 49 46 20 4f 50 45 4e 5c 53 41 4c 43 55 5a 20 00 7c 00 f0 00 10 00 50 5c 4c 44 5c 41 31 2c 58 41 43 4b 20 00 7c 01 20 00 22 00 50 5c 52 46 28 5a 29 5c 50 52 54 31 30   ┆ CF A5,CHALTI HALT INPUT IF OPEN SALCUZ  |     P LD A1,XACK  |   " P RF(Z) PRT10┆
0x1885a…188aa               5c 41 43 4b 20 4e 4f 54 20 45 58 50 45 43 54 45 44 20 00 7c 01 34 00 1a 00 50 5c 43 46 5c 41 35 2c 54 52 45 4e 51 5c 53 45 4e 44 20 45 4e 51 20 00 7c 01 5a 00 26 00 50 5c 43 46 5c 41 35 2c 53 50 54 49 4d 5c 53 54 41 52 54 20 50 52 4f 43 45   ┆ ACK NOT EXPECTED  | 4   P CF A5,TRENQ SEND ENQ  | Z & P CF A5,SPTIM START PROCE┆

Reduced view