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

⟦e01fb690e⟧

    Length: 93942 (0x16ef6)
    Notes: pts_type(SC)
    Names: »XXXX15.SC«

Derivation

└─⟦928b1fd3e⟧ Bits:30009671 Philips computer tape "600131"
    └─⟦this⟧ »DRDC15/XXXX15.SC« 

PTS(SC)

	IDENT	DRDC15	REL 11.0 81-01-26 870105041100

* 
* 
********************************************* 
* 
*   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	X:A 
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	X:D
X:E	EQU	0	READ COMMAND HANDLING IF=1
RCOM	EQU	X:E
X:F	EQU	254	TRANSMIT BLOCK LENGTH 
TBLEN	EQU	X:F 
X:G	EQU	0	CODE , 0=ASCII , 1=EBCDIC 
CODE	EQU	X:G
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	X:I 
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	X:K
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	X:P
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	X:S	MMU BUFFER LENGTH 
BINTRM	EQU	0	IF 1 BINARY TRANSMISSION 
DMRK	EQU	0	SPECIAL CONDITION FOR DENMARK
NOWACK	EQU	0	WHEN WORKING WITH A MAIN-FRAME THAT
			DOESN'T ACCEPT WACK RESPONSE TO A SELECT 
			SEQUENCE, NOWACK SHOULD BE SET TO "ONE". 
			ONLY WORKING IF STAT IS SET TO "ONE".
* 
	IFT	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	0
* 
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	1
* 
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	/43	RESET STATISTICS AFTER READ 
	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	/40 
ACK0	EQU	/18
ACK1	EQU	/2F
SYNEBC	EQU	/32
ENQEBC	EQU	/2D
ETBEBC	EQU	/26
	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 : NO STATUS,DB,DE,DB+DE 
* 
* 
	DATA	/4248 
	DATA	/4242 
* 
NOIR	EQU	/20	S/S 1 : NO INTERVENTION REQUIRED 
IR	EQU	/26	S/S 1 : INTERVENTION REQUIRED
	XIF
* 
* 
*	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
	IM	DTESTA,A7	SET OPEN STATUS 
	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	*
	CMR	A7	REMOVE NETWORK ADDRESS
	CM	DTESTA,A7	CLEAR STATUS
	LDR	A6,A8	GET REQUESTING DWT ADDR
	LD	A8,DWTECB,A6	RESTORE ECB ADDRESS
	ABL	RTOK	RETURN : OK 
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 (LEFTMOST 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)	RTSEQ	YES, RETURN: SEQUENCE ERROR 
	IFF	MMUPAG=0 
	LDKL	A4,MMUBUF	MMU BUFFER ADDRESS
	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
	LDR*	A2,A4	GET SYMBOLIC ADDRESS
	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
* 
	IFT MESPAS=1 
	LDK	A2,/40	OPTION CODE 
	CC	A2,DWTOPT,A6	DISCARD DWT
	RF(NZ)	RQCN40	NO 
	LD	A1,DTEDDT,A7	POINTER TO DISCARD DWT 
	RF(NZ)	RQCN50
	ST	A6,DTEDDT,A7	SAVE POINTER TO DISCARD DWT
	RF	RQCN60
	XIF
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
	IFT	RCOM=1 
	LD	A3,ECBBA,A8	SAVE BUFFER ADDRESS 
	ST	A3,DWTBUF,A6	IN THE DWT 
	LD	A3,ECBRL,A8	SAVE THE CURSOR 
	ST	A3,DWTCUR,A6	ADDRESS IN THE DWT 
	XIF
	IFT	STARVI=1 
	LDK	A1,4	STORE DEVICE
	ORS	A1,DWTST,A6	END IN THE DWT 
	CF	A15,INSSQ	INSERT DWT IN STATUS QUEUE
	XIF
* 
*	START POLL TIMER
* 
	LD	A2,DCTPGP	POLL TIMER POINTER
	RF(Z)	RQCN70	TIMER ALREADY STARTED 
	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,3	MASK DB,IR
	RF(NZ)	RQST90	NOT DE 
	LD	A1,DWTST,A6	GET DEVICE STATUS 
	ANK	A1,9 
	RF(NZ)	RQST90	WACK HAS BEEN SENT 
	CF	A15,INSSQ	INSERT DWT IN STATUS QUEUE
	LDK	A1,4	SET DE
RQST90	EQU	*
	ST	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 
	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 
	CMR	A2	KILL TIMER
	CM	DWTRTP,A6 
	LDR*	A2,A2 
	NGR	A2,A2	GET REMAINING TIME 
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	LDKL	A2,DCSTQ	GET QUEUE ANCHOR
	LDK	A4,DWTOPE
	RB	INSWQ2
* 
* 
*	REMOVE DWT FROM STATUS QUEUE
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
REMOVS	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 
	RF	BRM	CONNECT MODEM 


* 
* 
*   MODEM-CONNECT TIMEOUT 
* 

DTE:10	LDR	A6,A1	DWT ADDRESS
	LDKL	A7,DTETAB 
	ABL	RQOP90	COMPLETE REQUEST
	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	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
	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)	BRM120	INVALID SEQUENCE 
	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)	BRM120	INVALID SEQUENCE 
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) 
	LDR	A6,A3	LOAD DWT TO A6 
	RB(Z)	BRM	INVALID POLL 
* 
	EJECT
* 
* 
*	SPECIFIC POLL HAS BEEN RECEIVED 
* 
* 
	IFF	STARVI+SPECP=0 
	LD	A1,XACK	
	RF(NZ)	POL100	ACK EXPECTED 
	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
POL100	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 
	SUK	A3,2	SKIP FIRST WORD OF BUFFER 
	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
	ANK	A1,1 
	RF(Z)	SEL120	NO PENDING STATUS 
	CF	A5,TRRVI	SEND RVI 
	XIF
	IFF	STARVI=1 
	RF	SEL120
	XIF
SEL110	EQU	*
	ABL	BRM
SEL120	EQU	*
	IFT	STARVI+NOWACK=1
	ANK	A3,8 
	RF(NZ)	SEL140	BUSY 
	XIF
	IFT	STARVI+NOWACK=2
	ANK	A3,8 
	RF(Z)	SEL130	DEVICE NOT BUSY 
	CF	A5,TRWACK	TRANSMIT WACK 
	ABL	BRM
SEL130	EQU	*
	XIF
	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	*
	IFF	STARVI+NOWACK=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
	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	*
	LDK	A1,0	RESET RETURN CODE 
	LD	A8,DWTECB,A6	GET ECB ADDRESS
	LD	A3,-4,A4	GET LENGTH 
	ST	A3,ECBEL,A8	STORE EFFECTIVE LENGTH
	CF	A15,CTIME	STOP REQUEST TIMING 
	ST	A2,ECBCW1,A8	STORE REMAINING TIME 
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 
	IFT	MESPAS=1 
	CW	A6,DTEDDT,A7	DDT-DWT ?
	RF(NE)	STX245	NO 
	LD	A1,DWTLAD,A6	SYMBOLIC DTE-ADDRESS 
	LDR*	A2,A6	GET SUB-ADDRESS 
	IFT	CODE=1 
	LC	A2,TEBCDIC,A2	TRANSLATE TO EBCDIC 
	XIF
	IFT	MESPAS=1 
	CF	A15,GETSSA	GET SYMBOLIC SUB-ADDRESS 
	ST	A1,ECBCW2,A8	TO USER
STX245	EQU	*
	XIF
	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
	ST	A2,ECBCW1,A8
	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 
	STR	A1,A4
	CF	A5,READP	8-BIT CHAR GET NEXT PART 
	RF(NZ)	RDM120	PARITY ERROR 
	SUK	A2,/20	ASSEMBLE TO ONE CHARACTER 
	ORR*	A2,A4 
	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
	ADK	A4,2	SKIP FIRST WORD OF BUFFER 
	LDK	A3,0	RESET CHARACTER COUNTER 
	LD	A1,FBAX	GET BUFFER INDEX
	RF(NZ)	TRT100	NOT FIRST BLOCK
	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	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 
	RF(NA)	CSYN:I
	LDK	A1,1 
	ST	A1,DTEPLS,A7	OPERABLE 
	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 
	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
	CF	A5,READ	WAIT FOR INTERRUPT
	XIF
	SST	A2,LCUUT	GET STATUS
	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 
	CF	A5,CRCCAL	CALCULATE CRC 
	LC	A2,TASCII,A2	TRANSLATE TO ASCII 
	XIF
IHLC10	EQU	*
	LDR	A1,A2
	ORKL	A1,/FF00	SET FLAG FOR CARRIER ON
	ST	A1,DCLCI	SET INPUT ACTIV FLAG 
	CM	DCSTCU	CLEAR SST SAVE 
	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	*
	CM	DTEPLS,A7	CLEAR PHYS. LINK STATUS 
	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	*
	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	*
	XIF
	IFT	MESPAS=1 
	LD	A6,DTEDDT,A7	GET DISCARD DWT ADDR 
	RF(Z)	DC1530	THERE IS NONE 
	LDK	A5,4	LOAD DEVICE END 
	ORS	A5,DWTST,A6	STORE IT 
	CF	A15,INSSQ	INSERT DWT IN STATUS QUEUE
DC1530	EQU	*
	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
	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…00034 (0, 0, 400)   Head {h00=0x0030, h01=0x0050, text=» IDENT DRDC15 REL 11.0 81-01-26 870105041100«, t00=0x0000, t01=0x0004}
0x00034…0003c               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x0003c…00046               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0040}
0x00046…00050               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004a}
0x00050…00086               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0000, t01=0x0054}
0x00086…00090               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008a}
0x00090…000b8               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0094}
0x000b8…000c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00bc}
0x000c2…000f0               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0000, t01=0x00c6}
0x000f0…00122               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0000, t01=0x00f4}
0x00122…00146               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0000, t01=0x0126}
0x00146…00150               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014a}
0x00150…0015a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0154}
0x0015a…00164               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015e}
0x00164…0016e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0168}
0x0016e…00178               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0172}
0x00178…001b4               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x017c}
0x001b4…001c2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0028}
0x001c2…001cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0036}
0x001cc…001d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0040}
0x001d6…001ec               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0001, t01=0x004a}
0x001ec…001f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0060}
0x001f6…0022c               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0001, t01=0x006a}
0x0022c…00252               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0001, t01=0x00a0}
0x00252…00278               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0001, t01=0x00c6}
0x00278…0029e               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0001, t01=0x00ec}
0x0029e…002be               Head {h00=0x001c, h01=0x0050, text=» ENTRY DW1500 DUMMY DWT «, t00=0x0001, t01=0x0112}
0x002be…002c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0132}
0x002c8…002d6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x013c}
0x002d6…002e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014a}
0x002e0…002ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0154}
0x002ea…00308               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0001, t01=0x015e}
0x00308…00312               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x017c}
0x00312…00338               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0001, t01=0x0186}
0x00338…00364               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0002, t01=0x001c}
0x00364…0038c               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0002, t01=0x0048}
0x0038c…003ac               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0002, t01=0x0070}
0x003ac…003ce               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTCHP DWT ADDRESS «, t00=0x0002, t01=0x0090}
0x003ce…003ee               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0002, t01=0x00b2}
0x003ee…0040c               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0002, t01=0x00d2}
0x0040c…0042a               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0002, t01=0x00f0}
0x0042a…0044c               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTOPT OPTION CODE «, t00=0x0002, t01=0x010e}
0x0044c…00472               Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTUEC USER ECB IF MMU «, t00=0x0002, t01=0x0130}
0x00472…00490               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTMEC MMU ECB «, t00=0x0002, t01=0x0156}
0x00490…004ae               Head {h00=0x001a, h01=0x0050, text=» EXTRN ECBFC FILE CODE«, t00=0x0002, t01=0x0174}
0x004ae…004d2 (3, 0, 400)   Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBBA BUFFER ADDRESS «, t00=0x0003, t01=0x0004}
0x004d2…004f8               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBRL REQUESTED LENGTH «, t00=0x0003, t01=0x0028}
0x004f8…0051e               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBEL EFFECTIVE LENGTH «, t00=0x0003, t01=0x004e}
0x0051e…00542               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBCW1 CONTROL WORD 1«, t00=0x0003, t01=0x0074}
0x00542…00566               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBCW2 CONTROL WORD 2«, t00=0x0003, t01=0x0098}
0x00566…0057c               Head {h00=0x0012, h01=0x0050, text=» EXTRN GETSSA «, t00=0x0003, t01=0x00bc}
0x0057c…005aa               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0003, t01=0x00d2}
0x005aa…005d6               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0003, t01=0x0100}
0x005d6…00602               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0003, t01=0x012c}
0x00602…00634               Head {h00=0x002e, h01=0x0050, text=» EXTRN DCSRED READ STATISTICS ENTRY POINT «, t00=0x0003, t01=0x0158}
0x00634…00672               Head {h00=0x003a, h01=0x0050, text=» EXTRN DCSRLL RESET ALL STATISTICS BUFFERS ENTRY POINT«, t00=0x0003, t01=0x018a}
0x00672…006b0               Head {h00=0x003a, h01=0x0050, text=» EXTRN DCSUPS UPDATE STATISTICS ENTRY POINT IN DCSTAT «, t00=0x0004, t01=0x0038}
0x006b0…006ec               Head {h00=0x0038, h01=0x0050, text=» EXTRN GETDNA VALIDATE AND CONVERT SYMBOLIC DTE ADDR«, t00=0x0004, t01=0x0076}
0x006ec…00728               Head {h00=0x0038, h01=0x0050, text=» EXTRN GETSNA VALIDATE AND CONVERT SYMBOLIC SUB ADDR«, t00=0x0004, t01=0x00b2}
0x00728…00756               Head {h00=0x002a, h01=0x0050, text=» EXTRN DC:MIN MOVE DATA TO USER BUFFER«, t00=0x0004, t01=0x00ee}
0x00756…00786               Head {h00=0x002c, h01=0x0050, text=» EXTRN DC:MOT MOVE DATA FROM USER BUFFER«, t00=0x0004, t01=0x011c}
0x00786…007ba               Head {h00=0x0030, h01=0x0050, text=» EXTRN DISEND COMPLETE REQUEST AND DISPATCH «, t00=0x0004, t01=0x014c}
0x007ba…007e8               Head {h00=0x002a, h01=0x0050, text=» EXTRN PFPOST WAIT FOR POWER UP IF SET«, t00=0x0004, t01=0x0180}
0x007e8…007f8               Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x0005, t01=0x001e}
0x007f8…00846               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0005, t01=0x002e}
0x00846…00850               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x007c}
0x00850…0086a               Head {h00=0x0016, h01=0x0050, text=»* REGISTER USAGE: «, t00=0x0005, t01=0x0086}
0x0086a…00874               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a0}
0x00874…00894               Head {h00=0x001c, h01=0x0050, text=»* A1 WORK (RETURN CODE) «, t00=0x0005, t01=0x00aa}
0x00894…008a6               Head {h00=0x000e, h01=0x0050, text=»* A2 WORK «, t00=0x0005, t01=0x00ca}
0x008a6…008c8               Head {h00=0x001e, h01=0x0050, text=»* A3 WORK (BUFFER LENGTH) «, t00=0x0005, t01=0x00dc}
0x008c8…008ea               Head {h00=0x001e, h01=0x0050, text=»* A4 WORK (BUFFER POINTER)«, t00=0x0005, t01=0x00fe}
0x008ea…0090c               Head {h00=0x001e, h01=0x0050, text=»* A5 DRIVER STACK POINTER «, t00=0x0005, t01=0x0120}
0x0090c…00924               Head {h00=0x0014, h01=0x0050, text=»* A6 DWT ADDRESS«, t00=0x0005, t01=0x0142}
0x00924…0094c               Head {h00=0x0024, h01=0x0050, text=»* A7 ORDER CODE, DTETAB ADDRESS «, t00=0x0005, t01=0x015a}
0x0094c…00964               Head {h00=0x0014, h01=0x0050, text=»* A8 ECB ADDRESS«, t00=0x0005, t01=0x0182}
0x00964…0096e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x000a}
0x0096e…009be               Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0006, t01=0x0014}
0x009be…009cc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0064}
0x009cc…00a0c               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0006, t01=0x0072}
0x00a0c…00a16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b2}
0x00a16…00a44               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0006, t01=0x00bc}
0x00a44…00a4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ea}
0x00a4e…00a58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f4}
0x00a58…00a82               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 1000 RECEIVE BUFFER LENGTH«, t00=0x0006, t01=0x00fe}
0x00a82…00a98               Head {h00=0x0012, h01=0x0050, text=»RBUFL EQU X:A «, t00=0x0006, t01=0x0128}
0x00a98…00ac0               Head {h00=0x0024, h01=0x0050, text=»X:B EQU 0 IF 1 INTERRUPT LOGGING«, t00=0x0006, t01=0x013e}
0x00ac0…00ad4               Head {h00=0x0010, h01=0x0050, text=»LOGG EQU X:B«, t00=0x0006, t01=0x0166}
0x00ad4…00afa               Head {h00=0x0022, h01=0x0050, text=»X:C EQU 600 POLL TIMEOUT VALUE«, t00=0x0006, t01=0x017a}
0x00afa…00b10               Head {h00=0x0012, h01=0x0050, text=»TIMPOL EQU X:C«, t00=0x0007, t01=0x0010}
0x00b10…00b3e               Head {h00=0x002a, h01=0x0050, text=»X:D EQU 0 STATUS AND RVI HANDLING IF=1«, t00=0x0007, t01=0x0026}
0x00b3e…00b54               Head {h00=0x0012, h01=0x0050, text=»STARVI EQU X:D«, t00=0x0007, t01=0x0054}
0x00b54…00b80               Head {h00=0x0028, h01=0x0050, text=»X:E EQU 0 READ COMMAND HANDLING IF=1«, t00=0x0007, t01=0x006a}
0x00b80…00b94               Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:E«, t00=0x0007, t01=0x0096}
0x00b94…00bbe               Head {h00=0x0026, h01=0x0050, text=»X:F EQU 254 TRANSMIT BLOCK LENGTH «, t00=0x0007, t01=0x00aa}
0x00bbe…00bd4               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU X:F «, t00=0x0007, t01=0x00d4}
0x00bd4…00c00               Head {h00=0x0028, h01=0x0050, text=»X:G EQU 0 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0007, t01=0x00ea}
0x00c00…00c14               Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:G«, t00=0x0007, t01=0x0116}
0x00c14…00c42               Head {h00=0x002a, h01=0x0050, text=»X:H EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0007, t01=0x012a}
0x00c42…00c58               Head {h00=0x0012, h01=0x0050, text=»SPECP EQU X:H «, t00=0x0007, t01=0x0158}
0x00c58…00c88               Head {h00=0x002c, h01=0x0050, text=»X:I EQU 0 IF = 1 LINE SPEED SET TO HIGH «, t00=0x0007, t01=0x016e}
0x00c88…00cb4               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x0008, t01=0x000e}
0x00cb4…00cca               Head {h00=0x0012, h01=0x0050, text=»SPEED EQU X:I «, t00=0x0008, t01=0x003a}
0x00cca…00cf8               Head {h00=0x002a, h01=0x0050, text=»X:J EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x0008, t01=0x0050}
0x00cf8…00d0c               Head {h00=0x0010, h01=0x0050, text=»MSV1 EQU X:J«, t00=0x0008, t01=0x007e}
0x00d0c…00d3e               Head {h00=0x002e, h01=0x0050, text=»X:K EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x0008, t01=0x0092}
0x00d3e…00d54               Head {h00=0x0012, h01=0x0050, text=»RBUFNR EQU X:K«, t00=0x0008, t01=0x00c4}
0x00d54…00d86               Head {h00=0x002e, h01=0x0050, text=»X:L EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x0008, t01=0x00da}
0x00d86…00d9c               Head {h00=0x0012, h01=0x0050, text=»P6805 EQU X:L «, t00=0x0008, t01=0x010c}
0x00d9c…00db0               Head {h00=0x0010, h01=0x0050, text=»X:M EQU /02 «, t00=0x0008, t01=0x0122}
0x00db0…00dc4               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0008, t01=0x0136}
0x00dc4…00df4               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU X:M DEVICE ADDRESS OF RECEIVER«, t00=0x0008, t01=0x014a}
0x00df4…00e00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0008, t01=0x017a}
0x00e00…00e14               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0008, t01=0x0186}
0x00e14…00e44               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x0009, t01=0x000a}
0x00e44…00e50               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x003a}
0x00e50…00e6c               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x0009, t01=0x0046}
0x00e6c…00eac               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x0009, t01=0x0062}
0x00eac…00ec2               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0009, t01=0x00a2}
0x00ec2…00ed6               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0009, t01=0x00b8}
0x00ed6…00f16               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x0009, t01=0x00cc}
0x00f16…00f2c               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x0009, t01=0x010c}
0x00f2c…00f3e               Head {h00=0x000e, h01=0x0050, text=»X:N EQU 0 «, t00=0x0009, t01=0x0122}
0x00f3e…00f70               Head {h00=0x002e, h01=0x0050, text=»IBMCHR EQU X:N IF 1 IBM CHARACTER HANDLING«, t00=0x0009, t01=0x0134}
0x00f70…00fa2               Head {h00=0x002e, h01=0x0050, text=»X:O EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x0009, t01=0x0166}
0x00fa2…00fb8               Head {h00=0x0012, h01=0x0050, text=»MESPAS EQU X:O«, t00=0x000a, t01=0x0008}
0x00fb8…00ff0               Head {h00=0x0034, h01=0x0050, text=»X:P EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000a, t01=0x001e}
0x00ff0…01006               Head {h00=0x0012, h01=0x0050, text=»EM3270 EQU X:P«, t00=0x000a, t01=0x0056}
0x01006…01018               Head {h00=0x000e, h01=0x0050, text=»X:Q EQU 0 «, t00=0x000a, t01=0x006c}
0x01018…01046               Head {h00=0x002a, h01=0x0050, text=»TPMODE EQU X:Q IF = 1 TRANSPARANT MODE«, t00=0x000a, t01=0x007e}
0x01046…01058               Head {h00=0x000e, h01=0x0050, text=»X:R EQU 0 «, t00=0x000a, t01=0x00ac}
0x01058…0108a               Head {h00=0x002e, h01=0x0050, text=»STTSTS EQU X:R IF = 1 STATISTICS INCLUDED «, t00=0x000a, t01=0x00be}
0x0108a…0109e               Head {h00=0x0010, h01=0x0050, text=»X:S EQU 500 «, t00=0x000a, t01=0x00f0}
0x0109e…010c6               Head {h00=0x0024, h01=0x0050, text=»TBUFL EQU X:S MMU BUFFER LENGTH «, t00=0x000a, t01=0x0104}
0x010c6…010f4               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000a, t01=0x012c}
0x010f4…01124               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 0 SPECIAL CONDITION FOR DENMARK«, t00=0x000a, t01=0x015a}
0x01124…0115c               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000a, t01=0x018a}
0x0115c…01190               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000b, t01=0x0032}
0x01190…011c4               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000b, t01=0x0066}
0x011c4…011f4               Head {h00=0x002c, h01=0x0050, text=»   ONLY WORKING IF STAT IS SET TO "ONE".«, t00=0x000b, t01=0x009a}
0x011f4…011fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ca}
0x011fe…01212               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x000b, t01=0x00d4}
0x01212…0122a               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x000b, t01=0x00e8}
0x0122a…01236               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0100}
0x01236…0124a               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x000b, t01=0x010c}
0x0124a…0125e               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x000b, t01=0x0120}
0x0125e…0126a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0134}
0x0126a…01278               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0140}
0x01278…01282               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x014e}
0x01282…0128c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0158}
0x0128c…012be               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000b, t01=0x0162}
0x012be…012c8 (12, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0004}
0x012c8…012e6               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000c, t01=0x000e}
0x012e6…012f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x002c}
0x012f0…01322               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x0036}
0x01322…0132c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0068}
0x0132c…0135e               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000c, t01=0x0072}
0x0135e…0138c               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000c, t01=0x00a4}
0x0138c…01396               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00d2}
0x01396…013aa               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x000c, t01=0x00dc}
0x013aa…013b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f0}
0x013b4…013be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00fa}
0x013be…013f8               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000c, t01=0x0104}
0x013f8…0142a               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000c, t01=0x013e}
0x0142a…01434               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0170}
0x01434…01448               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x000c, t01=0x017a}
0x01448…01452               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x018e}
0x01452…01486               Head {h00=0x0030, h01=0x0050, text=»DEVIND EQU 0 DEVICE INDEX DATA COMMUNICATION«, t00=0x000d, t01=0x0008}
0x01486…014b4               Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE«, t00=0x000d, t01=0x003c}
0x014b4…014be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x006a}
0x014be…014cc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0074}
0x014cc…014d6               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000d, t01=0x0082}
0x014d6…01504               Head {h00=0x002a, h01=0x0026, text=»**************************************«, t00=0x000d, t01=0x008c}
0x01504…0150e               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000d, t01=0x00ba}
0x0150e…01544               Head {h00=0x0032, h01=0x002d, text=»* DCDEFS  COMMON DEFS FOR DC DRIVERS/PACKAGES «, t00=0x000d, t01=0x00c4}
0x01544…0154e               Head {h00=0x0006, h01=0x000a, text=»* «, t00=0x000d, t01=0x00fa}
0x0154e…0157c               Head {h00=0x002a, h01=0x0026, text=»**************************************«, t00=0x000d, t01=0x0104}
0x0157c…01586               Head {h00=0x0006, h01=0x0001, text=»  «, t00=0x000d, t01=0x0132}
0x01586…015b6               Head {h00=0x002c, h01=0x0027, text=»*************************************** «, t00=0x000d, t01=0x013c}
0x015b6…015c0               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000d, t01=0x016c}
0x015c0…015e2               Head {h00=0x001e, h01=0x001a, text=»* TABLE AND PACKET LAYOUTS«, t00=0x000d, t01=0x0176}
0x015e2…015ec               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000e, t01=0x0008}
0x015ec…0161c               Head {h00=0x002c, h01=0x0027, text=»*************************************** «, t00=0x000e, t01=0x0012}
0x0161c…01626               Head {h00=0x0006, h01=0x0001, text=»  «, t00=0x000e, t01=0x0042}
0x01626…01630               Head {h00=0x0006, h01=0x0001, text=»  «, t00=0x000e, t01=0x004c}
0x01630…0163e               Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x000e, t01=0x0056}
0x0163e…0168c               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x000e, t01=0x0064}
0x0168c…01696               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000e, t01=0x00b2}
0x01696…016b6               Head {h00=0x001c, h01=0x0018, text=»* DWT, DEVICE WORK TABLE«, t00=0x000e, t01=0x00bc}
0x016b6…016c0               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000e, t01=0x00dc}
0x016c0…01710               Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x000e, t01=0x00e6}
0x01710…0171a               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000e, t01=0x0136}
0x0171a…0173c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x000e, t01=0x0140}
0x0173c…0175e               Head {h00=0x001e, h01=0x0050, text=»*   0 .  DWTCHP         . «, t00=0x000e, t01=0x0162}
0x0175e…01780               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x000e, t01=0x0184}
0x01780…017a2               Head {h00=0x001e, h01=0x0050, text=»*   2 .  DWTST          . «, t00=0x000f, t01=0x0016}
0x017a2…017c4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x000f, t01=0x0038}
0x017c4…017e6               Head {h00=0x001e, h01=0x0050, text=»*   4 .  DWTECB         . «, t00=0x000f, t01=0x005a}
0x017e6…01808               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x000f, t01=0x007c}
0x01808…0182a               Head {h00=0x001e, h01=0x0050, text=»*   6 . DWTOPT . DWTOR  . «, t00=0x000f, t01=0x009e}
0x0182a…0184c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x000f, t01=0x00c0}
0x0184c…0186e               Head {h00=0x001e, h01=0x0050, text=»*   8 .  DWTADR         . «, t00=0x000f, t01=0x00e2}
0x0186e…01890               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x000f, t01=0x0104}
0x01890…018b2               Head {h00=0x001e, h01=0x0050, text=»*  10 .  DWTTAB         . «, t00=0x000f, t01=0x0126}
0x018b2…018d4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x000f, t01=0x0148}
0x018d4…018f6               Head {h00=0x001e, h01=0x0050, text=»*  12 .  DWTWAT         . «, t00=0x000f, t01=0x016a}
0x018f6…01918               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x000f, t01=0x018c}
0x01918…0193a               Head {h00=0x001e, h01=0x0050, text=»*  14 .  DWTTQ          . «, t00=0x0010, t01=0x001e}
0x0193a…0195c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0010, t01=0x0040}
0x0195c…0198c               Head {h00=0x002c, h01=0x0050, text=»* (16).  DWTUEC         .   IF   MMUPAG «, t00=0x0010, t01=0x0062}
0x0198c…019ae               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0010, t01=0x0092}
0x019ae…019de               Head {h00=0x002c, h01=0x0050, text=»* (18).  DWTMEC         .   IF   MMUPAG «, t00=0x0010, t01=0x00b4}
0x019de…01a00               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0010, t01=0x00e4}
0x01a00…01a28               Head {h00=0x0024, h01=0x0050, text=»* DWTDRD  +2 .  DWTSTB         .«, t00=0x0010, t01=0x0106}
0x01a28…01a50               Head {h00=0x0024, h01=0x0050, text=»*            ...................«, t00=0x0010, t01=0x012e}
0x01a50…01a72               Head {h00=0x001e, h01=0x0050, text=»*  +4 .  DWTCHD         . «, t00=0x0010, t01=0x0156}
0x01a72…01a94               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0010, t01=0x0178}
0x01a94…01ab6               Head {h00=0x001e, h01=0x0050, text=»*  +6 .  DWTCHN         . «, t00=0x0011, t01=0x000a}
0x01ab6…01ad8               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x002c}
0x01ad8…01afa               Head {h00=0x001e, h01=0x0050, text=»*  +8 .  DWTLAD         . «, t00=0x0011, t01=0x004e}
0x01afa…01b1c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x0070}
0x01b1c…01b3e               Head {h00=0x001e, h01=0x0050, text=»* +10 .  DWTRAD         . «, t00=0x0011, t01=0x0092}
0x01b3e…01b60               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x00b4}
0x01b60…01b82               Head {h00=0x001e, h01=0x0050, text=»* +12 .  DWTDR1/SUB     . «, t00=0x0011, t01=0x00d6}
0x01b82…01ba4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x00f8}
0x01ba4…01bc6               Head {h00=0x001e, h01=0x0050, text=»* +14 .  DWTRCL         . «, t00=0x0011, t01=0x011a}
0x01bc6…01be8               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x013c}
0x01be8…01c0a               Head {h00=0x001e, h01=0x0050, text=»* +16 .  DWTRTV         . «, t00=0x0011, t01=0x015e}
0x01c0a…01c2c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x0180}
0x01c2c…01c4e               Head {h00=0x001e, h01=0x0050, text=»* +18 .  DWTRTP         . «, t00=0x0012, t01=0x0012}
0x01c4e…01c70               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x0034}
0x01c70…01c92               Head {h00=0x001e, h01=0x0050, text=»* +20 .  DWTOPE         . «, t00=0x0012, t01=0x0056}
0x01c92…01cb4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x0078}
0x01cb4…01cd6               Head {h00=0x001e, h01=0x0050, text=»* +22 .  DWTOPN         . «, t00=0x0012, t01=0x009a}
0x01cd6…01cf8               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x00bc}
0x01cf8…01d1a               Head {h00=0x001e, h01=0x0050, text=»* +24 .  DWTIPC         . «, t00=0x0012, t01=0x00de}
0x01d1a…01d3c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x0100}
0x01d3c…01d5e               Head {h00=0x001e, h01=0x0050, text=»* +26 .  DWTIPT         . «, t00=0x0012, t01=0x0122}
0x01d5e…01d80               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x0144}
0x01d80…01da2               Head {h00=0x001e, h01=0x0050, text=»* +28 .                 . «, t00=0x0012, t01=0x0166}
0x01da2…01dc4               Head {h00=0x001e, h01=0x0050, text=»*     /  DRIVER DEPEND  / «, t00=0x0012, t01=0x0188}
0x01dc4…01de6               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x0013, t01=0x001a}
0x01de6…01e08               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x0013, t01=0x003c}
0x01e08…01e2a               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0013, t01=0x005e}
0x01e2a…01e66               Head {h00=0x0038, h01=0x0050, text=»*     .  STATISTIC      .   IF STAT   AND DWTSTB /=0«, t00=0x0013, t01=0x0080}
0x01e66…01e88               Head {h00=0x001e, h01=0x0050, text=»*     /  BUFFER         / «, t00=0x0013, t01=0x00bc}
0x01e88…01eaa               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0013, t01=0x00de}
0x01eaa…01eb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0100}
0x01eb4…01ec2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x010a}
0x01ec2…01ecc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0118}
0x01ecc…01f0e               Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0013, t01=0x0122}
0x01f0e…01f18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0164}
0x01f18…01f42               Head {h00=0x0026, h01=0x0050, text=»* D W T  D I S P L A C E M E N T S«, t00=0x0013, t01=0x016e}
0x01f42…01f4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0008}
0x01f4c…01f8e               Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0014, t01=0x0012}
0x01f8e…01f98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0054}
0x01f98…01fbc               Head {h00=0x0020, h01=0x0050, text=»DWTTQ EQU /0E TERMINAL QUEUE«, t00=0x0014, t01=0x005e}
0x01fbc…01fd2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0014, t01=0x0082}
0x01fd2…0200c               Head {h00=0x0036, h01=0x0050, text=»DWTDRD EQU DWTTQ+2 START OF DRIVER DEPENDENT AREA «, t00=0x0014, t01=0x0098}
0x0200c…02018               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x00d2}
0x02018…0202e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0014, t01=0x00de}
0x0202e…02068               Head {h00=0x0036, h01=0x0050, text=»DWTDRD EQU DWTTQ+6 START OF DRIVER DEPENDENT AREA «, t00=0x0014, t01=0x00f4}
0x02068…02074               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x012e}
0x02074…020bc               Head {h00=0x0044, h01=0x0050, text=»DWTSTB EQU DWTDRD OFFSET REL START DWT TO STATISTIC BUFF IF ANY «, t00=0x0014, t01=0x013a}
0x020bc…020f2               Head {h00=0x0032, h01=0x0050, text=»DWTCHD EQU DWTDRD+2 CONFIG CHAIN LINK HEAD DWT«, t00=0x0014, t01=0x0182}
0x020f2…02128               Head {h00=0x0032, h01=0x0050, text=»DWTCHN EQU DWTDRD+4 CONFIG CHAIN LINK NEXT DWT«, t00=0x0015, t01=0x0028}
0x02128…0215e               Head {h00=0x0032, h01=0x0050, text=»DWTLAD EQU DWTDRD+6 LOCAL SYMBOLIC DTE ADDRESS«, t00=0x0015, t01=0x005e}
0x0215e…02196               Head {h00=0x0034, h01=0x0050, text=»DWTRAD EQU DWTDRD+8 REMOTE SYMBOLIC DTE ADDRESS «, t00=0x0015, t01=0x0094}
0x02196…021c4               Head {h00=0x002a, h01=0x0050, text=»DWTDR1 EQU DWTDRD+10 DRIVER DEP WORD 1«, t00=0x0015, t01=0x00cc}
0x021c4…021f2               Head {h00=0x002a, h01=0x0050, text=»DWTSUB EQU DWTDR1 SYMBOLIC SUBADDRESS «, t00=0x0015, t01=0x00fa}
0x021f2…02224               Head {h00=0x002e, h01=0x0050, text=»DWTRCL EQU DWTDRD+12 REQUEST CONTROL WORD «, t00=0x0015, t01=0x0128}
0x02224…02254               Head {h00=0x002c, h01=0x0050, text=»DWTRTV EQU DWTDRD+14 REQUEST TIMER VALUE«, t00=0x0015, t01=0x015a}
0x02254…02286               Head {h00=0x002e, h01=0x0050, text=»DWTRTP EQU DWTDRD+16 REQUEST TIMER POINTER«, t00=0x0015, t01=0x018a}
0x02286…022cc               Head {h00=0x0042, h01=0x0050, text=»DWTOPE EQU DWTDRD+18 O/P DATA Q EXPEDITED/STATUS LINK NXT DWT «, t00=0x0016, t01=0x002c}
0x022cc…02308               Head {h00=0x0038, h01=0x0050, text=»DWTOPN EQU DWTDRD+20 O/P DATA Q NORMAL LINK NXT DWT «, t00=0x0016, t01=0x0072}
0x02308…0233e               Head {h00=0x0032, h01=0x0050, text=»DWTIPC EQU DWTDRD+22 I/P DATA Q LINK TO BUFFER«, t00=0x0016, t01=0x00ae}
0x0233e…02372               Head {h00=0x0030, h01=0x0050, text=»DWTIPT EQU DWTDRD+24 I/P DATA TIMER POINTER «, t00=0x0016, t01=0x00e4}
0x02372…0239e               Head {h00=0x0028, h01=0x0050, text=»DWTCUR EQU DWTDRD+26 CURSOR ADDRESS «, t00=0x0016, t01=0x0118}
0x0239e…023d0               Head {h00=0x002e, h01=0x0050, text=»DWTBUF EQU DWTDRD+28 DEVICE BUFFER ADDRESS«, t00=0x0016, t01=0x0144}
0x023d0…023f8               Head {h00=0x0024, h01=0x0050, text=»DWTSTA EQU DWTDRD+30 DWT STATUS «, t00=0x0016, t01=0x0176}
0x023f8…02406               Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0017, t01=0x000e}
0x02406…02454               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0017, t01=0x001c}
0x02454…0245e               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0017, t01=0x006a}
0x0245e…0247e               Head {h00=0x001c, h01=0x0050, text=»* DTE, DTE CONTROL TABLE«, t00=0x0017, t01=0x0074}
0x0247e…02488               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0017, t01=0x0094}
0x02488…024d8               Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0017, t01=0x009e}
0x024d8…024e2               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0017, t01=0x00ee}
0x024e2…02504               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0017, t01=0x00f8}
0x02504…02526               Head {h00=0x001e, h01=0x0050, text=»*   0 .  DTECHP         . «, t00=0x0017, t01=0x011a}
0x02526…02548               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0017, t01=0x013c}
0x02548…0256a               Head {h00=0x001e, h01=0x0050, text=»*   2 .  DTEST          . «, t00=0x0017, t01=0x015e}
0x0256a…0258c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0017, t01=0x0180}
0x0258c…025ae               Head {h00=0x001e, h01=0x0050, text=»*   4 .  DTEECB         . «, t00=0x0018, t01=0x0012}
0x025ae…025d0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0018, t01=0x0034}
0x025d0…025f2               Head {h00=0x001e, h01=0x0050, text=»*   6 . DTEOPT . DTEOR  . «, t00=0x0018, t01=0x0056}
0x025f2…02614               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0018, t01=0x0078}
0x02614…02636               Head {h00=0x001e, h01=0x0050, text=»*   8 .  DTEADR         . «, t00=0x0018, t01=0x009a}
0x02636…02658               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0018, t01=0x00bc}
0x02658…0267a               Head {h00=0x001e, h01=0x0050, text=»*  10 .  DTETAB         . «, t00=0x0018, t01=0x00de}
0x0267a…0269c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0018, t01=0x0100}
0x0269c…026be               Head {h00=0x001e, h01=0x0050, text=»*  12 .  DTEWAT         . «, t00=0x0018, t01=0x0122}
0x026be…026e0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0018, t01=0x0144}
0x026e0…02702               Head {h00=0x001e, h01=0x0050, text=»*  14 .  DTETQ          . «, t00=0x0018, t01=0x0166}
0x02702…02724               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0018, t01=0x0188}
0x02724…02754               Head {h00=0x002c, h01=0x0050, text=»* (16).  DTEUEC         .   IF   MMUPAG «, t00=0x0019, t01=0x001a}
0x02754…02776               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0019, t01=0x004a}
0x02776…027a6               Head {h00=0x002c, h01=0x0050, text=»* (18).  DTEMEC         .   IF   MMUPAG «, t00=0x0019, t01=0x006c}
0x027a6…027c8               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0019, t01=0x009c}
0x027c8…027f0               Head {h00=0x0024, h01=0x0050, text=»* DTEDRD  +2 .  DTESTB         .«, t00=0x0019, t01=0x00be}
0x027f0…02818               Head {h00=0x0024, h01=0x0050, text=»*            ...................«, t00=0x0019, t01=0x00e6}
0x02818…0283a               Head {h00=0x001e, h01=0x0050, text=»*  +4 .  DTECHD         . «, t00=0x0019, t01=0x010e}
0x0283a…0285c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0019, t01=0x0130}
0x0285c…0287e               Head {h00=0x001e, h01=0x0050, text=»*  +6 .  DTECHN         . «, t00=0x0019, t01=0x0152}
0x0287e…028a0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0019, t01=0x0174}
0x028a0…028c2               Head {h00=0x001e, h01=0x0050, text=»*  +8 .  DTELAD         . «, t00=0x001a, t01=0x0008}
0x028c2…028e4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x002a}
0x028e4…02906               Head {h00=0x001e, h01=0x0050, text=»* +10 .                 . «, t00=0x001a, t01=0x004c}
0x02906…02928               Head {h00=0x001e, h01=0x0050, text=»*     /  DRIVER DEPEND  / «, t00=0x001a, t01=0x006e}
0x02928…0294a               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x001a, t01=0x0090}
0x0294a…0296c               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x001a, t01=0x00b2}
0x0296c…0298e               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x00d4}
0x0298e…029ca               Head {h00=0x0038, h01=0x0050, text=»*     .  STATISTIC      .   IF STAT   AND DTESTB /=0«, t00=0x001a, t01=0x00f6}
0x029ca…029ec               Head {h00=0x001e, h01=0x0050, text=»*     /  BUFFER         / «, t00=0x001a, t01=0x0132}
0x029ec…02a0e               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x0154}
0x02a0e…02a18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0176}
0x02a18…02a2c               Head {h00=0x0010, h01=0x0050, text=»DTETQ EQU 14«, t00=0x001a, t01=0x0180}
0x02a2c…02a46 (27, 0, 400)  Head {h00=0x0016, h01=0x0050, text=»DTEUEC EQU DTETQ+2«, t00=0x001b, t01=0x0004}
0x02a46…02a62               Head {h00=0x0018, h01=0x0050, text=»DTEMEC EQU DTEUEC+2 «, t00=0x001b, t01=0x001e}
0x02a62…02a6a               Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x003a}
0x02a6a…02a80               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001b, t01=0x0042}
0x02a80…02ab6               Head {h00=0x0032, h01=0x0050, text=»DTEDRD EQU DTETQ+2 START OF DC DEPENDENT AREA «, t00=0x001b, t01=0x0058}
0x02ab6…02ac2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x008e}
0x02ac2…02ad8               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001b, t01=0x009a}
0x02ad8…02b0e               Head {h00=0x0032, h01=0x0050, text=»DTEDRD EQU DTEMEC+2 START OF DC DEPENDENT AREA«, t00=0x001b, t01=0x00b0}
0x02b0e…02b1a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00e6}
0x02b1a…02b62               Head {h00=0x0044, h01=0x0050, text=»DTESTB EQU DTEDRD OFFSET REL START DTE TO STATISTIC BUFF IF ANY «, t00=0x001b, t01=0x00f2}
0x02b62…02b98               Head {h00=0x0032, h01=0x0050, text=»DTECHD EQU DTEDRD+2 CONFIG CHAIN LINK HEAD DTE«, t00=0x001b, t01=0x013a}
0x02b98…02bce               Head {h00=0x0032, h01=0x0050, text=»DTECHN EQU DTEDRD+4 CONFIG CHAIN LINK NEXT DTE«, t00=0x001b, t01=0x0170}
0x02bce…02c04               Head {h00=0x0032, h01=0x0050, text=»DTELAD EQU DTEDRD+6 LOCAL SYMBOLIC DTE ADDRESS«, t00=0x001c, t01=0x0016}
0x02c04…02c1e               Head {h00=0x0016, h01=0x0050, text=»* DRIVER DEPENDENT«, t00=0x001c, t01=0x004c}
0x02c1e…02c4e               Head {h00=0x002c, h01=0x0050, text=»DTEPLS EQU DTEDRD+8 PHYSICAL LINK STATUS«, t00=0x001c, t01=0x0066}
0x02c4e…02c7c               Head {h00=0x002a, h01=0x0050, text=»DTEDLS EQU DTEDRD+10 DATA LINK STATUS «, t00=0x001c, t01=0x0096}
0x02c7c…02ca4               Head {h00=0x0024, h01=0x0050, text=»DTESTA EQU DTEDRD+12 DTE STATUS «, t00=0x001c, t01=0x00c4}
0x02ca4…02cd0               Head {h00=0x0028, h01=0x0050, text=»DTEDWT EQU DTEDRD+14 CHAIN LINK  DWT«, t00=0x001c, t01=0x00ec}
0x02cd0…02d04               Head {h00=0x0030, h01=0x0050, text=»DTEDDT EQU DTEDRD+16 CHAIN LINK  DISCARD DWT«, t00=0x001c, t01=0x0118}
0x02d04…02d1e               Head {h00=0x0016, h01=0x0050, text=»* STATITICS BUFFER«, t00=0x001c, t01=0x014c}
0x02d1e…02d54               Head {h00=0x0032, h01=0x0050, text=»STWSID EQU DTEDRD+18 RESERVED FOR SYMBOLIC ID «, t00=0x001c, t01=0x0166}
0x02d54…02d86               Head {h00=0x002e, h01=0x0050, text=»STWCST EQU DTEDRD+20 COUNTER STATUS INDEX «, t00=0x001d, t01=0x000c}
0x02d86…02db4               Head {h00=0x002a, h01=0x0050, text=»STWMIX EQU DTEDRD+22 MAX COUNTER INDEX«, t00=0x001d, t01=0x003e}
0x02db4…02dda               Head {h00=0x0022, h01=0x0050, text=»STWCTA EQU DTEDRD+24 COUNTERS «, t00=0x001d, t01=0x006c}
0x02dda…02de8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x0092}
0x02de8…02e36               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x001d, t01=0x00a0}
0x02e36…02e40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ee}
0x02e40…02e70               Head {h00=0x002c, h01=0x0050, text=»* COUNTER INDECES - PARAMETER-1 EQUATES «, t00=0x001d, t01=0x00f8}
0x02e70…02e7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0128}
0x02e7a…02e9c               Head {h00=0x001e, h01=0x0050, text=»* REQUEST LEVEL COUNTERS: «, t00=0x001d, t01=0x0132}
0x02e9c…02ea6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0154}
0x02ea6…02eee               Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x001d, t01=0x015e}
0x02eee…02ef8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0016}
0x02ef8…02f26               Head {h00=0x002a, h01=0x0050, text=»CSRCON EQU /01 CONNECTIONS ESTABLISHED«, t00=0x001e, t01=0x0020}
0x02f26…02f5e               Head {h00=0x0034, h01=0x0050, text=»CSRCBY EQU /02 CONNECTION NOT ESTABLISHED - BUSY«, t00=0x001e, t01=0x004e}
0x02f5e…02f86               Head {h00=0x0024, h01=0x0050, text=»CSRMSR EQU /03 MESSAGES RECEIVED«, t00=0x001e, t01=0x0086}
0x02f86…02fb0               Head {h00=0x0026, h01=0x0050, text=»CSRCHR EQU /C5 CHARACTERS RECEIVED«, t00=0x001e, t01=0x00ae}
0x02fb0…02fdc               Head {h00=0x0028, h01=0x0050, text=»CSRMST EQU /06 MESSAGES TRANSMITTED «, t00=0x001e, t01=0x00d8}
0x02fdc…0300a               Head {h00=0x002a, h01=0x0050, text=»CSRCHT EQU /C8 CHARACTERS TRANSMITTED «, t00=0x001e, t01=0x0104}
0x0300a…03028               Head {h00=0x001a, h01=0x0050, text=»CSRTOP EQU /09 TIMEOUT«, t00=0x001e, t01=0x0132}
0x03028…03046               Head {h00=0x001a, h01=0x0050, text=»CSRABT EQU /0A ABORTED«, t00=0x001e, t01=0x0150}
0x03046…03062               Head {h00=0x0018, h01=0x0050, text=»CSRERR EQU /0B ERROR«, t00=0x001e, t01=0x016e}
0x03062…0308c               Head {h00=0x0026, h01=0x0050, text=»CSRTRE EQU /0C TRANSMISSION ERROR «, t00=0x001e, t01=0x018a}
0x0308c…030b6               Head {h00=0x0026, h01=0x0050, text=»CSRXC1 EQU /0D PROTOCOL DEPENDENT «, t00=0x001f, t01=0x0024}
0x030b6…030c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x004e}
0x030c0…030de               Head {h00=0x001a, h01=0x0050, text=»* LINK LEVEL COUNTERS «, t00=0x001f, t01=0x0058}
0x030de…030e8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x001f, t01=0x0076}
0x030e8…0311a               Head {h00=0x002e, h01=0x0050, text=»CSSRBL EQU /10 SYNCH DATA BLOCKS RECEIVED «, t00=0x001f, t01=0x0080}
0x0311a…03158               Head {h00=0x003a, h01=0x0050, text=»CSSRBY EQU /11   "   DATA BLOCKS REJECTED BUFFER BUSY «, t00=0x001f, t01=0x00b2}
0x03158…0319a               Head {h00=0x003e, h01=0x0050, text=»CSSRBO EQU /12   "   DATA BLOCKS REJECTED BUFFER OVERFLOW «, t00=0x001f, t01=0x00f0}
0x0319a…031d4               Head {h00=0x0036, h01=0x0050, text=»CSSRAB EQU /13   "   DATA BLOCKS REJECTED ABORTED «, t00=0x001f, t01=0x0132}
0x031d4…03212               Head {h00=0x003a, h01=0x0050, text=»CSSRPE EQU /14   "   DATA BLOCKS REJECTED PARITY ERROR«, t00=0x001f, t01=0x016c}
0x03212…03246               Head {h00=0x0030, h01=0x0050, text=»CSSTBL EQU /15   "   DATA BLOCKS TRANSMITTED«, t00=0x0020, t01=0x001a}
0x03246…0327c               Head {h00=0x0032, h01=0x0050, text=»CSSTRT EQU /16   "   DATA BLOCKS RETRANSMITTED«, t00=0x0020, t01=0x004e}
0x0327c…032ac               Head {h00=0x002c, h01=0x0050, text=»CSSTAB EQU /17   "   DATA BLOCKS ABORTED«, t00=0x0020, t01=0x0084}
0x032ac…032e4               Head {h00=0x0034, h01=0x0050, text=»CSSXC1 EQU /18 NBR OF REPLY REQUESTS TRANSMITTED«, t00=0x0020, t01=0x00b4}
0x032e4…0330e               Head {h00=0x0026, h01=0x0050, text=»CSSXC2 EQU /19 PROCEDURE TIME OUTS«, t00=0x0020, t01=0x00ec}
0x0330e…0334a               Head {h00=0x0038, h01=0x0050, text=»CSSXC3 EQU /1A NBR OF TIMES POLL TIMEOUT HAS OCCURED«, t00=0x0020, t01=0x0116}
0x0334a…03354               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0020, t01=0x0152}
0x03354…0335e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0020, t01=0x015c}
0x0335e…0336c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x0166}
0x0336c…0338c               Head {h00=0x001c, h01=0x0050, text=»* DTE/DCE LEVEL COUNTERS«, t00=0x0020, t01=0x0174}
0x0338c…03396 (33, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0021, t01=0x0004}
0x03396…033be               Head {h00=0x0024, h01=0x0050, text=»CSCDTE EQU /28 DTE NOT OPERABLE «, t00=0x0021, t01=0x000e}
0x033be…033ea               Head {h00=0x0028, h01=0x0050, text=»CSCDIT EQU /29 I/P THROUGHPUT ERROR «, t00=0x0021, t01=0x0036}
0x033ea…03416               Head {h00=0x0028, h01=0x0050, text=»CSCDOT EQU /2A O/P THROUGHPUT ERROR «, t00=0x0021, t01=0x0062}
0x03416…0343e               Head {h00=0x0024, h01=0x0050, text=»CSCDCE EQU /2B DCE NOT OPERABLE «, t00=0x0021, t01=0x008e}
0x0343e…0346c               Head {h00=0x002a, h01=0x0050, text=»CSCXC1 EQU /2C CONTROL UNIT DEPENDENT «, t00=0x0021, t01=0x00b6}
0x0346c…03488               Head {h00=0x0018, h01=0x0050, text=»CSCXC2 EQU /2D     "«, t00=0x0021, t01=0x00e4}
0x03488…034a4               Head {h00=0x0018, h01=0x0050, text=»CSCXC3 EQU /2E     "«, t00=0x0021, t01=0x0100}
0x034a4…034b2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x011c}
0x034b2…034bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x012a}
0x034bc…034c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0134}
0x034c6…034e0               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x0021, t01=0x013e}
0x034e0…034ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0158}
0x034ea…034f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0162}
0x034f4…0350e               Head {h00=0x0016, h01=0x0050, text=»* ORDER CODE (A7) «, t00=0x0021, t01=0x016c}
0x0350e…03518               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0186}
0x03518…03532               Head {h00=0x0016, h01=0x0050, text=»OPEN EQU /21 OPEN «, t00=0x0021, t01=0x0190}
0x03532…0354e               Head {h00=0x0018, h01=0x0050, text=»CLOSE EQU /22 CLOSE «, t00=0x0022, t01=0x001a}
0x0354e…03574               Head {h00=0x0022, h01=0x0050, text=»CONPAS EQU /27 CONNECT PASSIVE«, t00=0x0022, t01=0x0036}
0x03574…03594               Head {h00=0x001c, h01=0x0050, text=»DISCO EQU /2F DISCONNECT«, t00=0x0022, t01=0x005c}
0x03594…035b4               Head {h00=0x001c, h01=0x0050, text=»RECEIVE EQU /02 RECEIVE «, t00=0x0022, t01=0x007c}
0x035b4…035ce               Head {h00=0x0016, h01=0x0050, text=»SEND EQU /06 SEND «, t00=0x0022, t01=0x009c}
0x035ce…035f0               Head {h00=0x001e, h01=0x0050, text=»RSTAT EQU /00 READ STATUS «, t00=0x0022, t01=0x00b6}
0x035f0…03610               Head {h00=0x001c, h01=0x0050, text=»SSTAT EQU /38 SET STATUS«, t00=0x0022, t01=0x00d8}
0x03610…0363c               Head {h00=0x0028, h01=0x0050, text=»STATIS EQU /2D READ/RESET STATISTICS«, t00=0x0022, t01=0x00f8}
0x0363c…03664               Head {h00=0x0024, h01=0x0050, text=»STIMOT EQU /39 SET TIMEOUT VALUE«, t00=0x0022, t01=0x0124}
0x03664…0366e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x014c}
0x0366e…03680               Head {h00=0x000e, h01=0x0050, text=»* OPTIONS:«, t00=0x0022, t01=0x0156}
0x03680…0368a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0168}
0x0368a…036bc               Head {h00=0x002e, h01=0x0050, text=»TYPRR EQU /43 RESET STATISTICS AFTER READ «, t00=0x0022, t01=0x0172}
0x036bc…036ca               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x0014}
0x036ca…036d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0022}
0x036d4…03716               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0023, t01=0x002c}
0x03716…03720               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x006e}
0x03720…03752               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=0x0023, t01=0x0078}
0x03752…0375c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00aa}
0x0375c…0379e               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0023, t01=0x00b4}
0x0379e…037a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00f6}
0x037a8…037f8               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0023, t01=0x0100}
0x037f8…0381e               Head {h00=0x0022, h01=0x0050, text=»R:REQ EQU /8000 REQUEST ERROR «, t00=0x0023, t01=0x0150}
0x0381e…03846               Head {h00=0x0024, h01=0x0050, text=»R:ABRT EQU /4000 REQUEST ABORTED«, t00=0x0023, t01=0x0176}
0x03846…0385c               Head {h00=0x0012, h01=0x0050, text=»R:2 EQU /2000 «, t00=0x0024, t01=0x000e}
0x0385c…03872               Head {h00=0x0012, h01=0x0050, text=»R:3 EQU /1000 «, t00=0x0024, t01=0x0024}
0x03872…038c0               Head {h00=0x004a, h01=0x0050, text=»*---------------------------------------------------------------------«, t00=0x0024, t01=0x003a}
0x038c0…038d6               Head {h00=0x0012, h01=0x0050, text=»R:4 EQU /0800 «, t00=0x0024, t01=0x0088}
0x038d6…038ec               Head {h00=0x0012, h01=0x0050, text=»R:5 EQU /0400 «, t00=0x0024, t01=0x009e}
0x038ec…03902               Head {h00=0x0012, h01=0x0050, text=»R:6 EQU /0200 «, t00=0x0024, t01=0x00b4}
0x03902…03932               Head {h00=0x002c, h01=0x0050, text=»R:DATA EQU /0100 DATA AVAILABLE (QUEUED)«, t00=0x0024, t01=0x00ca}
0x03932…03980               Head {h00=0x004a, h01=0x0050, text=»*---------------------------------------------------------------------«, t00=0x0024, t01=0x00fa}
0x03980…03996               Head {h00=0x0012, h01=0x0050, text=»R:8 EQU /0080 «, t00=0x0024, t01=0x0148}
0x03996…039b8               Head {h00=0x001e, h01=0x0050, text=»R:TIME EQU /0040 TIME OUT «, t00=0x0024, t01=0x015e}
0x039b8…039ce               Head {h00=0x0012, h01=0x0050, text=»R:10 EQU /0020«, t00=0x0024, t01=0x0180}
0x039ce…039f4               Head {h00=0x0022, h01=0x0050, text=»R:SEQ EQU /0010 SEQUENCE ERROR«, t00=0x0025, t01=0x0008}
0x039f4…03a42               Head {h00=0x004a, h01=0x0050, text=»*---------------------------------------------------------------------«, t00=0x0025, t01=0x002e}
0x03a42…03a6a               Head {h00=0x0024, h01=0x0050, text=»R:LGTH EQU /0008 ILLEGAL LENGTH «, t00=0x0025, t01=0x007c}
0x03a6a…03a80               Head {h00=0x0012, h01=0x0050, text=»R:13 EQU /0004«, t00=0x0025, t01=0x00a4}
0x03a80…03ab2               Head {h00=0x002e, h01=0x0050, text=»R:LOGC EQU /0002 LOGICAL CONNECTION ERROR «, t00=0x0025, t01=0x00ba}
0x03ab2…03ae4               Head {h00=0x002e, h01=0x0050, text=»R:PHYC EQU /0001 PHYSICAL CONNECTION ERROR«, t00=0x0025, t01=0x00ec}
0x03ae4…03b34               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0025, t01=0x011e}
0x03b34…03b3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x016e}
0x03b3e…03b4c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x0178}
0x03b4c…03b56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0186}
0x03b56…03b96               Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0025, t01=0x0190}
0x03b96…03ba0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0040}
0x03ba0…03bd2               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=0x0026, t01=0x004a}
0x03bd2…03bdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x007c}
0x03bdc…03c1e               Head {h00=0x003e, h01=0x0050, text=»*********************************************************=«, t00=0x0026, t01=0x0086}
0x03c1e…03c28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00c8}
0x03c28…03c78               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0026, t01=0x00d2}
0x03c78…03c8e               Head {h00=0x0012, h01=0x0050, text=»H:0 EQU /8000 «, t00=0x0026, t01=0x0122}
0x03c8e…03ca4               Head {h00=0x0012, h01=0x0050, text=»H:1 EQU /4000 «, t00=0x0026, t01=0x0138}
0x03ca4…03cba               Head {h00=0x0012, h01=0x0050, text=»H:2 EQU /2000 «, t00=0x0026, t01=0x014e}
0x03cba…03cd0               Head {h00=0x0012, h01=0x0050, text=»H:3 EQU /1000 «, t00=0x0026, t01=0x0164}
0x03cd0…03d20               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0026, t01=0x017a}
0x03d20…03d36               Head {h00=0x0012, h01=0x0050, text=»H:4 EQU /0800 «, t00=0x0027, t01=0x003a}
0x03d36…03d4c               Head {h00=0x0012, h01=0x0050, text=»H:5 EQU /0400 «, t00=0x0027, t01=0x0050}
0x03d4c…03d62               Head {h00=0x0012, h01=0x0050, text=»H:6 EQU /0200 «, t00=0x0027, t01=0x0066}
0x03d62…03d78               Head {h00=0x0012, h01=0x0050, text=»H:7 EQU /0100 «, t00=0x0027, t01=0x007c}
0x03d78…03dc8               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0027, t01=0x0092}
0x03dc8…03dde               Head {h00=0x0012, h01=0x0050, text=»H:8 EQU /0080 «, t00=0x0027, t01=0x00e2}
0x03dde…03df4               Head {h00=0x0012, h01=0x0050, text=»H:9 EQU /0040 «, t00=0x0027, t01=0x00f8}
0x03df4…03e18               Head {h00=0x0020, h01=0x0050, text=»H:CARR EQU /0020 CARRIER OFF«, t00=0x0027, t01=0x010e}
0x03e18…03e2e               Head {h00=0x0012, h01=0x0050, text=»H:11 EQU /0010«, t00=0x0027, t01=0x0132}
0x03e2e…03e7c               Head {h00=0x004a, h01=0x0050, text=»*-------------------------------------------------------------------- «, t00=0x0027, t01=0x0148}
0x03e7c…03e92               Head {h00=0x0012, h01=0x0050, text=»H:12 EQU /0008«, t00=0x0028, t01=0x0008}
0x03e92…03eb8               Head {h00=0x0022, h01=0x0050, text=»H:PARI EQU /0004 PARITY ERROR «, t00=0x0028, t01=0x001e}
0x03eb8…03ee2               Head {h00=0x0026, h01=0x0050, text=»H:THRU EQU /0002 THROUGHPUT ERROR «, t00=0x0028, t01=0x0044}
0x03ee2…03f08               Head {h00=0x0022, h01=0x0050, text=»H:NOOP EQU /0001 NOT OPERABLE «, t00=0x0028, t01=0x006e}
0x03f08…03f58               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0028, t01=0x0094}
0x03f58…03f6a               Head {h00=0x000e, h01=0x0050, text=» EJECT    «, t00=0x0028, t01=0x00e4}
0x03f6a…03fac               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0028, t01=0x00f6}
0x03fac…03fb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0138}
0x03fb6…03fda               Head {h00=0x0020, h01=0x0050, text=»* LINE CONTROL CHAR EQU:S   «, t00=0x0028, t01=0x0142}
0x03fda…03fe8               Head {h00=0x000a, h01=0x0050, text=»*     «, t00=0x0028, t01=0x0166}
0x03fe8…0402a               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0028, t01=0x0174}
0x0402a…04034               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0026}
0x04034…0405e               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x0029, t01=0x0030}
0x0405e…04072               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x0029, t01=0x005a}
0x04072…04086               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0029, t01=0x006e}
0x04086…0409a               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x0029, t01=0x0082}
0x0409a…040ae               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x0029, t01=0x0096}
0x040ae…040c2               Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x0029, t01=0x00aa}
0x040c2…040d6               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0029, t01=0x00be}
0x040d6…040ea               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x0029, t01=0x00d2}
0x040ea…040fe               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x0029, t01=0x00e6}
0x040fe…04112               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x0029, t01=0x00fa}
0x04112…04126               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x0029, t01=0x010e}
0x04126…0413a               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x0029, t01=0x0122}
0x0413a…0414e               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x0029, t01=0x0136}
0x0414e…04160               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x0029, t01=0x014a}
0x04160…04176               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x0029, t01=0x015c}
0x04176…0418c               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x0029, t01=0x0172}
0x0418c…0419a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0188}
0x0419a…041ae               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x002a, t01=0x0008}
0x041ae…041c2               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x002a, t01=0x001c}
0x041c2…041d6               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x002a, t01=0x0030}
0x041d6…041ea               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x002a, t01=0x0044}
0x041ea…041fe               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x002a, t01=0x0058}
0x041fe…04212               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x002a, t01=0x006c}
0x04212…04226               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x002a, t01=0x0080}
0x04226…0423a               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x002a, t01=0x0094}
0x0423a…04246               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x00a8}
0x04246…0425a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x002a, t01=0x00b4}
0x0425a…0426e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x002a, t01=0x00c8}
0x0426e…042a2               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x002a, t01=0x00dc}
0x042a2…042ae               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0110}
0x042ae…042c2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x002a, t01=0x011c}
0x042c2…042d6               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x002a, t01=0x0130}
0x042d6…042ea               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x002a, t01=0x0144}
0x042ea…042fe               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /40 «, t00=0x002a, t01=0x0158}
0x042fe…04312               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x002a, t01=0x016c}
0x04312…04326               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x002a, t01=0x0180}
0x04326…0433c (43, 0, 400)  Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x002b, t01=0x0004}
0x0433c…04352               Head {h00=0x0012, h01=0x0050, text=»ENQEBC EQU /2D«, t00=0x002b, t01=0x001a}
0x04352…04368               Head {h00=0x0012, h01=0x0050, text=»ETBEBC EQU /26«, t00=0x002b, t01=0x0030}
0x04368…04374               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x0046}
0x04374…04388               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x002b, t01=0x0052}
0x04388…043a2               Head {h00=0x0016, h01=0x0050, text=»ENQPAR EQU ENQ+PAR«, t00=0x002b, t01=0x0066}
0x043a2…043bc               Head {h00=0x0016, h01=0x0050, text=»RVIPAR EQU RVI+PAR«, t00=0x002b, t01=0x0080}
0x043bc…043d8               Head {h00=0x0018, h01=0x0050, text=»ACKPAR EQU ACK0+PAR «, t00=0x002b, t01=0x009a}
0x043d8…043e4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x00b6}
0x043e4…043f8               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x002b, t01=0x00c2}
0x043f8…0440e               Head {h00=0x0012, h01=0x0050, text=»ENQPAR EQU ENQ«, t00=0x002b, t01=0x00d6}
0x0440e…04424               Head {h00=0x0012, h01=0x0050, text=»RVIPAR EQU RVI«, t00=0x002b, t01=0x00ec}
0x04424…0443c               Head {h00=0x0014, h01=0x0050, text=»ACKPAR EQU ACK0 «, t00=0x002b, t01=0x0102}
0x0443c…04448               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x011a}
0x04448…04456               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0126}
0x04456…04460               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0134}
0x04460…0446a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x013e}
0x0446a…04492               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x002b, t01=0x0148}
0x04492…0449c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0170}
0x0449c…044a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x017a}
0x044a6…044bc               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x002b, t01=0x0184}
0x044bc…044ee               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x002c, t01=0x000a}
0x044ee…044f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x003c}
0x044f8…04502               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0046}
0x04502…04516               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x002c, t01=0x0050}
0x04516…0452a               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x002c, t01=0x0064}
0x0452a…04534               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0078}
0x04534…0456a               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x002c, t01=0x0082}
0x0456a…0459a               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x002c, t01=0x00b8}
0x0459a…045a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x00e8}
0x045a6…045b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00f4}
0x045b0…045ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00fe}
0x045ba…045d0               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x002c, t01=0x0108}
0x045d0…045da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x011e}
0x045da…045e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0128}
0x045e4…04610               Head {h00=0x0028, h01=0x0050, text=»TIMPRO EQU 30 PROCEDURE TIMER 3 SEC «, t00=0x002c, t01=0x0132}
0x04610…0461a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x015e}
0x0461a…04624               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0168}
0x04624…04632               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x0172}
0x04632…04678               Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x002c, t01=0x0180}
0x04678…04682               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0036}
0x04682…046b4               Head {h00=0x002e, h01=0x0050, text=»* LINE CONTROL UNIT FUNCTION CONTROL EQU:S«, t00=0x002d, t01=0x0040}
0x046b4…046be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0072}
0x046be…04704               Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x002d, t01=0x007c}
0x04704…0470e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00c2}
0x0470e…04722               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x002d, t01=0x00cc}
0x04722…04736               Head {h00=0x0010, h01=0x0050, text=»SYNC EQU /16«, t00=0x002d, t01=0x00e0}
0x04736…04742               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x00f4}
0x04742…04756               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x002d, t01=0x0100}
0x04756…0476a               Head {h00=0x0010, h01=0x0050, text=»SYNC EQU /32«, t00=0x002d, t01=0x0114}
0x0476a…04776               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0128}
0x04776…0478a               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x002d, t01=0x0134}
0x0478a…047a8               Head {h00=0x001a, h01=0x0050, text=»CBCARR EQU /100+LSPEED«, t00=0x002d, t01=0x0148}
0x047a8…047b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0166}
0x047b4…047c8               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x002d, t01=0x0172}
0x047c8…047de               Head {h00=0x0012, h01=0x0050, text=»CBSTOP EQU /00«, t00=0x002d, t01=0x0186}
0x047de…047f2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x002e, t01=0x000c}
0x047f2…04808               Head {h00=0x0012, h01=0x0050, text=»PARITY EQU /0C«, t00=0x002e, t01=0x0020}
0x04808…04814               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0036}
0x04814…04828               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x002e, t01=0x0042}
0x04828…0483c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x002e, t01=0x0056}
0x0483c…04852               Head {h00=0x0012, h01=0x0050, text=»PARITY EQU /00«, t00=0x002e, t01=0x006a}
0x04852…0485e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0080}
0x0485e…0486c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x008c}
0x0486c…048a8               Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x002e, t01=0x009a}
0x048a8…048b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00d6}
0x048b2…048de               Head {h00=0x0028, h01=0x0050, text=»* LINE CONTROL UNIT SST STATUS BITS «, t00=0x002e, t01=0x00e0}
0x048de…048e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x010c}
0x048e8…04924               Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x002e, t01=0x0116}
0x04924…0492e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0152}
0x0492e…04942               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x002e, t01=0x015c}
0x04942…0496c               Head {h00=0x0026, h01=0x0050, text=»H:ERR EQU /23 H:NOOP+H:THRU+H:CARR«, t00=0x002e, t01=0x0170}
0x0496c…04978               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x000a}
0x04978…0498c               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x002f, t01=0x0016}
0x0498c…049be               Head {h00=0x002e, h01=0x0050, text=»H:ERR EQU /27 H:NOOP+H:THRU+H:CARR+H:PARI «, t00=0x002f, t01=0x002a}
0x049be…049ca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x005c}
0x049ca…049dc               Head {h00=0x000e, h01=0x0050, text=» EJECT    «, t00=0x002f, t01=0x0068}
0x049dc…04a24               Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x002f, t01=0x007a}
0x04a24…04a2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00c2}
0x04a2e…04a4c               Head {h00=0x001a, h01=0x0050, text=»* DRIVER ADDRESS BLOCK«, t00=0x002f, t01=0x00cc}
0x04a4c…04a56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00ea}
0x04a56…04a9e               Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x002f, t01=0x00f4}
0x04a9e…04aa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x013c}
0x04aa8…04acc               Head {h00=0x0020, h01=0x0050, text=» DATA BUFLEN MMU BUFFER SIZE«, t00=0x002f, t01=0x0146}
0x04acc…04aee               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x002f, t01=0x016a}
0x04aee…04b1a               Head {h00=0x0028, h01=0x0050, text=»DC15AD DATA DCACT ACTIVATION ADDRESS«, t00=0x002f, t01=0x018c}
0x04b1a…04b3c               Head {h00=0x001e, h01=0x0050, text=» DATA ABORT ABORT ROUTINE «, t00=0x0030, t01=0x0028}
0x04b3c…04b64               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0030, t01=0x004a}
0x04b64…04b82               Head {h00=0x001a, h01=0x0050, text=» DATA 6 HEADER LENGTH «, t00=0x0030, t01=0x0072}
0x04b82…04b8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0090}
0x04b8c…04bbc               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x0030, t01=0x009a}
0x04bbc…04bce               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x0030, t01=0x00ca}
0x04bce…04bdc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x00dc}
0x04bdc…04be4               Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x00ea}
0x04be4…04c28               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0030, t01=0x00f2}
0x04c28…04c32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0136}
0x04c32…04c4c               Head {h00=0x0016, h01=0x0050, text=»*    ABORT ROUTINE«, t00=0x0030, t01=0x0140}
0x04c4c…04c56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x015a}
0x04c56…04c76               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0030, t01=0x0164}
0x04c76…04c7e               Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x0184}
0x04c7e…04caa               Head {h00=0x0028, h01=0x0050, text=»ABORT LD A1,DWTRTP,A6 TIMER POINTER «, t00=0x0030, t01=0x018c}
0x04caa…04cd0               Head {h00=0x0022, h01=0x0050, text=» RF(Z) AB:10 NO TIMER RUNNING «, t00=0x0031, t01=0x0028}
0x04cd0…04cea               Head {h00=0x0016, h01=0x0050, text=» CMR A1 KILL TIMER«, t00=0x0031, t01=0x004e}
0x04cea…04d00               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x0031, t01=0x0068}
0x04d00…04d08               Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x007e}
0x04d08…04d30               Head {h00=0x0024, h01=0x0050, text=»AB:10 LD A2,DWTOR,A6 ORDER CODE «, t00=0x0031, t01=0x0086}
0x04d30…04d44               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0031, t01=0x00ae}
0x04d44…04d56               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0031, t01=0x00c2}
0x04d56…04d6c               Head {h00=0x0012, h01=0x0050, text=» RF(NE) AB:RTN«, t00=0x0031, t01=0x00d4}
0x04d6c…04d9e               Head {h00=0x002e, h01=0x0050, text=» CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE«, t00=0x0031, t01=0x00ea}
0x04d9e…04dc8               Head {h00=0x0026, h01=0x0050, text=» LD A2,FDWTUT WRITING DWT ADDRESS «, t00=0x0031, t01=0x011c}
0x04dc8…04dda               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0031, t01=0x0146}
0x04dda…04dfe               Head {h00=0x0020, h01=0x0050, text=» RF(NE) AB:RTN NOT THIS DWT «, t00=0x0031, t01=0x0158}
0x04dfe…04e22               Head {h00=0x0020, h01=0x0050, text=» CM FDWTUT REST SENDING DWT «, t00=0x0031, t01=0x017c}
0x04e22…04e46               Head {h00=0x0020, h01=0x0050, text=» CM XACK RESET ACK EXPECTED «, t00=0x0032, t01=0x0010}
0x04e46…04e4e               Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x0034}
0x04e4e…04e62               Head {h00=0x0010, h01=0x0050, text=»AB:RTN EQU *«, t00=0x0032, t01=0x003c}
0x04e62…04e76               Head {h00=0x0010, h01=0x0050, text=» ABL RTABRT «, t00=0x0032, t01=0x0050}
0x04e76…04e84               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x0064}
0x04e84…04ed2               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0032, t01=0x0072}
0x04ed2…04f20               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0032, t01=0x00c0}
0x04f20…04f2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x010e}
0x04f2a…04f34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0118}
0x04f34…04f64               Head {h00=0x002c, h01=0x0050, text=»* REQUEST HANDLER/APPLICATION INTERFACE «, t00=0x0032, t01=0x0122}
0x04f64…04f6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0152}
0x04f6e…04f78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x015c}
0x04f78…04fc6               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0032, t01=0x0166}
0x04fc6…05014               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0033, t01=0x0024}
0x05014…0501e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0072}
0x0501e…05046               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x0033, t01=0x007c}
0x05046…05050               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00a4}
0x05050…05064               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x0033, t01=0x00ae}
0x05064…05088               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0033, t01=0x00c2}
0x05088…050b2               Head {h00=0x0026, h01=0x0050, text=» LDR A2,A7 ORDER CODE AS PARAMETER«, t00=0x0033, t01=0x00e6}
0x050b2…050d6               Head {h00=0x0020, h01=0x0050, text=» LDKL A7,DTETAB DTE TAB ADDR«, t00=0x0033, t01=0x0110}
0x050d6…05100               Head {h00=0x0026, h01=0x0050, text=» ANK A2,/FF STRIP OFF OPTION BITS «, t00=0x0033, t01=0x0134}
0x05100…0513e               Head {h00=0x003a, h01=0x0050, text=» CF A15,LOOKUP BRANCH ON CODES, TABLE ADDRESS TO STACK«, t00=0x0033, t01=0x015e}
0x0513e…05172               Head {h00=0x0030, h01=0x0050, text=» DATA TREQX,RTREQ LAST ENTRY; ERROR ADDRESS «, t00=0x0034, t01=0x000c}
0x05172…0519e               Head {h00=0x0028, h01=0x0050, text=» DATA RECEIVE,RQRECE RECEIVE REQUEST«, t00=0x0034, t01=0x0040}
0x0519e…051c4               Head {h00=0x0022, h01=0x0050, text=» DATA SEND,RQSEND SEND REQUEST«, t00=0x0034, t01=0x006c}
0x051c4…051ea               Head {h00=0x0022, h01=0x0050, text=» DATA OPEN,RQOPEN OPEN REQUEST«, t00=0x0034, t01=0x0092}
0x051ea…05212               Head {h00=0x0024, h01=0x0050, text=» DATA CLOSE,RQCLOS CLOSE REQUEST«, t00=0x0034, t01=0x00b8}
0x05212…05244               Head {h00=0x002e, h01=0x0050, text=» DATA CONPAS,RQCON CONNECT PASSIVE REQUEST«, t00=0x0034, t01=0x00e0}
0x05244…05270               Head {h00=0x0028, h01=0x0050, text=» DATA DISCO,RQDIS DISCONNECT REQUEST«, t00=0x0034, t01=0x0112}
0x05270…0529e               Head {h00=0x002a, h01=0x0050, text=» DATA RSTAT,RQRSTS READ STATUS REQUEST«, t00=0x0034, t01=0x013e}
0x0529e…052ca               Head {h00=0x0028, h01=0x0050, text=» DATA SSTAT,RQSST SET STATUS REQUEST«, t00=0x0034, t01=0x016c}
0x052ca…052fa               Head {h00=0x002c, h01=0x0050, text=» DATA STIMOT,RQTIME SET REQUEST TIMEOUT «, t00=0x0035, t01=0x0008}
0x052fa…05338               Head {h00=0x003a, h01=0x0050, text=»TREQX DATA STATIS,RQSTAT READ/RESET STATISTICS REQUEST«, t00=0x0035, t01=0x0038}
0x05338…05346               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x0076}
0x05346…05350               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0084}
0x05350…0535a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x008e}
0x0535a…05370               Head {h00=0x0012, h01=0x0050, text=»* OPEN REQUEST«, t00=0x0035, t01=0x0098}
0x05370…0537a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00ae}
0x0537a…0539a               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0035, t01=0x00b8}
0x0539a…053c2               Head {h00=0x0024, h01=0x0050, text=»*  SYMBOLIC DTE-ADDRESS (ECBCW2)«, t00=0x0035, t01=0x00d8}
0x053c2…053cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0100}
0x053cc…053e0               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0035, t01=0x010a}
0x053e0…0541c               Head {h00=0x0038, h01=0x0050, text=»*  1. CHECK IF ALREADY OPEN & IF SO SAME DTE-ADDRESS«, t00=0x0035, t01=0x011e}
0x0541c…05446               Head {h00=0x0026, h01=0x0050, text=»*  2. CONVERT & VERIFY DTE ADDRESS«, t00=0x0035, t01=0x015a}
0x05446…05450               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0184}
0x05450…05464               Head {h00=0x0010, h01=0x0050, text=»RQOPEN EQU *«, t00=0x0035, t01=0x018e}
0x05464…05496               Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET SYMBOLIC DTE-ADDRESS «, t00=0x0036, t01=0x0012}
0x05496…054be               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x0036, t01=0x0044}
0x054be…054ea               Head {h00=0x0028, h01=0x0050, text=» ADR A2,A2 WORD ALIGNED INDEX VALUE «, t00=0x0036, t01=0x006c}
0x054ea…0551a               Head {h00=0x002c, h01=0x0050, text=» ABI RQOPTB,A2 BRANCH ON INDEX IN TABLE «, t00=0x0036, t01=0x0098}
0x0551a…05544               Head {h00=0x0026, h01=0x0050, text=»RQOPTB DATA RQOP20 CLOSED/INACTIVE«, t00=0x0036, t01=0x00c8}
0x05544…0556a               Head {h00=0x0022, h01=0x0050, text=» DATA RQOP15 OPEN IN PROGRESS «, t00=0x0036, t01=0x00f2}
0x0556a…05584               Head {h00=0x0016, h01=0x0050, text=» DATA RQOP10 OPEN «, t00=0x0036, t01=0x0118}
0x05584…055aa               Head {h00=0x0022, h01=0x0050, text=» DATA RQOP15 CLOSE IN PROGRESS«, t00=0x0036, t01=0x0132}
0x055aa…055be               Head {h00=0x0010, h01=0x0050, text=»RQOP10 EQU *«, t00=0x0036, t01=0x0158}
0x055be…055f4               Head {h00=0x0032, h01=0x0050, text=» CW A1,DTELAD,A7 SAME AS THE ONE WHO OPENED ? «, t00=0x0036, t01=0x016c}
0x055f4…05612               Head {h00=0x001a, h01=0x0050, text=» RF(E) RQOP90 YES - OK«, t00=0x0037, t01=0x0012}
0x05612…05626               Head {h00=0x0010, h01=0x0050, text=»RQOP15 EQU *«, t00=0x0037, t01=0x0030}
0x05626…05650               Head {h00=0x0026, h01=0x0050, text=» ABL RTSEQ RETURN: SEQUENCE ERROR «, t00=0x0037, t01=0x0044}
0x05650…0565a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x006e}
0x0565a…0566e               Head {h00=0x0010, h01=0x0050, text=»RQOP20 EQU *«, t00=0x0037, t01=0x0078}
0x0566e…05698               Head {h00=0x0026, h01=0x0050, text=» IM DTESTA,A7 SET OPEN IN PROGRESS«, t00=0x0037, t01=0x008c}
0x05698…056ca               Head {h00=0x002e, h01=0x0050, text=» ST A1,DTELAD,A7 SAVE SYMBOLIC DTE ADDRESS«, t00=0x0037, t01=0x00b6}
0x056ca…05700               Head {h00=0x0032, h01=0x0050, text=» LDR A2,A7 ADDR TO SELECT AND POLL IN DTE TAB «, t00=0x0037, t01=0x00e8}
0x05700…05734               Head {h00=0x0030, h01=0x0050, text=» CF A15,GETDNA CONVERT AND VALIDATE DTE ADDR«, t00=0x0037, t01=0x011e}
0x05734…05746               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0037, t01=0x0152}
0x05746…05760               Head {h00=0x0016, h01=0x0050, text=» RF(NN) RQOP80 OK «, t00=0x0037, t01=0x0164}
0x05760…05784               Head {h00=0x0020, h01=0x0050, text=» CM DTELAD,A7 CLEAR DTE ADDR«, t00=0x0037, t01=0x017e}
0x05784…057aa               Head {h00=0x0022, h01=0x0050, text=» CM DTESTA,A7 CLEAR DTE STATUS«, t00=0x0038, t01=0x0012}
0x057aa…057d2               Head {h00=0x0024, h01=0x0050, text=» ABL RTREQ RETURN: REQUEST ERROR«, t00=0x0038, t01=0x0038}
0x057d2…057dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0060}
0x057dc…057f0               Head {h00=0x0010, h01=0x0050, text=»RQOP80 EQU *«, t00=0x0038, t01=0x006a}
0x057f0…05804               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0038, t01=0x007e}
0x05804…0582e               Head {h00=0x0026, h01=0x0050, text=» LDR* A2,A7 DTE ADDRESS IN EBCDIC «, t00=0x0038, t01=0x0092}
0x0582e…05840               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0038, t01=0x00bc}
0x05840…05854               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0038, t01=0x00ce}
0x05854…05878               Head {h00=0x0020, h01=0x0050, text=» RF(Z) RQOP30 ONLY ONE BYTE «, t00=0x0038, t01=0x00e2}
0x05878…058a4               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 CONVERT INTO ASCII «, t00=0x0038, t01=0x0106}
0x058a4…058b6               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x0038, t01=0x0132}
0x058b6…058ca               Head {h00=0x0010, h01=0x0050, text=»RQOP30 EQU *«, t00=0x0038, t01=0x0144}
0x058ca…058dc               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A1«, t00=0x0038, t01=0x0158}
0x058dc…058f0               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x0038, t01=0x016a}
0x058f0…05908               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A1«, t00=0x0038, t01=0x017e}
0x05908…05936               Head {h00=0x002a, h01=0x0050, text=» STR A2,A7 SAVE ASCII VALUE IN DTETAB «, t00=0x0039, t01=0x0008}
0x05936…05942               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0036}
0x05942…05968               Head {h00=0x0022, h01=0x0050, text=» IM DTESTA,A7 SET OPEN STATUS «, t00=0x0039, t01=0x0042}
0x05968…0598a               Head {h00=0x001e, h01=0x0050, text=» ABL DTE:ON CONNECT MODEM «, t00=0x0039, t01=0x0068}
0x0598a…0599e               Head {h00=0x0010, h01=0x0050, text=»RQOP90 EQU *«, t00=0x0039, t01=0x008a}
0x0599e…059cc               Head {h00=0x002a, h01=0x0050, text=» LD A2,DTEPLS,A7 PHYSICAL CONNECTION ?«, t00=0x0039, t01=0x009e}
0x059cc…059f0               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) RTOK YES RETURN OK «, t00=0x0039, t01=0x00cc}
0x059f0…05a1e               Head {h00=0x002a, h01=0x0050, text=» ABL RTPHYC RETURN PHYSICAL CONNECTION«, t00=0x0039, t01=0x00f0}
0x05a1e…05a2c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x011e}
0x05a2c…05a36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x012c}
0x05a36…05a4e               Head {h00=0x0014, h01=0x0050, text=»* CLOSE REQUEST «, t00=0x0039, t01=0x0136}
0x05a4e…05a58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x014e}
0x05a58…05a78               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0039, t01=0x0158}
0x05a78…05a9e               Head {h00=0x0022, h01=0x0050, text=»*  OPTION /00 = UNCONDITIONAL «, t00=0x0039, t01=0x0178}
0x05a9e…05abc               Head {h00=0x001a, h01=0x0050, text=»*   /80 = CONDITIONAL «, t00=0x003a, t01=0x000e}
0x05abc…05ad0               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x003a, t01=0x002c}
0x05ad0…05b20               Head {h00=0x004c, h01=0x0050, text=»*  1. IF CONDITIONAL, CHECK IF ANY LOGICAL CONNECTIONS (DWTS) ARE ACTIVE«, t00=0x003a, t01=0x0040}
0x05b20…05b36               Head {h00=0x0012, h01=0x0050, text=»*     ACTIVE. «, t00=0x003a, t01=0x0090}
0x05b36…05b6a               Head {h00=0x0030, h01=0x0050, text=»*  2. IF UNCONDITIONAL, DISCONNECT ALL DWT:S«, t00=0x003a, t01=0x00a6}
0x05b6a…05b74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00da}
0x05b74…05b88               Head {h00=0x0010, h01=0x0050, text=»RQCLOS EQU *«, t00=0x003a, t01=0x00e4}
0x05b88…05bb4               Head {h00=0x0028, h01=0x0050, text=» LD A5,DWTOR,A6 GET OPTION AND ORDER«, t00=0x003a, t01=0x00f8}
0x05bb4…05be4               Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBCW2,A8 GET SYMBOLIC DTE - ADDR«, t00=0x003a, t01=0x0124}
0x05be4…05bfa               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RQCL20 «, t00=0x003a, t01=0x0154}
0x05bfa…05c20               Head {h00=0x0022, h01=0x0050, text=» CW A2,DTELAD,A7 CORRECT DTE ?«, t00=0x003a, t01=0x016a}
0x05c20…05c4c               Head {h00=0x0028, h01=0x0050, text=» ABL(NE) RTREQ RETURN: REQUEST ERROR«, t00=0x003a, t01=0x0190}
0x05c4c…05c60               Head {h00=0x0010, h01=0x0050, text=»RQCL20 EQU *«, t00=0x003b, t01=0x002c}
0x05c60…05c88               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x003b, t01=0x0040}
0x05c88…05ca8               Head {h00=0x001c, h01=0x0050, text=» ABL(Z) RTOK RETURN : OK«, t00=0x003b, t01=0x0068}
0x05ca8…05cc6               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 DTE OPENED ?«, t00=0x003b, t01=0x0088}
0x05cc6…05cf4               Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) RTSEQ RETURN: SEQUENCE ERROR «, t00=0x003b, t01=0x00a6}
0x05cf4…05d1c               Head {h00=0x0024, h01=0x0050, text=» IM DTESTA,A7 CLOSE IN PROGRESS «, t00=0x003b, t01=0x00d4}
0x05d1c…05d48               Head {h00=0x0028, h01=0x0050, text=» LDR A8,A6 SAVE REQUESTING DWT-ADDR «, t00=0x003b, t01=0x00fc}
0x05d48…05d52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0128}
0x05d52…05d66               Head {h00=0x0010, h01=0x0050, text=»RQCL40 EQU *«, t00=0x003b, t01=0x0132}
0x05d66…05d7c               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x003b, t01=0x0146}
0x05d7c…05daa               Head {h00=0x002a, h01=0x0050, text=» LD A6,DTEDDT,A7 GET DISCARD DWT ADDR «, t00=0x003b, t01=0x015c}
0x05daa…05dc0               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RQCL50 «, t00=0x003b, t01=0x018a}
0x05dc0…05de6               Head {h00=0x0022, h01=0x0050, text=» LDR A5,A5 CONDITIONAL CLOSE ?«, t00=0x003c, t01=0x0010}
0x05de6…05e02               Head {h00=0x0018, h01=0x0050, text=» RF(N) RQCL95 YES ! «, t00=0x003c, t01=0x0036}
0x05e02…05e32               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTCHN,A6 GET POINTER TO NEXT DWT«, t00=0x003c, t01=0x0052}
0x05e32…05e64               Head {h00=0x002e, h01=0x0050, text=» ST A2,DTEDDT,A7 DISCARD DWT ADDR REMOVED «, t00=0x003c, t01=0x0082}
0x05e64…05e76               Head {h00=0x000e, h01=0x0050, text=» RF RQCL60«, t00=0x003c, t01=0x00b4}
0x05e76…05e8a               Head {h00=0x0010, h01=0x0050, text=»RQCL50 EQU *«, t00=0x003c, t01=0x00c6}
0x05e8a…05e96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x00da}
0x05e96…05ebc               Head {h00=0x0022, h01=0x0050, text=» LD A6,DTEDWT,A7 GET DWT ADDR «, t00=0x003c, t01=0x00e6}
0x05ebc…05ee2               Head {h00=0x0022, h01=0x0050, text=» RF(Z) RQCL90 NO DWT IN QUEUE «, t00=0x003c, t01=0x010c}
0x05ee2…05f08               Head {h00=0x0022, h01=0x0050, text=» LDR A5,A5 CONDITIONAL CLOSE ?«, t00=0x003c, t01=0x0132}
0x05f08…05f24               Head {h00=0x0018, h01=0x0050, text=» RF(N) RQCL95 YES ! «, t00=0x003c, t01=0x0158}
0x05f24…05f5e               Head {h00=0x0036, h01=0x0050, text=» LD A2,DWTCHN,A6 GET POINTER TO NEXT DWT IN CHAIN «, t00=0x003c, t01=0x0174}
0x05f5e…05f92               Head {h00=0x0030, h01=0x0050, text=» ST A2,DTEDWT,A7 DWT FIRST IN QUEUE REMOVED «, t00=0x003d, t01=0x001e}
0x05f92…05fa8               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x003d, t01=0x0052}
0x05fa8…05fbc               Head {h00=0x0010, h01=0x0050, text=»RQCL60 EQU *«, t00=0x003d, t01=0x0068}
0x05fbc…05fc8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x007c}
0x05fc8…05ffc               Head {h00=0x0030, h01=0x0050, text=» CF A15,RELBUF REMOVE BUFFERS QUEUED ON DWT «, t00=0x003d, t01=0x0088}
0x05ffc…06022               Head {h00=0x0022, h01=0x0050, text=» CM DWTSTA,A6 CLEAR DWT-STATUS«, t00=0x003d, t01=0x00bc}
0x06022…06046               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x003d, t01=0x00e2}
0x06046…0606a               Head {h00=0x0020, h01=0x0050, text=» CWR A8,A6 REQUESTING DWT ? «, t00=0x003d, t01=0x0106}
0x0606a…06094               Head {h00=0x0026, h01=0x0050, text=» RF(E) RQCL80 YES-COMPLETE REQUEST«, t00=0x003d, t01=0x012a}
0x06094…060c0               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTST,A6 A PENDING REQUEST ? «, t00=0x003d, t01=0x0154}
0x060c0…060e6               Head {h00=0x0022, h01=0x0050, text=» RB(N) RQCL40 NO TAKE NEXT DWT«, t00=0x003d, t01=0x0180}
0x060e6…06120               Head {h00=0x0036, h01=0x0050, text=» LDK A1,R:SEQ COMPLETE REQUEST WITH SEQUENCE ERROR«, t00=0x003e, t01=0x0016}
0x06120…06134               Head {h00=0x0010, h01=0x0050, text=»RQCL80 EQU *«, t00=0x003e, t01=0x0050}
0x06134…06160               Head {h00=0x0028, h01=0x0050, text=» CF A15,TENDIO COMPLETE THE REQUEST «, t00=0x003e, t01=0x0064}
0x06160…06186               Head {h00=0x0022, h01=0x0050, text=» RB RQCL40 TAKE NEXT ON QUEUE «, t00=0x003e, t01=0x0090}
0x06186…0619a               Head {h00=0x0010, h01=0x0050, text=»RQCL90 EQU *«, t00=0x003e, t01=0x00b6}
0x0619a…061c0               Head {h00=0x0022, h01=0x0050, text=» CMR A7 REMOVE NETWORK ADDRESS«, t00=0x003e, t01=0x00ca}
0x061c0…061e2               Head {h00=0x001e, h01=0x0050, text=» CM DTESTA,A7 CLEAR STATUS«, t00=0x003e, t01=0x00f0}
0x061e2…0620c               Head {h00=0x0026, h01=0x0050, text=» LDR A6,A8 GET REQUESTING DWT ADDR«, t00=0x003e, t01=0x0112}
0x0620c…06238               Head {h00=0x0028, h01=0x0050, text=» LD A8,DWTECB,A6 RESTORE ECB ADDRESS«, t00=0x003e, t01=0x013c}
0x06238…06256               Head {h00=0x001a, h01=0x0050, text=» ABL RTOK RETURN : OK «, t00=0x003e, t01=0x0168}
0x06256…0626a               Head {h00=0x0010, h01=0x0050, text=»RQCL95 EQU *«, t00=0x003e, t01=0x0186}
0x0626a…0627c               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x003f, t01=0x000a}
0x0627c…062a8               Head {h00=0x0028, h01=0x0050, text=» ST A2,DTESTA,A7 SET DTE OPEN AGAIN «, t00=0x003f, t01=0x001c}
0x062a8…062ce               Head {h00=0x0022, h01=0x0050, text=» LDR A6,A8 RESTORE DWT ADDRESS«, t00=0x003f, t01=0x0048}
0x062ce…062f0               Head {h00=0x001e, h01=0x0050, text=» ABL RTSEQ SEQUENCE ERROR «, t00=0x003f, t01=0x006e}
0x062f0…062fe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003f, t01=0x0090}
0x062fe…06308               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x009e}
0x06308…0632a               Head {h00=0x001e, h01=0x0050, text=»* CONNECT PASSIVE REQUEST «, t00=0x003f, t01=0x00a8}
0x0632a…06334               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00ca}
0x06334…06354               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x003f, t01=0x00d4}
0x06354…06392               Head {h00=0x003a, h01=0x0050, text=»*  - SYMBOLIC SUBADDRESS (LEFTMOST BYTE IN ECBBA-BFR) «, t00=0x003f, t01=0x00f4}
0x06392…063bc               Head {h00=0x0026, h01=0x0050, text=»*  - DEVICE ADDRESSES IN ECBBA-BFR«, t00=0x003f, t01=0x0132}
0x063bc…063e2               Head {h00=0x0022, h01=0x0050, text=»*  - LENGTH OF BUFFER (ECBRL) «, t00=0x003f, t01=0x015c}
0x063e2…0640c               Head {h00=0x0026, h01=0x0050, text=»*  - SYMBOLIC DTE-ADDRESS (ECBCW2)«, t00=0x003f, t01=0x0182}
0x0640c…06416               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x001c}
0x06416…0642a               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0040, t01=0x0026}
0x0642a…0645e               Head {h00=0x0030, h01=0x0050, text=»*  1. VERIFY DTE-ADDRESS AS PER OPEN REQUEST«, t00=0x0040, t01=0x003a}
0x0645e…06490               Head {h00=0x002e, h01=0x0050, text=»*  2. VERIFY & CONVERT SUBTERMINAL ADDRESS«, t00=0x0040, t01=0x006e}
0x06490…064c0               Head {h00=0x002c, h01=0x0050, text=»*  3. VERIFY AND STORE DEVICE ADDRESSES «, t00=0x0040, t01=0x00a0}
0x064c0…064e8               Head {h00=0x0024, h01=0x0050, text=»*  4. LINK CALLING DWT TO QUEUE «, t00=0x0040, t01=0x00d0}
0x064e8…064f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00f8}
0x064f2…06506               Head {h00=0x0010, h01=0x0050, text=»RQCON EQU * «, t00=0x0040, t01=0x0102}
0x06506…06530               Head {h00=0x0026, h01=0x0050, text=» LD A2,DTELAD,A7 SYMBOLIC DTE-ADDR«, t00=0x0040, t01=0x0116}
0x06530…06556               Head {h00=0x0022, h01=0x0050, text=» CW A2,ECBCW2,A8 CORRECT DTE ?«, t00=0x0040, t01=0x0140}
0x06556…06586               Head {h00=0x002c, h01=0x0050, text=» ABL(NE) RTREQ NO, RETURN: REQUEST ERROR«, t00=0x0040, t01=0x0166}
0x06586…065ae               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x0041, t01=0x0008}
0x065ae…065c6               Head {h00=0x0014, h01=0x0050, text=» SUK A2,2 OPEN ?«, t00=0x0041, t01=0x0030}
0x065c6…065f8               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTSEQ NO, RETURN: SEQUENCE ERROR «, t00=0x0041, t01=0x0048}
0x065f8…06620               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x0041, t01=0x007a}
0x06620…06646               Head {h00=0x0022, h01=0x0050, text=» SUK A2,2 ALREADY CONNECTED ? «, t00=0x0041, t01=0x00a2}
0x06646…06678               Head {h00=0x002e, h01=0x0050, text=» ABL(Z) RTSEQ YES, RETURN: SEQUENCE ERROR «, t00=0x0041, t01=0x00c8}
0x06678…0668e               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x0041, t01=0x00fa}
0x0668e…066b8               Head {h00=0x0026, h01=0x0050, text=» LDKL A4,MMUBUF MMU BUFFER ADDRESS«, t00=0x0041, t01=0x0110}
0x066b8…066d6               Head {h00=0x001a, h01=0x0050, text=» ST A4,ECBBA,A8 TO ECB«, t00=0x0041, t01=0x013a}
0x066d6…06704               Head {h00=0x002a, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA TO MMU BUFFER«, t00=0x0041, t01=0x0158}
0x06704…06710               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x0186}
0x06710…0673e (66, 0, 400)  Head {h00=0x002a, h01=0x0050, text=» LD A4,ECBBA,A8 GET ECB-BUFFER ADDRESS«, t00=0x0042, t01=0x0004}
0x0673e…06752               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0042, t01=0x0032}
0x06752…0676c               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0 RESET A2«, t00=0x0042, t01=0x0046}
0x0676c…06796               Head {h00=0x0026, h01=0x0050, text=» LCR A2,A4 GET SELECT SUB-ADDRESS «, t00=0x0042, t01=0x0060}
0x06796…067c2               Head {h00=0x0028, h01=0x0050, text=» SC A2,DWTSUB,A6 SAVE IT IN THE DWT «, t00=0x0042, t01=0x008a}
0x067c2…067f4               Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET SYMBOLIC DTE-ADDRESS «, t00=0x0042, t01=0x00b6}
0x067f4…0682e               Head {h00=0x0036, h01=0x0050, text=» CF A15,GETSNA VALIDATE AND TRANSLATE THE SUB-ADDR«, t00=0x0042, t01=0x00e8}
0x0682e…0684c               Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 IS IT OK ? «, t00=0x0042, t01=0x0122}
0x0684c…06866               Head {h00=0x0016, h01=0x0050, text=» RF(NN) RQCN20 YES«, t00=0x0042, t01=0x0140}
0x06866…0688e               Head {h00=0x0024, h01=0x0050, text=» CM DWTSUB,A7 CLEAR SUB-ADDRESS «, t00=0x0042, t01=0x015a}
0x0688e…068b6               Head {h00=0x0024, h01=0x0050, text=» ABL RTREQ RETURN REQUEST ERROR «, t00=0x0042, t01=0x0182}
0x068b6…068ca               Head {h00=0x0010, h01=0x0050, text=»RQCN20 EQU *«, t00=0x0043, t01=0x001a}
0x068ca…068de               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0043, t01=0x002e}
0x068de…06914               Head {h00=0x0032, h01=0x0050, text=» LC A1,TASCII,A1 CONVERT FROM EBCDIC TO ASCII «, t00=0x0043, t01=0x0042}
0x06914…06920               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x0078}
0x06920…06934               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0043, t01=0x0084}
0x06934…06962               Head {h00=0x002a, h01=0x0050, text=» SC A1,DWTCHP,A6 SAVE NETWORK ADDRESS «, t00=0x0043, t01=0x0098}
0x06962…0696e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x00c6}
0x0696e…06996               Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A4 GET SYMBOLIC ADDRESS«, t00=0x0043, t01=0x00d2}
0x06996…069c4               Head {h00=0x002a, h01=0x0050, text=» SC A2,DWTSUB+1,A6 SAVE IT IN THE DWT «, t00=0x0043, t01=0x00fa}
0x069c4…069f6               Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET SYMBOLIC DTE ADDRESS «, t00=0x0043, t01=0x0128}
0x069f6…06a22               Head {h00=0x0028, h01=0x0050, text=» ST A1,DWTLAD,A6 SAVE IT IN THE DWT «, t00=0x0043, t01=0x015a}
0x06a22…06a60               Head {h00=0x003a, h01=0x0050, text=» CF A15,GETSNA VALIDATE AND TRANSLATE THE SUB-ADDRESS «, t00=0x0043, t01=0x0186}
0x06a60…06a7e               Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 IS IT OK ? «, t00=0x0044, t01=0x0034}
0x06a7e…06a98               Head {h00=0x0016, h01=0x0050, text=» RF(NN) RQCN30 YES«, t00=0x0044, t01=0x0052}
0x06a98…06ac0               Head {h00=0x0024, h01=0x0050, text=» CM DWTSUB,A6 CLEAR SUB-ADDRESS «, t00=0x0044, t01=0x006c}
0x06ac0…06ae8               Head {h00=0x0024, h01=0x0050, text=» CM DWTLAD,A6 CLEAR DTE ADDRESS «, t00=0x0044, t01=0x0094}
0x06ae8…06b10               Head {h00=0x0024, h01=0x0050, text=» ABL RTREQ RETURN REQUEST ERROR «, t00=0x0044, t01=0x00bc}
0x06b10…06b24               Head {h00=0x0010, h01=0x0050, text=»RQCN30 EQU *«, t00=0x0044, t01=0x00e4}
0x06b24…06b38               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0044, t01=0x00f8}
0x06b38…06b6e               Head {h00=0x0032, h01=0x0050, text=» LC A1,TASCII,A1 CONVERT FROM EBCDIC TO ASCII «, t00=0x0044, t01=0x010c}
0x06b6e…06b7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x0142}
0x06b7a…06baa               Head {h00=0x002c, h01=0x0050, text=» SC A1,DWTCHP+1,A6 SAVE NETWORK ADDRESS «, t00=0x0044, t01=0x014e}
0x06baa…06bc0               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x0044, t01=0x017e}
0x06bc0…06bd8 (69, 0, 400)  Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW2,A8«, t00=0x0045, t01=0x0004}
0x06bd8…06be4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x001c}
0x06be4…06bee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0028}
0x06bee…06bf8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0032}
0x06bf8…06c22               Head {h00=0x0026, h01=0x0050, text=»*  LINK DWT TO CONFIGURATION CHAIN«, t00=0x0045, t01=0x003c}
0x06c22…06c2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0066}
0x06c2c…06c42               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0045, t01=0x0070}
0x06c42…06c62               Head {h00=0x001c, h01=0x0050, text=» LDK A2,/40 OPTION CODE «, t00=0x0045, t01=0x0086}
0x06c62…06c86               Head {h00=0x0020, h01=0x0050, text=» CC A2,DWTOPT,A6 DISCARD DWT«, t00=0x0045, t01=0x00a6}
0x06c86…06ca0               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) RQCN40 NO «, t00=0x0045, t01=0x00ca}
0x06ca0…06cd0               Head {h00=0x002c, h01=0x0050, text=» LD A1,DTEDDT,A7 POINTER TO DISCARD DWT «, t00=0x0045, t01=0x00e4}
0x06cd0…06ce6               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) RQCN50«, t00=0x0045, t01=0x0114}
0x06ce6…06d1a               Head {h00=0x0030, h01=0x0050, text=» ST A6,DTEDDT,A7 SAVE POINTER TO DISCARD DWT«, t00=0x0045, t01=0x012a}
0x06d1a…06d2c               Head {h00=0x000e, h01=0x0050, text=» RF RQCN60«, t00=0x0045, t01=0x015e}
0x06d2c…06d38               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x0170}
0x06d38…06d4c               Head {h00=0x0010, h01=0x0050, text=»RQCN40 EQU *«, t00=0x0045, t01=0x017c}
0x06d4c…06d7e               Head {h00=0x002e, h01=0x0050, text=» LD A1,DTEDWT,A7 GET POINTER TO DWT QUEUE «, t00=0x0045, t01=0x0190}
0x06d7e…06d98               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) RQCN50 YES«, t00=0x0046, t01=0x0032}
0x06d98…06dca               Head {h00=0x002e, h01=0x0050, text=» ST A6,DTEDWT,A7 SAVE POINTER TO DWT QUEUE«, t00=0x0046, t01=0x004c}
0x06dca…06ddc               Head {h00=0x000e, h01=0x0050, text=» RF RQCN60«, t00=0x0046, t01=0x007e}
0x06ddc…06df0               Head {h00=0x0010, h01=0x0050, text=»RQCN50 EQU *«, t00=0x0046, t01=0x0090}
0x06df0…06e12               Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 MOV ADDR TO A2 «, t00=0x0046, t01=0x00a4}
0x06e12…06e3e               Head {h00=0x0028, h01=0x0050, text=» LD A1,DWTCHN,A2 POINTER TO NEXT DWT«, t00=0x0046, t01=0x00c6}
0x06e3e…06e70               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) RQCN50 KEEP ON UNTIL LAST IN CHAIN«, t00=0x0046, t01=0x00f2}
0x06e70…06e9e               Head {h00=0x002a, h01=0x0050, text=» ST A6,DWTCHN,A2 ADD NEW DWT TO CHAIN «, t00=0x0046, t01=0x0124}
0x06e9e…06eb2               Head {h00=0x0010, h01=0x0050, text=»RQCN60 EQU *«, t00=0x0046, t01=0x0152}
0x06eb2…06edc               Head {h00=0x0026, h01=0x0050, text=» CM DWTCHN,A6 END OF CHAIN MARKER «, t00=0x0046, t01=0x0166}
0x06edc…06f0c               Head {h00=0x002c, h01=0x0050, text=» ST A7,DWTCHD,A6 BACKWARD LINK TO ANCHOR«, t00=0x0046, t01=0x0190}
0x06f0c…06f1e               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x0047, t01=0x0030}
0x06f1e…06f4c               Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTSTA,A6 SET STATUS: CONNECTED«, t00=0x0047, t01=0x0042}
0x06f4c…06f62               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/8000«, t00=0x0047, t01=0x0070}
0x06f62…06f8a               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTRTV,A6 STORE NO TIMING«, t00=0x0047, t01=0x0086}
0x06f8a…06f9e               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0047, t01=0x00ae}
0x06f9e…06fca               Head {h00=0x0028, h01=0x0050, text=» LD A3,ECBBA,A8 SAVE BUFFER ADDRESS «, t00=0x0047, t01=0x00c2}
0x06fca…06fee               Head {h00=0x0020, h01=0x0050, text=» ST A3,DWTBUF,A6 IN THE DWT «, t00=0x0047, t01=0x00ee}
0x06fee…07016               Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBRL,A8 SAVE THE CURSOR «, t00=0x0047, t01=0x0112}
0x07016…07042               Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTCUR,A6 ADDRESS IN THE DWT «, t00=0x0047, t01=0x013a}
0x07042…0704e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0166}
0x0704e…07064               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x0047, t01=0x0172}
0x07064…07082               Head {h00=0x001a, h01=0x0050, text=» LDK A1,4 STORE DEVICE«, t00=0x0047, t01=0x0188}
0x07082…070aa               Head {h00=0x0024, h01=0x0050, text=» ORS A1,DWTST,A6 END IN THE DWT «, t00=0x0048, t01=0x0016}
0x070aa…070da               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x0048, t01=0x003e}
0x070da…070e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x006e}
0x070e6…070f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x007a}
0x070f0…0710a               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x0048, t01=0x0084}
0x0710a…07114               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x009e}
0x07114…0713c               Head {h00=0x0024, h01=0x0050, text=» LD A2,DCTPGP POLL TIMER POINTER«, t00=0x0048, t01=0x00a8}
0x0713c…07168               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RQCN70 TIMER ALREADY STARTED «, t00=0x0048, t01=0x00d0}
0x07168…0717e               Head {h00=0x0012, h01=0x0050, text=» CF A15,SPOTIM«, t00=0x0048, t01=0x00fc}
0x0717e…07192               Head {h00=0x0010, h01=0x0050, text=»RQCN70 EQU *«, t00=0x0048, t01=0x0112}
0x07192…071a6               Head {h00=0x0010, h01=0x0050, text=» ABL RQOP90 «, t00=0x0048, t01=0x0126}
0x071a6…071b4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0048, t01=0x013a}
0x071b4…071be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0148}
0x071be…071da               Head {h00=0x0018, h01=0x0050, text=»* DISCONNECT REQUEST«, t00=0x0048, t01=0x0152}
0x071da…071e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x016e}
0x071e4…07204               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0048, t01=0x0178}
0x07204…07220               Head {h00=0x0018, h01=0x0050, text=»*  DWT-ADDRESS (A6) «, t00=0x0049, t01=0x0008}
0x07220…0722a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0024}
0x0722a…0723e               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0049, t01=0x002e}
0x0723e…07268               Head {h00=0x0026, h01=0x0050, text=»*  1. CHECK IF IN CONNECTED STATE «, t00=0x0049, t01=0x0042}
0x07268…072a2               Head {h00=0x0036, h01=0x0050, text=»*  2. REMOVE DWT-ADDRESS FROM CONFIGURATION CHAIN «, t00=0x0049, t01=0x006c}
0x072a2…072cc               Head {h00=0x0026, h01=0x0050, text=»*  3. SET DWT STATUS DISCONNECTED «, t00=0x0049, t01=0x00a6}
0x072cc…072d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00d0}
0x072d6…072f6               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0049, t01=0x00da}
0x072f6…07312               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x0049, t01=0x00fa}
0x07312…0731c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0116}
0x0731c…07330               Head {h00=0x0010, h01=0x0050, text=»RQDIS EQU * «, t00=0x0049, t01=0x0120}
0x07330…07364               Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTSTA,A6 DWT STATUS = DISCONNECTED ?«, t00=0x0049, t01=0x0134}
0x07364…07388               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) RTOK YES, RETURN: OK«, t00=0x0049, t01=0x0168}
0x07388…073b6               Head {h00=0x002a, h01=0x0050, text=» LD A3,DTEDWT,A7 FIRST DWT ADDR TO A3 «, t00=0x0049, t01=0x018c}
0x073b6…073d8               Head {h00=0x001e, h01=0x0050, text=» RF(Z) RQDI20 END OF CHAIN«, t00=0x004a, t01=0x002a}
0x073d8…073f4               Head {h00=0x0018, h01=0x0050, text=» CWR A3,A6 OUR DWT ?«, t00=0x004a, t01=0x004c}
0x073f4…0740e               Head {h00=0x0016, h01=0x0050, text=» RF(NE) RQDI10 NO «, t00=0x004a, t01=0x0068}
0x0740e…0743c               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE QUEUED BUFFERS «, t00=0x004a, t01=0x0082}
0x0743c…07472               Head {h00=0x0032, h01=0x0050, text=» LD A3,DWTCHN,A6 YES-TAKE POINTER TO NEXT DWT «, t00=0x004a, t01=0x00b0}
0x07472…07494               Head {h00=0x001e, h01=0x0050, text=» CM DWTSTA,A6 SET DWT FREE«, t00=0x004a, t01=0x00e6}
0x07494…074c6               Head {h00=0x002e, h01=0x0050, text=» ST A3,DTEDWT,A7 STORE DWT-ADDR IN DTETAB «, t00=0x004a, t01=0x0108}
0x074c6…074d8               Head {h00=0x000e, h01=0x0050, text=» RB RQCN70«, t00=0x004a, t01=0x013a}
0x074d8…074ec               Head {h00=0x0010, h01=0x0050, text=»RQDI10 EQU *«, t00=0x004a, t01=0x014c}
0x074ec…0751e               Head {h00=0x002e, h01=0x0050, text=» LDR A5,A3 A5 CONTAINES PREVIOUS DWT-ADDR «, t00=0x004a, t01=0x0160}
0x0751e…0755e (75, 0, 400)  Head {h00=0x003c, h01=0x0050, text=» LD A3,DWTCHN,A5 A3 CONTAINES ADDR TO NEXT DWT ON CHAIN «, t00=0x004b, t01=0x0004}
0x0755e…07580               Head {h00=0x001e, h01=0x0050, text=» RF(Z) RQDI20 END OF CHAIN«, t00=0x004b, t01=0x0044}
0x07580…0759c               Head {h00=0x0018, h01=0x0050, text=» CWR A3,A6 OUR DWT ?«, t00=0x004b, t01=0x0066}
0x0759c…075c8               Head {h00=0x0028, h01=0x0050, text=» RB(NE) RQDI10 NO TAKE NEXT IN CHAIN«, t00=0x004b, t01=0x0082}
0x075c8…075f6               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE QUEUED BUFFERS «, t00=0x004b, t01=0x00ae}
0x075f6…0762c               Head {h00=0x0032, h01=0x0050, text=» LD A3,DWTCHN,A6 YES-TAKE POINTER TO NEXT DWT «, t00=0x004b, t01=0x00dc}
0x0762c…07662               Head {h00=0x0032, h01=0x0050, text=» ST A3,DWTCHN,A5 AND STORE IT IN PREVIOUS DWT «, t00=0x004b, t01=0x0112}
0x07662…07684               Head {h00=0x001e, h01=0x0050, text=» CM DWTSTA,A6 SET DWT FREE«, t00=0x004b, t01=0x0148}
0x07684…07696               Head {h00=0x000e, h01=0x0050, text=» RB RQCN70«, t00=0x004b, t01=0x016a}
0x07696…076aa               Head {h00=0x0010, h01=0x0050, text=»RQDI20 EQU *«, t00=0x004b, t01=0x017c}
0x076aa…076c0               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x004b, t01=0x0190}
0x076c0…076f2               Head {h00=0x002e, h01=0x0050, text=» LD A3,DTEDDT,A7 TAKE THE DISCARD DWT ADDR«, t00=0x004c, t01=0x0016}
0x076f2…0770e               Head {h00=0x0018, h01=0x0050, text=» CWR A3,A6 OUR DWT ?«, t00=0x004c, t01=0x0048}
0x0770e…07734               Head {h00=0x0022, h01=0x0050, text=» RF(NE) RQDI30 SEQUENCE ERROR «, t00=0x004c, t01=0x0064}
0x07734…07762               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE BUFFERS QUEUED «, t00=0x004c, t01=0x008a}
0x07762…07778               Head {h00=0x0012, h01=0x0050, text=» CM DTEDDT,A7 «, t00=0x004c, t01=0x00b8}
0x07778…0779a               Head {h00=0x001e, h01=0x0050, text=» CM DWTSTA,A6 SET DWT FREE«, t00=0x004c, t01=0x00ce}
0x0779a…077ac               Head {h00=0x000e, h01=0x0050, text=» RB RQCN70«, t00=0x004c, t01=0x00f0}
0x077ac…077c0               Head {h00=0x0010, h01=0x0050, text=»RQDI30 EQU *«, t00=0x004c, t01=0x0102}
0x077c0…077cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x0116}
0x077cc…077ee               Head {h00=0x001e, h01=0x0050, text=» ABL RTSEQ SEQUENCE ERROR «, t00=0x004c, t01=0x0122}
0x077ee…077fc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x0144}
0x077fc…07806               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0152}
0x07806…07810               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x015c}
0x07810…0782e               Head {h00=0x001a, h01=0x0050, text=»* READ STATUS REQUEST «, t00=0x004c, t01=0x0166}
0x0782e…07838               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0184}
0x07838…07858               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x004c, t01=0x018e}
0x07858…07876               Head {h00=0x001a, h01=0x0050, text=»*  DWT - ADDRESS (A6) «, t00=0x004d, t01=0x001e}
0x07876…07880               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x003c}
0x07880…07894               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x004d, t01=0x0046}
0x07894…078d4               Head {h00=0x003c, h01=0x0050, text=»*  1. TRANSFER LOGICAL CONNECTION STATUS TO APPLICATION «, t00=0x004d, t01=0x005a}
0x078d4…078de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x009a}
0x078de…078fe               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x004d, t01=0x00a4}
0x078fe…0792c               Head {h00=0x002a, h01=0x0050, text=»*  LOGICAL CONNECTION STATUS (ECBCW1) «, t00=0x004d, t01=0x00c4}
0x0792c…07936               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00f2}
0x07936…07968               Head {h00=0x002e, h01=0x0050, text=»* 0       3 4       7 8      11 12      15«, t00=0x004d, t01=0x00fc}
0x07968…0799a               Head {h00=0x002e, h01=0x0050, text=»* ........................................«, t00=0x004d, t01=0x012e}
0x0799a…079cc               Head {h00=0x002e, h01=0x0050, text=»* .  DWT   .  DTE    .  DATA   .  PHYS   .«, t00=0x004d, t01=0x0160}
0x079cc…079fe (78, 0, 400)  Head {h00=0x002e, h01=0x0050, text=»* .  STATE .  STATE  .  LINK   .  LINK   .«, t00=0x004e, t01=0x0004}
0x079fe…07a30               Head {h00=0x002e, h01=0x0050, text=»* .        .         .  STATUS .  STATUS .«, t00=0x004e, t01=0x0036}
0x07a30…07a62               Head {h00=0x002e, h01=0x0050, text=»* ........................................«, t00=0x004e, t01=0x0068}
0x07a62…07a6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x009a}
0x07a6c…07a80               Head {h00=0x0010, h01=0x0050, text=»RQRSTS EQU *«, t00=0x004e, t01=0x00a4}
0x07a80…07a96               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x004e, t01=0x00b8}
0x07a96…07abe               Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBCW1,A8 GET OPTION CODE«, t00=0x004e, t01=0x00ce}
0x07abe…07ae8               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) RQRS10 TEST IF ANY MESSAGE«, t00=0x004e, t01=0x00f6}
0x07ae8…07af4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x0120}
0x07af4…07b18               Head {h00=0x0020, h01=0x0050, text=» LD A2,DWTSTA,A6 DWT STATUS «, t00=0x004e, t01=0x012c}
0x07b18…07b32               Head {h00=0x0016, h01=0x0050, text=» SLL A2,4 BITS 0-3«, t00=0x004e, t01=0x0150}
0x07b32…07b56               Head {h00=0x0020, h01=0x0050, text=» AD A2,DTESTA,A7 DTE STATUS «, t00=0x004e, t01=0x016a}
0x07b56…07b70               Head {h00=0x0016, h01=0x0050, text=» SLL A2,4 BITS 4-7«, t00=0x004e, t01=0x018e}
0x07b70…07b9a               Head {h00=0x0026, h01=0x0050, text=» AD A2,DTEDLS,A7 DATA LINK STATUS «, t00=0x004f, t01=0x0018}
0x07b9a…07bb6               Head {h00=0x0018, h01=0x0050, text=» SLL A2,4 BITS 8-11 «, t00=0x004f, t01=0x0042}
0x07bb6…07bf2               Head {h00=0x0038, h01=0x0050, text=» AD A2,DTEPLS,A7 PHYSICAL LINK STATUS (BITS 12 - 15)«, t00=0x004f, t01=0x005e}
0x07bf2…07c28               Head {h00=0x0032, h01=0x0050, text=» ST A2,ECBCW1,A8 STATUS TO ECB CONTROL WORD 1 «, t00=0x004f, t01=0x009a}
0x07c28…07c44               Head {h00=0x0018, h01=0x0050, text=» ABL RTOK RETURN: OK«, t00=0x004f, t01=0x00d0}
0x07c44…07c5a               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x004f, t01=0x00ec}
0x07c5a…07c64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0102}
0x07c64…07c6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x010c}
0x07c6e…07ca0               Head {h00=0x002e, h01=0x0050, text=»*  ANY MESSAGE ORDER (ONLY IF EM3270 = 1) «, t00=0x004f, t01=0x0116}
0x07ca0…07caa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0148}
0x07caa…07cbe               Head {h00=0x0010, h01=0x0050, text=»RQRS10 EQU *«, t00=0x004f, t01=0x0152}
0x07cbe…07ce6               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x004f, t01=0x0166}
0x07ce6…07cfe               Head {h00=0x0014, h01=0x0050, text=» SUK A2,2 OPEN ?«, t00=0x004f, t01=0x018e}
0x07cfe…07d26               Head {h00=0x0024, h01=0x0050, text=» ABL(NZ) RTSEQ NO,SEQUENCE ERROR«, t00=0x0050, t01=0x0016}
0x07d26…07d4e               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x0050, t01=0x003e}
0x07d4e…07d6c               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 CONNECTED ? «, t00=0x0050, t01=0x0066}
0x07d6c…07d94               Head {h00=0x0024, h01=0x0050, text=» ABL(NZ) RTSEQ NO,SEQUENCE ERROR«, t00=0x0050, t01=0x0084}
0x07d94…07dce               Head {h00=0x0036, h01=0x0050, text=» LD A4,DWTIPC,A6 ANY QUEUED MESSAGE ON THIS DWT ? «, t00=0x0050, t01=0x00ac}
0x07dce…07dfc               Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) RTOK YES COMPLETE THE REQUEST«, t00=0x0050, t01=0x00e6}
0x07dfc…07e1c               Head {h00=0x001c, h01=0x0050, text=» ABL TDISP TO DISPATCHER«, t00=0x0050, t01=0x0114}
0x07e1c…07e28               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0050, t01=0x0134}
0x07e28…07e36               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0050, t01=0x0140}
0x07e36…07e40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x014e}
0x07e40…07e5c               Head {h00=0x0018, h01=0x0050, text=»* SET STATUS REQUEST«, t00=0x0050, t01=0x0158}
0x07e5c…07e66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0174}
0x07e66…07e70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x017e}
0x07e70…07e90               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS «, t00=0x0050, t01=0x0188}
0x07e90…07eac               Head {h00=0x0018, h01=0x0050, text=»*  DWT ADDRESS (A6) «, t00=0x0051, t01=0x0018}
0x07eac…07eb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0034}
0x07eb6…07eca               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0051, t01=0x003e}
0x07eca…07efc               Head {h00=0x002e, h01=0x0050, text=»*  SET DEVICE STATUS (ONLY IF STARVI = 1) «, t00=0x0051, t01=0x0052}
0x07efc…07f06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0084}
0x07f06…07f28               Head {h00=0x001e, h01=0x0050, text=»*  DE DEVICE END : X`'00' «, t00=0x0051, t01=0x008e}
0x07f28…07f32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00b0}
0x07f32…07f5e               Head {h00=0x0028, h01=0x0050, text=»*  IR INTERVENTION REQUIRED : X'01' «, t00=0x0051, t01=0x00ba}
0x07f5e…07f68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00e6}
0x07f68…07f88               Head {h00=0x001c, h01=0x0050, text=»*  DB DEVICE BUSY :X'10'«, t00=0x0051, t01=0x00f0}
0x07f88…07f92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0110}
0x07f92…07fb2               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0051, t01=0x011a}
0x07fb2…07fce               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x0051, t01=0x013a}
0x07fce…07fd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0156}
0x07fd8…07fec               Head {h00=0x0010, h01=0x0050, text=»RQSST EQU * «, t00=0x0051, t01=0x0160}
0x07fec…08002               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=0 «, t00=0x0051, t01=0x0174}
0x08002…0802c               Head {h00=0x0026, h01=0x0050, text=» ABL RTREQ SET STATUS NOT INCLUDED«, t00=0x0051, t01=0x018a}
0x0802c…08038               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x0024}
0x08038…0804e               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x0052, t01=0x0030}
0x0804e…08078               Head {h00=0x0026, h01=0x0050, text=» LD A1,ECBCW1,A8 GET DEVICE STATUS«, t00=0x0052, t01=0x0046}
0x08078…08094               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x0052, t01=0x0070}
0x08094…080b2               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) RQST90 NOT DE «, t00=0x0052, t01=0x008c}
0x080b2…080dc               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTST,A6 GET DEVICE STATUS «, t00=0x0052, t01=0x00aa}
0x080dc…080ee               Head {h00=0x000e, h01=0x0050, text=» ANK A1,9 «, t00=0x0052, t01=0x00d4}
0x080ee…08118               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) RQST90 WACK HAS BEEN SENT «, t00=0x0052, t01=0x00e6}
0x08118…08148               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x0052, t01=0x0110}
0x08148…08160               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x0052, t01=0x0140}
0x08160…08174               Head {h00=0x0010, h01=0x0050, text=»RQST90 EQU *«, t00=0x0052, t01=0x0158}
0x08174…08198               Head {h00=0x0020, h01=0x0050, text=» ST A1,DWTST,A6 SAVE STATUS «, t00=0x0052, t01=0x016c}
0x08198…081b6               Head {h00=0x001a, h01=0x0050, text=» ABL RTOK RETYURN : OK«, t00=0x0052, t01=0x0190}
0x081b6…081c2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x001e}
0x081c2…081d0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0053, t01=0x002a}
0x081d0…081da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0038}
0x081da…08202               Head {h00=0x0024, h01=0x0050, text=»* READ/RESET STATISTICS REQUEST «, t00=0x0053, t01=0x0042}
0x08202…0820c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x006a}
0x0820c…0822c               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0053, t01=0x0074}
0x0822c…08250               Head {h00=0x0020, h01=0x0050, text=»*  TYPE = BITS 0-7 OF ECBCW1«, t00=0x0053, t01=0x0094}
0x08250…0826c               Head {h00=0x0018, h01=0x0050, text=»*  ECB-ADDRESS (A8) «, t00=0x0053, t01=0x00b8}
0x0826c…08298               Head {h00=0x0028, h01=0x0050, text=»*  DWT-ADDRESS OF LOW-LEVEL DWT (A6)«, t00=0x0053, t01=0x00d4}
0x08298…082a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0100}
0x082a2…082b6               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0053, t01=0x010a}
0x082b6…082e0               Head {h00=0x0026, h01=0x0050, text=»*  1. READ STATISTICS TO USER AREA«, t00=0x0053, t01=0x011e}
0x082e0…0830a               Head {h00=0x0026, h01=0x0050, text=»*  2. RESET ALL STATISTICS BUFFERS«, t00=0x0053, t01=0x0148}
0x0830a…08314               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0172}
0x08314…08334               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0053, t01=0x017c}
0x08334…08362               Head {h00=0x002a, h01=0x0050, text=»*  NUMBER OF BYTES TRANSFERRED (ECBEL)«, t00=0x0054, t01=0x000c}
0x08362…0837e               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x0054, t01=0x003a}
0x0837e…08388               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0056}
0x08388…0839c               Head {h00=0x0010, h01=0x0050, text=»RQSTAT EQU *«, t00=0x0054, t01=0x0060}
0x0839c…083b2               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=0 «, t00=0x0054, t01=0x0074}
0x083b2…083ee               Head {h00=0x0038, h01=0x0050, text=» ABL RTREQ RC : REQUEST ERROR NO STATISTICS INCLUDED«, t00=0x0054, t01=0x008a}
0x083ee…083fa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x00c6}
0x083fa…08410               Head {h00=0x0012, h01=0x0050, text=» IFF STTSTS=0 «, t00=0x0054, t01=0x00d2}
0x08410…08436               Head {h00=0x0022, h01=0x0050, text=» CF A15,DCSRED READ STATISTICS«, t00=0x0054, t01=0x00e8}
0x08436…0844c               Head {h00=0x0012, h01=0x0050, text=» LDR A1,A1 OK?«, t00=0x0054, t01=0x010e}
0x0844c…0847c               Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) RTREQ NO, RETURN: REQUEST ERROR«, t00=0x0054, t01=0x0124}
0x0847c…0849e               Head {h00=0x001e, h01=0x0050, text=» LD A1,ECBCW1,A8 GET TYPE «, t00=0x0054, t01=0x0154}
0x0849e…084c8               Head {h00=0x0026, h01=0x0050, text=» SRL A1,8 TYPE FIELD TO LEFT BYTE «, t00=0x0054, t01=0x0176}
0x084c8…084ec               Head {h00=0x0020, h01=0x0050, text=» CCK A1,TYPRR CORRECT TYPE? «, t00=0x0055, t01=0x0010}
0x084ec…08502               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RQST40«, t00=0x0055, t01=0x0034}
0x08502…08536               Head {h00=0x0030, h01=0x0050, text=» CF A15,DCSRLL RESET ALL STATISTICS BUFFERS «, t00=0x0055, t01=0x004a}
0x08536…08556               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 LUCKY AGAIN? «, t00=0x0055, t01=0x007e}
0x08556…08586               Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) RTREQ NO, RETURN: REQUEST ERROR«, t00=0x0055, t01=0x009e}
0x08586…0859a               Head {h00=0x0010, h01=0x0050, text=»RQST40 EQU *«, t00=0x0055, t01=0x00ce}
0x0859a…085b6               Head {h00=0x0018, h01=0x0050, text=» ABL RTOK RETURN: OK«, t00=0x0055, t01=0x00e2}
0x085b6…085c2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x00fe}
0x085c2…085d0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0055, t01=0x010a}
0x085d0…085da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0118}
0x085da…085f6               Head {h00=0x0018, h01=0x0050, text=»* SET TIMEOUT VALUE «, t00=0x0055, t01=0x0122}
0x085f6…08600               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x013e}
0x08600…08620               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0055, t01=0x0148}
0x08620…08650               Head {h00=0x002c, h01=0x0050, text=»*  ECBCW1 >= 0 : ACTIVATE TIMING CONTROL«, t00=0x0055, t01=0x0168}
0x08650…0868e               Head {h00=0x003a, h01=0x0050, text=»*                TIMEOUT VALUE IN MULTIPLES OF 100 MS;«, t00=0x0056, t01=0x0008}
0x0868e…086be               Head {h00=0x002c, h01=0x0050, text=»*                0 = IMMEDIATE TIMEOUT. «, t00=0x0056, t01=0x0046}
0x086be…086f2               Head {h00=0x0030, h01=0x0050, text=»*         < 0:   DE-ACTIVATE TIMING CONTROL «, t00=0x0056, t01=0x0076}
0x086f2…086fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00aa}
0x086fc…08710               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0056, t01=0x00b4}
0x08710…08740               Head {h00=0x002c, h01=0x0050, text=»*  STORE VALUE DIRECTLY IN CALLER'S DWT «, t00=0x0056, t01=0x00c8}
0x08740…0874a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00f8}
0x0874a…0876a               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0056, t01=0x0102}
0x0876a…08794               Head {h00=0x0026, h01=0x0050, text=»*  DWTRTV = TIMEOUT VALUE = ECBCW1«, t00=0x0056, t01=0x0122}
0x08794…0879e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x014c}
0x0879e…087b2               Head {h00=0x0010, h01=0x0050, text=»RQTIME EQU *«, t00=0x0056, t01=0x0156}
0x087b2…087e6               Head {h00=0x0030, h01=0x0050, text=» LD A2,ECBCW1,A8 GET TIMEOUT VALUE FROM ECB «, t00=0x0056, t01=0x016a}
0x087e6…0880c               Head {h00=0x0022, h01=0x0050, text=» ST A2,DWTRTV,A6 STORE IN DWT «, t00=0x0057, t01=0x000e}
0x0880c…08828               Head {h00=0x0018, h01=0x0050, text=» ABL RTOK RETURN: OK«, t00=0x0057, t01=0x0034}
0x08828…08836               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0057, t01=0x0050}
0x08836…08840               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x005e}
0x08840…08856               Head {h00=0x0012, h01=0x0050, text=»* SEND REQUEST«, t00=0x0057, t01=0x0068}
0x08856…08860               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x007e}
0x08860…08880               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0057, t01=0x0088}
0x08880…088a2               Head {h00=0x001e, h01=0x0050, text=»*  BUFFER ADDRESS (ECBBA) «, t00=0x0057, t01=0x00a8}
0x088a2…088c2               Head {h00=0x001c, h01=0x0050, text=»*  BUFFER LENGTH (ECBRL)«, t00=0x0057, t01=0x00ca}
0x088c2…088e6               Head {h00=0x0020, h01=0x0050, text=»*  SUBTERMINAL ADDRESS (DWT)«, t00=0x0057, t01=0x00ea}
0x088e6…08904               Head {h00=0x001a, h01=0x0050, text=»*  ECB CONTROL WORD 1 «, t00=0x0057, t01=0x010e}
0x08904…0890e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x012c}
0x0890e…08922               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0057, t01=0x0136}
0x08922…08962               Head {h00=0x003c, h01=0x0050, text=»*  1. VERIFY THAT LOGICAL & PHYSICAL CONNECTIONS EXIST. «, t00=0x0057, t01=0x014a}
0x08962…0898a               Head {h00=0x0024, h01=0x0050, text=»*  2. VERIFY BUFFER SIZE IF MMU «, t00=0x0057, t01=0x018a}
0x0898a…089ac               Head {h00=0x001e, h01=0x0050, text=»*  3. QUEUE REQUESTING DWT«, t00=0x0058, t01=0x0022}
0x089ac…089da               Head {h00=0x002a, h01=0x0050, text=»*  4. COMPLETE WHEN ACK'D OR TIMEOUT. «, t00=0x0058, t01=0x0044}
0x089da…089e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0072}
0x089e4…089f8               Head {h00=0x0010, h01=0x0050, text=»RQSEND EQU *«, t00=0x0058, t01=0x007c}
0x089f8…08a20               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x0058, t01=0x0090}
0x08a20…08a3e               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 CONNECTED ? «, t00=0x0058, t01=0x00b8}
0x08a3e…08a70               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTSEQ NO, RETURN: SEQUENCE ERROR «, t00=0x0058, t01=0x00d6}
0x08a70…08aa6               Head {h00=0x0032, h01=0x0050, text=» LD A2,DTEPLS,A7 PHYSICAL CONNECTION ACTICE ? «, t00=0x0058, t01=0x0108}
0x08aa6…08ae2               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTPHYC NO, RETURN: PHYSICAL CONNECTION ERROR«, t00=0x0058, t01=0x013e}
0x08ae2…08b16               Head {h00=0x0030, h01=0x0050, text=» LD A2,DTEDLS,A7 LOGICAL CONNECTION ACTIVE ?«, t00=0x0058, t01=0x017a}
0x08b16…08b52               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTLOGC NO, RETURN: LOGICAL CONNECTION ERROR «, t00=0x0059, t01=0x001e}
0x08b52…08b76               Head {h00=0x0020, h01=0x0050, text=» LC A2,DWTOPT,A6 GET OPTION «, t00=0x0059, t01=0x005a}
0x08b76…08b8a               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0059, t01=0x007e}
0x08b8a…08bb2               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RQSE10 THERE IS NO OPTION«, t00=0x0059, t01=0x0092}
0x08bb2…08bd4               Head {h00=0x001e, h01=0x0050, text=» SUK A2,/20 WHICH OPTION ?«, t00=0x0059, t01=0x00ba}
0x08bd4…08c06               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTREQ WRONG OPTION :REQUEST ERROR«, t00=0x0059, t01=0x00dc}
0x08c06…08c34               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE BUFFERS QUEUED «, t00=0x0059, t01=0x010e}
0x08c34…08c48               Head {h00=0x0010, h01=0x0050, text=»RQSE10 EQU *«, t00=0x0059, t01=0x013c}
0x08c48…08c5e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0059, t01=0x0150}
0x08c5e…08c86               Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBRL,A8 REQUESTED LENGTH«, t00=0x0059, t01=0x0166}
0x08c86…08cae               Head {h00=0x0024, h01=0x0050, text=» CWK A2,BUFLEN ILLEGAL LENGTH ? «, t00=0x0059, t01=0x018e}
0x08cae…08ce8               Head {h00=0x0036, h01=0x0050, text=» ABL(G) RTLGTH YES, RETURN: ILLEGAL BUFFER LENGTH «, t00=0x005a, t01=0x0026}
0x08ce8…08cf4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x0060}
0x08cf4…08d16               Head {h00=0x001e, h01=0x0050, text=» CF A15,TIMEWR START TIMER«, t00=0x005a, t01=0x006c}
0x08d16…08d3e               Head {h00=0x0024, h01=0x0050, text=» CF A15,INSWQ QUEUE SEND REQUEST«, t00=0x005a, t01=0x008e}
0x08d3e…08d50               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x005a, t01=0x00b6}
0x08d50…08d5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00c8}
0x08d5a…08d68               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005a, t01=0x00d2}
0x08d68…08d72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00e0}
0x08d72…08d8c               Head {h00=0x0016, h01=0x0050, text=»* RECEIVE REQUEST «, t00=0x005a, t01=0x00ea}
0x08d8c…08d96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0104}
0x08d96…08db6               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x005a, t01=0x010e}
0x08db6…08dd8               Head {h00=0x001e, h01=0x0050, text=»*  BUFFER ADDRESS (ECBBA) «, t00=0x005a, t01=0x012e}
0x08dd8…08e0c               Head {h00=0x0030, h01=0x0050, text=»*  REQUESTED BUFFER LENGTH IN CHARS. (ECBRL)«, t00=0x005a, t01=0x0150}
0x08e0c…08e30               Head {h00=0x0020, h01=0x0050, text=»*  SUBTERMINAL ADDRESS (DWT)«, t00=0x005a, t01=0x0184}
0x08e30…08e3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0018}
0x08e3a…08e4e               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x005b, t01=0x0022}
0x08e4e…08e8e               Head {h00=0x003c, h01=0x0050, text=»*  1. VERIFY THAT LOGICAL & PHYSICAL CONNECTIONS EXIST. «, t00=0x005b, t01=0x0036}
0x08e8e…08ed8               Head {h00=0x0046, h01=0x0050, text=»*  2. TRANSFER TO THE APPLICATION ANY MESSAGE QUEUED FOR THE DWT, «, t00=0x005b, t01=0x0076}
0x08ed8…08f1c               Head {h00=0x0040, h01=0x0050, text=»*  3. COMPLETE WHEN MESSAGE RECEIVED OR NO MESSAGE RECEIVED «, t00=0x005b, t01=0x00c0}
0x08f1c…08f40               Head {h00=0x0020, h01=0x0050, text=»*     WITHIN TIMEOUT PERIOD.«, t00=0x005b, t01=0x0104}
0x08f40…08f4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0128}
0x08f4a…08f6a               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x005b, t01=0x0132}
0x08f6a…08f9e               Head {h00=0x0030, h01=0x0050, text=»*  ACTUAL LENGTH OF RECEIVED MESSAGE (ECBEL)«, t00=0x005b, t01=0x0152}
0x08f9e…08fba               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x005b, t01=0x0186}
0x08fba…08fc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0012}
0x08fc4…08fd8               Head {h00=0x0010, h01=0x0050, text=»RQRECE EQU *«, t00=0x005c, t01=0x001c}
0x08fd8…09000               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x005c, t01=0x0030}
0x09000…0901e               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 CONNECTED ? «, t00=0x005c, t01=0x0058}
0x0901e…09050               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTSEQ NO, RETURN: SEQUENCE ERROR «, t00=0x005c, t01=0x0076}
0x09050…09086               Head {h00=0x0032, h01=0x0050, text=» LD A2,DTEPLS,A7 PHYSICAL CONNECTION ACTIVE ? «, t00=0x005c, t01=0x00a8}
0x09086…090c2               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTPHYC NO, RETURN: PHYSICAL CONNECTION ERROR«, t00=0x005c, t01=0x00de}
0x090c2…090f0               Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTIPC,A6 ANY BUFFER ON QUEUE ?«, t00=0x005c, t01=0x011a}
0x090f0…0910a               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) RQRE10 YES«, t00=0x005c, t01=0x0148}
0x0910a…0913e               Head {h00=0x0030, h01=0x0050, text=» LD A2,DTEDLS,A7 LOGICAL CONNECTION ACTIVE ?«, t00=0x005c, t01=0x0162}
0x0913e…0917a               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTLOGC NO, RETURN: LOGICAL CONNECTION ERROR «, t00=0x005d, t01=0x0008}
0x0917a…0919c               Head {h00=0x001e, h01=0x0050, text=» CF A15,TIMERE START TIMER«, t00=0x005d, t01=0x0044}
0x0919c…091c0               Head {h00=0x0020, h01=0x0050, text=» RF RQRE40 GO TO DISPATCHER «, t00=0x005d, t01=0x0066}
0x091c0…091d4               Head {h00=0x0010, h01=0x0050, text=»RQRE10 EQU *«, t00=0x005d, t01=0x008a}
0x091d4…091f8               Head {h00=0x0020, h01=0x0050, text=» LD A3,2,A4 EFFECTIVE LENGTH«, t00=0x005d, t01=0x009e}
0x091f8…09210               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x005d, t01=0x00c2}
0x09210…0923e               Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTLAD,A6 SYMBOLIC DTE-ADDRESS «, t00=0x005d, t01=0x00da}
0x0923e…09266               Head {h00=0x0024, h01=0x0050, text=» LD A2,4,A4 NETWORK SUB-ADDRESS «, t00=0x005d, t01=0x0108}
0x09266…09296               Head {h00=0x002c, h01=0x0050, text=» CF A15,GETSSA GET SYMBOLIC SUB-ADDRESS «, t00=0x005d, t01=0x0130}
0x09296…092c2               Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBCW2,A8 AND SAVE IT IN ECB «, t00=0x005d, t01=0x0160}
0x092c2…092f0               Head {h00=0x002a, h01=0x0050, text=» LDK A1,0 RC : ACCEPTED AND COMPLETED «, t00=0x005d, t01=0x018c}
0x092f0…0931c               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 GET NEXT BUFFER IN QUEUE«, t00=0x005e, t01=0x002a}
0x0931c…0934a               Head {h00=0x002a, h01=0x0050, text=» RF(Z) RQRE20 NO MORE BUFFERS IN QUEUE«, t00=0x005e, t01=0x0056}
0x0934a…0937e               Head {h00=0x0030, h01=0x0050, text=» ORKL A1,R:DATA RC: AND MORE DATA AVAILABLE «, t00=0x005e, t01=0x0084}
0x0937e…09392               Head {h00=0x0010, h01=0x0050, text=»RQRE20 EQU *«, t00=0x005e, t01=0x00b8}
0x09392…093c4               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTIPC,A6  STORE AS FIRST IN QUEUE «, t00=0x005e, t01=0x00cc}
0x093c4…093d6               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x005e, t01=0x00fe}
0x093d6…09406               Head {h00=0x002c, h01=0x0050, text=» CF A15,DC:MIN MOVE DATA TO USER BUFFER «, t00=0x005e, t01=0x0110}
0x09406…0941a               Head {h00=0x0010, h01=0x0050, text=»RQRE40 EQU *«, t00=0x005e, t01=0x0140}
0x0941a…0943e               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x005e, t01=0x0154}
0x0943e…0944c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005e, t01=0x0178}
0x0944c…09456               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0186}
0x09456…09460               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0190}
0x09460…09488               Head {h00=0x0024, h01=0x0050, text=»*  COMPLETE APPLICATION REQUEST «, t00=0x005f, t01=0x000a}
0x09488…09492               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0032}
0x09492…094a6               Head {h00=0x0010, h01=0x0050, text=»RTREQ EQU * «, t00=0x005f, t01=0x003c}
0x094a6…094d0               Head {h00=0x0026, h01=0x0050, text=» LDKL A1,R:REQ RC = REQUEST ERROR «, t00=0x005f, t01=0x0050}
0x094d0…094e2               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x005f, t01=0x007a}
0x094e2…094f6               Head {h00=0x0010, h01=0x0050, text=»RTABRT EQU *«, t00=0x005f, t01=0x008c}
0x094f6…0951a               Head {h00=0x0020, h01=0x0050, text=» LDKL A1,R:ABRT RC = ABORTED«, t00=0x005f, t01=0x00a0}
0x0951a…0952c               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x005f, t01=0x00c4}
0x0952c…09540               Head {h00=0x0010, h01=0x0050, text=»RTTIME EQU *«, t00=0x005f, t01=0x00d6}
0x09540…09564               Head {h00=0x0020, h01=0x0050, text=» LDK A1,R:TIME RC = TIME OUT«, t00=0x005f, t01=0x00ea}
0x09564…09576               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x005f, t01=0x010e}
0x09576…0958a               Head {h00=0x0010, h01=0x0050, text=»RTSEQ EQU * «, t00=0x005f, t01=0x0120}
0x0958a…095b4               Head {h00=0x0026, h01=0x0050, text=» LDK A1,R:SEQ RC = SEQUENCE ERROR «, t00=0x005f, t01=0x0134}
0x095b4…095c6               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x005f, t01=0x015e}
0x095c6…095da               Head {h00=0x0010, h01=0x0050, text=»RTLGTH EQU *«, t00=0x005f, t01=0x0170}
0x095da…09604               Head {h00=0x0026, h01=0x0050, text=» LDK A1,R:LGTH RC = ILLEGAL LENGTH«, t00=0x005f, t01=0x0184}
0x09604…09616               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0060, t01=0x001e}
0x09616…0962a               Head {h00=0x0010, h01=0x0050, text=»RTLOGC EQU *«, t00=0x0060, t01=0x0030}
0x0962a…0965e               Head {h00=0x0030, h01=0x0050, text=» LDK A1,R:LOGC RC = LOGICAL CONNECTION ERROR«, t00=0x0060, t01=0x0044}
0x0965e…09670               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0060, t01=0x0078}
0x09670…09684               Head {h00=0x0010, h01=0x0050, text=»RTPHYC EQU *«, t00=0x0060, t01=0x008a}
0x09684…096ba               Head {h00=0x0032, h01=0x0050, text=» LDK A1,R:PHYC RC = PHYSICAL CONNECTION ERROR «, t00=0x0060, t01=0x009e}
0x096ba…096cc               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0060, t01=0x00d4}
0x096cc…096de               Head {h00=0x000e, h01=0x0050, text=»RTOK EQU *«, t00=0x0060, t01=0x00e6}
0x096de…096f8               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RC = OK «, t00=0x0060, t01=0x00f8}
0x096f8…0970c               Head {h00=0x0010, h01=0x0050, text=»RQRTN EQU * «, t00=0x0060, t01=0x0112}
0x0970c…09746               Head {h00=0x0036, h01=0x0050, text=» ABL DISEND COMPLETE REQUEST AND GO TO DISPATCHER «, t00=0x0060, t01=0x0126}
0x09746…09754               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0060, t01=0x0160}
0x09754…0975e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x016e}
0x0975e…0979a               Head {h00=0x0038, h01=0x0050, text=»* LOOKUP - LOOK UP KEY IN TABLE & BRANCH ON ADDRESS «, t00=0x0060, t01=0x0178}
0x0979a…097a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0024}
0x097a4…097b4               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0061, t01=0x002e}
0x097b4…097f0               Head {h00=0x0038, h01=0x0050, text=»*  CF     A15,LOOKUP          TABLE ADDRESS TO STACK«, t00=0x0061, t01=0x003e}
0x097f0…09830               Head {h00=0x003c, h01=0x0050, text=»*  DATA   LAST,ADDRE          LAST ENTRY; ERROR ADDRESS «, t00=0x0061, t01=0x007a}
0x09830…09872               Head {h00=0x003e, h01=0x0050, text=»*  DATA   KEY1,ADDR1          KEY (A2); ADDRESS FOR BRANCH«, t00=0x0061, t01=0x00ba}
0x09872…0988c               Head {h00=0x0016, h01=0x0050, text=»*   "       "    "«, t00=0x0061, t01=0x00fc}
0x0988c…098ac               Head {h00=0x001c, h01=0x0050, text=»* LAST DATA   KEYN,ADDRN«, t00=0x0061, t01=0x0116}
0x098ac…098b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0136}
0x098b6…098d6               Head {h00=0x001c, h01=0x0050, text=»* ENTRY: A2 = KEY VALUE «, t00=0x0061, t01=0x0140}
0x098d6…098f8               Head {h00=0x001e, h01=0x0050, text=»* EXIT: A3 & A4 DESTROYED «, t00=0x0061, t01=0x0160}
0x098f8…09902               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0182}
0x09902…09916               Head {h00=0x0010, h01=0x0050, text=»LOOKUP EQU *«, t00=0x0061, t01=0x018c}
0x09916…09956               Head {h00=0x003c, h01=0x0050, text=» LDR* A3,A15 POINT TO NEXT INSTRUCTION ADDRESS IN STACK «, t00=0x0062, t01=0x0010}
0x09956…09988               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A15 GET CONTENTS = TABLE ADDRESS «, t00=0x0062, t01=0x0050}
0x09988…099b2               Head {h00=0x0026, h01=0x0050, text=» LDR* A4,A3 GET LAST LEGAL ADDRESS«, t00=0x0062, t01=0x0082}
0x099b2…099d4               Head {h00=0x001e, h01=0x0050, text=» LD A1,2,A3 ERROR ADDRESS «, t00=0x0062, t01=0x00ac}
0x099d4…099de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x00ce}
0x099de…099fe               Head {h00=0x001c, h01=0x0050, text=»LOOK50 EQU * LOOP ENTRY «, t00=0x0062, t01=0x00d8}
0x099fe…09a2c               Head {h00=0x002a, h01=0x0050, text=» ADK A3,4 GET NEXT TABLE ENTRY ADDRESS«, t00=0x0062, t01=0x00f8}
0x09a2c…09a4c               Head {h00=0x001c, h01=0x0050, text=» CWR A3,A4 PAST THE END?«, t00=0x0062, t01=0x0126}
0x09a4c…09a72               Head {h00=0x0022, h01=0x0050, text=» RF(G) LOOK90 YES = NOT FOUND «, t00=0x0062, t01=0x0146}
0x09a72…09a9c               Head {h00=0x0026, h01=0x0050, text=» CWR* A2,A3 KEY = VALUE IN TABLE? «, t00=0x0062, t01=0x016c}
0x09a9c…09ac8               Head {h00=0x0028, h01=0x0050, text=» RB(NE) LOOK50 NO - CHECK NEXT ENTRY«, t00=0x0063, t01=0x0008}
0x09ac8…09af2               Head {h00=0x0026, h01=0x0050, text=» ABI 2,A3 BRANCH TO TABLE ADDRESS «, t00=0x0063, t01=0x0034}
0x09af2…09b0a               Head {h00=0x0014, h01=0x0050, text=»*  KEY NOT FOUND«, t00=0x0063, t01=0x005e}
0x09b0a…09b1e               Head {h00=0x0010, h01=0x0050, text=»LOOK90 EQU *«, t00=0x0063, t01=0x0076}
0x09b1e…09b44               Head {h00=0x0022, h01=0x0050, text=» LDR P,A1 GO TO ERROR ADDRESS «, t00=0x0063, t01=0x008a}
0x09b44…09b52               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x00b0}
0x09b52…09b5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00be}
0x09b5c…09b66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00c8}
0x09b66…09b70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00d2}
0x09b70…09b96               Head {h00=0x0022, h01=0x0050, text=»* REQUEST TIMER HANDLING PART «, t00=0x0063, t01=0x00dc}
0x09b96…09ba0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0102}
0x09ba0…09baa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x010c}
0x09baa…09bb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0116}
0x09bb4…09bd2               Head {h00=0x001a, h01=0x0050, text=»* RECEIVE TIMER=TIMERR«, t00=0x0063, t01=0x0120}
0x09bd2…09bdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x013e}
0x09bdc…09bf0               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x0063, t01=0x0148}
0x09bf0…09c02               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0063, t01=0x015c}
0x09c02…09c2c               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTRTV,A6 GET TIMEOUT VALUE«, t00=0x0063, t01=0x016e}
0x09c2c…09c4c               Head {h00=0x001c, h01=0x0050, text=» RF(N) TIMRTN NO TIMING «, t00=0x0064, t01=0x0008}
0x09c4c…09c7e               Head {h00=0x002e, h01=0x0050, text=» RF(Z) ITOUTR TIMER=0 => IMMEDIATE TIMEOUT«, t00=0x0064, t01=0x0028}
0x09c7e…09c94               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x0064, t01=0x005a}
0x09c94…09caa               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0064, t01=0x0070}
0x09caa…09cbe               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x0064, t01=0x0086}
0x09cbe…09cd4               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x0064, t01=0x009a}
0x09cd4…09d00               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTRTP,A6 STORE TIMER POINTER«, t00=0x0064, t01=0x00b0}
0x09d00…09d14               Head {h00=0x0010, h01=0x0050, text=»TIMRTN EQU *«, t00=0x0064, t01=0x00dc}
0x09d14…09d28               Head {h00=0x0010, h01=0x0050, text=» ABL RTNA15 «, t00=0x0064, t01=0x00f0}
0x09d28…09d32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0104}
0x09d32…09d4e               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x0064, t01=0x010e}
0x09d4e…09d58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x012a}
0x09d58…09d6c               Head {h00=0x0010, h01=0x0050, text=»ITOUTR EQU *«, t00=0x0064, t01=0x0134}
0x09d6c…09d80               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0064, t01=0x0148}
0x09d80…09d92               Head {h00=0x000e, h01=0x0050, text=» RF TIMOUT«, t00=0x0064, t01=0x015c}
0x09d92…09da6               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x0064, t01=0x016e}
0x09da6…09dc2               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0064, t01=0x0182}
0x09dc2…09dd8               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x0065, t01=0x000e}
0x09dd8…09e06               Head {h00=0x002a, h01=0x0050, text=» RF TIMOUT COMPLETE REQUEST RC=TIMEOUT«, t00=0x0065, t01=0x0024}
0x09e06…09e10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0052}
0x09e10…09e1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x005c}
0x09e1a…09e40               Head {h00=0x0022, h01=0x0050, text=»*   RETURN FROM TIMER HANDLING«, t00=0x0065, t01=0x0066}
0x09e40…09e4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x008c}
0x09e4a…09e58               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0065, t01=0x0096}
0x09e58…09e62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00a4}
0x09e62…09e7c               Head {h00=0x0016, h01=0x0050, text=»* SEND TIMER=TIMWR«, t00=0x0065, t01=0x00ae}
0x09e7c…09e86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00c8}
0x09e86…09e9e               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x0065, t01=0x00d2}
0x09e9e…09ec8               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTRTV,A6 GET TIMEOUT VALUE«, t00=0x0065, t01=0x00ea}
0x09ec8…09ee8               Head {h00=0x001c, h01=0x0050, text=» RB(N) TIMRTN NO TIMING «, t00=0x0065, t01=0x0114}
0x09ee8…09f1a               Head {h00=0x002e, h01=0x0050, text=» RB(Z) ITOUTR TIMER=0 => IMMEDIATE TIMEOUT«, t00=0x0065, t01=0x0134}
0x09f1a…09f2e               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x0065, t01=0x0166}
0x09f2e…09f44               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0065, t01=0x017a}
0x09f44…09f58               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x0065, t01=0x0190}
0x09f58…09f6c               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x0066, t01=0x0014}
0x09f6c…09f84               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTRTP,A6«, t00=0x0066, t01=0x0028}
0x09f84…09f96               Head {h00=0x000e, h01=0x0050, text=» RB TIMRTN«, t00=0x0066, t01=0x0040}
0x09f96…09fa0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0052}
0x09fa0…09fbe               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x0066, t01=0x005c}
0x09fbe…09fc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x007a}
0x09fc8…09fdc               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x0066, t01=0x0084}
0x09fdc…09ff8               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0066, t01=0x0098}
0x09ff8…0a00e               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x0066, t01=0x00b4}
0x0a00e…0a03c               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x0066, t01=0x00ca}
0x0a03c…0a046               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x00f8}
0x0a046…0a050               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0102}
0x0a050…0a07a               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x0066, t01=0x010c}
0x0a07a…0a09e               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x0066, t01=0x0136}
0x0a09e…0a0b4               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x0066, t01=0x015a}
0x0a0b4…0a0c6               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0066, t01=0x0170}
0x0a0c6…0a0f4               Head {h00=0x002a, h01=0x0050, text=» RF(NE) TIMOUT THIS DWT IS NOT WRITING«, t00=0x0066, t01=0x0182}
0x0a0f4…0a120               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x0067, t01=0x0020}
0x0a120…0a132               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0067, t01=0x004c}
0x0a132…0a146               Head {h00=0x0010, h01=0x0050, text=»TIMOUT EQU *«, t00=0x0067, t01=0x005e}
0x0a146…0a176               Head {h00=0x002c, h01=0x0050, text=» ABL RTTIME COMPLETE REQUEST RC=TIMEOUT «, t00=0x0067, t01=0x0072}
0x0a176…0a184               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0067, t01=0x00a2}
0x0a184…0a18e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00b0}
0x0a18e…0a198               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00ba}
0x0a198…0a1b6               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x0067, t01=0x00c4}
0x0a1b6…0a1c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00e2}
0x0a1c0…0a1ea               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x0067, t01=0x00ec}
0x0a1ea…0a1f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0116}
0x0a1f4…0a1fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0120}
0x0a1fe…0a212               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x0067, t01=0x012a}
0x0a212…0a23c               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTRTP,A6 GET TIMER POINTER«, t00=0x0067, t01=0x013e}
0x0a23c…0a25e               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x0067, t01=0x0168}
0x0a25e…0a278               Head {h00=0x0016, h01=0x0050, text=» CMR A2 KILL TIMER«, t00=0x0067, t01=0x018a}
0x0a278…0a28e               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x0068, t01=0x0014}
0x0a28e…0a2a2               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A2 «, t00=0x0068, t01=0x002a}
0x0a2a2…0a2c8               Head {h00=0x0022, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME «, t00=0x0068, t01=0x003e}
0x0a2c8…0a2dc               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x0068, t01=0x0064}
0x0a2dc…0a2f0               Head {h00=0x0010, h01=0x0050, text=» ABL RTNA15 «, t00=0x0068, t01=0x0078}
0x0a2f0…0a2fe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0068, t01=0x008c}
0x0a2fe…0a308               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x009a}
0x0a308…0a324               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x0068, t01=0x00a4}
0x0a324…0a32e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00c0}
0x0a32e…0a356               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x0068, t01=0x00ca}
0x0a356…0a37a               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x0068, t01=0x00f2}
0x0a37a…0a3a4               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x0068, t01=0x0116}
0x0a3a4…0a3c6               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0068, t01=0x0140}
0x0a3c6…0a3d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0162}
0x0a3d0…0a3da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x016c}
0x0a3da…0a406               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0068, t01=0x0176}
0x0a406…0a412               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0069, t01=0x0012}
0x0a412…0a426               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x0069, t01=0x001e}
0x0a426…0a44a               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x0069, t01=0x0032}
0x0a44a…0a47c               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x0069, t01=0x0056}
0x0a47c…0a48e               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0069, t01=0x0088}
0x0a48e…0a4a2               Head {h00=0x0010, h01=0x0050, text=»GBUF10 EQU *«, t00=0x0069, t01=0x009a}
0x0a4a2…0a4b6               Head {h00=0x0010, h01=0x0050, text=» ABL RTNA15 «, t00=0x0069, t01=0x00ae}
0x0a4b6…0a4c4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0069, t01=0x00c2}
0x0a4c4…0a4ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00d0}
0x0a4ce…0a4d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00da}
0x0a4d8…0a4f8               Head {h00=0x001c, h01=0x0050, text=»* RELEASE RECEIVE BUFFER«, t00=0x0069, t01=0x00e4}
0x0a4f8…0a502               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0104}
0x0a502…0a526               Head {h00=0x0020, h01=0x0050, text=»* A4 CONTAINS BUFFER ADDRESS«, t00=0x0069, t01=0x010e}
0x0a526…0a54e               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,RRBUF«, t00=0x0069, t01=0x0132}
0x0a54e…0a570               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x0069, t01=0x015a}
0x0a570…0a57a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x017c}
0x0a57a…0a584               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0186}
0x0a584…0a5b0               Head {h00=0x0028, h01=0x0050, text=»RRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x0069, t01=0x0190}
0x0a5b0…0a5bc               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x006a, t01=0x002c}
0x0a5bc…0a5d0               Head {h00=0x0010, h01=0x0050, text=»RBUF10 EQU *«, t00=0x006a, t01=0x0038}
0x0a5d0…0a5e4               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x006a, t01=0x004c}
0x0a5e4…0a5fa               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RBUF20 «, t00=0x006a, t01=0x0060}
0x0a5fa…0a60c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x006a, t01=0x0076}
0x0a60c…0a61e               Head {h00=0x000e, h01=0x0050, text=» RB RBUF10«, t00=0x006a, t01=0x0088}
0x0a61e…0a632               Head {h00=0x0010, h01=0x0050, text=»RBUF20 EQU *«, t00=0x006a, t01=0x009a}
0x0a632…0a644               Head {h00=0x000e, h01=0x0050, text=» STR A4,A2«, t00=0x006a, t01=0x00ae}
0x0a644…0a654               Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x006a, t01=0x00c0}
0x0a654…0a678               Head {h00=0x0020, h01=0x0050, text=» RB GBUF10 RETURN TO CALLER «, t00=0x006a, t01=0x00d0}
0x0a678…0a686               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006a, t01=0x00f4}
0x0a686…0a690               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0102}
0x0a690…0a6c6               Head {h00=0x0032, h01=0x0050, text=»* RELEASE ALL RECEIVE BUFFERS QUEUED ON A DWT «, t00=0x006a, t01=0x010c}
0x0a6c6…0a6d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0142}
0x0a6d0…0a6e8               Head {h00=0x0014, h01=0x0050, text=»* A6 - DWT ADDR «, t00=0x006a, t01=0x014c}
0x0a6e8…0a70a               Head {h00=0x001e, h01=0x0050, text=»* A1 AND A4 ARE DESTROYED «, t00=0x006a, t01=0x0164}
0x0a70a…0a736               Head {h00=0x0028, h01=0x0050, text=»* CALLING SEQUENCE: CF    A15,RELBUF«, t00=0x006a, t01=0x0186}
0x0a736…0a740               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0022}
0x0a740…0a74a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x002c}
0x0a74a…0a75e               Head {h00=0x0010, h01=0x0050, text=»RELBUF EQU *«, t00=0x006b, t01=0x0036}
0x0a75e…0a78c               Head {h00=0x002a, h01=0x0050, text=» LDK A1,DWTIPC SET BUFFER QUEUE DISP. «, t00=0x006b, t01=0x004a}
0x0a78c…0a79e               Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x006b, t01=0x0078}
0x0a79e…0a7b2               Head {h00=0x0010, h01=0x0050, text=»RLBU10 EQU *«, t00=0x006b, t01=0x008a}
0x0a7b2…0a7da               Head {h00=0x0024, h01=0x0050, text=» LDR* A4,A1 NEXT IN BUFFER QUEUE«, t00=0x006b, t01=0x009e}
0x0a7da…0a7f0               Head {h00=0x0012, h01=0x0050, text=» RB(Z) GBUF10 «, t00=0x006b, t01=0x00c6}
0x0a7f0…0a816               Head {h00=0x0022, h01=0x0050, text=» LDR* A2,A4 REMOVE FROM QUEUE «, t00=0x006b, t01=0x00dc}
0x0a816…0a82a               Head {h00=0x0010, h01=0x0050, text=» STR A2,A1 .«, t00=0x006b, t01=0x0102}
0x0a82a…0a84e               Head {h00=0x0020, h01=0x0050, text=» CF A15,RRBUF RELEASE BUFFER«, t00=0x006b, t01=0x0116}
0x0a84e…0a860               Head {h00=0x000e, h01=0x0050, text=» RB RLBU10«, t00=0x006b, t01=0x013a}
0x0a860…0a86e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006b, t01=0x014c}
0x0a86e…0a878               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x015a}
0x0a878…0a882               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0164}
0x0a882…0a8ac               Head {h00=0x0026, h01=0x0050, text=»* INSERT DWT IN SEND REQUEST QUEUE«, t00=0x006b, t01=0x016e}
0x0a8ac…0a8b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0008}
0x0a8b6…0a8d2               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x006c, t01=0x0012}
0x0a8d2…0a8e2               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x006c, t01=0x002e}
0x0a8e2…0a8ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x003e}
0x0a8ec…0a918               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x006c, t01=0x0048}
0x0a918…0a92e               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTOPN«, t00=0x006c, t01=0x0074}
0x0a92e…0a948               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x006c, t01=0x008a}
0x0a948…0a970               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x006c, t01=0x00a4}
0x0a970…0a982               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x006c, t01=0x00cc}
0x0a982…0a994               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x006c, t01=0x00de}
0x0a994…0a9ac               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x006c, t01=0x00f0}
0x0a9ac…0a9ce               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x006c, t01=0x0108}
0x0a9ce…0a9f4               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x006c, t01=0x012a}
0x0a9f4…0aa0e               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x006c, t01=0x0150}
0x0aa0e…0aa1c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006c, t01=0x016a}
0x0aa1c…0aa26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0178}
0x0aa26…0aa30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0182}
0x0aa30…0aa5c               Head {h00=0x0028, h01=0x0050, text=»* REMOVE DWT FROM SEND REQUEST QUEUE«, t00=0x006c, t01=0x018c}
0x0aa5c…0aa66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0028}
0x0aa66…0aa82               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x006d, t01=0x0032}
0x0aa82…0aa92               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x006d, t01=0x004e}
0x0aa92…0aa9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x005e}
0x0aa9c…0aaca               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x006d, t01=0x0068}
0x0aaca…0aafc               Head {h00=0x002e, h01=0x0050, text=» LDK A4,DWTOPN GET DWT-LINK TO BE REMOVED «, t00=0x006d, t01=0x0096}
0x0aafc…0ab10               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x006d, t01=0x00c8}
0x0ab10…0ab24               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x006d, t01=0x00dc}
0x0ab24…0ab3c               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x006d, t01=0x00f0}
0x0ab3c…0ab66               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x006d, t01=0x0108}
0x0ab66…0ab78               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x006d, t01=0x0132}
0x0ab78…0ab8c               Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x006d, t01=0x0144}
0x0ab8c…0aba8               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x006d, t01=0x0158}
0x0aba8…0abba               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x006d, t01=0x0174}
0x0abba…0abda               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x006d, t01=0x0186}
0x0abda…0abec               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x006e, t01=0x0016}
0x0abec…0ac06               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x006e, t01=0x0028}
0x0ac06…0ac14               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006e, t01=0x0042}
0x0ac14…0ac1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0050}
0x0ac1e…0ac28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x005a}
0x0ac28…0ac4c               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x006e, t01=0x0064}
0x0ac4c…0ac56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0088}
0x0ac56…0ac6c               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x006e, t01=0x0092}
0x0ac6c…0ac88               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x006e, t01=0x00a8}
0x0ac88…0ac98               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x006e, t01=0x00c4}
0x0ac98…0aca2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00d4}
0x0aca2…0acce               Head {h00=0x0028, h01=0x0050, text=»INSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR«, t00=0x006e, t01=0x00de}
0x0acce…0ace4               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTOPE«, t00=0x006e, t01=0x010a}
0x0ace4…0acf6               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x006e, t01=0x0120}
0x0acf6…0ad00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0132}
0x0ad00…0ad0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x013c}
0x0ad0a…0ad30               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x006e, t01=0x0146}
0x0ad30…0ad3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x016c}
0x0ad3a…0ad56               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x006e, t01=0x0176}
0x0ad56…0ad66 (111, 0, 400) Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x006f, t01=0x0004}
0x0ad66…0ad70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0014}
0x0ad70…0ad9e               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x006f, t01=0x001e}
0x0ad9e…0adb4               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTOPE«, t00=0x006f, t01=0x004c}
0x0adb4…0adc6               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x006f, t01=0x0062}
0x0adc6…0add2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x0074}
0x0add2…0ade0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006f, t01=0x0080}
0x0ade0…0adea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x008e}
0x0adea…0adf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0098}
0x0adf4…0ae1c               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x006f, t01=0x00a2}
0x0ae1c…0ae26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00ca}
0x0ae26…0ae3e               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x006f, t01=0x00d4}
0x0ae3e…0ae58               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x006f, t01=0x00ec}
0x0ae58…0ae62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0106}
0x0ae62…0ae76               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x006f, t01=0x0110}
0x0ae76…0ae88               Head {h00=0x000e, h01=0x0050, text=» SUK A4,6 «, t00=0x006f, t01=0x0124}
0x0ae88…0aeb6               Head {h00=0x002a, h01=0x0050, text=» LDK A2,DWTIPC SET BUFFER QUEUE DISP. «, t00=0x006f, t01=0x0136}
0x0aeb6…0aec8               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x006f, t01=0x0164}
0x0aec8…0aedc               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x006f, t01=0x0176}
0x0aedc…0aef0               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x006f, t01=0x018a}
0x0aef0…0af18               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x0070, t01=0x000e}
0x0af18…0af2a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0070, t01=0x0036}
0x0af2a…0af3c               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x0070, t01=0x0048}
0x0af3c…0af66               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x0070, t01=0x005a}
0x0af66…0af8c               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0070, t01=0x0084}
0x0af8c…0af9c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0070, t01=0x00aa}
0x0af9c…0afaa               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0070, t01=0x00ba}
0x0afaa…0afb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x00c8}
0x0afb4…0afbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x00d2}
0x0afbe…0afdc               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0070, t01=0x00dc}
0x0afdc…0b004               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0070, t01=0x00fa}
0x0b004…0b00e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0122}
0x0b00e…0b026               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0070, t01=0x012c}
0x0b026…0b03a               Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0070, t01=0x0144}
0x0b03a…0b04e               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0070, t01=0x0158}
0x0b04e…0b062               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0070, t01=0x016c}
0x0b062…0b076               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0070, t01=0x0180}
0x0b076…0b08a (113, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0071, t01=0x0004}
0x0b08a…0b0a4               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0071, t01=0x0018}
0x0b0a4…0b0ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0032}
0x0b0ae…0b0b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x003c}
0x0b0b8…0b0ca               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0071, t01=0x0046}
0x0b0ca…0b0f2               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0071, t01=0x0058}
0x0b0f2…0b0fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0080}
0x0b0fc…0b114               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0071, t01=0x008a}
0x0b114…0b128               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0071, t01=0x00a2}
0x0b128…0b13a               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0071, t01=0x00b6}
0x0b13a…0b14e               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0071, t01=0x00c8}
0x0b14e…0b160               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0071, t01=0x00dc}
0x0b160…0b174               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0071, t01=0x00ee}
0x0b174…0b186               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0071, t01=0x0102}
0x0b186…0b19a               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0071, t01=0x0114}
0x0b19a…0b1ac               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0071, t01=0x0128}
0x0b1ac…0b1c0               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0071, t01=0x013a}
0x0b1c0…0b1d2               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0071, t01=0x014e}
0x0b1d2…0b1e6               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0071, t01=0x0160}
0x0b1e6…0b1f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0174}
0x0b1f0…0b1fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x017e}
0x0b1fa…0b21c               Head {h00=0x001e, h01=0x0050, text=»*  RETURN VIA REGISTER 15 «, t00=0x0071, t01=0x0188}
0x0b21c…0b226               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x001a}
0x0b226…0b23a               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0072, t01=0x0024}
0x0b23a…0b24e               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0072, t01=0x0038}
0x0b24e…0b260               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0072, t01=0x004c}
0x0b260…0b26e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0072, t01=0x005e}
0x0b26e…0b278               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x006c}
0x0b278…0b290               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0072, t01=0x0076}
0x0b290…0b29a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x008e}
0x0b29a…0b2c6               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0072, t01=0x0098}
0x0b2c6…0b2ec               Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 RELOAD DWT ADDRESS «, t00=0x0072, t01=0x00c4}
0x0b2ec…0b304               Head {h00=0x0014, h01=0x0050, text=» LDKL A7,DTETAB «, t00=0x0072, t01=0x00ea}
0x0b304…0b31a               Head {h00=0x0012, h01=0x0050, text=» CM DTEDLS,A7 «, t00=0x0072, t01=0x0102}
0x0b31a…0b330               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x0072, t01=0x0118}
0x0b330…0b33a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x012e}
0x0b33a…0b344               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0138}
0x0b344…0b362               Head {h00=0x001a, h01=0x0050, text=»*  COUNT POLL TIME OUT«, t00=0x0072, t01=0x0142}
0x0b362…0b36c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0160}
0x0b36c…0b382               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSXC3«, t00=0x0072, t01=0x016a}
0x0b382…0b398               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x0072, t01=0x0180}
0x0b398…0b3a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x0008}
0x0b3a4…0b3cc               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0073, t01=0x0014}
0x0b3cc…0b3de               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0073, t01=0x003c}
0x0b3de…0b3e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x004e}
0x0b3e8…0b420               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x0073, t01=0x0058}
0x0b420…0b42a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0090}
0x0b42a…0b43e               Head {h00=0x0010, h01=0x0050, text=»CPTIM EQU * «, t00=0x0073, t01=0x009a}
0x0b43e…0b458               Head {h00=0x0016, h01=0x0050, text=» LDK A2,1 INDICATE«, t00=0x0073, t01=0x00ae}
0x0b458…0b47e               Head {h00=0x0022, h01=0x0050, text=» ST A2,DTEDLS,A7 DATA LINK UP «, t00=0x0073, t01=0x00c8}
0x0b47e…0b496               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x0073, t01=0x00ee}
0x0b496…0b4ba               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x0073, t01=0x0106}
0x0b4ba…0b4ca               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0073, t01=0x012a}
0x0b4ca…0b4d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x013a}
0x0b4d4…0b4ee               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x0073, t01=0x0144}
0x0b4ee…0b4f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x015e}
0x0b4f8…0b50c               Head {h00=0x0010, h01=0x0050, text=»SPOTIM EQU *«, t00=0x0073, t01=0x0168}
0x0b50c…0b53c               Head {h00=0x002c, h01=0x0050, text=» LDR A1,A6 LOAD DWT ADDRESS AS PARAMETER«, t00=0x0073, t01=0x017c}
0x0b53c…0b55e               Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME START TIMER«, t00=0x0074, t01=0x001c}
0x0b55e…0b578               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x0074, t01=0x003e}
0x0b578…0b5a2               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x0074, t01=0x0058}
0x0b5a2…0b5bc               Head {h00=0x0016, h01=0x0050, text=» RB RTNA15 RETURN «, t00=0x0074, t01=0x0082}
0x0b5bc…0b5ca               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x009c}
0x0b5ca…0b5d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00aa}
0x0b5d4…0b5f4               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x0074, t01=0x00b4}
0x0b5f4…0b5fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00d4}
0x0b5fe…0b612               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x0074, t01=0x00de}
0x0b612…0b63a               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x0074, t01=0x00f2}
0x0b63a…0b650               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0074, t01=0x011a}
0x0b650…0b66c               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x0074, t01=0x0130}
0x0b66c…0b694               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x0074, t01=0x014c}
0x0b694…0b6a4               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0074, t01=0x0174}
0x0b6a4…0b6ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0184}
0x0b6ae…0b6ca               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x0074, t01=0x018e}
0x0b6ca…0b6d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x001a}
0x0b6d4…0b6ec               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x0075, t01=0x0024}
0x0b6ec…0b708               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x0075, t01=0x003c}
0x0b708…0b72c               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x0075, t01=0x0058}
0x0b72c…0b744               Head {h00=0x0014, h01=0x0050, text=» LDKL A7,DTETAB «, t00=0x0075, t01=0x007c}
0x0b744…0b75a               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x0075, t01=0x0094}
0x0b75a…0b764               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00aa}
0x0b764…0b76e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00b4}
0x0b76e…0b792               Head {h00=0x0020, h01=0x0050, text=»*  COUNT PROCEDURE TIME OUT «, t00=0x0075, t01=0x00be}
0x0b792…0b79c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00e2}
0x0b79c…0b7b2               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSXC2«, t00=0x0075, t01=0x00ec}
0x0b7b2…0b7c8               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x0075, t01=0x0102}
0x0b7c8…0b7d4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x0118}
0x0b7d4…0b804               Head {h00=0x002c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT IF OPEN SALCUZ «, t00=0x0075, t01=0x0124}
0x0b804…0b818               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0075, t01=0x0154}
0x0b818…0b83e               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x0075, t01=0x0168}
0x0b83e…0b85c               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0075, t01=0x018e}
0x0b85c…0b886               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0076, t01=0x001c}
0x0b886…0b89c               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x0076, t01=0x0046}
0x0b89c…0b8aa               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0076, t01=0x005c}
0x0b8aa…0b8b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x006a}
0x0b8b4…0b8d2               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x0076, t01=0x0074}
0x0b8d2…0b8dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0092}
0x0b8dc…0b908               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x0076, t01=0x009c}
0x0b908…0b928               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x0076, t01=0x00c8}
0x0b928…0b942               Head {h00=0x0016, h01=0x0050, text=» CMR A1 STOP TIMER«, t00=0x0076, t01=0x00e8}
0x0b942…0b954               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x0076, t01=0x0102}
0x0b954…0b968               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x0076, t01=0x0114}
0x0b968…0b970               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x0128}
0x0b970…0b97a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0130}
0x0b97a…0b984               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x013a}
0x0b984…0b9b0               Head {h00=0x0028, h01=0x0050, text=»*   WAIT 1 SEC. FOR MODEM CONNECTION«, t00=0x0076, t01=0x0144}
0x0b9b0…0b9ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0170}
0x0b9ba…0b9c2               Head {h00=0x0004, h01=0x0050, t00=0x0076, t01=0x017a}
0x0b9c2…0b9e6               Head {h00=0x0020, h01=0x0050, text=»DTE:ON LDR A1,A6 DWT ADDRESS«, t00=0x0076, t01=0x0182}
0x0b9e6…0ba08               Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME WAIT 1 SEC.«, t00=0x0077, t01=0x0016}
0x0ba08…0ba20               Head {h00=0x0014, h01=0x0050, text=» DATA DTE:10,10 «, t00=0x0077, t01=0x0038}
0x0ba20…0ba3e               Head {h00=0x001a, h01=0x0050, text=» RF BRM CONNECT MODEM «, t00=0x0077, t01=0x0050}
0x0ba3e…0ba46               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x006e}
0x0ba46…0ba4e               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x0076}
0x0ba4e…0ba58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x007e}
0x0ba58…0ba62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0088}
0x0ba62…0ba84               Head {h00=0x001e, h01=0x0050, text=»*   MODEM-CONNECT TIMEOUT «, t00=0x0077, t01=0x0092}
0x0ba84…0ba8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x00b4}
0x0ba8e…0ba96               Head {h00=0x0004, h01=0x0050, t00=0x0077, t01=0x00be}
0x0ba96…0baba               Head {h00=0x0020, h01=0x0050, text=»DTE:10 LDR A6,A1 DWT ADDRESS«, t00=0x0077, t01=0x00c6}
0x0baba…0bad2               Head {h00=0x0014, h01=0x0050, text=» LDKL A7,DTETAB «, t00=0x0077, t01=0x00ea}
0x0bad2…0baf6               Head {h00=0x0020, h01=0x0050, text=» ABL RQOP90 COMPLETE REQUEST«, t00=0x0077, t01=0x0102}
0x0baf6…0bb04               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0077, t01=0x0126}
0x0bb04…0bb1a               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0077, t01=0x0134}
0x0bb1a…0bb24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x014a}
0x0bb24…0bb2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0154}
0x0bb2e…0bb48               Head {h00=0x0016, h01=0x0050, text=»*  GET DWT ADDRESS«, t00=0x0077, t01=0x015e}
0x0bb48…0bb52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0178}
0x0bb52…0bb66               Head {h00=0x0010, h01=0x0050, text=»MESDWT EQU *«, t00=0x0077, t01=0x0182}
0x0bb66…0bb90               Head {h00=0x0026, h01=0x0050, text=» CWR A6,A7 IS IT DTETAB-ADDRESS ? «, t00=0x0078, t01=0x0008}
0x0bb90…0bbaa               Head {h00=0x0016, h01=0x0050, text=» RF(E) MES200 YES «, t00=0x0078, t01=0x0032}
0x0bbaa…0bbd2               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTEDDT,A7 GET ADDR TO DDT«, t00=0x0078, t01=0x004c}
0x0bbd2…0bbf4               Head {h00=0x001e, h01=0x0050, text=» CWR A6,A2 IS IT DDT-ADDR «, t00=0x0078, t01=0x0074}
0x0bbf4…0bc0e               Head {h00=0x0016, h01=0x0050, text=» RF(E) MES200 YES «, t00=0x0078, t01=0x0096}
0x0bc0e…0bc34               Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY REQUEST ? «, t00=0x0078, t01=0x00b0}
0x0bc34…0bc4c               Head {h00=0x0014, h01=0x0050, text=» RF(N) MESD50 NO«, t00=0x0078, t01=0x00d6}
0x0bc4c…0bc78               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTOR,A6 ANY MESSAGE ORDER ? «, t00=0x0078, t01=0x00ee}
0x0bc78…0bc8c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0078, t01=0x011a}
0x0bc8c…0bca6               Head {h00=0x0016, h01=0x0050, text=» RF(Z) MES200 YES «, t00=0x0078, t01=0x012e}
0x0bca6…0bcd0               Head {h00=0x0026, h01=0x0050, text=» SUK A2,RECEIVE A RECEIVE ORDER ? «, t00=0x0078, t01=0x0148}
0x0bcd0…0bcea               Head {h00=0x0016, h01=0x0050, text=» RF(Z) MES200 YES «, t00=0x0078, t01=0x0172}
0x0bcea…0bcfe               Head {h00=0x0010, h01=0x0050, text=»MESD50 EQU *«, t00=0x0078, t01=0x018c}
0x0bcfe…0bd32               Head {h00=0x0030, h01=0x0050, text=» LD A2,DTEDDT,A7 IS THERE A DDT CONNECTED ? «, t00=0x0079, t01=0x0010}
0x0bd32…0bd4a               Head {h00=0x0014, h01=0x0050, text=» RF(Z) MES100 NO«, t00=0x0079, t01=0x0044}
0x0bd4a…0bd6a               Head {h00=0x001c, h01=0x0050, text=» LDR A6,A2 GET DDT-ADDR «, t00=0x0079, t01=0x005c}
0x0bd6a…0bd7c               Head {h00=0x000e, h01=0x0050, text=» RF MES200«, t00=0x0079, t01=0x007c}
0x0bd7c…0bd90               Head {h00=0x0010, h01=0x0050, text=»MES100 EQU *«, t00=0x0079, t01=0x008e}
0x0bd90…0bdb2               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A7 GET DTETAB-ADDR«, t00=0x0079, t01=0x00a2}
0x0bdb2…0bdc6               Head {h00=0x0010, h01=0x0050, text=»MES200 EQU *«, t00=0x0079, t01=0x00c4}
0x0bdc6…0bde8               Head {h00=0x001e, h01=0x0050, text=» ABL RTNA15 RETURN VIA A15«, t00=0x0079, t01=0x00d8}
0x0bde8…0bdf4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x00fa}
0x0bdf4…0be02               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0079, t01=0x0106}
0x0be02…0be0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0114}
0x0be0c…0be16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x011e}
0x0be16…0be32               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x0079, t01=0x0128}
0x0be32…0be3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0144}
0x0be3c…0be62               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x0079, t01=0x014e}
0x0be62…0be8c               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x0079, t01=0x0174}
0x0be8c…0be96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x000e}
0x0be96…0bea0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0018}
0x0bea0…0beb2               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x007a, t01=0x0022}
0x0beb2…0bed6               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x007a, t01=0x0034}
0x0bed6…0bef8               Head {h00=0x001e, h01=0x0050, text=» CM SYNSW CLEAR SYN-SWITCH«, t00=0x007a, t01=0x0058}
0x0bef8…0bf1e               Head {h00=0x0022, h01=0x0050, text=» CM TPM CLEAR TRANSPARENT TEXT«, t00=0x007a, t01=0x007a}
0x0bf1e…0bf4e               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCI START INPUT WITH SYNC DEF «, t00=0x007a, t01=0x00a0}
0x0bf4e…0bf58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00d0}
0x0bf58…0bf62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00da}
0x0bf62…0bf6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00e4}
0x0bf6c…0bf90               Head {h00=0x0020, h01=0x0050, text=» CF A5,READP READ CHARACTER «, t00=0x007a, t01=0x00ee}
0x0bf90…0bfb4               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM120 PARITY ERROR «, t00=0x007a, t01=0x0112}
0x0bfb4…0bfbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0136}
0x0bfbe…0bfc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0140}
0x0bfc8…0bff6               Head {h00=0x002a, h01=0x0050, text=»*  CHECK IF IT IS A CONTROL CHARACTER «, t00=0x007a, t01=0x014a}
0x0bff6…0c000               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0178}
0x0c000…0c012               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x007a, t01=0x0182}
0x0c012…0c050 (123, 0, 400) Head {h00=0x003a, h01=0x0050, text=» CF A15,LOOKUP BRANCH ON CODES, TABLE ADDRESS TO STACK«, t00=0x007b, t01=0x0004}
0x0c050…0c08e               Head {h00=0x003a, h01=0x0050, text=» DATA BRM100,BRM200 LAST ENTRY,POLL OR SELECT SEQUENCE«, t00=0x007b, t01=0x0042}
0x0c08e…0c0b4               Head {h00=0x0022, h01=0x0050, text=» DATA STX,STX100 STX RECEIVED «, t00=0x007b, t01=0x0080}
0x0c0b4…0c0da               Head {h00=0x0022, h01=0x0050, text=» DATA EOT,EOT100 EOT RECEIVED «, t00=0x007b, t01=0x00a6}
0x0c0da…0c100               Head {h00=0x0022, h01=0x0050, text=» DATA ENQ,ENQ100 ENQ RECEIVED «, t00=0x007b, t01=0x00cc}
0x0c100…0c126               Head {h00=0x0022, h01=0x0050, text=» DATA DLE,DLE100 DLE RECEIVED «, t00=0x007b, t01=0x00f2}
0x0c126…0c152               Head {h00=0x0028, h01=0x0050, text=»BRM100 DATA NAK,NAK100 NAK RECEIVED «, t00=0x007b, t01=0x0118}
0x0c152…0c160               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007b, t01=0x0144}
0x0c160…0c16a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0152}
0x0c16a…0c174               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x015c}
0x0c174…0c190               Head {h00=0x0018, h01=0x0050, text=»*  THROUGHPUT ERROR «, t00=0x007b, t01=0x0166}
0x0c190…0c19a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0182}
0x0c19a…0c1ae               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x007b, t01=0x018c}
0x0c1ae…0c1da               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE "INVALID MESSAGE" «, t00=0x007c, t01=0x0010}
0x0c1da…0c204               Head {h00=0x0026, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE TO A5 «, t00=0x007c, t01=0x003c}
0x0c204…0c234               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCI START INPUT WITH SYNC DEF «, t00=0x007c, t01=0x0066}
0x0c234…0c23e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0096}
0x0c23e…0c248               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00a0}
0x0c248…0c270               Head {h00=0x0024, h01=0x0050, text=»*  WAIT FOR MARK HOLD TO RESYNC.«, t00=0x007c, t01=0x00aa}
0x0c270…0c27a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00d2}
0x0c27a…0c28e               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x007c, t01=0x00dc}
0x0c28e…0c2b0               Head {h00=0x001e, h01=0x0050, text=» CF A5,READ READ CHARACTER«, t00=0x007c, t01=0x00f0}
0x0c2b0…0c2e4               Head {h00=0x0030, h01=0x0050, text=» LD A1,DCSTCU ANY STATUS FROM CONTROL UNIT ?«, t00=0x007c, t01=0x0112}
0x0c2e4…0c2fe               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) BRM130 YES«, t00=0x007c, t01=0x0146}
0x0c2fe…0c312               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x007c, t01=0x0160}
0x0c312…0c326               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x007c, t01=0x0174}
0x0c326…0c340               Head {h00=0x0016, h01=0x0050, text=» RB(NZ) BRM120 NO «, t00=0x007c, t01=0x0188}
0x0c340…0c354               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x007d, t01=0x0012}
0x0c354…0c374               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT«, t00=0x007d, t01=0x0026}
0x0c374…0c384               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x007d, t01=0x0046}
0x0c384…0c392               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007d, t01=0x0056}
0x0c392…0c39c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0064}
0x0c39c…0c3a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x006e}
0x0c3a6…0c3dc               Head {h00=0x0032, h01=0x0050, text=»*  CHECK IF IT IS A POLL OR A SELECT SEQUENCE «, t00=0x007d, t01=0x0078}
0x0c3dc…0c3e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00ae}
0x0c3e6…0c3fa               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x007d, t01=0x00b8}
0x0c3fa…0c40e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x007d, t01=0x00cc}
0x0c40e…0c420               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x007d, t01=0x00e0}
0x0c420…0c444               Head {h00=0x0020, h01=0x0050, text=» CF A5,READP READ CHARACTER «, t00=0x007d, t01=0x00f2}
0x0c444…0c456               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A4«, t00=0x007d, t01=0x0116}
0x0c456…0c47e               Head {h00=0x0024, h01=0x0050, text=» RB(NE) BRM120 INVALID SEQUENCE «, t00=0x007d, t01=0x0128}
0x0c47e…0c48a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x0150}
0x0c48a…0c49c               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x007d, t01=0x015c}
0x0c49c…0c4be               Head {h00=0x001e, h01=0x0050, text=» CC A2,1,A7 IS IT A POLL ?«, t00=0x007d, t01=0x016e}
0x0c4be…0c4dc               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM210 POLLING «, t00=0x007d, t01=0x0190}
0x0c4dc…0c4ee               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x007e, t01=0x001e}
0x0c4ee…0c512               Head {h00=0x0020, h01=0x0050, text=» CCR A2,A7 IS IT A SELECT ? «, t00=0x007e, t01=0x0030}
0x0c512…0c53a               Head {h00=0x0024, h01=0x0050, text=» RB(NE) BRM120 INVALID SEQUENCE «, t00=0x007e, t01=0x0054}
0x0c53a…0c54e               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x007e, t01=0x007c}
0x0c54e…0c570               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x007e, t01=0x0090}
0x0c570…0c590               Head {h00=0x001c, h01=0x0050, text=» RB(NZ) BRM PARITY ERROR«, t00=0x007e, t01=0x00b2}
0x0c590…0c5a2               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x007e, t01=0x00d2}
0x0c5a2…0c5b6               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x007e, t01=0x00e4}
0x0c5b6…0c5d8               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x007e, t01=0x00f8}
0x0c5d8…0c5ea               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A4«, t00=0x007e, t01=0x011a}
0x0c5ea…0c612               Head {h00=0x0024, h01=0x0050, text=» RB(NE) BRM120 INVALID SEQUENCE «, t00=0x007e, t01=0x012c}
0x0c612…0c61e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x0154}
0x0c61e…0c63c               Head {h00=0x001a, h01=0x0050, text=» CF A5,READP READ ENQ «, t00=0x007e, t01=0x0160}
0x0c63c…0c650               Head {h00=0x0010, h01=0x0050, text=» SUK A2,ENQ «, t00=0x007e, t01=0x017e}
0x0c650…0c678 (127, 0, 398) Head {h00=0x0024, h01=0x0050, text=» RB(NE) BRM120 INVALID SEQUENCE «, t00=0x007f, t01=0x0004}
0x0c678…0c682               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x002c}
0x0c682…0c68c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0036}
0x0c68c…0c6b4               Head {h00=0x0024, h01=0x0050, text=»*  YES SEQUENCE OK - HALT INPUT «, t00=0x007f, t01=0x0040}
0x0c6b4…0c6be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0068}
0x0c6be…0c6d4               Head {h00=0x0012, h01=0x0050, text=» CF A5,CHALTI «, t00=0x007f, t01=0x0072}
0x0c6d4…0c6e2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007f, t01=0x0088}
0x0c6e2…0c6ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0096}
0x0c6ec…0c6f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00a0}
0x0c6f6…0c72a               Head {h00=0x0030, h01=0x0050, text=»*  CHECK IF IT IS A SELECT OR A POLL ADDRESS«, t00=0x007f, t01=0x00aa}
0x0c72a…0c734               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00de}
0x0c734…0c746               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x007f, t01=0x00e8}
0x0c746…0c76a               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK-COUNTER«, t00=0x007f, t01=0x00fa}
0x0c76a…0c77c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x007f, t01=0x011e}
0x0c77c…0c78e               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x007f, t01=0x0130}
0x0c78e…0c7ae               Head {h00=0x001c, h01=0x0050, text=» RF(Z) SELECT SELECTING «, t00=0x007f, t01=0x0142}
0x0c7ae…0c7b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0162}
0x0c7b8…0c7c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x016c}
0x0c7c2…0c7d4               Head {h00=0x000e, h01=0x0050, text=»*  POLLING«, t00=0x007f, t01=0x0176}
0x0c7d4…0c7de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0188}
0x0c7de…0c7f0 (128, 0, 398) Head {h00=0x000e, h01=0x0050, text=» CWK A4,GP«, t00=0x0080, t01=0x0004}
0x0c7f0…0c812               Head {h00=0x001e, h01=0x0050, text=» RF(E) GPOLL GENERAL POLL «, t00=0x0080, t01=0x0016}
0x0c812…0c84c               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x0080, t01=0x0038}
0x0c84c…0c86e               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A3 LOAD DWT TO A6 «, t00=0x0080, t01=0x0072}
0x0c86e…0c88e               Head {h00=0x001c, h01=0x0050, text=» RB(Z) BRM INVALID POLL «, t00=0x0080, t01=0x0094}
0x0c88e…0c898               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00b4}
0x0c898…0c8a6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0080, t01=0x00be}
0x0c8a6…0c8b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00cc}
0x0c8b0…0c8ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00d6}
0x0c8ba…0c8e4               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x0080, t01=0x00e0}
0x0c8e4…0c8ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x010a}
0x0c8ee…0c8f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0114}
0x0c8f8…0c914               Head {h00=0x0018, h01=0x0050, text=» IFF STARVI+SPECP=0 «, t00=0x0080, t01=0x011e}
0x0c914…0c928               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0080, t01=0x013a}
0x0c928…0c94c               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) POL100 ACK EXPECTED «, t00=0x0080, t01=0x014e}
0x0c94c…0c970               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x0080, t01=0x0172}
0x0c970…0c986               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x0081, t01=0x0008}
0x0c986…0c9a8               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0081, t01=0x001e}
0x0c9a8…0c9ba               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x0081, t01=0x0040}
0x0c9ba…0c9e0               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 PENDING STATUS «, t00=0x0081, t01=0x0052}
0x0c9e0…0c9ec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x0078}
0x0c9ec…0ca08               Head {h00=0x0018, h01=0x0050, text=» IFF STARVI+SPECP=0 «, t00=0x0081, t01=0x0084}
0x0ca08…0ca20               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0081, t01=0x00a0}
0x0ca20…0ca40               Head {h00=0x001c, h01=0x0050, text=» RF(N) POL150 NO REQUEST«, t00=0x0081, t01=0x00b8}
0x0ca40…0ca62               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x0081, t01=0x00d8}
0x0ca62…0ca8c               Head {h00=0x0026, h01=0x0050, text=» ANK A1,/FF MASK AWAY OPTION PART «, t00=0x0081, t01=0x00fa}
0x0ca8c…0ca9e               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x0081, t01=0x0124}
0x0ca9e…0cac2               Head {h00=0x0020, h01=0x0050, text=» RF(Z) POL170 WRITE REQUEST «, t00=0x0081, t01=0x0136}
0x0cac2…0cace               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x015a}
0x0cace…0caea               Head {h00=0x0018, h01=0x0050, text=» RF POL150 SEND EOT «, t00=0x0081, t01=0x0166}
0x0caea…0caf8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0081, t01=0x0182}
0x0caf8…0cb02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0190}
0x0cb02…0cb0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x000a}
0x0cb0c…0cb34               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x0082, t01=0x0014}
0x0cb34…0cb3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x003c}
0x0cb3e…0cb48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0046}
0x0cb48…0cb5c               Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x0082, t01=0x0050}
0x0cb5c…0cb70               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0082, t01=0x0064}
0x0cb70…0cb96               Head {h00=0x0022, h01=0x0050, text=» RF(Z) POL110 ACK NOT EXPECTED«, t00=0x0082, t01=0x0078}
0x0cb96…0cbba               Head {h00=0x0020, h01=0x0050, text=»POL100 CF A5,TRENQ SEND ENQ «, t00=0x0082, t01=0x009e}
0x0cbba…0cbe4               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0082, t01=0x00c2}
0x0cbe4…0cc06               Head {h00=0x001e, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE«, t00=0x0082, t01=0x00ec}
0x0cc06…0cc1c               Head {h00=0x0012, h01=0x0050, text=»POL110 EQU *  «, t00=0x0082, t01=0x010e}
0x0cc1c…0cc42               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x0082, t01=0x0124}
0x0cc42…0cc58               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x0082, t01=0x014a}
0x0cc58…0cc6e               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x0082, t01=0x0160}
0x0cc6e…0cc98               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL140 NO STATUS TO BE SENT«, t00=0x0082, t01=0x0176}
0x0cc98…0ccbe               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTOPE GET DWT ADDRESS«, t00=0x0083, t01=0x0010}
0x0ccbe…0ccd2               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x0083, t01=0x0036}
0x0ccd2…0ccf2               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x0083, t01=0x004a}
0x0ccf2…0cd1c               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0083, t01=0x006a}
0x0cd1c…0cd40               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0083, t01=0x0094}
0x0cd40…0cd4c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x00b8}
0x0cd4c…0cd62               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=1 «, t00=0x0083, t01=0x00c4}
0x0cd62…0cd74               Head {h00=0x000e, h01=0x0050, text=» RF POL140«, t00=0x0083, t01=0x00da}
0x0cd74…0cd80               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x00ec}
0x0cd80…0cd94               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x0083, t01=0x00f8}
0x0cd94…0cda4               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0083, t01=0x010c}
0x0cda4…0cdb8               Head {h00=0x0010, h01=0x0050, text=»POL140 EQU *«, t00=0x0083, t01=0x011c}
0x0cdb8…0cdcc               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x0083, t01=0x0130}
0x0cdcc…0cdf2               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL160 WRITE ON QUEUE «, t00=0x0083, t01=0x0144}
0x0cdf2…0ce06               Head {h00=0x0010, h01=0x0050, text=»POL150 EQU *«, t00=0x0083, t01=0x016a}
0x0ce06…0ce24               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x0083, t01=0x017e}
0x0ce24…0ce36               Head {h00=0x000e, h01=0x0050, text=» RB POL130«, t00=0x0084, t01=0x000c}
0x0ce36…0ce4a               Head {h00=0x0010, h01=0x0050, text=»POL160 EQU *«, t00=0x0084, t01=0x001e}
0x0ce4a…0ce70               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTOPN GET DWT ADDRESS«, t00=0x0084, t01=0x0032}
0x0ce70…0ce84               Head {h00=0x0010, h01=0x0050, text=»POL170 EQU *«, t00=0x0084, t01=0x0058}
0x0ce84…0ceac               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0084, t01=0x006c}
0x0ceac…0cec2               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL180«, t00=0x0084, t01=0x0094}
0x0cec2…0ced8               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x0084, t01=0x00aa}
0x0ced8…0ceea               Head {h00=0x000e, h01=0x0050, text=» RB POL150«, t00=0x0084, t01=0x00c0}
0x0ceea…0cefe               Head {h00=0x0010, h01=0x0050, text=»POL180 EQU *«, t00=0x0084, t01=0x00d2}
0x0cefe…0cf22               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x0084, t01=0x00e6}
0x0cf22…0cf40               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x0084, t01=0x010a}
0x0cf40…0cf56               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x0084, t01=0x0128}
0x0cf56…0cf7e               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,MMUBUF MMU WORK BUFFER «, t00=0x0084, t01=0x013e}
0x0cf7e…0cf96               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x0084, t01=0x0166}
0x0cf96…0cfc8               Head {h00=0x002e, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA FROM USER BUFFER «, t00=0x0084, t01=0x017e}
0x0cfc8…0cfd4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x0020}
0x0cfd4…0cffe               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0085, t01=0x002c}
0x0cffe…0d020               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x0085, t01=0x0056}
0x0d020…0d034               Head {h00=0x0010, h01=0x0050, text=»POL190 EQU *«, t00=0x0085, t01=0x0078}
0x0d034…0d05e               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x0085, t01=0x008c}
0x0d05e…0d08a               Head {h00=0x0028, h01=0x0050, text=» SUK A3,2 SKIP FIRST WORD OF BUFFER «, t00=0x0085, t01=0x00b6}
0x0d08a…0d0ac               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x0085, t01=0x00e2}
0x0d0ac…0d0d0               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x0085, t01=0x0104}
0x0d0d0…0d0e4               Head {h00=0x0010, h01=0x0050, text=»POL200 EQU *«, t00=0x0085, t01=0x0128}
0x0d0e4…0d106               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x0085, t01=0x013c}
0x0d106…0d116               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x0085, t01=0x015e}
0x0d116…0d13a               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x0085, t01=0x016e}
0x0d13a…0d164 (134, 0, 398) Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0086, t01=0x0004}
0x0d164…0d188               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x0086, t01=0x002e}
0x0d188…0d19a               Head {h00=0x000e, h01=0x0050, text=» RB POL130«, t00=0x0086, t01=0x0052}
0x0d19a…0d1a8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0086, t01=0x0064}
0x0d1a8…0d1b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0072}
0x0d1b2…0d1bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x007c}
0x0d1bc…0d1e0               Head {h00=0x0020, h01=0x0050, text=»*  SELECT HAS BEEN RECEIVED «, t00=0x0086, t01=0x0086}
0x0d1e0…0d1ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00aa}
0x0d1ea…0d1fe               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x0086, t01=0x00b4}
0x0d1fe…0d214               Head {h00=0x0012, h01=0x0050, text=» CF A5,FINTES «, t00=0x0086, t01=0x00c8}
0x0d214…0d234               Head {h00=0x001c, h01=0x0050, text=» LDR A6,A3 GET DWT-ADDR «, t00=0x0086, t01=0x00de}
0x0d234…0d24a               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SEL100«, t00=0x0086, t01=0x00fe}
0x0d24a…0d260               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0086, t01=0x0114}
0x0d260…0d286               Head {h00=0x0022, h01=0x0050, text=» LD A6,DTEDDT,A7 GET DDT-ADDR «, t00=0x0086, t01=0x012a}
0x0d286…0d29c               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SEL100«, t00=0x0086, t01=0x0150}
0x0d29c…0d2a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x0166}
0x0d2a8…0d2cc               Head {h00=0x0020, h01=0x0050, text=» LDKL A6,DTETAB DTETAB ADRR «, t00=0x0086, t01=0x0172}
0x0d2cc…0d2e0               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x0087, t01=0x0008}
0x0d2e0…0d2f4               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0087, t01=0x001c}
0x0d2f4…0d31e               Head {h00=0x0026, h01=0x0050, text=» RB(NZ) POL100 ERROR. ACK EXPECTED«, t00=0x0087, t01=0x0030}
0x0d31e…0d334               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x0087, t01=0x005a}
0x0d334…0d356               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0087, t01=0x0070}
0x0d356…0d368               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0087, t01=0x0092}
0x0d368…0d37a               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0087, t01=0x00a4}
0x0d37a…0d3a2               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL120 NO PENDING STATUS «, t00=0x0087, t01=0x00b6}
0x0d3a2…0d3c0               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x0087, t01=0x00de}
0x0d3c0…0d3cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x00fc}
0x0d3cc…0d3e2               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=1 «, t00=0x0087, t01=0x0108}
0x0d3e2…0d3f4               Head {h00=0x000e, h01=0x0050, text=» RF SEL120«, t00=0x0087, t01=0x011e}
0x0d3f4…0d400               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x0130}
0x0d400…0d414               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x0087, t01=0x013c}
0x0d414…0d424               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0087, t01=0x0150}
0x0d424…0d438               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x0087, t01=0x0160}
0x0d438…0d454               Head {h00=0x0018, h01=0x0050, text=» IFT STARVI+NOWACK=1«, t00=0x0087, t01=0x0174}
0x0d454…0d466               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0087, t01=0x0190}
0x0d466…0d482               Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SEL140 BUSY «, t00=0x0088, t01=0x0012}
0x0d482…0d48e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x002e}
0x0d48e…0d4aa               Head {h00=0x0018, h01=0x0050, text=» IFT STARVI+NOWACK=2«, t00=0x0088, t01=0x003a}
0x0d4aa…0d4bc               Head {h00=0x000e, h01=0x0050, text=» ANK A3,8 «, t00=0x0088, t01=0x0056}
0x0d4bc…0d4e2               Head {h00=0x0022, h01=0x0050, text=» RF(Z) SEL130 DEVICE NOT BUSY «, t00=0x0088, t01=0x0068}
0x0d4e2…0d506               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRWACK TRANSMIT WACK «, t00=0x0088, t01=0x008e}
0x0d506…0d516               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0088, t01=0x00b2}
0x0d516…0d52a               Head {h00=0x0010, h01=0x0050, text=»SEL130 EQU *«, t00=0x0088, t01=0x00c2}
0x0d52a…0d536               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x00d6}
0x0d536…0d54c               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0088, t01=0x00e2}
0x0d54c…0d574               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL150 BUFFER AVAILABLE «, t00=0x0088, t01=0x00f8}
0x0d574…0d58a               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x0088, t01=0x0120}
0x0d58a…0d5b6               Head {h00=0x0028, h01=0x0050, text=» LDK A1,CSSRBY BUFFER NOT AVAILABLE «, t00=0x0088, t01=0x0136}
0x0d5b6…0d5de               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x0088, t01=0x0162}
0x0d5de…0d5ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x018a}
0x0d5ea…0d5fe               Head {h00=0x0010, h01=0x0050, text=»SEL140 EQU *«, t00=0x0089, t01=0x0008}
0x0d5fe…0d61a               Head {h00=0x0018, h01=0x0050, text=» IFF STARVI+NOWACK=2«, t00=0x0089, t01=0x001c}
0x0d61a…0d63a               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x0089, t01=0x0038}
0x0d63a…0d646               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x0058}
0x0d646…0d658               Head {h00=0x000e, h01=0x0050, text=» RB SEL110«, t00=0x0089, t01=0x0064}
0x0d658…0d66c               Head {h00=0x0010, h01=0x0050, text=»SEL150 EQU *«, t00=0x0089, t01=0x0076}
0x0d66c…0d69c               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0089, t01=0x008a}
0x0d69c…0d6ae               Head {h00=0x000e, h01=0x0050, text=» ADK A1,6 «, t00=0x0089, t01=0x00ba}
0x0d6ae…0d6c2               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBLST«, t00=0x0089, t01=0x00cc}
0x0d6c2…0d6e2               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x0089, t01=0x00e0}
0x0d6e2…0d6f4               Head {h00=0x000e, h01=0x0050, text=» RB SEL110«, t00=0x0089, t01=0x0100}
0x0d6f4…0d702               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0089, t01=0x0112}
0x0d702…0d70c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0120}
0x0d70c…0d716               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x012a}
0x0d716…0d736               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0089, t01=0x0134}
0x0d736…0d740               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0154}
0x0d740…0d74a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x015e}
0x0d74a…0d75e               Head {h00=0x0010, h01=0x0050, text=»EOT100 EQU *«, t00=0x0089, t01=0x0168}
0x0d75e…0d788               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0089, t01=0x017c}
0x0d788…0d79c               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x008a, t01=0x0016}
0x0d79c…0d7be               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x008a, t01=0x002a}
0x0d7be…0d7ca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x004c}
0x0d7ca…0d7de               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x008a, t01=0x0058}
0x0d7de…0d808               Head {h00=0x0026, h01=0x0050, text=» RF(Z) EOT120 ACK IS NOT EXPECTED «, t00=0x008a, t01=0x006c}
0x0d808…0d82e               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x008a, t01=0x0096}
0x0d82e…0d852               Head {h00=0x0020, h01=0x0050, text=» RF(Z) EOT110 NO ONE WRITING«, t00=0x008a, t01=0x00bc}
0x0d852…0d86c               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x008a, t01=0x00e0}
0x0d86c…0d898               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x008a, t01=0x00fa}
0x0d898…0d8ac               Head {h00=0x0010, h01=0x0050, text=»EOT110 EQU *«, t00=0x008a, t01=0x0126}
0x0d8ac…0d8d2               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x008a, t01=0x013a}
0x0d8d2…0d8e6               Head {h00=0x0010, h01=0x0050, text=»EOT120 EQU *«, t00=0x008a, t01=0x0160}
0x0d8e6…0d908               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x008a, t01=0x0174}
0x0d908…0d918               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x008b, t01=0x0008}
0x0d918…0d926               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008b, t01=0x0018}
0x0d926…0d930               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0026}
0x0d930…0d93a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0030}
0x0d93a…0d95a               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x008b, t01=0x003a}
0x0d95a…0d964               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x005a}
0x0d964…0d96e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0064}
0x0d96e…0d982               Head {h00=0x0010, h01=0x0050, text=»STX100 EQU *«, t00=0x008b, t01=0x006e}
0x0d982…0d996               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x008b, t01=0x0082}
0x0d996…0d9ac               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x008b, t01=0x0096}
0x0d9ac…0d9d0               Head {h00=0x0020, h01=0x0050, text=» ABL BRM120 INVALID SEQENCE «, t00=0x008b, t01=0x00ac}
0x0d9d0…0d9e4               Head {h00=0x0010, h01=0x0050, text=»STX110 EQU *«, t00=0x008b, t01=0x00d0}
0x0d9e4…0d9f0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x00e4}
0x0d9f0…0da04               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x008b, t01=0x00f0}
0x0da04…0da26               Head {h00=0x001e, h01=0x0050, text=» RF(Z) STX150 NOT SELECTED«, t00=0x008b, t01=0x0104}
0x0da26…0da3c               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x008b, t01=0x0126}
0x0da3c…0da52               Head {h00=0x0012, h01=0x0050, text=» IFF STTSTS=1 «, t00=0x008b, t01=0x013c}
0x0da52…0da7c               Head {h00=0x0026, h01=0x0050, text=» ABL(Z) BRM120 NO BUFFER AVAILABLE«, t00=0x008b, t01=0x0152}
0x0da7c…0da88               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x017c}
0x0da88…0da9e               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x008b, t01=0x0188}
0x0da9e…0dab4               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) STX120«, t00=0x008c, t01=0x000e}
0x0dab4…0dabe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0024}
0x0dabe…0dadc               Head {h00=0x001a, h01=0x0050, text=»* NO BUFFER AVAILABLE «, t00=0x008c, t01=0x002e}
0x0dadc…0dae6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x004c}
0x0dae6…0dafc               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSRBY«, t00=0x008c, t01=0x0056}
0x0dafc…0db24               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x008c, t01=0x006c}
0x0db24…0db38               Head {h00=0x0010, h01=0x0050, text=» ABL BRM120 «, t00=0x008c, t01=0x0094}
0x0db38…0db44               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x00a8}
0x0db44…0db58               Head {h00=0x0010, h01=0x0050, text=»STX120 EQU *«, t00=0x008c, t01=0x00b4}
0x0db58…0db7a               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x008c, t01=0x00c8}
0x0db7a…0db90               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x008c, t01=0x00ea}
0x0db90…0db9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0100}
0x0db9a…0dba4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x010a}
0x0dba4…0dbc6               Head {h00=0x001e, h01=0x0050, text=»*  COUNT MESSAGES RECEIVED«, t00=0x008c, t01=0x0114}
0x0dbc6…0dbd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0136}
0x0dbd0…0dbe6               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSRBL«, t00=0x008c, t01=0x0140}
0x0dbe6…0dbfc               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x008c, t01=0x0156}
0x0dbfc…0dc08               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x016c}
0x0dc08…0dc1a               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x008c, t01=0x0178}
0x0dc1a…0dc3c               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) STX170 MESSAGE OK «, t00=0x008c, t01=0x018a}
0x0dc3c…0dc50               Head {h00=0x0010, h01=0x0050, text=»STX130 EQU *«, t00=0x008d, t01=0x001c}
0x0dc50…0dc7c               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x008d, t01=0x0030}
0x0dc7c…0dc90               Head {h00=0x0010, h01=0x0050, text=»STX140 EQU *«, t00=0x008d, t01=0x005c}
0x0dc90…0dcae               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x008d, t01=0x0070}
0x0dcae…0dcbe               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x008d, t01=0x008e}
0x0dcbe…0dcd2               Head {h00=0x0010, h01=0x0050, text=»STX150 EQU *«, t00=0x008d, t01=0x009e}
0x0dcd2…0dce6               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x008d, t01=0x00b2}
0x0dce6…0dcfa               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x008d, t01=0x00c6}
0x0dcfa…0dd24               Head {h00=0x0026, h01=0x0050, text=» RF(Z) STX160 ACK IS NOT EXPECTED «, t00=0x008d, t01=0x00da}
0x0dd24…0dd3a               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x008d, t01=0x0104}
0x0dd3a…0dd64               Head {h00=0x0026, h01=0x0050, text=» RF(Z) STX160 NO BUFFER AVAILABLE «, t00=0x008d, t01=0x011a}
0x0dd64…0dd8a               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x008d, t01=0x0144}
0x0dd8a…0ddbe               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM120 NO ONE WRITING. RESYNCHRONIZE«, t00=0x008d, t01=0x016a}
0x0ddbe…0ddda               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x008e, t01=0x000e}
0x0ddda…0de0a               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x008e, t01=0x002a}
0x0de0a…0de24               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x008e, t01=0x005a}
0x0de24…0de50               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x008e, t01=0x0074}
0x0de50…0de6e               Head {h00=0x001a, h01=0x0050, text=» CM CACK PRESET ACK-1 «, t00=0x008e, t01=0x00a0}
0x0de6e…0de92               Head {h00=0x0020, h01=0x0050, text=» RB STX120 READ THE MESSAGE «, t00=0x008e, t01=0x00be}
0x0de92…0de9e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x00e2}
0x0de9e…0deca               Head {h00=0x0028, h01=0x0050, text=»STX160 CF A5,READ READ ONE CHARACTER«, t00=0x008e, t01=0x00ee}
0x0deca…0deec               Head {h00=0x001e, h01=0x0050, text=» CWK A2,ENQPAR IS IT ENQ ?«, t00=0x008e, t01=0x011a}
0x0deec…0df18               Head {h00=0x0028, h01=0x0050, text=» RB(Z) STX140 FORWARD ABORT SEQUENCE«, t00=0x008e, t01=0x013c}
0x0df18…0df2a               Head {h00=0x000e, h01=0x0050, text=» RB EOT120«, t00=0x008e, t01=0x0168}
0x0df2a…0df3e               Head {h00=0x0010, h01=0x0050, text=»STX170 EQU *«, t00=0x008e, t01=0x017a}
0x0df3e…0df62               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x008e, t01=0x018e}
0x0df62…0df8a               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x008f, t01=0x0022}
0x0df8a…0df9c               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x008f, t01=0x004a}
0x0df9c…0dfb0               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x008f, t01=0x005c}
0x0dfb0…0dfd6               Head {h00=0x0022, h01=0x0050, text=» RF(NE) STX180 NOT FIRST BLOCK«, t00=0x008f, t01=0x0070}
0x0dfd6…0dfea               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x008f, t01=0x0096}
0x0dfea…0dffe               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x008f, t01=0x00aa}
0x0dffe…0e010               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x008f, t01=0x00be}
0x0e010…0e034               Head {h00=0x0020, h01=0x0050, text=» RB(NE) STX130 ESC NOT FOUND«, t00=0x008f, t01=0x00d0}
0x0e034…0e058               Head {h00=0x0020, h01=0x0050, text=» LC A1,1,A4 GET COMMAND CODE«, t00=0x008f, t01=0x00f4}
0x0e058…0e06e               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x008f, t01=0x0118}
0x0e06e…0e09a               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x008f, t01=0x012e}
0x0e09a…0e0b8               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x008f, t01=0x015a}
0x0e0b8…0e0e2               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x008f, t01=0x0178}
0x0e0e2…0e0ee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0090, t01=0x0012}
0x0e0ee…0e102               Head {h00=0x0010, h01=0x0050, text=»STX180 EQU *«, t00=0x0090, t01=0x001e}
0x0e102…0e114               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0090, t01=0x0032}
0x0e114…0e132               Head {h00=0x001a, h01=0x0050, text=» RF(Z) STX280 SEND ACK«, t00=0x0090, t01=0x0044}
0x0e132…0e156               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x0090, t01=0x0062}
0x0e156…0e16c               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0090, t01=0x0086}
0x0e16c…0e182               Head {h00=0x0012, h01=0x0050, text=» CF A15,MESDWT«, t00=0x0090, t01=0x009c}
0x0e182…0e18e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0090, t01=0x00b2}
0x0e18e…0e1b0               Head {h00=0x001e, h01=0x0050, text=» CWR A7,A6 IS IT DTETAB ? «, t00=0x0090, t01=0x00be}
0x0e1b0…0e1ce               Head {h00=0x001a, h01=0x0050, text=» RF(E) STX280 SEND ACK«, t00=0x0090, t01=0x00e0}
0x0e1ce…0e1de               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0090, t01=0x00fe}
0x0e1de…0e20c               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0090, t01=0x010e}
0x0e20c…0e21e               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0090, t01=0x013c}
0x0e21e…0e232               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0090, t01=0x014e}
0x0e232…0e252               Head {h00=0x001c, h01=0x0050, text=» LDR* A2,A6 GET ADDRESS «, t00=0x0090, t01=0x0162}
0x0e252…0e282               Head {h00=0x002c, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE IT TO EBCDIC«, t00=0x0090, t01=0x0182}
0x0e282…0e2aa               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF IS THERE A BUFFER «, t00=0x0091, t01=0x0022}
0x0e2aa…0e2c2               Head {h00=0x0014, h01=0x0050, text=» RF(Z) STX200 NO«, t00=0x0091, t01=0x004a}
0x0e2c2…0e2e6               Head {h00=0x0020, h01=0x0050, text=» ST A2,+4,A1 STORE THE ADDR «, t00=0x0091, t01=0x0062}
0x0e2e6…0e2fa               Head {h00=0x0010, h01=0x0050, text=»STX200 EQU *«, t00=0x0091, t01=0x0086}
0x0e2fa…0e306               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x009a}
0x0e306…0e32c               Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY REQUEST ? «, t00=0x0091, t01=0x00a6}
0x0e32c…0e344               Head {h00=0x0014, h01=0x0050, text=» RF(N) STX220 NO«, t00=0x0091, t01=0x00cc}
0x0e344…0e366               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0091, t01=0x00e4}
0x0e366…0e37c               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x0091, t01=0x0106}
0x0e37c…0e3a6               Head {h00=0x0026, h01=0x0050, text=» RF(Z) STX210 ANY MESSAGE ORDER ? «, t00=0x0091, t01=0x011c}
0x0e3a6…0e3b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0091, t01=0x0146}
0x0e3b2…0e3d6               Head {h00=0x0020, h01=0x0050, text=» CWK A2,RECEIVE A RECEIVE ? «, t00=0x0091, t01=0x0152}
0x0e3d6…0e3f0               Head {h00=0x0016, h01=0x0050, text=» RF(NE) STX220 NO «, t00=0x0091, t01=0x0176}
0x0e3f0…0e404               Head {h00=0x0010, h01=0x0050, text=»STX210 EQU *«, t00=0x0091, t01=0x0190}
0x0e404…0e428               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0092, t01=0x0014}
0x0e428…0e450               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0092, t01=0x0038}
0x0e450…0e470               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x0092, t01=0x0060}
0x0e470…0e49e               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x0092, t01=0x0080}
0x0e49e…0e4c8               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x0092, t01=0x00ae}
0x0e4c8…0e4f6               Head {h00=0x002a, h01=0x0050, text=» ST A2,ECBCW1,A8 STORE REMAINING TIME «, t00=0x0092, t01=0x00d8}
0x0e4f6…0e50a               Head {h00=0x0010, h01=0x0050, text=»STX220 EQU *«, t00=0x0092, t01=0x0106}
0x0e50a…0e520               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x0092, t01=0x011a}
0x0e520…0e540               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x0092, t01=0x0130}
0x0e540…0e554               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0092, t01=0x0150}
0x0e554…0e56e               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x0092, t01=0x0164}
0x0e56e…0e580               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x0092, t01=0x017e}
0x0e580…0e596               Head {h00=0x0012, h01=0x0050, text=» RF(Z) STX230 «, t00=0x0092, t01=0x0190}
0x0e596…0e5ae               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0093, t01=0x0016}
0x0e5ae…0e5c0               Head {h00=0x000e, h01=0x0050, text=» ORK A2,/A«, t00=0x0093, t01=0x002e}
0x0e5c0…0e5d8               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x0093, t01=0x0040}
0x0e5d8…0e5ec               Head {h00=0x0010, h01=0x0050, text=»STX230 EQU *«, t00=0x0093, t01=0x0058}
0x0e5ec…0e5f8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x006c}
0x0e5f8…0e61e               Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY REQUEST ? «, t00=0x0093, t01=0x0078}
0x0e61e…0e638               Head {h00=0x0016, h01=0x0050, text=» RF(NN) STX240 YES«, t00=0x0093, t01=0x009e}
0x0e638…0e65a               Head {h00=0x001e, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER «, t00=0x0093, t01=0x00b8}
0x0e65a…0e66c               Head {h00=0x000e, h01=0x0050, text=» RF STX270«, t00=0x0093, t01=0x00da}
0x0e66c…0e680               Head {h00=0x0010, h01=0x0050, text=»STX240 EQU *«, t00=0x0093, t01=0x00ec}
0x0e680…0e6a2               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0093, t01=0x0100}
0x0e6a2…0e6ca               Head {h00=0x0024, h01=0x0050, text=» CWK A2,RECEIVE RECEIVE ORDER ? «, t00=0x0093, t01=0x0122}
0x0e6ca…0e6e4               Head {h00=0x0016, h01=0x0050, text=» RF(NE) STX260 NO «, t00=0x0093, t01=0x014a}
0x0e6e4…0e6fa               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0093, t01=0x0164}
0x0e6fa…0e71c               Head {h00=0x001e, h01=0x0050, text=» CW A6,DTEDDT,A7 DDT-DWT ?«, t00=0x0093, t01=0x017a}
0x0e71c…0e736               Head {h00=0x0016, h01=0x0050, text=» RF(NE) STX245 NO «, t00=0x0094, t01=0x000c}
0x0e736…0e764               Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTLAD,A6 SYMBOLIC DTE-ADDRESS «, t00=0x0094, t01=0x0026}
0x0e764…0e788               Head {h00=0x0020, h01=0x0050, text=» LDR* A2,A6 GET SUB-ADDRESS «, t00=0x0094, t01=0x0054}
0x0e788…0e79c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0094, t01=0x0078}
0x0e79c…0e7ca               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x0094, t01=0x008c}
0x0e7ca…0e7d6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x00ba}
0x0e7d6…0e7ec               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0094, t01=0x00c6}
0x0e7ec…0e81c               Head {h00=0x002c, h01=0x0050, text=» CF A15,GETSSA GET SYMBOLIC SUB-ADDRESS «, t00=0x0094, t01=0x00dc}
0x0e81c…0e83c               Head {h00=0x001c, h01=0x0050, text=» ST A1,ECBCW2,A8 TO USER«, t00=0x0094, t01=0x010c}
0x0e83c…0e850               Head {h00=0x0010, h01=0x0050, text=»STX245 EQU *«, t00=0x0094, t01=0x012c}
0x0e850…0e85c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x0140}
0x0e85c…0e880               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0094, t01=0x014c}
0x0e880…0e8ae               Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTIPC,A6 ANY QUEUED MESSAGES ?«, t00=0x0094, t01=0x0170}
0x0e8ae…0e8c6               Head {h00=0x0014, h01=0x0050, text=» RF(Z) STX250 NO«, t00=0x0095, t01=0x000e}
0x0e8c6…0e8e2               Head {h00=0x0018, h01=0x0050, text=» ORKL A1,R:DATA YES «, t00=0x0095, t01=0x0026}
0x0e8e2…0e8f6               Head {h00=0x0010, h01=0x0050, text=»STX250 EQU *«, t00=0x0095, t01=0x0042}
0x0e8f6…0e920               Head {h00=0x0026, h01=0x0050, text=» CF A15,DC:MIN MOVE TO USER BUFFER«, t00=0x0095, t01=0x0056}
0x0e920…0e932               Head {h00=0x000e, h01=0x0050, text=» RF STX270«, t00=0x0095, t01=0x0080}
0x0e932…0e946               Head {h00=0x0010, h01=0x0050, text=»STX260 EQU *«, t00=0x0095, t01=0x0092}
0x0e946…0e968               Head {h00=0x001e, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER «, t00=0x0095, t01=0x00a6}
0x0e968…0e97e               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x0095, t01=0x00c8}
0x0e97e…0e9a0               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0095, t01=0x00de}
0x0e9a0…0e9cc               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) STX270 NOT ANY MESSAGE ORDER«, t00=0x0095, t01=0x0100}
0x0e9cc…0e9f4               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x0095, t01=0x012c}
0x0e9f4…0ea00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x0154}
0x0ea00…0ea14               Head {h00=0x0010, h01=0x0050, text=»STX270 EQU *«, t00=0x0095, t01=0x0160}
0x0ea14…0ea2a               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x0095, t01=0x0174}
0x0ea2a…0ea4c               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0095, t01=0x018a}
0x0ea4c…0ea66               Head {h00=0x0016, h01=0x0050, text=» ANK A1,8 MASK A1 «, t00=0x0096, t01=0x001c}
0x0ea66…0ea7c               Head {h00=0x0012, h01=0x0050, text=» RF(Z) STX280 «, t00=0x0096, t01=0x0036}
0x0ea7c…0ea9a               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRWACK SEN WACK«, t00=0x0096, t01=0x004c}
0x0ea9a…0eaac               Head {h00=0x000e, h01=0x0050, text=» RF STX290«, t00=0x0096, t01=0x006a}
0x0eaac…0eab8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0096, t01=0x007c}
0x0eab8…0eacc               Head {h00=0x0010, h01=0x0050, text=»STX280 EQU *«, t00=0x0096, t01=0x0088}
0x0eacc…0eaea               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRACK SEND ACK «, t00=0x0096, t01=0x009c}
0x0eaea…0eafe               Head {h00=0x0010, h01=0x0050, text=»STX290 EQU *«, t00=0x0096, t01=0x00ba}
0x0eafe…0eb0e               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0096, t01=0x00ce}
0x0eb0e…0eb1c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0096, t01=0x00de}
0x0eb1c…0eb26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00ec}
0x0eb26…0eb30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00f6}
0x0eb30…0eb60               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x0096, t01=0x0100}
0x0eb60…0eb6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0130}
0x0eb6a…0eb74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x013a}
0x0eb74…0eb88               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0096, t01=0x0144}
0x0eb88…0ebb0               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x0096, t01=0x0158}
0x0ebb0…0ebc4               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x0096, t01=0x0180}
0x0ebc4…0ebea (151, 0, 400) Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x0097, t01=0x0004}
0x0ebea…0ec22               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x0097, t01=0x002a}
0x0ec22…0ec4a               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x0097, t01=0x0062}
0x0ec4a…0ec72               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x0097, t01=0x008a}
0x0ec72…0ec98               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x0097, t01=0x00b2}
0x0ec98…0ecbe               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x0097, t01=0x00d8}
0x0ecbe…0ecd0               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x0097, t01=0x00fe}
0x0ecd0…0ece2               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0097, t01=0x0110}
0x0ece2…0ed0c               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x0097, t01=0x0122}
0x0ed0c…0ed20               Head {h00=0x0010, h01=0x0050, text=» ABL POL190 «, t00=0x0097, t01=0x014c}
0x0ed20…0ed2c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0097, t01=0x0160}
0x0ed2c…0ed3a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0097, t01=0x016c}
0x0ed3a…0ed44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x017a}
0x0ed44…0ed4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0184}
0x0ed4e…0ed6e               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x0097, t01=0x018e}
0x0ed6e…0ed78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x001e}
0x0ed78…0ed82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0028}
0x0ed82…0ed96               Head {h00=0x0010, h01=0x0050, text=»ENQ100 EQU *«, t00=0x0098, t01=0x0032}
0x0ed96…0edc0               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0098, t01=0x0046}
0x0edc0…0edd4               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0098, t01=0x0070}
0x0edd4…0ee04               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) NAK110 RETRANSMISSION OF MESSAGE«, t00=0x0098, t01=0x0084}
0x0ee04…0ee18               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0098, t01=0x00b4}
0x0ee18…0ee3e               Head {h00=0x0022, h01=0x0050, text=» RF(Z) ENQ110 IN CONTROL STATE«, t00=0x0098, t01=0x00c8}
0x0ee3e…0ee70               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x0098, t01=0x00ee}
0x0ee70…0ee84               Head {h00=0x0010, h01=0x0050, text=»ENQ110 EQU *«, t00=0x0098, t01=0x0120}
0x0ee84…0ee94               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0098, t01=0x0134}
0x0ee94…0eea2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0098, t01=0x0144}
0x0eea2…0eeac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0152}
0x0eeac…0eeb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x015c}
0x0eeb6…0eed6               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x0098, t01=0x0166}
0x0eed6…0eee0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0186}
0x0eee0…0eeea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0190}
0x0eeea…0eefe               Head {h00=0x0010, h01=0x0050, text=»NAK100 EQU *«, t00=0x0099, t01=0x000a}
0x0eefe…0ef28               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0099, t01=0x001e}
0x0ef28…0ef3c               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0099, t01=0x0048}
0x0ef3c…0ef60               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) NAK110 ACK EXPECTED «, t00=0x0099, t01=0x005c}
0x0ef60…0ef74               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x0099, t01=0x0080}
0x0ef74…0ef9a               Head {h00=0x0022, h01=0x0050, text=» RB(Z) ENQ110 IN CONTROL STATE«, t00=0x0099, t01=0x0094}
0x0ef9a…0efac               Head {h00=0x000e, h01=0x0050, text=» RF DLE160«, t00=0x0099, t01=0x00ba}
0x0efac…0efc0               Head {h00=0x0010, h01=0x0050, text=»NAK110 EQU *«, t00=0x0099, t01=0x00cc}
0x0efc0…0efe6               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0099, t01=0x00e0}
0x0efe6…0effc               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x0099, t01=0x0106}
0x0effc…0f010               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x0099, t01=0x011c}
0x0f010…0f044               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL120 STATUS HAS BEEN TRANSMITTED «, t00=0x0099, t01=0x0130}
0x0f044…0f050               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0099, t01=0x0164}
0x0f050…0f084               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x0099, t01=0x0170}
0x0f084…0f0ae               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x009a, t01=0x0014}
0x0f0ae…0f0c2               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x009a, t01=0x003e}
0x0f0c2…0f0d8               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x009a, t01=0x0052}
0x0f0d8…0f0e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0068}
0x0f0e2…0f0ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0072}
0x0f0ec…0f114               Head {h00=0x0024, h01=0x0050, text=»*  COUNT MESSAGES RETRANSMITTED «, t00=0x009a, t01=0x007c}
0x0f114…0f11e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00a4}
0x0f11e…0f134               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSTRT«, t00=0x009a, t01=0x00ae}
0x0f134…0f14a               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x009a, t01=0x00c4}
0x0f14a…0f156               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x00da}
0x0f156…0f16a               Head {h00=0x0010, h01=0x0050, text=» ABL POL200 «, t00=0x009a, t01=0x00e6}
0x0f16a…0f178               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009a, t01=0x00fa}
0x0f178…0f182               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0108}
0x0f182…0f18c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0112}
0x0f18c…0f1ac               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x009a, t01=0x011c}
0x0f1ac…0f1b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x013c}
0x0f1b6…0f1c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0146}
0x0f1c0…0f1d4               Head {h00=0x0010, h01=0x0050, text=»DLE100 EQU *«, t00=0x009a, t01=0x0150}
0x0f1d4…0f1fe               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x009a, t01=0x0164}
0x0f1fe…0f212               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x009a, t01=0x018e}
0x0f212…0f228               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DLE110«, t00=0x009b, t01=0x0012}
0x0f228…0f23e               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x009b, t01=0x0028}
0x0f23e…0f252               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x009b, t01=0x003e}
0x0f252…0f266               Head {h00=0x0010, h01=0x0050, text=» CWK A2,STX «, t00=0x009b, t01=0x0052}
0x0f266…0f294               Head {h00=0x002a, h01=0x0050, text=» ABL(Z) STX110 YES - TRANSPARENT TEXT «, t00=0x009b, t01=0x0066}
0x0f294…0f2a0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x0094}
0x0f2a0…0f2b2               Head {h00=0x000e, h01=0x0050, text=» RB ENQ110«, t00=0x009b, t01=0x00a0}
0x0f2b2…0f2c6               Head {h00=0x0010, h01=0x0050, text=»DLE110 EQU *«, t00=0x009b, t01=0x00b2}
0x0f2c6…0f2f0               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x009b, t01=0x00c6}
0x0f2f0…0f314               Head {h00=0x0020, h01=0x0050, text=» CWK A2,ACKPAR IS IT ACK 0 ?«, t00=0x009b, t01=0x00f0}
0x0f314…0f32a               Head {h00=0x0012, h01=0x0050, text=» RF(NE) DLE130«, t00=0x009b, t01=0x0114}
0x0f32a…0f334               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x012a}
0x0f334…0f34e               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x009b, t01=0x0134}
0x0f34e…0f358               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x014e}
0x0f358…0f37a               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x009b, t01=0x0158}
0x0f37a…0f39e               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DLE140 ACK,0 EXPECTED«, t00=0x009b, t01=0x017a}
0x0f39e…0f3b2               Head {h00=0x0010, h01=0x0050, text=»DLE120 EQU *«, t00=0x009c, t01=0x000e}
0x0f3b2…0f3d0               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x009c, t01=0x0022}
0x0f3d0…0f3fa               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x009c, t01=0x0040}
0x0f3fa…0f40c               Head {h00=0x000e, h01=0x0050, text=» RB ENQ110«, t00=0x009c, t01=0x006a}
0x0f40c…0f420               Head {h00=0x0010, h01=0x0050, text=»DLE130 EQU *«, t00=0x009c, t01=0x007c}
0x0f420…0f434               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x009c, t01=0x0090}
0x0f434…0f44a               Head {h00=0x0012, h01=0x0050, text=» RF(NE) DLE180«, t00=0x009c, t01=0x00a4}
0x0f44a…0f454               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00ba}
0x0f454…0f46e               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x009c, t01=0x00c4}
0x0f46e…0f478               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00de}
0x0f478…0f49c               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x009c, t01=0x00e8}
0x0f49c…0f4c4               Head {h00=0x0024, h01=0x0050, text=» RB(Z) DLE120 ACK,1 NOT EXPECTED«, t00=0x009c, t01=0x010c}
0x0f4c4…0f4d8               Head {h00=0x0010, h01=0x0050, text=»DLE140 EQU *«, t00=0x009c, t01=0x0134}
0x0f4d8…0f4ec               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x009c, t01=0x0148}
0x0f4ec…0f50e               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DLE170 ETX NOT SENT«, t00=0x009c, t01=0x015c}
0x0f50e…0f51c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x017e}
0x0f51c…0f526               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x018c}
0x0f526…0f556               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x009d, t01=0x0008}
0x0f556…0f560               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0038}
0x0f560…0f57a               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x009d, t01=0x0042}
0x0f57a…0f58e               Head {h00=0x0010, h01=0x0050, text=»DLE150 EQU *«, t00=0x009d, t01=0x005c}
0x0f58e…0f5a4               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x009d, t01=0x0070}
0x0f5a4…0f5b8               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x009d, t01=0x0086}
0x0f5b8…0f5ea               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) DLE200 STATUS HAS BEEN TRANSMITTED«, t00=0x009d, t01=0x009a}
0x0f5ea…0f5f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009d, t01=0x00cc}
0x0f5f6…0f622               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x009d, t01=0x00d8}
0x0f622…0f636               Head {h00=0x0010, h01=0x0050, text=»DLE160 EQU *«, t00=0x009d, t01=0x0104}
0x0f636…0f654               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x009d, t01=0x0118}
0x0f654…0f668               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x009d, t01=0x0136}
0x0f668…0f68a               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x009d, t01=0x014a}
0x0f68a…0f696               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009d, t01=0x016c}
0x0f696…0f6a8               Head {h00=0x000e, h01=0x0050, text=» RB ENQ110«, t00=0x009d, t01=0x0178}
0x0f6a8…0f6bc               Head {h00=0x0010, h01=0x0050, text=»DLE170 EQU *«, t00=0x009d, t01=0x018a}
0x0f6bc…0f6ce               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x009e, t01=0x000e}
0x0f6ce…0f6f8               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x009e, t01=0x0020}
0x0f6f8…0f70c               Head {h00=0x0010, h01=0x0050, text=» ABL POL200 «, t00=0x009e, t01=0x004a}
0x0f70c…0f720               Head {h00=0x0010, h01=0x0050, text=»DLE180 EQU *«, t00=0x009e, t01=0x005e}
0x0f720…0f742               Head {h00=0x001e, h01=0x0050, text=» CWK A2,RVIPAR IS IT RVI ?«, t00=0x009e, t01=0x0072}
0x0f742…0f76e               Head {h00=0x0028, h01=0x0050, text=» RB(NE) DLE120 INVALID DLE SEQUENCE «, t00=0x009e, t01=0x0094}
0x0f76e…0f794               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x009e, t01=0x00c0}
0x0f794…0f7a8               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x009e, t01=0x00e6}
0x0f7a8…0f7d0               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DLE190 ETX HAS BEEN SENT«, t00=0x009e, t01=0x00fa}
0x0f7d0…0f7ea               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x009e, t01=0x0122}
0x0f7ea…0f7fc               Head {h00=0x000e, h01=0x0050, text=» RB DLE150«, t00=0x009e, t01=0x013c}
0x0f7fc…0f810               Head {h00=0x0010, h01=0x0050, text=»DLE190 EQU *«, t00=0x009e, t01=0x014e}
0x0f810…0f82a               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x009e, t01=0x0162}
0x0f82a…0f83c               Head {h00=0x000e, h01=0x0050, text=» RB DLE150«, t00=0x009e, t01=0x017c}
0x0f83c…0f84a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009e, t01=0x018e}
0x0f84a…0f860               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x009f, t01=0x000c}
0x0f860…0f86a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0022}
0x0f86a…0f874               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x002c}
0x0f874…0f89a               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x009f, t01=0x0036}
0x0f89a…0f8a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x005c}
0x0f8a4…0f8ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0066}
0x0f8ae…0f8c2               Head {h00=0x0010, h01=0x0050, text=»DLE200 EQU *«, t00=0x009f, t01=0x0070}
0x0f8c2…0f8e8               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x009f, t01=0x0084}
0x0f8e8…0f918               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x009f, t01=0x00aa}
0x0f918…0f93c               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x009f, t01=0x00da}
0x0f93c…0f962               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x009f, t01=0x00fe}
0x0f962…0f984               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x009f, t01=0x0124}
0x0f984…0f996               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x009f, t01=0x0146}
0x0f996…0f9b2               Head {h00=0x0018, h01=0x0050, text=» RB(Z) DLE160 NOT DE«, t00=0x009f, t01=0x0158}
0x0f9b2…0f9c8               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x009f, t01=0x0174}
0x0f9c8…0f9ee               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x009f, t01=0x018a}
0x0f9ee…0fa00               Head {h00=0x000e, h01=0x0050, text=» RB DLE160«, t00=0x00a0, t01=0x0020}
0x0fa00…0fa0c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a0, t01=0x0032}
0x0fa0c…0fa1a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a0, t01=0x003e}
0x0fa1a…0fa24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x004c}
0x0fa24…0fa64               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x00a0, t01=0x0056}
0x0fa64…0fa6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0096}
0x0fa6e…0fa9a               Head {h00=0x0028, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER(S) «, t00=0x00a0, t01=0x00a0}
0x0fa9a…0faba               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x00a0, t01=0x00cc}
0x0faba…0fad0               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x00a0, t01=0x00ec}
0x0fad0…0faf6               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x00a0, t01=0x0102}
0x0faf6…0fb00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0128}
0x0fb00…0fb46               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x00a0, t01=0x0132}
0x0fb46…0fb74               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTES - CHECK SELECT ADDRESS«, t00=0x00a0, t01=0x0178}
0x0fb74…0fba4               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x00a1, t01=0x0016}
0x0fba4…0fbae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0046}
0x0fbae…0fbb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0050}
0x0fbb8…0fbc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x005a}
0x0fbc2…0fbd6               Head {h00=0x0010, h01=0x0050, text=»FINTES EQU *«, t00=0x00a1, t01=0x0064}
0x0fbd6…0fbea               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x00a1, t01=0x0078}
0x0fbea…0fbfc               Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x00a1, t01=0x008c}
0x0fbfc…0fc0e               Head {h00=0x000e, h01=0x0050, text=» RF FINT05«, t00=0x00a1, t01=0x009e}
0x0fc0e…0fc1a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x00b0}
0x0fc1a…0fc2e               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x00a1, t01=0x00bc}
0x0fc2e…0fc4a               Head {h00=0x0018, h01=0x0050, text=» LDK A4,1 RIGTH BYTE«, t00=0x00a1, t01=0x00d0}
0x0fc4a…0fc5e               Head {h00=0x0010, h01=0x0050, text=»FINT05 EQU *«, t00=0x00a1, t01=0x00ec}
0x0fc5e…0fc84               Head {h00=0x0022, h01=0x0050, text=» LD A3,DTEDWT,A7 GET FIRST DWT«, t00=0x00a1, t01=0x0100}
0x0fc84…0fc98               Head {h00=0x0010, h01=0x0050, text=»FINT10 EQU *«, t00=0x00a1, t01=0x0126}
0x0fc98…0fcb8               Head {h00=0x001c, h01=0x0050, text=» RF(Z) FINT20 END QUEUE «, t00=0x00a1, t01=0x013a}
0x0fcb8…0fcca               Head {h00=0x000e, h01=0x0050, text=» ADR A3,A4«, t00=0x00a1, t01=0x015a}
0x0fcca…0fcf0               Head {h00=0x0022, h01=0x0050, text=» CCR A2,A3 THIS SUB-ADDRESS ? «, t00=0x00a1, t01=0x016c}
0x0fcf0…0fd0a (162, 0, 400) Head {h00=0x0016, h01=0x0050, text=» RF(E) FINT20 YES «, t00=0x00a2, t01=0x0004}
0x0fd0a…0fd1c               Head {h00=0x000e, h01=0x0050, text=» SUR A3,A4«, t00=0x00a2, t01=0x001e}
0x0fd1c…0fd42               Head {h00=0x0022, h01=0x0050, text=» LD A3,DWTCHN,A3 GET NEXT DWT «, t00=0x00a2, t01=0x0030}
0x0fd42…0fd54               Head {h00=0x000e, h01=0x0050, text=» RB FINT10«, t00=0x00a2, t01=0x0056}
0x0fd54…0fd68               Head {h00=0x0010, h01=0x0050, text=»FINT20 EQU *«, t00=0x00a2, t01=0x0068}
0x0fd68…0fd7e               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x00a2, t01=0x007c}
0x0fd7e…0fd8e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00a2, t01=0x0092}
0x0fd8e…0fd9c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a2, t01=0x00a2}
0x0fd9c…0fda6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00b0}
0x0fda6…0fdb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00ba}
0x0fdb0…0fdd4               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x00a2, t01=0x00c4}
0x0fdd4…0fdde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00e8}
0x0fdde…0fde8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00f2}
0x0fde8…0fdfc               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x00a2, t01=0x00fc}
0x0fdfc…0fe1c               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x00a2, t01=0x0110}
0x0fe1c…0fe40               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x00a2, t01=0x0130}
0x0fe40…0fe54               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00a2, t01=0x0154}
0x0fe54…0fe86               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x00a2, t01=0x0168}
0x0fe86…0fe92               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a3, t01=0x000a}
0x0fe92…0feba               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x00a3, t01=0x0016}
0x0feba…0feca               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x00a3, t01=0x003e}
0x0feca…0fef0               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x00a3, t01=0x004e}
0x0fef0…0ff00               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00a3, t01=0x0074}
0x0ff00…0ff0e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a3, t01=0x0084}
0x0ff0e…0ff18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0092}
0x0ff18…0ff22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x009c}
0x0ff22…0ff5c               Head {h00=0x0036, h01=0x0050, text=»* CHECK IF THERE IS A SEND REQUEST TO BE COMPLETED«, t00=0x00a3, t01=0x00a6}
0x0ff5c…0ff66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00e0}
0x0ff66…0ff88               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x00a3, t01=0x00ea}
0x0ff88…0ff92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x010c}
0x0ff92…0ff9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0116}
0x0ff9c…0ffb8               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x00a3, t01=0x0120}
0x0ffb8…0ffe0               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x00a3, t01=0x013c}
0x0ffe0…0fff8               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x00a3, t01=0x0164}
0x0fff8…10018               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x00a3, t01=0x017c}
0x10018…1003a               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x00a4, t01=0x000c}
0x1003a…10064               Head {h00=0x0026, h01=0x0050, text=» ANK A2,/FF MASK AWAY OPTION PART «, t00=0x00a4, t01=0x002e}
0x10064…10076               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x00a4, t01=0x0058}
0x10076…1009e               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CWR900 NOT SEND REQUEST «, t00=0x00a4, t01=0x006a}
0x1009e…100d6               Head {h00=0x0034, h01=0x0050, text=» LD A2,DWTIPC,A6 ANY RECEIVED BUFFERS ON QUEU ? «, t00=0x00a4, t01=0x0092}
0x100d6…100ee               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CWR110 NO«, t00=0x00a4, t01=0x00ca}
0x100ee…10122               Head {h00=0x0030, h01=0x0050, text=» ORKL A1,R:DATA ACCEPTED AND DATA AVAILABLE «, t00=0x00a4, t01=0x00e2}
0x10122…10136               Head {h00=0x0010, h01=0x0050, text=»CWR110 EQU *«, t00=0x00a4, t01=0x0116}
0x10136…1014e               Head {h00=0x0014, h01=0x0050, text=» LD A8,DWTECB,A6«, t00=0x00a4, t01=0x012a}
0x1014e…1016e               Head {h00=0x001c, h01=0x0050, text=» CF A15,CTIME STOP TIMER«, t00=0x00a4, t01=0x0142}
0x1016e…10186               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW1,A8«, t00=0x00a4, t01=0x0162}
0x10186…101ae               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x00a4, t01=0x017a}
0x101ae…101c2               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x00a5, t01=0x0012}
0x101c2…101f0               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x00a5, t01=0x0026}
0x101f0…10204               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x00a5, t01=0x0054}
0x10204…1022a               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x00a5, t01=0x0068}
0x1022a…1023c               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x00a5, t01=0x008e}
0x1023c…1024c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00a5, t01=0x00a0}
0x1024c…1025a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a5, t01=0x00b0}
0x1025a…10264               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x00be}
0x10264…1026e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x00c8}
0x1026e…1028c               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x00a5, t01=0x00d2}
0x1028c…10296               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x00f0}
0x10296…102b6               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x00a5, t01=0x00fa}
0x102b6…102e2               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x00a5, t01=0x011a}
0x102e2…10318               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x00a5, t01=0x0146}
0x10318…10344               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x00a5, t01=0x017c}
0x10344…1034e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0018}
0x1034e…10362               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x00a6, t01=0x0022}
0x10362…1038a               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x00a6, t01=0x0036}
0x1038a…103aa               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x00a6, t01=0x005e}
0x103aa…103bc               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x00a6, t01=0x007e}
0x103bc…103d0               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x00a6, t01=0x0090}
0x103d0…103f8               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x00a6, t01=0x00a4}
0x103f8…1041e               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x00a6, t01=0x00cc}
0x1041e…10430               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x00a6, t01=0x00f2}
0x10430…10444               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x00a6, t01=0x0104}
0x10444…10458               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x00a6, t01=0x0118}
0x10458…1047c               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x00a6, t01=0x012c}
0x1047c…104a8               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x00a6, t01=0x0150}
0x104a8…104b8               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x00a6, t01=0x017c}
0x104b8…104d4               Head {h00=0x0018, h01=0x0050, text=» SUR A8,A8 RESET LRC«, t00=0x00a6, t01=0x018c}
0x104d4…104dc               Head {h00=0x0004, h01=0x0050, t00=0x00a7, t01=0x0018}
0x104dc…104f2               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x00a7, t01=0x0020}
0x104f2…10508               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00a7, t01=0x0036}
0x10508…1051c               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x00a7, t01=0x004c}
0x1051c…10542               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x00a7, t01=0x0060}
0x10542…10556               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x00a7, t01=0x0086}
0x10556…1057a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x00a7, t01=0x009a}
0x1057a…1058e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x00a7, t01=0x00be}
0x1058e…105a4               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x00a7, t01=0x00d2}
0x105a4…105d2               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x00a7, t01=0x00e8}
0x105d2…105e6               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x00a7, t01=0x0116}
0x105e6…105f2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a7, t01=0x012a}
0x105f2…10608               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00a7, t01=0x0136}
0x10608…1061c               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x00a7, t01=0x014c}
0x1061c…10644               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x00a7, t01=0x0160}
0x10644…10668               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x00a7, t01=0x0188}
0x10668…1067c               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x00a8, t01=0x001c}
0x1067c…10688               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a8, t01=0x0030}
0x10688…1069e               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00a8, t01=0x003c}
0x1069e…106c8               Head {h00=0x0026, h01=0x0050, text=» IM TPM INDICATE TRANSPARENT TEXT «, t00=0x00a8, t01=0x0052}
0x106c8…106e2               Head {h00=0x0016, h01=0x0050, text=»RDM100 CF A5,READ «, t00=0x00a8, t01=0x007c}
0x106e2…10702               Head {h00=0x001c, h01=0x0050, text=» CWK A2,DLE CHECK IF DLE«, t00=0x00a8, t01=0x0096}
0x10702…1071c               Head {h00=0x0016, h01=0x0050, text=» RF(NE) RDM112 NO «, t00=0x00a8, t01=0x00b6}
0x1071c…10750               Head {h00=0x0030, h01=0x0050, text=» CF A5,READ SKIP DLE AND READ NEXT CHARACTER«, t00=0x00a8, t01=0x00d0}
0x10750…10774               Head {h00=0x0020, h01=0x0050, text=» CWK A2,SYNEBC CHECK IF SYN «, t00=0x00a8, t01=0x0104}
0x10774…10792               Head {h00=0x001a, h01=0x0050, text=» RB(E) RDM100 SKIP SYN«, t00=0x00a8, t01=0x0128}
0x10792…107b6               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x00a8, t01=0x0146}
0x107b6…107dc               Head {h00=0x0022, h01=0x0050, text=» CWK A2,DLE CHECK IF 2:ND DLE «, t00=0x00a8, t01=0x016a}
0x107dc…1080a               Head {h00=0x002a, h01=0x0050, text=» RF(E) RDM115 YES - STORE DLE AS DATA «, t00=0x00a8, t01=0x0190}
0x1080a…1082a               Head {h00=0x001c, h01=0x0050, text=» CWK A2,ETX CHECK IF ETX«, t00=0x00a9, t01=0x002e}
0x1082a…10844               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM130 YES «, t00=0x00a9, t01=0x004e}
0x10844…10868               Head {h00=0x0020, h01=0x0050, text=» CWK A2,ETBEBC CHECK IF ETB «, t00=0x00a9, t01=0x0068}
0x10868…10882               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM160 YES «, t00=0x00a9, t01=0x008c}
0x10882…108a2               Head {h00=0x001c, h01=0x0050, text=» CWK A2,ITB CHECK IF ITB«, t00=0x00a9, t01=0x00a6}
0x108a2…108bc               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM175 YES «, t00=0x00a9, t01=0x00c6}
0x108bc…108e0               Head {h00=0x0020, h01=0x0050, text=» CWK A2,ENQEBC CHECK IF ENQ «, t00=0x00a9, t01=0x00e0}
0x108e0…10902               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM140 YES SEND NAK«, t00=0x00a9, t01=0x0104}
0x10902…1090c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0126}
0x1090c…10916               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0130}
0x10916…10930               Head {h00=0x0016, h01=0x0050, text=»* GET END OF BLOCK«, t00=0x00a9, t01=0x013a}
0x10930…1093a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0154}
0x1093a…1094e               Head {h00=0x0010, h01=0x0050, text=»RDM105 EQU *«, t00=0x00a9, t01=0x015e}
0x1094e…10962               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x00a9, t01=0x0172}
0x10962…10976               Head {h00=0x0010, h01=0x0050, text=» CWK A2,DLE «, t00=0x00a9, t01=0x0186}
0x10976…1098c               Head {h00=0x0012, h01=0x0050, text=» RB(NE) RDM105«, t00=0x00aa, t01=0x000a}
0x1098c…109a0               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x00aa, t01=0x0020}
0x109a0…109b4               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x00aa, t01=0x0034}
0x109b4…109dc               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM110 YES - END OF BLOCK«, t00=0x00aa, t01=0x0048}
0x109dc…109f2               Head {h00=0x0012, h01=0x0050, text=» CWK A2,ETBEBC«, t00=0x00aa, t01=0x0070}
0x109f2…10a1a               Head {h00=0x0024, h01=0x0050, text=» RB(NE) RDM105 NOT END OF BLOCK «, t00=0x00aa, t01=0x0086}
0x10a1a…10a2e               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x00aa, t01=0x00ae}
0x10a2e…10a56               Head {h00=0x0024, h01=0x0050, text=» CM TPM OUT OF TRANSPARENT TEXT «, t00=0x00aa, t01=0x00c2}
0x10a56…10a6a               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDCRC«, t00=0x00aa, t01=0x00ea}
0x10a6a…10a96               Head {h00=0x0028, h01=0x0050, text=» RF RDM140 INDICATE INVALID MESSAGE «, t00=0x00aa, t01=0x00fe}
0x10a96…10ac0               Head {h00=0x0026, h01=0x0050, text=»RDM112 CF A5,CRCCAL CALCULATE CRC «, t00=0x00aa, t01=0x012a}
0x10ac0…10acc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00aa, t01=0x0154}
0x10acc…10ae2               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00aa, t01=0x0160}
0x10ae2…10af6               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x00aa, t01=0x0176}
0x10af6…10b18               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x00aa, t01=0x018a}
0x10b18…10b2c               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x00ab, t01=0x001c}
0x10b2c…10b4e               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x00ab, t01=0x0030}
0x10b4e…10b62               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x00ab, t01=0x0052}
0x10b62…10b84               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x00ab, t01=0x0066}
0x10b84…10b98               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x00ab, t01=0x0088}
0x10b98…10bce               Head {h00=0x0032, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE «, t00=0x00ab, t01=0x009c}
0x10bce…10be2               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x00ab, t01=0x00d2}
0x10be2…10c0a               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x00ab, t01=0x00e6}
0x10c0a…10c1e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00ab, t01=0x010e}
0x10c1e…10c34               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x00ab, t01=0x0122}
0x10c34…10c46               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x00ab, t01=0x0138}
0x10c46…10c5c               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x00ab, t01=0x014a}
0x10c5c…10c7e               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x00ab, t01=0x0160}
0x10c7e…10c90               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x00ab, t01=0x0182}
0x10c90…10cb2 (172, 0, 400) Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x00ac, t01=0x0004}
0x10cb2…10cc4               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x00ac, t01=0x0026}
0x10cc4…10cd6               Head {h00=0x000e, h01=0x0050, text=» STR A1,A4«, t00=0x00ac, t01=0x0038}
0x10cd6…10d04               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x00ac, t01=0x004a}
0x10d04…10d28               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x00ac, t01=0x0078}
0x10d28…10d56               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x00ac, t01=0x009c}
0x10d56…10d6a               Head {h00=0x0010, h01=0x0050, text=» ORR* A2,A4 «, t00=0x00ac, t01=0x00ca}
0x10d6a…10d76               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ac, t01=0x00de}
0x10d76…10d8a               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x00ac, t01=0x00ea}
0x10d8a…10db4               Head {h00=0x0026, h01=0x0050, text=» ADK A3,0 ERROR DETECTED EARLIER ?«, t00=0x00ac, t01=0x00fe}
0x10db4…10dd2               Head {h00=0x001a, h01=0x0050, text=» RB(NZ) RDM100 YES !!!«, t00=0x00ac, t01=0x0128}
0x10dd2…10df4               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x00ac, t01=0x0146}
0x10df4…10e18               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x00ac, t01=0x0168}
0x10e18…10e40               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x00ac, t01=0x018c}
0x10e40…10e54               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x00ad, t01=0x0024}
0x10e54…10e70               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x00ad, t01=0x0038}
0x10e70…10e94               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x00ad, t01=0x0054}
0x10e94…10e9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ad, t01=0x0078}
0x10e9e…10eb8               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x00ad, t01=0x0082}
0x10eb8…10ec2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ad, t01=0x009c}
0x10ec2…10eec               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE BUFFER OVERFLOW«, t00=0x00ad, t01=0x00a6}
0x10eec…10f02               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00ad, t01=0x00d0}
0x10f02…10f28               Head {h00=0x0022, h01=0x0050, text=» LDK A1,CSSRBO BUFFER OVERFLOW«, t00=0x00ad, t01=0x00e6}
0x10f28…10f50               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x00ad, t01=0x010c}
0x10f50…10f5c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ad, t01=0x0134}
0x10f5c…10f6e               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x00ad, t01=0x0140}
0x10f6e…10f78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ad, t01=0x0152}
0x10f78…10f98               Head {h00=0x001c, h01=0x0050, text=»* PARITY ERROR DETECTED «, t00=0x00ad, t01=0x015c}
0x10f98…10fa2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ad, t01=0x017c}
0x10fa2…10fb6               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x00ad, t01=0x0186}
0x10fb6…10fcc               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00ae, t01=0x000a}
0x10fcc…10fe2               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSRPE«, t00=0x00ae, t01=0x0020}
0x10fe2…1100a               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x00ae, t01=0x0036}
0x1100a…11016               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x005e}
0x11016…11040               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x00ae, t01=0x006a}
0x11040…11054               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x00ae, t01=0x0094}
0x11054…1107c               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x00ae, t01=0x00a8}
0x1107c…1108e               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x00ae, t01=0x00d0}
0x1108e…11098               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x00e2}
0x11098…110ae               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x00ae, t01=0x00ec}
0x110ae…110b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x0102}
0x110b8…110cc               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x00ae, t01=0x010c}
0x110cc…110f4               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x00ae, t01=0x0120}
0x110f4…11118               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x00ae, t01=0x0148}
0x11118…1114e               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x00ae, t01=0x016c}
0x1114e…11162               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00af, t01=0x0012}
0x11162…11176               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x00af, t01=0x0026}
0x11176…11196               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x00af, t01=0x003a}
0x11196…111a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00af, t01=0x005a}
0x111a2…111b6               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00af, t01=0x0066}
0x111b6…111e0               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x00af, t01=0x007a}
0x111e0…11200               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x00af, t01=0x00a4}
0x11200…1120c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00af, t01=0x00c4}
0x1120c…11220               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x00af, t01=0x00d0}
0x11220…1124a               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x00af, t01=0x00e4}
0x1124a…1125e               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x00af, t01=0x010e}
0x1125e…1127e               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT«, t00=0x00af, t01=0x0122}
0x1127e…11292               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00af, t01=0x0142}
0x11292…112a6               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00af, t01=0x0156}
0x112a6…112bc               Head {h00=0x0012, h01=0x0050, text=» ANK A2,H:PARI«, t00=0x00af, t01=0x016a}
0x112bc…112d2               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RDM155 «, t00=0x00af, t01=0x0180}
0x112d2…112f0               Head {h00=0x001a, h01=0x0050, text=» LDK A3,1 PARITY ERROR«, t00=0x00b0, t01=0x0008}
0x112f0…11304               Head {h00=0x0010, h01=0x0050, text=»RDM155 EQU *«, t00=0x00b0, t01=0x0026}
0x11304…11310               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b0, t01=0x003a}
0x11310…11326               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00b0, t01=0x0046}
0x11326…11350               Head {h00=0x0026, h01=0x0050, text=» CWK A3,1 ERROR DETECTED EARLIER ?«, t00=0x00b0, t01=0x005c}
0x11350…1136a               Head {h00=0x0016, h01=0x0050, text=» RF(NE) RDM158 NO «, t00=0x00b0, t01=0x0086}
0x1136a…11392               Head {h00=0x0024, h01=0x0050, text=» CM TPM OUT OF TRANSPARENT TEXT «, t00=0x00b0, t01=0x00a0}
0x11392…113a6               Head {h00=0x0010, h01=0x0050, text=»RDM158 EQU *«, t00=0x00b0, t01=0x00c8}
0x113a6…113b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b0, t01=0x00dc}
0x113b2…113c2               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00b0, t01=0x00e8}
0x113c2…113cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x00f8}
0x113cc…113e2               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x00b0, t01=0x0102}
0x113e2…113ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0118}
0x113ec…11400               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x00b0, t01=0x0122}
0x11400…11412               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x00b0, t01=0x0136}
0x11412…11438               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x00b0, t01=0x0148}
0x11438…1145e               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x00b0, t01=0x016e}
0x1145e…11470 (177, 0, 400) Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x00b1, t01=0x0004}
0x11470…1147a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x0016}
0x1147a…11490               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x00b1, t01=0x0020}
0x11490…1149a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x0036}
0x1149a…114ae               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x00b1, t01=0x0040}
0x114ae…114c2               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00b1, t01=0x0054}
0x114c2…114d6               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x00b1, t01=0x0068}
0x114d6…114fc               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x00b1, t01=0x007c}
0x114fc…11508               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b1, t01=0x00a2}
0x11508…1151c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00b1, t01=0x00ae}
0x1151c…11546               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x00b1, t01=0x00c2}
0x11546…1156c               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x00b1, t01=0x00ec}
0x1156c…11582               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00b1, t01=0x0112}
0x11582…115b0               Head {h00=0x002a, h01=0x0050, text=»RDM175 CM TPM OUT OF TRANSPARENT TEXT «, t00=0x00b1, t01=0x0128}
0x115b0…115d8               Head {h00=0x0024, h01=0x0050, text=» CF A5,RDCRC READ AND CHECK CRC «, t00=0x00b1, t01=0x0156}
0x115d8…115e8               Head {h00=0x000c, h01=0x0050, text=» IM TPM «, t00=0x00b1, t01=0x017e}
0x115e8…1160e               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM105 CRC WAS NOT OK «, t00=0x00b1, t01=0x018e}
0x1160e…11628               Head {h00=0x0016, h01=0x0050, text=»RDM180 CF A5,READ «, t00=0x00b2, t01=0x0024}
0x11628…1163e               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x00b2, t01=0x003e}
0x1163e…1165c               Head {h00=0x001a, h01=0x0050, text=» RB(E) RDM180 SKIP SYN«, t00=0x00b2, t01=0x0054}
0x1165c…11670               Head {h00=0x0010, h01=0x0050, text=» CWK A2,DLE «, t00=0x00b2, t01=0x0072}
0x11670…11698               Head {h00=0x0024, h01=0x0050, text=» RB(NE) RDM105 ILLEGAL CHARACTER«, t00=0x00b2, t01=0x0086}
0x11698…116ac               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x00b2, t01=0x00ae}
0x116ac…116c0               Head {h00=0x0010, h01=0x0050, text=» CWK A2,STX «, t00=0x00b2, t01=0x00c2}
0x116c0…116e8               Head {h00=0x0024, h01=0x0050, text=» RB(NE) RDM105 ILLEGAL CHARACTER«, t00=0x00b2, t01=0x00d6}
0x116e8…116f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b2, t01=0x00fe}
0x116f4…11706               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x00b2, t01=0x010a}
0x11706…11714               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b2, t01=0x011c}
0x11714…1171e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x012a}
0x1171e…1173c               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x00b2, t01=0x0134}
0x1173c…11746               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x0152}
0x11746…1175c               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x00b2, t01=0x015c}
0x1175c…1177e               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x00b2, t01=0x0172}
0x1177e…117a8 (179, 0, 400) Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x00b3, t01=0x0004}
0x117a8…117be               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x00b3, t01=0x002e}
0x117be…117dc               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x00b3, t01=0x0044}
0x117dc…117ee               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x00b3, t01=0x0062}
0x117ee…117f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x0074}
0x117f8…11810               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x00b3, t01=0x007e}
0x11810…1181a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x0096}
0x1181a…1183e               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x00b3, t01=0x00a0}
0x1183e…11850               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x00b3, t01=0x00c4}
0x11850…1185a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x00d6}
0x1185a…11870               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x00b3, t01=0x00e0}
0x11870…1187a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x00f6}
0x1187a…11890               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00b3, t01=0x0100}
0x11890…118b2               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x00b3, t01=0x0116}
0x118b2…118be               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b3, t01=0x0138}
0x118be…118c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x0144}
0x118c8…118de               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x00b3, t01=0x014e}
0x118de…118e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x0164}
0x118e8…1190a               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x00b3, t01=0x016e}
0x1190a…11930               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x00b3, t01=0x0190}
0x11930…11948               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x00b4, t01=0x0026}
0x11948…1195a               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x00b4, t01=0x003e}
0x1195a…11968               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b4, t01=0x0050}
0x11968…11972               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x005e}
0x11972…11988               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x00b4, t01=0x0068}
0x11988…11992               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x007e}
0x11992…119b4               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x00b4, t01=0x0088}
0x119b4…119c6               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x00b4, t01=0x00aa}
0x119c6…119d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x00bc}
0x119d0…119e6               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x00b4, t01=0x00c6}
0x119e6…119f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x00dc}
0x119f0…11a12               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x00b4, t01=0x00e6}
0x11a12…11a24               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x00b4, t01=0x0108}
0x11a24…11a2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x011a}
0x11a2e…11a44               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x00b4, t01=0x0124}
0x11a44…11a4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x013a}
0x11a4e…11a70               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x00b4, t01=0x0144}
0x11a70…11a7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0166}
0x11a7a…11aa6               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x00b4, t01=0x0170}
0x11aa6…11aba               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x00b5, t01=0x000c}
0x11aba…11ad2               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x00b5, t01=0x0020}
0x11ad2…11afa               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x00b5, t01=0x0038}
0x11afa…11b24               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x00b5, t01=0x0060}
0x11b24…11b42               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00b5, t01=0x008a}
0x11b42…11b6c               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x00b5, t01=0x00a8}
0x11b6c…11b8a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00b5, t01=0x00d2}
0x11b8a…11ba4               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x00b5, t01=0x00f0}
0x11ba4…11bc2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x00b5, t01=0x010a}
0x11bc2…11bd6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x00b5, t01=0x0128}
0x11bd6…11bec               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x00b5, t01=0x013c}
0x11bec…11c0e               Head {h00=0x001e, h01=0x0050, text=» CF A5,CHALTO HALT OUTPUT «, t00=0x00b5, t01=0x0152}
0x11c0e…11c22               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00b5, t01=0x0174}
0x11c22…11c4e               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x00b5, t01=0x0188}
0x11c4e…11c5a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b6, t01=0x0024}
0x11c5a…11c6a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00b6, t01=0x0030}
0x11c6a…11c78               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b6, t01=0x0040}
0x11c78…11c82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x004e}
0x11c82…11c8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x0058}
0x11c8c…11cae               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x00b6, t01=0x0062}
0x11cae…11cb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x0084}
0x11cb8…11cc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x008e}
0x11cc2…11cd6               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x00b6, t01=0x0098}
0x11cd6…11cf8               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x00b6, t01=0x00ac}
0x11cf8…11d0e               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=0 «, t00=0x00b6, t01=0x00ce}
0x11d0e…11d22               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00b6, t01=0x00e4}
0x11d22…11d40               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIDLE SEND DLE«, t00=0x00b6, t01=0x00f8}
0x11d40…11d4c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b6, t01=0x0116}
0x11d4c…11d60               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x00b6, t01=0x0122}
0x11d60…11d7e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x00b6, t01=0x0136}
0x11d7e…11d9a               Head {h00=0x0018, h01=0x0050, text=» SUR A8,A8 RESET LRC«, t00=0x00b6, t01=0x0154}
0x11d9a…11dc2               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x00b6, t01=0x0170}
0x11dc2…11de6               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x00b7, t01=0x0008}
0x11de6…11e12               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x00b7, t01=0x002c}
0x11e12…11e3e               Head {h00=0x0028, h01=0x0050, text=» ADK A4,2 SKIP FIRST WORD OF BUFFER «, t00=0x00b7, t01=0x0058}
0x11e3e…11e68               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x00b7, t01=0x0084}
0x11e68…11e8c               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x00b7, t01=0x00ae}
0x11e8c…11eb2               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x00b7, t01=0x00d2}
0x11eb2…11ed8               Head {h00=0x0022, h01=0x0050, text=» LDR* A2,A7 NETWORK POLL ADDR «, t00=0x00b7, t01=0x00f8}
0x11ed8…11ef6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x00b7, t01=0x011e}
0x11ef6…11f1c               Head {h00=0x0022, h01=0x0050, text=» LD A2,FDWTUT GET DWT-ADDRESS «, t00=0x00b7, t01=0x013c}
0x11f1c…11f48               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A2 GET NETWORK SUB-ADDRESS «, t00=0x00b7, t01=0x0162}
0x11f48…11f66               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x00b7, t01=0x018e}
0x11f66…11f7c               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x00b8, t01=0x001c}
0x11f7c…11f90               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x00b8, t01=0x0032}
0x11f90…11fb6               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x00b8, t01=0x0046}
0x11fb6…11fcc               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x00b8, t01=0x006c}
0x11fcc…11ff2               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x00b8, t01=0x0082}
0x11ff2…12008               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x00b8, t01=0x00a8}
0x12008…1201c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x00b8, t01=0x00be}
0x1201c…12032               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x00b8, t01=0x00d2}
0x12032…1203e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b8, t01=0x00e8}
0x1203e…12052               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00b8, t01=0x00f4}
0x12052…1205a               Head {h00=0x0004, h01=0x0050, t00=0x00b8, t01=0x0108}
0x1205a…12084               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x00b8, t01=0x0110}
0x12084…1209e               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x00b8, t01=0x013a}
0x1209e…120a6               Head {h00=0x0004, h01=0x0050, t00=0x00b8, t01=0x0154}
0x120a6…120c6               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x00b8, t01=0x015c}
0x120c6…120ec               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x00b8, t01=0x017c}
0x120ec…1210a               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND AID«, t00=0x00b9, t01=0x0012}
0x1210a…12112               Head {h00=0x0004, h01=0x0050, t00=0x00b9, t01=0x0030}
0x12112…1213a               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x00b9, t01=0x0038}
0x1213a…1216c               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x00b9, t01=0x0060}
0x1216c…1218e               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x00b9, t01=0x0092}
0x1218e…121a0               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x00b9, t01=0x00b4}
0x121a0…121b4               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x00b9, t01=0x00c6}
0x121b4…121c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b9, t01=0x00da}
0x121c0…121c8               Head {h00=0x0004, h01=0x0050, t00=0x00b9, t01=0x00e6}
0x121c8…121da               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x00b9, t01=0x00ee}
0x121da…121ee               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x00b9, t01=0x0100}
0x121ee…12204               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00b9, t01=0x0114}
0x12204…12224               Head {h00=0x001c, h01=0x0050, text=» IM TPM TRANSPARENT TEXT«, t00=0x00b9, t01=0x012a}
0x12224…12230               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b9, t01=0x014a}
0x12230…12254               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x00b9, t01=0x0156}
0x12254…12278               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x00b9, t01=0x017a}
0x12278…1228c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x00ba, t01=0x000e}
0x1228c…122a0               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00ba, t01=0x0022}
0x122a0…122ca               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x00ba, t01=0x0036}
0x122ca…122e4               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x00ba, t01=0x0060}
0x122e4…122ec               Head {h00=0x0004, h01=0x0050, t00=0x00ba, t01=0x007a}
0x122ec…12330               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00ba, t01=0x0082}
0x12330…1233a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00c6}
0x1233a…1236a               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x00ba, t01=0x00d0}
0x1236a…12374               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x0100}
0x12374…123ac               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x00ba, t01=0x010a}
0x123ac…123b4               Head {h00=0x0004, h01=0x0050, t00=0x00ba, t01=0x0142}
0x123b4…123de               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x00ba, t01=0x014a}
0x123de…123fa               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x00ba, t01=0x0174}
0x123fa…12406               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ba, t01=0x0190}
0x12406…1241a               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x00bb, t01=0x000c}
0x1241a…1243a               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x00bb, t01=0x0020}
0x1243a…12460               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x00bb, t01=0x0040}
0x12460…12474               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x00bb, t01=0x0066}
0x12474…12488               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x00bb, t01=0x007a}
0x12488…124ac               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x00bb, t01=0x008e}
0x124ac…124d2               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x00bb, t01=0x00b2}
0x124d2…124e6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x00bb, t01=0x00d8}
0x124e6…124fa               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x00bb, t01=0x00ec}
0x124fa…12518               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x00bb, t01=0x0100}
0x12518…1252e               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x00bb, t01=0x011e}
0x1252e…12540               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x00bb, t01=0x0134}
0x12540…1254c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bb, t01=0x0146}
0x1254c…12560               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00bb, t01=0x0152}
0x12560…12572               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x00bb, t01=0x0166}
0x12572…1257a               Head {h00=0x0004, h01=0x0050, t00=0x00bb, t01=0x0178}
0x1257a…1258e               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x00bb, t01=0x0180}
0x1258e…12596 (188, 0, 400) Head {h00=0x0004, h01=0x0050, t00=0x00bc, t01=0x0004}
0x12596…125a8               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x00bc, t01=0x000c}
0x125a8…125ce               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x00bc, t01=0x001e}
0x125ce…125d6               Head {h00=0x0004, h01=0x0050, t00=0x00bc, t01=0x0044}
0x125d6…12602               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x00bc, t01=0x004c}
0x12602…12618               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x00bc, t01=0x0078}
0x12618…12644               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x00bc, t01=0x008e}
0x12644…12656               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x00bc, t01=0x00ba}
0x12656…1266e               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x00bc, t01=0x00cc}
0x1266e…12680               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x00bc, t01=0x00e4}
0x12680…126aa               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x00bc, t01=0x00f6}
0x126aa…126d0               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x00bc, t01=0x0120}
0x126d0…126e8               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x00bc, t01=0x0146}
0x126e8…12712               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x00bc, t01=0x015e}
0x12712…12728               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x00bc, t01=0x0188}
0x12728…1273c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x00bd, t01=0x000e}
0x1273c…12750               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x00bd, t01=0x0022}
0x12750…12774               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x00bd, t01=0x0036}
0x12774…12786               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x00bd, t01=0x005a}
0x12786…12798               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x00bd, t01=0x006c}
0x12798…127ac               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x00bd, t01=0x007e}
0x127ac…127b8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bd, t01=0x0092}
0x127b8…127c6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bd, t01=0x009e}
0x127c6…127dc               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00bd, t01=0x00ac}
0x127dc…127f0               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x00bd, t01=0x00c2}
0x127f0…1281c               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x00bd, t01=0x00d6}
0x1281c…12828               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bd, t01=0x0102}
0x12828…1284c               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x00bd, t01=0x010e}
0x1284c…12860               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x00bd, t01=0x0132}
0x12860…12888               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x00bd, t01=0x0146}
0x12888…128b2               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x00bd, t01=0x016e}
0x128b2…128c6               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x00be, t01=0x0008}
0x128c6…128ec               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x00be, t01=0x001c}
0x128ec…1291a               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x00be, t01=0x0042}
0x1291a…12930               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x00be, t01=0x0070}
0x12930…12946               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00be, t01=0x0086}
0x12946…1296a               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT105 NOT FULL BLOCK«, t00=0x00be, t01=0x009c}
0x1296a…12976               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00be, t01=0x00c0}
0x12976…1299a               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x00be, t01=0x00cc}
0x1299a…129ae               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00be, t01=0x00f0}
0x129ae…129de               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x00be, t01=0x0104}
0x129de…129f2               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x00be, t01=0x0134}
0x129f2…12a0c               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x00be, t01=0x0148}
0x12a0c…12a20               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x00be, t01=0x0162}
0x12a20…12a42               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x00be, t01=0x0176}
0x12a42…12a6e               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x00bf, t01=0x0008}
0x12a6e…12a90               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x00bf, t01=0x0034}
0x12a90…12aae               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00bf, t01=0x0056}
0x12aae…12ace               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x00bf, t01=0x0074}
0x12ace…12b00               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x00bf, t01=0x0094}
0x12b00…12b1e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00bf, t01=0x00c6}
0x12b1e…12b3e               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x00bf, t01=0x00e4}
0x12b3e…12b4a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bf, t01=0x0104}
0x12b4a…12b5e               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x00bf, t01=0x0110}
0x12b5e…12b74               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00bf, t01=0x0124}
0x12b74…12b88               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00bf, t01=0x013a}
0x12b88…12bb0               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRIDLE SEND AN EXTRA DLE «, t00=0x00bf, t01=0x014e}
0x12bb0…12bbc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bf, t01=0x0176}
0x12bbc…12bd8               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x00bf, t01=0x0182}
0x12bd8…12bec               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x00c0, t01=0x000e}
0x12bec…12c02               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00c0, t01=0x0022}
0x12c02…12c12               Head {h00=0x000c, h01=0x0050, text=» CM TPM «, t00=0x00c0, t01=0x0038}
0x12c12…12c1e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c0, t01=0x0048}
0x12c1e…12c3c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00c0, t01=0x0054}
0x12c3c…12c50               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00c0, t01=0x0072}
0x12c50…12c6a               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A8 GET LRC«, t00=0x00c0, t01=0x0086}
0x12c6a…12c88               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x00c0, t01=0x00a0}
0x12c88…12c94               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c0, t01=0x00be}
0x12c94…12ca8               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00c0, t01=0x00ca}
0x12ca8…12cba               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x00c0, t01=0x00de}
0x12cba…12cce               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x00c0, t01=0x00f0}
0x12cce…12cf4               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x00c0, t01=0x0104}
0x12cf4…12d06               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A6«, t00=0x00c0, t01=0x012a}
0x12d06…12d1a               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x00c0, t01=0x013c}
0x12d1a…12d40               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x00c0, t01=0x0150}
0x12d40…12d4c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c0, t01=0x0176}
0x12d4c…12d62               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00c0, t01=0x0182}
0x12d62…12d6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0008}
0x12d6c…12d76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0012}
0x12d76…12d9c               Head {h00=0x0022, h01=0x0050, text=»*  COUNT MESSAGES TRANSMITTED «, t00=0x00c1, t01=0x001c}
0x12d9c…12da6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0042}
0x12da6…12dbc               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSTBL«, t00=0x00c1, t01=0x004c}
0x12dbc…12dd2               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x00c1, t01=0x0062}
0x12dd2…12dde               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c1, t01=0x0078}
0x12dde…12dfe               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x00c1, t01=0x0084}
0x12dfe…12e12               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x00c1, t01=0x00a4}
0x12e12…12e36               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x00c1, t01=0x00b8}
0x12e36…12e4c               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00c1, t01=0x00dc}
0x12e4c…12e60               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00c1, t01=0x00f2}
0x12e60…12e88               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRIDLE SEND AN EXTRA DLE «, t00=0x00c1, t01=0x0106}
0x12e88…12e94               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c1, t01=0x012e}
0x12e94…12eb0               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x00c1, t01=0x013a}
0x12eb0…12ed4               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x00c1, t01=0x0156}
0x12ed4…12ee2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c1, t01=0x017a}
0x12ee2…12eec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0188}
0x12eec…12ef6 (194, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x0004}
0x12ef6…12f18               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x00c2, t01=0x000e}
0x12f18…12f22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x0030}
0x12f22…12f2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x003a}
0x12f2c…12f42               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00c2, t01=0x0044}
0x12f42…12f56               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x00c2, t01=0x005a}
0x12f56…12f7e               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x00c2, t01=0x006e}
0x12f7e…12f9c               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x00c2, t01=0x0096}
0x12f9c…12fbe               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x00c2, t01=0x00b4}
0x12fbe…12fd2               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x00c2, t01=0x00d6}
0x12fd2…12ff0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x00c2, t01=0x00ea}
0x12ff0…1300c               Head {h00=0x0018, h01=0x0050, text=» SUR A8,A8 RESET LRC«, t00=0x00c2, t01=0x0108}
0x1300c…13020               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x00c2, t01=0x0124}
0x13020…1303e               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x00c2, t01=0x0138}
0x1303e…13052               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x00c2, t01=0x0156}
0x13052…13070               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x00c2, t01=0x016a}
0x13070…13084               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x00c2, t01=0x0188}
0x13084…130a2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x00c3, t01=0x000c}
0x130a2…130b6               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A7 «, t00=0x00c3, t01=0x002a}
0x130b6…130d4               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x00c3, t01=0x003e}
0x130d4…130fa               Head {h00=0x0022, h01=0x0050, text=» LD A4,FDWTUT GET DWT-ADDRESS «, t00=0x00c3, t01=0x005c}
0x130fa…13126               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 GET NETWORK SUB-ADDRESS «, t00=0x00c3, t01=0x0082}
0x13126…13144               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x00c3, t01=0x00ae}
0x13144…13166               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A4 GET STATUS«, t00=0x00c3, t01=0x00cc}
0x13166…13188               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x00c3, t01=0x00ee}
0x13188…1319a               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x00c3, t01=0x0110}
0x1319a…131c2               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x00c3, t01=0x0122}
0x131c2…131e2               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x00c3, t01=0x014a}
0x131e2…13204               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x00c3, t01=0x016a}
0x13204…13226               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A4 GET STATUS«, t00=0x00c3, t01=0x018c}
0x13226…13238               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x00c4, t01=0x001e}
0x13238…13256               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x00c4, t01=0x0030}
0x13256…13268               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x00c4, t01=0x004e}
0x13268…1328a               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x00c4, t01=0x0060}
0x1328a…1329c               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x00c4, t01=0x0082}
0x1329c…132b0               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x00c4, t01=0x0094}
0x132b0…132d0               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x00c4, t01=0x00a8}
0x132d0…132f4               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x00c4, t01=0x00c8}
0x132f4…13300               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c4, t01=0x00ec}
0x13300…1330e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c4, t01=0x00f8}
0x1330e…13318               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x0106}
0x13318…13322               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x0110}
0x13322…1334c               Head {h00=0x0026, h01=0x0050, text=»*  TRSYNC : TRANSMIT SYNC SEQUENCE«, t00=0x00c4, t01=0x011a}
0x1334c…13356               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x0144}
0x13356…1336a               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x00c4, t01=0x014e}
0x1336a…13396               Head {h00=0x0028, h01=0x0050, text=» CF A5,CHALTI HALT INPUT IF NOT DONE«, t00=0x00c4, t01=0x0162}
0x13396…133c6               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCO START OUTPUT WITH SYNC DEF«, t00=0x00c4, t01=0x018e}
0x133c6…133f4               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x00c5, t01=0x002e}
0x133f4…133fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x005c}
0x133fe…13408               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x0066}
0x13408…13428               Head {h00=0x001c, h01=0x0050, text=»*  SEND 4 SYN-CHARACTERS«, t00=0x00c5, t01=0x0070}
0x13428…13432               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x0090}
0x13432…13444               Head {h00=0x000e, h01=0x0050, text=» LDK A3,4 «, t00=0x00c5, t01=0x009a}
0x13444…13458               Head {h00=0x0010, h01=0x0050, text=»TRS100 EQU *«, t00=0x00c5, t01=0x00ac}
0x13458…1346c               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SYN «, t00=0x00c5, t01=0x00c0}
0x1346c…13490               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITE SEND CHARACTER «, t00=0x00c5, t01=0x00d4}
0x13490…134a2               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x00c5, t01=0x00f8}
0x134a2…134b8               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x00c5, t01=0x010a}
0x134b8…134d8               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00c5, t01=0x0120}
0x134d8…134e6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c5, t01=0x0140}
0x134e6…134f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x014e}
0x134f0…134fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x0158}
0x134fa…1352e               Head {h00=0x0030, h01=0x0050, text=»*  CSYNCI :SEND SYNC-PATTERN FOR INPUT DATA «, t00=0x00c5, t01=0x0162}
0x1352e…13538               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x0008}
0x13538…1354c               Head {h00=0x0010, h01=0x0050, text=»CSYNCI EQU *«, t00=0x00c6, t01=0x0012}
0x1354c…13562               Head {h00=0x0012, h01=0x0050, text=» LD A2,PFPOST «, t00=0x00c6, t01=0x0026}
0x13562…1358a               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CSYN:I WAIT FOR POWER UP«, t00=0x00c6, t01=0x003c}
0x1358a…135aa               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI STOP INPUT«, t00=0x00c6, t01=0x0064}
0x135aa…135d4               Head {h00=0x0026, h01=0x0050, text=» ST A5,DCLCI SET INPUT ACTIVE FLAG«, t00=0x00c6, t01=0x0084}
0x135d4…135e8               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00c6, t01=0x00ae}
0x135e8…1361a               Head {h00=0x002e, h01=0x0050, text=» LDK A2,PARITY CHAR PARITY FUNCTION FOR LC«, t00=0x00c6, t01=0x00c2}
0x1361a…1363c               Head {h00=0x001e, h01=0x0050, text=» CIO A2,1,LCUIN START I/O «, t00=0x00c6, t01=0x00f4}
0x1363c…1365e               Head {h00=0x001e, h01=0x0050, text=» LDK A2,SYNC SYNC PATTERN «, t00=0x00c6, t01=0x0116}
0x1365e…13694               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC «, t00=0x00c6, t01=0x0138}
0x13694…136a0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c6, t01=0x016e}
0x136a0…136b4               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x00c6, t01=0x017a}
0x136b4…136e2               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CBCARR+SYNC DEF SYNC-PATTERN «, t00=0x00c6, t01=0x018e}
0x136e2…13718               Head {h00=0x0032, h01=0x0050, text=» CIO A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC «, t00=0x00c7, t01=0x002c}
0x13718…1372e               Head {h00=0x0012, h01=0x0050, text=» RF(NA) CSYN:I«, t00=0x00c7, t01=0x0062}
0x1372e…13740               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x00c7, t01=0x0078}
0x13740…13762               Head {h00=0x001e, h01=0x0050, text=» ST A1,DTEPLS,A7 OPERABLE «, t00=0x00c7, t01=0x008a}
0x13762…1376e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c7, t01=0x00ac}
0x1376e…13782               Head {h00=0x0010, h01=0x0050, text=»CSYN:I EQU *«, t00=0x00c7, t01=0x00b8}
0x13782…137a2               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00c7, t01=0x00cc}
0x137a2…137ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x00ec}
0x137ac…137b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x00f6}
0x137b6…137dc               Head {h00=0x0022, h01=0x0050, text=»*  CHALTI : HALT INPUT CHANNEL«, t00=0x00c7, t01=0x0100}
0x137dc…137e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0126}
0x137e6…137fa               Head {h00=0x0010, h01=0x0050, text=»CHALTI EQU *«, t00=0x00c7, t01=0x0130}
0x137fa…1380e               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00c7, t01=0x0144}
0x1380e…13836               Head {h00=0x0024, h01=0x0050, text=» LDK A2,CBSTOP STOP FUNCTION BIT«, t00=0x00c7, t01=0x0158}
0x13836…13842               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c7, t01=0x0180}
0x13842…13864               Head {h00=0x001e, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT«, t00=0x00c7, t01=0x018c}
0x13864…1388e               Head {h00=0x0026, h01=0x0050, text=» CM DCLCI CLEAR INPUT ACTIVE FLAG «, t00=0x00c8, t01=0x001e}
0x1388e…138b0               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN READ STATUS «, t00=0x00c8, t01=0x0048}
0x138b0…138c4               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00c8, t01=0x006a}
0x138c4…138ec               Head {h00=0x0024, h01=0x0050, text=» CF A5,LOGSST LOGG INPUT STATUS «, t00=0x00c8, t01=0x007e}
0x138ec…138f8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c8, t01=0x00a6}
0x138f8…13918               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00c8, t01=0x00b2}
0x13918…13926               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c8, t01=0x00d2}
0x13926…13930               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x00e0}
0x13930…1393a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x00ea}
0x1393a…1396e               Head {h00=0x0030, h01=0x0050, text=»*  CSYNCO : START TRANSMITTER WITH SYNC DEF «, t00=0x00c8, t01=0x00f4}
0x1396e…13978               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0128}
0x13978…1398c               Head {h00=0x0010, h01=0x0050, text=»CSYNCO EQU *«, t00=0x00c8, t01=0x0132}
0x1398c…139a2               Head {h00=0x0012, h01=0x0050, text=» LD A2,PFPOST «, t00=0x00c8, t01=0x0146}
0x139a2…139ca               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CSYN:O WAIT FOR POWER UP«, t00=0x00c8, t01=0x015c}
0x139ca…139de               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00c8, t01=0x0184}
0x139de…13a0c               Head {h00=0x002a, h01=0x0050, text=» LDK A2,PARITY CHAR PARITY CHECK BY CU«, t00=0x00c9, t01=0x0008}
0x13a0c…13a2e               Head {h00=0x001e, h01=0x0050, text=» CIO A2,1,LCUUT CIO START «, t00=0x00c9, t01=0x0036}
0x13a2e…13a4c               Head {h00=0x001a, h01=0x0050, text=» RF(A) CSYNC1 ACCEPTED«, t00=0x00c9, t01=0x0058}
0x13a4c…13a74               Head {h00=0x0024, h01=0x0050, text=» SST A2,LCUUT TRY TO READ STATUS«, t00=0x00c9, t01=0x0076}
0x13a74…13aa2               Head {h00=0x002a, h01=0x0050, text=» ABL BRM NOT ACCEPTED TIMEOUT REQUEST «, t00=0x00c9, t01=0x009e}
0x13aa2…13ab6               Head {h00=0x0010, h01=0x0050, text=»CSYNC1 EQU *«, t00=0x00c9, t01=0x00cc}
0x13ab6…13adc               Head {h00=0x0022, h01=0x0050, text=» LDK A2,SYNC DEF SYNC PATTERN «, t00=0x00c9, t01=0x00e0}
0x13adc…13b06               Head {h00=0x0026, h01=0x0050, text=» OTR A2,1,LCUUT SEND SYNC PATTERN «, t00=0x00c9, t01=0x0106}
0x13b06…13b12               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c9, t01=0x0130}
0x13b12…13b26               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x00c9, t01=0x013c}
0x13b26…13b50               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x00c9, t01=0x0150}
0x13b50…13b5c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c9, t01=0x017a}
0x13b5c…13b70               Head {h00=0x0010, h01=0x0050, text=»CSYN:O EQU *«, t00=0x00c9, t01=0x0186}
0x13b70…13b90               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00ca, t01=0x000a}
0x13b90…13b9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x002a}
0x13b9a…13ba4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0034}
0x13ba4…13bcc               Head {h00=0x0024, h01=0x0050, text=»*  CHALTO : HALT OUTPUT CHANNEL «, t00=0x00ca, t01=0x003e}
0x13bcc…13bd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0066}
0x13bd6…13bea               Head {h00=0x0010, h01=0x0050, text=»CHALTO EQU *«, t00=0x00ca, t01=0x0070}
0x13bea…13bfe               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00ca, t01=0x0084}
0x13bfe…13c22               Head {h00=0x0020, h01=0x0050, text=» LDK A2,CBSTOP STOP FUNCTION«, t00=0x00ca, t01=0x0098}
0x13c22…13c2e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ca, t01=0x00bc}
0x13c2e…13c52               Head {h00=0x0020, h01=0x0050, text=» CIO A2,0,LCUUT HALT OUTPUT «, t00=0x00ca, t01=0x00c8}
0x13c52…13c66               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00ca, t01=0x00ec}
0x13c66…13c8c               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ WAIT FOR INTERRUPT«, t00=0x00ca, t01=0x0100}
0x13c8c…13c98               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ca, t01=0x0126}
0x13c98…13cb8               Head {h00=0x001c, h01=0x0050, text=» SST A2,LCUUT GET STATUS«, t00=0x00ca, t01=0x0132}
0x13cb8…13cce               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00ca, t01=0x0152}
0x13cce…13cec               Head {h00=0x001a, h01=0x0050, text=» ANK A2,H:NOOP+H:THRU «, t00=0x00ca, t01=0x0168}
0x13cec…13d02               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CHLTO2 «, t00=0x00ca, t01=0x0186}
0x13d02…13d2a               Head {h00=0x0024, h01=0x0050, text=» LDK A1,CSCDCE DCE NOT OPERABLE «, t00=0x00cb, t01=0x000c}
0x13d2a…13d40               Head {h00=0x0012, h01=0x0050, text=» ANK A2,H:NOOP«, t00=0x00cb, t01=0x0034}
0x13d40…13d5a               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CHLTO1 YES«, t00=0x00cb, t01=0x004a}
0x13d5a…13d88               Head {h00=0x002a, h01=0x0050, text=» LDK A1,CSCDOT OUTPUT THROUGHPUT ERROR«, t00=0x00cb, t01=0x0064}
0x13d88…13d9c               Head {h00=0x0010, h01=0x0050, text=»CHLTO1 EQU *«, t00=0x00cb, t01=0x0092}
0x13d9c…13dc4               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x00cb, t01=0x00a6}
0x13dc4…13dd8               Head {h00=0x0010, h01=0x0050, text=»CHLTO2 EQU *«, t00=0x00cb, t01=0x00ce}
0x13dd8…13de4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cb, t01=0x00e2}
0x13de4…13e04               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00cb, t01=0x00ee}
0x13e04…13e12               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cb, t01=0x010e}
0x13e12…13e1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x011c}
0x13e1c…13e26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x0126}
0x13e26…13e44               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x00cb, t01=0x0130}
0x13e44…13e4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x014e}
0x13e4e…13e58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x0158}
0x13e58…13e6c               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x00cb, t01=0x0162}
0x13e6c…13e80               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x00cb, t01=0x0176}
0x13e80…13e96               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00cb, t01=0x018a}
0x13e96…13eb6               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x00cc, t01=0x0010}
0x13eb6…13ec2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cc, t01=0x0030}
0x13ec2…13eca               Head {h00=0x0004, h01=0x0050, t00=0x00cc, t01=0x003c}
0x13eca…13ee0               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00cc, t01=0x0044}
0x13ee0…13efe               Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 «, t00=0x00cc, t01=0x005a}
0x13efe…13f0a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cc, t01=0x0078}
0x13f0a…13f38               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x00cc, t01=0x0084}
0x13f38…13f5a               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x00cc, t01=0x00b2}
0x13f5a…13f8a               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x00cc, t01=0x00d4}
0x13f8a…13f9e               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00cc, t01=0x0104}
0x13f9e…13fca               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x00cc, t01=0x0118}
0x13fca…13fd6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cc, t01=0x0144}
0x13fd6…13fec               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00cc, t01=0x0150}
0x13fec…13ffc               Head {h00=0x000c, h01=0x0050, text=» C2 TPM «, t00=0x00cc, t01=0x0166}
0x13ffc…14038               Head {h00=0x0038, h01=0x0050, text=» RF(NZ) IHLC10 DO NOT SKIP SYNC IN TRANSPARENT TEXT «, t00=0x00cc, t01=0x0176}
0x14038…14044               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cd, t01=0x0022}
0x14044…14056               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x00cd, t01=0x002e}
0x14056…1408a               Head {h00=0x0030, h01=0x0050, text=» RF(NZ) IHLC05 DO NOT SKIP SYNS IN BCC FRAME«, t00=0x00cd, t01=0x0040}
0x1408a…1409e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,SYNC«, t00=0x00cd, t01=0x0074}
0x1409e…140b2               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x00cd, t01=0x0088}
0x140b2…140c6               Head {h00=0x0010, h01=0x0050, text=»IHLC05 EQU *«, t00=0x00cd, t01=0x009c}
0x140c6…140da               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00cd, t01=0x00b0}
0x140da…140fa               Head {h00=0x001c, h01=0x0050, text=» XRR A8,A2 CALCULATE LRC«, t00=0x00cd, t01=0x00c4}
0x140fa…14106               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cd, t01=0x00e4}
0x14106…1411a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00cd, t01=0x00f0}
0x1411a…1413e               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x00cd, t01=0x0104}
0x1413e…1416a               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x00cd, t01=0x0128}
0x1416a…14176               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cd, t01=0x0154}
0x14176…1418a               Head {h00=0x0010, h01=0x0050, text=»IHLC10 EQU *«, t00=0x00cd, t01=0x0160}
0x1418a…1419c               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x00cd, t01=0x0174}
0x1419c…141ca               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/FF00 SET FLAG FOR CARRIER ON«, t00=0x00cd, t01=0x0186}
0x141ca…141f4               Head {h00=0x0026, h01=0x0050, text=» ST A1,DCLCI SET INPUT ACTIV FLAG «, t00=0x00ce, t01=0x0024}
0x141f4…14216               Head {h00=0x001e, h01=0x0050, text=» CM DCSTCU CLEAR SST SAVE «, t00=0x00ce, t01=0x004e}
0x14216…14228               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x00ce, t01=0x0070}
0x14228…1424c               Head {h00=0x0020, h01=0x0050, text=» ST A1,DTEPLS,A7 CU OPERABLE«, t00=0x00ce, t01=0x0082}
0x1424c…1426c               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00ce, t01=0x00a6}
0x1426c…14280               Head {h00=0x0010, h01=0x0050, text=»IHIN20 EQU *«, t00=0x00ce, t01=0x00c6}
0x14280…1429e               Head {h00=0x001a, h01=0x0050, text=» CF A5,SST PERFORM SST«, t00=0x00ce, t01=0x00da}
0x1429e…142ae               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x00ce, t01=0x00f8}
0x142ae…142bc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ce, t01=0x0108}
0x142bc…142c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0116}
0x142c6…142d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0120}
0x142d0…142f2               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x00ce, t01=0x012a}
0x142f2…142fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x014c}
0x142fc…14306               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0156}
0x14306…1431a               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x00ce, t01=0x0160}
0x1431a…1432e               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x00ce, t01=0x0174}
0x1432e…14344               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00ce, t01=0x0188}
0x14344…14366               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x00cf, t01=0x000e}
0x14366…14372               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cf, t01=0x0030}
0x14372…1437a               Head {h00=0x0004, h01=0x0050, t00=0x00cf, t01=0x003c}
0x1437a…14390               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00cf, t01=0x0044}
0x14390…143ae               Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 «, t00=0x00cf, t01=0x005a}
0x143ae…143ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cf, t01=0x0078}
0x143ba…143e8               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x00cf, t01=0x0084}
0x143e8…143f8               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00cf, t01=0x00b2}
0x143f8…14406               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cf, t01=0x00c2}
0x14406…14410               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x00d0}
0x14410…1441a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x00da}
0x1441a…14444               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x00cf, t01=0x00e4}
0x14444…1444e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x010e}
0x1444e…1447a               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x00cf, t01=0x0118}
0x1447a…144ac               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x00cf, t01=0x0144}
0x144ac…144dc               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x00cf, t01=0x0176}
0x144dc…1450c               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x00d0, t01=0x0016}
0x1450c…14516               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x0046}
0x14516…14528               Head {h00=0x000e, h01=0x0050, text=»SST EQU * «, t00=0x00d0, t01=0x0050}
0x14528…14548               Head {h00=0x001c, h01=0x0050, text=» SST A2,LCUIN GET STATUS«, t00=0x00d0, t01=0x0062}
0x14548…1455a               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x00d0, t01=0x0082}
0x1455a…1456e               Head {h00=0x0010, h01=0x0050, text=» IFT LOGG=1 «, t00=0x00d0, t01=0x0094}
0x1456e…14598               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOGG SST INFORMATION«, t00=0x00d0, t01=0x00a8}
0x14598…145a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d0, t01=0x00d2}
0x145a4…145c8               Head {h00=0x0020, h01=0x0050, text=» ANK A2,H:ERR ERROR BIT SET «, t00=0x00d0, t01=0x00de}
0x145c8…145e2               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) SST050 YES«, t00=0x00d0, t01=0x0102}
0x145e2…145f6               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x00d0, t01=0x011c}
0x145f6…14618               Head {h00=0x001e, h01=0x0050, text=» LD A2,DCLCI INPUT STATUS «, t00=0x00d0, t01=0x0130}
0x14618…14646               Head {h00=0x002a, h01=0x0050, text=» RF(Z) SST125 INPUT NOT ACTIVE  IGNORE«, t00=0x00d0, t01=0x0152}
0x14646…14672               Head {h00=0x0028, h01=0x0050, text=» RF(N) SST100 INPUT ACTIVE WITH DATA«, t00=0x00d0, t01=0x0180}
0x14672…146a0               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CBCARR+SYNC DEF SYNC PATTERN «, t00=0x00d1, t01=0x001c}
0x146a0…146ca               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUIN START INPUT AGAIN «, t00=0x00d1, t01=0x004a}
0x146ca…146f2               Head {h00=0x0024, h01=0x0050, text=» RF SST125 RETURN TO DISPATCHER «, t00=0x00d1, t01=0x0074}
0x146f2…146fe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d1, t01=0x009c}
0x146fe…14712               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00d1, t01=0x00a8}
0x14712…14724               Head {h00=0x000e, h01=0x0050, text=» RF SST100«, t00=0x00d1, t01=0x00bc}
0x14724…14730               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d1, t01=0x00ce}
0x14730…14744               Head {h00=0x0010, h01=0x0050, text=»SST050 EQU *«, t00=0x00d1, t01=0x00da}
0x14744…14772               Head {h00=0x002a, h01=0x0050, text=» CM DTEPLS,A7 CLEAR PHYS. LINK STATUS «, t00=0x00d1, t01=0x00ee}
0x14772…14794               Head {h00=0x001e, h01=0x0050, text=» ANK A2,H:CARR CARRIR OFF «, t00=0x00d1, t01=0x011c}
0x14794…147ac               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SST075 NO«, t00=0x00d1, t01=0x013e}
0x147ac…147ce               Head {h00=0x001e, h01=0x0050, text=» LD A2,DCLCI INPUT STATUS «, t00=0x00d1, t01=0x0156}
0x147ce…14802               Head {h00=0x0030, h01=0x0050, text=» RF(Z) SST125 NOT ACTIVE IGNORE CARRIER OFF «, t00=0x00d1, t01=0x0178}
0x14802…1481c               Head {h00=0x0016, h01=0x0050, text=» RF SST100 ACTIVE «, t00=0x00d2, t01=0x001c}
0x1481c…14830               Head {h00=0x0010, h01=0x0050, text=»SST075 EQU *«, t00=0x00d2, t01=0x0036}
0x14830…14842               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x00d2, t01=0x004a}
0x14842…1486a               Head {h00=0x0024, h01=0x0050, text=» ANK A2,H:THRU THROUGHPUT ERROR «, t00=0x00d2, t01=0x005c}
0x1486a…14882               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SST100 NO«, t00=0x00d2, t01=0x0084}
0x14882…14898               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00d2, t01=0x009c}
0x14898…148a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x00b2}
0x148a2…148ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x00bc}
0x148ac…148d4               Head {h00=0x0024, h01=0x0050, text=»*  COUNT INPUT THROUGHPUT ERROR «, t00=0x00d2, t01=0x00c6}
0x148d4…148de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x00ee}
0x148de…148f4               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSCDIT«, t00=0x00d2, t01=0x00f8}
0x148f4…1490a               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x00d2, t01=0x010e}
0x1490a…14916               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d2, t01=0x0124}
0x14916…1492a               Head {h00=0x0010, h01=0x0050, text=» ABL BRM110 «, t00=0x00d2, t01=0x0130}
0x1492a…14934               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x0144}
0x14934…14948               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x00d2, t01=0x014e}
0x14948…1495a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x00d2, t01=0x0162}
0x1495a…1497e               Head {h00=0x0020, h01=0x0050, text=» ANK A2,H:NOOP NOT OPERABLE «, t00=0x00d2, t01=0x0174}
0x1497e…14994               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST200 «, t00=0x00d3, t01=0x0008}
0x14994…149aa               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00d3, t01=0x001e}
0x149aa…149b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0034}
0x149b4…149be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x003e}
0x149be…149e0               Head {h00=0x001e, h01=0x0050, text=»*  COUNT DCE NOT OPERABLE «, t00=0x00d3, t01=0x0048}
0x149e0…149ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x006a}
0x149ea…14a00               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSCDCE«, t00=0x00d3, t01=0x0074}
0x14a00…14a16               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x00d3, t01=0x008a}
0x14a16…14a22               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d3, t01=0x00a0}
0x14a22…14a46               Head {h00=0x0020, h01=0x0050, text=» CF A15,STREG SAVE REGISTERS«, t00=0x00d3, t01=0x00ac}
0x14a46…14a68               Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME DELAY 1 SEC«, t00=0x00d3, t01=0x00d0}
0x14a68…14a80               Head {h00=0x0014, h01=0x0050, text=» DATA SST150,10 «, t00=0x00d3, t01=0x00f2}
0x14a80…14a94               Head {h00=0x0010, h01=0x0050, text=»SST125 EQU *«, t00=0x00d3, t01=0x010a}
0x14a94…14abc               Head {h00=0x0024, h01=0x0050, text=» ABL TDISP RETURN TO DISPATCHER «, t00=0x00d3, t01=0x011e}
0x14abc…14ac6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0146}
0x14ac6…14ada               Head {h00=0x0010, h01=0x0050, text=»SST150 EQU *«, t00=0x00d3, t01=0x0150}
0x14ada…14afe               Head {h00=0x0020, h01=0x0050, text=» CF A15,LDREG LOAD REGISTERS«, t00=0x00d3, t01=0x0164}
0x14afe…14b12               Head {h00=0x0010, h01=0x0050, text=»SST200 EQU *«, t00=0x00d3, t01=0x0188}
0x14b12…14b24               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x00d4, t01=0x000c}
0x14b24…14b56               Head {h00=0x002e, h01=0x0050, text=» ANK A2,H:CARR CHECK STATUS IF CARRIER OFF«, t00=0x00d4, t01=0x001e}
0x14b56…14b6e               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SST225 NO«, t00=0x00d4, t01=0x0050}
0x14b6e…14ba6               Head {h00=0x0034, h01=0x0050, text=» XRK A1,H:CARR CHECK STATUS IF ONLY CARRIER OFF «, t00=0x00d4, t01=0x0068}
0x14ba6…14bc0               Head {h00=0x0016, h01=0x0050, text=» RF(Z) SST250 YES «, t00=0x00d4, t01=0x00a0}
0x14bc0…14bd4               Head {h00=0x0010, h01=0x0050, text=»SST225 EQU *«, t00=0x00d4, t01=0x00ba}
0x14bd4…14c08               Head {h00=0x0030, h01=0x0050, text=» ST A1,DCSTCU STORE STATUS AS CURRENT STATUS«, t00=0x00d4, t01=0x00ce}
0x14c08…14c1c               Head {h00=0x0010, h01=0x0050, text=»SST250 EQU *«, t00=0x00d4, t01=0x0102}
0x14c1c…14c3c               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00d4, t01=0x0116}
0x14c3c…14c4a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d4, t01=0x0136}
0x14c4a…14c54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0144}
0x14c54…14c5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x014e}
0x14c5e…14c8e               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x00d4, t01=0x0158}
0x14c8e…14c98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0188}
0x14c98…14ca2 (213, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0004}
0x14ca2…14cb6               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x00d5, t01=0x000e}
0x14cb6…14cca               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00d5, t01=0x0022}
0x14cca…14cda               Head {h00=0x000c, h01=0x0050, text=» C2 TPM «, t00=0x00d5, t01=0x0036}
0x14cda…14d04               Head {h00=0x0026, h01=0x0050, text=» RF(Z) WRIT02 NOT TRANSPARENT MODE«, t00=0x00d5, t01=0x0046}
0x14d04…14d24               Head {h00=0x001c, h01=0x0050, text=» CWK A2,DLE CHECK IF DLE«, t00=0x00d5, t01=0x0070}
0x14d24…14d3e               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRIT05 NO «, t00=0x00d5, t01=0x0090}
0x14d3e…14d62               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRIDLE SEND EXTRA DLE«, t00=0x00d5, t01=0x00aa}
0x14d62…14d76               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00d5, t01=0x00ce}
0x14d76…14d88               Head {h00=0x000e, h01=0x0050, text=» RF WRIT05«, t00=0x00d5, t01=0x00e2}
0x14d88…14d9c               Head {h00=0x0010, h01=0x0050, text=»WRIT02 EQU *«, t00=0x00d5, t01=0x00f4}
0x14d9c…14db0               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x00d5, t01=0x0108}
0x14db0…14dc4               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x00d5, t01=0x011c}
0x14dc4…14df8               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x00d5, t01=0x0130}
0x14df8…14e26               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x00d5, t01=0x0164}
0x14e26…14e32 (214, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d6, t01=0x0004}
0x14e32…14e46               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x00d6, t01=0x0010}
0x14e46…14e6c               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x00d6, t01=0x0024}
0x14e6c…14e82               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x00d6, t01=0x004a}
0x14e82…14e96               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00d6, t01=0x0060}
0x14e96…14ebe               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A8,A2 ACCUMULATE BCC «, t00=0x00d6, t01=0x0074}
0x14ebe…14eca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d6, t01=0x009c}
0x14eca…14ede               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00d6, t01=0x00a8}
0x14ede…14f08               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x00d6, t01=0x00bc}
0x14f08…14f14               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d6, t01=0x00e6}
0x14f14…14f28               Head {h00=0x0010, h01=0x0050, text=»WRIT15 EQU *«, t00=0x00d6, t01=0x00f2}
0x14f28…14f3c               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00d6, t01=0x0106}
0x14f3c…14f66               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x00d6, t01=0x011a}
0x14f66…14f72               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d6, t01=0x0144}
0x14f72…14f7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0150}
0x14f7c…14f96               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x00d6, t01=0x015a}
0x14f96…14fa8               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x00d6, t01=0x0174}
0x14fa8…14fb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0186}
0x14fb2…14fbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0190}
0x14fbc…14ffc               Head {h00=0x003c, h01=0x0050, text=»*  THESE INSTRUCTIONS ARE ONLY USED TO SEND AN EXTRA DLE«, t00=0x00d7, t01=0x000a}
0x14ffc…1502a               Head {h00=0x002a, h01=0x0050, text=»*  WHEN TRANSPARENT MODE IS CONFIGURED«, t00=0x00d7, t01=0x004a}
0x1502a…15034               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x0078}
0x15034…15048               Head {h00=0x0010, h01=0x0050, text=»WRIDLE EQU *«, t00=0x00d7, t01=0x0082}
0x15048…1506e               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x00d7, t01=0x0096}
0x1506e…1508c               Head {h00=0x001a, h01=0x0050, text=» RB(A) WRIT15 ACCEPTED«, t00=0x00d7, t01=0x00bc}
0x1508c…150b4               Head {h00=0x0024, h01=0x0050, text=» RB READ OUTPUT THROUGHPUT ERROR«, t00=0x00d7, t01=0x00da}
0x150b4…150c2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d7, t01=0x0102}
0x150c2…150cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x0110}
0x150cc…150d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x011a}
0x150d6…150e8               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x00d7, t01=0x0124}
0x150e8…150f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x0136}
0x150f2…15112               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x00d7, t01=0x0140}
0x15112…1511c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x0160}
0x1511c…15126               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x016a}
0x15126…15148               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x00d7, t01=0x0174}
0x15148…15162               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x00d8, t01=0x0008}
0x15162…15174               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x00d8, t01=0x0022}
0x15174…15188               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x00d8, t01=0x0034}
0x15188…151a0               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x00d8, t01=0x0048}
0x151a0…151b6               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x00d8, t01=0x0060}
0x151b6…151d0               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x00d8, t01=0x0076}
0x151d0…151e4               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x00d8, t01=0x0090}
0x151e4…151f6               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x00d8, t01=0x00a4}
0x151f6…15202               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d8, t01=0x00b6}
0x15202…15224               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x00d8, t01=0x00c2}
0x15224…1523c               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x00d8, t01=0x00e4}
0x1523c…15248               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d8, t01=0x00fc}
0x15248…15252               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0108}
0x15252…1525c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0112}
0x1525c…15266               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x011c}
0x15266…15278               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x00d8, t01=0x0126}
0x15278…15282               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0138}
0x15282…152b4               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x00d8, t01=0x0142}
0x152b4…152be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0174}
0x152be…152c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x017e}
0x152c8…152e0               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x00d8, t01=0x0188}
0x152e0…15302               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x00d9, t01=0x0010}
0x15302…15314               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x00d9, t01=0x0032}
0x15314…1532a               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x00d9, t01=0x0044}
0x1532a…1533e               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x00d9, t01=0x005a}
0x1533e…15354               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x00d9, t01=0x006e}
0x15354…15368               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x00d9, t01=0x0084}
0x15368…1537a               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x00d9, t01=0x0098}
0x1537a…15392               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x00d9, t01=0x00aa}
0x15392…153a6               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x00d9, t01=0x00c2}
0x153a6…153b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d9, t01=0x00d6}
0x153b2…153d4               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x00d9, t01=0x00e2}
0x153d4…153e8               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x00d9, t01=0x0104}
0x153e8…153f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d9, t01=0x0118}
0x153f4…15406               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x00d9, t01=0x0124}
0x15406…1541a               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x00d9, t01=0x0136}
0x1541a…1542e               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x00d9, t01=0x014a}
0x1542e…1543e               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00d9, t01=0x015e}
0x1543e…15448               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x016e}
0x15448…15452               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0178}
0x15452…15460               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d9, t01=0x0182}
0x15460…1546a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0190}
0x1546a…15474               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x000a}
0x15474…15490               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x00da, t01=0x0014}
0x15490…1549a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x0030}
0x1549a…154a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x003a}
0x154a4…154b8               Head {h00=0x0010, h01=0x0050, text=»DC15ON EQU *«, t00=0x00da, t01=0x0044}
0x154b8…154ce               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00da, t01=0x0058}
0x154ce…154ee               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x00da, t01=0x006e}
0x154ee…154fa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00da, t01=0x008e}
0x154fa…15502               Head {h00=0x0004, h01=0x0050, t00=0x00da, t01=0x009a}
0x15502…15518               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00da, t01=0x00a2}
0x15518…15536               Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 «, t00=0x00da, t01=0x00b8}
0x15536…15542               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00da, t01=0x00d6}
0x15542…15568               Head {h00=0x0022, h01=0x0050, text=» LDKL A7,DTETAB DTETAB ADDRESS«, t00=0x00da, t01=0x00e2}
0x15568…1557e               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x00da, t01=0x0108}
0x1557e…1559e               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x00da, t01=0x011e}
0x1559e…155ca               Head {h00=0x0028, h01=0x0050, text=» LD A6,DTEDWT,A7 GET FIRST DWT ADDR «, t00=0x00da, t01=0x013e}
0x155ca…155de               Head {h00=0x0010, h01=0x0050, text=»DC1510 EQU *«, t00=0x00da, t01=0x016a}
0x155de…15600               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DC1520 END OF CHAIN«, t00=0x00da, t01=0x017e}
0x15600…1562a               Head {h00=0x0026, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END «, t00=0x00db, t01=0x0010}
0x1562a…1565a               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STAUS QUEUE «, t00=0x00db, t01=0x003a}
0x1565a…15688               Head {h00=0x002a, h01=0x0050, text=» LD A6,DWTCHN,A6 GET NEXT DWT IN CHAIN«, t00=0x00db, t01=0x006a}
0x15688…1569a               Head {h00=0x000e, h01=0x0050, text=» RB DC1510«, t00=0x00db, t01=0x0098}
0x1569a…156ae               Head {h00=0x0010, h01=0x0050, text=»DC1520 EQU *«, t00=0x00db, t01=0x00aa}
0x156ae…156ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00db, t01=0x00be}
0x156ba…156d0               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x00db, t01=0x00ca}
0x156d0…156fe               Head {h00=0x002a, h01=0x0050, text=» LD A6,DTEDDT,A7 GET DISCARD DWT ADDR «, t00=0x00db, t01=0x00e0}
0x156fe…15722               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DC1530 THERE IS NONE «, t00=0x00db, t01=0x010e}
0x15722…15744               Head {h00=0x001e, h01=0x0050, text=» LDK A5,4 LOAD DEVICE END «, t00=0x00db, t01=0x0132}
0x15744…15766               Head {h00=0x001e, h01=0x0050, text=» ORS A5,DWTST,A6 STORE IT «, t00=0x00db, t01=0x0154}
0x15766…15796               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x00db, t01=0x0176}
0x15796…157aa               Head {h00=0x0010, h01=0x0050, text=»DC1530 EQU *«, t00=0x00dc, t01=0x0016}
0x157aa…157b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dc, t01=0x002a}
0x157b6…157da               Head {h00=0x0020, h01=0x0050, text=» LD A2,DTESTA,A7 DTE STATUS «, t00=0x00dc, t01=0x0036}
0x157da…157ec               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x00dc, t01=0x005a}
0x157ec…15814               Head {h00=0x0024, h01=0x0050, text=» ABL(NZ) TDISP OPEN NOT EXECUTED«, t00=0x00dc, t01=0x006c}
0x15814…15842               Head {h00=0x002a, h01=0x0050, text=» CM DCLCI INIT LINE CONTROL UNIT INFO «, t00=0x00dc, t01=0x0094}
0x15842…1586e               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x00dc, t01=0x00c2}
0x1586e…15894               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DC1540 ALREADY STARTED«, t00=0x00dc, t01=0x00ee}
0x15894…158bc               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x00dc, t01=0x0114}
0x158bc…158d0               Head {h00=0x0010, h01=0x0050, text=»DC1540 EQU *«, t00=0x00dc, t01=0x013c}
0x158d0…158e0               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x00dc, t01=0x0150}
0x158e0…158ee               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00dc, t01=0x0160}
0x158ee…15902               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00dc, t01=0x016e}
0x15902…1590c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x0182}
0x1590c…15916               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x018c}
0x15916…15932               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x00dd, t01=0x0008}
0x15932…1593c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x0024}
0x1593c…15954               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x00dd, t01=0x002e}
0x15954…15972               Head {h00=0x001a, h01=0x0050, text=»* A8 = ACCUMULATED CRC«, t00=0x00dd, t01=0x0046}
0x15972…1597c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x0064}
0x1597c…15986               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x006e}
0x15986…1599a               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x00dd, t01=0x0078}
0x1599a…159b2               Head {h00=0x0014, h01=0x0050, text=» ST A1,CRCSAV+2 «, t00=0x00dd, t01=0x008c}
0x159b2…159ca               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+6 «, t00=0x00dd, t01=0x00a4}
0x159ca…159e2               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+10«, t00=0x00dd, t01=0x00bc}
0x159e2…159fa               Head {h00=0x0014, h01=0x0050, text=» ST A4,CRCSAV+14«, t00=0x00dd, t01=0x00d4}
0x159fa…15a0c               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x00dd, t01=0x00ec}
0x15a0c…15a2a               Head {h00=0x001a, h01=0x0050, text=» LDR A4,A8 GET OLD CRC«, t00=0x00dd, t01=0x00fe}
0x15a2a…15a42               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A4«, t00=0x00dd, t01=0x011c}
0x15a42…15a54               Head {h00=0x000e, h01=0x0050, text=» SRL A4,1 «, t00=0x00dd, t01=0x0134}
0x15a54…15a66               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x00dd, t01=0x0146}
0x15a66…15a78               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x00dd, t01=0x0158}
0x15a78…15a8a               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x00dd, t01=0x016a}
0x15a8a…15aa0               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x00dd, t01=0x017c}
0x15aa0…15ab6 (222, 0, 400) Head {h00=0x0012, h01=0x0050, text=» XRKL A4,/A001«, t00=0x00de, t01=0x0004}
0x15ab6…15ace               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x00de, t01=0x001a}
0x15ace…15ae4               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x00de, t01=0x0032}
0x15ae4…15b04               Head {h00=0x001c, h01=0x0050, text=» LDR A8,A4 SAVE NEW CRC «, t00=0x00de, t01=0x0048}
0x15b04…15b18               Head {h00=0x0010, h01=0x0050, text=»CRCSAV EQU *«, t00=0x00de, t01=0x0068}
0x15b18…15b2a               Head {h00=0x000e, h01=0x0050, text=» LDKL A1,0«, t00=0x00de, t01=0x007c}
0x15b2a…15b3c               Head {h00=0x000e, h01=0x0050, text=» LDKL A2,0«, t00=0x00de, t01=0x008e}
0x15b3c…15b4e               Head {h00=0x000e, h01=0x0050, text=» LDKL A3,0«, t00=0x00de, t01=0x00a0}
0x15b4e…15b60               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x00de, t01=0x00b2}
0x15b60…15b70               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00de, t01=0x00c4}
0x15b70…15b7e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00de, t01=0x00d4}
0x15b7e…15b88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x00e2}
0x15b88…15b92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x00ec}
0x15b92…15bbe               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x00de, t01=0x00f6}
0x15bbe…15bde               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x00de, t01=0x0122}
0x15bde…15be8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0142}
0x15be8…15bf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x014c}
0x15bf2…15c06               Head {h00=0x0010, h01=0x0050, text=»RDCRC EQU * «, t00=0x00de, t01=0x0156}
0x15c06…15c2a               Head {h00=0x0020, h01=0x0050, text=» STR A8,A5 SAVE CURRENT CRC «, t00=0x00de, t01=0x016a}
0x15c2a…15c50               Head {h00=0x0022, h01=0x0050, text=» SUK A5,2 ADJUST STACK POINTER«, t00=0x00de, t01=0x018e}
0x15c50…15c78               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x00df, t01=0x0024}
0x15c78…15c98               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x00df, t01=0x004c}
0x15c98…15cb8               Head {h00=0x001c, h01=0x0050, text=» LD A4,CRCSAV+6 SAVE IT «, t00=0x00df, t01=0x006c}
0x15cb8…15cd8               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x00df, t01=0x008c}
0x15cd8…15d04               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x00df, t01=0x00ac}
0x15d04…15d24               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+6 SAVE IT «, t00=0x00df, t01=0x00d8}
0x15d24…15d36               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x00df, t01=0x00f8}
0x15d36…15d48               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A4«, t00=0x00df, t01=0x010a}
0x15d48…15d5a               Head {h00=0x000e, h01=0x0050, text=» ADK A5,6 «, t00=0x00df, t01=0x011c}
0x15d5a…15d6e               Head {h00=0x0010, h01=0x0050, text=» CW A2,-4,A5«, t00=0x00df, t01=0x012e}
0x15d6e…15d7e               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00df, t01=0x0142}
0x15d7e…15d8a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x0152}
0x15d8a…15d9e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00df, t01=0x015e}
0x15d9e…15da8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x0172}
0x15da8…15dd2               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x00df, t01=0x017c}
0x15dd2…15df8               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x00e0, t01=0x0016}
0x15df8…15e02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x003c}
0x15e02…15e18               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x00e0, t01=0x0046}
0x15e18…15e2c               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x00e0, t01=0x005c}
0x15e2c…15e3e               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x00e0, t01=0x0070}
0x15e3e…15e50               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x00e0, t01=0x0082}
0x15e50…15e66               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x00e0, t01=0x0094}
0x15e66…15e7c               Head {h00=0x0012, h01=0x0050, text=» ANKL A8,/007F«, t00=0x00e0, t01=0x00aa}
0x15e7c…15e90               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x00e0, t01=0x00c0}
0x15e90…15ea2               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x00e0, t01=0x00d4}
0x15ea2…15eb2               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00e0, t01=0x00e6}
0x15eb2…15eba               Head {h00=0x0004, h01=0x0050, t00=0x00e0, t01=0x00f6}
0x15eba…15ec6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e0, t01=0x00fe}
0x15ec6…15ed4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e0, t01=0x010a}
0x15ed4…15f04               Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x00e0, t01=0x0118}
0x15f04…15f0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0148}
0x15f0e…15f2a               Head {h00=0x0018, h01=0x0050, text=»*  DRIVER WORK AREAS«, t00=0x00e0, t01=0x0152}
0x15f2a…15f34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x016e}
0x15f34…15f64               Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x00e0, t01=0x0178}
0x15f64…15f6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0018}
0x15f6e…15f78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0022}
0x15f78…15f98               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x00e1, t01=0x002c}
0x15f98…15fa2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x004c}
0x15fa2…15fc2               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x00e1, t01=0x0056}
0x15fc2…15fcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0076}
0x15fcc…15fe0               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x00e1, t01=0x0080}
0x15fe0…16004               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x00e1, t01=0x0094}
0x16004…1601a               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x00e1, t01=0x00b8}
0x1601a…16030               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00e1, t01=0x00ce}
0x16030…16044               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00e1, t01=0x00e4}
0x16044…1605a               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x00e1, t01=0x00f8}
0x1605a…16070               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00e1, t01=0x010e}
0x16070…16084               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00e1, t01=0x0124}
0x16084…1609a               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x00e1, t01=0x0138}
0x1609a…160b0               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00e1, t01=0x014e}
0x160b0…160c4               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00e1, t01=0x0164}
0x160c4…160d0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e1, t01=0x0178}
0x160d0…160e6               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00e1, t01=0x0184}
0x160e6…160fa               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00e2, t01=0x000a}
0x160fa…16116               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x00e2, t01=0x001e}
0x16116…1612a               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00e2, t01=0x003a}
0x1612a…16132               Head {h00=0x0004, h01=0x0050, t00=0x00e2, t01=0x004e}
0x16132…16148               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x00e2, t01=0x0056}
0x16148…16172               Head {h00=0x0026, h01=0x0050, text=»MMUBUF RES TBUFL+1 MMU WORK BUFFER«, t00=0x00e2, t01=0x006c}
0x16172…1617e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e2, t01=0x0096}
0x1617e…1618c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e2, t01=0x00a2}
0x1618c…16196               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00b0}
0x16196…161a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00ba}
0x161a0…161c4               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x00e2, t01=0x00c4}
0x161c4…161ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00e8}
0x161ce…161d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00f2}
0x161d8…161ec               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00e2, t01=0x00fc}
0x161ec…16206               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x00e2, t01=0x0110}
0x16206…1621c               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x00e2, t01=0x012a}
0x1621c…1622e               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00e2, t01=0x0140}
0x1622e…16248               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x00e2, t01=0x0152}
0x16248…1625e               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x00e2, t01=0x016c}
0x1625e…16270               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00e2, t01=0x0182}
0x16270…16288 (227, 0, 400) Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x00e3, t01=0x0004}
0x16288…1629e               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x00e3, t01=0x001c}
0x1629e…162b2               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x00e3, t01=0x0032}
0x162b2…162cc               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x00e3, t01=0x0046}
0x162cc…162e2               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x00e3, t01=0x0060}
0x162e2…162f4               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x00e3, t01=0x0076}
0x162f4…16306               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x00e3, t01=0x0088}
0x16306…1631c               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x00e3, t01=0x009a}
0x1631c…16332               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x00e3, t01=0x00b0}
0x16332…1634a               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x00e3, t01=0x00c6}
0x1634a…16366               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x00e3, t01=0x00de}
0x16366…1637a               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x00e3, t01=0x00fa}
0x1637a…1638e               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x00e3, t01=0x010e}
0x1638e…163a4               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x00e3, t01=0x0122}
0x163a4…163b2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e3, t01=0x0138}
0x163b2…163bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x0146}
0x163bc…163c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x0150}
0x163c6…163e0               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x00e3, t01=0x015a}
0x163e0…163f4               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x00e3, t01=0x0174}
0x163f4…16404               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x00e3, t01=0x0188}
0x16404…1641a               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x00e4, t01=0x0008}
0x1641a…1642e               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x00e4, t01=0x001e}
0x1642e…16442               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x00e4, t01=0x0032}
0x16442…1644e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e4, t01=0x0046}
0x1644e…16458               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x0052}
0x16458…16462               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x005c}
0x16462…1646c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x0066}
0x1646c…16480               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00e4, t01=0x0070}
0x16480…1648e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e4, t01=0x0084}
0x1648e…164ce               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x00e4, t01=0x0092}
0x164ce…164d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x00d2}
0x164d8…164f2               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x00e4, t01=0x00dc}
0x164f2…164fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x00f6}
0x164fc…1653a               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x00e4, t01=0x0100}
0x1653a…16544               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x013e}
0x16544…16586               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x00e4, t01=0x0148}
0x16586…1658e               Head {h00=0x0004, h01=0x0050, t00=0x00e4, t01=0x018a}
0x1658e…165a2 (229, 0, 400) Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x00e5, t01=0x0004}
0x165a2…165c8               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x00e5, t01=0x0018}
0x165c8…165da               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x00e5, t01=0x003e}
0x165da…165f0               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00e5, t01=0x0050}
0x165f0…1661a               Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x00e5, t01=0x0066}
0x1661a…16640               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x00e5, t01=0x0090}
0x16640…16648               Head {h00=0x0004, h01=0x0050, t00=0x00e5, t01=0x00b6}
0x16648…1665a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x00e5, t01=0x00be}
0x1665a…16670               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00e5, t01=0x00d0}
0x16670…1669c               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x00e5, t01=0x00e6}
0x1669c…166c4               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x00e5, t01=0x0112}
0x166c4…166da               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x00e5, t01=0x013a}
0x166da…166e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0150}
0x166e4…166ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x015a}
0x166ee…166f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0164}
0x166f8…16706               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e5, t01=0x016e}
0x16706…1670e               Head {h00=0x0004, h01=0x0050, t00=0x00e5, t01=0x017c}
0x1670e…16716               Head {h00=0x0004, h01=0x0050, t00=0x00e5, t01=0x0184}
0x16716…1672a               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x00e5, t01=0x018c}
0x1672a…16758               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x00e6, t01=0x0010}
0x16758…16786               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 /08-/0F «, t00=0x00e6, t01=0x003e}
0x16786…167b4               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x00e6, t01=0x006c}
0x167b4…167e2               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E /18-/1F «, t00=0x00e6, t01=0x009a}
0x167e2…16810               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x00e6, t01=0x00c8}
0x16810…1683e               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F /28-/2F «, t00=0x00e6, t01=0x00f6}
0x1683e…1686a               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x00e6, t01=0x0124}
0x1686a…16896               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 /38-3F«, t00=0x00e6, t01=0x0150}
0x16896…168a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e6, t01=0x017c}
0x168a2…168b0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e6, t01=0x0188}
0x168b0…168ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x0008}
0x168ba…168ca               Head {h00=0x000c, h01=0x0050, text=»* DTETAB«, t00=0x00e7, t01=0x0012}
0x168ca…168d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x0022}
0x168d4…168e8               Head {h00=0x0010, h01=0x0050, text=»* FIXED PART«, t00=0x00e7, t01=0x002c}
0x168e8…168f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x0040}
0x168f2…16906               Head {h00=0x0010, h01=0x0050, text=»DW1500 EQU *«, t00=0x00e7, t01=0x004a}
0x16906…1691e               Head {h00=0x0014, h01=0x0050, text=»DTETAB DATA 0,0 «, t00=0x00e7, t01=0x005e}
0x1691e…16938               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x00e7, t01=0x0076}
0x16938…1694e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x00e7, t01=0x0090}
0x1694e…16960               Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x00e7, t01=0x00a6}
0x16960…1696c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e7, t01=0x00b8}
0x1696c…1698c               Head {h00=0x001c, h01=0x0050, text=»* DRIVER DEPENDENT PART «, t00=0x00e7, t01=0x00c4}
0x1698c…169c2               Head {h00=0x0032, h01=0x0050, text=» DATA DTESBU-DTETAB START OF STATISTIC BUFFER «, t00=0x00e7, t01=0x00e4}
0x169c2…169dc               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x00e7, t01=0x011a}
0x169dc…169f8               Head {h00=0x0018, h01=0x0050, text=» DATA 0,0,0,0,0,0  *«, t00=0x00e7, t01=0x0134}
0x169f8…16a0c               Head {h00=0x0010, h01=0x0050, text=»DTESBU EQU *«, t00=0x00e7, t01=0x0150}
0x16a0c…16a28               Head {h00=0x0018, h01=0x0050, text=» DATA 0 SYMBOLIC ID «, t00=0x00e7, t01=0x0164}
0x16a28…16a4c               Head {h00=0x0020, h01=0x0050, text=» DATA 0 COUNTER STATUS WORD «, t00=0x00e7, t01=0x0180}
0x16a4c…16a74               Head {h00=0x0024, h01=0x0050, text=» DATA /20 MAX NUMBER OF COUNTERS«, t00=0x00e8, t01=0x0014}
0x16a74…16a96               Head {h00=0x001e, h01=0x0050, text=» RES /20 STATISTIC BUFFER «, t00=0x00e8, t01=0x003c}
0x16a96…16aa4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e8, t01=0x005e}
0x16aa4…16aae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x006c}
0x16aae…16ab8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x0076}
0x16ab8…16ad6               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x00e8, t01=0x0080}
0x16ad6…16ae0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x009e}
0x16ae0…16aea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x00a8}
0x16aea…16b18               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x00e8, t01=0x00b2}
0x16b18…16b4a               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x00e8, t01=0x00e0}
0x16b4a…16b6a               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x00e8, t01=0x0112}
0x16b6a…16b86               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x00e8, t01=0x0132}
0x16b86…16ba2               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x00e8, t01=0x014e}
0x16ba2…16bd8               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x00e8, t01=0x016a}
0x16bd8…16bfe               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x00e9, t01=0x0010}
0x16bfe…16c1e               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x00e9, t01=0x0036}
0x16c1e…16c4c               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x00e9, t01=0x0056}
0x16c4c…16c76               Head {h00=0x0026, h01=0x0050, text=»TPM DATA 0 IF =1 TRANSPARENT TEXT «, t00=0x00e9, t01=0x0084}
0x16c76…16c80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x00ae}
0x16c80…16c9e               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x00e9, t01=0x00b8}
0x16c9e…16cca               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x00e9, t01=0x00d6}
0x16cca…16cf4               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x00e9, t01=0x0102}
0x16cf4…16d14               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x00e9, t01=0x012c}
0x16d14…16d48               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x00e9, t01=0x014c}
0x16d48…16d70               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x00e9, t01=0x0180}
0x16d70…16da2               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x00ea, t01=0x0018}
0x16da2…16dca               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x00ea, t01=0x004a}
0x16dca…16dfa               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x00ea, t01=0x0072}
0x16dfa…16e04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00a2}
0x16e04…16e12               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ea, t01=0x00ac}
0x16e12…16e1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00ba}
0x16e1c…16e26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00c4}
0x16e26…16e48               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x00ea, t01=0x00ce}
0x16e48…16e52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00f0}
0x16e52…16e5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00fa}
0x16e5c…16e80               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x00ea, t01=0x0104}
0x16e80…16eb0               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x00ea, t01=0x0128}
0x16eb0…16eda               Head {h00=0x0026, h01=0x0050, text=»DCLCI DATA 0 DC UNIT INPUT STATUS «, t00=0x00ea, t01=0x0158}
0x16eda…16ee6               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00ea, t01=0x0182}
0x16ee6…16eea (235, 2, 8)   Head {h00=0x4004, h01=0x0000}
0x16eea…16eee               00 eb 00 04                                                                                                                                                                                                                                       ┆    ┆
0x16eee…16ef6 (236, 1, 8)   20 04 00 00 00 ec 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view