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

⟦759e2ace9⟧

    Length: 97432 (0x17c98)
    Notes: pts_type(SC)
    Names: »DRDC15.SC«

Derivation

└─⟦a16d9b08d⟧ Bits:30009712 Philips computer tape "TOSS11"
    └─⟦this⟧ »UPD4/DRDC15.SC« 
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
    └─⟦this⟧ »TOSSWORK/DRDC15.SC« 

PTS(SC)

	IDENT	DRDC15	REL 11.0 81-09-09 870105041100

			=17, RETURN CODE AT CONNECT
			=16, DLOBUF DESTROYED AT CONNECT 
			=15, NO NEED TO RES 1 WORD BEFORE DATA 
			=14, LOSS OF DRIVER RECEIVE BUFFER 
			REL 11.0 81-05-21
			=13, ERRONEOUS DISCARD DWT HANDLING
			=12, SUB-ADDR IN CW2 AT RECEIVE REQ COMPL
			REL 11.0 81-05-12
			=11, PROCEDURE TIMER PROBLEM 
			=10, EOT ON SPECIFIC POLL
			=9, REMAINING TIME IN ECBCW1 
			REL 11.0 81-04-12
			=8, ODD USER BUFFER ADDRESS
			=7, BINARY STORE PROBLEM 
			REL 11.0 81-04-07
			=6, ERROR IN POLL TIMER HANDLING 
			=5, WRONG STATISTIC HANDLING 
			REL 11.0 81-03-27
			=4, ERROR IN POWER UP
			=3, DELETE INSTRUCTIONS NOT USED 
			=2, CHANGES IN STATUS HANLING
			=1, ERROR IN OPEN/CLOSE REQUESTS 
			REL 11.0 81-01-26
* 
* 
********************************************* 
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   DRDC15: DRIVER DATA COMMUNICATION 
*           BSC MULTIPOINT LINE PROCEDURE 
*           OR SIEMENS MSV1 
* 
* 
* 
* 
* 
****************************************************
	EJECT
* 
* 
*	ENTRY POINTS
* 
	ENTRY	DC15AD	ADDRESS BLOCK TERMINAL REQUESTS 
	ENTRY	IH1501	INPUT INTERRUPT 
	ENTRY	IH1502	OUTPUT INTERRUPT
	ENTRY	DC15ON	POWER ON ROUTINE
	ENTRY	DW1500	DUMMY DWT 
* 
	EJECT
* 
* 
*	EXTERNAL REFERENCES 
* 
	EXTRN	TDISP	DISPATCHER ENTRY 
	EXTRN	SAVE8	SAVE A1-A8 ON A15 STACK
	EXTRN	TENDIO	COMPLETE I/O EVENT
	EXTRN	SETIME	SET TIMER 
	EXTRN	DWTCHP	DWT ADDRESS 
	EXTRN	DWTST	DWT STATUS 
	EXTRN	DWTOR	DWT ORDER
	EXTRN	DWTECB	DWT ECB 
	EXTRN	DWTOPT	OPTION CODE 
	EXTRN	DWTUEC	USER ECB IF MMU 
	EXTRN	DWTMEC	MMU ECB 
	EXTRN	ECBFC	FILE CODE
	EXTRN	ECBBA	BUFFER ADDRESS 
	EXTRN	ECBRL	REQUESTED LENGTH 
	EXTRN	ECBEL	EFFECTIVE LENGTH 
	EXTRN	ECBCW1	CONTROL WORD 1
	EXTRN	ECBCW2	CONTROL WORD 2
	EXTRN	GETSSA 
	EXTRN	INTSAV	SAVE AREA LAST INTERRUPT
	EXTRN	TEBCDIC	ASCII TO EBCDIC TABLE
	EXTRN	TASCII	EBCDIC TO ASCII TABLE 
	EXTRN	DCSRED	READ STATISTICS ENTRY POINT 
	EXTRN	DCSRLL	RESET ALL STATISTICS BUFFERS ENTRY POINT
	EXTRN	DCSUPS	UPDATE STATISTICS ENTRY POINT IN DCSTAT 
	EXTRN	GETDNA	VALIDATE AND CONVERT SYMBOLIC DTE ADDR
	EXTRN	GETSNA	VALIDATE AND CONVERT SYMBOLIC SUB ADDR
	EXTRN	DC:MIN	MOVE DATA TO USER BUFFER
	EXTRN	DC:MOT	MOVE DATA FROM USER BUFFER
	EXTRN	DISEND	COMPLETE REQUEST AND DISPATCH 
	EXTRN	PFPOST	WAIT FOR POWER UP IF SET
	EJECT		
**********************************************************************
* 
*	REGISTER USAGE:	
* 
*	A1	WORK (RETURN CODE) 
*	A2	WORK 
*	A3	WORK (BUFFER LENGTH) 
*	A4	WORK (BUFFER POINTER)
*	A5	DRIVER STACK POINTER 
*	A6	DWT ADDRESS
*	A7	ORDER CODE, DTETAB ADDRESS 
*	A8	ECB ADDRESS
* 
************************************************************************
	EJECT
******************************************************* 
* 
*	PARAMETERS FOR CONDITIONAL ASSEMBLY 
* 
* 
X:A	EQU	1000	RECEIVE BUFFER LENGTH
RBUFL	EQU	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". 
				=2

REMTIM	EQU	0		=9
			IF = 1 THE REMAINING TIME UNTIL TIMEOUT	=9 
			IS DELIVERED IN ECBCW1 AT COMPLETION 	=9 
			OF SEND AND RECEIVE REQUESTS	=9
* 
	IFT	SPEED=1
LSPEED	EQU	/0200
	XIF
	IFT	SPEED=0
LSPEED	EQU	0
	XIF
	EJECT
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	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	/4343	RESET STATISTICS AFTER READ	=5
	EJECT
* 
**********************************************************
* 
*	S O F T W A R E  R E T U R N  C O D E S 
* 
**********************************************************
* 
*---------------------------------------------------------------------- 
R:REQ	EQU	/8000	REQUEST ERROR 
R:ABRT	EQU	/4000	REQUEST ABORTED
R:2	EQU	/2000 
R:3	EQU	/1000 
*---------------------------------------------------------------------
R:4	EQU	/0800 
R:5	EQU	/0400 
R:6	EQU	/0200 
R:DATA	EQU	/0100	DATA AVAILABLE (QUEUED)
*---------------------------------------------------------------------
R:8	EQU	/0080 
R:TIME	EQU	/0040	TIME OUT 
R:10	EQU	/0020
R:SEQ	EQU	/0010	SEQUENCE ERROR
*---------------------------------------------------------------------
R:LGTH	EQU	/0008	ILLEGAL LENGTH 
R:13	EQU	/0004
R:LOGC	EQU	/0002	LOGICAL CONNECTION ERROR 
R:PHYC	EQU	/0001	PHYSICAL CONNECTION ERROR
*---------------------------------------------------------------------- 
* 
	EJECT
* 
********************************************************
* 
*	H A R D W A R E  R E T U R N  C O D E S 
* 
*********************************************************=
* 
*---------------------------------------------------------------------- 
H:0	EQU	/8000 
H:1	EQU	/4000 
H:2	EQU	/2000 
H:3	EQU	/1000 
*---------------------------------------------------------------------- 
H:4	EQU	/0800 
H:5	EQU	/0400 
H:6	EQU	/0200 
H:7	EQU	/0100 
*---------------------------------------------------------------------- 
H:8	EQU	/0080 
H:9	EQU	/0040 
H:CARR	EQU	/0020	CARRIER OFF
H:11	EQU	/0010
*-------------------------------------------------------------------- 
H:12	EQU	/0008
H:PARI	EQU	/0004	PARITY ERROR 
H:THRU	EQU	/0002	THROUGHPUT ERROR 
H:NOOP	EQU	/0001	NOT OPERABLE 
*---------------------------------------------------------------------- 
	EJECT			 
**********************************************************
* 
*	LINE CONTROL CHAR EQU:S		 
*				 
**********************************************************
* 
SF	EQU	X'1D'	START FIELD CHARACTER
SYN	EQU	/16 
STX	EQU	/02 
ETX	EQU	/03 
ETB	EQU	/17 
ITB	EQU	/1F 
SOH	EQU	/01 
ENQ	EQU	/05 
DLE	EQU	/10 
EOT	EQU	/04 
NAK	EQU	/15 
ESC	EQU	/1B 
SBA	EQU	/11 
GP	EQU	/22
RDBCOM	EQU	/32
RDMCOM	EQU	/36
	EJECT
	IFT	CODE=0 
PAR	EQU	/80 
RVI	EQU	/3C 
ACK0	EQU	/30
ACK1	EQU	/31
DC1	EQU	/11 
	IFT	MSV1=0 
WACK	EQU	/3B
	XIF
	IFT	CODE=0 
	IFT	MSV1=1 
WACK	EQU	/BF	=WABT - SIEMENS MSV1 PROCEDURE 
	XIF
	IFT	CODE=1 
PAR	EQU	/00 
WACK	EQU	/2C
RVI	EQU	/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
				=1
	ABL	DTE:ON	CONNECT MODEM 
RQOP90	EQU	*
	LD	A2,DTEPLS,A7	PHYSICAL CONNECTION ?
	ABL(NZ)	RTOK	YES RETURN OK 
	ABL	RTPHYC	RETURN PHYSICAL CONNECTION
	EJECT
* 
*	CLOSE REQUEST 
* 
*	ACTIVATION PARAMETERS:
*		OPTION	/00 = UNCONDITIONAL 
*			/80 = CONDITIONAL 
*	FUNCTIONS:
*		1. IF CONDITIONAL, CHECK IF ANY LOGICAL CONNECTIONS (DWTS) ARE ACTIVE
*		   ACTIVE. 
*		2. IF UNCONDITIONAL, DISCONNECT ALL DWT:S
* 
RQCLOS	EQU	*
	LD	A5,DWTOR,A6	GET OPTION AND ORDER
	LD	A2,ECBCW2,A8	GET SYMBOLIC DTE - ADDR
	RF(Z)	RQCL20 
	CW	A2,DTELAD,A7	CORRECT DTE ?
	ABL(NE)	RTREQ	RETURN: REQUEST ERROR
RQCL20	EQU	*
	LD	A2,DTESTA,A7	GET DTE STATUS 
	ABL(Z)	RTOK	RETURN : OK
	SUK	A2,2	DTE OPENED ?
	ABL(NZ)	RTSEQ	RETURN: SEQUENCE ERROR 
	IM	DTESTA,A7	CLOSE IN PROGRESS 
	LDR	A8,A6	SAVE REQUESTING DWT-ADDR 
* 
RQCL40	EQU	*
	IFT	MESPAS=1 
	LD	A6,DTEDDT,A7	GET DISCARD DWT ADDR 
	RF(Z)	RQCL50 
	LDR	A5,A5	CONDITIONAL CLOSE ?
	RF(N)	RQCL95	YES ! 
	LD	A2,DWTCHN,A6	GET POINTER TO NEXT DWT
	ST	A2,DTEDDT,A7	DISCARD DWT ADDR REMOVED 
	RF	RQCL60
RQCL50	EQU	*
	XIF
	LD	A6,DTEDWT,A7	GET DWT ADDR 
	RF(Z)	RQCL90	NO DWT IN QUEUE 
	LDR	A5,A5	CONDITIONAL CLOSE ?
	RF(N)	RQCL95	YES ! 
	LD	A2,DWTCHN,A6	GET POINTER TO NEXT DWT IN CHAIN 
	ST	A2,DTEDWT,A7	DWT FIRST IN QUEUE REMOVED 
	IFT	MESPAS=1 
RQCL60	EQU	*
	XIF
	CF	A15,RELBUF	REMOVE BUFFERS QUEUED ON DWT 
	CM	DWTSTA,A6	CLEAR DWT-STATUS
	LDK	A1,0	PRESET RETURN CODE
	CWR	A8,A6	REQUESTING DWT ? 
	RF(E)	RQCL80	YES-COMPLETE REQUEST
	LD	A2,DWTST,A6	A PENDING REQUEST ? 
	RB(N)	RQCL40	NO TAKE NEXT DWT
	LDK	A1,R:SEQ	COMPLETE REQUEST WITH SEQUENCE ERROR
RQCL80	EQU	*
	CF	A15,TENDIO	COMPLETE THE REQUEST 
	RB	RQCL40	TAKE NEXT ON QUEUE 
RQCL90	EQU	*
				=1
	LDR	A6,A8	GET REQUESTING DWT ADDR
	LD	A8,DWTECB,A6	RESTORE ECB ADDRESS
				=1
	RF(Z)	RQCL92	REQUEST ALREADY COMPLETED	=1
	LDK	A1,0	RC=0	=1 
	CF	A15,TENDIO	COMPLETE CLOSE REQUEST	=1
RQCL92	EQU	*		=1
	IFT	P6805=0		=1
	LDKL	A5,STB		=1
	CF	A5,CHALTI	HALT I/P DEVICE	=1
	CF	A5,CHALTO	HALT O/P DEVICE	=1
	LDK	A2,0		=1 
	CIO	A2,1,LCUIN	DISCONNECT MODEM	=1 
	XIF			=1 
	IFT	P6805=1		=1
	LDK	A2,1	DISCONNECT ORDER	=1 
	CIO	A2,0,LCUIN	DISCONNECT MODEM	=1 
	XIF			=1 
	CMR	A7	REMOVE NETWORK ADDRESS	=1 
	CM	DTESTA,A7	CLEAR STATUS	=1 
	LD	A1,DCTPGP	POLL TIMER RUNNING ?	=6 
	RF(Z)	RQCL94	NO	=6 
	CM*	DCTPGP	KILL TIMER	=6 
	CM	DCTPGP	CLEAR POINTER	=6 
RQCL94	EQU	*		=6
	CM	DTEDLS,A7	INDICATE DATA LINK DOWN	=6
	ABL	TDISP		=1
RQCL95	EQU	*
	LDK	A2,2 
	ST	A2,DTESTA,A7	SET DTE OPEN AGAIN 
	LDR	A6,A8	RESTORE DWT ADDRESS
	ABL	RTSEQ	SEQUENCE ERROR 
	EJECT
* 
*	CONNECT PASSIVE REQUEST 
* 
*	ACTIVATION PARAMETERS:
*		- SYMBOLIC SUBADDRESS (RIGHTMOST BYTE IN ECBBA-BFR)
*		- DEVICE ADDRESSES IN ECBBA-BFR
*		- LENGTH OF BUFFER (ECBRL) 
*		- SYMBOLIC DTE-ADDRESS (ECBCW2)
* 
*	FUNCTIONS:
*		1. VERIFY DTE-ADDRESS AS PER OPEN REQUEST
*		2. VERIFY & CONVERT SUBTERMINAL ADDRESS
*		3. VERIFY AND STORE DEVICE ADDRESSES 
*		4. LINK CALLING DWT TO QUEUE 
* 
RQCON	EQU	* 
	LD	A2,DTELAD,A7	SYMBOLIC DTE-ADDR
	CW	A2,ECBCW2,A8	CORRECT DTE ?
	ABL(NE)	RTREQ	NO, RETURN: REQUEST ERROR
	LD	A2,DTESTA,A7	GET DTE STATUS 
	SUK	A2,2	OPEN ?
	ABL(NZ)	RTSEQ	NO, RETURN: SEQUENCE ERROR 
	LD	A2,DWTSTA,A6	GET DWT STATUS 
	SUK	A2,2	ALREADY CONNECTED ? 
	ABL(Z)	RTOK	ALREADY CONNECTED	=17
	IFT	MESPAS=1		=13
	LDK	A2,/40	OPTION CODE	=13 
	CC	A2,DWTOPT,A6	DISCARD DWT ?	=13
	RF(NE)	RQCN10	NO	=13 
	CM	DWTCHP,A6	INDICATE DISCARD DWT	=13
	LD	A1,DTEDDT,A7	POINTER TO DISCARD DWT	=13 
	RF(NZ)	RQCN50	MORE THAN ONE DISC. DWT ?	=13
	ST	A6,DTEDDT,A7	SAVE POINTER TO TO DISCARD DWT	=13 
	RF	RQCN60		=13 
RQCN10	EQU	*		=13 
	XIF			=13
	IFF	MMUPAG=0 
	LDKL	A4,SUBBUF	MMU BUFFER ADDRESS	=16
	ST	A4,ECBBA,A8	TO ECB
	CF	A15,DC:MOT	MOVE DATA TO MMU BUFFER
	XIF
	LD	A4,ECBBA,A8	GET ECB-BUFFER ADDRESS
	IFT	MSV1=1 
	LDK	A2,0	RESET A2
	LCR	A2,A4	GET SELECT SUB-ADDRESS 
	SC	A2,DWTSUB,A6	SAVE IT IN THE DWT 
	LD	A1,ECBCW2,A8	GET SYMBOLIC DTE-ADDRESS 
	CF	A15,GETSNA	VALIDATE AND TRANSLATE THE SUB-ADDR
	LDR	A1,A1	IS IT OK ? 
	RF(NN)	RQCN20	YES
	CM	DWTSUB,A7	CLEAR SUB-ADDRESS 
	ABL	RTREQ	RETURN REQUEST ERROR 
RQCN20	EQU	*
	IFT	CODE=1 
	LC	A1,TASCII,A1	CONVERT FROM EBCDIC TO ASCII 
	XIF
	IFT	MSV1=1 
	SC	A1,DWTCHP,A6	SAVE NETWORK ADDRESS 
	XIF
	LC	A2,1,A4	GET SYMBOLIC ADDRESS	=8 
	SC	A2,DWTSUB+1,A6	SAVE IT IN THE DWT 
	LD	A1,ECBCW2,A8	GET SYMBOLIC DTE ADDRESS 
	ST	A1,DWTLAD,A6	SAVE IT IN THE DWT 
	CF	A15,GETSNA	VALIDATE AND TRANSLATE THE SUB-ADDRESS 
	LDR	A1,A1	IS IT OK ? 
	RF(NN)	RQCN30	YES
	CM	DWTSUB,A6	CLEAR SUB-ADDRESS 
	CM	DWTLAD,A6	CLEAR DTE ADDRESS 
	ABL	RTREQ	RETURN REQUEST ERROR 
RQCN30	EQU	*
	IFT	CODE=1 
	LC	A1,TASCII,A1	CONVERT FROM EBCDIC TO ASCII 
	XIF
	SC	A1,DWTCHP+1,A6	SAVE NETWORK ADDRESS 
	IFT	EM3270=1 
	ST	A1,ECBCW2,A8
	XIF
* 
* 
*		LINK DWT TO CONFIGURATION CHAIN
* 
				=13 
RQCN40	EQU	*
	LD	A1,DTEDWT,A7	GET POINTER TO DWT QUEUE 
	RF(NZ)	RQCN50	YES
	ST	A6,DTEDWT,A7	SAVE POINTER TO DWT QUEUE
	RF	RQCN60
RQCN50	EQU	*
	LDR	A2,A1	MOV ADDR TO A2 
	LD	A1,DWTCHN,A2	POINTER TO NEXT DWT
	RB(NZ)	RQCN50	KEEP ON UNTIL LAST IN CHAIN
	ST	A6,DWTCHN,A2	ADD NEW DWT TO CHAIN 
RQCN60	EQU	*
	CM	DWTCHN,A6	END OF CHAIN MARKER 
	ST	A7,DWTCHD,A6	BACKWARD LINK TO ANCHOR
	LDK	A2,2	
	ST	A2,DWTSTA,A6	SET STATUS: CONNECTED
	LDKL	A2,/8000
	ST	A2,DWTRTV,A6	STORE NO TIMING
				=13 
	IFT	STARVI=1 
	LD	A1,DWTCHP,A6	DISCARD DWT ?	=13
	RF(Z)	RQCN65	YES, DO NOT SEND DE	=13 
	LDK	A1,4	STORE DEVICE
	ORS	A1,DWTST,A6	END IN THE DWT 
	CF	A15,INSSQ	INSERT DWT IN STATUS QUEUE
RQCN65	EQU	*		=13 
	XIF
* 
*	START POLL TIMER
* 
	LD	A2,DCTPGP	POLL TIMER POINTER
	RF(NZ)	RQCN70	TIMER ALREADY STARTED	=6 
	CF	A15,SPOTIM
RQCN70	EQU	*
	ABL	RQOP90 
	EJECT
* 
*	DISCONNECT REQUEST
* 
*	ACTIVATION PARAMETERS:
*		DWT-ADDRESS (A6) 
* 
*	FUNCTIONS:
*		1. CHECK IF IN CONNECTED STATE 
*		2. REMOVE DWT-ADDRESS FROM CONFIGURATION CHAIN 
*		3. SET DWT STATUS DISCONNECTED 
* 
*	COMPLETION PARAMETERS:
*		RETURN CODE (A1) 
* 
RQDIS	EQU	* 
	LD	A2,DWTSTA,A6	DWT STATUS = DISCONNECTED ?
	ABL(Z)	RTOK	YES, RETURN: OK
	LD	A3,DTEDWT,A7	FIRST DWT ADDR TO A3 
	RF(Z)	RQDI20	END OF CHAIN
	CWR	A3,A6	OUR DWT ?
	RF(NE)	RQDI10	NO 
	CF	A15,RELBUF	RELEASE QUEUED BUFFERS 
	LD	A3,DWTCHN,A6	YES-TAKE POINTER TO NEXT DWT 
	CM	DWTSTA,A6	SET DWT FREE
	ST	A3,DTEDWT,A7	STORE DWT-ADDR IN DTETAB 
	RB	RQCN70
RQDI10	EQU	*
	LDR	A5,A3	A5 CONTAINES PREVIOUS DWT-ADDR 
	LD	A3,DWTCHN,A5	A3 CONTAINES ADDR TO NEXT DWT ON CHAIN 
	RF(Z)	RQDI20	END OF CHAIN
	CWR	A3,A6	OUR DWT ?
	RB(NE)	RQDI10	NO TAKE NEXT IN CHAIN
	CF	A15,RELBUF	RELEASE QUEUED BUFFERS 
	LD	A3,DWTCHN,A6	YES-TAKE POINTER TO NEXT DWT 
	ST	A3,DWTCHN,A5	AND STORE IT IN PREVIOUS DWT 
	CM	DWTSTA,A6	SET DWT FREE
	RB	RQCN70
RQDI20	EQU	*
	IFT	MESPAS=1 
	LD	A3,DTEDDT,A7	TAKE THE DISCARD DWT ADDR
	CWR	A3,A6	OUR DWT ?
	RF(NE)	RQDI30	SEQUENCE ERROR 
	CF	A15,RELBUF	RELEASE BUFFERS QUEUED 
	CM	DTEDDT,A7 
	CM	DWTSTA,A6	SET DWT FREE
	RB	RQCN70
RQDI30	EQU	*
	XIF
	ABL	RTSEQ	SEQUENCE ERROR 
	EJECT
* 
* 
*	READ STATUS REQUEST 
* 
*	ACTIVATION PARAMETERS:
*		DWT - ADDRESS (A6) 
* 
*	FUNCTIONS:
*		1. TRANSFER LOGICAL CONNECTION STATUS TO APPLICATION 
* 
*	COMPLETION PARAMETERS:
*		LOGICAL CONNECTION STATUS (ECBCW1) 
* 
*	0       3 4       7 8      11 12      15
*	........................................
*	.  DWT   .  DTE    .  DATA   .  PHYS   .
*	.  STATE .  STATE  .  LINK   .  LINK   .
*	.        .         .  STATUS .  STATUS .
*	........................................
* 
RQRSTS	EQU	*
	IFT	EM3270=1 
	LD	A2,ECBCW1,A8	GET OPTION CODE
	RF(NZ)	RQRS10	TEST IF ANY MESSAGE
	XIF
	LD	A2,DWTSTA,A6	DWT STATUS 
	SLL	A2,4	BITS 0-3
	AD	A2,DTESTA,A7	DTE STATUS 
	SLL	A2,4	BITS 4-7
	AD	A2,DTEDLS,A7	DATA LINK STATUS 
	SLL	A2,4	BITS 8-11 
	AD	A2,DTEPLS,A7	PHYSICAL LINK STATUS (BITS 12 - 15)
	ST	A2,ECBCW1,A8	STATUS TO ECB CONTROL WORD 1 
	ABL	RTOK	RETURN: OK
	IFT	EM3270=1 
* 
* 
*		ANY MESSAGE ORDER (ONLY IF EM3270 = 1) 
* 
RQRS10	EQU	*
	LD	A2,DTESTA,A7	GET DTE STATUS 
	SUK	A2,2	OPEN ?
	ABL(NZ)	RTSEQ	NO,SEQUENCE ERROR
	LD	A2,DWTSTA,A6	GET DWT STATUS 
	SUK	A2,2	CONNECTED ? 
	ABL(NZ)	RTSEQ	NO,SEQUENCE ERROR
	LD	A4,DWTIPC,A6	ANY QUEUED MESSAGE ON THIS DWT ? 
	ABL(NZ)	RTOK	YES COMPLETE THE REQUEST
	ABL TDISP	TO DISPATCHER
	XIF
	EJECT
* 
*	SET STATUS REQUEST
* 
* 
*	ACTIVATION PARAMETERS 
*		DWT ADDRESS (A6) 
* 
*	FUNCTIONS:
*		SET DEVICE STATUS (ONLY IF STARVI = 1) 
* 
*		DE DEVICE END : X`'00' 
* 
*		IR INTERVENTION REQUIRED : X'01' 
* 
*		DB DEVICE BUSY :X'10'
* 
*	COMPLETION PARAMETERS:
*		RETURN CODE (A1) 
* 
RQSST	EQU	* 
	IFT	STARVI=0 
	ABL	RTREQ	SET STATUS NOT INCLUDED
	XIF
	IFT	STARVI=1 
	LD	A1,ECBCW1,A8	GET DEVICE STATUS
	ANK	A1,3	MASK DB,IR
	RF(NZ)	RQST90	NOT DE 
	LD	A1,DWTST,A6	GET DEVICE STATUS 
	ANK	A1,/B	WACK SENT, DB OR IR ?	=2 
	RF(Z)	RQST90	NO	=2 
	CF	A15,INSSQ	INSERT DWT IN STATUS QUEUE
	LDK	A1,4	SET DE
RQST90	EQU	*
	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 
	IFT	REMTIM=1		=9 
	LD	A1,DWTRTV,A6	GET REQUESTED TIMEOUT VALUE	=9 
	ST	A1,ECBCW1,A8	STORE IN CONTROL WORD 1	=9 
	XIF			=9 
	LDK	A1,0	RC : ACCEPTED AND COMPLETED 
	LDR*	A2,A4	GET NEXT BUFFER IN QUEUE
	RF(Z)	RQRE20	NO MORE BUFFERS IN QUEUE
	ORKL	A1,R:DATA	RC: AND MORE DATA AVAILABLE 
RQRE20	EQU	*
	ST	A2,DWTIPC,A6 	STORE AS FIRST IN QUEUE 
	ADK	A4,6 
	CF	A15,DC:MIN	MOVE DATA TO USER BUFFER 
RQRE40	EQU	*
	ABL	TDISP	GO TO DISPATCHER 
	EJECT
* 
* 
*		COMPLETE APPLICATION REQUEST 
* 
RTREQ	EQU	* 
	LDKL	A1,R:REQ	RC = REQUEST ERROR 
	RF	RQRTN 
RTABRT	EQU	*
	LDKL	A1,R:ABRT	RC = ABORTED
	RF	RQRTN 
RTTIME	EQU	*
	LDK	A1,R:TIME	RC = TIME OUT
	RF	RQRTN 
RTSEQ	EQU	* 
	LDK	A1,R:SEQ	RC = SEQUENCE ERROR 
	RF	RQRTN 
RTLGTH	EQU	*
	LDK	A1,R:LGTH	RC = ILLEGAL LENGTH
	RF	RQRTN 
RTLOGC	EQU	*
	LDK	A1,R:LOGC	RC = LOGICAL CONNECTION ERROR
	RF	RQRTN 
RTPHYC	EQU	*
	LDK	A1,R:PHYC	RC = PHYSICAL CONNECTION ERROR 
	RF	RQRTN 
RTOK	EQU	*
	LDK	A1,0	RC = OK 
RQRTN	EQU	* 
	ABL	DISEND	COMPLETE REQUEST AND GO TO DISPATCHER 
	EJECT
* 
*	LOOKUP - LOOK UP KEY IN TABLE & BRANCH ON ADDRESS 
* 
*	CALL: 
*		CF     A15,LOOKUP          TABLE ADDRESS TO STACK
*		DATA   LAST,ADDRE          LAST ENTRY; ERROR ADDRESS 
*		DATA   KEY1,ADDR1          KEY (A2); ADDRESS FOR BRANCH
*		 "       "    "
*	LAST	DATA   KEYN,ADDRN
* 
*	ENTRY: A2 = KEY VALUE 
*	EXIT: A3 & A4 DESTROYED 
* 
LOOKUP	EQU	*
	LDR*	A3,A15	POINT TO NEXT INSTRUCTION ADDRESS IN STACK 
	LDR*	A3,A15	GET CONTENTS = TABLE ADDRESS 
	LDR*	A4,A3	GET LAST LEGAL ADDRESS
	LD	A1,2,A3	ERROR ADDRESS 
* 
LOOK50	EQU	*	LOOP ENTRY 
	ADK	A3,4	GET NEXT TABLE ENTRY ADDRESS
	CWR	A3,A4	PAST THE END?
	RF(G)	LOOK90	YES = NOT FOUND 
	CWR*	A2,A3	KEY = VALUE IN TABLE? 
	RB(NE)	LOOK50	NO - CHECK NEXT ENTRY
	ABI	2,A3	BRANCH TO TABLE ADDRESS 
*		KEY NOT FOUND
LOOK90	EQU	*
	LDR	P,A1	GO TO ERROR ADDRESS 
	EJECT
* 
* 
* 
*	REQUEST TIMER HANDLING PART 
* 
* 
* 
*	RECEIVE TIMER=TIMERR
* 
TIMERE	EQU	*
	LDR	A1,A6
	LD	A2,DWTRTV,A6	GET TIMEOUT VALUE
	RF(N)	TIMRTN	NO TIMING 
	RF(Z)	ITOUTR	TIMER=0 => IMMEDIATE TIMEOUT
	ST	A2,TIMERR 
	CF	A15,SETIME
	DATA	TOUTRE
TIMERR	DATA	0 
	ST	A4,DWTRTP,A6	STORE TIMER POINTER
TIMRTN	EQU	*
	ABL	RTNA15 
* 
*	TIMEOUT READ TIMER
* 
ITOUTR	EQU	*
	ADKL	A15,4 
	RF	TIMOUT
TOUTRE	EQU	*
	LDR	A6,A1	FETCH DWT
	CM	DWTRTP,A6 
	RF	TIMOUT	COMPLETE REQUEST RC=TIMEOUT
* 
* 
*		 RETURN FROM TIMER HANDLING
* 
	EJECT
* 
*	SEND TIMER=TIMWR
* 
TIMEWR	LDR	A1,A6
	LD	A2,DWTRTV,A6	GET TIMEOUT VALUE
	RB(N)	TIMRTN	NO TIMING 
	RB(Z)	ITOUTR	TIMER=0 => IMMEDIATE TIMEOUT
	ST	A2,TIMWR
	CF	A15,SETIME
	DATA	TOUTWR
TIMWR	DATA	0
	ST	A4,DWTRTP,A6
	RB	TIMRTN
* 
*	TIMEOUT WRITE TIMER 
* 
TOUTWR	EQU	*
	LDR	A6,A1	FETCH DWT
	CM	DWTRTP,A6 
	CF	A15,REMOVW	REMOVE FROM WRITE QUEUE
* 
* 
*	THIS INSTRUCTION DOES NOT BELONG
*	TO THE STANDARD INTERFACE 
	LD	A2,FDWTUT 
	CWR	A2,A6
	RF(NE)	TIMOUT	THIS DWT IS NOT WRITING
	CM	XACK	INDICATE 'ACK NOT EXPECTED'
	CM	FDWTUT
TIMOUT	EQU	*
	ABL	RTTIME	COMPLETE REQUEST RC=TIMEOUT 
	EJECT
* 
* 
*	STOP REQUEST TIMING 
* 
*	REMAINING TIME IS RETURNED IN A2
* 
* 
CTIME	EQU	* 
	LD	A2,DWTRTP,A6	GET TIMER POINTER
	RF(Z)	CTIM10	NOT RUNNING 
	IFT	REMTIM=1		=9 
	LDR*	A2,A2		=9 
	NGR	A2,A2	GET REMAINING TIME	=9
	XIF			=9 
	CM*	DWTRTP,A6	KILL TIMER	=9
	CM	DWTRTP,A6 
				=3
CTIM10	EQU	*
	ABL	RTNA15 
	EJECT
* 
*	GET RECEIVE BUFFER
* 
*	CALLING SEQUENCE: CF A15,GRBUF
*	A4=0 IF NO BUFFER IS FREE 
*	ELSE A4 CONTAINS BUFFER ADDRESS 
*	A2 AND A3 ARE DESTROYED 
* 
* 
GRBUF	LDKL	A2,DCRBUF	RECEIVE BUFFERS
	INH
	LDR*	A4,A2 
	RF(Z)	GBUF10	NO BUFFER FREE
	LDR*	A3,A4	REMOVE BUFFER FROM FREE CHAIN 
	STR	A3,A2
GBUF10	EQU	*
	ABL	RTNA15 
	EJECT
* 
* 
*	RELEASE RECEIVE BUFFER
* 
*	A4 CONTAINS BUFFER ADDRESS
*	CALLING SEQUENCE: CF A15,RRBUF
*	A2 AND A3 ARE DESTROYED 
* 
* 
RRBUF	LDKL	A2,DCRBUF	RECEIVE BUFFERS
	INH
RBUF10	EQU	*
	LDR*	A3,A2 
	RF(Z)	RBUF20 
	LDR	A2,A3
	RB	RBUF10
RBUF20	EQU	*
	STR	A4,A2
	CMR	A4 
	RB	GBUF10	RETURN TO CALLER 
	EJECT
* 
*	RELEASE ALL RECEIVE BUFFERS QUEUED ON A DWT 
* 
*	A6 - DWT ADDR 
*	A1 AND A4 ARE DESTROYED 
*	CALLING SEQUENCE: CF    A15,RELBUF
* 
* 
RELBUF	EQU	*
	LDK	A1,DWTIPC	SET BUFFER QUEUE DISP. 
	ADR	A1,A6
RLBU10	EQU	*
	LDR*	A4,A1	NEXT IN BUFFER QUEUE
	RB(Z)	GBUF10 
	LDR*	A2,A4	REMOVE FROM QUEUE 
	STR	A2,A1	.
	CF	A15,RRBUF	RELEASE BUFFER
	RB	RLBU10
	EJECT
* 
* 
*	INSERT DWT IN SEND REQUEST QUEUE
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSWQ	LDKL	A2,DCWRQ	GET QUEUE ANCHOR
	LDK	A4,DWTOPN
INSWQ2	LDR*	A3,A2 
	RF(Z)	INSWQ3	END OF QUEUE FOUND
	LDR	A2,A3
	RB	INSWQ2
INSWQ3	ADR	A4,A6
	STR	A4,A2	INSERT IN QUEUE
	CMR	A4	INDICATE END OF QUEUE 
	RB	GBUF10	RETURN 
	EJECT
* 
* 
*	REMOVE DWT FROM SEND REQUEST QUEUE
* 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
REMOVW	LDKL	A2,DCWRQ	GET QUEUE ANCHOR 
	LDK	A4,DWTOPN	GET DWT-LINK TO BE REMOVED 
REM06	EQU	* 
	ADR	A4,A6	 
REM10	LDR*	A3,A2
	RB(Z)	GBUF10	NOT ON QUEUE: RETURN
	CWR	A3,A4
	RF(E)	REM15
	LDR	A2,A3	GET NEXT 
	RB	REM10 
REM15	LDR*	A3,A4	REMOVE 
	STR	A3,A2
	RB	GBUF10	RETURN 
	EJECT
* 
* 
*	INSERT DWT IN STATUS QUEUE
* 
	IFF	STARVI=0 
*	A2,A3,A4 DESTROYED
*	A6=DWT
* 
INSSQ	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 
				=1
	LDKL	A5,STB		=1
	CF	A5,CSYNCI	CONNECT MODEM	=1
	CF	A5,CHALTI	NO INTERRUPTS ALLOWED	=1
	ABL	TDISP	=1 


* 
* 
*   MODEM-CONNECT TIMEOUT 
* 

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

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

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

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

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

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

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

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

TRT101	EQU	*

	LDK	A2,SF
	CF	A5,WRITEP	SEND START FIELD

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

	IFF	CPU852=1 
	MSR	8,A15	SAVE A1-A8 
	XIF
	CF	A15,LDREG	RESTORE DC REGS A3 - A8 
	INR	A2,0,LCUIN	READ CHAR 
	RF(NA)	IHIN20	NOT ACCEPTED,CHECK STATUS
	IFF	LOGG=0 
	CF	A5,LOGIN	LOG RECEIVED CHARACTER 
	XIF
	IFT	TPMODE=1 
	C2	TPM 
	RF(NZ)	IHLC10	DO NOT SKIP SYNC IN TRANSPARENT TEXT 
	XIF
	C2	SYNSW 
	RF(NZ)	IHLC05	DO NOT SKIP SYNS IN BCC FRAME
	CWK	A2,SYNC
	RF(E)	READ 
IHLC05	EQU	*
	IFT	CODE=0 
	XRR	A8,A2	CALCULATE LRC
	XIF
	IFT	CODE=1 
	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	*
				=4
				=13 
	XIF
	LD	A2,DTESTA,A7	DTE STATUS 
	SUK	A2,2 
	ABL(NZ)	TDISP	OPEN NOT EXECUTED
	CM	DCLCI	INIT LINE CONTROL UNIT INFO 
	LD	A2,DCTPGP	GET POLL TIMER POINTER
	RF(NZ)	DC1540	ALREADY STARTED
	CF	A15,SPOTIM	START POLL TIMER 
DC1540	EQU	*
	ABL	BRM
	EJECT
	IFT	CODE=1 
* 
* 
*	CALCULATION OF CRC
* 
*	A2 = CHARACTER
*	A8 = ACCUMULATED CRC
* 
* 
CRCCAL	EQU	*
	ST	A1,CRCSAV+2 
	ST	A2,CRCSAV+6 
	ST	A3,CRCSAV+10
	ST	A4,CRCSAV+14
	LDK	A1,8 
	LDR	A4,A8	GET OLD CRC
CRC100	LDR	A3,A4
	SRL	A4,1 
	XRR	A3,A2
	SRL	A2,1 
	ANK	A3,1 
	RF(Z)	CRC110 
	XRKL	A4,/A001
CRC110	SUK	A1,1 
	RB(NZ)	CRC100
	LDR	A8,A4	SAVE NEW CRC 
CRCSAV	EQU	*
	LDKL	A1,0
	LDKL	A2,0
	LDKL	A3,0
	LDKL	A4,0
	RTN	A5 
	EJECT
* 
* 
*	READ CRC CHARACTERS AND CHECK THEM
*	CR = (E) IF CRC WAS OK
* 
* 
RDCRC	EQU	* 
	STR	A8,A5	SAVE CURRENT CRC 
	SUK	A5,2	ADJUST STACK POINTER
	IM	SYNSW	DO NOT SKIP SYNCS NOW 
	CF	A5,READ	READ BYTE 1 
	LD	A4,CRCSAV+6	SAVE IT 
	CF	A5,READ	READ BYTE 2 
	CM	SYNSW	SYNCS CAN BE SKIPPED AGAIN
	LD	A2,CRCSAV+6	SAVE IT 
	SLL	A2,8 
	XRR	A2,A4
	ADK	A5,6 
	CW	A2,-4,A5
	ABR*	A5
	XIF
	IFT	CODE=0 
* 
*   RDLRC      READ LRC CHARACTER 
*              CR=0 IF LRC OK 
* 
RDLRC	IM	SYNSW
	CF	A5,READP
	ADK	A5,4 
	LDR	A1,A1
	RF(NZ)	LRCEND
	ANKL	A8,/007F
LRCEND	EQU	*
	CM	SYNSW 
	ABR*	A5

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

	IFF	MMUPAG=0 
MMUBUF	RES	TBUFL+1	MMU WORK BUFFER
SUBBUF	RES	3	MMU BUFFER FOR CONNECT REQUEST	=16 
	XIF
	EJECT
* 
* 
*	INTERRUPT LOGGING ROUTINE 
* 
* 
	IFF	LOGG=0 
LOGSST	ST	A2,SAVE2
	ORKL	A2,/F000
	RF	LOG10 
LOGOUT	ST	A2,SAVE2
	ORKL	A2,/0F00
	RF	LOG10 
LOGIN	CWK	A2,/FF
	RF(E)	LOGE10 
	ST	A2,SAVE2
LOG10	ST	A3,SAVE3 
	LD	A3,LOGPNT 
	STR	A2,A3
	ADK	A3,2 
	CWK	A3,LOGEND
	RF(L)	LOGEXI 
	LDKL	A3,LOGSTA 
LOGEXI	ST	A3,LOGPNT 
	LD	A2,SAVE2
	LD	A3,SAVE3
LOGE10	RTN	A5 
	EJECT
* 
* 
LOGPNT	DATA	LOGSTA
LOGSTA	EQU	*
	RES	300
LOGEND	EQU	*-4
SAVE2	DATA	0
SAVE3	DATA	0
	XIF
* 
* 
* 
	IFT	RCOM=1 
	EJECT
******************************************************* 
* 
*     L I N C O L 
* 
*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER
* 
**********************************************************

LINCOL	EQU	*
	LDR	A2,A3	COPY CURSOR ADDRESS
	SRL	A2,6 
	ANK	A2,X'3F'	
	LC	A2,LICO:T,A2	ASCII LINE NUMBER
	CF	A5,WRITEP	SEND LINE NUMBER

	LDR	A2,A3
	ANK	A2,X'3F' 
	LC	A2,LICO:T,A2	ASCII COLUMN NUMBER
	CF	A5,WRITEP	SEND COLUMN NUMBER
	RTN	A5	RETURN
* 
* 
* 
	EJECT


LICO:T	EQU	*
	DATA	/2041,/4243,/4445,/4647	/00-/07 
	DATA	/4849,/5B2E,/3C28,/2B21	/08-/0F 
	DATA	/264A,/4B4C,/4D4E,/4F50	/10-/17 
	DATA	/5152,/5D24,/2A29,/3B5E	/18-/1F 
	DATA	/2D2F,/5354,/5556,/5758	/20-/27 
	DATA	/595A,/7C2C,/255F,/3E3F	/28-/2F 
	DATA	/3031,/3233,/3435,/3637	/30-37
	DATA	/3839,/3A23,/4027,/3D22	/38-3F
	XIF
	EJECT
* 
*	DTETAB
* 
*	FIXED PART
* 
DW1500	EQU	*
DTETAB	DATA	0,0 
	DATA	0,0,0,0,0,0 
	IFT	MMUPAG=1 
	DATA	0,0 
	XIF
*	DRIVER DEPENDENT PART 
	DATA	DTESBU-DTETAB	START OF STATISTIC BUFFER 
	DATA	0,0,0,0,0,0 
	DATA	0,0,0,0,0,0	 *
DTESBU	EQU	*
	DATA	0	SYMBOLIC ID 
	DATA	0	COUNTER STATUS WORD 
	DATA	/20	MAX NUMBER OF COUNTERS
	RES	/20	STATISTIC BUFFER 
	EJECT
* 
* 
*	PROCEDURE WORK AREAS
* 
* 
FDWTIN	RES	1	CURRENT DWT FOR RECEPTION
FDWTUT	RES	1	CURRENT DWT FOR TRANSMISSION 
XACK	DATA	0	ACK EXPECTED
XSEL	DATA	0	SELECTED
XETX	DATA	0	ETX SENT
XSTA	DATA	0	STATUS SENT / MESSAGE INPUT RESULT
XRB	DATA	0	READ BUFFER SWITCH 
CACK	DATA	0	ACK COUNTER 
SYNSW	DATA	0	0=SKIP SYNS, 1=DON'T SKIP
TPM	DATA	0	IF =1 TRANSPARENT TEXT 
* 
FECB	RES	1	WRITING ECB
FECBBA	RES	1	WRITING BUFFER ADDRESS 
FECBRL	RES	1	WRITING BUFFER LENGTH
FBAX	DATA	0	BUFFER INDEX
FBLST	DATA	0	START OF LAST TRANSMITTED BLOCK
DCSTQ	DATA	0	STATUS QUEUE ANCHOR
DCTPP	DATA	0	POINTER FOR PROCEDURE TIMING 
DCWRQ	DATA	0	WRITE REQUEST QUEUE
RESEND	DATA	0	CONTROL SEQUENCE SAVE AREA
* 
	EJECT
* 
* 
*	CONSTANTS AND WORK AREAS
* 
* 
DCSTCU	DATA	0	CURRENT STATUS
DCTPGP	DATA	0	TIMER POINTER GENERAL POLL
DCLCI	DATA	0	DC UNIT INPUT STATUS 
	END

HexDump

0x00000…00034 (0, 0, 400)   Head {h00=0x0030, h01=0x0050, text=» IDENT DRDC15 REL 11.0 81-09-09 870105041100«, t00=0x0000, t01=0x0004}
0x00034…0003c               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x0003c…00062               Head {h00=0x0022, h01=0x0050, text=»   =17, RETURN CODE AT CONNECT«, t00=0x0000, t01=0x0040}
0x00062…0008e               Head {h00=0x0028, h01=0x0050, text=»   =16, DLOBUF DESTROYED AT CONNECT «, t00=0x0000, t01=0x0066}
0x0008e…000c0               Head {h00=0x002e, h01=0x0050, text=»   =15, NO NEED TO RES 1 WORD BEFORE DATA «, t00=0x0000, t01=0x0092}
0x000c0…000ee               Head {h00=0x002a, h01=0x0050, text=»   =14, LOSS OF DRIVER RECEIVE BUFFER «, t00=0x0000, t01=0x00c4}
0x000ee…0010a               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-05-21«, t00=0x0000, t01=0x00f2}
0x0010a…00138               Head {h00=0x002a, h01=0x0050, text=»   =13, ERRONEOUS DISCARD DWT HANDLING«, t00=0x0000, t01=0x010e}
0x00138…0016c               Head {h00=0x0030, h01=0x0050, text=»   =12, SUB-ADDR IN CW2 AT RECEIVE REQ COMPL«, t00=0x0000, t01=0x013c}
0x0016c…00188               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-05-12«, t00=0x0000, t01=0x0170}
0x00188…001b0               Head {h00=0x0024, h01=0x0050, text=»   =11, PROCEDURE TIMER PROBLEM «, t00=0x0000, t01=0x018c}
0x001b0…001d4               Head {h00=0x0020, h01=0x0050, text=»   =10, EOT ON SPECIFIC POLL«, t00=0x0001, t01=0x0024}
0x001d4…001fc               Head {h00=0x0024, h01=0x0050, text=»   =9, REMAINING TIME IN ECBCW1 «, t00=0x0001, t01=0x0048}
0x001fc…00218               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-04-12«, t00=0x0001, t01=0x0070}
0x00218…0023e               Head {h00=0x0022, h01=0x0050, text=»   =8, ODD USER BUFFER ADDRESS«, t00=0x0001, t01=0x008c}
0x0023e…00262               Head {h00=0x0020, h01=0x0050, text=»   =7, BINARY STORE PROBLEM «, t00=0x0001, t01=0x00b2}
0x00262…0027e               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-04-07«, t00=0x0001, t01=0x00d6}
0x0027e…002aa               Head {h00=0x0028, h01=0x0050, text=»   =6, ERROR IN POLL TIMER HANDLING «, t00=0x0001, t01=0x00f2}
0x002aa…002d2               Head {h00=0x0024, h01=0x0050, text=»   =5, WRONG STATISTIC HANDLING «, t00=0x0001, t01=0x011e}
0x002d2…002ee               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-03-27«, t00=0x0001, t01=0x0146}
0x002ee…0030e               Head {h00=0x001c, h01=0x0050, text=»   =4, ERROR IN POWER UP«, t00=0x0001, t01=0x0162}
0x0030e…0033a               Head {h00=0x0028, h01=0x0050, text=»   =3, DELETE INSTRUCTIONS NOT USED «, t00=0x0001, t01=0x0182}
0x0033a…00362               Head {h00=0x0024, h01=0x0050, text=»   =2, CHANGES IN STATUS HANLING«, t00=0x0002, t01=0x001e}
0x00362…0038e               Head {h00=0x0028, h01=0x0050, text=»   =1, ERROR IN OPEN/CLOSE REQUESTS «, t00=0x0002, t01=0x0046}
0x0038e…003aa               Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-01-26«, t00=0x0002, t01=0x0072}
0x003aa…003b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x008e}
0x003b4…003be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0098}
0x003be…003f4               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x00a2}
0x003f4…003fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d8}
0x003fe…00426               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0002, t01=0x00e2}
0x00426…00430               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x010a}
0x00430…0045e               Head {h00=0x002a, h01=0x0050, text=»*   DRDC15: DRIVER DATA COMMUNICATION «, t00=0x0002, t01=0x0114}
0x0045e…00490               Head {h00=0x002e, h01=0x0050, text=»*           BSC MULTIPOINT LINE PROCEDURE «, t00=0x0002, t01=0x0142}
0x00490…004b4               Head {h00=0x0020, h01=0x0050, text=»*           OR SIEMENS MSV1 «, t00=0x0002, t01=0x0174}
0x004b4…004be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0008}
0x004be…004c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0012}
0x004c8…004d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x001c}
0x004d2…004dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0026}
0x004dc…004e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0030}
0x004e6…00522               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0003, t01=0x003a}
0x00522…00530               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0076}
0x00530…0053a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0084}
0x0053a…00544               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x008e}
0x00544…0055a               Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0003, t01=0x0098}
0x0055a…00564               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ae}
0x00564…0059a               Head {h00=0x0032, h01=0x0050, text=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS «, t00=0x0003, t01=0x00b8}
0x0059a…005c0               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1501 INPUT INTERRUPT «, t00=0x0003, t01=0x00ee}
0x005c0…005e6               Head {h00=0x0022, h01=0x0050, text=» ENTRY IH1502 OUTPUT INTERRUPT«, t00=0x0003, t01=0x0114}
0x005e6…0060c               Head {h00=0x0022, h01=0x0050, text=» ENTRY DC15ON POWER ON ROUTINE«, t00=0x0003, t01=0x013a}
0x0060c…0062c               Head {h00=0x001c, h01=0x0050, text=» ENTRY DW1500 DUMMY DWT «, t00=0x0003, t01=0x0160}
0x0062c…00636               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0180}
0x00636…00644               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x018a}
0x00644…0064e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0008}
0x0064e…00658               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0012}
0x00658…00676               Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0004, t01=0x001c}
0x00676…00680               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x003a}
0x00680…006a6               Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0004, t01=0x0044}
0x006a6…006d2               Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 SAVE A1-A8 ON A15 STACK«, t00=0x0004, t01=0x006a}
0x006d2…006fa               Head {h00=0x0024, h01=0x0050, text=» EXTRN TENDIO COMPLETE I/O EVENT«, t00=0x0004, t01=0x0096}
0x006fa…0071a               Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0004, t01=0x00be}
0x0071a…0073c               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTCHP DWT ADDRESS «, t00=0x0004, t01=0x00de}
0x0073c…0075c               Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0004, t01=0x0100}
0x0075c…0077a               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTOR DWT ORDER«, t00=0x0004, t01=0x0120}
0x0077a…00798               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTECB DWT ECB «, t00=0x0004, t01=0x013e}
0x00798…007ba               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTOPT OPTION CODE «, t00=0x0004, t01=0x015c}
0x007ba…007e0               Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTUEC USER ECB IF MMU «, t00=0x0004, t01=0x017e}
0x007e0…007fe               Head {h00=0x001a, h01=0x0050, text=» EXTRN DWTMEC MMU ECB «, t00=0x0005, t01=0x0014}
0x007fe…0081c               Head {h00=0x001a, h01=0x0050, text=» EXTRN ECBFC FILE CODE«, t00=0x0005, t01=0x0032}
0x0081c…00840               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBBA BUFFER ADDRESS «, t00=0x0005, t01=0x0050}
0x00840…00866               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBRL REQUESTED LENGTH «, t00=0x0005, t01=0x0074}
0x00866…0088c               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBEL EFFECTIVE LENGTH «, t00=0x0005, t01=0x009a}
0x0088c…008b0               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBCW1 CONTROL WORD 1«, t00=0x0005, t01=0x00c0}
0x008b0…008d4               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBCW2 CONTROL WORD 2«, t00=0x0005, t01=0x00e4}
0x008d4…008ea               Head {h00=0x0012, h01=0x0050, text=» EXTRN GETSSA «, t00=0x0005, t01=0x0108}
0x008ea…00918               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0005, t01=0x011e}
0x00918…00944               Head {h00=0x0028, h01=0x0050, text=» EXTRN TEBCDIC ASCII TO EBCDIC TABLE«, t00=0x0005, t01=0x014c}
0x00944…00970               Head {h00=0x0028, h01=0x0050, text=» EXTRN TASCII EBCDIC TO ASCII TABLE «, t00=0x0005, t01=0x0178}
0x00970…009a2               Head {h00=0x002e, h01=0x0050, text=» EXTRN DCSRED READ STATISTICS ENTRY POINT «, t00=0x0006, t01=0x0014}
0x009a2…009e0               Head {h00=0x003a, h01=0x0050, text=» EXTRN DCSRLL RESET ALL STATISTICS BUFFERS ENTRY POINT«, t00=0x0006, t01=0x0046}
0x009e0…00a1e               Head {h00=0x003a, h01=0x0050, text=» EXTRN DCSUPS UPDATE STATISTICS ENTRY POINT IN DCSTAT «, t00=0x0006, t01=0x0084}
0x00a1e…00a5a               Head {h00=0x0038, h01=0x0050, text=» EXTRN GETDNA VALIDATE AND CONVERT SYMBOLIC DTE ADDR«, t00=0x0006, t01=0x00c2}
0x00a5a…00a96               Head {h00=0x0038, h01=0x0050, text=» EXTRN GETSNA VALIDATE AND CONVERT SYMBOLIC SUB ADDR«, t00=0x0006, t01=0x00fe}
0x00a96…00ac4               Head {h00=0x002a, h01=0x0050, text=» EXTRN DC:MIN MOVE DATA TO USER BUFFER«, t00=0x0006, t01=0x013a}
0x00ac4…00af4               Head {h00=0x002c, h01=0x0050, text=» EXTRN DC:MOT MOVE DATA FROM USER BUFFER«, t00=0x0006, t01=0x0168}
0x00af4…00b28               Head {h00=0x0030, h01=0x0050, text=» EXTRN DISEND COMPLETE REQUEST AND DISPATCH «, t00=0x0007, t01=0x0008}
0x00b28…00b56               Head {h00=0x002a, h01=0x0050, text=» EXTRN PFPOST WAIT FOR POWER UP IF SET«, t00=0x0007, t01=0x003c}
0x00b56…00b66               Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x0007, t01=0x006a}
0x00b66…00bb4               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0007, t01=0x007a}
0x00bb4…00bbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c8}
0x00bbe…00bd8               Head {h00=0x0016, h01=0x0050, text=»* REGISTER USAGE: «, t00=0x0007, t01=0x00d2}
0x00bd8…00be2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ec}
0x00be2…00c02               Head {h00=0x001c, h01=0x0050, text=»* A1 WORK (RETURN CODE) «, t00=0x0007, t01=0x00f6}
0x00c02…00c14               Head {h00=0x000e, h01=0x0050, text=»* A2 WORK «, t00=0x0007, t01=0x0116}
0x00c14…00c36               Head {h00=0x001e, h01=0x0050, text=»* A3 WORK (BUFFER LENGTH) «, t00=0x0007, t01=0x0128}
0x00c36…00c58               Head {h00=0x001e, h01=0x0050, text=»* A4 WORK (BUFFER POINTER)«, t00=0x0007, t01=0x014a}
0x00c58…00c7a               Head {h00=0x001e, h01=0x0050, text=»* A5 DRIVER STACK POINTER «, t00=0x0007, t01=0x016c}
0x00c7a…00c92               Head {h00=0x0014, h01=0x0050, text=»* A6 DWT ADDRESS«, t00=0x0007, t01=0x018e}
0x00c92…00cba               Head {h00=0x0024, h01=0x0050, text=»* A7 ORDER CODE, DTETAB ADDRESS «, t00=0x0008, t01=0x0016}
0x00cba…00cd2               Head {h00=0x0014, h01=0x0050, text=»* A8 ECB ADDRESS«, t00=0x0008, t01=0x003e}
0x00cd2…00cdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0056}
0x00cdc…00d2c               Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0008, t01=0x0060}
0x00d2c…00d3a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x00b0}
0x00d3a…00d7a               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0008, t01=0x00be}
0x00d7a…00d84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00fe}
0x00d84…00db2               Head {h00=0x002a, h01=0x0050, text=»* PARAMETERS FOR CONDITIONAL ASSEMBLY «, t00=0x0008, t01=0x0108}
0x00db2…00dbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0136}
0x00dbc…00dc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0140}
0x00dc6…00df0               Head {h00=0x0026, h01=0x0050, text=»X:A EQU 1000 RECEIVE BUFFER LENGTH«, t00=0x0008, t01=0x014a}
0x00df0…00e06               Head {h00=0x0012, h01=0x0050, text=»RBUFL EQU X:A «, t00=0x0008, t01=0x0174}
0x00e06…00e2e               Head {h00=0x0024, h01=0x0050, text=»X:B EQU 0 IF 1 INTERRUPT LOGGING«, t00=0x0008, t01=0x018a}
0x00e2e…00e42               Head {h00=0x0010, h01=0x0050, text=»LOGG EQU X:B«, t00=0x0009, t01=0x0022}
0x00e42…00e68               Head {h00=0x0022, h01=0x0050, text=»X:C EQU 600 POLL TIMEOUT VALUE«, t00=0x0009, t01=0x0036}
0x00e68…00e7e               Head {h00=0x0012, h01=0x0050, text=»TIMPOL EQU X:C«, t00=0x0009, t01=0x005c}
0x00e7e…00eac               Head {h00=0x002a, h01=0x0050, text=»X:D EQU 0 STATUS AND RVI HANDLING IF=1«, t00=0x0009, t01=0x0072}
0x00eac…00ec2               Head {h00=0x0012, h01=0x0050, text=»STARVI EQU X:D«, t00=0x0009, t01=0x00a0}
0x00ec2…00eee               Head {h00=0x0028, h01=0x0050, text=»X:E EQU 0 READ COMMAND HANDLING IF=1«, t00=0x0009, t01=0x00b6}
0x00eee…00f02               Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:E«, t00=0x0009, t01=0x00e2}
0x00f02…00f2c               Head {h00=0x0026, h01=0x0050, text=»X:F EQU 254 TRANSMIT BLOCK LENGTH «, t00=0x0009, t01=0x00f6}
0x00f2c…00f42               Head {h00=0x0012, h01=0x0050, text=»TBLEN EQU X:F «, t00=0x0009, t01=0x0120}
0x00f42…00f6e               Head {h00=0x0028, h01=0x0050, text=»X:G EQU 0 CODE , 0=ASCII , 1=EBCDIC «, t00=0x0009, t01=0x0136}
0x00f6e…00f82               Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:G«, t00=0x0009, t01=0x0162}
0x00f82…00fb0               Head {h00=0x002a, h01=0x0050, text=»X:H EQU 0 IF 1 SPECIFIC POLL HANDLING «, t00=0x0009, t01=0x0176}
0x00fb0…00fc6               Head {h00=0x0012, h01=0x0050, text=»SPECP EQU X:H «, t00=0x000a, t01=0x0014}
0x00fc6…00ff6               Head {h00=0x002c, h01=0x0050, text=»X:I EQU 0 IF = 1 LINE SPEED SET TO HIGH «, t00=0x000a, t01=0x002a}
0x00ff6…01022               Head {h00=0x0028, h01=0x0050, text=»   IF = 0  LINE SPEED IS SET TO LOW «, t00=0x000a, t01=0x005a}
0x01022…01038               Head {h00=0x0012, h01=0x0050, text=»SPEED EQU X:I «, t00=0x000a, t01=0x0086}
0x01038…01066               Head {h00=0x002a, h01=0x0050, text=»X:J EQU 0 IF 1 SIEMENS MSV1 PROCEDURE «, t00=0x000a, t01=0x009c}
0x01066…0107a               Head {h00=0x0010, h01=0x0050, text=»MSV1 EQU X:J«, t00=0x000a, t01=0x00ca}
0x0107a…010ac               Head {h00=0x002e, h01=0x0050, text=»X:K EQU 2 NUMBER OF RECEIVE BUFFERS (2-5) «, t00=0x000a, t01=0x00de}
0x010ac…010c2               Head {h00=0x0012, h01=0x0050, text=»RBUFNR EQU X:K«, t00=0x000a, t01=0x0110}
0x010c2…010f4               Head {h00=0x002e, h01=0x0050, text=»X:L EQU 0 IF = 1  PTS 6805 ADAPTION SALCUZ«, t00=0x000a, t01=0x0126}
0x010f4…0110a               Head {h00=0x0012, h01=0x0050, text=»P6805 EQU X:L «, t00=0x000a, t01=0x0158}
0x0110a…0111e               Head {h00=0x0010, h01=0x0050, text=»X:M EQU /02 «, t00=0x000a, t01=0x016e}
0x0111e…01132               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x000a, t01=0x0182}
0x01132…01162               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU X:M DEVICE ADDRESS OF RECEIVER«, t00=0x000b, t01=0x0008}
0x01162…0116e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0038}
0x0116e…01182               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x0044}
0x01182…011b2               Head {h00=0x002c, h01=0x0050, text=»LCUIN EQU /0A DEVICE ADDRESS OF RECEIVER«, t00=0x000b, t01=0x0058}
0x011b2…011be               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0088}
0x011be…011da               Head {h00=0x0018, h01=0x0050, text=» IFT P6805=0  SALCUZ«, t00=0x000b, t01=0x0094}
0x011da…0121a               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x00b0}
0x0121a…01230               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x00f0}
0x01230…01244               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x000b, t01=0x0106}
0x01244…01284               Head {h00=0x003c, h01=0x0050, text=»LCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ«, t00=0x000b, t01=0x011a}
0x01284…0129a               Head {h00=0x0012, h01=0x0050, text=» XIF   SALCUZ «, t00=0x000b, t01=0x015a}
0x0129a…012ac               Head {h00=0x000e, h01=0x0050, text=»X:N EQU 0 «, t00=0x000b, t01=0x0170}
0x012ac…012de               Head {h00=0x002e, h01=0x0050, text=»IBMCHR EQU X:N IF 1 IBM CHARACTER HANDLING«, t00=0x000b, t01=0x0182}
0x012de…01310               Head {h00=0x002e, h01=0x0050, text=»X:O EQU 0 IF 1 MESSAGE PASSING TO DC TASK «, t00=0x000c, t01=0x0024}
0x01310…01326               Head {h00=0x0012, h01=0x0050, text=»MESPAS EQU X:O«, t00=0x000c, t01=0x0056}
0x01326…0135e               Head {h00=0x0034, h01=0x0050, text=»X:P EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0«, t00=0x000c, t01=0x006c}
0x0135e…01374               Head {h00=0x0012, h01=0x0050, text=»EM3270 EQU X:P«, t00=0x000c, t01=0x00a4}
0x01374…01386               Head {h00=0x000e, h01=0x0050, text=»X:Q EQU 0 «, t00=0x000c, t01=0x00ba}
0x01386…013b4               Head {h00=0x002a, h01=0x0050, text=»TPMODE EQU X:Q IF = 1 TRANSPARANT MODE«, t00=0x000c, t01=0x00cc}
0x013b4…013c6               Head {h00=0x000e, h01=0x0050, text=»X:R EQU 0 «, t00=0x000c, t01=0x00fa}
0x013c6…013f8               Head {h00=0x002e, h01=0x0050, text=»STTSTS EQU X:R IF = 1 STATISTICS INCLUDED «, t00=0x000c, t01=0x010c}
0x013f8…0140c               Head {h00=0x0010, h01=0x0050, text=»X:S EQU 500 «, t00=0x000c, t01=0x013e}
0x0140c…01434               Head {h00=0x0024, h01=0x0050, text=»TBUFL EQU X:S MMU BUFFER LENGTH «, t00=0x000c, t01=0x0152}
0x01434…01462               Head {h00=0x002a, h01=0x0050, text=»BINTRM EQU 0 IF 1 BINARY TRANSMISSION «, t00=0x000c, t01=0x017a}
0x01462…01492               Head {h00=0x002c, h01=0x0050, text=»DMRK EQU 0 SPECIAL CONDITION FOR DENMARK«, t00=0x000d, t01=0x0018}
0x01492…014ca               Head {h00=0x0034, h01=0x0050, text=»NOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT«, t00=0x000d, t01=0x0048}
0x014ca…014fe               Head {h00=0x0030, h01=0x0050, text=»   DOESN'T ACCEPT WACK RESPONSE TO A SELECT «, t00=0x000d, t01=0x0080}
0x014fe…01532               Head {h00=0x0030, h01=0x0050, text=»   SEQUENCE, NOWACK SHOULD BE SET TO "ONE". «, t00=0x000d, t01=0x00b4}
0x01532…01540               Head {h00=0x000a, h01=0x0050, text=»    =2«, t00=0x000d, t01=0x00e8}
0x01540…01548               Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x00f6}
0x01548…01560               Head {h00=0x0014, h01=0x0050, text=»REMTIM EQU 0  =9«, t00=0x000d, t01=0x00fe}
0x01560…01596               Head {h00=0x0032, h01=0x0050, text=»   IF = 1 THE REMAINING TIME UNTIL TIMEOUT =9 «, t00=0x000d, t01=0x0116}
0x01596…015ca               Head {h00=0x0030, h01=0x0050, text=»   IS DELIVERED IN ECBCW1 AT COMPLETION  =9 «, t00=0x000d, t01=0x014c}
0x015ca…015f4               Head {h00=0x0026, h01=0x0050, text=»   OF SEND AND RECEIVE REQUESTS =9«, t00=0x000d, t01=0x0180}
0x015f4…015fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x001a}
0x015fe…01612               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=1«, t00=0x000e, t01=0x0024}
0x01612…0162a               Head {h00=0x0014, h01=0x0050, text=»LSPEED EQU /0200«, t00=0x000e, t01=0x0038}
0x0162a…01636               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0050}
0x01636…0164a               Head {h00=0x0010, h01=0x0050, text=» IFT SPEED=0«, t00=0x000e, t01=0x005c}
0x0164a…0165e               Head {h00=0x0010, h01=0x0050, text=»LSPEED EQU 0«, t00=0x000e, t01=0x0070}
0x0165e…0166a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0084}
0x0166a…01678               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0090}
0x01678…01682               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x009e}
0x01682…0168c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00a8}
0x0168c…016be               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000e, t01=0x00b2}
0x016be…016c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00e4}
0x016c8…016e6               Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x000e, t01=0x00ee}
0x016e6…016f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x010c}
0x016f0…01722               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000e, t01=0x0116}
0x01722…0172c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0148}
0x0172c…0175e               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000e, t01=0x0152}
0x0175e…0178c               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000e, t01=0x0184}
0x0178c…01796               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0022}
0x01796…017aa               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x000f, t01=0x002c}
0x017aa…017b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0040}
0x017b4…017be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x004a}
0x017be…017f8               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000f, t01=0x0054}
0x017f8…0182a               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000f, t01=0x008e}
0x0182a…01834               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c0}
0x01834…01848               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x000f, t01=0x00ca}
0x01848…01852               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00de}
0x01852…01886               Head {h00=0x0030, h01=0x0050, text=»DEVIND EQU 0 DEVICE INDEX DATA COMMUNICATION«, t00=0x000f, t01=0x00e8}
0x01886…018b4               Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE«, t00=0x000f, t01=0x011c}
0x018b4…018be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x014a}
0x018be…018cc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0154}
0x018cc…018d6               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x000f, t01=0x0162}
0x018d6…01904               Head {h00=0x002a, h01=0x0026, text=»**************************************«, t00=0x000f, t01=0x016c}
0x01904…0190e               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0010, t01=0x000a}
0x0190e…01944               Head {h00=0x0032, h01=0x002d, text=»* DCDEFS  COMMON DEFS FOR DC DRIVERS/PACKAGES «, t00=0x0010, t01=0x0014}
0x01944…0194e               Head {h00=0x0006, h01=0x000a, text=»* «, t00=0x0010, t01=0x004a}
0x0194e…0197c               Head {h00=0x002a, h01=0x0026, text=»**************************************«, t00=0x0010, t01=0x0054}
0x0197c…01986               Head {h00=0x0006, h01=0x0001, text=»  «, t00=0x0010, t01=0x0082}
0x01986…019b6               Head {h00=0x002c, h01=0x0027, text=»*************************************** «, t00=0x0010, t01=0x008c}
0x019b6…019c0               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0010, t01=0x00bc}
0x019c0…019e2               Head {h00=0x001e, h01=0x001a, text=»* TABLE AND PACKET LAYOUTS«, t00=0x0010, t01=0x00c6}
0x019e2…019ec               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0010, t01=0x00e8}
0x019ec…01a1c               Head {h00=0x002c, h01=0x0027, text=»*************************************** «, t00=0x0010, t01=0x00f2}
0x01a1c…01a26               Head {h00=0x0006, h01=0x0001, text=»  «, t00=0x0010, t01=0x0122}
0x01a26…01a30               Head {h00=0x0006, h01=0x0001, text=»  «, t00=0x0010, t01=0x012c}
0x01a30…01a3e               Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0010, t01=0x0136}
0x01a3e…01a8c               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0010, t01=0x0144}
0x01a8c…01a96 (17, 0, 400)  Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0011, t01=0x0004}
0x01a96…01ab6               Head {h00=0x001c, h01=0x0018, text=»* DWT, DEVICE WORK TABLE«, t00=0x0011, t01=0x000e}
0x01ab6…01ac0               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0011, t01=0x002e}
0x01ac0…01b10               Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0011, t01=0x0038}
0x01b10…01b1a               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0011, t01=0x0088}
0x01b1a…01b3c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x0092}
0x01b3c…01b5e               Head {h00=0x001e, h01=0x0050, text=»*   0 .  DWTCHP         . «, t00=0x0011, t01=0x00b4}
0x01b5e…01b80               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x00d6}
0x01b80…01ba2               Head {h00=0x001e, h01=0x0050, text=»*   2 .  DWTST          . «, t00=0x0011, t01=0x00f8}
0x01ba2…01bc4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x011a}
0x01bc4…01be6               Head {h00=0x001e, h01=0x0050, text=»*   4 .  DWTECB         . «, t00=0x0011, t01=0x013c}
0x01be6…01c08               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0011, t01=0x015e}
0x01c08…01c2a               Head {h00=0x001e, h01=0x0050, text=»*   6 . DWTOPT . DWTOR  . «, t00=0x0011, t01=0x0180}
0x01c2a…01c4c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x0012}
0x01c4c…01c6e               Head {h00=0x001e, h01=0x0050, text=»*   8 .  DWTADR         . «, t00=0x0012, t01=0x0034}
0x01c6e…01c90               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x0056}
0x01c90…01cb2               Head {h00=0x001e, h01=0x0050, text=»*  10 .  DWTTAB         . «, t00=0x0012, t01=0x0078}
0x01cb2…01cd4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x009a}
0x01cd4…01cf6               Head {h00=0x001e, h01=0x0050, text=»*  12 .  DWTWAT         . «, t00=0x0012, t01=0x00bc}
0x01cf6…01d18               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x00de}
0x01d18…01d3a               Head {h00=0x001e, h01=0x0050, text=»*  14 .  DWTTQ          . «, t00=0x0012, t01=0x0100}
0x01d3a…01d5c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x0122}
0x01d5c…01d8c               Head {h00=0x002c, h01=0x0050, text=»* (16).  DWTUEC         .   IF   MMUPAG «, t00=0x0012, t01=0x0144}
0x01d8c…01dae               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0012, t01=0x0174}
0x01dae…01dde               Head {h00=0x002c, h01=0x0050, text=»* (18).  DWTMEC         .   IF   MMUPAG «, t00=0x0013, t01=0x0008}
0x01dde…01e00               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0013, t01=0x0038}
0x01e00…01e28               Head {h00=0x0024, h01=0x0050, text=»* DWTDRD  +2 .  DWTSTB         .«, t00=0x0013, t01=0x005a}
0x01e28…01e50               Head {h00=0x0024, h01=0x0050, text=»*            ...................«, t00=0x0013, t01=0x0082}
0x01e50…01e72               Head {h00=0x001e, h01=0x0050, text=»*  +4 .  DWTCHD         . «, t00=0x0013, t01=0x00aa}
0x01e72…01e94               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0013, t01=0x00cc}
0x01e94…01eb6               Head {h00=0x001e, h01=0x0050, text=»*  +6 .  DWTCHN         . «, t00=0x0013, t01=0x00ee}
0x01eb6…01ed8               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0013, t01=0x0110}
0x01ed8…01efa               Head {h00=0x001e, h01=0x0050, text=»*  +8 .  DWTLAD         . «, t00=0x0013, t01=0x0132}
0x01efa…01f1c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0013, t01=0x0154}
0x01f1c…01f3e               Head {h00=0x001e, h01=0x0050, text=»* +10 .  DWTRAD         . «, t00=0x0013, t01=0x0176}
0x01f3e…01f60               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x0008}
0x01f60…01f82               Head {h00=0x001e, h01=0x0050, text=»* +12 .  DWTDR1/SUB     . «, t00=0x0014, t01=0x002a}
0x01f82…01fa4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x004c}
0x01fa4…01fc6               Head {h00=0x001e, h01=0x0050, text=»* +14 .  DWTRCL         . «, t00=0x0014, t01=0x006e}
0x01fc6…01fe8               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x0090}
0x01fe8…0200a               Head {h00=0x001e, h01=0x0050, text=»* +16 .  DWTRTV         . «, t00=0x0014, t01=0x00b2}
0x0200a…0202c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x00d4}
0x0202c…0204e               Head {h00=0x001e, h01=0x0050, text=»* +18 .  DWTRTP         . «, t00=0x0014, t01=0x00f6}
0x0204e…02070               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x0118}
0x02070…02092               Head {h00=0x001e, h01=0x0050, text=»* +20 .  DWTOPE         . «, t00=0x0014, t01=0x013a}
0x02092…020b4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0014, t01=0x015c}
0x020b4…020d6               Head {h00=0x001e, h01=0x0050, text=»* +22 .  DWTOPN         . «, t00=0x0014, t01=0x017e}
0x020d6…020f8               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0015, t01=0x0010}
0x020f8…0211a               Head {h00=0x001e, h01=0x0050, text=»* +24 .  DWTIPC         . «, t00=0x0015, t01=0x0032}
0x0211a…0213c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0015, t01=0x0054}
0x0213c…0215e               Head {h00=0x001e, h01=0x0050, text=»* +26 .  DWTIPT         . «, t00=0x0015, t01=0x0076}
0x0215e…02180               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0015, t01=0x0098}
0x02180…021a2               Head {h00=0x001e, h01=0x0050, text=»* +28 .                 . «, t00=0x0015, t01=0x00ba}
0x021a2…021c4               Head {h00=0x001e, h01=0x0050, text=»*     /  DRIVER DEPEND  / «, t00=0x0015, t01=0x00dc}
0x021c4…021e6               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x0015, t01=0x00fe}
0x021e6…02208               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x0015, t01=0x0120}
0x02208…0222a               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0015, t01=0x0142}
0x0222a…02266               Head {h00=0x0038, h01=0x0050, text=»*     .  STATISTIC      .   IF STAT   AND DWTSTB /=0«, t00=0x0015, t01=0x0164}
0x02266…02288               Head {h00=0x001e, h01=0x0050, text=»*     /  BUFFER         / «, t00=0x0016, t01=0x0010}
0x02288…022aa               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x0016, t01=0x0032}
0x022aa…022b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0054}
0x022b4…022c2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x005e}
0x022c2…022cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x006c}
0x022cc…0230e               Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0016, t01=0x0076}
0x0230e…02318               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00b8}
0x02318…02342               Head {h00=0x0026, h01=0x0050, text=»* D W T  D I S P L A C E M E N T S«, t00=0x0016, t01=0x00c2}
0x02342…0234c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ec}
0x0234c…0238e               Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x0016, t01=0x00f6}
0x0238e…02398               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0138}
0x02398…023bc               Head {h00=0x0020, h01=0x0050, text=»DWTTQ EQU /0E TERMINAL QUEUE«, t00=0x0016, t01=0x0142}
0x023bc…023d2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0016, t01=0x0166}
0x023d2…0240c               Head {h00=0x0036, h01=0x0050, text=»DWTDRD EQU DWTTQ+2 START OF DRIVER DEPENDENT AREA «, t00=0x0016, t01=0x017c}
0x0240c…02418               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0026}
0x02418…0242e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0017, t01=0x0032}
0x0242e…02468               Head {h00=0x0036, h01=0x0050, text=»DWTDRD EQU DWTTQ+6 START OF DRIVER DEPENDENT AREA «, t00=0x0017, t01=0x0048}
0x02468…02474               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0082}
0x02474…024bc               Head {h00=0x0044, h01=0x0050, text=»DWTSTB EQU DWTDRD OFFSET REL START DWT TO STATISTIC BUFF IF ANY «, t00=0x0017, t01=0x008e}
0x024bc…024f2               Head {h00=0x0032, h01=0x0050, text=»DWTCHD EQU DWTDRD+2 CONFIG CHAIN LINK HEAD DWT«, t00=0x0017, t01=0x00d6}
0x024f2…02528               Head {h00=0x0032, h01=0x0050, text=»DWTCHN EQU DWTDRD+4 CONFIG CHAIN LINK NEXT DWT«, t00=0x0017, t01=0x010c}
0x02528…0255e               Head {h00=0x0032, h01=0x0050, text=»DWTLAD EQU DWTDRD+6 LOCAL SYMBOLIC DTE ADDRESS«, t00=0x0017, t01=0x0142}
0x0255e…02596               Head {h00=0x0034, h01=0x0050, text=»DWTRAD EQU DWTDRD+8 REMOTE SYMBOLIC DTE ADDRESS «, t00=0x0017, t01=0x0178}
0x02596…025c4               Head {h00=0x002a, h01=0x0050, text=»DWTDR1 EQU DWTDRD+10 DRIVER DEP WORD 1«, t00=0x0018, t01=0x0020}
0x025c4…025f2               Head {h00=0x002a, h01=0x0050, text=»DWTSUB EQU DWTDR1 SYMBOLIC SUBADDRESS «, t00=0x0018, t01=0x004e}
0x025f2…02624               Head {h00=0x002e, h01=0x0050, text=»DWTRCL EQU DWTDRD+12 REQUEST CONTROL WORD «, t00=0x0018, t01=0x007c}
0x02624…02654               Head {h00=0x002c, h01=0x0050, text=»DWTRTV EQU DWTDRD+14 REQUEST TIMER VALUE«, t00=0x0018, t01=0x00ae}
0x02654…02686               Head {h00=0x002e, h01=0x0050, text=»DWTRTP EQU DWTDRD+16 REQUEST TIMER POINTER«, t00=0x0018, t01=0x00de}
0x02686…026cc               Head {h00=0x0042, h01=0x0050, text=»DWTOPE EQU DWTDRD+18 O/P DATA Q EXPEDITED/STATUS LINK NXT DWT «, t00=0x0018, t01=0x0110}
0x026cc…02708               Head {h00=0x0038, h01=0x0050, text=»DWTOPN EQU DWTDRD+20 O/P DATA Q NORMAL LINK NXT DWT «, t00=0x0018, t01=0x0156}
0x02708…0273e (25, 0, 400)  Head {h00=0x0032, h01=0x0050, text=»DWTIPC EQU DWTDRD+22 I/P DATA Q LINK TO BUFFER«, t00=0x0019, t01=0x0004}
0x0273e…02772               Head {h00=0x0030, h01=0x0050, text=»DWTIPT EQU DWTDRD+24 I/P DATA TIMER POINTER «, t00=0x0019, t01=0x003a}
0x02772…0279e               Head {h00=0x0028, h01=0x0050, text=»DWTCUR EQU DWTDRD+26 CURSOR ADDRESS «, t00=0x0019, t01=0x006e}
0x0279e…027d0               Head {h00=0x002e, h01=0x0050, text=»DWTBUF EQU DWTDRD+28 DEVICE BUFFER ADDRESS«, t00=0x0019, t01=0x009a}
0x027d0…027f8               Head {h00=0x0024, h01=0x0050, text=»DWTSTA EQU DWTDRD+30 DWT STATUS «, t00=0x0019, t01=0x00cc}
0x027f8…02806               Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0019, t01=0x00f4}
0x02806…02854               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0019, t01=0x0102}
0x02854…0285e               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0019, t01=0x0150}
0x0285e…0287e               Head {h00=0x001c, h01=0x0050, text=»* DTE, DTE CONTROL TABLE«, t00=0x0019, t01=0x015a}
0x0287e…02888               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0019, t01=0x017a}
0x02888…028d8               Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0019, t01=0x0184}
0x028d8…028e2               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x001a, t01=0x0044}
0x028e2…02904               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x004e}
0x02904…02926               Head {h00=0x001e, h01=0x0050, text=»*   0 .  DTECHP         . «, t00=0x001a, t01=0x0070}
0x02926…02948               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x0092}
0x02948…0296a               Head {h00=0x001e, h01=0x0050, text=»*   2 .  DTEST          . «, t00=0x001a, t01=0x00b4}
0x0296a…0298c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x00d6}
0x0298c…029ae               Head {h00=0x001e, h01=0x0050, text=»*   4 .  DTEECB         . «, t00=0x001a, t01=0x00f8}
0x029ae…029d0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x011a}
0x029d0…029f2               Head {h00=0x001e, h01=0x0050, text=»*   6 . DTEOPT . DTEOR  . «, t00=0x001a, t01=0x013c}
0x029f2…02a14               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001a, t01=0x015e}
0x02a14…02a36               Head {h00=0x001e, h01=0x0050, text=»*   8 .  DTEADR         . «, t00=0x001a, t01=0x0180}
0x02a36…02a58               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x0012}
0x02a58…02a7a               Head {h00=0x001e, h01=0x0050, text=»*  10 .  DTETAB         . «, t00=0x001b, t01=0x0034}
0x02a7a…02a9c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x0056}
0x02a9c…02abe               Head {h00=0x001e, h01=0x0050, text=»*  12 .  DTEWAT         . «, t00=0x001b, t01=0x0078}
0x02abe…02ae0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x009a}
0x02ae0…02b02               Head {h00=0x001e, h01=0x0050, text=»*  14 .  DTETQ          . «, t00=0x001b, t01=0x00bc}
0x02b02…02b24               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x00de}
0x02b24…02b54               Head {h00=0x002c, h01=0x0050, text=»* (16).  DTEUEC         .   IF   MMUPAG «, t00=0x001b, t01=0x0100}
0x02b54…02b76               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x0130}
0x02b76…02ba6               Head {h00=0x002c, h01=0x0050, text=»* (18).  DTEMEC         .   IF   MMUPAG «, t00=0x001b, t01=0x0152}
0x02ba6…02bc8               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001b, t01=0x0182}
0x02bc8…02bf0               Head {h00=0x0024, h01=0x0050, text=»* DTEDRD  +2 .  DTESTB         .«, t00=0x001c, t01=0x0014}
0x02bf0…02c18               Head {h00=0x0024, h01=0x0050, text=»*            ...................«, t00=0x001c, t01=0x003c}
0x02c18…02c3a               Head {h00=0x001e, h01=0x0050, text=»*  +4 .  DTECHD         . «, t00=0x001c, t01=0x0064}
0x02c3a…02c5c               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001c, t01=0x0086}
0x02c5c…02c7e               Head {h00=0x001e, h01=0x0050, text=»*  +6 .  DTECHN         . «, t00=0x001c, t01=0x00a8}
0x02c7e…02ca0               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001c, t01=0x00ca}
0x02ca0…02cc2               Head {h00=0x001e, h01=0x0050, text=»*  +8 .  DTELAD         . «, t00=0x001c, t01=0x00ec}
0x02cc2…02ce4               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001c, t01=0x010e}
0x02ce4…02d06               Head {h00=0x001e, h01=0x0050, text=»* +10 .                 . «, t00=0x001c, t01=0x0130}
0x02d06…02d28               Head {h00=0x001e, h01=0x0050, text=»*     /  DRIVER DEPEND  / «, t00=0x001c, t01=0x0152}
0x02d28…02d4a               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x001c, t01=0x0174}
0x02d4a…02d6c               Head {h00=0x001e, h01=0x0050, text=»*     /                 / «, t00=0x001d, t01=0x0008}
0x02d6c…02d8e               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001d, t01=0x002a}
0x02d8e…02dca               Head {h00=0x0038, h01=0x0050, text=»*     .  STATISTIC      .   IF STAT   AND DTESTB /=0«, t00=0x001d, t01=0x004c}
0x02dca…02dec               Head {h00=0x001e, h01=0x0050, text=»*     /  BUFFER         / «, t00=0x001d, t01=0x0088}
0x02dec…02e0e               Head {h00=0x001e, h01=0x0050, text=»*     ................... «, t00=0x001d, t01=0x00aa}
0x02e0e…02e18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00cc}
0x02e18…02e2c               Head {h00=0x0010, h01=0x0050, text=»DTETQ EQU 14«, t00=0x001d, t01=0x00d6}
0x02e2c…02e46               Head {h00=0x0016, h01=0x0050, text=»DTEUEC EQU DTETQ+2«, t00=0x001d, t01=0x00ea}
0x02e46…02e62               Head {h00=0x0018, h01=0x0050, text=»DTEMEC EQU DTEUEC+2 «, t00=0x001d, t01=0x0104}
0x02e62…02e6a               Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x0120}
0x02e6a…02e80               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001d, t01=0x0128}
0x02e80…02eb6               Head {h00=0x0032, h01=0x0050, text=»DTEDRD EQU DTETQ+2 START OF DC DEPENDENT AREA «, t00=0x001d, t01=0x013e}
0x02eb6…02ec2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0174}
0x02ec2…02ed8               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001d, t01=0x0180}
0x02ed8…02f0e               Head {h00=0x0032, h01=0x0050, text=»DTEDRD EQU DTEMEC+2 START OF DC DEPENDENT AREA«, t00=0x001e, t01=0x0008}
0x02f0e…02f1a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x003e}
0x02f1a…02f62               Head {h00=0x0044, h01=0x0050, text=»DTESTB EQU DTEDRD OFFSET REL START DTE TO STATISTIC BUFF IF ANY «, t00=0x001e, t01=0x004a}
0x02f62…02f98               Head {h00=0x0032, h01=0x0050, text=»DTECHD EQU DTEDRD+2 CONFIG CHAIN LINK HEAD DTE«, t00=0x001e, t01=0x0092}
0x02f98…02fce               Head {h00=0x0032, h01=0x0050, text=»DTECHN EQU DTEDRD+4 CONFIG CHAIN LINK NEXT DTE«, t00=0x001e, t01=0x00c8}
0x02fce…03004               Head {h00=0x0032, h01=0x0050, text=»DTELAD EQU DTEDRD+6 LOCAL SYMBOLIC DTE ADDRESS«, t00=0x001e, t01=0x00fe}
0x03004…0301e               Head {h00=0x0016, h01=0x0050, text=»* DRIVER DEPENDENT«, t00=0x001e, t01=0x0134}
0x0301e…0304e               Head {h00=0x002c, h01=0x0050, text=»DTEPLS EQU DTEDRD+8 PHYSICAL LINK STATUS«, t00=0x001e, t01=0x014e}
0x0304e…0307c               Head {h00=0x002a, h01=0x0050, text=»DTEDLS EQU DTEDRD+10 DATA LINK STATUS «, t00=0x001e, t01=0x017e}
0x0307c…030a4               Head {h00=0x0024, h01=0x0050, text=»DTESTA EQU DTEDRD+12 DTE STATUS «, t00=0x001f, t01=0x001c}
0x030a4…030d0               Head {h00=0x0028, h01=0x0050, text=»DTEDWT EQU DTEDRD+14 CHAIN LINK  DWT«, t00=0x001f, t01=0x0044}
0x030d0…03104               Head {h00=0x0030, h01=0x0050, text=»DTEDDT EQU DTEDRD+16 CHAIN LINK  DISCARD DWT«, t00=0x001f, t01=0x0070}
0x03104…0311e               Head {h00=0x0016, h01=0x0050, text=»* STATITICS BUFFER«, t00=0x001f, t01=0x00a4}
0x0311e…03154               Head {h00=0x0032, h01=0x0050, text=»STWSID EQU DTEDRD+18 RESERVED FOR SYMBOLIC ID «, t00=0x001f, t01=0x00be}
0x03154…03186               Head {h00=0x002e, h01=0x0050, text=»STWCST EQU DTEDRD+20 COUNTER STATUS INDEX «, t00=0x001f, t01=0x00f4}
0x03186…031b4               Head {h00=0x002a, h01=0x0050, text=»STWMIX EQU DTEDRD+22 MAX COUNTER INDEX«, t00=0x001f, t01=0x0126}
0x031b4…031da               Head {h00=0x0022, h01=0x0050, text=»STWCTA EQU DTEDRD+24 COUNTERS «, t00=0x001f, t01=0x0154}
0x031da…031e8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x017a}
0x031e8…03236               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x001f, t01=0x0188}
0x03236…03240               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0046}
0x03240…03270               Head {h00=0x002c, h01=0x0050, text=»* COUNTER INDECES - PARAMETER-1 EQUATES «, t00=0x0020, t01=0x0050}
0x03270…0327a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0080}
0x0327a…0329c               Head {h00=0x001e, h01=0x0050, text=»* REQUEST LEVEL COUNTERS: «, t00=0x0020, t01=0x008a}
0x0329c…032a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00ac}
0x032a6…032ee               Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0020, t01=0x00b6}
0x032ee…032f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00fe}
0x032f8…03326               Head {h00=0x002a, h01=0x0050, text=»CSRCON EQU /01 CONNECTIONS ESTABLISHED«, t00=0x0020, t01=0x0108}
0x03326…0335e               Head {h00=0x0034, h01=0x0050, text=»CSRCBY EQU /02 CONNECTION NOT ESTABLISHED - BUSY«, t00=0x0020, t01=0x0136}
0x0335e…03386               Head {h00=0x0024, h01=0x0050, text=»CSRMSR EQU /03 MESSAGES RECEIVED«, t00=0x0020, t01=0x016e}
0x03386…033b0               Head {h00=0x0026, h01=0x0050, text=»CSRCHR EQU /C5 CHARACTERS RECEIVED«, t00=0x0021, t01=0x0008}
0x033b0…033dc               Head {h00=0x0028, h01=0x0050, text=»CSRMST EQU /06 MESSAGES TRANSMITTED «, t00=0x0021, t01=0x0032}
0x033dc…0340a               Head {h00=0x002a, h01=0x0050, text=»CSRCHT EQU /C8 CHARACTERS TRANSMITTED «, t00=0x0021, t01=0x005e}
0x0340a…03428               Head {h00=0x001a, h01=0x0050, text=»CSRTOP EQU /09 TIMEOUT«, t00=0x0021, t01=0x008c}
0x03428…03446               Head {h00=0x001a, h01=0x0050, text=»CSRABT EQU /0A ABORTED«, t00=0x0021, t01=0x00aa}
0x03446…03462               Head {h00=0x0018, h01=0x0050, text=»CSRERR EQU /0B ERROR«, t00=0x0021, t01=0x00c8}
0x03462…0348c               Head {h00=0x0026, h01=0x0050, text=»CSRTRE EQU /0C TRANSMISSION ERROR «, t00=0x0021, t01=0x00e4}
0x0348c…034b6               Head {h00=0x0026, h01=0x0050, text=»CSRXC1 EQU /0D PROTOCOL DEPENDENT «, t00=0x0021, t01=0x010e}
0x034b6…034c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0138}
0x034c0…034de               Head {h00=0x001a, h01=0x0050, text=»* LINK LEVEL COUNTERS «, t00=0x0021, t01=0x0142}
0x034de…034e8               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0021, t01=0x0160}
0x034e8…0351a               Head {h00=0x002e, h01=0x0050, text=»CSSRBL EQU /10 SYNCH DATA BLOCKS RECEIVED «, t00=0x0021, t01=0x016a}
0x0351a…03558               Head {h00=0x003a, h01=0x0050, text=»CSSRBY EQU /11   "   DATA BLOCKS REJECTED BUFFER BUSY «, t00=0x0022, t01=0x000c}
0x03558…0359a               Head {h00=0x003e, h01=0x0050, text=»CSSRBO EQU /12   "   DATA BLOCKS REJECTED BUFFER OVERFLOW «, t00=0x0022, t01=0x004a}
0x0359a…035d4               Head {h00=0x0036, h01=0x0050, text=»CSSRAB EQU /13   "   DATA BLOCKS REJECTED ABORTED «, t00=0x0022, t01=0x008c}
0x035d4…03612               Head {h00=0x003a, h01=0x0050, text=»CSSRPE EQU /14   "   DATA BLOCKS REJECTED PARITY ERROR«, t00=0x0022, t01=0x00c6}
0x03612…03646               Head {h00=0x0030, h01=0x0050, text=»CSSTBL EQU /15   "   DATA BLOCKS TRANSMITTED«, t00=0x0022, t01=0x0104}
0x03646…0367c               Head {h00=0x0032, h01=0x0050, text=»CSSTRT EQU /16   "   DATA BLOCKS RETRANSMITTED«, t00=0x0022, t01=0x0138}
0x0367c…036ac               Head {h00=0x002c, h01=0x0050, text=»CSSTAB EQU /17   "   DATA BLOCKS ABORTED«, t00=0x0022, t01=0x016e}
0x036ac…036e4               Head {h00=0x0034, h01=0x0050, text=»CSSXC1 EQU /18 NBR OF REPLY REQUESTS TRANSMITTED«, t00=0x0023, t01=0x000e}
0x036e4…0370e               Head {h00=0x0026, h01=0x0050, text=»CSSXC2 EQU /19 PROCEDURE TIME OUTS«, t00=0x0023, t01=0x0046}
0x0370e…0374a               Head {h00=0x0038, h01=0x0050, text=»CSSXC3 EQU /1A NBR OF TIMES POLL TIMEOUT HAS OCCURED«, t00=0x0023, t01=0x0070}
0x0374a…03754               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0023, t01=0x00ac}
0x03754…0375e               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0023, t01=0x00b6}
0x0375e…0376c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x00c0}
0x0376c…0378c               Head {h00=0x001c, h01=0x0050, text=»* DTE/DCE LEVEL COUNTERS«, t00=0x0023, t01=0x00ce}
0x0378c…03796               Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x0023, t01=0x00ee}
0x03796…037be               Head {h00=0x0024, h01=0x0050, text=»CSCDTE EQU /28 DTE NOT OPERABLE «, t00=0x0023, t01=0x00f8}
0x037be…037ea               Head {h00=0x0028, h01=0x0050, text=»CSCDIT EQU /29 I/P THROUGHPUT ERROR «, t00=0x0023, t01=0x0120}
0x037ea…03816               Head {h00=0x0028, h01=0x0050, text=»CSCDOT EQU /2A O/P THROUGHPUT ERROR «, t00=0x0023, t01=0x014c}
0x03816…0383e               Head {h00=0x0024, h01=0x0050, text=»CSCDCE EQU /2B DCE NOT OPERABLE «, t00=0x0023, t01=0x0178}
0x0383e…0386c               Head {h00=0x002a, h01=0x0050, text=»CSCXC1 EQU /2C CONTROL UNIT DEPENDENT «, t00=0x0024, t01=0x0010}
0x0386c…03888               Head {h00=0x0018, h01=0x0050, text=»CSCXC2 EQU /2D     "«, t00=0x0024, t01=0x003e}
0x03888…038a4               Head {h00=0x0018, h01=0x0050, text=»CSCXC3 EQU /2E     "«, t00=0x0024, t01=0x005a}
0x038a4…038b2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x0076}
0x038b2…038bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0084}
0x038bc…038c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x008e}
0x038c6…038e0               Head {h00=0x0016, h01=0x0050, text=»* REQUEST HANDLING«, t00=0x0024, t01=0x0098}
0x038e0…038ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00b2}
0x038ea…038f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00bc}
0x038f4…0390e               Head {h00=0x0016, h01=0x0050, text=»* ORDER CODE (A7) «, t00=0x0024, t01=0x00c6}
0x0390e…03918               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00e0}
0x03918…03932               Head {h00=0x0016, h01=0x0050, text=»OPEN EQU /21 OPEN «, t00=0x0024, t01=0x00ea}
0x03932…0394e               Head {h00=0x0018, h01=0x0050, text=»CLOSE EQU /22 CLOSE «, t00=0x0024, t01=0x0104}
0x0394e…03974               Head {h00=0x0022, h01=0x0050, text=»CONPAS EQU /27 CONNECT PASSIVE«, t00=0x0024, t01=0x0120}
0x03974…03994               Head {h00=0x001c, h01=0x0050, text=»DISCO EQU /2F DISCONNECT«, t00=0x0024, t01=0x0146}
0x03994…039b4               Head {h00=0x001c, h01=0x0050, text=»RECEIVE EQU /02 RECEIVE «, t00=0x0024, t01=0x0166}
0x039b4…039ce               Head {h00=0x0016, h01=0x0050, text=»SEND EQU /06 SEND «, t00=0x0024, t01=0x0186}
0x039ce…039f0               Head {h00=0x001e, h01=0x0050, text=»RSTAT EQU /00 READ STATUS «, t00=0x0025, t01=0x0010}
0x039f0…03a10               Head {h00=0x001c, h01=0x0050, text=»SSTAT EQU /38 SET STATUS«, t00=0x0025, t01=0x0032}
0x03a10…03a3c               Head {h00=0x0028, h01=0x0050, text=»STATIS EQU /2D READ/RESET STATISTICS«, t00=0x0025, t01=0x0052}
0x03a3c…03a64               Head {h00=0x0024, h01=0x0050, text=»STIMOT EQU /39 SET TIMEOUT VALUE«, t00=0x0025, t01=0x007e}
0x03a64…03a6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00a6}
0x03a6e…03a80               Head {h00=0x000e, h01=0x0050, text=»* OPTIONS:«, t00=0x0025, t01=0x00b0}
0x03a80…03a8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00c2}
0x03a8a…03ac0               Head {h00=0x0032, h01=0x0050, text=»TYPRR EQU /4343 RESET STATISTICS AFTER READ =5«, t00=0x0025, t01=0x00cc}
0x03ac0…03ace               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x0102}
0x03ace…03ad8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0110}
0x03ad8…03b1a               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0025, t01=0x011a}
0x03b1a…03b24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x015c}
0x03b24…03b56               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=0x0025, t01=0x0166}
0x03b56…03b60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0008}
0x03b60…03ba2               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0026, t01=0x0012}
0x03ba2…03bac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0054}
0x03bac…03bfc               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0026, t01=0x005e}
0x03bfc…03c22               Head {h00=0x0022, h01=0x0050, text=»R:REQ EQU /8000 REQUEST ERROR «, t00=0x0026, t01=0x00ae}
0x03c22…03c4a               Head {h00=0x0024, h01=0x0050, text=»R:ABRT EQU /4000 REQUEST ABORTED«, t00=0x0026, t01=0x00d4}
0x03c4a…03c60               Head {h00=0x0012, h01=0x0050, text=»R:2 EQU /2000 «, t00=0x0026, t01=0x00fc}
0x03c60…03c76               Head {h00=0x0012, h01=0x0050, text=»R:3 EQU /1000 «, t00=0x0026, t01=0x0112}
0x03c76…03cc4               Head {h00=0x004a, h01=0x0050, text=»*---------------------------------------------------------------------«, t00=0x0026, t01=0x0128}
0x03cc4…03cda               Head {h00=0x0012, h01=0x0050, text=»R:4 EQU /0800 «, t00=0x0026, t01=0x0176}
0x03cda…03cf0               Head {h00=0x0012, h01=0x0050, text=»R:5 EQU /0400 «, t00=0x0026, t01=0x018c}
0x03cf0…03d06               Head {h00=0x0012, h01=0x0050, text=»R:6 EQU /0200 «, t00=0x0027, t01=0x0012}
0x03d06…03d36               Head {h00=0x002c, h01=0x0050, text=»R:DATA EQU /0100 DATA AVAILABLE (QUEUED)«, t00=0x0027, t01=0x0028}
0x03d36…03d84               Head {h00=0x004a, h01=0x0050, text=»*---------------------------------------------------------------------«, t00=0x0027, t01=0x0058}
0x03d84…03d9a               Head {h00=0x0012, h01=0x0050, text=»R:8 EQU /0080 «, t00=0x0027, t01=0x00a6}
0x03d9a…03dbc               Head {h00=0x001e, h01=0x0050, text=»R:TIME EQU /0040 TIME OUT «, t00=0x0027, t01=0x00bc}
0x03dbc…03dd2               Head {h00=0x0012, h01=0x0050, text=»R:10 EQU /0020«, t00=0x0027, t01=0x00de}
0x03dd2…03df8               Head {h00=0x0022, h01=0x0050, text=»R:SEQ EQU /0010 SEQUENCE ERROR«, t00=0x0027, t01=0x00f4}
0x03df8…03e46               Head {h00=0x004a, h01=0x0050, text=»*---------------------------------------------------------------------«, t00=0x0027, t01=0x011a}
0x03e46…03e6e               Head {h00=0x0024, h01=0x0050, text=»R:LGTH EQU /0008 ILLEGAL LENGTH «, t00=0x0027, t01=0x0168}
0x03e6e…03e84               Head {h00=0x0012, h01=0x0050, text=»R:13 EQU /0004«, t00=0x0027, t01=0x0190}
0x03e84…03eb6               Head {h00=0x002e, h01=0x0050, text=»R:LOGC EQU /0002 LOGICAL CONNECTION ERROR «, t00=0x0028, t01=0x0016}
0x03eb6…03ee8               Head {h00=0x002e, h01=0x0050, text=»R:PHYC EQU /0001 PHYSICAL CONNECTION ERROR«, t00=0x0028, t01=0x0048}
0x03ee8…03f38               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0028, t01=0x007a}
0x03f38…03f42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00ca}
0x03f42…03f50               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x00d4}
0x03f50…03f5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00e2}
0x03f5a…03f9a               Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0028, t01=0x00ec}
0x03f9a…03fa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x012c}
0x03fa4…03fd6               Head {h00=0x002e, h01=0x0050, text=»* H A R D W A R E  R E T U R N  C O D E S «, t00=0x0028, t01=0x0136}
0x03fd6…03fe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0168}
0x03fe0…04022               Head {h00=0x003e, h01=0x0050, text=»*********************************************************=«, t00=0x0028, t01=0x0172}
0x04022…0402c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0024}
0x0402c…0407c               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0029, t01=0x002e}
0x0407c…04092               Head {h00=0x0012, h01=0x0050, text=»H:0 EQU /8000 «, t00=0x0029, t01=0x007e}
0x04092…040a8               Head {h00=0x0012, h01=0x0050, text=»H:1 EQU /4000 «, t00=0x0029, t01=0x0094}
0x040a8…040be               Head {h00=0x0012, h01=0x0050, text=»H:2 EQU /2000 «, t00=0x0029, t01=0x00aa}
0x040be…040d4               Head {h00=0x0012, h01=0x0050, text=»H:3 EQU /1000 «, t00=0x0029, t01=0x00c0}
0x040d4…04124               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0029, t01=0x00d6}
0x04124…0413a               Head {h00=0x0012, h01=0x0050, text=»H:4 EQU /0800 «, t00=0x0029, t01=0x0126}
0x0413a…04150               Head {h00=0x0012, h01=0x0050, text=»H:5 EQU /0400 «, t00=0x0029, t01=0x013c}
0x04150…04166               Head {h00=0x0012, h01=0x0050, text=»H:6 EQU /0200 «, t00=0x0029, t01=0x0152}
0x04166…0417c               Head {h00=0x0012, h01=0x0050, text=»H:7 EQU /0100 «, t00=0x0029, t01=0x0168}
0x0417c…041cc               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x0029, t01=0x017e}
0x041cc…041e2               Head {h00=0x0012, h01=0x0050, text=»H:8 EQU /0080 «, t00=0x002a, t01=0x003e}
0x041e2…041f8               Head {h00=0x0012, h01=0x0050, text=»H:9 EQU /0040 «, t00=0x002a, t01=0x0054}
0x041f8…0421c               Head {h00=0x0020, h01=0x0050, text=»H:CARR EQU /0020 CARRIER OFF«, t00=0x002a, t01=0x006a}
0x0421c…04232               Head {h00=0x0012, h01=0x0050, text=»H:11 EQU /0010«, t00=0x002a, t01=0x008e}
0x04232…04280               Head {h00=0x004a, h01=0x0050, text=»*-------------------------------------------------------------------- «, t00=0x002a, t01=0x00a4}
0x04280…04296               Head {h00=0x0012, h01=0x0050, text=»H:12 EQU /0008«, t00=0x002a, t01=0x00f2}
0x04296…042bc               Head {h00=0x0022, h01=0x0050, text=»H:PARI EQU /0004 PARITY ERROR «, t00=0x002a, t01=0x0108}
0x042bc…042e6               Head {h00=0x0026, h01=0x0050, text=»H:THRU EQU /0002 THROUGHPUT ERROR «, t00=0x002a, t01=0x012e}
0x042e6…0430c               Head {h00=0x0022, h01=0x0050, text=»H:NOOP EQU /0001 NOT OPERABLE «, t00=0x002a, t01=0x0158}
0x0430c…0435c               Head {h00=0x004c, h01=0x0050, text=»*---------------------------------------------------------------------- «, t00=0x002a, t01=0x017e}
0x0435c…0436e               Head {h00=0x000e, h01=0x0050, text=» EJECT    «, t00=0x002b, t01=0x003e}
0x0436e…043b0               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x002b, t01=0x0050}
0x043b0…043ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0092}
0x043ba…043de               Head {h00=0x0020, h01=0x0050, text=»* LINE CONTROL CHAR EQU:S   «, t00=0x002b, t01=0x009c}
0x043de…043ec               Head {h00=0x000a, h01=0x0050, text=»*     «, t00=0x002b, t01=0x00c0}
0x043ec…0442e               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x002b, t01=0x00ce}
0x0442e…04438               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0110}
0x04438…04462               Head {h00=0x0026, h01=0x0050, text=»SF EQU X'1D' START FIELD CHARACTER«, t00=0x002b, t01=0x011a}
0x04462…04476               Head {h00=0x0010, h01=0x0050, text=»SYN EQU /16 «, t00=0x002b, t01=0x0144}
0x04476…0448a               Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x002b, t01=0x0158}
0x0448a…0449e               Head {h00=0x0010, h01=0x0050, text=»ETX EQU /03 «, t00=0x002b, t01=0x016c}
0x0449e…044b2               Head {h00=0x0010, h01=0x0050, text=»ETB EQU /17 «, t00=0x002b, t01=0x0180}
0x044b2…044c6 (44, 0, 400)  Head {h00=0x0010, h01=0x0050, text=»ITB EQU /1F «, t00=0x002c, t01=0x0004}
0x044c6…044da               Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x002c, t01=0x0018}
0x044da…044ee               Head {h00=0x0010, h01=0x0050, text=»ENQ EQU /05 «, t00=0x002c, t01=0x002c}
0x044ee…04502               Head {h00=0x0010, h01=0x0050, text=»DLE EQU /10 «, t00=0x002c, t01=0x0040}
0x04502…04516               Head {h00=0x0010, h01=0x0050, text=»EOT EQU /04 «, t00=0x002c, t01=0x0054}
0x04516…0452a               Head {h00=0x0010, h01=0x0050, text=»NAK EQU /15 «, t00=0x002c, t01=0x0068}
0x0452a…0453e               Head {h00=0x0010, h01=0x0050, text=»ESC EQU /1B «, t00=0x002c, t01=0x007c}
0x0453e…04552               Head {h00=0x0010, h01=0x0050, text=»SBA EQU /11 «, t00=0x002c, t01=0x0090}
0x04552…04564               Head {h00=0x000e, h01=0x0050, text=»GP EQU /22«, t00=0x002c, t01=0x00a4}
0x04564…0457a               Head {h00=0x0012, h01=0x0050, text=»RDBCOM EQU /32«, t00=0x002c, t01=0x00b6}
0x0457a…04590               Head {h00=0x0012, h01=0x0050, text=»RDMCOM EQU /36«, t00=0x002c, t01=0x00cc}
0x04590…0459e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x00e2}
0x0459e…045b2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x002c, t01=0x00f0}
0x045b2…045c6               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /80 «, t00=0x002c, t01=0x0104}
0x045c6…045da               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /3C «, t00=0x002c, t01=0x0118}
0x045da…045ee               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /30«, t00=0x002c, t01=0x012c}
0x045ee…04602               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /31«, t00=0x002c, t01=0x0140}
0x04602…04616               Head {h00=0x0010, h01=0x0050, text=»DC1 EQU /11 «, t00=0x002c, t01=0x0154}
0x04616…0462a               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x002c, t01=0x0168}
0x0462a…0463e               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /3B«, t00=0x002c, t01=0x017c}
0x0463e…0464a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0190}
0x0464a…0465e               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x002d, t01=0x000c}
0x0465e…04672               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x002d, t01=0x0020}
0x04672…046a6               Head {h00=0x0030, h01=0x0050, text=»WACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE «, t00=0x002d, t01=0x0034}
0x046a6…046b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0068}
0x046b2…046c6               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x002d, t01=0x0074}
0x046c6…046da               Head {h00=0x0010, h01=0x0050, text=»PAR EQU /00 «, t00=0x002d, t01=0x0088}
0x046da…046ee               Head {h00=0x0010, h01=0x0050, text=»WACK EQU /2C«, t00=0x002d, t01=0x009c}
0x046ee…04702               Head {h00=0x0010, h01=0x0050, text=»RVI EQU /40 «, t00=0x002d, t01=0x00b0}
0x04702…04716               Head {h00=0x0010, h01=0x0050, text=»ACK0 EQU /18«, t00=0x002d, t01=0x00c4}
0x04716…0472a               Head {h00=0x0010, h01=0x0050, text=»ACK1 EQU /2F«, t00=0x002d, t01=0x00d8}
0x0472a…04740               Head {h00=0x0012, h01=0x0050, text=»SYNEBC EQU /32«, t00=0x002d, t01=0x00ec}
0x04740…04756               Head {h00=0x0012, h01=0x0050, text=»ENQEBC EQU /2D«, t00=0x002d, t01=0x0102}
0x04756…0476c               Head {h00=0x0012, h01=0x0050, text=»ETBEBC EQU /26«, t00=0x002d, t01=0x0118}
0x0476c…04778               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x012e}
0x04778…0478c               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x002d, t01=0x013a}
0x0478c…047a6               Head {h00=0x0016, h01=0x0050, text=»ENQPAR EQU ENQ+PAR«, t00=0x002d, t01=0x014e}
0x047a6…047c0               Head {h00=0x0016, h01=0x0050, text=»RVIPAR EQU RVI+PAR«, t00=0x002d, t01=0x0168}
0x047c0…047dc               Head {h00=0x0018, h01=0x0050, text=»ACKPAR EQU ACK0+PAR «, t00=0x002d, t01=0x0182}
0x047dc…047e8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x000e}
0x047e8…047fc               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x002e, t01=0x001a}
0x047fc…04812               Head {h00=0x0012, h01=0x0050, text=»ENQPAR EQU ENQ«, t00=0x002e, t01=0x002e}
0x04812…04828               Head {h00=0x0012, h01=0x0050, text=»RVIPAR EQU RVI«, t00=0x002e, t01=0x0044}
0x04828…04840               Head {h00=0x0014, h01=0x0050, text=»ACKPAR EQU ACK0 «, t00=0x002e, t01=0x005a}
0x04840…0484c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0072}
0x0484c…0485a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x007e}
0x0485a…04864               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x008c}
0x04864…0486e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0096}
0x0486e…04896               Head {h00=0x0024, h01=0x0050, text=»* 3270 SENSE/STATUS INFORMATION «, t00=0x002e, t01=0x00a0}
0x04896…048a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00c8}
0x048a0…048aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00d2}
0x048aa…048c0               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x002e, t01=0x00dc}
0x048c0…048f2               Head {h00=0x002e, h01=0x0050, text=»SSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE «, t00=0x002e, t01=0x00f2}
0x048f2…048fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0124}
0x048fc…04906               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x012e}
0x04906…0491a               Head {h00=0x0010, h01=0x0050, text=» DATA /4248 «, t00=0x002e, t01=0x0138}
0x0491a…0492e               Head {h00=0x0010, h01=0x0050, text=» DATA /4242 «, t00=0x002e, t01=0x014c}
0x0492e…04938               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0160}
0x04938…0496e               Head {h00=0x0032, h01=0x0050, text=»NOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED «, t00=0x002e, t01=0x016a}
0x0496e…0499e               Head {h00=0x002c, h01=0x0050, text=»IR EQU /26 S/S 1 : INTERVENTION REQUIRED«, t00=0x002f, t01=0x0010}
0x0499e…049aa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x0040}
0x049aa…049b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x004c}
0x049b4…049be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0056}
0x049be…049d4               Head {h00=0x0012, h01=0x0050, text=»* TIMER VALUES«, t00=0x002f, t01=0x0060}
0x049d4…049de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0076}
0x049de…049e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0080}
0x049e8…04a14               Head {h00=0x0028, h01=0x0050, text=»TIMPRO EQU 30 PROCEDURE TIMER 3 SEC «, t00=0x002f, t01=0x008a}
0x04a14…04a1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00b6}
0x04a1e…04a28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00c0}
0x04a28…04a36               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x00ca}
0x04a36…04a7c               Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x002f, t01=0x00d8}
0x04a7c…04a86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x011e}
0x04a86…04ab8               Head {h00=0x002e, h01=0x0050, text=»* LINE CONTROL UNIT FUNCTION CONTROL EQU:S«, t00=0x002f, t01=0x0128}
0x04ab8…04ac2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x015a}
0x04ac2…04b08               Head {h00=0x0042, h01=0x0050, text=»************************************************************* «, t00=0x002f, t01=0x0164}
0x04b08…04b12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x001a}
0x04b12…04b26               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0030, t01=0x0024}
0x04b26…04b3a               Head {h00=0x0010, h01=0x0050, text=»SYNC EQU /16«, t00=0x0030, t01=0x0038}
0x04b3a…04b46               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x004c}
0x04b46…04b5a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0030, t01=0x0058}
0x04b5a…04b6e               Head {h00=0x0010, h01=0x0050, text=»SYNC EQU /32«, t00=0x0030, t01=0x006c}
0x04b6e…04b7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x0080}
0x04b7a…04b8e               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0030, t01=0x008c}
0x04b8e…04bac               Head {h00=0x001a, h01=0x0050, text=»CBCARR EQU /100+LSPEED«, t00=0x0030, t01=0x00a0}
0x04bac…04bb8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x00be}
0x04bb8…04bcc               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0030, t01=0x00ca}
0x04bcc…04be2               Head {h00=0x0012, h01=0x0050, text=»CBSTOP EQU /00«, t00=0x0030, t01=0x00de}
0x04be2…04bf6               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x0030, t01=0x00f4}
0x04bf6…04c0c               Head {h00=0x0012, h01=0x0050, text=»PARITY EQU /0C«, t00=0x0030, t01=0x0108}
0x04c0c…04c18               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x011e}
0x04c18…04c2c               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0030, t01=0x012a}
0x04c2c…04c40               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0030, t01=0x013e}
0x04c40…04c56               Head {h00=0x0012, h01=0x0050, text=»PARITY EQU /00«, t00=0x0030, t01=0x0152}
0x04c56…04c62               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x0168}
0x04c62…04c70               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0174}
0x04c70…04cac               Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x0030, t01=0x0182}
0x04cac…04cb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x002e}
0x04cb6…04ce2               Head {h00=0x0028, h01=0x0050, text=»* LINE CONTROL UNIT SST STATUS BITS «, t00=0x0031, t01=0x0038}
0x04ce2…04cec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0064}
0x04cec…04d28               Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x0031, t01=0x006e}
0x04d28…04d32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00aa}
0x04d32…04d46               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x0031, t01=0x00b4}
0x04d46…04d70               Head {h00=0x0026, h01=0x0050, text=»H:ERR EQU /23 H:NOOP+H:THRU+H:CARR«, t00=0x0031, t01=0x00c8}
0x04d70…04d7c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x00f2}
0x04d7c…04d90               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x0031, t01=0x00fe}
0x04d90…04dc2               Head {h00=0x002e, h01=0x0050, text=»H:ERR EQU /27 H:NOOP+H:THRU+H:CARR+H:PARI «, t00=0x0031, t01=0x0112}
0x04dc2…04dce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0144}
0x04dce…04de0               Head {h00=0x000e, h01=0x0050, text=» EJECT    «, t00=0x0031, t01=0x0150}
0x04de0…04e28               Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0031, t01=0x0162}
0x04e28…04e32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x001a}
0x04e32…04e50               Head {h00=0x001a, h01=0x0050, text=»* DRIVER ADDRESS BLOCK«, t00=0x0032, t01=0x0024}
0x04e50…04e5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0042}
0x04e5a…04ea2               Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0032, t01=0x004c}
0x04ea2…04eac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0094}
0x04eac…04ed0               Head {h00=0x0020, h01=0x0050, text=» DATA BUFLEN MMU BUFFER SIZE«, t00=0x0032, t01=0x009e}
0x04ed0…04ef2               Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x0032, t01=0x00c2}
0x04ef2…04f1e               Head {h00=0x0028, h01=0x0050, text=»DC15AD DATA DCACT ACTIVATION ADDRESS«, t00=0x0032, t01=0x00e4}
0x04f1e…04f40               Head {h00=0x001e, h01=0x0050, text=» DATA ABORT ABORT ROUTINE «, t00=0x0032, t01=0x0110}
0x04f40…04f68               Head {h00=0x0024, h01=0x0050, text=» DATA DCRBUF REC. BUFFER ANCHOR «, t00=0x0032, t01=0x0132}
0x04f68…04f86               Head {h00=0x001a, h01=0x0050, text=» DATA 6 HEADER LENGTH «, t00=0x0032, t01=0x015a}
0x04f86…04f90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0178}
0x04f90…04fc0               Head {h00=0x002c, h01=0x0050, text=» RES 15 SUBROUTINE STACK FOR INTERRUPTS «, t00=0x0032, t01=0x0182}
0x04fc0…04fd2               Head {h00=0x000e, h01=0x0050, text=»STB RES 1 «, t00=0x0033, t01=0x0022}
0x04fd2…04fe0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x0034}
0x04fe0…04fe8               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x0042}
0x04fe8…0502c               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0033, t01=0x004a}
0x0502c…05036               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x008e}
0x05036…05050               Head {h00=0x0016, h01=0x0050, text=»*    ABORT ROUTINE«, t00=0x0033, t01=0x0098}
0x05050…0505a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00b2}
0x0505a…0507a               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0033, t01=0x00bc}
0x0507a…05082               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x00dc}
0x05082…050ae               Head {h00=0x0028, h01=0x0050, text=»ABORT LD A1,DWTRTP,A6 TIMER POINTER «, t00=0x0033, t01=0x00e4}
0x050ae…050d4               Head {h00=0x0022, h01=0x0050, text=» RF(Z) AB:10 NO TIMER RUNNING «, t00=0x0033, t01=0x0110}
0x050d4…050ee               Head {h00=0x0016, h01=0x0050, text=» CMR A1 KILL TIMER«, t00=0x0033, t01=0x0136}
0x050ee…05104               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x0033, t01=0x0150}
0x05104…0510c               Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x0166}
0x0510c…05134               Head {h00=0x0024, h01=0x0050, text=»AB:10 LD A2,DWTOR,A6 ORDER CODE «, t00=0x0033, t01=0x016e}
0x05134…05148               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0034, t01=0x0008}
0x05148…0515a               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0034, t01=0x001c}
0x0515a…05170               Head {h00=0x0012, h01=0x0050, text=» RF(NE) AB:RTN«, t00=0x0034, t01=0x002e}
0x05170…051a2               Head {h00=0x002e, h01=0x0050, text=» CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE«, t00=0x0034, t01=0x0044}
0x051a2…051cc               Head {h00=0x0026, h01=0x0050, text=» LD A2,FDWTUT WRITING DWT ADDRESS «, t00=0x0034, t01=0x0076}
0x051cc…051de               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x0034, t01=0x00a0}
0x051de…05202               Head {h00=0x0020, h01=0x0050, text=» RF(NE) AB:RTN NOT THIS DWT «, t00=0x0034, t01=0x00b2}
0x05202…05226               Head {h00=0x0020, h01=0x0050, text=» CM FDWTUT REST SENDING DWT «, t00=0x0034, t01=0x00d6}
0x05226…0524a               Head {h00=0x0020, h01=0x0050, text=» CM XACK RESET ACK EXPECTED «, t00=0x0034, t01=0x00fa}
0x0524a…05252               Head {h00=0x0004, h01=0x0050, t00=0x0034, t01=0x011e}
0x05252…05266               Head {h00=0x0010, h01=0x0050, text=»AB:RTN EQU *«, t00=0x0034, t01=0x0126}
0x05266…0527a               Head {h00=0x0010, h01=0x0050, text=» ABL RTABRT «, t00=0x0034, t01=0x013a}
0x0527a…05288               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x014e}
0x05288…052d6               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0034, t01=0x015c}
0x052d6…05324               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0035, t01=0x001a}
0x05324…0532e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0068}
0x0532e…05338               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0072}
0x05338…05368               Head {h00=0x002c, h01=0x0050, text=»* REQUEST HANDLER/APPLICATION INTERFACE «, t00=0x0035, t01=0x007c}
0x05368…05372               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00ac}
0x05372…0537c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00b6}
0x0537c…053ca               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0035, t01=0x00c0}
0x053ca…05418               Head {h00=0x004a, h01=0x0050, text=»**********************************************************************«, t00=0x0035, t01=0x010e}
0x05418…05422               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x015c}
0x05422…0544a               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATION FROM TERMINAL TASKS«, t00=0x0035, t01=0x0166}
0x0544a…05454               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x018e}
0x05454…05468               Head {h00=0x0010, h01=0x0050, text=»DCACT EQU * «, t00=0x0036, t01=0x0008}
0x05468…0548c               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0036, t01=0x001c}
0x0548c…054b6               Head {h00=0x0026, h01=0x0050, text=» LDR A2,A7 ORDER CODE AS PARAMETER«, t00=0x0036, t01=0x0040}
0x054b6…054da               Head {h00=0x0020, h01=0x0050, text=» LDKL A7,DTETAB DTE TAB ADDR«, t00=0x0036, t01=0x006a}
0x054da…05504               Head {h00=0x0026, h01=0x0050, text=» ANK A2,/FF STRIP OFF OPTION BITS «, t00=0x0036, t01=0x008e}
0x05504…05542               Head {h00=0x003a, h01=0x0050, text=» CF A15,LOOKUP BRANCH ON CODES, TABLE ADDRESS TO STACK«, t00=0x0036, t01=0x00b8}
0x05542…05576               Head {h00=0x0030, h01=0x0050, text=» DATA TREQX,RTREQ LAST ENTRY; ERROR ADDRESS «, t00=0x0036, t01=0x00f6}
0x05576…055a2               Head {h00=0x0028, h01=0x0050, text=» DATA RECEIVE,RQRECE RECEIVE REQUEST«, t00=0x0036, t01=0x012a}
0x055a2…055c8               Head {h00=0x0022, h01=0x0050, text=» DATA SEND,RQSEND SEND REQUEST«, t00=0x0036, t01=0x0156}
0x055c8…055ee               Head {h00=0x0022, h01=0x0050, text=» DATA OPEN,RQOPEN OPEN REQUEST«, t00=0x0036, t01=0x017c}
0x055ee…05616               Head {h00=0x0024, h01=0x0050, text=» DATA CLOSE,RQCLOS CLOSE REQUEST«, t00=0x0037, t01=0x0012}
0x05616…05648               Head {h00=0x002e, h01=0x0050, text=» DATA CONPAS,RQCON CONNECT PASSIVE REQUEST«, t00=0x0037, t01=0x003a}
0x05648…05674               Head {h00=0x0028, h01=0x0050, text=» DATA DISCO,RQDIS DISCONNECT REQUEST«, t00=0x0037, t01=0x006c}
0x05674…056a2               Head {h00=0x002a, h01=0x0050, text=» DATA RSTAT,RQRSTS READ STATUS REQUEST«, t00=0x0037, t01=0x0098}
0x056a2…056ce               Head {h00=0x0028, h01=0x0050, text=» DATA SSTAT,RQSST SET STATUS REQUEST«, t00=0x0037, t01=0x00c6}
0x056ce…056fe               Head {h00=0x002c, h01=0x0050, text=» DATA STIMOT,RQTIME SET REQUEST TIMEOUT «, t00=0x0037, t01=0x00f2}
0x056fe…0573c               Head {h00=0x003a, h01=0x0050, text=»TREQX DATA STATIS,RQSTAT READ/RESET STATISTICS REQUEST«, t00=0x0037, t01=0x0122}
0x0573c…0574a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0160}
0x0574a…05754               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x016e}
0x05754…0575e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0178}
0x0575e…05774               Head {h00=0x0012, h01=0x0050, text=»* OPEN REQUEST«, t00=0x0037, t01=0x0182}
0x05774…0577e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0008}
0x0577e…0579e               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0038, t01=0x0012}
0x0579e…057c6               Head {h00=0x0024, h01=0x0050, text=»*  SYMBOLIC DTE-ADDRESS (ECBCW2)«, t00=0x0038, t01=0x0032}
0x057c6…057d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x005a}
0x057d0…057e4               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0038, t01=0x0064}
0x057e4…05820               Head {h00=0x0038, h01=0x0050, text=»*  1. CHECK IF ALREADY OPEN & IF SO SAME DTE-ADDRESS«, t00=0x0038, t01=0x0078}
0x05820…0584a               Head {h00=0x0026, h01=0x0050, text=»*  2. CONVERT & VERIFY DTE ADDRESS«, t00=0x0038, t01=0x00b4}
0x0584a…05854               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00de}
0x05854…05868               Head {h00=0x0010, h01=0x0050, text=»RQOPEN EQU *«, t00=0x0038, t01=0x00e8}
0x05868…0589a               Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET SYMBOLIC DTE-ADDRESS «, t00=0x0038, t01=0x00fc}
0x0589a…058c2               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x0038, t01=0x012e}
0x058c2…058ee               Head {h00=0x0028, h01=0x0050, text=» ADR A2,A2 WORD ALIGNED INDEX VALUE «, t00=0x0038, t01=0x0156}
0x058ee…0591e               Head {h00=0x002c, h01=0x0050, text=» ABI RQOPTB,A2 BRANCH ON INDEX IN TABLE «, t00=0x0038, t01=0x0182}
0x0591e…05948               Head {h00=0x0026, h01=0x0050, text=»RQOPTB DATA RQOP20 CLOSED/INACTIVE«, t00=0x0039, t01=0x0022}
0x05948…0596e               Head {h00=0x0022, h01=0x0050, text=» DATA RQOP15 OPEN IN PROGRESS «, t00=0x0039, t01=0x004c}
0x0596e…05988               Head {h00=0x0016, h01=0x0050, text=» DATA RQOP10 OPEN «, t00=0x0039, t01=0x0072}
0x05988…059ae               Head {h00=0x0022, h01=0x0050, text=» DATA RQOP15 CLOSE IN PROGRESS«, t00=0x0039, t01=0x008c}
0x059ae…059c2               Head {h00=0x0010, h01=0x0050, text=»RQOP10 EQU *«, t00=0x0039, t01=0x00b2}
0x059c2…059f8               Head {h00=0x0032, h01=0x0050, text=» CW A1,DTELAD,A7 SAME AS THE ONE WHO OPENED ? «, t00=0x0039, t01=0x00c6}
0x059f8…05a16               Head {h00=0x001a, h01=0x0050, text=» RF(E) RQOP90 YES - OK«, t00=0x0039, t01=0x00fc}
0x05a16…05a2a               Head {h00=0x0010, h01=0x0050, text=»RQOP15 EQU *«, t00=0x0039, t01=0x011a}
0x05a2a…05a54               Head {h00=0x0026, h01=0x0050, text=» ABL RTSEQ RETURN: SEQUENCE ERROR «, t00=0x0039, t01=0x012e}
0x05a54…05a5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0158}
0x05a5e…05a72               Head {h00=0x0010, h01=0x0050, text=»RQOP20 EQU *«, t00=0x0039, t01=0x0162}
0x05a72…05a9c               Head {h00=0x0026, h01=0x0050, text=» IM DTESTA,A7 SET OPEN IN PROGRESS«, t00=0x0039, t01=0x0176}
0x05a9c…05ace               Head {h00=0x002e, h01=0x0050, text=» ST A1,DTELAD,A7 SAVE SYMBOLIC DTE ADDRESS«, t00=0x003a, t01=0x0010}
0x05ace…05b04               Head {h00=0x0032, h01=0x0050, text=» LDR A2,A7 ADDR TO SELECT AND POLL IN DTE TAB «, t00=0x003a, t01=0x0042}
0x05b04…05b38               Head {h00=0x0030, h01=0x0050, text=» CF A15,GETDNA CONVERT AND VALIDATE DTE ADDR«, t00=0x003a, t01=0x0078}
0x05b38…05b4a               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x003a, t01=0x00ac}
0x05b4a…05b64               Head {h00=0x0016, h01=0x0050, text=» RF(NN) RQOP80 OK «, t00=0x003a, t01=0x00be}
0x05b64…05b88               Head {h00=0x0020, h01=0x0050, text=» CM DTELAD,A7 CLEAR DTE ADDR«, t00=0x003a, t01=0x00d8}
0x05b88…05bae               Head {h00=0x0022, h01=0x0050, text=» CM DTESTA,A7 CLEAR DTE STATUS«, t00=0x003a, t01=0x00fc}
0x05bae…05bd6               Head {h00=0x0024, h01=0x0050, text=» ABL RTREQ RETURN: REQUEST ERROR«, t00=0x003a, t01=0x0122}
0x05bd6…05be0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x014a}
0x05be0…05bf4               Head {h00=0x0010, h01=0x0050, text=»RQOP80 EQU *«, t00=0x003a, t01=0x0154}
0x05bf4…05c08               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x003a, t01=0x0168}
0x05c08…05c32               Head {h00=0x0026, h01=0x0050, text=» LDR* A2,A7 DTE ADDRESS IN EBCDIC «, t00=0x003a, t01=0x017c}
0x05c32…05c44               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x003b, t01=0x0016}
0x05c44…05c58               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x003b, t01=0x0028}
0x05c58…05c7c               Head {h00=0x0020, h01=0x0050, text=» RF(Z) RQOP30 ONLY ONE BYTE «, t00=0x003b, t01=0x003c}
0x05c7c…05ca8               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 CONVERT INTO ASCII «, t00=0x003b, t01=0x0060}
0x05ca8…05cba               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x003b, t01=0x008c}
0x05cba…05cce               Head {h00=0x0010, h01=0x0050, text=»RQOP30 EQU *«, t00=0x003b, t01=0x009e}
0x05cce…05ce0               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A1«, t00=0x003b, t01=0x00b2}
0x05ce0…05cf4               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x003b, t01=0x00c4}
0x05cf4…05d0c               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A1«, t00=0x003b, t01=0x00d8}
0x05d0c…05d3a               Head {h00=0x002a, h01=0x0050, text=» STR A2,A7 SAVE ASCII VALUE IN DTETAB «, t00=0x003b, t01=0x00f0}
0x05d3a…05d46               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x011e}
0x05d46…05d54               Head {h00=0x000a, h01=0x0050, text=»    =1«, t00=0x003b, t01=0x012a}
0x05d54…05d76               Head {h00=0x001e, h01=0x0050, text=» ABL DTE:ON CONNECT MODEM «, t00=0x003b, t01=0x0138}
0x05d76…05d8a               Head {h00=0x0010, h01=0x0050, text=»RQOP90 EQU *«, t00=0x003b, t01=0x015a}
0x05d8a…05db8               Head {h00=0x002a, h01=0x0050, text=» LD A2,DTEPLS,A7 PHYSICAL CONNECTION ?«, t00=0x003b, t01=0x016e}
0x05db8…05ddc               Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) RTOK YES RETURN OK «, t00=0x003c, t01=0x000c}
0x05ddc…05e0a               Head {h00=0x002a, h01=0x0050, text=» ABL RTPHYC RETURN PHYSICAL CONNECTION«, t00=0x003c, t01=0x0030}
0x05e0a…05e18               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x005e}
0x05e18…05e22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x006c}
0x05e22…05e3a               Head {h00=0x0014, h01=0x0050, text=»* CLOSE REQUEST «, t00=0x003c, t01=0x0076}
0x05e3a…05e44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x008e}
0x05e44…05e64               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x003c, t01=0x0098}
0x05e64…05e8a               Head {h00=0x0022, h01=0x0050, text=»*  OPTION /00 = UNCONDITIONAL «, t00=0x003c, t01=0x00b8}
0x05e8a…05ea8               Head {h00=0x001a, h01=0x0050, text=»*   /80 = CONDITIONAL «, t00=0x003c, t01=0x00de}
0x05ea8…05ebc               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x003c, t01=0x00fc}
0x05ebc…05f0c               Head {h00=0x004c, h01=0x0050, text=»*  1. IF CONDITIONAL, CHECK IF ANY LOGICAL CONNECTIONS (DWTS) ARE ACTIVE«, t00=0x003c, t01=0x0110}
0x05f0c…05f22               Head {h00=0x0012, h01=0x0050, text=»*     ACTIVE. «, t00=0x003c, t01=0x0160}
0x05f22…05f56               Head {h00=0x0030, h01=0x0050, text=»*  2. IF UNCONDITIONAL, DISCONNECT ALL DWT:S«, t00=0x003c, t01=0x0176}
0x05f56…05f60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x001a}
0x05f60…05f74               Head {h00=0x0010, h01=0x0050, text=»RQCLOS EQU *«, t00=0x003d, t01=0x0024}
0x05f74…05fa0               Head {h00=0x0028, h01=0x0050, text=» LD A5,DWTOR,A6 GET OPTION AND ORDER«, t00=0x003d, t01=0x0038}
0x05fa0…05fd0               Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBCW2,A8 GET SYMBOLIC DTE - ADDR«, t00=0x003d, t01=0x0064}
0x05fd0…05fe6               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RQCL20 «, t00=0x003d, t01=0x0094}
0x05fe6…0600c               Head {h00=0x0022, h01=0x0050, text=» CW A2,DTELAD,A7 CORRECT DTE ?«, t00=0x003d, t01=0x00aa}
0x0600c…06038               Head {h00=0x0028, h01=0x0050, text=» ABL(NE) RTREQ RETURN: REQUEST ERROR«, t00=0x003d, t01=0x00d0}
0x06038…0604c               Head {h00=0x0010, h01=0x0050, text=»RQCL20 EQU *«, t00=0x003d, t01=0x00fc}
0x0604c…06074               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x003d, t01=0x0110}
0x06074…06094               Head {h00=0x001c, h01=0x0050, text=» ABL(Z) RTOK RETURN : OK«, t00=0x003d, t01=0x0138}
0x06094…060b2               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 DTE OPENED ?«, t00=0x003d, t01=0x0158}
0x060b2…060e0               Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) RTSEQ RETURN: SEQUENCE ERROR «, t00=0x003d, t01=0x0176}
0x060e0…06108               Head {h00=0x0024, h01=0x0050, text=» IM DTESTA,A7 CLOSE IN PROGRESS «, t00=0x003e, t01=0x0014}
0x06108…06134               Head {h00=0x0028, h01=0x0050, text=» LDR A8,A6 SAVE REQUESTING DWT-ADDR «, t00=0x003e, t01=0x003c}
0x06134…0613e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0068}
0x0613e…06152               Head {h00=0x0010, h01=0x0050, text=»RQCL40 EQU *«, t00=0x003e, t01=0x0072}
0x06152…06168               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x003e, t01=0x0086}
0x06168…06196               Head {h00=0x002a, h01=0x0050, text=» LD A6,DTEDDT,A7 GET DISCARD DWT ADDR «, t00=0x003e, t01=0x009c}
0x06196…061ac               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RQCL50 «, t00=0x003e, t01=0x00ca}
0x061ac…061d2               Head {h00=0x0022, h01=0x0050, text=» LDR A5,A5 CONDITIONAL CLOSE ?«, t00=0x003e, t01=0x00e0}
0x061d2…061ee               Head {h00=0x0018, h01=0x0050, text=» RF(N) RQCL95 YES ! «, t00=0x003e, t01=0x0106}
0x061ee…0621e               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTCHN,A6 GET POINTER TO NEXT DWT«, t00=0x003e, t01=0x0122}
0x0621e…06250               Head {h00=0x002e, h01=0x0050, text=» ST A2,DTEDDT,A7 DISCARD DWT ADDR REMOVED «, t00=0x003e, t01=0x0152}
0x06250…06262               Head {h00=0x000e, h01=0x0050, text=» RF RQCL60«, t00=0x003e, t01=0x0184}
0x06262…06276               Head {h00=0x0010, h01=0x0050, text=»RQCL50 EQU *«, t00=0x003f, t01=0x0008}
0x06276…06282               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x001c}
0x06282…062a8               Head {h00=0x0022, h01=0x0050, text=» LD A6,DTEDWT,A7 GET DWT ADDR «, t00=0x003f, t01=0x0028}
0x062a8…062ce               Head {h00=0x0022, h01=0x0050, text=» RF(Z) RQCL90 NO DWT IN QUEUE «, t00=0x003f, t01=0x004e}
0x062ce…062f4               Head {h00=0x0022, h01=0x0050, text=» LDR A5,A5 CONDITIONAL CLOSE ?«, t00=0x003f, t01=0x0074}
0x062f4…06310               Head {h00=0x0018, h01=0x0050, text=» RF(N) RQCL95 YES ! «, t00=0x003f, t01=0x009a}
0x06310…0634a               Head {h00=0x0036, h01=0x0050, text=» LD A2,DWTCHN,A6 GET POINTER TO NEXT DWT IN CHAIN «, t00=0x003f, t01=0x00b6}
0x0634a…0637e               Head {h00=0x0030, h01=0x0050, text=» ST A2,DTEDWT,A7 DWT FIRST IN QUEUE REMOVED «, t00=0x003f, t01=0x00f0}
0x0637e…06394               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x003f, t01=0x0124}
0x06394…063a8               Head {h00=0x0010, h01=0x0050, text=»RQCL60 EQU *«, t00=0x003f, t01=0x013a}
0x063a8…063b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x014e}
0x063b4…063e8               Head {h00=0x0030, h01=0x0050, text=» CF A15,RELBUF REMOVE BUFFERS QUEUED ON DWT «, t00=0x003f, t01=0x015a}
0x063e8…0640e               Head {h00=0x0022, h01=0x0050, text=» CM DWTSTA,A6 CLEAR DWT-STATUS«, t00=0x003f, t01=0x018e}
0x0640e…06432               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 PRESET RETURN CODE«, t00=0x0040, t01=0x0024}
0x06432…06456               Head {h00=0x0020, h01=0x0050, text=» CWR A8,A6 REQUESTING DWT ? «, t00=0x0040, t01=0x0048}
0x06456…06480               Head {h00=0x0026, h01=0x0050, text=» RF(E) RQCL80 YES-COMPLETE REQUEST«, t00=0x0040, t01=0x006c}
0x06480…064ac               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTST,A6 A PENDING REQUEST ? «, t00=0x0040, t01=0x0096}
0x064ac…064d2               Head {h00=0x0022, h01=0x0050, text=» RB(N) RQCL40 NO TAKE NEXT DWT«, t00=0x0040, t01=0x00c2}
0x064d2…0650c               Head {h00=0x0036, h01=0x0050, text=» LDK A1,R:SEQ COMPLETE REQUEST WITH SEQUENCE ERROR«, t00=0x0040, t01=0x00e8}
0x0650c…06520               Head {h00=0x0010, h01=0x0050, text=»RQCL80 EQU *«, t00=0x0040, t01=0x0122}
0x06520…0654c               Head {h00=0x0028, h01=0x0050, text=» CF A15,TENDIO COMPLETE THE REQUEST «, t00=0x0040, t01=0x0136}
0x0654c…06572               Head {h00=0x0022, h01=0x0050, text=» RB RQCL40 TAKE NEXT ON QUEUE «, t00=0x0040, t01=0x0162}
0x06572…06586               Head {h00=0x0010, h01=0x0050, text=»RQCL90 EQU *«, t00=0x0040, t01=0x0188}
0x06586…06594               Head {h00=0x000a, h01=0x0050, text=»    =1«, t00=0x0041, t01=0x000c}
0x06594…065be               Head {h00=0x0026, h01=0x0050, text=» LDR A6,A8 GET REQUESTING DWT ADDR«, t00=0x0041, t01=0x001a}
0x065be…065ea               Head {h00=0x0028, h01=0x0050, text=» LD A8,DWTECB,A6 RESTORE ECB ADDRESS«, t00=0x0041, t01=0x0044}
0x065ea…065f8               Head {h00=0x000a, h01=0x0050, text=»    =1«, t00=0x0041, t01=0x0070}
0x065f8…0662a               Head {h00=0x002e, h01=0x0050, text=» RF(Z) RQCL92 REQUEST ALREADY COMPLETED =1«, t00=0x0041, t01=0x007e}
0x0662a…06644               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RC=0 =1 «, t00=0x0041, t01=0x00b0}
0x06644…06674               Head {h00=0x002c, h01=0x0050, text=» CF A15,TENDIO COMPLETE CLOSE REQUEST =1«, t00=0x0041, t01=0x00ca}
0x06674…0668c               Head {h00=0x0014, h01=0x0050, text=»RQCL92 EQU *  =1«, t00=0x0041, t01=0x00fa}
0x0668c…066a4               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=0  =1«, t00=0x0041, t01=0x0112}
0x066a4…066bc               Head {h00=0x0014, h01=0x0050, text=» LDKL A5,STB  =1«, t00=0x0041, t01=0x012a}
0x066bc…066e4               Head {h00=0x0024, h01=0x0050, text=» CF A5,CHALTI HALT I/P DEVICE =1«, t00=0x0041, t01=0x0142}
0x066e4…0670c               Head {h00=0x0024, h01=0x0050, text=» CF A5,CHALTO HALT O/P DEVICE =1«, t00=0x0041, t01=0x016a}
0x0670c…06722 (66, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» LDK A2,0  =1 «, t00=0x0042, t01=0x0004}
0x06722…0674e               Head {h00=0x0028, h01=0x0050, text=» CIO A2,1,LCUIN DISCONNECT MODEM =1 «, t00=0x0042, t01=0x001a}
0x0674e…06760               Head {h00=0x000e, h01=0x0050, text=» XIF   =1 «, t00=0x0042, t01=0x0046}
0x06760…06778               Head {h00=0x0014, h01=0x0050, text=» IFT P6805=1  =1«, t00=0x0042, t01=0x0058}
0x06778…0679e               Head {h00=0x0022, h01=0x0050, text=» LDK A2,1 DISCONNECT ORDER =1 «, t00=0x0042, t01=0x0070}
0x0679e…067ca               Head {h00=0x0028, h01=0x0050, text=» CIO A2,0,LCUIN DISCONNECT MODEM =1 «, t00=0x0042, t01=0x0096}
0x067ca…067dc               Head {h00=0x000e, h01=0x0050, text=» XIF   =1 «, t00=0x0042, t01=0x00c2}
0x067dc…06806               Head {h00=0x0026, h01=0x0050, text=» CMR A7 REMOVE NETWORK ADDRESS =1 «, t00=0x0042, t01=0x00d4}
0x06806…0682c               Head {h00=0x0022, h01=0x0050, text=» CM DTESTA,A7 CLEAR STATUS =1 «, t00=0x0042, t01=0x00fe}
0x0682c…0685a               Head {h00=0x002a, h01=0x0050, text=» LD A1,DCTPGP POLL TIMER RUNNING ? =6 «, t00=0x0042, t01=0x0124}
0x0685a…06876               Head {h00=0x0018, h01=0x0050, text=» RF(Z) RQCL94 NO =6 «, t00=0x0042, t01=0x0152}
0x06876…06898               Head {h00=0x001e, h01=0x0050, text=» CM* DCTPGP KILL TIMER =6 «, t00=0x0042, t01=0x016e}
0x06898…068bc               Head {h00=0x0020, h01=0x0050, text=» CM DCTPGP CLEAR POINTER =6 «, t00=0x0042, t01=0x0190}
0x068bc…068d4               Head {h00=0x0014, h01=0x0050, text=»RQCL94 EQU *  =6«, t00=0x0043, t01=0x0024}
0x068d4…06904               Head {h00=0x002c, h01=0x0050, text=» CM DTEDLS,A7 INDICATE DATA LINK DOWN =6«, t00=0x0043, t01=0x003c}
0x06904…0691a               Head {h00=0x0012, h01=0x0050, text=» ABL TDISP  =1«, t00=0x0043, t01=0x006c}
0x0691a…0692e               Head {h00=0x0010, h01=0x0050, text=»RQCL95 EQU *«, t00=0x0043, t01=0x0082}
0x0692e…06940               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x0043, t01=0x0096}
0x06940…0696c               Head {h00=0x0028, h01=0x0050, text=» ST A2,DTESTA,A7 SET DTE OPEN AGAIN «, t00=0x0043, t01=0x00a8}
0x0696c…06992               Head {h00=0x0022, h01=0x0050, text=» LDR A6,A8 RESTORE DWT ADDRESS«, t00=0x0043, t01=0x00d4}
0x06992…069b4               Head {h00=0x001e, h01=0x0050, text=» ABL RTSEQ SEQUENCE ERROR «, t00=0x0043, t01=0x00fa}
0x069b4…069c2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0043, t01=0x011c}
0x069c2…069cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x012a}
0x069cc…069ee               Head {h00=0x001e, h01=0x0050, text=»* CONNECT PASSIVE REQUEST «, t00=0x0043, t01=0x0134}
0x069ee…069f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0156}
0x069f8…06a18               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0043, t01=0x0160}
0x06a18…06a56               Head {h00=0x003a, h01=0x0050, text=»*  - SYMBOLIC SUBADDRESS (RIGHTMOST BYTE IN ECBBA-BFR)«, t00=0x0043, t01=0x0180}
0x06a56…06a80               Head {h00=0x0026, h01=0x0050, text=»*  - DEVICE ADDRESSES IN ECBBA-BFR«, t00=0x0044, t01=0x002e}
0x06a80…06aa6               Head {h00=0x0022, h01=0x0050, text=»*  - LENGTH OF BUFFER (ECBRL) «, t00=0x0044, t01=0x0058}
0x06aa6…06ad0               Head {h00=0x0026, h01=0x0050, text=»*  - SYMBOLIC DTE-ADDRESS (ECBCW2)«, t00=0x0044, t01=0x007e}
0x06ad0…06ada               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00a8}
0x06ada…06aee               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0044, t01=0x00b2}
0x06aee…06b22               Head {h00=0x0030, h01=0x0050, text=»*  1. VERIFY DTE-ADDRESS AS PER OPEN REQUEST«, t00=0x0044, t01=0x00c6}
0x06b22…06b54               Head {h00=0x002e, h01=0x0050, text=»*  2. VERIFY & CONVERT SUBTERMINAL ADDRESS«, t00=0x0044, t01=0x00fa}
0x06b54…06b84               Head {h00=0x002c, h01=0x0050, text=»*  3. VERIFY AND STORE DEVICE ADDRESSES «, t00=0x0044, t01=0x012c}
0x06b84…06bac               Head {h00=0x0024, h01=0x0050, text=»*  4. LINK CALLING DWT TO QUEUE «, t00=0x0044, t01=0x015c}
0x06bac…06bb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0184}
0x06bb6…06bca               Head {h00=0x0010, h01=0x0050, text=»RQCON EQU * «, t00=0x0044, t01=0x018e}
0x06bca…06bf4               Head {h00=0x0026, h01=0x0050, text=» LD A2,DTELAD,A7 SYMBOLIC DTE-ADDR«, t00=0x0045, t01=0x0012}
0x06bf4…06c1a               Head {h00=0x0022, h01=0x0050, text=» CW A2,ECBCW2,A8 CORRECT DTE ?«, t00=0x0045, t01=0x003c}
0x06c1a…06c4a               Head {h00=0x002c, h01=0x0050, text=» ABL(NE) RTREQ NO, RETURN: REQUEST ERROR«, t00=0x0045, t01=0x0062}
0x06c4a…06c72               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x0045, t01=0x0092}
0x06c72…06c8a               Head {h00=0x0014, h01=0x0050, text=» SUK A2,2 OPEN ?«, t00=0x0045, t01=0x00ba}
0x06c8a…06cbc               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTSEQ NO, RETURN: SEQUENCE ERROR «, t00=0x0045, t01=0x00d2}
0x06cbc…06ce4               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x0045, t01=0x0104}
0x06ce4…06d0a               Head {h00=0x0022, h01=0x0050, text=» SUK A2,2 ALREADY CONNECTED ? «, t00=0x0045, t01=0x012c}
0x06d0a…06d34               Head {h00=0x0026, h01=0x0050, text=» ABL(Z) RTOK ALREADY CONNECTED =17«, t00=0x0045, t01=0x0152}
0x06d34…06d4e               Head {h00=0x0016, h01=0x0050, text=» IFT MESPAS=1  =13«, t00=0x0045, t01=0x017c}
0x06d4e…06d72               Head {h00=0x0020, h01=0x0050, text=» LDK A2,/40 OPTION CODE =13 «, t00=0x0046, t01=0x0008}
0x06d72…06d9c               Head {h00=0x0026, h01=0x0050, text=» CC A2,DWTOPT,A6 DISCARD DWT ? =13«, t00=0x0046, t01=0x002c}
0x06d9c…06dba               Head {h00=0x001a, h01=0x0050, text=» RF(NE) RQCN10 NO =13 «, t00=0x0046, t01=0x0056}
0x06dba…06de8               Head {h00=0x002a, h01=0x0050, text=» CM DWTCHP,A6 INDICATE DISCARD DWT =13«, t00=0x0046, t01=0x0074}
0x06de8…06e1c               Head {h00=0x0030, h01=0x0050, text=» LD A1,DTEDDT,A7 POINTER TO DISCARD DWT =13 «, t00=0x0046, t01=0x00a2}
0x06e1c…06e50               Head {h00=0x0030, h01=0x0050, text=» RF(NZ) RQCN50 MORE THAN ONE DISC. DWT ? =13«, t00=0x0046, t01=0x00d6}
0x06e50…06e8c               Head {h00=0x0038, h01=0x0050, text=» ST A6,DTEDDT,A7 SAVE POINTER TO TO DISCARD DWT =13 «, t00=0x0046, t01=0x010a}
0x06e8c…06ea4               Head {h00=0x0014, h01=0x0050, text=» RF RQCN60  =13 «, t00=0x0046, t01=0x0146}
0x06ea4…06ebe               Head {h00=0x0016, h01=0x0050, text=»RQCN10 EQU *  =13 «, t00=0x0046, t01=0x015e}
0x06ebe…06ed0               Head {h00=0x000e, h01=0x0050, text=» XIF   =13«, t00=0x0046, t01=0x0178}
0x06ed0…06ee6               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x0046, t01=0x018a}
0x06ee6…06f14               Head {h00=0x002a, h01=0x0050, text=» LDKL A4,SUBBUF MMU BUFFER ADDRESS =16«, t00=0x0047, t01=0x0010}
0x06f14…06f32               Head {h00=0x001a, h01=0x0050, text=» ST A4,ECBBA,A8 TO ECB«, t00=0x0047, t01=0x003e}
0x06f32…06f60               Head {h00=0x002a, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA TO MMU BUFFER«, t00=0x0047, t01=0x005c}
0x06f60…06f6c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x008a}
0x06f6c…06f9a               Head {h00=0x002a, h01=0x0050, text=» LD A4,ECBBA,A8 GET ECB-BUFFER ADDRESS«, t00=0x0047, t01=0x0096}
0x06f9a…06fae               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0047, t01=0x00c4}
0x06fae…06fc8               Head {h00=0x0016, h01=0x0050, text=» LDK A2,0 RESET A2«, t00=0x0047, t01=0x00d8}
0x06fc8…06ff2               Head {h00=0x0026, h01=0x0050, text=» LCR A2,A4 GET SELECT SUB-ADDRESS «, t00=0x0047, t01=0x00f2}
0x06ff2…0701e               Head {h00=0x0028, h01=0x0050, text=» SC A2,DWTSUB,A6 SAVE IT IN THE DWT «, t00=0x0047, t01=0x011c}
0x0701e…07050               Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET SYMBOLIC DTE-ADDRESS «, t00=0x0047, t01=0x0148}
0x07050…0708a               Head {h00=0x0036, h01=0x0050, text=» CF A15,GETSNA VALIDATE AND TRANSLATE THE SUB-ADDR«, t00=0x0047, t01=0x017a}
0x0708a…070a8               Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 IS IT OK ? «, t00=0x0048, t01=0x0024}
0x070a8…070c2               Head {h00=0x0016, h01=0x0050, text=» RF(NN) RQCN20 YES«, t00=0x0048, t01=0x0042}
0x070c2…070ea               Head {h00=0x0024, h01=0x0050, text=» CM DWTSUB,A7 CLEAR SUB-ADDRESS «, t00=0x0048, t01=0x005c}
0x070ea…07112               Head {h00=0x0024, h01=0x0050, text=» ABL RTREQ RETURN REQUEST ERROR «, t00=0x0048, t01=0x0084}
0x07112…07126               Head {h00=0x0010, h01=0x0050, text=»RQCN20 EQU *«, t00=0x0048, t01=0x00ac}
0x07126…0713a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0048, t01=0x00c0}
0x0713a…07170               Head {h00=0x0032, h01=0x0050, text=» LC A1,TASCII,A1 CONVERT FROM EBCDIC TO ASCII «, t00=0x0048, t01=0x00d4}
0x07170…0717c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x010a}
0x0717c…07190               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x0048, t01=0x0116}
0x07190…071be               Head {h00=0x002a, h01=0x0050, text=» SC A1,DWTCHP,A6 SAVE NETWORK ADDRESS «, t00=0x0048, t01=0x012a}
0x071be…071ca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x0158}
0x071ca…071f6               Head {h00=0x0028, h01=0x0050, text=» LC A2,1,A4 GET SYMBOLIC ADDRESS =8 «, t00=0x0048, t01=0x0164}
0x071f6…07224               Head {h00=0x002a, h01=0x0050, text=» SC A2,DWTSUB+1,A6 SAVE IT IN THE DWT «, t00=0x0048, t01=0x0190}
0x07224…07256               Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET SYMBOLIC DTE ADDRESS «, t00=0x0049, t01=0x002e}
0x07256…07282               Head {h00=0x0028, h01=0x0050, text=» ST A1,DWTLAD,A6 SAVE IT IN THE DWT «, t00=0x0049, t01=0x0060}
0x07282…072c0               Head {h00=0x003a, h01=0x0050, text=» CF A15,GETSNA VALIDATE AND TRANSLATE THE SUB-ADDRESS «, t00=0x0049, t01=0x008c}
0x072c0…072de               Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 IS IT OK ? «, t00=0x0049, t01=0x00ca}
0x072de…072f8               Head {h00=0x0016, h01=0x0050, text=» RF(NN) RQCN30 YES«, t00=0x0049, t01=0x00e8}
0x072f8…07320               Head {h00=0x0024, h01=0x0050, text=» CM DWTSUB,A6 CLEAR SUB-ADDRESS «, t00=0x0049, t01=0x0102}
0x07320…07348               Head {h00=0x0024, h01=0x0050, text=» CM DWTLAD,A6 CLEAR DTE ADDRESS «, t00=0x0049, t01=0x012a}
0x07348…07370               Head {h00=0x0024, h01=0x0050, text=» ABL RTREQ RETURN REQUEST ERROR «, t00=0x0049, t01=0x0152}
0x07370…07384               Head {h00=0x0010, h01=0x0050, text=»RQCN30 EQU *«, t00=0x0049, t01=0x017a}
0x07384…07398               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0049, t01=0x018e}
0x07398…073ce               Head {h00=0x0032, h01=0x0050, text=» LC A1,TASCII,A1 CONVERT FROM EBCDIC TO ASCII «, t00=0x004a, t01=0x0012}
0x073ce…073da               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x0048}
0x073da…0740a               Head {h00=0x002c, h01=0x0050, text=» SC A1,DWTCHP+1,A6 SAVE NETWORK ADDRESS «, t00=0x004a, t01=0x0054}
0x0740a…07420               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x004a, t01=0x0084}
0x07420…07438               Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW2,A8«, t00=0x004a, t01=0x009a}
0x07438…07444               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x00b2}
0x07444…0744e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00be}
0x0744e…07458               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00c8}
0x07458…07482               Head {h00=0x0026, h01=0x0050, text=»*  LINK DWT TO CONFIGURATION CHAIN«, t00=0x004a, t01=0x00d2}
0x07482…0748c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00fc}
0x0748c…0749c               Head {h00=0x000c, h01=0x0050, text=»    =13 «, t00=0x004a, t01=0x0106}
0x0749c…074b0               Head {h00=0x0010, h01=0x0050, text=»RQCN40 EQU *«, t00=0x004a, t01=0x0116}
0x074b0…074e2               Head {h00=0x002e, h01=0x0050, text=» LD A1,DTEDWT,A7 GET POINTER TO DWT QUEUE «, t00=0x004a, t01=0x012a}
0x074e2…074fc               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) RQCN50 YES«, t00=0x004a, t01=0x015c}
0x074fc…0752e               Head {h00=0x002e, h01=0x0050, text=» ST A6,DTEDWT,A7 SAVE POINTER TO DWT QUEUE«, t00=0x004a, t01=0x0176}
0x0752e…07540               Head {h00=0x000e, h01=0x0050, text=» RF RQCN60«, t00=0x004b, t01=0x0018}
0x07540…07554               Head {h00=0x0010, h01=0x0050, text=»RQCN50 EQU *«, t00=0x004b, t01=0x002a}
0x07554…07576               Head {h00=0x001e, h01=0x0050, text=» LDR A2,A1 MOV ADDR TO A2 «, t00=0x004b, t01=0x003e}
0x07576…075a2               Head {h00=0x0028, h01=0x0050, text=» LD A1,DWTCHN,A2 POINTER TO NEXT DWT«, t00=0x004b, t01=0x0060}
0x075a2…075d4               Head {h00=0x002e, h01=0x0050, text=» RB(NZ) RQCN50 KEEP ON UNTIL LAST IN CHAIN«, t00=0x004b, t01=0x008c}
0x075d4…07602               Head {h00=0x002a, h01=0x0050, text=» ST A6,DWTCHN,A2 ADD NEW DWT TO CHAIN «, t00=0x004b, t01=0x00be}
0x07602…07616               Head {h00=0x0010, h01=0x0050, text=»RQCN60 EQU *«, t00=0x004b, t01=0x00ec}
0x07616…07640               Head {h00=0x0026, h01=0x0050, text=» CM DWTCHN,A6 END OF CHAIN MARKER «, t00=0x004b, t01=0x0100}
0x07640…07670               Head {h00=0x002c, h01=0x0050, text=» ST A7,DWTCHD,A6 BACKWARD LINK TO ANCHOR«, t00=0x004b, t01=0x012a}
0x07670…07682               Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x004b, t01=0x015a}
0x07682…076b0               Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTSTA,A6 SET STATUS: CONNECTED«, t00=0x004b, t01=0x016c}
0x076b0…076c6               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/8000«, t00=0x004c, t01=0x000a}
0x076c6…076ee               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTRTV,A6 STORE NO TIMING«, t00=0x004c, t01=0x0020}
0x076ee…076fe               Head {h00=0x000c, h01=0x0050, text=»    =13 «, t00=0x004c, t01=0x0048}
0x076fe…07714               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x004c, t01=0x0058}
0x07714…0773e               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTCHP,A6 DISCARD DWT ? =13«, t00=0x004c, t01=0x006e}
0x0773e…0776c               Head {h00=0x002a, h01=0x0050, text=» RF(Z) RQCN65 YES, DO NOT SEND DE =13 «, t00=0x004c, t01=0x0098}
0x0776c…0778a               Head {h00=0x001a, h01=0x0050, text=» LDK A1,4 STORE DEVICE«, t00=0x004c, t01=0x00c6}
0x0778a…077b2               Head {h00=0x0024, h01=0x0050, text=» ORS A1,DWTST,A6 END IN THE DWT «, t00=0x004c, t01=0x00e4}
0x077b2…077e2               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x004c, t01=0x010c}
0x077e2…077fc               Head {h00=0x0016, h01=0x0050, text=»RQCN65 EQU *  =13 «, t00=0x004c, t01=0x013c}
0x077fc…07808               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x0156}
0x07808…07812               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0162}
0x07812…0782c               Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x004c, t01=0x016c}
0x0782c…07836               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0186}
0x07836…0785e               Head {h00=0x0024, h01=0x0050, text=» LD A2,DCTPGP POLL TIMER POINTER«, t00=0x004c, t01=0x0190}
0x0785e…0788e               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) RQCN70 TIMER ALREADY STARTED =6 «, t00=0x004d, t01=0x0028}
0x0788e…078a4               Head {h00=0x0012, h01=0x0050, text=» CF A15,SPOTIM«, t00=0x004d, t01=0x0058}
0x078a4…078b8               Head {h00=0x0010, h01=0x0050, text=»RQCN70 EQU *«, t00=0x004d, t01=0x006e}
0x078b8…078cc               Head {h00=0x0010, h01=0x0050, text=» ABL RQOP90 «, t00=0x004d, t01=0x0082}
0x078cc…078da               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004d, t01=0x0096}
0x078da…078e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00a4}
0x078e4…07900               Head {h00=0x0018, h01=0x0050, text=»* DISCONNECT REQUEST«, t00=0x004d, t01=0x00ae}
0x07900…0790a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00ca}
0x0790a…0792a               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x004d, t01=0x00d4}
0x0792a…07946               Head {h00=0x0018, h01=0x0050, text=»*  DWT-ADDRESS (A6) «, t00=0x004d, t01=0x00f4}
0x07946…07950               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0110}
0x07950…07964               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x004d, t01=0x011a}
0x07964…0798e               Head {h00=0x0026, h01=0x0050, text=»*  1. CHECK IF IN CONNECTED STATE «, t00=0x004d, t01=0x012e}
0x0798e…079c8               Head {h00=0x0036, h01=0x0050, text=»*  2. REMOVE DWT-ADDRESS FROM CONFIGURATION CHAIN «, t00=0x004d, t01=0x0158}
0x079c8…079f2 (78, 0, 400)  Head {h00=0x0026, h01=0x0050, text=»*  3. SET DWT STATUS DISCONNECTED «, t00=0x004e, t01=0x0004}
0x079f2…079fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x002e}
0x079fc…07a1c               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x004e, t01=0x0038}
0x07a1c…07a38               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x004e, t01=0x0058}
0x07a38…07a42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0074}
0x07a42…07a56               Head {h00=0x0010, h01=0x0050, text=»RQDIS EQU * «, t00=0x004e, t01=0x007e}
0x07a56…07a8a               Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTSTA,A6 DWT STATUS = DISCONNECTED ?«, t00=0x004e, t01=0x0092}
0x07a8a…07aae               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) RTOK YES, RETURN: OK«, t00=0x004e, t01=0x00c6}
0x07aae…07adc               Head {h00=0x002a, h01=0x0050, text=» LD A3,DTEDWT,A7 FIRST DWT ADDR TO A3 «, t00=0x004e, t01=0x00ea}
0x07adc…07afe               Head {h00=0x001e, h01=0x0050, text=» RF(Z) RQDI20 END OF CHAIN«, t00=0x004e, t01=0x0118}
0x07afe…07b1a               Head {h00=0x0018, h01=0x0050, text=» CWR A3,A6 OUR DWT ?«, t00=0x004e, t01=0x013a}
0x07b1a…07b34               Head {h00=0x0016, h01=0x0050, text=» RF(NE) RQDI10 NO «, t00=0x004e, t01=0x0156}
0x07b34…07b62               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE QUEUED BUFFERS «, t00=0x004e, t01=0x0170}
0x07b62…07b98               Head {h00=0x0032, h01=0x0050, text=» LD A3,DWTCHN,A6 YES-TAKE POINTER TO NEXT DWT «, t00=0x004f, t01=0x000e}
0x07b98…07bba               Head {h00=0x001e, h01=0x0050, text=» CM DWTSTA,A6 SET DWT FREE«, t00=0x004f, t01=0x0044}
0x07bba…07bec               Head {h00=0x002e, h01=0x0050, text=» ST A3,DTEDWT,A7 STORE DWT-ADDR IN DTETAB «, t00=0x004f, t01=0x0066}
0x07bec…07bfe               Head {h00=0x000e, h01=0x0050, text=» RB RQCN70«, t00=0x004f, t01=0x0098}
0x07bfe…07c12               Head {h00=0x0010, h01=0x0050, text=»RQDI10 EQU *«, t00=0x004f, t01=0x00aa}
0x07c12…07c44               Head {h00=0x002e, h01=0x0050, text=» LDR A5,A3 A5 CONTAINES PREVIOUS DWT-ADDR «, t00=0x004f, t01=0x00be}
0x07c44…07c84               Head {h00=0x003c, h01=0x0050, text=» LD A3,DWTCHN,A5 A3 CONTAINES ADDR TO NEXT DWT ON CHAIN «, t00=0x004f, t01=0x00f0}
0x07c84…07ca6               Head {h00=0x001e, h01=0x0050, text=» RF(Z) RQDI20 END OF CHAIN«, t00=0x004f, t01=0x0130}
0x07ca6…07cc2               Head {h00=0x0018, h01=0x0050, text=» CWR A3,A6 OUR DWT ?«, t00=0x004f, t01=0x0152}
0x07cc2…07cee               Head {h00=0x0028, h01=0x0050, text=» RB(NE) RQDI10 NO TAKE NEXT IN CHAIN«, t00=0x004f, t01=0x016e}
0x07cee…07d1c               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE QUEUED BUFFERS «, t00=0x0050, t01=0x000a}
0x07d1c…07d52               Head {h00=0x0032, h01=0x0050, text=» LD A3,DWTCHN,A6 YES-TAKE POINTER TO NEXT DWT «, t00=0x0050, t01=0x0038}
0x07d52…07d88               Head {h00=0x0032, h01=0x0050, text=» ST A3,DWTCHN,A5 AND STORE IT IN PREVIOUS DWT «, t00=0x0050, t01=0x006e}
0x07d88…07daa               Head {h00=0x001e, h01=0x0050, text=» CM DWTSTA,A6 SET DWT FREE«, t00=0x0050, t01=0x00a4}
0x07daa…07dbc               Head {h00=0x000e, h01=0x0050, text=» RB RQCN70«, t00=0x0050, t01=0x00c6}
0x07dbc…07dd0               Head {h00=0x0010, h01=0x0050, text=»RQDI20 EQU *«, t00=0x0050, t01=0x00d8}
0x07dd0…07de6               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0050, t01=0x00ec}
0x07de6…07e18               Head {h00=0x002e, h01=0x0050, text=» LD A3,DTEDDT,A7 TAKE THE DISCARD DWT ADDR«, t00=0x0050, t01=0x0102}
0x07e18…07e34               Head {h00=0x0018, h01=0x0050, text=» CWR A3,A6 OUR DWT ?«, t00=0x0050, t01=0x0134}
0x07e34…07e5a               Head {h00=0x0022, h01=0x0050, text=» RF(NE) RQDI30 SEQUENCE ERROR «, t00=0x0050, t01=0x0150}
0x07e5a…07e88               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE BUFFERS QUEUED «, t00=0x0050, t01=0x0176}
0x07e88…07e9e               Head {h00=0x0012, h01=0x0050, text=» CM DTEDDT,A7 «, t00=0x0051, t01=0x0014}
0x07e9e…07ec0               Head {h00=0x001e, h01=0x0050, text=» CM DWTSTA,A6 SET DWT FREE«, t00=0x0051, t01=0x002a}
0x07ec0…07ed2               Head {h00=0x000e, h01=0x0050, text=» RB RQCN70«, t00=0x0051, t01=0x004c}
0x07ed2…07ee6               Head {h00=0x0010, h01=0x0050, text=»RQDI30 EQU *«, t00=0x0051, t01=0x005e}
0x07ee6…07ef2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x0072}
0x07ef2…07f14               Head {h00=0x001e, h01=0x0050, text=» ABL RTSEQ SEQUENCE ERROR «, t00=0x0051, t01=0x007e}
0x07f14…07f22               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0051, t01=0x00a0}
0x07f22…07f2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00ae}
0x07f2c…07f36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00b8}
0x07f36…07f54               Head {h00=0x001a, h01=0x0050, text=»* READ STATUS REQUEST «, t00=0x0051, t01=0x00c2}
0x07f54…07f5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00e0}
0x07f5e…07f7e               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0051, t01=0x00ea}
0x07f7e…07f9c               Head {h00=0x001a, h01=0x0050, text=»*  DWT - ADDRESS (A6) «, t00=0x0051, t01=0x010a}
0x07f9c…07fa6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0128}
0x07fa6…07fba               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0051, t01=0x0132}
0x07fba…07ffa               Head {h00=0x003c, h01=0x0050, text=»*  1. TRANSFER LOGICAL CONNECTION STATUS TO APPLICATION «, t00=0x0051, t01=0x0146}
0x07ffa…08004               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0186}
0x08004…08024               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0051, t01=0x0190}
0x08024…08052               Head {h00=0x002a, h01=0x0050, text=»*  LOGICAL CONNECTION STATUS (ECBCW1) «, t00=0x0052, t01=0x0020}
0x08052…0805c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x004e}
0x0805c…0808e               Head {h00=0x002e, h01=0x0050, text=»* 0       3 4       7 8      11 12      15«, t00=0x0052, t01=0x0058}
0x0808e…080c0               Head {h00=0x002e, h01=0x0050, text=»* ........................................«, t00=0x0052, t01=0x008a}
0x080c0…080f2               Head {h00=0x002e, h01=0x0050, text=»* .  DWT   .  DTE    .  DATA   .  PHYS   .«, t00=0x0052, t01=0x00bc}
0x080f2…08124               Head {h00=0x002e, h01=0x0050, text=»* .  STATE .  STATE  .  LINK   .  LINK   .«, t00=0x0052, t01=0x00ee}
0x08124…08156               Head {h00=0x002e, h01=0x0050, text=»* .        .         .  STATUS .  STATUS .«, t00=0x0052, t01=0x0120}
0x08156…08188               Head {h00=0x002e, h01=0x0050, text=»* ........................................«, t00=0x0052, t01=0x0152}
0x08188…08192               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0184}
0x08192…081a6               Head {h00=0x0010, h01=0x0050, text=»RQRSTS EQU *«, t00=0x0052, t01=0x018e}
0x081a6…081bc               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x0053, t01=0x0012}
0x081bc…081e4               Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBCW1,A8 GET OPTION CODE«, t00=0x0053, t01=0x0028}
0x081e4…0820e               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) RQRS10 TEST IF ANY MESSAGE«, t00=0x0053, t01=0x0050}
0x0820e…0821a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x007a}
0x0821a…0823e               Head {h00=0x0020, h01=0x0050, text=» LD A2,DWTSTA,A6 DWT STATUS «, t00=0x0053, t01=0x0086}
0x0823e…08258               Head {h00=0x0016, h01=0x0050, text=» SLL A2,4 BITS 0-3«, t00=0x0053, t01=0x00aa}
0x08258…0827c               Head {h00=0x0020, h01=0x0050, text=» AD A2,DTESTA,A7 DTE STATUS «, t00=0x0053, t01=0x00c4}
0x0827c…08296               Head {h00=0x0016, h01=0x0050, text=» SLL A2,4 BITS 4-7«, t00=0x0053, t01=0x00e8}
0x08296…082c0               Head {h00=0x0026, h01=0x0050, text=» AD A2,DTEDLS,A7 DATA LINK STATUS «, t00=0x0053, t01=0x0102}
0x082c0…082dc               Head {h00=0x0018, h01=0x0050, text=» SLL A2,4 BITS 8-11 «, t00=0x0053, t01=0x012c}
0x082dc…08318               Head {h00=0x0038, h01=0x0050, text=» AD A2,DTEPLS,A7 PHYSICAL LINK STATUS (BITS 12 - 15)«, t00=0x0053, t01=0x0148}
0x08318…0834e               Head {h00=0x0032, h01=0x0050, text=» ST A2,ECBCW1,A8 STATUS TO ECB CONTROL WORD 1 «, t00=0x0053, t01=0x0184}
0x0834e…0836a               Head {h00=0x0018, h01=0x0050, text=» ABL RTOK RETURN: OK«, t00=0x0054, t01=0x002a}
0x0836a…08380               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x0054, t01=0x0046}
0x08380…0838a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x005c}
0x0838a…08394               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0066}
0x08394…083c6               Head {h00=0x002e, h01=0x0050, text=»*  ANY MESSAGE ORDER (ONLY IF EM3270 = 1) «, t00=0x0054, t01=0x0070}
0x083c6…083d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00a2}
0x083d0…083e4               Head {h00=0x0010, h01=0x0050, text=»RQRS10 EQU *«, t00=0x0054, t01=0x00ac}
0x083e4…0840c               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTESTA,A7 GET DTE STATUS «, t00=0x0054, t01=0x00c0}
0x0840c…08424               Head {h00=0x0014, h01=0x0050, text=» SUK A2,2 OPEN ?«, t00=0x0054, t01=0x00e8}
0x08424…0844c               Head {h00=0x0024, h01=0x0050, text=» ABL(NZ) RTSEQ NO,SEQUENCE ERROR«, t00=0x0054, t01=0x0100}
0x0844c…08474               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x0054, t01=0x0128}
0x08474…08492               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 CONNECTED ? «, t00=0x0054, t01=0x0150}
0x08492…084ba               Head {h00=0x0024, h01=0x0050, text=» ABL(NZ) RTSEQ NO,SEQUENCE ERROR«, t00=0x0054, t01=0x016e}
0x084ba…084f4               Head {h00=0x0036, h01=0x0050, text=» LD A4,DWTIPC,A6 ANY QUEUED MESSAGE ON THIS DWT ? «, t00=0x0055, t01=0x0008}
0x084f4…08522               Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) RTOK YES COMPLETE THE REQUEST«, t00=0x0055, t01=0x0042}
0x08522…08542               Head {h00=0x001c, h01=0x0050, text=» ABL TDISP TO DISPATCHER«, t00=0x0055, t01=0x0070}
0x08542…0854e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x0090}
0x0854e…0855c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0055, t01=0x009c}
0x0855c…08566               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00aa}
0x08566…08582               Head {h00=0x0018, h01=0x0050, text=»* SET STATUS REQUEST«, t00=0x0055, t01=0x00b4}
0x08582…0858c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00d0}
0x0858c…08596               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00da}
0x08596…085b6               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS «, t00=0x0055, t01=0x00e4}
0x085b6…085d2               Head {h00=0x0018, h01=0x0050, text=»*  DWT ADDRESS (A6) «, t00=0x0055, t01=0x0104}
0x085d2…085dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0120}
0x085dc…085f0               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0055, t01=0x012a}
0x085f0…08622               Head {h00=0x002e, h01=0x0050, text=»*  SET DEVICE STATUS (ONLY IF STARVI = 1) «, t00=0x0055, t01=0x013e}
0x08622…0862c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0170}
0x0862c…0864e               Head {h00=0x001e, h01=0x0050, text=»*  DE DEVICE END : X`'00' «, t00=0x0055, t01=0x017a}
0x0864e…08658               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x000c}
0x08658…08684               Head {h00=0x0028, h01=0x0050, text=»*  IR INTERVENTION REQUIRED : X'01' «, t00=0x0056, t01=0x0016}
0x08684…0868e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0042}
0x0868e…086ae               Head {h00=0x001c, h01=0x0050, text=»*  DB DEVICE BUSY :X'10'«, t00=0x0056, t01=0x004c}
0x086ae…086b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x006c}
0x086b8…086d8               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0056, t01=0x0076}
0x086d8…086f4               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x0056, t01=0x0096}
0x086f4…086fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00b2}
0x086fe…08712               Head {h00=0x0010, h01=0x0050, text=»RQSST EQU * «, t00=0x0056, t01=0x00bc}
0x08712…08728               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=0 «, t00=0x0056, t01=0x00d0}
0x08728…08752               Head {h00=0x0026, h01=0x0050, text=» ABL RTREQ SET STATUS NOT INCLUDED«, t00=0x0056, t01=0x00e6}
0x08752…0875e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x0110}
0x0875e…08774               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x0056, t01=0x011c}
0x08774…0879e               Head {h00=0x0026, h01=0x0050, text=» LD A1,ECBCW1,A8 GET DEVICE STATUS«, t00=0x0056, t01=0x0132}
0x0879e…087ba               Head {h00=0x0018, h01=0x0050, text=» ANK A1,3 MASK DB,IR«, t00=0x0056, t01=0x015c}
0x087ba…087d8               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) RQST90 NOT DE «, t00=0x0056, t01=0x0178}
0x087d8…08802               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTST,A6 GET DEVICE STATUS «, t00=0x0057, t01=0x0008}
0x08802…0882e               Head {h00=0x0028, h01=0x0050, text=» ANK A1,/B WACK SENT, DB OR IR ? =2 «, t00=0x0057, t01=0x0032}
0x0882e…0884a               Head {h00=0x0018, h01=0x0050, text=» RF(Z) RQST90 NO =2 «, t00=0x0057, t01=0x005e}
0x0884a…0887a               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STATUS QUEUE«, t00=0x0057, t01=0x007a}
0x0887a…08892               Head {h00=0x0014, h01=0x0050, text=» LDK A1,4 SET DE«, t00=0x0057, t01=0x00aa}
0x08892…088a6               Head {h00=0x0010, h01=0x0050, text=»RQST90 EQU *«, t00=0x0057, t01=0x00c2}
0x088a6…088ca               Head {h00=0x0020, h01=0x0050, text=» ST A1,DWTST,A6 SAVE STATUS «, t00=0x0057, t01=0x00d6}
0x088ca…088e8               Head {h00=0x001a, h01=0x0050, text=» ABL RTOK RETYURN : OK«, t00=0x0057, t01=0x00fa}
0x088e8…088f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x0118}
0x088f4…08902               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0057, t01=0x0124}
0x08902…0890c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0132}
0x0890c…08934               Head {h00=0x0024, h01=0x0050, text=»* READ/RESET STATISTICS REQUEST «, t00=0x0057, t01=0x013c}
0x08934…0893e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0164}
0x0893e…0895e               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x0057, t01=0x016e}
0x0895e…08982               Head {h00=0x0020, h01=0x0050, text=»*  TYPE = BITS 0-7 OF ECBCW1«, t00=0x0057, t01=0x018e}
0x08982…0899e               Head {h00=0x0018, h01=0x0050, text=»*  ECB-ADDRESS (A8) «, t00=0x0058, t01=0x0022}
0x0899e…089ca               Head {h00=0x0028, h01=0x0050, text=»*  DWT-ADDRESS OF LOW-LEVEL DWT (A6)«, t00=0x0058, t01=0x003e}
0x089ca…089d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x006a}
0x089d4…089e8               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x0058, t01=0x0074}
0x089e8…08a12               Head {h00=0x0026, h01=0x0050, text=»*  1. READ STATISTICS TO USER AREA«, t00=0x0058, t01=0x0088}
0x08a12…08a3c               Head {h00=0x0026, h01=0x0050, text=»*  2. RESET ALL STATISTICS BUFFERS«, t00=0x0058, t01=0x00b2}
0x08a3c…08a46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00dc}
0x08a46…08a66               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0058, t01=0x00e6}
0x08a66…08a94               Head {h00=0x002a, h01=0x0050, text=»*  NUMBER OF BYTES TRANSFERRED (ECBEL)«, t00=0x0058, t01=0x0106}
0x08a94…08ab0               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x0058, t01=0x0134}
0x08ab0…08aba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0150}
0x08aba…08ace               Head {h00=0x0010, h01=0x0050, text=»RQSTAT EQU *«, t00=0x0058, t01=0x015a}
0x08ace…08ae4               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=0 «, t00=0x0058, t01=0x016e}
0x08ae4…08b20               Head {h00=0x0038, h01=0x0050, text=» ABL RTREQ RC : REQUEST ERROR NO STATISTICS INCLUDED«, t00=0x0058, t01=0x0184}
0x08b20…08b2c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x0030}
0x08b2c…08b42               Head {h00=0x0012, h01=0x0050, text=» IFF STTSTS=0 «, t00=0x0059, t01=0x003c}
0x08b42…08b68               Head {h00=0x0022, h01=0x0050, text=» CF A15,DCSRED READ STATISTICS«, t00=0x0059, t01=0x0052}
0x08b68…08b7e               Head {h00=0x0012, h01=0x0050, text=» LDR A1,A1 OK?«, t00=0x0059, t01=0x0078}
0x08b7e…08bae               Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) RTREQ NO, RETURN: REQUEST ERROR«, t00=0x0059, t01=0x008e}
0x08bae…08bd0               Head {h00=0x001e, h01=0x0050, text=» LD A1,ECBCW1,A8 GET TYPE «, t00=0x0059, t01=0x00be}
0x08bd0…08bfa               Head {h00=0x0026, h01=0x0050, text=» SRL A1,8 TYPE FIELD TO LEFT BYTE «, t00=0x0059, t01=0x00e0}
0x08bfa…08c1e               Head {h00=0x0020, h01=0x0050, text=» CCK A1,TYPRR CORRECT TYPE? «, t00=0x0059, t01=0x010a}
0x08c1e…08c34               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RQST40«, t00=0x0059, t01=0x012e}
0x08c34…08c68               Head {h00=0x0030, h01=0x0050, text=» CF A15,DCSRLL RESET ALL STATISTICS BUFFERS «, t00=0x0059, t01=0x0144}
0x08c68…08c88               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 LUCKY AGAIN? «, t00=0x0059, t01=0x0178}
0x08c88…08cb8               Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) RTREQ NO, RETURN: REQUEST ERROR«, t00=0x005a, t01=0x0008}
0x08cb8…08ccc               Head {h00=0x0010, h01=0x0050, text=»RQST40 EQU *«, t00=0x005a, t01=0x0038}
0x08ccc…08ce8               Head {h00=0x0018, h01=0x0050, text=» ABL RTOK RETURN: OK«, t00=0x005a, t01=0x004c}
0x08ce8…08cf4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005a, t01=0x0068}
0x08cf4…08d02               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005a, t01=0x0074}
0x08d02…08d0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0082}
0x08d0c…08d28               Head {h00=0x0018, h01=0x0050, text=»* SET TIMEOUT VALUE «, t00=0x005a, t01=0x008c}
0x08d28…08d32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00a8}
0x08d32…08d52               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x005a, t01=0x00b2}
0x08d52…08d82               Head {h00=0x002c, h01=0x0050, text=»*  ECBCW1 >= 0 : ACTIVATE TIMING CONTROL«, t00=0x005a, t01=0x00d2}
0x08d82…08dc0               Head {h00=0x003a, h01=0x0050, text=»*                TIMEOUT VALUE IN MULTIPLES OF 100 MS;«, t00=0x005a, t01=0x0102}
0x08dc0…08df0               Head {h00=0x002c, h01=0x0050, text=»*                0 = IMMEDIATE TIMEOUT. «, t00=0x005a, t01=0x0140}
0x08df0…08e24               Head {h00=0x0030, h01=0x0050, text=»*         < 0:   DE-ACTIVATE TIMING CONTROL «, t00=0x005a, t01=0x0170}
0x08e24…08e2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0014}
0x08e2e…08e42               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x005b, t01=0x001e}
0x08e42…08e72               Head {h00=0x002c, h01=0x0050, text=»*  STORE VALUE DIRECTLY IN CALLER'S DWT «, t00=0x005b, t01=0x0032}
0x08e72…08e7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0062}
0x08e7c…08e9c               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x005b, t01=0x006c}
0x08e9c…08ec6               Head {h00=0x0026, h01=0x0050, text=»*  DWTRTV = TIMEOUT VALUE = ECBCW1«, t00=0x005b, t01=0x008c}
0x08ec6…08ed0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00b6}
0x08ed0…08ee4               Head {h00=0x0010, h01=0x0050, text=»RQTIME EQU *«, t00=0x005b, t01=0x00c0}
0x08ee4…08f18               Head {h00=0x0030, h01=0x0050, text=» LD A2,ECBCW1,A8 GET TIMEOUT VALUE FROM ECB «, t00=0x005b, t01=0x00d4}
0x08f18…08f3e               Head {h00=0x0022, h01=0x0050, text=» ST A2,DWTRTV,A6 STORE IN DWT «, t00=0x005b, t01=0x0108}
0x08f3e…08f5a               Head {h00=0x0018, h01=0x0050, text=» ABL RTOK RETURN: OK«, t00=0x005b, t01=0x012e}
0x08f5a…08f68               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005b, t01=0x014a}
0x08f68…08f72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0158}
0x08f72…08f88               Head {h00=0x0012, h01=0x0050, text=»* SEND REQUEST«, t00=0x005b, t01=0x0162}
0x08f88…08f92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0178}
0x08f92…08fb2               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x005b, t01=0x0182}
0x08fb2…08fd4               Head {h00=0x001e, h01=0x0050, text=»*  BUFFER ADDRESS (ECBBA) «, t00=0x005c, t01=0x0012}
0x08fd4…08ff4               Head {h00=0x001c, h01=0x0050, text=»*  BUFFER LENGTH (ECBRL)«, t00=0x005c, t01=0x0034}
0x08ff4…09018               Head {h00=0x0020, h01=0x0050, text=»*  SUBTERMINAL ADDRESS (DWT)«, t00=0x005c, t01=0x0054}
0x09018…09036               Head {h00=0x001a, h01=0x0050, text=»*  ECB CONTROL WORD 1 «, t00=0x005c, t01=0x0078}
0x09036…09040               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0096}
0x09040…09054               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x005c, t01=0x00a0}
0x09054…09094               Head {h00=0x003c, h01=0x0050, text=»*  1. VERIFY THAT LOGICAL & PHYSICAL CONNECTIONS EXIST. «, t00=0x005c, t01=0x00b4}
0x09094…090bc               Head {h00=0x0024, h01=0x0050, text=»*  2. VERIFY BUFFER SIZE IF MMU «, t00=0x005c, t01=0x00f4}
0x090bc…090de               Head {h00=0x001e, h01=0x0050, text=»*  3. QUEUE REQUESTING DWT«, t00=0x005c, t01=0x011c}
0x090de…0910c               Head {h00=0x002a, h01=0x0050, text=»*  4. COMPLETE WHEN ACK'D OR TIMEOUT. «, t00=0x005c, t01=0x013e}
0x0910c…09116               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x016c}
0x09116…0912a               Head {h00=0x0010, h01=0x0050, text=»RQSEND EQU *«, t00=0x005c, t01=0x0176}
0x0912a…09152               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x005c, t01=0x018a}
0x09152…09170               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 CONNECTED ? «, t00=0x005d, t01=0x0022}
0x09170…091a2               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTSEQ NO, RETURN: SEQUENCE ERROR «, t00=0x005d, t01=0x0040}
0x091a2…091d8               Head {h00=0x0032, h01=0x0050, text=» LD A2,DTEPLS,A7 PHYSICAL CONNECTION ACTICE ? «, t00=0x005d, t01=0x0072}
0x091d8…09214               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTPHYC NO, RETURN: PHYSICAL CONNECTION ERROR«, t00=0x005d, t01=0x00a8}
0x09214…09248               Head {h00=0x0030, h01=0x0050, text=» LD A2,DTEDLS,A7 LOGICAL CONNECTION ACTIVE ?«, t00=0x005d, t01=0x00e4}
0x09248…09284               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTLOGC NO, RETURN: LOGICAL CONNECTION ERROR «, t00=0x005d, t01=0x0118}
0x09284…092a8               Head {h00=0x0020, h01=0x0050, text=» LC A2,DWTOPT,A6 GET OPTION «, t00=0x005d, t01=0x0154}
0x092a8…092bc               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x005d, t01=0x0178}
0x092bc…092e4               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RQSE10 THERE IS NO OPTION«, t00=0x005d, t01=0x018c}
0x092e4…09306               Head {h00=0x001e, h01=0x0050, text=» SUK A2,/20 WHICH OPTION ?«, t00=0x005e, t01=0x0024}
0x09306…09338               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTREQ WRONG OPTION :REQUEST ERROR«, t00=0x005e, t01=0x0046}
0x09338…09366               Head {h00=0x002a, h01=0x0050, text=» CF A15,RELBUF RELEASE BUFFERS QUEUED «, t00=0x005e, t01=0x0078}
0x09366…0937a               Head {h00=0x0010, h01=0x0050, text=»RQSE10 EQU *«, t00=0x005e, t01=0x00a6}
0x0937a…09390               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005e, t01=0x00ba}
0x09390…093b8               Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBRL,A8 REQUESTED LENGTH«, t00=0x005e, t01=0x00d0}
0x093b8…093e0               Head {h00=0x0024, h01=0x0050, text=» CWK A2,BUFLEN ILLEGAL LENGTH ? «, t00=0x005e, t01=0x00f8}
0x093e0…0941a               Head {h00=0x0036, h01=0x0050, text=» ABL(G) RTLGTH YES, RETURN: ILLEGAL BUFFER LENGTH «, t00=0x005e, t01=0x0120}
0x0941a…09426               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x015a}
0x09426…09448               Head {h00=0x001e, h01=0x0050, text=» CF A15,TIMEWR START TIMER«, t00=0x005e, t01=0x0166}
0x09448…09470               Head {h00=0x0024, h01=0x0050, text=» CF A15,INSWQ QUEUE SEND REQUEST«, t00=0x005e, t01=0x0188}
0x09470…09482               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x005f, t01=0x0020}
0x09482…0948c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0032}
0x0948c…0949a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x003c}
0x0949a…094a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x004a}
0x094a4…094be               Head {h00=0x0016, h01=0x0050, text=»* RECEIVE REQUEST «, t00=0x005f, t01=0x0054}
0x094be…094c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x006e}
0x094c8…094e8               Head {h00=0x001c, h01=0x0050, text=»* ACTIVATION PARAMETERS:«, t00=0x005f, t01=0x0078}
0x094e8…0950a               Head {h00=0x001e, h01=0x0050, text=»*  BUFFER ADDRESS (ECBBA) «, t00=0x005f, t01=0x0098}
0x0950a…0953e               Head {h00=0x0030, h01=0x0050, text=»*  REQUESTED BUFFER LENGTH IN CHARS. (ECBRL)«, t00=0x005f, t01=0x00ba}
0x0953e…09562               Head {h00=0x0020, h01=0x0050, text=»*  SUBTERMINAL ADDRESS (DWT)«, t00=0x005f, t01=0x00ee}
0x09562…0956c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0112}
0x0956c…09580               Head {h00=0x0010, h01=0x0050, text=»* FUNCTIONS:«, t00=0x005f, t01=0x011c}
0x09580…095c0               Head {h00=0x003c, h01=0x0050, text=»*  1. VERIFY THAT LOGICAL & PHYSICAL CONNECTIONS EXIST. «, t00=0x005f, t01=0x0130}
0x095c0…0960a               Head {h00=0x0046, h01=0x0050, text=»*  2. TRANSFER TO THE APPLICATION ANY MESSAGE QUEUED FOR THE DWT, «, t00=0x005f, t01=0x0170}
0x0960a…0964e               Head {h00=0x0040, h01=0x0050, text=»*  3. COMPLETE WHEN MESSAGE RECEIVED OR NO MESSAGE RECEIVED «, t00=0x0060, t01=0x002a}
0x0964e…09672               Head {h00=0x0020, h01=0x0050, text=»*     WITHIN TIMEOUT PERIOD.«, t00=0x0060, t01=0x006e}
0x09672…0967c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0092}
0x0967c…0969c               Head {h00=0x001c, h01=0x0050, text=»* COMPLETION PARAMETERS:«, t00=0x0060, t01=0x009c}
0x0969c…096d0               Head {h00=0x0030, h01=0x0050, text=»*  ACTUAL LENGTH OF RECEIVED MESSAGE (ECBEL)«, t00=0x0060, t01=0x00bc}
0x096d0…096ec               Head {h00=0x0018, h01=0x0050, text=»*  RETURN CODE (A1) «, t00=0x0060, t01=0x00f0}
0x096ec…096f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x010c}
0x096f6…0970a               Head {h00=0x0010, h01=0x0050, text=»RQRECE EQU *«, t00=0x0060, t01=0x0116}
0x0970a…09732               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTSTA,A6 GET DWT STATUS «, t00=0x0060, t01=0x012a}
0x09732…09750               Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 CONNECTED ? «, t00=0x0060, t01=0x0152}
0x09750…09782               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) RTSEQ NO, RETURN: SEQUENCE ERROR «, t00=0x0060, t01=0x0170}
0x09782…097b8               Head {h00=0x0032, h01=0x0050, text=» LD A2,DTEPLS,A7 PHYSICAL CONNECTION ACTIVE ? «, t00=0x0061, t01=0x0012}
0x097b8…097f4               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTPHYC NO, RETURN: PHYSICAL CONNECTION ERROR«, t00=0x0061, t01=0x0048}
0x097f4…09822               Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTIPC,A6 ANY BUFFER ON QUEUE ?«, t00=0x0061, t01=0x0084}
0x09822…0983c               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) RQRE10 YES«, t00=0x0061, t01=0x00b2}
0x0983c…09870               Head {h00=0x0030, h01=0x0050, text=» LD A2,DTEDLS,A7 LOGICAL CONNECTION ACTIVE ?«, t00=0x0061, t01=0x00cc}
0x09870…098ac               Head {h00=0x0038, h01=0x0050, text=» ABL(Z) RTLOGC NO, RETURN: LOGICAL CONNECTION ERROR «, t00=0x0061, t01=0x0100}
0x098ac…098ce               Head {h00=0x001e, h01=0x0050, text=» CF A15,TIMERE START TIMER«, t00=0x0061, t01=0x013c}
0x098ce…098f2               Head {h00=0x0020, h01=0x0050, text=» RF RQRE40 GO TO DISPATCHER «, t00=0x0061, t01=0x015e}
0x098f2…09906               Head {h00=0x0010, h01=0x0050, text=»RQRE10 EQU *«, t00=0x0061, t01=0x0182}
0x09906…0992a               Head {h00=0x0020, h01=0x0050, text=» LD A3,2,A4 EFFECTIVE LENGTH«, t00=0x0062, t01=0x0008}
0x0992a…09942               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x0062, t01=0x002c}
0x09942…09970               Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTLAD,A6 SYMBOLIC DTE-ADDRESS «, t00=0x0062, t01=0x0044}
0x09970…09998               Head {h00=0x0024, h01=0x0050, text=» LD A2,4,A4 NETWORK SUB-ADDRESS «, t00=0x0062, t01=0x0072}
0x09998…099c8               Head {h00=0x002c, h01=0x0050, text=» CF A15,GETSSA GET SYMBOLIC SUB-ADDRESS «, t00=0x0062, t01=0x009a}
0x099c8…099f4               Head {h00=0x0028, h01=0x0050, text=» ST A1,ECBCW2,A8 AND SAVE IT IN ECB «, t00=0x0062, t01=0x00ca}
0x099f4…09a0e               Head {h00=0x0016, h01=0x0050, text=» IFT REMTIM=1  =9 «, t00=0x0062, t01=0x00f6}
0x09a0e…09a46               Head {h00=0x0034, h01=0x0050, text=» LD A1,DWTRTV,A6 GET REQUESTED TIMEOUT VALUE =9 «, t00=0x0062, t01=0x0110}
0x09a46…09a7a               Head {h00=0x0030, h01=0x0050, text=» ST A1,ECBCW1,A8 STORE IN CONTROL WORD 1 =9 «, t00=0x0062, t01=0x0148}
0x09a7a…09a8c               Head {h00=0x000e, h01=0x0050, text=» XIF   =9 «, t00=0x0062, t01=0x017c}
0x09a8c…09aba               Head {h00=0x002a, h01=0x0050, text=» LDK A1,0 RC : ACCEPTED AND COMPLETED «, t00=0x0062, t01=0x018e}
0x09aba…09ae6               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 GET NEXT BUFFER IN QUEUE«, t00=0x0063, t01=0x002c}
0x09ae6…09b14               Head {h00=0x002a, h01=0x0050, text=» RF(Z) RQRE20 NO MORE BUFFERS IN QUEUE«, t00=0x0063, t01=0x0058}
0x09b14…09b48               Head {h00=0x0030, h01=0x0050, text=» ORKL A1,R:DATA RC: AND MORE DATA AVAILABLE «, t00=0x0063, t01=0x0086}
0x09b48…09b5c               Head {h00=0x0010, h01=0x0050, text=»RQRE20 EQU *«, t00=0x0063, t01=0x00ba}
0x09b5c…09b8e               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTIPC,A6  STORE AS FIRST IN QUEUE «, t00=0x0063, t01=0x00ce}
0x09b8e…09ba0               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0063, t01=0x0100}
0x09ba0…09bd0               Head {h00=0x002c, h01=0x0050, text=» CF A15,DC:MIN MOVE DATA TO USER BUFFER «, t00=0x0063, t01=0x0112}
0x09bd0…09be4               Head {h00=0x0010, h01=0x0050, text=»RQRE40 EQU *«, t00=0x0063, t01=0x0142}
0x09be4…09c08               Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0063, t01=0x0156}
0x09c08…09c16               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x017a}
0x09c16…09c20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0188}
0x09c20…09c2a (100, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0004}
0x09c2a…09c52               Head {h00=0x0024, h01=0x0050, text=»*  COMPLETE APPLICATION REQUEST «, t00=0x0064, t01=0x000e}
0x09c52…09c5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0036}
0x09c5c…09c70               Head {h00=0x0010, h01=0x0050, text=»RTREQ EQU * «, t00=0x0064, t01=0x0040}
0x09c70…09c9a               Head {h00=0x0026, h01=0x0050, text=» LDKL A1,R:REQ RC = REQUEST ERROR «, t00=0x0064, t01=0x0054}
0x09c9a…09cac               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0064, t01=0x007e}
0x09cac…09cc0               Head {h00=0x0010, h01=0x0050, text=»RTABRT EQU *«, t00=0x0064, t01=0x0090}
0x09cc0…09ce4               Head {h00=0x0020, h01=0x0050, text=» LDKL A1,R:ABRT RC = ABORTED«, t00=0x0064, t01=0x00a4}
0x09ce4…09cf6               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0064, t01=0x00c8}
0x09cf6…09d0a               Head {h00=0x0010, h01=0x0050, text=»RTTIME EQU *«, t00=0x0064, t01=0x00da}
0x09d0a…09d2e               Head {h00=0x0020, h01=0x0050, text=» LDK A1,R:TIME RC = TIME OUT«, t00=0x0064, t01=0x00ee}
0x09d2e…09d40               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0064, t01=0x0112}
0x09d40…09d54               Head {h00=0x0010, h01=0x0050, text=»RTSEQ EQU * «, t00=0x0064, t01=0x0124}
0x09d54…09d7e               Head {h00=0x0026, h01=0x0050, text=» LDK A1,R:SEQ RC = SEQUENCE ERROR «, t00=0x0064, t01=0x0138}
0x09d7e…09d90               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0064, t01=0x0162}
0x09d90…09da4               Head {h00=0x0010, h01=0x0050, text=»RTLGTH EQU *«, t00=0x0064, t01=0x0174}
0x09da4…09dce               Head {h00=0x0026, h01=0x0050, text=» LDK A1,R:LGTH RC = ILLEGAL LENGTH«, t00=0x0064, t01=0x0188}
0x09dce…09de0               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0065, t01=0x0022}
0x09de0…09df4               Head {h00=0x0010, h01=0x0050, text=»RTLOGC EQU *«, t00=0x0065, t01=0x0034}
0x09df4…09e28               Head {h00=0x0030, h01=0x0050, text=» LDK A1,R:LOGC RC = LOGICAL CONNECTION ERROR«, t00=0x0065, t01=0x0048}
0x09e28…09e3a               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0065, t01=0x007c}
0x09e3a…09e4e               Head {h00=0x0010, h01=0x0050, text=»RTPHYC EQU *«, t00=0x0065, t01=0x008e}
0x09e4e…09e84               Head {h00=0x0032, h01=0x0050, text=» LDK A1,R:PHYC RC = PHYSICAL CONNECTION ERROR «, t00=0x0065, t01=0x00a2}
0x09e84…09e96               Head {h00=0x000e, h01=0x0050, text=» RF RQRTN «, t00=0x0065, t01=0x00d8}
0x09e96…09ea8               Head {h00=0x000e, h01=0x0050, text=»RTOK EQU *«, t00=0x0065, t01=0x00ea}
0x09ea8…09ec2               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 RC = OK «, t00=0x0065, t01=0x00fc}
0x09ec2…09ed6               Head {h00=0x0010, h01=0x0050, text=»RQRTN EQU * «, t00=0x0065, t01=0x0116}
0x09ed6…09f10               Head {h00=0x0036, h01=0x0050, text=» ABL DISEND COMPLETE REQUEST AND GO TO DISPATCHER «, t00=0x0065, t01=0x012a}
0x09f10…09f1e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0065, t01=0x0164}
0x09f1e…09f28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0172}
0x09f28…09f64               Head {h00=0x0038, h01=0x0050, text=»* LOOKUP - LOOK UP KEY IN TABLE & BRANCH ON ADDRESS «, t00=0x0065, t01=0x017c}
0x09f64…09f6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0028}
0x09f6e…09f7e               Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0066, t01=0x0032}
0x09f7e…09fba               Head {h00=0x0038, h01=0x0050, text=»*  CF     A15,LOOKUP          TABLE ADDRESS TO STACK«, t00=0x0066, t01=0x0042}
0x09fba…09ffa               Head {h00=0x003c, h01=0x0050, text=»*  DATA   LAST,ADDRE          LAST ENTRY; ERROR ADDRESS «, t00=0x0066, t01=0x007e}
0x09ffa…0a03c               Head {h00=0x003e, h01=0x0050, text=»*  DATA   KEY1,ADDR1          KEY (A2); ADDRESS FOR BRANCH«, t00=0x0066, t01=0x00be}
0x0a03c…0a056               Head {h00=0x0016, h01=0x0050, text=»*   "       "    "«, t00=0x0066, t01=0x0100}
0x0a056…0a076               Head {h00=0x001c, h01=0x0050, text=»* LAST DATA   KEYN,ADDRN«, t00=0x0066, t01=0x011a}
0x0a076…0a080               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x013a}
0x0a080…0a0a0               Head {h00=0x001c, h01=0x0050, text=»* ENTRY: A2 = KEY VALUE «, t00=0x0066, t01=0x0144}
0x0a0a0…0a0c2               Head {h00=0x001e, h01=0x0050, text=»* EXIT: A3 & A4 DESTROYED «, t00=0x0066, t01=0x0164}
0x0a0c2…0a0cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0186}
0x0a0cc…0a0e0               Head {h00=0x0010, h01=0x0050, text=»LOOKUP EQU *«, t00=0x0066, t01=0x0190}
0x0a0e0…0a120               Head {h00=0x003c, h01=0x0050, text=» LDR* A3,A15 POINT TO NEXT INSTRUCTION ADDRESS IN STACK «, t00=0x0067, t01=0x0014}
0x0a120…0a152               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A15 GET CONTENTS = TABLE ADDRESS «, t00=0x0067, t01=0x0054}
0x0a152…0a17c               Head {h00=0x0026, h01=0x0050, text=» LDR* A4,A3 GET LAST LEGAL ADDRESS«, t00=0x0067, t01=0x0086}
0x0a17c…0a19e               Head {h00=0x001e, h01=0x0050, text=» LD A1,2,A3 ERROR ADDRESS «, t00=0x0067, t01=0x00b0}
0x0a19e…0a1a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00d2}
0x0a1a8…0a1c8               Head {h00=0x001c, h01=0x0050, text=»LOOK50 EQU * LOOP ENTRY «, t00=0x0067, t01=0x00dc}
0x0a1c8…0a1f6               Head {h00=0x002a, h01=0x0050, text=» ADK A3,4 GET NEXT TABLE ENTRY ADDRESS«, t00=0x0067, t01=0x00fc}
0x0a1f6…0a216               Head {h00=0x001c, h01=0x0050, text=» CWR A3,A4 PAST THE END?«, t00=0x0067, t01=0x012a}
0x0a216…0a23c               Head {h00=0x0022, h01=0x0050, text=» RF(G) LOOK90 YES = NOT FOUND «, t00=0x0067, t01=0x014a}
0x0a23c…0a266               Head {h00=0x0026, h01=0x0050, text=» CWR* A2,A3 KEY = VALUE IN TABLE? «, t00=0x0067, t01=0x0170}
0x0a266…0a292               Head {h00=0x0028, h01=0x0050, text=» RB(NE) LOOK50 NO - CHECK NEXT ENTRY«, t00=0x0068, t01=0x000a}
0x0a292…0a2bc               Head {h00=0x0026, h01=0x0050, text=» ABI 2,A3 BRANCH TO TABLE ADDRESS «, t00=0x0068, t01=0x0036}
0x0a2bc…0a2d4               Head {h00=0x0014, h01=0x0050, text=»*  KEY NOT FOUND«, t00=0x0068, t01=0x0060}
0x0a2d4…0a2e8               Head {h00=0x0010, h01=0x0050, text=»LOOK90 EQU *«, t00=0x0068, t01=0x0078}
0x0a2e8…0a30e               Head {h00=0x0022, h01=0x0050, text=» LDR P,A1 GO TO ERROR ADDRESS «, t00=0x0068, t01=0x008c}
0x0a30e…0a31c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0068, t01=0x00b2}
0x0a31c…0a326               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00c0}
0x0a326…0a330               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00ca}
0x0a330…0a33a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00d4}
0x0a33a…0a360               Head {h00=0x0022, h01=0x0050, text=»* REQUEST TIMER HANDLING PART «, t00=0x0068, t01=0x00de}
0x0a360…0a36a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0104}
0x0a36a…0a374               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x010e}
0x0a374…0a37e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0118}
0x0a37e…0a39c               Head {h00=0x001a, h01=0x0050, text=»* RECEIVE TIMER=TIMERR«, t00=0x0068, t01=0x0122}
0x0a39c…0a3a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0140}
0x0a3a6…0a3ba               Head {h00=0x0010, h01=0x0050, text=»TIMERE EQU *«, t00=0x0068, t01=0x014a}
0x0a3ba…0a3cc               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0068, t01=0x015e}
0x0a3cc…0a3f6               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTRTV,A6 GET TIMEOUT VALUE«, t00=0x0068, t01=0x0170}
0x0a3f6…0a416               Head {h00=0x001c, h01=0x0050, text=» RF(N) TIMRTN NO TIMING «, t00=0x0069, t01=0x000a}
0x0a416…0a448               Head {h00=0x002e, h01=0x0050, text=» RF(Z) ITOUTR TIMER=0 => IMMEDIATE TIMEOUT«, t00=0x0069, t01=0x002a}
0x0a448…0a45e               Head {h00=0x0012, h01=0x0050, text=» ST A2,TIMERR «, t00=0x0069, t01=0x005c}
0x0a45e…0a474               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0069, t01=0x0072}
0x0a474…0a488               Head {h00=0x0010, h01=0x0050, text=» DATA TOUTRE«, t00=0x0069, t01=0x0088}
0x0a488…0a49e               Head {h00=0x0012, h01=0x0050, text=»TIMERR DATA 0 «, t00=0x0069, t01=0x009c}
0x0a49e…0a4ca               Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTRTP,A6 STORE TIMER POINTER«, t00=0x0069, t01=0x00b2}
0x0a4ca…0a4de               Head {h00=0x0010, h01=0x0050, text=»TIMRTN EQU *«, t00=0x0069, t01=0x00de}
0x0a4de…0a4f2               Head {h00=0x0010, h01=0x0050, text=» ABL RTNA15 «, t00=0x0069, t01=0x00f2}
0x0a4f2…0a4fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0106}
0x0a4fc…0a518               Head {h00=0x0018, h01=0x0050, text=»* TIMEOUT READ TIMER«, t00=0x0069, t01=0x0110}
0x0a518…0a522               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x012c}
0x0a522…0a536               Head {h00=0x0010, h01=0x0050, text=»ITOUTR EQU *«, t00=0x0069, t01=0x0136}
0x0a536…0a54a               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0069, t01=0x014a}
0x0a54a…0a55c               Head {h00=0x000e, h01=0x0050, text=» RF TIMOUT«, t00=0x0069, t01=0x015e}
0x0a55c…0a570               Head {h00=0x0010, h01=0x0050, text=»TOUTRE EQU *«, t00=0x0069, t01=0x0170}
0x0a570…0a58c               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x0069, t01=0x0184}
0x0a58c…0a5a2               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x006a, t01=0x0010}
0x0a5a2…0a5d0               Head {h00=0x002a, h01=0x0050, text=» RF TIMOUT COMPLETE REQUEST RC=TIMEOUT«, t00=0x006a, t01=0x0026}
0x0a5d0…0a5da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0054}
0x0a5da…0a5e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x005e}
0x0a5e4…0a60a               Head {h00=0x0022, h01=0x0050, text=»*   RETURN FROM TIMER HANDLING«, t00=0x006a, t01=0x0068}
0x0a60a…0a614               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x008e}
0x0a614…0a622               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006a, t01=0x0098}
0x0a622…0a62c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x00a6}
0x0a62c…0a646               Head {h00=0x0016, h01=0x0050, text=»* SEND TIMER=TIMWR«, t00=0x006a, t01=0x00b0}
0x0a646…0a650               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x00ca}
0x0a650…0a668               Head {h00=0x0014, h01=0x0050, text=»TIMEWR LDR A1,A6«, t00=0x006a, t01=0x00d4}
0x0a668…0a692               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTRTV,A6 GET TIMEOUT VALUE«, t00=0x006a, t01=0x00ec}
0x0a692…0a6b2               Head {h00=0x001c, h01=0x0050, text=» RB(N) TIMRTN NO TIMING «, t00=0x006a, t01=0x0116}
0x0a6b2…0a6e4               Head {h00=0x002e, h01=0x0050, text=» RB(Z) ITOUTR TIMER=0 => IMMEDIATE TIMEOUT«, t00=0x006a, t01=0x0136}
0x0a6e4…0a6f8               Head {h00=0x0010, h01=0x0050, text=» ST A2,TIMWR«, t00=0x006a, t01=0x0168}
0x0a6f8…0a70e               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x006a, t01=0x017c}
0x0a70e…0a722 (107, 0, 400) Head {h00=0x0010, h01=0x0050, text=» DATA TOUTWR«, t00=0x006b, t01=0x0004}
0x0a722…0a736               Head {h00=0x0010, h01=0x0050, text=»TIMWR DATA 0«, t00=0x006b, t01=0x0018}
0x0a736…0a74e               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTRTP,A6«, t00=0x006b, t01=0x002c}
0x0a74e…0a760               Head {h00=0x000e, h01=0x0050, text=» RB TIMRTN«, t00=0x006b, t01=0x0044}
0x0a760…0a76a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0056}
0x0a76a…0a788               Head {h00=0x001a, h01=0x0050, text=»* TIMEOUT WRITE TIMER «, t00=0x006b, t01=0x0060}
0x0a788…0a792               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x007e}
0x0a792…0a7a6               Head {h00=0x0010, h01=0x0050, text=»TOUTWR EQU *«, t00=0x006b, t01=0x0088}
0x0a7a6…0a7c2               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 FETCH DWT«, t00=0x006b, t01=0x009c}
0x0a7c2…0a7d8               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x006b, t01=0x00b8}
0x0a7d8…0a806               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x006b, t01=0x00ce}
0x0a806…0a810               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00fc}
0x0a810…0a81a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0106}
0x0a81a…0a844               Head {h00=0x0026, h01=0x0050, text=»* THIS INSTRUCTION DOES NOT BELONG«, t00=0x006b, t01=0x0110}
0x0a844…0a868               Head {h00=0x0020, h01=0x0050, text=»* TO THE STANDARD INTERFACE «, t00=0x006b, t01=0x013a}
0x0a868…0a87e               Head {h00=0x0012, h01=0x0050, text=» LD A2,FDWTUT «, t00=0x006b, t01=0x015e}
0x0a87e…0a890               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A6«, t00=0x006b, t01=0x0174}
0x0a890…0a8be               Head {h00=0x002a, h01=0x0050, text=» RF(NE) TIMOUT THIS DWT IS NOT WRITING«, t00=0x006b, t01=0x0186}
0x0a8be…0a8ea               Head {h00=0x0028, h01=0x0050, text=» CM XACK INDICATE 'ACK NOT EXPECTED'«, t00=0x006c, t01=0x0024}
0x0a8ea…0a8fc               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x006c, t01=0x0050}
0x0a8fc…0a910               Head {h00=0x0010, h01=0x0050, text=»TIMOUT EQU *«, t00=0x006c, t01=0x0062}
0x0a910…0a940               Head {h00=0x002c, h01=0x0050, text=» ABL RTTIME COMPLETE REQUEST RC=TIMEOUT «, t00=0x006c, t01=0x0076}
0x0a940…0a94e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006c, t01=0x00a6}
0x0a94e…0a958               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00b4}
0x0a958…0a962               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00be}
0x0a962…0a980               Head {h00=0x001a, h01=0x0050, text=»* STOP REQUEST TIMING «, t00=0x006c, t01=0x00c8}
0x0a980…0a98a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00e6}
0x0a98a…0a9b4               Head {h00=0x0026, h01=0x0050, text=»* REMAINING TIME IS RETURNED IN A2«, t00=0x006c, t01=0x00f0}
0x0a9b4…0a9be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x011a}
0x0a9be…0a9c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0124}
0x0a9c8…0a9dc               Head {h00=0x0010, h01=0x0050, text=»CTIME EQU * «, t00=0x006c, t01=0x012e}
0x0a9dc…0aa06               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTRTP,A6 GET TIMER POINTER«, t00=0x006c, t01=0x0142}
0x0aa06…0aa28               Head {h00=0x001e, h01=0x0050, text=» RF(Z) CTIM10 NOT RUNNING «, t00=0x006c, t01=0x016c}
0x0aa28…0aa42               Head {h00=0x0016, h01=0x0050, text=» IFT REMTIM=1  =9 «, t00=0x006c, t01=0x018e}
0x0aa42…0aa5a               Head {h00=0x0014, h01=0x0050, text=» LDR* A2,A2  =9 «, t00=0x006d, t01=0x0018}
0x0aa5a…0aa82               Head {h00=0x0024, h01=0x0050, text=» NGR A2,A2 GET REMAINING TIME =9«, t00=0x006d, t01=0x0030}
0x0aa82…0aa94               Head {h00=0x000e, h01=0x0050, text=» XIF   =9 «, t00=0x006d, t01=0x0058}
0x0aa94…0aab8               Head {h00=0x0020, h01=0x0050, text=» CM* DWTRTP,A6 KILL TIMER =9«, t00=0x006d, t01=0x006a}
0x0aab8…0aace               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x006d, t01=0x008e}
0x0aace…0aadc               Head {h00=0x000a, h01=0x0050, text=»    =3«, t00=0x006d, t01=0x00a4}
0x0aadc…0aaf0               Head {h00=0x0010, h01=0x0050, text=»CTIM10 EQU *«, t00=0x006d, t01=0x00b2}
0x0aaf0…0ab04               Head {h00=0x0010, h01=0x0050, text=» ABL RTNA15 «, t00=0x006d, t01=0x00c6}
0x0ab04…0ab12               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006d, t01=0x00da}
0x0ab12…0ab1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00e8}
0x0ab1c…0ab38               Head {h00=0x0018, h01=0x0050, text=»* GET RECEIVE BUFFER«, t00=0x006d, t01=0x00f2}
0x0ab38…0ab42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x010e}
0x0ab42…0ab6a               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,GRBUF«, t00=0x006d, t01=0x0118}
0x0ab6a…0ab8e               Head {h00=0x0020, h01=0x0050, text=»* A4=0 IF NO BUFFER IS FREE «, t00=0x006d, t01=0x0140}
0x0ab8e…0abb8               Head {h00=0x0026, h01=0x0050, text=»* ELSE A4 CONTAINS BUFFER ADDRESS «, t00=0x006d, t01=0x0164}
0x0abb8…0abda               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x006d, t01=0x018e}
0x0abda…0abe4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0020}
0x0abe4…0abee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x002a}
0x0abee…0ac1a               Head {h00=0x0028, h01=0x0050, text=»GRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x006e, t01=0x0034}
0x0ac1a…0ac26               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x006e, t01=0x0060}
0x0ac26…0ac3a               Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A2 «, t00=0x006e, t01=0x006c}
0x0ac3a…0ac5e               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GBUF10 NO BUFFER FREE«, t00=0x006e, t01=0x0080}
0x0ac5e…0ac90               Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN «, t00=0x006e, t01=0x00a4}
0x0ac90…0aca2               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x006e, t01=0x00d6}
0x0aca2…0acb6               Head {h00=0x0010, h01=0x0050, text=»GBUF10 EQU *«, t00=0x006e, t01=0x00e8}
0x0acb6…0acca               Head {h00=0x0010, h01=0x0050, text=» ABL RTNA15 «, t00=0x006e, t01=0x00fc}
0x0acca…0acd8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006e, t01=0x0110}
0x0acd8…0ace2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x011e}
0x0ace2…0acec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0128}
0x0acec…0ad0c               Head {h00=0x001c, h01=0x0050, text=»* RELEASE RECEIVE BUFFER«, t00=0x006e, t01=0x0132}
0x0ad0c…0ad16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0152}
0x0ad16…0ad3a               Head {h00=0x0020, h01=0x0050, text=»* A4 CONTAINS BUFFER ADDRESS«, t00=0x006e, t01=0x015c}
0x0ad3a…0ad62               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,RRBUF«, t00=0x006e, t01=0x0180}
0x0ad62…0ad84               Head {h00=0x001e, h01=0x0050, text=»* A2 AND A3 ARE DESTROYED «, t00=0x006f, t01=0x0018}
0x0ad84…0ad8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x003a}
0x0ad8e…0ad98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0044}
0x0ad98…0adc4               Head {h00=0x0028, h01=0x0050, text=»RRBUF LDKL A2,DCRBUF RECEIVE BUFFERS«, t00=0x006f, t01=0x004e}
0x0adc4…0add0               Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x006f, t01=0x007a}
0x0add0…0ade4               Head {h00=0x0010, h01=0x0050, text=»RBUF10 EQU *«, t00=0x006f, t01=0x0086}
0x0ade4…0adf8               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x006f, t01=0x009a}
0x0adf8…0ae0e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RBUF20 «, t00=0x006f, t01=0x00ae}
0x0ae0e…0ae20               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x006f, t01=0x00c4}
0x0ae20…0ae32               Head {h00=0x000e, h01=0x0050, text=» RB RBUF10«, t00=0x006f, t01=0x00d6}
0x0ae32…0ae46               Head {h00=0x0010, h01=0x0050, text=»RBUF20 EQU *«, t00=0x006f, t01=0x00e8}
0x0ae46…0ae58               Head {h00=0x000e, h01=0x0050, text=» STR A4,A2«, t00=0x006f, t01=0x00fc}
0x0ae58…0ae68               Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x006f, t01=0x010e}
0x0ae68…0ae8c               Head {h00=0x0020, h01=0x0050, text=» RB GBUF10 RETURN TO CALLER «, t00=0x006f, t01=0x011e}
0x0ae8c…0ae9a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006f, t01=0x0142}
0x0ae9a…0aea4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0150}
0x0aea4…0aeda               Head {h00=0x0032, h01=0x0050, text=»* RELEASE ALL RECEIVE BUFFERS QUEUED ON A DWT «, t00=0x006f, t01=0x015a}
0x0aeda…0aee4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0190}
0x0aee4…0aefc               Head {h00=0x0014, h01=0x0050, text=»* A6 - DWT ADDR «, t00=0x0070, t01=0x000a}
0x0aefc…0af1e               Head {h00=0x001e, h01=0x0050, text=»* A1 AND A4 ARE DESTROYED «, t00=0x0070, t01=0x0022}
0x0af1e…0af4a               Head {h00=0x0028, h01=0x0050, text=»* CALLING SEQUENCE: CF    A15,RELBUF«, t00=0x0070, t01=0x0044}
0x0af4a…0af54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0070}
0x0af54…0af5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x007a}
0x0af5e…0af72               Head {h00=0x0010, h01=0x0050, text=»RELBUF EQU *«, t00=0x0070, t01=0x0084}
0x0af72…0afa0               Head {h00=0x002a, h01=0x0050, text=» LDK A1,DWTIPC SET BUFFER QUEUE DISP. «, t00=0x0070, t01=0x0098}
0x0afa0…0afb2               Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x0070, t01=0x00c6}
0x0afb2…0afc6               Head {h00=0x0010, h01=0x0050, text=»RLBU10 EQU *«, t00=0x0070, t01=0x00d8}
0x0afc6…0afee               Head {h00=0x0024, h01=0x0050, text=» LDR* A4,A1 NEXT IN BUFFER QUEUE«, t00=0x0070, t01=0x00ec}
0x0afee…0b004               Head {h00=0x0012, h01=0x0050, text=» RB(Z) GBUF10 «, t00=0x0070, t01=0x0114}
0x0b004…0b02a               Head {h00=0x0022, h01=0x0050, text=» LDR* A2,A4 REMOVE FROM QUEUE «, t00=0x0070, t01=0x012a}
0x0b02a…0b03e               Head {h00=0x0010, h01=0x0050, text=» STR A2,A1 .«, t00=0x0070, t01=0x0150}
0x0b03e…0b062               Head {h00=0x0020, h01=0x0050, text=» CF A15,RRBUF RELEASE BUFFER«, t00=0x0070, t01=0x0164}
0x0b062…0b074               Head {h00=0x000e, h01=0x0050, text=» RB RLBU10«, t00=0x0070, t01=0x0188}
0x0b074…0b082               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0071, t01=0x000a}
0x0b082…0b08c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0018}
0x0b08c…0b096               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0022}
0x0b096…0b0c0               Head {h00=0x0026, h01=0x0050, text=»* INSERT DWT IN SEND REQUEST QUEUE«, t00=0x0071, t01=0x002c}
0x0b0c0…0b0ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0056}
0x0b0ca…0b0e6               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0071, t01=0x0060}
0x0b0e6…0b0f6               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0071, t01=0x007c}
0x0b0f6…0b100               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x008c}
0x0b100…0b12c               Head {h00=0x0028, h01=0x0050, text=»INSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR«, t00=0x0071, t01=0x0096}
0x0b12c…0b142               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTOPN«, t00=0x0071, t01=0x00c2}
0x0b142…0b15c               Head {h00=0x0016, h01=0x0050, text=»INSWQ2 LDR* A3,A2 «, t00=0x0071, t01=0x00d8}
0x0b15c…0b184               Head {h00=0x0024, h01=0x0050, text=» RF(Z) INSWQ3 END OF QUEUE FOUND«, t00=0x0071, t01=0x00f2}
0x0b184…0b196               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0071, t01=0x011a}
0x0b196…0b1a8               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0071, t01=0x012c}
0x0b1a8…0b1c0               Head {h00=0x0014, h01=0x0050, text=»INSWQ3 ADR A4,A6«, t00=0x0071, t01=0x013e}
0x0b1c0…0b1e2               Head {h00=0x001e, h01=0x0050, text=» STR A4,A2 INSERT IN QUEUE«, t00=0x0071, t01=0x0156}
0x0b1e2…0b208               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0071, t01=0x0178}
0x0b208…0b222               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0072, t01=0x000e}
0x0b222…0b230               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0072, t01=0x0028}
0x0b230…0b23a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0036}
0x0b23a…0b244               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0040}
0x0b244…0b270               Head {h00=0x0028, h01=0x0050, text=»* REMOVE DWT FROM SEND REQUEST QUEUE«, t00=0x0072, t01=0x004a}
0x0b270…0b27a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0076}
0x0b27a…0b296               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0072, t01=0x0080}
0x0b296…0b2a6               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0072, t01=0x009c}
0x0b2a6…0b2b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00ac}
0x0b2b0…0b2de               Head {h00=0x002a, h01=0x0050, text=»REMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR «, t00=0x0072, t01=0x00b6}
0x0b2de…0b310               Head {h00=0x002e, h01=0x0050, text=» LDK A4,DWTOPN GET DWT-LINK TO BE REMOVED «, t00=0x0072, t01=0x00e4}
0x0b310…0b324               Head {h00=0x0010, h01=0x0050, text=»REM06 EQU * «, t00=0x0072, t01=0x0116}
0x0b324…0b338               Head {h00=0x0010, h01=0x0050, text=» ADR A4,A6  «, t00=0x0072, t01=0x012a}
0x0b338…0b350               Head {h00=0x0014, h01=0x0050, text=»REM10 LDR* A3,A2«, t00=0x0072, t01=0x013e}
0x0b350…0b37a               Head {h00=0x0026, h01=0x0050, text=» RB(Z) GBUF10 NOT ON QUEUE: RETURN«, t00=0x0072, t01=0x0156}
0x0b37a…0b38c               Head {h00=0x000e, h01=0x0050, text=» CWR A3,A4«, t00=0x0072, t01=0x0180}
0x0b38c…0b3a0 (115, 0, 398) Head {h00=0x0010, h01=0x0050, text=» RF(E) REM15«, t00=0x0073, t01=0x0004}
0x0b3a0…0b3bc               Head {h00=0x0018, h01=0x0050, text=» LDR A2,A3 GET NEXT «, t00=0x0073, t01=0x0018}
0x0b3bc…0b3ce               Head {h00=0x000e, h01=0x0050, text=» RB REM10 «, t00=0x0073, t01=0x0034}
0x0b3ce…0b3ee               Head {h00=0x001c, h01=0x0050, text=»REM15 LDR* A3,A4 REMOVE «, t00=0x0073, t01=0x0046}
0x0b3ee…0b400               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x0073, t01=0x0066}
0x0b400…0b41a               Head {h00=0x0016, h01=0x0050, text=» RB GBUF10 RETURN «, t00=0x0073, t01=0x0078}
0x0b41a…0b428               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0073, t01=0x0092}
0x0b428…0b432               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00a0}
0x0b432…0b43c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00aa}
0x0b43c…0b460               Head {h00=0x0020, h01=0x0050, text=»* INSERT DWT IN STATUS QUEUE«, t00=0x0073, t01=0x00b4}
0x0b460…0b46a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00d8}
0x0b46a…0b480               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x0073, t01=0x00e2}
0x0b480…0b49c               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0073, t01=0x00f8}
0x0b49c…0b4ac               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0073, t01=0x0114}
0x0b4ac…0b4b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0124}
0x0b4b6…0b4e2               Head {h00=0x0028, h01=0x0050, text=»INSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR«, t00=0x0073, t01=0x012e}
0x0b4e2…0b4f8               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTOPE«, t00=0x0073, t01=0x015a}
0x0b4f8…0b50a               Head {h00=0x000e, h01=0x0050, text=» RB INSWQ2«, t00=0x0073, t01=0x0170}
0x0b50a…0b514               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0182}
0x0b514…0b51e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x018c}
0x0b51e…0b544               Head {h00=0x0022, h01=0x0050, text=»* REMOVE DWT FROM STATUS QUEUE«, t00=0x0074, t01=0x0008}
0x0b544…0b54e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x002e}
0x0b54e…0b56a               Head {h00=0x0018, h01=0x0050, text=»* A2,A3,A4 DESTROYED«, t00=0x0074, t01=0x0038}
0x0b56a…0b57a               Head {h00=0x000c, h01=0x0050, text=»* A6=DWT«, t00=0x0074, t01=0x0054}
0x0b57a…0b584               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0064}
0x0b584…0b5b2               Head {h00=0x002a, h01=0x0050, text=»REMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR «, t00=0x0074, t01=0x006e}
0x0b5b2…0b5c8               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTOPE«, t00=0x0074, t01=0x009c}
0x0b5c8…0b5da               Head {h00=0x000e, h01=0x0050, text=» RB REM06 «, t00=0x0074, t01=0x00b2}
0x0b5da…0b5e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x00c4}
0x0b5e6…0b5f4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x00d0}
0x0b5f4…0b5fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00de}
0x0b5fe…0b608               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00e8}
0x0b608…0b630               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ALLOCATED RECEIVE BUFFER«, t00=0x0074, t01=0x00f2}
0x0b630…0b63a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x011a}
0x0b63a…0b652               Head {h00=0x0014, h01=0x0050, text=»* A4=BUFFER ADDR«, t00=0x0074, t01=0x0124}
0x0b652…0b66c               Head {h00=0x0016, h01=0x0050, text=»* A2,A3 DESTROYED «, t00=0x0074, t01=0x013c}
0x0b66c…0b676               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0156}
0x0b676…0b68a               Head {h00=0x0010, h01=0x0050, text=»QRBUF EQU * «, t00=0x0074, t01=0x0160}
0x0b68a…0b69c               Head {h00=0x000e, h01=0x0050, text=» SUK A4,6 «, t00=0x0074, t01=0x0174}
0x0b69c…0b6ca               Head {h00=0x002a, h01=0x0050, text=» LDK A2,DWTIPC SET BUFFER QUEUE DISP. «, t00=0x0074, t01=0x0186}
0x0b6ca…0b6dc               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0075, t01=0x0024}
0x0b6dc…0b6f0               Head {h00=0x0010, h01=0x0050, text=»QR100 EQU * «, t00=0x0075, t01=0x0036}
0x0b6f0…0b704               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x0075, t01=0x004a}
0x0b704…0b72c               Head {h00=0x0024, h01=0x0050, text=» RF(Z) QR200 END OF QUEUE FOUND «, t00=0x0075, t01=0x005e}
0x0b72c…0b73e               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0075, t01=0x0086}
0x0b73e…0b750               Head {h00=0x000e, h01=0x0050, text=» RB QR100 «, t00=0x0075, t01=0x0098}
0x0b750…0b77a               Head {h00=0x0026, h01=0x0050, text=»QR200 STR A4,A2 INSERT INTO QUEUE «, t00=0x0075, t01=0x00aa}
0x0b77a…0b7a0               Head {h00=0x0022, h01=0x0050, text=» CMR A4 INDICATE END OF QUEUE «, t00=0x0075, t01=0x00d4}
0x0b7a0…0b7b0               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0075, t01=0x00fa}
0x0b7b0…0b7be               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0075, t01=0x010a}
0x0b7be…0b7c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0118}
0x0b7c8…0b7d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0122}
0x0b7d2…0b7f0               Head {h00=0x001a, h01=0x0050, text=»* STORE REGISTER A3-A8«, t00=0x0075, t01=0x012c}
0x0b7f0…0b818               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENSE: CF A15,STREG«, t00=0x0075, t01=0x014a}
0x0b818…0b822               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0172}
0x0b822…0b83a               Head {h00=0x0014, h01=0x0050, text=»STREG ST A3,LCA3«, t00=0x0075, t01=0x017c}
0x0b83a…0b84e (118, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ST A4,LCA4 «, t00=0x0076, t01=0x0004}
0x0b84e…0b862               Head {h00=0x0010, h01=0x0050, text=» ST A5,LCA5 «, t00=0x0076, t01=0x0018}
0x0b862…0b876               Head {h00=0x0010, h01=0x0050, text=» ST A6,LCA6 «, t00=0x0076, t01=0x002c}
0x0b876…0b88a               Head {h00=0x0010, h01=0x0050, text=» ST A7,LCA7 «, t00=0x0076, t01=0x0040}
0x0b88a…0b89e               Head {h00=0x0010, h01=0x0050, text=» ST A8,LCA8 «, t00=0x0076, t01=0x0054}
0x0b89e…0b8b8               Head {h00=0x0016, h01=0x0050, text=» RF RTNA15 RETURN «, t00=0x0076, t01=0x0068}
0x0b8b8…0b8c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0082}
0x0b8c2…0b8cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x008c}
0x0b8cc…0b8de               Head {h00=0x000e, h01=0x0050, text=»* RESTORE «, t00=0x0076, t01=0x0096}
0x0b8de…0b906               Head {h00=0x0024, h01=0x0050, text=»* CALLING SEQUENCE: CF A15,LDREG«, t00=0x0076, t01=0x00a8}
0x0b906…0b910               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00d0}
0x0b910…0b928               Head {h00=0x0014, h01=0x0050, text=»LDREG LDKL A3,0 «, t00=0x0076, t01=0x00da}
0x0b928…0b93c               Head {h00=0x0010, h01=0x0050, text=»LCA3 EQU *-2«, t00=0x0076, t01=0x00f2}
0x0b93c…0b94e               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x0076, t01=0x0106}
0x0b94e…0b962               Head {h00=0x0010, h01=0x0050, text=»LCA4 EQU *-2«, t00=0x0076, t01=0x0118}
0x0b962…0b974               Head {h00=0x000e, h01=0x0050, text=» LDKL A5,0«, t00=0x0076, t01=0x012c}
0x0b974…0b988               Head {h00=0x0010, h01=0x0050, text=»LCA5 EQU *-2«, t00=0x0076, t01=0x013e}
0x0b988…0b99a               Head {h00=0x000e, h01=0x0050, text=» LDKL A6,0«, t00=0x0076, t01=0x0152}
0x0b99a…0b9ae               Head {h00=0x0010, h01=0x0050, text=»LCA6 EQU *-2«, t00=0x0076, t01=0x0164}
0x0b9ae…0b9c0               Head {h00=0x000e, h01=0x0050, text=» LDKL A7,0«, t00=0x0076, t01=0x0178}
0x0b9c0…0b9d4               Head {h00=0x0010, h01=0x0050, text=»LCA7 EQU *-2«, t00=0x0076, t01=0x018a}
0x0b9d4…0b9e6               Head {h00=0x000e, h01=0x0050, text=» LDKL A8,0«, t00=0x0077, t01=0x000e}
0x0b9e6…0b9fa               Head {h00=0x0010, h01=0x0050, text=»LCA8 EQU *-2«, t00=0x0077, t01=0x0020}
0x0b9fa…0ba04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0034}
0x0ba04…0ba0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x003e}
0x0ba0e…0ba30               Head {h00=0x001e, h01=0x0050, text=»*  RETURN VIA REGISTER 15 «, t00=0x0077, t01=0x0048}
0x0ba30…0ba3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x006a}
0x0ba3a…0ba4e               Head {h00=0x0010, h01=0x0050, text=»RTNA15 EQU *«, t00=0x0077, t01=0x0074}
0x0ba4e…0ba62               Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0077, t01=0x0088}
0x0ba62…0ba74               Head {h00=0x000e, h01=0x0050, text=» ABR* A15 «, t00=0x0077, t01=0x009c}
0x0ba74…0ba82               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0077, t01=0x00ae}
0x0ba82…0ba8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x00bc}
0x0ba8c…0baa4               Head {h00=0x0014, h01=0x0050, text=»* POLL TIME OUT «, t00=0x0077, t01=0x00c6}
0x0baa4…0baae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x00de}
0x0baae…0bada               Head {h00=0x0028, h01=0x0050, text=»PTOUT LDKL A5,STB LOAD A5 STACK BASE«, t00=0x0077, t01=0x00e8}
0x0bada…0bb00               Head {h00=0x0022, h01=0x0050, text=» LDR A6,A1 RELOAD DWT ADDRESS «, t00=0x0077, t01=0x0114}
0x0bb00…0bb18               Head {h00=0x0014, h01=0x0050, text=» LDKL A7,DTETAB «, t00=0x0077, t01=0x013a}
0x0bb18…0bb2e               Head {h00=0x0012, h01=0x0050, text=» CM DTEDLS,A7 «, t00=0x0077, t01=0x0152}
0x0bb2e…0bb44               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x0077, t01=0x0168}
0x0bb44…0bb4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x017e}
0x0bb4e…0bb58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0188}
0x0bb58…0bb76 (120, 0, 400) Head {h00=0x001a, h01=0x0050, text=»*  COUNT POLL TIME OUT«, t00=0x0078, t01=0x0004}
0x0bb76…0bb80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0022}
0x0bb80…0bb96               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSXC3«, t00=0x0078, t01=0x002c}
0x0bb96…0bbac               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x0078, t01=0x0042}
0x0bbac…0bbb8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x0058}
0x0bbb8…0bbe0               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x0078, t01=0x0064}
0x0bbe0…0bbf2               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0078, t01=0x008c}
0x0bbf2…0bbfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x009e}
0x0bbfc…0bc34               Head {h00=0x0034, h01=0x0050, text=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED«, t00=0x0078, t01=0x00a8}
0x0bc34…0bc3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x00e0}
0x0bc3e…0bc52               Head {h00=0x0010, h01=0x0050, text=»CPTIM EQU * «, t00=0x0078, t01=0x00ea}
0x0bc52…0bc6c               Head {h00=0x0016, h01=0x0050, text=» LDK A2,1 INDICATE«, t00=0x0078, t01=0x00fe}
0x0bc6c…0bc92               Head {h00=0x0022, h01=0x0050, text=» ST A2,DTEDLS,A7 DATA LINK UP «, t00=0x0078, t01=0x0118}
0x0bc92…0bcaa               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,-TIMPOL«, t00=0x0078, t01=0x013e}
0x0bcaa…0bcce               Head {h00=0x0020, h01=0x0050, text=» ST* A2,DCTPGP RESTART TIMER«, t00=0x0078, t01=0x0156}
0x0bcce…0bcde               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0078, t01=0x017a}
0x0bcde…0bce8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x018a}
0x0bce8…0bd02 (121, 0, 400) Head {h00=0x0016, h01=0x0050, text=»* START POLL TIMER«, t00=0x0079, t01=0x0004}
0x0bd02…0bd0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x001e}
0x0bd0c…0bd20               Head {h00=0x0010, h01=0x0050, text=»SPOTIM EQU *«, t00=0x0079, t01=0x0028}
0x0bd20…0bd50               Head {h00=0x002c, h01=0x0050, text=» LDR A1,A6 LOAD DWT ADDRESS AS PARAMETER«, t00=0x0079, t01=0x003c}
0x0bd50…0bd72               Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME START TIMER«, t00=0x0079, t01=0x006c}
0x0bd72…0bd8c               Head {h00=0x0016, h01=0x0050, text=» DATA PTOUT,TIMPOL«, t00=0x0079, t01=0x008e}
0x0bd8c…0bdb6               Head {h00=0x0026, h01=0x0050, text=» ST A4,DCTPGP STORE TIMER POINTER «, t00=0x0079, t01=0x00a8}
0x0bdb6…0bdd0               Head {h00=0x0016, h01=0x0050, text=» RB RTNA15 RETURN «, t00=0x0079, t01=0x00d2}
0x0bdd0…0bdde               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0079, t01=0x00ec}
0x0bdde…0bde8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00fa}
0x0bde8…0be08               Head {h00=0x001c, h01=0x0050, text=»* START PROCEDURE TIMER «, t00=0x0079, t01=0x0104}
0x0be08…0be12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0124}
0x0be12…0be26               Head {h00=0x0010, h01=0x0050, text=»SPTIM EQU * «, t00=0x0079, t01=0x012e}
0x0be26…0be4e               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 LOAD DWT AS PARAMETER«, t00=0x0079, t01=0x0142}
0x0be4e…0be64               Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIME«, t00=0x0079, t01=0x016a}
0x0be64…0be80               Head {h00=0x0018, h01=0x0050, text=» DATA PRTOUT,TIMPRO «, t00=0x0079, t01=0x0180}
0x0be80…0bea8               Head {h00=0x0024, h01=0x0050, text=» ST A4,DCTPP SAVE TIMER POINTER «, t00=0x007a, t01=0x000c}
0x0bea8…0beb8               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007a, t01=0x0034}
0x0beb8…0bec2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0044}
0x0bec2…0bede               Head {h00=0x0018, h01=0x0050, text=»* PROCEDURE TIMEOUT «, t00=0x007a, t01=0x004e}
0x0bede…0bee8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x006a}
0x0bee8…0bf00               Head {h00=0x0014, h01=0x0050, text=»PRTOUT CM DCTPP «, t00=0x007a, t01=0x0074}
0x0bf00…0bf1c               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 RELOAD A6«, t00=0x007a, t01=0x008c}
0x0bf1c…0bf40               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACK BASE«, t00=0x007a, t01=0x00a8}
0x0bf40…0bf58               Head {h00=0x0014, h01=0x0050, text=» LDKL A7,DTETAB «, t00=0x007a, t01=0x00cc}
0x0bf58…0bf6e               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x007a, t01=0x00e4}
0x0bf6e…0bf78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00fa}
0x0bf78…0bf82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0104}
0x0bf82…0bfa6               Head {h00=0x0020, h01=0x0050, text=»*  COUNT PROCEDURE TIME OUT «, t00=0x007a, t01=0x010e}
0x0bfa6…0bfb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0132}
0x0bfb0…0bfc6               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSXC2«, t00=0x007a, t01=0x013c}
0x0bfc6…0bfdc               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x007a, t01=0x0152}
0x0bfdc…0bfe8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x0168}
0x0bfe8…0c018               Head {h00=0x002c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT IF OPEN SALCUZ «, t00=0x007a, t01=0x0174}
0x0c018…0c02c               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x007b, t01=0x0014}
0x0c02c…0c052               Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRT10 ACK NOT EXPECTED «, t00=0x007b, t01=0x0028}
0x0c052…0c070               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x007b, t01=0x004e}
0x0c070…0c09a               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x007b, t01=0x006c}
0x0c09a…0c0b0               Head {h00=0x0012, h01=0x0050, text=»PRT10 ABL BRM «, t00=0x007b, t01=0x0096}
0x0c0b0…0c0be               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007b, t01=0x00ac}
0x0c0be…0c0c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00ba}
0x0c0c8…0c0e6               Head {h00=0x001a, h01=0x0050, text=»* STOP PROCEDURE TIMER«, t00=0x007b, t01=0x00c4}
0x0c0e6…0c0f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00e2}
0x0c0f0…0c11c               Head {h00=0x0028, h01=0x0050, text=»HPTIM LD A1,DCTPP GET TIMER POINTER «, t00=0x007b, t01=0x00ec}
0x0c11c…0c13c               Head {h00=0x001c, h01=0x0050, text=» RF(Z) HPT10 NOT RUNNING«, t00=0x007b, t01=0x0118}
0x0c13c…0c156               Head {h00=0x0016, h01=0x0050, text=» CMR A1 STOP TIMER«, t00=0x007b, t01=0x0138}
0x0c156…0c168               Head {h00=0x000e, h01=0x0050, text=» CM DCTPP «, t00=0x007b, t01=0x0152}
0x0c168…0c17c               Head {h00=0x0010, h01=0x0050, text=»HPT10 RTN A5«, t00=0x007b, t01=0x0164}
0x0c17c…0c184               Head {h00=0x0004, h01=0x0050, t00=0x007b, t01=0x0178}
0x0c184…0c18e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0180}
0x0c18e…0c198               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x018a}
0x0c198…0c1c4 (124, 0, 400) Head {h00=0x0028, h01=0x0050, text=»*   WAIT 1 SEC. FOR MODEM CONNECTION«, t00=0x007c, t01=0x0004}
0x0c1c4…0c1ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0030}
0x0c1ce…0c1d6               Head {h00=0x0004, h01=0x0050, t00=0x007c, t01=0x003a}
0x0c1d6…0c1fa               Head {h00=0x0020, h01=0x0050, text=»DTE:ON LDR A1,A6 DWT ADDRESS«, t00=0x007c, t01=0x0042}
0x0c1fa…0c21c               Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME WAIT 1 SEC.«, t00=0x007c, t01=0x0066}
0x0c21c…0c234               Head {h00=0x0014, h01=0x0050, text=» DATA DTE:10,10 «, t00=0x007c, t01=0x0088}
0x0c234…0c242               Head {h00=0x000a, h01=0x0050, text=»    =1«, t00=0x007c, t01=0x00a0}
0x0c242…0c25a               Head {h00=0x0014, h01=0x0050, text=» LDKL A5,STB  =1«, t00=0x007c, t01=0x00ae}
0x0c25a…0c280               Head {h00=0x0022, h01=0x0050, text=» CF A5,CSYNCI CONNECT MODEM =1«, t00=0x007c, t01=0x00c6}
0x0c280…0c2ae               Head {h00=0x002a, h01=0x0050, text=» CF A5,CHALTI NO INTERRUPTS ALLOWED =1«, t00=0x007c, t01=0x00ec}
0x0c2ae…0c2c4               Head {h00=0x0012, h01=0x0050, text=» ABL TDISP =1 «, t00=0x007c, t01=0x011a}
0x0c2c4…0c2cc               Head {h00=0x0004, h01=0x0050, t00=0x007c, t01=0x0130}
0x0c2cc…0c2d4               Head {h00=0x0004, h01=0x0050, t00=0x007c, t01=0x0138}
0x0c2d4…0c2de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0140}
0x0c2de…0c2e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x014a}
0x0c2e8…0c30a               Head {h00=0x001e, h01=0x0050, text=»*   MODEM-CONNECT TIMEOUT «, t00=0x007c, t01=0x0154}
0x0c30a…0c314               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0176}
0x0c314…0c31c               Head {h00=0x0004, h01=0x0050, t00=0x007c, t01=0x0180}
0x0c31c…0c340               Head {h00=0x0020, h01=0x0050, text=»DTE:10 LDR A6,A1 DWT ADDRESS«, t00=0x007c, t01=0x0188}
0x0c340…0c358               Head {h00=0x0014, h01=0x0050, text=» LDKL A7,DTETAB «, t00=0x007d, t01=0x001c}
0x0c358…0c380               Head {h00=0x0024, h01=0x0050, text=» IM DTESTA,A7 SET OPEN STATUS =1«, t00=0x007d, t01=0x0034}
0x0c380…0c398               Head {h00=0x0014, h01=0x0050, text=» LDKL A5,STB  =1«, t00=0x007d, t01=0x005c}
0x0c398…0c3c6               Head {h00=0x002a, h01=0x0050, text=» CF A5,CSYNCI PUT CU IN ACTIVE MODE =1«, t00=0x007d, t01=0x0074}
0x0c3c6…0c402               Head {h00=0x0038, h01=0x0050, text=» CF A5,CHALTI HALT I/P DEVICE TO GET MODEM STATUS =1«, t00=0x007d, t01=0x00a2}
0x0c402…0c436               Head {h00=0x0030, h01=0x0050, text=» IM DTEPLS,A7 PRESET PHYSICAL STATUS = OK =1«, t00=0x007d, t01=0x00de}
0x0c436…0c456               Head {h00=0x001c, h01=0x0050, text=» ANK A2,1 MODEM OK ? =1 «, t00=0x007d, t01=0x0112}
0x0c456…0c472               Head {h00=0x0018, h01=0x0050, text=» RF(Z) DTE:20 YES =1«, t00=0x007d, t01=0x0132}
0x0c472…0c4a2               Head {h00=0x002c, h01=0x0050, text=» CM DTEPLS,A7 INDICATE PHYSICAL ERROR =1«, t00=0x007d, t01=0x014e}
0x0c4a2…0c4ba               Head {h00=0x0014, h01=0x0050, text=»DTE:20 EQU *  =1«, t00=0x007d, t01=0x017e}
0x0c4ba…0c4e0               Head {h00=0x0022, h01=0x0050, text=» LDR A1,A2 SET RETURN CODE =1 «, t00=0x007e, t01=0x0008}
0x0c4e0…0c50e               Head {h00=0x002a, h01=0x0050, text=» CF A15,TENDIO COMPLETE THE REQUEST =1«, t00=0x007e, t01=0x002e}
0x0c50e…0c538               Head {h00=0x0026, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER =6«, t00=0x007e, t01=0x005c}
0x0c538…0c556               Head {h00=0x001a, h01=0x0050, text=» ABL BRM START I/P =1 «, t00=0x007e, t01=0x0086}
0x0c556…0c564               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007e, t01=0x00a4}
0x0c564…0c57a               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x007e, t01=0x00b2}
0x0c57a…0c584               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00c8}
0x0c584…0c58e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00d2}
0x0c58e…0c5a8               Head {h00=0x0016, h01=0x0050, text=»*  GET DWT ADDRESS«, t00=0x007e, t01=0x00dc}
0x0c5a8…0c5b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00f6}
0x0c5b2…0c5c6               Head {h00=0x0010, h01=0x0050, text=»MESDWT EQU *«, t00=0x007e, t01=0x0100}
0x0c5c6…0c5f0               Head {h00=0x0026, h01=0x0050, text=» CWR A6,A7 IS IT DTETAB-ADDRESS ? «, t00=0x007e, t01=0x0114}
0x0c5f0…0c60a               Head {h00=0x0016, h01=0x0050, text=» RF(E) MES200 YES «, t00=0x007e, t01=0x013e}
0x0c60a…0c632               Head {h00=0x0024, h01=0x0050, text=» LD A2,DTEDDT,A7 GET ADDR TO DDT«, t00=0x007e, t01=0x0158}
0x0c632…0c654               Head {h00=0x001e, h01=0x0050, text=» CWR A6,A2 IS IT DDT-ADDR «, t00=0x007e, t01=0x0180}
0x0c654…0c66e               Head {h00=0x0016, h01=0x0050, text=» RF(E) MES200 YES «, t00=0x007f, t01=0x0012}
0x0c66e…0c694               Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY REQUEST ? «, t00=0x007f, t01=0x002c}
0x0c694…0c6ac               Head {h00=0x0014, h01=0x0050, text=» RF(N) MESD50 NO«, t00=0x007f, t01=0x0052}
0x0c6ac…0c6d8               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTOR,A6 ANY MESSAGE ORDER ? «, t00=0x007f, t01=0x006a}
0x0c6d8…0c6ec               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x007f, t01=0x0096}
0x0c6ec…0c706               Head {h00=0x0016, h01=0x0050, text=» RF(Z) MES200 YES «, t00=0x007f, t01=0x00aa}
0x0c706…0c730               Head {h00=0x0026, h01=0x0050, text=» SUK A2,RECEIVE A RECEIVE ORDER ? «, t00=0x007f, t01=0x00c4}
0x0c730…0c74a               Head {h00=0x0016, h01=0x0050, text=» RF(Z) MES200 YES «, t00=0x007f, t01=0x00ee}
0x0c74a…0c75e               Head {h00=0x0010, h01=0x0050, text=»MESD50 EQU *«, t00=0x007f, t01=0x0108}
0x0c75e…0c792               Head {h00=0x0030, h01=0x0050, text=» LD A2,DTEDDT,A7 IS THERE A DDT CONNECTED ? «, t00=0x007f, t01=0x011c}
0x0c792…0c7aa               Head {h00=0x0014, h01=0x0050, text=» RF(Z) MES100 NO«, t00=0x007f, t01=0x0150}
0x0c7aa…0c7ca               Head {h00=0x001c, h01=0x0050, text=» LDR A6,A2 GET DDT-ADDR «, t00=0x007f, t01=0x0168}
0x0c7ca…0c7dc               Head {h00=0x000e, h01=0x0050, text=» RF MES200«, t00=0x007f, t01=0x0188}
0x0c7dc…0c7f0               Head {h00=0x0010, h01=0x0050, text=»MES100 EQU *«, t00=0x0080, t01=0x000a}
0x0c7f0…0c812               Head {h00=0x001e, h01=0x0050, text=» LDR A6,A7 GET DTETAB-ADDR«, t00=0x0080, t01=0x001e}
0x0c812…0c826               Head {h00=0x0010, h01=0x0050, text=»MES200 EQU *«, t00=0x0080, t01=0x0040}
0x0c826…0c848               Head {h00=0x001e, h01=0x0050, text=» ABL RTNA15 RETURN VIA A15«, t00=0x0080, t01=0x0054}
0x0c848…0c854               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x0076}
0x0c854…0c862               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0080, t01=0x0082}
0x0c862…0c86c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0090}
0x0c86c…0c876               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x009a}
0x0c876…0c892               Head {h00=0x0018, h01=0x0050, text=»* BASIC RECEIVE MODE«, t00=0x0080, t01=0x00a4}
0x0c892…0c89c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00c0}
0x0c89c…0c8c2               Head {h00=0x0022, h01=0x0050, text=»* ENTERED EVERY TIME A MESSAGE«, t00=0x0080, t01=0x00ca}
0x0c8c2…0c8ec               Head {h00=0x0026, h01=0x0050, text=»* IS EXPECTED FROM THE MASTER SIDE«, t00=0x0080, t01=0x00f0}
0x0c8ec…0c8f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x011a}
0x0c8f6…0c900               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0124}
0x0c900…0c912               Head {h00=0x000e, h01=0x0050, text=»BRM EQU * «, t00=0x0080, t01=0x012e}
0x0c912…0c936               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE «, t00=0x0080, t01=0x0140}
0x0c936…0c958               Head {h00=0x001e, h01=0x0050, text=» CM SYNSW CLEAR SYN-SWITCH«, t00=0x0080, t01=0x0164}
0x0c958…0c97e               Head {h00=0x0022, h01=0x0050, text=» CM TPM CLEAR TRANSPARENT TEXT«, t00=0x0080, t01=0x0186}
0x0c97e…0c9ae               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCI START INPUT WITH SYNC DEF «, t00=0x0081, t01=0x001c}
0x0c9ae…0c9b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x004c}
0x0c9b8…0c9c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0056}
0x0c9c2…0c9cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0060}
0x0c9cc…0c9f0               Head {h00=0x0020, h01=0x0050, text=» CF A5,READP READ CHARACTER «, t00=0x0081, t01=0x006a}
0x0c9f0…0ca14               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) BRM120 PARITY ERROR «, t00=0x0081, t01=0x008e}
0x0ca14…0ca1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00b2}
0x0ca1e…0ca28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00bc}
0x0ca28…0ca56               Head {h00=0x002a, h01=0x0050, text=»*  CHECK IF IT IS A CONTROL CHARACTER «, t00=0x0081, t01=0x00c6}
0x0ca56…0ca60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00f4}
0x0ca60…0ca72               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0081, t01=0x00fe}
0x0ca72…0cab0               Head {h00=0x003a, h01=0x0050, text=» CF A15,LOOKUP BRANCH ON CODES, TABLE ADDRESS TO STACK«, t00=0x0081, t01=0x0110}
0x0cab0…0caee               Head {h00=0x003a, h01=0x0050, text=» DATA BRM100,BRM200 LAST ENTRY,POLL OR SELECT SEQUENCE«, t00=0x0081, t01=0x014e}
0x0caee…0cb14               Head {h00=0x0022, h01=0x0050, text=» DATA STX,STX100 STX RECEIVED «, t00=0x0081, t01=0x018c}
0x0cb14…0cb3a               Head {h00=0x0022, h01=0x0050, text=» DATA EOT,EOT100 EOT RECEIVED «, t00=0x0082, t01=0x0022}
0x0cb3a…0cb60               Head {h00=0x0022, h01=0x0050, text=» DATA ENQ,ENQ100 ENQ RECEIVED «, t00=0x0082, t01=0x0048}
0x0cb60…0cb86               Head {h00=0x0022, h01=0x0050, text=» DATA DLE,DLE100 DLE RECEIVED «, t00=0x0082, t01=0x006e}
0x0cb86…0cbb2               Head {h00=0x0028, h01=0x0050, text=»BRM100 DATA NAK,NAK100 NAK RECEIVED «, t00=0x0082, t01=0x0094}
0x0cbb2…0cbc0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0082, t01=0x00c0}
0x0cbc0…0cbca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00ce}
0x0cbca…0cbd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00d8}
0x0cbd4…0cbf0               Head {h00=0x0018, h01=0x0050, text=»*  THROUGHPUT ERROR «, t00=0x0082, t01=0x00e2}
0x0cbf0…0cbfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00fe}
0x0cbfa…0cc0e               Head {h00=0x0010, h01=0x0050, text=»BRM110 EQU *«, t00=0x0082, t01=0x0108}
0x0cc0e…0cc3a               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE "INVALID MESSAGE" «, t00=0x0082, t01=0x011c}
0x0cc3a…0cc64               Head {h00=0x0026, h01=0x0050, text=» LDKL A5,STB LOAD STACKBASE TO A5 «, t00=0x0082, t01=0x0148}
0x0cc64…0cc94               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCI START INPUT WITH SYNC DEF «, t00=0x0082, t01=0x0172}
0x0cc94…0cc9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0012}
0x0cc9e…0cca8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x001c}
0x0cca8…0ccd0               Head {h00=0x0024, h01=0x0050, text=»*  WAIT FOR MARK HOLD TO RESYNC.«, t00=0x0083, t01=0x0026}
0x0ccd0…0ccda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x004e}
0x0ccda…0ccee               Head {h00=0x0010, h01=0x0050, text=»BRM120 EQU *«, t00=0x0083, t01=0x0058}
0x0ccee…0cd10               Head {h00=0x001e, h01=0x0050, text=» CF A5,READ READ CHARACTER«, t00=0x0083, t01=0x006c}
0x0cd10…0cd44               Head {h00=0x0030, h01=0x0050, text=» LD A1,DCSTCU ANY STATUS FROM CONTROL UNIT ?«, t00=0x0083, t01=0x008e}
0x0cd44…0cd5e               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) BRM130 YES«, t00=0x0083, t01=0x00c2}
0x0cd5e…0cd72               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0083, t01=0x00dc}
0x0cd72…0cd86               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x0083, t01=0x00f0}
0x0cd86…0cda0               Head {h00=0x0016, h01=0x0050, text=» RB(NZ) BRM120 NO «, t00=0x0083, t01=0x0104}
0x0cda0…0cdb4               Head {h00=0x0010, h01=0x0050, text=»BRM130 EQU *«, t00=0x0083, t01=0x011e}
0x0cdb4…0cdd4               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT«, t00=0x0083, t01=0x0132}
0x0cdd4…0cde4               Head {h00=0x000c, h01=0x0050, text=» RB BRM «, t00=0x0083, t01=0x0152}
0x0cde4…0cdf2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0083, t01=0x0162}
0x0cdf2…0cdfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0170}
0x0cdfc…0ce06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x017a}
0x0ce06…0ce3c               Head {h00=0x0032, h01=0x0050, text=»*  CHECK IF IT IS A POLL OR A SELECT SEQUENCE «, t00=0x0083, t01=0x0184}
0x0ce3c…0ce46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x002a}
0x0ce46…0ce5a               Head {h00=0x0010, h01=0x0050, text=»BRM200 EQU *«, t00=0x0084, t01=0x0034}
0x0ce5a…0ce6e               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0084, t01=0x0048}
0x0ce6e…0ce80               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0084, t01=0x005c}
0x0ce80…0cea4               Head {h00=0x0020, h01=0x0050, text=» CF A5,READP READ CHARACTER «, t00=0x0084, t01=0x006e}
0x0cea4…0ceb6               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A4«, t00=0x0084, t01=0x0092}
0x0ceb6…0cede               Head {h00=0x0024, h01=0x0050, text=» RB(NE) BRM120 INVALID SEQUENCE «, t00=0x0084, t01=0x00a4}
0x0cede…0ceea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x00cc}
0x0ceea…0cefc               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0084, t01=0x00d8}
0x0cefc…0cf1e               Head {h00=0x001e, h01=0x0050, text=» CC A2,1,A7 IS IT A POLL ?«, t00=0x0084, t01=0x00ea}
0x0cf1e…0cf3c               Head {h00=0x001a, h01=0x0050, text=» RF(E) BRM210 POLLING «, t00=0x0084, t01=0x010c}
0x0cf3c…0cf4e               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0084, t01=0x012a}
0x0cf4e…0cf72               Head {h00=0x0020, h01=0x0050, text=» CCR A2,A7 IS IT A SELECT ? «, t00=0x0084, t01=0x013c}
0x0cf72…0cf9a               Head {h00=0x0024, h01=0x0050, text=» RB(NE) BRM120 INVALID SEQUENCE «, t00=0x0084, t01=0x0160}
0x0cf9a…0cfae               Head {h00=0x0010, h01=0x0050, text=»BRM210 EQU *«, t00=0x0084, t01=0x0188}
0x0cfae…0cfd0               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 1:ST STA«, t00=0x0085, t01=0x000c}
0x0cfd0…0cff0               Head {h00=0x001c, h01=0x0050, text=» RB(NZ) BRM PARITY ERROR«, t00=0x0085, t01=0x002e}
0x0cff0…0d002               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0085, t01=0x004e}
0x0d002…0d016               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=0 «, t00=0x0085, t01=0x0060}
0x0d016…0d038               Head {h00=0x001e, h01=0x0050, text=» CF A5,READP READ 2:ND STA«, t00=0x0085, t01=0x0074}
0x0d038…0d04a               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A4«, t00=0x0085, t01=0x0096}
0x0d04a…0d072               Head {h00=0x0024, h01=0x0050, text=» RB(NE) BRM120 INVALID SEQUENCE «, t00=0x0085, t01=0x00a8}
0x0d072…0d07e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x00d0}
0x0d07e…0d09c               Head {h00=0x001a, h01=0x0050, text=» CF A5,READP READ ENQ «, t00=0x0085, t01=0x00dc}
0x0d09c…0d0b0               Head {h00=0x0010, h01=0x0050, text=» SUK A2,ENQ «, t00=0x0085, t01=0x00fa}
0x0d0b0…0d0d8               Head {h00=0x0024, h01=0x0050, text=» RB(NE) BRM120 INVALID SEQUENCE «, t00=0x0085, t01=0x010e}
0x0d0d8…0d0e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0136}
0x0d0e2…0d0ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0140}
0x0d0ec…0d114               Head {h00=0x0024, h01=0x0050, text=»*  YES SEQUENCE OK - HALT INPUT «, t00=0x0085, t01=0x014a}
0x0d114…0d11e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0172}
0x0d11e…0d134               Head {h00=0x0012, h01=0x0050, text=» CF A5,CHALTI «, t00=0x0085, t01=0x017c}
0x0d134…0d142 (134, 0, 398) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0086, t01=0x0004}
0x0d142…0d14c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0012}
0x0d14c…0d156               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x001c}
0x0d156…0d18a               Head {h00=0x0030, h01=0x0050, text=»*  CHECK IF IT IS A SELECT OR A POLL ADDRESS«, t00=0x0086, t01=0x0026}
0x0d18a…0d194               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x005a}
0x0d194…0d1a6               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0086, t01=0x0064}
0x0d1a6…0d1ca               Head {h00=0x0020, h01=0x0050, text=» ST A1,CACK LOAD ACK-COUNTER«, t00=0x0086, t01=0x0076}
0x0d1ca…0d1dc               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x0086, t01=0x009a}
0x0d1dc…0d1ee               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x0086, t01=0x00ac}
0x0d1ee…0d20e               Head {h00=0x001c, h01=0x0050, text=» RF(Z) SELECT SELECTING «, t00=0x0086, t01=0x00be}
0x0d20e…0d218               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00de}
0x0d218…0d222               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x00e8}
0x0d222…0d234               Head {h00=0x000e, h01=0x0050, text=»*  POLLING«, t00=0x0086, t01=0x00f2}
0x0d234…0d23e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0104}
0x0d23e…0d250               Head {h00=0x000e, h01=0x0050, text=» CWK A4,GP«, t00=0x0086, t01=0x010e}
0x0d250…0d272               Head {h00=0x001e, h01=0x0050, text=» RF(E) GPOLL GENERAL POLL «, t00=0x0086, t01=0x0120}
0x0d272…0d2ac               Head {h00=0x0036, h01=0x0050, text=» CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) «, t00=0x0086, t01=0x0142}
0x0d2ac…0d2bc               Head {h00=0x000c, h01=0x0050, text=»    =10 «, t00=0x0086, t01=0x017c}
0x0d2bc…0d2c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x018c}
0x0d2c6…0d2d4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0087, t01=0x0008}
0x0d2d4…0d2de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0016}
0x0d2de…0d2e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0020}
0x0d2e8…0d312               Head {h00=0x0026, h01=0x0050, text=»* SPECIFIC POLL HAS BEEN RECEIVED «, t00=0x0087, t01=0x002a}
0x0d312…0d31c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0054}
0x0d31c…0d326               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x005e}
0x0d326…0d342               Head {h00=0x0018, h01=0x0050, text=» IFF STARVI+SPECP=0 «, t00=0x0087, t01=0x0068}
0x0d342…0d356               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0087, t01=0x0084}
0x0d356…0d37a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) POL100 ACK EXPECTED «, t00=0x0087, t01=0x0098}
0x0d37a…0d3a8               Head {h00=0x002a, h01=0x0050, text=» LDR A6,A3 LOAD DWT ADDRESS IN A6 =10 «, t00=0x0087, t01=0x00bc}
0x0d3a8…0d3e4               Head {h00=0x0038, h01=0x0050, text=» RF(Z) POL150 REQ. DEV. NOT CONNECTED, SEND EOT =10 «, t00=0x0087, t01=0x00ea}
0x0d3e4…0d408               Head {h00=0x0020, h01=0x0050, text=» CF A5,CPTIM CHECK POLLTIMER«, t00=0x0087, t01=0x0126}
0x0d408…0d41e               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x0087, t01=0x014a}
0x0d41e…0d440               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x0087, t01=0x0160}
0x0d440…0d452               Head {h00=0x000e, h01=0x0050, text=» ANK A1,7 «, t00=0x0087, t01=0x0182}
0x0d452…0d478 (136, 0, 398) Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL120 PENDING STATUS «, t00=0x0088, t01=0x0004}
0x0d478…0d484               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x002a}
0x0d484…0d4a0               Head {h00=0x0018, h01=0x0050, text=» IFF STARVI+SPECP=0 «, t00=0x0088, t01=0x0036}
0x0d4a0…0d4b8               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0088, t01=0x0052}
0x0d4b8…0d4d8               Head {h00=0x001c, h01=0x0050, text=» RF(N) POL150 NO REQUEST«, t00=0x0088, t01=0x006a}
0x0d4d8…0d4fa               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTOR,A6 GET ORDER «, t00=0x0088, t01=0x008a}
0x0d4fa…0d524               Head {h00=0x0026, h01=0x0050, text=» ANK A1,/FF MASK AWAY OPTION PART «, t00=0x0088, t01=0x00ac}
0x0d524…0d536               Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x0088, t01=0x00d6}
0x0d536…0d55a               Head {h00=0x0020, h01=0x0050, text=» RF(Z) POL170 WRITE REQUEST «, t00=0x0088, t01=0x00e8}
0x0d55a…0d566               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0088, t01=0x010c}
0x0d566…0d582               Head {h00=0x0018, h01=0x0050, text=» RF POL150 SEND EOT «, t00=0x0088, t01=0x0118}
0x0d582…0d590               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0088, t01=0x0134}
0x0d590…0d59a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0142}
0x0d59a…0d5a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x014c}
0x0d5a4…0d5cc               Head {h00=0x0024, h01=0x0050, text=»* GENERAL POLL HAS BEEN RECEIVED«, t00=0x0088, t01=0x0156}
0x0d5cc…0d5d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x017e}
0x0d5d6…0d5e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0188}
0x0d5e0…0d5f4 (137, 0, 400) Head {h00=0x0010, h01=0x0050, text=»GPOLL EQU * «, t00=0x0089, t01=0x0004}
0x0d5f4…0d608               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0089, t01=0x0018}
0x0d608…0d62e               Head {h00=0x0022, h01=0x0050, text=» RF(Z) POL110 ACK NOT EXPECTED«, t00=0x0089, t01=0x002c}
0x0d62e…0d63e               Head {h00=0x000c, h01=0x0050, text=»    =11 «, t00=0x0089, t01=0x0052}
0x0d63e…0d652               Head {h00=0x0010, h01=0x0050, text=»POL100 EQU *«, t00=0x0089, t01=0x0062}
0x0d652…0d680               Head {h00=0x002a, h01=0x0050, text=» CF A5,HPTIM KILL PROCEDURE TIMER =11 «, t00=0x0089, t01=0x0076}
0x0d680…0d69e               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x0089, t01=0x00a4}
0x0d69e…0d6c8               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x0089, t01=0x00c2}
0x0d6c8…0d6ea               Head {h00=0x001e, h01=0x0050, text=» ABL BRM WAIT FOR RESPONSE«, t00=0x0089, t01=0x00ec}
0x0d6ea…0d700               Head {h00=0x0012, h01=0x0050, text=»POL110 EQU *  «, t00=0x0089, t01=0x010e}
0x0d700…0d726               Head {h00=0x0022, h01=0x0050, text=» CF A5,CPTIM CHECK POLL TIMER «, t00=0x0089, t01=0x0124}
0x0d726…0d73c               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x0089, t01=0x014a}
0x0d73c…0d752               Head {h00=0x0012, h01=0x0050, text=» LD A6,DCSTQ  «, t00=0x0089, t01=0x0160}
0x0d752…0d77c               Head {h00=0x0026, h01=0x0050, text=» RF(Z) POL140 NO STATUS TO BE SENT«, t00=0x0089, t01=0x0176}
0x0d77c…0d7a2               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTOPE GET DWT ADDRESS«, t00=0x008a, t01=0x0010}
0x0d7a2…0d7b6               Head {h00=0x0010, h01=0x0050, text=»POL120 EQU *«, t00=0x008a, t01=0x0036}
0x0d7b6…0d7d6               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRSTA SEND STATUS«, t00=0x008a, t01=0x004a}
0x0d7d6…0d800               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x008a, t01=0x006a}
0x0d800…0d824               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x008a, t01=0x0094}
0x0d824…0d830               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x00b8}
0x0d830…0d846               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=1 «, t00=0x008a, t01=0x00c4}
0x0d846…0d858               Head {h00=0x000e, h01=0x0050, text=» RF POL140«, t00=0x008a, t01=0x00da}
0x0d858…0d864               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008a, t01=0x00ec}
0x0d864…0d878               Head {h00=0x0010, h01=0x0050, text=»POL130 EQU *«, t00=0x008a, t01=0x00f8}
0x0d878…0d888               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x008a, t01=0x010c}
0x0d888…0d89c               Head {h00=0x0010, h01=0x0050, text=»POL140 EQU *«, t00=0x008a, t01=0x011c}
0x0d89c…0d8b0               Head {h00=0x0010, h01=0x0050, text=» LD A6,DCWRQ«, t00=0x008a, t01=0x0130}
0x0d8b0…0d8d6               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) POL160 WRITE ON QUEUE «, t00=0x008a, t01=0x0144}
0x0d8d6…0d8ea               Head {h00=0x0010, h01=0x0050, text=»POL150 EQU *«, t00=0x008a, t01=0x016a}
0x0d8ea…0d908               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x008a, t01=0x017e}
0x0d908…0d91a               Head {h00=0x000e, h01=0x0050, text=» RB POL130«, t00=0x008b, t01=0x000c}
0x0d91a…0d92e               Head {h00=0x0010, h01=0x0050, text=»POL160 EQU *«, t00=0x008b, t01=0x001e}
0x0d92e…0d954               Head {h00=0x0022, h01=0x0050, text=» SUK A6,DWTOPN GET DWT ADDRESS«, t00=0x008b, t01=0x0032}
0x0d954…0d968               Head {h00=0x0010, h01=0x0050, text=»POL170 EQU *«, t00=0x008b, t01=0x0058}
0x0d968…0d990               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x008b, t01=0x006c}
0x0d990…0d9a6               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) POL180«, t00=0x008b, t01=0x0094}
0x0d9a6…0d9bc               Head {h00=0x0012, h01=0x0050, text=» CF A15,REMOVW«, t00=0x008b, t01=0x00aa}
0x0d9bc…0d9ce               Head {h00=0x000e, h01=0x0050, text=» RB POL150«, t00=0x008b, t01=0x00c0}
0x0d9ce…0d9e2               Head {h00=0x0010, h01=0x0050, text=»POL180 EQU *«, t00=0x008b, t01=0x00d2}
0x0d9e2…0da06               Head {h00=0x0020, h01=0x0050, text=» ST A8,FECB SAVE ECB ADDRESS«, t00=0x008b, t01=0x00e6}
0x0da06…0da24               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x008b, t01=0x010a}
0x0da24…0da3a               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x008b, t01=0x0128}
0x0da3a…0da62               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,MMUBUF MMU WORK BUFFER «, t00=0x008b, t01=0x013e}
0x0da62…0da7a               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBBA,A8 «, t00=0x008b, t01=0x0166}
0x0da7a…0daac               Head {h00=0x002e, h01=0x0050, text=» CF A15,DC:MOT MOVE DATA FROM USER BUFFER «, t00=0x008b, t01=0x017e}
0x0daac…0dab8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x0020}
0x0dab8…0dae2               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x008c, t01=0x002c}
0x0dae2…0db04               Head {h00=0x001e, h01=0x0050, text=» LD A3,ECBRL,A8 GET LENGTH«, t00=0x008c, t01=0x0056}
0x0db04…0db18               Head {h00=0x0010, h01=0x0050, text=»POL190 EQU *«, t00=0x008c, t01=0x0078}
0x0db18…0db42               Head {h00=0x0026, h01=0x0050, text=» ST A4,FECBBA SAVE BUFFER ADDRESS «, t00=0x008c, t01=0x008c}
0x0db42…0db52               Head {h00=0x000c, h01=0x0050, text=»   . =15«, t00=0x008c, t01=0x00b6}
0x0db52…0db74               Head {h00=0x001e, h01=0x0050, text=» ST A3,FECBRL SAVE LENGTH «, t00=0x008c, t01=0x00c6}
0x0db74…0db98               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x008c, t01=0x00e8}
0x0db98…0dbac               Head {h00=0x0010, h01=0x0050, text=»POL200 EQU *«, t00=0x008c, t01=0x010c}
0x0dbac…0dbce               Head {h00=0x001e, h01=0x0050, text=» CM XETX RESET 'ETX SENT' «, t00=0x008c, t01=0x0120}
0x0dbce…0dbde               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x008c, t01=0x0142}
0x0dbde…0dc02               Head {h00=0x0020, h01=0x0050, text=» CF A5,TRTEXT SEND ONE BLOCK«, t00=0x008c, t01=0x0152}
0x0dc02…0dc2c               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x008c, t01=0x0176}
0x0dc2c…0dc50               Head {h00=0x0020, h01=0x0050, text=» IM XACK SET 'ACK EXPECTED' «, t00=0x008d, t01=0x0010}
0x0dc50…0dc62               Head {h00=0x000e, h01=0x0050, text=» RB POL130«, t00=0x008d, t01=0x0034}
0x0dc62…0dc70               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008d, t01=0x0046}
0x0dc70…0dc7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0054}
0x0dc7a…0dc84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x005e}
0x0dc84…0dca8               Head {h00=0x0020, h01=0x0050, text=»*  SELECT HAS BEEN RECEIVED «, t00=0x008d, t01=0x0068}
0x0dca8…0dcb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x008c}
0x0dcb2…0dcc6               Head {h00=0x0010, h01=0x0050, text=»SELECT EQU *«, t00=0x008d, t01=0x0096}
0x0dcc6…0dcdc               Head {h00=0x0012, h01=0x0050, text=» CF A5,FINTES «, t00=0x008d, t01=0x00aa}
0x0dcdc…0dcfc               Head {h00=0x001c, h01=0x0050, text=» LDR A6,A3 GET DWT-ADDR «, t00=0x008d, t01=0x00c0}
0x0dcfc…0dd12               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SEL100«, t00=0x008d, t01=0x00e0}
0x0dd12…0dd28               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x008d, t01=0x00f6}
0x0dd28…0dd4e               Head {h00=0x0022, h01=0x0050, text=» LD A6,DTEDDT,A7 GET DDT-ADDR «, t00=0x008d, t01=0x010c}
0x0dd4e…0dd64               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SEL100«, t00=0x008d, t01=0x0132}
0x0dd64…0dd70               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0148}
0x0dd70…0dd94               Head {h00=0x0020, h01=0x0050, text=» LDKL A6,DTETAB DTETAB ADRR «, t00=0x008d, t01=0x0154}
0x0dd94…0dda8               Head {h00=0x0010, h01=0x0050, text=»SEL100 EQU *«, t00=0x008d, t01=0x0178}
0x0dda8…0ddbc               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x008d, t01=0x018c}
0x0ddbc…0dde6               Head {h00=0x0026, h01=0x0050, text=» RB(NZ) POL100 ERROR. ACK EXPECTED«, t00=0x008e, t01=0x0010}
0x0dde6…0ddfc               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x008e, t01=0x003a}
0x0ddfc…0de1e               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x008e, t01=0x0050}
0x0de1e…0de30               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x008e, t01=0x0072}
0x0de30…0de42               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x008e, t01=0x0084}
0x0de42…0de6a               Head {h00=0x0024, h01=0x0050, text=» RF(Z) SEL120 NO PENDING STATUS «, t00=0x008e, t01=0x0096}
0x0de6a…0de88               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRRVI SEND RVI «, t00=0x008e, t01=0x00be}
0x0de88…0de94               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x00dc}
0x0de94…0deaa               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=1 «, t00=0x008e, t01=0x00e8}
0x0deaa…0debc               Head {h00=0x000e, h01=0x0050, text=» RF SEL120«, t00=0x008e, t01=0x00fe}
0x0debc…0dec8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x0110}
0x0dec8…0dedc               Head {h00=0x0010, h01=0x0050, text=»SEL110 EQU *«, t00=0x008e, t01=0x011c}
0x0dedc…0deec               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x008e, t01=0x0130}
0x0deec…0df00               Head {h00=0x0010, h01=0x0050, text=»SEL120 EQU *«, t00=0x008e, t01=0x0140}
0x0df00…0df0e               Head {h00=0x000a, h01=0x0050, text=»    =2«, t00=0x008e, t01=0x0154}
0x0df0e…0df28               Head {h00=0x0016, h01=0x0050, text=» IFT STARVI=1  =2 «, t00=0x008e, t01=0x0162}
0x0df28…0df50               Head {h00=0x0024, h01=0x0050, text=» ANK A3,/A WACK SENT OR DB ? =2 «, t00=0x008e, t01=0x017c}
0x0df50…0df6e               Head {h00=0x001a, h01=0x0050, text=» RF(NZ) SEL140 YES =2 «, t00=0x008f, t01=0x0014}
0x0df6e…0df7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x0032}
0x0df7a…0df88               Head {h00=0x000a, h01=0x0050, text=»    =2«, t00=0x008f, t01=0x003e}
0x0df88…0df9e               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x008f, t01=0x004c}
0x0df9e…0dfc6               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) SEL150 BUFFER AVAILABLE «, t00=0x008f, t01=0x0062}
0x0dfc6…0dfdc               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x008f, t01=0x008a}
0x0dfdc…0e008               Head {h00=0x0028, h01=0x0050, text=» LDK A1,CSSRBY BUFFER NOT AVAILABLE «, t00=0x008f, t01=0x00a0}
0x0e008…0e030               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x008f, t01=0x00cc}
0x0e030…0e03c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x00f4}
0x0e03c…0e050               Head {h00=0x0010, h01=0x0050, text=»SEL140 EQU *«, t00=0x008f, t01=0x0100}
0x0e050…0e05e               Head {h00=0x000a, h01=0x0050, text=»    =2«, t00=0x008f, t01=0x0114}
0x0e05e…0e078               Head {h00=0x0016, h01=0x0050, text=» IFF NOWACK=1  =2 «, t00=0x008f, t01=0x0122}
0x0e078…0e098               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRWACK SEND WACK «, t00=0x008f, t01=0x013c}
0x0e098…0e0a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x015c}
0x0e0a4…0e0b6               Head {h00=0x000e, h01=0x0050, text=» RB SEL110«, t00=0x008f, t01=0x0168}
0x0e0b6…0e0ca               Head {h00=0x0010, h01=0x0050, text=»SEL150 EQU *«, t00=0x008f, t01=0x017a}
0x0e0ca…0e0fa               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x008f, t01=0x018e}
0x0e0fa…0e10c               Head {h00=0x000e, h01=0x0050, text=» ADK A1,6 «, t00=0x0090, t01=0x002e}
0x0e10c…0e120               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBLST«, t00=0x0090, t01=0x0040}
0x0e120…0e140               Head {h00=0x001c, h01=0x0050, text=» CF A5,TRACK SEND ACK,0 «, t00=0x0090, t01=0x0054}
0x0e140…0e152               Head {h00=0x000e, h01=0x0050, text=» RB SEL110«, t00=0x0090, t01=0x0074}
0x0e152…0e160               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0090, t01=0x0086}
0x0e160…0e16a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0094}
0x0e16a…0e174               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x009e}
0x0e174…0e194               Head {h00=0x001c, h01=0x0050, text=»* EOT HAS BEEN RECEIVED «, t00=0x0090, t01=0x00a8}
0x0e194…0e19e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00c8}
0x0e19e…0e1a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00d2}
0x0e1a8…0e1bc               Head {h00=0x0010, h01=0x0050, text=»EOT100 EQU *«, t00=0x0090, t01=0x00dc}
0x0e1bc…0e1e6               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x0090, t01=0x00f0}
0x0e1e6…0e1fa               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0090, t01=0x011a}
0x0e1fa…0e21c               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x0090, t01=0x012e}
0x0e21c…0e228               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0090, t01=0x0150}
0x0e228…0e23c               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0090, t01=0x015c}
0x0e23c…0e266               Head {h00=0x0026, h01=0x0050, text=» RF(Z) EOT120 ACK IS NOT EXPECTED «, t00=0x0090, t01=0x0170}
0x0e266…0e28c               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0091, t01=0x000a}
0x0e28c…0e2b0               Head {h00=0x0020, h01=0x0050, text=» RF(Z) EOT110 NO ONE WRITING«, t00=0x0091, t01=0x0030}
0x0e2b0…0e2ca               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x0091, t01=0x0054}
0x0e2ca…0e2f6               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0091, t01=0x006e}
0x0e2f6…0e30a               Head {h00=0x0010, h01=0x0050, text=»EOT110 EQU *«, t00=0x0091, t01=0x009a}
0x0e30a…0e330               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x0091, t01=0x00ae}
0x0e330…0e344               Head {h00=0x0010, h01=0x0050, text=»EOT120 EQU *«, t00=0x0091, t01=0x00d4}
0x0e344…0e366               Head {h00=0x001e, h01=0x0050, text=» CM XSEL RESET 'SELECTED' «, t00=0x0091, t01=0x00e8}
0x0e366…0e376               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0091, t01=0x010a}
0x0e376…0e384               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0091, t01=0x011a}
0x0e384…0e38e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0128}
0x0e38e…0e398               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0132}
0x0e398…0e3b8               Head {h00=0x001c, h01=0x0050, text=»* STX HAS BEEN RECEIVED «, t00=0x0091, t01=0x013c}
0x0e3b8…0e3c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x015c}
0x0e3c2…0e3cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0166}
0x0e3cc…0e3e0               Head {h00=0x0010, h01=0x0050, text=»STX100 EQU *«, t00=0x0091, t01=0x0170}
0x0e3e0…0e3f4               Head {h00=0x0010, h01=0x0050, text=» CF A5,HPTIM«, t00=0x0091, t01=0x0184}
0x0e3f4…0e40a               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x0092, t01=0x0008}
0x0e40a…0e42e               Head {h00=0x0020, h01=0x0050, text=» ABL BRM120 INVALID SEQENCE «, t00=0x0092, t01=0x001e}
0x0e42e…0e442               Head {h00=0x0010, h01=0x0050, text=»STX110 EQU *«, t00=0x0092, t01=0x0042}
0x0e442…0e44e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0092, t01=0x0056}
0x0e44e…0e462               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSEL «, t00=0x0092, t01=0x0062}
0x0e462…0e484               Head {h00=0x001e, h01=0x0050, text=» RF(Z) STX150 NOT SELECTED«, t00=0x0092, t01=0x0076}
0x0e484…0e49a               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0092, t01=0x0098}
0x0e49a…0e4b0               Head {h00=0x0012, h01=0x0050, text=» IFF STTSTS=1 «, t00=0x0092, t01=0x00ae}
0x0e4b0…0e4da               Head {h00=0x0026, h01=0x0050, text=» ABL(Z) BRM120 NO BUFFER AVAILABLE«, t00=0x0092, t01=0x00c4}
0x0e4da…0e4e6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0092, t01=0x00ee}
0x0e4e6…0e4fc               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x0092, t01=0x00fa}
0x0e4fc…0e512               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) STX120«, t00=0x0092, t01=0x0110}
0x0e512…0e51c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0126}
0x0e51c…0e53a               Head {h00=0x001a, h01=0x0050, text=»* NO BUFFER AVAILABLE «, t00=0x0092, t01=0x0130}
0x0e53a…0e544               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x014e}
0x0e544…0e55a               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSRBY«, t00=0x0092, t01=0x0158}
0x0e55a…0e582               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x0092, t01=0x016e}
0x0e582…0e596               Head {h00=0x0010, h01=0x0050, text=» ABL BRM120 «, t00=0x0093, t01=0x0008}
0x0e596…0e5a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x001c}
0x0e5a2…0e5b6               Head {h00=0x0010, h01=0x0050, text=»STX120 EQU *«, t00=0x0093, t01=0x0028}
0x0e5b6…0e5d8               Head {h00=0x001e, h01=0x0050, text=» CF A5,RDMESS READ MESSAGE«, t00=0x0093, t01=0x003c}
0x0e5d8…0e5ee               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x0093, t01=0x005e}
0x0e5ee…0e5f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0074}
0x0e5f8…0e602               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x007e}
0x0e602…0e624               Head {h00=0x001e, h01=0x0050, text=»*  COUNT MESSAGES RECEIVED«, t00=0x0093, t01=0x0088}
0x0e624…0e62e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00aa}
0x0e62e…0e644               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSRBL«, t00=0x0093, t01=0x00b4}
0x0e644…0e65a               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x0093, t01=0x00ca}
0x0e65a…0e666               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0093, t01=0x00e0}
0x0e666…0e678               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0093, t01=0x00ec}
0x0e678…0e69a               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) STX170 MESSAGE OK «, t00=0x0093, t01=0x00fe}
0x0e69a…0e6ae               Head {h00=0x0010, h01=0x0050, text=»STX130 EQU *«, t00=0x0093, t01=0x0120}
0x0e6ae…0e6da               Head {h00=0x0028, h01=0x0050, text=» CM XSTA INDICATE 'INVALID MESSAGE' «, t00=0x0093, t01=0x0134}
0x0e6da…0e6ee               Head {h00=0x0010, h01=0x0050, text=»STX140 EQU *«, t00=0x0093, t01=0x0160}
0x0e6ee…0e70c               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRNAK SEND NAK «, t00=0x0093, t01=0x0174}
0x0e70c…0e71c (148, 0, 400) Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x0094, t01=0x0004}
0x0e71c…0e730               Head {h00=0x0010, h01=0x0050, text=»STX150 EQU *«, t00=0x0094, t01=0x0014}
0x0e730…0e744               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0094, t01=0x0028}
0x0e744…0e758               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x0094, t01=0x003c}
0x0e758…0e782               Head {h00=0x0026, h01=0x0050, text=» RF(Z) STX160 ACK IS NOT EXPECTED «, t00=0x0094, t01=0x0050}
0x0e782…0e798               Head {h00=0x0012, h01=0x0050, text=» LD A1,DCRBUF «, t00=0x0094, t01=0x007a}
0x0e798…0e7c2               Head {h00=0x0026, h01=0x0050, text=» RF(Z) STX160 NO BUFFER AVAILABLE «, t00=0x0094, t01=0x0090}
0x0e7c2…0e7e8               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x0094, t01=0x00ba}
0x0e7e8…0e81c               Head {h00=0x0030, h01=0x0050, text=» ABL(Z) BRM120 NO ONE WRITING. RESYNCHRONIZE«, t00=0x0094, t01=0x00e0}
0x0e81c…0e838               Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A6 GET STA «, t00=0x0094, t01=0x0114}
0x0e838…0e868               Head {h00=0x002c, h01=0x0050, text=» CF A5,PRREC PREPARE FOR TEXT RECEPTION «, t00=0x0094, t01=0x0130}
0x0e868…0e882               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x0094, t01=0x0160}
0x0e882…0e8ae               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x0094, t01=0x017a}
0x0e8ae…0e8cc               Head {h00=0x001a, h01=0x0050, text=» CM CACK PRESET ACK-1 «, t00=0x0095, t01=0x0016}
0x0e8cc…0e8f0               Head {h00=0x0020, h01=0x0050, text=» RB STX120 READ THE MESSAGE «, t00=0x0095, t01=0x0034}
0x0e8f0…0e8fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0095, t01=0x0058}
0x0e8fc…0e928               Head {h00=0x0028, h01=0x0050, text=»STX160 CF A5,READ READ ONE CHARACTER«, t00=0x0095, t01=0x0064}
0x0e928…0e94a               Head {h00=0x001e, h01=0x0050, text=» CWK A2,ENQPAR IS IT ENQ ?«, t00=0x0095, t01=0x0090}
0x0e94a…0e976               Head {h00=0x0028, h01=0x0050, text=» RB(Z) STX140 FORWARD ABORT SEQUENCE«, t00=0x0095, t01=0x00b2}
0x0e976…0e988               Head {h00=0x000e, h01=0x0050, text=» RB EOT120«, t00=0x0095, t01=0x00de}
0x0e988…0e99c               Head {h00=0x0010, h01=0x0050, text=»STX170 EQU *«, t00=0x0095, t01=0x00f0}
0x0e99c…0e9c0               Head {h00=0x0020, h01=0x0050, text=» IM XSTA INDICATE MESSAGE OK«, t00=0x0095, t01=0x0104}
0x0e9c0…0e9e8               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x0095, t01=0x0128}
0x0e9e8…0e9fa               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0095, t01=0x0150}
0x0e9fa…0ea0e               Head {h00=0x0010, h01=0x0050, text=» CW A4,FBLST«, t00=0x0095, t01=0x0162}
0x0ea0e…0ea34               Head {h00=0x0022, h01=0x0050, text=» RF(NE) STX180 NOT FIRST BLOCK«, t00=0x0095, t01=0x0176}
0x0ea34…0ea48               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x0096, t01=0x000c}
0x0ea48…0ea5c               Head {h00=0x0010, h01=0x0050, text=» LDK A1,ESC «, t00=0x0096, t01=0x0020}
0x0ea5c…0ea6e               Head {h00=0x000e, h01=0x0050, text=» CCR A1,A4«, t00=0x0096, t01=0x0034}
0x0ea6e…0ea92               Head {h00=0x0020, h01=0x0050, text=» RB(NE) STX130 ESC NOT FOUND«, t00=0x0096, t01=0x0046}
0x0ea92…0eab6               Head {h00=0x0020, h01=0x0050, text=» LC A1,1,A4 GET COMMAND CODE«, t00=0x0096, t01=0x006a}
0x0eab6…0eacc               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RDBCOM«, t00=0x0096, t01=0x008e}
0x0eacc…0eaf8               Head {h00=0x0028, h01=0x0050, text=» RF(Z) RDBUF READ MODIFIED RECEIVED «, t00=0x0096, t01=0x00a4}
0x0eaf8…0eb16               Head {h00=0x001a, h01=0x0050, text=» SUK A1,RDMCOM-RDBCOM «, t00=0x0096, t01=0x00d0}
0x0eb16…0eb40               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RDMOD READ BUFFER RECEIVED «, t00=0x0096, t01=0x00ee}
0x0eb40…0eb4c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0096, t01=0x0118}
0x0eb4c…0eb60               Head {h00=0x0010, h01=0x0050, text=»STX180 EQU *«, t00=0x0096, t01=0x0124}
0x0eb60…0eb72               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0096, t01=0x0138}
0x0eb72…0eb90               Head {h00=0x001a, h01=0x0050, text=» RF(Z) STX280 SEND ACK«, t00=0x0096, t01=0x014a}
0x0eb90…0ebb4               Head {h00=0x0020, h01=0x0050, text=» LD A6,FDWTIN GET INPUT DWT «, t00=0x0096, t01=0x0168}
0x0ebb4…0ebca               Head {h00=0x0012, h01=0x0050, text=» IFT MESPAS=1 «, t00=0x0096, t01=0x018c}
0x0ebca…0ebe0               Head {h00=0x0012, h01=0x0050, text=» CF A15,MESDWT«, t00=0x0097, t01=0x0012}
0x0ebe0…0ebec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0097, t01=0x0028}
0x0ebec…0ec0e               Head {h00=0x001e, h01=0x0050, text=» CWR A7,A6 IS IT DTETAB ? «, t00=0x0097, t01=0x0034}
0x0ec0e…0ec2c               Head {h00=0x001a, h01=0x0050, text=» RF(E) STX280 SEND ACK«, t00=0x0097, t01=0x0056}
0x0ec2c…0ec4a               Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTSTA,A6 . =14«, t00=0x0097, t01=0x0074}
0x0ec4a…0ec7a               Head {h00=0x002c, h01=0x0050, text=» RF(Z) STX280 TERMINAL DISCONNECTED =14 «, t00=0x0097, t01=0x0092}
0x0ec7a…0ec8a               Head {h00=0x000c, h01=0x0050, text=» CM FBAX«, t00=0x0097, t01=0x00c2}
0x0ec8a…0ecb8               Head {h00=0x002a, h01=0x0050, text=» CF A15,GRBUF ALLOCATE RECEIVE BUFFER «, t00=0x0097, t01=0x00d2}
0x0ecb8…0ecca               Head {h00=0x000e, h01=0x0050, text=» ADK A4,6 «, t00=0x0097, t01=0x0100}
0x0ecca…0ecde               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x0097, t01=0x0112}
0x0ecde…0ecfe               Head {h00=0x001c, h01=0x0050, text=» LDR* A2,A6 GET ADDRESS «, t00=0x0097, t01=0x0126}
0x0ecfe…0ed2e               Head {h00=0x002c, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE IT TO EBCDIC«, t00=0x0097, t01=0x0146}
0x0ed2e…0ed56               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF IS THERE A BUFFER «, t00=0x0097, t01=0x0176}
0x0ed56…0ed6e               Head {h00=0x0014, h01=0x0050, text=» RF(Z) STX200 NO«, t00=0x0098, t01=0x000e}
0x0ed6e…0ed92               Head {h00=0x0020, h01=0x0050, text=» ST A2,+4,A1 STORE THE ADDR «, t00=0x0098, t01=0x0026}
0x0ed92…0eda6               Head {h00=0x0010, h01=0x0050, text=»STX200 EQU *«, t00=0x0098, t01=0x004a}
0x0eda6…0edb2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0098, t01=0x005e}
0x0edb2…0edd8               Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY REQUEST ? «, t00=0x0098, t01=0x006a}
0x0edd8…0edf0               Head {h00=0x0014, h01=0x0050, text=» RF(N) STX220 NO«, t00=0x0098, t01=0x0090}
0x0edf0…0ee12               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x0098, t01=0x00a8}
0x0ee12…0ee28               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x0098, t01=0x00ca}
0x0ee28…0ee52               Head {h00=0x0026, h01=0x0050, text=» RF(Z) STX210 ANY MESSAGE ORDER ? «, t00=0x0098, t01=0x00e0}
0x0ee52…0ee5e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0098, t01=0x010a}
0x0ee5e…0ee82               Head {h00=0x0020, h01=0x0050, text=» CWK A2,RECEIVE A RECEIVE ? «, t00=0x0098, t01=0x0116}
0x0ee82…0ee9c               Head {h00=0x0016, h01=0x0050, text=» RF(NE) STX220 NO «, t00=0x0098, t01=0x013a}
0x0ee9c…0eeb0               Head {h00=0x0010, h01=0x0050, text=»STX210 EQU *«, t00=0x0098, t01=0x0154}
0x0eeb0…0eec0               Head {h00=0x000c, h01=0x0050, text=»    =12 «, t00=0x0098, t01=0x0168}
0x0eec0…0eee8               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0098, t01=0x0178}
0x0eee8…0ef08               Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A4 GET LENGTH «, t00=0x0099, t01=0x0010}
0x0ef08…0ef36               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x0099, t01=0x0030}
0x0ef36…0ef68               Head {h00=0x002e, h01=0x0050, text=» LD A1,DWTLAD,A6 SYMBOLIC DTE ADDRESS =12 «, t00=0x0099, t01=0x005e}
0x0ef68…0ef94               Head {h00=0x0028, h01=0x0050, text=» LD A2,-2,A4 NETWORK SUB-ADDRESS =12«, t00=0x0099, t01=0x0090}
0x0ef94…0efc8               Head {h00=0x0030, h01=0x0050, text=» CF A15,GETSSA GET SYMBOLIC SUB ADDRESS =12 «, t00=0x0099, t01=0x00bc}
0x0efc8…0eff8               Head {h00=0x002c, h01=0x0050, text=» ST A1,ECBCW2,A8 AND SAVE IT IN ECB =12 «, t00=0x0099, t01=0x00f0}
0x0eff8…0f020               Head {h00=0x0024, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE =12 «, t00=0x0099, t01=0x0120}
0x0f020…0f04a               Head {h00=0x0026, h01=0x0050, text=» CF A15,CTIME STOP REQUEST TIMING «, t00=0x0099, t01=0x0148}
0x0f04a…0f064               Head {h00=0x0016, h01=0x0050, text=» IFT REMTIM=1  =9 «, t00=0x0099, t01=0x0172}
0x0f064…0f092               Head {h00=0x002a, h01=0x0050, text=» ST A2,ECBCW1,A8 STORE REMAINING TIME «, t00=0x0099, t01=0x018c}
0x0f092…0f0a4               Head {h00=0x000e, h01=0x0050, text=» XIF   =9 «, t00=0x009a, t01=0x002a}
0x0f0a4…0f0b8               Head {h00=0x0010, h01=0x0050, text=»STX220 EQU *«, t00=0x009a, t01=0x003c}
0x0f0b8…0f0ce               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x009a, t01=0x0050}
0x0f0ce…0f0ee               Head {h00=0x001c, h01=0x0050, text=» LC A2,+2,A4 GET WCC/CCC«, t00=0x009a, t01=0x0066}
0x0f0ee…0f102               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x009a, t01=0x0086}
0x0f102…0f11c               Head {h00=0x0016, h01=0x0050, text=» LC A2,TEBCDIC,A2 «, t00=0x009a, t01=0x009a}
0x0f11c…0f12e               Head {h00=0x000e, h01=0x0050, text=» ANK A2,8 «, t00=0x009a, t01=0x00b4}
0x0f12e…0f144               Head {h00=0x0012, h01=0x0050, text=» RF(Z) STX230 «, t00=0x009a, t01=0x00c6}
0x0f144…0f15c               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x009a, t01=0x00dc}
0x0f15c…0f16e               Head {h00=0x000e, h01=0x0050, text=» ORK A2,/A«, t00=0x009a, t01=0x00f4}
0x0f16e…0f186               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTST,A6 «, t00=0x009a, t01=0x0106}
0x0f186…0f19a               Head {h00=0x0010, h01=0x0050, text=»STX230 EQU *«, t00=0x009a, t01=0x011e}
0x0f19a…0f1a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x0132}
0x0f1a6…0f1cc               Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 ANY REQUEST ? «, t00=0x009a, t01=0x013e}
0x0f1cc…0f1e6               Head {h00=0x0016, h01=0x0050, text=» RF(NN) STX240 YES«, t00=0x009a, t01=0x0164}
0x0f1e6…0f208               Head {h00=0x001e, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER «, t00=0x009a, t01=0x017e}
0x0f208…0f21a               Head {h00=0x000e, h01=0x0050, text=» RF STX270«, t00=0x009b, t01=0x0010}
0x0f21a…0f22e               Head {h00=0x0010, h01=0x0050, text=»STX240 EQU *«, t00=0x009b, t01=0x0022}
0x0f22e…0f250               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x009b, t01=0x0036}
0x0f250…0f278               Head {h00=0x0024, h01=0x0050, text=» CWK A2,RECEIVE RECEIVE ORDER ? «, t00=0x009b, t01=0x0058}
0x0f278…0f292               Head {h00=0x0016, h01=0x0050, text=» RF(NE) STX260 NO «, t00=0x009b, t01=0x0080}
0x0f292…0f2a2               Head {h00=0x000c, h01=0x0050, text=»    =12 «, t00=0x009b, t01=0x009a}
0x0f2a2…0f2c6               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x009b, t01=0x00aa}
0x0f2c6…0f2f4               Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTIPC,A6 ANY QUEUED MESSAGES ?«, t00=0x009b, t01=0x00ce}
0x0f2f4…0f30c               Head {h00=0x0014, h01=0x0050, text=» RF(Z) STX250 NO«, t00=0x009b, t01=0x00fc}
0x0f30c…0f328               Head {h00=0x0018, h01=0x0050, text=» ORKL A1,R:DATA YES «, t00=0x009b, t01=0x0114}
0x0f328…0f33c               Head {h00=0x0010, h01=0x0050, text=»STX250 EQU *«, t00=0x009b, t01=0x0130}
0x0f33c…0f366               Head {h00=0x0026, h01=0x0050, text=» CF A15,DC:MIN MOVE TO USER BUFFER«, t00=0x009b, t01=0x0144}
0x0f366…0f378               Head {h00=0x000e, h01=0x0050, text=» RF STX270«, t00=0x009b, t01=0x016e}
0x0f378…0f38c               Head {h00=0x0010, h01=0x0050, text=»STX260 EQU *«, t00=0x009b, t01=0x0180}
0x0f38c…0f3ae (156, 0, 400) Head {h00=0x001e, h01=0x0050, text=» CF A5,QRBUF QUEUE BUFFER «, t00=0x009c, t01=0x0004}
0x0f3ae…0f3c4               Head {h00=0x0012, h01=0x0050, text=» IFT EM3270=1 «, t00=0x009c, t01=0x0026}
0x0f3c4…0f3e6               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x009c, t01=0x003c}
0x0f3e6…0f412               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) STX270 NOT ANY MESSAGE ORDER«, t00=0x009c, t01=0x005e}
0x0f412…0f43a               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x009c, t01=0x008a}
0x0f43a…0f446               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x00b2}
0x0f446…0f45a               Head {h00=0x0010, h01=0x0050, text=»STX270 EQU *«, t00=0x009c, t01=0x00be}
0x0f45a…0f470               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x009c, t01=0x00d2}
0x0f470…0f492               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x009c, t01=0x00e8}
0x0f492…0f4ac               Head {h00=0x0016, h01=0x0050, text=» ANK A1,8 MASK A1 «, t00=0x009c, t01=0x010a}
0x0f4ac…0f4c2               Head {h00=0x0012, h01=0x0050, text=» RF(Z) STX280 «, t00=0x009c, t01=0x0124}
0x0f4c2…0f4e0               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRWACK SEN WACK«, t00=0x009c, t01=0x013a}
0x0f4e0…0f4f2               Head {h00=0x000e, h01=0x0050, text=» RF STX290«, t00=0x009c, t01=0x0158}
0x0f4f2…0f4fe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x016a}
0x0f4fe…0f512               Head {h00=0x0010, h01=0x0050, text=»STX280 EQU *«, t00=0x009c, t01=0x0176}
0x0f512…0f530               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRACK SEND ACK «, t00=0x009c, t01=0x018a}
0x0f530…0f544               Head {h00=0x0010, h01=0x0050, text=»STX290 EQU *«, t00=0x009d, t01=0x0018}
0x0f544…0f554               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x009d, t01=0x002c}
0x0f554…0f562               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009d, t01=0x003c}
0x0f562…0f56c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x004a}
0x0f56c…0f576               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0054}
0x0f576…0f5a6               Head {h00=0x002c, h01=0x0050, text=»* READ MODIFIED OR READ BUFFER RECEIVED «, t00=0x009d, t01=0x005e}
0x0f5a6…0f5b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x008e}
0x0f5b0…0f5ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0098}
0x0f5ba…0f5ce               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=0 «, t00=0x009d, t01=0x00a2}
0x0f5ce…0f5f6               Head {h00=0x0024, h01=0x0050, text=»RDBUF EQU * READ BUFFER COMMAND «, t00=0x009d, t01=0x00b6}
0x0f5f6…0f60a               Head {h00=0x0010, h01=0x0050, text=»RDMOD EQU * «, t00=0x009d, t01=0x00de}
0x0f60a…0f630               Head {h00=0x0022, h01=0x0050, text=» CM XSEL RESET SELECT EXPECTED«, t00=0x009d, t01=0x00f2}
0x0f630…0f668               Head {h00=0x0034, h01=0x0050, text=» LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL«, t00=0x009d, t01=0x0118}
0x0f668…0f690               Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTBUF,A6 BUFFER ADDRESS «, t00=0x009d, t01=0x0150}
0x0f690…0f6b8               Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 SDJUST BUFFER ADDRESS «, t00=0x009d, t01=0x0178}
0x0f6b8…0f6de               Head {h00=0x0022, h01=0x0050, text=» LDKL A3,1922 REQUESTED LENGTH«, t00=0x009e, t01=0x0010}
0x0f6de…0f704               Head {h00=0x0022, h01=0x0050, text=» IM XRB SET READ BUFFER SWITCH«, t00=0x009e, t01=0x0036}
0x0f704…0f716               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x009e, t01=0x005c}
0x0f716…0f728               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x009e, t01=0x006e}
0x0f728…0f752               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x009e, t01=0x0080}
0x0f752…0f766               Head {h00=0x0010, h01=0x0050, text=» ABL POL190 «, t00=0x009e, t01=0x00aa}
0x0f766…0f772               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009e, t01=0x00be}
0x0f772…0f780               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009e, t01=0x00ca}
0x0f780…0f78a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00d8}
0x0f78a…0f794               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00e2}
0x0f794…0f7b4               Head {h00=0x001c, h01=0x0050, text=»* ENQ HAS BEEN RECEIVED «, t00=0x009e, t01=0x00ec}
0x0f7b4…0f7be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x010c}
0x0f7be…0f7c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0116}
0x0f7c8…0f7dc               Head {h00=0x0010, h01=0x0050, text=»ENQ100 EQU *«, t00=0x009e, t01=0x0120}
0x0f7dc…0f806               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x009e, t01=0x0134}
0x0f806…0f81a               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x009e, t01=0x015e}
0x0f81a…0f84a               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) NAK110 RETRANSMISSION OF MESSAGE«, t00=0x009e, t01=0x0172}
0x0f84a…0f85e               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x009f, t01=0x0012}
0x0f85e…0f884               Head {h00=0x0022, h01=0x0050, text=» RF(Z) ENQ110 IN CONTROL STATE«, t00=0x009f, t01=0x0026}
0x0f884…0f8b6               Head {h00=0x002e, h01=0x0050, text=» CF A5,TRREP REPEAT LAST CONTROL SEQUENCE «, t00=0x009f, t01=0x004c}
0x0f8b6…0f8ca               Head {h00=0x0010, h01=0x0050, text=»ENQ110 EQU *«, t00=0x009f, t01=0x007e}
0x0f8ca…0f8da               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x009f, t01=0x0092}
0x0f8da…0f8e8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009f, t01=0x00a2}
0x0f8e8…0f8f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00b0}
0x0f8f2…0f8fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00ba}
0x0f8fc…0f91c               Head {h00=0x001c, h01=0x0050, text=»* NAK HAS BEEN RECEIVED «, t00=0x009f, t01=0x00c4}
0x0f91c…0f926               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00e4}
0x0f926…0f930               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00ee}
0x0f930…0f944               Head {h00=0x0010, h01=0x0050, text=»NAK100 EQU *«, t00=0x009f, t01=0x00f8}
0x0f944…0f96e               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x009f, t01=0x010c}
0x0f96e…0f982               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x009f, t01=0x0136}
0x0f982…0f9a6               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) NAK110 ACK EXPECTED «, t00=0x009f, t01=0x014a}
0x0f9a6…0f9ba               Head {h00=0x0010, h01=0x0050, text=» OR A1,XSEL «, t00=0x009f, t01=0x016e}
0x0f9ba…0f9e0               Head {h00=0x0022, h01=0x0050, text=» RB(Z) ENQ110 IN CONTROL STATE«, t00=0x009f, t01=0x0182}
0x0f9e0…0f9f2               Head {h00=0x000e, h01=0x0050, text=» RF DLE160«, t00=0x00a0, t01=0x0018}
0x0f9f2…0fa06               Head {h00=0x0010, h01=0x0050, text=»NAK110 EQU *«, t00=0x00a0, t01=0x002a}
0x0fa06…0fa2c               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET WRITING DWT «, t00=0x00a0, t01=0x003e}
0x0fa2c…0fa42               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00a0, t01=0x0064}
0x0fa42…0fa56               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x00a0, t01=0x007a}
0x0fa56…0fa8a               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) POL120 STATUS HAS BEEN TRANSMITTED «, t00=0x00a0, t01=0x008e}
0x0fa8a…0fa96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a0, t01=0x00c2}
0x0fa96…0faca               Head {h00=0x0030, h01=0x0050, text=» LD A1,FBLST GET START POINT FOR LAST BLOCK «, t00=0x00a0, t01=0x00ce}
0x0faca…0faf4               Head {h00=0x0026, h01=0x0050, text=» SU A1,FECBBA COMPUTE BUFFER INDEX«, t00=0x00a0, t01=0x0102}
0x0faf4…0fb08               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x00a0, t01=0x012c}
0x0fb08…0fb1e               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00a0, t01=0x0140}
0x0fb1e…0fb28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0156}
0x0fb28…0fb32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0160}
0x0fb32…0fb5a               Head {h00=0x0024, h01=0x0050, text=»*  COUNT MESSAGES RETRANSMITTED «, t00=0x00a0, t01=0x016a}
0x0fb5a…0fb64 (161, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0004}
0x0fb64…0fb7a               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSTRT«, t00=0x00a1, t01=0x000e}
0x0fb7a…0fb90               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x00a1, t01=0x0024}
0x0fb90…0fb9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x003a}
0x0fb9c…0fbb0               Head {h00=0x0010, h01=0x0050, text=» ABL POL200 «, t00=0x00a1, t01=0x0046}
0x0fbb0…0fbbe               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a1, t01=0x005a}
0x0fbbe…0fbc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0068}
0x0fbc8…0fbd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0072}
0x0fbd2…0fbf2               Head {h00=0x001c, h01=0x0050, text=»* DLE HAS BEEN RECEIVED «, t00=0x00a1, t01=0x007c}
0x0fbf2…0fbfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x009c}
0x0fbfc…0fc06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00a6}
0x0fc06…0fc1a               Head {h00=0x0010, h01=0x0050, text=»DLE100 EQU *«, t00=0x00a1, t01=0x00b0}
0x0fc1a…0fc44               Head {h00=0x0026, h01=0x0050, text=» CF A5,HPTIM STOP PROCEDURE TIMER «, t00=0x00a1, t01=0x00c4}
0x0fc44…0fc58               Head {h00=0x0010, h01=0x0050, text=» LD A1,XACK «, t00=0x00a1, t01=0x00ee}
0x0fc58…0fc6e               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DLE110«, t00=0x00a1, t01=0x0102}
0x0fc6e…0fc84               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00a1, t01=0x0118}
0x0fc84…0fc98               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x00a1, t01=0x012e}
0x0fc98…0fcac               Head {h00=0x0010, h01=0x0050, text=» CWK A2,STX «, t00=0x00a1, t01=0x0142}
0x0fcac…0fcda               Head {h00=0x002a, h01=0x0050, text=» ABL(Z) STX110 YES - TRANSPARENT TEXT «, t00=0x00a1, t01=0x0156}
0x0fcda…0fce6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x0184}
0x0fce6…0fcf8               Head {h00=0x000e, h01=0x0050, text=» RB ENQ110«, t00=0x00a1, t01=0x0190}
0x0fcf8…0fd0c               Head {h00=0x0010, h01=0x0050, text=»DLE110 EQU *«, t00=0x00a2, t01=0x0012}
0x0fd0c…0fd36               Head {h00=0x0026, h01=0x0050, text=» CF A5,READ READ SECOND CHARACTER «, t00=0x00a2, t01=0x0026}
0x0fd36…0fd5a               Head {h00=0x0020, h01=0x0050, text=» CWK A2,ACKPAR IS IT ACK 0 ?«, t00=0x00a2, t01=0x0050}
0x0fd5a…0fd70               Head {h00=0x0012, h01=0x0050, text=» RF(NE) DLE130«, t00=0x00a2, t01=0x0074}
0x0fd70…0fd7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x008a}
0x0fd7a…0fd94               Head {h00=0x0016, h01=0x0050, text=»* ACK , 0 RECEIVED«, t00=0x00a2, t01=0x0094}
0x0fd94…0fd9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00ae}
0x0fd9e…0fdc0               Head {h00=0x001e, h01=0x0050, text=» LD A1,CACK GET ACKCOUNTER«, t00=0x00a2, t01=0x00b8}
0x0fdc0…0fde4               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DLE140 ACK,0 EXPECTED«, t00=0x00a2, t01=0x00da}
0x0fde4…0fdf8               Head {h00=0x0010, h01=0x0050, text=»DLE120 EQU *«, t00=0x00a2, t01=0x00fe}
0x0fdf8…0fe16               Head {h00=0x001a, h01=0x0050, text=» CF A5,TRENQ SEND ENQ «, t00=0x00a2, t01=0x0112}
0x0fe16…0fe40               Head {h00=0x0026, h01=0x0050, text=» CF A5,SPTIM START PROCEDURE TIMER«, t00=0x00a2, t01=0x0130}
0x0fe40…0fe52               Head {h00=0x000e, h01=0x0050, text=» RB ENQ110«, t00=0x00a2, t01=0x015a}
0x0fe52…0fe66               Head {h00=0x0010, h01=0x0050, text=»DLE130 EQU *«, t00=0x00a2, t01=0x016c}
0x0fe66…0fe7a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ACK1«, t00=0x00a2, t01=0x0180}
0x0fe7a…0fe90 (163, 0, 400) Head {h00=0x0012, h01=0x0050, text=» RF(NE) DLE180«, t00=0x00a3, t01=0x0004}
0x0fe90…0fe9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x001a}
0x0fe9a…0feb4               Head {h00=0x0016, h01=0x0050, text=»* ACK , 1 RECEIVED«, t00=0x00a3, t01=0x0024}
0x0feb4…0febe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x003e}
0x0febe…0fee2               Head {h00=0x0020, h01=0x0050, text=» LD A1,CACK GET ACK COUNTER «, t00=0x00a3, t01=0x0048}
0x0fee2…0ff0a               Head {h00=0x0024, h01=0x0050, text=» RB(Z) DLE120 ACK,1 NOT EXPECTED«, t00=0x00a3, t01=0x006c}
0x0ff0a…0ff1e               Head {h00=0x0010, h01=0x0050, text=»DLE140 EQU *«, t00=0x00a3, t01=0x0094}
0x0ff1e…0ff32               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x00a3, t01=0x00a8}
0x0ff32…0ff54               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DLE170 ETX NOT SENT«, t00=0x00a3, t01=0x00bc}
0x0ff54…0ff62               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a3, t01=0x00de}
0x0ff62…0ff6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00ec}
0x0ff6c…0ff9c               Head {h00=0x002c, h01=0x0050, text=»* ACK HAS BEEN RECEIVED TO AN ETX BLOCK «, t00=0x00a3, t01=0x00f6}
0x0ff9c…0ffa6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0126}
0x0ffa6…0ffc0               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x00a3, t01=0x0130}
0x0ffc0…0ffd4               Head {h00=0x0010, h01=0x0050, text=»DLE150 EQU *«, t00=0x00a3, t01=0x014a}
0x0ffd4…0ffea               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00a3, t01=0x015e}
0x0ffea…0fffe               Head {h00=0x0010, h01=0x0050, text=» LD A2,XSTA «, t00=0x00a3, t01=0x0174}
0x0fffe…10030               Head {h00=0x002e, h01=0x0050, text=» RF(NZ) DLE200 STATUS HAS BEEN TRANSMITTED«, t00=0x00a3, t01=0x0188}
0x10030…1003c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a4, t01=0x002a}
0x1003c…10068               Head {h00=0x0028, h01=0x0050, text=» CF A5,CWRITE COMPLETE WRITE REQUEST«, t00=0x00a4, t01=0x0036}
0x10068…1007c               Head {h00=0x0010, h01=0x0050, text=»DLE160 EQU *«, t00=0x00a4, t01=0x0062}
0x1007c…1009a               Head {h00=0x001a, h01=0x0050, text=» CF A5,TREOT SEND EOT «, t00=0x00a4, t01=0x0076}
0x1009a…100ae               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00a4, t01=0x0094}
0x100ae…100d0               Head {h00=0x001e, h01=0x0050, text=» CM XRB RESET READ BUFFER «, t00=0x00a4, t01=0x00a8}
0x100d0…100dc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a4, t01=0x00ca}
0x100dc…100ee               Head {h00=0x000e, h01=0x0050, text=» RB ENQ110«, t00=0x00a4, t01=0x00d6}
0x100ee…10102               Head {h00=0x0010, h01=0x0050, text=»DLE170 EQU *«, t00=0x00a4, t01=0x00e8}
0x10102…10114               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x00a4, t01=0x00fc}
0x10114…1013e               Head {h00=0x0026, h01=0x0050, text=» XRS A1,CACK INCREMENT ACK COUNTER«, t00=0x00a4, t01=0x010e}
0x1013e…10152               Head {h00=0x0010, h01=0x0050, text=» ABL POL200 «, t00=0x00a4, t01=0x0138}
0x10152…10166               Head {h00=0x0010, h01=0x0050, text=»DLE180 EQU *«, t00=0x00a4, t01=0x014c}
0x10166…10188               Head {h00=0x001e, h01=0x0050, text=» CWK A2,RVIPAR IS IT RVI ?«, t00=0x00a4, t01=0x0160}
0x10188…101b4               Head {h00=0x0028, h01=0x0050, text=» RB(NE) DLE120 INVALID DLE SEQUENCE «, t00=0x00a4, t01=0x0182}
0x101b4…101da               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'EXPECTING ACK'«, t00=0x00a5, t01=0x001e}
0x101da…101ee               Head {h00=0x0010, h01=0x0050, text=» LD A1,XETX «, t00=0x00a5, t01=0x0044}
0x101ee…10216               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) DLE190 ETX HAS BEEN SENT«, t00=0x00a5, t01=0x0058}
0x10216…10230               Head {h00=0x0016, h01=0x0050, text=» LDK A1,2 SET RC=2«, t00=0x00a5, t01=0x0080}
0x10230…10242               Head {h00=0x000e, h01=0x0050, text=» RB DLE150«, t00=0x00a5, t01=0x009a}
0x10242…10256               Head {h00=0x0010, h01=0x0050, text=»DLE190 EQU *«, t00=0x00a5, t01=0x00ac}
0x10256…10270               Head {h00=0x0016, h01=0x0050, text=» LDK A1,0 SET RC=0«, t00=0x00a5, t01=0x00c0}
0x10270…10282               Head {h00=0x000e, h01=0x0050, text=» RB DLE150«, t00=0x00a5, t01=0x00da}
0x10282…10290               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a5, t01=0x00ec}
0x10290…102a6               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00a5, t01=0x00fa}
0x102a6…102b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0110}
0x102b0…102ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x011a}
0x102ba…102e0               Head {h00=0x0022, h01=0x0050, text=»* STATUS HAS BEEN TRANSMITTED «, t00=0x00a5, t01=0x0124}
0x102e0…102ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x014a}
0x102ea…102f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0154}
0x102f4…10308               Head {h00=0x0010, h01=0x0050, text=»DLE200 EQU *«, t00=0x00a5, t01=0x015e}
0x10308…1032e               Head {h00=0x0022, h01=0x0050, text=» LD A6,FDWTUT GET DWT ADDRESS «, t00=0x00a5, t01=0x0172}
0x1032e…1035e               Head {h00=0x002c, h01=0x0050, text=» CF A15,REMOVS REMOVE FROM STATUS QUEUE «, t00=0x00a6, t01=0x0008}
0x1035e…10382               Head {h00=0x0020, h01=0x0050, text=» CM XSTA CLEAR 'STATUS SENT'«, t00=0x00a6, t01=0x0038}
0x10382…103a8               Head {h00=0x0022, h01=0x0050, text=» CM XACK CLEAR 'ACK EXPECTED' «, t00=0x00a6, t01=0x005c}
0x103a8…103ca               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 GET STATUS«, t00=0x00a6, t01=0x0082}
0x103ca…103dc               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x00a6, t01=0x00a4}
0x103dc…103f8               Head {h00=0x0018, h01=0x0050, text=» RB(Z) DLE160 NOT DE«, t00=0x00a6, t01=0x00b6}
0x103f8…1040e               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8000«, t00=0x00a6, t01=0x00d2}
0x1040e…10434               Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 CLEAR STATUS «, t00=0x00a6, t01=0x00e8}
0x10434…10446               Head {h00=0x000e, h01=0x0050, text=» RB DLE160«, t00=0x00a6, t01=0x010e}
0x10446…10452               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a6, t01=0x0120}
0x10452…10460               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a6, t01=0x012c}
0x10460…1046a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x013a}
0x1046a…104aa               Head {h00=0x003c, h01=0x0050, text=»* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2«, t00=0x00a6, t01=0x0144}
0x104aa…104b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0184}
0x104b4…104e0               Head {h00=0x0028, h01=0x0050, text=»* CALLING SEQUENCE: CF A5,FINTER(S) «, t00=0x00a6, t01=0x018e}
0x104e0…10500               Head {h00=0x001c, h01=0x0050, text=»* A2=SUBTERMINAL ADDRESS«, t00=0x00a7, t01=0x002a}
0x10500…10516               Head {h00=0x0012, h01=0x0050, text=»* A4 DESTROYED«, t00=0x00a7, t01=0x004a}
0x10516…1053c               Head {h00=0x0022, h01=0x0050, text=»* A3#0: DWT TO FOUND TERMINAL «, t00=0x00a7, t01=0x0060}
0x1053c…10546               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0086}
0x10546…1058c               Head {h00=0x0042, h01=0x0050, text=»* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES «, t00=0x00a7, t01=0x0090}
0x1058c…105ba               Head {h00=0x002a, h01=0x0050, text=»* ENTRY: FINTES - CHECK SELECT ADDRESS«, t00=0x00a7, t01=0x00d6}
0x105ba…105ea               Head {h00=0x002c, h01=0x0050, text=»*  FINTEP - CHECK SPECIFIC POLL ADDRESS «, t00=0x00a7, t01=0x0104}
0x105ea…105f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0134}
0x105f4…105fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x013e}
0x105fe…10608               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0148}
0x10608…1061c               Head {h00=0x0010, h01=0x0050, text=»FINTES EQU *«, t00=0x00a7, t01=0x0152}
0x1061c…10630               Head {h00=0x0010, h01=0x0050, text=» IFT MSV1=1 «, t00=0x00a7, t01=0x0166}
0x10630…10642               Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x00a7, t01=0x017a}
0x10642…10654               Head {h00=0x000e, h01=0x0050, text=» RF FINT05«, t00=0x00a7, t01=0x018c}
0x10654…10660               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a8, t01=0x000e}
0x10660…10674               Head {h00=0x0010, h01=0x0050, text=»FINTEP EQU *«, t00=0x00a8, t01=0x001a}
0x10674…10690               Head {h00=0x0018, h01=0x0050, text=» LDK A4,1 RIGTH BYTE«, t00=0x00a8, t01=0x002e}
0x10690…106a4               Head {h00=0x0010, h01=0x0050, text=»FINT05 EQU *«, t00=0x00a8, t01=0x004a}
0x106a4…106ca               Head {h00=0x0022, h01=0x0050, text=» LD A3,DTEDWT,A7 GET FIRST DWT«, t00=0x00a8, t01=0x005e}
0x106ca…106de               Head {h00=0x0010, h01=0x0050, text=»FINT10 EQU *«, t00=0x00a8, t01=0x0084}
0x106de…106fe               Head {h00=0x001c, h01=0x0050, text=» RF(Z) FINT20 END QUEUE «, t00=0x00a8, t01=0x0098}
0x106fe…10710               Head {h00=0x000e, h01=0x0050, text=» ADR A3,A4«, t00=0x00a8, t01=0x00b8}
0x10710…10736               Head {h00=0x0022, h01=0x0050, text=» CCR A2,A3 THIS SUB-ADDRESS ? «, t00=0x00a8, t01=0x00ca}
0x10736…10750               Head {h00=0x0016, h01=0x0050, text=» RF(E) FINT20 YES «, t00=0x00a8, t01=0x00f0}
0x10750…10762               Head {h00=0x000e, h01=0x0050, text=» SUR A3,A4«, t00=0x00a8, t01=0x010a}
0x10762…10788               Head {h00=0x0022, h01=0x0050, text=» LD A3,DWTCHN,A3 GET NEXT DWT «, t00=0x00a8, t01=0x011c}
0x10788…1079a               Head {h00=0x000e, h01=0x0050, text=» RB FINT10«, t00=0x00a8, t01=0x0142}
0x1079a…107ae               Head {h00=0x0010, h01=0x0050, text=»FINT20 EQU *«, t00=0x00a8, t01=0x0154}
0x107ae…107c4               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFFE«, t00=0x00a8, t01=0x0168}
0x107c4…107d4               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00a8, t01=0x017e}
0x107d4…107e2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a8, t01=0x018e}
0x107e2…107ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x000c}
0x107ec…107f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0016}
0x107f6…1081a               Head {h00=0x0020, h01=0x0050, text=»* PREPARE FOR TEXT RECEPTION«, t00=0x00a9, t01=0x0020}
0x1081a…10824               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0044}
0x10824…1082e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x004e}
0x1082e…10842               Head {h00=0x0010, h01=0x0050, text=»PRREC EQU * «, t00=0x00a9, t01=0x0058}
0x10842…10862               Head {h00=0x001c, h01=0x0050, text=» IM XSEL SET 'SELECTED' «, t00=0x00a9, t01=0x006c}
0x10862…10886               Head {h00=0x0020, h01=0x0050, text=» CM FBAX RESET BUFFER INDEX «, t00=0x00a9, t01=0x008c}
0x10886…1089a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00a9, t01=0x00b0}
0x1089a…108cc               Head {h00=0x002e, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC «, t00=0x00a9, t01=0x00c4}
0x108cc…108d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a9, t01=0x00f6}
0x108d8…10900               Head {h00=0x0024, h01=0x0050, text=» ST A2,+4,A1 SAVE STA IN BUFFER «, t00=0x00a9, t01=0x0102}
0x10900…10910               Head {h00=0x000c, h01=0x0050, text=» IM XSTA«, t00=0x00a9, t01=0x012a}
0x10910…10936               Head {h00=0x0022, h01=0x0050, text=» ST A6,FDWTIN STORE INPUT DWT «, t00=0x00a9, t01=0x013a}
0x10936…10946               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00a9, t01=0x0160}
0x10946…10954               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a9, t01=0x0170}
0x10954…1095e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x017e}
0x1095e…10968               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0188}
0x10968…109a2 (170, 0, 400) Head {h00=0x0036, h01=0x0050, text=»* CHECK IF THERE IS A SEND REQUEST TO BE COMPLETED«, t00=0x00aa, t01=0x0004}
0x109a2…109ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x003e}
0x109ac…109ce               Head {h00=0x001e, h01=0x0050, text=»* A1 CONTAINS RETURN CODE «, t00=0x00aa, t01=0x0048}
0x109ce…109d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x006a}
0x109d8…109e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0074}
0x109e2…109fe               Head {h00=0x0018, h01=0x0050, text=»CWRITE LD A6,FDWTUT «, t00=0x00aa, t01=0x007e}
0x109fe…10a26               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CWR900 NO WRITE GOING ON «, t00=0x00aa, t01=0x009a}
0x10a26…10a3e               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x00aa, t01=0x00c2}
0x10a3e…10a5e               Head {h00=0x001c, h01=0x0050, text=» RF(N) CWR900 NO REQUEST«, t00=0x00aa, t01=0x00da}
0x10a5e…10a80               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x00aa, t01=0x00fa}
0x10a80…10aaa               Head {h00=0x0026, h01=0x0050, text=» ANK A2,/FF MASK AWAY OPTION PART «, t00=0x00aa, t01=0x011c}
0x10aaa…10abc               Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x00aa, t01=0x0146}
0x10abc…10ae4               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CWR900 NOT SEND REQUEST «, t00=0x00aa, t01=0x0158}
0x10ae4…10b1c               Head {h00=0x0034, h01=0x0050, text=» LD A2,DWTIPC,A6 ANY RECEIVED BUFFERS ON QUEU ? «, t00=0x00aa, t01=0x0180}
0x10b1c…10b34               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CWR110 NO«, t00=0x00ab, t01=0x0028}
0x10b34…10b68               Head {h00=0x0030, h01=0x0050, text=» ORKL A1,R:DATA ACCEPTED AND DATA AVAILABLE «, t00=0x00ab, t01=0x0040}
0x10b68…10b7c               Head {h00=0x0010, h01=0x0050, text=»CWR110 EQU *«, t00=0x00ab, t01=0x0074}
0x10b7c…10b94               Head {h00=0x0014, h01=0x0050, text=» LD A8,DWTECB,A6«, t00=0x00ab, t01=0x0088}
0x10b94…10bb4               Head {h00=0x001c, h01=0x0050, text=» CF A15,CTIME STOP TIMER«, t00=0x00ab, t01=0x00a0}
0x10bb4…10bce               Head {h00=0x0016, h01=0x0050, text=» IFT REMTIM=1  =9 «, t00=0x00ab, t01=0x00c0}
0x10bce…10be6               Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW1,A8«, t00=0x00ab, t01=0x00da}
0x10be6…10bf8               Head {h00=0x000e, h01=0x0050, text=» XIF   =9 «, t00=0x00ab, t01=0x00f2}
0x10bf8…10c20               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x00ab, t01=0x0104}
0x10c20…10c34               Head {h00=0x0010, h01=0x0050, text=»CWR150 EQU *«, t00=0x00ab, t01=0x012c}
0x10c34…10c62               Head {h00=0x002a, h01=0x0050, text=» CF A15,REMOVW REMOVE FROM WRITE QUEUE«, t00=0x00ab, t01=0x0140}
0x10c62…10c76               Head {h00=0x0010, h01=0x0050, text=»CWR900 EQU *«, t00=0x00ab, t01=0x016e}
0x10c76…10c9c               Head {h00=0x0022, h01=0x0050, text=» CM XACK RESET 'ACK EXPECTED' «, t00=0x00ab, t01=0x0182}
0x10c9c…10cae               Head {h00=0x000e, h01=0x0050, text=» CM FDWTUT«, t00=0x00ac, t01=0x0018}
0x10cae…10cbe               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00ac, t01=0x002a}
0x10cbe…10ccc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ac, t01=0x003a}
0x10ccc…10cd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0048}
0x10cd6…10ce0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0052}
0x10ce0…10cfe               Head {h00=0x001a, h01=0x0050, text=»* READ ONE TEXT BLOCK «, t00=0x00ac, t01=0x005c}
0x10cfe…10d08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x007a}
0x10d08…10d28               Head {h00=0x001c, h01=0x0050, text=»* ON EXIT A3 CONTAINS : «, t00=0x00ac, t01=0x0084}
0x10d28…10d54               Head {h00=0x0028, h01=0x0050, text=»* 0 : IF CORRECT ETX BLOCK RECEIVED «, t00=0x00ac, t01=0x00a4}
0x10d54…10d8a               Head {h00=0x0032, h01=0x0050, text=»* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW«, t00=0x00ac, t01=0x00d0}
0x10d8a…10db6               Head {h00=0x0028, h01=0x0050, text=»* 2 : IF CORRECT ETB BLOCK RECEIVED «, t00=0x00ac, t01=0x0106}
0x10db6…10dc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0132}
0x10dc0…10dd4               Head {h00=0x0010, h01=0x0050, text=»RDMESS EQU *«, t00=0x00ac, t01=0x013c}
0x10dd4…10dfc               Head {h00=0x0024, h01=0x0050, text=» LD A4,DCRBUF GET BUFFER ADDRESS«, t00=0x00ac, t01=0x0150}
0x10dfc…10e1c               Head {h00=0x001c, h01=0x0050, text=» ADK A4,6 RESERVE HEADER«, t00=0x00ac, t01=0x0178}
0x10e1c…10e2e               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x00ad, t01=0x0008}
0x10e2e…10e42               Head {h00=0x0010, h01=0x0050, text=» LD A1,XSTA «, t00=0x00ad, t01=0x001a}
0x10e42…10e6a               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RDM050 LAST INPUT WAS OK«, t00=0x00ad, t01=0x002e}
0x10e6a…10e90               Head {h00=0x0022, h01=0x0050, text=» LD A1,FBLST COMPUTE NEW INDEX«, t00=0x00ad, t01=0x0056}
0x10e90…10ea2               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A4«, t00=0x00ad, t01=0x007c}
0x10ea2…10eb6               Head {h00=0x0010, h01=0x0050, text=» ST A1,FBAX «, t00=0x00ad, t01=0x008e}
0x10eb6…10eca               Head {h00=0x0010, h01=0x0050, text=»RDM050 EQU *«, t00=0x00ad, t01=0x00a2}
0x10eca…10eee               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x00ad, t01=0x00b6}
0x10eee…10f1a               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x00ad, t01=0x00da}
0x10f1a…10f2a               Head {h00=0x000c, h01=0x0050, text=» CM XSTA«, t00=0x00ad, t01=0x0106}
0x10f2a…10f46               Head {h00=0x0018, h01=0x0050, text=» SUR A8,A8 RESET LRC«, t00=0x00ad, t01=0x0116}
0x10f46…10f4e               Head {h00=0x0004, h01=0x0050, t00=0x00ad, t01=0x0132}
0x10f4e…10f64               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x00ad, t01=0x013a}
0x10f64…10f7a               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00ad, t01=0x0150}
0x10f7a…10f8e               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x00ad, t01=0x0166}
0x10f8e…10fb4               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RDM100 NOT FIRST BLOCK«, t00=0x00ad, t01=0x017a}
0x10fb4…10fc8               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x00ae, t01=0x0010}
0x10fc8…10fec               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x00ae, t01=0x0024}
0x10fec…11000               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ESC «, t00=0x00ae, t01=0x0048}
0x11000…11016               Head {h00=0x0012, h01=0x0050, text=» RF(NE) RDM110«, t00=0x00ae, t01=0x005c}
0x11016…11044               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP SKIP NEXT TWO CHARACTERS «, t00=0x00ae, t01=0x0072}
0x11044…11058               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x00ae, t01=0x00a0}
0x11058…11064               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x00b4}
0x11064…1107a               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00ae, t01=0x00c0}
0x1107a…1108e               Head {h00=0x0010, h01=0x0050, text=»RDM100 EQU *«, t00=0x00ae, t01=0x00d6}
0x1108e…110b6               Head {h00=0x0024, h01=0x0050, text=» CF A5,READP READ ONE CHARACTER «, t00=0x00ae, t01=0x00ea}
0x110b6…110da               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x00ae, t01=0x0112}
0x110da…110ee               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x00ae, t01=0x0136}
0x110ee…110fa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x014a}
0x110fa…11110               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00ae, t01=0x0156}
0x11110…1113a               Head {h00=0x0026, h01=0x0050, text=» IM TPM INDICATE TRANSPARENT TEXT «, t00=0x00ae, t01=0x016c}
0x1113a…11154               Head {h00=0x0016, h01=0x0050, text=»RDM100 CF A5,READ «, t00=0x00af, t01=0x0008}
0x11154…11174               Head {h00=0x001c, h01=0x0050, text=» CWK A2,DLE CHECK IF DLE«, t00=0x00af, t01=0x0022}
0x11174…1118e               Head {h00=0x0016, h01=0x0050, text=» RF(NE) RDM112 NO «, t00=0x00af, t01=0x0042}
0x1118e…111c2               Head {h00=0x0030, h01=0x0050, text=» CF A5,READ SKIP DLE AND READ NEXT CHARACTER«, t00=0x00af, t01=0x005c}
0x111c2…111e6               Head {h00=0x0020, h01=0x0050, text=» CWK A2,SYNEBC CHECK IF SYN «, t00=0x00af, t01=0x0090}
0x111e6…11204               Head {h00=0x001a, h01=0x0050, text=» RB(E) RDM100 SKIP SYN«, t00=0x00af, t01=0x00b4}
0x11204…11228               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x00af, t01=0x00d2}
0x11228…1124e               Head {h00=0x0022, h01=0x0050, text=» CWK A2,DLE CHECK IF 2:ND DLE «, t00=0x00af, t01=0x00f6}
0x1124e…1127c               Head {h00=0x002a, h01=0x0050, text=» RF(E) RDM115 YES - STORE DLE AS DATA «, t00=0x00af, t01=0x011c}
0x1127c…1129c               Head {h00=0x001c, h01=0x0050, text=» CWK A2,ETX CHECK IF ETX«, t00=0x00af, t01=0x014a}
0x1129c…112b6               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM130 YES «, t00=0x00af, t01=0x016a}
0x112b6…112da               Head {h00=0x0020, h01=0x0050, text=» CWK A2,ETBEBC CHECK IF ETB «, t00=0x00af, t01=0x0184}
0x112da…112f4               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM160 YES «, t00=0x00b0, t01=0x0018}
0x112f4…11314               Head {h00=0x001c, h01=0x0050, text=» CWK A2,ITB CHECK IF ITB«, t00=0x00b0, t01=0x0032}
0x11314…1132e               Head {h00=0x0016, h01=0x0050, text=» RF(E) RDM175 YES «, t00=0x00b0, t01=0x0052}
0x1132e…11352               Head {h00=0x0020, h01=0x0050, text=» CWK A2,ENQEBC CHECK IF ENQ «, t00=0x00b0, t01=0x006c}
0x11352…11374               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM140 YES SEND NAK«, t00=0x00b0, t01=0x0090}
0x11374…1137e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x00b2}
0x1137e…11388               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x00bc}
0x11388…113a2               Head {h00=0x0016, h01=0x0050, text=»* GET END OF BLOCK«, t00=0x00b0, t01=0x00c6}
0x113a2…113ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x00e0}
0x113ac…113c0               Head {h00=0x0010, h01=0x0050, text=»RDM105 EQU *«, t00=0x00b0, t01=0x00ea}
0x113c0…113d4               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x00b0, t01=0x00fe}
0x113d4…113e8               Head {h00=0x0010, h01=0x0050, text=» CWK A2,DLE «, t00=0x00b0, t01=0x0112}
0x113e8…113fe               Head {h00=0x0012, h01=0x0050, text=» RB(NE) RDM105«, t00=0x00b0, t01=0x0126}
0x113fe…11412               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x00b0, t01=0x013c}
0x11412…11426               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x00b0, t01=0x0150}
0x11426…1144e               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM110 YES - END OF BLOCK«, t00=0x00b0, t01=0x0164}
0x1144e…11464               Head {h00=0x0012, h01=0x0050, text=» CWK A2,ETBEBC«, t00=0x00b0, t01=0x018c}
0x11464…1148c               Head {h00=0x0024, h01=0x0050, text=» RB(NE) RDM105 NOT END OF BLOCK «, t00=0x00b1, t01=0x0012}
0x1148c…114a0               Head {h00=0x0010, h01=0x0050, text=»RDM110 EQU *«, t00=0x00b1, t01=0x003a}
0x114a0…114c8               Head {h00=0x0024, h01=0x0050, text=» CM TPM OUT OF TRANSPARENT TEXT «, t00=0x00b1, t01=0x004e}
0x114c8…114dc               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDCRC«, t00=0x00b1, t01=0x0076}
0x114dc…11508               Head {h00=0x0028, h01=0x0050, text=» RF RDM140 INDICATE INVALID MESSAGE «, t00=0x00b1, t01=0x008a}
0x11508…11532               Head {h00=0x0026, h01=0x0050, text=»RDM112 CF A5,CRCCAL CALCULATE CRC «, t00=0x00b1, t01=0x00b6}
0x11532…1153e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b1, t01=0x00e0}
0x1153e…11554               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00b1, t01=0x00ec}
0x11554…11568               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETX «, t00=0x00b1, t01=0x0102}
0x11568…1158a               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM130 ETX RECEIVED«, t00=0x00b1, t01=0x0116}
0x1158a…1159e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ETB «, t00=0x00b1, t01=0x0138}
0x1159e…115c0               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM160 ETB RECEIVED«, t00=0x00b1, t01=0x014c}
0x115c0…115d4               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ITB «, t00=0x00b1, t01=0x016e}
0x115d4…115f6               Head {h00=0x001e, h01=0x0050, text=» RF(E) RDM170 ITB RECEIVED«, t00=0x00b1, t01=0x0182}
0x115f6…1160a               Head {h00=0x0010, h01=0x0050, text=» CWK A2,ENQ «, t00=0x00b2, t01=0x0014}
0x1160a…11640               Head {h00=0x0032, h01=0x0050, text=» RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE «, t00=0x00b2, t01=0x0028}
0x11640…11654               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x00b2, t01=0x005e}
0x11654…1167c               Head {h00=0x0024, h01=0x0050, text=» RF(E) RDM140 MARK HOLD RECEIVED«, t00=0x00b2, t01=0x0072}
0x1167c…11690               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00b2, t01=0x009a}
0x11690…116a6               Head {h00=0x0012, h01=0x0050, text=» IFT BINTRM=1 «, t00=0x00b2, t01=0x00ae}
0x116a6…116b8               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x00b2, t01=0x00c4}
0x116b8…116ce               Head {h00=0x0012, h01=0x0050, text=» SUK A1,DC1+3 «, t00=0x00b2, t01=0x00d6}
0x116ce…116f0               Head {h00=0x001e, h01=0x0050, text=» RF(P) RDM115 NOT DC1-DC3 «, t00=0x00b2, t01=0x00ec}
0x116f0…11702               Head {h00=0x000e, h01=0x0050, text=» ADK A1,3 «, t00=0x00b2, t01=0x010e}
0x11702…11724               Head {h00=0x001e, h01=0x0050, text=» RF(N) RDM115 NOT DC1-DC3 «, t00=0x00b2, t01=0x0120}
0x11724…11736               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x00b2, t01=0x0142}
0x11736…1174c               Head {h00=0x0012, h01=0x0050, text=» SCR A1,A4  =7«, t00=0x00b2, t01=0x0154}
0x1174c…1177a               Head {h00=0x002a, h01=0x0050, text=» CF A5,READP 8-BIT CHAR GET NEXT PART «, t00=0x00b2, t01=0x016a}
0x1177a…1179e               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) RDM120 PARITY ERROR «, t00=0x00b3, t01=0x0008}
0x1179e…117b4               Head {h00=0x0012, h01=0x0050, text=» LCR A1,A4  =7«, t00=0x00b3, t01=0x002c}
0x117b4…117e2               Head {h00=0x002a, h01=0x0050, text=» SUK A2,/20 ASSEMBLE TO ONE CHARACTER «, t00=0x00b3, t01=0x0042}
0x117e2…117f8               Head {h00=0x0012, h01=0x0050, text=» ORR A2,A1  =7«, t00=0x00b3, t01=0x0070}
0x117f8…11804               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b3, t01=0x0086}
0x11804…11818               Head {h00=0x0010, h01=0x0050, text=»RDM115 EQU *«, t00=0x00b3, t01=0x0092}
0x11818…11842               Head {h00=0x0026, h01=0x0050, text=» ADK A3,0 ERROR DETECTED EARLIER ?«, t00=0x00b3, t01=0x00a6}
0x11842…11860               Head {h00=0x001a, h01=0x0050, text=» RB(NZ) RDM100 YES !!!«, t00=0x00b3, t01=0x00d0}
0x11860…11882               Head {h00=0x001e, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER«, t00=0x00b3, t01=0x00ee}
0x11882…118a6               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x00b3, t01=0x0110}
0x118a6…118ce               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x00b3, t01=0x0134}
0x118ce…118e2               Head {h00=0x0010, h01=0x0050, text=» LD A1,FBAX «, t00=0x00b3, t01=0x015c}
0x118e2…118fe               Head {h00=0x0018, h01=0x0050, text=» CWK A1,RBUFL+RBUFL «, t00=0x00b3, t01=0x0170}
0x118fe…11922               Head {h00=0x0020, h01=0x0050, text=» RB(NG) RDM100 NOT OVERFLOW «, t00=0x00b3, t01=0x018c}
0x11922…1192c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0020}
0x1192c…11946               Head {h00=0x0016, h01=0x0050, text=»* BUFFER OVERFLOW «, t00=0x00b4, t01=0x002a}
0x11946…11950               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0044}
0x11950…1197a               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE BUFFER OVERFLOW«, t00=0x00b4, t01=0x004e}
0x1197a…11990               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00b4, t01=0x0078}
0x11990…119b6               Head {h00=0x0022, h01=0x0050, text=» LDK A1,CSSRBO BUFFER OVERFLOW«, t00=0x00b4, t01=0x008e}
0x119b6…119de               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x00b4, t01=0x00b4}
0x119de…119ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b4, t01=0x00dc}
0x119ea…119fc               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x00b4, t01=0x00e8}
0x119fc…11a06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x00fa}
0x11a06…11a26               Head {h00=0x001c, h01=0x0050, text=»* PARITY ERROR DETECTED «, t00=0x00b4, t01=0x0104}
0x11a26…11a30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0124}
0x11a30…11a44               Head {h00=0x0010, h01=0x0050, text=»RDM120 EQU *«, t00=0x00b4, t01=0x012e}
0x11a44…11a5a               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00b4, t01=0x0142}
0x11a5a…11a70               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSRPE«, t00=0x00b4, t01=0x0158}
0x11a70…11a98               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x00b4, t01=0x016e}
0x11a98…11aa4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b5, t01=0x0008}
0x11aa4…11ace               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x00b5, t01=0x0014}
0x11ace…11ae2               Head {h00=0x0010, h01=0x0050, text=» SUK A2,/7F «, t00=0x00b5, t01=0x003e}
0x11ae2…11b0a               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RDM150 MARK HOLD RECEIVED«, t00=0x00b5, t01=0x0052}
0x11b0a…11b1c               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x00b5, t01=0x007a}
0x11b1c…11b26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x008c}
0x11b26…11b3c               Head {h00=0x0012, h01=0x0050, text=»* ETX RECEIVED«, t00=0x00b5, t01=0x0096}
0x11b3c…11b46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x00ac}
0x11b46…11b5a               Head {h00=0x0010, h01=0x0050, text=»RDM130 EQU *«, t00=0x00b5, t01=0x00b6}
0x11b5a…11b82               Head {h00=0x0024, h01=0x0050, text=» LD A1,DCRBUF GET BUFFER ADDRESS«, t00=0x00b5, t01=0x00ca}
0x11b82…11ba6               Head {h00=0x0020, h01=0x0050, text=» LD A2,FBAX GET BUFFER INDEX«, t00=0x00b5, t01=0x00f2}
0x11ba6…11bdc               Head {h00=0x0032, h01=0x0050, text=» ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER «, t00=0x00b5, t01=0x0116}
0x11bdc…11bf0               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00b5, t01=0x014c}
0x11bf0…11c04               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x00b5, t01=0x0160}
0x11c04…11c24               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RDM150 LRC WAS OK«, t00=0x00b5, t01=0x0174}
0x11c24…11c30 (182, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b6, t01=0x0004}
0x11c30…11c44               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00b6, t01=0x0010}
0x11c44…11c6e               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x00b6, t01=0x0024}
0x11c6e…11c8e               Head {h00=0x001c, h01=0x0050, text=» RF(E) RDM150 CRC WAS OK«, t00=0x00b6, t01=0x004e}
0x11c8e…11c9a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b6, t01=0x006e}
0x11c9a…11cae               Head {h00=0x0010, h01=0x0050, text=»RDM140 EQU *«, t00=0x00b6, t01=0x007a}
0x11cae…11cd8               Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE INVALID MESSAGE«, t00=0x00b6, t01=0x008e}
0x11cd8…11cec               Head {h00=0x0010, h01=0x0050, text=»RDM150 EQU *«, t00=0x00b6, t01=0x00b8}
0x11cec…11d0c               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI HALT INPUT«, t00=0x00b6, t01=0x00cc}
0x11d0c…11d20               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00b6, t01=0x00ec}
0x11d20…11d34               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00b6, t01=0x0100}
0x11d34…11d4a               Head {h00=0x0012, h01=0x0050, text=» ANK A2,H:PARI«, t00=0x00b6, t01=0x0114}
0x11d4a…11d60               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RDM155 «, t00=0x00b6, t01=0x012a}
0x11d60…11d7e               Head {h00=0x001a, h01=0x0050, text=» LDK A3,1 PARITY ERROR«, t00=0x00b6, t01=0x0140}
0x11d7e…11d92               Head {h00=0x0010, h01=0x0050, text=»RDM155 EQU *«, t00=0x00b6, t01=0x015e}
0x11d92…11d9e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b6, t01=0x0172}
0x11d9e…11db4               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00b6, t01=0x017e}
0x11db4…11dde (183, 0, 400) Head {h00=0x0026, h01=0x0050, text=» CWK A3,1 ERROR DETECTED EARLIER ?«, t00=0x00b7, t01=0x0004}
0x11dde…11df8               Head {h00=0x0016, h01=0x0050, text=» RF(NE) RDM158 NO «, t00=0x00b7, t01=0x002e}
0x11df8…11e20               Head {h00=0x0024, h01=0x0050, text=» CM TPM OUT OF TRANSPARENT TEXT «, t00=0x00b7, t01=0x0048}
0x11e20…11e34               Head {h00=0x0010, h01=0x0050, text=»RDM158 EQU *«, t00=0x00b7, t01=0x0070}
0x11e34…11e40               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b7, t01=0x0084}
0x11e40…11e50               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00b7, t01=0x0090}
0x11e50…11e5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x00a0}
0x11e5a…11e70               Head {h00=0x0012, h01=0x0050, text=»* ETB RECEIVED«, t00=0x00b7, t01=0x00aa}
0x11e70…11e7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x00c0}
0x11e7a…11e8e               Head {h00=0x0010, h01=0x0050, text=»RDM160 EQU *«, t00=0x00b7, t01=0x00ca}
0x11e8e…11ea0               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x00b7, t01=0x00de}
0x11ea0…11ec6               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM130 ALREADY INVALID«, t00=0x00b7, t01=0x00f0}
0x11ec6…11eec               Head {h00=0x0022, h01=0x0050, text=» LDK A3,2 INDICATE CORRECT ETB«, t00=0x00b7, t01=0x0116}
0x11eec…11efe               Head {h00=0x000e, h01=0x0050, text=» RB RDM130«, t00=0x00b7, t01=0x013c}
0x11efe…11f08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x014e}
0x11f08…11f1e               Head {h00=0x0012, h01=0x0050, text=»* ITB RECEIVED«, t00=0x00b7, t01=0x0158}
0x11f1e…11f28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x016e}
0x11f28…11f3c               Head {h00=0x0010, h01=0x0050, text=»RDM170 EQU *«, t00=0x00b7, t01=0x0178}
0x11f3c…11f50               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00b7, t01=0x018c}
0x11f50…11f64               Head {h00=0x0010, h01=0x0050, text=» CF A5,RDLRC«, t00=0x00b8, t01=0x0010}
0x11f64…11f8a               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) RDM120 LRC WAS NOT OK «, t00=0x00b8, t01=0x0024}
0x11f8a…11f96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b8, t01=0x004a}
0x11f96…11faa               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00b8, t01=0x0056}
0x11faa…11fd4               Head {h00=0x0026, h01=0x0050, text=» CF A5,RDCRC READ CRC AND CHECK IT«, t00=0x00b8, t01=0x006a}
0x11fd4…11ffa               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM120 CRC WAS NOT OK «, t00=0x00b8, t01=0x0094}
0x11ffa…12010               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00b8, t01=0x00ba}
0x12010…1203e               Head {h00=0x002a, h01=0x0050, text=»RDM175 CM TPM OUT OF TRANSPARENT TEXT «, t00=0x00b8, t01=0x00d0}
0x1203e…12066               Head {h00=0x0024, h01=0x0050, text=» CF A5,RDCRC READ AND CHECK CRC «, t00=0x00b8, t01=0x00fe}
0x12066…12076               Head {h00=0x000c, h01=0x0050, text=» IM TPM «, t00=0x00b8, t01=0x0126}
0x12076…1209c               Head {h00=0x0022, h01=0x0050, text=» RB(NE) RDM105 CRC WAS NOT OK «, t00=0x00b8, t01=0x0136}
0x1209c…120b6               Head {h00=0x0016, h01=0x0050, text=»RDM180 CF A5,READ «, t00=0x00b8, t01=0x015c}
0x120b6…120cc               Head {h00=0x0012, h01=0x0050, text=» CWK A2,SYNEBC«, t00=0x00b8, t01=0x0176}
0x120cc…120ea               Head {h00=0x001a, h01=0x0050, text=» RB(E) RDM180 SKIP SYN«, t00=0x00b8, t01=0x018c}
0x120ea…120fe               Head {h00=0x0010, h01=0x0050, text=» CWK A2,DLE «, t00=0x00b9, t01=0x001a}
0x120fe…12126               Head {h00=0x0024, h01=0x0050, text=» RB(NE) RDM105 ILLEGAL CHARACTER«, t00=0x00b9, t01=0x002e}
0x12126…1213a               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x00b9, t01=0x0056}
0x1213a…1214e               Head {h00=0x0010, h01=0x0050, text=» CWK A2,STX «, t00=0x00b9, t01=0x006a}
0x1214e…12176               Head {h00=0x0024, h01=0x0050, text=» RB(NE) RDM105 ILLEGAL CHARACTER«, t00=0x00b9, t01=0x007e}
0x12176…12182               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b9, t01=0x00a6}
0x12182…12194               Head {h00=0x000e, h01=0x0050, text=» RB RDM100«, t00=0x00b9, t01=0x00b2}
0x12194…121a2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b9, t01=0x00c4}
0x121a2…121ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x00d2}
0x121ac…121ca               Head {h00=0x001a, h01=0x0050, text=»* TRANSMIT ACK 0 OR 1 «, t00=0x00b9, t01=0x00dc}
0x121ca…121d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x00fa}
0x121d4…121ea               Head {h00=0x0012, h01=0x0050, text=»TRACK LDK A2,1«, t00=0x00b9, t01=0x0104}
0x121ea…1220c               Head {h00=0x001e, h01=0x0050, text=» LDK A3,ACK1 PRELOAD ACK1 «, t00=0x00b9, t01=0x011a}
0x1220c…12236               Head {h00=0x0026, h01=0x0050, text=» XRS A2,CACK INCREMENT ACK COUNTER«, t00=0x00b9, t01=0x013c}
0x12236…1224c               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) TRDLE «, t00=0x00b9, t01=0x0166}
0x1224c…1226a               Head {h00=0x001a, h01=0x0050, text=» LDK A3,ACK0 LOAD ACK0«, t00=0x00b9, t01=0x017c}
0x1226a…1227c               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x00ba, t01=0x000a}
0x1227c…12286               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x001c}
0x12286…1229e               Head {h00=0x0014, h01=0x0050, text=»* TRANSMIT WACK «, t00=0x00ba, t01=0x0026}
0x1229e…122a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x003e}
0x122a8…122cc               Head {h00=0x0020, h01=0x0050, text=»TRWACK LDK A3,WACK LOAD WACK«, t00=0x00ba, t01=0x0048}
0x122cc…122de               Head {h00=0x000e, h01=0x0050, text=» RF TRDLE «, t00=0x00ba, t01=0x006c}
0x122de…122e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x007e}
0x122e8…122fe               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT RVI«, t00=0x00ba, t01=0x0088}
0x122fe…12308               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x009e}
0x12308…1231e               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00ba, t01=0x00a8}
0x1231e…12340               Head {h00=0x001e, h01=0x0050, text=»TRRVI LDK A3,RVI LOAD RVI «, t00=0x00ba, t01=0x00be}
0x12340…1234c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ba, t01=0x00e0}
0x1234c…12356               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00ec}
0x12356…1236c               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT DLE«, t00=0x00ba, t01=0x00f6}
0x1236c…12376               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x010c}
0x12376…12398               Head {h00=0x001e, h01=0x0050, text=»TRDLE LDK A2,DLE LOAD DLE «, t00=0x00ba, t01=0x0116}
0x12398…123be               Head {h00=0x0022, h01=0x0050, text=» SC A2,RESEND PUT INSAVE AREA «, t00=0x00ba, t01=0x0138}
0x123be…123d6               Head {h00=0x0014, h01=0x0050, text=» SC A3,RESEND+1 «, t00=0x00ba, t01=0x015e}
0x123d6…123e8               Head {h00=0x000e, h01=0x0050, text=» RF TRREP «, t00=0x00ba, t01=0x0176}
0x123e8…123f6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ba, t01=0x0188}
0x123f6…12400               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0008}
0x12400…12416               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT NAK«, t00=0x00bb, t01=0x0012}
0x12416…12420               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0028}
0x12420…12442               Head {h00=0x001e, h01=0x0050, text=»TRNAK LDK A3,NAK LOAD NAK «, t00=0x00bb, t01=0x0032}
0x12442…12454               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x00bb, t01=0x0054}
0x12454…1245e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0066}
0x1245e…12474               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT EOT«, t00=0x00bb, t01=0x0070}
0x12474…1247e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0086}
0x1247e…124a0               Head {h00=0x001e, h01=0x0050, text=»TREOT LDK A3,EOT LOAD EOT «, t00=0x00bb, t01=0x0090}
0x124a0…124b2               Head {h00=0x000e, h01=0x0050, text=» RF TREN10«, t00=0x00bb, t01=0x00b2}
0x124b2…124bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x00c4}
0x124bc…124d2               Head {h00=0x0012, h01=0x0050, text=»* TRANSMIT ENQ«, t00=0x00bb, t01=0x00ce}
0x124d2…124dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x00e4}
0x124dc…124fe               Head {h00=0x001e, h01=0x0050, text=»TRENQ LDK A3,ENQ LOAD ENQ «, t00=0x00bb, t01=0x00ee}
0x124fe…12508               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0110}
0x12508…12534               Head {h00=0x0028, h01=0x0050, text=»TREN10 SC A3,RESEND PUT IN SAVE AREA«, t00=0x00bb, t01=0x011a}
0x12534…12548               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x00bb, t01=0x0146}
0x12548…12560               Head {h00=0x0014, h01=0x0050, text=» SC A2,RESEND+1 «, t00=0x00bb, t01=0x015a}
0x12560…12588               Head {h00=0x0024, h01=0x0050, text=»TRREP CF A5,TRSYNC START OUTPUT «, t00=0x00bb, t01=0x0172}
0x12588…125b2               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND GET FIRST CHARACTER «, t00=0x00bc, t01=0x000a}
0x125b2…125d0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00bc, t01=0x0034}
0x125d0…125fa               Head {h00=0x0026, h01=0x0050, text=» LC A2,RESEND+1 GET NEXT CHARACTER«, t00=0x00bc, t01=0x0052}
0x125fa…12618               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00bc, t01=0x007c}
0x12618…12632               Head {h00=0x0016, h01=0x0050, text=»TRRE10 LDK A2,/FF «, t00=0x00bc, t01=0x009a}
0x12632…12650               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIT05 SEND PAD«, t00=0x00bc, t01=0x00b4}
0x12650…12664               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/FF «, t00=0x00bc, t01=0x00d2}
0x12664…1267a               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRIT05 «, t00=0x00bc, t01=0x00e6}
0x1267a…1269c               Head {h00=0x001e, h01=0x0050, text=» CF A5,CHALTO HALT OUTPUT «, t00=0x00bc, t01=0x00fc}
0x1269c…126b0               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00bc, t01=0x011e}
0x126b0…126dc               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGSST LOG TRANSMITTER STATUS«, t00=0x00bc, t01=0x0132}
0x126dc…126e8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bc, t01=0x015e}
0x126e8…126f8               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00bc, t01=0x016a}
0x126f8…12706               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bc, t01=0x017a}
0x12706…12710               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0188}
0x12710…1271a (189, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0004}
0x1271a…1273c               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT ONE TEXT BLOCK «, t00=0x00bd, t01=0x000e}
0x1273c…12746               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0030}
0x12746…12750               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x003a}
0x12750…12764               Head {h00=0x0010, h01=0x0050, text=»TRTEXT EQU *«, t00=0x00bd, t01=0x0044}
0x12764…12786               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x00bd, t01=0x0058}
0x12786…1279c               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=0 «, t00=0x00bd, t01=0x007a}
0x1279c…127b0               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00bd, t01=0x0090}
0x127b0…127ce               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRIDLE SEND DLE«, t00=0x00bd, t01=0x00a4}
0x127ce…127da               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bd, t01=0x00c2}
0x127da…127ee               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x00bd, t01=0x00ce}
0x127ee…1280c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x00bd, t01=0x00e2}
0x1280c…12828               Head {h00=0x0018, h01=0x0050, text=» SUR A8,A8 RESET LRC«, t00=0x00bd, t01=0x0100}
0x12828…12850               Head {h00=0x0024, h01=0x0050, text=» LD A4,FECBBA GET BUFFER ADDRESS«, t00=0x00bd, t01=0x011c}
0x12850…12874               Head {h00=0x0020, h01=0x0050, text=» AD A4,FBAX ADD BUFFER INDEX«, t00=0x00bd, t01=0x0144}
0x12874…128a0               Head {h00=0x0028, h01=0x0050, text=» ST A4,FBLST REMEMBER START OF BLOCK«, t00=0x00bd, t01=0x0168}
0x128a0…128b0 (190, 0, 400) Head {h00=0x000c, h01=0x0050, text=»   . =15«, t00=0x00be, t01=0x0004}
0x128b0…128da               Head {h00=0x0026, h01=0x0050, text=» LDK A3,0 RESET CHARACTER COUNTER «, t00=0x00be, t01=0x0014}
0x128da…128fe               Head {h00=0x0020, h01=0x0050, text=» LD A1,FBAX GET BUFFER INDEX«, t00=0x00be, t01=0x003e}
0x128fe…12924               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) TRT100 NOT FIRST BLOCK«, t00=0x00be, t01=0x0062}
0x12924…1294a               Head {h00=0x0022, h01=0x0050, text=» LDR* A2,A7 NETWORK POLL ADDR «, t00=0x00be, t01=0x0088}
0x1294a…12968               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x00be, t01=0x00ae}
0x12968…1298e               Head {h00=0x0022, h01=0x0050, text=» LD A2,FDWTUT GET DWT-ADDRESS «, t00=0x00be, t01=0x00cc}
0x1298e…129ba               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A2 GET NETWORK SUB-ADDRESS «, t00=0x00be, t01=0x00f2}
0x129ba…129d8               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x00be, t01=0x011e}
0x129d8…129ee               Head {h00=0x0012, h01=0x0050, text=» IFT IBMCHR=1 «, t00=0x00be, t01=0x013c}
0x129ee…12a02               Head {h00=0x0010, h01=0x0050, text=» IFF RCOM=1 «, t00=0x00be, t01=0x0152}
0x12a02…12a28               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/27 SEND ENTER AS AID «, t00=0x00be, t01=0x0166}
0x12a28…12a3e               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x00be, t01=0x018c}
0x12a3e…12a64               Head {h00=0x0022, h01=0x0050, text=» LDK A2,/20 AND CURSOR ADDRESS«, t00=0x00bf, t01=0x0012}
0x12a64…12a7a               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x00bf, t01=0x0038}
0x12a7a…12a8e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x00bf, t01=0x004e}
0x12a8e…12aa4               Head {h00=0x0012, h01=0x0050, text=» CF A5,WRITEP «, t00=0x00bf, t01=0x0062}
0x12aa4…12ab0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00bf, t01=0x0078}
0x12ab0…12ac4               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00bf, t01=0x0084}
0x12ac4…12acc               Head {h00=0x0004, h01=0x0050, t00=0x00bf, t01=0x0098}
0x12acc…12af6               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x00bf, t01=0x00a0}
0x12af6…12b10               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT070 NO!!«, t00=0x00bf, t01=0x00ca}
0x12b10…12b18               Head {h00=0x0004, h01=0x0050, t00=0x00bf, t01=0x00e4}
0x12b18…12b38               Head {h00=0x001c, h01=0x0050, text=»   ******************** «, t00=0x00bf, t01=0x00ec}
0x12b38…12b5e               Head {h00=0x0022, h01=0x0050, text=» LDK A2,X'2D' AID FOR DISPLAY «, t00=0x00bf, t01=0x010c}
0x12b5e…12b7c               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND AID«, t00=0x00bf, t01=0x0132}
0x12b7c…12b84               Head {h00=0x0004, h01=0x0050, t00=0x00bf, t01=0x0150}
0x12b84…12bac               Head {h00=0x0024, h01=0x0050, text=» LD* A3,DWTCUR,A6 CURSOR ADDRESS«, t00=0x00bf, t01=0x0158}
0x12bac…12bde               Head {h00=0x002e, h01=0x0050, text=» CF A5,LINCOL SEND LINE AND COLUMN NUMBER «, t00=0x00bf, t01=0x0180}
0x12bde…12c00               Head {h00=0x001e, h01=0x0050, text=» LDK A3,5 SET BLOCK COUNT «, t00=0x00c0, t01=0x0022}
0x12c00…12c12               Head {h00=0x000e, h01=0x0050, text=» RF TRT100«, t00=0x00c0, t01=0x0044}
0x12c12…12c26               Head {h00=0x0010, h01=0x0050, text=»TRT070 EQU *«, t00=0x00c0, t01=0x0056}
0x12c26…12c32               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c0, t01=0x006a}
0x12c32…12c3a               Head {h00=0x0004, h01=0x0050, t00=0x00c0, t01=0x0076}
0x12c3a…12c4c               Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x00c0, t01=0x007e}
0x12c4c…12c60               Head {h00=0x0010, h01=0x0050, text=»TRT100 EQU *«, t00=0x00c0, t01=0x0090}
0x12c60…12c76               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00c0, t01=0x00a4}
0x12c76…12c96               Head {h00=0x001c, h01=0x0050, text=» IM TPM TRANSPARENT TEXT«, t00=0x00c0, t01=0x00ba}
0x12c96…12ca2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c0, t01=0x00da}
0x12ca2…12cc6               Head {h00=0x0020, h01=0x0050, text=» LCR A2,A4 GET ONE CHARACTER«, t00=0x00c0, t01=0x00e6}
0x12cc6…12cea               Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INCREMENT POINTER «, t00=0x00c0, t01=0x010a}
0x12cea…12cfe               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x00c0, t01=0x012e}
0x12cfe…12d12               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00c0, t01=0x0142}
0x12d12…12d3c               Head {h00=0x0026, h01=0x0050, text=» LD A1,XRB READ BUFFER COMMAND ???«, t00=0x00c0, t01=0x0156}
0x12d3c…12d56               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TRT105 NO!!«, t00=0x00c0, t01=0x0180}
0x12d56…12d5e               Head {h00=0x0004, h01=0x0050, t00=0x00c1, t01=0x000a}
0x12d5e…12da2               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c1, t01=0x0012}
0x12da2…12dac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0056}
0x12dac…12ddc               Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF ATTRIBUTE CHARACTER OR NULL«, t00=0x00c1, t01=0x0060}
0x12ddc…12de6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0090}
0x12de6…12e1e               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x00c1, t01=0x009a}
0x12e1e…12e26               Head {h00=0x0004, h01=0x0050, t00=0x00c1, t01=0x00d2}
0x12e26…12e50               Head {h00=0x0026, h01=0x0050, text=» CWK A2,X'20' ATTRIBUTE CHARACTER «, t00=0x00c1, t01=0x00da}
0x12e50…12e6c               Head {h00=0x0018, h01=0x0050, text=» RF(L) TRT101 YES!!!«, t00=0x00c1, t01=0x0104}
0x12e6c…12e78               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c1, t01=0x0120}
0x12e78…12e8c               Head {h00=0x0010, h01=0x0050, text=» IFT DMRK=1 «, t00=0x00c1, t01=0x012c}
0x12e8c…12eac               Head {h00=0x001c, h01=0x0050, text=» CWK A2,/7E LINE FEED ? «, t00=0x00c1, t01=0x0140}
0x12eac…12ed2               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT102 NO,GO TO TRT102«, t00=0x00c1, t01=0x0160}
0x12ed2…12ee6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/0A «, t00=0x00c1, t01=0x0186}
0x12ee6…12efa               Head {h00=0x0010, h01=0x0050, text=»TRT102 EQU *«, t00=0x00c2, t01=0x000a}
0x12efa…12f1e               Head {h00=0x0020, h01=0x0050, text=» CWK A2,/7D END OF MESSAGE ?«, t00=0x00c2, t01=0x001e}
0x12f1e…12f44               Head {h00=0x0022, h01=0x0050, text=» RF(NE) TRT103 NO,GO TO TRT103«, t00=0x00c2, t01=0x0042}
0x12f44…12f58               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/19 «, t00=0x00c2, t01=0x0068}
0x12f58…12f6c               Head {h00=0x0010, h01=0x0050, text=»TRT103 EQU *«, t00=0x00c2, t01=0x007c}
0x12f6c…12f8a               Head {h00=0x001a, h01=0x0050, text=» CWK A2,X'7F' NULL ?? «, t00=0x00c2, t01=0x0090}
0x12f8a…12fa0               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT105«, t00=0x00c2, t01=0x00ae}
0x12fa0…12fb2               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x00c2, t01=0x00c4}
0x12fb2…12fbe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c2, t01=0x00d6}
0x12fbe…12fd2               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00c2, t01=0x00e2}
0x12fd2…12fe4               Head {h00=0x000e, h01=0x0050, text=» RF TRT105«, t00=0x00c2, t01=0x00f6}
0x12fe4…12fec               Head {h00=0x0004, h01=0x0050, t00=0x00c2, t01=0x0108}
0x12fec…13000               Head {h00=0x0010, h01=0x0050, text=»TRT101 EQU *«, t00=0x00c2, t01=0x0110}
0x13000…13008               Head {h00=0x0004, h01=0x0050, t00=0x00c2, t01=0x0124}
0x13008…1301a               Head {h00=0x000e, h01=0x0050, text=» LDK A2,SF«, t00=0x00c2, t01=0x012c}
0x1301a…13040               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND START FIELD«, t00=0x00c2, t01=0x013e}
0x13040…13048               Head {h00=0x0004, h01=0x0050, t00=0x00c2, t01=0x0164}
0x13048…13074               Head {h00=0x0028, h01=0x0050, text=» LC A2,-1,A4 GET ATTRIBUTE CHARACTER«, t00=0x00c2, t01=0x016c}
0x13074…1308a               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'7F' «, t00=0x00c3, t01=0x0008}
0x1308a…130b6               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A2 CONVERT TO IBM ATTRIBUTE «, t00=0x00c3, t01=0x001e}
0x130b6…130c8               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x00c3, t01=0x004a}
0x130c8…130e0               Head {h00=0x0014, h01=0x0050, text=» ANK A2,/1E MASK«, t00=0x00c3, t01=0x005c}
0x130e0…130f2               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x00c3, t01=0x0074}
0x130f2…1311c               Head {h00=0x0026, h01=0x0050, text=» ORR A2,A1 IBM ATTRIBUTE COMPOSED «, t00=0x00c3, t01=0x0086}
0x1311c…13142               Head {h00=0x0022, h01=0x0050, text=» ORK A2,/40 BIT ALWAYS SET ONE«, t00=0x00c3, t01=0x00b0}
0x13142…1315a               Head {h00=0x0014, h01=0x0050, text=» LC A2,TASCII,A2«, t00=0x00c3, t01=0x00d6}
0x1315a…13184               Head {h00=0x0026, h01=0x0050, text=» CWK A2,/18 CHECK SPECIAL ATTRIBUT«, t00=0x00c3, t01=0x00ee}
0x13184…1319a               Head {h00=0x0012, h01=0x0050, text=» RF(NE) TRT104«, t00=0x00c3, t01=0x0118}
0x1319a…131ae               Head {h00=0x0010, h01=0x0050, text=» LDK A2,/30 «, t00=0x00c3, t01=0x012e}
0x131ae…131c2               Head {h00=0x0010, h01=0x0050, text=»TRT104 EQU *«, t00=0x00c3, t01=0x0142}
0x131c2…131e6               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND ATTRIBUTE«, t00=0x00c3, t01=0x0156}
0x131e6…131f8               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x00c3, t01=0x017a}
0x131f8…1320a               Head {h00=0x000e, h01=0x0050, text=» RF TRT110«, t00=0x00c3, t01=0x018c}
0x1320a…1321e               Head {h00=0x0010, h01=0x0050, text=»TRT105 EQU *«, t00=0x00c4, t01=0x000e}
0x1321e…1322a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c4, t01=0x0022}
0x1322a…13238               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c4, t01=0x002e}
0x13238…1324e               Head {h00=0x0012, h01=0x0050, text=» IFF TPMODE=1 «, t00=0x00c4, t01=0x003c}
0x1324e…13262               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x00c4, t01=0x0052}
0x13262…1328e               Head {h00=0x0028, h01=0x0050, text=» RF(L) TRT110 ILLEGAL CODE : SKIP IT«, t00=0x00c4, t01=0x0066}
0x1328e…1329a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c4, t01=0x0092}
0x1329a…132be               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITEP SEND CHARACTER«, t00=0x00c4, t01=0x009e}
0x132be…132d2               Head {h00=0x0010, h01=0x0050, text=»TRT110 EQU *«, t00=0x00c4, t01=0x00c2}
0x132d2…132fa               Head {h00=0x0024, h01=0x0050, text=» IM FBAX INCREMENT BUFFER INDEX «, t00=0x00c4, t01=0x00d6}
0x132fa…13324               Head {h00=0x0026, h01=0x0050, text=» LD A1,FECBRL GET REQUESTED LENGTH«, t00=0x00c4, t01=0x00fe}
0x13324…13338               Head {h00=0x0010, h01=0x0050, text=» CW A1,FBAX «, t00=0x00c4, t01=0x0128}
0x13338…1335e               Head {h00=0x0022, h01=0x0050, text=» RF(NG) TRT130 END OF MESSAGE «, t00=0x00c4, t01=0x013c}
0x1335e…1338c               Head {h00=0x002a, h01=0x0050, text=» ADK A3,1 INCREMENT CHARACTER COUNTER «, t00=0x00c4, t01=0x0162}
0x1338c…133a2               Head {h00=0x0012, h01=0x0050, text=» CWK A3,TBLEN «, t00=0x00c4, t01=0x0190}
0x133a2…133b8               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00c5, t01=0x0016}
0x133b8…133dc               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT105 NOT FULL BLOCK«, t00=0x00c5, t01=0x002c}
0x133dc…133e8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c5, t01=0x0050}
0x133e8…1340c               Head {h00=0x0020, h01=0x0050, text=» RB(L) TRT100 NOT FULL BLOCK«, t00=0x00c5, t01=0x005c}
0x1340c…13420               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00c5, t01=0x0080}
0x13420…13450               Head {h00=0x002c, h01=0x0050, text=» LDK A1,SBA CHECK IF SBA AT END OF BLOCK«, t00=0x00c5, t01=0x0094}
0x13450…13464               Head {h00=0x0010, h01=0x0050, text=» CC A1,-2,A4«, t00=0x00c5, t01=0x00c4}
0x13464…1347e               Head {h00=0x0016, h01=0x0050, text=» RF(E) TRT115 YES «, t00=0x00c5, t01=0x00d8}
0x1347e…13492               Head {h00=0x0010, h01=0x0050, text=» CC A1,-1,A4«, t00=0x00c5, t01=0x00f2}
0x13492…134b4               Head {h00=0x001e, h01=0x0050, text=» RF(NE) TRT116 NO SEND ETB«, t00=0x00c5, t01=0x0106}
0x134b4…134e0               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A4 GET FIRST BYTE AFTER SBA «, t00=0x00c5, t01=0x0128}
0x134e0…13502               Head {h00=0x001e, h01=0x0050, text=» ADK A4,1 INREMENT POINTER«, t00=0x00c5, t01=0x0154}
0x13502…13520               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00c5, t01=0x0176}
0x13520…13540 (198, 0, 398) Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x00c6, t01=0x0004}
0x13540…13572               Head {h00=0x002e, h01=0x0050, text=»TRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA«, t00=0x00c6, t01=0x0024}
0x13572…13590               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00c6, t01=0x0056}
0x13590…135b0               Head {h00=0x001c, h01=0x0050, text=» IM FBAX INCREMENT INDEX«, t00=0x00c6, t01=0x0074}
0x135b0…135bc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c6, t01=0x0094}
0x135bc…135d0               Head {h00=0x0010, h01=0x0050, text=»TRT116 EQU *«, t00=0x00c6, t01=0x00a0}
0x135d0…135e6               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00c6, t01=0x00b4}
0x135e6…135fa               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00c6, t01=0x00ca}
0x135fa…13622               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRIDLE SEND AN EXTRA DLE «, t00=0x00c6, t01=0x00de}
0x13622…1362e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c6, t01=0x0106}
0x1362e…1364a               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB LOAD ETB«, t00=0x00c6, t01=0x0112}
0x1364a…1365e               Head {h00=0x0010, h01=0x0050, text=»TRT120 EQU *«, t00=0x00c6, t01=0x012e}
0x1365e…13674               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00c6, t01=0x0142}
0x13674…13684               Head {h00=0x000c, h01=0x0050, text=» CM TPM «, t00=0x00c6, t01=0x0158}
0x13684…13690               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c6, t01=0x0168}
0x13690…136ae               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND IT «, t00=0x00c6, t01=0x0174}
0x136ae…136c2 (199, 0, 400) Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00c7, t01=0x0004}
0x136c2…136dc               Head {h00=0x0016, h01=0x0050, text=» LDR A2,A8 GET LRC«, t00=0x00c7, t01=0x0018}
0x136dc…136fa               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND LRC«, t00=0x00c7, t01=0x0032}
0x136fa…13706               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c7, t01=0x0050}
0x13706…1371a               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00c7, t01=0x005c}
0x1371a…1372c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x00c7, t01=0x0070}
0x1372c…13740               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x00c7, t01=0x0082}
0x13740…13766               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 1 «, t00=0x00c7, t01=0x0096}
0x13766…13778               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A6«, t00=0x00c7, t01=0x00bc}
0x13778…1378c               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x00c7, t01=0x00ce}
0x1378c…137b2               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRIT05 SEND CRC BYTE 2 «, t00=0x00c7, t01=0x00e2}
0x137b2…137be               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c7, t01=0x0108}
0x137be…137d4               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00c7, t01=0x0114}
0x137d4…137de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x012a}
0x137de…137e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0134}
0x137e8…1380e               Head {h00=0x0022, h01=0x0050, text=»*  COUNT MESSAGES TRANSMITTED «, t00=0x00c7, t01=0x013e}
0x1380e…13818               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0164}
0x13818…1382e               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSSTBL«, t00=0x00c7, t01=0x016e}
0x1382e…13844               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x00c7, t01=0x0184}
0x13844…13850               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c8, t01=0x000a}
0x13850…13870               Head {h00=0x001c, h01=0x0050, text=» ABL TRRE10 HALT OUTPUT «, t00=0x00c8, t01=0x0016}
0x13870…13884               Head {h00=0x0010, h01=0x0050, text=»TRT130 EQU *«, t00=0x00c8, t01=0x0036}
0x13884…138a8               Head {h00=0x0020, h01=0x0050, text=» IM XETX INDICATE 'ETX SENT'«, t00=0x00c8, t01=0x004a}
0x138a8…138be               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00c8, t01=0x006e}
0x138be…138d2               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00c8, t01=0x0084}
0x138d2…138fa               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRIDLE SEND AN EXTRA DLE «, t00=0x00c8, t01=0x0098}
0x138fa…13906               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c8, t01=0x00c0}
0x13906…13922               Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX LOAD ETX«, t00=0x00c8, t01=0x00cc}
0x13922…13946               Head {h00=0x0020, h01=0x0050, text=» RB TRT120 SEND ETX AND LRC «, t00=0x00c8, t01=0x00e8}
0x13946…13954               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c8, t01=0x010c}
0x13954…1395e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x011a}
0x1395e…13968               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0124}
0x13968…1398a               Head {h00=0x001e, h01=0x0050, text=»* TRANSMIT STATUS MESSAGE «, t00=0x00c8, t01=0x012e}
0x1398a…13994               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0150}
0x13994…1399e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x015a}
0x1399e…139b4               Head {h00=0x0012, h01=0x0050, text=» IFF STARVI=0 «, t00=0x00c8, t01=0x0164}
0x139b4…139c8               Head {h00=0x0010, h01=0x0050, text=»TRSTA EQU * «, t00=0x00c8, t01=0x017a}
0x139c8…139f0               Head {h00=0x0024, h01=0x0050, text=» IM XSTA INDICATE 'STATUS SENT' «, t00=0x00c8, t01=0x018e}
0x139f0…13a0e               Head {h00=0x001a, h01=0x0050, text=» ST A6,FDWTUT SAVE A6 «, t00=0x00c9, t01=0x0026}
0x13a0e…13a30               Head {h00=0x001e, h01=0x0050, text=» CF A5,TRSYNC START OUTPUT«, t00=0x00c9, t01=0x0044}
0x13a30…13a44               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SOH «, t00=0x00c9, t01=0x0066}
0x13a44…13a62               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND SOH «, t00=0x00c9, t01=0x007a}
0x13a62…13a7e               Head {h00=0x0018, h01=0x0050, text=» SUR A8,A8 RESET LRC«, t00=0x00c9, t01=0x0098}
0x13a7e…13a92               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'%' «, t00=0x00c9, t01=0x00b4}
0x13a92…13ab0               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND '%'«, t00=0x00c9, t01=0x00c8}
0x13ab0…13ac4               Head {h00=0x0010, h01=0x0050, text=» LDK A2,'R' «, t00=0x00c9, t01=0x00e6}
0x13ac4…13ae2               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND 'R'«, t00=0x00c9, t01=0x00fa}
0x13ae2…13af6               Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x00c9, t01=0x0118}
0x13af6…13b14               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITE SEND STX «, t00=0x00c9, t01=0x012c}
0x13b14…13b28               Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A7 «, t00=0x00c9, t01=0x014a}
0x13b28…13b46               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND TCA«, t00=0x00c9, t01=0x015e}
0x13b46…13b6c               Head {h00=0x0022, h01=0x0050, text=» LD A4,FDWTUT GET DWT-ADDRESS «, t00=0x00c9, t01=0x017c}
0x13b6c…13b98               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 GET NETWORK SUB-ADDRESS «, t00=0x00ca, t01=0x0012}
0x13b98…13bb6               Head {h00=0x001a, h01=0x0050, text=» CF A5,WRITEP SEND STA«, t00=0x00ca, t01=0x003e}
0x13bb6…13bd8               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A4 GET STATUS«, t00=0x00ca, t01=0x005c}
0x13bd8…13bfa               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/06 MASK FOR S/S 0«, t00=0x00ca, t01=0x007e}
0x13bfa…13c0c               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x00ca, t01=0x00a0}
0x13c0c…13c34               Head {h00=0x0024, h01=0x0050, text=» LC A2,SSTAB,A1 GET STATUS BYTE «, t00=0x00ca, t01=0x00b2}
0x13c34…13c54               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 0«, t00=0x00ca, t01=0x00da}
0x13c54…13c76               Head {h00=0x001e, h01=0x0050, text=» LDK A2,NOIR PRELOAD S/S 1«, t00=0x00ca, t01=0x00fa}
0x13c76…13c98               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A4 GET STATUS«, t00=0x00ca, t01=0x011c}
0x13c98…13caa               Head {h00=0x000e, h01=0x0050, text=» ANK A1,5 «, t00=0x00ca, t01=0x013e}
0x13caa…13cc8               Head {h00=0x001a, h01=0x0050, text=» RF(Z) TRST10 NOT 'IR'«, t00=0x00ca, t01=0x0150}
0x13cc8…13cda               Head {h00=0x000e, h01=0x0050, text=» ANK A1,4 «, t00=0x00ca, t01=0x016e}
0x13cda…13cfc               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) TRST10 NO IR IF DE«, t00=0x00ca, t01=0x0180}
0x13cfc…13d0e               Head {h00=0x000e, h01=0x0050, text=» LDK A2,IR«, t00=0x00cb, t01=0x0012}
0x13d0e…13d22               Head {h00=0x0010, h01=0x0050, text=»TRST10 EQU *«, t00=0x00cb, t01=0x0024}
0x13d22…13d42               Head {h00=0x001c, h01=0x0050, text=» CF A5,WRITEP SEND S/S 1«, t00=0x00cb, t01=0x0038}
0x13d42…13d66               Head {h00=0x0020, h01=0x0050, text=» RB TRT130 SEND ETX AND LRC «, t00=0x00cb, t01=0x0058}
0x13d66…13d72               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cb, t01=0x007c}
0x13d72…13d80               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cb, t01=0x0088}
0x13d80…13d8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x0096}
0x13d8a…13d94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x00a0}
0x13d94…13dbe               Head {h00=0x0026, h01=0x0050, text=»*  TRSYNC : TRANSMIT SYNC SEQUENCE«, t00=0x00cb, t01=0x00aa}
0x13dbe…13dc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x00d4}
0x13dc8…13ddc               Head {h00=0x0010, h01=0x0050, text=»TRSYNC EQU *«, t00=0x00cb, t01=0x00de}
0x13ddc…13e08               Head {h00=0x0028, h01=0x0050, text=» CF A5,CHALTI HALT INPUT IF NOT DONE«, t00=0x00cb, t01=0x00f2}
0x13e08…13e38               Head {h00=0x002c, h01=0x0050, text=» CF A5,CSYNCO START OUTPUT WITH SYNC DEF«, t00=0x00cb, t01=0x011e}
0x13e38…13e66               Head {h00=0x002a, h01=0x0050, text=» CF A5,READ WAIT FOR OUTPUT INTERRUPT «, t00=0x00cb, t01=0x014e}
0x13e66…13e70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x017c}
0x13e70…13e7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x0186}
0x13e7a…13e9a               Head {h00=0x001c, h01=0x0050, text=»*  SEND 4 SYN-CHARACTERS«, t00=0x00cb, t01=0x0190}
0x13e9a…13ea4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x0020}
0x13ea4…13eb6               Head {h00=0x000e, h01=0x0050, text=» LDK A3,4 «, t00=0x00cc, t01=0x002a}
0x13eb6…13eca               Head {h00=0x0010, h01=0x0050, text=»TRS100 EQU *«, t00=0x00cc, t01=0x003c}
0x13eca…13ede               Head {h00=0x0010, h01=0x0050, text=» LDK A2,SYN «, t00=0x00cc, t01=0x0050}
0x13ede…13f02               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITE SEND CHARACTER «, t00=0x00cc, t01=0x0064}
0x13f02…13f14               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x00cc, t01=0x0088}
0x13f14…13f2a               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) TRS100«, t00=0x00cc, t01=0x009a}
0x13f2a…13f4a               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00cc, t01=0x00b0}
0x13f4a…13f58               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cc, t01=0x00d0}
0x13f58…13f62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x00de}
0x13f62…13f6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x00e8}
0x13f6c…13fa0               Head {h00=0x0030, h01=0x0050, text=»*  CSYNCI :SEND SYNC-PATTERN FOR INPUT DATA «, t00=0x00cc, t01=0x00f2}
0x13fa0…13faa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x0126}
0x13faa…13fbe               Head {h00=0x0010, h01=0x0050, text=»CSYNCI EQU *«, t00=0x00cc, t01=0x0130}
0x13fbe…13fd4               Head {h00=0x0012, h01=0x0050, text=» LD A2,PFPOST «, t00=0x00cc, t01=0x0144}
0x13fd4…13ffc               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CSYN:I WAIT FOR POWER UP«, t00=0x00cc, t01=0x015a}
0x13ffc…1401c               Head {h00=0x001c, h01=0x0050, text=» CF A5,CHALTI STOP INPUT«, t00=0x00cc, t01=0x0182}
0x1401c…14046               Head {h00=0x0026, h01=0x0050, text=» ST A5,DCLCI SET INPUT ACTIVE FLAG«, t00=0x00cd, t01=0x0012}
0x14046…1405a               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00cd, t01=0x003c}
0x1405a…1408c               Head {h00=0x002e, h01=0x0050, text=» LDK A2,PARITY CHAR PARITY FUNCTION FOR LC«, t00=0x00cd, t01=0x0050}
0x1408c…140ae               Head {h00=0x001e, h01=0x0050, text=» CIO A2,1,LCUIN START I/O «, t00=0x00cd, t01=0x0082}
0x140ae…140d0               Head {h00=0x001e, h01=0x0050, text=» LDK A2,SYNC SYNC PATTERN «, t00=0x00cd, t01=0x00a4}
0x140d0…14106               Head {h00=0x0032, h01=0x0050, text=» OTR A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC «, t00=0x00cd, t01=0x00c6}
0x14106…14112               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cd, t01=0x00fc}
0x14112…14126               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x00cd, t01=0x0108}
0x14126…14154               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CBCARR+SYNC DEF SYNC-PATTERN «, t00=0x00cd, t01=0x011c}
0x14154…1418a               Head {h00=0x0032, h01=0x0050, text=» CIO A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC «, t00=0x00cd, t01=0x014a}
0x1418a…14198               Head {h00=0x000a, h01=0x0050, text=»    =1«, t00=0x00cd, t01=0x0180}
0x14198…141a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cd, t01=0x018e}
0x141a4…141b8               Head {h00=0x0010, h01=0x0050, text=»CSYN:I EQU *«, t00=0x00ce, t01=0x000a}
0x141b8…141d8               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00ce, t01=0x001e}
0x141d8…141e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x003e}
0x141e2…141ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0048}
0x141ec…14212               Head {h00=0x0022, h01=0x0050, text=»*  CHALTI : HALT INPUT CHANNEL«, t00=0x00ce, t01=0x0052}
0x14212…1421c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0078}
0x1421c…14230               Head {h00=0x0010, h01=0x0050, text=»CHALTI EQU *«, t00=0x00ce, t01=0x0082}
0x14230…14244               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00ce, t01=0x0096}
0x14244…1426c               Head {h00=0x0024, h01=0x0050, text=» LDK A2,CBSTOP STOP FUNCTION BIT«, t00=0x00ce, t01=0x00aa}
0x1426c…14278               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ce, t01=0x00d2}
0x14278…1429a               Head {h00=0x001e, h01=0x0050, text=» CIO A2,0,LCUIN HALT INPUT«, t00=0x00ce, t01=0x00de}
0x1429a…142c4               Head {h00=0x0026, h01=0x0050, text=» CM DCLCI CLEAR INPUT ACTIVE FLAG «, t00=0x00ce, t01=0x0100}
0x142c4…142e6               Head {h00=0x001e, h01=0x0050, text=» SST A2,LCUIN READ STATUS «, t00=0x00ce, t01=0x012a}
0x142e6…1430c               Head {h00=0x0022, h01=0x0050, text=» RF(A) CHALTR SST ACCEPTED =1 «, t00=0x00ce, t01=0x014c}
0x1430c…1434a               Head {h00=0x003a, h01=0x0050, text=» LDK A2,1 INSTRUCTION NOT ACCEPTED, SET MODEM ERR. =1 «, t00=0x00ce, t01=0x0172}
0x1434a…14362               Head {h00=0x0014, h01=0x0050, text=»CHALTR EQU *  =1«, t00=0x00cf, t01=0x0020}
0x14362…14376               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00cf, t01=0x0038}
0x14376…1439e               Head {h00=0x0024, h01=0x0050, text=» CF A5,LOGSST LOGG INPUT STATUS «, t00=0x00cf, t01=0x004c}
0x1439e…143aa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00cf, t01=0x0074}
0x143aa…143ca               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00cf, t01=0x0080}
0x143ca…143d8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cf, t01=0x00a0}
0x143d8…143e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x00ae}
0x143e2…143ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x00b8}
0x143ec…14420               Head {h00=0x0030, h01=0x0050, text=»*  CSYNCO : START TRANSMITTER WITH SYNC DEF «, t00=0x00cf, t01=0x00c2}
0x14420…1442a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x00f6}
0x1442a…1443e               Head {h00=0x0010, h01=0x0050, text=»CSYNCO EQU *«, t00=0x00cf, t01=0x0100}
0x1443e…14454               Head {h00=0x0012, h01=0x0050, text=» LD A2,PFPOST «, t00=0x00cf, t01=0x0114}
0x14454…1447c               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CSYN:O WAIT FOR POWER UP«, t00=0x00cf, t01=0x012a}
0x1447c…14490               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00cf, t01=0x0152}
0x14490…144be               Head {h00=0x002a, h01=0x0050, text=» LDK A2,PARITY CHAR PARITY CHECK BY CU«, t00=0x00cf, t01=0x0166}
0x144be…144e0 (208, 0, 398) Head {h00=0x001e, h01=0x0050, text=» CIO A2,1,LCUUT CIO START «, t00=0x00d0, t01=0x0004}
0x144e0…144fe               Head {h00=0x001a, h01=0x0050, text=» RF(A) CSYNC1 ACCEPTED«, t00=0x00d0, t01=0x0026}
0x144fe…14526               Head {h00=0x0024, h01=0x0050, text=» SST A2,LCUUT TRY TO READ STATUS«, t00=0x00d0, t01=0x0044}
0x14526…14554               Head {h00=0x002a, h01=0x0050, text=» ABL BRM NOT ACCEPTED TIMEOUT REQUEST «, t00=0x00d0, t01=0x006c}
0x14554…14568               Head {h00=0x0010, h01=0x0050, text=»CSYNC1 EQU *«, t00=0x00d0, t01=0x009a}
0x14568…1458e               Head {h00=0x0022, h01=0x0050, text=» LDK A2,SYNC DEF SYNC PATTERN «, t00=0x00d0, t01=0x00ae}
0x1458e…145b8               Head {h00=0x0026, h01=0x0050, text=» OTR A2,1,LCUUT SEND SYNC PATTERN «, t00=0x00d0, t01=0x00d4}
0x145b8…145c4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d0, t01=0x00fe}
0x145c4…145d8               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x00d0, t01=0x010a}
0x145d8…14602               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUUT START TRANSMITTER «, t00=0x00d0, t01=0x011e}
0x14602…1460e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d0, t01=0x0148}
0x1460e…14622               Head {h00=0x0010, h01=0x0050, text=»CSYN:O EQU *«, t00=0x00d0, t01=0x0154}
0x14622…14642               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00d0, t01=0x0168}
0x14642…1464c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x0188}
0x1464c…14656 (209, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0004}
0x14656…1467e               Head {h00=0x0024, h01=0x0050, text=»*  CHALTO : HALT OUTPUT CHANNEL «, t00=0x00d1, t01=0x000e}
0x1467e…14688               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0036}
0x14688…1469c               Head {h00=0x0010, h01=0x0050, text=»CHALTO EQU *«, t00=0x00d1, t01=0x0040}
0x1469c…146b0               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00d1, t01=0x0054}
0x146b0…146d4               Head {h00=0x0020, h01=0x0050, text=» LDK A2,CBSTOP STOP FUNCTION«, t00=0x00d1, t01=0x0068}
0x146d4…146e0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d1, t01=0x008c}
0x146e0…14704               Head {h00=0x0020, h01=0x0050, text=» CIO A2,0,LCUUT HALT OUTPUT «, t00=0x00d1, t01=0x0098}
0x14704…14718               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00d1, t01=0x00bc}
0x14718…14748               Head {h00=0x002c, h01=0x0050, text=» LDK A2,1 PRESET STATUS = MODEM ERROR =1«, t00=0x00d1, t01=0x00d0}
0x14748…1477a               Head {h00=0x002e, h01=0x0050, text=» RF(NA) CHLT00 INSTRUCTION NOT ACCEPTED =1«, t00=0x00d1, t01=0x0100}
0x1477a…147a0               Head {h00=0x0022, h01=0x0050, text=» CF A5,READ WAIT FOR INTERRUPT«, t00=0x00d1, t01=0x0132}
0x147a0…147ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d1, t01=0x0158}
0x147ac…147cc               Head {h00=0x001c, h01=0x0050, text=» SST A2,LCUUT GET STATUS«, t00=0x00d1, t01=0x0164}
0x147cc…147e0               Head {h00=0x0010, h01=0x0050, text=»CHLT00 EQU *«, t00=0x00d1, t01=0x0184}
0x147e0…147f6               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00d2, t01=0x0008}
0x147f6…14814               Head {h00=0x001a, h01=0x0050, text=» ANK A2,H:NOOP+H:THRU «, t00=0x00d2, t01=0x001e}
0x14814…1482a               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CHLTO2 «, t00=0x00d2, t01=0x003c}
0x1482a…14852               Head {h00=0x0024, h01=0x0050, text=» LDK A1,CSCDCE DCE NOT OPERABLE «, t00=0x00d2, t01=0x0052}
0x14852…14868               Head {h00=0x0012, h01=0x0050, text=» ANK A2,H:NOOP«, t00=0x00d2, t01=0x007a}
0x14868…14882               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CHLTO1 YES«, t00=0x00d2, t01=0x0090}
0x14882…148b0               Head {h00=0x002a, h01=0x0050, text=» LDK A1,CSCDOT OUTPUT THROUGHPUT ERROR«, t00=0x00d2, t01=0x00aa}
0x148b0…148c4               Head {h00=0x0010, h01=0x0050, text=»CHLTO1 EQU *«, t00=0x00d2, t01=0x00d8}
0x148c4…148ec               Head {h00=0x0024, h01=0x0050, text=» CF A15,DCSUPS INCREMENT COUNTER«, t00=0x00d2, t01=0x00ec}
0x148ec…14900               Head {h00=0x0010, h01=0x0050, text=»CHLTO2 EQU *«, t00=0x00d2, t01=0x0114}
0x14900…1490c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d2, t01=0x0128}
0x1490c…1492c               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00d2, t01=0x0134}
0x1492c…1493a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d2, t01=0x0154}
0x1493a…14944               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x0162}
0x14944…1494e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x016c}
0x1494e…1496c               Head {h00=0x001a, h01=0x0050, text=»*   RECEIVER INTERRUPT«, t00=0x00d2, t01=0x0176}
0x1496c…14976 (211, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0004}
0x14976…14980               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x000e}
0x14980…14994               Head {h00=0x0010, h01=0x0050, text=»IH1501 EQU *«, t00=0x00d3, t01=0x0018}
0x14994…149a8               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x00d3, t01=0x002c}
0x149a8…149be               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00d3, t01=0x0040}
0x149be…149de               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x00d3, t01=0x0056}
0x149de…149ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d3, t01=0x0076}
0x149ea…149f2               Head {h00=0x0004, h01=0x0050, t00=0x00d3, t01=0x0082}
0x149f2…14a08               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00d3, t01=0x008a}
0x14a08…14a26               Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 «, t00=0x00d3, t01=0x00a0}
0x14a26…14a32               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d3, t01=0x00be}
0x14a32…14a60               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x00d3, t01=0x00ca}
0x14a60…14a82               Head {h00=0x001e, h01=0x0050, text=» INR A2,0,LCUIN READ CHAR «, t00=0x00d3, t01=0x00f8}
0x14a82…14ab2               Head {h00=0x002c, h01=0x0050, text=» RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS«, t00=0x00d3, t01=0x011a}
0x14ab2…14ac6               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00d3, t01=0x014a}
0x14ac6…14af2               Head {h00=0x0028, h01=0x0050, text=» CF A5,LOGIN LOG RECEIVED CHARACTER «, t00=0x00d3, t01=0x015e}
0x14af2…14afe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d3, t01=0x018a}
0x14afe…14b14               Head {h00=0x0012, h01=0x0050, text=» IFT TPMODE=1 «, t00=0x00d4, t01=0x0008}
0x14b14…14b24               Head {h00=0x000c, h01=0x0050, text=» C2 TPM «, t00=0x00d4, t01=0x001e}
0x14b24…14b60               Head {h00=0x0038, h01=0x0050, text=» RF(NZ) IHLC10 DO NOT SKIP SYNC IN TRANSPARENT TEXT «, t00=0x00d4, t01=0x002e}
0x14b60…14b6c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d4, t01=0x006a}
0x14b6c…14b7e               Head {h00=0x000e, h01=0x0050, text=» C2 SYNSW «, t00=0x00d4, t01=0x0076}
0x14b7e…14bb2               Head {h00=0x0030, h01=0x0050, text=» RF(NZ) IHLC05 DO NOT SKIP SYNS IN BCC FRAME«, t00=0x00d4, t01=0x0088}
0x14bb2…14bc6               Head {h00=0x0010, h01=0x0050, text=» CWK A2,SYNC«, t00=0x00d4, t01=0x00bc}
0x14bc6…14bda               Head {h00=0x0010, h01=0x0050, text=» RF(E) READ «, t00=0x00d4, t01=0x00d0}
0x14bda…14bee               Head {h00=0x0010, h01=0x0050, text=»IHLC05 EQU *«, t00=0x00d4, t01=0x00e4}
0x14bee…14c02               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00d4, t01=0x00f8}
0x14c02…14c22               Head {h00=0x001c, h01=0x0050, text=» XRR A8,A2 CALCULATE LRC«, t00=0x00d4, t01=0x010c}
0x14c22…14c2e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d4, t01=0x012c}
0x14c2e…14c42               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00d4, t01=0x0138}
0x14c42…14c66               Head {h00=0x0020, h01=0x0050, text=» CF A5,CRCCAL CALCULATE CRC «, t00=0x00d4, t01=0x014c}
0x14c66…14c92               Head {h00=0x0028, h01=0x0050, text=» LC A2,TASCII,A2 TRANSLATE TO ASCII «, t00=0x00d4, t01=0x0170}
0x14c92…14c9e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d5, t01=0x000c}
0x14c9e…14cb2               Head {h00=0x0010, h01=0x0050, text=»IHLC10 EQU *«, t00=0x00d5, t01=0x0018}
0x14cb2…14cc4               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x00d5, t01=0x002c}
0x14cc4…14cf2               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/FF00 SET FLAG FOR CARRIER ON«, t00=0x00d5, t01=0x003e}
0x14cf2…14d1c               Head {h00=0x0026, h01=0x0050, text=» ST A1,DCLCI SET INPUT ACTIV FLAG «, t00=0x00d5, t01=0x006c}
0x14d1c…14d3e               Head {h00=0x001e, h01=0x0050, text=» CM DCSTCU CLEAR SST SAVE «, t00=0x00d5, t01=0x0096}
0x14d3e…14d50               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x00d5, t01=0x00b8}
0x14d50…14d74               Head {h00=0x0020, h01=0x0050, text=» ST A1,DTEPLS,A7 CU OPERABLE«, t00=0x00d5, t01=0x00ca}
0x14d74…14d94               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00d5, t01=0x00ee}
0x14d94…14da8               Head {h00=0x0010, h01=0x0050, text=»IHIN20 EQU *«, t00=0x00d5, t01=0x010e}
0x14da8…14dc6               Head {h00=0x001a, h01=0x0050, text=» CF A5,SST PERFORM SST«, t00=0x00d5, t01=0x0122}
0x14dc6…14dd6               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x00d5, t01=0x0140}
0x14dd6…14de4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d5, t01=0x0150}
0x14de4…14dee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x015e}
0x14dee…14df8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0168}
0x14df8…14e1a               Head {h00=0x001e, h01=0x0050, text=»*   TRANSMITTER INTERRUPT «, t00=0x00d5, t01=0x0172}
0x14e1a…14e24 (214, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0004}
0x14e24…14e2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x000e}
0x14e2e…14e42               Head {h00=0x0010, h01=0x0050, text=»IH1502 EQU *«, t00=0x00d6, t01=0x0018}
0x14e42…14e56               Head {h00=0x0010, h01=0x0050, text=» ST P,INTSAV«, t00=0x00d6, t01=0x002c}
0x14e56…14e6c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00d6, t01=0x0040}
0x14e6c…14e8e               Head {h00=0x001e, h01=0x0050, text=» CF A15,SAVE8 SAVE A1 - A8«, t00=0x00d6, t01=0x0056}
0x14e8e…14e9a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d6, t01=0x0078}
0x14e9a…14ea2               Head {h00=0x0004, h01=0x0050, t00=0x00d6, t01=0x0084}
0x14ea2…14eb8               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00d6, t01=0x008c}
0x14eb8…14ed6               Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 «, t00=0x00d6, t01=0x00a2}
0x14ed6…14ee2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d6, t01=0x00c0}
0x14ee2…14f10               Head {h00=0x002a, h01=0x0050, text=» CF A15,LDREG RESTORE DC REGS A3 - A8 «, t00=0x00d6, t01=0x00cc}
0x14f10…14f20               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00d6, t01=0x00fa}
0x14f20…14f2e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d6, t01=0x010a}
0x14f2e…14f38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0118}
0x14f38…14f42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0122}
0x14f42…14f6c               Head {h00=0x0026, h01=0x0050, text=»* SST INSTRUCTION AND STATUS CHECK«, t00=0x00d6, t01=0x012c}
0x14f6c…14f76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0156}
0x14f76…14fa2               Head {h00=0x0028, h01=0x0050, text=»*   LCU STATUS : BIT 10=CARRIER OFF «, t00=0x00d6, t01=0x0160}
0x14fa2…14fd4               Head {h00=0x002e, h01=0x0050, text=»*  BIT 13=PARITY ERROR (6805 ONLY) SALCUZ «, t00=0x00d6, t01=0x018c}
0x14fd4…15004               Head {h00=0x002c, h01=0x0050, text=»*                BIT 14=THROUGHPUT ERROR«, t00=0x00d7, t01=0x002e}
0x15004…15034               Head {h00=0x002c, h01=0x0050, text=»*                BIT 15=MODEM NOT READY «, t00=0x00d7, t01=0x005e}
0x15034…1503e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x008e}
0x1503e…15050               Head {h00=0x000e, h01=0x0050, text=»SST EQU * «, t00=0x00d7, t01=0x0098}
0x15050…15070               Head {h00=0x001c, h01=0x0050, text=» SST A2,LCUIN GET STATUS«, t00=0x00d7, t01=0x00aa}
0x15070…15082               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x00d7, t01=0x00ca}
0x15082…15096               Head {h00=0x0010, h01=0x0050, text=» IFT LOGG=1 «, t00=0x00d7, t01=0x00dc}
0x15096…150c0               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGSST LOGG SST INFORMATION«, t00=0x00d7, t01=0x00f0}
0x150c0…150cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d7, t01=0x011a}
0x150cc…150f0               Head {h00=0x0020, h01=0x0050, text=» ANK A2,H:ERR ERROR BIT SET «, t00=0x00d7, t01=0x0126}
0x150f0…1510a               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) SST050 YES«, t00=0x00d7, t01=0x014a}
0x1510a…1511e               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=0«, t00=0x00d7, t01=0x0164}
0x1511e…15140               Head {h00=0x001e, h01=0x0050, text=» LD A2,DCLCI INPUT STATUS «, t00=0x00d7, t01=0x0178}
0x15140…1516e               Head {h00=0x002a, h01=0x0050, text=» RF(Z) SST125 INPUT NOT ACTIVE  IGNORE«, t00=0x00d8, t01=0x000a}
0x1516e…1519a               Head {h00=0x0028, h01=0x0050, text=» RF(N) SST100 INPUT ACTIVE WITH DATA«, t00=0x00d8, t01=0x0038}
0x1519a…151c8               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,CBCARR+SYNC DEF SYNC PATTERN «, t00=0x00d8, t01=0x0064}
0x151c8…151f2               Head {h00=0x0026, h01=0x0050, text=» CIO A2,1,LCUIN START INPUT AGAIN «, t00=0x00d8, t01=0x0092}
0x151f2…1521a               Head {h00=0x0024, h01=0x0050, text=» RF SST125 RETURN TO DISPATCHER «, t00=0x00d8, t01=0x00bc}
0x1521a…15226               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d8, t01=0x00e4}
0x15226…1523a               Head {h00=0x0010, h01=0x0050, text=» IFT P6805=1«, t00=0x00d8, t01=0x00f0}
0x1523a…1524c               Head {h00=0x000e, h01=0x0050, text=» RF SST100«, t00=0x00d8, t01=0x0104}
0x1524c…15258               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d8, t01=0x0116}
0x15258…1526c               Head {h00=0x0010, h01=0x0050, text=»SST050 EQU *«, t00=0x00d8, t01=0x0122}
0x1526c…1529a               Head {h00=0x002a, h01=0x0050, text=» CM DTEPLS,A7 CLEAR PHYS. LINK STATUS «, t00=0x00d8, t01=0x0136}
0x1529a…152bc               Head {h00=0x001e, h01=0x0050, text=» ANK A2,H:CARR CARRIR OFF «, t00=0x00d8, t01=0x0164}
0x152bc…152d4               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SST075 NO«, t00=0x00d8, t01=0x0186}
0x152d4…152f6               Head {h00=0x001e, h01=0x0050, text=» LD A2,DCLCI INPUT STATUS «, t00=0x00d9, t01=0x000e}
0x152f6…1532a               Head {h00=0x0030, h01=0x0050, text=» RF(Z) SST125 NOT ACTIVE IGNORE CARRIER OFF «, t00=0x00d9, t01=0x0030}
0x1532a…15344               Head {h00=0x0016, h01=0x0050, text=» RF SST100 ACTIVE «, t00=0x00d9, t01=0x0064}
0x15344…15358               Head {h00=0x0010, h01=0x0050, text=»SST075 EQU *«, t00=0x00d9, t01=0x007e}
0x15358…1536a               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x00d9, t01=0x0092}
0x1536a…15392               Head {h00=0x0024, h01=0x0050, text=» ANK A2,H:THRU THROUGHPUT ERROR «, t00=0x00d9, t01=0x00a4}
0x15392…153aa               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SST100 NO«, t00=0x00d9, t01=0x00cc}
0x153aa…153c0               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00d9, t01=0x00e4}
0x153c0…153ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x00fa}
0x153ca…153d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0104}
0x153d4…153fc               Head {h00=0x0024, h01=0x0050, text=»*  COUNT INPUT THROUGHPUT ERROR «, t00=0x00d9, t01=0x010e}
0x153fc…15406               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0136}
0x15406…1541c               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSCDIT«, t00=0x00d9, t01=0x0140}
0x1541c…15432               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x00d9, t01=0x0156}
0x15432…1543e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d9, t01=0x016c}
0x1543e…15452               Head {h00=0x0010, h01=0x0050, text=» ABL BRM110 «, t00=0x00d9, t01=0x0178}
0x15452…1545c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x018c}
0x1545c…15470               Head {h00=0x0010, h01=0x0050, text=»SST100 EQU *«, t00=0x00da, t01=0x0008}
0x15470…15482               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x00da, t01=0x001c}
0x15482…154a6               Head {h00=0x0020, h01=0x0050, text=» ANK A2,H:NOOP NOT OPERABLE «, t00=0x00da, t01=0x002e}
0x154a6…154bc               Head {h00=0x0012, h01=0x0050, text=» RF(Z) SST200 «, t00=0x00da, t01=0x0052}
0x154bc…154d2               Head {h00=0x0012, h01=0x0050, text=» IFT STTSTS=1 «, t00=0x00da, t01=0x0068}
0x154d2…154dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x007e}
0x154dc…154e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x0088}
0x154e6…15508               Head {h00=0x001e, h01=0x0050, text=»*  COUNT DCE NOT OPERABLE «, t00=0x00da, t01=0x0092}
0x15508…15512               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x00b4}
0x15512…15528               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CSCDCE«, t00=0x00da, t01=0x00be}
0x15528…1553e               Head {h00=0x0012, h01=0x0050, text=» CF A15,DCSUPS«, t00=0x00da, t01=0x00d4}
0x1553e…1554a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00da, t01=0x00ea}
0x1554a…1556e               Head {h00=0x0020, h01=0x0050, text=» CF A15,STREG SAVE REGISTERS«, t00=0x00da, t01=0x00f6}
0x1556e…15590               Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME DELAY 1 SEC«, t00=0x00da, t01=0x011a}
0x15590…155a8               Head {h00=0x0014, h01=0x0050, text=» DATA SST150,10 «, t00=0x00da, t01=0x013c}
0x155a8…155bc               Head {h00=0x0010, h01=0x0050, text=»SST125 EQU *«, t00=0x00da, t01=0x0154}
0x155bc…155e4               Head {h00=0x0024, h01=0x0050, text=» ABL TDISP RETURN TO DISPATCHER «, t00=0x00da, t01=0x0168}
0x155e4…155ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x0190}
0x155ee…15602               Head {h00=0x0010, h01=0x0050, text=»SST150 EQU *«, t00=0x00db, t01=0x000a}
0x15602…15626               Head {h00=0x0020, h01=0x0050, text=» CF A15,LDREG LOAD REGISTERS«, t00=0x00db, t01=0x001e}
0x15626…1563a               Head {h00=0x0010, h01=0x0050, text=»SST200 EQU *«, t00=0x00db, t01=0x0042}
0x1563a…1564c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x00db, t01=0x0056}
0x1564c…1567e               Head {h00=0x002e, h01=0x0050, text=» ANK A2,H:CARR CHECK STATUS IF CARRIER OFF«, t00=0x00db, t01=0x0068}
0x1567e…15696               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SST225 NO«, t00=0x00db, t01=0x009a}
0x15696…156ce               Head {h00=0x0034, h01=0x0050, text=» XRK A1,H:CARR CHECK STATUS IF ONLY CARRIER OFF «, t00=0x00db, t01=0x00b2}
0x156ce…156e8               Head {h00=0x0016, h01=0x0050, text=» RF(Z) SST250 YES «, t00=0x00db, t01=0x00ea}
0x156e8…156fc               Head {h00=0x0010, h01=0x0050, text=»SST225 EQU *«, t00=0x00db, t01=0x0104}
0x156fc…15730               Head {h00=0x0030, h01=0x0050, text=» ST A1,DCSTCU STORE STATUS AS CURRENT STATUS«, t00=0x00db, t01=0x0118}
0x15730…15744               Head {h00=0x0010, h01=0x0050, text=»SST250 EQU *«, t00=0x00db, t01=0x014c}
0x15744…15764               Head {h00=0x001c, h01=0x0050, text=» RTN A5 RETURN TO CALLER«, t00=0x00db, t01=0x0160}
0x15764…15772               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00db, t01=0x0180}
0x15772…1577c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00db, t01=0x018e}
0x1577c…15786               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x0008}
0x15786…157b6               Head {h00=0x002c, h01=0x0050, text=»* WRITE FROM OR READ ONE CHARACTER TO A2«, t00=0x00dc, t01=0x0012}
0x157b6…157c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x0042}
0x157c0…157ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x004c}
0x157ca…157de               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x00dc, t01=0x0056}
0x157de…157f2               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00dc, t01=0x006a}
0x157f2…15802               Head {h00=0x000c, h01=0x0050, text=» C2 TPM «, t00=0x00dc, t01=0x007e}
0x15802…1582c               Head {h00=0x0026, h01=0x0050, text=» RF(Z) WRIT02 NOT TRANSPARENT MODE«, t00=0x00dc, t01=0x008e}
0x1582c…1584c               Head {h00=0x001c, h01=0x0050, text=» CWK A2,DLE CHECK IF DLE«, t00=0x00dc, t01=0x00b8}
0x1584c…15866               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRIT05 NO «, t00=0x00dc, t01=0x00d8}
0x15866…1588a               Head {h00=0x0020, h01=0x0050, text=» CF A5,WRIDLE SEND EXTRA DLE«, t00=0x00dc, t01=0x00f2}
0x1588a…1589e               Head {h00=0x0010, h01=0x0050, text=» LDK A2,DLE «, t00=0x00dc, t01=0x0116}
0x1589e…158b0               Head {h00=0x000e, h01=0x0050, text=» RF WRIT05«, t00=0x00dc, t01=0x012a}
0x158b0…158c4               Head {h00=0x0010, h01=0x0050, text=»WRIT02 EQU *«, t00=0x00dc, t01=0x013c}
0x158c4…158d8               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x00dc, t01=0x0150}
0x158d8…158ec               Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x00dc, t01=0x0164}
0x158ec…15920               Head {h00=0x0030, h01=0x0050, text=» RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD«, t00=0x00dc, t01=0x0178}
0x15920…1594e               Head {h00=0x002a, h01=0x0050, text=» LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC «, t00=0x00dd, t01=0x001c}
0x1594e…1595a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dd, t01=0x004a}
0x1595a…1596e               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x00dd, t01=0x0056}
0x1596e…15994               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x00dd, t01=0x006a}
0x15994…159aa               Head {h00=0x0012, h01=0x0050, text=» RF(A) WRIT10 «, t00=0x00dd, t01=0x0090}
0x159aa…159be               Head {h00=0x0010, h01=0x0050, text=» IFF CODE=1 «, t00=0x00dd, t01=0x00a6}
0x159be…159e6               Head {h00=0x0024, h01=0x0050, text=»WRIT10 XRR A8,A2 ACCUMULATE BCC «, t00=0x00dd, t01=0x00ba}
0x159e6…159f2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dd, t01=0x00e2}
0x159f2…15a06               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00dd, t01=0x00ee}
0x15a06…15a30               Head {h00=0x0026, h01=0x0050, text=»WRIT10 CF A5,CRCCAL CALCULATE CRC «, t00=0x00dd, t01=0x0102}
0x15a30…15a3c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dd, t01=0x012c}
0x15a3c…15a50               Head {h00=0x0010, h01=0x0050, text=»WRIT15 EQU *«, t00=0x00dd, t01=0x0138}
0x15a50…15a64               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00dd, t01=0x014c}
0x15a64…15a8e               Head {h00=0x0026, h01=0x0050, text=» CF A5,LOGOUT LOG OUTPUT CHARACTER«, t00=0x00dd, t01=0x0160}
0x15a8e…15a9a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00dd, t01=0x018a}
0x15a9a…15aa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0008}
0x15aa4…15abe               Head {h00=0x0016, h01=0x0050, text=»READ CF A15,STREG «, t00=0x00de, t01=0x0012}
0x15abe…15ad0               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x00de, t01=0x002c}
0x15ad0…15ada               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x003e}
0x15ada…15ae4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0048}
0x15ae4…15b24               Head {h00=0x003c, h01=0x0050, text=»*  THESE INSTRUCTIONS ARE ONLY USED TO SEND AN EXTRA DLE«, t00=0x00de, t01=0x0052}
0x15b24…15b52               Head {h00=0x002a, h01=0x0050, text=»*  WHEN TRANSPARENT MODE IS CONFIGURED«, t00=0x00de, t01=0x0092}
0x15b52…15b5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x00c0}
0x15b5c…15b70               Head {h00=0x0010, h01=0x0050, text=»WRIDLE EQU *«, t00=0x00de, t01=0x00ca}
0x15b70…15b96               Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,LCUUT SEND CHARACTER«, t00=0x00de, t01=0x00de}
0x15b96…15bb4               Head {h00=0x001a, h01=0x0050, text=» RB(A) WRIT15 ACCEPTED«, t00=0x00de, t01=0x0104}
0x15bb4…15bdc               Head {h00=0x0024, h01=0x0050, text=» RB READ OUTPUT THROUGHPUT ERROR«, t00=0x00de, t01=0x0122}
0x15bdc…15bea               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00de, t01=0x014a}
0x15bea…15bf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0158}
0x15bf4…15bfe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0162}
0x15bfe…15c10               Head {h00=0x000e, h01=0x0050, text=»*** WRITEP«, t00=0x00de, t01=0x016c}
0x15c10…15c1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x017e}
0x15c1a…15c3a               Head {h00=0x001c, h01=0x0050, text=»*   WRITE A2 WITH PARITY«, t00=0x00de, t01=0x0188}
0x15c3a…15c44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x0018}
0x15c44…15c4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x0022}
0x15c4e…15c70               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x00df, t01=0x002c}
0x15c70…15c8a               Head {h00=0x0016, h01=0x0050, text=»WRITEP ANK A2,/FF «, t00=0x00df, t01=0x004e}
0x15c8a…15c9c               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x00df, t01=0x0068}
0x15c9c…15cb0               Head {h00=0x0010, h01=0x0050, text=» ORK A2,/80 «, t00=0x00df, t01=0x007a}
0x15cb0…15cc8               Head {h00=0x0014, h01=0x0050, text=»WRI100 SLL A1,1 «, t00=0x00df, t01=0x008e}
0x15cc8…15cde               Head {h00=0x0012, h01=0x0050, text=» RB(P) WRI100 «, t00=0x00df, t01=0x00a6}
0x15cde…15cf8               Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRITE WRITE«, t00=0x00df, t01=0x00bc}
0x15cf8…15d0c               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x00df, t01=0x00d6}
0x15d0c…15d1e               Head {h00=0x000e, h01=0x0050, text=» RB WRI100«, t00=0x00df, t01=0x00ea}
0x15d1e…15d2a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x00fc}
0x15d2a…15d4c               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x00df, t01=0x0108}
0x15d4c…15d64               Head {h00=0x0014, h01=0x0050, text=»WRITEP RB WRITE «, t00=0x00df, t01=0x012a}
0x15d64…15d70               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x0142}
0x15d70…15d7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x014e}
0x15d7a…15d84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x0158}
0x15d84…15d8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x0162}
0x15d8e…15da0               Head {h00=0x000e, h01=0x0050, text=»*** READP «, t00=0x00df, t01=0x016c}
0x15da0…15daa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x017e}
0x15daa…15ddc               Head {h00=0x002e, h01=0x0050, text=»*   READ CHARACTER TO A2 AND CHECK PARITY «, t00=0x00df, t01=0x0188}
0x15ddc…15de6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x002a}
0x15de6…15df0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0034}
0x15df0…15e08               Head {h00=0x0014, h01=0x0050, text=»READP CF A5,READ«, t00=0x00e0, t01=0x003e}
0x15e08…15e2a               Head {h00=0x001e, h01=0x0050, text=» IFT CODE+P6805=0  SALCUZ «, t00=0x00e0, t01=0x0056}
0x15e2a…15e3c               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x00e0, t01=0x0078}
0x15e3c…15e52               Head {h00=0x0012, h01=0x0050, text=»RE100 SLL A1,1«, t00=0x00e0, t01=0x008a}
0x15e52…15e66               Head {h00=0x0010, h01=0x0050, text=» RF(Z) RE110«, t00=0x00e0, t01=0x00a0}
0x15e66…15e7c               Head {h00=0x0012, h01=0x0050, text=» RB(NN) RE100 «, t00=0x00e0, t01=0x00b4}
0x15e7c…15e90               Head {h00=0x0010, h01=0x0050, text=» XRK A2,/80 «, t00=0x00e0, t01=0x00ca}
0x15e90…15ea2               Head {h00=0x000e, h01=0x0050, text=» RB RE100 «, t00=0x00e0, t01=0x00de}
0x15ea2…15eba               Head {h00=0x0014, h01=0x0050, text=»RE110 LDR A1,A2 «, t00=0x00e0, t01=0x00f0}
0x15eba…15ece               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x00e0, t01=0x0108}
0x15ece…15eda               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e0, t01=0x011c}
0x15eda…15efc               Head {h00=0x001e, h01=0x0050, text=» IFF CODE+P6805=0  SALCUZ «, t00=0x00e0, t01=0x0128}
0x15efc…15f10               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x00e0, t01=0x014a}
0x15f10…15f1c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e0, t01=0x015e}
0x15f1c…15f2e               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x00e0, t01=0x016a}
0x15f2e…15f42               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/80 «, t00=0x00e0, t01=0x017c}
0x15f42…15f56               Head {h00=0x0010, h01=0x0050, text=» XRK A1,/80 «, t00=0x00e0, t01=0x0190}
0x15f56…15f66               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00e1, t01=0x0014}
0x15f66…15f70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0024}
0x15f70…15f7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x002e}
0x15f7a…15f88               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e1, t01=0x0038}
0x15f88…15f92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0046}
0x15f92…15f9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0050}
0x15f9c…15fb8               Head {h00=0x0018, h01=0x0050, text=»* POWER ON FUNCTIONS«, t00=0x00e1, t01=0x005a}
0x15fb8…15fc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0076}
0x15fc2…15fcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0080}
0x15fcc…15fe0               Head {h00=0x0010, h01=0x0050, text=»DC15ON EQU *«, t00=0x00e1, t01=0x008a}
0x15fe0…15ff6               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00e1, t01=0x009e}
0x15ff6…16016               Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x00e1, t01=0x00b4}
0x16016…16022               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e1, t01=0x00d4}
0x16022…1602a               Head {h00=0x0004, h01=0x0050, t00=0x00e1, t01=0x00e0}
0x1602a…16040               Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00e1, t01=0x00e8}
0x16040…1605e               Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 «, t00=0x00e1, t01=0x00fe}
0x1605e…1606a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e1, t01=0x011c}
0x1606a…16090               Head {h00=0x0022, h01=0x0050, text=» LDKL A7,DTETAB DTETAB ADDRESS«, t00=0x00e1, t01=0x0128}
0x16090…160a6               Head {h00=0x0012, h01=0x0050, text=» IFT STARVI=1 «, t00=0x00e1, t01=0x014e}
0x160a6…160c6               Head {h00=0x001c, h01=0x0050, text=» LDK A5,4 SET DEVICE END«, t00=0x00e1, t01=0x0164}
0x160c6…160f2               Head {h00=0x0028, h01=0x0050, text=» LD A6,DTEDWT,A7 GET FIRST DWT ADDR «, t00=0x00e1, t01=0x0184}
0x160f2…16106               Head {h00=0x0010, h01=0x0050, text=»DC1510 EQU *«, t00=0x00e2, t01=0x0020}
0x16106…16128               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DC1520 END OF CHAIN«, t00=0x00e2, t01=0x0034}
0x16128…16152               Head {h00=0x0026, h01=0x0050, text=» ORS A5,DWTST,A6 STORE DEVICE END «, t00=0x00e2, t01=0x0056}
0x16152…16182               Head {h00=0x002c, h01=0x0050, text=» CF A15,INSSQ INSERT DWT IN STAUS QUEUE «, t00=0x00e2, t01=0x0080}
0x16182…161b0               Head {h00=0x002a, h01=0x0050, text=» LD A6,DWTCHN,A6 GET NEXT DWT IN CHAIN«, t00=0x00e2, t01=0x00b0}
0x161b0…161c2               Head {h00=0x000e, h01=0x0050, text=» RB DC1510«, t00=0x00e2, t01=0x00de}
0x161c2…161d6               Head {h00=0x0010, h01=0x0050, text=»DC1520 EQU *«, t00=0x00e2, t01=0x00f0}
0x161d6…161e4               Head {h00=0x000a, h01=0x0050, text=»    =4«, t00=0x00e2, t01=0x0104}
0x161e4…161f4               Head {h00=0x000c, h01=0x0050, text=»    =13 «, t00=0x00e2, t01=0x0112}
0x161f4…16200               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e2, t01=0x0122}
0x16200…16224               Head {h00=0x0020, h01=0x0050, text=» LD A2,DTESTA,A7 DTE STATUS «, t00=0x00e2, t01=0x012e}
0x16224…16236               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x00e2, t01=0x0152}
0x16236…1625e               Head {h00=0x0024, h01=0x0050, text=» ABL(NZ) TDISP OPEN NOT EXECUTED«, t00=0x00e2, t01=0x0164}
0x1625e…1628c               Head {h00=0x002a, h01=0x0050, text=» CM DCLCI INIT LINE CONTROL UNIT INFO «, t00=0x00e2, t01=0x018c}
0x1628c…162b8               Head {h00=0x0028, h01=0x0050, text=» LD A2,DCTPGP GET POLL TIMER POINTER«, t00=0x00e3, t01=0x002a}
0x162b8…162de               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DC1540 ALREADY STARTED«, t00=0x00e3, t01=0x0056}
0x162de…16306               Head {h00=0x0024, h01=0x0050, text=» CF A15,SPOTIM START POLL TIMER «, t00=0x00e3, t01=0x007c}
0x16306…1631a               Head {h00=0x0010, h01=0x0050, text=»DC1540 EQU *«, t00=0x00e3, t01=0x00a4}
0x1631a…1632a               Head {h00=0x000c, h01=0x0050, text=» ABL BRM«, t00=0x00e3, t01=0x00b8}
0x1632a…16338               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e3, t01=0x00c8}
0x16338…1634c               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x00e3, t01=0x00d6}
0x1634c…16356               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x00ea}
0x16356…16360               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x00f4}
0x16360…1637c               Head {h00=0x0018, h01=0x0050, text=»* CALCULATION OF CRC«, t00=0x00e3, t01=0x00fe}
0x1637c…16386               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x011a}
0x16386…1639e               Head {h00=0x0014, h01=0x0050, text=»* A2 = CHARACTER«, t00=0x00e3, t01=0x0124}
0x1639e…163bc               Head {h00=0x001a, h01=0x0050, text=»* A8 = ACCUMULATED CRC«, t00=0x00e3, t01=0x013c}
0x163bc…163c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x015a}
0x163c6…163d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x0164}
0x163d0…163e4               Head {h00=0x0010, h01=0x0050, text=»CRCCAL EQU *«, t00=0x00e3, t01=0x016e}
0x163e4…163fc               Head {h00=0x0014, h01=0x0050, text=» ST A1,CRCSAV+2 «, t00=0x00e3, t01=0x0182}
0x163fc…16414               Head {h00=0x0014, h01=0x0050, text=» ST A2,CRCSAV+6 «, t00=0x00e4, t01=0x000a}
0x16414…1642c               Head {h00=0x0014, h01=0x0050, text=» ST A3,CRCSAV+10«, t00=0x00e4, t01=0x0022}
0x1642c…16444               Head {h00=0x0014, h01=0x0050, text=» ST A4,CRCSAV+14«, t00=0x00e4, t01=0x003a}
0x16444…16456               Head {h00=0x000e, h01=0x0050, text=» LDK A1,8 «, t00=0x00e4, t01=0x0052}
0x16456…16474               Head {h00=0x001a, h01=0x0050, text=» LDR A4,A8 GET OLD CRC«, t00=0x00e4, t01=0x0064}
0x16474…1648c               Head {h00=0x0014, h01=0x0050, text=»CRC100 LDR A3,A4«, t00=0x00e4, t01=0x0082}
0x1648c…1649e               Head {h00=0x000e, h01=0x0050, text=» SRL A4,1 «, t00=0x00e4, t01=0x009a}
0x1649e…164b0               Head {h00=0x000e, h01=0x0050, text=» XRR A3,A2«, t00=0x00e4, t01=0x00ac}
0x164b0…164c2               Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x00e4, t01=0x00be}
0x164c2…164d4               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x00e4, t01=0x00d0}
0x164d4…164ea               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CRC110 «, t00=0x00e4, t01=0x00e2}
0x164ea…16500               Head {h00=0x0012, h01=0x0050, text=» XRKL A4,/A001«, t00=0x00e4, t01=0x00f8}
0x16500…16518               Head {h00=0x0014, h01=0x0050, text=»CRC110 SUK A1,1 «, t00=0x00e4, t01=0x010e}
0x16518…1652e               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) CRC100«, t00=0x00e4, t01=0x0126}
0x1652e…1654e               Head {h00=0x001c, h01=0x0050, text=» LDR A8,A4 SAVE NEW CRC «, t00=0x00e4, t01=0x013c}
0x1654e…16562               Head {h00=0x0010, h01=0x0050, text=»CRCSAV EQU *«, t00=0x00e4, t01=0x015c}
0x16562…16574               Head {h00=0x000e, h01=0x0050, text=» LDKL A1,0«, t00=0x00e4, t01=0x0170}
0x16574…16586               Head {h00=0x000e, h01=0x0050, text=» LDKL A2,0«, t00=0x00e4, t01=0x0182}
0x16586…16598 (229, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDKL A3,0«, t00=0x00e5, t01=0x0004}
0x16598…165aa               Head {h00=0x000e, h01=0x0050, text=» LDKL A4,0«, t00=0x00e5, t01=0x0016}
0x165aa…165ba               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x00e5, t01=0x0028}
0x165ba…165c8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e5, t01=0x0038}
0x165c8…165d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0046}
0x165d2…165dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0050}
0x165dc…16608               Head {h00=0x0028, h01=0x0050, text=»* READ CRC CHARACTERS AND CHECK THEM«, t00=0x00e5, t01=0x005a}
0x16608…16628               Head {h00=0x001c, h01=0x0050, text=»* CR = (E) IF CRC WAS OK«, t00=0x00e5, t01=0x0086}
0x16628…16632               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x00a6}
0x16632…1663c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x00b0}
0x1663c…16650               Head {h00=0x0010, h01=0x0050, text=»RDCRC EQU * «, t00=0x00e5, t01=0x00ba}
0x16650…16674               Head {h00=0x0020, h01=0x0050, text=» STR A8,A5 SAVE CURRENT CRC «, t00=0x00e5, t01=0x00ce}
0x16674…1669a               Head {h00=0x0022, h01=0x0050, text=» SUK A5,2 ADJUST STACK POINTER«, t00=0x00e5, t01=0x00f2}
0x1669a…166c2               Head {h00=0x0024, h01=0x0050, text=» IM SYNSW DO NOT SKIP SYNCS NOW «, t00=0x00e5, t01=0x0118}
0x166c2…166e2               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 1 «, t00=0x00e5, t01=0x0140}
0x166e2…16702               Head {h00=0x001c, h01=0x0050, text=» LD A4,CRCSAV+6 SAVE IT «, t00=0x00e5, t01=0x0160}
0x16702…16722               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ BYTE 2 «, t00=0x00e5, t01=0x0180}
0x16722…1674e               Head {h00=0x0028, h01=0x0050, text=» CM SYNSW SYNCS CAN BE SKIPPED AGAIN«, t00=0x00e6, t01=0x0010}
0x1674e…1676e               Head {h00=0x001c, h01=0x0050, text=» LD A2,CRCSAV+6 SAVE IT «, t00=0x00e6, t01=0x003c}
0x1676e…16780               Head {h00=0x000e, h01=0x0050, text=» SLL A2,8 «, t00=0x00e6, t01=0x005c}
0x16780…16792               Head {h00=0x000e, h01=0x0050, text=» XRR A2,A4«, t00=0x00e6, t01=0x006e}
0x16792…167a4               Head {h00=0x000e, h01=0x0050, text=» ADK A5,6 «, t00=0x00e6, t01=0x0080}
0x167a4…167b8               Head {h00=0x0010, h01=0x0050, text=» CW A2,-4,A5«, t00=0x00e6, t01=0x0092}
0x167b8…167c8               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00e6, t01=0x00a6}
0x167c8…167d4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e6, t01=0x00b6}
0x167d4…167e8               Head {h00=0x0010, h01=0x0050, text=» IFT CODE=0 «, t00=0x00e6, t01=0x00c2}
0x167e8…167f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x00d6}
0x167f2…1681c               Head {h00=0x0026, h01=0x0050, text=»*   RDLRC      READ LRC CHARACTER «, t00=0x00e6, t01=0x00e0}
0x1681c…16842               Head {h00=0x0022, h01=0x0050, text=»*              CR=0 IF LRC OK «, t00=0x00e6, t01=0x010a}
0x16842…1684c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x0130}
0x1684c…16862               Head {h00=0x0012, h01=0x0050, text=»RDLRC IM SYNSW«, t00=0x00e6, t01=0x013a}
0x16862…16876               Head {h00=0x0010, h01=0x0050, text=» CF A5,READP«, t00=0x00e6, t01=0x0150}
0x16876…16888               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x00e6, t01=0x0164}
0x16888…1689a               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x00e6, t01=0x0176}
0x1689a…168b0               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LRCEND«, t00=0x00e6, t01=0x0188}
0x168b0…168c6               Head {h00=0x0012, h01=0x0050, text=» ANKL A8,/007F«, t00=0x00e7, t01=0x000e}
0x168c6…168da               Head {h00=0x0010, h01=0x0050, text=»LRCEND EQU *«, t00=0x00e7, t01=0x0024}
0x168da…168ec               Head {h00=0x000e, h01=0x0050, text=» CM SYNSW «, t00=0x00e7, t01=0x0038}
0x168ec…168fc               Head {h00=0x000c, h01=0x0050, text=» ABR* A5«, t00=0x00e7, t01=0x004a}
0x168fc…16904               Head {h00=0x0004, h01=0x0050, t00=0x00e7, t01=0x005a}
0x16904…16910               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e7, t01=0x0062}
0x16910…1691e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e7, t01=0x006e}
0x1691e…1694e               Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x00e7, t01=0x007c}
0x1694e…16958               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x00ac}
0x16958…16974               Head {h00=0x0018, h01=0x0050, text=»*  DRIVER WORK AREAS«, t00=0x00e7, t01=0x00b6}
0x16974…1697e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x00d2}
0x1697e…169ae               Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x00e7, t01=0x00dc}
0x169ae…169b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x010c}
0x169b8…169c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x0116}
0x169c2…169e2               Head {h00=0x001c, h01=0x0050, text=»* DC RECEIVE BUFFER POOL«, t00=0x00e7, t01=0x0120}
0x169e2…169ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x0140}
0x169ec…16a0c               Head {h00=0x001c, h01=0x0050, text=»RLINK EQU RBUFL+RBUFL+8 «, t00=0x00e7, t01=0x014a}
0x16a0c…16a16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x016a}
0x16a16…16a2a               Head {h00=0x0010, h01=0x0050, text=»DCRBUF EQU *«, t00=0x00e7, t01=0x0174}
0x16a2a…16a4e               Head {h00=0x0020, h01=0x0050, text=» DATA *+2 FREE BUFFER ANCHOR«, t00=0x00e7, t01=0x0188}
0x16a4e…16a64               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=2 «, t00=0x00e8, t01=0x001c}
0x16a64…16a7a               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00e8, t01=0x0032}
0x16a7a…16a8e               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00e8, t01=0x0048}
0x16a8e…16aa4               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=3 «, t00=0x00e8, t01=0x005c}
0x16aa4…16aba               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00e8, t01=0x0072}
0x16aba…16ace               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00e8, t01=0x0088}
0x16ace…16ae4               Head {h00=0x0012, h01=0x0050, text=» IFF RBUFNR=4 «, t00=0x00e8, t01=0x009c}
0x16ae4…16afa               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00e8, t01=0x00b2}
0x16afa…16b0e               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00e8, t01=0x00c8}
0x16b0e…16b1a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e8, t01=0x00dc}
0x16b1a…16b30               Head {h00=0x0012, h01=0x0050, text=» DATA *+RLINK «, t00=0x00e8, t01=0x00e8}
0x16b30…16b44               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00e8, t01=0x00fe}
0x16b44…16b60               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF CHAIN«, t00=0x00e8, t01=0x0112}
0x16b60…16b74               Head {h00=0x0010, h01=0x0050, text=» RES RBUFL+3«, t00=0x00e8, t01=0x012e}
0x16b74…16b7c               Head {h00=0x0004, h01=0x0050, t00=0x00e8, t01=0x0142}
0x16b7c…16b92               Head {h00=0x0012, h01=0x0050, text=» IFF MMUPAG=0 «, t00=0x00e8, t01=0x014a}
0x16b92…16bbc               Head {h00=0x0026, h01=0x0050, text=»MMUBUF RES TBUFL+1 MMU WORK BUFFER«, t00=0x00e8, t01=0x0160}
0x16bbc…16bf4               Head {h00=0x0034, h01=0x0050, text=»SUBBUF RES 3 MMU BUFFER FOR CONNECT REQUEST =16 «, t00=0x00e8, t01=0x018a}
0x16bf4…16c00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e9, t01=0x0032}
0x16c00…16c0e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e9, t01=0x003e}
0x16c0e…16c18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x004c}
0x16c18…16c22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x0056}
0x16c22…16c46               Head {h00=0x0020, h01=0x0050, text=»* INTERRUPT LOGGING ROUTINE «, t00=0x00e9, t01=0x0060}
0x16c46…16c50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x0084}
0x16c50…16c5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x008e}
0x16c5a…16c6e               Head {h00=0x0010, h01=0x0050, text=» IFF LOGG=0 «, t00=0x00e9, t01=0x0098}
0x16c6e…16c88               Head {h00=0x0016, h01=0x0050, text=»LOGSST ST A2,SAVE2«, t00=0x00e9, t01=0x00ac}
0x16c88…16c9e               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/F000«, t00=0x00e9, t01=0x00c6}
0x16c9e…16cb0               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00e9, t01=0x00dc}
0x16cb0…16cca               Head {h00=0x0016, h01=0x0050, text=»LOGOUT ST A2,SAVE2«, t00=0x00e9, t01=0x00ee}
0x16cca…16ce0               Head {h00=0x0012, h01=0x0050, text=» ORKL A2,/0F00«, t00=0x00e9, t01=0x0108}
0x16ce0…16cf2               Head {h00=0x000e, h01=0x0050, text=» RF LOG10 «, t00=0x00e9, t01=0x011e}
0x16cf2…16d0a               Head {h00=0x0014, h01=0x0050, text=»LOGIN CWK A2,/FF«, t00=0x00e9, t01=0x0130}
0x16d0a…16d20               Head {h00=0x0012, h01=0x0050, text=» RF(E) LOGE10 «, t00=0x00e9, t01=0x0148}
0x16d20…16d34               Head {h00=0x0010, h01=0x0050, text=» ST A2,SAVE2«, t00=0x00e9, t01=0x015e}
0x16d34…16d4e               Head {h00=0x0016, h01=0x0050, text=»LOG10 ST A3,SAVE3 «, t00=0x00e9, t01=0x0172}
0x16d4e…16d64               Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPNT «, t00=0x00e9, t01=0x018c}
0x16d64…16d76               Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x00ea, t01=0x0012}
0x16d76…16d88               Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x00ea, t01=0x0024}
0x16d88…16d9e               Head {h00=0x0012, h01=0x0050, text=» CWK A3,LOGEND«, t00=0x00ea, t01=0x0036}
0x16d9e…16db4               Head {h00=0x0012, h01=0x0050, text=» RF(L) LOGEXI «, t00=0x00ea, t01=0x004c}
0x16db4…16dcc               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,LOGSTA «, t00=0x00ea, t01=0x0062}
0x16dcc…16de8               Head {h00=0x0018, h01=0x0050, text=»LOGEXI ST A3,LOGPNT «, t00=0x00ea, t01=0x007a}
0x16de8…16dfc               Head {h00=0x0010, h01=0x0050, text=» LD A2,SAVE2«, t00=0x00ea, t01=0x0096}
0x16dfc…16e10               Head {h00=0x0010, h01=0x0050, text=» LD A3,SAVE3«, t00=0x00ea, t01=0x00aa}
0x16e10…16e26               Head {h00=0x0012, h01=0x0050, text=»LOGE10 RTN A5 «, t00=0x00ea, t01=0x00be}
0x16e26…16e34               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ea, t01=0x00d4}
0x16e34…16e3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00e2}
0x16e3e…16e48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00ec}
0x16e48…16e62               Head {h00=0x0016, h01=0x0050, text=»LOGPNT DATA LOGSTA«, t00=0x00ea, t01=0x00f6}
0x16e62…16e76               Head {h00=0x0010, h01=0x0050, text=»LOGSTA EQU *«, t00=0x00ea, t01=0x0110}
0x16e76…16e86               Head {h00=0x000c, h01=0x0050, text=» RES 300«, t00=0x00ea, t01=0x0124}
0x16e86…16e9c               Head {h00=0x0012, h01=0x0050, text=»LOGEND EQU *-4«, t00=0x00ea, t01=0x0134}
0x16e9c…16eb0               Head {h00=0x0010, h01=0x0050, text=»SAVE2 DATA 0«, t00=0x00ea, t01=0x014a}
0x16eb0…16ec4               Head {h00=0x0010, h01=0x0050, text=»SAVE3 DATA 0«, t00=0x00ea, t01=0x015e}
0x16ec4…16ed0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ea, t01=0x0172}
0x16ed0…16eda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x017e}
0x16eda…16ee4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x0188}
0x16ee4…16eee (235, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x0004}
0x16eee…16f02               Head {h00=0x0010, h01=0x0050, text=» IFT RCOM=1 «, t00=0x00eb, t01=0x000e}
0x16f02…16f10               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00eb, t01=0x0022}
0x16f10…16f50               Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x00eb, t01=0x0030}
0x16f50…16f5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x0070}
0x16f5a…16f74               Head {h00=0x0016, h01=0x0050, text=»*     L I N C O L «, t00=0x00eb, t01=0x007a}
0x16f74…16f7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x0094}
0x16f7e…16fbc               Head {h00=0x003a, h01=0x0050, text=»*     CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER«, t00=0x00eb, t01=0x009e}
0x16fbc…16fc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x00dc}
0x16fc6…17008               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x00eb, t01=0x00e6}
0x17008…17010               Head {h00=0x0004, h01=0x0050, t00=0x00eb, t01=0x0128}
0x17010…17024               Head {h00=0x0010, h01=0x0050, text=»LINCOL EQU *«, t00=0x00eb, t01=0x0130}
0x17024…1704a               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 COPY CURSOR ADDRESS«, t00=0x00eb, t01=0x0144}
0x1704a…1705c               Head {h00=0x000e, h01=0x0050, text=» SRL A2,6 «, t00=0x00eb, t01=0x016a}
0x1705c…17072               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00eb, t01=0x017c}
0x17072…1709c (236, 0, 400) Head {h00=0x0026, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII LINE NUMBER«, t00=0x00ec, t01=0x0004}
0x1709c…170c2               Head {h00=0x0022, h01=0x0050, text=» CF A5,WRITEP SEND LINE NUMBER«, t00=0x00ec, t01=0x002e}
0x170c2…170ca               Head {h00=0x0004, h01=0x0050, t00=0x00ec, t01=0x0054}
0x170ca…170dc               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x00ec, t01=0x005c}
0x170dc…170f2               Head {h00=0x0012, h01=0x0050, text=» ANK A2,X'3F' «, t00=0x00ec, t01=0x006e}
0x170f2…1711e               Head {h00=0x0028, h01=0x0050, text=» LC A2,LICO:T,A2 ASCII COLUMN NUMBER«, t00=0x00ec, t01=0x0084}
0x1711e…17146               Head {h00=0x0024, h01=0x0050, text=» CF A5,WRITEP SEND COLUMN NUMBER«, t00=0x00ec, t01=0x00b0}
0x17146…1715c               Head {h00=0x0012, h01=0x0050, text=» RTN A5 RETURN«, t00=0x00ec, t01=0x00d8}
0x1715c…17166               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ec, t01=0x00ee}
0x17166…17170               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ec, t01=0x00f8}
0x17170…1717a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ec, t01=0x0102}
0x1717a…17188               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ec, t01=0x010c}
0x17188…17190               Head {h00=0x0004, h01=0x0050, t00=0x00ec, t01=0x011a}
0x17190…17198               Head {h00=0x0004, h01=0x0050, t00=0x00ec, t01=0x0122}
0x17198…171ac               Head {h00=0x0010, h01=0x0050, text=»LICO:T EQU *«, t00=0x00ec, t01=0x012a}
0x171ac…171da               Head {h00=0x002a, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 /00-/07 «, t00=0x00ec, t01=0x013e}
0x171da…17208               Head {h00=0x002a, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 /08-/0F «, t00=0x00ec, t01=0x016c}
0x17208…17236               Head {h00=0x002a, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 «, t00=0x00ed, t01=0x000a}
0x17236…17264               Head {h00=0x002a, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E /18-/1F «, t00=0x00ed, t01=0x0038}
0x17264…17292               Head {h00=0x002a, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 /20-/27 «, t00=0x00ed, t01=0x0066}
0x17292…172c0               Head {h00=0x002a, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F /28-/2F «, t00=0x00ed, t01=0x0094}
0x172c0…172ec               Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 /30-37«, t00=0x00ed, t01=0x00c2}
0x172ec…17318               Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 /38-3F«, t00=0x00ed, t01=0x00ee}
0x17318…17324               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ed, t01=0x011a}
0x17324…17332               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ed, t01=0x0126}
0x17332…1733c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0134}
0x1733c…1734c               Head {h00=0x000c, h01=0x0050, text=»* DTETAB«, t00=0x00ed, t01=0x013e}
0x1734c…17356               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x014e}
0x17356…1736a               Head {h00=0x0010, h01=0x0050, text=»* FIXED PART«, t00=0x00ed, t01=0x0158}
0x1736a…17374               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x016c}
0x17374…17388               Head {h00=0x0010, h01=0x0050, text=»DW1500 EQU *«, t00=0x00ed, t01=0x0176}
0x17388…173a0               Head {h00=0x0014, h01=0x0050, text=»DTETAB DATA 0,0 «, t00=0x00ed, t01=0x018a}
0x173a0…173ba               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x00ee, t01=0x0012}
0x173ba…173d0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x00ee, t01=0x002c}
0x173d0…173e2               Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x00ee, t01=0x0042}
0x173e2…173ee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ee, t01=0x0054}
0x173ee…1740e               Head {h00=0x001c, h01=0x0050, text=»* DRIVER DEPENDENT PART «, t00=0x00ee, t01=0x0060}
0x1740e…17444               Head {h00=0x0032, h01=0x0050, text=» DATA DTESBU-DTETAB START OF STATISTIC BUFFER «, t00=0x00ee, t01=0x0080}
0x17444…1745e               Head {h00=0x0016, h01=0x0050, text=» DATA 0,0,0,0,0,0 «, t00=0x00ee, t01=0x00b6}
0x1745e…1747a               Head {h00=0x0018, h01=0x0050, text=» DATA 0,0,0,0,0,0  *«, t00=0x00ee, t01=0x00d0}
0x1747a…1748e               Head {h00=0x0010, h01=0x0050, text=»DTESBU EQU *«, t00=0x00ee, t01=0x00ec}
0x1748e…174aa               Head {h00=0x0018, h01=0x0050, text=» DATA 0 SYMBOLIC ID «, t00=0x00ee, t01=0x0100}
0x174aa…174ce               Head {h00=0x0020, h01=0x0050, text=» DATA 0 COUNTER STATUS WORD «, t00=0x00ee, t01=0x011c}
0x174ce…174f6               Head {h00=0x0024, h01=0x0050, text=» DATA /20 MAX NUMBER OF COUNTERS«, t00=0x00ee, t01=0x0140}
0x174f6…17518               Head {h00=0x001e, h01=0x0050, text=» RES /20 STATISTIC BUFFER «, t00=0x00ee, t01=0x0168}
0x17518…17526               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ee, t01=0x018a}
0x17526…17530               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x0008}
0x17530…1753a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x0012}
0x1753a…17558               Head {h00=0x001a, h01=0x0050, text=»* PROCEDURE WORK AREAS«, t00=0x00ef, t01=0x001c}
0x17558…17562               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x003a}
0x17562…1756c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x0044}
0x1756c…1759a               Head {h00=0x002a, h01=0x0050, text=»FDWTIN RES 1 CURRENT DWT FOR RECEPTION«, t00=0x00ef, t01=0x004e}
0x1759a…175cc               Head {h00=0x002e, h01=0x0050, text=»FDWTUT RES 1 CURRENT DWT FOR TRANSMISSION «, t00=0x00ef, t01=0x007c}
0x175cc…175ec               Head {h00=0x001c, h01=0x0050, text=»XACK DATA 0 ACK EXPECTED«, t00=0x00ef, t01=0x00ae}
0x175ec…17608               Head {h00=0x0018, h01=0x0050, text=»XSEL DATA 0 SELECTED«, t00=0x00ef, t01=0x00ce}
0x17608…17624               Head {h00=0x0018, h01=0x0050, text=»XETX DATA 0 ETX SENT«, t00=0x00ef, t01=0x00ea}
0x17624…1765a               Head {h00=0x0032, h01=0x0050, text=»XSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT«, t00=0x00ef, t01=0x0106}
0x1765a…17680               Head {h00=0x0022, h01=0x0050, text=»XRB DATA 0 READ BUFFER SWITCH «, t00=0x00ef, t01=0x013c}
0x17680…176a0               Head {h00=0x001c, h01=0x0050, text=»CACK DATA 0 ACK COUNTER «, t00=0x00ef, t01=0x0162}
0x176a0…176ce               Head {h00=0x002a, h01=0x0050, text=»SYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP«, t00=0x00ef, t01=0x0182}
0x176ce…176f8               Head {h00=0x0026, h01=0x0050, text=»TPM DATA 0 IF =1 TRANSPARENT TEXT «, t00=0x00f0, t01=0x0020}
0x176f8…17702               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x004a}
0x17702…17720               Head {h00=0x001a, h01=0x0050, text=»FECB RES 1 WRITING ECB«, t00=0x00f0, t01=0x0054}
0x17720…1774c               Head {h00=0x0028, h01=0x0050, text=»FECBBA RES 1 WRITING BUFFER ADDRESS «, t00=0x00f0, t01=0x0072}
0x1774c…17776               Head {h00=0x0026, h01=0x0050, text=»FECBRL RES 1 WRITING BUFFER LENGTH«, t00=0x00f0, t01=0x009e}
0x17776…17796               Head {h00=0x001c, h01=0x0050, text=»FBAX DATA 0 BUFFER INDEX«, t00=0x00f0, t01=0x00c8}
0x17796…177ca               Head {h00=0x0030, h01=0x0050, text=»FBLST DATA 0 START OF LAST TRANSMITTED BLOCK«, t00=0x00f0, t01=0x00e8}
0x177ca…177f2               Head {h00=0x0024, h01=0x0050, text=»DCSTQ DATA 0 STATUS QUEUE ANCHOR«, t00=0x00f0, t01=0x011c}
0x177f2…17824               Head {h00=0x002e, h01=0x0050, text=»DCTPP DATA 0 POINTER FOR PROCEDURE TIMING «, t00=0x00f0, t01=0x0144}
0x17824…1784c               Head {h00=0x0024, h01=0x0050, text=»DCWRQ DATA 0 WRITE REQUEST QUEUE«, t00=0x00f0, t01=0x0176}
0x1784c…1787c               Head {h00=0x002c, h01=0x0050, text=»RESEND DATA 0 CONTROL SEQUENCE SAVE AREA«, t00=0x00f1, t01=0x000e}
0x1787c…17886               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x003e}
0x17886…17894               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f1, t01=0x0048}
0x17894…1789e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0056}
0x1789e…178a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0060}
0x178a8…178ca               Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS AND WORK AREAS«, t00=0x00f1, t01=0x006a}
0x178ca…178d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x008c}
0x178d4…178de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0096}
0x178de…17902               Head {h00=0x0020, h01=0x0050, text=»DCSTCU DATA 0 CURRENT STATUS«, t00=0x00f1, t01=0x00a0}
0x17902…17932               Head {h00=0x002c, h01=0x0050, text=»DCTPGP DATA 0 TIMER POINTER GENERAL POLL«, t00=0x00f1, t01=0x00c4}
0x17932…1795c               Head {h00=0x0026, h01=0x0050, text=»DCLCI DATA 0 DC UNIT INPUT STATUS «, t00=0x00f1, t01=0x00f4}
0x1795c…17968               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x00f1, t01=0x011e}
0x17968…1796c               Head {h00=0x4004, h01=0x0000}
0x1796c…17970               00 f1 01 2a                                                                                                                                                                                                                                       ┆   *┆
0x17970…17978 (242, 1, 8)   20 04 00 00 00 f2 00 04                                                                                                                                                                                                                           ┆        ┆
0x17978…179c8 (243, 0, 400) 02 04 c2 45 43 42 43 57 31 00 00 02 01 90 00 2c 00 28 03 13 00 00 02 4b 00 08 82 58 00 2e 3a 44 92 5c 00 1c 3a 44 92 5c 00 1a 3a 44 92 5c 00 18 82 43 00 00 00 16 8f 20 00 00 00 03 00 12 00 2c 00 28 03 13 00 00 02 69 04 00 8f 20 00 00 8f 20   ┆   ECBCW1      , (     K   X .:D    :D    :D     C             , (     i        ┆
0x179c8…17a18               00 00 82 42 00 00 00 16 82 59 00 1e 8f 20 00 00 82 58 00 2e 1a 02 8c 20 00 00 00 03 00 42 00 0e 00 0a 02 04 c2 44 57 54 4f 50 54 00 00 03 00 72 00 2c 00 28 03 13 00 00 02 87 00 40 82 5c 00 18 88 20 00 00 82 5c 00 1a 88 20 00 00 e2 58 00 00   ┆   B     Y       X .         B       DWTOPT    r , (       @                 X  ┆
0x17a18…17a68               00 18 22 ff 50 00 1a 20 8c 20 00 00 00 03 00 84 00 2c 00 28 03 13 00 00 02 a5 01 00 f7 a1 00 00 f7 a1 00 00 f7 a1 00 00 8f 20 00 00 00 0e 82 58 00 2e 1a 02 8c 20 00 00 82 5c 00 18 00 03 00 b4 00 0c 00 08 02 03 a2 45 43 42 45 4c 00 03 00 e4   ┆  " P            , (                           X .                     ECBEL    ┆
0x17a68…17ab8               00 2a 00 26 03 12 00 00 02 c3 00 00 88 20 00 00 84 58 00 26 54 00 82 5c 00 1a 88 20 00 00 f7 a1 00 00 57 00 83 50 00 02 83 43 00 03 00 f4 00 0e 00 0a 02 04 c2 47 45 54 53 53 41 00 00 03 01 22 00 2c 00 28 03 13 00 00 02 e1 81 20 00 00 00 1a   ┆ * &             X &T             W  P   C           GETSSA    " , (            ┆
0x17ab8…17b08               81 58 00 16 82 50 00 04 f7 a1 00 00 00 1c 81 43 00 00 00 04 01 00 82 30 50 00 a9 20 00 03 01 34 00 0e 00 0a 02 04 c2 44 43 3a 4d 49 4e 00 00 03 01 64 00 2c 00 28 03 13 00 00 02 fb 04 80 01 00 82 59 00 26 14 06 f7 a1 00 00 00 1e 8f 20 00 00   ┆ X   P         C       0P      4       DC:MIN    d , (           Y &            ┆
0x17b08…17b58 (244, 0, 400) 00 0e 81 20 80 00 57 00 81 20 40 00 57 00 00 03 01 76 00 0e 00 0a 02 04 c2 44 49 53 45 4e 44 00 00 04 00 16 00 2c 00 28 03 13 00 00 03 17 00 08 01 40 57 00 01 10 57 00 01 08 57 00 01 02 57 00 01 01 57 00 01 00 8f 20 00 00 00 20 83 3e 83 3e   ┆      W   @ W    v       DISEND      , (         @W   W   W   W   W          > >┆
0x17b58…17ba8               00 04 00 28 00 2c 00 28 03 13 00 00 03 35 00 00 84 2c 81 4c 00 02 13 04 eb 10 51 00 ea 2c 5c 0a 8f 4c 00 02 80 04 81 18 82 58 00 1e 52 00 50 00 00 04 00 58 00 0e 00 0a 02 04 c2 53 45 54 49 4d 45 00 00 04 00 88 00 2c 00 28 03 13 00 00 03 55   ┆   ( , (     5   , L      Q  ,   L       X  R P    X       SETIME      , (     U┆
0x17ba8…17bf8               10 00 82 41 00 00 f7 a1 00 00 00 22 00 00 00 00 84 59 00 20 8f 20 00 00 97 a0 00 04 57 00 86 04 a0 59 00 04 00 9a 00 2c 00 28 03 13 00 00 03 73 00 20 00 20 57 00 81 18 82 58 00 1e 5a 1a 58 18 82 41 00 00 f7 a1 00 00 00 22 00 00 00 00 84 59   ┆   A       "     Y          W    Y     , (     s    W    X  Z X  A       "     Y┆
0x17bf8…17c48               00 20 00 04 00 ca 00 2c 00 28 03 13 00 01 03 91 00 00 5f 2e 86 04 a0 59 00 20 f7 a1 00 00 82 40 00 00 ea 18 54 00 a0 41 00 00 a0 41 00 00 8f 20 03 16 00 04 00 fa 00 2c 00 28 03 13 00 00 03 b1 00 00 82 58 00 20 50 00 a0 79 00 20 a0 59 00 20   ┆       , (        _.   Y       @    T  A   A           , (         X  P  y   Y  ┆
0x17c48…17c98               8f 20 00 00 82 20 00 00 20 bf 84 28 50 00 83 30 83 29 00 04 01 2a 00 2c 00 28 03 13 00 00 03 d1 00 00 8f 20 00 00 82 20 00 00 20 bf 83 28 50 00 82 0c 5f 08 84 29 a0 31 5f 18 01 26 91 18 84 24 58 20 00 04 01 5a 00 2c 00 28 03 13 10 00 03 f1   ┆           (P  0 )   * , (                   (P   _  ) 1_  &   $X    Z , (      ┆

Reduced view