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

⟦86059ffe0⟧

    Length: 189914 (0x2e5da)
    Notes: pts_type(SC)
    Names: »X25:L3.SC«

Derivation

└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
    └─⟦this⟧ »TOSSWORK/X25:L3.SC« 

PTS(SC)

	IDENT	X25:L3	REL 11.0 81-07-06 870105041100
			=1, CF A15 IN INHIBIT
			=2,  MISSING RET. CODE 
* 
********************************************
* 
*	PHILIPS TERMINAL SYSTEM PTS 
* 
*	X25-L3:	DRIVER FOR DATA COMMUNICATION 
*		SERVING THE PACKET LEVEL AS
*		DEFINED IN X25 LEVEL 3.
* 
* 
********************************************
* 
* 
* 
	EJECT
* 
************************************************************
* 
* 
*	ORDERS :
* 
*	/00  READ STATUS
* 
*	/02  READ 
* 
*	/06  WRITE
* 
*	/21  OPEN 
* 
*	/22  CLOSE
* 
*	/24  CONNECT ACTIVE 
* 
*	/27  CONNECT PASSIVE
* 
*	/2F  DISCONNECT 
* 
*	/2D  GET STATISTICS 
* 
*	/38  SET STATUS 
* 
*	/39  SET TIMER
* 
* 
************************************************************
* 
	EJECT
* 
********************************************
* 
*	E N T R I E S 
* 
********************************************
* 
	ENTRY	REQTIM	REQUEST TIME OUT VALUE
	ENTRY	X25:ON	POWER ON ROUTINE
	ENTRY	DRX25	ACTIVATION 
* 
	EJECT
* 
********************************************
* 
*	E X T E R N A L S 
* 
********************************************
* 
*	ECB - DISPLACEMENTS 
* 
	EXTRN	ECBFC	FILE CODE
	EXTRN	ECBBA	BUFFER ADDRESS 
	EXTRN	ECBRL	REQUESTED LENGTH 
	EXTRN	ECBEL	EFFECTIVE LENGTH 
	EXTRN	ECBRC	RETURN CODE
	EXTRN	ECBCW1 
	EXTRN	ECBCW2 
* 
*	DWT - DISPLACEMENTS: FIXED PART 
* 
	EXTRN	DWTCHP	CHANNEL PARAMETERS
	EXTRN	DWTST	STATUS 
	EXTRN	DWTECB	ECB-ADDRESS 
	EXTRN	DWTOPT	OPTION
	EXTRN	DWTOR	ORDER
	EXTRN	DWTTAB	TTAB-ADDRESS
* 
	EJECT
* 
*	MONITOR ROUTINES
* 
	EXTRN	FNDTID	FIND TTAB-ADDRESS 
	EXTRN	SETIME	TIMER ROUTINE 
	EXTRN	ACTOT	TASK ACTIVATION ROUTINE
	EXTRN	TDISP	TOSS DISPATCHER
	EXTRN	MOVSU	MOVE DATA FROM SYSTEM TO USER
	EXTRN	MOVUS	MOVE DATA FROM USER TO SYSTEM
	EXTRN	TENDIO	TOSS END I/O ROUTINE
	EXTRN	GETBLK	GET A MONITOR BLOCK 
	EXTRN	FREBLK	RELEASE A MONITOR BLOCK 
	EXTRN	FNDDNT	FIND LOCAL DTE
	EXTRN	GETDST	GET SYMBOLIC DTE ADDRESS
	EXTRN	GETDNA	GET DTE NETWORK ADDRESS 
	EXTRN	GETDNT	GET DTE NETWORK ADDR.FOR A SPEC.TYPE
	EXTRN	SCTDCT	POINTER TO DC ADDR. TABLE 
	EXTRN	TRAC	TRACE ROUTINE 
	EXTRN	TRTASK	TTAB ADDRESS FOR #T-TASK
* 
*	TTAB DISPLACEMENTS
* 
         EXTRN    TTB:ST
	EXTRN	TTB:PW	PSW 
         EXTRN    TTB:SA           REGISTER SAVE AREA 
* 
	EJECT
****************************************************************************
* 
*	A PROGRAM VERSION USING MMU PAGING IS OBTAINED
*	BY SETTING MMUPAG TO 1
* 
MMUPAG	EQU	0
* 
****************************************************************************
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 TO 0
* 
CPU852	EQU	1
* 
*************************************************************************** 
* 
	EJECT
* 
X:A	EQU	1 
SYNRLN	EQU	X:A	NUMBER OF PHYSICAL LINES 
* 
X:B	EQU	600 
REQTIM	EQU	X:B	REQUEST TIME OUT VALUE(IN 100MS) 
* 
X:C	EQU	128 
SYMXDL	EQU	X:C	OVER ALL MAXIMUM USER DATA LENGTH
* 
X:D	EQU	3 
SYNRL1	EQU	X:D	# OF LOGICAL CHANNELS LINE 1 
* 
X:H	EQU	2 
SYMXW1	EQU	X:H	WINDOW SIZE,PACKET LEVEL,LINE 1
* 
X:L	EQU	128 
SYMDL1	EQU	X:L	MAXIMUM USER DATA LENGTH,LINE 1
* 
X:P	EQU	0 
SYNRP1	EQU	X:P	# OF PERMANENT VIRTUAL CIRCUITS,LINE1
* 
X:T	EQU	0 
CALDTE	EQU	X:T	LOCAL DTE-ADDRESS IN CALL PACKET ? 
* 
X:U	EQU	0 
STATI	EQU	X:U	STATISTICS OF HDLC PROTOCOL HANDLER 
* 
	EJECT
* 
	IFF	SYNRLN=1 
* 
X:E	EQU	3 
SYNRL2	EQU	X:E	# OF LOGICAL CHANNELS LINE 2 
* 
X:I	EQU	2 
SYMXW2	EQU	X:I	WINDOW SIZE,PACKET LEVEL,LINE 2
* 
X:M	EQU	128 
SYMDL2	EQU	X:M	MAXIMUM USER DATA LENGTH,LINE 2
* 
X:Q	EQU	0 
SYNRP2	EQU	X:Q	# OF PERMANENT VIRTUAL CIRCUITS,LINE 2 
* 
	IFF	SYNRLN=2 
* 
X:F	EQU	3 
SYNRL3	EQU	X:F	# OF LOGICAL CHANNELS,LINE 3 
* 
X:J	EQU	2 
SYMXW3	EQU	X:J	WINDOW SIZE,PACKET LEVEL,LINE 3
* 
X:N	EQU	128 
SYMDL3	EQU	X:N	MAXIMUM USER DATA LENGTH,LINE 3
* 
X:R	EQU	0 
SYNRP3	EQU	X:R	# OF PERMANENT VIRTUAL CIRCUITS,LINE 3 
* 
	IFF	SYNRLN=3 
* 
X:G	EQU	3 
SYNRL4	EQU	X:G	# OF LOGICAL CHANNELS,LINE 4 
* 
X:K	EQU	2 
SYMXW4	EQU	X:K	WINDOW SIZE,PACKET LEVEL,LINE 4
* 
X:O	EQU	128 
SYMDL4	EQU	X:O	MAXIMUM USER DATA LENGTH,LINE 4
* 
X:S	EQU	0 
SYNRP4	EQU	X:S	# OF PERMANENT VIRTUAL CIRCUITS,LINE 4 
* 
	XIF
* 
SYNRRC	EQU	2	# OF READ REQUESTS FOR HDLC
* 
SYNRTR	EQU	2	# OF WRITE REQUESTS FOR HDLC 
* 
SYUBNR	EQU	2	# OF INPUT BUFFERS FOR HDLC
* 
SYCLTM	EQU	600	CLEAR TIME OUT VALUE IN 100MS
* 
SYRETM	EQU	600	RESET TIME OUT VALUE IN 100MS

SYRSTM	EQU	600	RESTART TIME OUT VALUE IN 100MS
* 
BUFDEL	EQU	1	TIMER IN 100MS FOR WAIT FOR BUFFER 
* 
LOOP	EQU	0	LOOP TEST IN MODEM 
* 
TRACE	EQU	0	TRACE TASK IN SYSTEM
BYTE	FORM	8,8 
* 
	EJECT
* 
	IFT	SYNRLN=1 
PERMVC	EQU	SYNRP1 
SWITVC	EQU	SYNRL1-SYNRP1
	XIF
	IFT	SYNRLN=2 
PERMVC	EQU	SYNRP1+SYNRP2
SWDUM1	EQU	SYNRL1+SYNRL2
SWITVC	EQU	SWDUM1-PERMVC
	XIF
	IFT	SYNRLN=3 
PEDUM1	EQU	SYNRP1+SYNRP2
PERMVC	EQU	PEDUM1+SYNRP3
SWDUM1	EQU	SYNRL1+SYNRL2
SWDUM2	EQU	SWDUM1+SYNRL3
SWITVC	EQU	SWDUM2-PERMVC
	XIF
	IFT	SYNRLN=4 
PEDUM1	EQU	SYNRP1+SYNRP2
PEDUM2	EQU	SYNRP3+SYNRP4
PERMVC	EQU	PEDUM1+PEDUM2
SWDUM1	EQU	SYNRL1+SYNRL2
SWDUM2	EQU	SYNRL3+SYNRL4
SWDUM3	EQU	SWDUM1+SWDUM2
SWITVC	EQU	SWDUM3-PERMVC
	XIF
* 
*	TRANSLATION TABLE FROM THROUGHPUT CLASS 
*	TO WINDOW SIZE AND PACKET LENGTH
* 
CLAS1	BYTE	1,128	CLASS 1,LAYOUT: WINDOW SIZE/PACKET LENGTH
	BYTE	1,128	CLASS 2 
	BYTE	1,128	CLASS 3 
	BYTE	1,128	CLASS 4 
	BYTE	1,128	CLASS 5 
	BYTE	1,128	CLASS 6 
	BYTE	2,128	CLASS 7 
	BYTE	3,128	CLASS 8 
	BYTE	3,128	CLASS 9 
	BYTE	3,128	CLASS 10
	BYTE	3,128	CLASS 11
	BYTE	3,128	CLASS 12
	BYTE	3,128	CLASS 13
	BYTE	3,128	CLASS 14
	BYTE	3,128	CLASS 15
* 
	EJECT		DWT 
* 
*	DWT DISPLACEMENTS 
* 
	IFT	MMUPAG=0 
DWTDRD	EQU	/10	DWTTQ+2
	XIF
	IFT	MMUPAG=1 
DWTDRD	EQU	/14	DWTMEC+2 
	XIF
DWTSTB	EQU	DWTDRD	OFFSET REL START DWT TO STATISTIC BUFFER
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 
DWTWRO	EQU	DWTDRD+10	WRITE OPTION 
DWTLCN	EQU	DWTDRD+11	LOGICAL CHANNEL NUMBER 
DWTFNC	EQU	DWTDRD+12	FUNCTION CODE
DWTSTE	EQU	DWTDRD+13	DWT STATE
DWTRTV	EQU	DWTDRD+14	REQUEST TIMER VALUE
DWTRTP	EQU	DWTDRD+16	REQUEST TIMER POINTER
DWTRCI	EQU	DWTDRD+18	RETURN CODE INFORMATION
DWTRES	EQU	DWTDRD+20	CAUSE AND DIAGNOSTIC CODE FOR RESET
DWTCLE	EQU	DWTDRD+22	CAUSE AND DIAGNOSTIC CODE FOR CLEAR
DWTIPQ	EQU	DWTDRD+24	INPUT QUEUE(IF LC CLEARED) 
* 
*	IDENTIFICATION OF A DWT FOR A VC; USED IN DWTCHP
* 
DWTTYP	EQU	'VC'	VIRTUAL CIRCUIT 
* 
	EJECT		DWT 
* 
*	INTERNAL FUNCTION CODES; USED IN DWTFNC 
* 
OPESYS	EQU	/00	OPEN REQUEST 
CLOSYS	EQU	/02	CLOSE REQUEST
CONACT	EQU	/04	CONNECT ACTIVE REQUEST 
CONPAS	EQU	/06	CONNECT PASSIVE REQUEST
DISCAL	EQU	/08	DISCONNECT REQUEST 
ACCCAL	EQU	/0A	ACCEPT CALL
ACCDAT	EQU	/0C	ACCEPT DATA
REFDAT	EQU	/0E	REFUSE DATA REQUEST
WRIDAT	EQU	/10	WRITE REQUEST
WRIINT	EQU	/12	WRITE INTERRUPT
READAT	EQU	/14	READ REQUEST 
REASTA	EQU	/16	READ STATUS REQUEST
STATIS	EQU	/18	STATISTICAL REQUEST
* 
*	DWT STATE CODES; USED IN DWTSTE 
* 
DISCON	EQU	/00	DISCONNECTED STATE 
CONAD	EQU	/01	CONNECTED: ACCEPT DATA
CONRD	EQU	/02	CONNECTED: REFUSE DATA
INCALR	EQU	/03	INC.CALL RECEIVED(WITH ACC/REF CALL) 
INCALL	EQU	/04	INC.CALL REC.(WITHOUT ACC/REF CALL)
VCREL	EQU	/05	VC IS RELEASED
* 
*	OPTION CODES; USED IN DWTOPT AND DWTWRO 
* 
CLOOPT	EQU	/08	SOFT CLOSE 
MOPT	EQU	/10	M-BIT
CALOPT	EQU	/20	ACCEPT CALL
INTOPT	EQU	/40	INTERRUPT PACKET 
QOPT	EQU	/80	Q-BIT
* 
	EJECT		USER
* 
*	RETURN CODES OF A USER REQUEST
* 
ACPT.RC	EQU	/0000	ACCEPTED
RQUE.RC	EQU	/8000	REQUEST ERROR 
ABOT.RC	EQU	/4000	REQUEST ABORTED 
INTR.RC	EQU	/2000	INTERRUPT PACKET RECEIVED 
LAST.RC	EQU	/1000	LAST PACKET IN SEQUENCE 
NOTU.RC	EQU	/0800	NOT USED
QBIT.RC	EQU	/0400	Q-BIT SET IN PACKET 
NOLC.RC	EQU	/0200	LOGICAL CHANNEL NOT AVAILABLE 
DATA.RC	EQU	/0100	DATA RECEIVED AND QUEUED
MORE.RC	EQU	/0080	MORE INFORMATION
TIMO.RC	EQU	/0040	TIME OUT
RSET.RC	EQU	/0020	VC RESET,LOCAL OR REMOTE
SEQE.RC	EQU	/0010	SEQUENCE ERROR
INVL.RC	EQU	/0008	INVALID LENGTH
CLEA.RC	EQU	/0004	VC CLEARED,LOCAL OR REMOTE
LOGE.RC	EQU	/0002	LOGICAL ERROR 
PHYE.RC	EQU	/0001	PHYSICAL ERROR
TOLD.RC	EQU	/0001	RETURN INFO.TOLD TO USER(INTERNAL PAR.) 
* 
*	RETURN CODES FROM LEVEL 3 TO REQUEST HANDLER
* 
RTNOK	EQU	/00	RETURN CODE = OK
CLEBUS	EQU	/02	CLEAR REQUEST BUSY 
DISCRM	EQU	/04	REMOTE DISCONNECTED
HRDERR	EQU	/06	HARDWARE ERROR 
ILLSIZ	EQU	/0A	NO MAX. PACKET LENGTH WHEN M=1 
INVSTA	EQU	/0C	NO CORRECT LOG. CHANNEL STATE
MAXLNG	EQU	/0E	MAX. LENGTH EXCEEDED FOR TRANSM. 
NOLCAV	EQU	/10	NO LOGICAL CHANNEL AVAILABLE 
TMEOUT	EQU	/12	TIME OUT DETECTED
NOREMO	EQU	/14	REMOTE ADDRESS NOT SUPPORTED 
* 
	EJECT		USER
* 
*	DIAGNOSTIC CODES FOR THE REMOTE USER
* 
LOCPER	EQU	/01	LOCAL PROCEDURE ERROR
NOUSER	EQU	/02	NO USER KNOWN
NOTINT	EQU	/03	NO INTERESTED USER 
RESLCH	EQU	/04	LOCAL SEQUENCE ERROR 
* 
*	DIAGNOSTIC CODES FOR THE LOCAL USER 
* 
LOCCLE	EQU	/80	VC IS CLEARED LOCAL
RSTRED	EQU	/82	RESTART PACKET RECEIVED
* 
	EJECT		SYSTEM
* 
*	EQUATE VALUES FOR BUFFER LAY-OUT
* 
BFCHPT	EQU	-2	QUEUE CHAIN POINTER 
HDLC	EQU	/00	HDLC HEADER
GNFRM	EQU	/02	GENERAL FORMAT IDENTIFIER 
QBIT	EQU	/02	CHARACTER DISPLACEMENT OF Q-BIT
LCIDNT	EQU	/03	LOGICAL CHANNEL NUMBER 
IDENT	EQU	/04	PACKET TYPE 
MBIT	EQU	/04	CHARACTER DISPLACEMENT OF M-BIT
BEGDAT	EQU	/05	USER DATA IN DATA PACKET 
CAUSE	EQU	/05	RESET-, RESTART OR CLEARING CAUSE 
DGNCOD	EQU	/06	DIAGNOSTIC CODE
QPOS	EQU	/80	MASK FOR Q-BIT 
MPOS	EQU	/10	MASK FOR M-BIT 
* 
*	EQUATE VALUES FOR PACKET TYPES
* 
CAL.P	EQU	/0B	CALL PACKET 
CAL.CP	EQU	/0F	CALL CONFIRMATION PACKET 
CLE.P	EQU	/13	CLEAR PACKET
CLE.CP	EQU	/17	CLEAR CONFIRMATION PACKET
DATA.P	EQU	/01	DATA PACKET
INT.P	EQU	/23	INTERRUPT PACKET
INT.CP	EQU	/27	INTERRUPT CONFIRMATION PACKET
RR.P	EQU	/01	RR-PACKET
RNR.P	EQU	/05	RNR-PACKET
RSET.P	EQU	/1B	RESET PACKET 
RSET.CP	EQU	/1F	RESET CONFIRMATION PACKET 
RSTR.P	EQU	/FB	RESTART PACKET 
RSTR.CP	EQU	/FF	RESTART CONFIRMATION PACKET 
	EJECT		SYSTEM
* 
*	EQUATE VALUES FOR PACKET LENGTH 
* 
CAL.CL	EQU	/05	CALL CONFIRMATION
CLE.L	EQU	/07	CLEAR PACKET
CLE.CL	EQU	/05	CLEAR CONFIRMATION PACKET
INT.L	EQU	/06	INTERRUPT PACKET
INT.CL	EQU	/05	INTERRUPT CONFIRMATION PACKET
RR.L	EQU	/05	RR-PACKET
RSET.L	EQU	/07	RESET PACKET 
RSET.CL	EQU	/05	RESET CONFIRMATION PACKET 
RSTR.L	EQU	/07	RESTART PACKET 
RSTR.CL	EQU	/05	RESTART CONFIRMATION PACKET 
* 
*	SYSTEM VARIABLES
* 
NEG	EQU	/8000 
LOCAL	EQU	'LP'	LOCAL PACKET SWITCHING DTE 
SVCTYP	EQU	'RS'	REMOTE DTE REACHED VIA SVC
PVCTYP	EQU	'RP'	REMOTE DTE REACHED VIA PVC
TSKID	EQU	'#X'	TASK IDENTIFICATION X25-TASK 
SAVE	RES	8	SAVE AREA
THRESH	DATA	50	PERCENTAGE FOR WIND. UPDATING
DCLEVL	DATA	0	PROCESS INDICATION DC-TASK
	DATA	0,0	EXTEND DC-STACK 
	RES	12	CALL FUNCTION STACK 
DCSTAK	EQU	*-2	STACK POINTER
* 
* 
	EJECT		LC
* 
*	LOGICAL CHANNEL TABLE DISPLACEMENT
* 
LCSTAT	EQU	0	STATUS 
LCSBST	EQU	LCSTAT+1	SUB-STATUS
VCTYP	EQU	LCSBST+1	CIRCUIT TYPE 
LCNUM	EQU	VCTYP+1	LOG. CHANNEL NUMBER 
LCDWT	EQU	LCNUM+1	DWT ADDRESS 
LCTHRE	EQU	LCDWT+2	THRESHOLD VALUE
NRNUBF	EQU	LCTHRE+1	# OF NOT USED BUFFERS 
QUEINP	EQU	NRNUBF+1	INPUT QUEUE ANCHOR
QUEOUT	EQU	QUEINP+2	OUTPUT QUEUE ANCHOR 
LCTRWN	EQU	QUEOUT+2	TRANSMIT WINDOW 
LCREWN	EQU	LCTRWN+1	RECEIVE WINDOW
PS	EQU	LCREWN+1	NEXT PACKET SEND SEQU. NR.
PR	EQU	PS+1	CURRENT PACKET RECEIVE SEQU. NR.
RPS	EQU	PR+1	NEXT PS TO BE RECIEVED 
SLWE	EQU	RPS+1	SEND LWE = LAST RECEIVED PR
RLWE     EQU      SLWE+1           LAST TRANSMITTED PR
NOUSE	EQU	RLWE+1	NOT USED 
REMADR	EQU	NOUSE+1	REMOTE DTE IF PVC
REBFSZ	EQU	REMADR+2	MAX.RECEIVE PACKET LENGTH 
TRBFSZ	EQU	REBFSZ+2	MAX. TRANSM. PACKET LENGTH
FLAGS	EQU	TRBFSZ+2	FLAGS
TIMADR	EQU	FLAGS+2	TIMER ADDRESS
SYSBUF	EQU	TIMADR+4	SYSTEM OUTPUT BUFFER
LCALNG	EQU	SYSBUF+8	TABLE LENGTH
* 
	EJECT		LC
* 
*	EQUATE VALUES FOR LOGICAL CHANNEL STATUS
* 
READ.ST	EQU	/00	READY STATE 
LCAL.ST	EQU	/01	LOCAL CALL STATE
RCAL.ST	EQU	/02	REMOTE CALL STATE 
DATA.ST	EQU	/03	DATA TRANSFER STATE 
CLEA.ST	EQU	/04	CLEAR STATE 
FLCN.ST	EQU	/00	FLOW CONTROL READY SUB-STATE
RSET.ST	EQU	/01	RESET SUB-STATE 
* 
*	EQUATE VALUES FOR CIRCUIT TYPE
* 
PVC	EQU	/01	PERMANENT VIRTUAL CIRCUIT 
SVC	EQU	/00	SWITCHED VIRTUAL CIRCUIT
* 
	EJECT		LINE
* 
*	LINE ADMINISTRATION BLOCK DISPLACEMENTS 
* 
FILCOD	EQU	0	FILE CODE FOR LINE ADDRESSING
LC:TAB	EQU	FILCOD+2	LC-ADM'S TABLE ADDRESS
PACKLN	EQU	LC:TAB+2	MAXIMUM PACKET LENGTH 
WNDSIZ	EQU	PACKLN+2	MAXIMUM WINDOW SIZE 
NRLC	EQU	WNDSIZ+2	# OF LOGICAL CHANNELS 
NRPVC	EQU	NRLC+1	# OF PERMANENT VIRTUAL CIRCUITS
CHAIN	EQU	NRPVC+1	ANCHOR FOR CONNECTED DWT'S
NRPNDT	EQU	CHAIN+2	# OF PENDING TRANSMIT REQUESTS 
RSTQUE	EQU	NRPNDT+2	RESTART QUEUE ANCHOR
RTMADR	EQU	RSTQUE+2	RESTART CONF. TIMER ADDRESS 
HRDSTA	EQU	RTMADR+2	HARDWARE STATUS 
CMNFLG	EQU	HRDSTA+2	COMMON FLAGS
LOCECB	EQU	CMNFLG+2	LINE OPEN/CLOSE ECB 
UBNUM	EQU	LOCECB+12	BLOCK FOR (DIS)CONNECT REQUEST
	IFF	MMUPAG+STATI=2 
D1	EQU	UBNUM+SYUBNR+2 
ECBINL	EQU	12	LENGTH INPUT/OUTPUT ECB'S 
SYSBFL	EQU	SYMXDL+BEGDAT+1	BUFFER LENGTH
ECBIN1	EQU	D1+SYUBNR	LINE INPUT ECB'S 
	XIF
	IFT	MMUPAG+STATI=2 
D1	EQU	UBNUM+SYUBNR+2 
INTSTB	EQU	D1+SYUBNR	INTERMEDIATESTATISTIC BUFFER 
ECBINL	EQU	12	LENGTH INPUT/OUTPUT ECB'S 
SYSBFL	EQU	SYMXDL+BEGDAT+1	BUFFER LENGTH
ECBIN1	EQU	INTSTB+42	LINE INPUT ECB'S 
	XIF
	IFF	SYNRRC=1 
ECBIN2	EQU	ECBIN1+ECBINL
	IFF	SYNRRC=2 
ECBIN3	EQU	ECBIN2+ECBINL
	IFF	SYNRRC=3 
ECBIN4	EQU	ECBIN3+ECBINL
	XIF
* 
	EJECT		LINE
* 
	IFT	SYNRRC=1 
ECBOU1	EQU	ECBIN1+ECBINL
	XIF
	IFT	SYNRRC=2 
ECBOU1	EQU	ECBIN2+ECBINL
	XIF
	IFT	SYNRRC=3 
ECBOU1	EQU	ECBIN3+ECBINL
	XIF
	IFT	SYNRRC=4 
ECBOU1	EQU	ECBIN4+ECBINL
	XIF
SYSOU1	EQU	ECBOU1+ECBINL
	IFF	SYNRTR=1 
ECBOU2	EQU	SYSOU1+SYSBFL
SYSOU2	EQU	ECBOU2+ECBINL
	IFF	SYNRTR=2 
ECBOU3	EQU	SYSOU2+SYSBFL
SYSOU3	EQU	ECBOU3+ECBINL
	IFF	SYNRTR=3 
ECBOU4	EQU	SYSOU3+SYSBFL
SYSOU4	EQU	ECBOU4+ECBINL
	XIF
	IFT	SYNRTR=1 
LNBLNG	EQU	SYSOU1+SYSBFL
	XIF
	IFT	SYNRTR=2 
LNBLNG	EQU	SYSOU2+SYSBFL
	XIF
	IFT	SYNRTR=3 
LNBLNG	EQU	SYSOU3+SYSBFL
	XIF
	IFT	SYNRTR=4 
LNBLNG	EQU	SYSOU4+SYSBFL
	XIF
* 
	EJECT		LINE
* 
*	ORDER CODES FOR HDLC PROTOCOL HANDLER 
* 
CONN	EQU	/21	CONNECT REQUEST
DISCN	EQU	/22	DISCONNECT REQUEST
RECEIV	EQU	/02	INPUT REQUEST
TRANSM	EQU	/06	OUTPUT REQUEST 
STATR	EQU	/2D	STATISTIC REQUEST 
* 
*	RETURN CODES FOR HDLC PROTOCOL HANDLER
* 
HRDWER	EQU	/8000	HARDWARE ERROR 
REMDIS	EQU	/000D	REMOTE DISCONNECTED
DEFTIM	EQU	/000E	DEFINITE TIME-OUT
* 
*	EQUATE VALUES FOR FLAG POSITIONS
* 
CONTIM	EQU	/10	CONFIRMATION TIMER RUNNING 
INTPNG	EQU	/20	INTERRUPT PENDING
REMBUS	EQU	/40	REMOTE BUSY
NPRFLG	EQU	/01	NO PROCESSING FLAG FOR QUEUES
* 
*	EQUATE VALUES FOR THE COMMON FLAGS
* 
RSTFLG	EQU	/01	RESTART BUSY 
STRTFL	EQU	/80	LINE CONNECTED FLAG
STATFL	EQU	/04	STATISTIC REQUEST BUSY FLAG
CLOFLG   EQU      /10                  CLOSE BUSY FLAG
OPEFLG   EQU      /20                  OPEN BUSY FLAG 
* 
	EJECT
* 
*	BLOCK WITH ADDRESSES OF LINE ADMINISTRATION BLOCKS
* 
LINTAB	DATA	LINBL1	ADDRESS 1ST LINE ADM. BLOCK
	IFF	SYNRLN=1 
	DATA	LINBL2	ADDRESS 2ND LINE ADM. BLOCK
	IFF	SYNRLN=2 
	DATA	LINBL3	ADDRESS 3TH LINE ADM. BLOCK
	IFF	SYNRLN=3 
	DATA	LINBL4	ADDRESS 4TH LINE ADM. BLOCK
	XIF
* 
*	FIRST LINE ADMINISTRATION BLOCK 
* 
LINBL1	EQU	*
	DATA	/60	FILE CODE 
	DATA	LCADM1	LOG. CHANNEL ADM. POINTER
	DATA	SYMDL1	MAX. PACKET LENGTH 
	DATA	SYMXW1	MAX. WINDOW SIZE 
	BYTE	SYNRL1,SYNRP1	# OF LOG.CH. AND # OF PVC'S 
	RORG	LINBL1+LNBLNG 
* 
*	BLOCK WITH LOGICAL CHANNEL ADM. POINTERS
* 
LCADM1	EQU	*
	DATA	LCAD1.1 
	IFF	SYNRL1=1 
	DATA	LCAD1.2 
	IFF	SYNRL1=2 
	DATA	LCAD1.3 
	IFF	SYNRL1=3 
	DATA	LCAD1.4 
	IFF	SYNRL1=4 
	DATA	LCAD1.5 
	IFF	SYNRL1=5 
	DATA	LCAD1.6 
	IFF	SYNRL1=6 
	DATA	LCAD1.7 
	IFF	SYNRL1=7 
	DATA	LCAD1.8 
	XIF
	EJECT
* 
*	LOGICAL CHANNEL ADMINISTRATION BLOCKS 
* 
LCAD1.1	EQU	* 
	RORG	LCAD1.1+LCALNG
	IFF	SYNRL1=1 
LCAD1.2	EQU	* 
	RORG	LCAD1.2+LCALNG
	IFF	SYNRL1=2 
LCAD1.3	EQU	* 
	RORG	LCAD1.3+LCALNG
	IFF	SYNRL1=3 
LCAD1.4	EQU	* 
	RORG	LCAD1.4+LCALNG
	IFF	SYNRL1=4 
LCAD1.5	EQU	* 
	RORG	LCAD1.5+LCALNG
	IFF	SYNRL1=5 
LCAD1.6	EQU	* 
	RORG	LCAD1.6+LCALNG
	IFF	SYNRL1=6 
LCAD1.7	EQU	* 
	RORG	LCAD1.7+LCALNG
	IFF	SYNRL1=7 
LCAD1.8	EQU	* 
	RORG	LCAD1.8+LCALNG
	XIF
	IFF	SYNRLN=1 
	EJECT
* 
*	SECOND LINE ADMINISTRATION BLOCK
* 
LINBL2	EQU	*
	DATA	/61	FILE CODE 
	DATA	LCADM2	LOG. CHANNEL ADM. POINTER
	DATA	SYMDL2	MAX. PACKET LENGTH 
	DATA	SYMXW2	MAX. WINDOW SIZE 
	BYTE	SYNRL2,SYNRP2	# OF LOG.CH. AND # OF PVC'S 
	RORG	LINBL2+LNBLNG 
* 
*	BLOCK WITH LOGICAL CHANNEL ADM. POINTERS
* 
LCADM2	EQU	*
	DATA	LCAD2.1 
	IFF	SYNRL2=1 
	DATA	LCAD2.2 
	IFF	SYNRL2=2 
	DATA	LCAD2.3 
	IFF	SYNRL2=3 
	DATA	LCAD2.4 
	IFF	SYNRL2=4 
	DATA	LCAD2.5 
	IFF	SYNRL2=5 
	DATA	LCAD2.6 
	IFF	SYNRL2=6 
	DATA	LCAD2.7 
	IFF	SYNRL2=7 
	DATA	LCAD2.8 
	XIF
	EJECT
	IFF	SYNRLN=1 
* 
*	LOGICAL CHANNEL ADMINISTRATION BLOCKS 
* 
LCAD2.1	EQU	* 
	RORG	LCAD2.1+LCALNG
	IFF	SYNRL2=1 
LCAD2.2	EQU	* 
	RORG	LCAD2.2+LCALNG
	IFF	SYNRL2=2 
LCAD2.3	EQU	* 
	RORG	LCAD2.3+LCALNG
	IFF	SYNRL2=3 
LCAD2.4	EQU	* 
	RORG	LCAD2.4+LCALNG
	IFF	SYNRL2=4 
LCAD2.5	EQU	* 
	RORG	LCAD2.5+LCALNG
	IFF	SYNRL2=5 
LCAD2.6	EQU	* 
	RORG	LCAD2.6+LCALNG
	IFF	SYNRL2=6 
LCAD2.7	EQU	* 
	RORG	LCAD2.7+LCALNG
	IFF	SYNRL2=7 
LCAD2.8	EQU	* 
	RORG	LCAD2.8+LCALNG
	XIF
	IFF	SYNRLN=1 
	IFF	SYNRLN=2 
	EJECT
* 
*	THIRTH LINE ADMINISTRATION BLOCK
* 
LINBL3	EQU	*
	DATA	/62	FILE CODE 
	DATA	LCADM3	LOG. CHANNEL ADM. POINTER
	DATA	SYMDL3	MAX. PACKET LENGTH 
	DATA	SYMXW3	MAX. WINDOW SIZE 
	BYTE	SYNRL3,SYNRP3	# OF LOG.CH. AND # OF PV'S
	RORG	LINBL3+LNBLNG 
* 
*	BLOCK WITH LOGICAL CHANNEL ADM. POINTERS
* 
LCADM3	EQU	*
	DATA	LCAD3.1 
	IFF	SYNRL3=1 
	DATA	LCAD3.2 
	IFF	SYNRL3=2 
	DATA	LCAD3.3 
	IFF	SYNRL3=3 
	DATA	LCAD3.4 
	IFF	SYNRL3=4 
	DATA	LCAD3.5 
	IFF	SYNRL3=5 
	DATA	LCAD3.6 
	IFF	SYNRL3=6 
	DATA	LCAD3.7 
	IFF	SYNRL3=7 
	DATA	LCAD3.8 
	XIF
	EJECT
	IFF	SYNRLN=1 
	IFF	SYNRLN=2 
* 
*	LOGICAL CHANNEL ADMINISTRATION BLOCKS 
* 
LCAD3.1	EQU	* 
	RORG	LCAD3.1+LCALNG
	IFF	SYNRL3=1 
LCAD3.2	EQU	* 
	RORG	LCAD3.2+LCALNG
	IFF	SYNRL3=2 
LCAD3.3	EQU	* 
	RORG	LCAD3.3+LCALNG
	IFF	SYNRL3=3 
LCAD3.4	EQU	* 
	RORG	LCAD3.4+LCALNG
	IFF	SYNRL3=4 
LCAD3.5	EQU	* 
	RORG	LCAD3.5+LCALNG
	IFF	SYNRL3=5 
LCAD3.6	EQU	* 
	RORG	LCAD3.6+LCALNG
	IFF	SYNRL3=6 
LCAD3.7	EQU	* 
	RORG	LCAD3.7+LCALNG
	IFF	SYNRL3=7 
LCAD3.8	EQU	* 
	RORG	LCAD3.8+LCALNG
	XIF
	IFF	SYNRLN=1 
	IFF	SYNRLN=2 
	IFF	SYNRLN=3 
	EJECT
* 
*	FOURTH LINE ADMINISTRATION BLOCK
* 
LINBL4	EQU	*
	DATA	/63	FILE CODE 
	DATA	LCADM4	LOG. CHANNEL ADM. POINTER
	DATA	SYMDL4	MAX. PACKET LENGTH 
	DATA	SYMXW4	MAX. WINDOW SIZE 
	BYTE	SYNRL4,SYNRP4	# OF LOG.CH. AND # OF PVC'S 
	RORG	LINBL4+LNBLNG 
* 
*	BLOCK WITH LOGICAL CHANNEL ADM. POINTERS
* 
LCADM4	EQU	*
	DATA	LCAD4.1 
	IFF	SYNRL4=1 
	DATA	LCAD4.2 
	IFF	SYNRL4=2 
	DATA	LCAD4.3 
	IFF	SYNRL4=3 
	DATA	LCAD4.4 
	IFF	SYNRL4=4 
	DATA	LCAD4.5 
	IFF	SYNRL4=5 
	DATA	LCAD4.6 
	IFF	SYNRL4=6 
	DATA	LCAD4.7 
	IFF	SYNRL4=7 
	DATA	LCAD4.8 
	XIF
	EJECT
	IFF	SYNRLN=1 
	IFF	SYNRLN=2 
	IFF	SYNRLN=3 
* 
*	LOGICAL CHANNEL ADMINISTRATION BLOCKS 
* 
LCAD4.1	EQU	* 
	RORG	LCAD4.1+LCALNG
	IFF	SYNRL4=1 
LCAD4.2	EQU	* 
	RORG	LCAD4.2+LCALNG
	IFF	SYNRL4=2 
LCAD4.3	EQU	* 
	RORG	LCAD4.3+LCALNG
	IFF	SYNRL4=3 
LCAD4.4	EQU	* 
	RORG	LCAD4.4+LCALNG
	IFF	SYNRL4=4 
LCAD4.5	EQU	* 
	RORG	LCAD4.5+LCALNG
	IFF	SYNRL4=5 
LCAD4.6	EQU	* 
	RORG	LCAD4.6+LCALNG
	IFF	SYNRL4=6 
LCAD4.7	EQU	* 
	RORG	LCAD4.7+LCALNG
	IFF	SYNRL4=7 
LCAD4.8	EQU	* 
	RORG	LCAD4.8+LCALNG
	XIF
* 
	EJECT
* 
* 
*	BUFFER POOL 
* 
*        THE SIZE OF THE BUFFER AREAS CAN BE OBTAINED IN THE FOLLOWING WAY
*          NUMBER OF BUFFERS NEEDED PER LOGICAL CHANNEL = WINDOW SIZE 
*          PER LINE SYNRRC BUFFERS FOR INPUT REQUEST AND SYUBNR BUFFERS 
*          TO BE USED BY HDLC 
*          THE TOTAL NUMBER OF BUFFERS CAN THEN BE CALCULATED BY THE FORMULA
*          SYNRLN*(SYNRRC+SYUBNR)+SYNRL1*SYMXW1+SYNRL2*SYMXW2+.... ETC
* 
*        THE BUFFER LENGTH IS OBTAINED BY SYMXDL+BEGDAT+1. THIS IS THE LENGTH 
*        IN CHARACTERS. THIS LENGTH HAS TO BE EVEN (CHAIN POINTER FOR 
*        QUEUEING EXCLUDED) 
* 
BUFLEN EQU SYMXDL+BEGDAT+1
* 
*        THE POOLSIZE IN WORDS IS OBTAINED BY NRBUF*(BUFLEN+2)/2
* 
X:V	EQU	680 
POOLEN	EQU	X:V	LENGTH OF BUFFER POOL
BUFPOL	EQU	*
	RES	POOLEN	POOL AREA 
	DATA	0	END OF QUEUE
BPEND	EQU	* 
* 
*	BUFFER POOL CHAIN ANCHOR
* 
BUFANC	DATA	BUFPOL
* 
	EJECT
* 
*	TTAB FOR #X-TASK IN X25 PACKAGE 
* 
	IFT	MMUPAG=1 
	DATA	0,0,0,0,0,0,0,0	MMU TABLE 
	DATA	0,0,0,0,0,0,0,0	. 
	DATA	0	CURRENT SEGMENT BASE
	DATA	0	SEGMENT TABLE POINTER 
	DATA	0	SEGMENT BLOCK POINTER 
	XIF
	DATA	0	APPLICATION CONTROL BLOCK POINTER 
TTBX25	EQU	*
	DATA	0	DISPATCHER QUEUE LINK 
	DATA	'#X'	TASK IDENTIFICATION
	DATA	50	PRIORITY LEVEL 
	DATA	0	PENDING POINTER 
	DATA	/C8C0	PSW(PROGRAM STATUS WORD)
	DATA	0	DISPATCH ADDRESS
	DATA	0,0,0,0,0,0,0,0	REGISTER SAVE AREA,A1-A14 
	DATA	0,0,0,0,0,0,0	. 
* 
	EJECT
* 
* 
*	MODULE CALLED BY TOSSIO FOR AN USER REQUEST 
* 
********************************************
* 
*	INPUT PARAMETER:
*		A6 = DWT-ADDRESS 
* 
*	CALLING SEQUENCE: 
*		ABI    DRX25 
* 
***** DRIVER ADDRESS BLOCK *****
	DATA	SYMXDL	BUFFER LENGTH
	DATA	0	DEVICE INDEX
DRX25	EQU	* 
	DATA	DRX250	ACTIVATION ADDRESS 
	DATA	ABTREQ	ABORT ROUTINE ADDRESS
********************************
DRX250	EQU	*
	LDR	A1,A6	PARAMETER
	LDKL	A5,TTBX25	GET TTAB ADDRESS
	LDKL	A2,RHOP	ACTIVATION ADDRESS
	LDK	A3,0 
	CF	A15,ACTOT	ACTIVATE #X-TASK
	ABL	TDISP
	EJECT
* 
* 
*	THIS MODULE IS CALLED AT MONITOR INITIATION TIME
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		NONE 
* 
*	CALLING SEQUENCE: 
*		CF    A15,X25:ON 
* 
X25:ON	EQU	*
	LDKL	A1,LINTAB	TABLE WITH LINE BLOCK ADDRESSES 
	IFF	SYNRLN=1 
	LDK	A2,SYNRLN	NUMBER OF LINES
	XIF
* 
*	INITIATE LINE BLOCK 
* 
X25ON1	EQU	*
	LDR*	A4,A1	LINE BLOCK ADDRESS
	CM	CMNFLG,A4	CLEAR FLAG
	LD	A6,CHAIN,A4	ANY DWT IN CHAIN ?
	RF(Z)	X25ON3	NO
* 
*	INITIATE DWT
* 
X25ON2	EQU	*
	LDKL	A3,NEG
	ST	A3,DWTST,A6	SET STATUS
	CM	DWTFNC,A6	CLEAR FUNCTION CODE AND STATE 
	CM	DWTRTP,A6	CLEAR RUNNING TIMER INDICATION
	LD	A3,DWTCHN,A6	MORE DWT'S FOR THIS LINE ? 
* 
	EJECT
	CM	DWTCHN,A6	. 
	LDR	A6,A3	.
	RB(NZ)	X25ON2	YES
	CM	CHAIN,A4	RESET CHAIN
X25ON3	EQU	*
	IFF	SYNRLN=1 
	ADK	A1,2 
	SUK	A2,1	NEXT LINE ? 
	RB(P)	X25ON1	YES 
	XIF
* 
*	INITIATE BUFFER POOL
* 
	LDKL	A2,BUFPOL	START ADDRESS OF BUFFER POOL
	ST	A2,BUFANC	BUFFER POOL ANCHOR
X25ON4	EQU	*
	LDR	A1,A2	SAVE BUFFER ADDRESS
	ADK	A2,BUFLEN+2
	STR	A2,A1	CREATE CHAIN 
	LDR	A3,A2
	SUKL	A3,BPEND	END OF BUFFER POOL REACHED ? 
	RB(L)	X25ON4	NO
	CMR	A1	END OF CHAIN
	IFT	TRACE=1
* 
*	ACTIVATE TRACE TASK 
* 
	LDKL	A2,TRAC	ACTIVATION ADDRESS
	LDKL	A5,TRTASK	TTAB ADDRESS
	CF	A15,ACTOT	ACTIVATE #T-TASK
	XIF
	RTN	A15	READY
	EJECT
* 
*	ABORT REQUEST HANDLER 
* 
********************************************
* 
*	INPUT PARAMETER:
*		A6 = DWT-ADDRESS 
* 
*	CALLING SEQUENCE: 
*		CF    A15,ABTREQ 
* 
*	OUTPUT PARAMETERS:
*		NONE 
*		WHEN IT IS A ILLEGAL REQUEST THE ROUTINE WILL HALT 
* 
ABTREQ	EQU	*
	LDK	A1,READAT	WAS IT A READ REQUEST ?
	CC	A1,DWTFNC,A6	.
	RF(NE)	ABT000	NO 
         LD       A1,DWTRTP,A6
         LDR      A8,A14
         LDKL     A14,DCSTAK
         CF       A14,CANTIM            CANCEL TIMER
         LDR      A14,A8
         CM       DWTRTP,A6 
         LD       A8,DWTECB,A6
         ST       A1,ECBCW1,A8
	LDKL	A1,ABOT.RC	RETURN CODE = ABORTED
	CF	A15,TENDIO	COMPLETE REQUEST 
ABT000	EQU	*
	ABL	TDISP	DISPATCH 
	EJECT
* 
************************************************************
* 
*	REQUEST HANDLER OUTPUT PART 
* 
************************************************************
* 
RHOP	EQU	*
         LDK      A2,2
         ST       A2,DCLEVL        SET PROCESS INDICATION 
	LDR	A6,A1	COPY DWT ADDRESS 
	LD	A8,DWTECB,A6
	LC	A4,DWTSTE,A6
	LD	A5,ECBRL,A8 
	LD	A7,DWTOR,A6	GET ORDER CODE
	LDKL	A11,TRANSP	ROUTINE TO CALL TRANSPORT HANDLER
	LDKL	A14,DCSTAK	SUBR.STACK POINTER 
	ANK	A7,/3F	MASK ORDER CODE 
	RF(Z)	RSTS00	READ STATUS 
	SUK	A7,2 
	RF(Z)	READ00	READ
	SUK	A7,/06-/02 
	RF(Z)	WRIT00	WRITE 
	SUK	A7,/21-/06 
	ABL(Z)	OPEN00	OPEN 
	SUK	A7,/22-/21 
	ABL(Z)	CLOS00	CLOSE
	SUK	A7,/24-/22 
	ABL(Z)	CONA00	CONNECT ACTIVE 
* 
	EJECT
* 
	SUK	A7,/27-/24 
	ABL(Z)	CONP00	CONNECT PASSIVE
	SUK	A7,/2F-/27 
	ABL(Z)	DISC00	DISCONNECT 
	SUK	A7,/38-/2F 
	ABL(Z)	STAT00	SET STATUS 
	SUK	A7,/39-/38 
	ABL(Z)	TIMO00	SET TIME OUT 
	IFT	STATI=1
	ADK	A7,/39 
	SUK	A7,/2D 
	ABL(Z)	STATS	STATISTICS
	XIF
ERRREQ	EQU	*
	LDKL	A1,RQUE.RC	REQUEST ERROR
	ABL	RHEXIT	COMPLETE REQUEST
* 
	EJECT
* 
********************************************************************* 
* 
*	READ STATUS REQUEST 
* 
********************************************************************* 
* 
RSTS00	EQU	*
	LD	A1,DWTLAD,A6	GET LOCAL DTE ADDRESS
	CF	A14,FNDLIN	GET LINE FLAGS 
	SLL	A1,8 
	ANK	A4,/FF	GET DWT STATE 
	ORR	A4,A1	PUT IT TOGETHER
	ST	A4,ECBCW1,A8
	LDK	A2,DWTRCI
	ADR	A2,A6
	LDR*	A1,A2	GET RETURN CODE INFO. 
	LDR	A7,A1
	ANKL	A1,-2	RESET TOLD.RC-BIT 
	ANK	A7,MORE.RC	MORE INFORMATION ?
	ABL(Z)	RHEXIT	NO 
	ADK	A5,0	REQUESTED LENGTH
	RF(Z)	RSTS10	NO USER BUFFER
	ABL(N)	ERRLEN	INCORRECT LENGTH 
	SUK	A5,1 
	ABL(NP)	ERRLEN	BUFFER TO SHORT 
* 
	EJECT
* 
*	MORE INFORMATION FOUND
* 
RSTS10	EQU	*
	XRRS	A7,A2	RESET MORE INFO BIT 
	IFF	SWITVC=0 
	ANK	A1,RSET.RC+CLEA.RC 
	LDR	A7,A1
	ANK	A1,RSET.RC	RESET ? 
	RF(Z)	RSTS30	NO
	XRRS	A1,A2	RESET RESET-BIT 
* 
*	TEST IF RESET AND CLEAR 
* 
	ANK	A7,CLEA.RC 
	RF(Z)	RSTS15	NO
	LDK	A7,MORE.RC	SET MORE INFO-BIT 
	XRRS	A7,A2	. 
RSTS15	EQU	*
	XIF
	LDK	A7,RSET.RC	RESET 
	LDK	A2,DWTRES	DISP FOR RESET INFO
	ADK	A5,0	USER BUFFER ? 
	ABL(Z)	RHEXIT	NO 
* 
	EJECT
* 
*	MOVE RESET/CLEAR INFORMATION
* 
RSTS20	EQU	*
	ADR	A2,A6
	LDK	A3,2	LENGTH
	ST	A3,ECBEL,A8 
	IFT	MMUPAG=1 
	LDR	A1,A2
	LD	A2,ECBBA,A8	USER BUFFER 
	LD	A4,DWTTAB,A6
	INH		.	=1
	CF	A15,MOVSU	MOVE RESET INFORMATION TO USER
	ENB		.	=1
	XIF
	IFT	MMUPAG=0 
	LDR*	A1,A2	MOVE INFO...
	ST*	A1,ECBBA,A8	...TO USER BUFFER
	XIF
	LDR	A1,A7
	RF	RHEXIT
	IFF	SWITVC=0 
RSTS30	EQU	*
	LDR	A1,A7
	ANK	A1,CLEA.RC	CLEAR ? 
	RF(Z)	RHEXIT	COMPLETE REQUEST
	LDK	A3,TOLD.RC	SET 'TOLD TO USER'-INDICATION 
	ORRS	A3,A2	. 
	LDK	A2,DWTCLE	DISP FOR CLEAR INFO
	ADK	A5,0	USER BUFFER ? 
	RB(NZ)	RSTS20
	RF	RHEXIT	COMPLETE REQUEST 
	XIF
* 
	EJECT
* 
************************************************************
* 
*	READ,WRITE AND SET STATUS REQUEST 
* 
************************************************************
* 
READ00	EQU	*
WRIT00	EQU	*
STAT00	EQU	*
	LD	A1,DWTLAD,A6
	CF	A14,FNDLIN	FIND LINE BLOCK ADDRESS
	ANK	A1,STRTFL	MASK START FLAG
	ABL(Z)	ERRSYS	INCORRECT SYSTEM STATE 
	ANK	A4,/FF 
	LDR	A3,A4	DWTSTE 
	RF(Z)	ERRSTE	INCORRECT DWT STATE 
* 
*        GET LC-ADM ADDRESS 
* 
	LC	A4,DWTLCN,A6
	CF	A14,GTLCAD
* 
*	TEST ON RETURN INFORMATION
* 
	LD	A1,DWTRCI,A6	GET RETURN CODE INFORMATION
	LDR	A2,A1
	ANK	A2,MORE.RC	MORE INFO ? 
	RF(Z)	READ20	NO
	LDR	A2,A1
	ANK	A2,TOLD.RC	RETURN INFO TOLD TO USER ?
	IFF	SWITVC=0 
	RF(NZ)	READ10	YES
	XIF
	IFT	SWITVC=0 
	RF(NZ)	READ15	YES
	XIF
	EJECT
* 
	LDK	A2,TOLD.RC	TELL RETURN INFO TO USER
	ORS	A2,DWTRCI,A6 
	RF	RHEXIT	COMPLETE REQUEST 
	IFF	SWITVC=0 
* 
*	TEST IF RESET/CLEAR 
* 
READ10	EQU	*
	XRR	A1,A2
	ANK	A1,CLEA.RC	CLEAR ? 
	RF(Z)	READ15	NO
	LDR	A1,A2
	ANK	A2,RSET.RC	RESET ? 
	RF(Z)	RHEXIT	NO
* 
*	RESET AND CLEAR 
* 
	XRS	A2,DWTRCI,A6	RESET RESET-BIT 
	XRR	A1,A2	INFORM USER ABOUT THE CLEAR
	RF	RHEXIT
	XIF
READ15	EQU	*
	LDK	A1,RSET.RC+MORE.RC+1 
	XRS	A1,DWTRCI,A6	RESET RETURN INFO 
* 
*	SEPARATE THE REQUESTS 
* 
READ20	EQU	*
	LD	A4,DWTOR,A6 
	ANK	A4,/3F 
	SUK	A4,6 
	RF(Z)	WRIT05	WRITE REQUEST 
	ABL(P)	STAT05	SET STATUS REQUEST 
	EJECT
* 
*        READ REQUEST 
* 
	SU	A5,REBFSZ,A13	RECEIVE BUFFER SIZE 
	RF(L)	ERRLEN	INCORRECT LENGTH
* 
*        BRANCH ON DWT STATE
* 
	LDK	A2,READAT	FUNCTION CODE
         LDR      A4,A3            SAVE DWT STATE 
	ADR	A3,A3
	SUK	A3,ENDRST+2	TEST+2 UPPER BOUND 
	ABI(L)	RSTATE+ENDRST,A3	BRANCH ON STATE
* 
*        STATE TABLE,READ 
* 
RSTATE	EQU	*
	DATA	RCONAD	CONNECTED ACCEPT DATA
	DATA	RCONRD	CONNECTED REFUSE DATA
	IFF	SWITVC=0 
	DATA	RINCAR	INCOMING CALL RECEIVED(WITH ACC/REF )
         DATA     RINCAR           INCOMING CALL RECEIVED(WITHOUT ACC/REF ) 
	DATA	RVCREL	VIRTUAL CIRCUIT RELEASED 
	XIF
ENDRST	EQU	*-RSTATE 
* 
*        READ 
*        CONNECTED REFUSE DATA
* 
RCONRD	EQU	*
	LDK	A2,ACCDAT
	CFR	A14,A11	TRANSPORT HANDLER
	LDK	A1,CONAD	CONNECTED ACCEPT DATA 
	SC	A1,DWTSTE,A6
	LDK	A2,READAT	FUNCTION CODE
	EJECT
* 
*        READ 
*        CONNECTED ACCEPT DATA
* 
RCONAD	EQU	*
* 
*        DEBLOCK INPUT QUEUE
* 
	LDK	A1,NPRFLG
	C1R	A1,A1
	ANS	A1,QUEINP,A13
	IFF	SWITVC=0 
         SUK      A4,INCALR        CHECK DWT STATE
         RF(Z)    READ30
* 
*        READ 
*        INCOMING CALL RECEIVED,WITHOUT ACCEPT/REFUSE CALL
* 
         LDK      A1,CONAD         CONNECTED ACCEPT DATA
         SC       A1,DWTSTE,A6
READ30   EQU      * 
	XIF
	SC	A2,DWTFNC,A6
	RF	WRIT50	ACTIVATE TIMER 
* 
	EJECT
* 
	IFF	SWITVC=0 
* 
*        READ 
*        INCOMING CALL RECEIVED 
* 
RINCAR	EQU	*
	LD	A1,QUEINP,A13 
	ANKL	A1,-2 
	RB(NZ)	RCONAD
	XIF
* 
*	WANTED ACTION NOT ALLOWED IN THIS DWT STATE 
* 
ERRSTE	EQU	*
	LDKL	A1,SEQE.RC	SEQUENCE ERROR 
	RF	RHEXIT	COMPLETE REQUEST 
	IFF	SWITVC=0 
* 
*        READ 
*        VIRTUAL CIRCUIT CLEARED
* 
RVCREL	EQU	*
	ANK	A1,CLEA.RC	CONNECTION CLEARED ?
	RF(NZ)	RHEXIT	YES,COMPLETE REQUEST 
* 
*	ACTIVATE RHIP TO GET A PACKET 
* 
	SC	A2,DWTFNC,A6
	ABL	RHIPRO 
	XIF
* 
	EJECT
* 
************************************************************
* 
*        WRITE REQUEST
* 
************************************************************
* 
WRIT05	EQU	*
* 
*        BRANCH ON DWT STATE
* 
	SUK	A3,CONAD 
	RF(Z)	WRIT20	CONNECTED ACCEPT DATA 
	SUK	A3,CONRD-CONAD 
	RF(Z)	WRIT20	CONNECTED REFUSE DATA 
	IFT	SWITVC=0 
	RB	ERRSTE	INCORRECT DWT STATE
	XIF
	IFF	SWITVC=0 
	SUK	A3,VCREL-CONRD 
	RB(NZ)	ERRSTE	INCORRECT DWT STATE
* 
	EJECT
* 
*        VIRTUAL CIRCUIT RELEASED 
* 
WRIT10	EQU	*
	ANK	A1,TOLD.RC	CLEAR ALREADY TOLD TO USER ?
	RB(NZ)	ERRSTE	YES,SEQUENCE ERROR 
         LDK     A1,CLEA.RC       VC CLEARED
	LD	A2,DWTIPQ,A6
	ANKL	A2,-2	ANYTHING IN QUEUE ? 
	RF(NZ)	WRIT15	YES
	ORK	A1,MORE.RC	MORE INFO 
	LDR	A2,A1
	ORK	A2,TOLD.RC	RETURN CODE TOLD TO USER
	ST	A2,DWTRCI,A6
	RF	RHEXIT
WRIT15	EQU	*
	LD	A2,BFCHPT,A2	ONLY CLEAR IN QUEUE ?
	ABL(Z)	RHIPRO	YES
	ORKL	A1,DATA.RC	DATA AVAILABLE 
	XIF
	EJECT
* 
******************************************************************* 
* 
*        COMPLETE REQUEST 
* 
******************************************************************
* 
RHEXIT	EQU	*
	INH		.	=1
	CF	A15,TENDIO	COMPLETE USER REQUEST
	ENB
RHSCHE EQU *
	ABL	EXITDC	CONTROL TO SCHEDULER
* 
*        CONNECTED
* 
WRIT20	EQU	*
	ADK	A5,0	REQUESTED LENGTH
	RF(N)	ERRLEN	INCORRECT LENGTH
	LC	A3,DWTOPT,A6	GET NEW OPTION CODE
	LDR	A4,A3
	ANK	A4,INTOPT	INTERRUPT ?
	RF(Z)	WRIT30	NO
	LDK	A2,WRIINT	INTERRUPT
	ADK	A5,0	REQUESTED LENGTH
	RF(N)	ERRLEN	INCORRECT LENGTH
	SUK	A5,1 
	RF(Z)	WRIT45 
ERRLEN	EQU	*
	LDKL	A1,INVL.RC	INCORRECT LENGTH 
	RB	RHEXIT
* 
	EJECT
* 
*	WRITE DATA
* 
WRIT30	EQU	*
         CW       A5,TRBFSZ,A13    TRANSMIT BUFFER SIZE 
	RB(G)	ERRLEN	INCORRECT LENGTH
	LDR	A4,A3
	ANK	A4,MOPT	MORE DATA ?
	RF(Z)	WRIT35	NO
	CW	A5,TRBFSZ,A13 
	RB(NE)	ERRLEN
WRIT35	EQU	*
	LC	A1,DWTWRO,A6	GET OLD OPTION CODE
	LDR	A2,A1
	ANK	A1,MOPT	MORE DATA ?
	RF(Z)	WRIT40	NO
	ANK	A2,QOPT	OLD Q-BIT
	LDR	A4,A3
	ANK	A4,QOPT	NEW Q-BIT
	SUR	A2,A4	SAME ? 
	RB(NZ)	ERRSTE	NO,SEQUENCE ERROR
WRIT40	EQU	*
	LDK	A2,WRIDAT	DATA 
	SC	A3,DWTWRO,A6	SAVE NEW OPTION CODE 
WRIT45	EQU	*
	CFR	A14,A11	TRANSPORT HANDLER
* 
	EJECT
* 
* 
*        ACTIVATE TIMER 
* 
WRIT50	EQU	*
	LD	A8,DWTRTV,A6	REQUEST TIMER VALUE
	RB(Z)	RHSCHE	NO TIMER,CONTROL TO SCHEDULER 
         LDKL     A4,TIMOUT+1      TIME OUT ROUTINE 
	LDR	A12,A6 
	CF	A14,STRTIM	START TIMER
	ST	A4,DWTRTP,A6
	RB	RHSCHE	CONTROL TO SCHEDULER 
* 
	EJECT
* 
* 
************************************************************
* 
*        OPEN REQUEST 
* 
************************************************************
* 
OPEN00	EQU	*
	CF	A14,FNDLOC	CONFIRM LOCAL DTE ADDRESS
	ANK	A1,STRTFL	MASK START FLAG
	RF(NZ)	ERRSYS	LINE OPEN
* 
*        LINE CLOSED
*	CHECK IF OPEN SYSTEM ALREADY PENDING
* 
         LD       A3,CMNFLG,A12 
         ANK      A3,OPEFLG 
	RF(Z)	OPEN10	NO
ERRSYS	EQU	*
	LDKL	A1,LOGE.RC	INCORRECT SYSTEM STATE 
	RB	RHEXIT	COMPLETE REQUEST 
* 
	EJECT
* 
*	CHECK TABLE LENGTH
* 
OPEN10	EQU	*
	ADK	A5,0 
	RF(Z)	OPEN15	NO ADDRESS TABLE
* 
*	ADDR. TABLE NOT SUPPORTED IN PRR 11.0 
* 
	RB	ERRLEN	LENGTH ERROR 
OPEN15	EQU	*
	LD	A3,ECBCW2,A8	GET LOCAL SYMBOLIC DTE ADDRESS 
	ST	A3,DWTLAD,A6
	LDK	A2,OPESYS	OPEN SYSTEM
OPEN30	EQU	*
	CFR	A14,A11	TRANSPORT HANDLER
	IFF	PERMVC=0 
* 
*	UPDATE PVC WITH REMOTE ADDRESS
* 
	LDKL	A1,PVCTYP	PVC IDENTIFICATION
	LDKL	A2,SCTDCT	POINTER TO DC ADDRESS TABLE 
	LDKL	A3,LINTAB-2 
	IFF	SYNRLN=1 
	LDK	A4,SYNRLN	NUMBER OF LINES
	XIF
	IFF	PERMVC=0 
OPEN40	EQU	*
	ADK	A3,2	POINTER TO LC-ADM BLOCK-POINTER TABLE 
	LDR*	A5,A3	LC-ADM BLOCK POINTER
	LC	A7,NRPVC,A5	NUMBER OF PVC'S 
	RF(Z)	OPEN80	NO PVC'S
	LD	A5,LC:TAB,A5	LC-ADM BLOCK TABLE 
* 
	EJECT
* 
*	GET NEXT ENTRY IN DC ADDR. TABLE
* 
OPEN60	EQU	*
	LDR*	A2,A2	END OF TABLE ?
	RF(Z)	OPEN90	YES 
* 
*	TEST IF PVC 
* 
	CW	A1,4,A2 
	RB(NE)	OPEN60	NO 
OPEN70	EQU	*
	LDR*	A8,A5	LC-ADM ENTRY
	LD	A9,2,A2	GET SYMBOLIC ADDRESS
	ST	A9,REMADR,A8	SAVE IT IN LC-ADM
	ADK	A5,2	ADDRESS NEXT LC 
	SUK	A7,1	MORE PVC'S ?
	RB(NZ)	OPEN60	YES
OPEN80	EQU	*
	IFF	SYNRLN=1 
	SUK	A4,1	MORE LINES ?
	RB(NZ)	OPEN40	YES
	XIF
OPEN90	EQU	*
	LDK	A3,0	SET RETURN CODE 
	CF	A14,CMPREQ	COMPLETE REQUEST 
	RB	RHSCHE
* 
	EJECT
* 
* 
* 
********************************************************************
* 
*	CONNECT PASSIVE REQUEST 
* 
********************************************************************
* 
CONP00	EQU	*
	IFT	SWITVC=0 
	ABL	ERRREQ	REQUEST ERROR 
	XIF
	IFF	SWITVC=0 
	LDK	A2,CONPAS	FUNCTION CODE
	RF	CONA05
	XIF
* 
	EJECT
* 
********************************************************************
* 
*	CONNECT ACTIVE REQUEST
* 
********************************************************************
* 
CONA00	EQU	*
	IFF	SWITVC=0 
* 
*	TEST MESSAGE LENGTH 
* 
	SUK	A5,SYMXDL-5
	IFT	CALDTE=1 
	ADK	A5,4 
	XIF
	IFF	SWITVC=0 
	RB(P)	ERRLEN	INCORRECT LENGTH
	XIF
	LDK	A2,CONACT	FUNCTION CODE
CONA05	EQU	*
	CF	A14,FNDLOC	CONFIRM LOCAL DTE ADDRESS
	ANK	A1,STRTFL	MASK START FLAG
	RB(Z)	ERRSYS	INCORRECT SYSTEM STATE
	ANK	A4,/FF 
	IFT	SWITVC=0 
	ABL(NZ)	ERRSTE	INCORRECT DWT STATE 
	XIF
	IFF	SWITVC=0 
* 
	EJECT
* 
	RF(Z)	CONA10 
	SUK	A4,VCREL 
	RF(NZ)	CLOS10	SEQUENCE ERROR 
	LD	A1,DWTRCI,A6	RETURN INFO
	LDR	A3,A1
	ANK	A3,CLEA.RC	CLEAR DETECTED ?
	RF(Z)	CLOS10	NO,CONNECT NOT ALLOWED
	ANK	A1,TOLD.RC	TOLD TO USER ?
	RF(Z)	CLOS10	NO
CONA10	EQU	*
	XIF
	EJECT
* 
*	SAVE SYMBOLIC DTE ADDRESSES 
* 
	LD	A3,ECBCW2,A8	LOCAL SYMBOLIC DTE ADDRESS 
	ST	A3,DWTLAD,A6
	LD	A3,ECBCW1,A8	REMOTE SYMBOLIC DTE ADDRESS
	ST	A3,DWTRAD,A6
	CM	DWTRTP,A6	CLEAR TIMER ADDRESS 
	CM	DWTIPQ,A6	CLEAR INPUT QUEUE 
	CM	DWTRCI,A6	CLEAR RETURN INFO.
         CM       DWTWRO,A6        CLEAR WRITE INFO.
	CFR	A14,A11	TRANSPORT HANDLER
	CM	DWTRCI,A6	CLEAR RETURN INFO 
	CF	A14,PUTDWT	PUT DWT IN CHAIN 
	IFF	SWITVC=0 
	IFF	PERMVC=0 
	SUK	A2,CONACT	CONNECT ACTIVE 
	RF(NZ)	CONA40	NO!
	LC	A2,DWTOPT,A6	PVC-OPTION?
	SUK	A2,1 
	RF(NZ)	CONA40	NO 
	XIF
	IFF	PERMVC=0 
	LDK	A2,CONAD 
	SC	A2,DWTSTE,A6	DWT STATE: CONNECTED ACCEPT DATA 
	RF	DISC40	COMPLETE REQUEST 
	XIF
	IFF	SWITVC=0 
CONA40	EQU	*
	RB	WRIT50	ACTIVATE TIMER 
	XIF
* 
	EJECT
* 
************************************************************
* 
*        CLOSE REQUEST
* 
************************************************************
* 
CLOS00	EQU	*
	CF	A14,FNDLOC	CONFIRM LOCAL DTE ADDRESS
	ANK	A1,STRTFL	MASK START FLAG
	RF(Z)	DISC40	CLOSE ALREADY DONE
* 
*	LINE OPEN 
*	CHECK IF CLOSE ALREADY IN PROGRESS
* 
	LDK	A2,CLOSYS
         LD       A3,CMNFLG,A12 
         ANK      A3,CLOFLG 
	RF(Z)	DISC55	NO
CLOS10	EQU	*
	ABL	ERRSTE	SEQUENCE ERROR
* 
	EJECT
* 
******************************************************************* 
* 
*	DISCONNECT REQUEST
* 
******************************************************************* 
* 
DISC00	EQU	*
	LD	A1,DWTLAD,A6	GET LOCAL SYMBOLIC DTE ADDRESS 
	CF	A14,FNDLIN	FIND LINE BLOCK ADDRESS
	ANK	A1,STRTFL	MASK START FLAG
	ABL(Z)	ERRSYS	INCORRECT SYSTEM STATE 
	ANK	A4,/FF 
	RF(Z)	DISC40	DISCONNECT ALREADY DONE 
	CM	DWTRCI,A6	CLEAR RETURN INFO 
	IFT	SWITVC=0 
	RF	DISC50
	XIF
	IFF	SWITVC=0 
	SUK	A4,VCREL	VIRTUAL CIRCUIT RELEASED
	RF(NZ)	DISC50	NO 
* 
*	CLEAR INPUT QUEUE 
* 
DISC10	EQU	*
         LDK      A1,DWTIPQ        INPUT QUEUE ANCHOR 
	ADR	A1,A6
         LD       A2,DWTIPQ,A6     QUEUE EMPTY ?
         RF(Z)    DISC20           YES
         CF       A14,DEQUE        DEQUEUE ELEMENT
         CF       A14,RLBUF        RELEASE BUFFER 
	RB	DISC10	TAKE NEXT
DISC20   EQU      * 
         LDK      A1,DISCON        DISCONNECTED 
         SC       A1,DWTSTE,A6
	XIF
* 
	EJECT
* 
*	REMOVE DWT FROM CHAIN 
* 
DISC25	EQU	*
	CF	A14,RELDWT	RELEASE DWT FROM CHAIN 
DISC40	EQU	*
	LDK	A1,ACPT.RC	ACCEPTED
	ABL	RHEXIT	COMPLETE REQUEST
DISC50	EQU	*
	LDK	A2,DISCAL
DISC55	EQU	*
	LDK	A5,DISCON
DISC60	EQU	*
	CFR	A14,A11	TRANSPORT HANDLER
	SC	A5,DWTSTE,A6
	IFF	PERMVC=0 
	IFF	SWITVC=0 
* 
*	TEST IF PERMANENT VIRTUAL CIRCUIT 
* 
	LC	A1,VCTYP,A13
	ANK	A1,PVC 
	RF(Z)	DISC70	NO
	XIF
	IFF	SWITVC=0 
	SUK	A2,DISCAL	DISCONNECT ? 
	RB(Z)	DISC25	YES 
DISC70	EQU	*
	ABL	RHSCHE	CONTROL TO SCHEDULER
	XIF
	IFT	SWITVC=0 
	RB	DISC25
	XIF
* 
	EJECT
* 
*********************************************************** 
* 
*        SET STATUS REQUEST 
* 
*********************************************************** 
* 
STAT05	EQU	*
	IFF	SWITVC=0 
	LDR	A1,A3
	SUK	A1,VCREL	VIRTUAL CIRCUIT RELEASED
	ABL(Z)	WRIT10	COMPLETE REQUEST 
	XIF
	LD	A1,ECBCW1,A8	GET STATUS INFORMATION 
	IFT	SWITVC=0 
	ABL(NZ)	ERRREQ	REQUEST ERROR 
	XIF
	IFF	SWITVC=0 
	RF(NZ)	STAT20	ACCEPT CALL REQUEST
	XIF
	SUK	A3,CONAD	CONNECTED ACCEPT DATA 
	RF(Z)	STAT10	YES 
	SUK	A3,CONRD-CONAD	CONNECTED REFUSE DATA 
	RB(NZ)	CLOS10	SEQUENCE ERROR 
* 
*	REFUSE DATA REQUEST 
* 
STAT10	EQU	*
	LDK	A2,REFDAT	REFUSE DATA
	LDK	A1,CONRD 
	SC	A1,DWTSTE,A6
	CFR	A14,A11	TRANSPORT HANDLER
	ABL	RHSCHE	CONTROL TO SCHEDULER
	IFF	SWITVC=0 
* 
	EJECT
* 
*	ACCEPT CALL REQUEST 
* 
STAT20	EQU	*
	SUK	A3,INCALR	INCOMING CALL RECEIVED 
	RB(NZ)	CLOS10	SEQUENCE ERROR 
	LDK	A2,ACCCAL	ACCEPT CALL
	LDK	A5,CONAD	CONNECTED ACCEPT DATA 
	RB	DISC60	TRANSPORT HANDLER
	XIF
	EJECT
* 
********************************************************************
* 
*	SET TIMEOUT REQUEST 
* 
********************************************************************
* 
TIMO00	EQU	*
	LD	A1,ECBCW1,A8	GET TIMER VALUE
	ST	A1,DWTRTV,A6
	RB	DISC40	COMPLETE REQUEST 
* 
	IFT	STATI=1
	EJECT
* 
* 
*********************************************************** 
* 
*	STATISTIC REQUEST 
* 
*********************************************************** 
* 
* 
STATS	EQU	* 
	CF	A14,FNDLOC	GET LINE NUMBER
	LDK	A4,STATFL
	ANR	A4,A1
	ABL(NZ)	ERRREQ	STATISTIC REQUEST BUSY
	LD	A2,ECBRL,A8 
	ABL(NP)	ERRLEN	LENGTH ERROR
	ORS	A1,CMNFLG,A12	SET STATISTIC REQUEST BUSY FLAG
	LDK	A1,STATIS
	SC	A1,DWTFNC,A6	SAVE FUNCTION CODE 
* 
*	SAVE THREE WORDS OF THE USER ECB IN A MONITOR BLOCK 
* 
	LD	A1,ECBFC,A8 
	LD	A2,ECBBA,A8 
	LD	A3,ECBCW2,A8
	INH		.	=1
	CF	A15,GETBLK	GET A BLOCK AND SAVE REGISTERS 
	ENB
	ST	A4,DWTRTP,A6	SAVE BLOCK ADDRESS IN DWT
	ST	A6,ECBCW2,A8	SAVE DWT-ADDRESS IN ECB
* 
	EJECT
* 
*	PREPARE ECB FOR STATISTIC REQUEST TO LEVEL 2
* 
	LD	A1,FILCOD,A12 
	ST	A1,ECBFC,A8	FILE CODE FOR LINE IDENTIFICATION 
	IFT	MMUPAG=1 
	LDR	A1,A12 
	ADK	A1,INTSTB	ADDRESS INTERMEDIATE STATISTIC BUFFER
	ST	A1,ECBBA,A8	TO ECB
	XIF
	IFT	STATI=1
	LDR	A1,A8	ECB-ADDRESS AS PARAMETER 
* 
*	ISSUE STATISTIC REQUEST TO LEVEL 2
* 
	LDK	A7,STATR	FUNCTION CODE 
	LKM
	DATA	-1
	DATA	STAEND	ACTIVATION ADDRESS 
	ABL	EXITDC	CONTROL TO SCHEDULER
* 
	EJECT
* 
*	RETURN FROM LEVEL 2 
* 
STAEND	EQU	*
	LDR	A8,A1	ECB-ADDRESS
	LD	A6,ECBCW2,A8	GET DWT-ADDRESS
	LD	A4,DWTRTP,A6	GET ADDRESS SAVE BLOCK 
	CM	DWTRTP,A6 
	INH		.	=1
	CF	A15,FREBLK	RELEASE BLOCK
	ENB
	ST	A1,ECBFC,A8	RESTORE FILE CODE 
	ST	A3,ECBCW2,A8	RESTORE CONTROL WORD 
	IFT	MMUPAG=1 
	LD	A1,ECBBA,A8	GET INTERMEDIATE STAT. BUFFER ADDRESS 
	ST	A2,ECBBA,A8	RESTORE OLD BUFFER ADDRESS
	LD	A4,ECBEL,A8 
	LDKL	A14,DCSTAK	STACK POINTER
	CF	A14,COPTUB	COPY STAT.INFO.TO USER BUFFER
	XIF
	IFT	STATI=1
	LD	A1,ECBRC,A8	RETURN CODE 
	INH		.	=1
	CF	A15,TENDIO	COMPLETE REQUEST TO USER 
	ENB
	LDR	A1,A3
	CF	A14,FNDLIN	GET LINE BLOCK ADDRESS 
	LDK	A1,STATFL
	C1R	A1,A1
	ANS	A1,CMNFLG,A12	RESET STAT. BUSY FLAG
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
	XIF
	EJECT
* 
*        ROUTINE TO GET LINE INDEX AND/OR 
*        LINE BLOCK ADDRESS 
* 
*********************************************************** 
* 
*        INPUT PARAMETER :
*          A1 =SYMBOLIC LOCAL DTE ADDRESS 
* 
*        CALLING SEQUENCE : 
*          CF A14,FNDLIN
*	  CF A14,FNDLOC (A1 LOADED IN THE ROUTINE)
* 
*        OUTPUT PARAMETERS :
*          A1 = COMMON FLAGS
*          A12= LINE BLOCK ADDRESS
*	  A3 = LINE INDEX 
*          NO OTHER REGISTERS ARE CHANGED 
* 
FNDLOC	EQU	*
	LD	A1,ECBCW2,A8	GET LOCAL DTE ADDRESS
FNDLIN	EQU	*
	STR	A2,A14	SAVE A2 
	LDKL	A3,LOCAL	SET TYPE 
	INH		.	=1
	CF	A15,FNDDNT	FIND LOCAL DTE 
	ENB		.	=1
	LDR	A1,A1	FOUND ?
	RF(NN)	FNDL10	YES
	ADKL	A14,4	ADJUST STACK POINTER
	ABL	ERRREQ	REQUEST ERROR 
FNDL10	EQU	*
	IFF	SYNRLN=1 
	ADR	A3,A3
	XIF
	LD	A12,LINTAB,A3	LINE ADM. TABLE 
	LD	A1,CMNFLG,A12	GET COMMON FLAGS
	LDR*	A2,A14	RELOAD A2
	RTN	A14
	EJECT
* 
* 
*	PUT DWT IN CHAIN
* 
********************************************************************
* 
*	INPUT PARAMETERS: 
*		A6  = DWT ADDRESS
*		A12 = LINE ADM.BLOCK ADDRESS 
*		A14 = CF STACK POINTER 
* 
*	CALLING SEQUENCE: 
*		CF A14,PUTDWT
* 
*	OUTPUT PARAMETERS:
*		A1 IS CHANGED
* 
PUTDWT	EQU	*
	STR	A2,A14	SAVE A2 
	LDR	A2,A12 
	ADK	A2,CHAIN 
PUTD10	EQU	*
	LDR*	A1,A2	GET ANCHOR
	RF(Z)	PUTD20 
	LDR	A2,A1
	ADK	A2,DWTCHN
	RB	PUTD10	END OF CHAIN ? 
PUTD20	EQU	*
	STR	A6,A2	PUT IN CHAIN 
	LDR*	A2,A14	RESTORE A2 
	RTN	A14
* 
	EJECT
* 
* 
*	RELEASE DWT FROM CHAIN
* 
********************************************************************* 
* 
*	INPUT PARAMETERS: 
*		A6  = DWT ADDRESS
*		A12 = LINE ADM.BLOCK ADDRESS 
*		A14 = CF STACK POINTER 
* 
*	CALLING SEQUENCE: 
*		CF A14,RELDWT
* 
*	OUTPUT PARAMETERS:
*		A1 AND A2 ARE CHANGED
* 
RELDWT	EQU	*
	LDR	A2,A12 
	ADK	A2,CHAIN 
	RF	RELD20	FIRST IN CHAIN ? 
RELD10	EQU	*
	LDR	A2,A1
	ADK	A2,DWTCHN
RELD20	EQU	*
	LDR*	A1,A2	GET NEXT DWT
	RF(Z)	RELD30	END OF CHAIN
	CWR	A1,A6	FOUND ?
	RB(NE)	RELD10	NO 
	LD	A1,DWTCHN,A6
	STR	A1,A2	REMOVE FROM CHAIN
	CM	DWTCHN,A6 
RELD30	EQU	*
	RTN	A14
* 
	EJECT
* 
*	TRANSPORT HANDLER INTERFACE 
* 
TRANSP	EQU	*
	SC	A2,DWTFNC,A6	SAVE FUNCTION CODE 
	CF	A14,TRANSH	CALL TRANSPORT HANDLER 
	LDR	A4,A4	RETURN CODE
	RF(Z)	TRANSR	NO ERROR,RETURN 
* 
*	RETURN CODE TRANSLATION 
* 
	LD	A1,RTNCTR,A4
	LDKL	A4,RHEXIT 
	ST	A4,4,A14	ADJUST RETURN ADDRESS
TRANSR	EQU	*
	RTN	A14
* 
RTNCTR	EQU	*
	DATA	ACPT.RC 
	DATA	ACPT.RC	ACCEPT
	DATA	CLEA.RC	VIRTUAL CIRCUIT CLEARED 
	DATA	PHYE.RC	NOT OPERABLE
	DATA	SEQE.RC	INVALID Q-BIT 
	DATA	INVL.RC	INVALID LENGTH
	DATA	SEQE.RC	INVALID STATE 
	DATA	INVL.RC	INVALID LENGTH
	DATA	NOLC.RC	NO LOGICAL CHANNEL AVAILABLE
	DATA	TIMO.RC	TIME OUT DETECTED 
	DATA	RQUE.RC	REQUEST ERROR 
* 
	EJECT
* 
********************************************************************
* 
*	REQUEST HANDLER INPUT PART
* 
********************************************************************
* 
*	ENTRY USED BY THE DC-SCHEDULER
* 
*	INPUT PARAMETERS: 
*		A1  = QUEUE ANCHOR ADDRESS 
*		A12 = ADDRESS OF LINE ADMINISTRATION BLOCK 
*		A13 = ADDRESS OF LOGICAL CHANNEL ADM.BLOCK 
*		A14 = CF STACK POINTER 
* 
RHIP	EQU	*
         LDK      A7,0             A7:=INDICATION FOR RHIP-ENTRY-POINT
         RF       RHIP10
* 
*	ENTRY USED BY THE REQUEST HANDLER OUTPUT PART 
* 
*	INPUT PARAMETERS: 
*		A6  = DWT ADDRESS
*		A14 = CF STACK POINTER 
* 
RHIPRO	EQU	*
* 
*	SET ADDRESS OF QUEUE ANCHOR 
* 
         LDK      A1,DWTIPQ 
         ADR      A1,A6 
         LDK      A7,6             A7:=INDICATION FOR RHIPRO-ENTRY-POINT
         ST       A7,DCLEVL        SET DC-LEVEL-INDICATION
* 
	EJECT
* 
*	DEQUEUE ELEMENT 
* 
RHIP10	EQU	*
	LDR	A11,A1	A11=QUEUE ANCHOR
	CF	A14,DEQUE 
	LDR	A8,A2	A8=BUFFER ADDRESS
* 
*        GET TYPE OF PACKET 
* 
	LDK	A2,0 
	LC	A2,IDENT,A8	A2:=PACKET TYPE 
	LDK	A3,0	A3:=PACKET TYPE INDEX FOR PROCESS-TABLE 
* 
*	TEST IF ENTRY POINT WAS RHIP
* 
         LDR      A7,A7 
         RF(NZ)   RHIP20           NO!
* 
*        GET DWT ADDRESS FROM LC-ADM
* 
	LD	A6,LCDWT,A13	A6=DWT ADDRESS 
RHIP20	EQU	*
* 
*        GET PENDING REQUEST INDICATION 
* 
	LD	A5,DWTST,A6 
	RF(N)	RHIP30	NO REQUEST PENDING
* 
*        GET PENDING REQUEST
* 
	LDK	A5,0 
	LC	A5,DWTFNC,A6
* 
	EJECT
* 
*        TEST IF READ REQUEST PENDING 
* 
	SUK	A5,READAT
	RF(Z)	RHIP30	YES 
* 
*        RELOAD REQUEST 
* 
	ADK	A5,READAT
RHIP30	EQU	*
	LDR	A6,A6
	RF(NZ)	RHIP40	DWT ADDRESS AVAILABLE
	IFF	SWITVC=0 
* 
*        NO DWT ADDRESS 
*        TEST IF PACKET TYPE IS "CALL PACKET" 
* 
	LDK	A3,6	A3:=INDEX FOR PROCESS-TABLE 
	SUK	A2,CAL.P 
	RF(Z)	RHIP90	PROCESS CALL PACKET 
* 
* 
*	NO CALL PACKET
* 
	XIF
* 
*	RELEASE BUFFER AND SEND CLEAR/RESET PACKET
* 
	LDK	A1,NOUSER	A1:=DIAGNOSTIC CODE
	RF	RHI100
* 
RHIP40	EQU	*
         LDK      A1,DWTRCI 
         ADR      A1,A6 
         LDKL     A9,DATA.RC
* 
	EJECT
* 
*	TEST IF THERE IS MORE IN THE QUEUE
* 
         LDR*     A4,A11
         RF(Z)    RHIP50           NO 
	ORRS	A9,A1	SET INDICATION 'DATA RECEIVED'
         RF       RHIP60
RHIP50   EQU      * 
         C1R      A9,A9 
	ANRS	A9,A1	RESET INDICATION 'DATA RECEIVED'
RHIP60   EQU      * 
	IFF	SWITVC=0 
* 
*	DWT ADDRESS AVAILABLE 
*	TEST IF ENTRY POINT WAS RHIP
* 
         LDR      A7,A7 
         RF(NZ)   RHIP70           NO!
* 
*	TEST IF VC RELEASED 
* 
         LDK      A4,VCREL
	LDR	A10,A4 
         LC       A4,DWTSTE,A6
         SUR      A10,A4
         RF(NZ)   RHIP70           NO!
* 
	EJECT
* 
*	VC RELEASED 
*	MOVE INPUT QUEUE ANCHOR FROM LC-ADM TO DWT
* 
         LDR*     A7,A11           A1:=QUEUE ANCHOR 
	RF(Z)	RHIP65 
	LDR*	A4,A7	MORE DATA IN QUEUE ?
	RF(NZ)	RHIP65	YES
	XRRS	A9,A1	RESET MORE DATA BIT IN DWTRCI 
RHIP65	EQU	*
         CMR      A11              CLEAR QUEUE ANCHOR IN LC.ADM 
         LDKL     A11,DWTIPQ
         ADR      A11,A6           A11:=ADDRESS OF QUEUE ANCHOR IN DWT
         STR      A7,A11           STORE QUEUE ANCHOR IN DWT
	CM	LCDWT,A13	CLEAR RELATION WITH LOGICAL CHANNEL 
	XIF
* 
*        TEST IF PACKET TYPE IS "DATA PACKET" 
* 
RHIP70	EQU	*
	LDK	A4,DATA.P
	TM	A4,A2 
	ABL(Z)	DATPAC	PROCESS DATA PACKET
* 
*        NO DATA PACKET 
* 
RHIP80	EQU	*
	CC	A2,TABLE,A3 
	RF(E)	RHIP90	TYPE FOUND
	ADK	A3,1 
	RB	RHIP80	TRY NEXT PACKET TYPE 
* 
RHIP90	EQU	*
	ADR	A3,A3	A3:=INDEX FOR PROCESS-TABLE
	ABI	PACPRO,A3	PROCESS PACKET 
* 
	EJECT
* 
*        TABLE OF MATCHING PACKET PROCESSING ROUTINES 
* 
PACPRO	EQU	*
	DATA	HALT,HALT	RESTART(-CONF.)PACKET 
	DATA	RESPAC,HALT	RESET(-CONF.)PACKET 
	IFF	SWITVC=0 
	DATA	CLEPAC,HALT	CLEAR(-CONF.)PACKET 
	DATA	CALPAC,CALCON	CALL(-CONF.)PACKET
	XIF
	DATA	INTPAC,INTCON	INTERRUPT(-CONF.)PACKET 
* 
*        UNEXPECTED PACKET RECEIVED 
* 
HALT	EQU	*
	HLT
* 
* 
*	GENERAL EXIT OF RHIP
*	RELEASE BUFFER AND SEND CLEAR/RESET PACKET
* 
RHI100	EQU	*
	LDR	A2,A8
	CF	A14,RLBUF	RELEASE BUFFER
RHI110	EQU	*
	ABL	CLVC	EXIT OF RHIP
* 
	EJECT
* 
*        COMPLETE REQUEST WITH RETURNCODE "ACCEPTED"
* 
RHI120	EQU	*
	LDK	A3,ACPT.RC 
* 
*        COMPLETE REQUEST WITH GIVEN RETURNCODE IN A3 
* 
RHI130	EQU	*
	CF	A14,CMPREQ
* 
*        RELEASE BUFFER AND EXIT
* 
RHI140	EQU	*
	LDR	A2,A8
	CF	A14,RLBUF 
	RF	RIPEXI
* 
*        REQUEUE BUFFER,BLOCK QUEUE AND EXIT
* 
RHI150	EQU	*
	LDR	A1,A11	A1:=ADDRESS OF QUEUE ANCHOR 
	LDR	A2,A8	A2:=BUFFER ADDRESS 
	CF	A14,QUEUEF
* 
*	BLOCK QUEUE 
* 
	LDK	A1,NPRFLG	A1:=0 PROCESSING FLAG
	ORRS	A1,A11
* 
*	EXIT OF RHIP
* 
RIPEXI   EQU      * 
	ABL	EXITDC 
	EJECT
* 
* 
*	TIMEOUT ROUTINE OF REQUEST HANDLER
* 
********************************************************************
* 
*	INPUT PARAMETERS: 
*		A12 = DWT ADDRESS
*		A13 = LC-ADM ADDRESS 
*		A14 = CF STACK POINTER 
* 
TIMEXP   EQU      * 
	LDK	A3,TIMO.RC	PRE-SET RETURNCODE"TIMEOUT" 
* 
*	GET ADDRESS OF DWT
* 
	LDR	A6,A12 
* 
*	TEST IF REQUEST ALREADY COMPLETED 
* 
         LD       A5,DWTRTP,A6
         RB(Z)    RIPEXI           YES! 
* 
*	CLEAR RUNNING TIMER INDICATION
* 
         CM       DWTRTP,A6 
* 
	EJECT
* 
*	SCAN ON PENDING REQUEST 
* 
         LDK      A5,0
         LC       A5,DWTFNC,A6
	LDR	A7,A5	SAVE FUNCTION CODE 
	SUK	A5,WRIDAT	WRITE DATA REQUEST 
	RF(Z)	TIME00	YES 
	SUK	A5,READAT-WRIDAT	READ REQUEST
	RF(Z)	COMPLE	YES 
	ADK	A5,READAT-WRIINT	WRITE INTERRUPT REQUEST 
	RF(NZ)	TIME30	NO 
* 
*	TIMEOUT ON WRITE REQUEST
*	TEST IF REQUEST STILL IN OUTPUT QUEUE 
* 
TIME00	EQU	*
         LDR      A1,A13
         ADK      A1,QUEOUT        A1:=ADDRESS OF OUTPUT QUEUE ANCHOR 
* 
*	TEST IF QUEUE IS EMPTY
* 
         LDR*     A2,A1 
         RF(Z)    TIME20
* 
*	TEST IF ONLY NO-PROCESSING FLAG IS SET
* 
TIME10	EQU	*
         SUK      A2,1
         RF(Z)    TIME20           YES! 
         CF       A14,DEQUE        DEQUEUE ELEMENT
* 
	EJECT
* 
*	TEST IF IT IS THE ONE WE ARE LOOKING FOR
* 
         CWR      A2,A6 
         RF(E)    COMPLE           YES! 
* 
*	TEST IF THERE IS ANOTHER ELEMENT IN THE QUEUE 
* 
         LDR*     A4,A1 
         CF       A14,QUEUE        RE-QUEUE ELEMENT 
         RB(NZ)   TIME10           GET SECOND ELEMENT FROM QUEUE
* 
*	ELEMENT NOT IN QUEUE
*	IF NOT WRITE INTERRUPT,IGNORE TIMEOUT 
* 
TIME20   EQU      * 
	SUK	A7,WRIINT
	RF(NZ)	COMEXI
* 
*	COMPLETE REQUEST WITH TIMEOUT RETURNCODE
* 
COMPLE	EQU	*
	CF	A14,CMPREQ
	IFT	SWITVC=0 
TIME30	EQU	*
	XIF
COMEXI	EQU	*
	RB	RIPEXI
	IFF	SWITVC=0 
* 
	EJECT
* 
*	RELEASE DWT FROM CHAIN
* 
TIME30	EQU	*
	IFF	SWITVC=0 
	IFF	SYNRLN=1 
	LD	A1,DWTLAD,A6	LOCAL DTE ADDRESS
	CF	A14,FNDLIN	GET LINE BLOCK ADDRESS 
	CF	A14,RELDWT
	LDK	A3,TIMO.RC	TIME OUT
	XIF
	IFF	SWITVC=0 
	IFT	SYNRLN=1 
	LD	A12,LINTAB	LINE BLOCK ADDRESS 
	CF	A14,RELDWT	RELEASE DWT FROM CHAIN 
	XIF
	IFF	SWITVC=0 
	SUK	A7,CONACT	CONNECT ACTIVE REQUEST ? 
	RF(Z)	TIME40	YES 
	SUK	A7,CONPAS-CONACT	CONNECT PASSIVE REQUEST ? 
	RB(Z)	COMPLE	YES 
* 
*	(AUTOMATIC)ACCEPT REQUEST 
* 
TIME40	EQU	*
* 
*	CLEAR DWT TO LC-ADM RELATION
* 
	LDK	A4,0 
	LC	A4,DWTLCN,A6	LC NUMBER
	CF	A14,GTLCAD	GET LC-ADM ADDRESS 
	CM	LCDWT,A13	CLEAR DWT-ADDRESS 
	CF	A14,CMPREQ	COMPLETE REQUEST 
	LDK	A1,0 
	RB	RHI110	SEND CLEAR PACKET AND EXIT 
* 
	EJECT
* 
* 
*	CALL PACKET 
* 
********************************************************************
* 
*	INPUT PARAMETERS: 
*		A5  = REQUEST PENDING IND. 
*		A6  = DWT ADDRESS OR ZERO
*		A8  = BUFFER ADDRESS 
*		A11 = QUEUE ANCHOR 
*		A12 = LINE-ADM ADDRESS 
*		A13 = LC-ADM ADDRESS 
*		A14 = CF STACK POINTER 
* 
CALPAC	EQU	*
* 
*	TEST IF ONLY USER DATA HAS TO BE PASSED TO THE USER 
* 
	LDR	A6,A6
	ABL(NZ)	CAL180	YES!
* 
*	GET DWT FOR LOGICAL CHANNEL 
* 
	LD	A6,CHAIN,A12	GET DWT CHAIN ANCHOR 
	RF(Z)	CALP30	NO CONNECT REQUEST FOR THIS LINE
* 
	EJECT
* 
*	TEST IF CONNECT PASSIVE REQUEST IS PENDING
* 
CALP10	EQU	*
	LD	A4,DWTST,A6 
	RF(N)	CALP20	NO REQUEST PENDING
	LDK	A4,CONPAS
	CC	A4,DWTFNC,A6	CONNECT PASSIVE ?
	RF(E)	CALP40	YES 
CALP20	EQU	*
	LD	A6,DWTCHN,A6	GET NEXT DWT 
	RB(NZ)	CALP10	.
* 
*        NO MATCHING DWT FOUND
*        RELEASE BUFFER AND SEND CLEAR/RESET PACKET AND EXIT
* 
CALP30	EQU	*
	LDK	A1,NOTINT	A1:=DIAGNOSTIC CODE
	RB	RHI100
* 
*	TEST IF CALLING DTE-ADDRESS KNOWN BY SYSTEM 
* 
CALP40	EQU	*
	LDK	A5,BEGDAT
	ADR	A5,A8
* 
*	GET ADDRESS WHERE CALLING LENGTH IN PACKET WILL BE STORED 
* 
	LCR	A1,A5
	ADK	A5,1 
	LDR	A2,A5
	IFT	CALDTE=1 
* 
	EJECT
* 
*	TEST IF CALLED DTE-ADDRESS ALSO IN PACKET 
* 
	LDR	A4,A1
	ANK	A4,/0F 
	RF(Z)	CALP80	NO
* 
*	MOVE CALLING DTE-ADDRESS TO CALLED DTE-ADDRESS
* 
	LDR	A7,A2
	SRL	A4,1	LENGTH OF CALLED DTE IN OCTADS
*			TRUCATED!!! 
	ADR	A5,A4
* 
*	TEST IF CALLING DTE-ADDRESS STARTS ON OCTAD BOUNDARY IN PACKET
* 
         LDR      A3,A1 
         SRL      A1,4             A1:=LENGTH OF CALLING DTE IN SEMI-OCT
	LDR	A4,A1	LENGTH OF CALLING DTE IN SEMI-OCTADS 
         ANK      A3,1
	RF(Z)	CALP60	YES 
* 
	EJECT
* 
*	DTE-ADDRESS STARTS 0N SEMI-OCTAD
* 
CALP50	EQU	*
         LCR      A3,A5 
         SLL      A3,8            A3:=HIGH ORDER DIGIT
         ADK      A5,1             UPDATE ADDRESS OF CALLING DTE IN PAC 
         LCR      A3,A5 
         SRL      A3,4             A3:=LOW ORDER DIGIT
         SCR      A3,A7            STORE DIGITS AT BEGIN OF PACKET
         ADK      A7,1             UPDATE ADDRESS 
         SUK      A4,2
	RB(P)	CALP50	MOVE NEXT TWO DIGITS
	RF(NZ)	CALP85
	ADK	A5,1 
	RF	CALP85
* 
*	DTE-ADDRESS STARTS ON OCTAD BOUNDARY
* 
CALP60	EQU	*
         LCR      A3,A1 
         SCR      A3,A7 
         ADK      A7,1
         ADK      A5,1
         SUK      A4,2
	RB(P)	CALP60 
	RF	CALP85
CALP80	EQU	*
	XIF
	IFF	SWITVC=0 
	LDR	A4,A1
	SRA	A4,5 
	RF(NN)	CALP82
	ADK	A4,1 
CALP82	EQU	*
	ANK	A4,/0F	LENGTH IN OCTETS
	ADR	A5,A4
CALP85	EQU	*
* 
	EJECT
* 
*	GET DTE-ADDRESS 
* 
	LDKL	A3,LOCAL	SET TYPE 
	INH		.	=1
	CF	A15,GETDST	GET SYMBOLIC DTE-ADDRESS 
	ENB		.	=1
* 
*	TEST IF SYMBOLIC DTE ADDRESS FOUND
* 
	LDR	A1,A1
	RB(N)	CALP30	NO
* 
*	TEST IF REMOTE ADDRESS ACCEPTED 
* 
	LD	A2,DWTRAD,A6
	RF(Z)	CALP90	ALL REMOTE ACCEPTED 
	CWR	A1,A2
	RB(NE)	CALP20	NOT ACCEPTED,TRY NEXT
* 
*	DWT FOUND 
* 
CALP90	EQU	*
	ST	A1,DWTRAD,A6	STORE REMOTE SYMBOLIC DTE-ADDRESS
	LD	A2,DWTECB,A6
	ST	A1,ECBCW1,A2
* 
	EJECT
* 
*        STORE LOG CHAN NUMBER IN DWT 
* 
	LC	A1,LCIDNT,A8	GET LC NUMBER
	SC	A1,DWTLCN,A6	STORE IT IN DWT
* 
*        STORE DWT ADDRESS IN LC-ADM
* 
	ST	A6,LCDWT,A13
* 
*	TEST IF FACILITIES OR USER DATA AVAILABLE 
* 
	LDR*	A3,A8	PACKET LENGTH 
	ADR	A3,A8	END ADDRESS OF PACKET
	SUK	A3,2 
	CWR	A5,A3	FACILITIES OR USER DATA IN PACKET ?
	RF(E)	CAL150	NO
	STR	A5,A8	STORE BEGIN ADDR.IN HDLC-HEADDER 
* 
	EJECT
* 
*	TEST IF FACILITIES ONLY 
* 
	LCR	A1,A5
         ANK      A1,/3F           A1:=LENGTH OF FACILITIES 
         RF(Z)    CAL100           NO FACILITIES AT ALL 
         ADR      A1,A5 
         CWR      A1,A3 
         RF(NE)   CAL100           FACILITIES AND USER DATA 
* 
*	ONLY FACILITIES 
* 
         ADK      A1,1             ADD FACILITY-LENGTH OCTAD
         SUR      A1,A5 
         LDR      A3,A1 
         RF       CAL110
CAL100   EQU      * 
         ADK      A3,2
         SUR      A3,A5            A3:=LENGTH IN OCTADS 
CAL110   EQU      * 
         SC       A3,LCIDNT,A8     STORE LENGTH IN LOGICAL CHAN.NUMBER
	LDKL	A3,DATA.RC
* 
*	TEST IF OPTION SET IN CONNECT PASSIVE REQUEST 
* 
	LDK	A2,INCALR
	LC	A4,DWTOPT,A6
	ANK	A4,CALOPT
	RF(NZ)	CAL130	YES
* 
*        SEND CALL CONFIRMATION 
* 
	ST	A3,DWTRCI,A6
* 
	EJECT
* 
*	REQUEUE BUFFER AND BLOCK QUEUE
* 
         LDR      A2,A8 
         LDR      A1,A11
         CF       A14,QUEUEF       REQUEUE BUFFER 
         LDK      A1,NPRFLG 
         ORRS     A1,A11           BLOCK QUEUE
	LDK	A5,INCALL
CAL120	EQU	*
	LDK	A2,ACCCAL
	LDKL	A11,TRANSP
	ABL	DISC60	ACCEPT CALL 
CAL130	EQU	*
	SC	A2,DWTSTE,A6
	CF	A14,CMPREQ
* 
*        REQUEUE BUFFER,BLOCK QUEUE AND EXIT
* 
CAL140	EQU	*
	ABL	RHI150 
* 
	EJECT
* 
*        NO USER DATA AVAILABLE 
*	TEST IF OPTION SET IN CONNECT PASSIVE REQUEST 
* 
CAL150	EQU	*
	LDK	A5,CONAD 
         LC       A3,DWTOPT,A6
         ANK      A3,CALOPT 
	RF(NZ)	CAL155	YES
         LDR      A2,A8 
         CF       A14,RLBUF        RELEASE BUFFER 
	RB	CAL120
* 
CAL155	EQU	*
	LDK	A5,INCALR
         SC       A5,DWTSTE,A6     CHANGE DWT STATE 
* 
*        COMPLETE REQUEST WITH RETURNCODE "ACCEPTED"
*        RELEASE BUFFER AND EXIT
* 
CAL160	EQU	*
	ABL	RHI120 
CAL170   EQU      * 
         LDR      A2,A8 
         CF       A14,RLBUF        RELEASE BUFFER 
         RB       CAL120
	EJECT
* 
*        MOVE INFORMATION OF INCOMMING CALL IN READ BUFFER
* 
CAL180   EQU      * 
* 
*        TEST IF READ REQUEST PENDING 
* 
	LDR	A5,A5
	RF(NZ)	CAL190	NO 
* 
*        READ REQUEST PENDING 
* 
         LDR*     A1,A8            A1:=ADDRESS OF FACILITY LENGTH IN PAC
* 
*        GET NUMBER OF CHARACTERS TO MOVE FROM PACKET IN BUFFER 
* 
         LDK      A4,0
         LC       A4,LCIDNT,A8
         CF       A14,COPTUB
         RB       CAL160           COMPLETE REQUEST WITH RETURN CODE
	                                'ACCEPTED',RELEASE BUFFER AND EXIT 
* 
*        TEST IF VC RELEASED
* 
CAL190	EQU	*
	LDR	A10,A10
	RB(NZ)	CAL140	NO! REQUEUE BUFFER,BLOCK QUEUE,EXIT
	ABL	RHI140	YES! RELEASE BUFFER AND EXIT
* 
	EJECT
* 
* 
*	CALL CONFIRMATION PACKET
* 
********************************************************************
* 
*	INPUT PARAMETERS: 
*		A6  = DWT ADDRESS
*		A8  = BUFFER ADDRESS 
*		A14 = CF STACK POINTER 
* 
CALCON	EQU	*
	LDK	A2,CONAD	DWT STATE :=
	SC	A2,DWTSTE,A6	CONNECTED, ACCEPT DATA 
* 
*        COMPLETE REQUEST WITH RETURNCODE "ACCEPTED"
*        RELEASE BUFFER AND EXIT
* 
	ABL	RHI120 
* 
	EJECT
* 
* 
*	CLEAR PACKET
* 
********************************************************************* 
* 
*	INPUT PARAMETERS: 
*		A5  = REQUEST PENDING INDICATION 
*                       <0: NO REQUEST PENDING
*                       =0: READ REQUEST PENDING
*                       >0: OTHER REQUEST PENDING 
*                 A6  = DWT ADDRESS 
*		A8  = BUFFER ADDRESS 
*		A11 = ADDRESS OF INPUT-QUEUE ANCHOR
*                 A14 = CF STACK POINTER
* 
CLEPAC	EQU	*
	LDK	A3,CLEA.RC+MORE.RC	CLEAR + MORE INFO 
	LDK	A1,DWTCLE	DISP FOR CLEAR INFO
	RF	CLERES
	XIF
	EJECT
* 
* 
*	RESET PACKET
* 
********************************************************************
* 
*	INPUT PARAMETERS: 
*		A5  = REQUEST PENDING INDICATION 
*		      <0: NO REQUEST PENDING 
*		      =0: READ REQUEST PENDING 
*		      >0: OTHER REQUEST PENDING
*		A6  = DWT ADDRESS
*		A8  = BUFFER ADDRESS 
*		A14 = CF STACK POINTER 
* 
RESPAC	EQU	*
	CM	DWTRCI,A6	CLEAR RETURN INFO 
	LDK	A4,0 
	SC	A4,DWTWRO,A6
	LDK	A3,RSET.RC+MORE.RC	RESET + MORE INFO 
	LDK	A1,DWTRES	DISP FOR RESET INFO
CLERES	EQU	*
	ADR	A1,A6	WHERE TO STORE INFO
	LDK	A4,CAUSE 
	ADR	A4,A8	A4:=STARTADDR.OF CAUSE-FIELD IN PACKET 
* 
*        GET CAUSE AND DIAGNOSTIC CODE FROM PACKET
* 
         LCR      A7,A4 
         ECR      A7,A7 
         LC       A7,1,A4 
	EJECT
* 
*        STORE RESET CAUSE AND DIAGNOSTIC IN DWT
* 
	ORS	A3,DWTRCI,A6 
	STR	A7,A1
* 
*	TEST IF REQUEST PENDING 
* 
	LDR	A5,A5
	RF(N)	RESP30	NO! 
* 
*  	TEST IF CLOSE SYSTEM REQUEST PENDING
* 
	SUK	A5,CLOSYS
	IFT	STATI=1
	RF(Z)	RESP40	YES ! 
* 
*  	TEST IF STATISTIC REQUEST PENDING 
* 
	SUK	A5,STATIS-CLOSYS 
	XIF
	RF(Z)	RESP40	YES 
	LDK	A1,TOLD.RC	RESET/CLEAR TOLD TO USER
	ORS	A1,DWTRCI,A6 
	CF	A14,CMPREQ	COMPLETE REQUEST 
RESP30	EQU	*
	IFF	SWITVC=0 
	ANK	A3,CLEA.RC	CLEAR PACKET ?
	RF(Z)	RESP40	NO
	CF	A14,RELDWT	RELEASE DWT FROM CHAIN 
	XIF
* 
*	RELEASE BUFFER AND EXIT 
* 
RESP40	EQU	*
	ABL	RHI140 
	EJECT
* 
* 
*	DATA PACKET 
* 
******************************************************************* 
* 
*	INPUT PARAMETERS: 
*		A5  = REQUEST PENDING INDICATION 
*		      <0: NO REQUEST PENDING 
*		      =0: READ REQUEST PENDING 
*		      >0: OTHER REQUEST PENDING
*		A6  = DWT ADDRESS
*		A8  = BUFFER ADDRESS 
*		A10 = VC RELEASE INDICATION
*		      =0: VC RELEASED,ELSE NOT RELEASED
*		A11 = ADDRESS OF QUEUE ANCHOR
*		A13 = LC-ADM ADDRESS 
*		A14 = CF STACK POINTER 
* 
DATPAC	EQU	*
	LDKL	A9,DATA.RC
	LDR	A3,A6
	ADK	A3,DWTRCI
* 
*        TEST IF READ REQUEST PENDING 
* 
	LDR	A5,A5
	RF(NZ)	DAT030
* 
	EJECT
* 
*        READ REQUEST PENDING 
*        COPY PACKET TO USER BUFFER 
* 
	LDK	A1,BEGDAT	A1:=DISPL.IN PACKET FOR USER DATA
	ADR	A1,A8	A1:=STARTADDR.OF USER DATA IN PACKET 
	LDR*	A4,A8	A4:=TOTAL LENGTH OF DATA PACKET 
	SUK	A4,BEGDAT	A4:=LENGTH OF USER DATA
	CF	A14,COPTUB
	IFF	SWITVC=0 
* 
*        TEST IF DWT STATE IS VC RELEASED 
* 
         LDR      A10,A10 
         RF(Z)    DAT005           YES! 
	XIF
	LC	A2,NRNUBF,A13 
	ADK	A2,1 
	SC	A2,NRNUBF,A13	INCREMENT NR.OF UNUSED BUFFERS
DAT005   EQU      * 
* 
*        PREPARE RETURNCODE 
* 
	LDR*	A3,A3 
* 
*        TEST IF MORE-DATA-INDICATION SET 
* 
	LC	A5,MBIT,A8
	ANK	A5,MPOS
	RF(NZ)	DAT010
* 
*	MORE DATA INDICATION NOT SET
*	ADJUST RETURN CODE
* 
	ORKL	A3,LAST.RC
* 
	EJECT
* 
*        TEST IF QUALIFIER-BIT SET
* 
DAT010	EQU	*
	LC	A1,QBIT,A8
	ANK	A1,QPOS
	RF(Z)	DAT020 
* 
*        QUALIFIER-BIT SET; ADJUST RETURN CODE
* 
	ORKL	A3,QBIT.RC
* 
*        COMPLETE REQUEST WITH RETURNCODE IN A3 
*        RELEASE BUFFER AND EXIT
* 
DAT020	EQU	*
	ABL	RHI130 
* 
*        NO READ REQUEST PENDING
* 
DAT030	EQU	*
	ORRS	A9,A3	SET DATA AVAILABLE IN DWT 
* 
*        REQUEUE BUFFER,BLOCK QUEUE AND EXIT
* 
	ABL	RHI150 
	EJECT
* 
* 
*	INTERRUPT PACKET
* 
******************************************************************* 
* 
*	INPUT PARAMETERS: 
*		A5  = REQUEST PENDING INDICATION 
*		      <0: NO REQUEST PENDING 
*		      =0: READ REQUEST PENDING 
*		      >0: OTHER REQUEST PENDING
*		A6  = DWT ADDRESS
*		A8  = BUFFER ADDRESS 
*		A10 = VC RELEASE INDICATION
*		      =0: VC RELEASED,ELSE NOT RELEASED
*		A11 = ADDRESS OF QUEUE ANCHOR
*		A13 = LC-ADM ADDRESS 
*		A14 = CF STACK POINTER 
* 
INTPAC	EQU	*
         LDK      A7,DWTRCI 
         ADR      A7,A6 
         LDKL     A3,INTR.RC
* 
*	TEST IF READ REQUEST PENDING
* 
	LDR	A5,A5
	RF(NZ)	INT010
* 
	EJECT
* 
*        READ REQUEST PENDING 
*        COPY PACKET TO USER BUFFER 
*        RESET INTERRUPT RECEIVED INDICATION IN DWT 
* 
         C1R      A3,A3 
         ANRS     A3,A7 
	LDK	A1,BEGDAT	A1:=DISPL.IN PACKET FOR INTERRUPT- 
			USER DATA
	ADR	A1,A8	A1:=START ADDRESS OF INT.USER DATA 
	LDK	A4,1	LENGTH OF INT.USER DATA 
	CF	A14,COPTUB
         C1R      A3,A3            A3:=RETURNCODE:INTERRUPT PACKET REC. 
	ORR*	A3,A7 
	CF	A14,CMPREQ	COMPLETE REQUEST 
	LDR	A2,A8
	CF	A14,RLBUF	RELEASE BUFFER
* 
*	TEST IF DWT STATE IS VC RELEASED
* 
         LDR      A10,A10 
         RF(Z)    INT008           YES! 
* 
*	PREPARE INTERRUPT CONFIRMATION PACKET 
* 
INT002	EQU	*
	LDR	A2,A13	GET AN OUTPUT BUFFER
	ADK	A2,SYSBUF
* 
*	TEST IF BUFFER IS FREE
* 
	LDR*	A1,A2 
	RF(Z)	INT004	YES 
	LDKL	A1,INT002	A1:=REACTIVATION ADDRESS
	ABL	BUFWAT	WAIT FOR FREE BUFFER
* 
	EJECT
* 
*	BUFFER IS FREE
* 
INT004	EQU	*
	LDK	A1,INT.CP
	SC	A1,IDENT,A2	SET INTERRUPT CONF.TYPE IN BUFFER 
	LDK	A1,INT.CL	PACKET LENGTH OF INTERRUPT CONF. 
	ST	A1,HDLC,A2	STORE LENGTH IN BUFFER 
	LDR	A1,A13 
	ADK	A1,QUEOUT	A1:=ADDRESS OF OUTPUT QUEUE ANCHOR 
	CF	A14,QUEUEF
* 
*	SET PROCESSING FLAG FOR OUTPUT QUEUE
* 
	LDK	A2,NPRFLG
	C1R	A2,A2
	ANRS	A2,A1	STORE PROCESSING FLAG 
INT008   EQU      * 
	ABL	EXITDC	EXIT
* 
*	NO READ REQUEST PENDING 
*	SET INTERRUPT RECEIVED INDICATION IN DWT
* 
INT010	EQU	*
	ORRS	A3,A7 
* 
*	REQUEUE BUFFER,BLOCK QUEUE AND EXIT 
* 
	ABL	RHI150 
	EJECT
* 
* 
*	INTERRUPT CONFIRMATION PACKET 
* 
********************************************************************* 
* 
*	INPUT PARAMETERS: 
*		A5  = REQUEST PENDING INDICATOR
*                       <0: NO REQUEST PENDING
*                       =0: READ REQUEST PENDING
*                       >0: OTHER REQUEST PENDING 
*                 A6  = DWT ADDRESS 
*		A8  = BUFFER ADDRESS 
*		A14 = CF STACK POINTER 
* 
INTCON	EQU	*
* 
*	TEST IF ANY REQUEST PENDING 
* 
         LDR      A5,A5 
	RF(N)	INC020 
* 
*	TEST IF WRITE INTERRUPT REQUEST PENDING 
* 
         SUK      A5,WRIINT 
	RF(NZ)	INC020	NO; IGNORE PACKET
* 
*        INTERRUPT REQUEST PENDING; COMPLETE REQUEST
*        RELEASE BUFFER AND EXIT
* 
	ABL	RHI120 
* 
*	RELEASE BUFFER AND EXIT 
* 
INC020	EQU	*
	ABL	RHI140 
	EJECT
* 
* 
*	COMPLETE USER REQUEST 
* 
********************************************************************
* 
*	INPUT PARAMETERS: 
*		A3  = RETURN CODE
*		A6  = DWT ADDRESS
*		A14 = CF STACK POINTER 
* 
*	CALLING SEQUENCE: 
*		CF A14,CMPREQ
* 
*	OUTPUT PARAMETERS:
*		NO REGISTERS ARE CHANGED 
* 
CMPREQ	EQU	*
	IFT	CPU852=1 
	ST	A1,CMPSAV	SAVE A1 
	ST	A2,CMPSAV+2	SAVE A2 
	XIF
	IFT	CPU852=0 
	MS	2,CMPSAV	SAVE A1 AND A2 
	XIF
* 
*	TEST IF REQUEST PENDING 
* 
         LD       A1,DWTST,A6 
         RF(N)    CMP020           NO!
* 
	EJECT
* 
*	TEST IF REQUEST TIMER IS RUNNING
* 
	LD	A1,DWTRTP,A6
	RF(Z)	CMP010	NO TIMER RUNNING
* 
*	CANCEL RUNNING TIMER
* 
	CF	A14,CANTIM
	CM	DWTRTP,A6	CLEAR RUNNING TIMER INDICATION
CMP010	EQU	*
* 
*	PREPARE INTERFACE FOR TENDIO
* 
	LDR	A1,A3	A1:= RETURN CODE 
	INH		.	=1
	CF	A15,TENDIO	COMPLETE REQUEST 
	ENB
CMP020   EQU      * 
	IFT	CPU852=1 
	LD	A1,CMPSAV	RELOAD A1 
	LD	A2,CMPSAV+2	RELOAD A2 
	XIF
	IFT	CPU852=0 
	ML	2,CMPSAV	RELOAD A1 AND A2 
	XIF
	RTN	A14	RETURN TO CALLER 
* 
*	SAVE AREA FOR A1,A2 
* 
CMPSAV	EQU	*
	DATA	0,0 
	EJECT
* 
* 
*	COPY INFORMATION FROM SYSTEM TO USER AREA 
* 
********************************************************************
* 
*	INPUT PARAMETERS: 
*		A1  = SYSTEM BUFFER ADDRESS
*		A4  = LENGTH OF BUFFER 
*		A6  = DWT ADDRESS
*		A14 = CF STACK POINTER 
* 
*	CALLING SEQUENCE: 
*		CF A14,COPTUB
* 
*	OUTPUT PARAMETERS:
*		NONE 
* 
COPTUB	EQU	*
	STR	A3,A14	SAVE A3 
	LD	A3,DWTECB,A6	GET ECB ADDRESS
	LD	A2,ECBBA,A3	GET USER BUFFER ADDRESS 
	ST	A4,ECBEL,A3	SET EFFECTIVE LENGTH
	LDR	A3,A4	BUFFER LENGTH
	LD	A4,DWTTAB,A6	GET TTAB ADDRESS 
	INH		.	=1
	CF	A15,MOVSU	MOVE DATA FROM SYSTEM TO USER 
	ENB		.	=1
	LDR*	A3,A14	RESTORE A3 
	RTN	A14
* 
	EJECT
* 
* 
*	SAVE REGISTERS A1-A8 IN DC SAVE AREA
* 
********************************************************************
* 
*	CALLING SEQUENCE: 
*		CF A14,SAVE8 
* 
*	OUTPUT PARAMETERS:
*		NO REGISTERS ARE CHANGED 
* 
SAVE8	EQU	* 
	IFT	CPU852=1 
	ST	A1,SAVE 
	ST	A2,SAVE+2 
	ST	A3,SAVE+4 
	ST	A4,SAVE+6 
	ST	A5,SAVE+8 
	ST	A6,SAVE+10
	ST	A7,SAVE+12
	ST	A8,SAVE+14
	XIF
	IFT	CPU852=0 
	MS	8,SAVE
	XIF
	RTN	A14
	EJECT
* 
* 
*	RELOAD REGISTERS A1-A8 FROM DC SAVE AREA
* 
******************************************************************* 
* 
*	CALLING SEQUENCE: 
*		CF A14,RELOA8
* 
*	OUTPUT PARAMETERS:
*		REGISTERS A1-A8 ARE RELOADED 
* 
RELOA8	EQU	*
	IFT	CPU852=1 
	LD	A1,SAVE 
	LD	A2,SAVE+2 
	LD	A3,SAVE+4 
	LD	A4,SAVE+6 
	LD	A5,SAVE+8 
	LD	A6,SAVE+10
	LD	A7,SAVE+12
	LD	A8,SAVE+14
	XIF
	IFT	CPU852=0 
	ML	8,SAVE
	XIF
	RTN	A14	RETURN TO CALLER 
	EJECT
* 
* 
*	THIS MODULE SELECTS FROM THE DWT THE TRANSPORT HANDLER
*	FUNCTION WHICH HAS TO BE EXECUTED.
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A6  = DWT-ADDRESS (NOT FOR START & STOP REQUEST) 
*		A12 = LINE BLOCK ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,TRANSH 
* 
*	OUTPUT PARAMETERS:
*		A4  = RETURN CODE
*		A13 = LC-ADM ADDRESS 
*		NO OTHER REGISTERS ARE CHANGED 
* 
TRANSH	EQU	*
         CF       A14,SAVE8             SAVE REGISTERS
	LC	A1,DWTFNC,A6	GET FUNCTION CODE
	ANK	A1,/FF	. 
	LC	A4,DWTLCN,A6	GET LC-ADM ADDRESS 
	ANK	A4,/FF	. 
	SLL	A4,1	. 
	AD	A4,LC:TAB,A12	. 
	LDR*	A13,A4	.
         ABI      TABTH,A1              BRANCH TO THE CONCERNING ROUTINE
* 
	EJECT
* 
*	GENERAL RETURN PART 
* 
READY	EQU	* 
         ST       A4,SAVE+6             SAVE RETURN CODE
         CF       A14,RELOA8
	RTN	A14	BACK TO THE REQUEST HANDLER
* 
*	BRANCH TABLE FOR TRANSPORT HANDLER FUNCTIONS
* 
TABTH	EQU	* 
	DATA	START	OPEN REQUEST
	DATA	STPINT	CLOSE REQUEST
	DATA	CALLR	CONNECT ACTIVE REQUEST
	IFF	SWITVC=0 
	DATA	CALL30	CONNECT PASSIVE REQUEST
	DATA	CLEAR	DISCONNECT REQUEST
	DATA	CALLCR	ACCEPT CALL
	XIF
	IFT	SWITVC=0 
	DATA	HLT	CONNECT PASSIVE REQUEST 
	DATA	CLEAR	DISCONNECT REQUEST
	DATA	HLT	ACCEPT CALL 
	XIF
	DATA	RRR	ACCEPT DATA(READ) 
	DATA	RNRR	REFUSE DATA REQUEST
	DATA	DATA	WRITE REQUEST
	DATA	INTR	WRITE INTERRUPT REQUEST
* 
STPINT	EQU	*
	CF	A14,STOP
	RB	READY 
* 
	EJECT
* 
* 
*	PROCESSING OF THE OPEN SYSTEM REQUEST 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A12 = LINE BLOCK ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    START 
*		A RETURN IS MADE TO THE LABEL "READY"
* 
*	OUTPUT PARAMETERS:
*		A4  = RETURN CODE
* 
START	EQU	* 
	LDK	A4,HRDERR	PRESET RETURN CODE 
	LDK	A1,CLOFLG	CLOSE STILL BUSY ? 
	AN	A1,CMNFLG,A12	. 
	ABL(NZ)	READY	YES
	LDK	A2,0 
* 
*	INITIATE LC-ADM TABLES
* 
	LC	A4,NRLC,A12	GET # OF LOGICAL CHANNELS 
	ANK	A4,/FF	. 
	SUK	A4,1	. 
	IFF	PERMVC=0 
	LC	A7,NRPVC,A12	GET # OF PVC'S 
	ANK	A7,/FF	. 
	SUK	A7,1	. 
	XIF
* 
	EJECT
STRT00	EQU	*
	CF	A14,GTLCAD	GET LC-ADM ADDRESS 
	SC	A4,LCNUM,A13	LOGICAL CHANNEL NUMBER 
	ST	A2,LCSTAT,A13	STATUS AND SUB-STATUS 
	ST	A2,FLAGS,A13	BOOLEAN VARIABLES
	SC	A2,VCTYP,A13	VC-TYPE
	SC	A2,NRNUBF,A13	FREE INPUT BUFFERS
	ST	A2,LCDWT,A13	LC TO DWT RELATION 
	ST	A2,QUEINP,A13	RH-INPUT QUEUE
	ST	A2,QUEOUT,A13	TH-OUTPUT QUEUE 
	ST	A2,TIMADR,A13	TIMER BLOCK ADDRESS 
	ST	A2,SYSBUF,A13	FREE SYSTEM BUFFER
	LDKL	A1,/1000
	ORR	A1,A4	GENERAL FORMAT + LOG. CHANNEL NR.
	ST	A1,SYSBUF+LCIDNT-1,A13
	IFF	SWITVC=0 
	IFF	PERMVC=0 
	CWR	A7,A4	IS THIS A PVC ?
	RF(NE)	STRT02	NO 
	XIF
	IFF	PERMVC=0 
	LDKL	A8,PVC	SET PVC TYPE 
	SC	A8,VCTYP,A13	.
	LDKL	A8,DATA.ST	SET DATA TRANSFER STATE
	SC	A8,LCSTAT,A13	. 
	LD	A1,WNDSIZ,A12	SET WINDOW SIZES
	SC	A1,LCREWN,A13	. 
	SC	A1,LCTRWN,A13	. 
	LD	A1,PACKLN,A12	SET PACKET LENGTH 
	ST	A1,TRBFSZ,A13	. 
	ST	A1,REBFSZ,A13	. 
	CF	A14,TRTHR	TRANSLATE THRESHOLD PERCENTAGE
	CF	A14,CLLCAD	CLEAR LC-ADM FIELDS
	SUK	A7,1	. 
STRT02	EQU	*
	XIF
	SUK	A4,1	NEXT LC-ADM ? 
	RB(NN)	STRT00	YES
* 
	EJECT
* 
*	INITIATE LINE BLOCK 
* 
	LD	A1,FILCOD,A12	FILE CODE 
	LDR	A8,A12	LINE ECB-ADDRESS
	ADKL	A8,LOCECB	. 
	STR	A1,A8	SAVE FILE CODE 
	CM	NRPNDT,A12	NUMBER OF PENDING OUTPUT REQUESTS
	CM	HRDSTA,A12	HARDWARE STATUS
	CM	RTMADR,A12	RESTART TIMER ADDRESS
	CM	RSTQUE,A12	CLEAR RESTART QUEUE ANCHOR 
* 
*	INITIATE OUTPUT ECB'S 
* 
	LDK	A2,SYNRTR	GET NUMBER OF ECB'S
	LDR	A3,A12	GET FIRST ECB ADDRESS 
	ADK	A3,ECBOU1	.
STRT05	EQU	*
	ST	A1,ECBFC,A3	SAVE FILE CODE
	CM	ECBBA,A3	CLEAR BUFFER ADDRESS 
         ADK      A3,ECBINL+SYSBFL
	SUK	A2,1 
	RB(P)	STRT05	NEXT ECB
* 
*	PREPARE OPEN REQUEST ECB
* 
	LDR	A8,A12	ECB-ADDRESS 
	ADKL	A8,LOCECB	. 
	LDR	A4,A12	ADDRESS USER BLOCK
	ADK	A4,UBNUM	. 
	ST	A4,ECBBA,A8	TO ECB
	LD	A5,PACKLN,A12	RECEIVE BUFFER SIZE 
	ADK	A5,BEGDAT	.
	ST	A5,ECBRL,A8	. 
* 
	EJECT
* 
*	SET OPEN BUSY INDICATION
* 
	LDK	A3,OPEFLG
	ORS	A3,CMNFLG,A12
* 
*	PREPARE USER BLOCK WITH INPUT BUFFERS 
* 
	LDK	A3,SYUBNR	NUMBER OF USER BUFFERS 
	STR	A3,A4	.
STRT10	EQU	*
	ADK	A4,2	UPDATE STORE POINTER
	CF	A14,GTBUF	GET A BUFFER
	STR	A2,A4	SAVE BUFFER ADDRESS
	SUK	A3,1	MORE BUFFERS NEEDED ? 
	RB(P)	STRT10	YES 
	LDK	A7,CONN+/80	ORDER CODE 
	LD	A2,DWTRTV,A6	GET TIMER VALUE
STRT20	EQU	*
	LKM		ISSUE OPEN LINE REQUEST 
	DATA	1 
* 
*	AFTER COMPLETION,CHECK RETURN CODE
* 
	LD	A1,ECBRC,A8 
	RF(Z)	STRT40	NO ERRORS 
	LDKL	A3,HRDWER	HARDWARE ERRORS ? 
	ANR	A3,A1	.
	RF(Z)	STRT30	NO
	ST	A1,HRDSTA,A12	SAVE STATUS 
	LDK	A4,HRDERR	RETURN CODE
	RF	RETUR2
* 
	EJECT
* 
*	TEST ON TYPE OF ERROR 
* 
STRT30	EQU	*
	LDK	A4,DISCRM	PRESET REURN CODE
	CWK	A1,REMDIS	IS IT REMOTE DISC. ? 
	RF(E)	RETUR2	YES 
	CWK	A1,DEFTIM	TIME-OUT ? 
	ABL(NE)	HLT	ERROR
	LDR	A2,A2	TIME OUT ? 
	RB(Z)	STRT20	NO
	LDK	A4,TMEOUT	PRESET RETURN CODE 
	SUKL	A2,330	TIME OUT ? 
	RF(N)	RETUR2	YES,COMPLETE REQUEST
	RB	STRT20	NO,CONTINUE
* 
	EJECT
* 
*	ISSUE A NUMBER OF INPUT REQUESTS
* 
STRT40	EQU	*
	LDK	A1,STRTFL	SET SYSTEM STARTED FLAG
	ORS	A1,CMNFLG,A12	.
	LDK	A4,SYNRRC	NUMBER OF INPUT REQUESTS 
	LDR	A8,A12	ADDRESS FIRST INPUT ECB 
	ADKL	A8,ECBIN1	. 
STRT50	EQU	*
	LD	A1,FILCOD,A12	FILE CODE TO ECB
	ST	A1,ECBFC,A8	. 
	CF	A14,GTBUF	GET AN INPUT BUFFER 
	ST	A2,ECBBA,A8	. 
	LD	A1,PACKLN,A12	RECEIVE BUFFER SIZE 
	ADK	A1,BEGDAT	.
	ST	A1,ECBRL,A8	. 
	LDR	A1,A8	PARAMETER AFTER COMPLETION 
	LDK	A7,RECEIV	ORDER CODE 
	LKM		ISSUE INPUT REQUEST 
	DATA	-1
	DATA	ENDIN	ACTIVATION ADDRESS
	ADKL	A8,ECBINL	GET NEXT ECB-ADDRESS
	SUK	A4,1	NEXT ONE ?
	RB(P)	STRT50	YES 
* 
	EJECT
* 
*	PREPARE RESTART PACKET AND QUEUE IT FOR OUTPUT
* 
	LDR	A2,A13	GET AN OUTPUT BUFFER
	ADK	A2,SYSBUF	.
	LDK	A1,RSTR.P	RESTART PACKET TYPE
	SC	A1,IDENT,A2	. 
	LDK	A1,0 
	SC	A1,CAUSE,A2	RESTART CAUSE 
	SC	A1,DGNCOD,A2	DIAGNOSTIC CODE
	LDK	A1,RSTR.L	PACKET LENGTH
	ST	A1,HDLC,A2	.
	LDR	A1,A12	OUTPUT QUEUE ANCHOR ADDRESS 
	ADK	A1,RSTQUE	.
	CF	A14,QUEUE	QUEUE ELEMENT 
	LDK	A1,RSTFLG	SET RESTART BUSY FLAG
	ORS	A1,CMNFLG,A12	.
* 
*	START TIMER 
* 
	LDR	A2,A13	SAVE REGISTER A13 
	SUR	A13,A13	CLEAR IT 
	LDKL	A4,TIMOUT	ACTIVATION ADDRESS
	LDKL	A8,SYRSTM	TIME-OUT VALUE
	CF	A14,STRTIM	START TIMER
	ST	A4,RTMADR,A12	SAVE TIMER ADDRESS
	LDR	A13,A2	RESTORE REGISTERS 
	LDK	A4,RTNOK	RETURN CODE := OK 
* 
	EJECT
* 
*	READY 
* 
RETURN	EQU	*
* 
*	RESET OPEN SYSTEM BUSY INDICATION 
* 
	LDK	A1,OPEFLG
         C1R      A1,A1 
         ANS      A1,CMNFLG,A12 
	ABL	READY	BACK TO CALLER 
* 
*	RELEASE BUFFERS, CONNECTION FAILED
* 
RETUR2	EQU	*
	LDK	A3,SYUBNR
	LD	A1,ECBBA,A8	PARAMETER BLOCK ADDRESS 
RETUR4	EQU	*
	ADK	A1,2 
	LDR*	A2,A1	A2 := BUFFER TO BE RELEASED 
	CF	A14,RLBUF 
	SUK	A3,1 
	RB(P)	RETUR4	RELEASE NEXT BUFFER 
	RB	RETURN
	EJECT
* 
* 
*	PROCESSING OF THE CLOSE SYSTEM REQUEST
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A6  = DWT ADDRESS OR ZERO (INTERNAL CALL)
*		A12 = LINE BLOCK ADDRESS 
*		A14 = CALL FUNCTION STACK
* 
*	CALLING SEQUENCE: 
*		CF    A14,STOP 
* 
*	OUTPUT PARAMETERS:
*		A4  = RETURN CODE
*                 A1,A2,A3,A5,A6,A7,A8 ARE CHANGED
* 
STOP	EQU	*
* 
*	GET LINE IDENTIFICATION 
* 
         LDK      A1,CLOFLG 
         AN       A1,CMNFLG,A12    CLOSE BUSY?
         RF(NZ)   CLOS40           YES
         LDK      A1,CLOFLG 
         ORS      A1,CMNFLG,A12    SET CLOSE BUSY 
* 
	EJECT
* 
*	PREPARE CLOSE REQUEST ECB 
* 
	LDR	A8,A12	LINE ECB-ADDRESS
	ADKL	A8,LOCECB	. 
	LDR	A1,A12	ADDRESS USER BLOCK
	ADK	A1,UBNUM	. 
	ST	A1,ECBBA,A8	. 
	ST	A6,ECBCW1,A8	SAVE DWT ADDRESS 
	LDK	A4,SYUBNR	NUMBER OF USER BUFFERS 
	STR	A4,A1	.
* 
*	TEST IF THERE IS ANY PENDING REQUESTS TO
*	COMPLETE FOR THIS LINE(IF ALLOWED !)
* 
	LDR	A5,A6
CLOS01	EQU	*
	LD	A6,CHAIN,A12	GET DWT CHAIN ANCHOR 
	RF(Z)	CLOS30	NO CONNECTION ACTIVE
CLOS05	EQU	*
* 
*	TEST IF DISCONNECTION ALLOWED 
* 
	ADK	A5,0	INTERNAL CALL ? 
	RF(Z)	CLOS15	YES 
	LDK	A3,SEQE.RC	SEQUENCE ERROR
	LC	A1,DWTOPT,A5
	ANK	A1,CLOOPT	CLOSE ALLOWED ?
	RF(Z)	CLOS15	YES 
	LDR	A6,A5	RELOAD A6
	LDK	A1,CLOFLG
	XRS	A1,CMNFLG,A12	RESET CLOSE BUSY IND.
	RF	CLOS55	COMPLETE REQUEST 
* 
	EJECT
* 
CLOS15	EQU	*
	LDK	A3,LOGE.RC	LOGICAL ERROR 
	LDK	A2,DISCON
	LDK	A7,0 
	LC	A7,DWTFNC,A6	GET FUNCTION CODE
	LDR	A1,A7
	IFT	STATI=1
	SUK	A7,STATIS	STATISTIC REQUEST ?
	RF(Z)	CLOS16	YES 
	ADK	A7,STATIS
	XIF
	SUK	A1,CLOSYS	CLOSE SYSTEM ? 
	RF(NZ)	CLOS18	NO 
CLOS16	EQU	*
	CW	A2,DWTSTE,A6	DWT DISCONNECTED ? 
	RF(E)	CLOS25	YES 
CLOS18	EQU	*
	SC	A2,DWTSTE,A6
	LD	A2,DWTST,A6	REQUEST PENDING ? 
	RF(N)	CLOS19	NO
	SUK	A7,CONPAS	CONNECT PASSIVE ?
	RF(Z)	CLOS20	YES 
CLOS19	EQU	*
	LC	A4,DWTLCN,A6
	CF	A14,GTLCAD	GET LC-ADM ADDRESS 
	CM	LCDWT,A13	CLEAR RELATION LC-DWT 
CLOS20	EQU	*
	CF	A14,RELDWT	RELEASE DWT FROM CHAIN 
	ADK	A1,0	CLOSE SYSTEM ?
	RB(Z)	CLOS01	YES 
	CF	A14,CMPREQ	COMPLETE REQUEST 
	RB	CLOS01	TAKE NEXT
* 
	EJECT
* 
*	TEST IF MORE DWT'S IN CHAIN 
* 
CLOS25	EQU	*
	LD	A6,DWTCHN,A6
	RB(NZ)	CLOS05	YES
CLOS30	EQU	*
* 
*	ISSUE STOP REQUEST
* 
	LDK	A7,DISCN	ORDER CODE,CLOSE LINE 
	LDR	A1,A8	PARAMETER FOR ACTIVATION PART
	LKM
	DATA	-1
	DATA	CLOEND	ACTIVATION LABEL 
CLOS40	EQU	*
	LDK	A4,RTNOK	SET RETURN CODE 
	RTN	A14	BACK TO CALLER 
	EJECT
* 
*	ACTIVATION PART AFTER COMPLETED CLOSE REQUEST 
* 
CLOEND	EQU	*
	LDKL	A14,DCSTAK	SET CALL FUNCTION STACK POINTER
	LDR	A8,A1	SAVE ECB-ADDRESS 
	CF	A14,GTLBA	GET LINE BLOCK ADDRESS
	LDK	A1,STRTFL+CLOFLG	RESET FLAGS 
         ORK      A1,RSTFLG 
	C1R	A1,A1	.
	ANS	A1,CMNFLG,A12	.
	LD	A4,ECBBA,A8	ADDRESS USER BLOCK
	LDR*	A3,A4	NUMBER OF USER BUFFERS
CLOS50	EQU	*
	ADK	A4,2 
	LDR*	A2,A4	BUFFER ADDRESS
	CF	A14,RLBUF	RELEASE INPUT BUFFER
	SUK	A3,1	NEXT ONE ?
	RB(P)	CLOS50	YES 
	LD	A6,ECBCW1,A8	GET DWT ADDRESS
* 
*	TEST IF DWT ADDRESS IS VALID
* 
         RF(Z)    CLOS60
	LDK	A3,0 
CLOS55	EQU	*
	CF	A14,CMPREQ	COMPLETE REQUEST 
CLOS60	EQU	*
	ABL	EXITDC	CONTROL TO SCHEDULER
	EJECT
* 
*	PROCESSING OF A CONNECT ACTIVE REQUEST
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A6  = DWT-ADDRESS
*		A12 = LINE CONTROL BLOCK ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    CALLR 
*		A RETURN IS MADE TO THE LABEL READY
* 
*	OUTPUT PARAMETERS:
*		A4 = RETURN CODE 
*		A13 = LC-ADM ADDRESS 
* 
CALLR	EQU	* 
	IFF	SWITVC=0 
         LC       A1,DWTOPT,A6     PVC REQUESTED ?
         ANK      A1,PVC
         RF(NZ)   CALLPV           YES
* 
*	TEST IF REMOTE DTE IS SUPPORTED 
* 
	LD	A1,DWTRAD,A6
	LDKL	A3,SVCTYP	SET TYPE
	LDK	A4,NOLCAV
	INH		.	=1
	CF	A15,FNDDNT	FIND DTE 
	ENB		.	=1
	LDR	A1,A1	FOUND ?
	RF(N)	CALL40	NO
* 
	EJECT
* 
*	SEARCH FOR A READY LOGICAL CHANNEL
* 
	LC	A4,NRLC,A12	GET # OF LOGICAL CHANNELS 
	ANK	A4,/FF	. 
	SUK	A4,1	. 
CALL00	EQU	*
	CF	A14,GTLCAD	GET LC-ADM ADDRESS 
	LC	A1,LCSTAT,A13	LC-STATUS 
	ANK	A1,/FF 
	RF(Z)	CALL10	READY 
	SUK	A4,1	TRY NEXT ENTRY
	RB(NN)	CALL00	YES
	EJECT
         IFT      PERMVC=0
CALLPV   EQU      * 
         XIF
	IFF	SWITVC=0 
	LDK	A4,NOLCAV	RETURN CODE := NO LOG. CHAN. AVAILABLE 
	RF	CALL40	BACK TO CALLER 
CALL10	EQU	*
	SC	A4,DWTLCN,A6	SAVE LC-NUM IN DWT 
* 
*	COMPLETE LC-ADM 
* 
	LDK	A1,LCAL.ST	LC-STAT := LOCAL-CALL 
	SC	A1,LCSTAT,A13	. 
	LDK	A1,0	ALL INPUT BUFFERS ARE USED
	SC	A1,NRNUBF,A13	. 
	ST	A6,LCDWT,A13	SAVE DWT-ADDRESS 
	XIF
	IFT	SWITVC=0 
	RF	CALLPV
* 
	EJECT
	XIF
* 
*	QUEUE CONNECT REQUEST FOR OUTPUT
* 
CALL20	EQU	*
	LDR	A2,A6	ELEMENT ADDRESS
	CF	A14,QUEO	QUEUE ELEMENT
* 
*	READY 
* 
CALL30	EQU	*
	LDK	A4,RTNOK	RETURN CODE := OK 
CALL40	EQU	*
	ABL	READY
	IFF	PERMVC=0 
	EJECT
* 
*	A CONNECT REQUEST FOR A PERMANENT VIRTUAL CIRCUIT 
* 
CALLPV	EQU	*
* 
*	SEARCH FOR A NOT USED LOGICAL CHANNEL 
* 
	LC	A4,NRLC,A12	GET # OF LOG. CHANNELS
	ANK	A4,/FF	. 
	SUK	A4,1	. 
	LDK	A1,NOREMO	REMOTE ADDRESS NOT SUPPORTED 
CALL60	EQU	*
	CF	A14,GTLCAD	GET LC-ADM ADDRESS 
	LDK	A3,PVC	IS IT A PVC ? 
	CC	A3,VCTYP,A13	.
	RF(NE)	CALL70	NO 
         LD       A3,DWTRAD,A6     THE REQUESTED DESTINATION ?
         CW       A3,REMADR,A13 
	RF(NE)	CALL70	NO 
	LDK	A1,NOLCAV	NO LOGICAL CHANNEL AVAILABLE 
	LD	A3,LCDWT,A13	LC ALREADY IN USE ?
	RF(Z)	CALL80	NO
CALL70	EQU	*
	SUK	A4,1	TRY NEXT ENTRY
	RB(NN)	CALL60	.
	LDR	A4,A1	GET RETURN CODE
	RB	CALL40	BACK TO CALLER 
* 
CALL80	EQU	*
	SC	A4,DWTLCN,A6	SAVE LOG. CHAN. NR IN DWT
         ST       A6,LCDWT,A13     SAVE DWT ADDRESS 
         RB       CALL30           BACK TO CALLER 
	XIF
	IFF	SWITVC=0 
	EJECT
* 
* 
*	PROCESSING OF AN ACCEPT CALL REQUEST
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A6  = DWT-ADDRESS
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    CALLCR
*		A RETURN IS MADE TO THE LABEL READY
* 
*	OUTPUT PARAMETERS:
*		A4 = RETURN CODE 
* 
CALLCR	EQU	*
	LDK	A4,INVSTA	PRESET RETURN CODE := ILL. STATUS
	LDK	A1,RCAL.ST	LC-STATUS = REMOTE CALL ? 
	CC	A1,LCSTAT,A13	. 
	RB(NE)	CALL40	NO, ERROR
* 
*	UPDATE LC-ADM 
* 
	LDK	A1,DATA.ST	LC-STATUS := DATA TRANSFER
	ECR	A1,A1	.
	ST	A1,LCSTAT,A13	LC-SUBSTAT := FLOW CONTROL READY
	CF	A14,CLLCAD	CLEAR FIELDS IN LC-ADM 
* 
	EJECT
* 
*	IF ACCEPT REQUEST FROM USER THEN EMPTY INPUT QUEUE
* 
	LDK	A1,INCALR
	CC	A1,DWTSTE,A6
	RB(NE)	CALL20	NO USER REQUEST
         CF       A14,CLINPQ
* 
*	RESET DATA AVAILABLE INDICATION 
* 
	CM	DWTRCI,A6 
* 
*	QUEUE PACKET AND RETURN 
* 
	RB	CALL20
* 
	XIF
	EJECT
* 
* 
*	PROCESSING OF A DATA TRANSMISSION REQUEST 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A6  = DWT-ADDRESS
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    DATA
*		A RETURN IS MADE TO THE LABEL READY
* 
*	OUTPUT PARAMETERS:
*		A4 = RETURN CODE 
* 
DATA	EQU	*
	LDK	A4,INVSTA	PRESET RETURN CODE 
	LDK	A1,DATA.ST 
	CC	A1,LCSTAT,A13	LC-STATUS = DATA TRANSF. ?
	RB(NE)	CALL40	NO, ERROR
* 
*	QUEUE REQUEST AND RETURN
* 
DATA10	EQU	*
	RB	CALL20
	EJECT
* 
* 
*	PROCESSING OF A DISCONNECT REQUEST
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A6  = DWT-ADDRESS
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    CLEAR 
*		A RETURN IS MADE TO THE LABEL READY
* 
*	OUTPUT PARAMETERS:
*		A4 = RETURN CODE 
* 
CLEAR	EQU	* 
	IFF	SWITVC=0 
         LC       A1,VCTYP,A13     PVC CONCERNING ? 
         ANK      A1,PVC
	RF(Z)	CLEA00	NO! 
	XIF
	CF	A14,CLINPQ	CLEAR INPUT QUEUE
	CM	LCDWT,A13	RELEASE RELATION WITH DWT 
	RB	CALL30
* 
	IFF	SWITVC=0 
CLEA00	EQU	*
	LDK	A1,CLEA.ST	LC-STATUS = CLEAR ? 
	CC	A1,LCSTAT,A13	. 
         RF(NE)   CLEA10                 NO 
* 
	EJECT
* 
*	REFUSE REQUEST
* 
	LDK	A4,CLEBUS	SET RETURN CODE
	RB	CALL40
* 
*	START TIMER 
* 
CLEA10    EQU      *
	LDKL	A8,SYCLTM	TIME-OUT VALUE
	CF	A14,STTIM	START TIMER 
* 
*	UPDATE LC-ADM 
* 
	LDK	A1,CLEA.ST	NEW STATUS := CLEAR 
	SC	A1,LCSTAT,A13	. 
* 
*	EMPTY INPUT QUEUE 
* 
         CF       A14,CLINPQ
* 
*	QUEUE ELEMENT AND RETURN
* 
	RB	CALL20
* 
	XIF
	EJECT
* 
* 
*	PROCESSING OF THE ACCEPT DATA REQUEST 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A6  = DWT-ADDRESS
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    RRR 
*		A RETURN IS MADE TO THE LABEL READY
* 
*	OUTPUT PARAMETERS:
*		A4 = RETURN CODE 
* 
RRR	EQU	* 
	LDK	A4,INVSTA	PRESET RETURN CODE 
	LDK	A1,DATA.ST 
	CC	A1,LCSTAT,A13	LC-STATUS = DATA TRANSFER ? 
	RB(NE)	CALL40	NO, ERROR
* 
*	QUEUE ELEMENT AS FIRST FOR TRANSMISSION 
* 
         RF       INTR00
	EJECT
* 
* 
*	PROCESSING OF THE REFUSE DATA REQUEST 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A6  = DWT-ADDRESS
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    RNRR
*		A RETURN IS MADE TO THE LABEL READY
* 
*	OUTPUT PARAMETERS:
*		A4 = RETURN CODE 
* 
RNRR	EQU	*
	LDK	A4,INVSTA	PRESET RETURN CODE 
	LDK	A1,DATA.ST 
	CC	A1,LCSTAT,A13	LC-STATUS = DATA TRANSFER ? 
	RB(NE)	CALL40	NO, ERROR
* 
*	BLOCK INPUT QUEUE 
* 
	LDK	A1,NPRFLG
	ORS	A1,QUEINP,A13
* 
*	QUEUE ELEMENT FOR TRANSMISSION
* 
         RF       INTR00
	EJECT
* 
* 
*	PROCESSING OF THE WRITE INTERRUPT REQUEST 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A6  = DWT-ADDRESS
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    INTR
* 
*	OUTPUT PARAMETERS:
*		A4 = RETURN CODE 
* 
INTR	EQU	*
	LDK	A4,INVSTA	PRESET RETURN CODE 
	LDK	A1,DATA.ST 
	CC	A1,LCSTAT,A13	LC-STATUS = DATA TRANSFER ? 
	RB(NE)	CALL40	NO, ERROR
	LDK	A4,SEQE.RC	SEQUENCE ERROR
	LDK	A1,INTPNG	INTERRUPT PENDING ?
	AN	A1,FLAGS,A13	.
	RB(NZ)	CALL40	YES !
         LDK      A1,INTPNG             SET INTERRUPT PENDING FLAG
         ORS      A1,FLAGS,A13
* 
	EJECT
* 
*	QUEUE ELEMENT FOR TRANSMISSION
* 
INTR00   EQU      * 
	LDR	A2,A6	ELEMENT ADDRESS
	LDR	A1,A13	QUEUE ANCHOR ADDRESS
	ADK	A1,QUEOUT	.
	CF	A14,QUEUEF	QUEUE AS FIRST ELEMENT 
	LDK	A2,NPRFLG	RESET NO PROCESSING FLAG 
	C1R	A2,A2	.
	ANRS	A2,A1	. 
	ABL	CALL30	BACK TO CALLER
	EJECT
* 
* 
*	THIS MODULE GETS CONTROL FROM THE SCHEDULER 
*	IN ORDER TO TRANSMIT A PACKET 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A1  = QUEUE ANCHOR ADDRESS 
*		A12 = LINE BLOCK ADDRESS 
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    OUTPCK
* 
OUTPCK	EQU	*
* 
*	GET AN OUTPUT ECB 
* 
	LDR	A3,A12	FIRST OUTPUT ECB
	ADK	A3,ECBOU1	.
OUTP00	EQU	*
	LD	A2,ECBBA,A3	IS ECB BUSY ? 
	RF(Z)	OUTP10	NO
	ADK	A3,ECBINL+SYSBFL	NEXT OUTPUT ECB 
	RB	OUTP00	.
* 
OUTP10	EQU	*
	LDR	A8,A3	ECB-ADDRESS
	ADK	A3,ECBINL
	ST	A3,ECBBA,A8	SYSTEM OUTPUT BUFFER
	CM	HDLC,A3	CLEAR HDLC-HEADER 
	LDK	A4,/10 
	SC	A4,GNFRM,A3	GENERAL FORMAT IDENTIFIER 
* 
	EJECT
* 
*	DEQUEUE AND CHECK ELEMENT 
* 
	CF	A14,DEQUE	GET ELEMENT 
	ST	A1,SAVE	SAVE QUEUE ANCHOR ADDRESS 
	LDKL	A1,DWTTYP 
	CW	A1,DWTCHP,A2	CHECK TYPE 
	ABL(NE)	OUT400	NO DWT
	LDR	A6,A2	SAVE DWT-ADDRESS 
	LD	A9,DWTECB,A6	GET ECB-ADDRESS
	ABL(Z)	EXITDC	ELEMENT ALREADY COMPLETED
	LC	A4,DWTLCN,A6
	SC	A4,LCIDNT,A3	LOGICAL CHANNEL NUMBER 
* 
*	SELECTION ON REQUEST TYPE 
* 
	LDR	A2,A3	SAVE BUFFER ADDRESS
	LC	A3,DWTFNC,A6	GET FUNCTION CODE
	ANK	A3,/FF	. 
	SUK	A3,CONACT
	ABI	OUTTAB,A3
* 
	EJECT
* 
*	REQUEST OUTPUT TABLE
* 
OUTTAB	EQU	*
	IFF	SWITVC=0 
	DATA	OUT100	CONNECT ACTIVE REQUEST 
	DATA	HLT	CONNECT PASSIVE REQUEST 
	DATA	OUT200	DISCONNECT REQUEST 
	DATA	OUT210	ACCEPT CALL
	XIF
	IFT	SWITVC=0 
	DATA	HLT	CONNECT ACTIVE REQUEST
	DATA	HLT	CONNECT PASSIVE REQUEST 
	DATA	HLT	DISCONNECT REQUEST
	DATA	HLT	ACCEPT CALL 
	XIF
	DATA	OUT300	ACCEPT DATA
	DATA	OUT310	REFUSE DATA REQUEST
	DATA	OUT000	WRITE REQUEST
	DATA	OUT220	WRITE INTERRUPT REQUEST
	DATA	OUT300	READ(ACCEPT DATA)
* 
HLT	HLT		ILLEGAL
* 
	EJECT
* 
*	A DATA PACKET HAS TO BE TRANSMITTED 
* 
OUT000	EQU	*
	LDK	A1,REMBUS
	AN	A1,FLAGS,A13	IS REMOTE STATION BUSY ? 
	RF(NZ)	OUT050	YES
* 
*	IS WINDOW FULL ?
* 
	LDK	A4,0 
	LDK	A5,0 
	LC	A4,PS,A13	PS TO BE TRANSMITTED
	LC	A5,SLWE,A13	SEND LOWER WINDOW EDGE
	SUR	A4,A5	PS - LWE 
	ANK	A4,/07	MODULO 8
	CC	A4,LCTRWN,A13	MUST BE WITHIN WINDOW SIZE
	RF(NL)	OUT050	WINDOW IS FULL 
* 
*	PREPARE DATA PACKET HEADER
* 
	LC	A1,DWTWRO,A6	WRITE OPTION 
	LDR	A3,A1	SAVE IT
	ANK	A1,QPOS
	ECR	A1,A1
	ORS	A1,GNFRM,A2	INCLUDE Q-BIT
	LC	A1,PS,A13	PS
	SLL	A1,1	PUT IT ON THE RIGHT POSITION
	ANK	A3,MPOS
	ORR	A1,A3	INCLUDE M-BIT
	LC	A3,PR,A13	PR
         SC       A3,RLWE,A13      SAVE IT AS LAST TRANSMITTED PR 
	SLL	A3,5	PUT IT ON THE RIGHT POSITION
	ORR	A1,A3	ALL TOGETHER 
* 
	EJECT
* 
*	INCREMENT SEND SEQUENCE NUMBER
* 
         LC       A5,PS,A13        GET OLD PS 
         ADK      A5,1             INCREMENT
         ANK      A5,/07           MODULO 8 
         SC       A5,PS,A13        SAVE NEW PS
	SC	A1,IDENT,A2	SAVE PS & PR IN OUTPUT BUFFER 
* 
*	COPY USER DATA TO OUTPUT BUFFER 
* 
	LD	A1,ECBBA,A9	USER BUFFER ADDRESS 
	ADK	A2,BEGDAT	WHERE TO MOVE
	LD	A3,ECBRL,A9 
	LDR	A4,A3
	ADK	A4,BEGDAT
	ST	A4,ECBRL,A8	OUTPUT BUFFER 
	LD	A5,DWTTAB,A6
	CF	A15,MOVUS	MOVE FROM USER TO SYSTEM
* 
*	ISSUE OUTPUT REQUEST
* 
OUT040	EQU	*
	LDR	A1,A8	PARAMETER ADDRESS
	LDK	A7,TRANSM	ORDER CODE 
* 
	LKM
	DATA	-1
	DATA	ENDOUT	ACTIVATION LABEL AFTER COMPLETION
         IM       NRPNDT,A12       INCREMENT NUMBER OF PENDING OUTPUT 
	RF	OUT060	CONTROL BACK TO SCHEDULER
* 
	EJECT
* 
*	NO TRANSMISSION ALLOWED AT THIS MOMENT
* 
OUT050	EQU	*
         CM       ECBBA,A8
	LD	A1,SAVE	QUEUE ANCHOR ADDRESS
	LDR	A2,A6	ELEMENT ADDRESS
	CF	A14,QUEUEF	ELEMENT BACK TO QUEUE
	LDK	A2,NPRFLG	SET "NO PROCESSING" FLAG 
	ORRS	A2,A1	. 
OUT060	EQU	*
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
	IFF	SWITVC=0 
* 
	EJECT
* 
*	PREPARE AND TRANSMIT CALL PACKET
* 
OUT100	EQU	*
	LDK	A1,CAL.P 
	SC	A1,IDENT,A2	PACKET TYPE 
* 
*	GET REMOTE DTE-ADDRESS
* 
	ADK	A2,BEGDAT+1
	LDR	A4,A2
	LD	A1,DWTRAD,A6
	LDKL	A3,SVCTYP	SET TYPE
	INH		.	=1
	CF	A15,GETDNT	GET REAL DTE-ADDRESS 
	ENB		.	=1
	LDR	A3,A1	SAVE LENGTH
	IFT	CALDTE=1 
* 
*	GET LOCAL DTE-ADDRESS 
* 
	LDR	A7,A2	SAVE ADDRESS 
	LD	A1,DWTLAD,A6
	INH		.	=1
	CF	A15,GETDNA	GET DTE NETWORK ADDRESS
	ENB		.	=1
	SLL	A1,4	PUT IT IN RIGTH POSITION
	ORR	A3,A1	CALLING AND CALLED DTE-ADDRESS 
* 
	EJECT
* 
*	TEST IF LOCAL DTE-ADDRESS HAS TO BE MOVED 
* 
	LDR	A5,A3	REMOTE DTE-ADDRESS LENGTH... 
	ANK	A5,/01	GIVES SEMI-OCTET BOUNDARY ? 
	RF(Z)	OUT145	NO
* 
*	MOVE LOCAL DTE-ADDRESS
* 
	SRL	A1,4	A1:=LENGTH IN SEMI-OCTETS 
	LDR	A5,A7	A7:=WHERE TO GET IT
	SUK	A5,/01	A5:=WHERE TO PUT IT 
OUT130	EQU	*
	LCR	A2,A5	GET STORED SECOND SEMI-OCTET 
	SLL	A2,4 
	LCR	A2,A7
	SRL	A2,4	PUT TWO SEMI-OCTETS TOGETHER
	SCR	A2,A5	AND STORE THEM 
	ADK	A5,1	INCREMENT 'TO'-POINTER
	SUK	A1,1	DECRESE LENGTH
	RF(Z)	OUT140	READY 
	LCR	A2,A7	GET NEXT TWO SEMI-OCTETS 
	SLL	A2,4 
	SCR	A2,A5	STORE SECOND SEMI-OCTET
	ADK	A7,1	INCREMENT 'FROM'-POINTER
	SUK	A1,1	READY ? 
	RB(P)	OUT130	NO
	ADK	A5,1 
OUT140	EQU	*
	LDR	A2,A5	NEXT FREE ADDRESS
OUT145	EQU	*
	XIF
* 
	EJECT
* 
	IFF	SWITVC=0 
	IFT	LOOP=1 
* 
*	EXCHANGE CALLING AND CALLED LENGTH
* 
	ECR	A3,A3
	SRL	A3,8 
	XIF
	IFF	SWITVC=0 
	SUK	A4,1 
	SCR	A3,A4	STORE CALLING AND CALLED LENGTH
* 
*	USER FACILITIES & USER DATA 
* 
	LD	A3,ECBRL,A9 
	RF(Z)	OUT180	NO DATA SPECIFIED 
	LD	A5,DWTTAB,A6
* 
*	TEST IF FACILITIES ONLY 
* 
	LD	A1,ECBBA,A9 
	LCR	A7,A1
	ANK	A7,/FF	FACILITY LENGTH 
         RF(Z)    OUT150           NO FACILITIES AT ALL 
         ADK      A7,1
         SUR      A7,A3 
         RF(Z)    OUT148           FACILITIES ONLY
         LDK      A7,0             A7:=INDICATION NOT ONLY FACILITIES 
         RF       OUT150
* 
OUT148   EQU      * 
         LDK      A7,/C0           A7:=INDICATION FACILITIES ONLY 
OUT150	EQU	*
	INH		.	=1
	CF	A15,MOVUS	MOVE FROM USER TO SYSTEM
	ENB		.	=1
* 
	EJECT
* 
*	TEST IF ONLY FACILITIES 
* 
         LDR      A7,A7 
         RF(Z)    OUT190           NO 
         RF       OUT188
* 
*	NO USER DATA SPECIFIED
* 
OUT180	EQU	*
	LDK	A1,0 
	SCR	A1,A2	FACILITY LENGTH = ZERO 
	ADK	A2,1	UPDATE POINTER
OUT188   EQU      * 
	LDK	A1,/C0 
	SCR	A1,A2	SET PROTOCOL IDENTIFIER
	ADK	A2,1	UPDATE POINTER
* 
*	CALCULATE LENGTH OF CALL PACKET 
* 
OUT190	EQU	*
	SU	A2,ECBBA,A8 
	ST	A2,ECBRL,A8	LENGTH TO ECB 
* 
*	COMPLETE LC-ADM 
* 
	LD	A2,ECBBA,A8	ADDRESS CALL PACKET 
	CF	A14,GTWNDS	GET WINDOW SIZE & PACKET LENGTH
	CF	A14,TRTHR	TRANSLATE THRESHOLD PERCENTAGE
OUT195	EQU	*
	ABL	OUT040	ISSUE OUTPUT REQUEST
	EJECT
* 
*	TRANSMISSION OF CLEAR PACKET
* 
OUT200	EQU	*
	IFT	MMUPAG=1 
	LD	A1,ECBBA,A9	USER BUFFER 
	ADK	A2,DGNCOD	DIAGNOSTIC CODE DISPLACEMENT 
	LDK	A3,1	LENGTH
	LD	A5,DWTTAB,A6
	INH		.	=1
	CF	A15,MOVUS	MOVE FROM USER TO SYSTEM
	ENB		.	=1
	SUK	A2,DGNCOD+1	RESTORE SYSTEM BUFFER ADDRESS
	XIF
	IFF	SWITVC=0 
	IFT	MMUPAG=0 
	LC*	A1,ECBBA,A9	DIAGNOSTIC CODE
	SC	A1,DGNCOD,A2
	LDK	A3,0 
	XIF
	IFF	SWITVC=0 
	SC	A3,CAUSE,A2	RESET CAUSE FIELD 
	LDK	A1,CLE.P	CLEAR PACKET TYPE 
	LDK	A4,CLE.L	PACKET LENGTH 
	RF	OUT260
* 
*	TRANSMISSION OF CALL CONFIRMATION PACKET
* 
OUT210	EQU	*
	LDK	A1,CAL.CP	CALL CONFIRMATION PACKET TYPE
	LDK	A4,CAL.CL	PACKET LENGTH
	RF	OUT260
* 
	XIF
* 
	EJECT
* 
*	TRANSMISSION OF INTERRUPT PACKET
* 
OUT220	EQU	*
	IFT	MMUPAG=1 
	LD	A1,ECBBA,A9	USER BUFFER 
	ADK	A2,CAUSE	INTERRUPT DATA DISPLACEMENT 
	LDK	A3,1	LENGTH
	LD	A5,DWTTAB,A6
	INH		.	=1
	CF	A15,MOVUS	MOVE FROM USER TO SYSTEM
	ENB		.	=1
	SUK	A2,CAUSE+1	RESTORE SYSTEM BUFFER ADDRESS 
	XIF
	IFT	MMUPAG=0 
	LC*	A1,ECBBA,A9	INTERRUPT DATA 
	SC	A1,CAUSE,A2 
	XIF
	LDK	A1,INT.P	INTERRUPT PACKET TYPE 
	LDK	A4,INT.L	PACKET LENGTH 
OUT260	EQU	*
	SC	A1,IDENT,A2 
OUT270   EQU      * 
	ST	A4,ECBRL,A8	PACKET LENGTH 
	ABL	OUT040	ISSUE OUTPUT REQUEST
	EJECT
* 
*	TRANSMISSION OF RR- OR RNR PACKET 
* 
OUT300	EQU	*
	LDK	A1,RR.P	RR-PACKET TYPE 
	RF	OUT320
* 
OUT310	EQU	*
	LDK	A1,RNR.P	RNR-PACKET TYPE 
OUT320	EQU	*
	LC	A3,PR,A13	GET PR
         SC       A3,RLWE,A13      SAVE IT AS LAST TRANMITTED 
	SLL	A3,5 
	ORR	A3,A1	COMBINE WITH PACKET TYPE 
	SC	A3,IDENT,A2	TO OUTPUT BUFFER
	LDK	A4,RR.L	PACKET LENGTH
	RB	OUT270	ISSUE OUTPUT REQUEST 
* 
*	TRANSMISSION OF A PACKET
* 
OUT400	EQU	*
	ST	A2,ECBBA,A8	BUFFER ADDRESS TO ECB 
	LDK	A1,RSET.P
	CC	A1,IDENT,A2	IS IT A RESET PACKET ?
	RF(NE)	OUT410	NO 
	LDK	A1,NPRFLG	BLOCK OUTPUT QUEUE 
	ORS	A1,QUEOUT,A13	.
OUT410	EQU	*
	LD	A4,HDLC,A2	BUFFER LENGTH
	RB	OUT270	ISSUE OUTPUT REQUEST 
	EJECT
* 
* 
*	THIS ROUTINE HANDLES A COMPLETED OUTPUT REQUEST 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A1 = ECB-ADDRESS 
* 
*	CALLING SEQUENCE: 
*		ACTIVATION ON LABEL ENDOUT 
* 
ENDOUT	EQU	*
	LDK	A3,1	SET PROCESS INDICATION
	ST	A3,DCLEVL	. 
	LDKL	A14,DCSTAK	SET STACK POINTER
	LDR	A8,A1	SAVE ECB-ADDRESS 
	CF	A14,GTLBA	GET LINE BLOCK ADDRESS
	LD	A2,ECBBA,A8	BUFFER ADDRESS
	CM	ECBBA,A8	FREE ECB 
	CM	HDLC,A2	FREE DWT-BUFFER 
	LD	A5,ECBRC,A8	GET RETURN CODE 
	RF(Z)	ENDO30	CORRECT COMPLETED 
	CWK	A5,18	TRANSMITTER RESET ?
	RF(E)	ENDO30	YES 
* 
	EJECT
* 
*	THE OUTPUT REQUEST IS NOT CORRECT COMPLETED. WHEN THIS IS THE FIRST 
*	TIME A DISCONNECT REQUEST FOR THE DC-CONNECTION WILL BE GIVEN AND 
*	ALL NOT READY SVC'S WILL BE CLEARED LOCAL AND ALL RELATIONS 
*	DWT <--> PVC WILL BE RELEASED.
* 
	LD	A3,CMNFLG,A12	IS SUBSYS STARTED ? 
	ANK	A3,STRTFL	.
	RF(Z)	ENDO20	ALREADY DOWN
	LDK	A1,STRTFL	RESET START FLAG 
	C1R	A1,A1	.
	ANS	A1,CMNFLG,A12	.
	ST	A5,HRDSTA,A12	SAVE RETURN CODE
         LDK      A6,0                 NO DWT AVAILABLE 
	CF	A14,STOP	ISSUE DISCONNECT LINE REQUEST
	LDK	A1,LOCCLE	DIAGN. CODE = LOST CONNECTION
	CF	A14,CLAVCS	CLEAR ALL VC'S LOCAL 
ENDO20	EQU	*
	LDKL	A1,-1 
	ADS	A1,NRPNDT,A12	DECREASE # OF PENDING TRANSM. REQUE. 
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
* 
*	CORRECT COMPLETED OUTPUT REQUEST
* 
ENDO30	EQU	*
	LC	A4,LCIDNT,A2	LOGICAL CHANNEL NUMBER 
	ANK	A4,/FF	. 
	CF	A14,GTLCAD	GET LC-ADM ADDRESS 
	LD	A6,LCDWT,A13	GET DWT-ADDRESS
	RF(Z)	ENDO56	NO DWT
	LD	A1,DWTST,A6	DWT-STATUS
	RF(N)	ENDO56 
* 
	EJECT
* 
*	TEST IF DATA PACKET 
* 
	LC	A3,IDENT,A2 
         LDR      A1,A3 
	ANK	A3,DATA.P
	RF(Z)	ENDO58	YES 
* 
*	TEST IF RNR PACKET
* 
         LC       A4,DWTFNC,A6
         ANK      A1,/1F
	SUK	A1,RNR.P 
	IFF	SWITVC=0 
	RF(NZ)	ENDO46	NO 
	XIF
	IFT	SWITVC=0 
	RF(NZ)	ENDO56	NO 
	XIF
         SUK      A4,REFDAT        REFUSE DATA REQUEST? 
	RF(NZ)	ENDO56	NO 
	RF	ENDO58	YES
	IFF	SWITVC=0 
* 
*	TEST IF CALL CONFIRMATION PACKET
* 
ENDO46   EQU      * 
	SUK	A1,CAL.CP-RNR.P
	RF(NZ)	ENDO48	NO 
	SUK	A4,ACCCAL	ACCEPT CALL REQUEST ?
	RF(Z)	ENDO58	YES 
	RF	ENDO56	NO 
* 
	EJECT
* 
*	TEST IF CLEAR PACKET
* 
ENDO48   EQU      * 
	SUK	A1,CLE.P-CAL.CP
	RF(NZ)	ENDO56	NO 
	SUK	A4,DISCAL	DISCONNECT REQUEST ? 
	RF(NZ)	ENDO56	NO 
ENDO50	EQU	*
	CF	A14,RELDWT	RELEASE DWT FROM CHAIN 
	CM	LCDWT,A13	RELEASE RELATION WITH THE DWT 
ENDO52	EQU	*
	LDK	A3,ACPT.RC	RETURN CODE 
	XIF
ENDO54	EQU	*
	CF	A14,CMPREQ	COMPLETE REQUEST 
ENDO56	EQU	*
	RB	ENDO20
ENDO58	EQU	*
	LD	A3,DWTRCI,A6
	LDR	A1,A3
	ANK	A1,MORE.RC	MORE INFO ? 
	RB(Z)	ENDO54	NO
	LDK	A1,TOLD.RC	INDICATE..
	XRS	A1,DWTRCI,A6	..TOLD TO USER
	RB	ENDO54	COMPLETE REQUEST 
	EJECT
* 
*	THIS MODULE IS ACTIVATED WHEN A CONFIRMATION TIMER OF 
*	THE DC-TASK EXPIRES.
* 
********************************************* 
* 
*	INPUT PARAMETERS: 
*		A1 = PARAMETER BLOCK ADDRESS 
* 
*	CALLING SEQUENCE: 
*		ACTIVATION ON LABEL TIMOUT 
* 
TIMOUT	EQU	*
	LDK	A3,5	SET PROCESS INDICATOR 
	ST	A3,DCLEVL	. 
	LDKL	A14,DCSTAK	SET STACK POINTER
	LDR	A4,A1	ADDRESS PARAMETER BLOCK
	INH		.	=1
	CF	A15,FREBLK	GET PARAMETERS 
	ENB
	LDR	A12,A3	LINE BLOCK ADDRESS
	LDR	A13,A1	LC-ADM ADDRESS
	ANK	A2,1 
	ABL(NZ)	TIMEXP	TIME-OUT OF REQUEST HANDLER 
	LDR	A13,A13
	RF(NZ)	TIM10	NO RESTART CONF. TIMER
* 
*	A RESTART CONFIRMATION TIMER IS EXPIRED, SO CLEAR ALL NOT 
*	READY VC'S LOCAL. 
* 
	CM	RTMADR,A12	CLEAR TIMER ADDRESS
	LDK	A1,RSTFLG	IS A RESTART PROCEDURE ACTIVE ?
	AN	A1,CMNFLG,A12	. 
	RF(Z)	TIM40	NO 
	LDK	A1,LOCCLE	DIAGN. CODE
	CF	A14,CLAVCS	CLEAR ALL VC'S LOCAL 
	RF	TIM40 
	EJECT
* 
*	THE TIMER OF A RESET OR CLEAR PACKET IS EXPIRED 
* 
TIM10	EQU	* 
	CM	TIMADR,A13	CLEAR TIMER ADDRESS
	LDK	A1,CONTIM	IS CONFIRMATION TIMER STARTED ?
	AN	A1,FLAGS,A13	.
	RF(Z)	TIM40	NO 
	XRS	A1,FLAGS,A13	RESET TIMER FLAG
	IFF	SWITVC=0 
	LDK	A1,RSET.ST	IS LC-STATUS = RESET ?
	CC	A1,LCSBST,A13	. 
	RF(NE)	TIM30	NO, SO IT MUST BE A CLEAR 
	XIF
* 
*	A RESET TIMER IS EXPIRED, SO CLEAR CONCERNING VC
* 
	SUR	A1,A1	RESET SUB-STATUS 
	SC	A1,LCSBST,A13	. 
	LDK	A1,NPRFLG	RESET NO PROCESSING FLAG 
	C1R	A1,A1	.
	ANS	A1,QUEOUT,A13	.
	IFF	SWITVC=0 
	IFF	PERMVC=0 
	LDK	A1,PVC	IS IT A PVC ? 
	CC	A1,VCTYP,A13	.
	RF(E)	TIM20	YES
	XIF
	IFF	SWITVC=0 
	LDK	A1,LOCPER	DIAGN. CODE
	ABL	CLVC	CLEAR VC AND RETURN TO SCHEDULER
	XIF
* 
	EJECT
* 
*	COMPLETE EVENTS IN OUTPUT QUEUE 
* 
TIM20	EQU	* 
	LDKL	A3,RSET.RC	RC = RESET 
	CF	A14,CMEVNT
	IFF	SWITVC=0 
	RF	TIM40 
* 
*	A CLEAR TIMER IS EXPIRED
* 
TIM30	EQU	* 
	CM	LCSTAT,A13	NEW LC-STATUS := READY 
	XIF
TIM40	EQU	* 
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
	EJECT
* 
* 
*	PROCESSING OF A COMPLETED INPUT REQUEST 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A1 = ECB-ADDRESS 
* 
*	CALLING SEQUENCE: 
*		ACTIVATION ON LABEL
* 
ENDIN	EQU	* 
	LDK	A3,3	SET PROCESS INDICATOR 
	ST	A3,DCLEVL	. 
	LDKL	A14,DCSTAK	SET RETURN STACK POINTER 
	LDR	A8,A1	SAVE ECB-ADDRESS 
	CF	A14,GTLBA	GET LINE BLOCK ADDRESS
	LD	A5,ECBRC,A8	GET RETURN CODE 
	RF(Z)	END20	CORRECT COMPLETED
	CWK	A5,17	RECEIVER RESET ? 
	RF(E)	END20	YES
	EJECT
* 
*	THE INPUT REQUEST IS NOT CORRECT COMPLETED. WHEN THIS IS THE FIRST
*	TIME A DISCONNECT REQUEST FOR THE DC-CONNECTION WILL BE GIVEN AND 
*	ALL NOT READY SVC'S WILL BE CLEARED LOCAL AND ALL RELATIONS 
*	DWT <--> PVC WILL BE RELEASED.
* 
	LD	A2,ECBBA,A8	BUFFER ADDRESS
	CM	ECBBA,A8	FREE ECB 
	CF	A14,RLBUF	INPUT BUFFER BACK TO POOL 
	LD	A3,CMNFLG,A12	IS SUBSYS STARTED ? 
	ANK	A3,STRTFL	.
	RF(Z)	END10	ALREADY DOWN 
	LDK	A1,STRTFL	RESET START FLAG 
	C1R	A1,A1	.
	ANS	A1,CMNFLG,A12	.
	ST	A5,HRDSTA,A12	SAVE RETURN CODE IN HARDWARE STA
         LDK      A6,0                 NO DWT AVAILABLE 
	CF	A14,STOP	ISSUE DISCONNECT LINE REQUEST
	LDK	A1,LOCCLE	DIAGN. CODE = LOST CONNECTION
	CF	A14,CLAVCS	CLEAR ALL VC'S LOCAL 
END10	EQU	* 
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
* 
*	THE INPUT REQUEST IS CORRECT COMPLETED
* 
END20	EQU	* 
	LD	A5,ECBBA,A8	BUFFER ADDRESS
	LD	A3,ECBEL,A8	EFFECTIVE BUFFER LENGTH 
	LDK	A4,0 
	LC	A4,LCIDNT,A5	LOGICAL CHANNEL NUMBER 
	IFT	LOOP=1 
* 
	EJECT
* 
*	ONLY FOR LOOP TEST
* 
	LC	A6,NRLC,A12 
	ANK	A6,/FF 
         SUK      A6,1
	IFF	PERMVC=0 
	LC	A2,NRPVC,A12
	ANK	A2,/FF 
	CWR	A2,A4
	RF(NG)	LOOP1	SVC 
	LDR	A6,A2
	SUK	A6,1 
	RF	LOOP2 
LOOP1	EQU	* 
	ADR	A6,A2	PVC
LOOP2	EQU	* 
	XIF
	IFT	LOOP=1 
	SUR	A6,A4
	LDR	A4,A6
	SC	A4,LCIDNT,A5
*	END OF ONLY LOOP-TEST!!!! 
	XIF
	CC	A4,NRLC,A12	LC-NUMBER WITHIN LIMITS?
	RF(L)	END30	YES
	EJECT
* 
*	IGNORE RECEIVED BUFFER AND ISSUE A NEW INPUT REQUEST
* 
	LDR	A1,A8	ECB-ADDRESS
	LDK	A7,RECEIV	FUNCTION CODE FOR RECEIVE
	LKM
	DATA	-1
	DATA	ENDIN	ACTIVATION ADDRESS
	RB	END10	CONTROL BACK TO SCHEDULER 
* 
*	LC-NUMBER IS CORRECT
* 
END30	EQU	* 
	CF	A14,GTLCAD	GET LC-ADM ADDRESS 
	CF	A14,GTBUF	GET AN INPUT BUFFER 
	ST	A2,ECBBA,A8	TO ECB
	LDR	A1,A8	ECB-ADDRESS AS PARAMETER 
	LDK	A7,RECEIV	FUNCTION CODE FOR RECEIVE
	LKM		ISSUE A NEW RECEIVE REQUEST 
	DATA	-1
	DATA	ENDIN	ACTIVATION ADDRESS
* 
*	TEST IF A RESTART PROCEDURE IS ACTIVE 
* 
	LDR	A2,A5	BUFFER ADDRESS 
	LD	A4,CMNFLG,A12	IS RESTART FLAG SET ? 
	ANK	A4,RSTFLG	.
         LC       A4,IDENT,A2      GET PACKET TYPE
	RF(Z)	END40	NO RESTART PROCEDURE ACTIVE
	ANK	A4,/FF	. 
	CWK	A4,RSTR.P	IS IT A RESTART PACKET 
	RF(E)	END40	YES
	CWK	A4,RSTR.CP	IS IT A RESTART CONF. PACKET
	RF(E)	END40	YES
	CF	A14,RLBUF	RELEASE INPUT BUFFER
	RB	END10	CONTROL BACK TO SCHEDULER 
	EJECT
* 
*	SEARCH PACKET DEPENDENT ROUTINE 
* 
END40	EQU	* 
	LDK	A5,DATA.P
	TM	A4,A5	IS IT A DATA PACKET ? 
	ABL(Z)	DATIN	YES 
	ANK	A4,/1F 
	LDK	A5,RR.P
	CWR	A4,A5	IS IT A RR-PACKET ?
	ABL(E)	RRIN	YES
	LDK	A5,RNR.P 
	CWR	A4,A5	IS IT AN RNR-PACKET ?
	ABL(E)	RNRIN	YES 
	LDK	A5,TABLNG
END50	EQU	* 
         LC       A4,IDENT,A2 
	CC	A4,TABLE,A5	SEARCH IDENT IN TABLE 
	RF(E)	END70	FOUND
	SUK	A5,1 
	RB(NN)	END50	TRY NEXT ONE
* 
*	INVALID PACKET TYPE 
* 
END60	EQU	* 
	CF	A14,RLBUF	RELEASE INPUT BUFFER
	LDK	A1,LOCPER	DIAGNOSTIC CODE = PROCEDURE ERRO 
	ABL	CLVC	CLEAR VC AND RETURN TO SCHED. 
* 
	EJECT
* 
*	PACKET TYPE FOUND, BRANCH TO CONCERNING ROUTINE 
* 
END70	EQU	* 
	SLL	A5,1	PREPARE FOR INDEXING
	ABI	BRATAB,A5	BRANCH TO MODULE 
* 
*	PACKET TYPE TABLE 
* 
TABLE	EQU	* 
	BYTE	RSTR.P,RSTR.CP	RESTART(-CONF.) PACKET 
	BYTE	RSET.P,RSET.CP	RESET(-CONF.) PACKET 
	IFF	SWITVC=0 
	BYTE	CLE.P,CLE.CP	CLEAR(-CONF.) PACKET 
	BYTE	CAL.P,CAL.CP	CALL(-CONF.) PACKET
	XIF
	BYTE	INT.P,INT.CP	INTERRUPT(-CONF.) PACKET 
TABLNG	EQU	*-1-TABLE	TABLE LENGTH 
* 
*	BRANCH TABLE
* 
BRATAB	EQU	*
	DATA	RSTIN	RESTART 
	DATA	RSTCIN	RESTART CONFIRMATION 
	DATA	RESIN	RESET 
	DATA	RESCIN	RESET CONFIRMATION 
	IFF	SWITVC=0 
	DATA	CLRIN	CLEAR 
	DATA	CLRCIN	CLEAR CONFIRMATION 
	DATA	CALLIN	CALL 
	DATA	CALCIN	CALL CONFIRMATION
	XIF
	DATA	INTIN	INTERRUPT 
	DATA	INTCIN	INTERRUPT CONFIRMATION 
	EJECT
* 
*	PROCESSING OF RECEIVED DATA PACKET
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A3  = BUFFER LENGTH
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    DATIN 
* 
DATIN	EQU	* 
	CF	A14,TDARR	TEST PART OF PACKET CONTENTS
	LDR	A1,A1	O.K. ? 
	RF(NZ)	DAT00	NO
	LC	A1,IDENT,A2	GET RECEIVED PS 
	SRL	A1,1	. 
	ANK	A1,/07	. 
	CC	A1,RPS,A13	DOES IT MATCH WITH THE LC-ADM
	RF(NE)	DAT00	NO
* 
*	TEST IF RECEIVED P(S) IS IN WINDOW
* 
	LDK	A7,0	PRESET WINDOW NOT FULL INDIC. 
	LC	A5,RLWE,A13	GET NUMBER OF PACKETS IN WIND.
	SUR	A1,A5	.
	ANK	A1,/07	. 
	ADK	A1,1	. 
	CC	A1,LCREWN,A13	COMPARE WITH WINDOW SIZE
	RF(L)	DAT20	WINDOW IS NOT FULL 
	RF(G)	DAT00	OUT OF WINDOW, RESET LC
	LDK	A7,1	SET WINDOW FULL INDIC.
	RF	DAT20	. 
	EJECT
* 
*	PACKET RECEIVED OUT OF SEQUENCE, START RESET PROCEDURE
* 
DAT00	EQU	* 
	LDK	A1,RSET.ST	LC-SUBSTATUS := RESET 
	SC	A1,LCSBST,A13	. 
* 
*	PREPARE AND QUEUE RESET PACKET FOR RH 
* 
	LC	A1,LCNUM,A13	LOGICAL CHANNEL NUMBER 
	SC	A1,LCIDNT,A2	.
	LDK	A1,RSET.P	PACKET TYPE FOR RESET INDICATION 
	SC	A1,IDENT,A2 
	LDK	A1,RSET.L	LENGTH INTERN. RESET CONF NOT. 
	ST	A1,HDLC,A2	TO HDLC HEADER 
	LDK	A1,0 
	SC	A1,CAUSE,A2	CLEAR RESET CAUSE 
	LDK	A1,RESLCH
	SC	A1,DGNCOD,A2	SET DIAGNOSTIC CODE
         CF       A14,RSETVC
	CF	A14,QUEI	PUT ELEMENT IN INPUT QUEUE 
* 
*	PREPARE RESET PACKET AND QUEUE IT FOR OUTPUT
* 
DAT05	EQU	* 
	LDR	A2,A13	GET AN OUTPUT BUFFER
	ADK	A2,SYSBUF	.
	LDR*	A1,A2	IS IT FREE ?
	RF(Z)	DAT10	YES
* 
*	WAIT FOR RELEASING OF OUTPUT BUFFER 
* 
	LDKL	A1,DAT05	REACTIVATION ADDRESS 
	ABL	BUFWAT 
* 
	EJECT
* 
DAT10	EQU	* 
	LDK	A1,RSET.P
	SC	A1,IDENT,A2	PACKET TYPE 
	LDK	A1,0 
	SC	A1,CAUSE,A2	CLEAR RESET CAUSE 
	LDK	A1,RESLCH
	SC	A1,DGNCOD,A2	DIAGNOSTIC CODE
	LDK	A1,RSET.L	RESET PACKET LENGTH TO HDLC HEADER 
	ST	A1,HDLC,A2	.
	CF	A14,QUEO	PUT ELEMENT IN OUTPUT QUEUE
	LDKL	A8,SYRETM	RESET CONFIRMATION TIMER
	CF	A14,STTIM	START TIMER 
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
* 
*	TEST CURRENT M-BIT
* 
DAT20	EQU	* 
	LC	A1,MBIT,A2	GET CURRENT M-BIT
	ANK	A1,MPOS	.
	RF(Z)	DAT30	M-BIT NOT SET
* 
*	M-BIT IS SET, SO DATA LENGTH HAS TO BE MAXIMUM
* 
	LD	A1,TRBFSZ,A13	MAX.DATA LENGTH IN DATA PACKET
	ADK	A1,BEGDAT	ADD HEADERS
	CWR	A1,A3
	RF(E)	DAT30	OK, THEY ARE EQUAL 
* 
*	DATA LENGTH NOT MAXIMUM, SO CLEAR VC
* 
	RB	END60	CLEAR VC AND RETURN TO SCHEDULER
* 
	EJECT
* 
*	UPDATE PS TO BE RECEIVED NEXT 
* 
DAT30	EQU	* 
	LC	A1,RPS,A13	GET RPS
	ADK	A1,1	INCREMENT 
	ANK	A1,/07	MODULO 8
	SC	A1,RPS,A13	.
* 
*	GET RECEIVED PR 
* 
	LC	A1,IDENT,A2	GET PR FROM RECEIVED PACKET 
	SRL	A1,5	. 
	ANK	A1,/07	. 
* 
*	IF IT IS A SEND WINDOW UPDATING, RESET "NO PROCESSING" FLAG OF
*	OUTPUT QUEUE
* 
	CC	A1,SLWE,A13	COMPARE WITH SEND LOWER WINDOW E
	RF(E)	DAT50	NO UPDATING
	SC	A1,SLWE,A13	SAVE NEW VALUE
	LDK	A1,NPRFLG	RESET "NO PROCESSING" FLAG 
         C1R      A1,A1 
	ANS	A1,QUEOUT,A13	.
* 
*	QUEUE PACKET FOR REQUEST HANDLER
* 
DAT50	EQU	* 
	ST	A3,HDLC,A2	SAVE PACKET LENGTH IN HDLC-HEADE 
	CF	A14,QUEI	PUT ELEMENT IN INPUT QUEUE 
* 
	EJECT
* 
*	CAN RECEIVE WINDOW BE UPDATED 
* 
DAT60	EQU	* 
	LDK	A3,0	PRESET INDIC.: NO PR UPDATING 
	LC	A1,NRNUBF,A13	ARE ALL RESERVED BUFFERS USED ? 
	ANK	A1,/FF	. 
	RF(Z)	DAT70	YES
	LDK	A3,1	SET INDIC.: PR UPDATED
* 
*	UPDATE PR 
* 
	LC	A4,PR,A13	UPDATE PR TO BE SENT NEXT 
	ADR	A4,A1	ADD NUMBER OF NOT USED BUFFERS 
	ANK	A4,/07	MODULO 8
	SC	A4,PR,A13	. 
	SUR	A1,A1	ALL RES. BUFFERS ARE NOW USED
	SC	A1,NRNUBF,A13	. 
* 
*	DID THE RECEIVED PS PASSES THE THRESHOLD OF THE RECEIVE WINDOW
* 
DAT70	EQU	* 
	LDK	A2,0 
	LC	A1,RPS,A13	RECEIVED PS
	LC	A2,RLWE,A13	RECEIVER LOWER WINDOW EDGE
	SUR	A1,A2	RPS - RLWE 
	ANK	A1,/07	MODULO 8
	CC	A1,LCTHRE,A13	DID IT PASSED THE THRESHOLD ? 
	RF(NG)	DAT130	NO 
* 
	EJECT
* 
*	IF RECEIVE WINDOW IS NOT UPDATED, WAIT FOR IT 
* 
	LDR	A3,A3
	RF(NZ)	DAT90	IT IS UPDATED 
	LDR	A7,A7	IS WINDOW FULL ? 
	RF(Z)	DAT130	NO, DON'T WAIT FOR IT 
	LDR	A1,A13	PARAMETER FOR DELAY AND ACTIVATION
	LD	A7,TSKID
	LDKL	A8,BUFDEL	DELAY TIME
	LKM
	DATA	-6
	DATA	DAT80	ACTIVATION ADDRESS
	RF	DAT130	CONTROL BACK TO SCHEDULER
* 
DAT80	EQU	* 
	LDR	A13,A1	RESTORE LC-ADM ADDRESS
         LDK      A7,1             SET WINDOW FULL INDICATION 
	LDKL	A14,DCSTAK	RESET STACK POINTER
	RB	DAT60 
* 
*	THE RECEIVE WINDOW IS UPDATED, CAN NEW PR BE SENT IN A DATA PACKET ?
* 
DAT90	EQU	* 
	LD	A1,QUEOUT,A13	IS OUTPUT QUEUE EMPTY ? 
	RF(Z)	DAT100	YES 
* 
*	TEST IF ONLY NO-PROCESSING FLAG SET 
* 
         SUK      A1,1
         RF(Z)    DAT100           YES
* 
	EJECT
* 
*	REMOTE BUSY FLAG SET ?
* 
	LDK	A3,REMBUS
	AN	A3,FLAGS,A13
	RF(NZ)	DAT100
* 
*	IS SEND WINDOW FULL ? 
* 
	LC	A1,PS,A13 
	LC	A2,SLWE,A13 
	SUR	A1,A2
	ANK	A1,/7
	CC	A1,LCTRWN,A13 
	RF(L)	DAT130	NO
* 
*	SEND NEW PR IN RR-PACKET
* 
DAT100	EQU	*
	LDR	A2,A13	GET AN OUTPUT BUFFER
	ADK	A2,SYSBUF	.
	LDR*	A1,A2	IS IT FREE ?
	RF(Z)	DAT120	YES 
* 
*	WAIT FOR RELEASING OF OUTPUT BUFFER 
* 
	LDKL	A1,DAT100	REACTIVATION ADDRESS
	ABL	BUFWAT 
* 
	EJECT
* 
DAT120	EQU	*
         LC       A1,PR,A13        PR 
         SC       A1,RLWE,A13      SAVE IT AS LAST SENT PR
         SLL      A1,5             PR IN PACKET 
	ORK	A1,RR.P	.
	SC	A1,IDENT,A2	. 
	LDK	A1,RR.L	PACKET LENGTH TO HDLC-HEADER 
	ST	A1,HDLC,A2	.
* 
*	RESET NO PROCESSING FLAG AND QUEUE PACKET 
* 
	LDK	A1,NPRFLG	RESET "NO PROCESSING" FLAG 
         C1R      A1,A1 
	ANS	A1,QUEOUT,A13	.
	LDR	A1,A13	QUEUE ELEMENT AS FIRST
	ADK	A1,QUEOUT	.
	CF	A14,QUEUEF	.
DAT130	EQU	*
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
	EJECT
* 
* 
*	PROCESSING OF RECEIVED RR-PACKET
* 
********************************************
* 
*	INPUT PARAMETER:
*		A2  = BUFFER ADDRESS 
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL  RRIN
* 
RRIN	EQU	*
	CF	A14,TDARR	TEST RR-PACKET
	LDR	A1,A1	PR OUT OF SEQUENCE ? 
	ABL(NZ)	DAT00	YES RESET LC (MODULE DATIN)
* 
*	TEST IF REMOTE BUSY FLAG SET
* 
        LD       A1,FLAGS,A13 
         ANK      A1,REMBUS 
         RF(Z)    RNRI00           NO!
         C1R      A1,A1 
         ANS      A1,FLAGS,A13     RESET REMOTE BUSY FLAG 
         LDK      A1,NPRFLG 
         C1R      A1,A1 
         ANS      A1,QUEOUT,A13    RESET NO PROCESSING FLAG 
        RF       RNRI00 
	EJECT
* 
*	PROCESSING OF RECEIVED RNR-PACKET 
* 
********************************************
* 
*	INPUT PARAMETER:
*		A2  = BUFFER ADDRESS 
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL RNRIN
* 
RNRIN	EQU	* 
	CF	A14,TDARR	TEST RR-PACKET
	LDR	A1,A1	PR OUT OF SEQUENCE ? 
	ABL(NZ)	DAT00	YES RESET LC (MODULE DATIN)
	LDK	A1,REMBUS	SET REMOTE BUSY FLAG 
	ORS	A1,FLAGS,A13	. 
* 
*	GET RECEIVED PR 
* 
RNRI00	EQU	*
	LC	A1,IDENT,A2	GET PR FROM RECEIVED PACKET 
	SRL	A1,5	. 
	ANK	A1,/07	. 
* 
	EJECT
* 
*	IF IT IS A SEND WINDOW UPDATING, RESET "NO PROCESSING" FLAG OF
*	OUTPUT QUEUE
* 
	CC	A1,SLWE,A13	COMPARE WITH SEND LOWER WINDOW E
	RF(E)	RNRI10	NO UPDATING 
	SC	A1,SLWE,A13	SAVE NEW VALUE
	LDK	A1,NPRFLG	RESET "NO PROCESSING" FLAG 
         C1R      A1,A1 
	ANS	A1,QUEOUT,A13	.
RNRI10	EQU	*
	CF	A14,RLBUF	BUFFER BACK TO POOL 
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
	IFF	SWITVC=0 
	EJECT
* 
* 
*	PROCESSING OF RECEIVED CALL-PACKET
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A3  = BUFFER LENGTH
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    CALLIN
* 
CALLIN	EQU	*
	LDK	A1,READ.ST	IS LC-STATUS: READY ? 
	CC	A1,LCSTAT,A13	. 
	RF(E)	CALLI1	YES 
	CF	A14,RLBUF	RELEASE INPUT BUFFER
	LDK	A1,LCAL.ST	IS LC-STATUS: LOCAL-CALL ?
	CC	A1,LCSTAT,A13	. 
	RF(NE)	CALC00	NO, SO CLEAR VC
* 
*	A CALL COLLISION IS OCCURED, IGNORE RECEIVED CALL 
* 
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
* 
*	THE LC-STATUS IS VALID IN COMBINATION WITH THE CALL PACKET
* 
CALLI1	EQU	*
	ST	A3,HDLC,A2	SAVE BUFFER LENGTH IN BUFFER 
	LDK	A1,RCAL.ST	LC-STAT := REMOTE CALL
	SC	A1,LCSTAT,A13	. 
	LDK	A1,0	ALL RESERVED BUFFERS ARE USED 
	SC	A1,NRNUBF,A13	. 
	EJECT
* 
*	GET WINDOW SIZES AND PACKET LENGTH
* 
	CF	A14,GTWNDS
* 
*	CHANGE TRANSMIT AND RECEIVE WINDOW SIZES
* 
	LC	A1,LCTRWN,A13 
	ECR	A1,A1
	LC	A1,LCREWN,A13 
	SC	A1,LCTRWN,A13 
	ECR	A1,A1
	SC	A1,LCREWN,A13 
* 
*	CHANGE TRANSMIT AND RECEIVE PACKET LENGTH 
* 
	LD	A1,TRBFSZ,A13 
	LD	A3,REBFSZ,A13 
	ST	A3,TRBFSZ,A13 
	ST	A1,REBFSZ,A13 
* 
*	TRANSLATE THRESHOLD PERCENTAGE INTO A NUMBER OF PACKETS 
* 
	CF	A14,TRTHR 
* 
*	QUEUE PACKET FOR THE REQUEST HANDLER
* 
	RF	CALC20
	EJECT
* 
* 
*	PROCESSING OF RECEIVED CALL CONFIRMATION PACKET 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A3  = BUFFER LENGTH
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    CALCIN
* 
CALCIN	EQU	*
	LDK	A1,LCAL.ST	IS LC-STATUS: LOCAL-CALL STATE
	CC	A1,LCSTAT,A13	. 
	RF(E)	CALC10	YES 
* 
*	ILLEGAL STATE, SO CLEAR VC
* 
	CF	A14,RLBUF	BUFFER BACK TO POOL 
CALC00	EQU	*
	LDK	A1,LOCPER	DIAGNOSTIC CODE = PROCEDURE ERRO 
	ABL	CLVC	CLEAR VC AND RETURN TO SCHED. 
* 
	EJECT
* 
*	STATUS WILL BE DATA TRANSFER, UPDATE LC-ADM 
* 
CALC10	EQU	*
	LDK	A1,DATA.ST	LC-STATUS := DATA TRANSFER
	ECR	A1,A1	.
	ST	A1,LCSTAT,A13	SUBSTATUS := FLOW CONTROL READY 
	CF	A14,CLLCAD	CLEAR LC-ADM FIELDS
* 
*	UPDATE CALL CONFIRMATION PACKET 
* 
	ST	A3,HDLC,A2	PACKET LENGTH TO HDLC-HEADER 
* 
*	QUEUE PACKET AND RETURN 
* 
CALC20	EQU	*
	CF	A14,QUEI	PUT ELEMENT IN INPUT QUEUE 
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
	EJECT
* 
* 
*	PROCESSING OF RECEIVED CLEAR PACKET 
* 
********************************************
* 
*	INPUT PARAMETER:
*		A2  = BUFFER ADDRESS 
*		A3  = BUFFER LENGTH
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    CLRIN 
* 
CLRIN	EQU	* 
	IFF	PERMVC=0 
	LC	A1,VCTYP,A13	GET TYPE OF LOGICAL CHANNEL
	ANK	A1,/FF	. 
	CWK	A1,SVC	IS IT A SWITCH VIRTUAL CIRCUIT ?
	RF(E)	CLR00	YES
	LDK	A1,LOCPER	DIAGN. CODE : PROCEDURE ERROR
	ABL	CLVC	RESET PVC 
* 
CLR00	EQU	* 
	XIF
	IFF	SWITVC=0 
	LDK	A1,CLEA.ST	IS LC-STATUS = CLEAR ?
	CC	A1,LCSTAT,A13	. 
	RF(E)	CLRCIN	YES, CO CLEAR COLLISION 
* 
	EJECT
* 
*	HAS THE REQUEST HANDLER TO BE NOTIFIED ?
* 
	LD	A6,LCDWT,A13	DOES THE RH KNOWS THIS VC ?
	RF(Z)	CLR10	NO 
         LDK      A1,VCREL
         SC       A1,DWTSTE,A6
	LDK	A1,NPRFLG	UNBLOCK INPUT QUEUE
	C1R	A1,A1	.
	ANS	A1,QUEINP,A13	.
	ST	A3,HDLC,A2	PACKET LENGTH TO HDLC-HEADER 
	CF	A14,QUEI	PUT ELEMENT IN INPUT QUEUE 
	RF	CLR15 
* 
CLR10	EQU	* 
	CF	A14,RLBUF	BUFFER BACK TO POOL 
* 
	EJECT
* 
*	LC-STATUS WAS "NOT CLEAR", SO SEND CLEAR CONFIRMATION TO REMOTE STATIO
* 
CLR15	EQU	* 
* 
*	EMPTY OUTPUT QUEUE
* 
	LDKL	A3,CLEA.RC	RETURN CODE FOR USER 
	CF	A14,CMEVNT
CLR20	EQU	* 
	LDR	A2,A13	GET AN OUTPUT BUFFER
	ADK	A2,SYSBUF	.
	LDR*	A1,A2	IS IT FREE ?
	RF(Z)	CLR30	YES
* 
*	WAIT FOR RELEASING OF OUTPUT BUFFER 
* 
	LDKL	A1,CLR20	REACTIVATION ADDRESS 
	ABL	BUFWAT 
* 
CLR30	EQU	* 
	LDK	A1,CLE.CP	PACKET IDENTIFICATION
	SC	A1,IDENT,A2	. 
	LDK	A1,CLE.CL	PACKET LENGTH TO HDLC-HEADER 
	ST	A1,HDLC,A2	.
         CM       LCSTAT,A13       NEW STATUS:=READY
* 
*	QUEUE PACKET
* 
CLR40	EQU	* 
	CF	A14,QUEO	PUT ELEMENT IN OUTPUT QUEUE
CLR50	EQU	* 
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
	EJECT
* 
* 
*	PROCESSING OF RECEIVED CLEAR CONFIRMATION PACKET
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
CLRCIN	EQU	*
	CF	A14,RLBUF	BUFFER BACK TO POOL 
* 
*	RESET CONFIRMATION TIMER AND FLAG 
* 
	LD	A1,TIMADR,A13	GET ADDRESS TIMER BLOCK 
	CF	A14,CANTIM	CANCEL TIMER 
	CM	TIMADR,A13	CLEAR TIMER ADDRESS
	LDK	A1,CONTIM	RESET TIMER STARTED FLAG 
	C1R	A1,A1	.
	ANS	A1,FLAGS,A13	. 
	LDK	A1,CLEA.ST	IS LC-STATUS = CLEAR ?
	CC	A1,LCSTAT,A13	. 
	RF(E)	CLRC00	YES 
	LDK	A1,READ.ST	IS LC-STATUS = READY ?
	CC	A1,LCSTAT,A13	. 
	RF(E)	CLRC10	YES 
* 
	EJECT
* 
*	STATUS IS NOT READY OR CLEAR, SO PROCEDURE ERROR
* 
	RB	CALC00	CLEAR VC 
* 
CLRC00	EQU	*
	CM	LCSTAT,A13	SET STATUS := READY
CLRC10	EQU	*
	RB	CLR50	CONTROL BACK TO SCHEDULER 
* 
	XIF
* 
	EJECT
* 
* 
*	PROCESSING OF RECEIVED RESET PACKET 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A3  = BUFFER LENGTH
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    RESIN 
* 
RESIN	EQU	* 
	LDK	A1,CLEA.ST	IF LC-STATUS = CLEAR ?
	CC	A1,LCSTAT,A13	. 
	RF(E)	RESC00	YES, IGNORE PACKET
* 
*	TEST IF A RESET COLLISION HAS OCCURED 
* 
	LDK	A1,RSET.ST	IS LC-STATUS = RESET ?
	CC	A1,LCSBST,A13	. 
	RF(E)	RESCIN	YES 
* 
*	TEST IF CURRENT STATUS MATCH WITH RECEIVED PACKET 
* 
	LDK	A1,DATA.ST	IS LC-STATUS = DATA TRANSFER ?
	CC	A1,LCSTAT,A13	. 
	RF(NE)	RESC10	NO, SO PROCEDURE ERROR 
* 
	EJECT
* 
*	LC-STATUS IS DATA TRANSFER, SO RESET LC-ADM 
* 
	ST	A3,HDLC,A2	PACKET LENGTH TO HDLC-HEADER 
	CF	A14,RSETVC	RESET VIRTUAL CIRCUIT
	CF	A14,QUEI	PUT ELEMENT IN INPUT QUEUE 
* 
*	PREPARE AND TRANSMIT RESET CONFIRMATION PACKET
* 
RES40	EQU	* 
	LDR	A2,A13	GET AN OUTPUT BUFFER
	ADK	A2,SYSBUF	.
	LDR*	A1,A2	IS IT FREE ?
	RF(Z)	RES60	YES
* 
*	WAIT FOR RELEASING OF OUTPUT BUFFER 
* 
	LDKL	A1,RES40	REACTIVATION ADDRESS 
	ABL	BUFWAT 
* 
RES60	EQU	* 
	LDK	A1,RSET.CP	RESET CONF. PACKET TYPE 
	SC	A1,IDENT,A2	. 
	LDK	A1,RSET.CL	PACKET LENGTH TO HDLC-HEADER
	ST	A1,HDLC,A2	.
* 
*	QUEUE ELEMENT 
* 
	CF	A14,QUEO
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
	EJECT
* 
* 
*	PROCESSING OF A RECEIVED RESET CONFIRMATION PACKET
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    RESCIN
* 
RESCIN	EQU	*
	LD	A1,TIMADR,A13	TIMER BLOCK ADDRESS 
	CF	A14,CANTIM	CANCEL TIMER 
	CM	TIMADR,A13
	LDK	A3,CONTIM
	C1R	A3,A3
	ANS	A3,FLAGS,A13	. 
	LDK	A1,RSET.ST	IS LC-STATUS = DATA-TRANSF/RESET
	CC	A1,LCSBST,A13	. 
	RF(NE)	RESC10	NO 
	LDK	A1,FLCN.ST	SUB-STATUS := FLOW CNTRL READY
	SC	A1,LCSBST,A13	. 
	LDK	A1,NPRFLG	RESET NO PROCESSING FLAG 
	C1R	A1,A1	.
	ANS	A1,QUEOUT,A13	.
RESC00	EQU	*
	CF	A14,RLBUF	BUFFER BACK TO POOL 
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
* 
	EJECT
* 
*	ILLEGAL STATE, SO CLEAR VC
* 
RESC10	EQU	*
	CF	A14,RLBUF	BUFFER BACK TO POOL 
	LDK	A1,LOCPER	DIAGN. CODE = PROCEDURE ERROR
	ABL	CLVC	CLEAR VC AND RETURN TO SCHED. 
	EJECT
* 
* 
*	PROCESSING OF A RECEIVED RESTART PACKET 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A12=LINE BLOCK ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    RSTIN 
* 
RSTIN	EQU	* 
	LDK	A1,RSTFLG	ALREADY RESTART BUSY ? 
	AN	A1,CMNFLG,A12	. 
	RF(NZ)	RSTCIN	YES, RESTART COLLISION 
	CF	A14,RLBUF	BUFFER BACK TO POOL 
* 
*	CLEAR ALL NOT READY VC'S LOCAL
* 
	LDK	A1,RSTRED	DIAGN. CODE = RESTART RECEIVED 
	CF	A14,CLAVCS	CLEAR ALL VC'S LOCAL 
* 
*	PREPARE AND TRANSMIT RESTART CONFIRMATION PACKET
* 
RST00	EQU	* 
	LDR	A2,A13	GET AN OUTPUT BUFFER
	ADK	A2,SYSBUF	.
	LDR*	A1,A2	IS IT FREE ?
	RF(Z)	RST20	YES
* 
	EJECT
* 
*	WAIT FOR RELEASING OF OUTPUT BUFFER 
* 
	LDKL	A1,RST00	REACTIVATION ADDRESS 
	ABL	BUFWAT 
* 
RST20	EQU	* 
	LDK	A1,RSTR.CP	RESTART CONF. PACKET TYPE 
	SC	A1,IDENT,A2	. 
	LDK	A1,RSTR.CL	PACKET LENGTH 
	ST	A1,HDLC,A2	.
* 
*	STORE ELEMENT IN RESTART QUEUE
* 
	LDR	A1,A12	QUEUE ANCHOR ADDRESS
	ADK	A1,RSTQUE	.
	CF	A14,QUEUE	QUEUE ELEMENT 
	RF	RSTC20	CONTROL BACK TO SCHEDULER
	EJECT
* 
* 
*	PROCESSING OF A RECEIVED RESTART CONFIRMATION PACKET
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A12 = LINE BLOCK ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    RSTCIN
* 
RSTCIN	EQU	*
* 
*	RESET TIMER 
* 
	CF	A14,RLBUF	BUFFER BACK TO POOL 
	LD	A1,RTMADR,A12	TIMER ACTIVE ?
	CF	A14,CANTIM	CANCEL TIMER 
	CM	RTMADR,A12
	LDK	A1,RSTFLG	RESTART PROCEDURE BUSY ? 
	AN	A1,CMNFLG,A12	. 
	RF(Z)	RSTC20	NO, IGNORE PACKET 
	XRS	A1,CMNFLG,A12	RESET RESTART PROC. BUSY FLAG
RSTC20	EQU	*
	ABL	EXITDC 
	EJECT
* 
* 
*	PROCESSING OF RECEIVED INTERRUPT PACKET 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A3  = BUFFER LENGTH
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    INTIN 
* 
INTIN	EQU	* 
	LDK	A4,0	INDICATE ENTRY FOR INTERRUPT PACKET 
* 
*	THE NEXT PART OF CODING IS COMMON FOR THE PROCESSING OF 
*	AN INTERRUPT- AND AN INTERRUPT CONFIRMATION PACKET. 
* 
INT00	EQU	* 
	LDK	A1,DATA.ST	IS LC-STATUS = DATA TRANSFER ?
	CC	A1,LCSTAT,A13	. 
	RF(E)	INT20	YES
* 
*	LC-STATUS IS NOT DATA TRANSFER, IF CLEAR: IGNORE PACKET, ELSE 
*	PROCEDURE ERROR.
* 
	LDK	A1,CLEA.ST	IS LC-STATUS = CLEAR ?
	CC	A1,LCSTAT,A13	. 
	RB(NE)	RESC10	NO, SO PROCEDURE ERROR 
	RB	RESC00	IGNORE PACKET
* 
	EJECT
* 
*	STATE = DATA TRANSFER, IF SUB-STATE = RESET: IGNORE PACKET
* 
INT20	EQU	* 
	LC	A1,LCSBST,A13	IS LC-SUBSTATUS = RESET 
	ANK	A1,RSET.STA	.
	RB(NZ)	RESC00	IGNORE PACKET
* 
*	QUEUE PACKET FOR REQUEST HANDLER
* 
INT30	EQU	* 
	ST	A3,HDLC,A2	SAVE PACKET LENGTH IN BUFFER 
         LDR      A1,A13                INPUT QUEUE ANCHOR ADDRESS
         ADK      A1,QUEINP 
         CF       A14,QUEUEF            QUEUE ELEMENT AS FIRST
         LDK      A2,NPRFLG             RESET NO PROCESSING FLAG
         C1R      A2,A2 
         ANRS     A2,A1 
	LDR	A4,A4
	RF(NZ)	INTC10	CONTINUE WITH SPECIFIC PROCESSING
			OF INTERRUPT CONF. PACKET
	RB	RSTC20	CONTROL BLOCK BACK TO SCHEDULER
	EJECT
* 
* 
*	PROCESSING OF RECEIVED INTERRUPT CONFIRMATION PACKET
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A3  = BUFFER LENGTH
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    INTCIN
INTCIN	EQU	*
	LDK	A4,1	INDICATION FOR INTERR. CONF. PACKET ENTRY 
* 
*	STATUS CKECKING ETC. IS DONE IN COMMON PART OF CODING WITH
*	THE PROCESSING OF A INTERRUPT PACKET. 
* 
	RB	INT00 
* 
*	RESET INTERRUPT PENDING FLAG
* 
INTC10	EQU	*
	LDK	A1,INTPNG	RESET INTERRUPT PENDING FLAG 
	C1R	A1,A1	.
	ANS	A1,FLAGS,A13	. 
	RB	RSTC20	CONTROL BLOCK BACK TO SCHEDULER
	EJECT
* 
* 
*	THIS MODULE PERFORMS THE CLEARING RESP. THE 
*	RESETTING OF A SVC RESP. PVC. 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A1  = DIAGNOSTIC CODE
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		ABL    CLVC
* 
CLVC	EQU	*
	LDR	A5,A1	SAVE DIAGNOSTIC CODE 
	IFF	SWITVC=0 
	IFF	PERMVC=0 
* 
*	SELECT ON VC-TYPE 
* 
	LDK	A1,PVC	GET VC-TYPE 
	CC	A1,VCTYP,A13	.
	RF(E)	CLV100	TYPE IS PERMANENT 
* 
*	SWITCHED VIRTUAL CIRCUIT
* 
	XIF
	IFF	SWITVC=0 
	LDK	A1,CLEA.ST	IS LC-STATUS = CLEAR ?
	CC	A1,LCSTAT,A13	. 
	RF(E)	CLVC60	YES, NO ACTION
         SC       A1,LCSTAT,A13    LC-STATUS:=CLEAR 
* 
	EJECT
* 
*	EMPTY INPUT QUEUE 
* 
         CF       A14,CLINPQ
* 
*	COMPLETE EVENTS IN OUTPUT QUEUE 
* 
	LDKL	A3,CLEA.RC
	CF	A14,CMEVNT
* 
*	SEND NOTIFICATION TO RH, IF APPLICABLE
* 
	LD	A6,LCDWT,A13	DOES THE RH KNOWS THIS LC ?
	RF(Z)	CLVC20	NO
         LDK      A1,VCREL
         SC       A1,DWTSTE,A6
	CF	A14,GTBUF	GET AN INPUT BUFFER 
	LC	A1,LCNUM,A13	LOGICAL CHANNEL NUMBER 
	SC	A1,LCIDNT,A2	.
	LDK	A1,CLE.P	INTERNAL PACKET TYPE
	SC	A1,IDENT,A2	. 
	SC	A5,DGNCOD,A2	.
	LDK	A1,CLE.L	PACKET LENGTH 
	ST	A1,HDLC,A2	.
	CF	A14,QUEI	PUT ELEMENT IN INPUT QUEUE 
	LD	A1,TIMADR,A13	GET TIMER BLOCK ADDRESS 
	CF	A14,CANTIM	CANCEL TIMER 
         CM       TIMADR,A13
* 
	EJECT
* 
*	PREPARE CLEAR PACKET AND TRANSMIT IT TO THE REMOTE STATION
* 
CLVC20	EQU	*
	LDR	A2,A13	GET AN OUTPUT BUFFER
	ADK	A2,SYSBUF	.
	LDR*	A1,A2	IS IT FREE ?
	RF(Z)	CLVC40	YES 
* 
*	WAIT FOR RELEASING OF OUTPUT BUFFER 
* 
	LDKL	A1,CLVC20	REACTIVATION ADDRESS
	ABL	BUFWAT 
* 
CLVC40	EQU	*
	LDK	A1,CLE.P	CLEAR PACKET TYPE 
	SC	A1,IDENT,A2	. 
	SC	A5,DGNCOD,A2	DIAGNOSTIC CODE
	LDK	A1,0 
	SC	A1,CAUSE,A2	CLEAR CLEARING CAUSE
	LDK	A1,CLE.L	CLEAR PACKET LENGTH 
	ST	A1,HDLC,A2	.
	CF	A14,QUEO	PUT ELEMENT IN OUTPUT QUEUE
* 
*	START CONFIRMATION TIMER
* 
	LDKL	A8,SYCLTM	CLEAR CONFIRMATION TIMER
	CF	A14,STTIM	START TIMER 
CLVC60	EQU	*
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
	XIF
	IFF	PERMVC=0 
	EJECT
* 
*	PERMANENT VIRTUAL CIRCUITS
* 
CLV100	EQU	*
	LDK	A1,RSET.ST	IS SUB-STATUS = RESET ? 
	CC	A1,LCSBST,A13	. 
	RF(E)	CLV160	YES, NO ACTION
	SC	A1,LCSBST,A13	SUBSTATUS := RESET
* 
*	RESET VIRTUAL CIRCUIT 
* 
	CF	A14,RSETVC
* 
*	SEND NOTIFICATION TO RH, IF APPLICABLE
* 
	LD	A1,LCDWT,A13	DOES THE RH KNOWS THIS LC ?
	RF(Z)	CLV130	NO
	CF	A14,GTBUF	GET AN INPUT BUFFER 
	LC	A1,LCNUM,A13	LOGICAL CHANNEL NUMBER 
	SC	A1,LCIDNT,A2	.
	LDK	A1,RSET.P	PACKET TYPE
	SC	A1,IDENT,A2	. 
	SC	A5,DGNCOD,A2	.
	LDK	A1,RSET.L	PACKET LENGTH
	ST	A1,HDLC,A2	.
	CF	A14,QUEI	PUT ELEMENT IN INPUT QUEUE 
	LD	A1,TIMADR,A13	GET TIMER BLOCK ADDRESS 
	CF	A14,CANTIM	CANCEL TIMER 
	CM	TIMADR,A13
* 
	EJECT
* 
*	PREPARE RESET PACKET AND TRANSMIT IT TO THE REMOTE STATION
* 
CLV130	EQU	*
	LDR	A2,A13	GET AN OUTPUT BUFFER
	ADK	A2,SYSBUF	.
	LDR*	A1,A2	IS IT FREE ?
	RF(Z)	CLV150	YES 
* 
*	WAIT FOR RELEASING OF OUTPUT BUFFER 
* 
	LDKL	A1,CLV130	REACTIVATION ADDRESS
	ABL	BUFWAT 
* 
CLV150	EQU	*
	LDK	A1,RSET.P	RESET PACKET TYPE
	SC	A1,IDENT,A2	. 
	SC	A5,DGNCOD,A2	DIAGNOSTIC CODE
	LDK	A1,0 
	SC	A1,CAUSE,A2	CLEAR RESET CAUSE 
	LDK	A1,RSET.L	RESET PACKET LENGTH
	ST	A1,HDLC,A2	.
	CF	A14,QUEO	PUT ELEMENT IN OUTPUT QUEUE
* 
*	START CONFIRMATION TIMER
* 
	LDKL	A8,SYRETM	RESET CONFIRMATION TIMER
	CF	A14,STTIM	START TIMER 
CLV160	EQU	*
	ABL	EXITDC 
	XIF
	EJECT
* 
* 
*	THIS MODULE RELEASE ALL RELATION BETWEEN THE
*	DWT AND THE LOGICAL CHANNELS. THE LC IS PLACED
*	IN THE INITIAL STATE. 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A1  = DIAGNOSTIC CODE FOR THE RH 
*		A12 = LINE BLOCK ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,CLAVCS 
* 
*	OUTPUT PARAMETERS:
*		NO REGISTERS ARE CHANGED 
* 
CLAVCS	EQU	*
         CF       A14,SAVE8             SAVE REGISTERS
	LDR	A7,A13	SAVE A13
* 
*	RELEASE ALL LOGICAL CHANNELS
* 
	LC	A4,NRLC,A12	GET # OF LOGICAL CHANNELS 
	ANK	A4,/FF	. 
	SUK	A4,1	. 
CLAV00	EQU	*
	CF	A14,GTLCAD	GET LC-ADM ADDRESS 
* 
	EJECT
* 
	CF	A14,CLINPQ	CLEAR INPUT QUEUE
	IFF	SWITVC=0 
	LDK	A2,0 
	IFF	PERMVC=0 
	LC	A1,VCTYP,A13	VC-TYPE
	ANK	A1,/FF	. 
	RF(Z)	CLAV10	SWITCHED VIRTUAL CIRCUIT
	XIF
	IFF	PERMVC=0 
	LDK	A2,DATA.ST	PRESET LC-STATUS
	ECR	A2,A2	.
	XIF
CLAV10	EQU	*
	ST	A2,LCSTAT,A13	SET STATUS TO INITIALE VALUE
	LD	A6,LCDWT,A13	IS THERE RELATION WITH A DWT 
	RF(Z)	CLAV30	NO
	IFF	SWITVC=0 
	IFF	PERMVC=0 
	ADK	A1,0	PVC ? 
	RF(NZ)	CLAV15	YES
	XIF
	IFF	SWITVC=0 
         LDK      A1,VCREL
         SC       A1,DWTSTE,A6
CLAV15	EQU	*
	XIF
* 
*	RESET TIMER FLAGS 
*	CANCEL TIMER
* 
	LD	A1,TIMADR,A13 
	CF	A14,CANTIM
	CM	TIMADR,A13
	LDK	A1,CONTIM	MASK VALUE 
	C1R	A1,A1	.
	ANS	A1,FLAGS,A13	RESET FLAG
* 
*	COMPLETE PENDING OUTPUT REQUESTS
* 
	LDKL	A3,CLEA.RC	=2 RETURN CODE 
	CF	A14,CMEVNT
* 
	EJECT
* 
*	PREPARE CLEAR OR RESET NOTIFICATION FOR RH
* 
	CF	A14,GTBUF	GET AN INPUT BUFFER 
	LC	A1,LCNUM,A13	LOGICAL CHANNEL NUMBER 
	SC	A1,LCIDNT,A2	.
	IFF	SWITVC=0 
	LDK	A3,CLEA.RC	RETURN CODE 
	LDK	A1,CLE.P	PRESET PACKET TYPE = CLEAR
	IFF	PERMVC=0 
	LC	A3,VCTYP,A13	VC-TYPE
	ANK	A3,/FF	. 
	RF(Z)	CLAV20	SWITCHED VIRTUAL CIRCUIT
	XIF
	IFF	PERMVC=0 
	LDK	A3,RSET.RC	RETURN CODE 
	LDK	A1,RSET.P	PACKET TYPE = RESET
CLAV20	EQU	*
	XIF
	SC	A1,IDENT,A2	SAVE PACKET TYPE
	LD	A1,SAVE	GET INPUT PARAMETER 
	SC	A1,DGNCOD,A2	DIAGNOSTIC CODE
	LDK	A1,CLE.L	PACKET LENGTH 
	ST	A1,HDLC,A2	.
	CF	A14,QUEI	PUT ELEMENT IN INPUT QUEUE 
CLAV30	EQU	*
	SUK	A4,1	NEXT ENTRY IN LC:TAB
	RB(NN)	CLAV00	.
* 
*	READY 
* 
         LDR      A13,A7           RELOAD SAVED A13 
         CF       A14,RELOA8
	RTN	A14	BACK TO CALLER 
	EJECT
* 
* 
*	WAIT FOR RELEASING OF SYSTEM BUFFER 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A1  = RESTART ADDRESS
*                 A12 = LINE BLOCK ADDRESS
*		A13 = LC-ADM ADDRESS 
* 
*	CALLING SEQUENCE: 
*		ABL    BUFWAT
* 
*	OUTPUT PARAMETERS:
*		AFTER A CERTAIN TIME THE CALLER IS ACTIVATED 
*		ON THE RESTART LABEL 
*		A13 AND A14 REMAIN UNCHANGED.
* 
BUFWAT	EQU	*
	LDR	A2,A13	SAVE REGISTERS
	LDR	A3,A12	. 
	INH		.	=1
	CF	A15,GETBLK	GET A MONITOR BLOCK
	LDR	A1,A4	BLOCK ADDRESS AS PARAMETER 
	CF	A15,SETIME	SET TIMER
	DATA	BUFW00	ACTIVATION ADDRESS 
	DATA	BUFDEL	DELAY TIMER
	ENB
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
* 
	EJECT
* 
*	ACTIVATION
* 
BUFW00	EQU	*
	LDR	A4,A1	GET MONITOR BLOCK ADDRESS
	INH		.	=1
	CF	A15,FREBLK	RELEASE BLOCK
	ENB
	LDR	A12,A3	RESTORE REGISTERS 
	LDR	A13,A2	. 
         LDKL     A14,DCSTAK       A14:=CF STACK POINTER
	ABR	A1	BACK TO CALLER
	EJECT
* 
* 
*	TRANSLATE THRESHOLD PERCENTAGE INTO A NUMBER OF PACKETS 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,TRTHR
* 
*	OUTPUT PARAMETERS:
*		THE NUMBER OF PACKETS IS STORED IN THE LC-ADM. 
*		A1 IS CHANGED
* 
TRTHR	EQU	* 
	STR	A4,A14	SAVE REGISTER 
	LDK	A1,0 
	LC	A1,LCREWN,A13	RECEIVE WINDOW SIZE = W 
	SUK	A1,1 
         LDK      A4,0
TRTHR1	EQU	*
	AD	A4,THRESH 
	SUK	A1,1	GET P*W 
	RB(NN)	TRTHR1
	LDKL	A1,-1 
TRTHR2	EQU	*
	ADK	A1,1 
	SUK	A4,100	P*W/100 
	RB(NN)	TRTHR2
	SC	A1,LCTHRE,A13	THRESHOLD VALUE IN PACKETS
	LDR*	A4,A14	RESTORE REGISTER 
	RTN	A14
	EJECT
	IFF	SWITVC=0 
* 
* 
*	CALCULATION OF THE WINDOW SIZES AND PACKET LENGTH 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A12 = LINE BLOCK ADDRESS 
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,GTWNDS 
* 
*	OUTPUT PARAMETERS:
*		REGISTERS A1 AND A3 ARE CHANGED
* 
GTWNDS	EQU	*
	ST	A2,SAVE+6	SAVE REGISTER 
	LD	A1,WNDSIZ,A12	PRESET ON MAXIMUM VALUES
	SC	A1,LCTRWN,A13	. 
	SC	A1,LCREWN,A13	. 
	LD	A1,PACKLN,A12	. 
	ST	A1,TRBFSZ,A13	. 
	ST	A1,REBFSZ,A13	. 
	ADK	A2,BEGDAT	POINTER
	LCR	A1,A2	GET LENGTH VALUE 
	ANK	A1,/F0	LENGTH CALLING DTE
	SRL	A1,4	. 
	LCR	A3,A2	LENGTH CALLED DTE
	ANK	A3,/0F 
	ADR	A1,A3	ADD BOTH LENGTH
* 
	EJECT
* 
	ADK	A1,1	ROUNDED UPWARDS 
	SRL	A1,1	MAKE IT BYTES 
	ADR	A2,A1	PASS DTE FIELDS
	ADK	A2,1	POINTS TO FACILITY
	LCR	A1,A2	FACILITY SPECIFIED ? 
	ANK	A1,/3F 
	RF(Z)	GTWND6	NO
	ADK	A2,1	POINTS TO FIRST FACILITY
GTWND1	EQU	*
	LCR	A3,A2	GET FACILITY CODE
	CWK	A3,/02	FLOW CONTROL ?
	RF(E)	GTWND2	YES 
	ADK	A2,2	TRY NEXT ONE
	SUK	A1,2	UPDATE LENGTH 
	RF(NP)	GTWND6	EXHAUSTED
	RB	GTWND1	NEXT ONE 
* 
*	FACILITY FOR FLOW CONTROL SELECTION SPECIFIED 
* 
GTWND2	EQU	*
* 
*	GET TRANSMITTER DATA
* 
	ADK	A2,1	POINTS TO FACILITY PARAMETER
	LCR	A3,A2	GET PARAMETER
	ANK	A3,/0F	TRANSMITTER PARAMETERS
	SLL	A3,1	PREPARE FOR INDEXING
	RF(Z)	GTWND4	NOT SPECIFIED 
	LD	A3,CLAS1-2,A3	GET VALUES
	CC	A3,TRBFSZ+1,A13	PACKET SIZE TOO LARGE ? 
	RF(NL)	GTWND3	YES
	SC	A3,TRBFSZ+1,A13	SAVE TRANSMITTER BUFFER SIZE
* 
	EJECT
* 
GTWND3	EQU	*
	ECR	A3,A3
	CC	A3,LCTRWN,A13	WINDOW SIZE TOO LARGE ? 
	RF(NL)	GTWND4	YES
	SC	A3,LCTRWN,A13	SAVE WINDOW SIZE
* 
*	GET RECIEVER DATA 
* 
GTWND4	EQU	*
	LCR	A3,A2	GET PARAMETER AGAIN
	ANK	A3,/F0	RECEIVER PARAMETER
	SRL	A3,3	PREPARE FOR INDEXING
	RF(Z)	GTWND6	NOT SPECIFIED 
	LD	A3,CLAS1-2,A3	GET VALUES
	CC	A3,REBFSZ+1,A13	PACKET SIZE TOO LARGE ? 
	RF(NL)	GTWND5	YES
	SC	A3,REBFSZ+1,A13	SAVE RECEIVER BUFFER SIZE 
GTWND5	EQU	*
	ECR	A3,A3
	CC	A3,LCREWN,A13	WINDOW SIZE TOO LARGE ? 
	RF(NL)	GTWND6	YES
	SC	A3,LCREWN,A13	SAVE WINDOW SIZE
GTWND6	EQU	*
	LD	A2,SAVE+6	RELOAD SAVED A2 
	RTN	A14
	EJECT
	XIF
* 
* 
*	COMPLETE AN OUTPUT EVENT, DUE TO AN ERROR SITUATION 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A3  = RETURN CODE
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,CMEVNT 
* 
*	OUTPUT PARAMETERS:
*		A1 ,A2 AND A6 ARE CHANGED
* 
CMEVNT	EQU	*
	LDR	A1,A13	QUEUE ANCHOR ADDRESS
	ADK	A1,QUEOUT	.
	LDK	A2,NPRFLG	SET MASK VALUE 
	C1R	A2,A2	.
	ANRS	A2,A1	IS QUEUE EMPTY ?
	RF(Z)	CMEV20	YES 
	CF	A14,DEQUE	GET ELEMENT FROM QUEUE
	LDKL	A1,DWTTYP 
	CW	A1,DWTCHP,A2	IS IT A DWT ?
	RF(NE)	CMEV10	NO 
	LDR	A6,A2	A6 = DWT-ADDRESS 
	CF	A14,CMPREQ	COMPLETE REQUEST 
	RB	CMEVNT
* 
	EJECT
* 
*	THE ELEMENT IS A SYSTEM BUFFER
* 
CMEV10	EQU	*
	CMR	A2	RELEASE SYSTEM BUFFER 
	RB	CMEVNT
* 
CMEV20	EQU	*
	RTN	A14
	EJECT
* 
* 
*	THIS MODULE PERFORMS SOME TESTS ON A RECIEIVED
*	DATA-, RR- OR RNR PACKET. 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,TDARR
* 
*	OUTPUT PARAMETERS:
*		A1 = 0 NO ERRORS FOUND 
*		     1 P(R) ERROR FOUND
*		WHEN A PROCEDURE ERROR IS DETECTED, THE VC WILL BE CLEARED 
*		OR RESET AND THE MODULE RETURNS TO THE SCHEDULER.
* 
TDARR	EQU	* 
	LDK	A1,DATA.ST	IS LC-STATUS = DATA TRANSFER ?
	CC	A1,LCSTAT,A13	. 
	RF(E)	TDA10	YES
* 
*	LC-STATUS IS NOT DATA TRANSFER, IF CLEAR: IGNORE PACKET, ELSE 
*	PROCEDURE ERROR 
* 
	LDK	A1,CLEA.ST	IS LC-STATUS = CLEAR ?
	CC	A1,LCSTAT,A13	. 
	RF(NE)	TDA00	YES 
	CF	A14,RLBUF	IGNORE PACKET 
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
* 
	EJECT
* 
*	ILLEGAL STATE, SO PROCEDURE ERROR 
* 
TDA00	EQU	* 
	CF	A14,RLBUF	BUFFER BACK TO POOL 
	LDK	A1,LOCPER	DIAG. CODE = PROCEDURE ERROR 
	ABL	CLVC	CLEAR VC AND RETURN TO SCHEDULER
* 
*	STATE = DATA TRANSFER, IF SUB-STATE = RESET: IGNORE PACKET
* 
TDA10	EQU	* 
	LDK	A1,RSET.ST	IS LC-STATUS = RESET
	CC	A1,LCSBST,A13	. 
	RF(NE)	TDA20	NO
	CF	A14,RLBUF	BUFFER BACK TO POOL 
	ABL	EXITDC	CONTROL BACK TO SCHEDULER 
* 
*	TEST IF RECEIVED P(R) IS IN WINDOW: SLWE <= P(R) <= PS
*	OR P(R) - SLWE <= PS - SLWE 
* 
TDA20	EQU	* 
	LC	A1,IDENT,A2	GET RECEIVED P(R) 
	SRL	A1,5	. 
	ANK	A1,/07	. 
	LC	A4,SLWE,A13	SEND LWE = OLD P(R) 
	ANK	A4,/FF	. 
	SUR	A1,A4	GET P(R) - SLWE
	ANK	A1,/07	MODULO 8
	STR	A1,A14	SAVE IT 
	LC	A1,PS,A13	GET PS - SLWE 
	SUR	A1,A4	.
	ANK	A1,/07	MODULO 8
	CWR*	A1,A14	>= 
	RF(NL)	TDA30	YES 
	EJECT
* 
*	P(R) IS NOT IN WINDOW, RETURN CODE := 1 
* 
	LDK	A1,1	SET RETURN CODE 
	RF	TDA40 
* 
*	PACKET CORRECT
* 
TDA30	EQU	* 
	LDK	A1,0	SET RETURN CODE 
TDA40	EQU	* 
	RTN	A14
	EJECT
* 
* 
*	CALCULATE QUEUE ANCHOR ADDRESS AND QUEUE ELEMENT
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A2  = ELEMENT ADDRESS
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,QUEI/QUEO
* 
*	OUTPUT PARAMETERS:
*		NONE 
*		A1 IS CHANGED
* 
QUEI	EQU	*
	LDK	A1,QUEINP
	RF	QUEO00
* 
QUEO	EQU	*
	LDK	A1,QUEOUT
QUEO00	EQU	*
	ADR	A1,A13	GET QUEUE ANCHOR ADDRESS
	CF	A14,QUEUE	QUEUE ELEMENT 
	RTN	A14
	EJECT
* 
* 
*	QUEUE ROUTINE (FIFO)
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A1  = ADDRESS QUEUE ANCHOR 
*		A2  = ELEMENT ADDRESS
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,QUEUE
* 
*	OUTPUT PARAMETERS:
*		NO REGISTERS ARE CHANGED 
* 
QUEUE	EQU	* 
	IFT	CPU852=1 
	ST	A1,QUESAV	SAVE REGISTERS A1-A3
	ST	A2,QUESAV-2 
	ST	A3,QUESAV-4 
	XIF
	IFT	CPU852=0 
	MS	3,QUESAV-4	SAVE REGISTERSA1-A3
	XIF
	LDR*	A3,A1 
	ANKL	A3,/FFFE	QUEUE FILLED?
	RF(Z)	QUE10	NO 
* 
	EJECT
* 
QUE05	EQU	* 
	LDR	A1,A3	GET NEXT ELEMENT 
	LD	A3,BFCHPT,A1	CHAIN FILLED?
	RB(NZ)	QUE05	YES 
	ST	A2,BFCHPT,A1	STORE NEW ELEMENT
	RF	QUE15 
QUE10	EQU	* 
	ORRS	A2,A1	STORE ELEMENT IN ANCHOR 
QUE15	EQU	* 
	CM	BFCHPT,A2	SET ZERO IN CHAINPOINTER
	IFT	CPU852=1 
	LD	A1,QUESAV	RESTORE REGISTERS A1-A3 
	LD	A2,QUESAV-2 
	LD	A3,QUESAV-4 
	XIF
	IFT	CPU852=0 
	ML	3,QUESAV-4	RESTORE REGISTERS A1-A3
	XIF
	RTN	A14
	EJECT
* 
* 
*	QUEUE ROUTINE (LIFO)
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A1  = ADDRESS QUEUE ANCHOR 
*		A2  = ELEMENT ADDRESS
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,QUEUEF 
* 
*	OUTPUT PARAMETERS:
*		NO REGISTERS ARE CHANGED 
* 
QUEUEF	EQU	*
	ST	A3,QUESAV	SAVE REGISTERS A3,A4
	ST	A4,QUESAV-2 
         CM       BFCHPT,A2 
	LDR*	A4,A1	GET ADDRESS FROM QUEUE ANCHOR 
	ANK	A4,/01	SAVE BIT 15 
	LDKL	A3,/FFFE
	ANRS	A3,A1	CLEAR BIT 15 OF ANCHOR
	LDR*	A3,A1	ADDRESS FROM QUEUE ANCHOR 
	RF(Z)	QUEF10 
	ST	A3,BFCHPT,A2	STORE OLD POINTER IN NEW ELEMENT 
QUEF10	EQU	*
	STR	A2,A1	STORE NEW ELEMENT IN ANCHOR
	ORRS	A4,A1	STORE OLD BIT 15 IN ANCHOR
	LD	A3,QUESAV	RESTORE REGISTERS A3,A4 
	LD	A4,QUESAV-2 
	RTN	A14
	EJECT
* 
* 
*	DEQUEUE ROUTINE 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A1  = ADDRESS QUEUE ANCHOR 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,DEQUE
* 
*	OUTPUT PARAMETERS:
*		A2 = ELEMENT ADDRESS 
*		NO REGISTERS ARE CHANGED 
* 
DEQUE	EQU	* 
	ST	A3,QUESAV	SAVE REGISTER A3
	LDR*	A2,A1	GET ELEMENT FROM ANCHOR 
	LD	A3,BFCHPT,A2	GET ADDRESS NEXT ELEMENT 
	STR	A3,A1	STORE IN ANCHOR
	CM	BFCHPT,A2	ZERO IN CHAINPOINTER
	LDR	A3,A2
	ANK	A3,1	. 
	XRR	A2,A3	RESET BIT 15 IN ELEMENT ADDR.
	LD	A3,QUESAV	RESTORE REGISTER A3 
	RTN	A14
	EJECT
* 
* 
*	START TIMER ROUTINE 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A4  = ACTIVATION ADDRESS 
*		A8  = TIME-OUT VALUE 
*		A12 = 1TH PARAMETER
*		A13 = 2ND PARAMETER
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,STRTIM 
* 
*	OUTPUT PARAMETERS:
*		A4 = ADDRESS TIMER 
*		NO OTHER REGISTERS ARE CHANGED 
* 
STRTIM	EQU	*
	IFT	CPU852=1 
	ST	A1,TIMSAV	SAVE REGISTERS
	ST	A2,TIMSAV-2 
	ST	A3,TIMSAV-4 
	XIF
	IFT	CPU852=0 
	MS	3,TIMSAV-4	SAVE REGISTERS 
	XIF
	ST	A8,STRPAR+2	SET TIME
	LDR	A1,A13	LC-ADM ADDRESS
	LDR	A2,A4	DISPATCH ADDRESS 
	LDR	A3,A12	1TH PARAMETER 
* 
	EJECT
* 
	INH		.	=1
	CF	A15,GETBLK	GET MONITOR BLOCK
	LDR	A1,A4	ADDRESS BLOCK
	CF	A15,SETIME	SET TIMER
STRPAR	DATA	TIMACT	TIMER ENTRY AFTER TIME OUT 
	DATA	0	TIMER VALUE IN 0,1 SEC
	ENB
	IFT	CPU852=1 
	LD	A1,TIMSAV	RESTORE REGISTERS 
	LD	A2,TIMSAV-2 
	LD	A3,TIMSAV-4 
	XIF
	IFT	CPU852=0 
	ML	3,TIMSAV-4	RESTORE REGISTERS
	XIF
	RTN	A14
* 
*        RETURN AFTER TIME OUT
* 
TIMACT	EQU	*
	LDKL	A5,TTBX25	TTAB-ADDRESS
	LD	A2,2,A1	GET DISPATCH ADDRESS
	LDK	A3,0 
	CF	A15,ACTOT	ACTIVATE TASK 
	ABL	TDISP
	EJECT
* 
* 
*	CANCEL TIMER ROUTINE
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A1  = ADDRESS TIMER
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,CANTIM 
* 
*	OUTPUT PARAMETERS:
*		A1 = REMAINING TIME
*		NO OTHER REGISTERS ARE CHANGED 
* 
CANTIM	EQU	*
	ST	A2,TIMSAV	SAVE REGISTERS
	ST	A3,TIMSAV-2 
	ST	A4,TIMSAV-4 
	LDR	A2,A1	ADDRESS TIMER VALUE
         INH
	RF(Z)	CANTEN	NO TIMER SPECIFIED
	LDR*	A1,A2	GET TIMER VALUE 
	RF(Z)	CANTEN	TIMER = 0 
	C1R	A1,A1	GET REMAINING TIME 
         CMR      A2               SET TIMER VALUE 0
	LD	A3,-2,A2	ADDRESS TIMOUTBLOCK
	LD	A4,4,A3	ADDRESS ACTIVATIONBLOCK 
	ST	A1,4,A4	SAVE A1 
	INH		.	=1
	CF	A15,FREBLK	RELEASE ACTIVATIONBLOCK
* 
	EJECT
* 
CANTEN	EQU	*
         ENB
	LD	A2,TIMSAV	RESTORE REGISTERS 
	LD	A3,TIMSAV-2 
	LD	A4,TIMSAV-4 
	RTN	A14
* 
	RES	3	SAVE AREA
TIMSAV	EQU	*-2
QUESAV	EQU	*-2
         EJECT
* 
* 
*	MODULE TO CONTROL THE PROCESSES IN THE DC-TASK
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		NONE 
* 
*	CALLING SEQUENCE: 
*		ABL    EXITDC
* 
*	OUTPUT PARAMETERS:
*		AT ENTRY OF AN ACTIVATED PROCESS:
*		A1  = QUEUE ANCHOR ADDRESS 
*		A12 = LINE BLOCK ADDRESS 
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
EXITDC	EQU	*
	LDK	A5,NPRFLG	NO PROCESSING MASK 
	C1R	A6,A5	.
* 
*	GET SAVED LAST SCAN PARAMETERS
* 
	LD	A4,SCHEDC	LOGICAL CHANNEL INDEX 
	LD	A7,SCHEDL	LINE INDEX
	LDKL	A14,DCSTAK	SET STACK POINTER
	LDKL	A10,-2	SCAN LOOP-COUNTER
* 
	EJECT
* 
EXIT00	EQU	*
	LDKL	A12,LINTAB	GET LINE BLOCK ADDRESS 
	IFF	SYNRLN=1 
	ADR	A12,A7	. 
	ADR	A12,A7	. 
	XIF
	LDR*	A12,A12	. 
* 
*	TEST IF LINE CONNECTED
* 
         LD       A13,CMNFLG,A12
	RF(Z)	EXIT04	NO! CONTINUE WITH NEXT LINE (IF ANY)
* 
*	TEST IF ONLY STATISTIC FLAG IS SET
* 
	SUKL	A13,STATFL
	RF(Z)	EXIT04	YES 
	ADK	A4,1	TAKE NEXT LOGICAL CHANNEL 
	CC	A4,NRLC,A12	IS THERE A NEXT ONE ? 
	RF(L)	EXIT10	YES 
EXIT04	EQU	*
	LDKL	A4,-1	PRESET FOR NEW LG.CH. OF NEXT LINE
	IFF	SYNRLN=1 
	ADK	A7,1	UPDATE LINE INDEX 
	CWK	A7,SYNRLN	IS THERE A NEXT LINE ? 
         RF(L)    EXIT30               YES
	LDK	A7,0	START AGAIN WITH FIRST LINE 
	XIF
	ADKL	A10,1 
	RF(Z)	EXIT32	END OF SCANNING 
         RF       EXIT30               .
* 
	EJECT
* 
EXIT10	EQU	*
	CF	A14,GTLCAD	GET LC-ADM ADDRESS 
	LDKL	A8,OUTPCK	PRESET ACTIVATION ADDRESS 
	LDKL	A9,1	PRESET PROCESS INDICATION
	LD	A3,NRPNDT,A12	CHECK NR. OF OUTPUT REQUESTS
	CWK	A3,SYNRTR	.
	RF(NL)	EXIT20	MAXIMUM, SO NO OUTPUT
	LDR	A1,A12	CHECK RESTART OUTPUT QUEUE
	ADK	A1,RSTQUE	.
	LDR*	A2,A1	. 
	RF(NZ)	EXIT35	NOT EMPTY
	LDR	A1,A13	CHECK OUTPUT QUEUE
	ADK	A1,QUEOUT	.
	LDR*	A2,A1	. 
	RF(Z)	EXIT20	QUEUE IS EMPTY
	TM	A2,A6 
	RF(Z)	EXIT20	ONLY NO PROCESSING FLAG IS SET
	TM	A2,A5	TEST IF QUEUE IS BLOCKED
	RF(Z)	EXIT40	NO, SO PROCESS THIS QUEUE 
EXIT20	EQU	*
	LDKL	A8,RHIP	PRESET ACTIVATION ADDRESS 
	LDKL	A9,4	PRESET PROCESS INDICATION
	LDR	A1,A13	CHECK INPUT QUEUE 
	ADK	A1,QUEINP	.
	LDR*	A2,A1	. 
	RF(Z)	EXIT30	QUEUE IS EMPTY
	TM	A2,A6 
	RF(Z)	EXIT30	ONLY NO PROCESSING FLAG IS SET
	TM	A2,A5	TEST IF QUEUE IS BLOCKED
	RF(Z)	EXIT40	NO, SO PROCESS THIS QUEUE 
* 
	EJECT
* 
*	CHECK IF A COMPLETED SCAN CYCLE IS DONE 
* 
EXIT30	EQU	*
	CW	A4,SCHEDC 
	RB(NE)	EXIT00	CONTINUE WITH SCANNING 
         CW       A7,SCHEDL 
	RB(NE)	EXIT00	CONTINUE WITH SCANNING 
	CM	DCLEVL	SET PROCESS INDICATION 
EXIT32   EQU      * 
	LKM		EXIT DC-TASK
	DATA	3 
* 
*	A NOT EMPTY QUEUE IS FOUND, ACTIVATE THE CONCERNING PROCESS 
* 
EXIT35	EQU	*
	LD*	A13,LC:TAB,A12	USE LOGICAL CHANNEL 0 FOR RESTART 
EXIT40	EQU	*
	ST	A4,SCHEDC	SAVE SCAN PARAMETERS
	ST	A7,SCHEDL	. 
	ST	A9,DCLEVL	SET PROCESS INDICATION
	ABR	A8	BRANCH TO THE ROUTINE 
* 
SCHEDC   DATA     0                     LOGICAL CHANNEL INDEX 
SCHEDL	DATA	0	LINE INDEX
	EJECT
* 
* 
*	ROUTINE TO RESET A VIRTUAL CIRCUIT
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,RSETVC 
* 
*	OUTPUT PARAMETERS:
*		NONE 
* 
RSETVC	EQU	*
         CF       A14,SAVE8 
	CF	A14,CLLCAD	CLEAR LC-ADM FIELDS
* 
*	EMPTY INPUT QUEUE 
* 
         CF       A14,CLINPQ
* 
*	COMPLETE EVENTS IN OUTPUT QUEUE 
* 
	LD	A1,LCDWT,A13	IS THERE A RELATION WITH AN USER 
	RF(Z)	RSET20	NO
	LDKL	A3,RSET.RC	RETURN CODE
	CF	A14,CMEVNT
RSET20	EQU	*
         CF       A14,RELOA8
	RTN	A14
* 
	EJECT
* 
* 
*	ROUTINE TO EMPTY THE INPUT QUEUE
* 
****************************************************
* 
*	INPUT PARAMETERS: 
*		A13 = LC-ADM ADDRESS 
*		A14 = CF STACK POINTER 
* 
*	OUTPUT PARAMETERS:
*		NONE 
* 
CLINPQ   EQU      * 
	LDR	A1,A13	QUEUE ANCHOR ADDRESS
	ADK	A1,QUEINP	.
	LDK	A2,NPRFLG	SET MASK VALUE 
	C1R	A2,A2	.
	ANRS	A2,A1	IS QUEUE EMPTY ?
         RF(Z)    CLINP1           YES
	CF	A14,DEQUE	GET ELEMENT FROM QUEUE
	CF	A14,RLBUF	RELEASE BUFFER
         RB       CLINPQ
* 
CLINP1   EQU      * 
         RTN      A14 
	EJECT
* 
* 
*	ROUTINE TO CLEAR LC-ADM FIELDS
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A13 = LC-ADM FIELDS
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF     A14,CLLCAD
* 
*	OUTPUT PARAMETERS:
*		NONE 
*		A1 IS CHANGED
* 
CLLCAD	EQU	*
	LDK	A1,0 
	ST	A1,FLAGS,A13	CLEAR FIELDS IN LC-ADM 
         ST       A1,SYSBUF-2,A13 
	SC	A1,PS,A13	. 
	SC	A1,PR,A13	. 
	SC	A1,RPS,A13	.
	SC	A1,SLWE,A13	. 
         SC       A1,RLWE,A13 
	SC	A1,NRNUBF,A13 
	RTN	A14
	EJECT
* 
* 
*	THIS ROUTINE CALCULATES FROM THE FILE CODE OF THE 
*	LINE ECB THE LINE BLOCK ADDRESS 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A8  = LINE ECB ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,GTLBA
* 
*	OUTPUT PARAMETERS:
*		A12 = LINE BLOCK ADDRESS 
* 
GTLBA	EQU	* 
	IFT	SYNRLN=1 
	LD	A12,LINTAB	LINE BLOCK ADDRESS 
	XIF
	IFF	SYNRLN=1 
	STR	A1,A14	SAVE REGISTER 
	LDKL	A1,LINTAB	TABLE WITH LINE BLOCK ADDRESS 
GTLB00	EQU	*
	LDR*	A12,A1	LINE BLOCK ADDRESS 
	LD	A2,FILCOD,A12	CHECK FILE CODE 
	CC	A2,ECBFC,A8	. 
	RF(E)	GTLB10	CORRECT ONE 
	ADK	A1,2 
	RB	GTLB00	TRY NEXT LINE BLOCK
* 
GTLB10	EQU	*
	LDR*	A1,A14	RESTORE REGISTER 
	XIF
	RTN	A14	RETURN 
	EJECT
* 
* 
*	ROUTINE TO GET LC-ADM ADDRESS 
* 
********************************************
* 
*	INPUT PARAMETERS: 
*		A4  = LOGICAL CHANNEL NUMBER 
*		A12 = LINE BLOCK ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,GTLCAD 
* 
*	OUTPUT PARAMETERS:
*		A13 = LC-ADM ADDRESS 
* 
GTLCAD	EQU	*
	LDR	A13,A4	PREPARE FOR INDEXING
	ADR	A13,A13	.
	AD	A13,LC:TAB,A12	LC-ADM ADDRESS 
	LDR*	A13,A13	GET LC-ADM ADDRESS
	RTN	A14
	EJECT
* 
* 
*	MODULE TO ACTIVATE A CONFIRMATION TIMER 
* 
********************************************
* 
*	INPUT PARAMTERS:
*		A8  = TIME-OUT VALUE 
*		A13 = LC-ADM ADDRESS 
*		A14 = CALL FUNCTION STACK POINTER
* 
*	CALLING SEQUENCE: 
*		CF    A14,STTIM
* 
*	OUTPUT PARAMETERS:
*                 A1 AND A4 CHANGED 
* 
STTIM	EQU	* 
	LDKL	A4,TIMOUT	ACTIVATION LABEL
	CF	A14,STRTIM	START TIMER
	ST	A4,TIMADR,A13	SAVE TIMER ADDRESS
	LDK	A1,CONTIM	SET TIMER STARTED FLAG 
	ORS	A1,FLAGS,A13	. 
	RTN	A14
	EJECT
* 
* 
* 
*	GET BUFFER ROUTINE
* 
****************************************************
* 
*	INPUT PARAMETERS: 
*		A14 = CF STACK POINTER 
* 
*	OUTPUT PARAMETERS:
*		A2  = BUFFER ADDRESS 
*		NO OTHER REGISTERS ARE CHANGED 
* 
GTBUF	EQU	* 
	STR	A1,A14	SAVE A1 
	LD	A2,BUFANC	BUFFER CHAIN ANCHOR 
	RF(Z)	GTBU10	NO BUFFER AVAILABLE 
	LDR*	A1,A2	GET BUFFER FROM CHAIN 
	ST	A1,BUFANC	. 
	ADK	A2,2	START OF BUFFER 
	LDR*	A1,A14	RELOAD A1
	RTN	A14
GTBU10	EQU	*
	HLT		ERROR 
* 
	EJECT
* 
* 
*	RELEASE BUFFER ROUTINE
* 
***************************************************** 
* 
*	INPUT PARAMETERS: 
*		A2  = BUFFER ADDRESS 
*		A14 = CF STACK POINTER 
* 
*	OUTPUT PARAMETERS:
*		NONE 
* 
RLBUF	EQU	* 
	STR	A1,A14	SAVE A1 
	LD	A1,BUFANC	BUFFER POOL ANCHOR
	SUK	A2,2 
	STR	A1,A2	PUT BUFFER.. 
	ST	A2,BUFANC	FIRST IN QUEUE
	LDR*	A1,A14	RELOAD A1
	RTN	A14
* 
	END

HexDump

0x00000…00034 (0, 0, 400)   Head {h00=0x0030, h01=0x0050, text=» IDENT X25:L3 REL 11.0 81-07-06 870105041100«, t00=0x0000, t01=0x0004}
0x00034…00054               Head {h00=0x001c, h01=0x0050, text=»   =1, CF A15 IN INHIBIT«, t00=0x0000, t01=0x0038}
0x00054…00076               Head {h00=0x001e, h01=0x0050, text=»   =2,  MISSING RET. CODE «, t00=0x0000, t01=0x0058}
0x00076…00080               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x007a}
0x00080…000b4               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0000, t01=0x0084}
0x000b4…000be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b8}
0x000be…000e4               Head {h00=0x0022, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00c2}
0x000e4…000ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e8}
0x000ee…0011e               Head {h00=0x002c, h01=0x0050, text=»* X25-L3: DRIVER FOR DATA COMMUNICATION «, t00=0x0000, t01=0x00f2}
0x0011e…00144               Head {h00=0x0022, h01=0x0050, text=»*  SERVING THE PACKET LEVEL AS«, t00=0x0000, t01=0x0122}
0x00144…00166               Head {h00=0x001e, h01=0x0050, text=»*  DEFINED IN X25 LEVEL 3.«, t00=0x0000, t01=0x0148}
0x00166…00170               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016a}
0x00170…0017a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0174}
0x0017a…001ae               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0000, t01=0x017e}
0x001ae…001b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0022}
0x001b8…001c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x002c}
0x001c2…001cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0036}
0x001cc…001da               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0040}
0x001da…001e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x004e}
0x001e4…00228               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0001, t01=0x0058}
0x00228…00232               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x009c}
0x00232…0023c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a6}
0x0023c…0024e               Head {h00=0x000e, h01=0x0050, text=»* ORDERS :«, t00=0x0001, t01=0x00b0}
0x0024e…00258               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c2}
0x00258…00272               Head {h00=0x0016, h01=0x0050, text=»* /00  READ STATUS«, t00=0x0001, t01=0x00cc}
0x00272…0027c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e6}
0x0027c…00290               Head {h00=0x0010, h01=0x0050, text=»* /02  READ «, t00=0x0001, t01=0x00f0}
0x00290…0029a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0104}
0x0029a…002ae               Head {h00=0x0010, h01=0x0050, text=»* /06  WRITE«, t00=0x0001, t01=0x010e}
0x002ae…002b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0122}
0x002b8…002cc               Head {h00=0x0010, h01=0x0050, text=»* /21  OPEN «, t00=0x0001, t01=0x012c}
0x002cc…002d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0140}
0x002d6…002ea               Head {h00=0x0010, h01=0x0050, text=»* /22  CLOSE«, t00=0x0001, t01=0x014a}
0x002ea…002f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x015e}
0x002f4…00312               Head {h00=0x001a, h01=0x0050, text=»* /24  CONNECT ACTIVE «, t00=0x0001, t01=0x0168}
0x00312…0031c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0186}
0x0031c…0033a               Head {h00=0x001a, h01=0x0050, text=»* /27  CONNECT PASSIVE«, t00=0x0001, t01=0x0190}
0x0033a…00344               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001e}
0x00344…0035e               Head {h00=0x0016, h01=0x0050, text=»* /2F  DISCONNECT «, t00=0x0002, t01=0x0028}
0x0035e…00368               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0042}
0x00368…00386               Head {h00=0x001a, h01=0x0050, text=»* /2D  GET STATISTICS «, t00=0x0002, t01=0x004c}
0x00386…00390               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x006a}
0x00390…003aa               Head {h00=0x0016, h01=0x0050, text=»* /38  SET STATUS «, t00=0x0002, t01=0x0074}
0x003aa…003b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x008e}
0x003b4…003cc               Head {h00=0x0014, h01=0x0050, text=»* /39  SET TIMER«, t00=0x0002, t01=0x0098}
0x003cc…003d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b0}
0x003d6…003e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ba}
0x003e0…00424               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0002, t01=0x00c4}
0x00424…0042e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0108}
0x0042e…0043c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0112}
0x0043c…00446               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0120}
0x00446…0047a               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0002, t01=0x012a}
0x0047a…00484               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x015e}
0x00484…0049c               Head {h00=0x0014, h01=0x0050, text=»* E N T R I E S «, t00=0x0002, t01=0x0168}
0x0049c…004a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0180}
0x004a6…004da               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0002, t01=0x018a}
0x004da…004e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002e}
0x004e4…00510               Head {h00=0x0028, h01=0x0050, text=» ENTRY REQTIM REQUEST TIME OUT VALUE«, t00=0x0003, t01=0x0038}
0x00510…00536               Head {h00=0x0022, h01=0x0050, text=» ENTRY X25:ON POWER ON ROUTINE«, t00=0x0003, t01=0x0064}
0x00536…00556               Head {h00=0x001c, h01=0x0050, text=» ENTRY DRX25 ACTIVATION «, t00=0x0003, t01=0x008a}
0x00556…00560               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00aa}
0x00560…0056e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x00b4}
0x0056e…00578               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00c2}
0x00578…005ac               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0003, t01=0x00cc}
0x005ac…005b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0100}
0x005b6…005d2               Head {h00=0x0018, h01=0x0050, text=»* E X T E R N A L S «, t00=0x0003, t01=0x010a}
0x005d2…005dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0126}
0x005dc…00610               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0003, t01=0x0130}
0x00610…0061a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0164}
0x0061a…00638               Head {h00=0x001a, h01=0x0050, text=»* ECB - DISPLACEMENTS «, t00=0x0003, t01=0x016e}
0x00638…00642               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x018c}
0x00642…00660               Head {h00=0x001a, h01=0x0050, text=» EXTRN ECBFC FILE CODE«, t00=0x0004, t01=0x0008}
0x00660…00684               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBBA BUFFER ADDRESS «, t00=0x0004, t01=0x0026}
0x00684…006aa               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBRL REQUESTED LENGTH «, t00=0x0004, t01=0x004a}
0x006aa…006d0               Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBEL EFFECTIVE LENGTH «, t00=0x0004, t01=0x0070}
0x006d0…006f0               Head {h00=0x001c, h01=0x0050, text=» EXTRN ECBRC RETURN CODE«, t00=0x0004, t01=0x0096}
0x006f0…00706               Head {h00=0x0012, h01=0x0050, text=» EXTRN ECBCW1 «, t00=0x0004, t01=0x00b6}
0x00706…0071c               Head {h00=0x0012, h01=0x0050, text=» EXTRN ECBCW2 «, t00=0x0004, t01=0x00cc}
0x0071c…00726               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00e2}
0x00726…00750               Head {h00=0x0026, h01=0x0050, text=»* DWT - DISPLACEMENTS: FIXED PART «, t00=0x0004, t01=0x00ec}
0x00750…0075a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0116}
0x0075a…00782               Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTCHP CHANNEL PARAMETERS«, t00=0x0004, t01=0x0120}
0x00782…0079e               Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0004, t01=0x0148}
0x0079e…007c0               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB-ADDRESS «, t00=0x0004, t01=0x0164}
0x007c0…007dc               Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTOPT OPTION«, t00=0x0004, t01=0x0186}
0x007dc…007f6               Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0005, t01=0x0012}
0x007f6…00818               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTAB TTAB-ADDRESS«, t00=0x0005, t01=0x002c}
0x00818…00822               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x004e}
0x00822…00830               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0058}
0x00830…0083a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0066}
0x0083a…00854               Head {h00=0x0016, h01=0x0050, text=»* MONITOR ROUTINES«, t00=0x0005, t01=0x0070}
0x00854…0085e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x008a}
0x0085e…00886               Head {h00=0x0024, h01=0x0050, text=» EXTRN FNDTID FIND TTAB-ADDRESS «, t00=0x0005, t01=0x0094}
0x00886…008aa               Head {h00=0x0020, h01=0x0050, text=» EXTRN SETIME TIMER ROUTINE «, t00=0x0005, t01=0x00bc}
0x008aa…008d6               Head {h00=0x0028, h01=0x0050, text=» EXTRN ACTOT TASK ACTIVATION ROUTINE«, t00=0x0005, t01=0x00e0}
0x008d6…008fa               Head {h00=0x0020, h01=0x0050, text=» EXTRN TDISP TOSS DISPATCHER«, t00=0x0005, t01=0x010c}
0x008fa…0092c               Head {h00=0x002e, h01=0x0050, text=» EXTRN MOVSU MOVE DATA FROM SYSTEM TO USER«, t00=0x0005, t01=0x0130}
0x0092c…0095e               Head {h00=0x002e, h01=0x0050, text=» EXTRN MOVUS MOVE DATA FROM USER TO SYSTEM«, t00=0x0005, t01=0x0162}
0x0095e…00988 (6, 0, 398)   Head {h00=0x0026, h01=0x0050, text=» EXTRN TENDIO TOSS END I/O ROUTINE«, t00=0x0006, t01=0x0004}
0x00988…009b2               Head {h00=0x0026, h01=0x0050, text=» EXTRN GETBLK GET A MONITOR BLOCK «, t00=0x0006, t01=0x002e}
0x009b2…009e0               Head {h00=0x002a, h01=0x0050, text=» EXTRN FREBLK RELEASE A MONITOR BLOCK «, t00=0x0006, t01=0x0058}
0x009e0…00a04               Head {h00=0x0020, h01=0x0050, text=» EXTRN FNDDNT FIND LOCAL DTE«, t00=0x0006, t01=0x0086}
0x00a04…00a32               Head {h00=0x002a, h01=0x0050, text=» EXTRN GETDST GET SYMBOLIC DTE ADDRESS«, t00=0x0006, t01=0x00aa}
0x00a32…00a60               Head {h00=0x002a, h01=0x0050, text=» EXTRN GETDNA GET DTE NETWORK ADDRESS «, t00=0x0006, t01=0x00d8}
0x00a60…00a9a               Head {h00=0x0036, h01=0x0050, text=» EXTRN GETDNT GET DTE NETWORK ADDR.FOR A SPEC.TYPE«, t00=0x0006, t01=0x0106}
0x00a9a…00aca               Head {h00=0x002c, h01=0x0050, text=» EXTRN SCTDCT POINTER TO DC ADDR. TABLE «, t00=0x0006, t01=0x0140}
0x00aca…00aec               Head {h00=0x001e, h01=0x0050, text=» EXTRN TRAC TRACE ROUTINE «, t00=0x0006, t01=0x0170}
0x00aec…00b1a (7, 0, 400)   Head {h00=0x002a, h01=0x0050, text=» EXTRN TRTASK TTAB ADDRESS FOR #T-TASK«, t00=0x0007, t01=0x0004}
0x00b1a…00b24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0032}
0x00b24…00b40               Head {h00=0x0018, h01=0x0050, text=»* TTAB DISPLACEMENTS«, t00=0x0007, t01=0x003c}
0x00b40…00b4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0058}
0x00b4a…00b6a               Head {h00=0x001c, h01=0x0050, text=»         EXTRN    TTB:ST«, t00=0x0007, t01=0x0062}
0x00b6a…00b84               Head {h00=0x0016, h01=0x0050, text=» EXTRN TTB:PW PSW «, t00=0x0007, t01=0x0082}
0x00b84…00bc2               Head {h00=0x003a, h01=0x0050, text=»         EXTRN    TTB:SA           REGISTER SAVE AREA «, t00=0x0007, t01=0x009c}
0x00bc2…00bcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00da}
0x00bcc…00bda               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00e4}
0x00bda…00c2e               Head {h00=0x0050, h01=0x0050, text=»****************************************************************************«, t00=0x0007, t01=0x00f2}
0x00c2e…00c38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0146}
0x00c38…00c70               Head {h00=0x0034, h01=0x0050, text=»* A PROGRAM VERSION USING MMU PAGING IS OBTAINED«, t00=0x0007, t01=0x0150}
0x00c70…00c90               Head {h00=0x001c, h01=0x0050, text=»* BY SETTING MMUPAG TO 1«, t00=0x0007, t01=0x0188}
0x00c90…00c9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0018}
0x00c9a…00cae               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0008, t01=0x0022}
0x00cae…00cb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0036}
0x00cb8…00d0c               Head {h00=0x0050, h01=0x0050, text=»****************************************************************************«, t00=0x0008, t01=0x0040}
0x00d0c…00d16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0094}
0x00d16…00d50               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0008, t01=0x009e}
0x00d50…00d80               Head {h00=0x002c, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 TO 0«, t00=0x0008, t01=0x00d8}
0x00d80…00d8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0108}
0x00d8a…00d9e               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0008, t01=0x0112}
0x00d9e…00da8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0126}
0x00da8…00dfc               Head {h00=0x0050, h01=0x0050, text=»*************************************************************************** «, t00=0x0008, t01=0x0130}
0x00dfc…00e06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0184}
0x00e06…00e14               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x018e}
0x00e14…00e1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x000c}
0x00e1e…00e30               Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x0009, t01=0x0016}
0x00e30…00e60               Head {h00=0x002c, h01=0x0050, text=»SYNRLN EQU X:A NUMBER OF PHYSICAL LINES «, t00=0x0009, t01=0x0028}
0x00e60…00e6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0058}
0x00e6a…00e7e               Head {h00=0x0010, h01=0x0050, text=»X:B EQU 600 «, t00=0x0009, t01=0x0062}
0x00e7e…00eb6               Head {h00=0x0034, h01=0x0050, text=»REQTIM EQU X:B REQUEST TIME OUT VALUE(IN 100MS) «, t00=0x0009, t01=0x0076}
0x00eb6…00ec0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ae}
0x00ec0…00ed4               Head {h00=0x0010, h01=0x0050, text=»X:C EQU 128 «, t00=0x0009, t01=0x00b8}
0x00ed4…00f0c               Head {h00=0x0034, h01=0x0050, text=»SYMXDL EQU X:C OVER ALL MAXIMUM USER DATA LENGTH«, t00=0x0009, t01=0x00cc}
0x00f0c…00f16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0104}
0x00f16…00f28               Head {h00=0x000e, h01=0x0050, text=»X:D EQU 3 «, t00=0x0009, t01=0x010e}
0x00f28…00f5c               Head {h00=0x0030, h01=0x0050, text=»SYNRL1 EQU X:D # OF LOGICAL CHANNELS LINE 1 «, t00=0x0009, t01=0x0120}
0x00f5c…00f66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0154}
0x00f66…00f78               Head {h00=0x000e, h01=0x0050, text=»X:H EQU 2 «, t00=0x0009, t01=0x015e}
0x00f78…00fae               Head {h00=0x0032, h01=0x0050, text=»SYMXW1 EQU X:H WINDOW SIZE,PACKET LEVEL,LINE 1«, t00=0x0009, t01=0x0170}
0x00fae…00fb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0016}
0x00fb8…00fcc               Head {h00=0x0010, h01=0x0050, text=»X:L EQU 128 «, t00=0x000a, t01=0x0020}
0x00fcc…01002               Head {h00=0x0032, h01=0x0050, text=»SYMDL1 EQU X:L MAXIMUM USER DATA LENGTH,LINE 1«, t00=0x000a, t01=0x0034}
0x01002…0100c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x006a}
0x0100c…0101e               Head {h00=0x000e, h01=0x0050, text=»X:P EQU 0 «, t00=0x000a, t01=0x0074}
0x0101e…0105a               Head {h00=0x0038, h01=0x0050, text=»SYNRP1 EQU X:P # OF PERMANENT VIRTUAL CIRCUITS,LINE1«, t00=0x000a, t01=0x0086}
0x0105a…01064               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00c2}
0x01064…01076               Head {h00=0x000e, h01=0x0050, text=»X:T EQU 0 «, t00=0x000a, t01=0x00cc}
0x01076…010b0               Head {h00=0x0036, h01=0x0050, text=»CALDTE EQU X:T LOCAL DTE-ADDRESS IN CALL PACKET ? «, t00=0x000a, t01=0x00de}
0x010b0…010ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0118}
0x010ba…010cc               Head {h00=0x000e, h01=0x0050, text=»X:U EQU 0 «, t00=0x000a, t01=0x0122}
0x010cc…01106               Head {h00=0x0036, h01=0x0050, text=»STATI EQU X:U STATISTICS OF HDLC PROTOCOL HANDLER «, t00=0x000a, t01=0x0134}
0x01106…01110               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x016e}
0x01110…0111e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0178}
0x0111e…01128               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0186}
0x01128…0113e               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x000a, t01=0x0190}
0x0113e…01148               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0016}
0x01148…0115a               Head {h00=0x000e, h01=0x0050, text=»X:E EQU 3 «, t00=0x000b, t01=0x0020}
0x0115a…0118e               Head {h00=0x0030, h01=0x0050, text=»SYNRL2 EQU X:E # OF LOGICAL CHANNELS LINE 2 «, t00=0x000b, t01=0x0032}
0x0118e…01198               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0066}
0x01198…011aa               Head {h00=0x000e, h01=0x0050, text=»X:I EQU 2 «, t00=0x000b, t01=0x0070}
0x011aa…011e0               Head {h00=0x0032, h01=0x0050, text=»SYMXW2 EQU X:I WINDOW SIZE,PACKET LEVEL,LINE 2«, t00=0x000b, t01=0x0082}
0x011e0…011ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b8}
0x011ea…011fe               Head {h00=0x0010, h01=0x0050, text=»X:M EQU 128 «, t00=0x000b, t01=0x00c2}
0x011fe…01234               Head {h00=0x0032, h01=0x0050, text=»SYMDL2 EQU X:M MAXIMUM USER DATA LENGTH,LINE 2«, t00=0x000b, t01=0x00d6}
0x01234…0123e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x010c}
0x0123e…01250               Head {h00=0x000e, h01=0x0050, text=»X:Q EQU 0 «, t00=0x000b, t01=0x0116}
0x01250…0128e               Head {h00=0x003a, h01=0x0050, text=»SYNRP2 EQU X:Q # OF PERMANENT VIRTUAL CIRCUITS,LINE 2 «, t00=0x000b, t01=0x0128}
0x0128e…01298               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0166}
0x01298…012ae               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x000b, t01=0x0170}
0x012ae…012b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0186}
0x012b8…012ca               Head {h00=0x000e, h01=0x0050, text=»X:F EQU 3 «, t00=0x000b, t01=0x0190}
0x012ca…012fe               Head {h00=0x0030, h01=0x0050, text=»SYNRL3 EQU X:F # OF LOGICAL CHANNELS,LINE 3 «, t00=0x000c, t01=0x0012}
0x012fe…01308               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0046}
0x01308…0131a               Head {h00=0x000e, h01=0x0050, text=»X:J EQU 2 «, t00=0x000c, t01=0x0050}
0x0131a…01350               Head {h00=0x0032, h01=0x0050, text=»SYMXW3 EQU X:J WINDOW SIZE,PACKET LEVEL,LINE 3«, t00=0x000c, t01=0x0062}
0x01350…0135a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0098}
0x0135a…0136e               Head {h00=0x0010, h01=0x0050, text=»X:N EQU 128 «, t00=0x000c, t01=0x00a2}
0x0136e…013a4               Head {h00=0x0032, h01=0x0050, text=»SYMDL3 EQU X:N MAXIMUM USER DATA LENGTH,LINE 3«, t00=0x000c, t01=0x00b6}
0x013a4…013ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ec}
0x013ae…013c0               Head {h00=0x000e, h01=0x0050, text=»X:R EQU 0 «, t00=0x000c, t01=0x00f6}
0x013c0…013fe               Head {h00=0x003a, h01=0x0050, text=»SYNRP3 EQU X:R # OF PERMANENT VIRTUAL CIRCUITS,LINE 3 «, t00=0x000c, t01=0x0108}
0x013fe…01408               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0146}
0x01408…0141e               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=3 «, t00=0x000c, t01=0x0150}
0x0141e…01428               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0166}
0x01428…0143a               Head {h00=0x000e, h01=0x0050, text=»X:G EQU 3 «, t00=0x000c, t01=0x0170}
0x0143a…0146e               Head {h00=0x0030, h01=0x0050, text=»SYNRL4 EQU X:G # OF LOGICAL CHANNELS,LINE 4 «, t00=0x000c, t01=0x0182}
0x0146e…01478               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0026}
0x01478…0148a               Head {h00=0x000e, h01=0x0050, text=»X:K EQU 2 «, t00=0x000d, t01=0x0030}
0x0148a…014c0               Head {h00=0x0032, h01=0x0050, text=»SYMXW4 EQU X:K WINDOW SIZE,PACKET LEVEL,LINE 4«, t00=0x000d, t01=0x0042}
0x014c0…014ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0078}
0x014ca…014de               Head {h00=0x0010, h01=0x0050, text=»X:O EQU 128 «, t00=0x000d, t01=0x0082}
0x014de…01514               Head {h00=0x0032, h01=0x0050, text=»SYMDL4 EQU X:O MAXIMUM USER DATA LENGTH,LINE 4«, t00=0x000d, t01=0x0096}
0x01514…0151e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00cc}
0x0151e…01530               Head {h00=0x000e, h01=0x0050, text=»X:S EQU 0 «, t00=0x000d, t01=0x00d6}
0x01530…0156e               Head {h00=0x003a, h01=0x0050, text=»SYNRP4 EQU X:S # OF PERMANENT VIRTUAL CIRCUITS,LINE 4 «, t00=0x000d, t01=0x00e8}
0x0156e…01578               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0126}
0x01578…01584               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0130}
0x01584…0158e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x013c}
0x0158e…015be               Head {h00=0x002c, h01=0x0050, text=»SYNRRC EQU 2 # OF READ REQUESTS FOR HDLC«, t00=0x000d, t01=0x0146}
0x015be…015c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0176}
0x015c8…015fa               Head {h00=0x002e, h01=0x0050, text=»SYNRTR EQU 2 # OF WRITE REQUESTS FOR HDLC «, t00=0x000d, t01=0x0180}
0x015fa…01604               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0022}
0x01604…01634               Head {h00=0x002c, h01=0x0050, text=»SYUBNR EQU 2 # OF INPUT BUFFERS FOR HDLC«, t00=0x000e, t01=0x002c}
0x01634…0163e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x005c}
0x0163e…01672               Head {h00=0x0030, h01=0x0050, text=»SYCLTM EQU 600 CLEAR TIME OUT VALUE IN 100MS«, t00=0x000e, t01=0x0066}
0x01672…0167c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x009a}
0x0167c…016b0               Head {h00=0x0030, h01=0x0050, text=»SYRETM EQU 600 RESET TIME OUT VALUE IN 100MS«, t00=0x000e, t01=0x00a4}
0x016b0…016b8               Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x00d8}
0x016b8…016ee               Head {h00=0x0032, h01=0x0050, text=»SYRSTM EQU 600 RESTART TIME OUT VALUE IN 100MS«, t00=0x000e, t01=0x00e0}
0x016ee…016f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0116}
0x016f8…01730               Head {h00=0x0034, h01=0x0050, text=»BUFDEL EQU 1 TIMER IN 100MS FOR WAIT FOR BUFFER «, t00=0x000e, t01=0x0120}
0x01730…0173a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0158}
0x0173a…01760               Head {h00=0x0022, h01=0x0050, text=»LOOP EQU 0 LOOP TEST IN MODEM «, t00=0x000e, t01=0x0162}
0x01760…0176a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0188}
0x0176a…01792 (15, 0, 400)  Head {h00=0x0024, h01=0x0050, text=»TRACE EQU 0 TRACE TASK IN SYSTEM«, t00=0x000f, t01=0x0004}
0x01792…017a8               Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x000f, t01=0x002c}
0x017a8…017b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0042}
0x017b2…017c0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x004c}
0x017c0…017ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x005a}
0x017ca…017e0               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=1 «, t00=0x000f, t01=0x0064}
0x017e0…017fa               Head {h00=0x0016, h01=0x0050, text=»PERMVC EQU SYNRP1 «, t00=0x000f, t01=0x007a}
0x017fa…0181a               Head {h00=0x001c, h01=0x0050, text=»SWITVC EQU SYNRL1-SYNRP1«, t00=0x000f, t01=0x0094}
0x0181a…01826               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x00b4}
0x01826…0183c               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=2 «, t00=0x000f, t01=0x00c0}
0x0183c…0185c               Head {h00=0x001c, h01=0x0050, text=»PERMVC EQU SYNRP1+SYNRP2«, t00=0x000f, t01=0x00d6}
0x0185c…0187c               Head {h00=0x001c, h01=0x0050, text=»SWDUM1 EQU SYNRL1+SYNRL2«, t00=0x000f, t01=0x00f6}
0x0187c…0189c               Head {h00=0x001c, h01=0x0050, text=»SWITVC EQU SWDUM1-PERMVC«, t00=0x000f, t01=0x0116}
0x0189c…018a8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0136}
0x018a8…018be               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=3 «, t00=0x000f, t01=0x0142}
0x018be…018de               Head {h00=0x001c, h01=0x0050, text=»PEDUM1 EQU SYNRP1+SYNRP2«, t00=0x000f, t01=0x0158}
0x018de…018fe               Head {h00=0x001c, h01=0x0050, text=»PERMVC EQU PEDUM1+SYNRP3«, t00=0x000f, t01=0x0178}
0x018fe…0191e               Head {h00=0x001c, h01=0x0050, text=»SWDUM1 EQU SYNRL1+SYNRL2«, t00=0x0010, t01=0x0008}
0x0191e…0193e               Head {h00=0x001c, h01=0x0050, text=»SWDUM2 EQU SWDUM1+SYNRL3«, t00=0x0010, t01=0x0028}
0x0193e…0195e               Head {h00=0x001c, h01=0x0050, text=»SWITVC EQU SWDUM2-PERMVC«, t00=0x0010, t01=0x0048}
0x0195e…0196a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0068}
0x0196a…01980               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=4 «, t00=0x0010, t01=0x0074}
0x01980…019a0               Head {h00=0x001c, h01=0x0050, text=»PEDUM1 EQU SYNRP1+SYNRP2«, t00=0x0010, t01=0x008a}
0x019a0…019c0               Head {h00=0x001c, h01=0x0050, text=»PEDUM2 EQU SYNRP3+SYNRP4«, t00=0x0010, t01=0x00aa}
0x019c0…019e0               Head {h00=0x001c, h01=0x0050, text=»PERMVC EQU PEDUM1+PEDUM2«, t00=0x0010, t01=0x00ca}
0x019e0…01a00               Head {h00=0x001c, h01=0x0050, text=»SWDUM1 EQU SYNRL1+SYNRL2«, t00=0x0010, t01=0x00ea}
0x01a00…01a20               Head {h00=0x001c, h01=0x0050, text=»SWDUM2 EQU SYNRL3+SYNRL4«, t00=0x0010, t01=0x010a}
0x01a20…01a40               Head {h00=0x001c, h01=0x0050, text=»SWDUM3 EQU SWDUM1+SWDUM2«, t00=0x0010, t01=0x012a}
0x01a40…01a60               Head {h00=0x001c, h01=0x0050, text=»SWITVC EQU SWDUM3-PERMVC«, t00=0x0010, t01=0x014a}
0x01a60…01a6c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x016a}
0x01a6c…01a76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0176}
0x01a76…01aa8               Head {h00=0x002e, h01=0x0050, text=»* TRANSLATION TABLE FROM THROUGHPUT CLASS «, t00=0x0010, t01=0x0180}
0x01aa8…01ad2               Head {h00=0x0026, h01=0x0050, text=»* TO WINDOW SIZE AND PACKET LENGTH«, t00=0x0011, t01=0x0022}
0x01ad2…01adc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x004c}
0x01adc…01b1e               Head {h00=0x003e, h01=0x0050, text=»CLAS1 BYTE 1,128 CLASS 1,LAYOUT: WINDOW SIZE/PACKET LENGTH«, t00=0x0011, t01=0x0056}
0x01b1e…01b3a               Head {h00=0x0018, h01=0x0050, text=» BYTE 1,128 CLASS 2 «, t00=0x0011, t01=0x0098}
0x01b3a…01b56               Head {h00=0x0018, h01=0x0050, text=» BYTE 1,128 CLASS 3 «, t00=0x0011, t01=0x00b4}
0x01b56…01b72               Head {h00=0x0018, h01=0x0050, text=» BYTE 1,128 CLASS 4 «, t00=0x0011, t01=0x00d0}
0x01b72…01b8e               Head {h00=0x0018, h01=0x0050, text=» BYTE 1,128 CLASS 5 «, t00=0x0011, t01=0x00ec}
0x01b8e…01baa               Head {h00=0x0018, h01=0x0050, text=» BYTE 1,128 CLASS 6 «, t00=0x0011, t01=0x0108}
0x01baa…01bc6               Head {h00=0x0018, h01=0x0050, text=» BYTE 2,128 CLASS 7 «, t00=0x0011, t01=0x0124}
0x01bc6…01be2               Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 8 «, t00=0x0011, t01=0x0140}
0x01be2…01bfe               Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 9 «, t00=0x0011, t01=0x015c}
0x01bfe…01c1a               Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 10«, t00=0x0011, t01=0x0178}
0x01c1a…01c36 (18, 0, 400)  Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 11«, t00=0x0012, t01=0x0004}
0x01c36…01c52               Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 12«, t00=0x0012, t01=0x0020}
0x01c52…01c6e               Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 13«, t00=0x0012, t01=0x003c}
0x01c6e…01c8a               Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 14«, t00=0x0012, t01=0x0058}
0x01c8a…01ca6               Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 15«, t00=0x0012, t01=0x0074}
0x01ca6…01cb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0090}
0x01cb0…01cc4               Head {h00=0x0010, h01=0x0050, text=» EJECT  DWT «, t00=0x0012, t01=0x009a}
0x01cc4…01cce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ae}
0x01cce…01cea               Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x0012, t01=0x00b8}
0x01cea…01cf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00d4}
0x01cf4…01d0a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0012, t01=0x00de}
0x01d0a…01d28               Head {h00=0x001a, h01=0x0050, text=»DWTDRD EQU /10 DWTTQ+2«, t00=0x0012, t01=0x00f4}
0x01d28…01d34               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0112}
0x01d34…01d4a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0012, t01=0x011e}
0x01d4a…01d6a               Head {h00=0x001c, h01=0x0050, text=»DWTDRD EQU /14 DWTMEC+2 «, t00=0x0012, t01=0x0134}
0x01d6a…01d76               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0154}
0x01d76…01db8               Head {h00=0x003e, h01=0x0050, text=»DWTSTB EQU DWTDRD OFFSET REL START DWT TO STATISTIC BUFFER«, t00=0x0012, t01=0x0160}
0x01db8…01dee               Head {h00=0x0032, h01=0x0050, text=»DWTCHD EQU DWTDRD+2 CONFIG CHAIN LINK HEAD DWT«, t00=0x0013, t01=0x0012}
0x01dee…01e24               Head {h00=0x0032, h01=0x0050, text=»DWTCHN EQU DWTDRD+4 CONFIG CHAIN LINK NEXT DWT«, t00=0x0013, t01=0x0048}
0x01e24…01e5a               Head {h00=0x0032, h01=0x0050, text=»DWTLAD EQU DWTDRD+6 LOCAL SYMBOLIC DTE ADDRESS«, t00=0x0013, t01=0x007e}
0x01e5a…01e92               Head {h00=0x0034, h01=0x0050, text=»DWTRAD EQU DWTDRD+8 REMOTE SYMBOLIC DTE ADDRESS «, t00=0x0013, t01=0x00b4}
0x01e92…01ebc               Head {h00=0x0026, h01=0x0050, text=»DWTWRO EQU DWTDRD+10 WRITE OPTION «, t00=0x0013, t01=0x00ec}
0x01ebc…01ef0               Head {h00=0x0030, h01=0x0050, text=»DWTLCN EQU DWTDRD+11 LOGICAL CHANNEL NUMBER «, t00=0x0013, t01=0x0116}
0x01ef0…01f1a               Head {h00=0x0026, h01=0x0050, text=»DWTFNC EQU DWTDRD+12 FUNCTION CODE«, t00=0x0013, t01=0x014a}
0x01f1a…01f40               Head {h00=0x0022, h01=0x0050, text=»DWTSTE EQU DWTDRD+13 DWT STATE«, t00=0x0013, t01=0x0174}
0x01f40…01f70               Head {h00=0x002c, h01=0x0050, text=»DWTRTV EQU DWTDRD+14 REQUEST TIMER VALUE«, t00=0x0014, t01=0x000a}
0x01f70…01fa2               Head {h00=0x002e, h01=0x0050, text=»DWTRTP EQU DWTDRD+16 REQUEST TIMER POINTER«, t00=0x0014, t01=0x003a}
0x01fa2…01fd6               Head {h00=0x0030, h01=0x0050, text=»DWTRCI EQU DWTDRD+18 RETURN CODE INFORMATION«, t00=0x0014, t01=0x006c}
0x01fd6…02016               Head {h00=0x003c, h01=0x0050, text=»DWTRES EQU DWTDRD+20 CAUSE AND DIAGNOSTIC CODE FOR RESET«, t00=0x0014, t01=0x00a0}
0x02016…02056               Head {h00=0x003c, h01=0x0050, text=»DWTCLE EQU DWTDRD+22 CAUSE AND DIAGNOSTIC CODE FOR CLEAR«, t00=0x0014, t01=0x00e0}
0x02056…0208e               Head {h00=0x0034, h01=0x0050, text=»DWTIPQ EQU DWTDRD+24 INPUT QUEUE(IF LC CLEARED) «, t00=0x0014, t01=0x0120}
0x0208e…02098               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0158}
0x02098…020d2               Head {h00=0x0036, h01=0x0050, text=»* IDENTIFICATION OF A DWT FOR A VC; USED IN DWTCHP«, t00=0x0014, t01=0x0162}
0x020d2…020dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x000c}
0x020dc…02104               Head {h00=0x0024, h01=0x0050, text=»DWTTYP EQU 'VC' VIRTUAL CIRCUIT «, t00=0x0015, t01=0x0016}
0x02104…0210e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x003e}
0x0210e…02122               Head {h00=0x0010, h01=0x0050, text=» EJECT  DWT «, t00=0x0015, t01=0x0048}
0x02122…0212c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005c}
0x0212c…0215e               Head {h00=0x002e, h01=0x0050, text=»* INTERNAL FUNCTION CODES; USED IN DWTFNC «, t00=0x0015, t01=0x0066}
0x0215e…02168               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0098}
0x02168…0218c               Head {h00=0x0020, h01=0x0050, text=»OPESYS EQU /00 OPEN REQUEST «, t00=0x0015, t01=0x00a2}
0x0218c…021b0               Head {h00=0x0020, h01=0x0050, text=»CLOSYS EQU /02 CLOSE REQUEST«, t00=0x0015, t01=0x00c6}
0x021b0…021de               Head {h00=0x002a, h01=0x0050, text=»CONACT EQU /04 CONNECT ACTIVE REQUEST «, t00=0x0015, t01=0x00ea}
0x021de…0220c               Head {h00=0x002a, h01=0x0050, text=»CONPAS EQU /06 CONNECT PASSIVE REQUEST«, t00=0x0015, t01=0x0118}
0x0220c…02236               Head {h00=0x0026, h01=0x0050, text=»DISCAL EQU /08 DISCONNECT REQUEST «, t00=0x0015, t01=0x0146}
0x02236…02258               Head {h00=0x001e, h01=0x0050, text=»ACCCAL EQU /0A ACCEPT CALL«, t00=0x0015, t01=0x0170}
0x02258…0227a (22, 0, 400)  Head {h00=0x001e, h01=0x0050, text=»ACCDAT EQU /0C ACCEPT DATA«, t00=0x0016, t01=0x0004}
0x0227a…022a4               Head {h00=0x0026, h01=0x0050, text=»REFDAT EQU /0E REFUSE DATA REQUEST«, t00=0x0016, t01=0x0026}
0x022a4…022c8               Head {h00=0x0020, h01=0x0050, text=»WRIDAT EQU /10 WRITE REQUEST«, t00=0x0016, t01=0x0050}
0x022c8…022ee               Head {h00=0x0022, h01=0x0050, text=»WRIINT EQU /12 WRITE INTERRUPT«, t00=0x0016, t01=0x0074}
0x022ee…02312               Head {h00=0x0020, h01=0x0050, text=»READAT EQU /14 READ REQUEST «, t00=0x0016, t01=0x009a}
0x02312…0233c               Head {h00=0x0026, h01=0x0050, text=»REASTA EQU /16 READ STATUS REQUEST«, t00=0x0016, t01=0x00be}
0x0233c…02366               Head {h00=0x0026, h01=0x0050, text=»STATIS EQU /18 STATISTICAL REQUEST«, t00=0x0016, t01=0x00e8}
0x02366…02370               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0112}
0x02370…0239a               Head {h00=0x0026, h01=0x0050, text=»* DWT STATE CODES; USED IN DWTSTE «, t00=0x0016, t01=0x011c}
0x0239a…023a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0146}
0x023a4…023ce               Head {h00=0x0026, h01=0x0050, text=»DISCON EQU /00 DISCONNECTED STATE «, t00=0x0016, t01=0x0150}
0x023ce…023fa               Head {h00=0x0028, h01=0x0050, text=»CONAD EQU /01 CONNECTED: ACCEPT DATA«, t00=0x0016, t01=0x017a}
0x023fa…02426               Head {h00=0x0028, h01=0x0050, text=»CONRD EQU /02 CONNECTED: REFUSE DATA«, t00=0x0017, t01=0x0016}
0x02426…02462               Head {h00=0x0038, h01=0x0050, text=»INCALR EQU /03 INC.CALL RECEIVED(WITH ACC/REF CALL) «, t00=0x0017, t01=0x0042}
0x02462…0249c               Head {h00=0x0036, h01=0x0050, text=»INCALL EQU /04 INC.CALL REC.(WITHOUT ACC/REF CALL)«, t00=0x0017, t01=0x007e}
0x0249c…024c0               Head {h00=0x0020, h01=0x0050, text=»VCREL EQU /05 VC IS RELEASED«, t00=0x0017, t01=0x00b8}
0x024c0…024ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00dc}
0x024ca…024fc               Head {h00=0x002e, h01=0x0050, text=»* OPTION CODES; USED IN DWTOPT AND DWTWRO «, t00=0x0017, t01=0x00e6}
0x024fc…02506               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0118}
0x02506…02528               Head {h00=0x001e, h01=0x0050, text=»CLOOPT EQU /08 SOFT CLOSE «, t00=0x0017, t01=0x0122}
0x02528…02542               Head {h00=0x0016, h01=0x0050, text=»MOPT EQU /10 M-BIT«, t00=0x0017, t01=0x0144}
0x02542…02564               Head {h00=0x001e, h01=0x0050, text=»CALOPT EQU /20 ACCEPT CALL«, t00=0x0017, t01=0x015e}
0x02564…0258c               Head {h00=0x0024, h01=0x0050, text=»INTOPT EQU /40 INTERRUPT PACKET «, t00=0x0017, t01=0x0180}
0x0258c…025a6               Head {h00=0x0016, h01=0x0050, text=»QOPT EQU /80 Q-BIT«, t00=0x0018, t01=0x0018}
0x025a6…025b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0032}
0x025b0…025c4               Head {h00=0x0010, h01=0x0050, text=» EJECT  USER«, t00=0x0018, t01=0x003c}
0x025c4…025ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0050}
0x025ce…025f6               Head {h00=0x0024, h01=0x0050, text=»* RETURN CODES OF A USER REQUEST«, t00=0x0018, t01=0x005a}
0x025f6…02600               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0082}
0x02600…02622               Head {h00=0x001e, h01=0x0050, text=»ACPT.RC EQU /0000 ACCEPTED«, t00=0x0018, t01=0x008c}
0x02622…0264a               Head {h00=0x0024, h01=0x0050, text=»RQUE.RC EQU /8000 REQUEST ERROR «, t00=0x0018, t01=0x00ae}
0x0264a…02674               Head {h00=0x0026, h01=0x0050, text=»ABOT.RC EQU /4000 REQUEST ABORTED «, t00=0x0018, t01=0x00d6}
0x02674…026a8               Head {h00=0x0030, h01=0x0050, text=»INTR.RC EQU /2000 INTERRUPT PACKET RECEIVED «, t00=0x0018, t01=0x0100}
0x026a8…026da               Head {h00=0x002e, h01=0x0050, text=»LAST.RC EQU /1000 LAST PACKET IN SEQUENCE «, t00=0x0018, t01=0x0134}
0x026da…026fc               Head {h00=0x001e, h01=0x0050, text=»NOTU.RC EQU /0800 NOT USED«, t00=0x0018, t01=0x0166}
0x026fc…0272a               Head {h00=0x002a, h01=0x0050, text=»QBIT.RC EQU /0400 Q-BIT SET IN PACKET «, t00=0x0018, t01=0x0188}
0x0272a…02762               Head {h00=0x0034, h01=0x0050, text=»NOLC.RC EQU /0200 LOGICAL CHANNEL NOT AVAILABLE «, t00=0x0019, t01=0x0026}
0x02762…02794               Head {h00=0x002e, h01=0x0050, text=»DATA.RC EQU /0100 DATA RECEIVED AND QUEUED«, t00=0x0019, t01=0x005e}
0x02794…027be               Head {h00=0x0026, h01=0x0050, text=»MORE.RC EQU /0080 MORE INFORMATION«, t00=0x0019, t01=0x0090}
0x027be…027e0               Head {h00=0x001e, h01=0x0050, text=»TIMO.RC EQU /0040 TIME OUT«, t00=0x0019, t01=0x00ba}
0x027e0…02812               Head {h00=0x002e, h01=0x0050, text=»RSET.RC EQU /0020 VC RESET,LOCAL OR REMOTE«, t00=0x0019, t01=0x00dc}
0x02812…0283a               Head {h00=0x0024, h01=0x0050, text=»SEQE.RC EQU /0010 SEQUENCE ERROR«, t00=0x0019, t01=0x010e}
0x0283a…02862               Head {h00=0x0024, h01=0x0050, text=»INVL.RC EQU /0008 INVALID LENGTH«, t00=0x0019, t01=0x0136}
0x02862…02896               Head {h00=0x0030, h01=0x0050, text=»CLEA.RC EQU /0004 VC CLEARED,LOCAL OR REMOTE«, t00=0x0019, t01=0x015e}
0x02896…028be (26, 0, 400)  Head {h00=0x0024, h01=0x0050, text=»LOGE.RC EQU /0002 LOGICAL ERROR «, t00=0x001a, t01=0x0004}
0x028be…028e6               Head {h00=0x0024, h01=0x0050, text=»PHYE.RC EQU /0001 PHYSICAL ERROR«, t00=0x001a, t01=0x002c}
0x028e6…02928               Head {h00=0x003e, h01=0x0050, text=»TOLD.RC EQU /0001 RETURN INFO.TOLD TO USER(INTERNAL PAR.) «, t00=0x001a, t01=0x0054}
0x02928…02932               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0096}
0x02932…02968               Head {h00=0x0032, h01=0x0050, text=»* RETURN CODES FROM LEVEL 3 TO REQUEST HANDLER«, t00=0x001a, t01=0x00a0}
0x02968…02972               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00d6}
0x02972…02998               Head {h00=0x0022, h01=0x0050, text=»RTNOK EQU /00 RETURN CODE = OK«, t00=0x001a, t01=0x00e0}
0x02998…029c2               Head {h00=0x0026, h01=0x0050, text=»CLEBUS EQU /02 CLEAR REQUEST BUSY «, t00=0x001a, t01=0x0106}
0x029c2…029ec               Head {h00=0x0026, h01=0x0050, text=»DISCRM EQU /04 REMOTE DISCONNECTED«, t00=0x001a, t01=0x0130}
0x029ec…02a12               Head {h00=0x0022, h01=0x0050, text=»HRDERR EQU /06 HARDWARE ERROR «, t00=0x001a, t01=0x015a}
0x02a12…02a48               Head {h00=0x0032, h01=0x0050, text=»ILLSIZ EQU /0A NO MAX. PACKET LENGTH WHEN M=1 «, t00=0x001a, t01=0x0180}
0x02a48…02a7c               Head {h00=0x0030, h01=0x0050, text=»INVSTA EQU /0C NO CORRECT LOG. CHANNEL STATE«, t00=0x001b, t01=0x0026}
0x02a7c…02ab4               Head {h00=0x0034, h01=0x0050, text=»MAXLNG EQU /0E MAX. LENGTH EXCEEDED FOR TRANSM. «, t00=0x001b, t01=0x005a}
0x02ab4…02ae8               Head {h00=0x0030, h01=0x0050, text=»NOLCAV EQU /10 NO LOGICAL CHANNEL AVAILABLE «, t00=0x001b, t01=0x0092}
0x02ae8…02b10               Head {h00=0x0024, h01=0x0050, text=»TMEOUT EQU /12 TIME OUT DETECTED«, t00=0x001b, t01=0x00c6}
0x02b10…02b44               Head {h00=0x0030, h01=0x0050, text=»NOREMO EQU /14 REMOTE ADDRESS NOT SUPPORTED «, t00=0x001b, t01=0x00ee}
0x02b44…02b4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0122}
0x02b4e…02b62               Head {h00=0x0010, h01=0x0050, text=» EJECT  USER«, t00=0x001b, t01=0x012c}
0x02b62…02b6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0140}
0x02b6c…02b9a               Head {h00=0x002a, h01=0x0050, text=»* DIAGNOSTIC CODES FOR THE REMOTE USER«, t00=0x001b, t01=0x014a}
0x02b9a…02ba4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0178}
0x02ba4…02bd0               Head {h00=0x0028, h01=0x0050, text=»LOCPER EQU /01 LOCAL PROCEDURE ERROR«, t00=0x001b, t01=0x0182}
0x02bd0…02bf4               Head {h00=0x0020, h01=0x0050, text=»NOUSER EQU /02 NO USER KNOWN«, t00=0x001c, t01=0x001e}
0x02bf4…02c1e               Head {h00=0x0026, h01=0x0050, text=»NOTINT EQU /03 NO INTERESTED USER «, t00=0x001c, t01=0x0042}
0x02c1e…02c4a               Head {h00=0x0028, h01=0x0050, text=»RESLCH EQU /04 LOCAL SEQUENCE ERROR «, t00=0x001c, t01=0x006c}
0x02c4a…02c54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0098}
0x02c54…02c82               Head {h00=0x002a, h01=0x0050, text=»* DIAGNOSTIC CODES FOR THE LOCAL USER «, t00=0x001c, t01=0x00a2}
0x02c82…02c8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00d0}
0x02c8c…02cb6               Head {h00=0x0026, h01=0x0050, text=»LOCCLE EQU /80 VC IS CLEARED LOCAL«, t00=0x001c, t01=0x00da}
0x02cb6…02ce4               Head {h00=0x002a, h01=0x0050, text=»RSTRED EQU /82 RESTART PACKET RECEIVED«, t00=0x001c, t01=0x0104}
0x02ce4…02cee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0132}
0x02cee…02d04               Head {h00=0x0012, h01=0x0050, text=» EJECT  SYSTEM«, t00=0x001c, t01=0x013c}
0x02d04…02d0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0152}
0x02d0e…02d38               Head {h00=0x0026, h01=0x0050, text=»* EQUATE VALUES FOR BUFFER LAY-OUT«, t00=0x001c, t01=0x015c}
0x02d38…02d42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0186}
0x02d42…02d6c               Head {h00=0x0026, h01=0x0050, text=»BFCHPT EQU -2 QUEUE CHAIN POINTER «, t00=0x001c, t01=0x0190}
0x02d6c…02d8c               Head {h00=0x001c, h01=0x0050, text=»HDLC EQU /00 HDLC HEADER«, t00=0x001d, t01=0x002a}
0x02d8c…02dbc               Head {h00=0x002c, h01=0x0050, text=»GNFRM EQU /02 GENERAL FORMAT IDENTIFIER «, t00=0x001d, t01=0x004a}
0x02dbc…02df0               Head {h00=0x0030, h01=0x0050, text=»QBIT EQU /02 CHARACTER DISPLACEMENT OF Q-BIT«, t00=0x001d, t01=0x007a}
0x02df0…02e1e               Head {h00=0x002a, h01=0x0050, text=»LCIDNT EQU /03 LOGICAL CHANNEL NUMBER «, t00=0x001d, t01=0x00ae}
0x02e1e…02e40               Head {h00=0x001e, h01=0x0050, text=»IDENT EQU /04 PACKET TYPE «, t00=0x001d, t01=0x00dc}
0x02e40…02e74               Head {h00=0x0030, h01=0x0050, text=»MBIT EQU /04 CHARACTER DISPLACEMENT OF M-BIT«, t00=0x001d, t01=0x00fe}
0x02e74…02ea4               Head {h00=0x002c, h01=0x0050, text=»BEGDAT EQU /05 USER DATA IN DATA PACKET «, t00=0x001d, t01=0x0132}
0x02ea4…02edc               Head {h00=0x0034, h01=0x0050, text=»CAUSE EQU /05 RESET-, RESTART OR CLEARING CAUSE «, t00=0x001d, t01=0x0162}
0x02edc…02f02               Head {h00=0x0022, h01=0x0050, text=»DGNCOD EQU /06 DIAGNOSTIC CODE«, t00=0x001e, t01=0x000a}
0x02f02…02f26               Head {h00=0x0020, h01=0x0050, text=»QPOS EQU /80 MASK FOR Q-BIT «, t00=0x001e, t01=0x0030}
0x02f26…02f4a               Head {h00=0x0020, h01=0x0050, text=»MPOS EQU /10 MASK FOR M-BIT «, t00=0x001e, t01=0x0054}
0x02f4a…02f54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0078}
0x02f54…02f7c               Head {h00=0x0024, h01=0x0050, text=»* EQUATE VALUES FOR PACKET TYPES«, t00=0x001e, t01=0x0082}
0x02f7c…02f86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00aa}
0x02f86…02fa8               Head {h00=0x001e, h01=0x0050, text=»CAL.P EQU /0B CALL PACKET «, t00=0x001e, t01=0x00b4}
0x02fa8…02fd8               Head {h00=0x002c, h01=0x0050, text=»CAL.CP EQU /0F CALL CONFIRMATION PACKET «, t00=0x001e, t01=0x00d6}
0x02fd8…02ffa               Head {h00=0x001e, h01=0x0050, text=»CLE.P EQU /13 CLEAR PACKET«, t00=0x001e, t01=0x0106}
0x02ffa…0302a               Head {h00=0x002c, h01=0x0050, text=»CLE.CP EQU /17 CLEAR CONFIRMATION PACKET«, t00=0x001e, t01=0x0128}
0x0302a…0304c               Head {h00=0x001e, h01=0x0050, text=»DATA.P EQU /01 DATA PACKET«, t00=0x001e, t01=0x0158}
0x0304c…03072               Head {h00=0x0022, h01=0x0050, text=»INT.P EQU /23 INTERRUPT PACKET«, t00=0x001e, t01=0x017a}
0x03072…030a6               Head {h00=0x0030, h01=0x0050, text=»INT.CP EQU /27 INTERRUPT CONFIRMATION PACKET«, t00=0x001f, t01=0x0010}
0x030a6…030c4               Head {h00=0x001a, h01=0x0050, text=»RR.P EQU /01 RR-PACKET«, t00=0x001f, t01=0x0044}
0x030c4…030e4               Head {h00=0x001c, h01=0x0050, text=»RNR.P EQU /05 RNR-PACKET«, t00=0x001f, t01=0x0062}
0x030e4…03108               Head {h00=0x0020, h01=0x0050, text=»RSET.P EQU /1B RESET PACKET «, t00=0x001f, t01=0x0082}
0x03108…0313a               Head {h00=0x002e, h01=0x0050, text=»RSET.CP EQU /1F RESET CONFIRMATION PACKET «, t00=0x001f, t01=0x00a6}
0x0313a…03160               Head {h00=0x0022, h01=0x0050, text=»RSTR.P EQU /FB RESTART PACKET «, t00=0x001f, t01=0x00d8}
0x03160…03194               Head {h00=0x0030, h01=0x0050, text=»RSTR.CP EQU /FF RESTART CONFIRMATION PACKET «, t00=0x001f, t01=0x00fe}
0x03194…031aa               Head {h00=0x0012, h01=0x0050, text=» EJECT  SYSTEM«, t00=0x001f, t01=0x0132}
0x031aa…031b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0148}
0x031b4…031de               Head {h00=0x0026, h01=0x0050, text=»* EQUATE VALUES FOR PACKET LENGTH «, t00=0x001f, t01=0x0152}
0x031de…031e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x017c}
0x031e8…03210               Head {h00=0x0024, h01=0x0050, text=»CAL.CL EQU /05 CALL CONFIRMATION«, t00=0x001f, t01=0x0186}
0x03210…03232               Head {h00=0x001e, h01=0x0050, text=»CLE.L EQU /07 CLEAR PACKET«, t00=0x0020, t01=0x001e}
0x03232…03262               Head {h00=0x002c, h01=0x0050, text=»CLE.CL EQU /05 CLEAR CONFIRMATION PACKET«, t00=0x0020, t01=0x0040}
0x03262…03288               Head {h00=0x0022, h01=0x0050, text=»INT.L EQU /06 INTERRUPT PACKET«, t00=0x0020, t01=0x0070}
0x03288…032bc               Head {h00=0x0030, h01=0x0050, text=»INT.CL EQU /05 INTERRUPT CONFIRMATION PACKET«, t00=0x0020, t01=0x0096}
0x032bc…032da               Head {h00=0x001a, h01=0x0050, text=»RR.L EQU /05 RR-PACKET«, t00=0x0020, t01=0x00ca}
0x032da…032fe               Head {h00=0x0020, h01=0x0050, text=»RSET.L EQU /07 RESET PACKET «, t00=0x0020, t01=0x00e8}
0x032fe…03330               Head {h00=0x002e, h01=0x0050, text=»RSET.CL EQU /05 RESET CONFIRMATION PACKET «, t00=0x0020, t01=0x010c}
0x03330…03356               Head {h00=0x0022, h01=0x0050, text=»RSTR.L EQU /07 RESTART PACKET «, t00=0x0020, t01=0x013e}
0x03356…0338a               Head {h00=0x0030, h01=0x0050, text=»RSTR.CL EQU /05 RESTART CONFIRMATION PACKET «, t00=0x0020, t01=0x0164}
0x0338a…03394               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0008}
0x03394…033ae               Head {h00=0x0016, h01=0x0050, text=»* SYSTEM VARIABLES«, t00=0x0021, t01=0x0012}
0x033ae…033b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x002c}
0x033b8…033ce               Head {h00=0x0012, h01=0x0050, text=»NEG EQU /8000 «, t00=0x0021, t01=0x0036}
0x033ce…03400               Head {h00=0x002e, h01=0x0050, text=»LOCAL EQU 'LP' LOCAL PACKET SWITCHING DTE «, t00=0x0021, t01=0x004c}
0x03400…03432               Head {h00=0x002e, h01=0x0050, text=»SVCTYP EQU 'RS' REMOTE DTE REACHED VIA SVC«, t00=0x0021, t01=0x007e}
0x03432…03464               Head {h00=0x002e, h01=0x0050, text=»PVCTYP EQU 'RP' REMOTE DTE REACHED VIA PVC«, t00=0x0021, t01=0x00b0}
0x03464…03498               Head {h00=0x0030, h01=0x0050, text=»TSKID EQU '#X' TASK IDENTIFICATION X25-TASK «, t00=0x0021, t01=0x00e2}
0x03498…034b4               Head {h00=0x0018, h01=0x0050, text=»SAVE RES 8 SAVE AREA«, t00=0x0021, t01=0x0116}
0x034b4…034e8               Head {h00=0x0030, h01=0x0050, text=»THRESH DATA 50 PERCENTAGE FOR WIND. UPDATING«, t00=0x0021, t01=0x0132}
0x034e8…03518               Head {h00=0x002c, h01=0x0050, text=»DCLEVL DATA 0 PROCESS INDICATION DC-TASK«, t00=0x0021, t01=0x0166}
0x03518…0353a               Head {h00=0x001e, h01=0x0050, text=» DATA 0,0 EXTEND DC-STACK «, t00=0x0022, t01=0x0008}
0x0353a…0355e               Head {h00=0x0020, h01=0x0050, text=» RES 12 CALL FUNCTION STACK «, t00=0x0022, t01=0x002a}
0x0355e…03582               Head {h00=0x0020, h01=0x0050, text=»DCSTAK EQU *-2 STACK POINTER«, t00=0x0022, t01=0x004e}
0x03582…0358c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0072}
0x0358c…03596               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x007c}
0x03596…035a8               Head {h00=0x000e, h01=0x0050, text=» EJECT  LC«, t00=0x0022, t01=0x0086}
0x035a8…035b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0098}
0x035b2…035de               Head {h00=0x0028, h01=0x0050, text=»* LOGICAL CHANNEL TABLE DISPLACEMENT«, t00=0x0022, t01=0x00a2}
0x035de…035e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ce}
0x035e8…03604               Head {h00=0x0018, h01=0x0050, text=»LCSTAT EQU 0 STATUS «, t00=0x0022, t01=0x00d8}
0x03604…0362a               Head {h00=0x0022, h01=0x0050, text=»LCSBST EQU LCSTAT+1 SUB-STATUS«, t00=0x0022, t01=0x00f4}
0x0362a…03652               Head {h00=0x0024, h01=0x0050, text=»VCTYP EQU LCSBST+1 CIRCUIT TYPE «, t00=0x0022, t01=0x011a}
0x03652…03680               Head {h00=0x002a, h01=0x0050, text=»LCNUM EQU VCTYP+1 LOG. CHANNEL NUMBER «, t00=0x0022, t01=0x0142}
0x03680…036a6               Head {h00=0x0022, h01=0x0050, text=»LCDWT EQU LCNUM+1 DWT ADDRESS «, t00=0x0022, t01=0x0170}
0x036a6…036d0               Head {h00=0x0026, h01=0x0050, text=»LCTHRE EQU LCDWT+2 THRESHOLD VALUE«, t00=0x0023, t01=0x0008}
0x036d0…03702               Head {h00=0x002e, h01=0x0050, text=»NRNUBF EQU LCTHRE+1 # OF NOT USED BUFFERS «, t00=0x0023, t01=0x0032}
0x03702…03730               Head {h00=0x002a, h01=0x0050, text=»QUEINP EQU NRNUBF+1 INPUT QUEUE ANCHOR«, t00=0x0023, t01=0x0064}
0x03730…03760               Head {h00=0x002c, h01=0x0050, text=»QUEOUT EQU QUEINP+2 OUTPUT QUEUE ANCHOR «, t00=0x0023, t01=0x0092}
0x03760…0378c               Head {h00=0x0028, h01=0x0050, text=»LCTRWN EQU QUEOUT+2 TRANSMIT WINDOW «, t00=0x0023, t01=0x00c2}
0x0378c…037b6               Head {h00=0x0026, h01=0x0050, text=»LCREWN EQU LCTRWN+1 RECEIVE WINDOW«, t00=0x0023, t01=0x00ee}
0x037b6…037e8               Head {h00=0x002e, h01=0x0050, text=»PS EQU LCREWN+1 NEXT PACKET SEND SEQU. NR.«, t00=0x0023, t01=0x0118}
0x037e8…0381c               Head {h00=0x0030, h01=0x0050, text=»PR EQU PS+1 CURRENT PACKET RECEIVE SEQU. NR.«, t00=0x0023, t01=0x014a}
0x0381c…03848               Head {h00=0x0028, h01=0x0050, text=»RPS EQU PR+1 NEXT PS TO BE RECIEVED «, t00=0x0023, t01=0x017e}
0x03848…0387a               Head {h00=0x002e, h01=0x0050, text=»SLWE EQU RPS+1 SEND LWE = LAST RECEIVED PR«, t00=0x0024, t01=0x001a}
0x0387a…038b8               Head {h00=0x003a, h01=0x0050, text=»RLWE     EQU      SLWE+1           LAST TRANSMITTED PR«, t00=0x0024, t01=0x004c}
0x038b8…038da               Head {h00=0x001e, h01=0x0050, text=»NOUSE EQU RLWE+1 NOT USED «, t00=0x0024, t01=0x008a}
0x038da…03906               Head {h00=0x0028, h01=0x0050, text=»REMADR EQU NOUSE+1 REMOTE DTE IF PVC«, t00=0x0024, t01=0x00ac}
0x03906…0393c               Head {h00=0x0032, h01=0x0050, text=»REBFSZ EQU REMADR+2 MAX.RECEIVE PACKET LENGTH «, t00=0x0024, t01=0x00d8}
0x0393c…03972               Head {h00=0x0032, h01=0x0050, text=»TRBFSZ EQU REBFSZ+2 MAX. TRANSM. PACKET LENGTH«, t00=0x0024, t01=0x010e}
0x03972…03992               Head {h00=0x001c, h01=0x0050, text=»FLAGS EQU TRBFSZ+2 FLAGS«, t00=0x0024, t01=0x0144}
0x03992…039ba               Head {h00=0x0024, h01=0x0050, text=»TIMADR EQU FLAGS+2 TIMER ADDRESS«, t00=0x0024, t01=0x0164}
0x039ba…039ea               Head {h00=0x002c, h01=0x0050, text=»SYSBUF EQU TIMADR+4 SYSTEM OUTPUT BUFFER«, t00=0x0024, t01=0x018c}
0x039ea…03a12               Head {h00=0x0024, h01=0x0050, text=»LCALNG EQU SYSBUF+8 TABLE LENGTH«, t00=0x0025, t01=0x002c}
0x03a12…03a1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0054}
0x03a1c…03a2e               Head {h00=0x000e, h01=0x0050, text=» EJECT  LC«, t00=0x0025, t01=0x005e}
0x03a2e…03a38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0070}
0x03a38…03a6a               Head {h00=0x002e, h01=0x0050, text=»* EQUATE VALUES FOR LOGICAL CHANNEL STATUS«, t00=0x0025, t01=0x007a}
0x03a6a…03a74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00ac}
0x03a74…03a98               Head {h00=0x0020, h01=0x0050, text=»READ.ST EQU /00 READY STATE «, t00=0x0025, t01=0x00b6}
0x03a98…03ac0               Head {h00=0x0024, h01=0x0050, text=»LCAL.ST EQU /01 LOCAL CALL STATE«, t00=0x0025, t01=0x00da}
0x03ac0…03aea               Head {h00=0x0026, h01=0x0050, text=»RCAL.ST EQU /02 REMOTE CALL STATE «, t00=0x0025, t01=0x0102}
0x03aea…03b16               Head {h00=0x0028, h01=0x0050, text=»DATA.ST EQU /03 DATA TRANSFER STATE «, t00=0x0025, t01=0x012c}
0x03b16…03b3a               Head {h00=0x0020, h01=0x0050, text=»CLEA.ST EQU /04 CLEAR STATE «, t00=0x0025, t01=0x0158}
0x03b3a…03b6e               Head {h00=0x0030, h01=0x0050, text=»FLCN.ST EQU /00 FLOW CONTROL READY SUB-STATE«, t00=0x0025, t01=0x017c}
0x03b6e…03b96               Head {h00=0x0024, h01=0x0050, text=»RSET.ST EQU /01 RESET SUB-STATE «, t00=0x0026, t01=0x0020}
0x03b96…03ba0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0048}
0x03ba0…03bc8               Head {h00=0x0024, h01=0x0050, text=»* EQUATE VALUES FOR CIRCUIT TYPE«, t00=0x0026, t01=0x0052}
0x03bc8…03bd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x007a}
0x03bd2…03c00               Head {h00=0x002a, h01=0x0050, text=»PVC EQU /01 PERMANENT VIRTUAL CIRCUIT «, t00=0x0026, t01=0x0084}
0x03c00…03c2c               Head {h00=0x0028, h01=0x0050, text=»SVC EQU /00 SWITCHED VIRTUAL CIRCUIT«, t00=0x0026, t01=0x00b2}
0x03c2c…03c36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00de}
0x03c36…03c4a               Head {h00=0x0010, h01=0x0050, text=» EJECT  LINE«, t00=0x0026, t01=0x00e8}
0x03c4a…03c54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00fc}
0x03c54…03c86               Head {h00=0x002e, h01=0x0050, text=»* LINE ADMINISTRATION BLOCK DISPLACEMENTS «, t00=0x0026, t01=0x0106}
0x03c86…03c90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0138}
0x03c90…03cc2               Head {h00=0x002e, h01=0x0050, text=»FILCOD EQU 0 FILE CODE FOR LINE ADDRESSING«, t00=0x0026, t01=0x0142}
0x03cc2…03cf4               Head {h00=0x002e, h01=0x0050, text=»LC:TAB EQU FILCOD+2 LC-ADM'S TABLE ADDRESS«, t00=0x0026, t01=0x0174}
0x03cf4…03d26               Head {h00=0x002e, h01=0x0050, text=»PACKLN EQU LC:TAB+2 MAXIMUM PACKET LENGTH «, t00=0x0027, t01=0x0016}
0x03d26…03d56               Head {h00=0x002c, h01=0x0050, text=»WNDSIZ EQU PACKLN+2 MAXIMUM WINDOW SIZE «, t00=0x0027, t01=0x0048}
0x03d56…03d86               Head {h00=0x002c, h01=0x0050, text=»NRLC EQU WNDSIZ+2 # OF LOGICAL CHANNELS «, t00=0x0027, t01=0x0078}
0x03d86…03dbe               Head {h00=0x0034, h01=0x0050, text=»NRPVC EQU NRLC+1 # OF PERMANENT VIRTUAL CIRCUITS«, t00=0x0027, t01=0x00a8}
0x03dbe…03df2               Head {h00=0x0030, h01=0x0050, text=»CHAIN EQU NRPVC+1 ANCHOR FOR CONNECTED DWT'S«, t00=0x0027, t01=0x00e0}
0x03df2…03e2c               Head {h00=0x0036, h01=0x0050, text=»NRPNDT EQU CHAIN+2 # OF PENDING TRANSMIT REQUESTS «, t00=0x0027, t01=0x0114}
0x03e2c…03e5c               Head {h00=0x002c, h01=0x0050, text=»RSTQUE EQU NRPNDT+2 RESTART QUEUE ANCHOR«, t00=0x0027, t01=0x014e}
0x03e5c…03e94               Head {h00=0x0034, h01=0x0050, text=»RTMADR EQU RSTQUE+2 RESTART CONF. TIMER ADDRESS «, t00=0x0027, t01=0x017e}
0x03e94…03ec0               Head {h00=0x0028, h01=0x0050, text=»HRDSTA EQU RTMADR+2 HARDWARE STATUS «, t00=0x0028, t01=0x0026}
0x03ec0…03ee8               Head {h00=0x0024, h01=0x0050, text=»CMNFLG EQU HRDSTA+2 COMMON FLAGS«, t00=0x0028, t01=0x0052}
0x03ee8…03f18               Head {h00=0x002c, h01=0x0050, text=»LOCECB EQU CMNFLG+2 LINE OPEN/CLOSE ECB «, t00=0x0028, t01=0x007a}
0x03f18…03f52               Head {h00=0x0036, h01=0x0050, text=»UBNUM EQU LOCECB+12 BLOCK FOR (DIS)CONNECT REQUEST«, t00=0x0028, t01=0x00aa}
0x03f52…03f6e               Head {h00=0x0018, h01=0x0050, text=» IFF MMUPAG+STATI=2 «, t00=0x0028, t01=0x00e4}
0x03f6e…03f8c               Head {h00=0x001a, h01=0x0050, text=»D1 EQU UBNUM+SYUBNR+2 «, t00=0x0028, t01=0x0100}
0x03f8c…03fbc               Head {h00=0x002c, h01=0x0050, text=»ECBINL EQU 12 LENGTH INPUT/OUTPUT ECB'S «, t00=0x0028, t01=0x011e}
0x03fbc…03fec               Head {h00=0x002c, h01=0x0050, text=»SYSBFL EQU SYMXDL+BEGDAT+1 BUFFER LENGTH«, t00=0x0028, t01=0x014e}
0x03fec…0401a               Head {h00=0x002a, h01=0x0050, text=»ECBIN1 EQU D1+SYUBNR LINE INPUT ECB'S «, t00=0x0028, t01=0x017e}
0x0401a…04026               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x001c}
0x04026…04042               Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+STATI=2 «, t00=0x0029, t01=0x0028}
0x04042…04060               Head {h00=0x001a, h01=0x0050, text=»D1 EQU UBNUM+SYUBNR+2 «, t00=0x0029, t01=0x0044}
0x04060…0409a               Head {h00=0x0036, h01=0x0050, text=»INTSTB EQU D1+SYUBNR INTERMEDIATESTATISTIC BUFFER «, t00=0x0029, t01=0x0062}
0x0409a…040ca               Head {h00=0x002c, h01=0x0050, text=»ECBINL EQU 12 LENGTH INPUT/OUTPUT ECB'S «, t00=0x0029, t01=0x009c}
0x040ca…040fa               Head {h00=0x002c, h01=0x0050, text=»SYSBFL EQU SYMXDL+BEGDAT+1 BUFFER LENGTH«, t00=0x0029, t01=0x00cc}
0x040fa…04128               Head {h00=0x002a, h01=0x0050, text=»ECBIN1 EQU INTSTB+42 LINE INPUT ECB'S «, t00=0x0029, t01=0x00fc}
0x04128…04134               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x012a}
0x04134…0414a               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRRC=1 «, t00=0x0029, t01=0x0136}
0x0414a…0416a               Head {h00=0x001c, h01=0x0050, text=»ECBIN2 EQU ECBIN1+ECBINL«, t00=0x0029, t01=0x014c}
0x0416a…04180               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRRC=2 «, t00=0x0029, t01=0x016c}
0x04180…041a0               Head {h00=0x001c, h01=0x0050, text=»ECBIN3 EQU ECBIN2+ECBINL«, t00=0x0029, t01=0x0182}
0x041a0…041b6               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRRC=3 «, t00=0x002a, t01=0x0012}
0x041b6…041d6               Head {h00=0x001c, h01=0x0050, text=»ECBIN4 EQU ECBIN3+ECBINL«, t00=0x002a, t01=0x0028}
0x041d6…041e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0048}
0x041e2…041ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0054}
0x041ec…04200               Head {h00=0x0010, h01=0x0050, text=» EJECT  LINE«, t00=0x002a, t01=0x005e}
0x04200…0420a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0072}
0x0420a…04220               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRRC=1 «, t00=0x002a, t01=0x007c}
0x04220…04240               Head {h00=0x001c, h01=0x0050, text=»ECBOU1 EQU ECBIN1+ECBINL«, t00=0x002a, t01=0x0092}
0x04240…0424c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x00b2}
0x0424c…04262               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRRC=2 «, t00=0x002a, t01=0x00be}
0x04262…04282               Head {h00=0x001c, h01=0x0050, text=»ECBOU1 EQU ECBIN2+ECBINL«, t00=0x002a, t01=0x00d4}
0x04282…0428e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x00f4}
0x0428e…042a4               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRRC=3 «, t00=0x002a, t01=0x0100}
0x042a4…042c4               Head {h00=0x001c, h01=0x0050, text=»ECBOU1 EQU ECBIN3+ECBINL«, t00=0x002a, t01=0x0116}
0x042c4…042d0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0136}
0x042d0…042e6               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRRC=4 «, t00=0x002a, t01=0x0142}
0x042e6…04306               Head {h00=0x001c, h01=0x0050, text=»ECBOU1 EQU ECBIN4+ECBINL«, t00=0x002a, t01=0x0158}
0x04306…04312               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0178}
0x04312…04332               Head {h00=0x001c, h01=0x0050, text=»SYSOU1 EQU ECBOU1+ECBINL«, t00=0x002a, t01=0x0184}
0x04332…04348               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRTR=1 «, t00=0x002b, t01=0x0014}
0x04348…04368               Head {h00=0x001c, h01=0x0050, text=»ECBOU2 EQU SYSOU1+SYSBFL«, t00=0x002b, t01=0x002a}
0x04368…04388               Head {h00=0x001c, h01=0x0050, text=»SYSOU2 EQU ECBOU2+ECBINL«, t00=0x002b, t01=0x004a}
0x04388…0439e               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRTR=2 «, t00=0x002b, t01=0x006a}
0x0439e…043be               Head {h00=0x001c, h01=0x0050, text=»ECBOU3 EQU SYSOU2+SYSBFL«, t00=0x002b, t01=0x0080}
0x043be…043de               Head {h00=0x001c, h01=0x0050, text=»SYSOU3 EQU ECBOU3+ECBINL«, t00=0x002b, t01=0x00a0}
0x043de…043f4               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRTR=3 «, t00=0x002b, t01=0x00c0}
0x043f4…04414               Head {h00=0x001c, h01=0x0050, text=»ECBOU4 EQU SYSOU3+SYSBFL«, t00=0x002b, t01=0x00d6}
0x04414…04434               Head {h00=0x001c, h01=0x0050, text=»SYSOU4 EQU ECBOU4+ECBINL«, t00=0x002b, t01=0x00f6}
0x04434…04440               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x0116}
0x04440…04456               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRTR=1 «, t00=0x002b, t01=0x0122}
0x04456…04476               Head {h00=0x001c, h01=0x0050, text=»LNBLNG EQU SYSOU1+SYSBFL«, t00=0x002b, t01=0x0138}
0x04476…04482               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x0158}
0x04482…04498               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRTR=2 «, t00=0x002b, t01=0x0164}
0x04498…044b8               Head {h00=0x001c, h01=0x0050, text=»LNBLNG EQU SYSOU2+SYSBFL«, t00=0x002b, t01=0x017a}
0x044b8…044c4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x000a}
0x044c4…044da               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRTR=3 «, t00=0x002c, t01=0x0016}
0x044da…044fa               Head {h00=0x001c, h01=0x0050, text=»LNBLNG EQU SYSOU3+SYSBFL«, t00=0x002c, t01=0x002c}
0x044fa…04506               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x004c}
0x04506…0451c               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRTR=4 «, t00=0x002c, t01=0x0058}
0x0451c…0453c               Head {h00=0x001c, h01=0x0050, text=»LNBLNG EQU SYSOU4+SYSBFL«, t00=0x002c, t01=0x006e}
0x0453c…04548               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x008e}
0x04548…04552               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x009a}
0x04552…04566               Head {h00=0x0010, h01=0x0050, text=» EJECT  LINE«, t00=0x002c, t01=0x00a4}
0x04566…04570               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00b8}
0x04570…045a0               Head {h00=0x002c, h01=0x0050, text=»* ORDER CODES FOR HDLC PROTOCOL HANDLER «, t00=0x002c, t01=0x00c2}
0x045a0…045aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00f2}
0x045aa…045ce               Head {h00=0x0020, h01=0x0050, text=»CONN EQU /21 CONNECT REQUEST«, t00=0x002c, t01=0x00fc}
0x045ce…045f6               Head {h00=0x0024, h01=0x0050, text=»DISCN EQU /22 DISCONNECT REQUEST«, t00=0x002c, t01=0x0120}
0x045f6…0461a               Head {h00=0x0020, h01=0x0050, text=»RECEIV EQU /02 INPUT REQUEST«, t00=0x002c, t01=0x0148}
0x0461a…04640               Head {h00=0x0022, h01=0x0050, text=»TRANSM EQU /06 OUTPUT REQUEST «, t00=0x002c, t01=0x016c}
0x04640…04668 (45, 0, 400)  Head {h00=0x0024, h01=0x0050, text=»STATR EQU /2D STATISTIC REQUEST «, t00=0x002d, t01=0x0004}
0x04668…04672               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x002c}
0x04672…046a2               Head {h00=0x002c, h01=0x0050, text=»* RETURN CODES FOR HDLC PROTOCOL HANDLER«, t00=0x002d, t01=0x0036}
0x046a2…046ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0066}
0x046ac…046d4               Head {h00=0x0024, h01=0x0050, text=»HRDWER EQU /8000 HARDWARE ERROR «, t00=0x002d, t01=0x0070}
0x046d4…04700               Head {h00=0x0028, h01=0x0050, text=»REMDIS EQU /000D REMOTE DISCONNECTED«, t00=0x002d, t01=0x0098}
0x04700…0472a               Head {h00=0x0026, h01=0x0050, text=»DEFTIM EQU /000E DEFINITE TIME-OUT«, t00=0x002d, t01=0x00c4}
0x0472a…04734               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00ee}
0x04734…0475e               Head {h00=0x0026, h01=0x0050, text=»* EQUATE VALUES FOR FLAG POSITIONS«, t00=0x002d, t01=0x00f8}
0x0475e…04768               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0122}
0x04768…0479a               Head {h00=0x002e, h01=0x0050, text=»CONTIM EQU /10 CONFIRMATION TIMER RUNNING «, t00=0x002d, t01=0x012c}
0x0479a…047c2               Head {h00=0x0024, h01=0x0050, text=»INTPNG EQU /20 INTERRUPT PENDING«, t00=0x002d, t01=0x015e}
0x047c2…047e4               Head {h00=0x001e, h01=0x0050, text=»REMBUS EQU /40 REMOTE BUSY«, t00=0x002d, t01=0x0186}
0x047e4…04818               Head {h00=0x0030, h01=0x0050, text=»NPRFLG EQU /01 NO PROCESSING FLAG FOR QUEUES«, t00=0x002e, t01=0x0018}
0x04818…04822               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x004c}
0x04822…0484e               Head {h00=0x0028, h01=0x0050, text=»* EQUATE VALUES FOR THE COMMON FLAGS«, t00=0x002e, t01=0x0056}
0x0484e…04858               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0082}
0x04858…0487c               Head {h00=0x0020, h01=0x0050, text=»RSTFLG EQU /01 RESTART BUSY «, t00=0x002e, t01=0x008c}
0x0487c…048a6               Head {h00=0x0026, h01=0x0050, text=»STRTFL EQU /80 LINE CONNECTED FLAG«, t00=0x002e, t01=0x00b0}
0x048a6…048d8               Head {h00=0x002e, h01=0x0050, text=»STATFL EQU /04 STATISTIC REQUEST BUSY FLAG«, t00=0x002e, t01=0x00da}
0x048d8…04916               Head {h00=0x003a, h01=0x0050, text=»CLOFLG   EQU      /10                  CLOSE BUSY FLAG«, t00=0x002e, t01=0x010c}
0x04916…04954               Head {h00=0x003a, h01=0x0050, text=»OPEFLG   EQU      /20                  OPEN BUSY FLAG «, t00=0x002e, t01=0x014a}
0x04954…0495e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0188}
0x0495e…0496c (47, 0, 400)  Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x0004}
0x0496c…04976               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0012}
0x04976…049b2               Head {h00=0x0038, h01=0x0050, text=»* BLOCK WITH ADDRESSES OF LINE ADMINISTRATION BLOCKS«, t00=0x002f, t01=0x001c}
0x049b2…049bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0058}
0x049bc…049f2               Head {h00=0x0032, h01=0x0050, text=»LINTAB DATA LINBL1 ADDRESS 1ST LINE ADM. BLOCK«, t00=0x002f, t01=0x0062}
0x049f2…04a08               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x002f, t01=0x0098}
0x04a08…04a38               Head {h00=0x002c, h01=0x0050, text=» DATA LINBL2 ADDRESS 2ND LINE ADM. BLOCK«, t00=0x002f, t01=0x00ae}
0x04a38…04a4e               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x002f, t01=0x00de}
0x04a4e…04a7e               Head {h00=0x002c, h01=0x0050, text=» DATA LINBL3 ADDRESS 3TH LINE ADM. BLOCK«, t00=0x002f, t01=0x00f4}
0x04a7e…04a94               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=3 «, t00=0x002f, t01=0x0124}
0x04a94…04ac4               Head {h00=0x002c, h01=0x0050, text=» DATA LINBL4 ADDRESS 4TH LINE ADM. BLOCK«, t00=0x002f, t01=0x013a}
0x04ac4…04ad0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x016a}
0x04ad0…04ada               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0176}
0x04ada…04b04               Head {h00=0x0026, h01=0x0050, text=»* FIRST LINE ADMINISTRATION BLOCK «, t00=0x002f, t01=0x0180}
0x04b04…04b0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x001a}
0x04b0e…04b22               Head {h00=0x0010, h01=0x0050, text=»LINBL1 EQU *«, t00=0x0030, t01=0x0024}
0x04b22…04b3e               Head {h00=0x0018, h01=0x0050, text=» DATA /60 FILE CODE «, t00=0x0030, t01=0x0038}
0x04b3e…04b6c               Head {h00=0x002a, h01=0x0050, text=» DATA LCADM1 LOG. CHANNEL ADM. POINTER«, t00=0x0030, t01=0x0054}
0x04b6c…04b94               Head {h00=0x0024, h01=0x0050, text=» DATA SYMDL1 MAX. PACKET LENGTH «, t00=0x0030, t01=0x0082}
0x04b94…04bba               Head {h00=0x0022, h01=0x0050, text=» DATA SYMXW1 MAX. WINDOW SIZE «, t00=0x0030, t01=0x00aa}
0x04bba…04bf2               Head {h00=0x0034, h01=0x0050, text=» BYTE SYNRL1,SYNRP1 # OF LOG.CH. AND # OF PVC'S «, t00=0x0030, t01=0x00d0}
0x04bf2…04c0e               Head {h00=0x0018, h01=0x0050, text=» RORG LINBL1+LNBLNG «, t00=0x0030, t01=0x0108}
0x04c0e…04c18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0124}
0x04c18…04c4a               Head {h00=0x002e, h01=0x0050, text=»* BLOCK WITH LOGICAL CHANNEL ADM. POINTERS«, t00=0x0030, t01=0x012e}
0x04c4a…04c54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0160}
0x04c54…04c68               Head {h00=0x0010, h01=0x0050, text=»LCADM1 EQU *«, t00=0x0030, t01=0x016a}
0x04c68…04c7e               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.1 «, t00=0x0030, t01=0x017e}
0x04c7e…04c94 (49, 0, 398)  Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=1 «, t00=0x0031, t01=0x0004}
0x04c94…04caa               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.2 «, t00=0x0031, t01=0x001a}
0x04caa…04cc0               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=2 «, t00=0x0031, t01=0x0030}
0x04cc0…04cd6               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.3 «, t00=0x0031, t01=0x0046}
0x04cd6…04cec               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=3 «, t00=0x0031, t01=0x005c}
0x04cec…04d02               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.4 «, t00=0x0031, t01=0x0072}
0x04d02…04d18               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=4 «, t00=0x0031, t01=0x0088}
0x04d18…04d2e               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.5 «, t00=0x0031, t01=0x009e}
0x04d2e…04d44               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=5 «, t00=0x0031, t01=0x00b4}
0x04d44…04d5a               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.6 «, t00=0x0031, t01=0x00ca}
0x04d5a…04d70               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=6 «, t00=0x0031, t01=0x00e0}
0x04d70…04d86               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.7 «, t00=0x0031, t01=0x00f6}
0x04d86…04d9c               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=7 «, t00=0x0031, t01=0x010c}
0x04d9c…04db2               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.8 «, t00=0x0031, t01=0x0122}
0x04db2…04dbe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0138}
0x04dbe…04dcc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x0144}
0x04dcc…04dd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0152}
0x04dd6…04e06               Head {h00=0x002c, h01=0x0050, text=»* LOGICAL CHANNEL ADMINISTRATION BLOCKS «, t00=0x0031, t01=0x015c}
0x04e06…04e10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x018c}
0x04e10…04e26               Head {h00=0x0012, h01=0x0050, text=»LCAD1.1 EQU * «, t00=0x0032, t01=0x0008}
0x04e26…04e42               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.1+LCALNG«, t00=0x0032, t01=0x001e}
0x04e42…04e58               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=1 «, t00=0x0032, t01=0x003a}
0x04e58…04e6e               Head {h00=0x0012, h01=0x0050, text=»LCAD1.2 EQU * «, t00=0x0032, t01=0x0050}
0x04e6e…04e8a               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.2+LCALNG«, t00=0x0032, t01=0x0066}
0x04e8a…04ea0               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=2 «, t00=0x0032, t01=0x0082}
0x04ea0…04eb6               Head {h00=0x0012, h01=0x0050, text=»LCAD1.3 EQU * «, t00=0x0032, t01=0x0098}
0x04eb6…04ed2               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.3+LCALNG«, t00=0x0032, t01=0x00ae}
0x04ed2…04ee8               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=3 «, t00=0x0032, t01=0x00ca}
0x04ee8…04efe               Head {h00=0x0012, h01=0x0050, text=»LCAD1.4 EQU * «, t00=0x0032, t01=0x00e0}
0x04efe…04f1a               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.4+LCALNG«, t00=0x0032, t01=0x00f6}
0x04f1a…04f30               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=4 «, t00=0x0032, t01=0x0112}
0x04f30…04f46               Head {h00=0x0012, h01=0x0050, text=»LCAD1.5 EQU * «, t00=0x0032, t01=0x0128}
0x04f46…04f62               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.5+LCALNG«, t00=0x0032, t01=0x013e}
0x04f62…04f78               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=5 «, t00=0x0032, t01=0x015a}
0x04f78…04f8e               Head {h00=0x0012, h01=0x0050, text=»LCAD1.6 EQU * «, t00=0x0032, t01=0x0170}
0x04f8e…04faa               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.6+LCALNG«, t00=0x0032, t01=0x0186}
0x04faa…04fc0               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=6 «, t00=0x0033, t01=0x0012}
0x04fc0…04fd6               Head {h00=0x0012, h01=0x0050, text=»LCAD1.7 EQU * «, t00=0x0033, t01=0x0028}
0x04fd6…04ff2               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.7+LCALNG«, t00=0x0033, t01=0x003e}
0x04ff2…05008               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=7 «, t00=0x0033, t01=0x005a}
0x05008…0501e               Head {h00=0x0012, h01=0x0050, text=»LCAD1.8 EQU * «, t00=0x0033, t01=0x0070}
0x0501e…0503a               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.8+LCALNG«, t00=0x0033, t01=0x0086}
0x0503a…05046               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x00a2}
0x05046…0505c               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0033, t01=0x00ae}
0x0505c…0506a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x00c4}
0x0506a…05074               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00d2}
0x05074…0509e               Head {h00=0x0026, h01=0x0050, text=»* SECOND LINE ADMINISTRATION BLOCK«, t00=0x0033, t01=0x00dc}
0x0509e…050a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0106}
0x050a8…050bc               Head {h00=0x0010, h01=0x0050, text=»LINBL2 EQU *«, t00=0x0033, t01=0x0110}
0x050bc…050d8               Head {h00=0x0018, h01=0x0050, text=» DATA /61 FILE CODE «, t00=0x0033, t01=0x0124}
0x050d8…05106               Head {h00=0x002a, h01=0x0050, text=» DATA LCADM2 LOG. CHANNEL ADM. POINTER«, t00=0x0033, t01=0x0140}
0x05106…0512e               Head {h00=0x0024, h01=0x0050, text=» DATA SYMDL2 MAX. PACKET LENGTH «, t00=0x0033, t01=0x016e}
0x0512e…05154               Head {h00=0x0022, h01=0x0050, text=» DATA SYMXW2 MAX. WINDOW SIZE «, t00=0x0034, t01=0x0008}
0x05154…0518c               Head {h00=0x0034, h01=0x0050, text=» BYTE SYNRL2,SYNRP2 # OF LOG.CH. AND # OF PVC'S «, t00=0x0034, t01=0x002e}
0x0518c…051a8               Head {h00=0x0018, h01=0x0050, text=» RORG LINBL2+LNBLNG «, t00=0x0034, t01=0x0066}
0x051a8…051b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0082}
0x051b2…051e4               Head {h00=0x002e, h01=0x0050, text=»* BLOCK WITH LOGICAL CHANNEL ADM. POINTERS«, t00=0x0034, t01=0x008c}
0x051e4…051ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00be}
0x051ee…05202               Head {h00=0x0010, h01=0x0050, text=»LCADM2 EQU *«, t00=0x0034, t01=0x00c8}
0x05202…05218               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.1 «, t00=0x0034, t01=0x00dc}
0x05218…0522e               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=1 «, t00=0x0034, t01=0x00f2}
0x0522e…05244               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.2 «, t00=0x0034, t01=0x0108}
0x05244…0525a               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=2 «, t00=0x0034, t01=0x011e}
0x0525a…05270               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.3 «, t00=0x0034, t01=0x0134}
0x05270…05286               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=3 «, t00=0x0034, t01=0x014a}
0x05286…0529c               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.4 «, t00=0x0034, t01=0x0160}
0x0529c…052b2               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=4 «, t00=0x0034, t01=0x0176}
0x052b2…052c8               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.5 «, t00=0x0034, t01=0x018c}
0x052c8…052de               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=5 «, t00=0x0035, t01=0x0012}
0x052de…052f4               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.6 «, t00=0x0035, t01=0x0028}
0x052f4…0530a               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=6 «, t00=0x0035, t01=0x003e}
0x0530a…05320               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.7 «, t00=0x0035, t01=0x0054}
0x05320…05336               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=7 «, t00=0x0035, t01=0x006a}
0x05336…0534c               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.8 «, t00=0x0035, t01=0x0080}
0x0534c…05358               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x0096}
0x05358…05366               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x00a2}
0x05366…0537c               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0035, t01=0x00b0}
0x0537c…05386               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00c6}
0x05386…053b6               Head {h00=0x002c, h01=0x0050, text=»* LOGICAL CHANNEL ADMINISTRATION BLOCKS «, t00=0x0035, t01=0x00d0}
0x053b6…053c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0100}
0x053c0…053d6               Head {h00=0x0012, h01=0x0050, text=»LCAD2.1 EQU * «, t00=0x0035, t01=0x010a}
0x053d6…053f2               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.1+LCALNG«, t00=0x0035, t01=0x0120}
0x053f2…05408               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=1 «, t00=0x0035, t01=0x013c}
0x05408…0541e               Head {h00=0x0012, h01=0x0050, text=»LCAD2.2 EQU * «, t00=0x0035, t01=0x0152}
0x0541e…0543a               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.2+LCALNG«, t00=0x0035, t01=0x0168}
0x0543a…05450               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=2 «, t00=0x0035, t01=0x0184}
0x05450…05466               Head {h00=0x0012, h01=0x0050, text=»LCAD2.3 EQU * «, t00=0x0036, t01=0x000a}
0x05466…05482               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.3+LCALNG«, t00=0x0036, t01=0x0020}
0x05482…05498               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=3 «, t00=0x0036, t01=0x003c}
0x05498…054ae               Head {h00=0x0012, h01=0x0050, text=»LCAD2.4 EQU * «, t00=0x0036, t01=0x0052}
0x054ae…054ca               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.4+LCALNG«, t00=0x0036, t01=0x0068}
0x054ca…054e0               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=4 «, t00=0x0036, t01=0x0084}
0x054e0…054f6               Head {h00=0x0012, h01=0x0050, text=»LCAD2.5 EQU * «, t00=0x0036, t01=0x009a}
0x054f6…05512               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.5+LCALNG«, t00=0x0036, t01=0x00b0}
0x05512…05528               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=5 «, t00=0x0036, t01=0x00cc}
0x05528…0553e               Head {h00=0x0012, h01=0x0050, text=»LCAD2.6 EQU * «, t00=0x0036, t01=0x00e2}
0x0553e…0555a               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.6+LCALNG«, t00=0x0036, t01=0x00f8}
0x0555a…05570               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=6 «, t00=0x0036, t01=0x0114}
0x05570…05586               Head {h00=0x0012, h01=0x0050, text=»LCAD2.7 EQU * «, t00=0x0036, t01=0x012a}
0x05586…055a2               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.7+LCALNG«, t00=0x0036, t01=0x0140}
0x055a2…055b8               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=7 «, t00=0x0036, t01=0x015c}
0x055b8…055ce               Head {h00=0x0012, h01=0x0050, text=»LCAD2.8 EQU * «, t00=0x0036, t01=0x0172}
0x055ce…055ea               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.8+LCALNG«, t00=0x0036, t01=0x0188}
0x055ea…055f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0014}
0x055f6…0560c               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0037, t01=0x0020}
0x0560c…05622               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x0037, t01=0x0036}
0x05622…05630               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x004c}
0x05630…0563a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x005a}
0x0563a…05664               Head {h00=0x0026, h01=0x0050, text=»* THIRTH LINE ADMINISTRATION BLOCK«, t00=0x0037, t01=0x0064}
0x05664…0566e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x008e}
0x0566e…05682               Head {h00=0x0010, h01=0x0050, text=»LINBL3 EQU *«, t00=0x0037, t01=0x0098}
0x05682…0569e               Head {h00=0x0018, h01=0x0050, text=» DATA /62 FILE CODE «, t00=0x0037, t01=0x00ac}
0x0569e…056cc               Head {h00=0x002a, h01=0x0050, text=» DATA LCADM3 LOG. CHANNEL ADM. POINTER«, t00=0x0037, t01=0x00c8}
0x056cc…056f4               Head {h00=0x0024, h01=0x0050, text=» DATA SYMDL3 MAX. PACKET LENGTH «, t00=0x0037, t01=0x00f6}
0x056f4…0571a               Head {h00=0x0022, h01=0x0050, text=» DATA SYMXW3 MAX. WINDOW SIZE «, t00=0x0037, t01=0x011e}
0x0571a…05750               Head {h00=0x0032, h01=0x0050, text=» BYTE SYNRL3,SYNRP3 # OF LOG.CH. AND # OF PV'S«, t00=0x0037, t01=0x0144}
0x05750…0576c               Head {h00=0x0018, h01=0x0050, text=» RORG LINBL3+LNBLNG «, t00=0x0037, t01=0x017a}
0x0576c…05776               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0008}
0x05776…057a8               Head {h00=0x002e, h01=0x0050, text=»* BLOCK WITH LOGICAL CHANNEL ADM. POINTERS«, t00=0x0038, t01=0x0012}
0x057a8…057b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0044}
0x057b2…057c6               Head {h00=0x0010, h01=0x0050, text=»LCADM3 EQU *«, t00=0x0038, t01=0x004e}
0x057c6…057dc               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.1 «, t00=0x0038, t01=0x0062}
0x057dc…057f2               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=1 «, t00=0x0038, t01=0x0078}
0x057f2…05808               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.2 «, t00=0x0038, t01=0x008e}
0x05808…0581e               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=2 «, t00=0x0038, t01=0x00a4}
0x0581e…05834               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.3 «, t00=0x0038, t01=0x00ba}
0x05834…0584a               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=3 «, t00=0x0038, t01=0x00d0}
0x0584a…05860               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.4 «, t00=0x0038, t01=0x00e6}
0x05860…05876               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=4 «, t00=0x0038, t01=0x00fc}
0x05876…0588c               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.5 «, t00=0x0038, t01=0x0112}
0x0588c…058a2               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=5 «, t00=0x0038, t01=0x0128}
0x058a2…058b8               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.6 «, t00=0x0038, t01=0x013e}
0x058b8…058ce               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=6 «, t00=0x0038, t01=0x0154}
0x058ce…058e4               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.7 «, t00=0x0038, t01=0x016a}
0x058e4…058fa               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=7 «, t00=0x0038, t01=0x0180}
0x058fa…05910               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.8 «, t00=0x0039, t01=0x0008}
0x05910…0591c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x001e}
0x0591c…0592a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x002a}
0x0592a…05940               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0039, t01=0x0038}
0x05940…05956               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x0039, t01=0x004e}
0x05956…05960               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0064}
0x05960…05990               Head {h00=0x002c, h01=0x0050, text=»* LOGICAL CHANNEL ADMINISTRATION BLOCKS «, t00=0x0039, t01=0x006e}
0x05990…0599a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x009e}
0x0599a…059b0               Head {h00=0x0012, h01=0x0050, text=»LCAD3.1 EQU * «, t00=0x0039, t01=0x00a8}
0x059b0…059cc               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.1+LCALNG«, t00=0x0039, t01=0x00be}
0x059cc…059e2               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=1 «, t00=0x0039, t01=0x00da}
0x059e2…059f8               Head {h00=0x0012, h01=0x0050, text=»LCAD3.2 EQU * «, t00=0x0039, t01=0x00f0}
0x059f8…05a14               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.2+LCALNG«, t00=0x0039, t01=0x0106}
0x05a14…05a2a               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=2 «, t00=0x0039, t01=0x0122}
0x05a2a…05a40               Head {h00=0x0012, h01=0x0050, text=»LCAD3.3 EQU * «, t00=0x0039, t01=0x0138}
0x05a40…05a5c               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.3+LCALNG«, t00=0x0039, t01=0x014e}
0x05a5c…05a72               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=3 «, t00=0x0039, t01=0x016a}
0x05a72…05a88               Head {h00=0x0012, h01=0x0050, text=»LCAD3.4 EQU * «, t00=0x0039, t01=0x0180}
0x05a88…05aa4               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.4+LCALNG«, t00=0x003a, t01=0x0008}
0x05aa4…05aba               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=4 «, t00=0x003a, t01=0x0024}
0x05aba…05ad0               Head {h00=0x0012, h01=0x0050, text=»LCAD3.5 EQU * «, t00=0x003a, t01=0x003a}
0x05ad0…05aec               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.5+LCALNG«, t00=0x003a, t01=0x0050}
0x05aec…05b02               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=5 «, t00=0x003a, t01=0x006c}
0x05b02…05b18               Head {h00=0x0012, h01=0x0050, text=»LCAD3.6 EQU * «, t00=0x003a, t01=0x0082}
0x05b18…05b34               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.6+LCALNG«, t00=0x003a, t01=0x0098}
0x05b34…05b4a               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=6 «, t00=0x003a, t01=0x00b4}
0x05b4a…05b60               Head {h00=0x0012, h01=0x0050, text=»LCAD3.7 EQU * «, t00=0x003a, t01=0x00ca}
0x05b60…05b7c               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.7+LCALNG«, t00=0x003a, t01=0x00e0}
0x05b7c…05b92               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=7 «, t00=0x003a, t01=0x00fc}
0x05b92…05ba8               Head {h00=0x0012, h01=0x0050, text=»LCAD3.8 EQU * «, t00=0x003a, t01=0x0112}
0x05ba8…05bc4               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.8+LCALNG«, t00=0x003a, t01=0x0128}
0x05bc4…05bd0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x0144}
0x05bd0…05be6               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x003a, t01=0x0150}
0x05be6…05bfc               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x003a, t01=0x0166}
0x05bfc…05c12               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=3 «, t00=0x003a, t01=0x017c}
0x05c12…05c20 (59, 0, 398)  Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003b, t01=0x0004}
0x05c20…05c2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0012}
0x05c2a…05c54               Head {h00=0x0026, h01=0x0050, text=»* FOURTH LINE ADMINISTRATION BLOCK«, t00=0x003b, t01=0x001c}
0x05c54…05c5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0046}
0x05c5e…05c72               Head {h00=0x0010, h01=0x0050, text=»LINBL4 EQU *«, t00=0x003b, t01=0x0050}
0x05c72…05c8e               Head {h00=0x0018, h01=0x0050, text=» DATA /63 FILE CODE «, t00=0x003b, t01=0x0064}
0x05c8e…05cbc               Head {h00=0x002a, h01=0x0050, text=» DATA LCADM4 LOG. CHANNEL ADM. POINTER«, t00=0x003b, t01=0x0080}
0x05cbc…05ce4               Head {h00=0x0024, h01=0x0050, text=» DATA SYMDL4 MAX. PACKET LENGTH «, t00=0x003b, t01=0x00ae}
0x05ce4…05d0a               Head {h00=0x0022, h01=0x0050, text=» DATA SYMXW4 MAX. WINDOW SIZE «, t00=0x003b, t01=0x00d6}
0x05d0a…05d42               Head {h00=0x0034, h01=0x0050, text=» BYTE SYNRL4,SYNRP4 # OF LOG.CH. AND # OF PVC'S «, t00=0x003b, t01=0x00fc}
0x05d42…05d5e               Head {h00=0x0018, h01=0x0050, text=» RORG LINBL4+LNBLNG «, t00=0x003b, t01=0x0134}
0x05d5e…05d68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0150}
0x05d68…05d9a               Head {h00=0x002e, h01=0x0050, text=»* BLOCK WITH LOGICAL CHANNEL ADM. POINTERS«, t00=0x003b, t01=0x015a}
0x05d9a…05da4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x018c}
0x05da4…05db8               Head {h00=0x0010, h01=0x0050, text=»LCADM4 EQU *«, t00=0x003c, t01=0x0008}
0x05db8…05dce               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.1 «, t00=0x003c, t01=0x001c}
0x05dce…05de4               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=1 «, t00=0x003c, t01=0x0032}
0x05de4…05dfa               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.2 «, t00=0x003c, t01=0x0048}
0x05dfa…05e10               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=2 «, t00=0x003c, t01=0x005e}
0x05e10…05e26               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.3 «, t00=0x003c, t01=0x0074}
0x05e26…05e3c               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=3 «, t00=0x003c, t01=0x008a}
0x05e3c…05e52               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.4 «, t00=0x003c, t01=0x00a0}
0x05e52…05e68               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=4 «, t00=0x003c, t01=0x00b6}
0x05e68…05e7e               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.5 «, t00=0x003c, t01=0x00cc}
0x05e7e…05e94               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=5 «, t00=0x003c, t01=0x00e2}
0x05e94…05eaa               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.6 «, t00=0x003c, t01=0x00f8}
0x05eaa…05ec0               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=6 «, t00=0x003c, t01=0x010e}
0x05ec0…05ed6               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.7 «, t00=0x003c, t01=0x0124}
0x05ed6…05eec               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=7 «, t00=0x003c, t01=0x013a}
0x05eec…05f02               Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.8 «, t00=0x003c, t01=0x0150}
0x05f02…05f0e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0166}
0x05f0e…05f1c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x0172}
0x05f1c…05f32               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x003c, t01=0x0180}
0x05f32…05f48               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x003d, t01=0x0008}
0x05f48…05f5e               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=3 «, t00=0x003d, t01=0x001e}
0x05f5e…05f68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0034}
0x05f68…05f98               Head {h00=0x002c, h01=0x0050, text=»* LOGICAL CHANNEL ADMINISTRATION BLOCKS «, t00=0x003d, t01=0x003e}
0x05f98…05fa2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x006e}
0x05fa2…05fb8               Head {h00=0x0012, h01=0x0050, text=»LCAD4.1 EQU * «, t00=0x003d, t01=0x0078}
0x05fb8…05fd4               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.1+LCALNG«, t00=0x003d, t01=0x008e}
0x05fd4…05fea               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=1 «, t00=0x003d, t01=0x00aa}
0x05fea…06000               Head {h00=0x0012, h01=0x0050, text=»LCAD4.2 EQU * «, t00=0x003d, t01=0x00c0}
0x06000…0601c               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.2+LCALNG«, t00=0x003d, t01=0x00d6}
0x0601c…06032               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=2 «, t00=0x003d, t01=0x00f2}
0x06032…06048               Head {h00=0x0012, h01=0x0050, text=»LCAD4.3 EQU * «, t00=0x003d, t01=0x0108}
0x06048…06064               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.3+LCALNG«, t00=0x003d, t01=0x011e}
0x06064…0607a               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=3 «, t00=0x003d, t01=0x013a}
0x0607a…06090               Head {h00=0x0012, h01=0x0050, text=»LCAD4.4 EQU * «, t00=0x003d, t01=0x0150}
0x06090…060ac               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.4+LCALNG«, t00=0x003d, t01=0x0166}
0x060ac…060c2               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=4 «, t00=0x003d, t01=0x0182}
0x060c2…060d8               Head {h00=0x0012, h01=0x0050, text=»LCAD4.5 EQU * «, t00=0x003e, t01=0x0008}
0x060d8…060f4               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.5+LCALNG«, t00=0x003e, t01=0x001e}
0x060f4…0610a               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=5 «, t00=0x003e, t01=0x003a}
0x0610a…06120               Head {h00=0x0012, h01=0x0050, text=»LCAD4.6 EQU * «, t00=0x003e, t01=0x0050}
0x06120…0613c               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.6+LCALNG«, t00=0x003e, t01=0x0066}
0x0613c…06152               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=6 «, t00=0x003e, t01=0x0082}
0x06152…06168               Head {h00=0x0012, h01=0x0050, text=»LCAD4.7 EQU * «, t00=0x003e, t01=0x0098}
0x06168…06184               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.7+LCALNG«, t00=0x003e, t01=0x00ae}
0x06184…0619a               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=7 «, t00=0x003e, t01=0x00ca}
0x0619a…061b0               Head {h00=0x0012, h01=0x0050, text=»LCAD4.8 EQU * «, t00=0x003e, t01=0x00e0}
0x061b0…061cc               Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.8+LCALNG«, t00=0x003e, t01=0x00f6}
0x061cc…061d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0112}
0x061d8…061e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x011e}
0x061e2…061f0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003e, t01=0x0128}
0x061f0…061fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0136}
0x061fa…06204               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0140}
0x06204…0621a               Head {h00=0x0012, h01=0x0050, text=»* BUFFER POOL «, t00=0x003e, t01=0x014a}
0x0621a…06224               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0160}
0x06224…06276               Head {h00=0x004e, h01=0x0050, text=»*        THE SIZE OF THE BUFFER AREAS CAN BE OBTAINED IN THE FOLLOWING WAY«, t00=0x003e, t01=0x016a}
0x06276…062c4               Head {h00=0x004a, h01=0x0050, text=»*          NUMBER OF BUFFERS NEEDED PER LOGICAL CHANNEL = WINDOW SIZE «, t00=0x003f, t01=0x002c}
0x062c4…06314               Head {h00=0x004c, h01=0x0050, text=»*          PER LINE SYNRRC BUFFERS FOR INPUT REQUEST AND SYUBNR BUFFERS «, t00=0x003f, t01=0x007a}
0x06314…0633a               Head {h00=0x0022, h01=0x0050, text=»*          TO BE USED BY HDLC «, t00=0x003f, t01=0x00ca}
0x0633a…0638e               Head {h00=0x0050, h01=0x0050, text=»*          THE TOTAL NUMBER OF BUFFERS CAN THEN BE CALCULATED BY THE FORMULA«, t00=0x003f, t01=0x00f0}
0x0638e…063dc               Head {h00=0x004a, h01=0x0050, text=»*          SYNRLN*(SYNRRC+SYUBNR)+SYNRL1*SYMXW1+SYNRL2*SYMXW2+.... ETC«, t00=0x003f, t01=0x0144}
0x063dc…063e6 (64, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0004}
0x063e6…0643c               Head {h00=0x0052, h01=0x0050, text=»*        THE BUFFER LENGTH IS OBTAINED BY SYMXDL+BEGDAT+1. THIS IS THE LENGTH «, t00=0x0040, t01=0x000e}
0x0643c…0648a               Head {h00=0x004a, h01=0x0050, text=»*        IN CHARACTERS. THIS LENGTH HAS TO BE EVEN (CHAIN POINTER FOR «, t00=0x0040, t01=0x0064}
0x0648a…064ae               Head {h00=0x0020, h01=0x0050, text=»*        QUEUEING EXCLUDED) «, t00=0x0040, t01=0x00b2}
0x064ae…064b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00d6}
0x064b8…064da               Head {h00=0x001e, h01=0x0050, text=»BUFLEN EQU SYMXDL+BEGDAT+1«, t00=0x0040, t01=0x00e0}
0x064da…064e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0102}
0x064e4…0652c               Head {h00=0x0044, h01=0x0050, text=»*        THE POOLSIZE IN WORDS IS OBTAINED BY NRBUF*(BUFLEN+2)/2«, t00=0x0040, t01=0x010c}
0x0652c…06536               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0154}
0x06536…0654a               Head {h00=0x0010, h01=0x0050, text=»X:V EQU 680 «, t00=0x0040, t01=0x015e}
0x0654a…06576               Head {h00=0x0028, h01=0x0050, text=»POOLEN EQU X:V LENGTH OF BUFFER POOL«, t00=0x0040, t01=0x0172}
0x06576…0658a               Head {h00=0x0010, h01=0x0050, text=»BUFPOL EQU *«, t00=0x0041, t01=0x000e}
0x0658a…065a8               Head {h00=0x001a, h01=0x0050, text=» RES POOLEN POOL AREA «, t00=0x0041, t01=0x0022}
0x065a8…065c4               Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0041, t01=0x0040}
0x065c4…065d8               Head {h00=0x0010, h01=0x0050, text=»BPEND EQU * «, t00=0x0041, t01=0x005c}
0x065d8…065e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0070}
0x065e2…06604               Head {h00=0x001e, h01=0x0050, text=»* BUFFER POOL CHAIN ANCHOR«, t00=0x0041, t01=0x007a}
0x06604…0660e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x009c}
0x0660e…06628               Head {h00=0x0016, h01=0x0050, text=»BUFANC DATA BUFPOL«, t00=0x0041, t01=0x00a6}
0x06628…06632               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00c0}
0x06632…06640               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x00ca}
0x06640…0664a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00d8}
0x0664a…06674               Head {h00=0x0026, h01=0x0050, text=»* TTAB FOR #X-TASK IN X25 PACKAGE «, t00=0x0041, t01=0x00e2}
0x06674…0667e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x010c}
0x0667e…06694               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0041, t01=0x0116}
0x06694…066bc               Head {h00=0x0024, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0 MMU TABLE «, t00=0x0041, t01=0x012c}
0x066bc…066dc               Head {h00=0x001c, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0 . «, t00=0x0041, t01=0x0154}
0x066dc…06700               Head {h00=0x0020, h01=0x0050, text=» DATA 0 CURRENT SEGMENT BASE«, t00=0x0041, t01=0x0174}
0x06700…06726               Head {h00=0x0022, h01=0x0050, text=» DATA 0 SEGMENT TABLE POINTER «, t00=0x0042, t01=0x0008}
0x06726…0674c               Head {h00=0x0022, h01=0x0050, text=» DATA 0 SEGMENT BLOCK POINTER «, t00=0x0042, t01=0x002e}
0x0674c…06758               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0054}
0x06758…0678a               Head {h00=0x002e, h01=0x0050, text=» DATA 0 APPLICATION CONTROL BLOCK POINTER «, t00=0x0042, t01=0x0060}
0x0678a…0679e               Head {h00=0x0010, h01=0x0050, text=»TTBX25 EQU *«, t00=0x0042, t01=0x0092}
0x0679e…067c4               Head {h00=0x0022, h01=0x0050, text=» DATA 0 DISPATCHER QUEUE LINK «, t00=0x0042, t01=0x00a6}
0x067c4…067ea               Head {h00=0x0022, h01=0x0050, text=» DATA '#X' TASK IDENTIFICATION«, t00=0x0042, t01=0x00cc}
0x067ea…0680a               Head {h00=0x001c, h01=0x0050, text=» DATA 50 PRIORITY LEVEL «, t00=0x0042, t01=0x00f2}
0x0680a…0682a               Head {h00=0x001c, h01=0x0050, text=» DATA 0 PENDING POINTER «, t00=0x0042, t01=0x0112}
0x0682a…06856               Head {h00=0x0028, h01=0x0050, text=» DATA /C8C0 PSW(PROGRAM STATUS WORD)«, t00=0x0042, t01=0x0132}
0x06856…06876               Head {h00=0x001c, h01=0x0050, text=» DATA 0 DISPATCH ADDRESS«, t00=0x0042, t01=0x015e}
0x06876…068ae               Head {h00=0x0034, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0 REGISTER SAVE AREA,A1-A14 «, t00=0x0042, t01=0x017e}
0x068ae…068cc               Head {h00=0x001a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0 . «, t00=0x0043, t01=0x0026}
0x068cc…068d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0044}
0x068d6…068e4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0043, t01=0x004e}
0x068e4…068ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x005c}
0x068ee…068f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0066}
0x068f8…0692e               Head {h00=0x0032, h01=0x0050, text=»* MODULE CALLED BY TOSSIO FOR AN USER REQUEST «, t00=0x0043, t01=0x0070}
0x0692e…06938               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00a6}
0x06938…0696c               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0043, t01=0x00b0}
0x0696c…06976               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00e4}
0x06976…06990               Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMETER:«, t00=0x0043, t01=0x00ee}
0x06990…069ac               Head {h00=0x0018, h01=0x0050, text=»*  A6 = DWT-ADDRESS «, t00=0x0043, t01=0x0108}
0x069ac…069b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0124}
0x069b6…069d2               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0043, t01=0x012e}
0x069d2…069ea               Head {h00=0x0014, h01=0x0050, text=»*  ABI    DRX25 «, t00=0x0043, t01=0x014a}
0x069ea…069f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0162}
0x069f4…06a1c               Head {h00=0x0024, h01=0x0050, text=»***** DRIVER ADDRESS BLOCK *****«, t00=0x0043, t01=0x016c}
0x06a1c…06a3e (68, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» DATA SYMXDL BUFFER LENGTH«, t00=0x0044, t01=0x0004}
0x06a3e…06a5a               Head {h00=0x0018, h01=0x0050, text=» DATA 0 DEVICE INDEX«, t00=0x0044, t01=0x0026}
0x06a5a…06a6e               Head {h00=0x0010, h01=0x0050, text=»DRX25 EQU * «, t00=0x0044, t01=0x0042}
0x06a6e…06a96               Head {h00=0x0024, h01=0x0050, text=» DATA DRX250 ACTIVATION ADDRESS «, t00=0x0044, t01=0x0056}
0x06a96…06ac0               Head {h00=0x0026, h01=0x0050, text=» DATA ABTREQ ABORT ROUTINE ADDRESS«, t00=0x0044, t01=0x007e}
0x06ac0…06ae8               Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0044, t01=0x00a8}
0x06ae8…06afc               Head {h00=0x0010, h01=0x0050, text=»DRX250 EQU *«, t00=0x0044, t01=0x00d0}
0x06afc…06b18               Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 PARAMETER«, t00=0x0044, t01=0x00e4}
0x06b18…06b40               Head {h00=0x0024, h01=0x0050, text=» LDKL A5,TTBX25 GET TTAB ADDRESS«, t00=0x0044, t01=0x0100}
0x06b40…06b68               Head {h00=0x0024, h01=0x0050, text=» LDKL A2,RHOP ACTIVATION ADDRESS«, t00=0x0044, t01=0x0128}
0x06b68…06b7a               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0044, t01=0x0150}
0x06b7a…06ba0               Head {h00=0x0022, h01=0x0050, text=» CF A15,ACTOT ACTIVATE #X-TASK«, t00=0x0044, t01=0x0162}
0x06ba0…06bb2               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0044, t01=0x0188}
0x06bb2…06bc0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x000a}
0x06bc0…06bca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0018}
0x06bca…06bd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0022}
0x06bd4…06c0e               Head {h00=0x0036, h01=0x0050, text=»* THIS MODULE IS CALLED AT MONITOR INITIATION TIME«, t00=0x0045, t01=0x002c}
0x06c0e…06c18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0066}
0x06c18…06c4c               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0045, t01=0x0070}
0x06c4c…06c56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00a4}
0x06c56…06c72               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0045, t01=0x00ae}
0x06c72…06c82               Head {h00=0x000c, h01=0x0050, text=»*  NONE «, t00=0x0045, t01=0x00ca}
0x06c82…06c8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00da}
0x06c8c…06ca8               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0045, t01=0x00e4}
0x06ca8…06cc4               Head {h00=0x0018, h01=0x0050, text=»*  CF    A15,X25:ON «, t00=0x0045, t01=0x0100}
0x06cc4…06cce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x011c}
0x06cce…06ce2               Head {h00=0x0010, h01=0x0050, text=»X25:ON EQU *«, t00=0x0045, t01=0x0126}
0x06ce2…06d1a               Head {h00=0x0034, h01=0x0050, text=» LDKL A1,LINTAB TABLE WITH LINE BLOCK ADDRESSES «, t00=0x0045, t01=0x013a}
0x06d1a…06d30               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0045, t01=0x0172}
0x06d30…06d56               Head {h00=0x0022, h01=0x0050, text=» LDK A2,SYNRLN NUMBER OF LINES«, t00=0x0045, t01=0x0188}
0x06d56…06d62               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x001e}
0x06d62…06d6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x002a}
0x06d6c…06d8a               Head {h00=0x001a, h01=0x0050, text=»* INITIATE LINE BLOCK «, t00=0x0046, t01=0x0034}
0x06d8a…06d94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0052}
0x06d94…06da8               Head {h00=0x0010, h01=0x0050, text=»X25ON1 EQU *«, t00=0x0046, t01=0x005c}
0x06da8…06dce               Head {h00=0x0022, h01=0x0050, text=» LDR* A4,A1 LINE BLOCK ADDRESS«, t00=0x0046, t01=0x0070}
0x06dce…06dee               Head {h00=0x001c, h01=0x0050, text=» CM CMNFLG,A4 CLEAR FLAG«, t00=0x0046, t01=0x0096}
0x06dee…06e18               Head {h00=0x0026, h01=0x0050, text=» LD A6,CHAIN,A4 ANY DWT IN CHAIN ?«, t00=0x0046, t01=0x00b6}
0x06e18…06e30               Head {h00=0x0014, h01=0x0050, text=» RF(Z) X25ON3 NO«, t00=0x0046, t01=0x00e0}
0x06e30…06e3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00f8}
0x06e3a…06e50               Head {h00=0x0012, h01=0x0050, text=»* INITIATE DWT«, t00=0x0046, t01=0x0102}
0x06e50…06e5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0118}
0x06e5a…06e6e               Head {h00=0x0010, h01=0x0050, text=»X25ON2 EQU *«, t00=0x0046, t01=0x0122}
0x06e6e…06e82               Head {h00=0x0010, h01=0x0050, text=» LDKL A3,NEG«, t00=0x0046, t01=0x0136}
0x06e82…06ea4               Head {h00=0x001e, h01=0x0050, text=» ST A3,DWTST,A6 SET STATUS«, t00=0x0046, t01=0x014a}
0x06ea4…06ed8               Head {h00=0x0030, h01=0x0050, text=» CM DWTFNC,A6 CLEAR FUNCTION CODE AND STATE «, t00=0x0046, t01=0x016c}
0x06ed8…06f0c               Head {h00=0x0030, h01=0x0050, text=» CM DWTRTP,A6 CLEAR RUNNING TIMER INDICATION«, t00=0x0047, t01=0x0010}
0x06f0c…06f40               Head {h00=0x0030, h01=0x0050, text=» LD A3,DWTCHN,A6 MORE DWT'S FOR THIS LINE ? «, t00=0x0047, t01=0x0044}
0x06f40…06f4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0078}
0x06f4a…06f58               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x0082}
0x06f58…06f70               Head {h00=0x0014, h01=0x0050, text=» CM DWTCHN,A6 . «, t00=0x0047, t01=0x0090}
0x06f70…06f84               Head {h00=0x0010, h01=0x0050, text=» LDR A6,A3 .«, t00=0x0047, t01=0x00a8}
0x06f84…06f9e               Head {h00=0x0016, h01=0x0050, text=» RB(NZ) X25ON2 YES«, t00=0x0047, t01=0x00bc}
0x06f9e…06fbe               Head {h00=0x001c, h01=0x0050, text=» CM CHAIN,A4 RESET CHAIN«, t00=0x0047, t01=0x00d6}
0x06fbe…06fd2               Head {h00=0x0010, h01=0x0050, text=»X25ON3 EQU *«, t00=0x0047, t01=0x00f6}
0x06fd2…06fe8               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0047, t01=0x010a}
0x06fe8…06ffa               Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0047, t01=0x0120}
0x06ffa…07018               Head {h00=0x001a, h01=0x0050, text=» SUK A2,1 NEXT LINE ? «, t00=0x0047, t01=0x0132}
0x07018…07032               Head {h00=0x0016, h01=0x0050, text=» RB(P) X25ON1 YES «, t00=0x0047, t01=0x0150}
0x07032…0703e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x016a}
0x0703e…07048               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0176}
0x07048…07066               Head {h00=0x001a, h01=0x0050, text=»* INITIATE BUFFER POOL«, t00=0x0047, t01=0x0180}
0x07066…07070               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x000e}
0x07070…070a4               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,BUFPOL START ADDRESS OF BUFFER POOL«, t00=0x0048, t01=0x0018}
0x070a4…070cc               Head {h00=0x0024, h01=0x0050, text=» ST A2,BUFANC BUFFER POOL ANCHOR«, t00=0x0048, t01=0x004c}
0x070cc…070e0               Head {h00=0x0010, h01=0x0050, text=»X25ON4 EQU *«, t00=0x0048, t01=0x0074}
0x070e0…07106               Head {h00=0x0022, h01=0x0050, text=» LDR A1,A2 SAVE BUFFER ADDRESS«, t00=0x0048, t01=0x0088}
0x07106…0711e               Head {h00=0x0014, h01=0x0050, text=» ADK A2,BUFLEN+2«, t00=0x0048, t01=0x00ae}
0x0711e…0713e               Head {h00=0x001c, h01=0x0050, text=» STR A2,A1 CREATE CHAIN «, t00=0x0048, t01=0x00c6}
0x0713e…07150               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0048, t01=0x00e6}
0x07150…07184               Head {h00=0x0030, h01=0x0050, text=» SUKL A3,BPEND END OF BUFFER POOL REACHED ? «, t00=0x0048, t01=0x00f8}
0x07184…0719c               Head {h00=0x0014, h01=0x0050, text=» RB(L) X25ON4 NO«, t00=0x0048, t01=0x012c}
0x0719c…071b8               Head {h00=0x0018, h01=0x0050, text=» CMR A1 END OF CHAIN«, t00=0x0048, t01=0x0144}
0x071b8…071cc               Head {h00=0x0010, h01=0x0050, text=» IFT TRACE=1«, t00=0x0048, t01=0x0160}
0x071cc…071d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0174}
0x071d6…071f4               Head {h00=0x001a, h01=0x0050, text=»* ACTIVATE TRACE TASK «, t00=0x0048, t01=0x017e}
0x071f4…071fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x000c}
0x071fe…07226               Head {h00=0x0024, h01=0x0050, text=» LDKL A2,TRAC ACTIVATION ADDRESS«, t00=0x0049, t01=0x0016}
0x07226…0724a               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,TRTASK TTAB ADDRESS«, t00=0x0049, t01=0x003e}
0x0724a…07270               Head {h00=0x0022, h01=0x0050, text=» CF A15,ACTOT ACTIVATE #T-TASK«, t00=0x0049, t01=0x0062}
0x07270…0727c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0088}
0x0727c…07292               Head {h00=0x0012, h01=0x0050, text=» RTN A15 READY«, t00=0x0049, t01=0x0094}
0x07292…072a0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x00aa}
0x072a0…072aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00b8}
0x072aa…072ca               Head {h00=0x001c, h01=0x0050, text=»* ABORT REQUEST HANDLER «, t00=0x0049, t01=0x00c2}
0x072ca…072d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00e2}
0x072d4…07308               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0049, t01=0x00ec}
0x07308…07312               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0120}
0x07312…0732c               Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMETER:«, t00=0x0049, t01=0x012a}
0x0732c…07348               Head {h00=0x0018, h01=0x0050, text=»*  A6 = DWT-ADDRESS «, t00=0x0049, t01=0x0144}
0x07348…07352               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0160}
0x07352…0736e               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0049, t01=0x016a}
0x0736e…0738a               Head {h00=0x0018, h01=0x0050, text=»*  CF    A15,ABTREQ «, t00=0x0049, t01=0x0186}
0x0738a…07394               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0012}
0x07394…073b0               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x004a, t01=0x001c}
0x073b0…073c0               Head {h00=0x000c, h01=0x0050, text=»*  NONE «, t00=0x004a, t01=0x0038}
0x073c0…073fe               Head {h00=0x003a, h01=0x0050, text=»*  WHEN IT IS A ILLEGAL REQUEST THE ROUTINE WILL HALT «, t00=0x004a, t01=0x0048}
0x073fe…07408               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0086}
0x07408…0741c               Head {h00=0x0010, h01=0x0050, text=»ABTREQ EQU *«, t00=0x004a, t01=0x0090}
0x0741c…0744a               Head {h00=0x002a, h01=0x0050, text=» LDK A1,READAT WAS IT A READ REQUEST ?«, t00=0x004a, t01=0x00a4}
0x0744a…07464               Head {h00=0x0016, h01=0x0050, text=» CC A1,DWTFNC,A6 .«, t00=0x004a, t01=0x00d2}
0x07464…0747e               Head {h00=0x0016, h01=0x0050, text=» RF(NE) ABT000 NO «, t00=0x004a, t01=0x00ec}
0x0747e…074a4               Head {h00=0x0022, h01=0x0050, text=»         LD       A1,DWTRTP,A6«, t00=0x004a, t01=0x0106}
0x074a4…074c4               Head {h00=0x001c, h01=0x0050, text=»         LDR      A8,A14«, t00=0x004a, t01=0x012c}
0x074c4…074e8               Head {h00=0x0020, h01=0x0050, text=»         LDKL     A14,DCSTAK«, t00=0x004a, t01=0x014c}
0x074e8…07524               Head {h00=0x0038, h01=0x0050, text=»         CF       A14,CANTIM            CANCEL TIMER«, t00=0x004a, t01=0x0170}
0x07524…07544               Head {h00=0x001c, h01=0x0050, text=»         LDR      A14,A8«, t00=0x004b, t01=0x001c}
0x07544…07568               Head {h00=0x0020, h01=0x0050, text=»         CM       DWTRTP,A6 «, t00=0x004b, t01=0x003c}
0x07568…0758e               Head {h00=0x0022, h01=0x0050, text=»         LD       A8,DWTECB,A6«, t00=0x004b, t01=0x0060}
0x0758e…075b4               Head {h00=0x0022, h01=0x0050, text=»         ST       A1,ECBCW1,A8«, t00=0x004b, t01=0x0086}
0x075b4…075e2               Head {h00=0x002a, h01=0x0050, text=» LDKL A1,ABOT.RC RETURN CODE = ABORTED«, t00=0x004b, t01=0x00ac}
0x075e2…0760a               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004b, t01=0x00da}
0x0760a…0761e               Head {h00=0x0010, h01=0x0050, text=»ABT000 EQU *«, t00=0x004b, t01=0x0102}
0x0761e…0763a               Head {h00=0x0018, h01=0x0050, text=» ABL TDISP DISPATCH «, t00=0x004b, t01=0x0116}
0x0763a…07648               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004b, t01=0x0132}
0x07648…07652               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0140}
0x07652…07696               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004b, t01=0x014a}
0x07696…076a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x018e}
0x076a0…076c6               Head {h00=0x0022, h01=0x0050, text=»* REQUEST HANDLER OUTPUT PART «, t00=0x004c, t01=0x0008}
0x076c6…076d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x002e}
0x076d0…07714               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004c, t01=0x0038}
0x07714…0771e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x007c}
0x0771e…07730               Head {h00=0x000e, h01=0x0050, text=»RHOP EQU *«, t00=0x004c, t01=0x0086}
0x07730…0774e               Head {h00=0x001a, h01=0x0050, text=»         LDK      A2,2«, t00=0x004c, t01=0x0098}
0x0774e…07790               Head {h00=0x003e, h01=0x0050, text=»         ST       A2,DCLEVL        SET PROCESS INDICATION «, t00=0x004c, t01=0x00b6}
0x07790…077b4               Head {h00=0x0020, h01=0x0050, text=» LDR A6,A1 COPY DWT ADDRESS «, t00=0x004c, t01=0x00f8}
0x077b4…077cc               Head {h00=0x0014, h01=0x0050, text=» LD A8,DWTECB,A6«, t00=0x004c, t01=0x011c}
0x077cc…077e4               Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTSTE,A6«, t00=0x004c, t01=0x0134}
0x077e4…077fc               Head {h00=0x0014, h01=0x0050, text=» LD A5,ECBRL,A8 «, t00=0x004c, t01=0x014c}
0x077fc…07822               Head {h00=0x0022, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER CODE«, t00=0x004c, t01=0x0164}
0x07822…0785c               Head {h00=0x0036, h01=0x0050, text=» LDKL A11,TRANSP ROUTINE TO CALL TRANSPORT HANDLER«, t00=0x004c, t01=0x018a}
0x0785c…07888               Head {h00=0x0028, h01=0x0050, text=» LDKL A14,DCSTAK SUBR.STACK POINTER «, t00=0x004d, t01=0x0034}
0x07888…078ac               Head {h00=0x0020, h01=0x0050, text=» ANK A7,/3F MASK ORDER CODE «, t00=0x004d, t01=0x0060}
0x078ac…078ce               Head {h00=0x001e, h01=0x0050, text=» RF(Z) RSTS00 READ STATUS «, t00=0x004d, t01=0x0084}
0x078ce…078e0               Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x004d, t01=0x00a6}
0x078e0…078fa               Head {h00=0x0016, h01=0x0050, text=» RF(Z) READ00 READ«, t00=0x004d, t01=0x00b8}
0x078fa…07912               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x004d, t01=0x00d2}
0x07912…0792e               Head {h00=0x0018, h01=0x0050, text=» RF(Z) WRIT00 WRITE «, t00=0x004d, t01=0x00ea}
0x0792e…07946               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/21-/06 «, t00=0x004d, t01=0x0106}
0x07946…07962               Head {h00=0x0018, h01=0x0050, text=» ABL(Z) OPEN00 OPEN «, t00=0x004d, t01=0x011e}
0x07962…0797a               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/22-/21 «, t00=0x004d, t01=0x013a}
0x0797a…07996               Head {h00=0x0018, h01=0x0050, text=» ABL(Z) CLOS00 CLOSE«, t00=0x004d, t01=0x0152}
0x07996…079ae               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/24-/22 «, t00=0x004d, t01=0x016e}
0x079ae…079d4               Head {h00=0x0022, h01=0x0050, text=» ABL(Z) CONA00 CONNECT ACTIVE «, t00=0x004d, t01=0x0186}
0x079d4…079de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x001c}
0x079de…079ec               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004e, t01=0x0026}
0x079ec…079f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0034}
0x079f6…07a0e               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/27-/24 «, t00=0x004e, t01=0x003e}
0x07a0e…07a34               Head {h00=0x0022, h01=0x0050, text=» ABL(Z) CONP00 CONNECT PASSIVE«, t00=0x004e, t01=0x0056}
0x07a34…07a4c               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/2F-/27 «, t00=0x004e, t01=0x007c}
0x07a4c…07a6e               Head {h00=0x001e, h01=0x0050, text=» ABL(Z) DISC00 DISCONNECT «, t00=0x004e, t01=0x0094}
0x07a6e…07a86               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/2F «, t00=0x004e, t01=0x00b6}
0x07a86…07aa8               Head {h00=0x001e, h01=0x0050, text=» ABL(Z) STAT00 SET STATUS «, t00=0x004e, t01=0x00ce}
0x07aa8…07ac0               Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/38 «, t00=0x004e, t01=0x00f0}
0x07ac0…07ae4               Head {h00=0x0020, h01=0x0050, text=» ABL(Z) TIMO00 SET TIME OUT «, t00=0x004e, t01=0x0108}
0x07ae4…07af8               Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x004e, t01=0x012c}
0x07af8…07b0c               Head {h00=0x0010, h01=0x0050, text=» ADK A7,/39 «, t00=0x004e, t01=0x0140}
0x07b0c…07b20               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/2D «, t00=0x004e, t01=0x0154}
0x07b20…07b40               Head {h00=0x001c, h01=0x0050, text=» ABL(Z) STATS STATISTICS«, t00=0x004e, t01=0x0168}
0x07b40…07b4c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x0188}
0x07b4c…07b60 (79, 0, 400)  Head {h00=0x0010, h01=0x0050, text=»ERRREQ EQU *«, t00=0x004f, t01=0x0004}
0x07b60…07b86               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,RQUE.RC REQUEST ERROR«, t00=0x004f, t01=0x0018}
0x07b86…07baa               Head {h00=0x0020, h01=0x0050, text=» ABL RHEXIT COMPLETE REQUEST«, t00=0x004f, t01=0x003e}
0x07baa…07bb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0062}
0x07bb4…07bc2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004f, t01=0x006c}
0x07bc2…07bcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x007a}
0x07bcc…07c1a               Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x004f, t01=0x0084}
0x07c1a…07c24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00d2}
0x07c24…07c42               Head {h00=0x001a, h01=0x0050, text=»* READ STATUS REQUEST «, t00=0x004f, t01=0x00dc}
0x07c42…07c4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00fa}
0x07c4c…07c9a               Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x004f, t01=0x0104}
0x07c9a…07ca4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0152}
0x07ca4…07cb8               Head {h00=0x0010, h01=0x0050, text=»RSTS00 EQU *«, t00=0x004f, t01=0x015c}
0x07cb8…07ce6               Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTLAD,A6 GET LOCAL DTE ADDRESS«, t00=0x004f, t01=0x0170}
0x07ce6…07d0c               Head {h00=0x0022, h01=0x0050, text=» CF A14,FNDLIN GET LINE FLAGS «, t00=0x0050, t01=0x000e}
0x07d0c…07d1e               Head {h00=0x000e, h01=0x0050, text=» SLL A1,8 «, t00=0x0050, t01=0x0034}
0x07d1e…07d40               Head {h00=0x001e, h01=0x0050, text=» ANK A4,/FF GET DWT STATE «, t00=0x0050, t01=0x0046}
0x07d40…07d62               Head {h00=0x001e, h01=0x0050, text=» ORR A4,A1 PUT IT TOGETHER«, t00=0x0050, t01=0x0068}
0x07d62…07d7a               Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBCW1,A8«, t00=0x0050, t01=0x008a}
0x07d7a…07d90               Head {h00=0x0012, h01=0x0050, text=» LDK A2,DWTRCI«, t00=0x0050, t01=0x00a2}
0x07d90…07da2               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0050, t01=0x00b8}
0x07da2…07dcc               Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A2 GET RETURN CODE INFO. «, t00=0x0050, t01=0x00ca}
0x07dcc…07dde               Head {h00=0x000e, h01=0x0050, text=» LDR A7,A1«, t00=0x0050, t01=0x00f4}
0x07dde…07e04               Head {h00=0x0022, h01=0x0050, text=» ANKL A1,-2 RESET TOLD.RC-BIT «, t00=0x0050, t01=0x0106}
0x07e04…07e2e               Head {h00=0x0026, h01=0x0050, text=» ANK A7,MORE.RC MORE INFORMATION ?«, t00=0x0050, t01=0x012c}
0x07e2e…07e48               Head {h00=0x0016, h01=0x0050, text=» ABL(Z) RHEXIT NO «, t00=0x0050, t01=0x0156}
0x07e48…07e6a               Head {h00=0x001e, h01=0x0050, text=» ADK A5,0 REQUESTED LENGTH«, t00=0x0050, t01=0x0170}
0x07e6a…07e8e (81, 0, 398)  Head {h00=0x0020, h01=0x0050, text=» RF(Z) RSTS10 NO USER BUFFER«, t00=0x0051, t01=0x0004}
0x07e8e…07eb6               Head {h00=0x0024, h01=0x0050, text=» ABL(N) ERRLEN INCORRECT LENGTH «, t00=0x0051, t01=0x0028}
0x07eb6…07ec8               Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0051, t01=0x0050}
0x07ec8…07ef0               Head {h00=0x0024, h01=0x0050, text=» ABL(NP) ERRLEN BUFFER TO SHORT «, t00=0x0051, t01=0x0062}
0x07ef0…07efa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x008a}
0x07efa…07f08               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0051, t01=0x0094}
0x07f08…07f12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00a2}
0x07f12…07f32               Head {h00=0x001c, h01=0x0050, text=»* MORE INFORMATION FOUND«, t00=0x0051, t01=0x00ac}
0x07f32…07f3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00cc}
0x07f3c…07f50               Head {h00=0x0010, h01=0x0050, text=»RSTS10 EQU *«, t00=0x0051, t01=0x00d6}
0x07f50…07f78               Head {h00=0x0024, h01=0x0050, text=» XRRS A7,A2 RESET MORE INFO BIT «, t00=0x0051, t01=0x00ea}
0x07f78…07f8e               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0051, t01=0x0112}
0x07f8e…07fae               Head {h00=0x001c, h01=0x0050, text=» ANK A1,RSET.RC+CLEA.RC «, t00=0x0051, t01=0x0128}
0x07fae…07fc0               Head {h00=0x000e, h01=0x0050, text=» LDR A7,A1«, t00=0x0051, t01=0x0148}
0x07fc0…07fe0               Head {h00=0x001c, h01=0x0050, text=» ANK A1,RSET.RC RESET ? «, t00=0x0051, t01=0x015a}
0x07fe0…07ff8               Head {h00=0x0014, h01=0x0050, text=» RF(Z) RSTS30 NO«, t00=0x0051, t01=0x017a}
0x07ff8…0801c (82, 0, 398)  Head {h00=0x0020, h01=0x0050, text=» XRRS A1,A2 RESET RESET-BIT «, t00=0x0052, t01=0x0004}
0x0801c…08026               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0028}
0x08026…08048               Head {h00=0x001e, h01=0x0050, text=»* TEST IF RESET AND CLEAR «, t00=0x0052, t01=0x0032}
0x08048…08052               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0054}
0x08052…0806a               Head {h00=0x0014, h01=0x0050, text=» ANK A7,CLEA.RC «, t00=0x0052, t01=0x005e}
0x0806a…08082               Head {h00=0x0014, h01=0x0050, text=» RF(Z) RSTS15 NO«, t00=0x0052, t01=0x0076}
0x08082…080ac               Head {h00=0x0026, h01=0x0050, text=» LDK A7,MORE.RC SET MORE INFO-BIT «, t00=0x0052, t01=0x008e}
0x080ac…080c2               Head {h00=0x0012, h01=0x0050, text=» XRRS A7,A2 . «, t00=0x0052, t01=0x00b8}
0x080c2…080d6               Head {h00=0x0010, h01=0x0050, text=»RSTS15 EQU *«, t00=0x0052, t01=0x00ce}
0x080d6…080e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x00e2}
0x080e2…08100               Head {h00=0x001a, h01=0x0050, text=» LDK A7,RSET.RC RESET «, t00=0x0052, t01=0x00ee}
0x08100…0812a               Head {h00=0x0026, h01=0x0050, text=» LDK A2,DWTRES DISP FOR RESET INFO«, t00=0x0052, t01=0x010c}
0x0812a…0814a               Head {h00=0x001c, h01=0x0050, text=» ADK A5,0 USER BUFFER ? «, t00=0x0052, t01=0x0136}
0x0814a…08164               Head {h00=0x0016, h01=0x0050, text=» ABL(Z) RHEXIT NO «, t00=0x0052, t01=0x0156}
0x08164…0816e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0170}
0x0816e…0817c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x017a}
0x0817c…08186               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0188}
0x08186…081ac (83, 0, 400)  Head {h00=0x0022, h01=0x0050, text=»* MOVE RESET/CLEAR INFORMATION«, t00=0x0053, t01=0x0004}
0x081ac…081b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x002a}
0x081b6…081ca               Head {h00=0x0010, h01=0x0050, text=»RSTS20 EQU *«, t00=0x0053, t01=0x0034}
0x081ca…081dc               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0053, t01=0x0048}
0x081dc…081f4               Head {h00=0x0014, h01=0x0050, text=» LDK A3,2 LENGTH«, t00=0x0053, t01=0x005a}
0x081f4…0820c               Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x0053, t01=0x0072}
0x0820c…08222               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0053, t01=0x008a}
0x08222…08234               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0053, t01=0x00a0}
0x08234…08258               Head {h00=0x0020, h01=0x0050, text=» LD A2,ECBBA,A8 USER BUFFER «, t00=0x0053, t01=0x00b2}
0x08258…08270               Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTTAB,A6«, t00=0x0053, t01=0x00d6}
0x08270…08282               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x0053, t01=0x00ee}
0x08282…082b6               Head {h00=0x0030, h01=0x0050, text=» CF A15,MOVSU MOVE RESET INFORMATION TO USER«, t00=0x0053, t01=0x0100}
0x082b6…082c8               Head {h00=0x000e, h01=0x0050, text=» ENB  . =1«, t00=0x0053, t01=0x0134}
0x082c8…082d4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x0146}
0x082d4…082ea               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0053, t01=0x0152}
0x082ea…0830a               Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 MOVE INFO...«, t00=0x0053, t01=0x0168}
0x0830a…08334               Head {h00=0x0026, h01=0x0050, text=» ST* A1,ECBBA,A8 ...TO USER BUFFER«, t00=0x0053, t01=0x0188}
0x08334…08340               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x0022}
0x08340…08352               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0054, t01=0x002e}
0x08352…08364               Head {h00=0x000e, h01=0x0050, text=» RF RHEXIT«, t00=0x0054, t01=0x0040}
0x08364…0837a               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0054, t01=0x0052}
0x0837a…0838e               Head {h00=0x0010, h01=0x0050, text=»RSTS30 EQU *«, t00=0x0054, t01=0x0068}
0x0838e…083a0               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0054, t01=0x007c}
0x083a0…083c0               Head {h00=0x001c, h01=0x0050, text=» ANK A1,CLEA.RC CLEAR ? «, t00=0x0054, t01=0x008e}
0x083c0…083e6               Head {h00=0x0022, h01=0x0050, text=» RF(Z) RHEXIT COMPLETE REQUEST«, t00=0x0054, t01=0x00ae}
0x083e6…0841c               Head {h00=0x0032, h01=0x0050, text=» LDK A3,TOLD.RC SET 'TOLD TO USER'-INDICATION «, t00=0x0054, t01=0x00d4}
0x0841c…08432               Head {h00=0x0012, h01=0x0050, text=» ORRS A3,A2 . «, t00=0x0054, t01=0x010a}
0x08432…0845c               Head {h00=0x0026, h01=0x0050, text=» LDK A2,DWTCLE DISP FOR CLEAR INFO«, t00=0x0054, t01=0x0120}
0x0845c…0847c               Head {h00=0x001c, h01=0x0050, text=» ADK A5,0 USER BUFFER ? «, t00=0x0054, t01=0x014a}
0x0847c…08492               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) RSTS20«, t00=0x0054, t01=0x016a}
0x08492…084b6               Head {h00=0x0020, h01=0x0050, text=» RF RHEXIT COMPLETE REQUEST «, t00=0x0054, t01=0x0180}
0x084b6…084c2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x0014}
0x084c2…084cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0020}
0x084cc…084da               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0055, t01=0x002a}
0x084da…084e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0038}
0x084e4…08528               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0055, t01=0x0042}
0x08528…08532               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0086}
0x08532…0855e               Head {h00=0x0028, h01=0x0050, text=»* READ,WRITE AND SET STATUS REQUEST «, t00=0x0055, t01=0x0090}
0x0855e…08568               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00bc}
0x08568…085ac               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0055, t01=0x00c6}
0x085ac…085b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x010a}
0x085b6…085ca               Head {h00=0x0010, h01=0x0050, text=»READ00 EQU *«, t00=0x0055, t01=0x0114}
0x085ca…085de               Head {h00=0x0010, h01=0x0050, text=»WRIT00 EQU *«, t00=0x0055, t01=0x0128}
0x085de…085f2               Head {h00=0x0010, h01=0x0050, text=»STAT00 EQU *«, t00=0x0055, t01=0x013c}
0x085f2…0860a               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTLAD,A6«, t00=0x0055, t01=0x0150}
0x0860a…08638               Head {h00=0x002a, h01=0x0050, text=» CF A14,FNDLIN FIND LINE BLOCK ADDRESS«, t00=0x0055, t01=0x0168}
0x08638…0865e               Head {h00=0x0022, h01=0x0050, text=» ANK A1,STRTFL MASK START FLAG«, t00=0x0056, t01=0x0008}
0x0865e…0868c               Head {h00=0x002a, h01=0x0050, text=» ABL(Z) ERRSYS INCORRECT SYSTEM STATE «, t00=0x0056, t01=0x002e}
0x0868c…086a0               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0056, t01=0x005c}
0x086a0…086ba               Head {h00=0x0016, h01=0x0050, text=» LDR A3,A4 DWTSTE «, t00=0x0056, t01=0x0070}
0x086ba…086e4               Head {h00=0x0026, h01=0x0050, text=» RF(Z) ERRSTE INCORRECT DWT STATE «, t00=0x0056, t01=0x008a}
0x086e4…086ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00b4}
0x086ee…08712               Head {h00=0x0020, h01=0x0050, text=»*        GET LC-ADM ADDRESS «, t00=0x0056, t01=0x00be}
0x08712…0871c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00e2}
0x0871c…08734               Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTLCN,A6«, t00=0x0056, t01=0x00ec}
0x08734…0874a               Head {h00=0x0012, h01=0x0050, text=» CF A14,GTLCAD«, t00=0x0056, t01=0x0104}
0x0874a…08754               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x011a}
0x08754…08778               Head {h00=0x0020, h01=0x0050, text=»* TEST ON RETURN INFORMATION«, t00=0x0056, t01=0x0124}
0x08778…08782               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0148}
0x08782…087b6               Head {h00=0x0030, h01=0x0050, text=» LD A1,DWTRCI,A6 GET RETURN CODE INFORMATION«, t00=0x0056, t01=0x0152}
0x087b6…087c8               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0056, t01=0x0186}
0x087c8…087ec               Head {h00=0x0020, h01=0x0050, text=» ANK A2,MORE.RC MORE INFO ? «, t00=0x0057, t01=0x0008}
0x087ec…08804               Head {h00=0x0014, h01=0x0050, text=» RF(Z) READ20 NO«, t00=0x0057, t01=0x002c}
0x08804…08816               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0057, t01=0x0044}
0x08816…08848               Head {h00=0x002e, h01=0x0050, text=» ANK A2,TOLD.RC RETURN INFO TOLD TO USER ?«, t00=0x0057, t01=0x0056}
0x08848…0885e               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0057, t01=0x0088}
0x0885e…08878               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) READ10 YES«, t00=0x0057, t01=0x009e}
0x08878…08884               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x00b8}
0x08884…0889a               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0057, t01=0x00c4}
0x0889a…088b4               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) READ15 YES«, t00=0x0057, t01=0x00da}
0x088b4…088c0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x00f4}
0x088c0…088ce               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0057, t01=0x0100}
0x088ce…088d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x010e}
0x088d8…08908               Head {h00=0x002c, h01=0x0050, text=» LDK A2,TOLD.RC TELL RETURN INFO TO USER«, t00=0x0057, t01=0x0118}
0x08908…08922               Head {h00=0x0016, h01=0x0050, text=» ORS A2,DWTRCI,A6 «, t00=0x0057, t01=0x0148}
0x08922…08946               Head {h00=0x0020, h01=0x0050, text=» RF RHEXIT COMPLETE REQUEST «, t00=0x0057, t01=0x0162}
0x08946…0895c               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0057, t01=0x0186}
0x0895c…08966               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x000c}
0x08966…08984               Head {h00=0x001a, h01=0x0050, text=»* TEST IF RESET/CLEAR «, t00=0x0058, t01=0x0016}
0x08984…0898e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0034}
0x0898e…089a2               Head {h00=0x0010, h01=0x0050, text=»READ10 EQU *«, t00=0x0058, t01=0x003e}
0x089a2…089b4               Head {h00=0x000e, h01=0x0050, text=» XRR A1,A2«, t00=0x0058, t01=0x0052}
0x089b4…089d4               Head {h00=0x001c, h01=0x0050, text=» ANK A1,CLEA.RC CLEAR ? «, t00=0x0058, t01=0x0064}
0x089d4…089ec               Head {h00=0x0014, h01=0x0050, text=» RF(Z) READ15 NO«, t00=0x0058, t01=0x0084}
0x089ec…089fe               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0058, t01=0x009c}
0x089fe…08a1e               Head {h00=0x001c, h01=0x0050, text=» ANK A2,RSET.RC RESET ? «, t00=0x0058, t01=0x00ae}
0x08a1e…08a36               Head {h00=0x0014, h01=0x0050, text=» RF(Z) RHEXIT NO«, t00=0x0058, t01=0x00ce}
0x08a36…08a40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00e6}
0x08a40…08a5a               Head {h00=0x0016, h01=0x0050, text=»* RESET AND CLEAR «, t00=0x0058, t01=0x00f0}
0x08a5a…08a64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x010a}
0x08a64…08a8e               Head {h00=0x0026, h01=0x0050, text=» XRS A2,DWTRCI,A6 RESET RESET-BIT «, t00=0x0058, t01=0x0114}
0x08a8e…08abc               Head {h00=0x002a, h01=0x0050, text=» XRR A1,A2 INFORM USER ABOUT THE CLEAR«, t00=0x0058, t01=0x013e}
0x08abc…08ace               Head {h00=0x000e, h01=0x0050, text=» RF RHEXIT«, t00=0x0058, t01=0x016c}
0x08ace…08ada               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x017e}
0x08ada…08aee               Head {h00=0x0010, h01=0x0050, text=»READ15 EQU *«, t00=0x0058, t01=0x018a}
0x08aee…08b10               Head {h00=0x001e, h01=0x0050, text=» LDK A1,RSET.RC+MORE.RC+1 «, t00=0x0059, t01=0x000e}
0x08b10…08b3c               Head {h00=0x0028, h01=0x0050, text=» XRS A1,DWTRCI,A6 RESET RETURN INFO «, t00=0x0059, t01=0x0030}
0x08b3c…08b46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x005c}
0x08b46…08b66               Head {h00=0x001c, h01=0x0050, text=»* SEPARATE THE REQUESTS «, t00=0x0059, t01=0x0066}
0x08b66…08b70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0086}
0x08b70…08b84               Head {h00=0x0010, h01=0x0050, text=»READ20 EQU *«, t00=0x0059, t01=0x0090}
0x08b84…08b9c               Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTOR,A6 «, t00=0x0059, t01=0x00a4}
0x08b9c…08bb0               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/3F «, t00=0x0059, t01=0x00bc}
0x08bb0…08bc2               Head {h00=0x000e, h01=0x0050, text=» SUK A4,6 «, t00=0x0059, t01=0x00d0}
0x08bc2…08be6               Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRIT05 WRITE REQUEST «, t00=0x0059, t01=0x00e2}
0x08be6…08c10               Head {h00=0x0026, h01=0x0050, text=» ABL(P) STAT05 SET STATUS REQUEST «, t00=0x0059, t01=0x0106}
0x08c10…08c1e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0059, t01=0x0130}
0x08c1e…08c28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x013e}
0x08c28…08c46               Head {h00=0x001a, h01=0x0050, text=»*        READ REQUEST «, t00=0x0059, t01=0x0148}
0x08c46…08c50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0166}
0x08c50…08c7e               Head {h00=0x002a, h01=0x0050, text=» SU A5,REBFSZ,A13 RECEIVE BUFFER SIZE «, t00=0x0059, t01=0x0170}
0x08c7e…08ca4               Head {h00=0x0022, h01=0x0050, text=» RF(L) ERRLEN INCORRECT LENGTH«, t00=0x005a, t01=0x000e}
0x08ca4…08cae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0034}
0x08cae…08cd2               Head {h00=0x0020, h01=0x0050, text=»*        BRANCH ON DWT STATE«, t00=0x005a, t01=0x003e}
0x08cd2…08cdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0062}
0x08cdc…08d00               Head {h00=0x0020, h01=0x0050, text=» LDK A2,READAT FUNCTION CODE«, t00=0x005a, t01=0x006c}
0x08d00…08d3a               Head {h00=0x0036, h01=0x0050, text=»         LDR      A4,A3            SAVE DWT STATE «, t00=0x005a, t01=0x0090}
0x08d3a…08d4c               Head {h00=0x000e, h01=0x0050, text=» ADR A3,A3«, t00=0x005a, t01=0x00ca}
0x08d4c…08d78               Head {h00=0x0028, h01=0x0050, text=» SUK A3,ENDRST+2 TEST+2 UPPER BOUND «, t00=0x005a, t01=0x00dc}
0x08d78…08da8               Head {h00=0x002c, h01=0x0050, text=» ABI(L) RSTATE+ENDRST,A3 BRANCH ON STATE«, t00=0x005a, t01=0x0108}
0x08da8…08db2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0138}
0x08db2…08dd4               Head {h00=0x001e, h01=0x0050, text=»*        STATE TABLE,READ «, t00=0x005a, t01=0x0142}
0x08dd4…08dde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0164}
0x08dde…08df2               Head {h00=0x0010, h01=0x0050, text=»RSTATE EQU *«, t00=0x005a, t01=0x016e}
0x08df2…08e1c               Head {h00=0x0026, h01=0x0050, text=» DATA RCONAD CONNECTED ACCEPT DATA«, t00=0x005a, t01=0x0182}
0x08e1c…08e46               Head {h00=0x0026, h01=0x0050, text=» DATA RCONRD CONNECTED REFUSE DATA«, t00=0x005b, t01=0x001c}
0x08e46…08e5c               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x005b, t01=0x0046}
0x08e5c…08e96               Head {h00=0x0036, h01=0x0050, text=» DATA RINCAR INCOMING CALL RECEIVED(WITH ACC/REF )«, t00=0x005b, t01=0x005c}
0x08e96…08eea               Head {h00=0x0050, h01=0x0050, text=»         DATA     RINCAR           INCOMING CALL RECEIVED(WITHOUT ACC/REF ) «, t00=0x005b, t01=0x0096}
0x08eea…08f18               Head {h00=0x002a, h01=0x0050, text=» DATA RVCREL VIRTUAL CIRCUIT RELEASED «, t00=0x005b, t01=0x00ea}
0x08f18…08f24               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0118}
0x08f24…08f40               Head {h00=0x0018, h01=0x0050, text=»ENDRST EQU *-RSTATE «, t00=0x005b, t01=0x0124}
0x08f40…08f4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0140}
0x08f4a…08f60               Head {h00=0x0012, h01=0x0050, text=»*        READ «, t00=0x005b, t01=0x014a}
0x08f60…08f86               Head {h00=0x0022, h01=0x0050, text=»*        CONNECTED REFUSE DATA«, t00=0x005b, t01=0x0160}
0x08f86…08f90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0186}
0x08f90…08fa4               Head {h00=0x0010, h01=0x0050, text=»RCONRD EQU *«, t00=0x005b, t01=0x0190}
0x08fa4…08fba               Head {h00=0x0012, h01=0x0050, text=» LDK A2,ACCDAT«, t00=0x005c, t01=0x0014}
0x08fba…08fe0               Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x005c, t01=0x002a}
0x08fe0…0900c               Head {h00=0x0028, h01=0x0050, text=» LDK A1,CONAD CONNECTED ACCEPT DATA «, t00=0x005c, t01=0x0050}
0x0900c…09024               Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTSTE,A6«, t00=0x005c, t01=0x007c}
0x09024…09048               Head {h00=0x0020, h01=0x0050, text=» LDK A2,READAT FUNCTION CODE«, t00=0x005c, t01=0x0094}
0x09048…09056               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005c, t01=0x00b8}
0x09056…09060               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00c6}
0x09060…09076               Head {h00=0x0012, h01=0x0050, text=»*        READ «, t00=0x005c, t01=0x00d0}
0x09076…0909c               Head {h00=0x0022, h01=0x0050, text=»*        CONNECTED ACCEPT DATA«, t00=0x005c, t01=0x00e6}
0x0909c…090a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x010c}
0x090a6…090ba               Head {h00=0x0010, h01=0x0050, text=»RCONAD EQU *«, t00=0x005c, t01=0x0116}
0x090ba…090c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x012a}
0x090c4…090e8               Head {h00=0x0020, h01=0x0050, text=»*        DEBLOCK INPUT QUEUE«, t00=0x005c, t01=0x0134}
0x090e8…090f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0158}
0x090f2…09108               Head {h00=0x0012, h01=0x0050, text=» LDK A1,NPRFLG«, t00=0x005c, t01=0x0162}
0x09108…0911a               Head {h00=0x000e, h01=0x0050, text=» C1R A1,A1«, t00=0x005c, t01=0x0178}
0x0911a…09134               Head {h00=0x0016, h01=0x0050, text=» ANS A1,QUEINP,A13«, t00=0x005c, t01=0x018a}
0x09134…0914a               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x005d, t01=0x0014}
0x0914a…09184               Head {h00=0x0036, h01=0x0050, text=»         SUK      A4,INCALR        CHECK DWT STATE«, t00=0x005d, t01=0x002a}
0x09184…091a4               Head {h00=0x001c, h01=0x0050, text=»         RF(Z)    READ30«, t00=0x005d, t01=0x0064}
0x091a4…091ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0084}
0x091ae…091c4               Head {h00=0x0012, h01=0x0050, text=»*        READ «, t00=0x005d, t01=0x008e}
0x091c4…09206               Head {h00=0x003e, h01=0x0050, text=»*        INCOMING CALL RECEIVED,WITHOUT ACCEPT/REFUSE CALL«, t00=0x005d, t01=0x00a4}
0x09206…09210               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00e6}
0x09210…09250               Head {h00=0x003c, h01=0x0050, text=»         LDK      A1,CONAD         CONNECTED ACCEPT DATA«, t00=0x005d, t01=0x00f0}
0x09250…09276               Head {h00=0x0022, h01=0x0050, text=»         SC       A1,DWTSTE,A6«, t00=0x005d, t01=0x0130}
0x09276…09292               Head {h00=0x0018, h01=0x0050, text=»READ30   EQU      * «, t00=0x005d, t01=0x0156}
0x09292…0929e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0172}
0x0929e…092b6               Head {h00=0x0014, h01=0x0050, text=» SC A2,DWTFNC,A6«, t00=0x005d, t01=0x017e}
0x092b6…092d8               Head {h00=0x001e, h01=0x0050, text=» RF WRIT50 ACTIVATE TIMER «, t00=0x005e, t01=0x0008}
0x092d8…092e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x002a}
0x092e2…092f0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005e, t01=0x0034}
0x092f0…092fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0042}
0x092fa…09310               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x005e, t01=0x004c}
0x09310…0931a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0062}
0x0931a…09330               Head {h00=0x0012, h01=0x0050, text=»*        READ «, t00=0x005e, t01=0x006c}
0x09330…09358               Head {h00=0x0024, h01=0x0050, text=»*        INCOMING CALL RECEIVED «, t00=0x005e, t01=0x0082}
0x09358…09362               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x00aa}
0x09362…09376               Head {h00=0x0010, h01=0x0050, text=»RINCAR EQU *«, t00=0x005e, t01=0x00b4}
0x09376…09390               Head {h00=0x0016, h01=0x0050, text=» LD A1,QUEINP,A13 «, t00=0x005e, t01=0x00c8}
0x09390…093a4               Head {h00=0x0010, h01=0x0050, text=» ANKL A1,-2 «, t00=0x005e, t01=0x00e2}
0x093a4…093ba               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) RCONAD«, t00=0x005e, t01=0x00f6}
0x093ba…093c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x010c}
0x093c6…093d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0118}
0x093d0…09406               Head {h00=0x0032, h01=0x0050, text=»* WANTED ACTION NOT ALLOWED IN THIS DWT STATE «, t00=0x005e, t01=0x0122}
0x09406…09410               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0158}
0x09410…09424               Head {h00=0x0010, h01=0x0050, text=»ERRSTE EQU *«, t00=0x005e, t01=0x0162}
0x09424…0944c               Head {h00=0x0024, h01=0x0050, text=» LDKL A1,SEQE.RC SEQUENCE ERROR «, t00=0x005e, t01=0x0176}
0x0944c…09470               Head {h00=0x0020, h01=0x0050, text=» RF RHEXIT COMPLETE REQUEST «, t00=0x005f, t01=0x000e}
0x09470…09486               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x005f, t01=0x0032}
0x09486…09490               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0048}
0x09490…094a6               Head {h00=0x0012, h01=0x0050, text=»*        READ «, t00=0x005f, t01=0x0052}
0x094a6…094ce               Head {h00=0x0024, h01=0x0050, text=»*        VIRTUAL CIRCUIT CLEARED«, t00=0x005f, t01=0x0068}
0x094ce…094d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0090}
0x094d8…094ec               Head {h00=0x0010, h01=0x0050, text=»RVCREL EQU *«, t00=0x005f, t01=0x009a}
0x094ec…09518               Head {h00=0x0028, h01=0x0050, text=» ANK A1,CLEA.RC CONNECTION CLEARED ?«, t00=0x005f, t01=0x00ae}
0x09518…09544               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) RHEXIT YES,COMPLETE REQUEST «, t00=0x005f, t01=0x00da}
0x09544…0954e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0106}
0x0954e…09576               Head {h00=0x0024, h01=0x0050, text=»* ACTIVATE RHIP TO GET A PACKET «, t00=0x005f, t01=0x0110}
0x09576…09580               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0138}
0x09580…09598               Head {h00=0x0014, h01=0x0050, text=» SC A2,DWTFNC,A6«, t00=0x005f, t01=0x0142}
0x09598…095ac               Head {h00=0x0010, h01=0x0050, text=» ABL RHIPRO «, t00=0x005f, t01=0x015a}
0x095ac…095b8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x016e}
0x095b8…095c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x017a}
0x095c2…095d0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x0184}
0x095d0…095da (96, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0004}
0x095da…0961e               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0060, t01=0x000e}
0x0961e…09628               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0052}
0x09628…09646               Head {h00=0x001a, h01=0x0050, text=»*        WRITE REQUEST«, t00=0x0060, t01=0x005c}
0x09646…09650               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x007a}
0x09650…09694               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0060, t01=0x0084}
0x09694…0969e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00c8}
0x0969e…096b2               Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x0060, t01=0x00d2}
0x096b2…096bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00e6}
0x096bc…096e0               Head {h00=0x0020, h01=0x0050, text=»*        BRANCH ON DWT STATE«, t00=0x0060, t01=0x00f0}
0x096e0…096ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0114}
0x096ea…09700               Head {h00=0x0012, h01=0x0050, text=» SUK A3,CONAD «, t00=0x0060, t01=0x011e}
0x09700…0972c               Head {h00=0x0028, h01=0x0050, text=» RF(Z) WRIT20 CONNECTED ACCEPT DATA «, t00=0x0060, t01=0x0134}
0x0972c…09748               Head {h00=0x0018, h01=0x0050, text=» SUK A3,CONRD-CONAD «, t00=0x0060, t01=0x0160}
0x09748…09774               Head {h00=0x0028, h01=0x0050, text=» RF(Z) WRIT20 CONNECTED REFUSE DATA «, t00=0x0060, t01=0x017c}
0x09774…0978a               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0061, t01=0x0018}
0x0978a…097b0               Head {h00=0x0022, h01=0x0050, text=» RB ERRSTE INCORRECT DWT STATE«, t00=0x0061, t01=0x002e}
0x097b0…097bc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0054}
0x097bc…097d2               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0061, t01=0x0060}
0x097d2…097ee               Head {h00=0x0018, h01=0x0050, text=» SUK A3,VCREL-CONRD «, t00=0x0061, t01=0x0076}
0x097ee…09818               Head {h00=0x0026, h01=0x0050, text=» RB(NZ) ERRSTE INCORRECT DWT STATE«, t00=0x0061, t01=0x0092}
0x09818…09822               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00bc}
0x09822…09830               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0061, t01=0x00c6}
0x09830…0983a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00d4}
0x0983a…09864               Head {h00=0x0026, h01=0x0050, text=»*        VIRTUAL CIRCUIT RELEASED «, t00=0x0061, t01=0x00de}
0x09864…0986e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0108}
0x0986e…09882               Head {h00=0x0010, h01=0x0050, text=»WRIT10 EQU *«, t00=0x0061, t01=0x0112}
0x09882…098b6               Head {h00=0x0030, h01=0x0050, text=» ANK A1,TOLD.RC CLEAR ALREADY TOLD TO USER ?«, t00=0x0061, t01=0x0126}
0x098b6…098e0               Head {h00=0x0026, h01=0x0050, text=» RB(NZ) ERRSTE YES,SEQUENCE ERROR «, t00=0x0061, t01=0x015a}
0x098e0…09914               Head {h00=0x0030, h01=0x0050, text=»         LDK     A1,CLEA.RC       VC CLEARED«, t00=0x0061, t01=0x0184}
0x09914…0992c               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTIPQ,A6«, t00=0x0062, t01=0x0028}
0x0992c…09954               Head {h00=0x0024, h01=0x0050, text=» ANKL A2,-2 ANYTHING IN QUEUE ? «, t00=0x0062, t01=0x0040}
0x09954…0996e               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRIT15 YES«, t00=0x0062, t01=0x0068}
0x0996e…09990               Head {h00=0x001e, h01=0x0050, text=» ORK A1,MORE.RC MORE INFO «, t00=0x0062, t01=0x0082}
0x09990…099a2               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0062, t01=0x00a4}
0x099a2…099d2               Head {h00=0x002c, h01=0x0050, text=» ORK A2,TOLD.RC RETURN CODE TOLD TO USER«, t00=0x0062, t01=0x00b6}
0x099d2…099ea               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRCI,A6«, t00=0x0062, t01=0x00e6}
0x099ea…099fc               Head {h00=0x000e, h01=0x0050, text=» RF RHEXIT«, t00=0x0062, t01=0x00fe}
0x099fc…09a10               Head {h00=0x0010, h01=0x0050, text=»WRIT15 EQU *«, t00=0x0062, t01=0x0110}
0x09a10…09a3e               Head {h00=0x002a, h01=0x0050, text=» LD A2,BFCHPT,A2 ONLY CLEAR IN QUEUE ?«, t00=0x0062, t01=0x0124}
0x09a3e…09a58               Head {h00=0x0016, h01=0x0050, text=» ABL(Z) RHIPRO YES«, t00=0x0062, t01=0x0152}
0x09a58…09a80               Head {h00=0x0024, h01=0x0050, text=» ORKL A1,DATA.RC DATA AVAILABLE «, t00=0x0062, t01=0x016c}
0x09a80…09a8c (99, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x0004}
0x09a8c…09a9a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x0010}
0x09a9a…09aa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x001e}
0x09aa4…09af0               Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x0063, t01=0x0028}
0x09af0…09afa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0074}
0x09afa…09b1c               Head {h00=0x001e, h01=0x0050, text=»*        COMPLETE REQUEST «, t00=0x0063, t01=0x007e}
0x09b1c…09b26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00a0}
0x09b26…09b70               Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x0063, t01=0x00aa}
0x09b70…09b7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00f4}
0x09b7a…09b8e               Head {h00=0x0010, h01=0x0050, text=»RHEXIT EQU *«, t00=0x0063, t01=0x00fe}
0x09b8e…09ba0               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x0063, t01=0x0112}
0x09ba0…09bcc               Head {h00=0x0028, h01=0x0050, text=» CF A15,TENDIO COMPLETE USER REQUEST«, t00=0x0063, t01=0x0124}
0x09bcc…09bd8               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0063, t01=0x0150}
0x09bd8…09bec               Head {h00=0x0010, h01=0x0050, text=»RHSCHE EQU *«, t00=0x0063, t01=0x015c}
0x09bec…09c14               Head {h00=0x0024, h01=0x0050, text=» ABL EXITDC CONTROL TO SCHEDULER«, t00=0x0063, t01=0x0170}
0x09c14…09c1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0008}
0x09c1e…09c38               Head {h00=0x0016, h01=0x0050, text=»*        CONNECTED«, t00=0x0064, t01=0x0012}
0x09c38…09c42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x002c}
0x09c42…09c56               Head {h00=0x0010, h01=0x0050, text=»WRIT20 EQU *«, t00=0x0064, t01=0x0036}
0x09c56…09c78               Head {h00=0x001e, h01=0x0050, text=» ADK A5,0 REQUESTED LENGTH«, t00=0x0064, t01=0x004a}
0x09c78…09c9e               Head {h00=0x0022, h01=0x0050, text=» RF(N) ERRLEN INCORRECT LENGTH«, t00=0x0064, t01=0x006c}
0x09c9e…09cca               Head {h00=0x0028, h01=0x0050, text=» LC A3,DWTOPT,A6 GET NEW OPTION CODE«, t00=0x0064, t01=0x0092}
0x09cca…09cdc               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0064, t01=0x00be}
0x09cdc…09cfe               Head {h00=0x001e, h01=0x0050, text=» ANK A4,INTOPT INTERRUPT ?«, t00=0x0064, t01=0x00d0}
0x09cfe…09d16               Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRIT30 NO«, t00=0x0064, t01=0x00f2}
0x09d16…09d36               Head {h00=0x001c, h01=0x0050, text=» LDK A2,WRIINT INTERRUPT«, t00=0x0064, t01=0x010a}
0x09d36…09d58               Head {h00=0x001e, h01=0x0050, text=» ADK A5,0 REQUESTED LENGTH«, t00=0x0064, t01=0x012a}
0x09d58…09d7e               Head {h00=0x0022, h01=0x0050, text=» RF(N) ERRLEN INCORRECT LENGTH«, t00=0x0064, t01=0x014c}
0x09d7e…09d90               Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0064, t01=0x0172}
0x09d90…09da6               Head {h00=0x0012, h01=0x0050, text=» RF(Z) WRIT45 «, t00=0x0064, t01=0x0184}
0x09da6…09dba               Head {h00=0x0010, h01=0x0050, text=»ERRLEN EQU *«, t00=0x0065, t01=0x000a}
0x09dba…09de4               Head {h00=0x0026, h01=0x0050, text=» LDKL A1,INVL.RC INCORRECT LENGTH «, t00=0x0065, t01=0x001e}
0x09de4…09df6               Head {h00=0x000e, h01=0x0050, text=» RB RHEXIT«, t00=0x0065, t01=0x0048}
0x09df6…09e00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x005a}
0x09e00…09e0e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0065, t01=0x0064}
0x09e0e…09e18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0072}
0x09e18…09e2c               Head {h00=0x0010, h01=0x0050, text=»* WRITE DATA«, t00=0x0065, t01=0x007c}
0x09e2c…09e36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0090}
0x09e36…09e4a               Head {h00=0x0010, h01=0x0050, text=»WRIT30 EQU *«, t00=0x0065, t01=0x009a}
0x09e4a…09e8a               Head {h00=0x003c, h01=0x0050, text=»         CW       A5,TRBFSZ,A13    TRANSMIT BUFFER SIZE «, t00=0x0065, t01=0x00ae}
0x09e8a…09eb0               Head {h00=0x0022, h01=0x0050, text=» RB(G) ERRLEN INCORRECT LENGTH«, t00=0x0065, t01=0x00ee}
0x09eb0…09ec2               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0065, t01=0x0114}
0x09ec2…09ee2               Head {h00=0x001c, h01=0x0050, text=» ANK A4,MOPT MORE DATA ?«, t00=0x0065, t01=0x0126}
0x09ee2…09efa               Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRIT35 NO«, t00=0x0065, t01=0x0146}
0x09efa…09f14               Head {h00=0x0016, h01=0x0050, text=» CW A5,TRBFSZ,A13 «, t00=0x0065, t01=0x015e}
0x09f14…09f2a               Head {h00=0x0012, h01=0x0050, text=» RB(NE) ERRLEN«, t00=0x0065, t01=0x0178}
0x09f2a…09f3e               Head {h00=0x0010, h01=0x0050, text=»WRIT35 EQU *«, t00=0x0065, t01=0x018e}
0x09f3e…09f6a               Head {h00=0x0028, h01=0x0050, text=» LC A1,DWTWRO,A6 GET OLD OPTION CODE«, t00=0x0066, t01=0x0012}
0x09f6a…09f7c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0066, t01=0x003e}
0x09f7c…09f9c               Head {h00=0x001c, h01=0x0050, text=» ANK A1,MOPT MORE DATA ?«, t00=0x0066, t01=0x0050}
0x09f9c…09fb4               Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRIT40 NO«, t00=0x0066, t01=0x0070}
0x09fb4…09fd2               Head {h00=0x001a, h01=0x0050, text=» ANK A2,QOPT OLD Q-BIT«, t00=0x0066, t01=0x0088}
0x09fd2…09fe4               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0066, t01=0x00a6}
0x09fe4…0a002               Head {h00=0x001a, h01=0x0050, text=» ANK A4,QOPT NEW Q-BIT«, t00=0x0066, t01=0x00b8}
0x0a002…0a01c               Head {h00=0x0016, h01=0x0050, text=» SUR A2,A4 SAME ? «, t00=0x0066, t01=0x00d6}
0x0a01c…0a044               Head {h00=0x0024, h01=0x0050, text=» RB(NZ) ERRSTE NO,SEQUENCE ERROR«, t00=0x0066, t01=0x00f0}
0x0a044…0a058               Head {h00=0x0010, h01=0x0050, text=»WRIT40 EQU *«, t00=0x0066, t01=0x0118}
0x0a058…0a074               Head {h00=0x0018, h01=0x0050, text=» LDK A2,WRIDAT DATA «, t00=0x0066, t01=0x012c}
0x0a074…0a0a2               Head {h00=0x002a, h01=0x0050, text=» SC A3,DWTWRO,A6 SAVE NEW OPTION CODE «, t00=0x0066, t01=0x0148}
0x0a0a2…0a0b6               Head {h00=0x0010, h01=0x0050, text=»WRIT45 EQU *«, t00=0x0066, t01=0x0176}
0x0a0b6…0a0dc               Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x0066, t01=0x018a}
0x0a0dc…0a0e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0020}
0x0a0e6…0a0f4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0067, t01=0x002a}
0x0a0f4…0a0fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0038}
0x0a0fe…0a108               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0042}
0x0a108…0a128               Head {h00=0x001c, h01=0x0050, text=»*        ACTIVATE TIMER «, t00=0x0067, t01=0x004c}
0x0a128…0a132               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x006c}
0x0a132…0a146               Head {h00=0x0010, h01=0x0050, text=»WRIT50 EQU *«, t00=0x0067, t01=0x0076}
0x0a146…0a172               Head {h00=0x0028, h01=0x0050, text=» LD A8,DWTRTV,A6 REQUEST TIMER VALUE«, t00=0x0067, t01=0x008a}
0x0a172…0a1a6               Head {h00=0x0030, h01=0x0050, text=» RB(Z) RHSCHE NO TIMER,CONTROL TO SCHEDULER «, t00=0x0067, t01=0x00b6}
0x0a1a6…0a1e2               Head {h00=0x0038, h01=0x0050, text=»         LDKL     A4,TIMOUT+1      TIME OUT ROUTINE «, t00=0x0067, t01=0x00ea}
0x0a1e2…0a1f6               Head {h00=0x0010, h01=0x0050, text=» LDR A12,A6 «, t00=0x0067, t01=0x0126}
0x0a1f6…0a218               Head {h00=0x001e, h01=0x0050, text=» CF A14,STRTIM START TIMER«, t00=0x0067, t01=0x013a}
0x0a218…0a230               Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTRTP,A6«, t00=0x0067, t01=0x015c}
0x0a230…0a258               Head {h00=0x0024, h01=0x0050, text=» RB RHSCHE CONTROL TO SCHEDULER «, t00=0x0067, t01=0x0174}
0x0a258…0a262               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x000c}
0x0a262…0a270               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0068, t01=0x0016}
0x0a270…0a27a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0024}
0x0a27a…0a284               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x002e}
0x0a284…0a2c8               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0068, t01=0x0038}
0x0a2c8…0a2d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x007c}
0x0a2d2…0a2f0               Head {h00=0x001a, h01=0x0050, text=»*        OPEN REQUEST «, t00=0x0068, t01=0x0086}
0x0a2f0…0a2fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00a4}
0x0a2fa…0a33e               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0068, t01=0x00ae}
0x0a33e…0a348               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00f2}
0x0a348…0a35c               Head {h00=0x0010, h01=0x0050, text=»OPEN00 EQU *«, t00=0x0068, t01=0x00fc}
0x0a35c…0a38c               Head {h00=0x002c, h01=0x0050, text=» CF A14,FNDLOC CONFIRM LOCAL DTE ADDRESS«, t00=0x0068, t01=0x0110}
0x0a38c…0a3b2               Head {h00=0x0022, h01=0x0050, text=» ANK A1,STRTFL MASK START FLAG«, t00=0x0068, t01=0x0140}
0x0a3b2…0a3d2               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) ERRSYS LINE OPEN«, t00=0x0068, t01=0x0166}
0x0a3d2…0a3dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0186}
0x0a3dc…0a3f8               Head {h00=0x0018, h01=0x0050, text=»*        LINE CLOSED«, t00=0x0068, t01=0x0190}
0x0a3f8…0a426               Head {h00=0x002a, h01=0x0050, text=»* CHECK IF OPEN SYSTEM ALREADY PENDING«, t00=0x0069, t01=0x001c}
0x0a426…0a430               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x004a}
0x0a430…0a458               Head {h00=0x0024, h01=0x0050, text=»         LD       A3,CMNFLG,A12 «, t00=0x0069, t01=0x0054}
0x0a458…0a47c               Head {h00=0x0020, h01=0x0050, text=»         ANK      A3,OPEFLG «, t00=0x0069, t01=0x007c}
0x0a47c…0a494               Head {h00=0x0014, h01=0x0050, text=» RF(Z) OPEN10 NO«, t00=0x0069, t01=0x00a0}
0x0a494…0a4a8               Head {h00=0x0010, h01=0x0050, text=»ERRSYS EQU *«, t00=0x0069, t01=0x00b8}
0x0a4a8…0a4d8               Head {h00=0x002c, h01=0x0050, text=» LDKL A1,LOGE.RC INCORRECT SYSTEM STATE «, t00=0x0069, t01=0x00cc}
0x0a4d8…0a4fc               Head {h00=0x0020, h01=0x0050, text=» RB RHEXIT COMPLETE REQUEST «, t00=0x0069, t01=0x00fc}
0x0a4fc…0a506               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0120}
0x0a506…0a514               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0069, t01=0x012a}
0x0a514…0a51e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0138}
0x0a51e…0a53a               Head {h00=0x0018, h01=0x0050, text=»* CHECK TABLE LENGTH«, t00=0x0069, t01=0x0142}
0x0a53a…0a544               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x015e}
0x0a544…0a558               Head {h00=0x0010, h01=0x0050, text=»OPEN10 EQU *«, t00=0x0069, t01=0x0168}
0x0a558…0a56a               Head {h00=0x000e, h01=0x0050, text=» ADK A5,0 «, t00=0x0069, t01=0x017c}
0x0a56a…0a590               Head {h00=0x0022, h01=0x0050, text=» RF(Z) OPEN15 NO ADDRESS TABLE«, t00=0x0069, t01=0x018e}
0x0a590…0a59a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0024}
0x0a59a…0a5ca               Head {h00=0x002c, h01=0x0050, text=»* ADDR. TABLE NOT SUPPORTED IN PRR 11.0 «, t00=0x006a, t01=0x002e}
0x0a5ca…0a5d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x005e}
0x0a5d4…0a5f4               Head {h00=0x001c, h01=0x0050, text=» RB ERRLEN LENGTH ERROR «, t00=0x006a, t01=0x0068}
0x0a5f4…0a608               Head {h00=0x0010, h01=0x0050, text=»OPEN15 EQU *«, t00=0x006a, t01=0x0088}
0x0a608…0a640               Head {h00=0x0034, h01=0x0050, text=» LD A3,ECBCW2,A8 GET LOCAL SYMBOLIC DTE ADDRESS «, t00=0x006a, t01=0x009c}
0x0a640…0a658               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTLAD,A6«, t00=0x006a, t01=0x00d4}
0x0a658…0a67a               Head {h00=0x001e, h01=0x0050, text=» LDK A2,OPESYS OPEN SYSTEM«, t00=0x006a, t01=0x00ec}
0x0a67a…0a68e               Head {h00=0x0010, h01=0x0050, text=»OPEN30 EQU *«, t00=0x006a, t01=0x010e}
0x0a68e…0a6b4               Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x006a, t01=0x0122}
0x0a6b4…0a6ca               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x006a, t01=0x0148}
0x0a6ca…0a6d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x015e}
0x0a6d4…0a6fc               Head {h00=0x0024, h01=0x0050, text=»* UPDATE PVC WITH REMOTE ADDRESS«, t00=0x006a, t01=0x0168}
0x0a6fc…0a706               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0190}
0x0a706…0a730               Head {h00=0x0026, h01=0x0050, text=» LDKL A1,PVCTYP PVC IDENTIFICATION«, t00=0x006b, t01=0x000a}
0x0a730…0a764               Head {h00=0x0030, h01=0x0050, text=» LDKL A2,SCTDCT POINTER TO DC ADDRESS TABLE «, t00=0x006b, t01=0x0034}
0x0a764…0a77e               Head {h00=0x0016, h01=0x0050, text=» LDKL A3,LINTAB-2 «, t00=0x006b, t01=0x0068}
0x0a77e…0a794               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x006b, t01=0x0082}
0x0a794…0a7ba               Head {h00=0x0022, h01=0x0050, text=» LDK A4,SYNRLN NUMBER OF LINES«, t00=0x006b, t01=0x0098}
0x0a7ba…0a7c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x00be}
0x0a7c6…0a7dc               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x006b, t01=0x00ca}
0x0a7dc…0a7f0               Head {h00=0x0010, h01=0x0050, text=»OPEN40 EQU *«, t00=0x006b, t01=0x00e0}
0x0a7f0…0a828               Head {h00=0x0034, h01=0x0050, text=» ADK A3,2 POINTER TO LC-ADM BLOCK-POINTER TABLE «, t00=0x006b, t01=0x00f4}
0x0a828…0a850               Head {h00=0x0024, h01=0x0050, text=» LDR* A5,A3 LC-ADM BLOCK POINTER«, t00=0x006b, t01=0x012c}
0x0a850…0a878               Head {h00=0x0024, h01=0x0050, text=» LC A7,NRPVC,A5 NUMBER OF PVC'S «, t00=0x006b, t01=0x0154}
0x0a878…0a896               Head {h00=0x001a, h01=0x0050, text=» RF(Z) OPEN80 NO PVC'S«, t00=0x006b, t01=0x017c}
0x0a896…0a8c2               Head {h00=0x0028, h01=0x0050, text=» LD A5,LC:TAB,A5 LC-ADM BLOCK TABLE «, t00=0x006c, t01=0x000a}
0x0a8c2…0a8cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0036}
0x0a8cc…0a8da               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006c, t01=0x0040}
0x0a8da…0a8e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x004e}
0x0a8e4…0a90e               Head {h00=0x0026, h01=0x0050, text=»* GET NEXT ENTRY IN DC ADDR. TABLE«, t00=0x006c, t01=0x0058}
0x0a90e…0a918               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0082}
0x0a918…0a92c               Head {h00=0x0010, h01=0x0050, text=»OPEN60 EQU *«, t00=0x006c, t01=0x008c}
0x0a92c…0a94e               Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A2 END OF TABLE ?«, t00=0x006c, t01=0x00a0}
0x0a94e…0a968               Head {h00=0x0016, h01=0x0050, text=» RF(Z) OPEN90 YES «, t00=0x006c, t01=0x00c2}
0x0a968…0a972               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00dc}
0x0a972…0a988               Head {h00=0x0012, h01=0x0050, text=»* TEST IF PVC «, t00=0x006c, t01=0x00e6}
0x0a988…0a992               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00fc}
0x0a992…0a9a6               Head {h00=0x0010, h01=0x0050, text=» CW A1,4,A2 «, t00=0x006c, t01=0x0106}
0x0a9a6…0a9c0               Head {h00=0x0016, h01=0x0050, text=» RB(NE) OPEN60 NO «, t00=0x006c, t01=0x011a}
0x0a9c0…0a9d4               Head {h00=0x0010, h01=0x0050, text=»OPEN70 EQU *«, t00=0x006c, t01=0x0134}
0x0a9d4…0a9f4               Head {h00=0x001c, h01=0x0050, text=» LDR* A8,A5 LC-ADM ENTRY«, t00=0x006c, t01=0x0148}
0x0a9f4…0aa1c               Head {h00=0x0024, h01=0x0050, text=» LD A9,2,A2 GET SYMBOLIC ADDRESS«, t00=0x006c, t01=0x0168}
0x0aa1c…0aa46               Head {h00=0x0026, h01=0x0050, text=» ST A9,REMADR,A8 SAVE IT IN LC-ADM«, t00=0x006c, t01=0x0190}
0x0aa46…0aa68               Head {h00=0x001e, h01=0x0050, text=» ADK A5,2 ADDRESS NEXT LC «, t00=0x006d, t01=0x002a}
0x0aa68…0aa86               Head {h00=0x001a, h01=0x0050, text=» SUK A7,1 MORE PVC'S ?«, t00=0x006d, t01=0x004c}
0x0aa86…0aaa0               Head {h00=0x0016, h01=0x0050, text=» RB(NZ) OPEN60 YES«, t00=0x006d, t01=0x006a}
0x0aaa0…0aab4               Head {h00=0x0010, h01=0x0050, text=»OPEN80 EQU *«, t00=0x006d, t01=0x0084}
0x0aab4…0aaca               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x006d, t01=0x0098}
0x0aaca…0aae8               Head {h00=0x001a, h01=0x0050, text=» SUK A4,1 MORE LINES ?«, t00=0x006d, t01=0x00ae}
0x0aae8…0ab02               Head {h00=0x0016, h01=0x0050, text=» RB(NZ) OPEN40 YES«, t00=0x006d, t01=0x00cc}
0x0ab02…0ab0e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x00e6}
0x0ab0e…0ab22               Head {h00=0x0010, h01=0x0050, text=»OPEN90 EQU *«, t00=0x006d, t01=0x00f2}
0x0ab22…0ab44               Head {h00=0x001e, h01=0x0050, text=» LDK A3,0 SET RETURN CODE «, t00=0x006d, t01=0x0106}
0x0ab44…0ab6c               Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x006d, t01=0x0128}
0x0ab6c…0ab7e               Head {h00=0x000e, h01=0x0050, text=» RB RHSCHE«, t00=0x006d, t01=0x0150}
0x0ab7e…0ab88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0162}
0x0ab88…0ab96               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006d, t01=0x016c}
0x0ab96…0aba0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x017a}
0x0aba0…0abaa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0184}
0x0abaa…0abb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x018e}
0x0abb4…0ac00               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x006e, t01=0x0008}
0x0ac00…0ac0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0054}
0x0ac0a…0ac2c               Head {h00=0x001e, h01=0x0050, text=»* CONNECT PASSIVE REQUEST «, t00=0x006e, t01=0x005e}
0x0ac2c…0ac36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0080}
0x0ac36…0ac82               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x006e, t01=0x008a}
0x0ac82…0ac8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00d6}
0x0ac8c…0aca0               Head {h00=0x0010, h01=0x0050, text=»CONP00 EQU *«, t00=0x006e, t01=0x00e0}
0x0aca0…0acb6               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x006e, t01=0x00f4}
0x0acb6…0acd8               Head {h00=0x001e, h01=0x0050, text=» ABL ERRREQ REQUEST ERROR «, t00=0x006e, t01=0x010a}
0x0acd8…0ace4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x012c}
0x0ace4…0acfa               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x006e, t01=0x0138}
0x0acfa…0ad1e               Head {h00=0x0020, h01=0x0050, text=» LDK A2,CONPAS FUNCTION CODE«, t00=0x006e, t01=0x014e}
0x0ad1e…0ad30               Head {h00=0x000e, h01=0x0050, text=» RF CONA05«, t00=0x006e, t01=0x0172}
0x0ad30…0ad3c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x0184}
0x0ad3c…0ad46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0190}
0x0ad46…0ad54               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006f, t01=0x000a}
0x0ad54…0ad5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0018}
0x0ad5e…0adaa               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x006f, t01=0x0022}
0x0adaa…0adb4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x006e}
0x0adb4…0add4               Head {h00=0x001c, h01=0x0050, text=»* CONNECT ACTIVE REQUEST«, t00=0x006f, t01=0x0078}
0x0add4…0adde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0098}
0x0adde…0ae2a               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x006f, t01=0x00a2}
0x0ae2a…0ae34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00ee}
0x0ae34…0ae48               Head {h00=0x0010, h01=0x0050, text=»CONA00 EQU *«, t00=0x006f, t01=0x00f8}
0x0ae48…0ae5e               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x006f, t01=0x010c}
0x0ae5e…0ae68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0122}
0x0ae68…0ae86               Head {h00=0x001a, h01=0x0050, text=»* TEST MESSAGE LENGTH «, t00=0x006f, t01=0x012c}
0x0ae86…0ae90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x014a}
0x0ae90…0aea8               Head {h00=0x0014, h01=0x0050, text=» SUK A5,SYMXDL-5«, t00=0x006f, t01=0x0154}
0x0aea8…0aebe               Head {h00=0x0012, h01=0x0050, text=» IFT CALDTE=1 «, t00=0x006f, t01=0x016c}
0x0aebe…0aed0               Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x006f, t01=0x0182}
0x0aed0…0aedc (112, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x0004}
0x0aedc…0aef2               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0070, t01=0x0010}
0x0aef2…0af18               Head {h00=0x0022, h01=0x0050, text=» RB(P) ERRLEN INCORRECT LENGTH«, t00=0x0070, t01=0x0026}
0x0af18…0af24               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x004c}
0x0af24…0af48               Head {h00=0x0020, h01=0x0050, text=» LDK A2,CONACT FUNCTION CODE«, t00=0x0070, t01=0x0058}
0x0af48…0af5c               Head {h00=0x0010, h01=0x0050, text=»CONA05 EQU *«, t00=0x0070, t01=0x007c}
0x0af5c…0af8c               Head {h00=0x002c, h01=0x0050, text=» CF A14,FNDLOC CONFIRM LOCAL DTE ADDRESS«, t00=0x0070, t01=0x0090}
0x0af8c…0afb2               Head {h00=0x0022, h01=0x0050, text=» ANK A1,STRTFL MASK START FLAG«, t00=0x0070, t01=0x00c0}
0x0afb2…0afde               Head {h00=0x0028, h01=0x0050, text=» RB(Z) ERRSYS INCORRECT SYSTEM STATE«, t00=0x0070, t01=0x00e6}
0x0afde…0aff2               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0070, t01=0x0112}
0x0aff2…0b008               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0070, t01=0x0126}
0x0b008…0b034               Head {h00=0x0028, h01=0x0050, text=» ABL(NZ) ERRSTE INCORRECT DWT STATE «, t00=0x0070, t01=0x013c}
0x0b034…0b040               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x0168}
0x0b040…0b056               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0070, t01=0x0174}
0x0b056…0b060               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x018a}
0x0b060…0b06e (113, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0071, t01=0x0004}
0x0b06e…0b078               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0012}
0x0b078…0b08e               Head {h00=0x0012, h01=0x0050, text=» RF(Z) CONA10 «, t00=0x0071, t01=0x001c}
0x0b08e…0b0a4               Head {h00=0x0012, h01=0x0050, text=» SUK A4,VCREL «, t00=0x0071, t01=0x0032}
0x0b0a4…0b0ca               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) CLOS10 SEQUENCE ERROR «, t00=0x0071, t01=0x0048}
0x0b0ca…0b0ee               Head {h00=0x0020, h01=0x0050, text=» LD A1,DWTRCI,A6 RETURN INFO«, t00=0x0071, t01=0x006e}
0x0b0ee…0b100               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0071, t01=0x0092}
0x0b100…0b128               Head {h00=0x0024, h01=0x0050, text=» ANK A3,CLEA.RC CLEAR DETECTED ?«, t00=0x0071, t01=0x00a4}
0x0b128…0b154               Head {h00=0x0028, h01=0x0050, text=» RF(Z) CLOS10 NO,CONNECT NOT ALLOWED«, t00=0x0071, t01=0x00cc}
0x0b154…0b17a               Head {h00=0x0022, h01=0x0050, text=» ANK A1,TOLD.RC TOLD TO USER ?«, t00=0x0071, t01=0x00f8}
0x0b17a…0b192               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLOS10 NO«, t00=0x0071, t01=0x011e}
0x0b192…0b1a6               Head {h00=0x0010, h01=0x0050, text=»CONA10 EQU *«, t00=0x0071, t01=0x0136}
0x0b1a6…0b1b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x014a}
0x0b1b2…0b1c0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0071, t01=0x0156}
0x0b1c0…0b1ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0164}
0x0b1ca…0b1f0               Head {h00=0x0022, h01=0x0050, text=»* SAVE SYMBOLIC DTE ADDRESSES «, t00=0x0071, t01=0x016e}
0x0b1f0…0b1fa (114, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0004}
0x0b1fa…0b22e               Head {h00=0x0030, h01=0x0050, text=» LD A3,ECBCW2,A8 LOCAL SYMBOLIC DTE ADDRESS «, t00=0x0072, t01=0x000e}
0x0b22e…0b246               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTLAD,A6«, t00=0x0072, t01=0x0042}
0x0b246…0b27a               Head {h00=0x0030, h01=0x0050, text=» LD A3,ECBCW1,A8 REMOTE SYMBOLIC DTE ADDRESS«, t00=0x0072, t01=0x005a}
0x0b27a…0b292               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTRAD,A6«, t00=0x0072, t01=0x008e}
0x0b292…0b2bc               Head {h00=0x0026, h01=0x0050, text=» CM DWTRTP,A6 CLEAR TIMER ADDRESS «, t00=0x0072, t01=0x00a6}
0x0b2bc…0b2e4               Head {h00=0x0024, h01=0x0050, text=» CM DWTIPQ,A6 CLEAR INPUT QUEUE «, t00=0x0072, t01=0x00d0}
0x0b2e4…0b30c               Head {h00=0x0024, h01=0x0050, text=» CM DWTRCI,A6 CLEAR RETURN INFO.«, t00=0x0072, t01=0x00f8}
0x0b30c…0b348               Head {h00=0x0038, h01=0x0050, text=»         CM       DWTWRO,A6        CLEAR WRITE INFO.«, t00=0x0072, t01=0x0120}
0x0b348…0b36e               Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x0072, t01=0x015c}
0x0b36e…0b396               Head {h00=0x0024, h01=0x0050, text=» CM DWTRCI,A6 CLEAR RETURN INFO «, t00=0x0072, t01=0x0182}
0x0b396…0b3be               Head {h00=0x0024, h01=0x0050, text=» CF A14,PUTDWT PUT DWT IN CHAIN «, t00=0x0073, t01=0x001a}
0x0b3be…0b3d4               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0073, t01=0x0042}
0x0b3d4…0b3ea               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0073, t01=0x0058}
0x0b3ea…0b410               Head {h00=0x0022, h01=0x0050, text=» SUK A2,CONACT CONNECT ACTIVE «, t00=0x0073, t01=0x006e}
0x0b410…0b42a               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CONA40 NO!«, t00=0x0073, t01=0x0094}
0x0b42a…0b44e               Head {h00=0x0020, h01=0x0050, text=» LC A2,DWTOPT,A6 PVC-OPTION?«, t00=0x0073, t01=0x00ae}
0x0b44e…0b460               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0073, t01=0x00d2}
0x0b460…0b47a               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CONA40 NO «, t00=0x0073, t01=0x00e4}
0x0b47a…0b486               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x00fe}
0x0b486…0b49c               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0073, t01=0x010a}
0x0b49c…0b4b2               Head {h00=0x0012, h01=0x0050, text=» LDK A2,CONAD «, t00=0x0073, t01=0x0120}
0x0b4b2…0b4ec               Head {h00=0x0036, h01=0x0050, text=» SC A2,DWTSTE,A6 DWT STATE: CONNECTED ACCEPT DATA «, t00=0x0073, t01=0x0136}
0x0b4ec…0b510               Head {h00=0x0020, h01=0x0050, text=» RF DISC40 COMPLETE REQUEST «, t00=0x0073, t01=0x0170}
0x0b510…0b51c (116, 0, 398) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x0004}
0x0b51c…0b532               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0074, t01=0x0010}
0x0b532…0b546               Head {h00=0x0010, h01=0x0050, text=»CONA40 EQU *«, t00=0x0074, t01=0x0026}
0x0b546…0b568               Head {h00=0x001e, h01=0x0050, text=» RB WRIT50 ACTIVATE TIMER «, t00=0x0074, t01=0x003a}
0x0b568…0b574               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x005c}
0x0b574…0b57e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0068}
0x0b57e…0b58c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x0072}
0x0b58c…0b596               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0080}
0x0b596…0b5da               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0074, t01=0x008a}
0x0b5da…0b5e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00ce}
0x0b5e4…0b602               Head {h00=0x001a, h01=0x0050, text=»*        CLOSE REQUEST«, t00=0x0074, t01=0x00d8}
0x0b602…0b60c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00f6}
0x0b60c…0b650               Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0074, t01=0x0100}
0x0b650…0b65a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0144}
0x0b65a…0b66e               Head {h00=0x0010, h01=0x0050, text=»CLOS00 EQU *«, t00=0x0074, t01=0x014e}
0x0b66e…0b69e               Head {h00=0x002c, h01=0x0050, text=» CF A14,FNDLOC CONFIRM LOCAL DTE ADDRESS«, t00=0x0074, t01=0x0162}
0x0b69e…0b6c4 (117, 0, 400) Head {h00=0x0022, h01=0x0050, text=» ANK A1,STRTFL MASK START FLAG«, t00=0x0075, t01=0x0004}
0x0b6c4…0b6ec               Head {h00=0x0024, h01=0x0050, text=» RF(Z) DISC40 CLOSE ALREADY DONE«, t00=0x0075, t01=0x002a}
0x0b6ec…0b6f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0052}
0x0b6f6…0b70a               Head {h00=0x0010, h01=0x0050, text=»* LINE OPEN «, t00=0x0075, t01=0x005c}
0x0b70a…0b736               Head {h00=0x0028, h01=0x0050, text=»* CHECK IF CLOSE ALREADY IN PROGRESS«, t00=0x0075, t01=0x0070}
0x0b736…0b740               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x009c}
0x0b740…0b756               Head {h00=0x0012, h01=0x0050, text=» LDK A2,CLOSYS«, t00=0x0075, t01=0x00a6}
0x0b756…0b77e               Head {h00=0x0024, h01=0x0050, text=»         LD       A3,CMNFLG,A12 «, t00=0x0075, t01=0x00bc}
0x0b77e…0b7a2               Head {h00=0x0020, h01=0x0050, text=»         ANK      A3,CLOFLG «, t00=0x0075, t01=0x00e4}
0x0b7a2…0b7ba               Head {h00=0x0014, h01=0x0050, text=» RF(Z) DISC55 NO«, t00=0x0075, t01=0x0108}
0x0b7ba…0b7ce               Head {h00=0x0010, h01=0x0050, text=»CLOS10 EQU *«, t00=0x0075, t01=0x0120}
0x0b7ce…0b7f0               Head {h00=0x001e, h01=0x0050, text=» ABL ERRSTE SEQUENCE ERROR«, t00=0x0075, t01=0x0134}
0x0b7f0…0b7fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0156}
0x0b7fa…0b808               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0075, t01=0x0160}
0x0b808…0b812               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x016e}
0x0b812…0b85e               Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x0075, t01=0x0178}
0x0b85e…0b868               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0034}
0x0b868…0b884               Head {h00=0x0018, h01=0x0050, text=»* DISCONNECT REQUEST«, t00=0x0076, t01=0x003e}
0x0b884…0b88e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x005a}
0x0b88e…0b8da               Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x0076, t01=0x0064}
0x0b8da…0b8e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00b0}
0x0b8e4…0b8f8               Head {h00=0x0010, h01=0x0050, text=»DISC00 EQU *«, t00=0x0076, t01=0x00ba}
0x0b8f8…0b930               Head {h00=0x0034, h01=0x0050, text=» LD A1,DWTLAD,A6 GET LOCAL SYMBOLIC DTE ADDRESS «, t00=0x0076, t01=0x00ce}
0x0b930…0b95e               Head {h00=0x002a, h01=0x0050, text=» CF A14,FNDLIN FIND LINE BLOCK ADDRESS«, t00=0x0076, t01=0x0106}
0x0b95e…0b984               Head {h00=0x0022, h01=0x0050, text=» ANK A1,STRTFL MASK START FLAG«, t00=0x0076, t01=0x0134}
0x0b984…0b9b2               Head {h00=0x002a, h01=0x0050, text=» ABL(Z) ERRSYS INCORRECT SYSTEM STATE «, t00=0x0076, t01=0x015a}
0x0b9b2…0b9c6               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0076, t01=0x0188}
0x0b9c6…0b9f4               Head {h00=0x002a, h01=0x0050, text=» RF(Z) DISC40 DISCONNECT ALREADY DONE «, t00=0x0077, t01=0x000c}
0x0b9f4…0ba1c               Head {h00=0x0024, h01=0x0050, text=» CM DWTRCI,A6 CLEAR RETURN INFO «, t00=0x0077, t01=0x003a}
0x0ba1c…0ba32               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0077, t01=0x0062}
0x0ba32…0ba44               Head {h00=0x000e, h01=0x0050, text=» RF DISC50«, t00=0x0077, t01=0x0078}
0x0ba44…0ba50               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x008a}
0x0ba50…0ba66               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0077, t01=0x0096}
0x0ba66…0ba94               Head {h00=0x002a, h01=0x0050, text=» SUK A4,VCREL VIRTUAL CIRCUIT RELEASED«, t00=0x0077, t01=0x00ac}
0x0ba94…0baae               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) DISC50 NO «, t00=0x0077, t01=0x00da}
0x0baae…0bab8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x00f4}
0x0bab8…0bad4               Head {h00=0x0018, h01=0x0050, text=»* CLEAR INPUT QUEUE «, t00=0x0077, t01=0x00fe}
0x0bad4…0bade               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x011a}
0x0bade…0baf2               Head {h00=0x0010, h01=0x0050, text=»DISC10 EQU *«, t00=0x0077, t01=0x0124}
0x0baf2…0bb30               Head {h00=0x003a, h01=0x0050, text=»         LDK      A1,DWTIPQ        INPUT QUEUE ANCHOR «, t00=0x0077, t01=0x0138}
0x0bb30…0bb42               Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x0077, t01=0x0176}
0x0bb42…0bb7a               Head {h00=0x0034, h01=0x0050, text=»         LD       A2,DWTIPQ,A6     QUEUE EMPTY ?«, t00=0x0077, t01=0x0188}
0x0bb7a…0bba8               Head {h00=0x002a, h01=0x0050, text=»         RF(Z)    DISC20           YES«, t00=0x0078, t01=0x0030}
0x0bba8…0bbe2               Head {h00=0x0036, h01=0x0050, text=»         CF       A14,DEQUE        DEQUEUE ELEMENT«, t00=0x0078, t01=0x005e}
0x0bbe2…0bc1c               Head {h00=0x0036, h01=0x0050, text=»         CF       A14,RLBUF        RELEASE BUFFER «, t00=0x0078, t01=0x0098}
0x0bc1c…0bc38               Head {h00=0x0018, h01=0x0050, text=» RB DISC10 TAKE NEXT«, t00=0x0078, t01=0x00d2}
0x0bc38…0bc54               Head {h00=0x0018, h01=0x0050, text=»DISC20   EQU      * «, t00=0x0078, t01=0x00ee}
0x0bc54…0bc8c               Head {h00=0x0034, h01=0x0050, text=»         LDK      A1,DISCON        DISCONNECTED «, t00=0x0078, t01=0x010a}
0x0bc8c…0bcb2               Head {h00=0x0022, h01=0x0050, text=»         SC       A1,DWTSTE,A6«, t00=0x0078, t01=0x0142}
0x0bcb2…0bcbe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x0168}
0x0bcbe…0bcc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0174}
0x0bcc8…0bcd6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0078, t01=0x017e}
0x0bcd6…0bce0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x018c}
0x0bce0…0bd00               Head {h00=0x001c, h01=0x0050, text=»* REMOVE DWT FROM CHAIN «, t00=0x0079, t01=0x0008}
0x0bd00…0bd0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0028}
0x0bd0a…0bd1e               Head {h00=0x0010, h01=0x0050, text=»DISC25 EQU *«, t00=0x0079, t01=0x0032}
0x0bd1e…0bd4c               Head {h00=0x002a, h01=0x0050, text=» CF A14,RELDWT RELEASE DWT FROM CHAIN «, t00=0x0079, t01=0x0046}
0x0bd4c…0bd60               Head {h00=0x0010, h01=0x0050, text=»DISC40 EQU *«, t00=0x0079, t01=0x0074}
0x0bd60…0bd80               Head {h00=0x001c, h01=0x0050, text=» LDK A1,ACPT.RC ACCEPTED«, t00=0x0079, t01=0x0088}
0x0bd80…0bda4               Head {h00=0x0020, h01=0x0050, text=» ABL RHEXIT COMPLETE REQUEST«, t00=0x0079, t01=0x00a8}
0x0bda4…0bdb8               Head {h00=0x0010, h01=0x0050, text=»DISC50 EQU *«, t00=0x0079, t01=0x00cc}
0x0bdb8…0bdce               Head {h00=0x0012, h01=0x0050, text=» LDK A2,DISCAL«, t00=0x0079, t01=0x00e0}
0x0bdce…0bde2               Head {h00=0x0010, h01=0x0050, text=»DISC55 EQU *«, t00=0x0079, t01=0x00f6}
0x0bde2…0bdf8               Head {h00=0x0012, h01=0x0050, text=» LDK A5,DISCON«, t00=0x0079, t01=0x010a}
0x0bdf8…0be0c               Head {h00=0x0010, h01=0x0050, text=»DISC60 EQU *«, t00=0x0079, t01=0x0120}
0x0be0c…0be32               Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x0079, t01=0x0134}
0x0be32…0be4a               Head {h00=0x0014, h01=0x0050, text=» SC A5,DWTSTE,A6«, t00=0x0079, t01=0x015a}
0x0be4a…0be60               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0079, t01=0x0172}
0x0be60…0be76               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0079, t01=0x0188}
0x0be76…0be80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x000e}
0x0be80…0beac               Head {h00=0x0028, h01=0x0050, text=»* TEST IF PERMANENT VIRTUAL CIRCUIT «, t00=0x007a, t01=0x0018}
0x0beac…0beb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0044}
0x0beb6…0bece               Head {h00=0x0014, h01=0x0050, text=» LC A1,VCTYP,A13«, t00=0x007a, t01=0x004e}
0x0bece…0bee2               Head {h00=0x0010, h01=0x0050, text=» ANK A1,PVC «, t00=0x007a, t01=0x0066}
0x0bee2…0befa               Head {h00=0x0014, h01=0x0050, text=» RF(Z) DISC70 NO«, t00=0x007a, t01=0x007a}
0x0befa…0bf06               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x0092}
0x0bf06…0bf1c               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x007a, t01=0x009e}
0x0bf1c…0bf40               Head {h00=0x0020, h01=0x0050, text=» SUK A2,DISCAL DISCONNECT ? «, t00=0x007a, t01=0x00b4}
0x0bf40…0bf5a               Head {h00=0x0016, h01=0x0050, text=» RB(Z) DISC25 YES «, t00=0x007a, t01=0x00d8}
0x0bf5a…0bf6e               Head {h00=0x0010, h01=0x0050, text=»DISC70 EQU *«, t00=0x007a, t01=0x00f2}
0x0bf6e…0bf96               Head {h00=0x0024, h01=0x0050, text=» ABL RHSCHE CONTROL TO SCHEDULER«, t00=0x007a, t01=0x0106}
0x0bf96…0bfa2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x012e}
0x0bfa2…0bfb8               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x007a, t01=0x013a}
0x0bfb8…0bfca               Head {h00=0x000e, h01=0x0050, text=» RB DISC25«, t00=0x007a, t01=0x0150}
0x0bfca…0bfd6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x0162}
0x0bfd6…0bfe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x016e}
0x0bfe0…0bfee               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007a, t01=0x0178}
0x0bfee…0bff8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0186}
0x0bff8…0c03c               Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x007a, t01=0x0190}
0x0c03c…0c046               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0044}
0x0c046…0c06a               Head {h00=0x0020, h01=0x0050, text=»*        SET STATUS REQUEST «, t00=0x007b, t01=0x004e}
0x0c06a…0c074               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0072}
0x0c074…0c0b8               Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x007b, t01=0x007c}
0x0c0b8…0c0c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00c0}
0x0c0c2…0c0d6               Head {h00=0x0010, h01=0x0050, text=»STAT05 EQU *«, t00=0x007b, t01=0x00ca}
0x0c0d6…0c0ec               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x007b, t01=0x00de}
0x0c0ec…0c0fe               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x007b, t01=0x00f4}
0x0c0fe…0c12c               Head {h00=0x002a, h01=0x0050, text=» SUK A1,VCREL VIRTUAL CIRCUIT RELEASED«, t00=0x007b, t01=0x0106}
0x0c12c…0c154               Head {h00=0x0024, h01=0x0050, text=» ABL(Z) WRIT10 COMPLETE REQUEST «, t00=0x007b, t01=0x0134}
0x0c154…0c160               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007b, t01=0x015c}
0x0c160…0c190               Head {h00=0x002c, h01=0x0050, text=» LD A1,ECBCW1,A8 GET STATUS INFORMATION «, t00=0x007b, t01=0x0168}
0x0c190…0c1a6               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x007c, t01=0x0008}
0x0c1a6…0c1cc               Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) ERRREQ REQUEST ERROR «, t00=0x007c, t01=0x001e}
0x0c1cc…0c1d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x0044}
0x0c1d8…0c1ee               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x007c, t01=0x0050}
0x0c1ee…0c218               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) STAT20 ACCEPT CALL REQUEST«, t00=0x007c, t01=0x0066}
0x0c218…0c224               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x0090}
0x0c224…0c250               Head {h00=0x0028, h01=0x0050, text=» SUK A3,CONAD CONNECTED ACCEPT DATA «, t00=0x007c, t01=0x009c}
0x0c250…0c26a               Head {h00=0x0016, h01=0x0050, text=» RF(Z) STAT10 YES «, t00=0x007c, t01=0x00c8}
0x0c26a…0c29c               Head {h00=0x002e, h01=0x0050, text=» SUK A3,CONRD-CONAD CONNECTED REFUSE DATA «, t00=0x007c, t01=0x00e2}
0x0c29c…0c2c2               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) CLOS10 SEQUENCE ERROR «, t00=0x007c, t01=0x0114}
0x0c2c2…0c2cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x013a}
0x0c2cc…0c2ea               Head {h00=0x001a, h01=0x0050, text=»* REFUSE DATA REQUEST «, t00=0x007c, t01=0x0144}
0x0c2ea…0c2f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0162}
0x0c2f4…0c308               Head {h00=0x0010, h01=0x0050, text=»STAT10 EQU *«, t00=0x007c, t01=0x016c}
0x0c308…0c32a               Head {h00=0x001e, h01=0x0050, text=» LDK A2,REFDAT REFUSE DATA«, t00=0x007c, t01=0x0180}
0x0c32a…0c340               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CONRD «, t00=0x007d, t01=0x0012}
0x0c340…0c358               Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTSTE,A6«, t00=0x007d, t01=0x0028}
0x0c358…0c37e               Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x007d, t01=0x0040}
0x0c37e…0c3a6               Head {h00=0x0024, h01=0x0050, text=» ABL RHSCHE CONTROL TO SCHEDULER«, t00=0x007d, t01=0x0066}
0x0c3a6…0c3bc               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x007d, t01=0x008e}
0x0c3bc…0c3c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00a4}
0x0c3c6…0c3d4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007d, t01=0x00ae}
0x0c3d4…0c3de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00bc}
0x0c3de…0c3fc               Head {h00=0x001a, h01=0x0050, text=»* ACCEPT CALL REQUEST «, t00=0x007d, t01=0x00c6}
0x0c3fc…0c406               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00e4}
0x0c406…0c41a               Head {h00=0x0010, h01=0x0050, text=»STAT20 EQU *«, t00=0x007d, t01=0x00ee}
0x0c41a…0c448               Head {h00=0x002a, h01=0x0050, text=» SUK A3,INCALR INCOMING CALL RECEIVED «, t00=0x007d, t01=0x0102}
0x0c448…0c46e               Head {h00=0x0022, h01=0x0050, text=» RB(NZ) CLOS10 SEQUENCE ERROR «, t00=0x007d, t01=0x0130}
0x0c46e…0c490               Head {h00=0x001e, h01=0x0050, text=» LDK A2,ACCCAL ACCEPT CALL«, t00=0x007d, t01=0x0156}
0x0c490…0c4bc               Head {h00=0x0028, h01=0x0050, text=» LDK A5,CONAD CONNECTED ACCEPT DATA «, t00=0x007d, t01=0x0178}
0x0c4bc…0c4e0               Head {h00=0x0020, h01=0x0050, text=» RB DISC60 TRANSPORT HANDLER«, t00=0x007e, t01=0x0014}
0x0c4e0…0c4ec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x0038}
0x0c4ec…0c4fa               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007e, t01=0x0044}
0x0c4fa…0c504               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0052}
0x0c504…0c550               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x007e, t01=0x005c}
0x0c550…0c55a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00a8}
0x0c55a…0c578               Head {h00=0x001a, h01=0x0050, text=»* SET TIMEOUT REQUEST «, t00=0x007e, t01=0x00b2}
0x0c578…0c582               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00d0}
0x0c582…0c5ce               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x007e, t01=0x00da}
0x0c5ce…0c5d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0126}
0x0c5d8…0c5ec               Head {h00=0x0010, h01=0x0050, text=»TIMO00 EQU *«, t00=0x007e, t01=0x0130}
0x0c5ec…0c614               Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBCW1,A8 GET TIMER VALUE«, t00=0x007e, t01=0x0144}
0x0c614…0c62c               Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTRTV,A6«, t00=0x007e, t01=0x016c}
0x0c62c…0c650               Head {h00=0x0020, h01=0x0050, text=» RB DISC40 COMPLETE REQUEST «, t00=0x007e, t01=0x0184}
0x0c650…0c65a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0018}
0x0c65a…0c66e               Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x007f, t01=0x0022}
0x0c66e…0c67c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007f, t01=0x0036}
0x0c67c…0c686               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0044}
0x0c686…0c690               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x004e}
0x0c690…0c6d4               Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x007f, t01=0x0058}
0x0c6d4…0c6de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x009c}
0x0c6de…0c6fa               Head {h00=0x0018, h01=0x0050, text=»* STATISTIC REQUEST «, t00=0x007f, t01=0x00a6}
0x0c6fa…0c704               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00c2}
0x0c704…0c748               Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x007f, t01=0x00cc}
0x0c748…0c752               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0110}
0x0c752…0c75c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x011a}
0x0c75c…0c770               Head {h00=0x0010, h01=0x0050, text=»STATS EQU * «, t00=0x007f, t01=0x0124}
0x0c770…0c796               Head {h00=0x0022, h01=0x0050, text=» CF A14,FNDLOC GET LINE NUMBER«, t00=0x007f, t01=0x0138}
0x0c796…0c7ac               Head {h00=0x0012, h01=0x0050, text=» LDK A4,STATFL«, t00=0x007f, t01=0x015e}
0x0c7ac…0c7be               Head {h00=0x000e, h01=0x0050, text=» ANR A4,A1«, t00=0x007f, t01=0x0174}
0x0c7be…0c7ec               Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) ERRREQ STATISTIC REQUEST BUSY«, t00=0x007f, t01=0x0186}
0x0c7ec…0c804               Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRL,A8 «, t00=0x0080, t01=0x0024}
0x0c804…0c828               Head {h00=0x0020, h01=0x0050, text=» ABL(NP) ERRLEN LENGTH ERROR«, t00=0x0080, t01=0x003c}
0x0c828…0c862               Head {h00=0x0036, h01=0x0050, text=» ORS A1,CMNFLG,A12 SET STATISTIC REQUEST BUSY FLAG«, t00=0x0080, t01=0x0060}
0x0c862…0c878               Head {h00=0x0012, h01=0x0050, text=» LDK A1,STATIS«, t00=0x0080, t01=0x009a}
0x0c878…0c8a4               Head {h00=0x0028, h01=0x0050, text=» SC A1,DWTFNC,A6 SAVE FUNCTION CODE «, t00=0x0080, t01=0x00b0}
0x0c8a4…0c8ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00dc}
0x0c8ae…0c8ec               Head {h00=0x003a, h01=0x0050, text=»* SAVE THREE WORDS OF THE USER ECB IN A MONITOR BLOCK «, t00=0x0080, t01=0x00e6}
0x0c8ec…0c8f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0124}
0x0c8f6…0c90e               Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBFC,A8 «, t00=0x0080, t01=0x012e}
0x0c90e…0c926               Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBBA,A8 «, t00=0x0080, t01=0x0146}
0x0c926…0c93e               Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBCW2,A8«, t00=0x0080, t01=0x015e}
0x0c93e…0c950               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x0080, t01=0x0176}
0x0c950…0c986               Head {h00=0x0032, h01=0x0050, text=» CF A15,GETBLK GET A BLOCK AND SAVE REGISTERS «, t00=0x0080, t01=0x0188}
0x0c986…0c992               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0081, t01=0x002e}
0x0c992…0c9c4               Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTRTP,A6 SAVE BLOCK ADDRESS IN DWT«, t00=0x0081, t01=0x003a}
0x0c9c4…0c9f4               Head {h00=0x002c, h01=0x0050, text=» ST A6,ECBCW2,A8 SAVE DWT-ADDRESS IN ECB«, t00=0x0081, t01=0x006c}
0x0c9f4…0c9fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x009c}
0x0c9fe…0ca0c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0081, t01=0x00a6}
0x0ca0c…0ca16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00b4}
0x0ca16…0ca4c               Head {h00=0x0032, h01=0x0050, text=»* PREPARE ECB FOR STATISTIC REQUEST TO LEVEL 2«, t00=0x0081, t01=0x00be}
0x0ca4c…0ca56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00f4}
0x0ca56…0ca70               Head {h00=0x0016, h01=0x0050, text=» LD A1,FILCOD,A12 «, t00=0x0081, t01=0x00fe}
0x0ca70…0caaa               Head {h00=0x0036, h01=0x0050, text=» ST A1,ECBFC,A8 FILE CODE FOR LINE IDENTIFICATION «, t00=0x0081, t01=0x0118}
0x0caaa…0cac0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0081, t01=0x0152}
0x0cac0…0cad4               Head {h00=0x0010, h01=0x0050, text=» LDR A1,A12 «, t00=0x0081, t01=0x0168}
0x0cad4…0cb10               Head {h00=0x0038, h01=0x0050, text=» ADK A1,INTSTB ADDRESS INTERMEDIATE STATISTIC BUFFER«, t00=0x0081, t01=0x017c}
0x0cb10…0cb2e               Head {h00=0x001a, h01=0x0050, text=» ST A1,ECBBA,A8 TO ECB«, t00=0x0082, t01=0x0028}
0x0cb2e…0cb3a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x0046}
0x0cb3a…0cb4e               Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x0082, t01=0x0052}
0x0cb4e…0cb7a               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A8 ECB-ADDRESS AS PARAMETER «, t00=0x0082, t01=0x0066}
0x0cb7a…0cb84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0092}
0x0cb84…0cbb0               Head {h00=0x0028, h01=0x0050, text=»* ISSUE STATISTIC REQUEST TO LEVEL 2«, t00=0x0082, t01=0x009c}
0x0cbb0…0cbba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00c8}
0x0cbba…0cbde               Head {h00=0x0020, h01=0x0050, text=» LDK A7,STATR FUNCTION CODE «, t00=0x0082, t01=0x00d2}
0x0cbde…0cbea               Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0082, t01=0x00f6}
0x0cbea…0cbfa               Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x0082, t01=0x0102}
0x0cbfa…0cc22               Head {h00=0x0024, h01=0x0050, text=» DATA STAEND ACTIVATION ADDRESS «, t00=0x0082, t01=0x0112}
0x0cc22…0cc4a               Head {h00=0x0024, h01=0x0050, text=» ABL EXITDC CONTROL TO SCHEDULER«, t00=0x0082, t01=0x013a}
0x0cc4a…0cc54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0162}
0x0cc54…0cc62               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0082, t01=0x016c}
0x0cc62…0cc6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x017a}
0x0cc6c…0cc8a               Head {h00=0x001a, h01=0x0050, text=»* RETURN FROM LEVEL 2 «, t00=0x0082, t01=0x0184}
0x0cc8a…0cc94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0012}
0x0cc94…0cca8               Head {h00=0x0010, h01=0x0050, text=»STAEND EQU *«, t00=0x0083, t01=0x001c}
0x0cca8…0ccc6               Head {h00=0x001a, h01=0x0050, text=» LDR A8,A1 ECB-ADDRESS«, t00=0x0083, t01=0x0030}
0x0ccc6…0ccee               Head {h00=0x0024, h01=0x0050, text=» LD A6,ECBCW2,A8 GET DWT-ADDRESS«, t00=0x0083, t01=0x004e}
0x0ccee…0cd1e               Head {h00=0x002c, h01=0x0050, text=» LD A4,DWTRTP,A6 GET ADDRESS SAVE BLOCK «, t00=0x0083, t01=0x0076}
0x0cd1e…0cd34               Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x0083, t01=0x00a6}
0x0cd34…0cd46               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x0083, t01=0x00bc}
0x0cd46…0cd6a               Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RELEASE BLOCK«, t00=0x0083, t01=0x00ce}
0x0cd6a…0cd76               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0083, t01=0x00f2}
0x0cd76…0cda0               Head {h00=0x0026, h01=0x0050, text=» ST A1,ECBFC,A8 RESTORE FILE CODE «, t00=0x0083, t01=0x00fe}
0x0cda0…0cdce               Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBCW2,A8 RESTORE CONTROL WORD «, t00=0x0083, t01=0x0128}
0x0cdce…0cde4               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0083, t01=0x0156}
0x0cde4…0ce22               Head {h00=0x003a, h01=0x0050, text=» LD A1,ECBBA,A8 GET INTERMEDIATE STAT. BUFFER ADDRESS «, t00=0x0083, t01=0x016c}
0x0ce22…0ce54               Head {h00=0x002e, h01=0x0050, text=» ST A2,ECBBA,A8 RESTORE OLD BUFFER ADDRESS«, t00=0x0084, t01=0x001a}
0x0ce54…0ce6c               Head {h00=0x0014, h01=0x0050, text=» LD A4,ECBEL,A8 «, t00=0x0084, t01=0x004c}
0x0ce6c…0ce92               Head {h00=0x0022, h01=0x0050, text=» LDKL A14,DCSTAK STACK POINTER«, t00=0x0084, t01=0x0064}
0x0ce92…0cec6               Head {h00=0x0030, h01=0x0050, text=» CF A14,COPTUB COPY STAT.INFO.TO USER BUFFER«, t00=0x0084, t01=0x008a}
0x0cec6…0ced2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x00be}
0x0ced2…0cee6               Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x0084, t01=0x00ca}
0x0cee6…0cf0a               Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBRC,A8 RETURN CODE «, t00=0x0084, t01=0x00de}
0x0cf0a…0cf1c               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x0084, t01=0x0102}
0x0cf1c…0cf4c               Head {h00=0x002c, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST TO USER «, t00=0x0084, t01=0x0114}
0x0cf4c…0cf58               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0084, t01=0x0144}
0x0cf58…0cf6a               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0084, t01=0x0150}
0x0cf6a…0cf98               Head {h00=0x002a, h01=0x0050, text=» CF A14,FNDLIN GET LINE BLOCK ADDRESS «, t00=0x0084, t01=0x0162}
0x0cf98…0cfae               Head {h00=0x0012, h01=0x0050, text=» LDK A1,STATFL«, t00=0x0084, t01=0x0190}
0x0cfae…0cfc0               Head {h00=0x000e, h01=0x0050, text=» C1R A1,A1«, t00=0x0085, t01=0x0016}
0x0cfc0…0cff0               Head {h00=0x002c, h01=0x0050, text=» ANS A1,CMNFLG,A12 RESET STAT. BUSY FLAG«, t00=0x0085, t01=0x0028}
0x0cff0…0d01e               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0085, t01=0x0058}
0x0d01e…0d02a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x0086}
0x0d02a…0d038               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0085, t01=0x0092}
0x0d038…0d042               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x00a0}
0x0d042…0d074               Head {h00=0x002e, h01=0x0050, text=»*        ROUTINE TO GET LINE INDEX AND/OR «, t00=0x0085, t01=0x00aa}
0x0d074…0d098               Head {h00=0x0020, h01=0x0050, text=»*        LINE BLOCK ADDRESS «, t00=0x0085, t01=0x00dc}
0x0d098…0d0a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0100}
0x0d0a2…0d0e6               Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0085, t01=0x010a}
0x0d0e6…0d0f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x014e}
0x0d0f0…0d112               Head {h00=0x001e, h01=0x0050, text=»*        INPUT PARAMETER :«, t00=0x0085, t01=0x0158}
0x0d112…0d144               Head {h00=0x002e, h01=0x0050, text=»*          A1 =SYMBOLIC LOCAL DTE ADDRESS «, t00=0x0085, t01=0x017a}
0x0d144…0d14e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x001c}
0x0d14e…0d172               Head {h00=0x0020, h01=0x0050, text=»*        CALLING SEQUENCE : «, t00=0x0086, t01=0x0026}
0x0d172…0d192               Head {h00=0x001c, h01=0x0050, text=»*          CF A14,FNDLIN«, t00=0x0086, t01=0x004a}
0x0d192…0d1c6               Head {h00=0x0030, h01=0x0050, text=»*   CF A14,FNDLOC (A1 LOADED IN THE ROUTINE)«, t00=0x0086, t01=0x006a}
0x0d1c6…0d1d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x009e}
0x0d1d0…0d1f4               Head {h00=0x0020, h01=0x0050, text=»*        OUTPUT PARAMETERS :«, t00=0x0086, t01=0x00a8}
0x0d1f4…0d218               Head {h00=0x0020, h01=0x0050, text=»*          A1 = COMMON FLAGS«, t00=0x0086, t01=0x00cc}
0x0d218…0d242               Head {h00=0x0026, h01=0x0050, text=»*          A12= LINE BLOCK ADDRESS«, t00=0x0086, t01=0x00f0}
0x0d242…0d25e               Head {h00=0x0018, h01=0x0050, text=»*   A3 = LINE INDEX «, t00=0x0086, t01=0x011a}
0x0d25e…0d290               Head {h00=0x002e, h01=0x0050, text=»*          NO OTHER REGISTERS ARE CHANGED «, t00=0x0086, t01=0x0136}
0x0d290…0d29a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0168}
0x0d29a…0d2ae               Head {h00=0x0010, h01=0x0050, text=»FNDLOC EQU *«, t00=0x0086, t01=0x0172}
0x0d2ae…0d2dc               Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW2,A8 GET LOCAL DTE ADDRESS«, t00=0x0086, t01=0x0186}
0x0d2dc…0d2f0               Head {h00=0x0010, h01=0x0050, text=»FNDLIN EQU *«, t00=0x0087, t01=0x0024}
0x0d2f0…0d30c               Head {h00=0x0018, h01=0x0050, text=» STR A2,A14 SAVE A2 «, t00=0x0087, t01=0x0038}
0x0d30c…0d32c               Head {h00=0x001c, h01=0x0050, text=» LDKL A3,LOCAL SET TYPE «, t00=0x0087, t01=0x0054}
0x0d32c…0d33e               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x0087, t01=0x0074}
0x0d33e…0d364               Head {h00=0x0022, h01=0x0050, text=» CF A15,FNDDNT FIND LOCAL DTE «, t00=0x0087, t01=0x0086}
0x0d364…0d376               Head {h00=0x000e, h01=0x0050, text=» ENB  . =1«, t00=0x0087, t01=0x00ac}
0x0d376…0d390               Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 FOUND ?«, t00=0x0087, t01=0x00be}
0x0d390…0d3aa               Head {h00=0x0016, h01=0x0050, text=» RF(NN) FNDL10 YES«, t00=0x0087, t01=0x00d8}
0x0d3aa…0d3d2               Head {h00=0x0024, h01=0x0050, text=» ADKL A14,4 ADJUST STACK POINTER«, t00=0x0087, t01=0x00f2}
0x0d3d2…0d3f4               Head {h00=0x001e, h01=0x0050, text=» ABL ERRREQ REQUEST ERROR «, t00=0x0087, t01=0x011a}
0x0d3f4…0d408               Head {h00=0x0010, h01=0x0050, text=»FNDL10 EQU *«, t00=0x0087, t01=0x013c}
0x0d408…0d41e               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0087, t01=0x0150}
0x0d41e…0d430               Head {h00=0x000e, h01=0x0050, text=» ADR A3,A3«, t00=0x0087, t01=0x0166}
0x0d430…0d43c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x0178}
0x0d43c…0d466               Head {h00=0x0026, h01=0x0050, text=» LD A12,LINTAB,A3 LINE ADM. TABLE «, t00=0x0087, t01=0x0184}
0x0d466…0d490               Head {h00=0x0026, h01=0x0050, text=» LD A1,CMNFLG,A12 GET COMMON FLAGS«, t00=0x0088, t01=0x001e}
0x0d490…0d4ae               Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A14 RELOAD A2«, t00=0x0088, t01=0x0048}
0x0d4ae…0d4be               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0088, t01=0x0066}
0x0d4be…0d4cc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0088, t01=0x0076}
0x0d4cc…0d4d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0084}
0x0d4d6…0d4e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x008e}
0x0d4e0…0d4fa               Head {h00=0x0016, h01=0x0050, text=»* PUT DWT IN CHAIN«, t00=0x0088, t01=0x0098}
0x0d4fa…0d504               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00b2}
0x0d504…0d550               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x0088, t01=0x00bc}
0x0d550…0d55a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0108}
0x0d55a…0d576               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0088, t01=0x0112}
0x0d576…0d592               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT ADDRESS«, t00=0x0088, t01=0x012e}
0x0d592…0d5ba               Head {h00=0x0024, h01=0x0050, text=»*  A12 = LINE ADM.BLOCK ADDRESS «, t00=0x0088, t01=0x014a}
0x0d5ba…0d5dc               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x0088, t01=0x0172}
0x0d5dc…0d5e6 (137, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0004}
0x0d5e6…0d602               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0089, t01=0x000e}
0x0d602…0d61a               Head {h00=0x0014, h01=0x0050, text=»*  CF A14,PUTDWT«, t00=0x0089, t01=0x002a}
0x0d61a…0d624               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0042}
0x0d624…0d640               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x0089, t01=0x004c}
0x0d640…0d658               Head {h00=0x0014, h01=0x0050, text=»*  A1 IS CHANGED«, t00=0x0089, t01=0x0068}
0x0d658…0d662               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0080}
0x0d662…0d676               Head {h00=0x0010, h01=0x0050, text=»PUTDWT EQU *«, t00=0x0089, t01=0x008a}
0x0d676…0d692               Head {h00=0x0018, h01=0x0050, text=» STR A2,A14 SAVE A2 «, t00=0x0089, t01=0x009e}
0x0d692…0d6a6               Head {h00=0x0010, h01=0x0050, text=» LDR A2,A12 «, t00=0x0089, t01=0x00ba}
0x0d6a6…0d6bc               Head {h00=0x0012, h01=0x0050, text=» ADK A2,CHAIN «, t00=0x0089, t01=0x00ce}
0x0d6bc…0d6d0               Head {h00=0x0010, h01=0x0050, text=»PUTD10 EQU *«, t00=0x0089, t01=0x00e4}
0x0d6d0…0d6ee               Head {h00=0x001a, h01=0x0050, text=» LDR* A1,A2 GET ANCHOR«, t00=0x0089, t01=0x00f8}
0x0d6ee…0d704               Head {h00=0x0012, h01=0x0050, text=» RF(Z) PUTD20 «, t00=0x0089, t01=0x0116}
0x0d704…0d716               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0089, t01=0x012c}
0x0d716…0d72c               Head {h00=0x0012, h01=0x0050, text=» ADK A2,DWTCHN«, t00=0x0089, t01=0x013e}
0x0d72c…0d74e               Head {h00=0x001e, h01=0x0050, text=» RB PUTD10 END OF CHAIN ? «, t00=0x0089, t01=0x0154}
0x0d74e…0d762               Head {h00=0x0010, h01=0x0050, text=»PUTD20 EQU *«, t00=0x0089, t01=0x0176}
0x0d762…0d782               Head {h00=0x001c, h01=0x0050, text=» STR A6,A2 PUT IN CHAIN «, t00=0x0089, t01=0x018a}
0x0d782…0d7a2               Head {h00=0x001c, h01=0x0050, text=» LDR* A2,A14 RESTORE A2 «, t00=0x008a, t01=0x001a}
0x0d7a2…0d7b2               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x008a, t01=0x003a}
0x0d7b2…0d7bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x004a}
0x0d7bc…0d7ca               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008a, t01=0x0054}
0x0d7ca…0d7d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0062}
0x0d7d4…0d7de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x006c}
0x0d7de…0d7fe               Head {h00=0x001c, h01=0x0050, text=»* RELEASE DWT FROM CHAIN«, t00=0x008a, t01=0x0076}
0x0d7fe…0d808               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0096}
0x0d808…0d856               Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x008a, t01=0x00a0}
0x0d856…0d860               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x00ee}
0x0d860…0d87c               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x008a, t01=0x00f8}
0x0d87c…0d898               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT ADDRESS«, t00=0x008a, t01=0x0114}
0x0d898…0d8c0               Head {h00=0x0024, h01=0x0050, text=»*  A12 = LINE ADM.BLOCK ADDRESS «, t00=0x008a, t01=0x0130}
0x0d8c0…0d8e2               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x008a, t01=0x0158}
0x0d8e2…0d8ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x017a}
0x0d8ec…0d908               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x008a, t01=0x0184}
0x0d908…0d920               Head {h00=0x0014, h01=0x0050, text=»*  CF A14,RELDWT«, t00=0x008b, t01=0x0010}
0x0d920…0d92a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0028}
0x0d92a…0d946               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x008b, t01=0x0032}
0x0d946…0d966               Head {h00=0x001c, h01=0x0050, text=»*  A1 AND A2 ARE CHANGED«, t00=0x008b, t01=0x004e}
0x0d966…0d970               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x006e}
0x0d970…0d984               Head {h00=0x0010, h01=0x0050, text=»RELDWT EQU *«, t00=0x008b, t01=0x0078}
0x0d984…0d998               Head {h00=0x0010, h01=0x0050, text=» LDR A2,A12 «, t00=0x008b, t01=0x008c}
0x0d998…0d9ae               Head {h00=0x0012, h01=0x0050, text=» ADK A2,CHAIN «, t00=0x008b, t01=0x00a0}
0x0d9ae…0d9d2               Head {h00=0x0020, h01=0x0050, text=» RF RELD20 FIRST IN CHAIN ? «, t00=0x008b, t01=0x00b6}
0x0d9d2…0d9e6               Head {h00=0x0010, h01=0x0050, text=»RELD10 EQU *«, t00=0x008b, t01=0x00da}
0x0d9e6…0d9f8               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x008b, t01=0x00ee}
0x0d9f8…0da0e               Head {h00=0x0012, h01=0x0050, text=» ADK A2,DWTCHN«, t00=0x008b, t01=0x0100}
0x0da0e…0da22               Head {h00=0x0010, h01=0x0050, text=»RELD20 EQU *«, t00=0x008b, t01=0x0116}
0x0da22…0da42               Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 GET NEXT DWT«, t00=0x008b, t01=0x012a}
0x0da42…0da64               Head {h00=0x001e, h01=0x0050, text=» RF(Z) RELD30 END OF CHAIN«, t00=0x008b, t01=0x014a}
0x0da64…0da7e               Head {h00=0x0016, h01=0x0050, text=» CWR A1,A6 FOUND ?«, t00=0x008b, t01=0x016c}
0x0da7e…0da98               Head {h00=0x0016, h01=0x0050, text=» RB(NE) RELD10 NO «, t00=0x008b, t01=0x0186}
0x0da98…0dab0               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTCHN,A6«, t00=0x008c, t01=0x0010}
0x0dab0…0dad4               Head {h00=0x0020, h01=0x0050, text=» STR A1,A2 REMOVE FROM CHAIN«, t00=0x008c, t01=0x0028}
0x0dad4…0daea               Head {h00=0x0012, h01=0x0050, text=» CM DWTCHN,A6 «, t00=0x008c, t01=0x004c}
0x0daea…0dafe               Head {h00=0x0010, h01=0x0050, text=»RELD30 EQU *«, t00=0x008c, t01=0x0062}
0x0dafe…0db0e               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x008c, t01=0x0076}
0x0db0e…0db18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0086}
0x0db18…0db26               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008c, t01=0x0090}
0x0db26…0db30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x009e}
0x0db30…0db56               Head {h00=0x0022, h01=0x0050, text=»* TRANSPORT HANDLER INTERFACE «, t00=0x008c, t01=0x00a8}
0x0db56…0db60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x00ce}
0x0db60…0db74               Head {h00=0x0010, h01=0x0050, text=»TRANSP EQU *«, t00=0x008c, t01=0x00d8}
0x0db74…0dba0               Head {h00=0x0028, h01=0x0050, text=» SC A2,DWTFNC,A6 SAVE FUNCTION CODE «, t00=0x008c, t01=0x00ec}
0x0dba0…0dbce               Head {h00=0x002a, h01=0x0050, text=» CF A14,TRANSH CALL TRANSPORT HANDLER «, t00=0x008c, t01=0x0118}
0x0dbce…0dbec               Head {h00=0x001a, h01=0x0050, text=» LDR A4,A4 RETURN CODE«, t00=0x008c, t01=0x0146}
0x0dbec…0dc12               Head {h00=0x0022, h01=0x0050, text=» RF(Z) TRANSR NO ERROR,RETURN «, t00=0x008c, t01=0x0164}
0x0dc12…0dc1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x018a}
0x0dc1c…0dc3e (141, 0, 398) Head {h00=0x001e, h01=0x0050, text=»* RETURN CODE TRANSLATION «, t00=0x008d, t01=0x0004}
0x0dc3e…0dc48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0026}
0x0dc48…0dc60               Head {h00=0x0014, h01=0x0050, text=» LD A1,RTNCTR,A4«, t00=0x008d, t01=0x0030}
0x0dc60…0dc78               Head {h00=0x0014, h01=0x0050, text=» LDKL A4,RHEXIT «, t00=0x008d, t01=0x0048}
0x0dc78…0dca2               Head {h00=0x0026, h01=0x0050, text=» ST A4,4,A14 ADJUST RETURN ADDRESS«, t00=0x008d, t01=0x0060}
0x0dca2…0dcb6               Head {h00=0x0010, h01=0x0050, text=»TRANSR EQU *«, t00=0x008d, t01=0x008a}
0x0dcb6…0dcc6               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x008d, t01=0x009e}
0x0dcc6…0dcd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00ae}
0x0dcd0…0dce4               Head {h00=0x0010, h01=0x0050, text=»RTNCTR EQU *«, t00=0x008d, t01=0x00b8}
0x0dce4…0dcfa               Head {h00=0x0012, h01=0x0050, text=» DATA ACPT.RC «, t00=0x008d, t01=0x00cc}
0x0dcfa…0dd16               Head {h00=0x0018, h01=0x0050, text=» DATA ACPT.RC ACCEPT«, t00=0x008d, t01=0x00e2}
0x0dd16…0dd44               Head {h00=0x002a, h01=0x0050, text=» DATA CLEA.RC VIRTUAL CIRCUIT CLEARED «, t00=0x008d, t01=0x00fe}
0x0dd44…0dd66               Head {h00=0x001e, h01=0x0050, text=» DATA PHYE.RC NOT OPERABLE«, t00=0x008d, t01=0x012c}
0x0dd66…0dd8a               Head {h00=0x0020, h01=0x0050, text=» DATA SEQE.RC INVALID Q-BIT «, t00=0x008d, t01=0x014e}
0x0dd8a…0ddae               Head {h00=0x0020, h01=0x0050, text=» DATA INVL.RC INVALID LENGTH«, t00=0x008d, t01=0x0172}
0x0ddae…0ddd2               Head {h00=0x0020, h01=0x0050, text=» DATA SEQE.RC INVALID STATE «, t00=0x008e, t01=0x0008}
0x0ddd2…0ddf6               Head {h00=0x0020, h01=0x0050, text=» DATA INVL.RC INVALID LENGTH«, t00=0x008e, t01=0x002c}
0x0ddf6…0de28               Head {h00=0x002e, h01=0x0050, text=» DATA NOLC.RC NO LOGICAL CHANNEL AVAILABLE«, t00=0x008e, t01=0x0050}
0x0de28…0de50               Head {h00=0x0024, h01=0x0050, text=» DATA TIMO.RC TIME OUT DETECTED «, t00=0x008e, t01=0x0082}
0x0de50…0de74               Head {h00=0x0020, h01=0x0050, text=» DATA RQUE.RC REQUEST ERROR «, t00=0x008e, t01=0x00aa}
0x0de74…0de7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00ce}
0x0de7e…0de8c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008e, t01=0x00d8}
0x0de8c…0de96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00e6}
0x0de96…0dee2               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x008e, t01=0x00f0}
0x0dee2…0deec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x013c}
0x0deec…0df10               Head {h00=0x0020, h01=0x0050, text=»* REQUEST HANDLER INPUT PART«, t00=0x008e, t01=0x0146}
0x0df10…0df1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x016a}
0x0df1a…0df66               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x008e, t01=0x0174}
0x0df66…0df70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0030}
0x0df70…0df98               Head {h00=0x0024, h01=0x0050, text=»* ENTRY USED BY THE DC-SCHEDULER«, t00=0x008f, t01=0x003a}
0x0df98…0dfa2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0062}
0x0dfa2…0dfbe               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x008f, t01=0x006c}
0x0dfbe…0dfe4               Head {h00=0x0022, h01=0x0050, text=»*  A1  = QUEUE ANCHOR ADDRESS «, t00=0x008f, t01=0x0088}
0x0dfe4…0e01a               Head {h00=0x0032, h01=0x0050, text=»*  A12 = ADDRESS OF LINE ADMINISTRATION BLOCK «, t00=0x008f, t01=0x00ae}
0x0e01a…0e050               Head {h00=0x0032, h01=0x0050, text=»*  A13 = ADDRESS OF LOGICAL CHANNEL ADM.BLOCK «, t00=0x008f, t01=0x00e4}
0x0e050…0e072               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x008f, t01=0x011a}
0x0e072…0e07c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x013c}
0x0e07c…0e08e               Head {h00=0x000e, h01=0x0050, text=»RHIP EQU *«, t00=0x008f, t01=0x0146}
0x0e08e…0e0dc               Head {h00=0x004a, h01=0x0050, text=»         LDK      A7,0             A7:=INDICATION FOR RHIP-ENTRY-POINT«, t00=0x008f, t01=0x0158}
0x0e0dc…0e0fc               Head {h00=0x001c, h01=0x0050, text=»         RF       RHIP10«, t00=0x0090, t01=0x0016}
0x0e0fc…0e106               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0036}
0x0e106…0e13e               Head {h00=0x0034, h01=0x0050, text=»* ENTRY USED BY THE REQUEST HANDLER OUTPUT PART «, t00=0x0090, t01=0x0040}
0x0e13e…0e148               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0078}
0x0e148…0e164               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0090, t01=0x0082}
0x0e164…0e180               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT ADDRESS«, t00=0x0090, t01=0x009e}
0x0e180…0e1a2               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x0090, t01=0x00ba}
0x0e1a2…0e1ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00dc}
0x0e1ac…0e1c0               Head {h00=0x0010, h01=0x0050, text=»RHIPRO EQU *«, t00=0x0090, t01=0x00e6}
0x0e1c0…0e1ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00fa}
0x0e1ca…0e1f0               Head {h00=0x0022, h01=0x0050, text=»* SET ADDRESS OF QUEUE ANCHOR «, t00=0x0090, t01=0x0104}
0x0e1f0…0e1fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x012a}
0x0e1fa…0e21e               Head {h00=0x0020, h01=0x0050, text=»         LDK      A1,DWTIPQ «, t00=0x0090, t01=0x0134}
0x0e21e…0e23e               Head {h00=0x001c, h01=0x0050, text=»         ADR      A1,A6 «, t00=0x0090, t01=0x0158}
0x0e23e…0e28e               Head {h00=0x004c, h01=0x0050, text=»         LDK      A7,6             A7:=INDICATION FOR RHIPRO-ENTRY-POINT«, t00=0x0090, t01=0x0178}
0x0e28e…0e2d0               Head {h00=0x003e, h01=0x0050, text=»         ST       A7,DCLEVL        SET DC-LEVEL-INDICATION«, t00=0x0091, t01=0x0038}
0x0e2d0…0e2da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x007a}
0x0e2da…0e2e8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0091, t01=0x0084}
0x0e2e8…0e2f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0092}
0x0e2f2…0e30c               Head {h00=0x0016, h01=0x0050, text=»* DEQUEUE ELEMENT «, t00=0x0091, t01=0x009c}
0x0e30c…0e316               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00b6}
0x0e316…0e32a               Head {h00=0x0010, h01=0x0050, text=»RHIP10 EQU *«, t00=0x0091, t01=0x00c0}
0x0e32a…0e34e               Head {h00=0x0020, h01=0x0050, text=» LDR A11,A1 A11=QUEUE ANCHOR«, t00=0x0091, t01=0x00d4}
0x0e34e…0e364               Head {h00=0x0012, h01=0x0050, text=» CF A14,DEQUE «, t00=0x0091, t01=0x00f8}
0x0e364…0e388               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A2 A8=BUFFER ADDRESS«, t00=0x0091, t01=0x010e}
0x0e388…0e392               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0132}
0x0e392…0e3b6               Head {h00=0x0020, h01=0x0050, text=»*        GET TYPE OF PACKET «, t00=0x0091, t01=0x013c}
0x0e3b6…0e3c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0160}
0x0e3c0…0e3d2               Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0091, t01=0x016a}
0x0e3d2…0e3fa               Head {h00=0x0024, h01=0x0050, text=» LC A2,IDENT,A8 A2:=PACKET TYPE «, t00=0x0091, t01=0x017c}
0x0e3fa…0e434               Head {h00=0x0036, h01=0x0050, text=» LDK A3,0 A3:=PACKET TYPE INDEX FOR PROCESS-TABLE «, t00=0x0092, t01=0x0014}
0x0e434…0e43e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x004e}
0x0e43e…0e464               Head {h00=0x0022, h01=0x0050, text=»* TEST IF ENTRY POINT WAS RHIP«, t00=0x0092, t01=0x0058}
0x0e464…0e46e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x007e}
0x0e46e…0e48e               Head {h00=0x001c, h01=0x0050, text=»         LDR      A7,A7 «, t00=0x0092, t01=0x0088}
0x0e48e…0e4bc               Head {h00=0x002a, h01=0x0050, text=»         RF(NZ)   RHIP20           NO!«, t00=0x0092, t01=0x00a8}
0x0e4bc…0e4c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x00d6}
0x0e4c6…0e4f2               Head {h00=0x0028, h01=0x0050, text=»*        GET DWT ADDRESS FROM LC-ADM«, t00=0x0092, t01=0x00e0}
0x0e4f2…0e4fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x010c}
0x0e4fc…0e524               Head {h00=0x0024, h01=0x0050, text=» LD A6,LCDWT,A13 A6=DWT ADDRESS «, t00=0x0092, t01=0x0116}
0x0e524…0e538               Head {h00=0x0010, h01=0x0050, text=»RHIP20 EQU *«, t00=0x0092, t01=0x013e}
0x0e538…0e542               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0152}
0x0e542…0e572               Head {h00=0x002c, h01=0x0050, text=»*        GET PENDING REQUEST INDICATION «, t00=0x0092, t01=0x015c}
0x0e572…0e57c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x018c}
0x0e57c…0e594               Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTST,A6 «, t00=0x0093, t01=0x0008}
0x0e594…0e5bc               Head {h00=0x0024, h01=0x0050, text=» RF(N) RHIP30 NO REQUEST PENDING«, t00=0x0093, t01=0x0020}
0x0e5bc…0e5c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0048}
0x0e5c6…0e5ea               Head {h00=0x0020, h01=0x0050, text=»*        GET PENDING REQUEST«, t00=0x0093, t01=0x0052}
0x0e5ea…0e5f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0076}
0x0e5f4…0e606               Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x0093, t01=0x0080}
0x0e606…0e61e               Head {h00=0x0014, h01=0x0050, text=» LC A5,DWTFNC,A6«, t00=0x0093, t01=0x0092}
0x0e61e…0e628               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00aa}
0x0e628…0e636               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0093, t01=0x00b4}
0x0e636…0e640               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00c2}
0x0e640…0e66e               Head {h00=0x002a, h01=0x0050, text=»*        TEST IF READ REQUEST PENDING «, t00=0x0093, t01=0x00cc}
0x0e66e…0e678               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00fa}
0x0e678…0e68e               Head {h00=0x0012, h01=0x0050, text=» SUK A5,READAT«, t00=0x0093, t01=0x0104}
0x0e68e…0e6a8               Head {h00=0x0016, h01=0x0050, text=» RF(Z) RHIP30 YES «, t00=0x0093, t01=0x011a}
0x0e6a8…0e6b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0134}
0x0e6b2…0e6d2               Head {h00=0x001c, h01=0x0050, text=»*        RELOAD REQUEST «, t00=0x0093, t01=0x013e}
0x0e6d2…0e6dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x015e}
0x0e6dc…0e6f2               Head {h00=0x0012, h01=0x0050, text=» ADK A5,READAT«, t00=0x0093, t01=0x0168}
0x0e6f2…0e706               Head {h00=0x0010, h01=0x0050, text=»RHIP30 EQU *«, t00=0x0093, t01=0x017e}
0x0e706…0e718 (148, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDR A6,A6«, t00=0x0094, t01=0x0004}
0x0e718…0e744               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) RHIP40 DWT ADDRESS AVAILABLE«, t00=0x0094, t01=0x0016}
0x0e744…0e75a               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0094, t01=0x0042}
0x0e75a…0e764               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0058}
0x0e764…0e784               Head {h00=0x001c, h01=0x0050, text=»*        NO DWT ADDRESS «, t00=0x0094, t01=0x0062}
0x0e784…0e7ba               Head {h00=0x0032, h01=0x0050, text=»*        TEST IF PACKET TYPE IS "CALL PACKET" «, t00=0x0094, t01=0x0082}
0x0e7ba…0e7c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x00b8}
0x0e7c4…0e7f2               Head {h00=0x002a, h01=0x0050, text=» LDK A3,6 A3:=INDEX FOR PROCESS-TABLE «, t00=0x0094, t01=0x00c2}
0x0e7f2…0e808               Head {h00=0x0012, h01=0x0050, text=» SUK A2,CAL.P «, t00=0x0094, t01=0x00f0}
0x0e808…0e832               Head {h00=0x0026, h01=0x0050, text=» RF(Z) RHIP90 PROCESS CALL PACKET «, t00=0x0094, t01=0x0106}
0x0e832…0e83c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0130}
0x0e83c…0e846               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x013a}
0x0e846…0e85e               Head {h00=0x0014, h01=0x0050, text=»* NO CALL PACKET«, t00=0x0094, t01=0x0144}
0x0e85e…0e868               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x015c}
0x0e868…0e874               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x0166}
0x0e874…0e87e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0172}
0x0e87e…0e8b2               Head {h00=0x0030, h01=0x0050, text=»* RELEASE BUFFER AND SEND CLEAR/RESET PACKET«, t00=0x0094, t01=0x017c}
0x0e8b2…0e8bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0020}
0x0e8bc…0e8e6               Head {h00=0x0026, h01=0x0050, text=» LDK A1,NOUSER A1:=DIAGNOSTIC CODE«, t00=0x0095, t01=0x002a}
0x0e8e6…0e8f8               Head {h00=0x000e, h01=0x0050, text=» RF RHI100«, t00=0x0095, t01=0x0054}
0x0e8f8…0e902               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0066}
0x0e902…0e916               Head {h00=0x0010, h01=0x0050, text=»RHIP40 EQU *«, t00=0x0095, t01=0x0070}
0x0e916…0e93a               Head {h00=0x0020, h01=0x0050, text=»         LDK      A1,DWTRCI «, t00=0x0095, t01=0x0084}
0x0e93a…0e95a               Head {h00=0x001c, h01=0x0050, text=»         ADR      A1,A6 «, t00=0x0095, t01=0x00a8}
0x0e95a…0e97e               Head {h00=0x0020, h01=0x0050, text=»         LDKL     A9,DATA.RC«, t00=0x0095, t01=0x00c8}
0x0e97e…0e988               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00ec}
0x0e988…0e996               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0095, t01=0x00f6}
0x0e996…0e9a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0104}
0x0e9a0…0e9cc               Head {h00=0x0028, h01=0x0050, text=»* TEST IF THERE IS MORE IN THE QUEUE«, t00=0x0095, t01=0x010e}
0x0e9cc…0e9d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x013a}
0x0e9d6…0e9f6               Head {h00=0x001c, h01=0x0050, text=»         LDR*     A4,A11«, t00=0x0095, t01=0x0144}
0x0e9f6…0ea24               Head {h00=0x002a, h01=0x0050, text=»         RF(Z)    RHIP50           NO «, t00=0x0095, t01=0x0164}
0x0ea24…0ea56 (150, 0, 400) Head {h00=0x002e, h01=0x0050, text=» ORRS A9,A1 SET INDICATION 'DATA RECEIVED'«, t00=0x0096, t01=0x0004}
0x0ea56…0ea76               Head {h00=0x001c, h01=0x0050, text=»         RF       RHIP60«, t00=0x0096, t01=0x0036}
0x0ea76…0ea92               Head {h00=0x0018, h01=0x0050, text=»RHIP50   EQU      * «, t00=0x0096, t01=0x0056}
0x0ea92…0eab2               Head {h00=0x001c, h01=0x0050, text=»         C1R      A9,A9 «, t00=0x0096, t01=0x0072}
0x0eab2…0eae6               Head {h00=0x0030, h01=0x0050, text=» ANRS A9,A1 RESET INDICATION 'DATA RECEIVED'«, t00=0x0096, t01=0x0092}
0x0eae6…0eb02               Head {h00=0x0018, h01=0x0050, text=»RHIP60   EQU      * «, t00=0x0096, t01=0x00c6}
0x0eb02…0eb18               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0096, t01=0x00e2}
0x0eb18…0eb22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00f8}
0x0eb22…0eb42               Head {h00=0x001c, h01=0x0050, text=»* DWT ADDRESS AVAILABLE «, t00=0x0096, t01=0x0102}
0x0eb42…0eb68               Head {h00=0x0022, h01=0x0050, text=»* TEST IF ENTRY POINT WAS RHIP«, t00=0x0096, t01=0x0122}
0x0eb68…0eb72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0148}
0x0eb72…0eb92               Head {h00=0x001c, h01=0x0050, text=»         LDR      A7,A7 «, t00=0x0096, t01=0x0152}
0x0eb92…0ebc0               Head {h00=0x002a, h01=0x0050, text=»         RF(NZ)   RHIP70           NO!«, t00=0x0096, t01=0x0172}
0x0ebc0…0ebca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0010}
0x0ebca…0ebe8               Head {h00=0x001a, h01=0x0050, text=»* TEST IF VC RELEASED «, t00=0x0097, t01=0x001a}
0x0ebe8…0ebf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0038}
0x0ebf2…0ec14               Head {h00=0x001e, h01=0x0050, text=»         LDK      A4,VCREL«, t00=0x0097, t01=0x0042}
0x0ec14…0ec28               Head {h00=0x0010, h01=0x0050, text=» LDR A10,A4 «, t00=0x0097, t01=0x0064}
0x0ec28…0ec4e               Head {h00=0x0022, h01=0x0050, text=»         LC       A4,DWTSTE,A6«, t00=0x0097, t01=0x0078}
0x0ec4e…0ec6e               Head {h00=0x001c, h01=0x0050, text=»         SUR      A10,A4«, t00=0x0097, t01=0x009e}
0x0ec6e…0ec9c               Head {h00=0x002a, h01=0x0050, text=»         RF(NZ)   RHIP70           NO!«, t00=0x0097, t01=0x00be}
0x0ec9c…0eca6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00ec}
0x0eca6…0ecb4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0097, t01=0x00f6}
0x0ecb4…0ecbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0104}
0x0ecbe…0ecd4               Head {h00=0x0012, h01=0x0050, text=»* VC RELEASED «, t00=0x0097, t01=0x010e}
0x0ecd4…0ed08               Head {h00=0x0030, h01=0x0050, text=»* MOVE INPUT QUEUE ANCHOR FROM LC-ADM TO DWT«, t00=0x0097, t01=0x0124}
0x0ed08…0ed12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0158}
0x0ed12…0ed4e               Head {h00=0x0038, h01=0x0050, text=»         LDR*     A7,A11           A1:=QUEUE ANCHOR «, t00=0x0097, t01=0x0162}
0x0ed4e…0ed64               Head {h00=0x0012, h01=0x0050, text=» RF(Z) RHIP65 «, t00=0x0098, t01=0x000e}
0x0ed64…0ed8c               Head {h00=0x0024, h01=0x0050, text=» LDR* A4,A7 MORE DATA IN QUEUE ?«, t00=0x0098, t01=0x0024}
0x0ed8c…0eda6               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) RHIP65 YES«, t00=0x0098, t01=0x004c}
0x0eda6…0edd8               Head {h00=0x002e, h01=0x0050, text=» XRRS A9,A1 RESET MORE DATA BIT IN DWTRCI «, t00=0x0098, t01=0x0066}
0x0edd8…0edec               Head {h00=0x0010, h01=0x0050, text=»RHIP65 EQU *«, t00=0x0098, t01=0x0098}
0x0edec…0ee34               Head {h00=0x0044, h01=0x0050, text=»         CMR      A11              CLEAR QUEUE ANCHOR IN LC.ADM «, t00=0x0098, t01=0x00ac}
0x0ee34…0ee58               Head {h00=0x0020, h01=0x0050, text=»         LDKL     A11,DWTIPQ«, t00=0x0098, t01=0x00f4}
0x0ee58…0eea6               Head {h00=0x004a, h01=0x0050, text=»         ADR      A11,A6           A11:=ADDRESS OF QUEUE ANCHOR IN DWT«, t00=0x0098, t01=0x0118}
0x0eea6…0eeea               Head {h00=0x0040, h01=0x0050, text=»         STR      A7,A11           STORE QUEUE ANCHOR IN DWT«, t00=0x0098, t01=0x0166}
0x0eeea…0ef24               Head {h00=0x0036, h01=0x0050, text=» CM LCDWT,A13 CLEAR RELATION WITH LOGICAL CHANNEL «, t00=0x0099, t01=0x001a}
0x0ef24…0ef30               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0099, t01=0x0054}
0x0ef30…0ef3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0060}
0x0ef3a…0ef70               Head {h00=0x0032, h01=0x0050, text=»*        TEST IF PACKET TYPE IS "DATA PACKET" «, t00=0x0099, t01=0x006a}
0x0ef70…0ef7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00a0}
0x0ef7a…0ef8e               Head {h00=0x0010, h01=0x0050, text=»RHIP70 EQU *«, t00=0x0099, t01=0x00aa}
0x0ef8e…0efa4               Head {h00=0x0012, h01=0x0050, text=» LDK A4,DATA.P«, t00=0x0099, t01=0x00be}
0x0efa4…0efb6               Head {h00=0x000e, h01=0x0050, text=» TM A4,A2 «, t00=0x0099, t01=0x00d4}
0x0efb6…0efe0               Head {h00=0x0026, h01=0x0050, text=» ABL(Z) DATPAC PROCESS DATA PACKET«, t00=0x0099, t01=0x00e6}
0x0efe0…0efea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0110}
0x0efea…0f00a               Head {h00=0x001c, h01=0x0050, text=»*        NO DATA PACKET «, t00=0x0099, t01=0x011a}
0x0f00a…0f014               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x013a}
0x0f014…0f028               Head {h00=0x0010, h01=0x0050, text=»RHIP80 EQU *«, t00=0x0099, t01=0x0144}
0x0f028…0f040               Head {h00=0x0014, h01=0x0050, text=» CC A2,TABLE,A3 «, t00=0x0099, t01=0x0158}
0x0f040…0f060               Head {h00=0x001c, h01=0x0050, text=» RF(E) RHIP90 TYPE FOUND«, t00=0x0099, t01=0x0170}
0x0f060…0f072               Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0099, t01=0x0190}
0x0f072…0f09a               Head {h00=0x0024, h01=0x0050, text=» RB RHIP80 TRY NEXT PACKET TYPE «, t00=0x009a, t01=0x0012}
0x0f09a…0f0a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x003a}
0x0f0a4…0f0b8               Head {h00=0x0010, h01=0x0050, text=»RHIP90 EQU *«, t00=0x009a, t01=0x0044}
0x0f0b8…0f0e6               Head {h00=0x002a, h01=0x0050, text=» ADR A3,A3 A3:=INDEX FOR PROCESS-TABLE«, t00=0x009a, t01=0x0058}
0x0f0e6…0f10c               Head {h00=0x0022, h01=0x0050, text=» ABI PACPRO,A3 PROCESS PACKET «, t00=0x009a, t01=0x0086}
0x0f10c…0f116               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00ac}
0x0f116…0f124               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009a, t01=0x00b6}
0x0f124…0f12e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00c4}
0x0f12e…0f16c               Head {h00=0x003a, h01=0x0050, text=»*        TABLE OF MATCHING PACKET PROCESSING ROUTINES «, t00=0x009a, t01=0x00ce}
0x0f16c…0f176               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x010c}
0x0f176…0f18a               Head {h00=0x0010, h01=0x0050, text=»PACPRO EQU *«, t00=0x009a, t01=0x0116}
0x0f18a…0f1b8               Head {h00=0x002a, h01=0x0050, text=» DATA HALT,HALT RESTART(-CONF.)PACKET «, t00=0x009a, t01=0x012a}
0x0f1b8…0f1e6               Head {h00=0x002a, h01=0x0050, text=» DATA RESPAC,HALT RESET(-CONF.)PACKET «, t00=0x009a, t01=0x0158}
0x0f1e6…0f1fc               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x009a, t01=0x0186}
0x0f1fc…0f22a               Head {h00=0x002a, h01=0x0050, text=» DATA CLEPAC,HALT CLEAR(-CONF.)PACKET «, t00=0x009b, t01=0x000c}
0x0f22a…0f258               Head {h00=0x002a, h01=0x0050, text=» DATA CALPAC,CALCON CALL(-CONF.)PACKET«, t00=0x009b, t01=0x003a}
0x0f258…0f264               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x0068}
0x0f264…0f298               Head {h00=0x0030, h01=0x0050, text=» DATA INTPAC,INTCON INTERRUPT(-CONF.)PACKET «, t00=0x009b, t01=0x0074}
0x0f298…0f2a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x00a8}
0x0f2a2…0f2ce               Head {h00=0x0028, h01=0x0050, text=»*        UNEXPECTED PACKET RECEIVED «, t00=0x009b, t01=0x00b2}
0x0f2ce…0f2d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x00de}
0x0f2d8…0f2ea               Head {h00=0x000e, h01=0x0050, text=»HALT EQU *«, t00=0x009b, t01=0x00e8}
0x0f2ea…0f2f6               Head {h00=0x0008, h01=0x0050, text=» HLT«, t00=0x009b, t01=0x00fa}
0x0f2f6…0f300               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0106}
0x0f300…0f30a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0110}
0x0f30a…0f328               Head {h00=0x001a, h01=0x0050, text=»* GENERAL EXIT OF RHIP«, t00=0x009b, t01=0x011a}
0x0f328…0f35c               Head {h00=0x0030, h01=0x0050, text=»* RELEASE BUFFER AND SEND CLEAR/RESET PACKET«, t00=0x009b, t01=0x0138}
0x0f35c…0f366               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x016c}
0x0f366…0f37a               Head {h00=0x0010, h01=0x0050, text=»RHI100 EQU *«, t00=0x009b, t01=0x0176}
0x0f37a…0f38c               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x009b, t01=0x018a}
0x0f38c…0f3b0               Head {h00=0x0020, h01=0x0050, text=» CF A14,RLBUF RELEASE BUFFER«, t00=0x009c, t01=0x000c}
0x0f3b0…0f3c4               Head {h00=0x0010, h01=0x0050, text=»RHI110 EQU *«, t00=0x009c, t01=0x0030}
0x0f3c4…0f3e2               Head {h00=0x001a, h01=0x0050, text=» ABL CLVC EXIT OF RHIP«, t00=0x009c, t01=0x0044}
0x0f3e2…0f3ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0062}
0x0f3ec…0f3fa               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x006c}
0x0f3fa…0f404               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x007a}
0x0f404…0f440               Head {h00=0x0038, h01=0x0050, text=»*        COMPLETE REQUEST WITH RETURNCODE "ACCEPTED"«, t00=0x009c, t01=0x0084}
0x0f440…0f44a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00c0}
0x0f44a…0f45e               Head {h00=0x0010, h01=0x0050, text=»RHI120 EQU *«, t00=0x009c, t01=0x00ca}
0x0f45e…0f476               Head {h00=0x0014, h01=0x0050, text=» LDK A3,ACPT.RC «, t00=0x009c, t01=0x00de}
0x0f476…0f480               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00f6}
0x0f480…0f4be               Head {h00=0x003a, h01=0x0050, text=»*        COMPLETE REQUEST WITH GIVEN RETURNCODE IN A3 «, t00=0x009c, t01=0x0100}
0x0f4be…0f4c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x013e}
0x0f4c8…0f4dc               Head {h00=0x0010, h01=0x0050, text=»RHI130 EQU *«, t00=0x009c, t01=0x0148}
0x0f4dc…0f4f2               Head {h00=0x0012, h01=0x0050, text=» CF A14,CMPREQ«, t00=0x009c, t01=0x015c}
0x0f4f2…0f4fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0172}
0x0f4fc…0f524               Head {h00=0x0024, h01=0x0050, text=»*        RELEASE BUFFER AND EXIT«, t00=0x009c, t01=0x017c}
0x0f524…0f52e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0014}
0x0f52e…0f542               Head {h00=0x0010, h01=0x0050, text=»RHI140 EQU *«, t00=0x009d, t01=0x001e}
0x0f542…0f554               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x009d, t01=0x0032}
0x0f554…0f56a               Head {h00=0x0012, h01=0x0050, text=» CF A14,RLBUF «, t00=0x009d, t01=0x0044}
0x0f56a…0f57c               Head {h00=0x000e, h01=0x0050, text=» RF RIPEXI«, t00=0x009d, t01=0x005a}
0x0f57c…0f586               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x006c}
0x0f586…0f5ba               Head {h00=0x0030, h01=0x0050, text=»*        REQUEUE BUFFER,BLOCK QUEUE AND EXIT«, t00=0x009d, t01=0x0076}
0x0f5ba…0f5c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00aa}
0x0f5c4…0f5d8               Head {h00=0x0010, h01=0x0050, text=»RHI150 EQU *«, t00=0x009d, t01=0x00b4}
0x0f5d8…0f608               Head {h00=0x002c, h01=0x0050, text=» LDR A1,A11 A1:=ADDRESS OF QUEUE ANCHOR «, t00=0x009d, t01=0x00c8}
0x0f608…0f62e               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A8 A2:=BUFFER ADDRESS «, t00=0x009d, t01=0x00f8}
0x0f62e…0f644               Head {h00=0x0012, h01=0x0050, text=» CF A14,QUEUEF«, t00=0x009d, t01=0x011e}
0x0f644…0f64e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0134}
0x0f64e…0f664               Head {h00=0x0012, h01=0x0050, text=»* BLOCK QUEUE «, t00=0x009d, t01=0x013e}
0x0f664…0f66e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0154}
0x0f66e…0f69a               Head {h00=0x0028, h01=0x0050, text=» LDK A1,NPRFLG A1:=0 PROCESSING FLAG«, t00=0x009d, t01=0x015e}
0x0f69a…0f6ae               Head {h00=0x0010, h01=0x0050, text=» ORRS A1,A11«, t00=0x009d, t01=0x018a}
0x0f6ae…0f6b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x000e}
0x0f6b8…0f6ce               Head {h00=0x0012, h01=0x0050, text=»* EXIT OF RHIP«, t00=0x009e, t01=0x0018}
0x0f6ce…0f6d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x002e}
0x0f6d8…0f6f4               Head {h00=0x0018, h01=0x0050, text=»RIPEXI   EQU      * «, t00=0x009e, t01=0x0038}
0x0f6f4…0f708               Head {h00=0x0010, h01=0x0050, text=» ABL EXITDC «, t00=0x009e, t01=0x0054}
0x0f708…0f716               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009e, t01=0x0068}
0x0f716…0f720               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0076}
0x0f720…0f72a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0080}
0x0f72a…0f756               Head {h00=0x0028, h01=0x0050, text=»* TIMEOUT ROUTINE OF REQUEST HANDLER«, t00=0x009e, t01=0x008a}
0x0f756…0f760               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00b6}
0x0f760…0f7ac               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x009e, t01=0x00c0}
0x0f7ac…0f7b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x010c}
0x0f7b6…0f7d2               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x009e, t01=0x0116}
0x0f7d2…0f7ee               Head {h00=0x0018, h01=0x0050, text=»*  A12 = DWT ADDRESS«, t00=0x009e, t01=0x0132}
0x0f7ee…0f80e               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x009e, t01=0x014e}
0x0f80e…0f830               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x009e, t01=0x016e}
0x0f830…0f83a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0190}
0x0f83a…0f856               Head {h00=0x0018, h01=0x0050, text=»TIMEXP   EQU      * «, t00=0x009f, t01=0x000a}
0x0f856…0f88a               Head {h00=0x0030, h01=0x0050, text=» LDK A3,TIMO.RC PRE-SET RETURNCODE"TIMEOUT" «, t00=0x009f, t01=0x0026}
0x0f88a…0f894               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x005a}
0x0f894…0f8b0               Head {h00=0x0018, h01=0x0050, text=»* GET ADDRESS OF DWT«, t00=0x009f, t01=0x0064}
0x0f8b0…0f8ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0080}
0x0f8ba…0f8ce               Head {h00=0x0010, h01=0x0050, text=» LDR A6,A12 «, t00=0x009f, t01=0x008a}
0x0f8ce…0f8d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x009e}
0x0f8d8…0f904               Head {h00=0x0028, h01=0x0050, text=»* TEST IF REQUEST ALREADY COMPLETED «, t00=0x009f, t01=0x00a8}
0x0f904…0f90e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00d4}
0x0f90e…0f934               Head {h00=0x0022, h01=0x0050, text=»         LD       A5,DWTRTP,A6«, t00=0x009f, t01=0x00de}
0x0f934…0f964               Head {h00=0x002c, h01=0x0050, text=»         RB(Z)    RIPEXI           YES! «, t00=0x009f, t01=0x0104}
0x0f964…0f96e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0134}
0x0f96e…0f996               Head {h00=0x0024, h01=0x0050, text=»* CLEAR RUNNING TIMER INDICATION«, t00=0x009f, t01=0x013e}
0x0f996…0f9a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0166}
0x0f9a0…0f9c4               Head {h00=0x0020, h01=0x0050, text=»         CM       DWTRTP,A6 «, t00=0x009f, t01=0x0170}
0x0f9c4…0f9ce (160, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0004}
0x0f9ce…0f9dc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a0, t01=0x000e}
0x0f9dc…0f9e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x001c}
0x0f9e6…0fa08               Head {h00=0x001e, h01=0x0050, text=»* SCAN ON PENDING REQUEST «, t00=0x00a0, t01=0x0026}
0x0fa08…0fa12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0048}
0x0fa12…0fa30               Head {h00=0x001a, h01=0x0050, text=»         LDK      A5,0«, t00=0x00a0, t01=0x0052}
0x0fa30…0fa56               Head {h00=0x0022, h01=0x0050, text=»         LC       A5,DWTFNC,A6«, t00=0x00a0, t01=0x0070}
0x0fa56…0fa7c               Head {h00=0x0022, h01=0x0050, text=» LDR A7,A5 SAVE FUNCTION CODE «, t00=0x00a0, t01=0x0096}
0x0fa7c…0faa6               Head {h00=0x0026, h01=0x0050, text=» SUK A5,WRIDAT WRITE DATA REQUEST «, t00=0x00a0, t01=0x00bc}
0x0faa6…0fac0               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TIME00 YES «, t00=0x00a0, t01=0x00e6}
0x0fac0…0faea               Head {h00=0x0026, h01=0x0050, text=» SUK A5,READAT-WRIDAT READ REQUEST«, t00=0x00a0, t01=0x0100}
0x0faea…0fb04               Head {h00=0x0016, h01=0x0050, text=» RF(Z) COMPLE YES «, t00=0x00a0, t01=0x012a}
0x0fb04…0fb3a               Head {h00=0x0032, h01=0x0050, text=» ADK A5,READAT-WRIINT WRITE INTERRUPT REQUEST «, t00=0x00a0, t01=0x0144}
0x0fb3a…0fb54               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) TIME30 NO «, t00=0x00a0, t01=0x017a}
0x0fb54…0fb5e (161, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0004}
0x0fb5e…0fb80               Head {h00=0x001e, h01=0x0050, text=»* TIMEOUT ON WRITE REQUEST«, t00=0x00a1, t01=0x000e}
0x0fb80…0fbb0               Head {h00=0x002c, h01=0x0050, text=»* TEST IF REQUEST STILL IN OUTPUT QUEUE «, t00=0x00a1, t01=0x0030}
0x0fbb0…0fbba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0060}
0x0fbba…0fbce               Head {h00=0x0010, h01=0x0050, text=»TIME00 EQU *«, t00=0x00a1, t01=0x006a}
0x0fbce…0fbee               Head {h00=0x001c, h01=0x0050, text=»         LDR      A1,A13«, t00=0x00a1, t01=0x007e}
0x0fbee…0fc3c               Head {h00=0x004a, h01=0x0050, text=»         ADK      A1,QUEOUT        A1:=ADDRESS OF OUTPUT QUEUE ANCHOR «, t00=0x00a1, t01=0x009e}
0x0fc3c…0fc46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00ec}
0x0fc46…0fc66               Head {h00=0x001c, h01=0x0050, text=»* TEST IF QUEUE IS EMPTY«, t00=0x00a1, t01=0x00f6}
0x0fc66…0fc70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0116}
0x0fc70…0fc90               Head {h00=0x001c, h01=0x0050, text=»         LDR*     A2,A1 «, t00=0x00a1, t01=0x0120}
0x0fc90…0fcb0               Head {h00=0x001c, h01=0x0050, text=»         RF(Z)    TIME20«, t00=0x00a1, t01=0x0140}
0x0fcb0…0fcba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0160}
0x0fcba…0fcea               Head {h00=0x002c, h01=0x0050, text=»* TEST IF ONLY NO-PROCESSING FLAG IS SET«, t00=0x00a1, t01=0x016a}
0x0fcea…0fcf4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x000a}
0x0fcf4…0fd08               Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x00a2, t01=0x0014}
0x0fd08…0fd26               Head {h00=0x001a, h01=0x0050, text=»         SUK      A2,1«, t00=0x00a2, t01=0x0028}
0x0fd26…0fd56               Head {h00=0x002c, h01=0x0050, text=»         RF(Z)    TIME20           YES! «, t00=0x00a2, t01=0x0046}
0x0fd56…0fd90               Head {h00=0x0036, h01=0x0050, text=»         CF       A14,DEQUE        DEQUEUE ELEMENT«, t00=0x00a2, t01=0x0076}
0x0fd90…0fd9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00b0}
0x0fd9a…0fda8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a2, t01=0x00ba}
0x0fda8…0fdb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00c8}
0x0fdb2…0fde4               Head {h00=0x002e, h01=0x0050, text=»* TEST IF IT IS THE ONE WE ARE LOOKING FOR«, t00=0x00a2, t01=0x00d2}
0x0fde4…0fdee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0104}
0x0fdee…0fe0e               Head {h00=0x001c, h01=0x0050, text=»         CWR      A2,A6 «, t00=0x00a2, t01=0x010e}
0x0fe0e…0fe3e               Head {h00=0x002c, h01=0x0050, text=»         RF(E)    COMPLE           YES! «, t00=0x00a2, t01=0x012e}
0x0fe3e…0fe48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x015e}
0x0fe48…0fe80               Head {h00=0x0034, h01=0x0050, text=»* TEST IF THERE IS ANOTHER ELEMENT IN THE QUEUE «, t00=0x00a2, t01=0x0168}
0x0fe80…0fe8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0010}
0x0fe8a…0feaa               Head {h00=0x001c, h01=0x0050, text=»         LDR*     A4,A1 «, t00=0x00a3, t01=0x001a}
0x0feaa…0fee6               Head {h00=0x0038, h01=0x0050, text=»         CF       A14,QUEUE        RE-QUEUE ELEMENT «, t00=0x00a3, t01=0x003a}
0x0fee6…0ff2e               Head {h00=0x0044, h01=0x0050, text=»         RB(NZ)   TIME10           GET SECOND ELEMENT FROM QUEUE«, t00=0x00a3, t01=0x0076}
0x0ff2e…0ff38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00be}
0x0ff38…0ff56               Head {h00=0x001a, h01=0x0050, text=»* ELEMENT NOT IN QUEUE«, t00=0x00a3, t01=0x00c8}
0x0ff56…0ff86               Head {h00=0x002c, h01=0x0050, text=»* IF NOT WRITE INTERRUPT,IGNORE TIMEOUT «, t00=0x00a3, t01=0x00e6}
0x0ff86…0ff90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0116}
0x0ff90…0ffac               Head {h00=0x0018, h01=0x0050, text=»TIME20   EQU      * «, t00=0x00a3, t01=0x0120}
0x0ffac…0ffc2               Head {h00=0x0012, h01=0x0050, text=» SUK A7,WRIINT«, t00=0x00a3, t01=0x013c}
0x0ffc2…0ffd8               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) COMEXI«, t00=0x00a3, t01=0x0152}
0x0ffd8…0ffe2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0168}
0x0ffe2…10014               Head {h00=0x002e, h01=0x0050, text=»* COMPLETE REQUEST WITH TIMEOUT RETURNCODE«, t00=0x00a3, t01=0x0172}
0x10014…1001e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x0014}
0x1001e…10032               Head {h00=0x0010, h01=0x0050, text=»COMPLE EQU *«, t00=0x00a4, t01=0x001e}
0x10032…10048               Head {h00=0x0012, h01=0x0050, text=» CF A14,CMPREQ«, t00=0x00a4, t01=0x0032}
0x10048…1005e               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x00a4, t01=0x0048}
0x1005e…10072               Head {h00=0x0010, h01=0x0050, text=»TIME30 EQU *«, t00=0x00a4, t01=0x005e}
0x10072…1007e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a4, t01=0x0072}
0x1007e…10092               Head {h00=0x0010, h01=0x0050, text=»COMEXI EQU *«, t00=0x00a4, t01=0x007e}
0x10092…100a4               Head {h00=0x000e, h01=0x0050, text=» RB RIPEXI«, t00=0x00a4, t01=0x0092}
0x100a4…100ba               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00a4, t01=0x00a4}
0x100ba…100c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00ba}
0x100c4…100d2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a4, t01=0x00c4}
0x100d2…100dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00d2}
0x100dc…100fc               Head {h00=0x001c, h01=0x0050, text=»* RELEASE DWT FROM CHAIN«, t00=0x00a4, t01=0x00dc}
0x100fc…10106               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00fc}
0x10106…1011a               Head {h00=0x0010, h01=0x0050, text=»TIME30 EQU *«, t00=0x00a4, t01=0x0106}
0x1011a…10130               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00a4, t01=0x011a}
0x10130…10146               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x00a4, t01=0x0130}
0x10146…10170               Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTLAD,A6 LOCAL DTE ADDRESS«, t00=0x00a4, t01=0x0146}
0x10170…1019e               Head {h00=0x002a, h01=0x0050, text=» CF A14,FNDLIN GET LINE BLOCK ADDRESS «, t00=0x00a4, t01=0x0170}
0x1019e…101b4               Head {h00=0x0012, h01=0x0050, text=» CF A14,RELDWT«, t00=0x00a5, t01=0x000e}
0x101b4…101d4               Head {h00=0x001c, h01=0x0050, text=» LDK A3,TIMO.RC TIME OUT«, t00=0x00a5, t01=0x0024}
0x101d4…101e0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a5, t01=0x0044}
0x101e0…101f6               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00a5, t01=0x0050}
0x101f6…1020c               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=1 «, t00=0x00a5, t01=0x0066}
0x1020c…10236               Head {h00=0x0026, h01=0x0050, text=» LD A12,LINTAB LINE BLOCK ADDRESS «, t00=0x00a5, t01=0x007c}
0x10236…10264               Head {h00=0x002a, h01=0x0050, text=» CF A14,RELDWT RELEASE DWT FROM CHAIN «, t00=0x00a5, t01=0x00a6}
0x10264…10270               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a5, t01=0x00d4}
0x10270…10286               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00a5, t01=0x00e0}
0x10286…102b6               Head {h00=0x002c, h01=0x0050, text=» SUK A7,CONACT CONNECT ACTIVE REQUEST ? «, t00=0x00a5, t01=0x00f6}
0x102b6…102d0               Head {h00=0x0016, h01=0x0050, text=» RF(Z) TIME40 YES «, t00=0x00a5, t01=0x0126}
0x102d0…10308               Head {h00=0x0034, h01=0x0050, text=» SUK A7,CONPAS-CONACT CONNECT PASSIVE REQUEST ? «, t00=0x00a5, t01=0x0140}
0x10308…10322               Head {h00=0x0016, h01=0x0050, text=» RB(Z) COMPLE YES «, t00=0x00a5, t01=0x0178}
0x10322…1032c (166, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0004}
0x1032c…10350               Head {h00=0x0020, h01=0x0050, text=»* (AUTOMATIC)ACCEPT REQUEST «, t00=0x00a6, t01=0x000e}
0x10350…1035a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0032}
0x1035a…1036e               Head {h00=0x0010, h01=0x0050, text=»TIME40 EQU *«, t00=0x00a6, t01=0x003c}
0x1036e…10378               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0050}
0x10378…1039e               Head {h00=0x0022, h01=0x0050, text=»* CLEAR DWT TO LC-ADM RELATION«, t00=0x00a6, t01=0x005a}
0x1039e…103a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0080}
0x103a8…103ba               Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x00a6, t01=0x008a}
0x103ba…103dc               Head {h00=0x001e, h01=0x0050, text=» LC A4,DWTLCN,A6 LC NUMBER«, t00=0x00a6, t01=0x009c}
0x103dc…10406               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x00a6, t01=0x00be}
0x10406…1042e               Head {h00=0x0024, h01=0x0050, text=» CM LCDWT,A13 CLEAR DWT-ADDRESS «, t00=0x00a6, t01=0x00e8}
0x1042e…10456               Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x00a6, t01=0x0110}
0x10456…10468               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x00a6, t01=0x0138}
0x10468…10496               Head {h00=0x002a, h01=0x0050, text=» RB RHI110 SEND CLEAR PACKET AND EXIT «, t00=0x00a6, t01=0x014a}
0x10496…104a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0178}
0x104a0…104ae               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a6, t01=0x0182}
0x104ae…104b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0190}
0x104b8…104c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x000a}
0x104c2…104d8               Head {h00=0x0012, h01=0x0050, text=»* CALL PACKET «, t00=0x00a7, t01=0x0014}
0x104d8…104e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x002a}
0x104e2…1052e               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00a7, t01=0x0034}
0x1052e…10538               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0080}
0x10538…10554               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00a7, t01=0x008a}
0x10554…1057a               Head {h00=0x0022, h01=0x0050, text=»*  A5  = REQUEST PENDING IND. «, t00=0x00a7, t01=0x00a6}
0x1057a…1059e               Head {h00=0x0020, h01=0x0050, text=»*  A6  = DWT ADDRESS OR ZERO«, t00=0x00a7, t01=0x00cc}
0x1059e…105be               Head {h00=0x001c, h01=0x0050, text=»*  A8  = BUFFER ADDRESS «, t00=0x00a7, t01=0x00f0}
0x105be…105dc               Head {h00=0x001a, h01=0x0050, text=»*  A11 = QUEUE ANCHOR «, t00=0x00a7, t01=0x0110}
0x105dc…105fe               Head {h00=0x001e, h01=0x0050, text=»*  A12 = LINE-ADM ADDRESS «, t00=0x00a7, t01=0x012e}
0x105fe…1061e               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x00a7, t01=0x0150}
0x1061e…10640               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x00a7, t01=0x0170}
0x10640…1064a (168, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0004}
0x1064a…1065e               Head {h00=0x0010, h01=0x0050, text=»CALPAC EQU *«, t00=0x00a8, t01=0x000e}
0x1065e…10668               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0022}
0x10668…106a6               Head {h00=0x003a, h01=0x0050, text=»* TEST IF ONLY USER DATA HAS TO BE PASSED TO THE USER «, t00=0x00a8, t01=0x002c}
0x106a6…106b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x006a}
0x106b0…106c2               Head {h00=0x000e, h01=0x0050, text=» LDR A6,A6«, t00=0x00a8, t01=0x0074}
0x106c2…106de               Head {h00=0x0018, h01=0x0050, text=» ABL(NZ) CAL180 YES!«, t00=0x00a8, t01=0x0086}
0x106de…106e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x00a2}
0x106e8…1070e               Head {h00=0x0022, h01=0x0050, text=»* GET DWT FOR LOGICAL CHANNEL «, t00=0x00a8, t01=0x00ac}
0x1070e…10718               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x00d2}
0x10718…10746               Head {h00=0x002a, h01=0x0050, text=» LD A6,CHAIN,A12 GET DWT CHAIN ANCHOR «, t00=0x00a8, t01=0x00dc}
0x10746…1077c               Head {h00=0x0032, h01=0x0050, text=» RF(Z) CALP30 NO CONNECT REQUEST FOR THIS LINE«, t00=0x00a8, t01=0x010a}
0x1077c…10786               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0140}
0x10786…10794               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a8, t01=0x014a}
0x10794…1079e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0158}
0x1079e…107d2               Head {h00=0x0030, h01=0x0050, text=»* TEST IF CONNECT PASSIVE REQUEST IS PENDING«, t00=0x00a8, t01=0x0162}
0x107d2…107dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0008}
0x107dc…107f0               Head {h00=0x0010, h01=0x0050, text=»CALP10 EQU *«, t00=0x00a9, t01=0x0012}
0x107f0…10808               Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTST,A6 «, t00=0x00a9, t01=0x0026}
0x10808…10830               Head {h00=0x0024, h01=0x0050, text=» RF(N) CALP20 NO REQUEST PENDING«, t00=0x00a9, t01=0x003e}
0x10830…10846               Head {h00=0x0012, h01=0x0050, text=» LDK A4,CONPAS«, t00=0x00a9, t01=0x0066}
0x10846…10870               Head {h00=0x0026, h01=0x0050, text=» CC A4,DWTFNC,A6 CONNECT PASSIVE ?«, t00=0x00a9, t01=0x007c}
0x10870…1088a               Head {h00=0x0016, h01=0x0050, text=» RF(E) CALP40 YES «, t00=0x00a9, t01=0x00a6}
0x1088a…1089e               Head {h00=0x0010, h01=0x0050, text=»CALP20 EQU *«, t00=0x00a9, t01=0x00c0}
0x1089e…108c4               Head {h00=0x0022, h01=0x0050, text=» LD A6,DWTCHN,A6 GET NEXT DWT «, t00=0x00a9, t01=0x00d4}
0x108c4…108dc               Head {h00=0x0014, h01=0x0050, text=» RB(NZ) CALP10 .«, t00=0x00a9, t01=0x00fa}
0x108dc…108e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0112}
0x108e6…1090c               Head {h00=0x0022, h01=0x0050, text=»*        NO MATCHING DWT FOUND«, t00=0x00a9, t01=0x011c}
0x1090c…10950               Head {h00=0x0040, h01=0x0050, text=»*        RELEASE BUFFER AND SEND CLEAR/RESET PACKET AND EXIT«, t00=0x00a9, t01=0x0142}
0x10950…1095a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0186}
0x1095a…1096e               Head {h00=0x0010, h01=0x0050, text=»CALP30 EQU *«, t00=0x00a9, t01=0x0190}
0x1096e…10998               Head {h00=0x0026, h01=0x0050, text=» LDK A1,NOTINT A1:=DIAGNOSTIC CODE«, t00=0x00aa, t01=0x0014}
0x10998…109aa               Head {h00=0x000e, h01=0x0050, text=» RB RHI100«, t00=0x00aa, t01=0x003e}
0x109aa…109b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0050}
0x109b4…109ea               Head {h00=0x0032, h01=0x0050, text=»* TEST IF CALLING DTE-ADDRESS KNOWN BY SYSTEM «, t00=0x00aa, t01=0x005a}
0x109ea…109f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0090}
0x109f4…10a08               Head {h00=0x0010, h01=0x0050, text=»CALP40 EQU *«, t00=0x00aa, t01=0x009a}
0x10a08…10a1e               Head {h00=0x0012, h01=0x0050, text=» LDK A5,BEGDAT«, t00=0x00aa, t01=0x00ae}
0x10a1e…10a30               Head {h00=0x000e, h01=0x0050, text=» ADR A5,A8«, t00=0x00aa, t01=0x00c4}
0x10a30…10a3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x00d6}
0x10a3a…10a7e               Head {h00=0x0040, h01=0x0050, text=»* GET ADDRESS WHERE CALLING LENGTH IN PACKET WILL BE STORED «, t00=0x00aa, t01=0x00e0}
0x10a7e…10a88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0124}
0x10a88…10a9a               Head {h00=0x000e, h01=0x0050, text=» LCR A1,A5«, t00=0x00aa, t01=0x012e}
0x10a9a…10aac               Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x00aa, t01=0x0140}
0x10aac…10abe               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A5«, t00=0x00aa, t01=0x0152}
0x10abe…10ad4               Head {h00=0x0012, h01=0x0050, text=» IFT CALDTE=1 «, t00=0x00aa, t01=0x0164}
0x10ad4…10ade               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x017a}
0x10ade…10aec               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00aa, t01=0x0184}
0x10aec…10af6 (171, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x0004}
0x10af6…10b2a               Head {h00=0x0030, h01=0x0050, text=»* TEST IF CALLED DTE-ADDRESS ALSO IN PACKET «, t00=0x00ab, t01=0x000e}
0x10b2a…10b34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x0042}
0x10b34…10b46               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x00ab, t01=0x004c}
0x10b46…10b5a               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/0F «, t00=0x00ab, t01=0x005e}
0x10b5a…10b72               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CALP80 NO«, t00=0x00ab, t01=0x0072}
0x10b72…10b7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x008a}
0x10b7c…10bb4               Head {h00=0x0034, h01=0x0050, text=»* MOVE CALLING DTE-ADDRESS TO CALLED DTE-ADDRESS«, t00=0x00ab, t01=0x0094}
0x10bb4…10bbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x00cc}
0x10bbe…10bd0               Head {h00=0x000e, h01=0x0050, text=» LDR A7,A2«, t00=0x00ab, t01=0x00d6}
0x10bd0…10c00               Head {h00=0x002c, h01=0x0050, text=» SRL A4,1 LENGTH OF CALLED DTE IN OCTADS«, t00=0x00ab, t01=0x00e8}
0x10c00…10c18               Head {h00=0x0014, h01=0x0050, text=»*   TRUCATED!!! «, t00=0x00ab, t01=0x0118}
0x10c18…10c2a               Head {h00=0x000e, h01=0x0050, text=» ADR A5,A4«, t00=0x00ab, t01=0x0130}
0x10c2a…10c34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x0142}
0x10c34…10c7c               Head {h00=0x0044, h01=0x0050, text=»* TEST IF CALLING DTE-ADDRESS STARTS ON OCTAD BOUNDARY IN PACKET«, t00=0x00ab, t01=0x014c}
0x10c7c…10c86 (172, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0004}
0x10c86…10ca6               Head {h00=0x001c, h01=0x0050, text=»         LDR      A3,A1 «, t00=0x00ac, t01=0x000e}
0x10ca6…10cf6               Head {h00=0x004c, h01=0x0050, text=»         SRL      A1,4             A1:=LENGTH OF CALLING DTE IN SEMI-OCT«, t00=0x00ac, t01=0x002e}
0x10cf6…10d2e               Head {h00=0x0034, h01=0x0050, text=» LDR A4,A1 LENGTH OF CALLING DTE IN SEMI-OCTADS «, t00=0x00ac, t01=0x007e}
0x10d2e…10d4c               Head {h00=0x001a, h01=0x0050, text=»         ANK      A3,1«, t00=0x00ac, t01=0x00b6}
0x10d4c…10d66               Head {h00=0x0016, h01=0x0050, text=» RF(Z) CALP60 YES «, t00=0x00ac, t01=0x00d4}
0x10d66…10d70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x00ee}
0x10d70…10d7e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ac, t01=0x00f8}
0x10d7e…10d88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0106}
0x10d88…10db2               Head {h00=0x0026, h01=0x0050, text=»* DTE-ADDRESS STARTS 0N SEMI-OCTAD«, t00=0x00ac, t01=0x0110}
0x10db2…10dbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x013a}
0x10dbc…10dd0               Head {h00=0x0010, h01=0x0050, text=»CALP50 EQU *«, t00=0x00ac, t01=0x0144}
0x10dd0…10df0               Head {h00=0x001c, h01=0x0050, text=»         LCR      A3,A5 «, t00=0x00ac, t01=0x0158}
0x10df0…10e2e               Head {h00=0x003a, h01=0x0050, text=»         SLL      A3,8            A3:=HIGH ORDER DIGIT«, t00=0x00ac, t01=0x0178}
0x10e2e…10e7e               Head {h00=0x004c, h01=0x0050, text=»         ADK      A5,1             UPDATE ADDRESS OF CALLING DTE IN PAC «, t00=0x00ad, t01=0x0026}
0x10e7e…10e9e               Head {h00=0x001c, h01=0x0050, text=»         LCR      A3,A5 «, t00=0x00ad, t01=0x0076}
0x10e9e…10edc               Head {h00=0x003a, h01=0x0050, text=»         SRL      A3,4             A3:=LOW ORDER DIGIT«, t00=0x00ad, t01=0x0096}
0x10edc…10f26               Head {h00=0x0046, h01=0x0050, text=»         SCR      A3,A7            STORE DIGITS AT BEGIN OF PACKET«, t00=0x00ad, t01=0x00d4}
0x10f26…10f60               Head {h00=0x0036, h01=0x0050, text=»         ADK      A7,1             UPDATE ADDRESS «, t00=0x00ad, t01=0x011e}
0x10f60…10f7e               Head {h00=0x001a, h01=0x0050, text=»         SUK      A4,2«, t00=0x00ad, t01=0x0158}
0x10f7e…10fa8               Head {h00=0x0026, h01=0x0050, text=» RB(P) CALP50 MOVE NEXT TWO DIGITS«, t00=0x00ad, t01=0x0176}
0x10fa8…10fbe               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) CALP85«, t00=0x00ae, t01=0x0010}
0x10fbe…10fd0               Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x00ae, t01=0x0026}
0x10fd0…10fe2               Head {h00=0x000e, h01=0x0050, text=» RF CALP85«, t00=0x00ae, t01=0x0038}
0x10fe2…10fec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x004a}
0x10fec…1101a               Head {h00=0x002a, h01=0x0050, text=»* DTE-ADDRESS STARTS ON OCTAD BOUNDARY«, t00=0x00ae, t01=0x0054}
0x1101a…11024               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x0082}
0x11024…11038               Head {h00=0x0010, h01=0x0050, text=»CALP60 EQU *«, t00=0x00ae, t01=0x008c}
0x11038…11058               Head {h00=0x001c, h01=0x0050, text=»         LCR      A3,A1 «, t00=0x00ae, t01=0x00a0}
0x11058…11078               Head {h00=0x001c, h01=0x0050, text=»         SCR      A3,A7 «, t00=0x00ae, t01=0x00c0}
0x11078…11096               Head {h00=0x001a, h01=0x0050, text=»         ADK      A7,1«, t00=0x00ae, t01=0x00e0}
0x11096…110b4               Head {h00=0x001a, h01=0x0050, text=»         ADK      A5,1«, t00=0x00ae, t01=0x00fe}
0x110b4…110d2               Head {h00=0x001a, h01=0x0050, text=»         SUK      A4,2«, t00=0x00ae, t01=0x011c}
0x110d2…110e8               Head {h00=0x0012, h01=0x0050, text=» RB(P) CALP60 «, t00=0x00ae, t01=0x013a}
0x110e8…110fa               Head {h00=0x000e, h01=0x0050, text=» RF CALP85«, t00=0x00ae, t01=0x0150}
0x110fa…1110e               Head {h00=0x0010, h01=0x0050, text=»CALP80 EQU *«, t00=0x00ae, t01=0x0162}
0x1110e…1111a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x0176}
0x1111a…11130               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00ae, t01=0x0182}
0x11130…11142               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x00af, t01=0x0008}
0x11142…11154               Head {h00=0x000e, h01=0x0050, text=» SRA A4,5 «, t00=0x00af, t01=0x001a}
0x11154…1116a               Head {h00=0x0012, h01=0x0050, text=» RF(NN) CALP82«, t00=0x00af, t01=0x002c}
0x1116a…1117c               Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x00af, t01=0x0042}
0x1117c…11190               Head {h00=0x0010, h01=0x0050, text=»CALP82 EQU *«, t00=0x00af, t01=0x0054}
0x11190…111b4               Head {h00=0x0020, h01=0x0050, text=» ANK A4,/0F LENGTH IN OCTETS«, t00=0x00af, t01=0x0068}
0x111b4…111c6               Head {h00=0x000e, h01=0x0050, text=» ADR A5,A4«, t00=0x00af, t01=0x008c}
0x111c6…111da               Head {h00=0x0010, h01=0x0050, text=»CALP85 EQU *«, t00=0x00af, t01=0x009e}
0x111da…111e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x00b2}
0x111e4…111f2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00af, t01=0x00bc}
0x111f2…111fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x00ca}
0x111fc…11216               Head {h00=0x0016, h01=0x0050, text=»* GET DTE-ADDRESS «, t00=0x00af, t01=0x00d4}
0x11216…11220               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x00ee}
0x11220…11240               Head {h00=0x001c, h01=0x0050, text=» LDKL A3,LOCAL SET TYPE «, t00=0x00af, t01=0x00f8}
0x11240…11252               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x00af, t01=0x0118}
0x11252…11282               Head {h00=0x002c, h01=0x0050, text=» CF A15,GETDST GET SYMBOLIC DTE-ADDRESS «, t00=0x00af, t01=0x012a}
0x11282…11294               Head {h00=0x000e, h01=0x0050, text=» ENB  . =1«, t00=0x00af, t01=0x015a}
0x11294…1129e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x016c}
0x1129e…112ca               Head {h00=0x0028, h01=0x0050, text=»* TEST IF SYMBOLIC DTE ADDRESS FOUND«, t00=0x00af, t01=0x0176}
0x112ca…112d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0012}
0x112d4…112e6               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x00b0, t01=0x001c}
0x112e6…112fe               Head {h00=0x0014, h01=0x0050, text=» RB(N) CALP30 NO«, t00=0x00b0, t01=0x002e}
0x112fe…11308               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0046}
0x11308…11332               Head {h00=0x0026, h01=0x0050, text=»* TEST IF REMOTE ADDRESS ACCEPTED «, t00=0x00b0, t01=0x0050}
0x11332…1133c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x007a}
0x1133c…11354               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTRAD,A6«, t00=0x00b0, t01=0x0084}
0x11354…1137e               Head {h00=0x0026, h01=0x0050, text=» RF(Z) CALP90 ALL REMOTE ACCEPTED «, t00=0x00b0, t01=0x009c}
0x1137e…11390               Head {h00=0x000e, h01=0x0050, text=» CWR A1,A2«, t00=0x00b0, t01=0x00c6}
0x11390…113bc               Head {h00=0x0028, h01=0x0050, text=» RB(NE) CALP20 NOT ACCEPTED,TRY NEXT«, t00=0x00b0, t01=0x00d8}
0x113bc…113c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0104}
0x113c6…113da               Head {h00=0x0010, h01=0x0050, text=»* DWT FOUND «, t00=0x00b0, t01=0x010e}
0x113da…113e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0122}
0x113e4…113f8               Head {h00=0x0010, h01=0x0050, text=»CALP90 EQU *«, t00=0x00b0, t01=0x012c}
0x113f8…11432               Head {h00=0x0036, h01=0x0050, text=» ST A1,DWTRAD,A6 STORE REMOTE SYMBOLIC DTE-ADDRESS«, t00=0x00b0, t01=0x0140}
0x11432…1144a               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTECB,A6«, t00=0x00b0, t01=0x017a}
0x1144a…11462 (177, 0, 400) Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW1,A2«, t00=0x00b1, t01=0x0004}
0x11462…1146c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x001c}
0x1146c…1147a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b1, t01=0x0026}
0x1147a…11484               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x0034}
0x11484…114b2               Head {h00=0x002a, h01=0x0050, text=»*        STORE LOG CHAN NUMBER IN DWT «, t00=0x00b1, t01=0x003e}
0x114b2…114bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x006c}
0x114bc…114e2               Head {h00=0x0022, h01=0x0050, text=» LC A1,LCIDNT,A8 GET LC NUMBER«, t00=0x00b1, t01=0x0076}
0x114e2…1150a               Head {h00=0x0024, h01=0x0050, text=» SC A1,DWTLCN,A6 STORE IT IN DWT«, t00=0x00b1, t01=0x009c}
0x1150a…11514               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x00c4}
0x11514…11540               Head {h00=0x0028, h01=0x0050, text=»*        STORE DWT ADDRESS IN LC-ADM«, t00=0x00b1, t01=0x00ce}
0x11540…1154a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x00fa}
0x1154a…11562               Head {h00=0x0014, h01=0x0050, text=» ST A6,LCDWT,A13«, t00=0x00b1, t01=0x0104}
0x11562…1156c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x011c}
0x1156c…115a0               Head {h00=0x0030, h01=0x0050, text=»* TEST IF FACILITIES OR USER DATA AVAILABLE «, t00=0x00b1, t01=0x0126}
0x115a0…115aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x015a}
0x115aa…115cc               Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A8 PACKET LENGTH «, t00=0x00b1, t01=0x0164}
0x115cc…115f4               Head {h00=0x0024, h01=0x0050, text=» ADR A3,A8 END ADDRESS OF PACKET«, t00=0x00b1, t01=0x0186}
0x115f4…11606               Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x00b2, t01=0x001e}
0x11606…1163c               Head {h00=0x0032, h01=0x0050, text=» CWR A5,A3 FACILITIES OR USER DATA IN PACKET ?«, t00=0x00b2, t01=0x0030}
0x1163c…11654               Head {h00=0x0014, h01=0x0050, text=» RF(E) CAL150 NO«, t00=0x00b2, t01=0x0066}
0x11654…11688               Head {h00=0x0030, h01=0x0050, text=» STR A5,A8 STORE BEGIN ADDR.IN HDLC-HEADDER «, t00=0x00b2, t01=0x007e}
0x11688…11692               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x00b2}
0x11692…116a0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b2, t01=0x00bc}
0x116a0…116aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x00ca}
0x116aa…116cc               Head {h00=0x001e, h01=0x0050, text=»* TEST IF FACILITIES ONLY «, t00=0x00b2, t01=0x00d4}
0x116cc…116d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x00f6}
0x116d6…116e8               Head {h00=0x000e, h01=0x0050, text=» LCR A1,A5«, t00=0x00b2, t01=0x0100}
0x116e8…1172c               Head {h00=0x0040, h01=0x0050, text=»         ANK      A1,/3F           A1:=LENGTH OF FACILITIES «, t00=0x00b2, t01=0x0112}
0x1172c…1176c               Head {h00=0x003c, h01=0x0050, text=»         RF(Z)    CAL100           NO FACILITIES AT ALL «, t00=0x00b2, t01=0x0156}
0x1176c…1178c               Head {h00=0x001c, h01=0x0050, text=»         ADR      A1,A5 «, t00=0x00b3, t01=0x0008}
0x1178c…117ac               Head {h00=0x001c, h01=0x0050, text=»         CWR      A1,A3 «, t00=0x00b3, t01=0x0028}
0x117ac…117f0               Head {h00=0x0040, h01=0x0050, text=»         RF(NE)   CAL100           FACILITIES AND USER DATA «, t00=0x00b3, t01=0x0048}
0x117f0…117fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x008c}
0x117fa…11814               Head {h00=0x0016, h01=0x0050, text=»* ONLY FACILITIES «, t00=0x00b3, t01=0x0096}
0x11814…1181e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x00b0}
0x1181e…11862               Head {h00=0x0040, h01=0x0050, text=»         ADK      A1,1             ADD FACILITY-LENGTH OCTAD«, t00=0x00b3, t01=0x00ba}
0x11862…11882               Head {h00=0x001c, h01=0x0050, text=»         SUR      A1,A5 «, t00=0x00b3, t01=0x00fe}
0x11882…118a2               Head {h00=0x001c, h01=0x0050, text=»         LDR      A3,A1 «, t00=0x00b3, t01=0x011e}
0x118a2…118c2               Head {h00=0x001c, h01=0x0050, text=»         RF       CAL110«, t00=0x00b3, t01=0x013e}
0x118c2…118de               Head {h00=0x0018, h01=0x0050, text=»CAL100   EQU      * «, t00=0x00b3, t01=0x015e}
0x118de…118fc               Head {h00=0x001a, h01=0x0050, text=»         ADK      A3,2«, t00=0x00b3, t01=0x017a}
0x118fc…1193c               Head {h00=0x003c, h01=0x0050, text=»         SUR      A3,A5            A3:=LENGTH IN OCTADS «, t00=0x00b4, t01=0x0008}
0x1193c…11958               Head {h00=0x0018, h01=0x0050, text=»CAL110   EQU      * «, t00=0x00b4, t01=0x0048}
0x11958…119a6               Head {h00=0x004a, h01=0x0050, text=»         SC       A3,LCIDNT,A8     STORE LENGTH IN LOGICAL CHAN.NUMBER«, t00=0x00b4, t01=0x0064}
0x119a6…119be               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,DATA.RC«, t00=0x00b4, t01=0x00b2}
0x119be…119c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x00ca}
0x119c8…11a00               Head {h00=0x0034, h01=0x0050, text=»* TEST IF OPTION SET IN CONNECT PASSIVE REQUEST «, t00=0x00b4, t01=0x00d4}
0x11a00…11a0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x010c}
0x11a0a…11a20               Head {h00=0x0012, h01=0x0050, text=» LDK A2,INCALR«, t00=0x00b4, t01=0x0116}
0x11a20…11a38               Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTOPT,A6«, t00=0x00b4, t01=0x012c}
0x11a38…11a4e               Head {h00=0x0012, h01=0x0050, text=» ANK A4,CALOPT«, t00=0x00b4, t01=0x0144}
0x11a4e…11a68               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CAL130 YES«, t00=0x00b4, t01=0x015a}
0x11a68…11a72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0174}
0x11a72…11a9a               Head {h00=0x0024, h01=0x0050, text=»*        SEND CALL CONFIRMATION «, t00=0x00b4, t01=0x017e}
0x11a9a…11aa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0016}
0x11aa4…11abc               Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTRCI,A6«, t00=0x00b5, t01=0x0020}
0x11abc…11ac6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0038}
0x11ac6…11ad4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b5, t01=0x0042}
0x11ad4…11ade               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0050}
0x11ade…11b06               Head {h00=0x0024, h01=0x0050, text=»* REQUEUE BUFFER AND BLOCK QUEUE«, t00=0x00b5, t01=0x005a}
0x11b06…11b10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0082}
0x11b10…11b30               Head {h00=0x001c, h01=0x0050, text=»         LDR      A2,A8 «, t00=0x00b5, t01=0x008c}
0x11b30…11b50               Head {h00=0x001c, h01=0x0050, text=»         LDR      A1,A11«, t00=0x00b5, t01=0x00ac}
0x11b50…11b8a               Head {h00=0x0036, h01=0x0050, text=»         CF       A14,QUEUEF       REQUEUE BUFFER «, t00=0x00b5, t01=0x00cc}
0x11b8a…11bae               Head {h00=0x0020, h01=0x0050, text=»         LDK      A1,NPRFLG «, t00=0x00b5, t01=0x0106}
0x11bae…11be4               Head {h00=0x0032, h01=0x0050, text=»         ORRS     A1,A11           BLOCK QUEUE«, t00=0x00b5, t01=0x012a}
0x11be4…11bfa               Head {h00=0x0012, h01=0x0050, text=» LDK A5,INCALL«, t00=0x00b5, t01=0x0160}
0x11bfa…11c0e               Head {h00=0x0010, h01=0x0050, text=»CAL120 EQU *«, t00=0x00b5, t01=0x0176}
0x11c0e…11c24               Head {h00=0x0012, h01=0x0050, text=» LDK A2,ACCCAL«, t00=0x00b5, t01=0x018a}
0x11c24…11c3c               Head {h00=0x0014, h01=0x0050, text=» LDKL A11,TRANSP«, t00=0x00b6, t01=0x0010}
0x11c3c…11c5c               Head {h00=0x001c, h01=0x0050, text=» ABL DISC60 ACCEPT CALL «, t00=0x00b6, t01=0x0028}
0x11c5c…11c70               Head {h00=0x0010, h01=0x0050, text=»CAL130 EQU *«, t00=0x00b6, t01=0x0048}
0x11c70…11c88               Head {h00=0x0014, h01=0x0050, text=» SC A2,DWTSTE,A6«, t00=0x00b6, t01=0x005c}
0x11c88…11c9e               Head {h00=0x0012, h01=0x0050, text=» CF A14,CMPREQ«, t00=0x00b6, t01=0x0074}
0x11c9e…11ca8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x008a}
0x11ca8…11cdc               Head {h00=0x0030, h01=0x0050, text=»*        REQUEUE BUFFER,BLOCK QUEUE AND EXIT«, t00=0x00b6, t01=0x0094}
0x11cdc…11ce6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x00c8}
0x11ce6…11cfa               Head {h00=0x0010, h01=0x0050, text=»CAL140 EQU *«, t00=0x00b6, t01=0x00d2}
0x11cfa…11d0e               Head {h00=0x0010, h01=0x0050, text=» ABL RHI150 «, t00=0x00b6, t01=0x00e6}
0x11d0e…11d18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x00fa}
0x11d18…11d26               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b6, t01=0x0104}
0x11d26…11d30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x0112}
0x11d30…11d58               Head {h00=0x0024, h01=0x0050, text=»*        NO USER DATA AVAILABLE «, t00=0x00b6, t01=0x011c}
0x11d58…11d90               Head {h00=0x0034, h01=0x0050, text=»* TEST IF OPTION SET IN CONNECT PASSIVE REQUEST «, t00=0x00b6, t01=0x0144}
0x11d90…11d9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x017c}
0x11d9a…11dae               Head {h00=0x0010, h01=0x0050, text=»CAL150 EQU *«, t00=0x00b6, t01=0x0186}
0x11dae…11dc4               Head {h00=0x0012, h01=0x0050, text=» LDK A5,CONAD «, t00=0x00b7, t01=0x000a}
0x11dc4…11dea               Head {h00=0x0022, h01=0x0050, text=»         LC       A3,DWTOPT,A6«, t00=0x00b7, t01=0x0020}
0x11dea…11e0e               Head {h00=0x0020, h01=0x0050, text=»         ANK      A3,CALOPT «, t00=0x00b7, t01=0x0046}
0x11e0e…11e28               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CAL155 YES«, t00=0x00b7, t01=0x006a}
0x11e28…11e48               Head {h00=0x001c, h01=0x0050, text=»         LDR      A2,A8 «, t00=0x00b7, t01=0x0084}
0x11e48…11e82               Head {h00=0x0036, h01=0x0050, text=»         CF       A14,RLBUF        RELEASE BUFFER «, t00=0x00b7, t01=0x00a4}
0x11e82…11e94               Head {h00=0x000e, h01=0x0050, text=» RB CAL120«, t00=0x00b7, t01=0x00de}
0x11e94…11e9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x00f0}
0x11e9e…11eb2               Head {h00=0x0010, h01=0x0050, text=»CAL155 EQU *«, t00=0x00b7, t01=0x00fa}
0x11eb2…11ec8               Head {h00=0x0012, h01=0x0050, text=» LDK A5,INCALR«, t00=0x00b7, t01=0x010e}
0x11ec8…11f04               Head {h00=0x0038, h01=0x0050, text=»         SC       A5,DWTSTE,A6     CHANGE DWT STATE «, t00=0x00b7, t01=0x0124}
0x11f04…11f0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x0160}
0x11f0e…11f4a               Head {h00=0x0038, h01=0x0050, text=»*        COMPLETE REQUEST WITH RETURNCODE "ACCEPTED"«, t00=0x00b7, t01=0x016a}
0x11f4a…11f72               Head {h00=0x0024, h01=0x0050, text=»*        RELEASE BUFFER AND EXIT«, t00=0x00b8, t01=0x0016}
0x11f72…11f7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x003e}
0x11f7c…11f90               Head {h00=0x0010, h01=0x0050, text=»CAL160 EQU *«, t00=0x00b8, t01=0x0048}
0x11f90…11fa4               Head {h00=0x0010, h01=0x0050, text=» ABL RHI120 «, t00=0x00b8, t01=0x005c}
0x11fa4…11fc0               Head {h00=0x0018, h01=0x0050, text=»CAL170   EQU      * «, t00=0x00b8, t01=0x0070}
0x11fc0…11fe0               Head {h00=0x001c, h01=0x0050, text=»         LDR      A2,A8 «, t00=0x00b8, t01=0x008c}
0x11fe0…1201a               Head {h00=0x0036, h01=0x0050, text=»         CF       A14,RLBUF        RELEASE BUFFER «, t00=0x00b8, t01=0x00ac}
0x1201a…1203a               Head {h00=0x001c, h01=0x0050, text=»         RB       CAL120«, t00=0x00b8, t01=0x00e6}
0x1203a…12048               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b8, t01=0x0106}
0x12048…12052               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0114}
0x12052…12094               Head {h00=0x003e, h01=0x0050, text=»*        MOVE INFORMATION OF INCOMMING CALL IN READ BUFFER«, t00=0x00b8, t01=0x011e}
0x12094…1209e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0160}
0x1209e…120ba               Head {h00=0x0018, h01=0x0050, text=»CAL180   EQU      * «, t00=0x00b8, t01=0x016a}
0x120ba…120c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0186}
0x120c4…120f2               Head {h00=0x002a, h01=0x0050, text=»*        TEST IF READ REQUEST PENDING «, t00=0x00b8, t01=0x0190}
0x120f2…120fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x002e}
0x120fc…1210e               Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x00b9, t01=0x0038}
0x1210e…12128               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CAL190 NO «, t00=0x00b9, t01=0x004a}
0x12128…12132               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0064}
0x12132…12158               Head {h00=0x0022, h01=0x0050, text=»*        READ REQUEST PENDING «, t00=0x00b9, t01=0x006e}
0x12158…12162               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0094}
0x12162…121b2               Head {h00=0x004c, h01=0x0050, text=»         LDR*     A1,A8            A1:=ADDRESS OF FACILITY LENGTH IN PAC«, t00=0x00b9, t01=0x009e}
0x121b2…121bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x00ee}
0x121bc…12204               Head {h00=0x0044, h01=0x0050, text=»*        GET NUMBER OF CHARACTERS TO MOVE FROM PACKET IN BUFFER «, t00=0x00b9, t01=0x00f8}
0x12204…1220e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0140}
0x1220e…1222c               Head {h00=0x001a, h01=0x0050, text=»         LDK      A4,0«, t00=0x00b9, t01=0x014a}
0x1222c…12252               Head {h00=0x0022, h01=0x0050, text=»         LC       A4,LCIDNT,A8«, t00=0x00b9, t01=0x0168}
0x12252…12276               Head {h00=0x0020, h01=0x0050, text=»         CF       A14,COPTUB«, t00=0x00b9, t01=0x018e}
0x12276…122c2               Head {h00=0x0048, h01=0x0050, text=»         RB       CAL160           COMPLETE REQUEST WITH RETURN CODE«, t00=0x00ba, t01=0x0022}
0x122c2…1230e               Head {h00=0x0048, h01=0x0050, text=»                                 'ACCEPTED',RELEASE BUFFER AND EXIT «, t00=0x00ba, t01=0x006e}
0x1230e…12318               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00ba}
0x12318…1233c               Head {h00=0x0020, h01=0x0050, text=»*        TEST IF VC RELEASED«, t00=0x00ba, t01=0x00c4}
0x1233c…12346               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00e8}
0x12346…1235a               Head {h00=0x0010, h01=0x0050, text=»CAL190 EQU *«, t00=0x00ba, t01=0x00f2}
0x1235a…1236e               Head {h00=0x0010, h01=0x0050, text=» LDR A10,A10«, t00=0x00ba, t01=0x0106}
0x1236e…123a8               Head {h00=0x0036, h01=0x0050, text=» RB(NZ) CAL140 NO! REQUEUE BUFFER,BLOCK QUEUE,EXIT«, t00=0x00ba, t01=0x011a}
0x123a8…123d8               Head {h00=0x002c, h01=0x0050, text=» ABL RHI140 YES! RELEASE BUFFER AND EXIT«, t00=0x00ba, t01=0x0154}
0x123d8…123e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x0184}
0x123e2…123f0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ba, t01=0x018e}
0x123f0…123fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x000c}
0x123fa…12404               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0016}
0x12404…12426               Head {h00=0x001e, h01=0x0050, text=»* CALL CONFIRMATION PACKET«, t00=0x00bb, t01=0x0020}
0x12426…12430               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0042}
0x12430…1247c               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00bb, t01=0x004c}
0x1247c…12486               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0098}
0x12486…124a2               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00bb, t01=0x00a2}
0x124a2…124be               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT ADDRESS«, t00=0x00bb, t01=0x00be}
0x124be…124de               Head {h00=0x001c, h01=0x0050, text=»*  A8  = BUFFER ADDRESS «, t00=0x00bb, t01=0x00da}
0x124de…12500               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x00bb, t01=0x00fa}
0x12500…1250a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x011c}
0x1250a…1251e               Head {h00=0x0010, h01=0x0050, text=»CALCON EQU *«, t00=0x00bb, t01=0x0126}
0x1251e…12540               Head {h00=0x001e, h01=0x0050, text=» LDK A2,CONAD DWT STATE :=«, t00=0x00bb, t01=0x013a}
0x12540…12570               Head {h00=0x002c, h01=0x0050, text=» SC A2,DWTSTE,A6 CONNECTED, ACCEPT DATA «, t00=0x00bb, t01=0x015c}
0x12570…1257a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x018c}
0x1257a…125b6               Head {h00=0x0038, h01=0x0050, text=»*        COMPLETE REQUEST WITH RETURNCODE "ACCEPTED"«, t00=0x00bc, t01=0x0008}
0x125b6…125de               Head {h00=0x0024, h01=0x0050, text=»*        RELEASE BUFFER AND EXIT«, t00=0x00bc, t01=0x0044}
0x125de…125e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x006c}
0x125e8…125fc               Head {h00=0x0010, h01=0x0050, text=» ABL RHI120 «, t00=0x00bc, t01=0x0076}
0x125fc…12606               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x008a}
0x12606…12614               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bc, t01=0x0094}
0x12614…1261e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x00a2}
0x1261e…12628               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x00ac}
0x12628…1263e               Head {h00=0x0012, h01=0x0050, text=»* CLEAR PACKET«, t00=0x00bc, t01=0x00b6}
0x1263e…12648               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x00cc}
0x12648…12696               Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x00bc, t01=0x00d6}
0x12696…126a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0124}
0x126a0…126bc               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00bc, t01=0x012e}
0x126bc…126e8               Head {h00=0x0028, h01=0x0050, text=»*  A5  = REQUEST PENDING INDICATION «, t00=0x00bc, t01=0x014a}
0x126e8…1271e               Head {h00=0x0032, h01=0x0050, text=»*                       <0: NO REQUEST PENDING«, t00=0x00bc, t01=0x0176}
0x1271e…12756               Head {h00=0x0034, h01=0x0050, text=»*                       =0: READ REQUEST PENDING«, t00=0x00bd, t01=0x001c}
0x12756…12790               Head {h00=0x0036, h01=0x0050, text=»*                       >0: OTHER REQUEST PENDING «, t00=0x00bd, t01=0x0054}
0x12790…127bc               Head {h00=0x0028, h01=0x0050, text=»*                 A6  = DWT ADDRESS «, t00=0x00bd, t01=0x008e}
0x127bc…127dc               Head {h00=0x001c, h01=0x0050, text=»*  A8  = BUFFER ADDRESS «, t00=0x00bd, t01=0x00ba}
0x127dc…1280a               Head {h00=0x002a, h01=0x0050, text=»*  A11 = ADDRESS OF INPUT-QUEUE ANCHOR«, t00=0x00bd, t01=0x00da}
0x1280a…1283a               Head {h00=0x002c, h01=0x0050, text=»*                 A14 = CF STACK POINTER«, t00=0x00bd, t01=0x0108}
0x1283a…12844               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0138}
0x12844…12858               Head {h00=0x0010, h01=0x0050, text=»CLEPAC EQU *«, t00=0x00bd, t01=0x0142}
0x12858…1288a               Head {h00=0x002e, h01=0x0050, text=» LDK A3,CLEA.RC+MORE.RC CLEAR + MORE INFO «, t00=0x00bd, t01=0x0156}
0x1288a…128b4               Head {h00=0x0026, h01=0x0050, text=» LDK A1,DWTCLE DISP FOR CLEAR INFO«, t00=0x00bd, t01=0x0188}
0x128b4…128c6               Head {h00=0x000e, h01=0x0050, text=» RF CLERES«, t00=0x00be, t01=0x0022}
0x128c6…128d2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00be, t01=0x0034}
0x128d2…128e0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00be, t01=0x0040}
0x128e0…128ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x004e}
0x128ea…128f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0058}
0x128f4…1290a               Head {h00=0x0012, h01=0x0050, text=»* RESET PACKET«, t00=0x00be, t01=0x0062}
0x1290a…12914               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0078}
0x12914…12960               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00be, t01=0x0082}
0x12960…1296a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x00ce}
0x1296a…12986               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00be, t01=0x00d8}
0x12986…129b2               Head {h00=0x0028, h01=0x0050, text=»*  A5  = REQUEST PENDING INDICATION «, t00=0x00be, t01=0x00f4}
0x129b2…129da               Head {h00=0x0024, h01=0x0050, text=»*        <0: NO REQUEST PENDING «, t00=0x00be, t01=0x0120}
0x129da…12a04               Head {h00=0x0026, h01=0x0050, text=»*        =0: READ REQUEST PENDING «, t00=0x00be, t01=0x0148}
0x12a04…12a2e               Head {h00=0x0026, h01=0x0050, text=»*        >0: OTHER REQUEST PENDING«, t00=0x00be, t01=0x0172}
0x12a2e…12a4a               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT ADDRESS«, t00=0x00bf, t01=0x000c}
0x12a4a…12a6a               Head {h00=0x001c, h01=0x0050, text=»*  A8  = BUFFER ADDRESS «, t00=0x00bf, t01=0x0028}
0x12a6a…12a8c               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x00bf, t01=0x0048}
0x12a8c…12a96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x006a}
0x12a96…12aaa               Head {h00=0x0010, h01=0x0050, text=»RESPAC EQU *«, t00=0x00bf, t01=0x0074}
0x12aaa…12ad2               Head {h00=0x0024, h01=0x0050, text=» CM DWTRCI,A6 CLEAR RETURN INFO «, t00=0x00bf, t01=0x0088}
0x12ad2…12ae4               Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x00bf, t01=0x00b0}
0x12ae4…12afc               Head {h00=0x0014, h01=0x0050, text=» SC A4,DWTWRO,A6«, t00=0x00bf, t01=0x00c2}
0x12afc…12b2e               Head {h00=0x002e, h01=0x0050, text=» LDK A3,RSET.RC+MORE.RC RESET + MORE INFO «, t00=0x00bf, t01=0x00da}
0x12b2e…12b58               Head {h00=0x0026, h01=0x0050, text=» LDK A1,DWTRES DISP FOR RESET INFO«, t00=0x00bf, t01=0x010c}
0x12b58…12b6c               Head {h00=0x0010, h01=0x0050, text=»CLERES EQU *«, t00=0x00bf, t01=0x0136}
0x12b6c…12b92               Head {h00=0x0022, h01=0x0050, text=» ADR A1,A6 WHERE TO STORE INFO«, t00=0x00bf, t01=0x014a}
0x12b92…12ba8               Head {h00=0x0012, h01=0x0050, text=» LDK A4,CAUSE «, t00=0x00bf, t01=0x0170}
0x12ba8…12be2               Head {h00=0x0036, h01=0x0050, text=» ADR A4,A8 A4:=STARTADDR.OF CAUSE-FIELD IN PACKET «, t00=0x00bf, t01=0x0186}
0x12be2…12bec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0030}
0x12bec…12c26               Head {h00=0x0036, h01=0x0050, text=»*        GET CAUSE AND DIAGNOSTIC CODE FROM PACKET«, t00=0x00c0, t01=0x003a}
0x12c26…12c30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0074}
0x12c30…12c50               Head {h00=0x001c, h01=0x0050, text=»         LCR      A7,A4 «, t00=0x00c0, t01=0x007e}
0x12c50…12c70               Head {h00=0x001c, h01=0x0050, text=»         ECR      A7,A7 «, t00=0x00c0, t01=0x009e}
0x12c70…12c92               Head {h00=0x001e, h01=0x0050, text=»         LC       A7,1,A4 «, t00=0x00c0, t01=0x00be}
0x12c92…12ca0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c0, t01=0x00e0}
0x12ca0…12caa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x00ee}
0x12caa…12ce2               Head {h00=0x0034, h01=0x0050, text=»*        STORE RESET CAUSE AND DIAGNOSTIC IN DWT«, t00=0x00c0, t01=0x00f8}
0x12ce2…12cec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0130}
0x12cec…12d06               Head {h00=0x0016, h01=0x0050, text=» ORS A3,DWTRCI,A6 «, t00=0x00c0, t01=0x013a}
0x12d06…12d18               Head {h00=0x000e, h01=0x0050, text=» STR A7,A1«, t00=0x00c0, t01=0x0154}
0x12d18…12d22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0166}
0x12d22…12d44               Head {h00=0x001e, h01=0x0050, text=»* TEST IF REQUEST PENDING «, t00=0x00c0, t01=0x0170}
0x12d44…12d4e (193, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0004}
0x12d4e…12d60               Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x00c1, t01=0x000e}
0x12d60…12d7a               Head {h00=0x0016, h01=0x0050, text=» RF(N) RESP30 NO! «, t00=0x00c1, t01=0x0020}
0x12d7a…12d84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x003a}
0x12d84…12db4               Head {h00=0x002c, h01=0x0050, text=»*   TEST IF CLOSE SYSTEM REQUEST PENDING«, t00=0x00c1, t01=0x0044}
0x12db4…12dbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0074}
0x12dbe…12dd4               Head {h00=0x0012, h01=0x0050, text=» SUK A5,CLOSYS«, t00=0x00c1, t01=0x007e}
0x12dd4…12de8               Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x00c1, t01=0x0094}
0x12de8…12e04               Head {h00=0x0018, h01=0x0050, text=» RF(Z) RESP40 YES ! «, t00=0x00c1, t01=0x00a8}
0x12e04…12e0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x00c4}
0x12e0e…12e3c               Head {h00=0x002a, h01=0x0050, text=»*   TEST IF STATISTIC REQUEST PENDING «, t00=0x00c1, t01=0x00ce}
0x12e3c…12e46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x00fc}
0x12e46…12e64               Head {h00=0x001a, h01=0x0050, text=» SUK A5,STATIS-CLOSYS «, t00=0x00c1, t01=0x0106}
0x12e64…12e70               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c1, t01=0x0124}
0x12e70…12e8a               Head {h00=0x0016, h01=0x0050, text=» RF(Z) RESP40 YES «, t00=0x00c1, t01=0x0130}
0x12e8a…12eba               Head {h00=0x002c, h01=0x0050, text=» LDK A1,TOLD.RC RESET/CLEAR TOLD TO USER«, t00=0x00c1, t01=0x014a}
0x12eba…12ed4               Head {h00=0x0016, h01=0x0050, text=» ORS A1,DWTRCI,A6 «, t00=0x00c1, t01=0x017a}
0x12ed4…12efc (194, 0, 400) Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x00c2, t01=0x0004}
0x12efc…12f10               Head {h00=0x0010, h01=0x0050, text=»RESP30 EQU *«, t00=0x00c2, t01=0x002c}
0x12f10…12f26               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00c2, t01=0x0040}
0x12f26…12f4c               Head {h00=0x0022, h01=0x0050, text=» ANK A3,CLEA.RC CLEAR PACKET ?«, t00=0x00c2, t01=0x0056}
0x12f4c…12f64               Head {h00=0x0014, h01=0x0050, text=» RF(Z) RESP40 NO«, t00=0x00c2, t01=0x007c}
0x12f64…12f92               Head {h00=0x002a, h01=0x0050, text=» CF A14,RELDWT RELEASE DWT FROM CHAIN «, t00=0x00c2, t01=0x0094}
0x12f92…12f9e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c2, t01=0x00c2}
0x12f9e…12fa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x00ce}
0x12fa8…12fca               Head {h00=0x001e, h01=0x0050, text=»* RELEASE BUFFER AND EXIT «, t00=0x00c2, t01=0x00d8}
0x12fca…12fd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x00fa}
0x12fd4…12fe8               Head {h00=0x0010, h01=0x0050, text=»RESP40 EQU *«, t00=0x00c2, t01=0x0104}
0x12fe8…12ffc               Head {h00=0x0010, h01=0x0050, text=» ABL RHI140 «, t00=0x00c2, t01=0x0118}
0x12ffc…1300a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c2, t01=0x012c}
0x1300a…13014               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x013a}
0x13014…1301e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x0144}
0x1301e…13034               Head {h00=0x0012, h01=0x0050, text=»* DATA PACKET «, t00=0x00c2, t01=0x014e}
0x13034…1303e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x0164}
0x1303e…1308a               Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x00c2, t01=0x016e}
0x1308a…13094               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x002a}
0x13094…130b0               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00c3, t01=0x0034}
0x130b0…130dc               Head {h00=0x0028, h01=0x0050, text=»*  A5  = REQUEST PENDING INDICATION «, t00=0x00c3, t01=0x0050}
0x130dc…13104               Head {h00=0x0024, h01=0x0050, text=»*        <0: NO REQUEST PENDING «, t00=0x00c3, t01=0x007c}
0x13104…1312e               Head {h00=0x0026, h01=0x0050, text=»*        =0: READ REQUEST PENDING «, t00=0x00c3, t01=0x00a4}
0x1312e…13158               Head {h00=0x0026, h01=0x0050, text=»*        >0: OTHER REQUEST PENDING«, t00=0x00c3, t01=0x00ce}
0x13158…13174               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT ADDRESS«, t00=0x00c3, t01=0x00f8}
0x13174…13194               Head {h00=0x001c, h01=0x0050, text=»*  A8  = BUFFER ADDRESS «, t00=0x00c3, t01=0x0114}
0x13194…131ba               Head {h00=0x0022, h01=0x0050, text=»*  A10 = VC RELEASE INDICATION«, t00=0x00c3, t01=0x0134}
0x131ba…131ec               Head {h00=0x002e, h01=0x0050, text=»*        =0: VC RELEASED,ELSE NOT RELEASED«, t00=0x00c3, t01=0x015a}
0x131ec…13214               Head {h00=0x0024, h01=0x0050, text=»*  A11 = ADDRESS OF QUEUE ANCHOR«, t00=0x00c3, t01=0x018c}
0x13214…13234               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x00c4, t01=0x0024}
0x13234…13256               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x00c4, t01=0x0044}
0x13256…13260               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x0066}
0x13260…13274               Head {h00=0x0010, h01=0x0050, text=»DATPAC EQU *«, t00=0x00c4, t01=0x0070}
0x13274…1328c               Head {h00=0x0014, h01=0x0050, text=» LDKL A9,DATA.RC«, t00=0x00c4, t01=0x0084}
0x1328c…1329e               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A6«, t00=0x00c4, t01=0x009c}
0x1329e…132b4               Head {h00=0x0012, h01=0x0050, text=» ADK A3,DWTRCI«, t00=0x00c4, t01=0x00ae}
0x132b4…132be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x00c4}
0x132be…132ec               Head {h00=0x002a, h01=0x0050, text=»*        TEST IF READ REQUEST PENDING «, t00=0x00c4, t01=0x00ce}
0x132ec…132f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x00fc}
0x132f6…13308               Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x00c4, t01=0x0106}
0x13308…1331e               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DAT030«, t00=0x00c4, t01=0x0118}
0x1331e…13328               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x012e}
0x13328…13336               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c4, t01=0x0138}
0x13336…13340               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x0146}
0x13340…13366               Head {h00=0x0022, h01=0x0050, text=»*        READ REQUEST PENDING «, t00=0x00c4, t01=0x0150}
0x13366…13392               Head {h00=0x0028, h01=0x0050, text=»*        COPY PACKET TO USER BUFFER «, t00=0x00c4, t01=0x0176}
0x13392…1339c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x0012}
0x1339c…133d4               Head {h00=0x0034, h01=0x0050, text=» LDK A1,BEGDAT A1:=DISPL.IN PACKET FOR USER DATA«, t00=0x00c5, t01=0x001c}
0x133d4…1340c               Head {h00=0x0034, h01=0x0050, text=» ADR A1,A8 A1:=STARTADDR.OF USER DATA IN PACKET «, t00=0x00c5, t01=0x0054}
0x1340c…13440               Head {h00=0x0030, h01=0x0050, text=» LDR* A4,A8 A4:=TOTAL LENGTH OF DATA PACKET «, t00=0x00c5, t01=0x008c}
0x13440…1346e               Head {h00=0x002a, h01=0x0050, text=» SUK A4,BEGDAT A4:=LENGTH OF USER DATA«, t00=0x00c5, t01=0x00c0}
0x1346e…13484               Head {h00=0x0012, h01=0x0050, text=» CF A14,COPTUB«, t00=0x00c5, t01=0x00ee}
0x13484…1349a               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00c5, t01=0x0104}
0x1349a…134a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x011a}
0x134a4…134d6               Head {h00=0x002e, h01=0x0050, text=»*        TEST IF DWT STATE IS VC RELEASED «, t00=0x00c5, t01=0x0124}
0x134d6…134e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x0156}
0x134e0…13502               Head {h00=0x001e, h01=0x0050, text=»         LDR      A10,A10 «, t00=0x00c5, t01=0x0160}
0x13502…13532               Head {h00=0x002c, h01=0x0050, text=»         RF(Z)    DAT005           YES! «, t00=0x00c5, t01=0x0182}
0x13532…1353e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c6, t01=0x0022}
0x1353e…13558               Head {h00=0x0016, h01=0x0050, text=» LC A2,NRNUBF,A13 «, t00=0x00c6, t01=0x002e}
0x13558…1356a               Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x00c6, t01=0x0048}
0x1356a…135a2               Head {h00=0x0034, h01=0x0050, text=» SC A2,NRNUBF,A13 INCREMENT NR.OF UNUSED BUFFERS«, t00=0x00c6, t01=0x005a}
0x135a2…135be               Head {h00=0x0018, h01=0x0050, text=»DAT005   EQU      * «, t00=0x00c6, t01=0x0092}
0x135be…135c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x00ae}
0x135c8…135ec               Head {h00=0x0020, h01=0x0050, text=»*        PREPARE RETURNCODE «, t00=0x00c6, t01=0x00b8}
0x135ec…135f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x00dc}
0x135f6…1360a               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A3 «, t00=0x00c6, t01=0x00e6}
0x1360a…13614               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x00fa}
0x13614…13646               Head {h00=0x002e, h01=0x0050, text=»*        TEST IF MORE-DATA-INDICATION SET «, t00=0x00c6, t01=0x0104}
0x13646…13650               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x0136}
0x13650…13666               Head {h00=0x0012, h01=0x0050, text=» LC A5,MBIT,A8«, t00=0x00c6, t01=0x0140}
0x13666…1367a               Head {h00=0x0010, h01=0x0050, text=» ANK A5,MPOS«, t00=0x00c6, t01=0x0156}
0x1367a…13690               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DAT010«, t00=0x00c6, t01=0x016a}
0x13690…1369a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x0180}
0x1369a…136c0               Head {h00=0x0022, h01=0x0050, text=»* MORE DATA INDICATION NOT SET«, t00=0x00c6, t01=0x018a}
0x136c0…136dc               Head {h00=0x0018, h01=0x0050, text=»* ADJUST RETURN CODE«, t00=0x00c7, t01=0x0020}
0x136dc…136e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x003c}
0x136e6…136fe               Head {h00=0x0014, h01=0x0050, text=» ORKL A3,LAST.RC«, t00=0x00c7, t01=0x0046}
0x136fe…13708               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x005e}
0x13708…13716               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c7, t01=0x0068}
0x13716…13720               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0076}
0x13720…1374a               Head {h00=0x0026, h01=0x0050, text=»*        TEST IF QUALIFIER-BIT SET«, t00=0x00c7, t01=0x0080}
0x1374a…13754               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x00aa}
0x13754…13768               Head {h00=0x0010, h01=0x0050, text=»DAT010 EQU *«, t00=0x00c7, t01=0x00b4}
0x13768…1377e               Head {h00=0x0012, h01=0x0050, text=» LC A1,QBIT,A8«, t00=0x00c7, t01=0x00c8}
0x1377e…13792               Head {h00=0x0010, h01=0x0050, text=» ANK A1,QPOS«, t00=0x00c7, t01=0x00de}
0x13792…137a8               Head {h00=0x0012, h01=0x0050, text=» RF(Z) DAT020 «, t00=0x00c7, t01=0x00f2}
0x137a8…137b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0108}
0x137b2…137e8               Head {h00=0x0032, h01=0x0050, text=»*        QUALIFIER-BIT SET; ADJUST RETURN CODE«, t00=0x00c7, t01=0x0112}
0x137e8…137f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0148}
0x137f2…1380a               Head {h00=0x0014, h01=0x0050, text=» ORKL A3,QBIT.RC«, t00=0x00c7, t01=0x0152}
0x1380a…13814               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x016a}
0x13814…1384c               Head {h00=0x0034, h01=0x0050, text=»*        COMPLETE REQUEST WITH RETURNCODE IN A3 «, t00=0x00c7, t01=0x0174}
0x1384c…13874               Head {h00=0x0024, h01=0x0050, text=»*        RELEASE BUFFER AND EXIT«, t00=0x00c8, t01=0x001c}
0x13874…1387e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0044}
0x1387e…13892               Head {h00=0x0010, h01=0x0050, text=»DAT020 EQU *«, t00=0x00c8, t01=0x004e}
0x13892…138a6               Head {h00=0x0010, h01=0x0050, text=» ABL RHI130 «, t00=0x00c8, t01=0x0062}
0x138a6…138b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0076}
0x138b0…138d8               Head {h00=0x0024, h01=0x0050, text=»*        NO READ REQUEST PENDING«, t00=0x00c8, t01=0x0080}
0x138d8…138e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x00a8}
0x138e2…138f6               Head {h00=0x0010, h01=0x0050, text=»DAT030 EQU *«, t00=0x00c8, t01=0x00b2}
0x138f6…13924               Head {h00=0x002a, h01=0x0050, text=» ORRS A9,A3 SET DATA AVAILABLE IN DWT «, t00=0x00c8, t01=0x00c6}
0x13924…1392e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x00f4}
0x1392e…13962               Head {h00=0x0030, h01=0x0050, text=»*        REQUEUE BUFFER,BLOCK QUEUE AND EXIT«, t00=0x00c8, t01=0x00fe}
0x13962…1396c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0132}
0x1396c…13980               Head {h00=0x0010, h01=0x0050, text=» ABL RHI150 «, t00=0x00c8, t01=0x013c}
0x13980…1398e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c8, t01=0x0150}
0x1398e…13998               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x015e}
0x13998…139a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0168}
0x139a2…139bc               Head {h00=0x0016, h01=0x0050, text=»* INTERRUPT PACKET«, t00=0x00c8, t01=0x0172}
0x139bc…139c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x018c}
0x139c6…13a12               Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x00c9, t01=0x0008}
0x13a12…13a1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c9, t01=0x0054}
0x13a1c…13a38               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00c9, t01=0x005e}
0x13a38…13a64               Head {h00=0x0028, h01=0x0050, text=»*  A5  = REQUEST PENDING INDICATION «, t00=0x00c9, t01=0x007a}
0x13a64…13a8c               Head {h00=0x0024, h01=0x0050, text=»*        <0: NO REQUEST PENDING «, t00=0x00c9, t01=0x00a6}
0x13a8c…13ab6               Head {h00=0x0026, h01=0x0050, text=»*        =0: READ REQUEST PENDING «, t00=0x00c9, t01=0x00ce}
0x13ab6…13ae0               Head {h00=0x0026, h01=0x0050, text=»*        >0: OTHER REQUEST PENDING«, t00=0x00c9, t01=0x00f8}
0x13ae0…13afc               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT ADDRESS«, t00=0x00c9, t01=0x0122}
0x13afc…13b1c               Head {h00=0x001c, h01=0x0050, text=»*  A8  = BUFFER ADDRESS «, t00=0x00c9, t01=0x013e}
0x13b1c…13b42               Head {h00=0x0022, h01=0x0050, text=»*  A10 = VC RELEASE INDICATION«, t00=0x00c9, t01=0x015e}
0x13b42…13b74               Head {h00=0x002e, h01=0x0050, text=»*        =0: VC RELEASED,ELSE NOT RELEASED«, t00=0x00c9, t01=0x0184}
0x13b74…13b9c               Head {h00=0x0024, h01=0x0050, text=»*  A11 = ADDRESS OF QUEUE ANCHOR«, t00=0x00ca, t01=0x0026}
0x13b9c…13bbc               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x00ca, t01=0x004e}
0x13bbc…13bde               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x00ca, t01=0x006e}
0x13bde…13be8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0090}
0x13be8…13bfc               Head {h00=0x0010, h01=0x0050, text=»INTPAC EQU *«, t00=0x00ca, t01=0x009a}
0x13bfc…13c20               Head {h00=0x0020, h01=0x0050, text=»         LDK      A7,DWTRCI «, t00=0x00ca, t01=0x00ae}
0x13c20…13c40               Head {h00=0x001c, h01=0x0050, text=»         ADR      A7,A6 «, t00=0x00ca, t01=0x00d2}
0x13c40…13c64               Head {h00=0x0020, h01=0x0050, text=»         LDKL     A3,INTR.RC«, t00=0x00ca, t01=0x00f2}
0x13c64…13c6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0116}
0x13c6e…13c94               Head {h00=0x0022, h01=0x0050, text=»* TEST IF READ REQUEST PENDING«, t00=0x00ca, t01=0x0120}
0x13c94…13c9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0146}
0x13c9e…13cb0               Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x00ca, t01=0x0150}
0x13cb0…13cc6               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) INT010«, t00=0x00ca, t01=0x0162}
0x13cc6…13cd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0178}
0x13cd0…13cde               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ca, t01=0x0182}
0x13cde…13ce8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0190}
0x13ce8…13d0e               Head {h00=0x0022, h01=0x0050, text=»*        READ REQUEST PENDING «, t00=0x00cb, t01=0x000a}
0x13d0e…13d3a               Head {h00=0x0028, h01=0x0050, text=»*        COPY PACKET TO USER BUFFER «, t00=0x00cb, t01=0x0030}
0x13d3a…13d76               Head {h00=0x0038, h01=0x0050, text=»*        RESET INTERRUPT RECEIVED INDICATION IN DWT «, t00=0x00cb, t01=0x005c}
0x13d76…13d80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x0098}
0x13d80…13da0               Head {h00=0x001c, h01=0x0050, text=»         C1R      A3,A3 «, t00=0x00cb, t01=0x00a2}
0x13da0…13dc0               Head {h00=0x001c, h01=0x0050, text=»         ANRS     A3,A7 «, t00=0x00cb, t01=0x00c2}
0x13dc0…13dfa               Head {h00=0x0036, h01=0x0050, text=» LDK A1,BEGDAT A1:=DISPL.IN PACKET FOR INTERRUPT- «, t00=0x00cb, t01=0x00e2}
0x13dfa…13e0e               Head {h00=0x0010, h01=0x0050, text=»   USER DATA«, t00=0x00cb, t01=0x011c}
0x13e0e…13e44               Head {h00=0x0032, h01=0x0050, text=» ADR A1,A8 A1:=START ADDRESS OF INT.USER DATA «, t00=0x00cb, t01=0x0130}
0x13e44…13e6e               Head {h00=0x0026, h01=0x0050, text=» LDK A4,1 LENGTH OF INT.USER DATA «, t00=0x00cb, t01=0x0166}
0x13e6e…13e84               Head {h00=0x0012, h01=0x0050, text=» CF A14,COPTUB«, t00=0x00cb, t01=0x0190}
0x13e84…13ed4               Head {h00=0x004c, h01=0x0050, text=»         C1R      A3,A3            A3:=RETURNCODE:INTERRUPT PACKET REC. «, t00=0x00cc, t01=0x0016}
0x13ed4…13ee8               Head {h00=0x0010, h01=0x0050, text=» ORR* A3,A7 «, t00=0x00cc, t01=0x0066}
0x13ee8…13f10               Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x00cc, t01=0x007a}
0x13f10…13f22               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x00cc, t01=0x00a2}
0x13f22…13f46               Head {h00=0x0020, h01=0x0050, text=» CF A14,RLBUF RELEASE BUFFER«, t00=0x00cc, t01=0x00b4}
0x13f46…13f50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x00d8}
0x13f50…13f7a               Head {h00=0x0026, h01=0x0050, text=»* TEST IF DWT STATE IS VC RELEASED«, t00=0x00cc, t01=0x00e2}
0x13f7a…13f84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x010c}
0x13f84…13fa6               Head {h00=0x001e, h01=0x0050, text=»         LDR      A10,A10 «, t00=0x00cc, t01=0x0116}
0x13fa6…13fd6               Head {h00=0x002c, h01=0x0050, text=»         RF(Z)    INT008           YES! «, t00=0x00cc, t01=0x0138}
0x13fd6…13fe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x0168}
0x13fe0…14010               Head {h00=0x002c, h01=0x0050, text=»* PREPARE INTERRUPT CONFIRMATION PACKET «, t00=0x00cc, t01=0x0172}
0x14010…1401a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0012}
0x1401a…1402e               Head {h00=0x0010, h01=0x0050, text=»INT002 EQU *«, t00=0x00cd, t01=0x001c}
0x1402e…14056               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x00cd, t01=0x0030}
0x14056…1406c               Head {h00=0x0012, h01=0x0050, text=» ADK A2,SYSBUF«, t00=0x00cd, t01=0x0058}
0x1406c…14076               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x006e}
0x14076…14096               Head {h00=0x001c, h01=0x0050, text=»* TEST IF BUFFER IS FREE«, t00=0x00cd, t01=0x0078}
0x14096…140a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0098}
0x140a0…140b4               Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A2 «, t00=0x00cd, t01=0x00a2}
0x140b4…140ce               Head {h00=0x0016, h01=0x0050, text=» RF(Z) INT004 YES «, t00=0x00cd, t01=0x00b6}
0x140ce…140fe               Head {h00=0x002c, h01=0x0050, text=» LDKL A1,INT002 A1:=REACTIVATION ADDRESS«, t00=0x00cd, t01=0x00d0}
0x140fe…14126               Head {h00=0x0024, h01=0x0050, text=» ABL BUFWAT WAIT FOR FREE BUFFER«, t00=0x00cd, t01=0x0100}
0x14126…14130               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0128}
0x14130…1413e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cd, t01=0x0132}
0x1413e…14148               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0140}
0x14148…14160               Head {h00=0x0014, h01=0x0050, text=»* BUFFER IS FREE«, t00=0x00cd, t01=0x014a}
0x14160…1416a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0162}
0x1416a…1417e               Head {h00=0x0010, h01=0x0050, text=»INT004 EQU *«, t00=0x00cd, t01=0x016c}
0x1417e…14194               Head {h00=0x0012, h01=0x0050, text=» LDK A1,INT.CP«, t00=0x00cd, t01=0x0180}
0x14194…141ce               Head {h00=0x0036, h01=0x0050, text=» SC A1,IDENT,A2 SET INTERRUPT CONF.TYPE IN BUFFER «, t00=0x00ce, t01=0x0008}
0x141ce…14206               Head {h00=0x0034, h01=0x0050, text=» LDK A1,INT.CL PACKET LENGTH OF INTERRUPT CONF. «, t00=0x00ce, t01=0x0042}
0x14206…14234               Head {h00=0x002a, h01=0x0050, text=» ST A1,HDLC,A2 STORE LENGTH IN BUFFER «, t00=0x00ce, t01=0x007a}
0x14234…14248               Head {h00=0x0010, h01=0x0050, text=» LDR A1,A13 «, t00=0x00ce, t01=0x00a8}
0x14248…14282               Head {h00=0x0036, h01=0x0050, text=» ADK A1,QUEOUT A1:=ADDRESS OF OUTPUT QUEUE ANCHOR «, t00=0x00ce, t01=0x00bc}
0x14282…14298               Head {h00=0x0012, h01=0x0050, text=» CF A14,QUEUEF«, t00=0x00ce, t01=0x00f6}
0x14298…142a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x010c}
0x142a2…142d0               Head {h00=0x002a, h01=0x0050, text=»* SET PROCESSING FLAG FOR OUTPUT QUEUE«, t00=0x00ce, t01=0x0116}
0x142d0…142da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0144}
0x142da…142f0               Head {h00=0x0012, h01=0x0050, text=» LDK A2,NPRFLG«, t00=0x00ce, t01=0x014e}
0x142f0…14302               Head {h00=0x000e, h01=0x0050, text=» C1R A2,A2«, t00=0x00ce, t01=0x0164}
0x14302…1432c               Head {h00=0x0026, h01=0x0050, text=» ANRS A2,A1 STORE PROCESSING FLAG «, t00=0x00ce, t01=0x0176}
0x1432c…14348               Head {h00=0x0018, h01=0x0050, text=»INT008   EQU      * «, t00=0x00cf, t01=0x0010}
0x14348…14360               Head {h00=0x0014, h01=0x0050, text=» ABL EXITDC EXIT«, t00=0x00cf, t01=0x002c}
0x14360…1436a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x0044}
0x1436a…1438c               Head {h00=0x001e, h01=0x0050, text=»* NO READ REQUEST PENDING «, t00=0x00cf, t01=0x004e}
0x1438c…143be               Head {h00=0x002e, h01=0x0050, text=»* SET INTERRUPT RECEIVED INDICATION IN DWT«, t00=0x00cf, t01=0x0070}
0x143be…143c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x00a2}
0x143c8…143dc               Head {h00=0x0010, h01=0x0050, text=»INT010 EQU *«, t00=0x00cf, t01=0x00ac}
0x143dc…143f0               Head {h00=0x0010, h01=0x0050, text=» ORRS A3,A7 «, t00=0x00cf, t01=0x00c0}
0x143f0…143fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x00d4}
0x143fa…14428               Head {h00=0x002a, h01=0x0050, text=»* REQUEUE BUFFER,BLOCK QUEUE AND EXIT «, t00=0x00cf, t01=0x00de}
0x14428…14432               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x010c}
0x14432…14446               Head {h00=0x0010, h01=0x0050, text=» ABL RHI150 «, t00=0x00cf, t01=0x0116}
0x14446…14454               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cf, t01=0x012a}
0x14454…1445e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x0138}
0x1445e…14468               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x0142}
0x14468…14490               Head {h00=0x0024, h01=0x0050, text=»* INTERRUPT CONFIRMATION PACKET «, t00=0x00cf, t01=0x014c}
0x14490…1449a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x0174}
0x1449a…144e8               Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x00cf, t01=0x017e}
0x144e8…144f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x003c}
0x144f2…1450e               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00d0, t01=0x0046}
0x1450e…14538               Head {h00=0x0026, h01=0x0050, text=»*  A5  = REQUEST PENDING INDICATOR«, t00=0x00d0, t01=0x0062}
0x14538…1456e               Head {h00=0x0032, h01=0x0050, text=»*                       <0: NO REQUEST PENDING«, t00=0x00d0, t01=0x008c}
0x1456e…145a6               Head {h00=0x0034, h01=0x0050, text=»*                       =0: READ REQUEST PENDING«, t00=0x00d0, t01=0x00c2}
0x145a6…145e0               Head {h00=0x0036, h01=0x0050, text=»*                       >0: OTHER REQUEST PENDING «, t00=0x00d0, t01=0x00fa}
0x145e0…1460c               Head {h00=0x0028, h01=0x0050, text=»*                 A6  = DWT ADDRESS «, t00=0x00d0, t01=0x0134}
0x1460c…1462c               Head {h00=0x001c, h01=0x0050, text=»*  A8  = BUFFER ADDRESS «, t00=0x00d0, t01=0x0160}
0x1462c…1464e               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x00d0, t01=0x0180}
0x1464e…14658               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0012}
0x14658…1466c               Head {h00=0x0010, h01=0x0050, text=»INTCON EQU *«, t00=0x00d1, t01=0x001c}
0x1466c…14676               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0030}
0x14676…1469c               Head {h00=0x0022, h01=0x0050, text=»* TEST IF ANY REQUEST PENDING «, t00=0x00d1, t01=0x003a}
0x1469c…146a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0060}
0x146a6…146c6               Head {h00=0x001c, h01=0x0050, text=»         LDR      A5,A5 «, t00=0x00d1, t01=0x006a}
0x146c6…146dc               Head {h00=0x0012, h01=0x0050, text=» RF(N) INC020 «, t00=0x00d1, t01=0x008a}
0x146dc…146e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x00a0}
0x146e6…14718               Head {h00=0x002e, h01=0x0050, text=»* TEST IF WRITE INTERRUPT REQUEST PENDING «, t00=0x00d1, t01=0x00aa}
0x14718…14722               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x00dc}
0x14722…14746               Head {h00=0x0020, h01=0x0050, text=»         SUK      A5,WRIINT «, t00=0x00d1, t01=0x00e6}
0x14746…1476e               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) INC020 NO; IGNORE PACKET«, t00=0x00d1, t01=0x010a}
0x1476e…14778               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0132}
0x14778…147b4               Head {h00=0x0038, h01=0x0050, text=»*        INTERRUPT REQUEST PENDING; COMPLETE REQUEST«, t00=0x00d1, t01=0x013c}
0x147b4…147dc               Head {h00=0x0024, h01=0x0050, text=»*        RELEASE BUFFER AND EXIT«, t00=0x00d1, t01=0x0178}
0x147dc…147e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x0010}
0x147e6…147fa               Head {h00=0x0010, h01=0x0050, text=» ABL RHI120 «, t00=0x00d2, t01=0x001a}
0x147fa…14804               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x002e}
0x14804…14826               Head {h00=0x001e, h01=0x0050, text=»* RELEASE BUFFER AND EXIT «, t00=0x00d2, t01=0x0038}
0x14826…14830               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x005a}
0x14830…14844               Head {h00=0x0010, h01=0x0050, text=»INC020 EQU *«, t00=0x00d2, t01=0x0064}
0x14844…14858               Head {h00=0x0010, h01=0x0050, text=» ABL RHI140 «, t00=0x00d2, t01=0x0078}
0x14858…14866               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d2, t01=0x008c}
0x14866…14870               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x009a}
0x14870…1487a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x00a4}
0x1487a…1489a               Head {h00=0x001c, h01=0x0050, text=»* COMPLETE USER REQUEST «, t00=0x00d2, t01=0x00ae}
0x1489a…148a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x00ce}
0x148a4…148f0               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00d2, t01=0x00d8}
0x148f0…148fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x0124}
0x148fa…14916               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00d2, t01=0x012e}
0x14916…14932               Head {h00=0x0018, h01=0x0050, text=»*  A3  = RETURN CODE«, t00=0x00d2, t01=0x014a}
0x14932…1494e               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT ADDRESS«, t00=0x00d2, t01=0x0166}
0x1494e…14970               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x00d2, t01=0x0182}
0x14970…1497a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0014}
0x1497a…14996               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00d3, t01=0x001e}
0x14996…149ae               Head {h00=0x0014, h01=0x0050, text=»*  CF A14,CMPREQ«, t00=0x00d3, t01=0x003a}
0x149ae…149b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0052}
0x149b8…149d4               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00d3, t01=0x005c}
0x149d4…149f8               Head {h00=0x0020, h01=0x0050, text=»*  NO REGISTERS ARE CHANGED «, t00=0x00d3, t01=0x0078}
0x149f8…14a02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x009c}
0x14a02…14a16               Head {h00=0x0010, h01=0x0050, text=»CMPREQ EQU *«, t00=0x00d3, t01=0x00a6}
0x14a16…14a2c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00d3, t01=0x00ba}
0x14a2c…14a4a               Head {h00=0x001a, h01=0x0050, text=» ST A1,CMPSAV SAVE A1 «, t00=0x00d3, t01=0x00d0}
0x14a4a…14a6a               Head {h00=0x001c, h01=0x0050, text=» ST A2,CMPSAV+2 SAVE A2 «, t00=0x00d3, t01=0x00ee}
0x14a6a…14a76               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d3, t01=0x010e}
0x14a76…14a8c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x00d3, t01=0x011a}
0x14a8c…14ab0               Head {h00=0x0020, h01=0x0050, text=» MS 2,CMPSAV SAVE A1 AND A2 «, t00=0x00d3, t01=0x0130}
0x14ab0…14abc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d3, t01=0x0154}
0x14abc…14ac6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0160}
0x14ac6…14ae8               Head {h00=0x001e, h01=0x0050, text=»* TEST IF REQUEST PENDING «, t00=0x00d3, t01=0x016a}
0x14ae8…14af2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x018c}
0x14af2…14b18               Head {h00=0x0022, h01=0x0050, text=»         LD       A1,DWTST,A6 «, t00=0x00d4, t01=0x0008}
0x14b18…14b46               Head {h00=0x002a, h01=0x0050, text=»         RF(N)    CMP020           NO!«, t00=0x00d4, t01=0x002e}
0x14b46…14b50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x005c}
0x14b50…14b5e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d4, t01=0x0066}
0x14b5e…14b68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0074}
0x14b68…14b92               Head {h00=0x0026, h01=0x0050, text=»* TEST IF REQUEST TIMER IS RUNNING«, t00=0x00d4, t01=0x007e}
0x14b92…14b9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x00a8}
0x14b9c…14bb4               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTRTP,A6«, t00=0x00d4, t01=0x00b2}
0x14bb4…14bda               Head {h00=0x0022, h01=0x0050, text=» RF(Z) CMP010 NO TIMER RUNNING«, t00=0x00d4, t01=0x00ca}
0x14bda…14be4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x00f0}
0x14be4…14c02               Head {h00=0x001a, h01=0x0050, text=»* CANCEL RUNNING TIMER«, t00=0x00d4, t01=0x00fa}
0x14c02…14c0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0118}
0x14c0c…14c22               Head {h00=0x0012, h01=0x0050, text=» CF A14,CANTIM«, t00=0x00d4, t01=0x0122}
0x14c22…14c56               Head {h00=0x0030, h01=0x0050, text=» CM DWTRTP,A6 CLEAR RUNNING TIMER INDICATION«, t00=0x00d4, t01=0x0138}
0x14c56…14c6a               Head {h00=0x0010, h01=0x0050, text=»CMP010 EQU *«, t00=0x00d4, t01=0x016c}
0x14c6a…14c74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0180}
0x14c74…14c9a               Head {h00=0x0022, h01=0x0050, text=»* PREPARE INTERFACE FOR TENDIO«, t00=0x00d4, t01=0x018a}
0x14c9a…14ca4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0020}
0x14ca4…14cc8               Head {h00=0x0020, h01=0x0050, text=» LDR A1,A3 A1:= RETURN CODE «, t00=0x00d5, t01=0x002a}
0x14cc8…14cda               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x00d5, t01=0x004e}
0x14cda…14d02               Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x00d5, t01=0x0060}
0x14d02…14d0e               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00d5, t01=0x0088}
0x14d0e…14d2a               Head {h00=0x0018, h01=0x0050, text=»CMP020   EQU      * «, t00=0x00d5, t01=0x0094}
0x14d2a…14d40               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00d5, t01=0x00b0}
0x14d40…14d60               Head {h00=0x001c, h01=0x0050, text=» LD A1,CMPSAV RELOAD A1 «, t00=0x00d5, t01=0x00c6}
0x14d60…14d82               Head {h00=0x001e, h01=0x0050, text=» LD A2,CMPSAV+2 RELOAD A2 «, t00=0x00d5, t01=0x00e6}
0x14d82…14d8e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d5, t01=0x0108}
0x14d8e…14da4               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x00d5, t01=0x0114}
0x14da4…14dca               Head {h00=0x0022, h01=0x0050, text=» ML 2,CMPSAV RELOAD A1 AND A2 «, t00=0x00d5, t01=0x012a}
0x14dca…14dd6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d5, t01=0x0150}
0x14dd6…14df8               Head {h00=0x001e, h01=0x0050, text=» RTN A14 RETURN TO CALLER «, t00=0x00d5, t01=0x015c}
0x14df8…14e02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x017e}
0x14e02…14e20               Head {h00=0x001a, h01=0x0050, text=»* SAVE AREA FOR A1,A2 «, t00=0x00d5, t01=0x0188}
0x14e20…14e2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0016}
0x14e2a…14e3e               Head {h00=0x0010, h01=0x0050, text=»CMPSAV EQU *«, t00=0x00d6, t01=0x0020}
0x14e3e…14e50               Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x00d6, t01=0x0034}
0x14e50…14e5e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d6, t01=0x0046}
0x14e5e…14e68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0054}
0x14e68…14e72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x005e}
0x14e72…14ea6               Head {h00=0x0030, h01=0x0050, text=»* COPY INFORMATION FROM SYSTEM TO USER AREA «, t00=0x00d6, t01=0x0068}
0x14ea6…14eb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x009c}
0x14eb0…14efc               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00d6, t01=0x00a6}
0x14efc…14f06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x00f2}
0x14f06…14f22               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00d6, t01=0x00fc}
0x14f22…14f48               Head {h00=0x0022, h01=0x0050, text=»*  A1  = SYSTEM BUFFER ADDRESS«, t00=0x00d6, t01=0x0118}
0x14f48…14f6a               Head {h00=0x001e, h01=0x0050, text=»*  A4  = LENGTH OF BUFFER «, t00=0x00d6, t01=0x013e}
0x14f6a…14f86               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT ADDRESS«, t00=0x00d6, t01=0x0160}
0x14f86…14fa8               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x00d6, t01=0x017c}
0x14fa8…14fb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x000e}
0x14fb2…14fce               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00d7, t01=0x0018}
0x14fce…14fe6               Head {h00=0x0014, h01=0x0050, text=»*  CF A14,COPTUB«, t00=0x00d7, t01=0x0034}
0x14fe6…14ff0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x004c}
0x14ff0…1500c               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00d7, t01=0x0056}
0x1500c…1501c               Head {h00=0x000c, h01=0x0050, text=»*  NONE «, t00=0x00d7, t01=0x0072}
0x1501c…15026               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x0082}
0x15026…1503a               Head {h00=0x0010, h01=0x0050, text=»COPTUB EQU *«, t00=0x00d7, t01=0x008c}
0x1503a…15056               Head {h00=0x0018, h01=0x0050, text=» STR A3,A14 SAVE A3 «, t00=0x00d7, t01=0x00a0}
0x15056…1507e               Head {h00=0x0024, h01=0x0050, text=» LD A3,DWTECB,A6 GET ECB ADDRESS«, t00=0x00d7, t01=0x00bc}
0x1507e…150ae               Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBBA,A3 GET USER BUFFER ADDRESS «, t00=0x00d7, t01=0x00e4}
0x150ae…150da               Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBEL,A3 SET EFFECTIVE LENGTH«, t00=0x00d7, t01=0x0114}
0x150da…150fa               Head {h00=0x001c, h01=0x0050, text=» LDR A3,A4 BUFFER LENGTH«, t00=0x00d7, t01=0x0140}
0x150fa…15124               Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTAB,A6 GET TTAB ADDRESS «, t00=0x00d7, t01=0x0160}
0x15124…15136               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x00d7, t01=0x018a}
0x15136…1516a               Head {h00=0x0030, h01=0x0050, text=» CF A15,MOVSU MOVE DATA FROM SYSTEM TO USER «, t00=0x00d8, t01=0x000c}
0x1516a…1517c               Head {h00=0x000e, h01=0x0050, text=» ENB  . =1«, t00=0x00d8, t01=0x0040}
0x1517c…1519c               Head {h00=0x001c, h01=0x0050, text=» LDR* A3,A14 RESTORE A3 «, t00=0x00d8, t01=0x0052}
0x1519c…151ac               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x00d8, t01=0x0072}
0x151ac…151b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0082}
0x151b6…151c4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d8, t01=0x008c}
0x151c4…151ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x009a}
0x151ce…151d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x00a4}
0x151d8…15206               Head {h00=0x002a, h01=0x0050, text=»* SAVE REGISTERS A1-A8 IN DC SAVE AREA«, t00=0x00d8, t01=0x00ae}
0x15206…15210               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x00dc}
0x15210…1525c               Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00d8, t01=0x00e6}
0x1525c…15266               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0132}
0x15266…15282               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00d8, t01=0x013c}
0x15282…1529a               Head {h00=0x0014, h01=0x0050, text=»*  CF A14,SAVE8 «, t00=0x00d8, t01=0x0158}
0x1529a…152a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0170}
0x152a4…152c0               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00d8, t01=0x017a}
0x152c0…152e4               Head {h00=0x0020, h01=0x0050, text=»*  NO REGISTERS ARE CHANGED «, t00=0x00d9, t01=0x0008}
0x152e4…152ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x002c}
0x152ee…15302               Head {h00=0x0010, h01=0x0050, text=»SAVE8 EQU * «, t00=0x00d9, t01=0x0036}
0x15302…15318               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00d9, t01=0x004a}
0x15318…1532c               Head {h00=0x0010, h01=0x0050, text=» ST A1,SAVE «, t00=0x00d9, t01=0x0060}
0x1532c…15342               Head {h00=0x0012, h01=0x0050, text=» ST A2,SAVE+2 «, t00=0x00d9, t01=0x0074}
0x15342…15358               Head {h00=0x0012, h01=0x0050, text=» ST A3,SAVE+4 «, t00=0x00d9, t01=0x008a}
0x15358…1536e               Head {h00=0x0012, h01=0x0050, text=» ST A4,SAVE+6 «, t00=0x00d9, t01=0x00a0}
0x1536e…15384               Head {h00=0x0012, h01=0x0050, text=» ST A5,SAVE+8 «, t00=0x00d9, t01=0x00b6}
0x15384…1539a               Head {h00=0x0012, h01=0x0050, text=» ST A6,SAVE+10«, t00=0x00d9, t01=0x00cc}
0x1539a…153b0               Head {h00=0x0012, h01=0x0050, text=» ST A7,SAVE+12«, t00=0x00d9, t01=0x00e2}
0x153b0…153c6               Head {h00=0x0012, h01=0x0050, text=» ST A8,SAVE+14«, t00=0x00d9, t01=0x00f8}
0x153c6…153d2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d9, t01=0x010e}
0x153d2…153e8               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x00d9, t01=0x011a}
0x153e8…153fa               Head {h00=0x000e, h01=0x0050, text=» MS 8,SAVE«, t00=0x00d9, t01=0x0130}
0x153fa…15406               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d9, t01=0x0142}
0x15406…15416               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x00d9, t01=0x014e}
0x15416…15424               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d9, t01=0x015e}
0x15424…1542e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x016c}
0x1542e…15438               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0176}
0x15438…1546a               Head {h00=0x002e, h01=0x0050, text=»* RELOAD REGISTERS A1-A8 FROM DC SAVE AREA«, t00=0x00d9, t01=0x0180}
0x1546a…15474               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x0022}
0x15474…154c0               Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x00da, t01=0x002c}
0x154c0…154ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x0078}
0x154ca…154e6               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00da, t01=0x0082}
0x154e6…154fe               Head {h00=0x0014, h01=0x0050, text=»*  CF A14,RELOA8«, t00=0x00da, t01=0x009e}
0x154fe…15508               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x00b6}
0x15508…15524               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00da, t01=0x00c0}
0x15524…1554c               Head {h00=0x0024, h01=0x0050, text=»*  REGISTERS A1-A8 ARE RELOADED «, t00=0x00da, t01=0x00dc}
0x1554c…15556               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x0104}
0x15556…1556a               Head {h00=0x0010, h01=0x0050, text=»RELOA8 EQU *«, t00=0x00da, t01=0x010e}
0x1556a…15580               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00da, t01=0x0122}
0x15580…15594               Head {h00=0x0010, h01=0x0050, text=» LD A1,SAVE «, t00=0x00da, t01=0x0138}
0x15594…155aa               Head {h00=0x0012, h01=0x0050, text=» LD A2,SAVE+2 «, t00=0x00da, t01=0x014c}
0x155aa…155c0               Head {h00=0x0012, h01=0x0050, text=» LD A3,SAVE+4 «, t00=0x00da, t01=0x0162}
0x155c0…155d6               Head {h00=0x0012, h01=0x0050, text=» LD A4,SAVE+6 «, t00=0x00da, t01=0x0178}
0x155d6…155ec               Head {h00=0x0012, h01=0x0050, text=» LD A5,SAVE+8 «, t00=0x00da, t01=0x018e}
0x155ec…15602               Head {h00=0x0012, h01=0x0050, text=» LD A6,SAVE+10«, t00=0x00db, t01=0x0014}
0x15602…15618               Head {h00=0x0012, h01=0x0050, text=» LD A7,SAVE+12«, t00=0x00db, t01=0x002a}
0x15618…1562e               Head {h00=0x0012, h01=0x0050, text=» LD A8,SAVE+14«, t00=0x00db, t01=0x0040}
0x1562e…1563a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00db, t01=0x0056}
0x1563a…15650               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x00db, t01=0x0062}
0x15650…15662               Head {h00=0x000e, h01=0x0050, text=» ML 8,SAVE«, t00=0x00db, t01=0x0078}
0x15662…1566e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00db, t01=0x008a}
0x1566e…15690               Head {h00=0x001e, h01=0x0050, text=» RTN A14 RETURN TO CALLER «, t00=0x00db, t01=0x0096}
0x15690…1569e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00db, t01=0x00b8}
0x1569e…156a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00db, t01=0x00c6}
0x156a8…156b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00db, t01=0x00d0}
0x156b2…156f2               Head {h00=0x003c, h01=0x0050, text=»* THIS MODULE SELECTS FROM THE DWT THE TRANSPORT HANDLER«, t00=0x00db, t01=0x00da}
0x156f2…1571e               Head {h00=0x0028, h01=0x0050, text=»* FUNCTION WHICH HAS TO BE EXECUTED.«, t00=0x00db, t01=0x011a}
0x1571e…15728               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00db, t01=0x0146}
0x15728…1575c               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x00db, t01=0x0150}
0x1575c…15766               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00db, t01=0x0184}
0x15766…15782               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00db, t01=0x018e}
0x15782…157be               Head {h00=0x0038, h01=0x0050, text=»*  A6  = DWT-ADDRESS (NOT FOR START & STOP REQUEST) «, t00=0x00dc, t01=0x001a}
0x157be…157e2               Head {h00=0x0020, h01=0x0050, text=»*  A12 = LINE BLOCK ADDRESS «, t00=0x00dc, t01=0x0056}
0x157e2…1580e               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x00dc, t01=0x007a}
0x1580e…15818               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x00a6}
0x15818…15834               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00dc, t01=0x00b0}
0x15834…15850               Head {h00=0x0018, h01=0x0050, text=»*  CF    A14,TRANSH «, t00=0x00dc, t01=0x00cc}
0x15850…1585a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x00e8}
0x1585a…15876               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00dc, t01=0x00f2}
0x15876…15892               Head {h00=0x0018, h01=0x0050, text=»*  A4  = RETURN CODE«, t00=0x00dc, t01=0x010e}
0x15892…158b2               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x00dc, t01=0x012a}
0x158b2…158dc               Head {h00=0x0026, h01=0x0050, text=»*  NO OTHER REGISTERS ARE CHANGED «, t00=0x00dc, t01=0x014a}
0x158dc…158e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x0174}
0x158e6…158fa               Head {h00=0x0010, h01=0x0050, text=»TRANSH EQU *«, t00=0x00dc, t01=0x017e}
0x158fa…15938 (221, 0, 400) Head {h00=0x003a, h01=0x0050, text=»         CF       A14,SAVE8             SAVE REGISTERS«, t00=0x00dd, t01=0x0004}
0x15938…15962               Head {h00=0x0026, h01=0x0050, text=» LC A1,DWTFNC,A6 GET FUNCTION CODE«, t00=0x00dd, t01=0x0042}
0x15962…15978               Head {h00=0x0012, h01=0x0050, text=» ANK A1,/FF . «, t00=0x00dd, t01=0x006c}
0x15978…159a4               Head {h00=0x0028, h01=0x0050, text=» LC A4,DWTLCN,A6 GET LC-ADM ADDRESS «, t00=0x00dd, t01=0x0082}
0x159a4…159ba               Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x00dd, t01=0x00ae}
0x159ba…159ce               Head {h00=0x0010, h01=0x0050, text=» SLL A4,1 . «, t00=0x00dd, t01=0x00c4}
0x159ce…159ea               Head {h00=0x0018, h01=0x0050, text=» AD A4,LC:TAB,A12 . «, t00=0x00dd, t01=0x00d8}
0x159ea…15a00               Head {h00=0x0012, h01=0x0050, text=» LDR* A13,A4 .«, t00=0x00dd, t01=0x00f4}
0x15a00…15a50               Head {h00=0x004c, h01=0x0050, text=»         ABI      TABTH,A1              BRANCH TO THE CONCERNING ROUTINE«, t00=0x00dd, t01=0x010a}
0x15a50…15a5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x015a}
0x15a5a…15a68               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00dd, t01=0x0164}
0x15a68…15a72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x0172}
0x15a72…15a90               Head {h00=0x001a, h01=0x0050, text=»* GENERAL RETURN PART «, t00=0x00dd, t01=0x017c}
0x15a90…15a9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x000a}
0x15a9a…15aae               Head {h00=0x0010, h01=0x0050, text=»READY EQU * «, t00=0x00de, t01=0x0014}
0x15aae…15aee               Head {h00=0x003c, h01=0x0050, text=»         ST       A4,SAVE+6             SAVE RETURN CODE«, t00=0x00de, t01=0x0028}
0x15aee…15b12               Head {h00=0x0020, h01=0x0050, text=»         CF       A14,RELOA8«, t00=0x00de, t01=0x0068}
0x15b12…15b3e               Head {h00=0x0028, h01=0x0050, text=» RTN A14 BACK TO THE REQUEST HANDLER«, t00=0x00de, t01=0x008c}
0x15b3e…15b48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x00b8}
0x15b48…15b7e               Head {h00=0x0032, h01=0x0050, text=»* BRANCH TABLE FOR TRANSPORT HANDLER FUNCTIONS«, t00=0x00de, t01=0x00c2}
0x15b7e…15b88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x00f8}
0x15b88…15b9c               Head {h00=0x0010, h01=0x0050, text=»TABTH EQU * «, t00=0x00de, t01=0x0102}
0x15b9c…15bbc               Head {h00=0x001c, h01=0x0050, text=» DATA START OPEN REQUEST«, t00=0x00de, t01=0x0116}
0x15bbc…15bde               Head {h00=0x001e, h01=0x0050, text=» DATA STPINT CLOSE REQUEST«, t00=0x00de, t01=0x0136}
0x15bde…15c08               Head {h00=0x0026, h01=0x0050, text=» DATA CALLR CONNECT ACTIVE REQUEST«, t00=0x00de, t01=0x0158}
0x15c08…15c1e               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00de, t01=0x0182}
0x15c1e…15c4a               Head {h00=0x0028, h01=0x0050, text=» DATA CALL30 CONNECT PASSIVE REQUEST«, t00=0x00df, t01=0x0008}
0x15c4a…15c70               Head {h00=0x0022, h01=0x0050, text=» DATA CLEAR DISCONNECT REQUEST«, t00=0x00df, t01=0x0034}
0x15c70…15c90               Head {h00=0x001c, h01=0x0050, text=» DATA CALLCR ACCEPT CALL«, t00=0x00df, t01=0x005a}
0x15c90…15c9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x007a}
0x15c9c…15cb2               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x00df, t01=0x0086}
0x15cb2…15cdc               Head {h00=0x0026, h01=0x0050, text=» DATA HLT CONNECT PASSIVE REQUEST «, t00=0x00df, t01=0x009c}
0x15cdc…15d02               Head {h00=0x0022, h01=0x0050, text=» DATA CLEAR DISCONNECT REQUEST«, t00=0x00df, t01=0x00c6}
0x15d02…15d20               Head {h00=0x001a, h01=0x0050, text=» DATA HLT ACCEPT CALL «, t00=0x00df, t01=0x00ec}
0x15d20…15d2c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x010a}
0x15d2c…15d50               Head {h00=0x0020, h01=0x0050, text=» DATA RRR ACCEPT DATA(READ) «, t00=0x00df, t01=0x0116}
0x15d50…15d76               Head {h00=0x0022, h01=0x0050, text=» DATA RNRR REFUSE DATA REQUEST«, t00=0x00df, t01=0x013a}
0x15d76…15d96               Head {h00=0x001c, h01=0x0050, text=» DATA DATA WRITE REQUEST«, t00=0x00df, t01=0x0160}
0x15d96…15dc0               Head {h00=0x0026, h01=0x0050, text=» DATA INTR WRITE INTERRUPT REQUEST«, t00=0x00df, t01=0x0180}
0x15dc0…15dca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x001a}
0x15dca…15dde               Head {h00=0x0010, h01=0x0050, text=»STPINT EQU *«, t00=0x00e0, t01=0x0024}
0x15dde…15df2               Head {h00=0x0010, h01=0x0050, text=» CF A14,STOP«, t00=0x00e0, t01=0x0038}
0x15df2…15e04               Head {h00=0x000e, h01=0x0050, text=» RB READY «, t00=0x00e0, t01=0x004c}
0x15e04…15e0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x005e}
0x15e0e…15e1c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e0, t01=0x0068}
0x15e1c…15e26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0076}
0x15e26…15e30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0080}
0x15e30…15e60               Head {h00=0x002c, h01=0x0050, text=»* PROCESSING OF THE OPEN SYSTEM REQUEST «, t00=0x00e0, t01=0x008a}
0x15e60…15e6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x00ba}
0x15e6a…15e9e               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x00e0, t01=0x00c4}
0x15e9e…15ea8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x00f8}
0x15ea8…15ec4               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00e0, t01=0x0102}
0x15ec4…15ee8               Head {h00=0x0020, h01=0x0050, text=»*  A12 = LINE BLOCK ADDRESS «, t00=0x00e0, t01=0x011e}
0x15ee8…15f14               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x00e0, t01=0x0142}
0x15f14…15f1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x016e}
0x15f1e…15f3a               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00e0, t01=0x0178}
0x15f3a…15f52 (225, 0, 400) Head {h00=0x0014, h01=0x0050, text=»*  ABL    START «, t00=0x00e1, t01=0x0004}
0x15f52…15f82               Head {h00=0x002c, h01=0x0050, text=»*  A RETURN IS MADE TO THE LABEL "READY"«, t00=0x00e1, t01=0x001c}
0x15f82…15f8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x004c}
0x15f8c…15fa8               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00e1, t01=0x0056}
0x15fa8…15fc4               Head {h00=0x0018, h01=0x0050, text=»*  A4  = RETURN CODE«, t00=0x00e1, t01=0x0072}
0x15fc4…15fce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x008e}
0x15fce…15fe2               Head {h00=0x0010, h01=0x0050, text=»START EQU * «, t00=0x00e1, t01=0x0098}
0x15fe2…1600c               Head {h00=0x0026, h01=0x0050, text=» LDK A4,HRDERR PRESET RETURN CODE «, t00=0x00e1, t01=0x00ac}
0x1600c…16036               Head {h00=0x0026, h01=0x0050, text=» LDK A1,CLOFLG CLOSE STILL BUSY ? «, t00=0x00e1, t01=0x00d6}
0x16036…16052               Head {h00=0x0018, h01=0x0050, text=» AN A1,CMNFLG,A12 . «, t00=0x00e1, t01=0x0100}
0x16052…1606c               Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) READY YES«, t00=0x00e1, t01=0x011c}
0x1606c…1607e               Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x00e1, t01=0x0136}
0x1607e…16088               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0148}
0x16088…160a8               Head {h00=0x001c, h01=0x0050, text=»* INITIATE LC-ADM TABLES«, t00=0x00e1, t01=0x0152}
0x160a8…160b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0172}
0x160b2…160e4               Head {h00=0x002e, h01=0x0050, text=» LC A4,NRLC,A12 GET # OF LOGICAL CHANNELS «, t00=0x00e1, t01=0x017c}
0x160e4…160fa               Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x00e2, t01=0x001e}
0x160fa…1610e               Head {h00=0x0010, h01=0x0050, text=» SUK A4,1 . «, t00=0x00e2, t01=0x0034}
0x1610e…16124               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x00e2, t01=0x0048}
0x16124…1614c               Head {h00=0x0024, h01=0x0050, text=» LC A7,NRPVC,A12 GET # OF PVC'S «, t00=0x00e2, t01=0x005e}
0x1614c…16162               Head {h00=0x0012, h01=0x0050, text=» ANK A7,/FF . «, t00=0x00e2, t01=0x0086}
0x16162…16176               Head {h00=0x0010, h01=0x0050, text=» SUK A7,1 . «, t00=0x00e2, t01=0x009c}
0x16176…16182               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e2, t01=0x00b0}
0x16182…1618c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00bc}
0x1618c…1619a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e2, t01=0x00c6}
0x1619a…161ae               Head {h00=0x0010, h01=0x0050, text=»STRT00 EQU *«, t00=0x00e2, t01=0x00d4}
0x161ae…161d8               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x00e2, t01=0x00e8}
0x161d8…16208               Head {h00=0x002c, h01=0x0050, text=» SC A4,LCNUM,A13 LOGICAL CHANNEL NUMBER «, t00=0x00e2, t01=0x0112}
0x16208…16238               Head {h00=0x002c, h01=0x0050, text=» ST A2,LCSTAT,A13 STATUS AND SUB-STATUS «, t00=0x00e2, t01=0x0142}
0x16238…16262               Head {h00=0x0026, h01=0x0050, text=» ST A2,FLAGS,A13 BOOLEAN VARIABLES«, t00=0x00e2, t01=0x0172}
0x16262…16282               Head {h00=0x001c, h01=0x0050, text=» SC A2,VCTYP,A13 VC-TYPE«, t00=0x00e3, t01=0x000c}
0x16282…162ae               Head {h00=0x0028, h01=0x0050, text=» SC A2,NRNUBF,A13 FREE INPUT BUFFERS«, t00=0x00e3, t01=0x002c}
0x162ae…162da               Head {h00=0x0028, h01=0x0050, text=» ST A2,LCDWT,A13 LC TO DWT RELATION «, t00=0x00e3, t01=0x0058}
0x162da…16302               Head {h00=0x0024, h01=0x0050, text=» ST A2,QUEINP,A13 RH-INPUT QUEUE«, t00=0x00e3, t01=0x0084}
0x16302…1632c               Head {h00=0x0026, h01=0x0050, text=» ST A2,QUEOUT,A13 TH-OUTPUT QUEUE «, t00=0x00e3, t01=0x00ac}
0x1632c…1635a               Head {h00=0x002a, h01=0x0050, text=» ST A2,TIMADR,A13 TIMER BLOCK ADDRESS «, t00=0x00e3, t01=0x00d6}
0x1635a…16386               Head {h00=0x0028, h01=0x0050, text=» ST A2,SYSBUF,A13 FREE SYSTEM BUFFER«, t00=0x00e3, t01=0x0104}
0x16386…1639c               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/1000«, t00=0x00e3, t01=0x0130}
0x1639c…163d0               Head {h00=0x0030, h01=0x0050, text=» ORR A1,A4 GENERAL FORMAT + LOG. CHANNEL NR.«, t00=0x00e3, t01=0x0146}
0x163d0…163f2               Head {h00=0x001e, h01=0x0050, text=» ST A1,SYSBUF+LCIDNT-1,A13«, t00=0x00e3, t01=0x017a}
0x163f2…16408               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00e4, t01=0x000c}
0x16408…1641e               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x00e4, t01=0x0022}
0x1641e…16440               Head {h00=0x001e, h01=0x0050, text=» CWR A7,A4 IS THIS A PVC ?«, t00=0x00e4, t01=0x0038}
0x16440…1645a               Head {h00=0x0016, h01=0x0050, text=» RF(NE) STRT02 NO «, t00=0x00e4, t01=0x005a}
0x1645a…16466               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e4, t01=0x0074}
0x16466…1647c               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x00e4, t01=0x0080}
0x1647c…1649e               Head {h00=0x001e, h01=0x0050, text=» LDKL A8,PVC SET PVC TYPE «, t00=0x00e4, t01=0x0096}
0x1649e…164b8               Head {h00=0x0016, h01=0x0050, text=» SC A8,VCTYP,A13 .«, t00=0x00e4, t01=0x00b8}
0x164b8…164e8               Head {h00=0x002c, h01=0x0050, text=» LDKL A8,DATA.ST SET DATA TRANSFER STATE«, t00=0x00e4, t01=0x00d2}
0x164e8…16504               Head {h00=0x0018, h01=0x0050, text=» SC A8,LCSTAT,A13 . «, t00=0x00e4, t01=0x0102}
0x16504…1652e               Head {h00=0x0026, h01=0x0050, text=» LD A1,WNDSIZ,A12 SET WINDOW SIZES«, t00=0x00e4, t01=0x011e}
0x1652e…1654a               Head {h00=0x0018, h01=0x0050, text=» SC A1,LCREWN,A13 . «, t00=0x00e4, t01=0x0148}
0x1654a…16566               Head {h00=0x0018, h01=0x0050, text=» SC A1,LCTRWN,A13 . «, t00=0x00e4, t01=0x0164}
0x16566…16592               Head {h00=0x0028, h01=0x0050, text=» LD A1,PACKLN,A12 SET PACKET LENGTH «, t00=0x00e4, t01=0x0180}
0x16592…165ae               Head {h00=0x0018, h01=0x0050, text=» ST A1,TRBFSZ,A13 . «, t00=0x00e5, t01=0x001c}
0x165ae…165ca               Head {h00=0x0018, h01=0x0050, text=» ST A1,REBFSZ,A13 . «, t00=0x00e5, t01=0x0038}
0x165ca…165fe               Head {h00=0x0030, h01=0x0050, text=» CF A14,TRTHR TRANSLATE THRESHOLD PERCENTAGE«, t00=0x00e5, t01=0x0054}
0x165fe…16628               Head {h00=0x0026, h01=0x0050, text=» CF A14,CLLCAD CLEAR LC-ADM FIELDS«, t00=0x00e5, t01=0x0088}
0x16628…1663c               Head {h00=0x0010, h01=0x0050, text=» SUK A7,1 . «, t00=0x00e5, t01=0x00b2}
0x1663c…16650               Head {h00=0x0010, h01=0x0050, text=»STRT02 EQU *«, t00=0x00e5, t01=0x00c6}
0x16650…1665c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e5, t01=0x00da}
0x1665c…1667c               Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 NEXT LC-ADM ? «, t00=0x00e5, t01=0x00e6}
0x1667c…16696               Head {h00=0x0016, h01=0x0050, text=» RB(NN) STRT00 YES«, t00=0x00e5, t01=0x0106}
0x16696…166a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0120}
0x166a0…166ae               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e5, t01=0x012a}
0x166ae…166b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0138}
0x166b8…166d6               Head {h00=0x001a, h01=0x0050, text=»* INITIATE LINE BLOCK «, t00=0x00e5, t01=0x0142}
0x166d6…166e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0160}
0x166e0…16704               Head {h00=0x0020, h01=0x0050, text=» LD A1,FILCOD,A12 FILE CODE «, t00=0x00e5, t01=0x016a}
0x16704…16728               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A12 LINE ECB-ADDRESS«, t00=0x00e5, t01=0x018e}
0x16728…16742               Head {h00=0x0016, h01=0x0050, text=» ADKL A8,LOCECB . «, t00=0x00e6, t01=0x0022}
0x16742…16764               Head {h00=0x001e, h01=0x0050, text=» STR A1,A8 SAVE FILE CODE «, t00=0x00e6, t01=0x003c}
0x16764…1679c               Head {h00=0x0034, h01=0x0050, text=» CM NRPNDT,A12 NUMBER OF PENDING OUTPUT REQUESTS«, t00=0x00e6, t01=0x005e}
0x1679c…167c2               Head {h00=0x0022, h01=0x0050, text=» CM HRDSTA,A12 HARDWARE STATUS«, t00=0x00e6, t01=0x0096}
0x167c2…167ee               Head {h00=0x0028, h01=0x0050, text=» CM RTMADR,A12 RESTART TIMER ADDRESS«, t00=0x00e6, t01=0x00bc}
0x167ee…16820               Head {h00=0x002e, h01=0x0050, text=» CM RSTQUE,A12 CLEAR RESTART QUEUE ANCHOR «, t00=0x00e6, t01=0x00e8}
0x16820…1682a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x011a}
0x1682a…1684a               Head {h00=0x001c, h01=0x0050, text=»* INITIATE OUTPUT ECB'S «, t00=0x00e6, t01=0x0124}
0x1684a…16854               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x0144}
0x16854…1687e               Head {h00=0x0026, h01=0x0050, text=» LDK A2,SYNRTR GET NUMBER OF ECB'S«, t00=0x00e6, t01=0x014e}
0x1687e…168a8               Head {h00=0x0026, h01=0x0050, text=» LDR A3,A12 GET FIRST ECB ADDRESS «, t00=0x00e6, t01=0x0178}
0x168a8…168c0               Head {h00=0x0014, h01=0x0050, text=» ADK A3,ECBOU1 .«, t00=0x00e7, t01=0x0012}
0x168c0…168d4               Head {h00=0x0010, h01=0x0050, text=»STRT05 EQU *«, t00=0x00e7, t01=0x002a}
0x168d4…168fa               Head {h00=0x0022, h01=0x0050, text=» ST A1,ECBFC,A3 SAVE FILE CODE«, t00=0x00e7, t01=0x003e}
0x168fa…16924               Head {h00=0x0026, h01=0x0050, text=» CM ECBBA,A3 CLEAR BUFFER ADDRESS «, t00=0x00e7, t01=0x0064}
0x16924…1694e               Head {h00=0x0026, h01=0x0050, text=»         ADK      A3,ECBINL+SYSBFL«, t00=0x00e7, t01=0x008e}
0x1694e…16960               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x00e7, t01=0x00b8}
0x16960…1697e               Head {h00=0x001a, h01=0x0050, text=» RB(P) STRT05 NEXT ECB«, t00=0x00e7, t01=0x00ca}
0x1697e…16988               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x00e8}
0x16988…169aa               Head {h00=0x001e, h01=0x0050, text=»* PREPARE OPEN REQUEST ECB«, t00=0x00e7, t01=0x00f2}
0x169aa…169b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x0114}
0x169b4…169d4               Head {h00=0x001c, h01=0x0050, text=» LDR A8,A12 ECB-ADDRESS «, t00=0x00e7, t01=0x011e}
0x169d4…169ee               Head {h00=0x0016, h01=0x0050, text=» ADKL A8,LOCECB . «, t00=0x00e7, t01=0x013e}
0x169ee…16a14               Head {h00=0x0022, h01=0x0050, text=» LDR A4,A12 ADDRESS USER BLOCK«, t00=0x00e7, t01=0x0158}
0x16a14…16a2c               Head {h00=0x0014, h01=0x0050, text=» ADK A4,UBNUM . «, t00=0x00e7, t01=0x017e}
0x16a2c…16a4a               Head {h00=0x001a, h01=0x0050, text=» ST A4,ECBBA,A8 TO ECB«, t00=0x00e8, t01=0x0008}
0x16a4a…16a78               Head {h00=0x002a, h01=0x0050, text=» LD A5,PACKLN,A12 RECEIVE BUFFER SIZE «, t00=0x00e8, t01=0x0026}
0x16a78…16a90               Head {h00=0x0014, h01=0x0050, text=» ADK A5,BEGDAT .«, t00=0x00e8, t01=0x0054}
0x16a90…16aaa               Head {h00=0x0016, h01=0x0050, text=» ST A5,ECBRL,A8 . «, t00=0x00e8, t01=0x006c}
0x16aaa…16ab4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x0086}
0x16ab4…16ac2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e8, t01=0x0090}
0x16ac2…16acc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x009e}
0x16acc…16aee               Head {h00=0x001e, h01=0x0050, text=»* SET OPEN BUSY INDICATION«, t00=0x00e8, t01=0x00a8}
0x16aee…16af8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x00ca}
0x16af8…16b0e               Head {h00=0x0012, h01=0x0050, text=» LDK A3,OPEFLG«, t00=0x00e8, t01=0x00d4}
0x16b0e…16b28               Head {h00=0x0016, h01=0x0050, text=» ORS A3,CMNFLG,A12«, t00=0x00e8, t01=0x00ea}
0x16b28…16b32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x0104}
0x16b32…16b62               Head {h00=0x002c, h01=0x0050, text=»* PREPARE USER BLOCK WITH INPUT BUFFERS «, t00=0x00e8, t01=0x010e}
0x16b62…16b6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x013e}
0x16b6c…16b9a               Head {h00=0x002a, h01=0x0050, text=» LDK A3,SYUBNR NUMBER OF USER BUFFERS «, t00=0x00e8, t01=0x0148}
0x16b9a…16bae               Head {h00=0x0010, h01=0x0050, text=» STR A3,A4 .«, t00=0x00e8, t01=0x0176}
0x16bae…16bc2               Head {h00=0x0010, h01=0x0050, text=»STRT10 EQU *«, t00=0x00e8, t01=0x018a}
0x16bc2…16be8               Head {h00=0x0022, h01=0x0050, text=» ADK A4,2 UPDATE STORE POINTER«, t00=0x00e9, t01=0x000e}
0x16be8…16c0a               Head {h00=0x001e, h01=0x0050, text=» CF A14,GTBUF GET A BUFFER«, t00=0x00e9, t01=0x0034}
0x16c0a…16c30               Head {h00=0x0022, h01=0x0050, text=» STR A2,A4 SAVE BUFFER ADDRESS«, t00=0x00e9, t01=0x0056}
0x16c30…16c58               Head {h00=0x0024, h01=0x0050, text=» SUK A3,1 MORE BUFFERS NEEDED ? «, t00=0x00e9, t01=0x007c}
0x16c58…16c72               Head {h00=0x0016, h01=0x0050, text=» RB(P) STRT10 YES «, t00=0x00e9, t01=0x00a4}
0x16c72…16c96               Head {h00=0x0020, h01=0x0050, text=» LDK A7,CONN+/80 ORDER CODE «, t00=0x00e9, t01=0x00be}
0x16c96…16cbe               Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTRTV,A6 GET TIMER VALUE«, t00=0x00e9, t01=0x00e2}
0x16cbe…16cd2               Head {h00=0x0010, h01=0x0050, text=»STRT20 EQU *«, t00=0x00e9, t01=0x010a}
0x16cd2…16cf8               Head {h00=0x0022, h01=0x0050, text=» LKM  ISSUE OPEN LINE REQUEST «, t00=0x00e9, t01=0x011e}
0x16cf8…16d08               Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x00e9, t01=0x0144}
0x16d08…16d12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x0154}
0x16d12…16d3e               Head {h00=0x0028, h01=0x0050, text=»* AFTER COMPLETION,CHECK RETURN CODE«, t00=0x00e9, t01=0x015e}
0x16d3e…16d48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x018a}
0x16d48…16d60 (234, 0, 400) Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBRC,A8 «, t00=0x00ea, t01=0x0004}
0x16d60…16d80               Head {h00=0x001c, h01=0x0050, text=» RF(Z) STRT40 NO ERRORS «, t00=0x00ea, t01=0x001c}
0x16d80…16daa               Head {h00=0x0026, h01=0x0050, text=» LDKL A3,HRDWER HARDWARE ERRORS ? «, t00=0x00ea, t01=0x003c}
0x16daa…16dbe               Head {h00=0x0010, h01=0x0050, text=» ANR A3,A1 .«, t00=0x00ea, t01=0x0066}
0x16dbe…16dd6               Head {h00=0x0014, h01=0x0050, text=» RF(Z) STRT30 NO«, t00=0x00ea, t01=0x007a}
0x16dd6…16dfc               Head {h00=0x0022, h01=0x0050, text=» ST A1,HRDSTA,A12 SAVE STATUS «, t00=0x00ea, t01=0x0092}
0x16dfc…16e1e               Head {h00=0x001e, h01=0x0050, text=» LDK A4,HRDERR RETURN CODE«, t00=0x00ea, t01=0x00b8}
0x16e1e…16e30               Head {h00=0x000e, h01=0x0050, text=» RF RETUR2«, t00=0x00ea, t01=0x00da}
0x16e30…16e3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00ec}
0x16e3a…16e48               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ea, t01=0x00f6}
0x16e48…16e52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x0104}
0x16e52…16e72               Head {h00=0x001c, h01=0x0050, text=»* TEST ON TYPE OF ERROR «, t00=0x00ea, t01=0x010e}
0x16e72…16e7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x012e}
0x16e7c…16e90               Head {h00=0x0010, h01=0x0050, text=»STRT30 EQU *«, t00=0x00ea, t01=0x0138}
0x16e90…16eb8               Head {h00=0x0024, h01=0x0050, text=» LDK A4,DISCRM PRESET REURN CODE«, t00=0x00ea, t01=0x014c}
0x16eb8…16ee4               Head {h00=0x0028, h01=0x0050, text=» CWK A1,REMDIS IS IT REMOTE DISC. ? «, t00=0x00ea, t01=0x0174}
0x16ee4…16efe               Head {h00=0x0016, h01=0x0050, text=» RF(E) RETUR2 YES «, t00=0x00eb, t01=0x0010}
0x16efe…16f20               Head {h00=0x001e, h01=0x0050, text=» CWK A1,DEFTIM TIME-OUT ? «, t00=0x00eb, t01=0x002a}
0x16f20…16f3a               Head {h00=0x0016, h01=0x0050, text=» ABL(NE) HLT ERROR«, t00=0x00eb, t01=0x004c}
0x16f3a…16f58               Head {h00=0x001a, h01=0x0050, text=» LDR A2,A2 TIME OUT ? «, t00=0x00eb, t01=0x0066}
0x16f58…16f70               Head {h00=0x0014, h01=0x0050, text=» RB(Z) STRT20 NO«, t00=0x00eb, t01=0x0084}
0x16f70…16f9a               Head {h00=0x0026, h01=0x0050, text=» LDK A4,TMEOUT PRESET RETURN CODE «, t00=0x00eb, t01=0x009c}
0x16f9a…16fba               Head {h00=0x001c, h01=0x0050, text=» SUKL A2,330 TIME OUT ? «, t00=0x00eb, t01=0x00c6}
0x16fba…16fe4               Head {h00=0x0026, h01=0x0050, text=» RF(N) RETUR2 YES,COMPLETE REQUEST«, t00=0x00eb, t01=0x00e6}
0x16fe4…17002               Head {h00=0x001a, h01=0x0050, text=» RB STRT20 NO,CONTINUE«, t00=0x00eb, t01=0x0110}
0x17002…1700c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x012e}
0x1700c…1701a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00eb, t01=0x0138}
0x1701a…17024               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x0146}
0x17024…1704e               Head {h00=0x0026, h01=0x0050, text=»* ISSUE A NUMBER OF INPUT REQUESTS«, t00=0x00eb, t01=0x0150}
0x1704e…17058               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x017a}
0x17058…1706c               Head {h00=0x0010, h01=0x0050, text=»STRT40 EQU *«, t00=0x00eb, t01=0x0184}
0x1706c…1709a               Head {h00=0x002a, h01=0x0050, text=» LDK A1,STRTFL SET SYSTEM STARTED FLAG«, t00=0x00ec, t01=0x0008}
0x1709a…170b6               Head {h00=0x0018, h01=0x0050, text=» ORS A1,CMNFLG,A12 .«, t00=0x00ec, t01=0x0036}
0x170b6…170e6               Head {h00=0x002c, h01=0x0050, text=» LDK A4,SYNRRC NUMBER OF INPUT REQUESTS «, t00=0x00ec, t01=0x0052}
0x170e6…17112               Head {h00=0x0028, h01=0x0050, text=» LDR A8,A12 ADDRESS FIRST INPUT ECB «, t00=0x00ec, t01=0x0082}
0x17112…1712c               Head {h00=0x0016, h01=0x0050, text=» ADKL A8,ECBIN1 . «, t00=0x00ec, t01=0x00ae}
0x1712c…17140               Head {h00=0x0010, h01=0x0050, text=»STRT50 EQU *«, t00=0x00ec, t01=0x00c8}
0x17140…1716a               Head {h00=0x0026, h01=0x0050, text=» LD A1,FILCOD,A12 FILE CODE TO ECB«, t00=0x00ec, t01=0x00dc}
0x1716a…17184               Head {h00=0x0016, h01=0x0050, text=» ST A1,ECBFC,A8 . «, t00=0x00ec, t01=0x0106}
0x17184…171ae               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTBUF GET AN INPUT BUFFER «, t00=0x00ec, t01=0x0120}
0x171ae…171c8               Head {h00=0x0016, h01=0x0050, text=» ST A2,ECBBA,A8 . «, t00=0x00ec, t01=0x014a}
0x171c8…171f6               Head {h00=0x002a, h01=0x0050, text=» LD A1,PACKLN,A12 RECEIVE BUFFER SIZE «, t00=0x00ec, t01=0x0164}
0x171f6…1720e (237, 0, 400) Head {h00=0x0014, h01=0x0050, text=» ADK A1,BEGDAT .«, t00=0x00ed, t01=0x0004}
0x1720e…17228               Head {h00=0x0016, h01=0x0050, text=» ST A1,ECBRL,A8 . «, t00=0x00ed, t01=0x001c}
0x17228…17256               Head {h00=0x002a, h01=0x0050, text=» LDR A1,A8 PARAMETER AFTER COMPLETION «, t00=0x00ed, t01=0x0036}
0x17256…17278               Head {h00=0x001e, h01=0x0050, text=» LDK A7,RECEIV ORDER CODE «, t00=0x00ed, t01=0x0064}
0x17278…1729a               Head {h00=0x001e, h01=0x0050, text=» LKM  ISSUE INPUT REQUEST «, t00=0x00ed, t01=0x0086}
0x1729a…172aa               Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x00ed, t01=0x00a8}
0x172aa…172d0               Head {h00=0x0022, h01=0x0050, text=» DATA ENDIN ACTIVATION ADDRESS«, t00=0x00ed, t01=0x00b8}
0x172d0…172fc               Head {h00=0x0028, h01=0x0050, text=» ADKL A8,ECBINL GET NEXT ECB-ADDRESS«, t00=0x00ed, t01=0x00de}
0x172fc…17318               Head {h00=0x0018, h01=0x0050, text=» SUK A4,1 NEXT ONE ?«, t00=0x00ed, t01=0x010a}
0x17318…17332               Head {h00=0x0016, h01=0x0050, text=» RB(P) STRT50 YES «, t00=0x00ed, t01=0x0126}
0x17332…1733c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0140}
0x1733c…1734a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ed, t01=0x014a}
0x1734a…17354               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0158}
0x17354…1738c               Head {h00=0x0034, h01=0x0050, text=»* PREPARE RESTART PACKET AND QUEUE IT FOR OUTPUT«, t00=0x00ed, t01=0x0162}
0x1738c…17396               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ee, t01=0x000a}
0x17396…173be               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x00ee, t01=0x0014}
0x173be…173d6               Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x00ee, t01=0x003c}
0x173d6…17400               Head {h00=0x0026, h01=0x0050, text=» LDK A1,RSTR.P RESTART PACKET TYPE«, t00=0x00ee, t01=0x0054}
0x17400…1741a               Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x00ee, t01=0x007e}
0x1741a…1742c               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x00ee, t01=0x0098}
0x1742c…17452               Head {h00=0x0022, h01=0x0050, text=» SC A1,CAUSE,A2 RESTART CAUSE «, t00=0x00ee, t01=0x00aa}
0x17452…1747a               Head {h00=0x0024, h01=0x0050, text=» SC A1,DGNCOD,A2 DIAGNOSTIC CODE«, t00=0x00ee, t01=0x00d0}
0x1747a…1749e               Head {h00=0x0020, h01=0x0050, text=» LDK A1,RSTR.L PACKET LENGTH«, t00=0x00ee, t01=0x00f8}
0x1749e…174b6               Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x00ee, t01=0x011c}
0x174b6…174e6               Head {h00=0x002c, h01=0x0050, text=» LDR A1,A12 OUTPUT QUEUE ANCHOR ADDRESS «, t00=0x00ee, t01=0x0134}
0x174e6…174fe               Head {h00=0x0014, h01=0x0050, text=» ADK A1,RSTQUE .«, t00=0x00ee, t01=0x0164}
0x174fe…17522               Head {h00=0x0020, h01=0x0050, text=» CF A14,QUEUE QUEUE ELEMENT «, t00=0x00ee, t01=0x017c}
0x17522…1754e               Head {h00=0x0028, h01=0x0050, text=» LDK A1,RSTFLG SET RESTART BUSY FLAG«, t00=0x00ef, t01=0x0010}
0x1754e…1756a               Head {h00=0x0018, h01=0x0050, text=» ORS A1,CMNFLG,A12 .«, t00=0x00ef, t01=0x003c}
0x1756a…17574               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x0058}
0x17574…1758a               Head {h00=0x0012, h01=0x0050, text=»* START TIMER «, t00=0x00ef, t01=0x0062}
0x1758a…17594               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x0078}
0x17594…175ba               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A13 SAVE REGISTER A13 «, t00=0x00ef, t01=0x0082}
0x175ba…175d8               Head {h00=0x001a, h01=0x0050, text=» SUR A13,A13 CLEAR IT «, t00=0x00ef, t01=0x00a8}
0x175d8…17602               Head {h00=0x0026, h01=0x0050, text=» LDKL A4,TIMOUT ACTIVATION ADDRESS«, t00=0x00ef, t01=0x00c6}
0x17602…17628               Head {h00=0x0022, h01=0x0050, text=» LDKL A8,SYRSTM TIME-OUT VALUE«, t00=0x00ef, t01=0x00f0}
0x17628…1764a               Head {h00=0x001e, h01=0x0050, text=» CF A14,STRTIM START TIMER«, t00=0x00ef, t01=0x0116}
0x1764a…17676               Head {h00=0x0028, h01=0x0050, text=» ST A4,RTMADR,A12 SAVE TIMER ADDRESS«, t00=0x00ef, t01=0x0138}
0x17676…1769c               Head {h00=0x0022, h01=0x0050, text=» LDR A13,A2 RESTORE REGISTERS «, t00=0x00ef, t01=0x0164}
0x1769c…176c4               Head {h00=0x0024, h01=0x0050, text=» LDK A4,RTNOK RETURN CODE := OK «, t00=0x00ef, t01=0x018a}
0x176c4…176ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0022}
0x176ce…176dc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f0, t01=0x002c}
0x176dc…176e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x003a}
0x176e6…176f6               Head {h00=0x000c, h01=0x0050, text=»* READY «, t00=0x00f0, t01=0x0044}
0x176f6…17700               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0054}
0x17700…17714               Head {h00=0x0010, h01=0x0050, text=»RETURN EQU *«, t00=0x00f0, t01=0x005e}
0x17714…1771e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0072}
0x1771e…1774a               Head {h00=0x0028, h01=0x0050, text=»* RESET OPEN SYSTEM BUSY INDICATION «, t00=0x00f0, t01=0x007c}
0x1774a…17754               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x00a8}
0x17754…1776a               Head {h00=0x0012, h01=0x0050, text=» LDK A1,OPEFLG«, t00=0x00f0, t01=0x00b2}
0x1776a…1778a               Head {h00=0x001c, h01=0x0050, text=»         C1R      A1,A1 «, t00=0x00f0, t01=0x00c8}
0x1778a…177b2               Head {h00=0x0024, h01=0x0050, text=»         ANS      A1,CMNFLG,A12 «, t00=0x00f0, t01=0x00e8}
0x177b2…177d4               Head {h00=0x001e, h01=0x0050, text=» ABL READY BACK TO CALLER «, t00=0x00f0, t01=0x0110}
0x177d4…177de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0132}
0x177de…1780a               Head {h00=0x0028, h01=0x0050, text=»* RELEASE BUFFERS, CONNECTION FAILED«, t00=0x00f0, t01=0x013c}
0x1780a…17814               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0168}
0x17814…17828               Head {h00=0x0010, h01=0x0050, text=»RETUR2 EQU *«, t00=0x00f0, t01=0x0172}
0x17828…1783e               Head {h00=0x0012, h01=0x0050, text=» LDK A3,SYUBNR«, t00=0x00f0, t01=0x0186}
0x1783e…1786e               Head {h00=0x002c, h01=0x0050, text=» LD A1,ECBBA,A8 PARAMETER BLOCK ADDRESS «, t00=0x00f1, t01=0x000c}
0x1786e…17882               Head {h00=0x0010, h01=0x0050, text=»RETUR4 EQU *«, t00=0x00f1, t01=0x003c}
0x17882…17894               Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x00f1, t01=0x0050}
0x17894…178c4               Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A1 A2 := BUFFER TO BE RELEASED «, t00=0x00f1, t01=0x0062}
0x178c4…178da               Head {h00=0x0012, h01=0x0050, text=» CF A14,RLBUF «, t00=0x00f1, t01=0x0092}
0x178da…178ec               Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x00f1, t01=0x00a8}
0x178ec…17916               Head {h00=0x0026, h01=0x0050, text=» RB(P) RETUR4 RELEASE NEXT BUFFER «, t00=0x00f1, t01=0x00ba}
0x17916…17928               Head {h00=0x000e, h01=0x0050, text=» RB RETURN«, t00=0x00f1, t01=0x00e4}
0x17928…17936               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f1, t01=0x00f6}
0x17936…17940               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0104}
0x17940…1794a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x010e}
0x1794a…1797a               Head {h00=0x002c, h01=0x0050, text=»* PROCESSING OF THE CLOSE SYSTEM REQUEST«, t00=0x00f1, t01=0x0118}
0x1797a…17984               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0148}
0x17984…179b8               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x00f1, t01=0x0152}
0x179b8…179c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0186}
0x179c2…179de               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00f1, t01=0x0190}
0x179de…17a12               Head {h00=0x0030, h01=0x0050, text=»*  A6  = DWT ADDRESS OR ZERO (INTERNAL CALL)«, t00=0x00f2, t01=0x001c}
0x17a12…17a36               Head {h00=0x0020, h01=0x0050, text=»*  A12 = LINE BLOCK ADDRESS «, t00=0x00f2, t01=0x0050}
0x17a36…17a5a               Head {h00=0x0020, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK«, t00=0x00f2, t01=0x0074}
0x17a5a…17a64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x0098}
0x17a64…17a80               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00f2, t01=0x00a2}
0x17a80…17a9a               Head {h00=0x0016, h01=0x0050, text=»*  CF    A14,STOP «, t00=0x00f2, t01=0x00be}
0x17a9a…17aa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x00d8}
0x17aa4…17ac0               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00f2, t01=0x00e2}
0x17ac0…17adc               Head {h00=0x0018, h01=0x0050, text=»*  A4  = RETURN CODE«, t00=0x00f2, t01=0x00fe}
0x17adc…17b16               Head {h00=0x0036, h01=0x0050, text=»*                 A1,A2,A3,A5,A6,A7,A8 ARE CHANGED«, t00=0x00f2, t01=0x011a}
0x17b16…17b20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x0154}
0x17b20…17b32               Head {h00=0x000e, h01=0x0050, text=»STOP EQU *«, t00=0x00f2, t01=0x015e}
0x17b32…17b3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x0170}
0x17b3c…17b5e               Head {h00=0x001e, h01=0x0050, text=»* GET LINE IDENTIFICATION «, t00=0x00f2, t01=0x017a}
0x17b5e…17b68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x000c}
0x17b68…17b8c               Head {h00=0x0020, h01=0x0050, text=»         LDK      A1,CLOFLG «, t00=0x00f3, t01=0x0016}
0x17b8c…17bc2               Head {h00=0x0032, h01=0x0050, text=»         AN       A1,CMNFLG,A12    CLOSE BUSY?«, t00=0x00f3, t01=0x003a}
0x17bc2…17bf0               Head {h00=0x002a, h01=0x0050, text=»         RF(NZ)   CLOS40           YES«, t00=0x00f3, t01=0x0070}
0x17bf0…17c14               Head {h00=0x0020, h01=0x0050, text=»         LDK      A1,CLOFLG «, t00=0x00f3, t01=0x009e}
0x17c14…17c4e               Head {h00=0x0036, h01=0x0050, text=»         ORS      A1,CMNFLG,A12    SET CLOSE BUSY «, t00=0x00f3, t01=0x00c2}
0x17c4e…17c58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x00fc}
0x17c58…17c66               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f3, t01=0x0106}
0x17c66…17c70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x0114}
0x17c70…17c94               Head {h00=0x0020, h01=0x0050, text=»* PREPARE CLOSE REQUEST ECB «, t00=0x00f3, t01=0x011e}
0x17c94…17c9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x0142}
0x17c9e…17cc2               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A12 LINE ECB-ADDRESS«, t00=0x00f3, t01=0x014c}
0x17cc2…17cdc               Head {h00=0x0016, h01=0x0050, text=» ADKL A8,LOCECB . «, t00=0x00f3, t01=0x0170}
0x17cdc…17d02               Head {h00=0x0022, h01=0x0050, text=» LDR A1,A12 ADDRESS USER BLOCK«, t00=0x00f3, t01=0x018a}
0x17d02…17d1a               Head {h00=0x0014, h01=0x0050, text=» ADK A1,UBNUM . «, t00=0x00f4, t01=0x0020}
0x17d1a…17d34               Head {h00=0x0016, h01=0x0050, text=» ST A1,ECBBA,A8 . «, t00=0x00f4, t01=0x0038}
0x17d34…17d5e               Head {h00=0x0026, h01=0x0050, text=» ST A6,ECBCW1,A8 SAVE DWT ADDRESS «, t00=0x00f4, t01=0x0052}
0x17d5e…17d8c               Head {h00=0x002a, h01=0x0050, text=» LDK A4,SYUBNR NUMBER OF USER BUFFERS «, t00=0x00f4, t01=0x007c}
0x17d8c…17da0               Head {h00=0x0010, h01=0x0050, text=» STR A4,A1 .«, t00=0x00f4, t01=0x00aa}
0x17da0…17daa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x00be}
0x17daa…17ddc               Head {h00=0x002e, h01=0x0050, text=»* TEST IF THERE IS ANY PENDING REQUESTS TO«, t00=0x00f4, t01=0x00c8}
0x17ddc…17e0a               Head {h00=0x002a, h01=0x0050, text=»* COMPLETE FOR THIS LINE(IF ALLOWED !)«, t00=0x00f4, t01=0x00fa}
0x17e0a…17e14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x0128}
0x17e14…17e26               Head {h00=0x000e, h01=0x0050, text=» LDR A5,A6«, t00=0x00f4, t01=0x0132}
0x17e26…17e3a               Head {h00=0x0010, h01=0x0050, text=»CLOS01 EQU *«, t00=0x00f4, t01=0x0144}
0x17e3a…17e68               Head {h00=0x002a, h01=0x0050, text=» LD A6,CHAIN,A12 GET DWT CHAIN ANCHOR «, t00=0x00f4, t01=0x0158}
0x17e68…17e92               Head {h00=0x0026, h01=0x0050, text=» RF(Z) CLOS30 NO CONNECTION ACTIVE«, t00=0x00f4, t01=0x0186}
0x17e92…17ea6               Head {h00=0x0010, h01=0x0050, text=»CLOS05 EQU *«, t00=0x00f5, t01=0x0020}
0x17ea6…17eb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f5, t01=0x0034}
0x17eb0…17ed8               Head {h00=0x0024, h01=0x0050, text=»* TEST IF DISCONNECTION ALLOWED «, t00=0x00f5, t01=0x003e}
0x17ed8…17ee2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f5, t01=0x0066}
0x17ee2…17f04               Head {h00=0x001e, h01=0x0050, text=» ADK A5,0 INTERNAL CALL ? «, t00=0x00f5, t01=0x0070}
0x17f04…17f1e               Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLOS15 YES «, t00=0x00f5, t01=0x0092}
0x17f1e…17f44               Head {h00=0x0022, h01=0x0050, text=» LDK A3,SEQE.RC SEQUENCE ERROR«, t00=0x00f5, t01=0x00ac}
0x17f44…17f5c               Head {h00=0x0014, h01=0x0050, text=» LC A1,DWTOPT,A5«, t00=0x00f5, t01=0x00d2}
0x17f5c…17f82               Head {h00=0x0022, h01=0x0050, text=» ANK A1,CLOOPT CLOSE ALLOWED ?«, t00=0x00f5, t01=0x00ea}
0x17f82…17f9c               Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLOS15 YES «, t00=0x00f5, t01=0x0110}
0x17f9c…17fb8               Head {h00=0x0018, h01=0x0050, text=» LDR A6,A5 RELOAD A6«, t00=0x00f5, t01=0x012a}
0x17fb8…17fce               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CLOFLG«, t00=0x00f5, t01=0x0146}
0x17fce…17ffe               Head {h00=0x002c, h01=0x0050, text=» XRS A1,CMNFLG,A12 RESET CLOSE BUSY IND.«, t00=0x00f5, t01=0x015c}
0x17ffe…18022               Head {h00=0x0020, h01=0x0050, text=» RF CLOS55 COMPLETE REQUEST «, t00=0x00f5, t01=0x018c}
0x18022…1802c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f6, t01=0x0020}
0x1802c…1803a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f6, t01=0x002a}
0x1803a…18044               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f6, t01=0x0038}
0x18044…18058               Head {h00=0x0010, h01=0x0050, text=»CLOS15 EQU *«, t00=0x00f6, t01=0x0042}
0x18058…1807e               Head {h00=0x0022, h01=0x0050, text=» LDK A3,LOGE.RC LOGICAL ERROR «, t00=0x00f6, t01=0x0056}
0x1807e…18094               Head {h00=0x0012, h01=0x0050, text=» LDK A2,DISCON«, t00=0x00f6, t01=0x007c}
0x18094…180a6               Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x00f6, t01=0x0092}
0x180a6…180d0               Head {h00=0x0026, h01=0x0050, text=» LC A7,DWTFNC,A6 GET FUNCTION CODE«, t00=0x00f6, t01=0x00a4}
0x180d0…180e2               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x00f6, t01=0x00ce}
0x180e2…180f6               Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x00f6, t01=0x00e0}
0x180f6…18120               Head {h00=0x0026, h01=0x0050, text=» SUK A7,STATIS STATISTIC REQUEST ?«, t00=0x00f6, t01=0x00f4}
0x18120…1813a               Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLOS16 YES «, t00=0x00f6, t01=0x011e}
0x1813a…18150               Head {h00=0x0012, h01=0x0050, text=» ADK A7,STATIS«, t00=0x00f6, t01=0x0138}
0x18150…1815c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00f6, t01=0x014e}
0x1815c…18182               Head {h00=0x0022, h01=0x0050, text=» SUK A1,CLOSYS CLOSE SYSTEM ? «, t00=0x00f6, t01=0x015a}
0x18182…1819c               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CLOS18 NO «, t00=0x00f6, t01=0x0180}
0x1819c…181b0               Head {h00=0x0010, h01=0x0050, text=»CLOS16 EQU *«, t00=0x00f7, t01=0x000a}
0x181b0…181dc               Head {h00=0x0028, h01=0x0050, text=» CW A2,DWTSTE,A6 DWT DISCONNECTED ? «, t00=0x00f7, t01=0x001e}
0x181dc…181f6               Head {h00=0x0016, h01=0x0050, text=» RF(E) CLOS25 YES «, t00=0x00f7, t01=0x004a}
0x181f6…1820a               Head {h00=0x0010, h01=0x0050, text=»CLOS18 EQU *«, t00=0x00f7, t01=0x0064}
0x1820a…18222               Head {h00=0x0014, h01=0x0050, text=» SC A2,DWTSTE,A6«, t00=0x00f7, t01=0x0078}
0x18222…1824c               Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTST,A6 REQUEST PENDING ? «, t00=0x00f7, t01=0x0090}
0x1824c…18264               Head {h00=0x0014, h01=0x0050, text=» RF(N) CLOS19 NO«, t00=0x00f7, t01=0x00ba}
0x18264…1828c               Head {h00=0x0024, h01=0x0050, text=» SUK A7,CONPAS CONNECT PASSIVE ?«, t00=0x00f7, t01=0x00d2}
0x1828c…182a6               Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLOS20 YES «, t00=0x00f7, t01=0x00fa}
0x182a6…182ba               Head {h00=0x0010, h01=0x0050, text=»CLOS19 EQU *«, t00=0x00f7, t01=0x0114}
0x182ba…182d2               Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTLCN,A6«, t00=0x00f7, t01=0x0128}
0x182d2…182fc               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x00f7, t01=0x0140}
0x182fc…18328               Head {h00=0x0028, h01=0x0050, text=» CM LCDWT,A13 CLEAR RELATION LC-DWT «, t00=0x00f7, t01=0x016a}
0x18328…1833c               Head {h00=0x0010, h01=0x0050, text=»CLOS20 EQU *«, t00=0x00f8, t01=0x0008}
0x1833c…1836a               Head {h00=0x002a, h01=0x0050, text=» CF A14,RELDWT RELEASE DWT FROM CHAIN «, t00=0x00f8, t01=0x001c}
0x1836a…1838a               Head {h00=0x001c, h01=0x0050, text=» ADK A1,0 CLOSE SYSTEM ?«, t00=0x00f8, t01=0x004a}
0x1838a…183a4               Head {h00=0x0016, h01=0x0050, text=» RB(Z) CLOS01 YES «, t00=0x00f8, t01=0x006a}
0x183a4…183cc               Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x00f8, t01=0x0084}
0x183cc…183e8               Head {h00=0x0018, h01=0x0050, text=» RB CLOS01 TAKE NEXT«, t00=0x00f8, t01=0x00ac}
0x183e8…183f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x00c8}
0x183f2…18400               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f8, t01=0x00d2}
0x18400…1840a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x00e0}
0x1840a…18430               Head {h00=0x0022, h01=0x0050, text=»* TEST IF MORE DWT'S IN CHAIN «, t00=0x00f8, t01=0x00ea}
0x18430…1843a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x0110}
0x1843a…1844e               Head {h00=0x0010, h01=0x0050, text=»CLOS25 EQU *«, t00=0x00f8, t01=0x011a}
0x1844e…18466               Head {h00=0x0014, h01=0x0050, text=» LD A6,DWTCHN,A6«, t00=0x00f8, t01=0x012e}
0x18466…18480               Head {h00=0x0016, h01=0x0050, text=» RB(NZ) CLOS05 YES«, t00=0x00f8, t01=0x0146}
0x18480…18494               Head {h00=0x0010, h01=0x0050, text=»CLOS30 EQU *«, t00=0x00f8, t01=0x0160}
0x18494…1849e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x0174}
0x1849e…184ba               Head {h00=0x0018, h01=0x0050, text=»* ISSUE STOP REQUEST«, t00=0x00f8, t01=0x017e}
0x184ba…184c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x000a}
0x184c4…184f0               Head {h00=0x0028, h01=0x0050, text=» LDK A7,DISCN ORDER CODE,CLOSE LINE «, t00=0x00f9, t01=0x0014}
0x184f0…18520               Head {h00=0x002c, h01=0x0050, text=» LDR A1,A8 PARAMETER FOR ACTIVATION PART«, t00=0x00f9, t01=0x0040}
0x18520…1852c               Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x00f9, t01=0x0070}
0x1852c…1853c               Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x00f9, t01=0x007c}
0x1853c…18562               Head {h00=0x0022, h01=0x0050, text=» DATA CLOEND ACTIVATION LABEL «, t00=0x00f9, t01=0x008c}
0x18562…18576               Head {h00=0x0010, h01=0x0050, text=»CLOS40 EQU *«, t00=0x00f9, t01=0x00b2}
0x18576…1859c               Head {h00=0x0022, h01=0x0050, text=» LDK A4,RTNOK SET RETURN CODE «, t00=0x00f9, t01=0x00c6}
0x1859c…185bc               Head {h00=0x001c, h01=0x0050, text=» RTN A14 BACK TO CALLER «, t00=0x00f9, t01=0x00ec}
0x185bc…185ca               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f9, t01=0x010c}
0x185ca…185d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x011a}
0x185d4…1860c               Head {h00=0x0034, h01=0x0050, text=»* ACTIVATION PART AFTER COMPLETED CLOSE REQUEST «, t00=0x00f9, t01=0x0124}
0x1860c…18616               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x015c}
0x18616…1862a               Head {h00=0x0010, h01=0x0050, text=»CLOEND EQU *«, t00=0x00f9, t01=0x0166}
0x1862a…18662               Head {h00=0x0034, h01=0x0050, text=» LDKL A14,DCSTAK SET CALL FUNCTION STACK POINTER«, t00=0x00f9, t01=0x017a}
0x18662…18686               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A1 SAVE ECB-ADDRESS «, t00=0x00fa, t01=0x0022}
0x18686…186b2               Head {h00=0x0028, h01=0x0050, text=» CF A14,GTLBA GET LINE BLOCK ADDRESS«, t00=0x00fa, t01=0x0046}
0x186b2…186dc               Head {h00=0x0026, h01=0x0050, text=» LDK A1,STRTFL+CLOFLG RESET FLAGS «, t00=0x00fa, t01=0x0072}
0x186dc…18700               Head {h00=0x0020, h01=0x0050, text=»         ORK      A1,RSTFLG «, t00=0x00fa, t01=0x009c}
0x18700…18714               Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x00fa, t01=0x00c0}
0x18714…18730               Head {h00=0x0018, h01=0x0050, text=» ANS A1,CMNFLG,A12 .«, t00=0x00fa, t01=0x00d4}
0x18730…1875a               Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 ADDRESS USER BLOCK«, t00=0x00fa, t01=0x00f0}
0x1875a…18784               Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A4 NUMBER OF USER BUFFERS«, t00=0x00fa, t01=0x011a}
0x18784…18798               Head {h00=0x0010, h01=0x0050, text=»CLOS50 EQU *«, t00=0x00fa, t01=0x0144}
0x18798…187aa               Head {h00=0x000e, h01=0x0050, text=» ADK A4,2 «, t00=0x00fa, t01=0x0158}
0x187aa…187cc               Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A4 BUFFER ADDRESS«, t00=0x00fa, t01=0x016a}
0x187cc…187f6               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF RELEASE INPUT BUFFER«, t00=0x00fa, t01=0x018c}
0x187f6…18812               Head {h00=0x0018, h01=0x0050, text=» SUK A3,1 NEXT ONE ?«, t00=0x00fb, t01=0x0026}
0x18812…1882c               Head {h00=0x0016, h01=0x0050, text=» RB(P) CLOS50 YES «, t00=0x00fb, t01=0x0042}
0x1882c…18854               Head {h00=0x0024, h01=0x0050, text=» LD A6,ECBCW1,A8 GET DWT ADDRESS«, t00=0x00fb, t01=0x005c}
0x18854…1885e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0084}
0x1885e…18884               Head {h00=0x0022, h01=0x0050, text=»* TEST IF DWT ADDRESS IS VALID«, t00=0x00fb, t01=0x008e}
0x18884…1888e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x00b4}
0x1888e…188ae               Head {h00=0x001c, h01=0x0050, text=»         RF(Z)    CLOS60«, t00=0x00fb, t01=0x00be}
0x188ae…188c0               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x00fb, t01=0x00de}
0x188c0…188d4               Head {h00=0x0010, h01=0x0050, text=»CLOS55 EQU *«, t00=0x00fb, t01=0x00f0}
0x188d4…188fc               Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x00fb, t01=0x0104}
0x188fc…18910               Head {h00=0x0010, h01=0x0050, text=»CLOS60 EQU *«, t00=0x00fb, t01=0x012c}
0x18910…18938               Head {h00=0x0024, h01=0x0050, text=» ABL EXITDC CONTROL TO SCHEDULER«, t00=0x00fb, t01=0x0140}
0x18938…18946               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00fb, t01=0x0168}
0x18946…18950               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0176}
0x18950…18980               Head {h00=0x002c, h01=0x0050, text=»* PROCESSING OF A CONNECT ACTIVE REQUEST«, t00=0x00fb, t01=0x0180}
0x18980…1898a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x0020}
0x1898a…189be               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x00fc, t01=0x002a}
0x189be…189c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x005e}
0x189c8…189e4               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00fc, t01=0x0068}
0x189e4…18a00               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT-ADDRESS«, t00=0x00fc, t01=0x0084}
0x18a00…18a2c               Head {h00=0x0028, h01=0x0050, text=»*  A12 = LINE CONTROL BLOCK ADDRESS «, t00=0x00fc, t01=0x00a0}
0x18a2c…18a58               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x00fc, t01=0x00cc}
0x18a58…18a62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x00f8}
0x18a62…18a7e               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00fc, t01=0x0102}
0x18a7e…18a96               Head {h00=0x0014, h01=0x0050, text=»*  ABL    CALLR «, t00=0x00fc, t01=0x011e}
0x18a96…18ac4               Head {h00=0x002a, h01=0x0050, text=»*  A RETURN IS MADE TO THE LABEL READY«, t00=0x00fc, t01=0x0136}
0x18ac4…18ace               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x0164}
0x18ace…18aea               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00fc, t01=0x016e}
0x18aea…18b06               Head {h00=0x0018, h01=0x0050, text=»*  A4 = RETURN CODE «, t00=0x00fc, t01=0x018a}
0x18b06…18b26               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x00fd, t01=0x0016}
0x18b26…18b30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x0036}
0x18b30…18b44               Head {h00=0x0010, h01=0x0050, text=»CALLR EQU * «, t00=0x00fd, t01=0x0040}
0x18b44…18b5a               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00fd, t01=0x0054}
0x18b5a…18b94               Head {h00=0x0036, h01=0x0050, text=»         LC       A1,DWTOPT,A6     PVC REQUESTED ?«, t00=0x00fd, t01=0x006a}
0x18b94…18bb4               Head {h00=0x001c, h01=0x0050, text=»         ANK      A1,PVC«, t00=0x00fd, t01=0x00a4}
0x18bb4…18be2               Head {h00=0x002a, h01=0x0050, text=»         RF(NZ)   CALLPV           YES«, t00=0x00fd, t01=0x00c4}
0x18be2…18bec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x00f2}
0x18bec…18c16               Head {h00=0x0026, h01=0x0050, text=»* TEST IF REMOTE DTE IS SUPPORTED «, t00=0x00fd, t01=0x00fc}
0x18c16…18c20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x0126}
0x18c20…18c38               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTRAD,A6«, t00=0x00fd, t01=0x0130}
0x18c38…18c58               Head {h00=0x001c, h01=0x0050, text=» LDKL A3,SVCTYP SET TYPE«, t00=0x00fd, t01=0x0148}
0x18c58…18c6e               Head {h00=0x0012, h01=0x0050, text=» LDK A4,NOLCAV«, t00=0x00fd, t01=0x0168}
0x18c6e…18c80               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x00fd, t01=0x017e}
0x18c80…18ca0               Head {h00=0x001c, h01=0x0050, text=» CF A15,FNDDNT FIND DTE «, t00=0x00fd, t01=0x0190}
0x18ca0…18cb2               Head {h00=0x000e, h01=0x0050, text=» ENB  . =1«, t00=0x00fe, t01=0x0020}
0x18cb2…18ccc               Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 FOUND ?«, t00=0x00fe, t01=0x0032}
0x18ccc…18ce4               Head {h00=0x0014, h01=0x0050, text=» RF(N) CALL40 NO«, t00=0x00fe, t01=0x004c}
0x18ce4…18cee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x0064}
0x18cee…18cfc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00fe, t01=0x006e}
0x18cfc…18d06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x007c}
0x18d06…18d32               Head {h00=0x0028, h01=0x0050, text=»* SEARCH FOR A READY LOGICAL CHANNEL«, t00=0x00fe, t01=0x0086}
0x18d32…18d3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x00b2}
0x18d3c…18d6e               Head {h00=0x002e, h01=0x0050, text=» LC A4,NRLC,A12 GET # OF LOGICAL CHANNELS «, t00=0x00fe, t01=0x00bc}
0x18d6e…18d84               Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x00fe, t01=0x00ee}
0x18d84…18d98               Head {h00=0x0010, h01=0x0050, text=» SUK A4,1 . «, t00=0x00fe, t01=0x0104}
0x18d98…18dac               Head {h00=0x0010, h01=0x0050, text=»CALL00 EQU *«, t00=0x00fe, t01=0x0118}
0x18dac…18dd6               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x00fe, t01=0x012c}
0x18dd6…18dfa               Head {h00=0x0020, h01=0x0050, text=» LC A1,LCSTAT,A13 LC-STATUS «, t00=0x00fe, t01=0x0156}
0x18dfa…18e0e               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x00fe, t01=0x017a}
0x18e0e…18e2a               Head {h00=0x0018, h01=0x0050, text=» RF(Z) CALL10 READY «, t00=0x00fe, t01=0x018e}
0x18e2a…18e4a               Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 TRY NEXT ENTRY«, t00=0x00ff, t01=0x001a}
0x18e4a…18e64               Head {h00=0x0016, h01=0x0050, text=» RB(NN) CALL00 YES«, t00=0x00ff, t01=0x003a}
0x18e64…18e72               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ff, t01=0x0054}
0x18e72…18e94               Head {h00=0x001e, h01=0x0050, text=»         IFT      PERMVC=0«, t00=0x00ff, t01=0x0062}
0x18e94…18eb0               Head {h00=0x0018, h01=0x0050, text=»CALLPV   EQU      * «, t00=0x00ff, t01=0x0084}
0x18eb0…18ec4               Head {h00=0x0010, h01=0x0050, text=»         XIF«, t00=0x00ff, t01=0x00a0}
0x18ec4…18eda               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00ff, t01=0x00b4}
0x18eda…18f18               Head {h00=0x003a, h01=0x0050, text=» LDK A4,NOLCAV RETURN CODE := NO LOG. CHAN. AVAILABLE «, t00=0x00ff, t01=0x00ca}
0x18f18…18f3a               Head {h00=0x001e, h01=0x0050, text=» RF CALL40 BACK TO CALLER «, t00=0x00ff, t01=0x0108}
0x18f3a…18f4e               Head {h00=0x0010, h01=0x0050, text=»CALL10 EQU *«, t00=0x00ff, t01=0x012a}
0x18f4e…18f7a               Head {h00=0x0028, h01=0x0050, text=» SC A4,DWTLCN,A6 SAVE LC-NUM IN DWT «, t00=0x00ff, t01=0x013e}
0x18f7a…18f84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ff, t01=0x016a}
0x18f84…18f9e               Head {h00=0x0016, h01=0x0050, text=»* COMPLETE LC-ADM «, t00=0x00ff, t01=0x0174}
0x18f9e…18fa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ff, t01=0x018e}
0x18fa8…18fd6               Head {h00=0x002a, h01=0x0050, text=» LDK A1,LCAL.ST LC-STAT := LOCAL-CALL «, t00=0x0100, t01=0x0008}
0x18fd6…18ff2               Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSTAT,A13 . «, t00=0x0100, t01=0x0036}
0x18ff2…1901e               Head {h00=0x0028, h01=0x0050, text=» LDK A1,0 ALL INPUT BUFFERS ARE USED«, t00=0x0100, t01=0x0052}
0x1901e…1903a               Head {h00=0x0018, h01=0x0050, text=» SC A1,NRNUBF,A13 . «, t00=0x0100, t01=0x007e}
0x1903a…19064               Head {h00=0x0026, h01=0x0050, text=» ST A6,LCDWT,A13 SAVE DWT-ADDRESS «, t00=0x0100, t01=0x009a}
0x19064…19070               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0100, t01=0x00c4}
0x19070…19086               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0100, t01=0x00d0}
0x19086…19098               Head {h00=0x000e, h01=0x0050, text=» RF CALLPV«, t00=0x0100, t01=0x00e6}
0x19098…190a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x00f8}
0x190a2…190b0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0100, t01=0x0102}
0x190b0…190bc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0100, t01=0x0110}
0x190bc…190c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x011c}
0x190c6…190f0               Head {h00=0x0026, h01=0x0050, text=»* QUEUE CONNECT REQUEST FOR OUTPUT«, t00=0x0100, t01=0x0126}
0x190f0…190fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x0150}
0x190fa…1910e               Head {h00=0x0010, h01=0x0050, text=»CALL20 EQU *«, t00=0x0100, t01=0x015a}
0x1910e…19130               Head {h00=0x001e, h01=0x0050, text=» LDR A2,A6 ELEMENT ADDRESS«, t00=0x0100, t01=0x016e}
0x19130…19152               Head {h00=0x001e, h01=0x0050, text=» CF A14,QUEO QUEUE ELEMENT«, t00=0x0100, t01=0x0190}
0x19152…1915c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x0022}
0x1915c…1916c               Head {h00=0x000c, h01=0x0050, text=»* READY «, t00=0x0101, t01=0x002c}
0x1916c…19176               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x003c}
0x19176…1918a               Head {h00=0x0010, h01=0x0050, text=»CALL30 EQU *«, t00=0x0101, t01=0x0046}
0x1918a…191b2               Head {h00=0x0024, h01=0x0050, text=» LDK A4,RTNOK RETURN CODE := OK «, t00=0x0101, t01=0x005a}
0x191b2…191c6               Head {h00=0x0010, h01=0x0050, text=»CALL40 EQU *«, t00=0x0101, t01=0x0082}
0x191c6…191d8               Head {h00=0x000e, h01=0x0050, text=» ABL READY«, t00=0x0101, t01=0x0096}
0x191d8…191ee               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0101, t01=0x00a8}
0x191ee…191fc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0101, t01=0x00be}
0x191fc…19206               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x00cc}
0x19206…19242               Head {h00=0x0038, h01=0x0050, text=»* A CONNECT REQUEST FOR A PERMANENT VIRTUAL CIRCUIT «, t00=0x0101, t01=0x00d6}
0x19242…1924c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x0112}
0x1924c…19260               Head {h00=0x0010, h01=0x0050, text=»CALLPV EQU *«, t00=0x0101, t01=0x011c}
0x19260…1926a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x0130}
0x1926a…1929a               Head {h00=0x002c, h01=0x0050, text=»* SEARCH FOR A NOT USED LOGICAL CHANNEL «, t00=0x0101, t01=0x013a}
0x1929a…192a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x016a}
0x192a4…192d2               Head {h00=0x002a, h01=0x0050, text=» LC A4,NRLC,A12 GET # OF LOG. CHANNELS«, t00=0x0101, t01=0x0174}
0x192d2…192e8               Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x0102, t01=0x0012}
0x192e8…192fc               Head {h00=0x0010, h01=0x0050, text=» SUK A4,1 . «, t00=0x0102, t01=0x0028}
0x192fc…19330               Head {h00=0x0030, h01=0x0050, text=» LDK A1,NOREMO REMOTE ADDRESS NOT SUPPORTED «, t00=0x0102, t01=0x003c}
0x19330…19344               Head {h00=0x0010, h01=0x0050, text=»CALL60 EQU *«, t00=0x0102, t01=0x0070}
0x19344…1936e               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x0102, t01=0x0084}
0x1936e…19390               Head {h00=0x001e, h01=0x0050, text=» LDK A3,PVC IS IT A PVC ? «, t00=0x0102, t01=0x00ae}
0x19390…193aa               Head {h00=0x0016, h01=0x0050, text=» CC A3,VCTYP,A13 .«, t00=0x0102, t01=0x00d0}
0x193aa…193c4               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CALL70 NO «, t00=0x0102, t01=0x00ea}
0x193c4…1940a               Head {h00=0x0042, h01=0x0050, text=»         LD       A3,DWTRAD,A6     THE REQUESTED DESTINATION ?«, t00=0x0102, t01=0x0104}
0x1940a…19432               Head {h00=0x0024, h01=0x0050, text=»         CW       A3,REMADR,A13 «, t00=0x0102, t01=0x014a}
0x19432…1944c               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CALL70 NO «, t00=0x0102, t01=0x0172}
0x1944c…19480               Head {h00=0x0030, h01=0x0050, text=» LDK A1,NOLCAV NO LOGICAL CHANNEL AVAILABLE «, t00=0x0102, t01=0x018c}
0x19480…194ac               Head {h00=0x0028, h01=0x0050, text=» LD A3,LCDWT,A13 LC ALREADY IN USE ?«, t00=0x0103, t01=0x0030}
0x194ac…194c4               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CALL80 NO«, t00=0x0103, t01=0x005c}
0x194c4…194d8               Head {h00=0x0010, h01=0x0050, text=»CALL70 EQU *«, t00=0x0103, t01=0x0074}
0x194d8…194f8               Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 TRY NEXT ENTRY«, t00=0x0103, t01=0x0088}
0x194f8…19510               Head {h00=0x0014, h01=0x0050, text=» RB(NN) CALL60 .«, t00=0x0103, t01=0x00a8}
0x19510…19532               Head {h00=0x001e, h01=0x0050, text=» LDR A4,A1 GET RETURN CODE«, t00=0x0103, t01=0x00c0}
0x19532…19554               Head {h00=0x001e, h01=0x0050, text=» RB CALL40 BACK TO CALLER «, t00=0x0103, t01=0x00e2}
0x19554…1955e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0103, t01=0x0104}
0x1955e…19572               Head {h00=0x0010, h01=0x0050, text=»CALL80 EQU *«, t00=0x0103, t01=0x010e}
0x19572…195a4               Head {h00=0x002e, h01=0x0050, text=» SC A4,DWTLCN,A6 SAVE LOG. CHAN. NR IN DWT«, t00=0x0103, t01=0x0122}
0x195a4…195e0               Head {h00=0x0038, h01=0x0050, text=»         ST       A6,LCDWT,A13     SAVE DWT ADDRESS «, t00=0x0103, t01=0x0154}
0x195e0…1961a               Head {h00=0x0036, h01=0x0050, text=»         RB       CALL30           BACK TO CALLER «, t00=0x0103, t01=0x0190}
0x1961a…19626               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0104, t01=0x003a}
0x19626…1963c               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0104, t01=0x0046}
0x1963c…1964a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0104, t01=0x005c}
0x1964a…19654               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x006a}
0x19654…1965e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x0074}
0x1965e…1968c               Head {h00=0x002a, h01=0x0050, text=»* PROCESSING OF AN ACCEPT CALL REQUEST«, t00=0x0104, t01=0x007e}
0x1968c…19696               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x00ac}
0x19696…196ca               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0104, t01=0x00b6}
0x196ca…196d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x00ea}
0x196d4…196f0               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0104, t01=0x00f4}
0x196f0…1970c               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT-ADDRESS«, t00=0x0104, t01=0x0110}
0x1970c…1972c               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0104, t01=0x012c}
0x1972c…19758               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0104, t01=0x014c}
0x19758…19762               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x0178}
0x19762…1977e               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0104, t01=0x0182}
0x1977e…19796               Head {h00=0x0014, h01=0x0050, text=»*  ABL    CALLCR«, t00=0x0105, t01=0x000e}
0x19796…197c4               Head {h00=0x002a, h01=0x0050, text=»*  A RETURN IS MADE TO THE LABEL READY«, t00=0x0105, t01=0x0026}
0x197c4…197ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x0054}
0x197ce…197ea               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x0105, t01=0x005e}
0x197ea…19806               Head {h00=0x0018, h01=0x0050, text=»*  A4 = RETURN CODE «, t00=0x0105, t01=0x007a}
0x19806…19810               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x0096}
0x19810…19824               Head {h00=0x0010, h01=0x0050, text=»CALLCR EQU *«, t00=0x0105, t01=0x00a0}
0x19824…1985c               Head {h00=0x0034, h01=0x0050, text=» LDK A4,INVSTA PRESET RETURN CODE := ILL. STATUS«, t00=0x0105, t01=0x00b4}
0x1985c…1988e               Head {h00=0x002e, h01=0x0050, text=» LDK A1,RCAL.ST LC-STATUS = REMOTE CALL ? «, t00=0x0105, t01=0x00ec}
0x1988e…198aa               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0105, t01=0x011e}
0x198aa…198ca               Head {h00=0x001c, h01=0x0050, text=» RB(NE) CALL40 NO, ERROR«, t00=0x0105, t01=0x013a}
0x198ca…198d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x015a}
0x198d4…198ec               Head {h00=0x0014, h01=0x0050, text=»* UPDATE LC-ADM «, t00=0x0105, t01=0x0164}
0x198ec…198f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x017c}
0x198f6…19928               Head {h00=0x002e, h01=0x0050, text=» LDK A1,DATA.ST LC-STATUS := DATA TRANSFER«, t00=0x0105, t01=0x0186}
0x19928…1993c               Head {h00=0x0010, h01=0x0050, text=» ECR A1,A1 .«, t00=0x0106, t01=0x0028}
0x1993c…19976               Head {h00=0x0036, h01=0x0050, text=» ST A1,LCSTAT,A13 LC-SUBSTAT := FLOW CONTROL READY«, t00=0x0106, t01=0x003c}
0x19976…199a4               Head {h00=0x002a, h01=0x0050, text=» CF A14,CLLCAD CLEAR FIELDS IN LC-ADM «, t00=0x0106, t01=0x0076}
0x199a4…199ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x00a4}
0x199ae…199bc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0106, t01=0x00ae}
0x199bc…199c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x00bc}
0x199c6…19a02               Head {h00=0x0038, h01=0x0050, text=»* IF ACCEPT REQUEST FROM USER THEN EMPTY INPUT QUEUE«, t00=0x0106, t01=0x00c6}
0x19a02…19a0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x0102}
0x19a0c…19a22               Head {h00=0x0012, h01=0x0050, text=» LDK A1,INCALR«, t00=0x0106, t01=0x010c}
0x19a22…19a3a               Head {h00=0x0014, h01=0x0050, text=» CC A1,DWTSTE,A6«, t00=0x0106, t01=0x0122}
0x19a3a…19a60               Head {h00=0x0022, h01=0x0050, text=» RB(NE) CALL20 NO USER REQUEST«, t00=0x0106, t01=0x013a}
0x19a60…19a84               Head {h00=0x0020, h01=0x0050, text=»         CF       A14,CLINPQ«, t00=0x0106, t01=0x0160}
0x19a84…19a8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x0184}
0x19a8e…19ab8               Head {h00=0x0026, h01=0x0050, text=»* RESET DATA AVAILABLE INDICATION «, t00=0x0106, t01=0x018e}
0x19ab8…19ac2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x0028}
0x19ac2…19ad8               Head {h00=0x0012, h01=0x0050, text=» CM DWTRCI,A6 «, t00=0x0107, t01=0x0032}
0x19ad8…19ae2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x0048}
0x19ae2…19b04               Head {h00=0x001e, h01=0x0050, text=»* QUEUE PACKET AND RETURN «, t00=0x0107, t01=0x0052}
0x19b04…19b0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x0074}
0x19b0e…19b20               Head {h00=0x000e, h01=0x0050, text=» RB CALL20«, t00=0x0107, t01=0x007e}
0x19b20…19b2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x0090}
0x19b2a…19b36               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0107, t01=0x009a}
0x19b36…19b44               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0107, t01=0x00a6}
0x19b44…19b4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x00b4}
0x19b4e…19b58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x00be}
0x19b58…19b8c               Head {h00=0x0030, h01=0x0050, text=»* PROCESSING OF A DATA TRANSMISSION REQUEST «, t00=0x0107, t01=0x00c8}
0x19b8c…19b96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x00fc}
0x19b96…19bca               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0107, t01=0x0106}
0x19bca…19bd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x013a}
0x19bd4…19bf0               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0107, t01=0x0144}
0x19bf0…19c0c               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT-ADDRESS«, t00=0x0107, t01=0x0160}
0x19c0c…19c2c               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0107, t01=0x017c}
0x19c2c…19c58               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0108, t01=0x000c}
0x19c58…19c62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x0038}
0x19c62…19c7e               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0108, t01=0x0042}
0x19c7e…19c94               Head {h00=0x0012, h01=0x0050, text=»*  ABL    DATA«, t00=0x0108, t01=0x005e}
0x19c94…19cc2               Head {h00=0x002a, h01=0x0050, text=»*  A RETURN IS MADE TO THE LABEL READY«, t00=0x0108, t01=0x0074}
0x19cc2…19ccc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x00a2}
0x19ccc…19ce8               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x0108, t01=0x00ac}
0x19ce8…19d04               Head {h00=0x0018, h01=0x0050, text=»*  A4 = RETURN CODE «, t00=0x0108, t01=0x00c8}
0x19d04…19d0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x00e4}
0x19d0e…19d20               Head {h00=0x000e, h01=0x0050, text=»DATA EQU *«, t00=0x0108, t01=0x00ee}
0x19d20…19d4a               Head {h00=0x0026, h01=0x0050, text=» LDK A4,INVSTA PRESET RETURN CODE «, t00=0x0108, t01=0x0100}
0x19d4a…19d62               Head {h00=0x0014, h01=0x0050, text=» LDK A1,DATA.ST «, t00=0x0108, t01=0x012a}
0x19d62…19d96               Head {h00=0x0030, h01=0x0050, text=» CC A1,LCSTAT,A13 LC-STATUS = DATA TRANSF. ?«, t00=0x0108, t01=0x0142}
0x19d96…19db6               Head {h00=0x001c, h01=0x0050, text=» RB(NE) CALL40 NO, ERROR«, t00=0x0108, t01=0x0176}
0x19db6…19dc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x0008}
0x19dc0…19de2               Head {h00=0x001e, h01=0x0050, text=»* QUEUE REQUEST AND RETURN«, t00=0x0109, t01=0x0012}
0x19de2…19dec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x0034}
0x19dec…19e00               Head {h00=0x0010, h01=0x0050, text=»DATA10 EQU *«, t00=0x0109, t01=0x003e}
0x19e00…19e12               Head {h00=0x000e, h01=0x0050, text=» RB CALL20«, t00=0x0109, t01=0x0052}
0x19e12…19e20               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0109, t01=0x0064}
0x19e20…19e2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x0072}
0x19e2a…19e34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x007c}
0x19e34…19e60               Head {h00=0x0028, h01=0x0050, text=»* PROCESSING OF A DISCONNECT REQUEST«, t00=0x0109, t01=0x0086}
0x19e60…19e6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x00b2}
0x19e6a…19e9e               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0109, t01=0x00bc}
0x19e9e…19ea8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x00f0}
0x19ea8…19ec4               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0109, t01=0x00fa}
0x19ec4…19ee0               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT-ADDRESS«, t00=0x0109, t01=0x0116}
0x19ee0…19f00               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0109, t01=0x0132}
0x19f00…19f2c               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0109, t01=0x0152}
0x19f2c…19f36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x017e}
0x19f36…19f52               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0109, t01=0x0188}
0x19f52…19f6a               Head {h00=0x0014, h01=0x0050, text=»*  ABL    CLEAR «, t00=0x010a, t01=0x0014}
0x19f6a…19f98               Head {h00=0x002a, h01=0x0050, text=»*  A RETURN IS MADE TO THE LABEL READY«, t00=0x010a, t01=0x002c}
0x19f98…19fa2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x005a}
0x19fa2…19fbe               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x010a, t01=0x0064}
0x19fbe…19fda               Head {h00=0x0018, h01=0x0050, text=»*  A4 = RETURN CODE «, t00=0x010a, t01=0x0080}
0x19fda…19fe4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x009c}
0x19fe4…19ff8               Head {h00=0x0010, h01=0x0050, text=»CLEAR EQU * «, t00=0x010a, t01=0x00a6}
0x19ff8…1a00e               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x010a, t01=0x00ba}
0x1a00e…1a04a               Head {h00=0x0038, h01=0x0050, text=»         LC       A1,VCTYP,A13     PVC CONCERNING ? «, t00=0x010a, t01=0x00d0}
0x1a04a…1a06a               Head {h00=0x001c, h01=0x0050, text=»         ANK      A1,PVC«, t00=0x010a, t01=0x010c}
0x1a06a…1a084               Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLEA00 NO! «, t00=0x010a, t01=0x012c}
0x1a084…1a090               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x010a, t01=0x0146}
0x1a090…1a0b8               Head {h00=0x0024, h01=0x0050, text=» CF A14,CLINPQ CLEAR INPUT QUEUE«, t00=0x010a, t01=0x0152}
0x1a0b8…1a0e8               Head {h00=0x002c, h01=0x0050, text=» CM LCDWT,A13 RELEASE RELATION WITH DWT «, t00=0x010a, t01=0x017a}
0x1a0e8…1a0fa               Head {h00=0x000e, h01=0x0050, text=» RB CALL30«, t00=0x010b, t01=0x001a}
0x1a0fa…1a104               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x002c}
0x1a104…1a11a               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x010b, t01=0x0036}
0x1a11a…1a12e               Head {h00=0x0010, h01=0x0050, text=»CLEA00 EQU *«, t00=0x010b, t01=0x004c}
0x1a12e…1a15a               Head {h00=0x0028, h01=0x0050, text=» LDK A1,CLEA.ST LC-STATUS = CLEAR ? «, t00=0x010b, t01=0x0060}
0x1a15a…1a176               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x010b, t01=0x008c}
0x1a176…1a1aa               Head {h00=0x0030, h01=0x0050, text=»         RF(NE)   CLEA10                 NO «, t00=0x010b, t01=0x00a8}
0x1a1aa…1a1b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x00dc}
0x1a1b4…1a1c2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010b, t01=0x00e6}
0x1a1c2…1a1cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x00f4}
0x1a1cc…1a1e4               Head {h00=0x0014, h01=0x0050, text=»* REFUSE REQUEST«, t00=0x010b, t01=0x00fe}
0x1a1e4…1a1ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x0116}
0x1a1ee…1a214               Head {h00=0x0022, h01=0x0050, text=» LDK A4,CLEBUS SET RETURN CODE«, t00=0x010b, t01=0x0120}
0x1a214…1a226               Head {h00=0x000e, h01=0x0050, text=» RB CALL40«, t00=0x010b, t01=0x0146}
0x1a226…1a230               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x0158}
0x1a230…1a246               Head {h00=0x0012, h01=0x0050, text=»* START TIMER «, t00=0x010b, t01=0x0162}
0x1a246…1a250               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x0178}
0x1a250…1a26c               Head {h00=0x0018, h01=0x0050, text=»CLEA10    EQU      *«, t00=0x010b, t01=0x0182}
0x1a26c…1a292               Head {h00=0x0022, h01=0x0050, text=» LDKL A8,SYCLTM TIME-OUT VALUE«, t00=0x010c, t01=0x000e}
0x1a292…1a2b4               Head {h00=0x001e, h01=0x0050, text=» CF A14,STTIM START TIMER «, t00=0x010c, t01=0x0034}
0x1a2b4…1a2be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x0056}
0x1a2be…1a2d6               Head {h00=0x0014, h01=0x0050, text=»* UPDATE LC-ADM «, t00=0x010c, t01=0x0060}
0x1a2d6…1a2e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x0078}
0x1a2e0…1a30c               Head {h00=0x0028, h01=0x0050, text=» LDK A1,CLEA.ST NEW STATUS := CLEAR «, t00=0x010c, t01=0x0082}
0x1a30c…1a328               Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSTAT,A13 . «, t00=0x010c, t01=0x00ae}
0x1a328…1a332               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x00ca}
0x1a332…1a34e               Head {h00=0x0018, h01=0x0050, text=»* EMPTY INPUT QUEUE «, t00=0x010c, t01=0x00d4}
0x1a34e…1a358               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x00f0}
0x1a358…1a37c               Head {h00=0x0020, h01=0x0050, text=»         CF       A14,CLINPQ«, t00=0x010c, t01=0x00fa}
0x1a37c…1a386               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x011e}
0x1a386…1a3a8               Head {h00=0x001e, h01=0x0050, text=»* QUEUE ELEMENT AND RETURN«, t00=0x010c, t01=0x0128}
0x1a3a8…1a3b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x014a}
0x1a3b2…1a3c4               Head {h00=0x000e, h01=0x0050, text=» RB CALL20«, t00=0x010c, t01=0x0154}
0x1a3c4…1a3ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x0166}
0x1a3ce…1a3da               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x010c, t01=0x0170}
0x1a3da…1a3e8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010c, t01=0x017c}
0x1a3e8…1a3f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x018a}
0x1a3f2…1a3fc (269, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010d, t01=0x0004}
0x1a3fc…1a42c               Head {h00=0x002c, h01=0x0050, text=»* PROCESSING OF THE ACCEPT DATA REQUEST «, t00=0x010d, t01=0x000e}
0x1a42c…1a436               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010d, t01=0x003e}
0x1a436…1a46a               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x010d, t01=0x0048}
0x1a46a…1a474               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010d, t01=0x007c}
0x1a474…1a490               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x010d, t01=0x0086}
0x1a490…1a4ac               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT-ADDRESS«, t00=0x010d, t01=0x00a2}
0x1a4ac…1a4cc               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x010d, t01=0x00be}
0x1a4cc…1a4f8               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x010d, t01=0x00de}
0x1a4f8…1a502               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010d, t01=0x010a}
0x1a502…1a51e               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x010d, t01=0x0114}
0x1a51e…1a534               Head {h00=0x0012, h01=0x0050, text=»*  ABL    RRR «, t00=0x010d, t01=0x0130}
0x1a534…1a562               Head {h00=0x002a, h01=0x0050, text=»*  A RETURN IS MADE TO THE LABEL READY«, t00=0x010d, t01=0x0146}
0x1a562…1a56c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010d, t01=0x0174}
0x1a56c…1a588               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x010d, t01=0x017e}
0x1a588…1a5a4               Head {h00=0x0018, h01=0x0050, text=»*  A4 = RETURN CODE «, t00=0x010e, t01=0x000a}
0x1a5a4…1a5ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0026}
0x1a5ae…1a5c0               Head {h00=0x000e, h01=0x0050, text=»RRR EQU * «, t00=0x010e, t01=0x0030}
0x1a5c0…1a5ea               Head {h00=0x0026, h01=0x0050, text=» LDK A4,INVSTA PRESET RETURN CODE «, t00=0x010e, t01=0x0042}
0x1a5ea…1a602               Head {h00=0x0014, h01=0x0050, text=» LDK A1,DATA.ST «, t00=0x010e, t01=0x006c}
0x1a602…1a638               Head {h00=0x0032, h01=0x0050, text=» CC A1,LCSTAT,A13 LC-STATUS = DATA TRANSFER ? «, t00=0x010e, t01=0x0084}
0x1a638…1a658               Head {h00=0x001c, h01=0x0050, text=» RB(NE) CALL40 NO, ERROR«, t00=0x010e, t01=0x00ba}
0x1a658…1a662               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x00da}
0x1a662…1a694               Head {h00=0x002e, h01=0x0050, text=»* QUEUE ELEMENT AS FIRST FOR TRANSMISSION «, t00=0x010e, t01=0x00e4}
0x1a694…1a69e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0116}
0x1a69e…1a6be               Head {h00=0x001c, h01=0x0050, text=»         RF       INTR00«, t00=0x010e, t01=0x0120}
0x1a6be…1a6cc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010e, t01=0x0140}
0x1a6cc…1a6d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x014e}
0x1a6d6…1a6e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0158}
0x1a6e0…1a710               Head {h00=0x002c, h01=0x0050, text=»* PROCESSING OF THE REFUSE DATA REQUEST «, t00=0x010e, t01=0x0162}
0x1a710…1a71a (271, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x0004}
0x1a71a…1a74e               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x010f, t01=0x000e}
0x1a74e…1a758               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x0042}
0x1a758…1a774               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x010f, t01=0x004c}
0x1a774…1a790               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT-ADDRESS«, t00=0x010f, t01=0x0068}
0x1a790…1a7b0               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x010f, t01=0x0084}
0x1a7b0…1a7dc               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x010f, t01=0x00a4}
0x1a7dc…1a7e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x00d0}
0x1a7e6…1a802               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x010f, t01=0x00da}
0x1a802…1a818               Head {h00=0x0012, h01=0x0050, text=»*  ABL    RNRR«, t00=0x010f, t01=0x00f6}
0x1a818…1a846               Head {h00=0x002a, h01=0x0050, text=»*  A RETURN IS MADE TO THE LABEL READY«, t00=0x010f, t01=0x010c}
0x1a846…1a850               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x013a}
0x1a850…1a86c               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x010f, t01=0x0144}
0x1a86c…1a888               Head {h00=0x0018, h01=0x0050, text=»*  A4 = RETURN CODE «, t00=0x010f, t01=0x0160}
0x1a888…1a892               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x017c}
0x1a892…1a8a4               Head {h00=0x000e, h01=0x0050, text=»RNRR EQU *«, t00=0x010f, t01=0x0186}
0x1a8a4…1a8ce               Head {h00=0x0026, h01=0x0050, text=» LDK A4,INVSTA PRESET RETURN CODE «, t00=0x0110, t01=0x0008}
0x1a8ce…1a8e6               Head {h00=0x0014, h01=0x0050, text=» LDK A1,DATA.ST «, t00=0x0110, t01=0x0032}
0x1a8e6…1a91c               Head {h00=0x0032, h01=0x0050, text=» CC A1,LCSTAT,A13 LC-STATUS = DATA TRANSFER ? «, t00=0x0110, t01=0x004a}
0x1a91c…1a93c               Head {h00=0x001c, h01=0x0050, text=» RB(NE) CALL40 NO, ERROR«, t00=0x0110, t01=0x0080}
0x1a93c…1a946               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x00a0}
0x1a946…1a962               Head {h00=0x0018, h01=0x0050, text=»* BLOCK INPUT QUEUE «, t00=0x0110, t01=0x00aa}
0x1a962…1a96c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x00c6}
0x1a96c…1a982               Head {h00=0x0012, h01=0x0050, text=» LDK A1,NPRFLG«, t00=0x0110, t01=0x00d0}
0x1a982…1a99c               Head {h00=0x0016, h01=0x0050, text=» ORS A1,QUEINP,A13«, t00=0x0110, t01=0x00e6}
0x1a99c…1a9a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x0100}
0x1a9a6…1a9ce               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ELEMENT FOR TRANSMISSION«, t00=0x0110, t01=0x010a}
0x1a9ce…1a9d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x0132}
0x1a9d8…1a9f8               Head {h00=0x001c, h01=0x0050, text=»         RF       INTR00«, t00=0x0110, t01=0x013c}
0x1a9f8…1aa06               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0110, t01=0x015c}
0x1aa06…1aa10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x016a}
0x1aa10…1aa1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x0174}
0x1aa1a…1aa4e               Head {h00=0x0030, h01=0x0050, text=»* PROCESSING OF THE WRITE INTERRUPT REQUEST «, t00=0x0110, t01=0x017e}
0x1aa4e…1aa58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x0022}
0x1aa58…1aa8c               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0111, t01=0x002c}
0x1aa8c…1aa96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x0060}
0x1aa96…1aab2               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0111, t01=0x006a}
0x1aab2…1aace               Head {h00=0x0018, h01=0x0050, text=»*  A6  = DWT-ADDRESS«, t00=0x0111, t01=0x0086}
0x1aace…1aaee               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0111, t01=0x00a2}
0x1aaee…1ab1a               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0111, t01=0x00c2}
0x1ab1a…1ab24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x00ee}
0x1ab24…1ab40               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0111, t01=0x00f8}
0x1ab40…1ab56               Head {h00=0x0012, h01=0x0050, text=»*  ABL    INTR«, t00=0x0111, t01=0x0114}
0x1ab56…1ab60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x012a}
0x1ab60…1ab7c               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x0111, t01=0x0134}
0x1ab7c…1ab98               Head {h00=0x0018, h01=0x0050, text=»*  A4 = RETURN CODE «, t00=0x0111, t01=0x0150}
0x1ab98…1aba2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x016c}
0x1aba2…1abb4               Head {h00=0x000e, h01=0x0050, text=»INTR EQU *«, t00=0x0111, t01=0x0176}
0x1abb4…1abde               Head {h00=0x0026, h01=0x0050, text=» LDK A4,INVSTA PRESET RETURN CODE «, t00=0x0111, t01=0x0188}
0x1abde…1abf6               Head {h00=0x0014, h01=0x0050, text=» LDK A1,DATA.ST «, t00=0x0112, t01=0x0022}
0x1abf6…1ac2c               Head {h00=0x0032, h01=0x0050, text=» CC A1,LCSTAT,A13 LC-STATUS = DATA TRANSFER ? «, t00=0x0112, t01=0x003a}
0x1ac2c…1ac4c               Head {h00=0x001c, h01=0x0050, text=» RB(NE) CALL40 NO, ERROR«, t00=0x0112, t01=0x0070}
0x1ac4c…1ac72               Head {h00=0x0022, h01=0x0050, text=» LDK A4,SEQE.RC SEQUENCE ERROR«, t00=0x0112, t01=0x0090}
0x1ac72…1ac9c               Head {h00=0x0026, h01=0x0050, text=» LDK A1,INTPNG INTERRUPT PENDING ?«, t00=0x0112, t01=0x00b6}
0x1ac9c…1acb6               Head {h00=0x0016, h01=0x0050, text=» AN A1,FLAGS,A13 .«, t00=0x0112, t01=0x00e0}
0x1acb6…1acd2               Head {h00=0x0018, h01=0x0050, text=» RB(NZ) CALL40 YES !«, t00=0x0112, t01=0x00fa}
0x1acd2…1ad1c               Head {h00=0x0046, h01=0x0050, text=»         LDK      A1,INTPNG             SET INTERRUPT PENDING FLAG«, t00=0x0112, t01=0x0116}
0x1ad1c…1ad42               Head {h00=0x0022, h01=0x0050, text=»         ORS      A1,FLAGS,A13«, t00=0x0112, t01=0x0160}
0x1ad42…1ad4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0112, t01=0x0186}
0x1ad4c…1ad5a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0112, t01=0x0190}
0x1ad5a…1ad64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x000e}
0x1ad64…1ad8c               Head {h00=0x0024, h01=0x0050, text=»* QUEUE ELEMENT FOR TRANSMISSION«, t00=0x0113, t01=0x0018}
0x1ad8c…1ad96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0040}
0x1ad96…1adb2               Head {h00=0x0018, h01=0x0050, text=»INTR00   EQU      * «, t00=0x0113, t01=0x004a}
0x1adb2…1add4               Head {h00=0x001e, h01=0x0050, text=» LDR A2,A6 ELEMENT ADDRESS«, t00=0x0113, t01=0x0066}
0x1add4…1adfc               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A13 QUEUE ANCHOR ADDRESS«, t00=0x0113, t01=0x0088}
0x1adfc…1ae14               Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEOUT .«, t00=0x0113, t01=0x00b0}
0x1ae14…1ae42               Head {h00=0x002a, h01=0x0050, text=» CF A14,QUEUEF QUEUE AS FIRST ELEMENT «, t00=0x0113, t01=0x00c8}
0x1ae42…1ae72               Head {h00=0x002c, h01=0x0050, text=» LDK A2,NPRFLG RESET NO PROCESSING FLAG «, t00=0x0113, t01=0x00f6}
0x1ae72…1ae86               Head {h00=0x0010, h01=0x0050, text=» C1R A2,A2 .«, t00=0x0113, t01=0x0126}
0x1ae86…1ae9c               Head {h00=0x0012, h01=0x0050, text=» ANRS A2,A1 . «, t00=0x0113, t01=0x013a}
0x1ae9c…1aebe               Head {h00=0x001e, h01=0x0050, text=» ABL CALL30 BACK TO CALLER«, t00=0x0113, t01=0x0150}
0x1aebe…1aecc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0113, t01=0x0172}
0x1aecc…1aed6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0180}
0x1aed6…1aee0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x018a}
0x1aee0…1af16 (276, 0, 400) Head {h00=0x0032, h01=0x0050, text=»* THIS MODULE GETS CONTROL FROM THE SCHEDULER «, t00=0x0114, t01=0x0004}
0x1af16…1af3e               Head {h00=0x0024, h01=0x0050, text=»* IN ORDER TO TRANSMIT A PACKET «, t00=0x0114, t01=0x003a}
0x1af3e…1af48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x0062}
0x1af48…1af7c               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0114, t01=0x006c}
0x1af7c…1af86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x00a0}
0x1af86…1afa2               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0114, t01=0x00aa}
0x1afa2…1afc8               Head {h00=0x0022, h01=0x0050, text=»*  A1  = QUEUE ANCHOR ADDRESS «, t00=0x0114, t01=0x00c6}
0x1afc8…1afec               Head {h00=0x0020, h01=0x0050, text=»*  A12 = LINE BLOCK ADDRESS «, t00=0x0114, t01=0x00ec}
0x1afec…1b00c               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0114, t01=0x0110}
0x1b00c…1b038               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0114, t01=0x0130}
0x1b038…1b042               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x015c}
0x1b042…1b05e               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0114, t01=0x0166}
0x1b05e…1b076               Head {h00=0x0014, h01=0x0050, text=»*  ABL    OUTPCK«, t00=0x0114, t01=0x0182}
0x1b076…1b080               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0115, t01=0x000a}
0x1b080…1b094               Head {h00=0x0010, h01=0x0050, text=»OUTPCK EQU *«, t00=0x0115, t01=0x0014}
0x1b094…1b09e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0115, t01=0x0028}
0x1b09e…1b0ba               Head {h00=0x0018, h01=0x0050, text=»* GET AN OUTPUT ECB «, t00=0x0115, t01=0x0032}
0x1b0ba…1b0c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0115, t01=0x004e}
0x1b0c4…1b0e8               Head {h00=0x0020, h01=0x0050, text=» LDR A3,A12 FIRST OUTPUT ECB«, t00=0x0115, t01=0x0058}
0x1b0e8…1b100               Head {h00=0x0014, h01=0x0050, text=» ADK A3,ECBOU1 .«, t00=0x0115, t01=0x007c}
0x1b100…1b114               Head {h00=0x0010, h01=0x0050, text=»OUTP00 EQU *«, t00=0x0115, t01=0x0094}
0x1b114…1b13a               Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBBA,A3 IS ECB BUSY ? «, t00=0x0115, t01=0x00a8}
0x1b13a…1b152               Head {h00=0x0014, h01=0x0050, text=» RF(Z) OUTP10 NO«, t00=0x0115, t01=0x00ce}
0x1b152…1b180               Head {h00=0x002a, h01=0x0050, text=» ADK A3,ECBINL+SYSBFL NEXT OUTPUT ECB «, t00=0x0115, t01=0x00e6}
0x1b180…1b194               Head {h00=0x0010, h01=0x0050, text=» RB OUTP00 .«, t00=0x0115, t01=0x0114}
0x1b194…1b19e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0115, t01=0x0128}
0x1b19e…1b1b2               Head {h00=0x0010, h01=0x0050, text=»OUTP10 EQU *«, t00=0x0115, t01=0x0132}
0x1b1b2…1b1d0               Head {h00=0x001a, h01=0x0050, text=» LDR A8,A3 ECB-ADDRESS«, t00=0x0115, t01=0x0146}
0x1b1d0…1b1e6               Head {h00=0x0012, h01=0x0050, text=» ADK A3,ECBINL«, t00=0x0115, t01=0x0164}
0x1b1e6…1b212               Head {h00=0x0028, h01=0x0050, text=» ST A3,ECBBA,A8 SYSTEM OUTPUT BUFFER«, t00=0x0115, t01=0x017a}
0x1b212…1b238               Head {h00=0x0022, h01=0x0050, text=» CM HDLC,A3 CLEAR HDLC-HEADER «, t00=0x0116, t01=0x0016}
0x1b238…1b24c               Head {h00=0x0010, h01=0x0050, text=» LDK A4,/10 «, t00=0x0116, t01=0x003c}
0x1b24c…1b27e               Head {h00=0x002e, h01=0x0050, text=» SC A4,GNFRM,A3 GENERAL FORMAT IDENTIFIER «, t00=0x0116, t01=0x0050}
0x1b27e…1b288               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0116, t01=0x0082}
0x1b288…1b296               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0116, t01=0x008c}
0x1b296…1b2a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0116, t01=0x009a}
0x1b2a0…1b2c4               Head {h00=0x0020, h01=0x0050, text=»* DEQUEUE AND CHECK ELEMENT «, t00=0x0116, t01=0x00a4}
0x1b2c4…1b2ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0116, t01=0x00c8}
0x1b2ce…1b2f0               Head {h00=0x001e, h01=0x0050, text=» CF A14,DEQUE GET ELEMENT «, t00=0x0116, t01=0x00d2}
0x1b2f0…1b31e               Head {h00=0x002a, h01=0x0050, text=» ST A1,SAVE SAVE QUEUE ANCHOR ADDRESS «, t00=0x0116, t01=0x00f4}
0x1b31e…1b336               Head {h00=0x0014, h01=0x0050, text=» LDKL A1,DWTTYP «, t00=0x0116, t01=0x0122}
0x1b336…1b35a               Head {h00=0x0020, h01=0x0050, text=» CW A1,DWTCHP,A2 CHECK TYPE «, t00=0x0116, t01=0x013a}
0x1b35a…1b378               Head {h00=0x001a, h01=0x0050, text=» ABL(NE) OUT400 NO DWT«, t00=0x0116, t01=0x015e}
0x1b378…1b39c               Head {h00=0x0020, h01=0x0050, text=» LDR A6,A2 SAVE DWT-ADDRESS «, t00=0x0116, t01=0x017c}
0x1b39c…1b3c4               Head {h00=0x0024, h01=0x0050, text=» LD A9,DWTECB,A6 GET ECB-ADDRESS«, t00=0x0117, t01=0x0010}
0x1b3c4…1b3f4               Head {h00=0x002c, h01=0x0050, text=» ABL(Z) EXITDC ELEMENT ALREADY COMPLETED«, t00=0x0117, t01=0x0038}
0x1b3f4…1b40c               Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTLCN,A6«, t00=0x0117, t01=0x0068}
0x1b40c…1b43c               Head {h00=0x002c, h01=0x0050, text=» SC A4,LCIDNT,A3 LOGICAL CHANNEL NUMBER «, t00=0x0117, t01=0x0080}
0x1b43c…1b446               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x00b0}
0x1b446…1b46a               Head {h00=0x0020, h01=0x0050, text=»* SELECTION ON REQUEST TYPE «, t00=0x0117, t01=0x00ba}
0x1b46a…1b474               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x00de}
0x1b474…1b49a               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 SAVE BUFFER ADDRESS«, t00=0x0117, t01=0x00e8}
0x1b49a…1b4c4               Head {h00=0x0026, h01=0x0050, text=» LC A3,DWTFNC,A6 GET FUNCTION CODE«, t00=0x0117, t01=0x010e}
0x1b4c4…1b4da               Head {h00=0x0012, h01=0x0050, text=» ANK A3,/FF . «, t00=0x0117, t01=0x0138}
0x1b4da…1b4f0               Head {h00=0x0012, h01=0x0050, text=» SUK A3,CONACT«, t00=0x0117, t01=0x014e}
0x1b4f0…1b506               Head {h00=0x0012, h01=0x0050, text=» ABI OUTTAB,A3«, t00=0x0117, t01=0x0164}
0x1b506…1b510               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x017a}
0x1b510…1b51e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0117, t01=0x0184}
0x1b51e…1b528 (280, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x0004}
0x1b528…1b546               Head {h00=0x001a, h01=0x0050, text=»* REQUEST OUTPUT TABLE«, t00=0x0118, t01=0x000e}
0x1b546…1b550               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x002c}
0x1b550…1b564               Head {h00=0x0010, h01=0x0050, text=»OUTTAB EQU *«, t00=0x0118, t01=0x0036}
0x1b564…1b57a               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0118, t01=0x004a}
0x1b57a…1b5a6               Head {h00=0x0028, h01=0x0050, text=» DATA OUT100 CONNECT ACTIVE REQUEST «, t00=0x0118, t01=0x0060}
0x1b5a6…1b5d0               Head {h00=0x0026, h01=0x0050, text=» DATA HLT CONNECT PASSIVE REQUEST «, t00=0x0118, t01=0x008c}
0x1b5d0…1b5f8               Head {h00=0x0024, h01=0x0050, text=» DATA OUT200 DISCONNECT REQUEST «, t00=0x0118, t01=0x00b6}
0x1b5f8…1b618               Head {h00=0x001c, h01=0x0050, text=» DATA OUT210 ACCEPT CALL«, t00=0x0118, t01=0x00de}
0x1b618…1b624               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0118, t01=0x00fe}
0x1b624…1b63a               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0118, t01=0x010a}
0x1b63a…1b662               Head {h00=0x0024, h01=0x0050, text=» DATA HLT CONNECT ACTIVE REQUEST«, t00=0x0118, t01=0x0120}
0x1b662…1b68c               Head {h00=0x0026, h01=0x0050, text=» DATA HLT CONNECT PASSIVE REQUEST «, t00=0x0118, t01=0x0148}
0x1b68c…1b6b0               Head {h00=0x0020, h01=0x0050, text=» DATA HLT DISCONNECT REQUEST«, t00=0x0118, t01=0x0172}
0x1b6b0…1b6ce               Head {h00=0x001a, h01=0x0050, text=» DATA HLT ACCEPT CALL «, t00=0x0119, t01=0x0008}
0x1b6ce…1b6da               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0119, t01=0x0026}
0x1b6da…1b6fa               Head {h00=0x001c, h01=0x0050, text=» DATA OUT300 ACCEPT DATA«, t00=0x0119, t01=0x0032}
0x1b6fa…1b722               Head {h00=0x0024, h01=0x0050, text=» DATA OUT310 REFUSE DATA REQUEST«, t00=0x0119, t01=0x0052}
0x1b722…1b744               Head {h00=0x001e, h01=0x0050, text=» DATA OUT000 WRITE REQUEST«, t00=0x0119, t01=0x007a}
0x1b744…1b770               Head {h00=0x0028, h01=0x0050, text=» DATA OUT220 WRITE INTERRUPT REQUEST«, t00=0x0119, t01=0x009c}
0x1b770…1b796               Head {h00=0x0022, h01=0x0050, text=» DATA OUT300 READ(ACCEPT DATA)«, t00=0x0119, t01=0x00c8}
0x1b796…1b7a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x00ee}
0x1b7a0…1b7b8               Head {h00=0x0014, h01=0x0050, text=»HLT HLT  ILLEGAL«, t00=0x0119, t01=0x00f8}
0x1b7b8…1b7c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x0110}
0x1b7c2…1b7d0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0119, t01=0x011a}
0x1b7d0…1b7da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x0128}
0x1b7da…1b808               Head {h00=0x002a, h01=0x0050, text=»* A DATA PACKET HAS TO BE TRANSMITTED «, t00=0x0119, t01=0x0132}
0x1b808…1b812               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x0160}
0x1b812…1b826               Head {h00=0x0010, h01=0x0050, text=»OUT000 EQU *«, t00=0x0119, t01=0x016a}
0x1b826…1b83c               Head {h00=0x0012, h01=0x0050, text=» LDK A1,REMBUS«, t00=0x0119, t01=0x017e}
0x1b83c…1b86e (282, 0, 398) Head {h00=0x002e, h01=0x0050, text=» AN A1,FLAGS,A13 IS REMOTE STATION BUSY ? «, t00=0x011a, t01=0x0004}
0x1b86e…1b888               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) OUT050 YES«, t00=0x011a, t01=0x0036}
0x1b888…1b892               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x0050}
0x1b892…1b8ac               Head {h00=0x0016, h01=0x0050, text=»* IS WINDOW FULL ?«, t00=0x011a, t01=0x005a}
0x1b8ac…1b8b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x0074}
0x1b8b6…1b8c8               Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x011a, t01=0x007e}
0x1b8c8…1b8da               Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x011a, t01=0x0090}
0x1b8da…1b904               Head {h00=0x0026, h01=0x0050, text=» LC A4,PS,A13 PS TO BE TRANSMITTED«, t00=0x011a, t01=0x00a2}
0x1b904…1b932               Head {h00=0x002a, h01=0x0050, text=» LC A5,SLWE,A13 SEND LOWER WINDOW EDGE«, t00=0x011a, t01=0x00cc}
0x1b932…1b94e               Head {h00=0x0018, h01=0x0050, text=» SUR A4,A5 PS - LWE «, t00=0x011a, t01=0x00fa}
0x1b94e…1b96a               Head {h00=0x0018, h01=0x0050, text=» ANK A4,/07 MODULO 8«, t00=0x011a, t01=0x0116}
0x1b96a…1b99e               Head {h00=0x0030, h01=0x0050, text=» CC A4,LCTRWN,A13 MUST BE WITHIN WINDOW SIZE«, t00=0x011a, t01=0x0132}
0x1b99e…1b9c4               Head {h00=0x0022, h01=0x0050, text=» RF(NL) OUT050 WINDOW IS FULL «, t00=0x011a, t01=0x0166}
0x1b9c4…1b9ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x018c}
0x1b9ce…1b9f2               Head {h00=0x0020, h01=0x0050, text=»* PREPARE DATA PACKET HEADER«, t00=0x011b, t01=0x0008}
0x1b9f2…1b9fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011b, t01=0x002c}
0x1b9fc…1ba22               Head {h00=0x0022, h01=0x0050, text=» LC A1,DWTWRO,A6 WRITE OPTION «, t00=0x011b, t01=0x0036}
0x1ba22…1ba3c               Head {h00=0x0016, h01=0x0050, text=» LDR A3,A1 SAVE IT«, t00=0x011b, t01=0x005c}
0x1ba3c…1ba50               Head {h00=0x0010, h01=0x0050, text=» ANK A1,QPOS«, t00=0x011b, t01=0x0076}
0x1ba50…1ba62               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A1«, t00=0x011b, t01=0x008a}
0x1ba62…1ba88               Head {h00=0x0022, h01=0x0050, text=» ORS A1,GNFRM,A2 INCLUDE Q-BIT«, t00=0x011b, t01=0x009c}
0x1ba88…1baa0               Head {h00=0x0014, h01=0x0050, text=» LC A1,PS,A13 PS«, t00=0x011b, t01=0x00c2}
0x1baa0…1bace               Head {h00=0x002a, h01=0x0050, text=» SLL A1,1 PUT IT ON THE RIGHT POSITION«, t00=0x011b, t01=0x00da}
0x1bace…1bae2               Head {h00=0x0010, h01=0x0050, text=» ANK A3,MPOS«, t00=0x011b, t01=0x0108}
0x1bae2…1bb02               Head {h00=0x001c, h01=0x0050, text=» ORR A1,A3 INCLUDE M-BIT«, t00=0x011b, t01=0x011c}
0x1bb02…1bb1a               Head {h00=0x0014, h01=0x0050, text=» LC A3,PR,A13 PR«, t00=0x011b, t01=0x013c}
0x1bb1a…1bb64               Head {h00=0x0046, h01=0x0050, text=»         SC       A3,RLWE,A13      SAVE IT AS LAST TRANSMITTED PR «, t00=0x011b, t01=0x0154}
0x1bb64…1bb92               Head {h00=0x002a, h01=0x0050, text=» SLL A3,5 PUT IT ON THE RIGHT POSITION«, t00=0x011c, t01=0x000e}
0x1bb92…1bbb2               Head {h00=0x001c, h01=0x0050, text=» ORR A1,A3 ALL TOGETHER «, t00=0x011c, t01=0x003c}
0x1bbb2…1bbbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x005c}
0x1bbbc…1bbca               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011c, t01=0x0066}
0x1bbca…1bbd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x0074}
0x1bbd4…1bbfc               Head {h00=0x0024, h01=0x0050, text=»* INCREMENT SEND SEQUENCE NUMBER«, t00=0x011c, t01=0x007e}
0x1bbfc…1bc06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x00a6}
0x1bc06…1bc3c               Head {h00=0x0032, h01=0x0050, text=»         LC       A5,PS,A13        GET OLD PS «, t00=0x011c, t01=0x00b0}
0x1bc3c…1bc70               Head {h00=0x0030, h01=0x0050, text=»         ADK      A5,1             INCREMENT«, t00=0x011c, t01=0x00e6}
0x1bc70…1bca4               Head {h00=0x0030, h01=0x0050, text=»         ANK      A5,/07           MODULO 8 «, t00=0x011c, t01=0x011a}
0x1bca4…1bcda               Head {h00=0x0032, h01=0x0050, text=»         SC       A5,PS,A13        SAVE NEW PS«, t00=0x011c, t01=0x014e}
0x1bcda…1bd10               Head {h00=0x0032, h01=0x0050, text=» SC A1,IDENT,A2 SAVE PS & PR IN OUTPUT BUFFER «, t00=0x011c, t01=0x0184}
0x1bd10…1bd1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x002a}
0x1bd1a…1bd44               Head {h00=0x0026, h01=0x0050, text=»* COPY USER DATA TO OUTPUT BUFFER «, t00=0x011d, t01=0x0034}
0x1bd44…1bd4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x005e}
0x1bd4e…1bd7a               Head {h00=0x0028, h01=0x0050, text=» LD A1,ECBBA,A9 USER BUFFER ADDRESS «, t00=0x011d, t01=0x0068}
0x1bd7a…1bd9e               Head {h00=0x0020, h01=0x0050, text=» ADK A2,BEGDAT WHERE TO MOVE«, t00=0x011d, t01=0x0094}
0x1bd9e…1bdb6               Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBRL,A9 «, t00=0x011d, t01=0x00b8}
0x1bdb6…1bdc8               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x011d, t01=0x00d0}
0x1bdc8…1bdde               Head {h00=0x0012, h01=0x0050, text=» ADK A4,BEGDAT«, t00=0x011d, t01=0x00e2}
0x1bdde…1be04               Head {h00=0x0022, h01=0x0050, text=» ST A4,ECBRL,A8 OUTPUT BUFFER «, t00=0x011d, t01=0x00f8}
0x1be04…1be1c               Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTTAB,A6«, t00=0x011d, t01=0x011e}
0x1be1c…1be4a               Head {h00=0x002a, h01=0x0050, text=» CF A15,MOVUS MOVE FROM USER TO SYSTEM«, t00=0x011d, t01=0x0136}
0x1be4a…1be54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x0164}
0x1be54…1be72               Head {h00=0x001a, h01=0x0050, text=»* ISSUE OUTPUT REQUEST«, t00=0x011d, t01=0x016e}
0x1be72…1be7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x018c}
0x1be7c…1be90               Head {h00=0x0010, h01=0x0050, text=»OUT040 EQU *«, t00=0x011e, t01=0x0008}
0x1be90…1beb4               Head {h00=0x0020, h01=0x0050, text=» LDR A1,A8 PARAMETER ADDRESS«, t00=0x011e, t01=0x001c}
0x1beb4…1bed6               Head {h00=0x001e, h01=0x0050, text=» LDK A7,TRANSM ORDER CODE «, t00=0x011e, t01=0x0040}
0x1bed6…1bee0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x0062}
0x1bee0…1beec               Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x011e, t01=0x006c}
0x1beec…1befc               Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x011e, t01=0x0078}
0x1befc…1bf32               Head {h00=0x0032, h01=0x0050, text=» DATA ENDOUT ACTIVATION LABEL AFTER COMPLETION«, t00=0x011e, t01=0x0088}
0x1bf32…1bf80               Head {h00=0x004a, h01=0x0050, text=»         IM       NRPNDT,A12       INCREMENT NUMBER OF PENDING OUTPUT «, t00=0x011e, t01=0x00be}
0x1bf80…1bfac               Head {h00=0x0028, h01=0x0050, text=» RF OUT060 CONTROL BACK TO SCHEDULER«, t00=0x011e, t01=0x010c}
0x1bfac…1bfb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x0138}
0x1bfb6…1bfc4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011e, t01=0x0142}
0x1bfc4…1bfce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x0150}
0x1bfce…1bffe               Head {h00=0x002c, h01=0x0050, text=»* NO TRANSMISSION ALLOWED AT THIS MOMENT«, t00=0x011e, t01=0x015a}
0x1bffe…1c008               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x018a}
0x1c008…1c01c (287, 0, 400) Head {h00=0x0010, h01=0x0050, text=»OUT050 EQU *«, t00=0x011f, t01=0x0004}
0x1c01c…1c03e               Head {h00=0x001e, h01=0x0050, text=»         CM       ECBBA,A8«, t00=0x011f, t01=0x0018}
0x1c03e…1c066               Head {h00=0x0024, h01=0x0050, text=» LD A1,SAVE QUEUE ANCHOR ADDRESS«, t00=0x011f, t01=0x003a}
0x1c066…1c088               Head {h00=0x001e, h01=0x0050, text=» LDR A2,A6 ELEMENT ADDRESS«, t00=0x011f, t01=0x0062}
0x1c088…1c0b4               Head {h00=0x0028, h01=0x0050, text=» CF A14,QUEUEF ELEMENT BACK TO QUEUE«, t00=0x011f, t01=0x0084}
0x1c0b4…1c0e4               Head {h00=0x002c, h01=0x0050, text=» LDK A2,NPRFLG SET "NO PROCESSING" FLAG «, t00=0x011f, t01=0x00b0}
0x1c0e4…1c0fa               Head {h00=0x0012, h01=0x0050, text=» ORRS A2,A1 . «, t00=0x011f, t01=0x00e0}
0x1c0fa…1c10e               Head {h00=0x0010, h01=0x0050, text=»OUT060 EQU *«, t00=0x011f, t01=0x00f6}
0x1c10e…1c13c               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x011f, t01=0x010a}
0x1c13c…1c152               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x011f, t01=0x0138}
0x1c152…1c15c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x014e}
0x1c15c…1c16a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011f, t01=0x0158}
0x1c16a…1c174               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x0166}
0x1c174…1c19e               Head {h00=0x0026, h01=0x0050, text=»* PREPARE AND TRANSMIT CALL PACKET«, t00=0x011f, t01=0x0170}
0x1c19e…1c1a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x000a}
0x1c1a8…1c1bc               Head {h00=0x0010, h01=0x0050, text=»OUT100 EQU *«, t00=0x0120, t01=0x0014}
0x1c1bc…1c1d2               Head {h00=0x0012, h01=0x0050, text=» LDK A1,CAL.P «, t00=0x0120, t01=0x0028}
0x1c1d2…1c1f6               Head {h00=0x0020, h01=0x0050, text=» SC A1,IDENT,A2 PACKET TYPE «, t00=0x0120, t01=0x003e}
0x1c1f6…1c200               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x0062}
0x1c200…1c220               Head {h00=0x001c, h01=0x0050, text=»* GET REMOTE DTE-ADDRESS«, t00=0x0120, t01=0x006c}
0x1c220…1c22a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x008c}
0x1c22a…1c242               Head {h00=0x0014, h01=0x0050, text=» ADK A2,BEGDAT+1«, t00=0x0120, t01=0x0096}
0x1c242…1c254               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0120, t01=0x00ae}
0x1c254…1c26c               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTRAD,A6«, t00=0x0120, t01=0x00c0}
0x1c26c…1c28c               Head {h00=0x001c, h01=0x0050, text=» LDKL A3,SVCTYP SET TYPE«, t00=0x0120, t01=0x00d8}
0x1c28c…1c29e               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x0120, t01=0x00f8}
0x1c29e…1c2ca               Head {h00=0x0028, h01=0x0050, text=» CF A15,GETDNT GET REAL DTE-ADDRESS «, t00=0x0120, t01=0x010a}
0x1c2ca…1c2dc               Head {h00=0x000e, h01=0x0050, text=» ENB  . =1«, t00=0x0120, t01=0x0136}
0x1c2dc…1c2fa               Head {h00=0x001a, h01=0x0050, text=» LDR A3,A1 SAVE LENGTH«, t00=0x0120, t01=0x0148}
0x1c2fa…1c310               Head {h00=0x0012, h01=0x0050, text=» IFT CALDTE=1 «, t00=0x0120, t01=0x0166}
0x1c310…1c31a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x017c}
0x1c31a…1c33a               Head {h00=0x001c, h01=0x0050, text=»* GET LOCAL DTE-ADDRESS «, t00=0x0120, t01=0x0186}
0x1c33a…1c344               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x0016}
0x1c344…1c364               Head {h00=0x001c, h01=0x0050, text=» LDR A7,A2 SAVE ADDRESS «, t00=0x0121, t01=0x0020}
0x1c364…1c37c               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTLAD,A6«, t00=0x0121, t01=0x0040}
0x1c37c…1c38e               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x0121, t01=0x0058}
0x1c38e…1c3bc               Head {h00=0x002a, h01=0x0050, text=» CF A15,GETDNA GET DTE NETWORK ADDRESS«, t00=0x0121, t01=0x006a}
0x1c3bc…1c3ce               Head {h00=0x000e, h01=0x0050, text=» ENB  . =1«, t00=0x0121, t01=0x0098}
0x1c3ce…1c3f8               Head {h00=0x0026, h01=0x0050, text=» SLL A1,4 PUT IT IN RIGTH POSITION«, t00=0x0121, t01=0x00aa}
0x1c3f8…1c42a               Head {h00=0x002e, h01=0x0050, text=» ORR A3,A1 CALLING AND CALLED DTE-ADDRESS «, t00=0x0121, t01=0x00d4}
0x1c42a…1c434               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x0106}
0x1c434…1c442               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0121, t01=0x0110}
0x1c442…1c44c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x011e}
0x1c44c…1c480               Head {h00=0x0030, h01=0x0050, text=»* TEST IF LOCAL DTE-ADDRESS HAS TO BE MOVED «, t00=0x0121, t01=0x0128}
0x1c480…1c48a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x015c}
0x1c48a…1c4ba               Head {h00=0x002c, h01=0x0050, text=» LDR A5,A3 REMOTE DTE-ADDRESS LENGTH... «, t00=0x0121, t01=0x0166}
0x1c4ba…1c4ea               Head {h00=0x002c, h01=0x0050, text=» ANK A5,/01 GIVES SEMI-OCTET BOUNDARY ? «, t00=0x0122, t01=0x0008}
0x1c4ea…1c502               Head {h00=0x0014, h01=0x0050, text=» RF(Z) OUT145 NO«, t00=0x0122, t01=0x0038}
0x1c502…1c50c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0050}
0x1c50c…1c52c               Head {h00=0x001c, h01=0x0050, text=»* MOVE LOCAL DTE-ADDRESS«, t00=0x0122, t01=0x005a}
0x1c52c…1c536               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x007a}
0x1c536…1c562               Head {h00=0x0028, h01=0x0050, text=» SRL A1,4 A1:=LENGTH IN SEMI-OCTETS «, t00=0x0122, t01=0x0084}
0x1c562…1c588               Head {h00=0x0022, h01=0x0050, text=» LDR A5,A7 A7:=WHERE TO GET IT«, t00=0x0122, t01=0x00b0}
0x1c588…1c5b0               Head {h00=0x0024, h01=0x0050, text=» SUK A5,/01 A5:=WHERE TO PUT IT «, t00=0x0122, t01=0x00d6}
0x1c5b0…1c5c4               Head {h00=0x0010, h01=0x0050, text=»OUT130 EQU *«, t00=0x0122, t01=0x00fe}
0x1c5c4…1c5f4               Head {h00=0x002c, h01=0x0050, text=» LCR A2,A5 GET STORED SECOND SEMI-OCTET «, t00=0x0122, t01=0x0112}
0x1c5f4…1c606               Head {h00=0x000e, h01=0x0050, text=» SLL A2,4 «, t00=0x0122, t01=0x0142}
0x1c606…1c618               Head {h00=0x000e, h01=0x0050, text=» LCR A2,A7«, t00=0x0122, t01=0x0154}
0x1c618…1c646               Head {h00=0x002a, h01=0x0050, text=» SRL A2,4 PUT TWO SEMI-OCTETS TOGETHER«, t00=0x0122, t01=0x0166}
0x1c646…1c668 (291, 0, 400) Head {h00=0x001e, h01=0x0050, text=» SCR A2,A5 AND STORE THEM «, t00=0x0123, t01=0x0004}
0x1c668…1c690               Head {h00=0x0024, h01=0x0050, text=» ADK A5,1 INCREMENT 'TO'-POINTER«, t00=0x0123, t01=0x0026}
0x1c690…1c6b0               Head {h00=0x001c, h01=0x0050, text=» SUK A1,1 DECRESE LENGTH«, t00=0x0123, t01=0x004e}
0x1c6b0…1c6cc               Head {h00=0x0018, h01=0x0050, text=» RF(Z) OUT140 READY «, t00=0x0123, t01=0x006e}
0x1c6cc…1c6f8               Head {h00=0x0028, h01=0x0050, text=» LCR A2,A7 GET NEXT TWO SEMI-OCTETS «, t00=0x0123, t01=0x008a}
0x1c6f8…1c70a               Head {h00=0x000e, h01=0x0050, text=» SLL A2,4 «, t00=0x0123, t01=0x00b6}
0x1c70a…1c734               Head {h00=0x0026, h01=0x0050, text=» SCR A2,A5 STORE SECOND SEMI-OCTET«, t00=0x0123, t01=0x00c8}
0x1c734…1c75e               Head {h00=0x0026, h01=0x0050, text=» ADK A7,1 INCREMENT 'FROM'-POINTER«, t00=0x0123, t01=0x00f2}
0x1c75e…1c778               Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 READY ? «, t00=0x0123, t01=0x011c}
0x1c778…1c790               Head {h00=0x0014, h01=0x0050, text=» RB(P) OUT130 NO«, t00=0x0123, t01=0x0136}
0x1c790…1c7a2               Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x0123, t01=0x014e}
0x1c7a2…1c7b6               Head {h00=0x0010, h01=0x0050, text=»OUT140 EQU *«, t00=0x0123, t01=0x0160}
0x1c7b6…1c7da               Head {h00=0x0020, h01=0x0050, text=» LDR A2,A5 NEXT FREE ADDRESS«, t00=0x0123, t01=0x0174}
0x1c7da…1c7ee               Head {h00=0x0010, h01=0x0050, text=»OUT145 EQU *«, t00=0x0124, t01=0x0008}
0x1c7ee…1c7fa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0124, t01=0x001c}
0x1c7fa…1c804               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x0028}
0x1c804…1c812               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0124, t01=0x0032}
0x1c812…1c81c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x0040}
0x1c81c…1c832               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0124, t01=0x004a}
0x1c832…1c846               Head {h00=0x0010, h01=0x0050, text=» IFT LOOP=1 «, t00=0x0124, t01=0x0060}
0x1c846…1c850               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x0074}
0x1c850…1c87c               Head {h00=0x0028, h01=0x0050, text=»* EXCHANGE CALLING AND CALLED LENGTH«, t00=0x0124, t01=0x007e}
0x1c87c…1c886               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x00aa}
0x1c886…1c898               Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x0124, t01=0x00b4}
0x1c898…1c8aa               Head {h00=0x000e, h01=0x0050, text=» SRL A3,8 «, t00=0x0124, t01=0x00c6}
0x1c8aa…1c8b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0124, t01=0x00d8}
0x1c8b6…1c8cc               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0124, t01=0x00e4}
0x1c8cc…1c8de               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0124, t01=0x00fa}
0x1c8de…1c910               Head {h00=0x002e, h01=0x0050, text=» SCR A3,A4 STORE CALLING AND CALLED LENGTH«, t00=0x0124, t01=0x010c}
0x1c910…1c91a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x013e}
0x1c91a…1c940               Head {h00=0x0022, h01=0x0050, text=»* USER FACILITIES & USER DATA «, t00=0x0124, t01=0x0148}
0x1c940…1c94a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x016e}
0x1c94a…1c962               Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBRL,A9 «, t00=0x0124, t01=0x0178}
0x1c962…1c98a               Head {h00=0x0024, h01=0x0050, text=» RF(Z) OUT180 NO DATA SPECIFIED «, t00=0x0124, t01=0x0190}
0x1c98a…1c9a2               Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTTAB,A6«, t00=0x0125, t01=0x0028}
0x1c9a2…1c9ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0125, t01=0x0040}
0x1c9ac…1c9ce               Head {h00=0x001e, h01=0x0050, text=»* TEST IF FACILITIES ONLY «, t00=0x0125, t01=0x004a}
0x1c9ce…1c9d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0125, t01=0x006c}
0x1c9d8…1c9f0               Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBBA,A9 «, t00=0x0125, t01=0x0076}
0x1c9f0…1ca02               Head {h00=0x000e, h01=0x0050, text=» LCR A7,A1«, t00=0x0125, t01=0x008e}
0x1ca02…1ca26               Head {h00=0x0020, h01=0x0050, text=» ANK A7,/FF FACILITY LENGTH «, t00=0x0125, t01=0x00a0}
0x1ca26…1ca66               Head {h00=0x003c, h01=0x0050, text=»         RF(Z)    OUT150           NO FACILITIES AT ALL «, t00=0x0125, t01=0x00c4}
0x1ca66…1ca84               Head {h00=0x001a, h01=0x0050, text=»         ADK      A7,1«, t00=0x0125, t01=0x0104}
0x1ca84…1caa4               Head {h00=0x001c, h01=0x0050, text=»         SUR      A7,A3 «, t00=0x0125, t01=0x0122}
0x1caa4…1cade               Head {h00=0x0036, h01=0x0050, text=»         RF(Z)    OUT148           FACILITIES ONLY«, t00=0x0125, t01=0x0142}
0x1cade…1cb2c               Head {h00=0x004a, h01=0x0050, text=»         LDK      A7,0             A7:=INDICATION NOT ONLY FACILITIES «, t00=0x0125, t01=0x017c}
0x1cb2c…1cb4c               Head {h00=0x001c, h01=0x0050, text=»         RF       OUT150«, t00=0x0126, t01=0x003a}
0x1cb4c…1cb56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x005a}
0x1cb56…1cb72               Head {h00=0x0018, h01=0x0050, text=»OUT148   EQU      * «, t00=0x0126, t01=0x0064}
0x1cb72…1cbbc               Head {h00=0x0046, h01=0x0050, text=»         LDK      A7,/C0           A7:=INDICATION FACILITIES ONLY «, t00=0x0126, t01=0x0080}
0x1cbbc…1cbd0               Head {h00=0x0010, h01=0x0050, text=»OUT150 EQU *«, t00=0x0126, t01=0x00ca}
0x1cbd0…1cbe2               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x0126, t01=0x00de}
0x1cbe2…1cc10               Head {h00=0x002a, h01=0x0050, text=» CF A15,MOVUS MOVE FROM USER TO SYSTEM«, t00=0x0126, t01=0x00f0}
0x1cc10…1cc22               Head {h00=0x000e, h01=0x0050, text=» ENB  . =1«, t00=0x0126, t01=0x011e}
0x1cc22…1cc2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0130}
0x1cc2c…1cc3a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0126, t01=0x013a}
0x1cc3a…1cc44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0148}
0x1cc44…1cc66               Head {h00=0x001e, h01=0x0050, text=»* TEST IF ONLY FACILITIES «, t00=0x0126, t01=0x0152}
0x1cc66…1cc70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0174}
0x1cc70…1cc90               Head {h00=0x001c, h01=0x0050, text=»         LDR      A7,A7 «, t00=0x0126, t01=0x017e}
0x1cc90…1ccbe               Head {h00=0x002a, h01=0x0050, text=»         RF(Z)    OUT190           NO «, t00=0x0127, t01=0x000e}
0x1ccbe…1ccde               Head {h00=0x001c, h01=0x0050, text=»         RF       OUT188«, t00=0x0127, t01=0x003c}
0x1ccde…1cce8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x005c}
0x1cce8…1cd08               Head {h00=0x001c, h01=0x0050, text=»* NO USER DATA SPECIFIED«, t00=0x0127, t01=0x0066}
0x1cd08…1cd12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x0086}
0x1cd12…1cd26               Head {h00=0x0010, h01=0x0050, text=»OUT180 EQU *«, t00=0x0127, t01=0x0090}
0x1cd26…1cd38               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0127, t01=0x00a4}
0x1cd38…1cd62               Head {h00=0x0026, h01=0x0050, text=» SCR A1,A2 FACILITY LENGTH = ZERO «, t00=0x0127, t01=0x00b6}
0x1cd62…1cd82               Head {h00=0x001c, h01=0x0050, text=» ADK A2,1 UPDATE POINTER«, t00=0x0127, t01=0x00e0}
0x1cd82…1cd9e               Head {h00=0x0018, h01=0x0050, text=»OUT188   EQU      * «, t00=0x0127, t01=0x0100}
0x1cd9e…1cdb2               Head {h00=0x0010, h01=0x0050, text=» LDK A1,/C0 «, t00=0x0127, t01=0x011c}
0x1cdb2…1cddc               Head {h00=0x0026, h01=0x0050, text=» SCR A1,A2 SET PROTOCOL IDENTIFIER«, t00=0x0127, t01=0x0130}
0x1cddc…1cdfc               Head {h00=0x001c, h01=0x0050, text=» ADK A2,1 UPDATE POINTER«, t00=0x0127, t01=0x015a}
0x1cdfc…1ce06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x017a}
0x1ce06…1ce30               Head {h00=0x0026, h01=0x0050, text=»* CALCULATE LENGTH OF CALL PACKET «, t00=0x0127, t01=0x0184}
0x1ce30…1ce3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x001e}
0x1ce3a…1ce4e               Head {h00=0x0010, h01=0x0050, text=»OUT190 EQU *«, t00=0x0128, t01=0x0028}
0x1ce4e…1ce66               Head {h00=0x0014, h01=0x0050, text=» SU A2,ECBBA,A8 «, t00=0x0128, t01=0x003c}
0x1ce66…1ce8c               Head {h00=0x0022, h01=0x0050, text=» ST A2,ECBRL,A8 LENGTH TO ECB «, t00=0x0128, t01=0x0054}
0x1ce8c…1ce96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x007a}
0x1ce96…1ceb0               Head {h00=0x0016, h01=0x0050, text=»* COMPLETE LC-ADM «, t00=0x0128, t01=0x0084}
0x1ceb0…1ceba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x009e}
0x1ceba…1cee6               Head {h00=0x0028, h01=0x0050, text=» LD A2,ECBBA,A8 ADDRESS CALL PACKET «, t00=0x0128, t01=0x00a8}
0x1cee6…1cf1c               Head {h00=0x0032, h01=0x0050, text=» CF A14,GTWNDS GET WINDOW SIZE & PACKET LENGTH«, t00=0x0128, t01=0x00d4}
0x1cf1c…1cf50               Head {h00=0x0030, h01=0x0050, text=» CF A14,TRTHR TRANSLATE THRESHOLD PERCENTAGE«, t00=0x0128, t01=0x010a}
0x1cf50…1cf64               Head {h00=0x0010, h01=0x0050, text=»OUT195 EQU *«, t00=0x0128, t01=0x013e}
0x1cf64…1cf8c               Head {h00=0x0024, h01=0x0050, text=» ABL OUT040 ISSUE OUTPUT REQUEST«, t00=0x0128, t01=0x0152}
0x1cf8c…1cf9a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0128, t01=0x017a}
0x1cf9a…1cfa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x0188}
0x1cfa4…1cfca (297, 0, 400) Head {h00=0x0022, h01=0x0050, text=»* TRANSMISSION OF CLEAR PACKET«, t00=0x0129, t01=0x0004}
0x1cfca…1cfd4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0129, t01=0x002a}
0x1cfd4…1cfe8               Head {h00=0x0010, h01=0x0050, text=»OUT200 EQU *«, t00=0x0129, t01=0x0034}
0x1cfe8…1cffe               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0129, t01=0x0048}
0x1cffe…1d022               Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBBA,A9 USER BUFFER «, t00=0x0129, t01=0x005e}
0x1d022…1d056               Head {h00=0x0030, h01=0x0050, text=» ADK A2,DGNCOD DIAGNOSTIC CODE DISPLACEMENT «, t00=0x0129, t01=0x0082}
0x1d056…1d06e               Head {h00=0x0014, h01=0x0050, text=» LDK A3,1 LENGTH«, t00=0x0129, t01=0x00b6}
0x1d06e…1d086               Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTTAB,A6«, t00=0x0129, t01=0x00ce}
0x1d086…1d098               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x0129, t01=0x00e6}
0x1d098…1d0c6               Head {h00=0x002a, h01=0x0050, text=» CF A15,MOVUS MOVE FROM USER TO SYSTEM«, t00=0x0129, t01=0x00f8}
0x1d0c6…1d0d8               Head {h00=0x000e, h01=0x0050, text=» ENB  . =1«, t00=0x0129, t01=0x0126}
0x1d0d8…1d10e               Head {h00=0x0032, h01=0x0050, text=» SUK A2,DGNCOD+1 RESTORE SYSTEM BUFFER ADDRESS«, t00=0x0129, t01=0x0138}
0x1d10e…1d11a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0129, t01=0x016e}
0x1d11a…1d130               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0129, t01=0x017a}
0x1d130…1d146               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0129, t01=0x0190}
0x1d146…1d16e               Head {h00=0x0024, h01=0x0050, text=» LC* A1,ECBBA,A9 DIAGNOSTIC CODE«, t00=0x012a, t01=0x0016}
0x1d16e…1d186               Head {h00=0x0014, h01=0x0050, text=» SC A1,DGNCOD,A2«, t00=0x012a, t01=0x003e}
0x1d186…1d198               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x012a, t01=0x0056}
0x1d198…1d1a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012a, t01=0x0068}
0x1d1a4…1d1ba               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x012a, t01=0x0074}
0x1d1ba…1d1e4               Head {h00=0x0026, h01=0x0050, text=» SC A3,CAUSE,A2 RESET CAUSE FIELD «, t00=0x012a, t01=0x008a}
0x1d1e4…1d20c               Head {h00=0x0024, h01=0x0050, text=» LDK A1,CLE.P CLEAR PACKET TYPE «, t00=0x012a, t01=0x00b4}
0x1d20c…1d230               Head {h00=0x0020, h01=0x0050, text=» LDK A4,CLE.L PACKET LENGTH «, t00=0x012a, t01=0x00dc}
0x1d230…1d242               Head {h00=0x000e, h01=0x0050, text=» RF OUT260«, t00=0x012a, t01=0x0100}
0x1d242…1d24c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x0112}
0x1d24c…1d27e               Head {h00=0x002e, h01=0x0050, text=»* TRANSMISSION OF CALL CONFIRMATION PACKET«, t00=0x012a, t01=0x011c}
0x1d27e…1d288               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x014e}
0x1d288…1d29c               Head {h00=0x0010, h01=0x0050, text=»OUT210 EQU *«, t00=0x012a, t01=0x0158}
0x1d29c…1d2d0               Head {h00=0x0030, h01=0x0050, text=» LDK A1,CAL.CP CALL CONFIRMATION PACKET TYPE«, t00=0x012a, t01=0x016c}
0x1d2d0…1d2f4               Head {h00=0x0020, h01=0x0050, text=» LDK A4,CAL.CL PACKET LENGTH«, t00=0x012b, t01=0x0010}
0x1d2f4…1d306               Head {h00=0x000e, h01=0x0050, text=» RF OUT260«, t00=0x012b, t01=0x0034}
0x1d306…1d310               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x0046}
0x1d310…1d31c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012b, t01=0x0050}
0x1d31c…1d326               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x005c}
0x1d326…1d334               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012b, t01=0x0066}
0x1d334…1d33e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x0074}
0x1d33e…1d368               Head {h00=0x0026, h01=0x0050, text=»* TRANSMISSION OF INTERRUPT PACKET«, t00=0x012b, t01=0x007e}
0x1d368…1d372               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x00a8}
0x1d372…1d386               Head {h00=0x0010, h01=0x0050, text=»OUT220 EQU *«, t00=0x012b, t01=0x00b2}
0x1d386…1d39c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x012b, t01=0x00c6}
0x1d39c…1d3c0               Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBBA,A9 USER BUFFER «, t00=0x012b, t01=0x00dc}
0x1d3c0…1d3f2               Head {h00=0x002e, h01=0x0050, text=» ADK A2,CAUSE INTERRUPT DATA DISPLACEMENT «, t00=0x012b, t01=0x0100}
0x1d3f2…1d40a               Head {h00=0x0014, h01=0x0050, text=» LDK A3,1 LENGTH«, t00=0x012b, t01=0x0132}
0x1d40a…1d422               Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTTAB,A6«, t00=0x012b, t01=0x014a}
0x1d422…1d434               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x012b, t01=0x0162}
0x1d434…1d462               Head {h00=0x002a, h01=0x0050, text=» CF A15,MOVUS MOVE FROM USER TO SYSTEM«, t00=0x012b, t01=0x0174}
0x1d462…1d474               Head {h00=0x000e, h01=0x0050, text=» ENB  . =1«, t00=0x012c, t01=0x0012}
0x1d474…1d4aa               Head {h00=0x0032, h01=0x0050, text=» SUK A2,CAUSE+1 RESTORE SYSTEM BUFFER ADDRESS «, t00=0x012c, t01=0x0024}
0x1d4aa…1d4b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012c, t01=0x005a}
0x1d4b6…1d4cc               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x012c, t01=0x0066}
0x1d4cc…1d4f4               Head {h00=0x0024, h01=0x0050, text=» LC* A1,ECBBA,A9 INTERRUPT DATA «, t00=0x012c, t01=0x007c}
0x1d4f4…1d50c               Head {h00=0x0014, h01=0x0050, text=» SC A1,CAUSE,A2 «, t00=0x012c, t01=0x00a4}
0x1d50c…1d518               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012c, t01=0x00bc}
0x1d518…1d544               Head {h00=0x0028, h01=0x0050, text=» LDK A1,INT.P INTERRUPT PACKET TYPE «, t00=0x012c, t01=0x00c8}
0x1d544…1d568               Head {h00=0x0020, h01=0x0050, text=» LDK A4,INT.L PACKET LENGTH «, t00=0x012c, t01=0x00f4}
0x1d568…1d57c               Head {h00=0x0010, h01=0x0050, text=»OUT260 EQU *«, t00=0x012c, t01=0x0118}
0x1d57c…1d594               Head {h00=0x0014, h01=0x0050, text=» SC A1,IDENT,A2 «, t00=0x012c, t01=0x012c}
0x1d594…1d5b0               Head {h00=0x0018, h01=0x0050, text=»OUT270   EQU      * «, t00=0x012c, t01=0x0144}
0x1d5b0…1d5d6               Head {h00=0x0022, h01=0x0050, text=» ST A4,ECBRL,A8 PACKET LENGTH «, t00=0x012c, t01=0x0160}
0x1d5d6…1d5fe               Head {h00=0x0024, h01=0x0050, text=» ABL OUT040 ISSUE OUTPUT REQUEST«, t00=0x012c, t01=0x0186}
0x1d5fe…1d60c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012d, t01=0x001e}
0x1d60c…1d616               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x002c}
0x1d616…1d642               Head {h00=0x0028, h01=0x0050, text=»* TRANSMISSION OF RR- OR RNR PACKET «, t00=0x012d, t01=0x0036}
0x1d642…1d64c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x0062}
0x1d64c…1d660               Head {h00=0x0010, h01=0x0050, text=»OUT300 EQU *«, t00=0x012d, t01=0x006c}
0x1d660…1d684               Head {h00=0x0020, h01=0x0050, text=» LDK A1,RR.P RR-PACKET TYPE «, t00=0x012d, t01=0x0080}
0x1d684…1d696               Head {h00=0x000e, h01=0x0050, text=» RF OUT320«, t00=0x012d, t01=0x00a4}
0x1d696…1d6a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x00b6}
0x1d6a0…1d6b4               Head {h00=0x0010, h01=0x0050, text=»OUT310 EQU *«, t00=0x012d, t01=0x00c0}
0x1d6b4…1d6da               Head {h00=0x0022, h01=0x0050, text=» LDK A1,RNR.P RNR-PACKET TYPE «, t00=0x012d, t01=0x00d4}
0x1d6da…1d6ee               Head {h00=0x0010, h01=0x0050, text=»OUT320 EQU *«, t00=0x012d, t01=0x00fa}
0x1d6ee…1d70a               Head {h00=0x0018, h01=0x0050, text=» LC A3,PR,A13 GET PR«, t00=0x012d, t01=0x010e}
0x1d70a…1d750               Head {h00=0x0042, h01=0x0050, text=»         SC       A3,RLWE,A13      SAVE IT AS LAST TRANMITTED «, t00=0x012d, t01=0x012a}
0x1d750…1d762               Head {h00=0x000e, h01=0x0050, text=» SLL A3,5 «, t00=0x012d, t01=0x0170}
0x1d762…1d78e               Head {h00=0x0028, h01=0x0050, text=» ORR A3,A1 COMBINE WITH PACKET TYPE «, t00=0x012d, t01=0x0182}
0x1d78e…1d7b6               Head {h00=0x0024, h01=0x0050, text=» SC A3,IDENT,A2 TO OUTPUT BUFFER«, t00=0x012e, t01=0x001e}
0x1d7b6…1d7d8               Head {h00=0x001e, h01=0x0050, text=» LDK A4,RR.L PACKET LENGTH«, t00=0x012e, t01=0x0046}
0x1d7d8…1d800               Head {h00=0x0024, h01=0x0050, text=» RB OUT270 ISSUE OUTPUT REQUEST «, t00=0x012e, t01=0x0068}
0x1d800…1d80a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x0090}
0x1d80a…1d82c               Head {h00=0x001e, h01=0x0050, text=»* TRANSMISSION OF A PACKET«, t00=0x012e, t01=0x009a}
0x1d82c…1d836               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x00bc}
0x1d836…1d84a               Head {h00=0x0010, h01=0x0050, text=»OUT400 EQU *«, t00=0x012e, t01=0x00c6}
0x1d84a…1d878               Head {h00=0x002a, h01=0x0050, text=» ST A2,ECBBA,A8 BUFFER ADDRESS TO ECB «, t00=0x012e, t01=0x00da}
0x1d878…1d88e               Head {h00=0x0012, h01=0x0050, text=» LDK A1,RSET.P«, t00=0x012e, t01=0x0108}
0x1d88e…1d8bc               Head {h00=0x002a, h01=0x0050, text=» CC A1,IDENT,A2 IS IT A RESET PACKET ?«, t00=0x012e, t01=0x011e}
0x1d8bc…1d8d6               Head {h00=0x0016, h01=0x0050, text=» RF(NE) OUT410 NO «, t00=0x012e, t01=0x014c}
0x1d8d6…1d900               Head {h00=0x0026, h01=0x0050, text=» LDK A1,NPRFLG BLOCK OUTPUT QUEUE «, t00=0x012e, t01=0x0166}
0x1d900…1d91c               Head {h00=0x0018, h01=0x0050, text=» ORS A1,QUEOUT,A13 .«, t00=0x012e, t01=0x0190}
0x1d91c…1d930               Head {h00=0x0010, h01=0x0050, text=»OUT410 EQU *«, t00=0x012f, t01=0x001c}
0x1d930…1d954               Head {h00=0x0020, h01=0x0050, text=» LD A4,HDLC,A2 BUFFER LENGTH«, t00=0x012f, t01=0x0030}
0x1d954…1d97c               Head {h00=0x0024, h01=0x0050, text=» RB OUT270 ISSUE OUTPUT REQUEST «, t00=0x012f, t01=0x0054}
0x1d97c…1d98a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012f, t01=0x007c}
0x1d98a…1d994               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x008a}
0x1d994…1d99e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x0094}
0x1d99e…1d9d8               Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE HANDLES A COMPLETED OUTPUT REQUEST «, t00=0x012f, t01=0x009e}
0x1d9d8…1d9e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x00d8}
0x1d9e2…1da16               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x012f, t01=0x00e2}
0x1da16…1da20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x0116}
0x1da20…1da3c               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x012f, t01=0x0120}
0x1da3c…1da58               Head {h00=0x0018, h01=0x0050, text=»*  A1 = ECB-ADDRESS «, t00=0x012f, t01=0x013c}
0x1da58…1da62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x0158}
0x1da62…1da7e               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x012f, t01=0x0162}
0x1da7e…1daa4               Head {h00=0x0022, h01=0x0050, text=»*  ACTIVATION ON LABEL ENDOUT «, t00=0x012f, t01=0x017e}
0x1daa4…1daae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x0014}
0x1daae…1dac2               Head {h00=0x0010, h01=0x0050, text=»ENDOUT EQU *«, t00=0x0130, t01=0x001e}
0x1dac2…1daea               Head {h00=0x0024, h01=0x0050, text=» LDK A3,1 SET PROCESS INDICATION«, t00=0x0130, t01=0x0032}
0x1daea…1db02               Head {h00=0x0014, h01=0x0050, text=» ST A3,DCLEVL . «, t00=0x0130, t01=0x005a}
0x1db02…1db2c               Head {h00=0x0026, h01=0x0050, text=» LDKL A14,DCSTAK SET STACK POINTER«, t00=0x0130, t01=0x0072}
0x1db2c…1db50               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A1 SAVE ECB-ADDRESS «, t00=0x0130, t01=0x009c}
0x1db50…1db7c               Head {h00=0x0028, h01=0x0050, text=» CF A14,GTLBA GET LINE BLOCK ADDRESS«, t00=0x0130, t01=0x00c0}
0x1db7c…1dba2               Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBBA,A8 BUFFER ADDRESS«, t00=0x0130, t01=0x00ec}
0x1dba2…1dbc0               Head {h00=0x001a, h01=0x0050, text=» CM ECBBA,A8 FREE ECB «, t00=0x0130, t01=0x0112}
0x1dbc0…1dbe4               Head {h00=0x0020, h01=0x0050, text=» CM HDLC,A2 FREE DWT-BUFFER «, t00=0x0130, t01=0x0130}
0x1dbe4…1dc0c               Head {h00=0x0024, h01=0x0050, text=» LD A5,ECBRC,A8 GET RETURN CODE «, t00=0x0130, t01=0x0154}
0x1dc0c…1dc34               Head {h00=0x0024, h01=0x0050, text=» RF(Z) ENDO30 CORRECT COMPLETED «, t00=0x0130, t01=0x017c}
0x1dc34…1dc5a               Head {h00=0x0022, h01=0x0050, text=» CWK A5,18 TRANSMITTER RESET ?«, t00=0x0131, t01=0x0014}
0x1dc5a…1dc74               Head {h00=0x0016, h01=0x0050, text=» RF(E) ENDO30 YES «, t00=0x0131, t01=0x003a}
0x1dc74…1dc7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x0054}
0x1dc7e…1dc8c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0131, t01=0x005e}
0x1dc8c…1dc96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x006c}
0x1dc96…1dce4               Head {h00=0x004a, h01=0x0050, text=»* THE OUTPUT REQUEST IS NOT CORRECT COMPLETED. WHEN THIS IS THE FIRST «, t00=0x0131, t01=0x0076}
0x1dce4…1dd30               Head {h00=0x0048, h01=0x0050, text=»* TIME A DISCONNECT REQUEST FOR THE DC-CONNECTION WILL BE GIVEN AND «, t00=0x0131, t01=0x00c4}
0x1dd30…1dd76               Head {h00=0x0042, h01=0x0050, text=»* ALL NOT READY SVC'S WILL BE CLEARED LOCAL AND ALL RELATIONS «, t00=0x0131, t01=0x0110}
0x1dd76…1dd9e               Head {h00=0x0024, h01=0x0050, text=»* DWT <--> PVC WILL BE RELEASED.«, t00=0x0131, t01=0x0156}
0x1dd9e…1dda8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x017e}
0x1dda8…1ddd6               Head {h00=0x002a, h01=0x0050, text=» LD A3,CMNFLG,A12 IS SUBSYS STARTED ? «, t00=0x0131, t01=0x0188}
0x1ddd6…1ddee               Head {h00=0x0014, h01=0x0050, text=» ANK A3,STRTFL .«, t00=0x0132, t01=0x0026}
0x1ddee…1de10               Head {h00=0x001e, h01=0x0050, text=» RF(Z) ENDO20 ALREADY DOWN«, t00=0x0132, t01=0x003e}
0x1de10…1de38               Head {h00=0x0024, h01=0x0050, text=» LDK A1,STRTFL RESET START FLAG «, t00=0x0132, t01=0x0060}
0x1de38…1de4c               Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x0132, t01=0x0088}
0x1de4c…1de68               Head {h00=0x0018, h01=0x0050, text=» ANS A1,CMNFLG,A12 .«, t00=0x0132, t01=0x009c}
0x1de68…1de92               Head {h00=0x0026, h01=0x0050, text=» ST A5,HRDSTA,A12 SAVE RETURN CODE«, t00=0x0132, t01=0x00b8}
0x1de92…1ded2               Head {h00=0x003c, h01=0x0050, text=»         LDK      A6,0                 NO DWT AVAILABLE «, t00=0x0132, t01=0x00e2}
0x1ded2…1df04               Head {h00=0x002e, h01=0x0050, text=» CF A14,STOP ISSUE DISCONNECT LINE REQUEST«, t00=0x0132, t01=0x0122}
0x1df04…1df38               Head {h00=0x0030, h01=0x0050, text=» LDK A1,LOCCLE DIAGN. CODE = LOST CONNECTION«, t00=0x0132, t01=0x0154}
0x1df38…1df64               Head {h00=0x0028, h01=0x0050, text=» CF A14,CLAVCS CLEAR ALL VC'S LOCAL «, t00=0x0132, t01=0x0188}
0x1df64…1df78               Head {h00=0x0010, h01=0x0050, text=»ENDO20 EQU *«, t00=0x0133, t01=0x0024}
0x1df78…1df8c               Head {h00=0x0010, h01=0x0050, text=» LDKL A1,-1 «, t00=0x0133, t01=0x0038}
0x1df8c…1dfcc               Head {h00=0x003c, h01=0x0050, text=» ADS A1,NRPNDT,A12 DECREASE # OF PENDING TRANSM. REQUE. «, t00=0x0133, t01=0x004c}
0x1dfcc…1dffa               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0133, t01=0x008c}
0x1dffa…1e004               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x00ba}
0x1e004…1e02e               Head {h00=0x0026, h01=0x0050, text=»* CORRECT COMPLETED OUTPUT REQUEST«, t00=0x0133, t01=0x00c4}
0x1e02e…1e038               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x00ee}
0x1e038…1e04c               Head {h00=0x0010, h01=0x0050, text=»ENDO30 EQU *«, t00=0x0133, t01=0x00f8}
0x1e04c…1e07c               Head {h00=0x002c, h01=0x0050, text=» LC A4,LCIDNT,A2 LOGICAL CHANNEL NUMBER «, t00=0x0133, t01=0x010c}
0x1e07c…1e092               Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x0133, t01=0x013c}
0x1e092…1e0bc               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x0133, t01=0x0152}
0x1e0bc…1e0e4               Head {h00=0x0024, h01=0x0050, text=» LD A6,LCDWT,A13 GET DWT-ADDRESS«, t00=0x0133, t01=0x017c}
0x1e0e4…1e100               Head {h00=0x0018, h01=0x0050, text=» RF(Z) ENDO56 NO DWT«, t00=0x0134, t01=0x0014}
0x1e100…1e122               Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT-STATUS«, t00=0x0134, t01=0x0030}
0x1e122…1e138               Head {h00=0x0012, h01=0x0050, text=» RF(N) ENDO56 «, t00=0x0134, t01=0x0052}
0x1e138…1e142               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x0068}
0x1e142…1e150               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0134, t01=0x0072}
0x1e150…1e15a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x0080}
0x1e15a…1e178               Head {h00=0x001a, h01=0x0050, text=»* TEST IF DATA PACKET «, t00=0x0134, t01=0x008a}
0x1e178…1e182               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x00a8}
0x1e182…1e19a               Head {h00=0x0014, h01=0x0050, text=» LC A3,IDENT,A2 «, t00=0x0134, t01=0x00b2}
0x1e19a…1e1ba               Head {h00=0x001c, h01=0x0050, text=»         LDR      A1,A3 «, t00=0x0134, t01=0x00ca}
0x1e1ba…1e1d0               Head {h00=0x0012, h01=0x0050, text=» ANK A3,DATA.P«, t00=0x0134, t01=0x00ea}
0x1e1d0…1e1ea               Head {h00=0x0016, h01=0x0050, text=» RF(Z) ENDO58 YES «, t00=0x0134, t01=0x0100}
0x1e1ea…1e1f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x011a}
0x1e1f4…1e210               Head {h00=0x0018, h01=0x0050, text=»* TEST IF RNR PACKET«, t00=0x0134, t01=0x0124}
0x1e210…1e21a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x0140}
0x1e21a…1e240               Head {h00=0x0022, h01=0x0050, text=»         LC       A4,DWTFNC,A6«, t00=0x0134, t01=0x014a}
0x1e240…1e260               Head {h00=0x001c, h01=0x0050, text=»         ANK      A1,/1F«, t00=0x0134, t01=0x0170}
0x1e260…1e276               Head {h00=0x0012, h01=0x0050, text=» SUK A1,RNR.P «, t00=0x0134, t01=0x0190}
0x1e276…1e28c               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0135, t01=0x0016}
0x1e28c…1e2a6               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO46 NO «, t00=0x0135, t01=0x002c}
0x1e2a6…1e2b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0135, t01=0x0046}
0x1e2b2…1e2c8               Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0135, t01=0x0052}
0x1e2c8…1e2e2               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO56 NO «, t00=0x0135, t01=0x0068}
0x1e2e2…1e2ee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0135, t01=0x0082}
0x1e2ee…1e32e               Head {h00=0x003c, h01=0x0050, text=»         SUK      A4,REFDAT        REFUSE DATA REQUEST? «, t00=0x0135, t01=0x008e}
0x1e32e…1e348               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO56 NO «, t00=0x0135, t01=0x00ce}
0x1e348…1e35e               Head {h00=0x0012, h01=0x0050, text=» RF ENDO58 YES«, t00=0x0135, t01=0x00e8}
0x1e35e…1e374               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0135, t01=0x00fe}
0x1e374…1e37e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x0114}
0x1e37e…1e3a8               Head {h00=0x0026, h01=0x0050, text=»* TEST IF CALL CONFIRMATION PACKET«, t00=0x0135, t01=0x011e}
0x1e3a8…1e3b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x0148}
0x1e3b2…1e3ce               Head {h00=0x0018, h01=0x0050, text=»ENDO46   EQU      * «, t00=0x0135, t01=0x0152}
0x1e3ce…1e3ea               Head {h00=0x0018, h01=0x0050, text=» SUK A1,CAL.CP-RNR.P«, t00=0x0135, t01=0x016e}
0x1e3ea…1e404               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO48 NO «, t00=0x0135, t01=0x018a}
0x1e404…1e430               Head {h00=0x0028, h01=0x0050, text=» SUK A4,ACCCAL ACCEPT CALL REQUEST ?«, t00=0x0136, t01=0x0014}
0x1e430…1e44a               Head {h00=0x0016, h01=0x0050, text=» RF(Z) ENDO58 YES «, t00=0x0136, t01=0x0040}
0x1e44a…1e460               Head {h00=0x0012, h01=0x0050, text=» RF ENDO56 NO «, t00=0x0136, t01=0x005a}
0x1e460…1e46a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x0070}
0x1e46a…1e478               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0136, t01=0x007a}
0x1e478…1e482               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x0088}
0x1e482…1e4a0               Head {h00=0x001a, h01=0x0050, text=»* TEST IF CLEAR PACKET«, t00=0x0136, t01=0x0092}
0x1e4a0…1e4aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x00b0}
0x1e4aa…1e4c6               Head {h00=0x0018, h01=0x0050, text=»ENDO48   EQU      * «, t00=0x0136, t01=0x00ba}
0x1e4c6…1e4e2               Head {h00=0x0018, h01=0x0050, text=» SUK A1,CLE.P-CAL.CP«, t00=0x0136, t01=0x00d6}
0x1e4e2…1e4fc               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO56 NO «, t00=0x0136, t01=0x00f2}
0x1e4fc…1e528               Head {h00=0x0028, h01=0x0050, text=» SUK A4,DISCAL DISCONNECT REQUEST ? «, t00=0x0136, t01=0x010c}
0x1e528…1e542               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO56 NO «, t00=0x0136, t01=0x0138}
0x1e542…1e556               Head {h00=0x0010, h01=0x0050, text=»ENDO50 EQU *«, t00=0x0136, t01=0x0152}
0x1e556…1e584               Head {h00=0x002a, h01=0x0050, text=» CF A14,RELDWT RELEASE DWT FROM CHAIN «, t00=0x0136, t01=0x0166}
0x1e584…1e5b8 (311, 0, 400) Head {h00=0x0030, h01=0x0050, text=» CM LCDWT,A13 RELEASE RELATION WITH THE DWT «, t00=0x0137, t01=0x0004}
0x1e5b8…1e5cc               Head {h00=0x0010, h01=0x0050, text=»ENDO52 EQU *«, t00=0x0137, t01=0x0038}
0x1e5cc…1e5f0               Head {h00=0x0020, h01=0x0050, text=» LDK A3,ACPT.RC RETURN CODE «, t00=0x0137, t01=0x004c}
0x1e5f0…1e5fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0137, t01=0x0070}
0x1e5fc…1e610               Head {h00=0x0010, h01=0x0050, text=»ENDO54 EQU *«, t00=0x0137, t01=0x007c}
0x1e610…1e638               Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x0137, t01=0x0090}
0x1e638…1e64c               Head {h00=0x0010, h01=0x0050, text=»ENDO56 EQU *«, t00=0x0137, t01=0x00b8}
0x1e64c…1e65e               Head {h00=0x000e, h01=0x0050, text=» RB ENDO20«, t00=0x0137, t01=0x00cc}
0x1e65e…1e672               Head {h00=0x0010, h01=0x0050, text=»ENDO58 EQU *«, t00=0x0137, t01=0x00de}
0x1e672…1e68a               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTRCI,A6«, t00=0x0137, t01=0x00f2}
0x1e68a…1e69c               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0137, t01=0x010a}
0x1e69c…1e6c0               Head {h00=0x0020, h01=0x0050, text=» ANK A1,MORE.RC MORE INFO ? «, t00=0x0137, t01=0x011c}
0x1e6c0…1e6d8               Head {h00=0x0014, h01=0x0050, text=» RB(Z) ENDO54 NO«, t00=0x0137, t01=0x0140}
0x1e6d8…1e6fa               Head {h00=0x001e, h01=0x0050, text=» LDK A1,TOLD.RC INDICATE..«, t00=0x0137, t01=0x0158}
0x1e6fa…1e722               Head {h00=0x0024, h01=0x0050, text=» XRS A1,DWTRCI,A6 ..TOLD TO USER«, t00=0x0137, t01=0x017a}
0x1e722…1e746               Head {h00=0x0020, h01=0x0050, text=» RB ENDO54 COMPLETE REQUEST «, t00=0x0138, t01=0x0012}
0x1e746…1e754               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0138, t01=0x0036}
0x1e754…1e75e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x0044}
0x1e75e…1e79e               Head {h00=0x003c, h01=0x0050, text=»* THIS MODULE IS ACTIVATED WHEN A CONFIRMATION TIMER OF «, t00=0x0138, t01=0x004e}
0x1e79e…1e7bc               Head {h00=0x001a, h01=0x0050, text=»* THE DC-TASK EXPIRES.«, t00=0x0138, t01=0x008e}
0x1e7bc…1e7c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x00ac}
0x1e7c6…1e7fc               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0138, t01=0x00b6}
0x1e7fc…1e806               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x00ec}
0x1e806…1e822               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0138, t01=0x00f6}
0x1e822…1e84a               Head {h00=0x0024, h01=0x0050, text=»*  A1 = PARAMETER BLOCK ADDRESS «, t00=0x0138, t01=0x0112}
0x1e84a…1e854               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x013a}
0x1e854…1e870               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0138, t01=0x0144}
0x1e870…1e896               Head {h00=0x0022, h01=0x0050, text=»*  ACTIVATION ON LABEL TIMOUT «, t00=0x0138, t01=0x0160}
0x1e896…1e8a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x0186}
0x1e8a0…1e8b4               Head {h00=0x0010, h01=0x0050, text=»TIMOUT EQU *«, t00=0x0138, t01=0x0190}
0x1e8b4…1e8dc               Head {h00=0x0024, h01=0x0050, text=» LDK A3,5 SET PROCESS INDICATOR «, t00=0x0139, t01=0x0014}
0x1e8dc…1e8f4               Head {h00=0x0014, h01=0x0050, text=» ST A3,DCLEVL . «, t00=0x0139, t01=0x003c}
0x1e8f4…1e91e               Head {h00=0x0026, h01=0x0050, text=» LDKL A14,DCSTAK SET STACK POINTER«, t00=0x0139, t01=0x0054}
0x1e91e…1e948               Head {h00=0x0026, h01=0x0050, text=» LDR A4,A1 ADDRESS PARAMETER BLOCK«, t00=0x0139, t01=0x007e}
0x1e948…1e95a               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x0139, t01=0x00a8}
0x1e95a…1e980               Head {h00=0x0022, h01=0x0050, text=» CF A15,FREBLK GET PARAMETERS «, t00=0x0139, t01=0x00ba}
0x1e980…1e98c               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0139, t01=0x00e0}
0x1e98c…1e9b2               Head {h00=0x0022, h01=0x0050, text=» LDR A12,A3 LINE BLOCK ADDRESS«, t00=0x0139, t01=0x00ec}
0x1e9b2…1e9d4               Head {h00=0x001e, h01=0x0050, text=» LDR A13,A1 LC-ADM ADDRESS«, t00=0x0139, t01=0x0112}
0x1e9d4…1e9e6               Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x0139, t01=0x0134}
0x1e9e6…1ea1a               Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) TIMEXP TIME-OUT OF REQUEST HANDLER «, t00=0x0139, t01=0x0146}
0x1ea1a…1ea2e               Head {h00=0x0010, h01=0x0050, text=» LDR A13,A13«, t00=0x0139, t01=0x017a}
0x1ea2e…1ea5a               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TIM10 NO RESTART CONF. TIMER«, t00=0x0139, t01=0x018e}
0x1ea5a…1ea64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x002a}
0x1ea64…1eaa8               Head {h00=0x0040, h01=0x0050, text=»* A RESTART CONFIRMATION TIMER IS EXPIRED, SO CLEAR ALL NOT «, t00=0x013a, t01=0x0034}
0x1eaa8…1eac4               Head {h00=0x0018, h01=0x0050, text=»* READY VC'S LOCAL. «, t00=0x013a, t01=0x0078}
0x1eac4…1eace               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x0094}
0x1eace…1eaf8               Head {h00=0x0026, h01=0x0050, text=» CM RTMADR,A12 CLEAR TIMER ADDRESS«, t00=0x013a, t01=0x009e}
0x1eaf8…1eb2e               Head {h00=0x0032, h01=0x0050, text=» LDK A1,RSTFLG IS A RESTART PROCEDURE ACTIVE ?«, t00=0x013a, t01=0x00c8}
0x1eb2e…1eb4a               Head {h00=0x0018, h01=0x0050, text=» AN A1,CMNFLG,A12 . «, t00=0x013a, t01=0x00fe}
0x1eb4a…1eb62               Head {h00=0x0014, h01=0x0050, text=» RF(Z) TIM40 NO «, t00=0x013a, t01=0x011a}
0x1eb62…1eb84               Head {h00=0x001e, h01=0x0050, text=» LDK A1,LOCCLE DIAGN. CODE«, t00=0x013a, t01=0x0132}
0x1eb84…1ebb0               Head {h00=0x0028, h01=0x0050, text=» CF A14,CLAVCS CLEAR ALL VC'S LOCAL «, t00=0x013a, t01=0x0154}
0x1ebb0…1ebc2               Head {h00=0x000e, h01=0x0050, text=» RF TIM40 «, t00=0x013a, t01=0x0180}
0x1ebc2…1ebd0 (315, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x013b, t01=0x0004}
0x1ebd0…1ebda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x0012}
0x1ebda…1ec14               Head {h00=0x0036, h01=0x0050, text=»* THE TIMER OF A RESET OR CLEAR PACKET IS EXPIRED «, t00=0x013b, t01=0x001c}
0x1ec14…1ec1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x0056}
0x1ec1e…1ec32               Head {h00=0x0010, h01=0x0050, text=»TIM10 EQU * «, t00=0x013b, t01=0x0060}
0x1ec32…1ec5c               Head {h00=0x0026, h01=0x0050, text=» CM TIMADR,A13 CLEAR TIMER ADDRESS«, t00=0x013b, t01=0x0074}
0x1ec5c…1ec92               Head {h00=0x0032, h01=0x0050, text=» LDK A1,CONTIM IS CONFIRMATION TIMER STARTED ?«, t00=0x013b, t01=0x009e}
0x1ec92…1ecac               Head {h00=0x0016, h01=0x0050, text=» AN A1,FLAGS,A13 .«, t00=0x013b, t01=0x00d4}
0x1ecac…1ecc4               Head {h00=0x0014, h01=0x0050, text=» RF(Z) TIM40 NO «, t00=0x013b, t01=0x00ee}
0x1ecc4…1ecee               Head {h00=0x0026, h01=0x0050, text=» XRS A1,FLAGS,A13 RESET TIMER FLAG«, t00=0x013b, t01=0x0106}
0x1ecee…1ed04               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x013b, t01=0x0130}
0x1ed04…1ed32               Head {h00=0x002a, h01=0x0050, text=» LDK A1,RSET.ST IS LC-STATUS = RESET ?«, t00=0x013b, t01=0x0146}
0x1ed32…1ed4e               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSBST,A13 . «, t00=0x013b, t01=0x0174}
0x1ed4e…1ed7e               Head {h00=0x002c, h01=0x0050, text=» RF(NE) TIM30 NO, SO IT MUST BE A CLEAR «, t00=0x013b, t01=0x0190}
0x1ed7e…1ed8a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013c, t01=0x0030}
0x1ed8a…1ed94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x003c}
0x1ed94…1edce               Head {h00=0x0036, h01=0x0050, text=»* A RESET TIMER IS EXPIRED, SO CLEAR CONCERNING VC«, t00=0x013c, t01=0x0046}
0x1edce…1edd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x0080}
0x1edd8…1edfc               Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RESET SUB-STATUS «, t00=0x013c, t01=0x008a}
0x1edfc…1ee18               Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSBST,A13 . «, t00=0x013c, t01=0x00ae}
0x1ee18…1ee48               Head {h00=0x002c, h01=0x0050, text=» LDK A1,NPRFLG RESET NO PROCESSING FLAG «, t00=0x013c, t01=0x00ca}
0x1ee48…1ee5c               Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x013c, t01=0x00fa}
0x1ee5c…1ee78               Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEOUT,A13 .«, t00=0x013c, t01=0x010e}
0x1ee78…1ee8e               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x013c, t01=0x012a}
0x1ee8e…1eea4               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x013c, t01=0x0140}
0x1eea4…1eec6               Head {h00=0x001e, h01=0x0050, text=» LDK A1,PVC IS IT A PVC ? «, t00=0x013c, t01=0x0156}
0x1eec6…1eee0               Head {h00=0x0016, h01=0x0050, text=» CC A1,VCTYP,A13 .«, t00=0x013c, t01=0x0178}
0x1eee0…1eef8 (317, 0, 398) Head {h00=0x0014, h01=0x0050, text=» RF(E) TIM20 YES«, t00=0x013d, t01=0x0004}
0x1eef8…1ef04               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013d, t01=0x001c}
0x1ef04…1ef1a               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x013d, t01=0x0028}
0x1ef1a…1ef3c               Head {h00=0x001e, h01=0x0050, text=» LDK A1,LOCPER DIAGN. CODE«, t00=0x013d, t01=0x003e}
0x1ef3c…1ef6e               Head {h00=0x002e, h01=0x0050, text=» ABL CLVC CLEAR VC AND RETURN TO SCHEDULER«, t00=0x013d, t01=0x0060}
0x1ef6e…1ef7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013d, t01=0x0092}
0x1ef7a…1ef84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x009e}
0x1ef84…1ef92               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x013d, t01=0x00a8}
0x1ef92…1ef9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x00b6}
0x1ef9c…1efc6               Head {h00=0x0026, h01=0x0050, text=»* COMPLETE EVENTS IN OUTPUT QUEUE «, t00=0x013d, t01=0x00c0}
0x1efc6…1efd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x00ea}
0x1efd0…1efe4               Head {h00=0x0010, h01=0x0050, text=»TIM20 EQU * «, t00=0x013d, t01=0x00f4}
0x1efe4…1f008               Head {h00=0x0020, h01=0x0050, text=» LDKL A3,RSET.RC RC = RESET «, t00=0x013d, t01=0x0108}
0x1f008…1f01e               Head {h00=0x0012, h01=0x0050, text=» CF A14,CMEVNT«, t00=0x013d, t01=0x012c}
0x1f01e…1f034               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x013d, t01=0x0142}
0x1f034…1f046               Head {h00=0x000e, h01=0x0050, text=» RF TIM40 «, t00=0x013d, t01=0x0158}
0x1f046…1f050               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x016a}
0x1f050…1f072               Head {h00=0x001e, h01=0x0050, text=»* A CLEAR TIMER IS EXPIRED«, t00=0x013d, t01=0x0174}
0x1f072…1f07c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x0008}
0x1f07c…1f090               Head {h00=0x0010, h01=0x0050, text=»TIM30 EQU * «, t00=0x013e, t01=0x0012}
0x1f090…1f0be               Head {h00=0x002a, h01=0x0050, text=» CM LCSTAT,A13 NEW LC-STATUS := READY «, t00=0x013e, t01=0x0026}
0x1f0be…1f0ca               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013e, t01=0x0054}
0x1f0ca…1f0de               Head {h00=0x0010, h01=0x0050, text=»TIM40 EQU * «, t00=0x013e, t01=0x0060}
0x1f0de…1f10c               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x013e, t01=0x0074}
0x1f10c…1f11a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x013e, t01=0x00a2}
0x1f11a…1f124               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x00b0}
0x1f124…1f12e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x00ba}
0x1f12e…1f160               Head {h00=0x002e, h01=0x0050, text=»* PROCESSING OF A COMPLETED INPUT REQUEST «, t00=0x013e, t01=0x00c4}
0x1f160…1f16a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x00f6}
0x1f16a…1f19e               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x013e, t01=0x0100}
0x1f19e…1f1a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x0134}
0x1f1a8…1f1c4               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x013e, t01=0x013e}
0x1f1c4…1f1e0               Head {h00=0x0018, h01=0x0050, text=»*  A1 = ECB-ADDRESS «, t00=0x013e, t01=0x015a}
0x1f1e0…1f1ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x0176}
0x1f1ea…1f206               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x013e, t01=0x0180}
0x1f206…1f224               Head {h00=0x001a, h01=0x0050, text=»*  ACTIVATION ON LABEL«, t00=0x013f, t01=0x000c}
0x1f224…1f22e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x002a}
0x1f22e…1f242               Head {h00=0x0010, h01=0x0050, text=»ENDIN EQU * «, t00=0x013f, t01=0x0034}
0x1f242…1f26a               Head {h00=0x0024, h01=0x0050, text=» LDK A3,3 SET PROCESS INDICATOR «, t00=0x013f, t01=0x0048}
0x1f26a…1f282               Head {h00=0x0014, h01=0x0050, text=» ST A3,DCLEVL . «, t00=0x013f, t01=0x0070}
0x1f282…1f2b4               Head {h00=0x002e, h01=0x0050, text=» LDKL A14,DCSTAK SET RETURN STACK POINTER «, t00=0x013f, t01=0x0088}
0x1f2b4…1f2d8               Head {h00=0x0020, h01=0x0050, text=» LDR A8,A1 SAVE ECB-ADDRESS «, t00=0x013f, t01=0x00ba}
0x1f2d8…1f304               Head {h00=0x0028, h01=0x0050, text=» CF A14,GTLBA GET LINE BLOCK ADDRESS«, t00=0x013f, t01=0x00de}
0x1f304…1f32c               Head {h00=0x0024, h01=0x0050, text=» LD A5,ECBRC,A8 GET RETURN CODE «, t00=0x013f, t01=0x010a}
0x1f32c…1f352               Head {h00=0x0022, h01=0x0050, text=» RF(Z) END20 CORRECT COMPLETED«, t00=0x013f, t01=0x0132}
0x1f352…1f376               Head {h00=0x0020, h01=0x0050, text=» CWK A5,17 RECEIVER RESET ? «, t00=0x013f, t01=0x0158}
0x1f376…1f38e               Head {h00=0x0014, h01=0x0050, text=» RF(E) END20 YES«, t00=0x013f, t01=0x017c}
0x1f38e…1f39c (320, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0140, t01=0x0004}
0x1f39c…1f3a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x0012}
0x1f3a6…1f3f2               Head {h00=0x0048, h01=0x0050, text=»* THE INPUT REQUEST IS NOT CORRECT COMPLETED. WHEN THIS IS THE FIRST«, t00=0x0140, t01=0x001c}
0x1f3f2…1f43e               Head {h00=0x0048, h01=0x0050, text=»* TIME A DISCONNECT REQUEST FOR THE DC-CONNECTION WILL BE GIVEN AND «, t00=0x0140, t01=0x0068}
0x1f43e…1f484               Head {h00=0x0042, h01=0x0050, text=»* ALL NOT READY SVC'S WILL BE CLEARED LOCAL AND ALL RELATIONS «, t00=0x0140, t01=0x00b4}
0x1f484…1f4ac               Head {h00=0x0024, h01=0x0050, text=»* DWT <--> PVC WILL BE RELEASED.«, t00=0x0140, t01=0x00fa}
0x1f4ac…1f4b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x0122}
0x1f4b6…1f4dc               Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBBA,A8 BUFFER ADDRESS«, t00=0x0140, t01=0x012c}
0x1f4dc…1f4fa               Head {h00=0x001a, h01=0x0050, text=» CM ECBBA,A8 FREE ECB «, t00=0x0140, t01=0x0152}
0x1f4fa…1f52a               Head {h00=0x002c, h01=0x0050, text=» CF A14,RLBUF INPUT BUFFER BACK TO POOL «, t00=0x0140, t01=0x0170}
0x1f52a…1f558               Head {h00=0x002a, h01=0x0050, text=» LD A3,CMNFLG,A12 IS SUBSYS STARTED ? «, t00=0x0141, t01=0x0010}
0x1f558…1f570               Head {h00=0x0014, h01=0x0050, text=» ANK A3,STRTFL .«, t00=0x0141, t01=0x003e}
0x1f570…1f592               Head {h00=0x001e, h01=0x0050, text=» RF(Z) END10 ALREADY DOWN «, t00=0x0141, t01=0x0056}
0x1f592…1f5ba               Head {h00=0x0024, h01=0x0050, text=» LDK A1,STRTFL RESET START FLAG «, t00=0x0141, t01=0x0078}
0x1f5ba…1f5ce               Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x0141, t01=0x00a0}
0x1f5ce…1f5ea               Head {h00=0x0018, h01=0x0050, text=» ANS A1,CMNFLG,A12 .«, t00=0x0141, t01=0x00b4}
0x1f5ea…1f624               Head {h00=0x0036, h01=0x0050, text=» ST A5,HRDSTA,A12 SAVE RETURN CODE IN HARDWARE STA«, t00=0x0141, t01=0x00d0}
0x1f624…1f664               Head {h00=0x003c, h01=0x0050, text=»         LDK      A6,0                 NO DWT AVAILABLE «, t00=0x0141, t01=0x010a}
0x1f664…1f696               Head {h00=0x002e, h01=0x0050, text=» CF A14,STOP ISSUE DISCONNECT LINE REQUEST«, t00=0x0141, t01=0x014a}
0x1f696…1f6ca               Head {h00=0x0030, h01=0x0050, text=» LDK A1,LOCCLE DIAGN. CODE = LOST CONNECTION«, t00=0x0141, t01=0x017c}
0x1f6ca…1f6f6               Head {h00=0x0028, h01=0x0050, text=» CF A14,CLAVCS CLEAR ALL VC'S LOCAL «, t00=0x0142, t01=0x0020}
0x1f6f6…1f70a               Head {h00=0x0010, h01=0x0050, text=»END10 EQU * «, t00=0x0142, t01=0x004c}
0x1f70a…1f738               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0142, t01=0x0060}
0x1f738…1f742               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x008e}
0x1f742…1f772               Head {h00=0x002c, h01=0x0050, text=»* THE INPUT REQUEST IS CORRECT COMPLETED«, t00=0x0142, t01=0x0098}
0x1f772…1f77c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x00c8}
0x1f77c…1f790               Head {h00=0x0010, h01=0x0050, text=»END20 EQU * «, t00=0x0142, t01=0x00d2}
0x1f790…1f7b6               Head {h00=0x0022, h01=0x0050, text=» LD A5,ECBBA,A8 BUFFER ADDRESS«, t00=0x0142, t01=0x00e6}
0x1f7b6…1f7e6               Head {h00=0x002c, h01=0x0050, text=» LD A3,ECBEL,A8 EFFECTIVE BUFFER LENGTH «, t00=0x0142, t01=0x010c}
0x1f7e6…1f7f8               Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0142, t01=0x013c}
0x1f7f8…1f828               Head {h00=0x002c, h01=0x0050, text=» LC A4,LCIDNT,A5 LOGICAL CHANNEL NUMBER «, t00=0x0142, t01=0x014e}
0x1f828…1f83c               Head {h00=0x0010, h01=0x0050, text=» IFT LOOP=1 «, t00=0x0142, t01=0x017e}
0x1f83c…1f846 (323, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x0004}
0x1f846…1f854               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0143, t01=0x000e}
0x1f854…1f85e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x001c}
0x1f85e…1f87a               Head {h00=0x0018, h01=0x0050, text=»* ONLY FOR LOOP TEST«, t00=0x0143, t01=0x0026}
0x1f87a…1f884               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x0042}
0x1f884…1f89c               Head {h00=0x0014, h01=0x0050, text=» LC A6,NRLC,A12 «, t00=0x0143, t01=0x004c}
0x1f89c…1f8b0               Head {h00=0x0010, h01=0x0050, text=» ANK A6,/FF «, t00=0x0143, t01=0x0064}
0x1f8b0…1f8ce               Head {h00=0x001a, h01=0x0050, text=»         SUK      A6,1«, t00=0x0143, t01=0x0078}
0x1f8ce…1f8e4               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0143, t01=0x0096}
0x1f8e4…1f8fc               Head {h00=0x0014, h01=0x0050, text=» LC A2,NRPVC,A12«, t00=0x0143, t01=0x00ac}
0x1f8fc…1f910               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0143, t01=0x00c4}
0x1f910…1f922               Head {h00=0x000e, h01=0x0050, text=» CWR A2,A4«, t00=0x0143, t01=0x00d8}
0x1f922…1f93c               Head {h00=0x0016, h01=0x0050, text=» RF(NG) LOOP1 SVC «, t00=0x0143, t01=0x00ea}
0x1f93c…1f94e               Head {h00=0x000e, h01=0x0050, text=» LDR A6,A2«, t00=0x0143, t01=0x0104}
0x1f94e…1f960               Head {h00=0x000e, h01=0x0050, text=» SUK A6,1 «, t00=0x0143, t01=0x0116}
0x1f960…1f972               Head {h00=0x000e, h01=0x0050, text=» RF LOOP2 «, t00=0x0143, t01=0x0128}
0x1f972…1f986               Head {h00=0x0010, h01=0x0050, text=»LOOP1 EQU * «, t00=0x0143, t01=0x013a}
0x1f986…1f99c               Head {h00=0x0012, h01=0x0050, text=» ADR A6,A2 PVC«, t00=0x0143, t01=0x014e}
0x1f99c…1f9b0               Head {h00=0x0010, h01=0x0050, text=»LOOP2 EQU * «, t00=0x0143, t01=0x0164}
0x1f9b0…1f9bc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0143, t01=0x0178}
0x1f9bc…1f9d0               Head {h00=0x0010, h01=0x0050, text=» IFT LOOP=1 «, t00=0x0143, t01=0x0184}
0x1f9d0…1f9e2               Head {h00=0x000e, h01=0x0050, text=» SUR A6,A4«, t00=0x0144, t01=0x0008}
0x1f9e2…1f9f4               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A6«, t00=0x0144, t01=0x001a}
0x1f9f4…1fa0c               Head {h00=0x0014, h01=0x0050, text=» SC A4,LCIDNT,A5«, t00=0x0144, t01=0x002c}
0x1fa0c…1fa30               Head {h00=0x0020, h01=0x0050, text=»* END OF ONLY LOOP-TEST!!!! «, t00=0x0144, t01=0x0044}
0x1fa30…1fa3c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0144, t01=0x0068}
0x1fa3c…1fa6c               Head {h00=0x002c, h01=0x0050, text=» CC A4,NRLC,A12 LC-NUMBER WITHIN LIMITS?«, t00=0x0144, t01=0x0074}
0x1fa6c…1fa84               Head {h00=0x0014, h01=0x0050, text=» RF(L) END30 YES«, t00=0x0144, t01=0x00a4}
0x1fa84…1fa92               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0144, t01=0x00bc}
0x1fa92…1fa9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x00ca}
0x1fa9c…1fada               Head {h00=0x003a, h01=0x0050, text=»* IGNORE RECEIVED BUFFER AND ISSUE A NEW INPUT REQUEST«, t00=0x0144, t01=0x00d4}
0x1fada…1fae4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x0112}
0x1fae4…1fb02               Head {h00=0x001a, h01=0x0050, text=» LDR A1,A8 ECB-ADDRESS«, t00=0x0144, t01=0x011c}
0x1fb02…1fb32               Head {h00=0x002c, h01=0x0050, text=» LDK A7,RECEIV FUNCTION CODE FOR RECEIVE«, t00=0x0144, t01=0x013a}
0x1fb32…1fb3e               Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0144, t01=0x016a}
0x1fb3e…1fb4e               Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x0144, t01=0x0176}
0x1fb4e…1fb74               Head {h00=0x0022, h01=0x0050, text=» DATA ENDIN ACTIVATION ADDRESS«, t00=0x0144, t01=0x0186}
0x1fb74…1fba0               Head {h00=0x0028, h01=0x0050, text=» RB END10 CONTROL BACK TO SCHEDULER «, t00=0x0145, t01=0x001c}
0x1fba0…1fbaa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x0048}
0x1fbaa…1fbc8               Head {h00=0x001a, h01=0x0050, text=»* LC-NUMBER IS CORRECT«, t00=0x0145, t01=0x0052}
0x1fbc8…1fbd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x0070}
0x1fbd2…1fbe6               Head {h00=0x0010, h01=0x0050, text=»END30 EQU * «, t00=0x0145, t01=0x007a}
0x1fbe6…1fc10               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x0145, t01=0x008e}
0x1fc10…1fc3a               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTBUF GET AN INPUT BUFFER «, t00=0x0145, t01=0x00b8}
0x1fc3a…1fc58               Head {h00=0x001a, h01=0x0050, text=» ST A2,ECBBA,A8 TO ECB«, t00=0x0145, t01=0x00e2}
0x1fc58…1fc84               Head {h00=0x0028, h01=0x0050, text=» LDR A1,A8 ECB-ADDRESS AS PARAMETER «, t00=0x0145, t01=0x0100}
0x1fc84…1fcb4               Head {h00=0x002c, h01=0x0050, text=» LDK A7,RECEIV FUNCTION CODE FOR RECEIVE«, t00=0x0145, t01=0x012c}
0x1fcb4…1fcde               Head {h00=0x0026, h01=0x0050, text=» LKM  ISSUE A NEW RECEIVE REQUEST «, t00=0x0145, t01=0x015c}
0x1fcde…1fcee               Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x0145, t01=0x0186}
0x1fcee…1fd14               Head {h00=0x0022, h01=0x0050, text=» DATA ENDIN ACTIVATION ADDRESS«, t00=0x0146, t01=0x0008}
0x1fd14…1fd1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0146, t01=0x002e}
0x1fd1e…1fd4e               Head {h00=0x002c, h01=0x0050, text=»* TEST IF A RESTART PROCEDURE IS ACTIVE «, t00=0x0146, t01=0x0038}
0x1fd4e…1fd58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0146, t01=0x0068}
0x1fd58…1fd7a               Head {h00=0x001e, h01=0x0050, text=» LDR A2,A5 BUFFER ADDRESS «, t00=0x0146, t01=0x0072}
0x1fd7a…1fdaa               Head {h00=0x002c, h01=0x0050, text=» LD A4,CMNFLG,A12 IS RESTART FLAG SET ? «, t00=0x0146, t01=0x0094}
0x1fdaa…1fdc2               Head {h00=0x0014, h01=0x0050, text=» ANK A4,RSTFLG .«, t00=0x0146, t01=0x00c4}
0x1fdc2…1fdfc               Head {h00=0x0036, h01=0x0050, text=»         LC       A4,IDENT,A2      GET PACKET TYPE«, t00=0x0146, t01=0x00dc}
0x1fdfc…1fe2c               Head {h00=0x002c, h01=0x0050, text=» RF(Z) END40 NO RESTART PROCEDURE ACTIVE«, t00=0x0146, t01=0x0116}
0x1fe2c…1fe42               Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x0146, t01=0x0146}
0x1fe42…1fe70               Head {h00=0x002a, h01=0x0050, text=» CWK A4,RSTR.P IS IT A RESTART PACKET «, t00=0x0146, t01=0x015c}
0x1fe70…1fe88               Head {h00=0x0014, h01=0x0050, text=» RF(E) END40 YES«, t00=0x0146, t01=0x018a}
0x1fe88…1febc               Head {h00=0x0030, h01=0x0050, text=» CWK A4,RSTR.CP IS IT A RESTART CONF. PACKET«, t00=0x0147, t01=0x0012}
0x1febc…1fed4               Head {h00=0x0014, h01=0x0050, text=» RF(E) END40 YES«, t00=0x0147, t01=0x0046}
0x1fed4…1fefe               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF RELEASE INPUT BUFFER«, t00=0x0147, t01=0x005e}
0x1fefe…1ff2a               Head {h00=0x0028, h01=0x0050, text=» RB END10 CONTROL BACK TO SCHEDULER «, t00=0x0147, t01=0x0088}
0x1ff2a…1ff38               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0147, t01=0x00b4}
0x1ff38…1ff42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x00c2}
0x1ff42…1ff6c               Head {h00=0x0026, h01=0x0050, text=»* SEARCH PACKET DEPENDENT ROUTINE «, t00=0x0147, t01=0x00cc}
0x1ff6c…1ff76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x00f6}
0x1ff76…1ff8a               Head {h00=0x0010, h01=0x0050, text=»END40 EQU * «, t00=0x0147, t01=0x0100}
0x1ff8a…1ffa0               Head {h00=0x0012, h01=0x0050, text=» LDK A5,DATA.P«, t00=0x0147, t01=0x0114}
0x1ffa0…1ffc8               Head {h00=0x0024, h01=0x0050, text=» TM A4,A5 IS IT A DATA PACKET ? «, t00=0x0147, t01=0x012a}
0x1ffc8…1ffe2               Head {h00=0x0016, h01=0x0050, text=» ABL(Z) DATIN YES «, t00=0x0147, t01=0x0152}
0x1ffe2…1fff6               Head {h00=0x0010, h01=0x0050, text=» ANK A4,/1F «, t00=0x0147, t01=0x016c}
0x1fff6…2000a               Head {h00=0x0010, h01=0x0050, text=» LDK A5,RR.P«, t00=0x0147, t01=0x0180}
0x2000a…20030 (328, 0, 400) Head {h00=0x0022, h01=0x0050, text=» CWR A4,A5 IS IT A RR-PACKET ?«, t00=0x0148, t01=0x0004}
0x20030…20048               Head {h00=0x0014, h01=0x0050, text=» ABL(E) RRIN YES«, t00=0x0148, t01=0x002a}
0x20048…2005e               Head {h00=0x0012, h01=0x0050, text=» LDK A5,RNR.P «, t00=0x0148, t01=0x0042}
0x2005e…20086               Head {h00=0x0024, h01=0x0050, text=» CWR A4,A5 IS IT AN RNR-PACKET ?«, t00=0x0148, t01=0x0058}
0x20086…200a0               Head {h00=0x0016, h01=0x0050, text=» ABL(E) RNRIN YES «, t00=0x0148, t01=0x0080}
0x200a0…200b6               Head {h00=0x0012, h01=0x0050, text=» LDK A5,TABLNG«, t00=0x0148, t01=0x009a}
0x200b6…200ca               Head {h00=0x0010, h01=0x0050, text=»END50 EQU * «, t00=0x0148, t01=0x00b0}
0x200ca…200f0               Head {h00=0x0022, h01=0x0050, text=»         LC       A4,IDENT,A2 «, t00=0x0148, t01=0x00c4}
0x200f0…2011e               Head {h00=0x002a, h01=0x0050, text=» CC A4,TABLE,A5 SEARCH IDENT IN TABLE «, t00=0x0148, t01=0x00ea}
0x2011e…20138               Head {h00=0x0016, h01=0x0050, text=» RF(E) END70 FOUND«, t00=0x0148, t01=0x0118}
0x20138…2014a               Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0148, t01=0x0132}
0x2014a…2016c               Head {h00=0x001e, h01=0x0050, text=» RB(NN) END50 TRY NEXT ONE«, t00=0x0148, t01=0x0144}
0x2016c…20176               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x0166}
0x20176…20194               Head {h00=0x001a, h01=0x0050, text=»* INVALID PACKET TYPE «, t00=0x0148, t01=0x0170}
0x20194…2019e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x018e}
0x2019e…201b2               Head {h00=0x0010, h01=0x0050, text=»END60 EQU * «, t00=0x0149, t01=0x0008}
0x201b2…201dc               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF RELEASE INPUT BUFFER«, t00=0x0149, t01=0x001c}
0x201dc…20214               Head {h00=0x0034, h01=0x0050, text=» LDK A1,LOCPER DIAGNOSTIC CODE = PROCEDURE ERRO «, t00=0x0149, t01=0x0046}
0x20214…20244               Head {h00=0x002c, h01=0x0050, text=» ABL CLVC CLEAR VC AND RETURN TO SCHED. «, t00=0x0149, t01=0x007e}
0x20244…2024e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x00ae}
0x2024e…2025c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0149, t01=0x00b8}
0x2025c…20266               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x00c6}
0x20266…202a0               Head {h00=0x0036, h01=0x0050, text=»* PACKET TYPE FOUND, BRANCH TO CONCERNING ROUTINE «, t00=0x0149, t01=0x00d0}
0x202a0…202aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x010a}
0x202aa…202be               Head {h00=0x0010, h01=0x0050, text=»END70 EQU * «, t00=0x0149, t01=0x0114}
0x202be…202e4               Head {h00=0x0022, h01=0x0050, text=» SLL A5,1 PREPARE FOR INDEXING«, t00=0x0149, t01=0x0128}
0x202e4…2030c               Head {h00=0x0024, h01=0x0050, text=» ABI BRATAB,A5 BRANCH TO MODULE «, t00=0x0149, t01=0x014e}
0x2030c…20316               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x0176}
0x20316…20332               Head {h00=0x0018, h01=0x0050, text=»* PACKET TYPE TABLE «, t00=0x0149, t01=0x0180}
0x20332…2033c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x000c}
0x2033c…20350               Head {h00=0x0010, h01=0x0050, text=»TABLE EQU * «, t00=0x014a, t01=0x0016}
0x20350…20384               Head {h00=0x0030, h01=0x0050, text=» BYTE RSTR.P,RSTR.CP RESTART(-CONF.) PACKET «, t00=0x014a, t01=0x002a}
0x20384…203b6               Head {h00=0x002e, h01=0x0050, text=» BYTE RSET.P,RSET.CP RESET(-CONF.) PACKET «, t00=0x014a, t01=0x005e}
0x203b6…203cc               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x014a, t01=0x0090}
0x203cc…203fc               Head {h00=0x002c, h01=0x0050, text=» BYTE CLE.P,CLE.CP CLEAR(-CONF.) PACKET «, t00=0x014a, t01=0x00a6}
0x203fc…2042a               Head {h00=0x002a, h01=0x0050, text=» BYTE CAL.P,CAL.CP CALL(-CONF.) PACKET«, t00=0x014a, t01=0x00d6}
0x2042a…20436               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x014a, t01=0x0104}
0x20436…2046a               Head {h00=0x0030, h01=0x0050, text=» BYTE INT.P,INT.CP INTERRUPT(-CONF.) PACKET «, t00=0x014a, t01=0x0110}
0x2046a…20494               Head {h00=0x0026, h01=0x0050, text=»TABLNG EQU *-1-TABLE TABLE LENGTH «, t00=0x014a, t01=0x0144}
0x20494…2049e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x016e}
0x2049e…204b4               Head {h00=0x0012, h01=0x0050, text=»* BRANCH TABLE«, t00=0x014a, t01=0x0178}
0x204b4…204be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x018e}
0x204be…204d2               Head {h00=0x0010, h01=0x0050, text=»BRATAB EQU *«, t00=0x014b, t01=0x0008}
0x204d2…204ee               Head {h00=0x0018, h01=0x0050, text=» DATA RSTIN RESTART «, t00=0x014b, t01=0x001c}
0x204ee…20518               Head {h00=0x0026, h01=0x0050, text=» DATA RSTCIN RESTART CONFIRMATION «, t00=0x014b, t01=0x0038}
0x20518…20532               Head {h00=0x0016, h01=0x0050, text=» DATA RESIN RESET «, t00=0x014b, t01=0x0062}
0x20532…2055a               Head {h00=0x0024, h01=0x0050, text=» DATA RESCIN RESET CONFIRMATION «, t00=0x014b, t01=0x007c}
0x2055a…20570               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x014b, t01=0x00a4}
0x20570…2058a               Head {h00=0x0016, h01=0x0050, text=» DATA CLRIN CLEAR «, t00=0x014b, t01=0x00ba}
0x2058a…205b2               Head {h00=0x0024, h01=0x0050, text=» DATA CLRCIN CLEAR CONFIRMATION «, t00=0x014b, t01=0x00d4}
0x205b2…205cc               Head {h00=0x0016, h01=0x0050, text=» DATA CALLIN CALL «, t00=0x014b, t01=0x00fc}
0x205cc…205f2               Head {h00=0x0022, h01=0x0050, text=» DATA CALCIN CALL CONFIRMATION«, t00=0x014b, t01=0x0116}
0x205f2…205fe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x014b, t01=0x013c}
0x205fe…2061c               Head {h00=0x001a, h01=0x0050, text=» DATA INTIN INTERRUPT «, t00=0x014b, t01=0x0148}
0x2061c…20648               Head {h00=0x0028, h01=0x0050, text=» DATA INTCIN INTERRUPT CONFIRMATION «, t00=0x014b, t01=0x0166}
0x20648…20656 (332, 0, 398) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x014c, t01=0x0004}
0x20656…20660               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0012}
0x20660…2068c               Head {h00=0x0028, h01=0x0050, text=»* PROCESSING OF RECEIVED DATA PACKET«, t00=0x014c, t01=0x001c}
0x2068c…20696               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0048}
0x20696…206ca               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x014c, t01=0x0052}
0x206ca…206d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0086}
0x206d4…206f0               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x014c, t01=0x0090}
0x206f0…20710               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x014c, t01=0x00ac}
0x20710…2072e               Head {h00=0x001a, h01=0x0050, text=»*  A3  = BUFFER LENGTH«, t00=0x014c, t01=0x00cc}
0x2072e…2074e               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x014c, t01=0x00ea}
0x2074e…2077a               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x014c, t01=0x010a}
0x2077a…20784               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0136}
0x20784…207a0               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x014c, t01=0x0140}
0x207a0…207b8               Head {h00=0x0014, h01=0x0050, text=»*  ABL    DATIN «, t00=0x014c, t01=0x015c}
0x207b8…207c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0174}
0x207c2…207d6               Head {h00=0x0010, h01=0x0050, text=»DATIN EQU * «, t00=0x014c, t01=0x017e}
0x207d6…20808 (333, 0, 400) Head {h00=0x002e, h01=0x0050, text=» CF A14,TDARR TEST PART OF PACKET CONTENTS«, t00=0x014d, t01=0x0004}
0x20808…20822               Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 O.K. ? «, t00=0x014d, t01=0x0036}
0x20822…2083a               Head {h00=0x0014, h01=0x0050, text=» RF(NZ) DAT00 NO«, t00=0x014d, t01=0x0050}
0x2083a…20862               Head {h00=0x0024, h01=0x0050, text=» LC A1,IDENT,A2 GET RECEIVED PS «, t00=0x014d, t01=0x0068}
0x20862…20876               Head {h00=0x0010, h01=0x0050, text=» SRL A1,1 . «, t00=0x014d, t01=0x0090}
0x20876…2088c               Head {h00=0x0012, h01=0x0050, text=» ANK A1,/07 . «, t00=0x014d, t01=0x00a4}
0x2088c…208c0               Head {h00=0x0030, h01=0x0050, text=» CC A1,RPS,A13 DOES IT MATCH WITH THE LC-ADM«, t00=0x014d, t01=0x00ba}
0x208c0…208d8               Head {h00=0x0014, h01=0x0050, text=» RF(NE) DAT00 NO«, t00=0x014d, t01=0x00ee}
0x208d8…208e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x0106}
0x208e2…2090e               Head {h00=0x0028, h01=0x0050, text=»* TEST IF RECEIVED P(S) IS IN WINDOW«, t00=0x014d, t01=0x0110}
0x2090e…20918               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x013c}
0x20918…20948               Head {h00=0x002c, h01=0x0050, text=» LDK A7,0 PRESET WINDOW NOT FULL INDIC. «, t00=0x014d, t01=0x0146}
0x20948…2097e               Head {h00=0x0032, h01=0x0050, text=» LC A5,RLWE,A13 GET NUMBER OF PACKETS IN WIND.«, t00=0x014d, t01=0x0176}
0x2097e…20992               Head {h00=0x0010, h01=0x0050, text=» SUR A1,A5 .«, t00=0x014e, t01=0x001c}
0x20992…209a8               Head {h00=0x0012, h01=0x0050, text=» ANK A1,/07 . «, t00=0x014e, t01=0x0030}
0x209a8…209bc               Head {h00=0x0010, h01=0x0050, text=» ADK A1,1 . «, t00=0x014e, t01=0x0046}
0x209bc…209ee               Head {h00=0x002e, h01=0x0050, text=» CC A1,LCREWN,A13 COMPARE WITH WINDOW SIZE«, t00=0x014e, t01=0x005a}
0x209ee…20a16               Head {h00=0x0024, h01=0x0050, text=» RF(L) DAT20 WINDOW IS NOT FULL «, t00=0x014e, t01=0x008c}
0x20a16…20a42               Head {h00=0x0028, h01=0x0050, text=» RF(G) DAT00 OUT OF WINDOW, RESET LC«, t00=0x014e, t01=0x00b4}
0x20a42…20a6a               Head {h00=0x0024, h01=0x0050, text=» LDK A7,1 SET WINDOW FULL INDIC.«, t00=0x014e, t01=0x00e0}
0x20a6a…20a7e               Head {h00=0x0010, h01=0x0050, text=» RF DAT20 . «, t00=0x014e, t01=0x0108}
0x20a7e…20a8c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x014e, t01=0x011c}
0x20a8c…20a96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x012a}
0x20a96…20ad6               Head {h00=0x003c, h01=0x0050, text=»* PACKET RECEIVED OUT OF SEQUENCE, START RESET PROCEDURE«, t00=0x014e, t01=0x0134}
0x20ad6…20ae0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x0174}
0x20ae0…20af4               Head {h00=0x0010, h01=0x0050, text=»DAT00 EQU * «, t00=0x014e, t01=0x017e}
0x20af4…20b22 (335, 0, 400) Head {h00=0x002a, h01=0x0050, text=» LDK A1,RSET.ST LC-SUBSTATUS := RESET «, t00=0x014f, t01=0x0004}
0x20b22…20b3e               Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSBST,A13 . «, t00=0x014f, t01=0x0032}
0x20b3e…20b48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x004e}
0x20b48…20b78               Head {h00=0x002c, h01=0x0050, text=»* PREPARE AND QUEUE RESET PACKET FOR RH «, t00=0x014f, t01=0x0058}
0x20b78…20b82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x0088}
0x20b82…20bb2               Head {h00=0x002c, h01=0x0050, text=» LC A1,LCNUM,A13 LOGICAL CHANNEL NUMBER «, t00=0x014f, t01=0x0092}
0x20bb2…20bcc               Head {h00=0x0016, h01=0x0050, text=» SC A1,LCIDNT,A2 .«, t00=0x014f, t01=0x00c2}
0x20bcc…20c04               Head {h00=0x0034, h01=0x0050, text=» LDK A1,RSET.P PACKET TYPE FOR RESET INDICATION «, t00=0x014f, t01=0x00dc}
0x20c04…20c1c               Head {h00=0x0014, h01=0x0050, text=» SC A1,IDENT,A2 «, t00=0x014f, t01=0x0114}
0x20c1c…20c52               Head {h00=0x0032, h01=0x0050, text=» LDK A1,RSET.L LENGTH INTERN. RESET CONF NOT. «, t00=0x014f, t01=0x012c}
0x20c52…20c78               Head {h00=0x0022, h01=0x0050, text=» ST A1,HDLC,A2 TO HDLC HEADER «, t00=0x014f, t01=0x0162}
0x20c78…20c8a               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x014f, t01=0x0188}
0x20c8a…20cb4               Head {h00=0x0026, h01=0x0050, text=» SC A1,CAUSE,A2 CLEAR RESET CAUSE «, t00=0x0150, t01=0x000a}
0x20cb4…20cca               Head {h00=0x0012, h01=0x0050, text=» LDK A1,RESLCH«, t00=0x0150, t01=0x0034}
0x20cca…20cf6               Head {h00=0x0028, h01=0x0050, text=» SC A1,DGNCOD,A2 SET DIAGNOSTIC CODE«, t00=0x0150, t01=0x004a}
0x20cf6…20d1a               Head {h00=0x0020, h01=0x0050, text=»         CF       A14,RSETVC«, t00=0x0150, t01=0x0076}
0x20d1a…20d4a               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x0150, t01=0x009a}
0x20d4a…20d54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x00ca}
0x20d54…20d8a               Head {h00=0x0032, h01=0x0050, text=»* PREPARE RESET PACKET AND QUEUE IT FOR OUTPUT«, t00=0x0150, t01=0x00d4}
0x20d8a…20d94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x010a}
0x20d94…20da8               Head {h00=0x0010, h01=0x0050, text=»DAT05 EQU * «, t00=0x0150, t01=0x0114}
0x20da8…20dd0               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x0150, t01=0x0128}
0x20dd0…20de8               Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x0150, t01=0x0150}
0x20de8…20e08               Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x0150, t01=0x0168}
0x20e08…20e20               Head {h00=0x0014, h01=0x0050, text=» RF(Z) DAT10 YES«, t00=0x0150, t01=0x0188}
0x20e20…20e2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x0010}
0x20e2a…20e58               Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x0151, t01=0x001a}
0x20e58…20e62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x0048}
0x20e62…20e8e               Head {h00=0x0028, h01=0x0050, text=» LDKL A1,DAT05 REACTIVATION ADDRESS «, t00=0x0151, t01=0x0052}
0x20e8e…20ea2               Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x0151, t01=0x007e}
0x20ea2…20eac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x0092}
0x20eac…20eba               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0151, t01=0x009c}
0x20eba…20ec4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x00aa}
0x20ec4…20ed8               Head {h00=0x0010, h01=0x0050, text=»DAT10 EQU * «, t00=0x0151, t01=0x00b4}
0x20ed8…20eee               Head {h00=0x0012, h01=0x0050, text=» LDK A1,RSET.P«, t00=0x0151, t01=0x00c8}
0x20eee…20f12               Head {h00=0x0020, h01=0x0050, text=» SC A1,IDENT,A2 PACKET TYPE «, t00=0x0151, t01=0x00de}
0x20f12…20f24               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0151, t01=0x0102}
0x20f24…20f4e               Head {h00=0x0026, h01=0x0050, text=» SC A1,CAUSE,A2 CLEAR RESET CAUSE «, t00=0x0151, t01=0x0114}
0x20f4e…20f64               Head {h00=0x0012, h01=0x0050, text=» LDK A1,RESLCH«, t00=0x0151, t01=0x013e}
0x20f64…20f8c               Head {h00=0x0024, h01=0x0050, text=» SC A1,DGNCOD,A2 DIAGNOSTIC CODE«, t00=0x0151, t01=0x0154}
0x20f8c…20fc6               Head {h00=0x0036, h01=0x0050, text=» LDK A1,RSET.L RESET PACKET LENGTH TO HDLC HEADER «, t00=0x0151, t01=0x017c}
0x20fc6…20fde               Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0152, t01=0x0026}
0x20fde…2100e               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEO PUT ELEMENT IN OUTPUT QUEUE«, t00=0x0152, t01=0x003e}
0x2100e…2103e               Head {h00=0x002c, h01=0x0050, text=» LDKL A8,SYRETM RESET CONFIRMATION TIMER«, t00=0x0152, t01=0x006e}
0x2103e…21060               Head {h00=0x001e, h01=0x0050, text=» CF A14,STTIM START TIMER «, t00=0x0152, t01=0x009e}
0x21060…2108e               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0152, t01=0x00c0}
0x2108e…21098               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0152, t01=0x00ee}
0x21098…210b4               Head {h00=0x0018, h01=0x0050, text=»* TEST CURRENT M-BIT«, t00=0x0152, t01=0x00f8}
0x210b4…210be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0152, t01=0x0114}
0x210be…210d2               Head {h00=0x0010, h01=0x0050, text=»DAT20 EQU * «, t00=0x0152, t01=0x011e}
0x210d2…210fa               Head {h00=0x0024, h01=0x0050, text=» LC A1,MBIT,A2 GET CURRENT M-BIT«, t00=0x0152, t01=0x0132}
0x210fa…21110               Head {h00=0x0012, h01=0x0050, text=» ANK A1,MPOS .«, t00=0x0152, t01=0x015a}
0x21110…21132               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DAT30 M-BIT NOT SET«, t00=0x0152, t01=0x0170}
0x21132…2113c (339, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x0004}
0x2113c…21174               Head {h00=0x0034, h01=0x0050, text=»* M-BIT IS SET, SO DATA LENGTH HAS TO BE MAXIMUM«, t00=0x0153, t01=0x000e}
0x21174…2117e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x0046}
0x2117e…211b6               Head {h00=0x0034, h01=0x0050, text=» LD A1,TRBFSZ,A13 MAX.DATA LENGTH IN DATA PACKET«, t00=0x0153, t01=0x0050}
0x211b6…211d8               Head {h00=0x001e, h01=0x0050, text=» ADK A1,BEGDAT ADD HEADERS«, t00=0x0153, t01=0x0088}
0x211d8…211ea               Head {h00=0x000e, h01=0x0050, text=» CWR A1,A3«, t00=0x0153, t01=0x00aa}
0x211ea…21212               Head {h00=0x0024, h01=0x0050, text=» RF(E) DAT30 OK, THEY ARE EQUAL «, t00=0x0153, t01=0x00bc}
0x21212…2121c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x00e4}
0x2121c…2124a               Head {h00=0x002a, h01=0x0050, text=»* DATA LENGTH NOT MAXIMUM, SO CLEAR VC«, t00=0x0153, t01=0x00ee}
0x2124a…21254               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x011c}
0x21254…21286               Head {h00=0x002e, h01=0x0050, text=» RB END60 CLEAR VC AND RETURN TO SCHEDULER«, t00=0x0153, t01=0x0126}
0x21286…21290               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x0158}
0x21290…2129e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0153, t01=0x0162}
0x2129e…212a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x0170}
0x212a8…212d0               Head {h00=0x0024, h01=0x0050, text=»* UPDATE PS TO BE RECEIVED NEXT «, t00=0x0153, t01=0x017a}
0x212d0…212da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x0012}
0x212da…212ee               Head {h00=0x0010, h01=0x0050, text=»DAT30 EQU * «, t00=0x0154, t01=0x001c}
0x212ee…2130c               Head {h00=0x001a, h01=0x0050, text=» LC A1,RPS,A13 GET RPS«, t00=0x0154, t01=0x0030}
0x2130c…21328               Head {h00=0x0018, h01=0x0050, text=» ADK A1,1 INCREMENT «, t00=0x0154, t01=0x004e}
0x21328…21344               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/07 MODULO 8«, t00=0x0154, t01=0x006a}
0x21344…2135c               Head {h00=0x0014, h01=0x0050, text=» SC A1,RPS,A13 .«, t00=0x0154, t01=0x0086}
0x2135c…21366               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x009e}
0x21366…21380               Head {h00=0x0016, h01=0x0050, text=»* GET RECEIVED PR «, t00=0x0154, t01=0x00a8}
0x21380…2138a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x00c2}
0x2138a…213be               Head {h00=0x0030, h01=0x0050, text=» LC A1,IDENT,A2 GET PR FROM RECEIVED PACKET «, t00=0x0154, t01=0x00cc}
0x213be…213d2               Head {h00=0x0010, h01=0x0050, text=» SRL A1,5 . «, t00=0x0154, t01=0x0100}
0x213d2…213e8               Head {h00=0x0012, h01=0x0050, text=» ANK A1,/07 . «, t00=0x0154, t01=0x0114}
0x213e8…213f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x012a}
0x213f2…2143a               Head {h00=0x0044, h01=0x0050, text=»* IF IT IS A SEND WINDOW UPDATING, RESET "NO PROCESSING" FLAG OF«, t00=0x0154, t01=0x0134}
0x2143a…21450               Head {h00=0x0012, h01=0x0050, text=»* OUTPUT QUEUE«, t00=0x0154, t01=0x017c}
0x21450…2145a (341, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x0004}
0x2145a…21492               Head {h00=0x0034, h01=0x0050, text=» CC A1,SLWE,A13 COMPARE WITH SEND LOWER WINDOW E«, t00=0x0155, t01=0x000e}
0x21492…214b2               Head {h00=0x001c, h01=0x0050, text=» RF(E) DAT50 NO UPDATING«, t00=0x0155, t01=0x0046}
0x214b2…214d8               Head {h00=0x0022, h01=0x0050, text=» SC A1,SLWE,A13 SAVE NEW VALUE«, t00=0x0155, t01=0x0066}
0x214d8…2150a               Head {h00=0x002e, h01=0x0050, text=» LDK A1,NPRFLG RESET "NO PROCESSING" FLAG «, t00=0x0155, t01=0x008c}
0x2150a…2152a               Head {h00=0x001c, h01=0x0050, text=»         C1R      A1,A1 «, t00=0x0155, t01=0x00be}
0x2152a…21546               Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEOUT,A13 .«, t00=0x0155, t01=0x00de}
0x21546…21550               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x00fa}
0x21550…2157a               Head {h00=0x0026, h01=0x0050, text=»* QUEUE PACKET FOR REQUEST HANDLER«, t00=0x0155, t01=0x0104}
0x2157a…21584               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x012e}
0x21584…21598               Head {h00=0x0010, h01=0x0050, text=»DAT50 EQU * «, t00=0x0155, t01=0x0138}
0x21598…215d0               Head {h00=0x0034, h01=0x0050, text=» ST A3,HDLC,A2 SAVE PACKET LENGTH IN HDLC-HEADE «, t00=0x0155, t01=0x014c}
0x215d0…21600               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x0155, t01=0x0184}
0x21600…2160a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0024}
0x2160a…21618               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0156, t01=0x002e}
0x21618…21622               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x003c}
0x21622…2164a               Head {h00=0x0024, h01=0x0050, text=»* CAN RECEIVE WINDOW BE UPDATED «, t00=0x0156, t01=0x0046}
0x2164a…21654               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x006e}
0x21654…21668               Head {h00=0x0010, h01=0x0050, text=»DAT60 EQU * «, t00=0x0156, t01=0x0078}
0x21668…21698               Head {h00=0x002c, h01=0x0050, text=» LDK A3,0 PRESET INDIC.: NO PR UPDATING «, t00=0x0156, t01=0x008c}
0x21698…216d2               Head {h00=0x0036, h01=0x0050, text=» LC A1,NRNUBF,A13 ARE ALL RESERVED BUFFERS USED ? «, t00=0x0156, t01=0x00bc}
0x216d2…216e8               Head {h00=0x0012, h01=0x0050, text=» ANK A1,/FF . «, t00=0x0156, t01=0x00f6}
0x216e8…21700               Head {h00=0x0014, h01=0x0050, text=» RF(Z) DAT70 YES«, t00=0x0156, t01=0x010c}
0x21700…21728               Head {h00=0x0024, h01=0x0050, text=» LDK A3,1 SET INDIC.: PR UPDATED«, t00=0x0156, t01=0x0124}
0x21728…21732               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x014c}
0x21732…21746               Head {h00=0x0010, h01=0x0050, text=»* UPDATE PR «, t00=0x0156, t01=0x0156}
0x21746…21750               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x016a}
0x21750…21780               Head {h00=0x002c, h01=0x0050, text=» LC A4,PR,A13 UPDATE PR TO BE SENT NEXT «, t00=0x0156, t01=0x0174}
0x21780…217b2               Head {h00=0x002e, h01=0x0050, text=» ADR A4,A1 ADD NUMBER OF NOT USED BUFFERS «, t00=0x0157, t01=0x0014}
0x217b2…217ce               Head {h00=0x0018, h01=0x0050, text=» ANK A4,/07 MODULO 8«, t00=0x0157, t01=0x0046}
0x217ce…217e6               Head {h00=0x0014, h01=0x0050, text=» SC A4,PR,A13 . «, t00=0x0157, t01=0x0062}
0x217e6…21816               Head {h00=0x002c, h01=0x0050, text=» SUR A1,A1 ALL RES. BUFFERS ARE NOW USED«, t00=0x0157, t01=0x007a}
0x21816…21832               Head {h00=0x0018, h01=0x0050, text=» SC A1,NRNUBF,A13 . «, t00=0x0157, t01=0x00aa}
0x21832…2183c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x00c6}
0x2183c…21884               Head {h00=0x0044, h01=0x0050, text=»* DID THE RECEIVED PS PASSES THE THRESHOLD OF THE RECEIVE WINDOW«, t00=0x0157, t01=0x00d0}
0x21884…2188e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x0118}
0x2188e…218a2               Head {h00=0x0010, h01=0x0050, text=»DAT70 EQU * «, t00=0x0157, t01=0x0122}
0x218a2…218b4               Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0157, t01=0x0136}
0x218b4…218d6               Head {h00=0x001e, h01=0x0050, text=» LC A1,RPS,A13 RECEIVED PS«, t00=0x0157, t01=0x0148}
0x218d6…21908               Head {h00=0x002e, h01=0x0050, text=» LC A2,RLWE,A13 RECEIVER LOWER WINDOW EDGE«, t00=0x0157, t01=0x016a}
0x21908…21926               Head {h00=0x001a, h01=0x0050, text=» SUR A1,A2 RPS - RLWE «, t00=0x0158, t01=0x000c}
0x21926…21942               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/07 MODULO 8«, t00=0x0158, t01=0x002a}
0x21942…2197a               Head {h00=0x0034, h01=0x0050, text=» CC A1,LCTHRE,A13 DID IT PASSED THE THRESHOLD ? «, t00=0x0158, t01=0x0046}
0x2197a…21994               Head {h00=0x0016, h01=0x0050, text=» RF(NG) DAT130 NO «, t00=0x0158, t01=0x007e}
0x21994…2199e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x0098}
0x2199e…219ac               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0158, t01=0x00a2}
0x219ac…219b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x00b0}
0x219b6…219ee               Head {h00=0x0034, h01=0x0050, text=»* IF RECEIVE WINDOW IS NOT UPDATED, WAIT FOR IT «, t00=0x0158, t01=0x00ba}
0x219ee…219f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x00f2}
0x219f8…21a0a               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0158, t01=0x00fc}
0x21a0a…21a2e               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DAT90 IT IS UPDATED «, t00=0x0158, t01=0x010e}
0x21a2e…21a52               Head {h00=0x0020, h01=0x0050, text=» LDR A7,A7 IS WINDOW FULL ? «, t00=0x0158, t01=0x0132}
0x21a52…21a7e               Head {h00=0x0028, h01=0x0050, text=» RF(Z) DAT130 NO, DON'T WAIT FOR IT «, t00=0x0158, t01=0x0156}
0x21a7e…21ab4               Head {h00=0x0032, h01=0x0050, text=» LDR A1,A13 PARAMETER FOR DELAY AND ACTIVATION«, t00=0x0158, t01=0x0182}
0x21ab4…21ac8               Head {h00=0x0010, h01=0x0050, text=» LD A7,TSKID«, t00=0x0159, t01=0x0028}
0x21ac8…21aea               Head {h00=0x001e, h01=0x0050, text=» LDKL A8,BUFDEL DELAY TIME«, t00=0x0159, t01=0x003c}
0x21aea…21af6               Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0159, t01=0x005e}
0x21af6…21b06               Head {h00=0x000c, h01=0x0050, text=» DATA -6«, t00=0x0159, t01=0x006a}
0x21b06…21b2c               Head {h00=0x0022, h01=0x0050, text=» DATA DAT80 ACTIVATION ADDRESS«, t00=0x0159, t01=0x007a}
0x21b2c…21b58               Head {h00=0x0028, h01=0x0050, text=» RF DAT130 CONTROL BACK TO SCHEDULER«, t00=0x0159, t01=0x00a0}
0x21b58…21b62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x00cc}
0x21b62…21b76               Head {h00=0x0010, h01=0x0050, text=»DAT80 EQU * «, t00=0x0159, t01=0x00d6}
0x21b76…21ba0               Head {h00=0x0026, h01=0x0050, text=» LDR A13,A1 RESTORE LC-ADM ADDRESS«, t00=0x0159, t01=0x00ea}
0x21ba0…21be6               Head {h00=0x0042, h01=0x0050, text=»         LDK      A7,1             SET WINDOW FULL INDICATION «, t00=0x0159, t01=0x0114}
0x21be6…21c12               Head {h00=0x0028, h01=0x0050, text=» LDKL A14,DCSTAK RESET STACK POINTER«, t00=0x0159, t01=0x015a}
0x21c12…21c24               Head {h00=0x000e, h01=0x0050, text=» RB DAT60 «, t00=0x0159, t01=0x0186}
0x21c24…21c2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0008}
0x21c2e…21c7c               Head {h00=0x004a, h01=0x0050, text=»* THE RECEIVE WINDOW IS UPDATED, CAN NEW PR BE SENT IN A DATA PACKET ?«, t00=0x015a, t01=0x0012}
0x21c7c…21c86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0060}
0x21c86…21c9a               Head {h00=0x0010, h01=0x0050, text=»DAT90 EQU * «, t00=0x015a, t01=0x006a}
0x21c9a…21ccc               Head {h00=0x002e, h01=0x0050, text=» LD A1,QUEOUT,A13 IS OUTPUT QUEUE EMPTY ? «, t00=0x015a, t01=0x007e}
0x21ccc…21ce6               Head {h00=0x0016, h01=0x0050, text=» RF(Z) DAT100 YES «, t00=0x015a, t01=0x00b0}
0x21ce6…21cf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x00ca}
0x21cf0…21d1e               Head {h00=0x002a, h01=0x0050, text=»* TEST IF ONLY NO-PROCESSING FLAG SET «, t00=0x015a, t01=0x00d4}
0x21d1e…21d28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0102}
0x21d28…21d46               Head {h00=0x001a, h01=0x0050, text=»         SUK      A1,1«, t00=0x015a, t01=0x010c}
0x21d46…21d74               Head {h00=0x002a, h01=0x0050, text=»         RF(Z)    DAT100           YES«, t00=0x015a, t01=0x012a}
0x21d74…21d7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0158}
0x21d7e…21d8c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015a, t01=0x0162}
0x21d8c…21d96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0170}
0x21d96…21db6               Head {h00=0x001c, h01=0x0050, text=»* REMOTE BUSY FLAG SET ?«, t00=0x015a, t01=0x017a}
0x21db6…21dc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x000a}
0x21dc0…21dd6               Head {h00=0x0012, h01=0x0050, text=» LDK A3,REMBUS«, t00=0x015b, t01=0x0014}
0x21dd6…21dee               Head {h00=0x0014, h01=0x0050, text=» AN A3,FLAGS,A13«, t00=0x015b, t01=0x002a}
0x21dee…21e04               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DAT100«, t00=0x015b, t01=0x0042}
0x21e04…21e0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x0058}
0x21e0e…21e2e               Head {h00=0x001c, h01=0x0050, text=»* IS SEND WINDOW FULL ? «, t00=0x015b, t01=0x0062}
0x21e2e…21e38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x0082}
0x21e38…21e4e               Head {h00=0x0012, h01=0x0050, text=» LC A1,PS,A13 «, t00=0x015b, t01=0x008c}
0x21e4e…21e66               Head {h00=0x0014, h01=0x0050, text=» LC A2,SLWE,A13 «, t00=0x015b, t01=0x00a2}
0x21e66…21e78               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A2«, t00=0x015b, t01=0x00ba}
0x21e78…21e8a               Head {h00=0x000e, h01=0x0050, text=» ANK A1,/7«, t00=0x015b, t01=0x00cc}
0x21e8a…21ea4               Head {h00=0x0016, h01=0x0050, text=» CC A1,LCTRWN,A13 «, t00=0x015b, t01=0x00de}
0x21ea4…21ebc               Head {h00=0x0014, h01=0x0050, text=» RF(L) DAT130 NO«, t00=0x015b, t01=0x00f8}
0x21ebc…21ec6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x0110}
0x21ec6…21ee8               Head {h00=0x001e, h01=0x0050, text=»* SEND NEW PR IN RR-PACKET«, t00=0x015b, t01=0x011a}
0x21ee8…21ef2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x013c}
0x21ef2…21f06               Head {h00=0x0010, h01=0x0050, text=»DAT100 EQU *«, t00=0x015b, t01=0x0146}
0x21f06…21f2e               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x015b, t01=0x015a}
0x21f2e…21f46               Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x015b, t01=0x0182}
0x21f46…21f66               Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x015c, t01=0x000a}
0x21f66…21f80               Head {h00=0x0016, h01=0x0050, text=» RF(Z) DAT120 YES «, t00=0x015c, t01=0x002a}
0x21f80…21f8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x0044}
0x21f8a…21fb8               Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x015c, t01=0x004e}
0x21fb8…21fc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x007c}
0x21fc2…21fee               Head {h00=0x0028, h01=0x0050, text=» LDKL A1,DAT100 REACTIVATION ADDRESS«, t00=0x015c, t01=0x0086}
0x21fee…22002               Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x015c, t01=0x00b2}
0x22002…2200c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x00c6}
0x2200c…2201a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015c, t01=0x00d0}
0x2201a…22024               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x00de}
0x22024…22038               Head {h00=0x0010, h01=0x0050, text=»DAT120 EQU *«, t00=0x015c, t01=0x00e8}
0x22038…22066               Head {h00=0x002a, h01=0x0050, text=»         LC       A1,PR,A13        PR «, t00=0x015c, t01=0x00fc}
0x22066…220a8               Head {h00=0x003e, h01=0x0050, text=»         SC       A1,RLWE,A13      SAVE IT AS LAST SENT PR«, t00=0x015c, t01=0x012a}
0x220a8…220e0               Head {h00=0x0034, h01=0x0050, text=»         SLL      A1,5             PR IN PACKET «, t00=0x015c, t01=0x016c}
0x220e0…220f6               Head {h00=0x0012, h01=0x0050, text=» ORK A1,RR.P .«, t00=0x015d, t01=0x0014}
0x220f6…22110               Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x015d, t01=0x002a}
0x22110…22142               Head {h00=0x002e, h01=0x0050, text=» LDK A1,RR.L PACKET LENGTH TO HDLC-HEADER «, t00=0x015d, t01=0x0044}
0x22142…2215a               Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x015d, t01=0x0076}
0x2215a…22164               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x008e}
0x22164…22198               Head {h00=0x0030, h01=0x0050, text=»* RESET NO PROCESSING FLAG AND QUEUE PACKET «, t00=0x015d, t01=0x0098}
0x22198…221a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x00cc}
0x221a2…221d4               Head {h00=0x002e, h01=0x0050, text=» LDK A1,NPRFLG RESET "NO PROCESSING" FLAG «, t00=0x015d, t01=0x00d6}
0x221d4…221f4               Head {h00=0x001c, h01=0x0050, text=»         C1R      A1,A1 «, t00=0x015d, t01=0x0108}
0x221f4…22210               Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEOUT,A13 .«, t00=0x015d, t01=0x0128}
0x22210…2223a               Head {h00=0x0026, h01=0x0050, text=» LDR A1,A13 QUEUE ELEMENT AS FIRST«, t00=0x015d, t01=0x0144}
0x2223a…22252               Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEOUT .«, t00=0x015d, t01=0x016e}
0x22252…2226a               Head {h00=0x0014, h01=0x0050, text=» CF A14,QUEUEF .«, t00=0x015d, t01=0x0186}
0x2226a…2227e               Head {h00=0x0010, h01=0x0050, text=»DAT130 EQU *«, t00=0x015e, t01=0x000e}
0x2227e…222ac               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x015e, t01=0x0022}
0x222ac…222ba               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015e, t01=0x0050}
0x222ba…222c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x005e}
0x222c4…222ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x0068}
0x222ce…222f8               Head {h00=0x0026, h01=0x0050, text=»* PROCESSING OF RECEIVED RR-PACKET«, t00=0x015e, t01=0x0072}
0x222f8…22302               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x009c}
0x22302…22336               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x015e, t01=0x00a6}
0x22336…22340               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x00da}
0x22340…2235a               Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMETER:«, t00=0x015e, t01=0x00e4}
0x2235a…2237a               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x015e, t01=0x00fe}
0x2237a…2239a               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x015e, t01=0x011e}
0x2239a…223c6               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x015e, t01=0x013e}
0x223c6…223d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x016a}
0x223d0…223ec               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x015e, t01=0x0174}
0x223ec…22400               Head {h00=0x0010, h01=0x0050, text=»*  ABL  RRIN«, t00=0x015e, t01=0x0190}
0x22400…2240a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x0014}
0x2240a…2241c               Head {h00=0x000e, h01=0x0050, text=»RRIN EQU *«, t00=0x015f, t01=0x001e}
0x2241c…22440               Head {h00=0x0020, h01=0x0050, text=» CF A14,TDARR TEST RR-PACKET«, t00=0x015f, t01=0x0030}
0x22440…22468               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A1 PR OUT OF SEQUENCE ? «, t00=0x015f, t01=0x0054}
0x22468…2249a               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) DAT00 YES RESET LC (MODULE DATIN)«, t00=0x015f, t01=0x007c}
0x2249a…224a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x00ae}
0x224a4…224ca               Head {h00=0x0022, h01=0x0050, text=»* TEST IF REMOTE BUSY FLAG SET«, t00=0x015f, t01=0x00b8}
0x224ca…224d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x00de}
0x224d4…224fa               Head {h00=0x0022, h01=0x0050, text=»        LD       A1,FLAGS,A13 «, t00=0x015f, t01=0x00e8}
0x224fa…2251e               Head {h00=0x0020, h01=0x0050, text=»         ANK      A1,REMBUS «, t00=0x015f, t01=0x010e}
0x2251e…2254c               Head {h00=0x002a, h01=0x0050, text=»         RF(Z)    RNRI00           NO!«, t00=0x015f, t01=0x0132}
0x2254c…2256c               Head {h00=0x001c, h01=0x0050, text=»         C1R      A1,A1 «, t00=0x015f, t01=0x0160}
0x2256c…225ae               Head {h00=0x003e, h01=0x0050, text=»         ANS      A1,FLAGS,A13     RESET REMOTE BUSY FLAG «, t00=0x015f, t01=0x0180}
0x225ae…225d2               Head {h00=0x0020, h01=0x0050, text=»         LDK      A1,NPRFLG «, t00=0x0160, t01=0x0032}
0x225d2…225f2               Head {h00=0x001c, h01=0x0050, text=»         C1R      A1,A1 «, t00=0x0160, t01=0x0056}
0x225f2…22636               Head {h00=0x0040, h01=0x0050, text=»         ANS      A1,QUEOUT,A13    RESET NO PROCESSING FLAG «, t00=0x0160, t01=0x0076}
0x22636…22656               Head {h00=0x001c, h01=0x0050, text=»        RF       RNRI00 «, t00=0x0160, t01=0x00ba}
0x22656…22664               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0160, t01=0x00da}
0x22664…2266e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x00e8}
0x2266e…2269a               Head {h00=0x0028, h01=0x0050, text=»* PROCESSING OF RECEIVED RNR-PACKET «, t00=0x0160, t01=0x00f2}
0x2269a…226a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x011e}
0x226a4…226d8               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0160, t01=0x0128}
0x226d8…226e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x015c}
0x226e2…226fc               Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMETER:«, t00=0x0160, t01=0x0166}
0x226fc…2271c               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x0160, t01=0x0180}
0x2271c…2273c               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0161, t01=0x0010}
0x2273c…22768               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0161, t01=0x0030}
0x22768…22772               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x005c}
0x22772…2278e               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0161, t01=0x0066}
0x2278e…227a2               Head {h00=0x0010, h01=0x0050, text=»*  ABL RNRIN«, t00=0x0161, t01=0x0082}
0x227a2…227ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x0096}
0x227ac…227c0               Head {h00=0x0010, h01=0x0050, text=»RNRIN EQU * «, t00=0x0161, t01=0x00a0}
0x227c0…227e4               Head {h00=0x0020, h01=0x0050, text=» CF A14,TDARR TEST RR-PACKET«, t00=0x0161, t01=0x00b4}
0x227e4…2280c               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A1 PR OUT OF SEQUENCE ? «, t00=0x0161, t01=0x00d8}
0x2280c…2283e               Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) DAT00 YES RESET LC (MODULE DATIN)«, t00=0x0161, t01=0x0100}
0x2283e…2286a               Head {h00=0x0028, h01=0x0050, text=» LDK A1,REMBUS SET REMOTE BUSY FLAG «, t00=0x0161, t01=0x0132}
0x2286a…22886               Head {h00=0x0018, h01=0x0050, text=» ORS A1,FLAGS,A13 . «, t00=0x0161, t01=0x015e}
0x22886…22890               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x017a}
0x22890…228aa               Head {h00=0x0016, h01=0x0050, text=»* GET RECEIVED PR «, t00=0x0161, t01=0x0184}
0x228aa…228b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x000e}
0x228b4…228c8               Head {h00=0x0010, h01=0x0050, text=»RNRI00 EQU *«, t00=0x0162, t01=0x0018}
0x228c8…228fc               Head {h00=0x0030, h01=0x0050, text=» LC A1,IDENT,A2 GET PR FROM RECEIVED PACKET «, t00=0x0162, t01=0x002c}
0x228fc…22910               Head {h00=0x0010, h01=0x0050, text=» SRL A1,5 . «, t00=0x0162, t01=0x0060}
0x22910…22926               Head {h00=0x0012, h01=0x0050, text=» ANK A1,/07 . «, t00=0x0162, t01=0x0074}
0x22926…22930               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x008a}
0x22930…2293e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0162, t01=0x0094}
0x2293e…22948               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x00a2}
0x22948…22990               Head {h00=0x0044, h01=0x0050, text=»* IF IT IS A SEND WINDOW UPDATING, RESET "NO PROCESSING" FLAG OF«, t00=0x0162, t01=0x00ac}
0x22990…229a6               Head {h00=0x0012, h01=0x0050, text=»* OUTPUT QUEUE«, t00=0x0162, t01=0x00f4}
0x229a6…229b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x010a}
0x229b0…229e8               Head {h00=0x0034, h01=0x0050, text=» CC A1,SLWE,A13 COMPARE WITH SEND LOWER WINDOW E«, t00=0x0162, t01=0x0114}
0x229e8…22a0a               Head {h00=0x001e, h01=0x0050, text=» RF(E) RNRI10 NO UPDATING «, t00=0x0162, t01=0x014c}
0x22a0a…22a30               Head {h00=0x0022, h01=0x0050, text=» SC A1,SLWE,A13 SAVE NEW VALUE«, t00=0x0162, t01=0x016e}
0x22a30…22a62 (355, 0, 400) Head {h00=0x002e, h01=0x0050, text=» LDK A1,NPRFLG RESET "NO PROCESSING" FLAG «, t00=0x0163, t01=0x0004}
0x22a62…22a82               Head {h00=0x001c, h01=0x0050, text=»         C1R      A1,A1 «, t00=0x0163, t01=0x0036}
0x22a82…22a9e               Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEOUT,A13 .«, t00=0x0163, t01=0x0056}
0x22a9e…22ab2               Head {h00=0x0010, h01=0x0050, text=»RNRI10 EQU *«, t00=0x0163, t01=0x0072}
0x22ab2…22adc               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x0163, t01=0x0086}
0x22adc…22b0a               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0163, t01=0x00b0}
0x22b0a…22b20               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0163, t01=0x00de}
0x22b20…22b2e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0163, t01=0x00f4}
0x22b2e…22b38               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x0102}
0x22b38…22b42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x010c}
0x22b42…22b6e               Head {h00=0x0028, h01=0x0050, text=»* PROCESSING OF RECEIVED CALL-PACKET«, t00=0x0163, t01=0x0116}
0x22b6e…22b78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x0142}
0x22b78…22bac               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0163, t01=0x014c}
0x22bac…22bb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x0180}
0x22bb6…22bd2               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0163, t01=0x018a}
0x22bd2…22bf2               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x0164, t01=0x0016}
0x22bf2…22c10               Head {h00=0x001a, h01=0x0050, text=»*  A3  = BUFFER LENGTH«, t00=0x0164, t01=0x0036}
0x22c10…22c30               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0164, t01=0x0054}
0x22c30…22c5c               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0164, t01=0x0074}
0x22c5c…22c66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x00a0}
0x22c66…22c82               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0164, t01=0x00aa}
0x22c82…22c9a               Head {h00=0x0014, h01=0x0050, text=»*  ABL    CALLIN«, t00=0x0164, t01=0x00c6}
0x22c9a…22ca4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x00de}
0x22ca4…22cb8               Head {h00=0x0010, h01=0x0050, text=»CALLIN EQU *«, t00=0x0164, t01=0x00e8}
0x22cb8…22ce6               Head {h00=0x002a, h01=0x0050, text=» LDK A1,READ.ST IS LC-STATUS: READY ? «, t00=0x0164, t01=0x00fc}
0x22ce6…22d02               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0164, t01=0x012a}
0x22d02…22d1c               Head {h00=0x0016, h01=0x0050, text=» RF(E) CALLI1 YES «, t00=0x0164, t01=0x0146}
0x22d1c…22d46               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF RELEASE INPUT BUFFER«, t00=0x0164, t01=0x0160}
0x22d46…22d78               Head {h00=0x002e, h01=0x0050, text=» LDK A1,LCAL.ST IS LC-STATUS: LOCAL-CALL ?«, t00=0x0164, t01=0x018a}
0x22d78…22d94               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0165, t01=0x002c}
0x22d94…22dba               Head {h00=0x0022, h01=0x0050, text=» RF(NE) CALC00 NO, SO CLEAR VC«, t00=0x0165, t01=0x0048}
0x22dba…22dc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x006e}
0x22dc4…22e00               Head {h00=0x0038, h01=0x0050, text=»* A CALL COLLISION IS OCCURED, IGNORE RECEIVED CALL «, t00=0x0165, t01=0x0078}
0x22e00…22e0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x00b4}
0x22e0a…22e38               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0165, t01=0x00be}
0x22e38…22e42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x00ec}
0x22e42…22e86               Head {h00=0x0040, h01=0x0050, text=»* THE LC-STATUS IS VALID IN COMBINATION WITH THE CALL PACKET«, t00=0x0165, t01=0x00f6}
0x22e86…22e90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x013a}
0x22e90…22ea4               Head {h00=0x0010, h01=0x0050, text=»CALLI1 EQU *«, t00=0x0165, t01=0x0144}
0x22ea4…22ed8               Head {h00=0x0030, h01=0x0050, text=» ST A3,HDLC,A2 SAVE BUFFER LENGTH IN BUFFER «, t00=0x0165, t01=0x0158}
0x22ed8…22f06               Head {h00=0x002a, h01=0x0050, text=» LDK A1,RCAL.ST LC-STAT := REMOTE CALL«, t00=0x0165, t01=0x018c}
0x22f06…22f22               Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSTAT,A13 . «, t00=0x0166, t01=0x002a}
0x22f22…22f52               Head {h00=0x002c, h01=0x0050, text=» LDK A1,0 ALL RESERVED BUFFERS ARE USED «, t00=0x0166, t01=0x0046}
0x22f52…22f6e               Head {h00=0x0018, h01=0x0050, text=» SC A1,NRNUBF,A13 . «, t00=0x0166, t01=0x0076}
0x22f6e…22f7c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0166, t01=0x0092}
0x22f7c…22f86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x00a0}
0x22f86…22fb2               Head {h00=0x0028, h01=0x0050, text=»* GET WINDOW SIZES AND PACKET LENGTH«, t00=0x0166, t01=0x00aa}
0x22fb2…22fbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x00d6}
0x22fbc…22fd2               Head {h00=0x0012, h01=0x0050, text=» CF A14,GTWNDS«, t00=0x0166, t01=0x00e0}
0x22fd2…22fdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x00f6}
0x22fdc…2300e               Head {h00=0x002e, h01=0x0050, text=»* CHANGE TRANSMIT AND RECEIVE WINDOW SIZES«, t00=0x0166, t01=0x0100}
0x2300e…23018               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x0132}
0x23018…23032               Head {h00=0x0016, h01=0x0050, text=» LC A1,LCTRWN,A13 «, t00=0x0166, t01=0x013c}
0x23032…23044               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A1«, t00=0x0166, t01=0x0156}
0x23044…2305e               Head {h00=0x0016, h01=0x0050, text=» LC A1,LCREWN,A13 «, t00=0x0166, t01=0x0168}
0x2305e…23078               Head {h00=0x0016, h01=0x0050, text=» SC A1,LCTRWN,A13 «, t00=0x0166, t01=0x0182}
0x23078…2308a               Head {h00=0x000e, h01=0x0050, text=» ECR A1,A1«, t00=0x0167, t01=0x000c}
0x2308a…230a4               Head {h00=0x0016, h01=0x0050, text=» SC A1,LCREWN,A13 «, t00=0x0167, t01=0x001e}
0x230a4…230ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0038}
0x230ae…230e2               Head {h00=0x0030, h01=0x0050, text=»* CHANGE TRANSMIT AND RECEIVE PACKET LENGTH «, t00=0x0167, t01=0x0042}
0x230e2…230ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0076}
0x230ec…23106               Head {h00=0x0016, h01=0x0050, text=» LD A1,TRBFSZ,A13 «, t00=0x0167, t01=0x0080}
0x23106…23120               Head {h00=0x0016, h01=0x0050, text=» LD A3,REBFSZ,A13 «, t00=0x0167, t01=0x009a}
0x23120…2313a               Head {h00=0x0016, h01=0x0050, text=» ST A3,TRBFSZ,A13 «, t00=0x0167, t01=0x00b4}
0x2313a…23154               Head {h00=0x0016, h01=0x0050, text=» ST A1,REBFSZ,A13 «, t00=0x0167, t01=0x00ce}
0x23154…2315e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x00e8}
0x2315e…231a0               Head {h00=0x003e, h01=0x0050, text=»* TRANSLATE THRESHOLD PERCENTAGE INTO A NUMBER OF PACKETS «, t00=0x0167, t01=0x00f2}
0x231a0…231aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0134}
0x231aa…231c0               Head {h00=0x0012, h01=0x0050, text=» CF A14,TRTHR «, t00=0x0167, t01=0x013e}
0x231c0…231ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0154}
0x231ca…231f8               Head {h00=0x002a, h01=0x0050, text=»* QUEUE PACKET FOR THE REQUEST HANDLER«, t00=0x0167, t01=0x015e}
0x231f8…23202               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x018c}
0x23202…23214               Head {h00=0x000e, h01=0x0050, text=» RF CALC20«, t00=0x0168, t01=0x0008}
0x23214…23222               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0168, t01=0x001a}
0x23222…2322c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0028}
0x2322c…23236               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0032}
0x23236…23270               Head {h00=0x0036, h01=0x0050, text=»* PROCESSING OF RECEIVED CALL CONFIRMATION PACKET «, t00=0x0168, t01=0x003c}
0x23270…2327a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0076}
0x2327a…232ae               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0168, t01=0x0080}
0x232ae…232b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x00b4}
0x232b8…232d4               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0168, t01=0x00be}
0x232d4…232f4               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x0168, t01=0x00da}
0x232f4…23312               Head {h00=0x001a, h01=0x0050, text=»*  A3  = BUFFER LENGTH«, t00=0x0168, t01=0x00fa}
0x23312…23332               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0168, t01=0x0118}
0x23332…2335e               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0168, t01=0x0138}
0x2335e…23368               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0164}
0x23368…23384               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0168, t01=0x016e}
0x23384…2339c               Head {h00=0x0014, h01=0x0050, text=»*  ABL    CALCIN«, t00=0x0168, t01=0x018a}
0x2339c…233a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x0012}
0x233a6…233ba               Head {h00=0x0010, h01=0x0050, text=»CALCIN EQU *«, t00=0x0169, t01=0x001c}
0x233ba…233f0               Head {h00=0x0032, h01=0x0050, text=» LDK A1,LCAL.ST IS LC-STATUS: LOCAL-CALL STATE«, t00=0x0169, t01=0x0030}
0x233f0…2340c               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0169, t01=0x0066}
0x2340c…23426               Head {h00=0x0016, h01=0x0050, text=» RF(E) CALC10 YES «, t00=0x0169, t01=0x0082}
0x23426…23430               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x009c}
0x23430…23454               Head {h00=0x0020, h01=0x0050, text=»* ILLEGAL STATE, SO CLEAR VC«, t00=0x0169, t01=0x00a6}
0x23454…2345e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x00ca}
0x2345e…23488               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x0169, t01=0x00d4}
0x23488…2349c               Head {h00=0x0010, h01=0x0050, text=»CALC00 EQU *«, t00=0x0169, t01=0x00fe}
0x2349c…234d4               Head {h00=0x0034, h01=0x0050, text=» LDK A1,LOCPER DIAGNOSTIC CODE = PROCEDURE ERRO «, t00=0x0169, t01=0x0112}
0x234d4…23504               Head {h00=0x002c, h01=0x0050, text=» ABL CLVC CLEAR VC AND RETURN TO SCHED. «, t00=0x0169, t01=0x014a}
0x23504…2350e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x017a}
0x2350e…2351c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0169, t01=0x0184}
0x2351c…23526 (362, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0004}
0x23526…2355c               Head {h00=0x0032, h01=0x0050, text=»* STATUS WILL BE DATA TRANSFER, UPDATE LC-ADM «, t00=0x016a, t01=0x000e}
0x2355c…23566               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0044}
0x23566…2357a               Head {h00=0x0010, h01=0x0050, text=»CALC10 EQU *«, t00=0x016a, t01=0x004e}
0x2357a…235ac               Head {h00=0x002e, h01=0x0050, text=» LDK A1,DATA.ST LC-STATUS := DATA TRANSFER«, t00=0x016a, t01=0x0062}
0x235ac…235c0               Head {h00=0x0010, h01=0x0050, text=» ECR A1,A1 .«, t00=0x016a, t01=0x0094}
0x235c0…235fa               Head {h00=0x0036, h01=0x0050, text=» ST A1,LCSTAT,A13 SUBSTATUS := FLOW CONTROL READY «, t00=0x016a, t01=0x00a8}
0x235fa…23624               Head {h00=0x0026, h01=0x0050, text=» CF A14,CLLCAD CLEAR LC-ADM FIELDS«, t00=0x016a, t01=0x00e2}
0x23624…2362e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x010c}
0x2362e…23658               Head {h00=0x0026, h01=0x0050, text=»* UPDATE CALL CONFIRMATION PACKET «, t00=0x016a, t01=0x0116}
0x23658…23662               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0140}
0x23662…23696               Head {h00=0x0030, h01=0x0050, text=» ST A3,HDLC,A2 PACKET LENGTH TO HDLC-HEADER «, t00=0x016a, t01=0x014a}
0x23696…236a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x017e}
0x236a0…236c2               Head {h00=0x001e, h01=0x0050, text=»* QUEUE PACKET AND RETURN «, t00=0x016a, t01=0x0188}
0x236c2…236cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x001a}
0x236cc…236e0               Head {h00=0x0010, h01=0x0050, text=»CALC20 EQU *«, t00=0x016b, t01=0x0024}
0x236e0…23710               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x016b, t01=0x0038}
0x23710…2373e               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x016b, t01=0x0068}
0x2373e…2374c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016b, t01=0x0096}
0x2374c…23756               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x00a4}
0x23756…23760               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x00ae}
0x23760…2378e               Head {h00=0x002a, h01=0x0050, text=»* PROCESSING OF RECEIVED CLEAR PACKET «, t00=0x016b, t01=0x00b8}
0x2378e…23798               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x00e6}
0x23798…237cc               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x016b, t01=0x00f0}
0x237cc…237d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x0124}
0x237d6…237f0               Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMETER:«, t00=0x016b, t01=0x012e}
0x237f0…23810               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x016b, t01=0x0148}
0x23810…2382e               Head {h00=0x001a, h01=0x0050, text=»*  A3  = BUFFER LENGTH«, t00=0x016b, t01=0x0168}
0x2382e…2384e               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x016b, t01=0x0186}
0x2384e…2387a               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x016c, t01=0x0016}
0x2387a…23884               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x0042}
0x23884…238a0               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x016c, t01=0x004c}
0x238a0…238b8               Head {h00=0x0014, h01=0x0050, text=»*  ABL    CLRIN «, t00=0x016c, t01=0x0068}
0x238b8…238c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x0080}
0x238c2…238d6               Head {h00=0x0010, h01=0x0050, text=»CLRIN EQU * «, t00=0x016c, t01=0x008a}
0x238d6…238ec               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x016c, t01=0x009e}
0x238ec…23920               Head {h00=0x0030, h01=0x0050, text=» LC A1,VCTYP,A13 GET TYPE OF LOGICAL CHANNEL«, t00=0x016c, t01=0x00b4}
0x23920…23936               Head {h00=0x0012, h01=0x0050, text=» ANK A1,/FF . «, t00=0x016c, t01=0x00e8}
0x23936…2396a               Head {h00=0x0030, h01=0x0050, text=» CWK A1,SVC IS IT A SWITCH VIRTUAL CIRCUIT ?«, t00=0x016c, t01=0x00fe}
0x2396a…23982               Head {h00=0x0014, h01=0x0050, text=» RF(E) CLR00 YES«, t00=0x016c, t01=0x0132}
0x23982…239b6               Head {h00=0x0030, h01=0x0050, text=» LDK A1,LOCPER DIAGN. CODE : PROCEDURE ERROR«, t00=0x016c, t01=0x014a}
0x239b6…239d2               Head {h00=0x0018, h01=0x0050, text=» ABL CLVC RESET PVC «, t00=0x016c, t01=0x017e}
0x239d2…239dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x000a}
0x239dc…239f0               Head {h00=0x0010, h01=0x0050, text=»CLR00 EQU * «, t00=0x016d, t01=0x0014}
0x239f0…239fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x016d, t01=0x0028}
0x239fc…23a12               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x016d, t01=0x0034}
0x23a12…23a40               Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IS LC-STATUS = CLEAR ?«, t00=0x016d, t01=0x004a}
0x23a40…23a5c               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x016d, t01=0x0078}
0x23a5c…23a8a               Head {h00=0x002a, h01=0x0050, text=» RF(E) CLRCIN YES, CO CLEAR COLLISION «, t00=0x016d, t01=0x0094}
0x23a8a…23a94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x00c2}
0x23a94…23aa2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016d, t01=0x00cc}
0x23aa2…23aac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x00da}
0x23aac…23ade               Head {h00=0x002e, h01=0x0050, text=»* HAS THE REQUEST HANDLER TO BE NOTIFIED ?«, t00=0x016d, t01=0x00e4}
0x23ade…23ae8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x0116}
0x23ae8…23b1c               Head {h00=0x0030, h01=0x0050, text=» LD A6,LCDWT,A13 DOES THE RH KNOWS THIS VC ?«, t00=0x016d, t01=0x0120}
0x23b1c…23b34               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLR10 NO «, t00=0x016d, t01=0x0154}
0x23b34…23b56               Head {h00=0x001e, h01=0x0050, text=»         LDK      A1,VCREL«, t00=0x016d, t01=0x016c}
0x23b56…23b7c               Head {h00=0x0022, h01=0x0050, text=»         SC       A1,DWTSTE,A6«, t00=0x016d, t01=0x018e}
0x23b7c…23ba6               Head {h00=0x0026, h01=0x0050, text=» LDK A1,NPRFLG UNBLOCK INPUT QUEUE«, t00=0x016e, t01=0x0024}
0x23ba6…23bba               Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x016e, t01=0x004e}
0x23bba…23bd6               Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEINP,A13 .«, t00=0x016e, t01=0x0062}
0x23bd6…23c0a               Head {h00=0x0030, h01=0x0050, text=» ST A3,HDLC,A2 PACKET LENGTH TO HDLC-HEADER «, t00=0x016e, t01=0x007e}
0x23c0a…23c3a               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x016e, t01=0x00b2}
0x23c3a…23c4c               Head {h00=0x000e, h01=0x0050, text=» RF CLR15 «, t00=0x016e, t01=0x00e2}
0x23c4c…23c56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x00f4}
0x23c56…23c6a               Head {h00=0x0010, h01=0x0050, text=»CLR10 EQU * «, t00=0x016e, t01=0x00fe}
0x23c6a…23c94               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x016e, t01=0x0112}
0x23c94…23c9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x013c}
0x23c9e…23cac               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016e, t01=0x0146}
0x23cac…23cb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x0154}
0x23cb6…23d06               Head {h00=0x004c, h01=0x0050, text=»* LC-STATUS WAS "NOT CLEAR", SO SEND CLEAR CONFIRMATION TO REMOTE STATIO«, t00=0x016e, t01=0x015e}
0x23d06…23d10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x001e}
0x23d10…23d24               Head {h00=0x0010, h01=0x0050, text=»CLR15 EQU * «, t00=0x016f, t01=0x0028}
0x23d24…23d2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x003c}
0x23d2e…23d4a               Head {h00=0x0018, h01=0x0050, text=»* EMPTY OUTPUT QUEUE«, t00=0x016f, t01=0x0046}
0x23d4a…23d54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x0062}
0x23d54…23d82               Head {h00=0x002a, h01=0x0050, text=» LDKL A3,CLEA.RC RETURN CODE FOR USER «, t00=0x016f, t01=0x006c}
0x23d82…23d98               Head {h00=0x0012, h01=0x0050, text=» CF A14,CMEVNT«, t00=0x016f, t01=0x009a}
0x23d98…23dac               Head {h00=0x0010, h01=0x0050, text=»CLR20 EQU * «, t00=0x016f, t01=0x00b0}
0x23dac…23dd4               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x016f, t01=0x00c4}
0x23dd4…23dec               Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x016f, t01=0x00ec}
0x23dec…23e0c               Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x016f, t01=0x0104}
0x23e0c…23e24               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLR30 YES«, t00=0x016f, t01=0x0124}
0x23e24…23e2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x013c}
0x23e2e…23e5c               Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x016f, t01=0x0146}
0x23e5c…23e66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x0174}
0x23e66…23e92               Head {h00=0x0028, h01=0x0050, text=» LDKL A1,CLR20 REACTIVATION ADDRESS «, t00=0x016f, t01=0x017e}
0x23e92…23ea6               Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x0170, t01=0x001a}
0x23ea6…23eb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x002e}
0x23eb0…23ec4               Head {h00=0x0010, h01=0x0050, text=»CLR30 EQU * «, t00=0x0170, t01=0x0038}
0x23ec4…23ef0               Head {h00=0x0028, h01=0x0050, text=» LDK A1,CLE.CP PACKET IDENTIFICATION«, t00=0x0170, t01=0x004c}
0x23ef0…23f0a               Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x0170, t01=0x0078}
0x23f0a…23f3e               Head {h00=0x0030, h01=0x0050, text=» LDK A1,CLE.CL PACKET LENGTH TO HDLC-HEADER «, t00=0x0170, t01=0x0092}
0x23f3e…23f56               Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0170, t01=0x00c6}
0x23f56…23f92               Head {h00=0x0038, h01=0x0050, text=»         CM       LCSTAT,A13       NEW STATUS:=READY«, t00=0x0170, t01=0x00de}
0x23f92…23f9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x011a}
0x23f9c…23fb2               Head {h00=0x0012, h01=0x0050, text=»* QUEUE PACKET«, t00=0x0170, t01=0x0124}
0x23fb2…23fbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x013a}
0x23fbc…23fd0               Head {h00=0x0010, h01=0x0050, text=»CLR40 EQU * «, t00=0x0170, t01=0x0144}
0x23fd0…24000               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEO PUT ELEMENT IN OUTPUT QUEUE«, t00=0x0170, t01=0x0158}
0x24000…24014               Head {h00=0x0010, h01=0x0050, text=»CLR50 EQU * «, t00=0x0170, t01=0x0188}
0x24014…24042               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0171, t01=0x000c}
0x24042…24050               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0171, t01=0x003a}
0x24050…2405a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x0048}
0x2405a…24064               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x0052}
0x24064…2409e               Head {h00=0x0036, h01=0x0050, text=»* PROCESSING OF RECEIVED CLEAR CONFIRMATION PACKET«, t00=0x0171, t01=0x005c}
0x2409e…240a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x0096}
0x240a8…240dc               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0171, t01=0x00a0}
0x240dc…240e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x00d4}
0x240e6…24102               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0171, t01=0x00de}
0x24102…24122               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x0171, t01=0x00fa}
0x24122…24142               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0171, t01=0x011a}
0x24142…2416e               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0171, t01=0x013a}
0x2416e…24178               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x0166}
0x24178…2418c               Head {h00=0x0010, h01=0x0050, text=»CLRCIN EQU *«, t00=0x0171, t01=0x0170}
0x2418c…241b6               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x0171, t01=0x0184}
0x241b6…241c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x001e}
0x241c0…241ec               Head {h00=0x0028, h01=0x0050, text=»* RESET CONFIRMATION TIMER AND FLAG «, t00=0x0172, t01=0x0028}
0x241ec…241f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x0054}
0x241f6…24228               Head {h00=0x002e, h01=0x0050, text=» LD A1,TIMADR,A13 GET ADDRESS TIMER BLOCK «, t00=0x0172, t01=0x005e}
0x24228…2424c               Head {h00=0x0020, h01=0x0050, text=» CF A14,CANTIM CANCEL TIMER «, t00=0x0172, t01=0x0090}
0x2424c…24276               Head {h00=0x0026, h01=0x0050, text=» CM TIMADR,A13 CLEAR TIMER ADDRESS«, t00=0x0172, t01=0x00b4}
0x24276…242a6               Head {h00=0x002c, h01=0x0050, text=» LDK A1,CONTIM RESET TIMER STARTED FLAG «, t00=0x0172, t01=0x00de}
0x242a6…242ba               Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x0172, t01=0x010e}
0x242ba…242d6               Head {h00=0x0018, h01=0x0050, text=» ANS A1,FLAGS,A13 . «, t00=0x0172, t01=0x0122}
0x242d6…24304               Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IS LC-STATUS = CLEAR ?«, t00=0x0172, t01=0x013e}
0x24304…24320               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0172, t01=0x016c}
0x24320…2433a               Head {h00=0x0016, h01=0x0050, text=» RF(E) CLRC00 YES «, t00=0x0172, t01=0x0188}
0x2433a…24368               Head {h00=0x002a, h01=0x0050, text=» LDK A1,READ.ST IS LC-STATUS = READY ?«, t00=0x0173, t01=0x0012}
0x24368…24384               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0173, t01=0x0040}
0x24384…2439e               Head {h00=0x0016, h01=0x0050, text=» RF(E) CLRC10 YES «, t00=0x0173, t01=0x005c}
0x2439e…243a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x0076}
0x243a8…243b6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0173, t01=0x0080}
0x243b6…243c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x008e}
0x243c0…243fa               Head {h00=0x0036, h01=0x0050, text=»* STATUS IS NOT READY OR CLEAR, SO PROCEDURE ERROR«, t00=0x0173, t01=0x0098}
0x243fa…24404               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x00d2}
0x24404…24420               Head {h00=0x0018, h01=0x0050, text=» RB CALC00 CLEAR VC «, t00=0x0173, t01=0x00dc}
0x24420…2442a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x00f8}
0x2442a…2443e               Head {h00=0x0010, h01=0x0050, text=»CLRC00 EQU *«, t00=0x0173, t01=0x0102}
0x2443e…24468               Head {h00=0x0026, h01=0x0050, text=» CM LCSTAT,A13 SET STATUS := READY«, t00=0x0173, t01=0x0116}
0x24468…2447c               Head {h00=0x0010, h01=0x0050, text=»CLRC10 EQU *«, t00=0x0173, t01=0x0140}
0x2447c…244a8               Head {h00=0x0028, h01=0x0050, text=» RB CLR50 CONTROL BACK TO SCHEDULER «, t00=0x0173, t01=0x0154}
0x244a8…244b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x0180}
0x244b2…244be               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0173, t01=0x018a}
0x244be…244c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0008}
0x244c8…244d6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0174, t01=0x0012}
0x244d6…244e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0020}
0x244e0…244ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x002a}
0x244ea…24518               Head {h00=0x002a, h01=0x0050, text=»* PROCESSING OF RECEIVED RESET PACKET «, t00=0x0174, t01=0x0034}
0x24518…24522               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0062}
0x24522…24556               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0174, t01=0x006c}
0x24556…24560               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x00a0}
0x24560…2457c               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0174, t01=0x00aa}
0x2457c…2459c               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x0174, t01=0x00c6}
0x2459c…245ba               Head {h00=0x001a, h01=0x0050, text=»*  A3  = BUFFER LENGTH«, t00=0x0174, t01=0x00e6}
0x245ba…245da               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0174, t01=0x0104}
0x245da…24606               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0174, t01=0x0124}
0x24606…24610               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0150}
0x24610…2462c               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0174, t01=0x015a}
0x2462c…24644               Head {h00=0x0014, h01=0x0050, text=»*  ABL    RESIN «, t00=0x0174, t01=0x0176}
0x24644…2464e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x018e}
0x2464e…24662               Head {h00=0x0010, h01=0x0050, text=»RESIN EQU * «, t00=0x0175, t01=0x0008}
0x24662…24690               Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IF LC-STATUS = CLEAR ?«, t00=0x0175, t01=0x001c}
0x24690…246ac               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0175, t01=0x004a}
0x246ac…246d4               Head {h00=0x0024, h01=0x0050, text=» RF(E) RESC00 YES, IGNORE PACKET«, t00=0x0175, t01=0x0066}
0x246d4…246de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x008e}
0x246de…2470e               Head {h00=0x002c, h01=0x0050, text=»* TEST IF A RESET COLLISION HAS OCCURED «, t00=0x0175, t01=0x0098}
0x2470e…24718               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x00c8}
0x24718…24746               Head {h00=0x002a, h01=0x0050, text=» LDK A1,RSET.ST IS LC-STATUS = RESET ?«, t00=0x0175, t01=0x00d2}
0x24746…24762               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSBST,A13 . «, t00=0x0175, t01=0x0100}
0x24762…2477c               Head {h00=0x0016, h01=0x0050, text=» RF(E) RESCIN YES «, t00=0x0175, t01=0x011c}
0x2477c…24786               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x0136}
0x24786…247c2               Head {h00=0x0038, h01=0x0050, text=»* TEST IF CURRENT STATUS MATCH WITH RECEIVED PACKET «, t00=0x0175, t01=0x0140}
0x247c2…247cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x017c}
0x247cc…24802               Head {h00=0x0032, h01=0x0050, text=» LDK A1,DATA.ST IS LC-STATUS = DATA TRANSFER ?«, t00=0x0175, t01=0x0186}
0x24802…2481e               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0176, t01=0x002c}
0x2481e…2484c               Head {h00=0x002a, h01=0x0050, text=» RF(NE) RESC10 NO, SO PROCEDURE ERROR «, t00=0x0176, t01=0x0048}
0x2484c…24856               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x0076}
0x24856…24864               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0176, t01=0x0080}
0x24864…2486e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x008e}
0x2486e…248a4               Head {h00=0x0032, h01=0x0050, text=»* LC-STATUS IS DATA TRANSFER, SO RESET LC-ADM «, t00=0x0176, t01=0x0098}
0x248a4…248ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x00ce}
0x248ae…248e2               Head {h00=0x0030, h01=0x0050, text=» ST A3,HDLC,A2 PACKET LENGTH TO HDLC-HEADER «, t00=0x0176, t01=0x00d8}
0x248e2…2490e               Head {h00=0x0028, h01=0x0050, text=» CF A14,RSETVC RESET VIRTUAL CIRCUIT«, t00=0x0176, t01=0x010c}
0x2490e…2493e               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x0176, t01=0x0138}
0x2493e…24948               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x0168}
0x24948…24980               Head {h00=0x0034, h01=0x0050, text=»* PREPARE AND TRANSMIT RESET CONFIRMATION PACKET«, t00=0x0176, t01=0x0172}
0x24980…2498a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x001a}
0x2498a…2499e               Head {h00=0x0010, h01=0x0050, text=»RES40 EQU * «, t00=0x0177, t01=0x0024}
0x2499e…249c6               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x0177, t01=0x0038}
0x249c6…249de               Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x0177, t01=0x0060}
0x249de…249fe               Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x0177, t01=0x0078}
0x249fe…24a16               Head {h00=0x0014, h01=0x0050, text=» RF(Z) RES60 YES«, t00=0x0177, t01=0x0098}
0x24a16…24a20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x00b0}
0x24a20…24a4e               Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x0177, t01=0x00ba}
0x24a4e…24a58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x00e8}
0x24a58…24a84               Head {h00=0x0028, h01=0x0050, text=» LDKL A1,RES40 REACTIVATION ADDRESS «, t00=0x0177, t01=0x00f2}
0x24a84…24a98               Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x0177, t01=0x011e}
0x24a98…24aa2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x0132}
0x24aa2…24ab6               Head {h00=0x0010, h01=0x0050, text=»RES60 EQU * «, t00=0x0177, t01=0x013c}
0x24ab6…24ae6               Head {h00=0x002c, h01=0x0050, text=» LDK A1,RSET.CP RESET CONF. PACKET TYPE «, t00=0x0177, t01=0x0150}
0x24ae6…24b00               Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x0177, t01=0x0180}
0x24b00…24b34               Head {h00=0x0030, h01=0x0050, text=» LDK A1,RSET.CL PACKET LENGTH TO HDLC-HEADER«, t00=0x0178, t01=0x000a}
0x24b34…24b4c               Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0178, t01=0x003e}
0x24b4c…24b56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x0056}
0x24b56…24b6e               Head {h00=0x0014, h01=0x0050, text=»* QUEUE ELEMENT «, t00=0x0178, t01=0x0060}
0x24b6e…24b78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x0078}
0x24b78…24b8c               Head {h00=0x0010, h01=0x0050, text=» CF A14,QUEO«, t00=0x0178, t01=0x0082}
0x24b8c…24bba               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0178, t01=0x0096}
0x24bba…24bc8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0178, t01=0x00c4}
0x24bc8…24bd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x00d2}
0x24bd2…24bdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x00dc}
0x24bdc…24c18               Head {h00=0x0038, h01=0x0050, text=»* PROCESSING OF A RECEIVED RESET CONFIRMATION PACKET«, t00=0x0178, t01=0x00e6}
0x24c18…24c22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x0122}
0x24c22…24c56               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0178, t01=0x012c}
0x24c56…24c60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x0160}
0x24c60…24c7c               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0178, t01=0x016a}
0x24c7c…24c9c               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x0178, t01=0x0186}
0x24c9c…24cbc               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0179, t01=0x0016}
0x24cbc…24ce8               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0179, t01=0x0036}
0x24ce8…24cf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0179, t01=0x0062}
0x24cf2…24d0e               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0179, t01=0x006c}
0x24d0e…24d26               Head {h00=0x0014, h01=0x0050, text=»*  ABL    RESCIN«, t00=0x0179, t01=0x0088}
0x24d26…24d30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0179, t01=0x00a0}
0x24d30…24d44               Head {h00=0x0010, h01=0x0050, text=»RESCIN EQU *«, t00=0x0179, t01=0x00aa}
0x24d44…24d72               Head {h00=0x002a, h01=0x0050, text=» LD A1,TIMADR,A13 TIMER BLOCK ADDRESS «, t00=0x0179, t01=0x00be}
0x24d72…24d96               Head {h00=0x0020, h01=0x0050, text=» CF A14,CANTIM CANCEL TIMER «, t00=0x0179, t01=0x00ec}
0x24d96…24dac               Head {h00=0x0012, h01=0x0050, text=» CM TIMADR,A13«, t00=0x0179, t01=0x0110}
0x24dac…24dc2               Head {h00=0x0012, h01=0x0050, text=» LDK A3,CONTIM«, t00=0x0179, t01=0x0126}
0x24dc2…24dd4               Head {h00=0x000e, h01=0x0050, text=» C1R A3,A3«, t00=0x0179, t01=0x013c}
0x24dd4…24df0               Head {h00=0x0018, h01=0x0050, text=» ANS A3,FLAGS,A13 . «, t00=0x0179, t01=0x014e}
0x24df0…24e28               Head {h00=0x0034, h01=0x0050, text=» LDK A1,RSET.ST IS LC-STATUS = DATA-TRANSF/RESET«, t00=0x0179, t01=0x016a}
0x24e28…24e44               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSBST,A13 . «, t00=0x017a, t01=0x0012}
0x24e44…24e5e               Head {h00=0x0016, h01=0x0050, text=» RF(NE) RESC10 NO «, t00=0x017a, t01=0x002e}
0x24e5e…24e94               Head {h00=0x0032, h01=0x0050, text=» LDK A1,FLCN.ST SUB-STATUS := FLOW CNTRL READY«, t00=0x017a, t01=0x0048}
0x24e94…24eb0               Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSBST,A13 . «, t00=0x017a, t01=0x007e}
0x24eb0…24ee0               Head {h00=0x002c, h01=0x0050, text=» LDK A1,NPRFLG RESET NO PROCESSING FLAG «, t00=0x017a, t01=0x009a}
0x24ee0…24ef4               Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x017a, t01=0x00ca}
0x24ef4…24f10               Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEOUT,A13 .«, t00=0x017a, t01=0x00de}
0x24f10…24f24               Head {h00=0x0010, h01=0x0050, text=»RESC00 EQU *«, t00=0x017a, t01=0x00fa}
0x24f24…24f4e               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x017a, t01=0x010e}
0x24f4e…24f7c               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x017a, t01=0x0138}
0x24f7c…24f86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017a, t01=0x0166}
0x24f86…24f94               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x017a, t01=0x0170}
0x24f94…24f9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017a, t01=0x017e}
0x24f9e…24fc2               Head {h00=0x0020, h01=0x0050, text=»* ILLEGAL STATE, SO CLEAR VC«, t00=0x017a, t01=0x0188}
0x24fc2…24fcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017b, t01=0x001c}
0x24fcc…24fe0               Head {h00=0x0010, h01=0x0050, text=»RESC10 EQU *«, t00=0x017b, t01=0x0026}
0x24fe0…2500a               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x017b, t01=0x003a}
0x2500a…2503e               Head {h00=0x0030, h01=0x0050, text=» LDK A1,LOCPER DIAGN. CODE = PROCEDURE ERROR«, t00=0x017b, t01=0x0064}
0x2503e…2506e               Head {h00=0x002c, h01=0x0050, text=» ABL CLVC CLEAR VC AND RETURN TO SCHED. «, t00=0x017b, t01=0x0098}
0x2506e…2507c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x017b, t01=0x00c8}
0x2507c…25086               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017b, t01=0x00d6}
0x25086…25090               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017b, t01=0x00e0}
0x25090…250c2               Head {h00=0x002e, h01=0x0050, text=»* PROCESSING OF A RECEIVED RESTART PACKET «, t00=0x017b, t01=0x00ea}
0x250c2…250cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017b, t01=0x011c}
0x250cc…25100               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x017b, t01=0x0126}
0x25100…2510a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017b, t01=0x015a}
0x2510a…25126               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x017b, t01=0x0164}
0x25126…25146               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x017b, t01=0x0180}
0x25146…25168               Head {h00=0x001e, h01=0x0050, text=»*  A12=LINE BLOCK ADDRESS «, t00=0x017c, t01=0x0010}
0x25168…25194               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x017c, t01=0x0032}
0x25194…2519e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017c, t01=0x005e}
0x2519e…251ba               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x017c, t01=0x0068}
0x251ba…251d2               Head {h00=0x0014, h01=0x0050, text=»*  ABL    RSTIN «, t00=0x017c, t01=0x0084}
0x251d2…251dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017c, t01=0x009c}
0x251dc…251f0               Head {h00=0x0010, h01=0x0050, text=»RSTIN EQU * «, t00=0x017c, t01=0x00a6}
0x251f0…2521e               Head {h00=0x002a, h01=0x0050, text=» LDK A1,RSTFLG ALREADY RESTART BUSY ? «, t00=0x017c, t01=0x00ba}
0x2521e…2523a               Head {h00=0x0018, h01=0x0050, text=» AN A1,CMNFLG,A12 . «, t00=0x017c, t01=0x00e8}
0x2523a…25268               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) RSTCIN YES, RESTART COLLISION «, t00=0x017c, t01=0x0104}
0x25268…25292               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x017c, t01=0x0132}
0x25292…2529c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017c, t01=0x015c}
0x2529c…252c4               Head {h00=0x0024, h01=0x0050, text=»* CLEAR ALL NOT READY VC'S LOCAL«, t00=0x017c, t01=0x0166}
0x252c4…252ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017c, t01=0x018e}
0x252ce…25304               Head {h00=0x0032, h01=0x0050, text=» LDK A1,RSTRED DIAGN. CODE = RESTART RECEIVED «, t00=0x017d, t01=0x0008}
0x25304…25330               Head {h00=0x0028, h01=0x0050, text=» CF A14,CLAVCS CLEAR ALL VC'S LOCAL «, t00=0x017d, t01=0x003e}
0x25330…2533a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017d, t01=0x006a}
0x2533a…25374               Head {h00=0x0036, h01=0x0050, text=»* PREPARE AND TRANSMIT RESTART CONFIRMATION PACKET«, t00=0x017d, t01=0x0074}
0x25374…2537e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017d, t01=0x00ae}
0x2537e…25392               Head {h00=0x0010, h01=0x0050, text=»RST00 EQU * «, t00=0x017d, t01=0x00b8}
0x25392…253ba               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x017d, t01=0x00cc}
0x253ba…253d2               Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x017d, t01=0x00f4}
0x253d2…253f2               Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x017d, t01=0x010c}
0x253f2…2540a               Head {h00=0x0014, h01=0x0050, text=» RF(Z) RST20 YES«, t00=0x017d, t01=0x012c}
0x2540a…25414               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017d, t01=0x0144}
0x25414…25422               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x017d, t01=0x014e}
0x25422…2542c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017d, t01=0x015c}
0x2542c…2545a               Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x017d, t01=0x0166}
0x2545a…25464 (382, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017e, t01=0x0004}
0x25464…25490               Head {h00=0x0028, h01=0x0050, text=» LDKL A1,RST00 REACTIVATION ADDRESS «, t00=0x017e, t01=0x000e}
0x25490…254a4               Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x017e, t01=0x003a}
0x254a4…254ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017e, t01=0x004e}
0x254ae…254c2               Head {h00=0x0010, h01=0x0050, text=»RST20 EQU * «, t00=0x017e, t01=0x0058}
0x254c2…254f4               Head {h00=0x002e, h01=0x0050, text=» LDK A1,RSTR.CP RESTART CONF. PACKET TYPE «, t00=0x017e, t01=0x006c}
0x254f4…2550e               Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x017e, t01=0x009e}
0x2550e…25534               Head {h00=0x0022, h01=0x0050, text=» LDK A1,RSTR.CL PACKET LENGTH «, t00=0x017e, t01=0x00b8}
0x25534…2554c               Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x017e, t01=0x00de}
0x2554c…25556               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017e, t01=0x00f6}
0x25556…2557e               Head {h00=0x0024, h01=0x0050, text=»* STORE ELEMENT IN RESTART QUEUE«, t00=0x017e, t01=0x0100}
0x2557e…25588               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017e, t01=0x0128}
0x25588…255b0               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A12 QUEUE ANCHOR ADDRESS«, t00=0x017e, t01=0x0132}
0x255b0…255c8               Head {h00=0x0014, h01=0x0050, text=» ADK A1,RSTQUE .«, t00=0x017e, t01=0x015a}
0x255c8…255ec               Head {h00=0x0020, h01=0x0050, text=» CF A14,QUEUE QUEUE ELEMENT «, t00=0x017e, t01=0x0172}
0x255ec…25618               Head {h00=0x0028, h01=0x0050, text=» RF RSTC20 CONTROL BACK TO SCHEDULER«, t00=0x017f, t01=0x0008}
0x25618…25626               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x017f, t01=0x0034}
0x25626…25630               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x0042}
0x25630…2563a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x004c}
0x2563a…25678               Head {h00=0x003a, h01=0x0050, text=»* PROCESSING OF A RECEIVED RESTART CONFIRMATION PACKET«, t00=0x017f, t01=0x0056}
0x25678…25682               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x0094}
0x25682…256b6               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x017f, t01=0x009e}
0x256b6…256c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x00d2}
0x256c0…256dc               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x017f, t01=0x00dc}
0x256dc…256fc               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x017f, t01=0x00f8}
0x256fc…25720               Head {h00=0x0020, h01=0x0050, text=»*  A12 = LINE BLOCK ADDRESS «, t00=0x017f, t01=0x0118}
0x25720…2574c               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x017f, t01=0x013c}
0x2574c…25756               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x0168}
0x25756…25772               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x017f, t01=0x0172}
0x25772…2578a               Head {h00=0x0014, h01=0x0050, text=»*  ABL    RSTCIN«, t00=0x017f, t01=0x018e}
0x2578a…25794               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0180, t01=0x0016}
0x25794…257a8               Head {h00=0x0010, h01=0x0050, text=»RSTCIN EQU *«, t00=0x0180, t01=0x0020}
0x257a8…257b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0180, t01=0x0034}
0x257b2…257c8               Head {h00=0x0012, h01=0x0050, text=»* RESET TIMER «, t00=0x0180, t01=0x003e}
0x257c8…257d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0180, t01=0x0054}
0x257d2…257fc               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x0180, t01=0x005e}
0x257fc…25824               Head {h00=0x0024, h01=0x0050, text=» LD A1,RTMADR,A12 TIMER ACTIVE ?«, t00=0x0180, t01=0x0088}
0x25824…25848               Head {h00=0x0020, h01=0x0050, text=» CF A14,CANTIM CANCEL TIMER «, t00=0x0180, t01=0x00b0}
0x25848…2585e               Head {h00=0x0012, h01=0x0050, text=» CM RTMADR,A12«, t00=0x0180, t01=0x00d4}
0x2585e…2588e               Head {h00=0x002c, h01=0x0050, text=» LDK A1,RSTFLG RESTART PROCEDURE BUSY ? «, t00=0x0180, t01=0x00ea}
0x2588e…258aa               Head {h00=0x0018, h01=0x0050, text=» AN A1,CMNFLG,A12 . «, t00=0x0180, t01=0x011a}
0x258aa…258d2               Head {h00=0x0024, h01=0x0050, text=» RF(Z) RSTC20 NO, IGNORE PACKET «, t00=0x0180, t01=0x0136}
0x258d2…2590a               Head {h00=0x0034, h01=0x0050, text=» XRS A1,CMNFLG,A12 RESET RESTART PROC. BUSY FLAG«, t00=0x0180, t01=0x015e}
0x2590a…2591e               Head {h00=0x0010, h01=0x0050, text=»RSTC20 EQU *«, t00=0x0181, t01=0x0008}
0x2591e…25932               Head {h00=0x0010, h01=0x0050, text=» ABL EXITDC «, t00=0x0181, t01=0x001c}
0x25932…25940               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0181, t01=0x0030}
0x25940…2594a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0181, t01=0x003e}
0x2594a…25954               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0181, t01=0x0048}
0x25954…25986               Head {h00=0x002e, h01=0x0050, text=»* PROCESSING OF RECEIVED INTERRUPT PACKET «, t00=0x0181, t01=0x0052}
0x25986…25990               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0181, t01=0x0084}
0x25990…259c4               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0181, t01=0x008e}
0x259c4…259ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0181, t01=0x00c2}
0x259ce…259ea               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0181, t01=0x00cc}
0x259ea…25a0a               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x0181, t01=0x00e8}
0x25a0a…25a28               Head {h00=0x001a, h01=0x0050, text=»*  A3  = BUFFER LENGTH«, t00=0x0181, t01=0x0108}
0x25a28…25a48               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0181, t01=0x0126}
0x25a48…25a74               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0181, t01=0x0146}
0x25a74…25a7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0181, t01=0x0172}
0x25a7e…25a9a               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0181, t01=0x017c}
0x25a9a…25ab2               Head {h00=0x0014, h01=0x0050, text=»*  ABL    INTIN «, t00=0x0182, t01=0x0008}
0x25ab2…25abc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0182, t01=0x0020}
0x25abc…25ad0               Head {h00=0x0010, h01=0x0050, text=»INTIN EQU * «, t00=0x0182, t01=0x002a}
0x25ad0…25b06               Head {h00=0x0032, h01=0x0050, text=» LDK A4,0 INDICATE ENTRY FOR INTERRUPT PACKET «, t00=0x0182, t01=0x003e}
0x25b06…25b10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0182, t01=0x0074}
0x25b10…25b52               Head {h00=0x003e, h01=0x0050, text=»* THE NEXT PART OF CODING IS COMMON FOR THE PROCESSING OF «, t00=0x0182, t01=0x007e}
0x25b52…25b90               Head {h00=0x003a, h01=0x0050, text=»* AN INTERRUPT- AND AN INTERRUPT CONFIRMATION PACKET. «, t00=0x0182, t01=0x00c0}
0x25b90…25b9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0182, t01=0x00fe}
0x25b9a…25bae               Head {h00=0x0010, h01=0x0050, text=»INT00 EQU * «, t00=0x0182, t01=0x0108}
0x25bae…25be4               Head {h00=0x0032, h01=0x0050, text=» LDK A1,DATA.ST IS LC-STATUS = DATA TRANSFER ?«, t00=0x0182, t01=0x011c}
0x25be4…25c00               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0182, t01=0x0152}
0x25c00…25c18               Head {h00=0x0014, h01=0x0050, text=» RF(E) INT20 YES«, t00=0x0182, t01=0x016e}
0x25c18…25c22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0182, t01=0x0186}
0x25c22…25c6a               Head {h00=0x0044, h01=0x0050, text=»* LC-STATUS IS NOT DATA TRANSFER, IF CLEAR: IGNORE PACKET, ELSE «, t00=0x0182, t01=0x0190}
0x25c6a…25c84               Head {h00=0x0016, h01=0x0050, text=»* PROCEDURE ERROR.«, t00=0x0183, t01=0x0048}
0x25c84…25c8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0183, t01=0x0062}
0x25c8e…25cbc               Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IS LC-STATUS = CLEAR ?«, t00=0x0183, t01=0x006c}
0x25cbc…25cd8               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0183, t01=0x009a}
0x25cd8…25d06               Head {h00=0x002a, h01=0x0050, text=» RB(NE) RESC10 NO, SO PROCEDURE ERROR «, t00=0x0183, t01=0x00b6}
0x25d06…25d26               Head {h00=0x001c, h01=0x0050, text=» RB RESC00 IGNORE PACKET«, t00=0x0183, t01=0x00e4}
0x25d26…25d30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0183, t01=0x0104}
0x25d30…25d3e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0183, t01=0x010e}
0x25d3e…25d48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0183, t01=0x011c}
0x25d48…25d8c               Head {h00=0x0040, h01=0x0050, text=»* STATE = DATA TRANSFER, IF SUB-STATE = RESET: IGNORE PACKET«, t00=0x0183, t01=0x0126}
0x25d8c…25d96               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0183, t01=0x016a}
0x25d96…25daa               Head {h00=0x0010, h01=0x0050, text=»INT20 EQU * «, t00=0x0183, t01=0x0174}
0x25daa…25ddc               Head {h00=0x002e, h01=0x0050, text=» LC A1,LCSBST,A13 IS LC-SUBSTATUS = RESET «, t00=0x0183, t01=0x0188}
0x25ddc…25df6               Head {h00=0x0016, h01=0x0050, text=» ANK A1,RSET.STA .«, t00=0x0184, t01=0x002a}
0x25df6…25e1a               Head {h00=0x0020, h01=0x0050, text=» RB(NZ) RESC00 IGNORE PACKET«, t00=0x0184, t01=0x0044}
0x25e1a…25e24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0184, t01=0x0068}
0x25e24…25e4e               Head {h00=0x0026, h01=0x0050, text=»* QUEUE PACKET FOR REQUEST HANDLER«, t00=0x0184, t01=0x0072}
0x25e4e…25e58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0184, t01=0x009c}
0x25e58…25e6c               Head {h00=0x0010, h01=0x0050, text=»INT30 EQU * «, t00=0x0184, t01=0x00a6}
0x25e6c…25ea0               Head {h00=0x0030, h01=0x0050, text=» ST A3,HDLC,A2 SAVE PACKET LENGTH IN BUFFER «, t00=0x0184, t01=0x00ba}
0x25ea0…25eea               Head {h00=0x0046, h01=0x0050, text=»         LDR      A1,A13                INPUT QUEUE ANCHOR ADDRESS«, t00=0x0184, t01=0x00ee}
0x25eea…25f0e               Head {h00=0x0020, h01=0x0050, text=»         ADK      A1,QUEINP «, t00=0x0184, t01=0x0138}
0x25f0e…25f54               Head {h00=0x0042, h01=0x0050, text=»         CF       A14,QUEUEF            QUEUE ELEMENT AS FIRST«, t00=0x0184, t01=0x015c}
0x25f54…25f9c               Head {h00=0x0044, h01=0x0050, text=»         LDK      A2,NPRFLG             RESET NO PROCESSING FLAG«, t00=0x0185, t01=0x0012}
0x25f9c…25fbc               Head {h00=0x001c, h01=0x0050, text=»         C1R      A2,A2 «, t00=0x0185, t01=0x005a}
0x25fbc…25fdc               Head {h00=0x001c, h01=0x0050, text=»         ANRS     A2,A1 «, t00=0x0185, t01=0x007a}
0x25fdc…25fee               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0185, t01=0x009a}
0x25fee…26026               Head {h00=0x0034, h01=0x0050, text=» RF(NZ) INTC10 CONTINUE WITH SPECIFIC PROCESSING«, t00=0x0185, t01=0x00ac}
0x26026…2604a               Head {h00=0x0020, h01=0x0050, text=»   OF INTERRUPT CONF. PACKET«, t00=0x0185, t01=0x00e4}
0x2604a…2607c               Head {h00=0x002e, h01=0x0050, text=» RB RSTC20 CONTROL BLOCK BACK TO SCHEDULER«, t00=0x0185, t01=0x0108}
0x2607c…2608a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0185, t01=0x013a}
0x2608a…26094               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0185, t01=0x0148}
0x26094…2609e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0185, t01=0x0152}
0x2609e…260dc               Head {h00=0x003a, h01=0x0050, text=»* PROCESSING OF RECEIVED INTERRUPT CONFIRMATION PACKET«, t00=0x0185, t01=0x015c}
0x260dc…260e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0186, t01=0x000a}
0x260e6…2611a               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0186, t01=0x0014}
0x2611a…26124               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0186, t01=0x0048}
0x26124…26140               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0186, t01=0x0052}
0x26140…26160               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x0186, t01=0x006e}
0x26160…2617e               Head {h00=0x001a, h01=0x0050, text=»*  A3  = BUFFER LENGTH«, t00=0x0186, t01=0x008e}
0x2617e…2619e               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0186, t01=0x00ac}
0x2619e…261ca               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0186, t01=0x00cc}
0x261ca…261d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0186, t01=0x00f8}
0x261d4…261f0               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0186, t01=0x0102}
0x261f0…26208               Head {h00=0x0014, h01=0x0050, text=»*  ABL    INTCIN«, t00=0x0186, t01=0x011e}
0x26208…2621c               Head {h00=0x0010, h01=0x0050, text=»INTCIN EQU *«, t00=0x0186, t01=0x0136}
0x2621c…26258               Head {h00=0x0038, h01=0x0050, text=» LDK A4,1 INDICATION FOR INTERR. CONF. PACKET ENTRY «, t00=0x0186, t01=0x014a}
0x26258…26262               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0186, t01=0x0186}
0x26262…262a6               Head {h00=0x0040, h01=0x0050, text=»* STATUS CKECKING ETC. IS DONE IN COMMON PART OF CODING WITH«, t00=0x0186, t01=0x0190}
0x262a6…262d6               Head {h00=0x002c, h01=0x0050, text=»* THE PROCESSING OF A INTERRUPT PACKET. «, t00=0x0187, t01=0x0044}
0x262d6…262e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0187, t01=0x0074}
0x262e0…262f2               Head {h00=0x000e, h01=0x0050, text=» RB INT00 «, t00=0x0187, t01=0x007e}
0x262f2…262fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0187, t01=0x0090}
0x262fc…26322               Head {h00=0x0022, h01=0x0050, text=»* RESET INTERRUPT PENDING FLAG«, t00=0x0187, t01=0x009a}
0x26322…2632c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0187, t01=0x00c0}
0x2632c…26340               Head {h00=0x0010, h01=0x0050, text=»INTC10 EQU *«, t00=0x0187, t01=0x00ca}
0x26340…26374               Head {h00=0x0030, h01=0x0050, text=» LDK A1,INTPNG RESET INTERRUPT PENDING FLAG «, t00=0x0187, t01=0x00de}
0x26374…26388               Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x0187, t01=0x0112}
0x26388…263a4               Head {h00=0x0018, h01=0x0050, text=» ANS A1,FLAGS,A13 . «, t00=0x0187, t01=0x0126}
0x263a4…263d6               Head {h00=0x002e, h01=0x0050, text=» RB RSTC20 CONTROL BLOCK BACK TO SCHEDULER«, t00=0x0187, t01=0x0142}
0x263d6…263e4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0187, t01=0x0174}
0x263e4…263ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0187, t01=0x0182}
0x263ee…263f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0187, t01=0x018c}
0x263f8…2642e               Head {h00=0x0032, h01=0x0050, text=»* THIS MODULE PERFORMS THE CLEARING RESP. THE «, t00=0x0188, t01=0x0008}
0x2642e…26456               Head {h00=0x0024, h01=0x0050, text=»* RESETTING OF A SVC RESP. PVC. «, t00=0x0188, t01=0x003e}
0x26456…26460               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0188, t01=0x0066}
0x26460…26494               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0188, t01=0x0070}
0x26494…2649e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0188, t01=0x00a4}
0x2649e…264ba               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0188, t01=0x00ae}
0x264ba…264da               Head {h00=0x001c, h01=0x0050, text=»*  A1  = DIAGNOSTIC CODE«, t00=0x0188, t01=0x00ca}
0x264da…264fa               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x0188, t01=0x00ea}
0x264fa…26526               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0188, t01=0x010a}
0x26526…26530               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0188, t01=0x0136}
0x26530…2654c               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0188, t01=0x0140}
0x2654c…26562               Head {h00=0x0012, h01=0x0050, text=»*  ABL    CLVC«, t00=0x0188, t01=0x015c}
0x26562…2656c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0188, t01=0x0172}
0x2656c…2657e               Head {h00=0x000e, h01=0x0050, text=»CLVC EQU *«, t00=0x0188, t01=0x017c}
0x2657e…265a6               Head {h00=0x0024, h01=0x0050, text=» LDR A5,A1 SAVE DIAGNOSTIC CODE «, t00=0x0188, t01=0x018e}
0x265a6…265bc               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0189, t01=0x0026}
0x265bc…265d2               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0189, t01=0x003c}
0x265d2…265dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0189, t01=0x0052}
0x265dc…265f8               Head {h00=0x0018, h01=0x0050, text=»* SELECT ON VC-TYPE «, t00=0x0189, t01=0x005c}
0x265f8…26602               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0189, t01=0x0078}
0x26602…26622               Head {h00=0x001c, h01=0x0050, text=» LDK A1,PVC GET VC-TYPE «, t00=0x0189, t01=0x0082}
0x26622…2663c               Head {h00=0x0016, h01=0x0050, text=» CC A1,VCTYP,A13 .«, t00=0x0189, t01=0x00a2}
0x2663c…26664               Head {h00=0x0024, h01=0x0050, text=» RF(E) CLV100 TYPE IS PERMANENT «, t00=0x0189, t01=0x00bc}
0x26664…2666e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0189, t01=0x00e4}
0x2666e…26690               Head {h00=0x001e, h01=0x0050, text=»* SWITCHED VIRTUAL CIRCUIT«, t00=0x0189, t01=0x00ee}
0x26690…2669a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0189, t01=0x0110}
0x2669a…266a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0189, t01=0x011a}
0x266a6…266bc               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0189, t01=0x0126}
0x266bc…266ea               Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IS LC-STATUS = CLEAR ?«, t00=0x0189, t01=0x013c}
0x266ea…26706               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0189, t01=0x016a}
0x26706…2672a               Head {h00=0x0020, h01=0x0050, text=» RF(E) CLVC60 YES, NO ACTION«, t00=0x0189, t01=0x0186}
0x2672a…26766               Head {h00=0x0038, h01=0x0050, text=»         SC       A1,LCSTAT,A13    LC-STATUS:=CLEAR «, t00=0x018a, t01=0x001a}
0x26766…26770               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x0056}
0x26770…2677e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x018a, t01=0x0060}
0x2677e…26788               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x006e}
0x26788…267a4               Head {h00=0x0018, h01=0x0050, text=»* EMPTY INPUT QUEUE «, t00=0x018a, t01=0x0078}
0x267a4…267ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x0094}
0x267ae…267d2               Head {h00=0x0020, h01=0x0050, text=»         CF       A14,CLINPQ«, t00=0x018a, t01=0x009e}
0x267d2…267dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x00c2}
0x267dc…26806               Head {h00=0x0026, h01=0x0050, text=»* COMPLETE EVENTS IN OUTPUT QUEUE «, t00=0x018a, t01=0x00cc}
0x26806…26810               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x00f6}
0x26810…26828               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,CLEA.RC«, t00=0x018a, t01=0x0100}
0x26828…2683e               Head {h00=0x0012, h01=0x0050, text=» CF A14,CMEVNT«, t00=0x018a, t01=0x0118}
0x2683e…26848               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x012e}
0x26848…26878               Head {h00=0x002c, h01=0x0050, text=»* SEND NOTIFICATION TO RH, IF APPLICABLE«, t00=0x018a, t01=0x0138}
0x26878…26882               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x0168}
0x26882…268b6               Head {h00=0x0030, h01=0x0050, text=» LD A6,LCDWT,A13 DOES THE RH KNOWS THIS LC ?«, t00=0x018a, t01=0x0172}
0x268b6…268ce               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLVC20 NO«, t00=0x018b, t01=0x0016}
0x268ce…268f0               Head {h00=0x001e, h01=0x0050, text=»         LDK      A1,VCREL«, t00=0x018b, t01=0x002e}
0x268f0…26916               Head {h00=0x0022, h01=0x0050, text=»         SC       A1,DWTSTE,A6«, t00=0x018b, t01=0x0050}
0x26916…26940               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTBUF GET AN INPUT BUFFER «, t00=0x018b, t01=0x0076}
0x26940…26970               Head {h00=0x002c, h01=0x0050, text=» LC A1,LCNUM,A13 LOGICAL CHANNEL NUMBER «, t00=0x018b, t01=0x00a0}
0x26970…2698a               Head {h00=0x0016, h01=0x0050, text=» SC A1,LCIDNT,A2 .«, t00=0x018b, t01=0x00d0}
0x2698a…269b4               Head {h00=0x0026, h01=0x0050, text=» LDK A1,CLE.P INTERNAL PACKET TYPE«, t00=0x018b, t01=0x00ea}
0x269b4…269ce               Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x018b, t01=0x0114}
0x269ce…269e8               Head {h00=0x0016, h01=0x0050, text=» SC A5,DGNCOD,A2 .«, t00=0x018b, t01=0x012e}
0x269e8…26a0c               Head {h00=0x0020, h01=0x0050, text=» LDK A1,CLE.L PACKET LENGTH «, t00=0x018b, t01=0x0148}
0x26a0c…26a24               Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x018b, t01=0x016c}
0x26a24…26a54               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x018b, t01=0x0184}
0x26a54…26a86               Head {h00=0x002e, h01=0x0050, text=» LD A1,TIMADR,A13 GET TIMER BLOCK ADDRESS «, t00=0x018c, t01=0x0024}
0x26a86…26aaa               Head {h00=0x0020, h01=0x0050, text=» CF A14,CANTIM CANCEL TIMER «, t00=0x018c, t01=0x0056}
0x26aaa…26ace               Head {h00=0x0020, h01=0x0050, text=»         CM       TIMADR,A13«, t00=0x018c, t01=0x007a}
0x26ace…26ad8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018c, t01=0x009e}
0x26ad8…26ae6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x018c, t01=0x00a8}
0x26ae6…26af0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018c, t01=0x00b6}
0x26af0…26b34               Head {h00=0x0040, h01=0x0050, text=»* PREPARE CLEAR PACKET AND TRANSMIT IT TO THE REMOTE STATION«, t00=0x018c, t01=0x00c0}
0x26b34…26b3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018c, t01=0x0104}
0x26b3e…26b52               Head {h00=0x0010, h01=0x0050, text=»CLVC20 EQU *«, t00=0x018c, t01=0x010e}
0x26b52…26b7a               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x018c, t01=0x0122}
0x26b7a…26b92               Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x018c, t01=0x014a}
0x26b92…26bb2               Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x018c, t01=0x0162}
0x26bb2…26bcc               Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLVC40 YES «, t00=0x018c, t01=0x0182}
0x26bcc…26bd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018d, t01=0x000c}
0x26bd6…26c04               Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x018d, t01=0x0016}
0x26c04…26c0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018d, t01=0x0044}
0x26c0e…26c3a               Head {h00=0x0028, h01=0x0050, text=» LDKL A1,CLVC20 REACTIVATION ADDRESS«, t00=0x018d, t01=0x004e}
0x26c3a…26c4e               Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x018d, t01=0x007a}
0x26c4e…26c58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018d, t01=0x008e}
0x26c58…26c6c               Head {h00=0x0010, h01=0x0050, text=»CLVC40 EQU *«, t00=0x018d, t01=0x0098}
0x26c6c…26c94               Head {h00=0x0024, h01=0x0050, text=» LDK A1,CLE.P CLEAR PACKET TYPE «, t00=0x018d, t01=0x00ac}
0x26c94…26cae               Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x018d, t01=0x00d4}
0x26cae…26cd6               Head {h00=0x0024, h01=0x0050, text=» SC A5,DGNCOD,A2 DIAGNOSTIC CODE«, t00=0x018d, t01=0x00ee}
0x26cd6…26ce8               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x018d, t01=0x0116}
0x26ce8…26d14               Head {h00=0x0028, h01=0x0050, text=» SC A1,CAUSE,A2 CLEAR CLEARING CAUSE«, t00=0x018d, t01=0x0128}
0x26d14…26d3e               Head {h00=0x0026, h01=0x0050, text=» LDK A1,CLE.L CLEAR PACKET LENGTH «, t00=0x018d, t01=0x0154}
0x26d3e…26d56               Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x018d, t01=0x017e}
0x26d56…26d86               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEO PUT ELEMENT IN OUTPUT QUEUE«, t00=0x018e, t01=0x0008}
0x26d86…26d90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018e, t01=0x0038}
0x26d90…26db2               Head {h00=0x001e, h01=0x0050, text=»* START CONFIRMATION TIMER«, t00=0x018e, t01=0x0042}
0x26db2…26dbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018e, t01=0x0064}
0x26dbc…26dec               Head {h00=0x002c, h01=0x0050, text=» LDKL A8,SYCLTM CLEAR CONFIRMATION TIMER«, t00=0x018e, t01=0x006e}
0x26dec…26e0e               Head {h00=0x001e, h01=0x0050, text=» CF A14,STTIM START TIMER «, t00=0x018e, t01=0x009e}
0x26e0e…26e22               Head {h00=0x0010, h01=0x0050, text=»CLVC60 EQU *«, t00=0x018e, t01=0x00c0}
0x26e22…26e50               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x018e, t01=0x00d4}
0x26e50…26e5c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x018e, t01=0x0102}
0x26e5c…26e72               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x018e, t01=0x010e}
0x26e72…26e80               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x018e, t01=0x0124}
0x26e80…26e8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018e, t01=0x0132}
0x26e8a…26eae               Head {h00=0x0020, h01=0x0050, text=»* PERMANENT VIRTUAL CIRCUITS«, t00=0x018e, t01=0x013c}
0x26eae…26eb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018e, t01=0x0160}
0x26eb8…26ecc               Head {h00=0x0010, h01=0x0050, text=»CLV100 EQU *«, t00=0x018e, t01=0x016a}
0x26ecc…26efc               Head {h00=0x002c, h01=0x0050, text=» LDK A1,RSET.ST IS SUB-STATUS = RESET ? «, t00=0x018e, t01=0x017e}
0x26efc…26f18               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSBST,A13 . «, t00=0x018f, t01=0x001e}
0x26f18…26f3c               Head {h00=0x0020, h01=0x0050, text=» RF(E) CLV160 YES, NO ACTION«, t00=0x018f, t01=0x003a}
0x26f3c…26f68               Head {h00=0x0028, h01=0x0050, text=» SC A1,LCSBST,A13 SUBSTATUS := RESET«, t00=0x018f, t01=0x005e}
0x26f68…26f72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018f, t01=0x008a}
0x26f72…26f92               Head {h00=0x001c, h01=0x0050, text=»* RESET VIRTUAL CIRCUIT «, t00=0x018f, t01=0x0094}
0x26f92…26f9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018f, t01=0x00b4}
0x26f9c…26fb2               Head {h00=0x0012, h01=0x0050, text=» CF A14,RSETVC«, t00=0x018f, t01=0x00be}
0x26fb2…26fbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018f, t01=0x00d4}
0x26fbc…26fec               Head {h00=0x002c, h01=0x0050, text=»* SEND NOTIFICATION TO RH, IF APPLICABLE«, t00=0x018f, t01=0x00de}
0x26fec…26ff6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018f, t01=0x010e}
0x26ff6…2702a               Head {h00=0x0030, h01=0x0050, text=» LD A1,LCDWT,A13 DOES THE RH KNOWS THIS LC ?«, t00=0x018f, t01=0x0118}
0x2702a…27042               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLV130 NO«, t00=0x018f, t01=0x014c}
0x27042…2706c               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTBUF GET AN INPUT BUFFER «, t00=0x018f, t01=0x0164}
0x2706c…2709c               Head {h00=0x002c, h01=0x0050, text=» LC A1,LCNUM,A13 LOGICAL CHANNEL NUMBER «, t00=0x018f, t01=0x018e}
0x2709c…270b6               Head {h00=0x0016, h01=0x0050, text=» SC A1,LCIDNT,A2 .«, t00=0x0190, t01=0x002e}
0x270b6…270d8               Head {h00=0x001e, h01=0x0050, text=» LDK A1,RSET.P PACKET TYPE«, t00=0x0190, t01=0x0048}
0x270d8…270f2               Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x0190, t01=0x006a}
0x270f2…2710c               Head {h00=0x0016, h01=0x0050, text=» SC A5,DGNCOD,A2 .«, t00=0x0190, t01=0x0084}
0x2710c…27130               Head {h00=0x0020, h01=0x0050, text=» LDK A1,RSET.L PACKET LENGTH«, t00=0x0190, t01=0x009e}
0x27130…27148               Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0190, t01=0x00c2}
0x27148…27178               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x0190, t01=0x00da}
0x27178…271aa               Head {h00=0x002e, h01=0x0050, text=» LD A1,TIMADR,A13 GET TIMER BLOCK ADDRESS «, t00=0x0190, t01=0x010a}
0x271aa…271ce               Head {h00=0x0020, h01=0x0050, text=» CF A14,CANTIM CANCEL TIMER «, t00=0x0190, t01=0x013c}
0x271ce…271e4               Head {h00=0x0012, h01=0x0050, text=» CM TIMADR,A13«, t00=0x0190, t01=0x0160}
0x271e4…271ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0190, t01=0x0176}
0x271ee…271fc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0190, t01=0x0180}
0x271fc…27206               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0190, t01=0x018e}
0x27206…2724a               Head {h00=0x0040, h01=0x0050, text=»* PREPARE RESET PACKET AND TRANSMIT IT TO THE REMOTE STATION«, t00=0x0191, t01=0x0008}
0x2724a…27254               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0191, t01=0x004c}
0x27254…27268               Head {h00=0x0010, h01=0x0050, text=»CLV130 EQU *«, t00=0x0191, t01=0x0056}
0x27268…27290               Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x0191, t01=0x006a}
0x27290…272a8               Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x0191, t01=0x0092}
0x272a8…272c8               Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x0191, t01=0x00aa}
0x272c8…272e2               Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLV150 YES «, t00=0x0191, t01=0x00ca}
0x272e2…272ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0191, t01=0x00e4}
0x272ec…2731a               Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x0191, t01=0x00ee}
0x2731a…27324               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0191, t01=0x011c}
0x27324…27350               Head {h00=0x0028, h01=0x0050, text=» LDKL A1,CLV130 REACTIVATION ADDRESS«, t00=0x0191, t01=0x0126}
0x27350…27364               Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x0191, t01=0x0152}
0x27364…2736e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0191, t01=0x0166}
0x2736e…27382               Head {h00=0x0010, h01=0x0050, text=»CLV150 EQU *«, t00=0x0191, t01=0x0170}
0x27382…273aa               Head {h00=0x0024, h01=0x0050, text=» LDK A1,RSET.P RESET PACKET TYPE«, t00=0x0191, t01=0x0184}
0x273aa…273c4               Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x0192, t01=0x001c}
0x273c4…273ec               Head {h00=0x0024, h01=0x0050, text=» SC A5,DGNCOD,A2 DIAGNOSTIC CODE«, t00=0x0192, t01=0x0036}
0x273ec…273fe               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0192, t01=0x005e}
0x273fe…27428               Head {h00=0x0026, h01=0x0050, text=» SC A1,CAUSE,A2 CLEAR RESET CAUSE «, t00=0x0192, t01=0x0070}
0x27428…27452               Head {h00=0x0026, h01=0x0050, text=» LDK A1,RSET.L RESET PACKET LENGTH«, t00=0x0192, t01=0x009a}
0x27452…2746a               Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0192, t01=0x00c4}
0x2746a…2749a               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEO PUT ELEMENT IN OUTPUT QUEUE«, t00=0x0192, t01=0x00dc}
0x2749a…274a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0192, t01=0x010c}
0x274a4…274c6               Head {h00=0x001e, h01=0x0050, text=»* START CONFIRMATION TIMER«, t00=0x0192, t01=0x0116}
0x274c6…274d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0192, t01=0x0138}
0x274d0…27500               Head {h00=0x002c, h01=0x0050, text=» LDKL A8,SYRETM RESET CONFIRMATION TIMER«, t00=0x0192, t01=0x0142}
0x27500…27522               Head {h00=0x001e, h01=0x0050, text=» CF A14,STTIM START TIMER «, t00=0x0192, t01=0x0172}
0x27522…27536 (403, 0, 400) Head {h00=0x0010, h01=0x0050, text=»CLV160 EQU *«, t00=0x0193, t01=0x0004}
0x27536…2754a               Head {h00=0x0010, h01=0x0050, text=» ABL EXITDC «, t00=0x0193, t01=0x0018}
0x2754a…27556               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0193, t01=0x002c}
0x27556…27564               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0193, t01=0x0038}
0x27564…2756e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0193, t01=0x0046}
0x2756e…27578               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0193, t01=0x0050}
0x27578…275ae               Head {h00=0x0032, h01=0x0050, text=»* THIS MODULE RELEASE ALL RELATION BETWEEN THE«, t00=0x0193, t01=0x005a}
0x275ae…275e6               Head {h00=0x0034, h01=0x0050, text=»* DWT AND THE LOGICAL CHANNELS. THE LC IS PLACED«, t00=0x0193, t01=0x0090}
0x275e6…27606               Head {h00=0x001c, h01=0x0050, text=»* IN THE INITIAL STATE. «, t00=0x0193, t01=0x00c8}
0x27606…27610               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0193, t01=0x00e8}
0x27610…27644               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0193, t01=0x00f2}
0x27644…2764e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0193, t01=0x0126}
0x2764e…2766a               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0193, t01=0x0130}
0x2766a…27696               Head {h00=0x0028, h01=0x0050, text=»*  A1  = DIAGNOSTIC CODE FOR THE RH «, t00=0x0193, t01=0x014c}
0x27696…276ba               Head {h00=0x0020, h01=0x0050, text=»*  A12 = LINE BLOCK ADDRESS «, t00=0x0193, t01=0x0178}
0x276ba…276e6               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x0194, t01=0x000c}
0x276e6…276f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0194, t01=0x0038}
0x276f0…2770c               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0194, t01=0x0042}
0x2770c…27728               Head {h00=0x0018, h01=0x0050, text=»*  CF    A14,CLAVCS «, t00=0x0194, t01=0x005e}
0x27728…27732               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0194, t01=0x007a}
0x27732…2774e               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x0194, t01=0x0084}
0x2774e…27772               Head {h00=0x0020, h01=0x0050, text=»*  NO REGISTERS ARE CHANGED «, t00=0x0194, t01=0x00a0}
0x27772…2777c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0194, t01=0x00c4}
0x2777c…27790               Head {h00=0x0010, h01=0x0050, text=»CLAVCS EQU *«, t00=0x0194, t01=0x00ce}
0x27790…277ce               Head {h00=0x003a, h01=0x0050, text=»         CF       A14,SAVE8             SAVE REGISTERS«, t00=0x0194, t01=0x00e2}
0x277ce…277ea               Head {h00=0x0018, h01=0x0050, text=» LDR A7,A13 SAVE A13«, t00=0x0194, t01=0x0120}
0x277ea…277f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0194, t01=0x013c}
0x277f4…2781a               Head {h00=0x0022, h01=0x0050, text=»* RELEASE ALL LOGICAL CHANNELS«, t00=0x0194, t01=0x0146}
0x2781a…27824               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0194, t01=0x016c}
0x27824…27856               Head {h00=0x002e, h01=0x0050, text=» LC A4,NRLC,A12 GET # OF LOGICAL CHANNELS «, t00=0x0194, t01=0x0176}
0x27856…2786c               Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x0195, t01=0x0018}
0x2786c…27880               Head {h00=0x0010, h01=0x0050, text=» SUK A4,1 . «, t00=0x0195, t01=0x002e}
0x27880…27894               Head {h00=0x0010, h01=0x0050, text=»CLAV00 EQU *«, t00=0x0195, t01=0x0042}
0x27894…278be               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x0195, t01=0x0056}
0x278be…278c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0195, t01=0x0080}
0x278c8…278d6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0195, t01=0x008a}
0x278d6…278e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0195, t01=0x0098}
0x278e0…27908               Head {h00=0x0024, h01=0x0050, text=» CF A14,CLINPQ CLEAR INPUT QUEUE«, t00=0x0195, t01=0x00a2}
0x27908…2791e               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0195, t01=0x00ca}
0x2791e…27930               Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0195, t01=0x00e0}
0x27930…27946               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0195, t01=0x00f2}
0x27946…27966               Head {h00=0x001c, h01=0x0050, text=» LC A1,VCTYP,A13 VC-TYPE«, t00=0x0195, t01=0x0108}
0x27966…2797c               Head {h00=0x0012, h01=0x0050, text=» ANK A1,/FF . «, t00=0x0195, t01=0x0128}
0x2797c…279aa               Head {h00=0x002a, h01=0x0050, text=» RF(Z) CLAV10 SWITCHED VIRTUAL CIRCUIT«, t00=0x0195, t01=0x013e}
0x279aa…279b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0195, t01=0x016c}
0x279b6…279cc               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0195, t01=0x0178}
0x279cc…279f4               Head {h00=0x0024, h01=0x0050, text=» LDK A2,DATA.ST PRESET LC-STATUS«, t00=0x0195, t01=0x018e}
0x279f4…27a08               Head {h00=0x0010, h01=0x0050, text=» ECR A2,A2 .«, t00=0x0196, t01=0x0026}
0x27a08…27a14               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0196, t01=0x003a}
0x27a14…27a28               Head {h00=0x0010, h01=0x0050, text=»CLAV10 EQU *«, t00=0x0196, t01=0x0046}
0x27a28…27a5e               Head {h00=0x0032, h01=0x0050, text=» ST A2,LCSTAT,A13 SET STATUS TO INITIALE VALUE«, t00=0x0196, t01=0x005a}
0x27a5e…27a94               Head {h00=0x0032, h01=0x0050, text=» LD A6,LCDWT,A13 IS THERE RELATION WITH A DWT «, t00=0x0196, t01=0x0090}
0x27a94…27aac               Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLAV30 NO«, t00=0x0196, t01=0x00c6}
0x27aac…27ac2               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0196, t01=0x00de}
0x27ac2…27ad8               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0196, t01=0x00f4}
0x27ad8…27af0               Head {h00=0x0014, h01=0x0050, text=» ADK A1,0 PVC ? «, t00=0x0196, t01=0x010a}
0x27af0…27b0a               Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CLAV15 YES«, t00=0x0196, t01=0x0122}
0x27b0a…27b16               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0196, t01=0x013c}
0x27b16…27b2c               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0196, t01=0x0148}
0x27b2c…27b4e               Head {h00=0x001e, h01=0x0050, text=»         LDK      A1,VCREL«, t00=0x0196, t01=0x015e}
0x27b4e…27b74               Head {h00=0x0022, h01=0x0050, text=»         SC       A1,DWTSTE,A6«, t00=0x0196, t01=0x0180}
0x27b74…27b88               Head {h00=0x0010, h01=0x0050, text=»CLAV15 EQU *«, t00=0x0197, t01=0x0016}
0x27b88…27b94               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0197, t01=0x002a}
0x27b94…27b9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0197, t01=0x0036}
0x27b9e…27bba               Head {h00=0x0018, h01=0x0050, text=»* RESET TIMER FLAGS «, t00=0x0197, t01=0x0040}
0x27bba…27bd0               Head {h00=0x0012, h01=0x0050, text=»* CANCEL TIMER«, t00=0x0197, t01=0x005c}
0x27bd0…27bda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0197, t01=0x0072}
0x27bda…27bf4               Head {h00=0x0016, h01=0x0050, text=» LD A1,TIMADR,A13 «, t00=0x0197, t01=0x007c}
0x27bf4…27c0a               Head {h00=0x0012, h01=0x0050, text=» CF A14,CANTIM«, t00=0x0197, t01=0x0096}
0x27c0a…27c20               Head {h00=0x0012, h01=0x0050, text=» CM TIMADR,A13«, t00=0x0197, t01=0x00ac}
0x27c20…27c42               Head {h00=0x001e, h01=0x0050, text=» LDK A1,CONTIM MASK VALUE «, t00=0x0197, t01=0x00c2}
0x27c42…27c56               Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x0197, t01=0x00e4}
0x27c56…27c7a               Head {h00=0x0020, h01=0x0050, text=» ANS A1,FLAGS,A13 RESET FLAG«, t00=0x0197, t01=0x00f8}
0x27c7a…27c84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0197, t01=0x011c}
0x27c84…27cae               Head {h00=0x0026, h01=0x0050, text=»* COMPLETE PENDING OUTPUT REQUESTS«, t00=0x0197, t01=0x0126}
0x27cae…27cb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0197, t01=0x0150}
0x27cb8…27ce0               Head {h00=0x0024, h01=0x0050, text=» LDKL A3,CLEA.RC =2 RETURN CODE «, t00=0x0197, t01=0x015a}
0x27ce0…27cf6               Head {h00=0x0012, h01=0x0050, text=» CF A14,CMEVNT«, t00=0x0197, t01=0x0182}
0x27cf6…27d00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0198, t01=0x0008}
0x27d00…27d0e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0198, t01=0x0012}
0x27d0e…27d18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0198, t01=0x0020}
0x27d18…27d4c               Head {h00=0x0030, h01=0x0050, text=»* PREPARE CLEAR OR RESET NOTIFICATION FOR RH«, t00=0x0198, t01=0x002a}
0x27d4c…27d56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0198, t01=0x005e}
0x27d56…27d80               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTBUF GET AN INPUT BUFFER «, t00=0x0198, t01=0x0068}
0x27d80…27db0               Head {h00=0x002c, h01=0x0050, text=» LC A1,LCNUM,A13 LOGICAL CHANNEL NUMBER «, t00=0x0198, t01=0x0092}
0x27db0…27dca               Head {h00=0x0016, h01=0x0050, text=» SC A1,LCIDNT,A2 .«, t00=0x0198, t01=0x00c2}
0x27dca…27de0               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0198, t01=0x00dc}
0x27de0…27e04               Head {h00=0x0020, h01=0x0050, text=» LDK A3,CLEA.RC RETURN CODE «, t00=0x0198, t01=0x00f2}
0x27e04…27e34               Head {h00=0x002c, h01=0x0050, text=» LDK A1,CLE.P PRESET PACKET TYPE = CLEAR«, t00=0x0198, t01=0x0116}
0x27e34…27e4a               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0198, t01=0x0146}
0x27e4a…27e6a               Head {h00=0x001c, h01=0x0050, text=» LC A3,VCTYP,A13 VC-TYPE«, t00=0x0198, t01=0x015c}
0x27e6a…27e80               Head {h00=0x0012, h01=0x0050, text=» ANK A3,/FF . «, t00=0x0198, t01=0x017c}
0x27e80…27eae (409, 0, 400) Head {h00=0x002a, h01=0x0050, text=» RF(Z) CLAV20 SWITCHED VIRTUAL CIRCUIT«, t00=0x0199, t01=0x0004}
0x27eae…27eba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0199, t01=0x0032}
0x27eba…27ed0               Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0199, t01=0x003e}
0x27ed0…27ef4               Head {h00=0x0020, h01=0x0050, text=» LDK A3,RSET.RC RETURN CODE «, t00=0x0199, t01=0x0054}
0x27ef4…27f1e               Head {h00=0x0026, h01=0x0050, text=» LDK A1,RSET.P PACKET TYPE = RESET«, t00=0x0199, t01=0x0078}
0x27f1e…27f32               Head {h00=0x0010, h01=0x0050, text=»CLAV20 EQU *«, t00=0x0199, t01=0x00a2}
0x27f32…27f3e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0199, t01=0x00b6}
0x27f3e…27f66               Head {h00=0x0024, h01=0x0050, text=» SC A1,IDENT,A2 SAVE PACKET TYPE«, t00=0x0199, t01=0x00c2}
0x27f66…27f8e               Head {h00=0x0024, h01=0x0050, text=» LD A1,SAVE GET INPUT PARAMETER «, t00=0x0199, t01=0x00ea}
0x27f8e…27fb6               Head {h00=0x0024, h01=0x0050, text=» SC A1,DGNCOD,A2 DIAGNOSTIC CODE«, t00=0x0199, t01=0x0112}
0x27fb6…27fda               Head {h00=0x0020, h01=0x0050, text=» LDK A1,CLE.L PACKET LENGTH «, t00=0x0199, t01=0x013a}
0x27fda…27ff2               Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0199, t01=0x015e}
0x27ff2…28022               Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x0199, t01=0x0176}
0x28022…28036               Head {h00=0x0010, h01=0x0050, text=»CLAV30 EQU *«, t00=0x019a, t01=0x0016}
0x28036…2805c               Head {h00=0x0022, h01=0x0050, text=» SUK A4,1 NEXT ENTRY IN LC:TAB«, t00=0x019a, t01=0x002a}
0x2805c…28074               Head {h00=0x0014, h01=0x0050, text=» RB(NN) CLAV00 .«, t00=0x019a, t01=0x0050}
0x28074…2807e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019a, t01=0x0068}
0x2807e…2808e               Head {h00=0x000c, h01=0x0050, text=»* READY «, t00=0x019a, t01=0x0072}
0x2808e…28098               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019a, t01=0x0082}
0x28098…280d4               Head {h00=0x0038, h01=0x0050, text=»         LDR      A13,A7           RELOAD SAVED A13 «, t00=0x019a, t01=0x008c}
0x280d4…280f8               Head {h00=0x0020, h01=0x0050, text=»         CF       A14,RELOA8«, t00=0x019a, t01=0x00c8}
0x280f8…28118               Head {h00=0x001c, h01=0x0050, text=» RTN A14 BACK TO CALLER «, t00=0x019a, t01=0x00ec}
0x28118…28126               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x019a, t01=0x010c}
0x28126…28130               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019a, t01=0x011a}
0x28130…2813a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019a, t01=0x0124}
0x2813a…28168               Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF SYSTEM BUFFER «, t00=0x019a, t01=0x012e}
0x28168…28172               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019a, t01=0x015c}
0x28172…281a6               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x019a, t01=0x0166}
0x281a6…281b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019b, t01=0x000a}
0x281b0…281cc               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x019b, t01=0x0014}
0x281cc…281ec               Head {h00=0x001c, h01=0x0050, text=»*  A1  = RESTART ADDRESS«, t00=0x019b, t01=0x0030}
0x281ec…2821e               Head {h00=0x002e, h01=0x0050, text=»*                 A12 = LINE BLOCK ADDRESS«, t00=0x019b, t01=0x0050}
0x2821e…2823e               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x019b, t01=0x0082}
0x2823e…28248               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019b, t01=0x00a2}
0x28248…28264               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x019b, t01=0x00ac}
0x28264…2827c               Head {h00=0x0014, h01=0x0050, text=»*  ABL    BUFWAT«, t00=0x019b, t01=0x00c8}
0x2827c…28286               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019b, t01=0x00e0}
0x28286…282a2               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x019b, t01=0x00ea}
0x282a2…282da               Head {h00=0x0034, h01=0x0050, text=»*  AFTER A CERTAIN TIME THE CALLER IS ACTIVATED «, t00=0x019b, t01=0x0106}
0x282da…282fa               Head {h00=0x001c, h01=0x0050, text=»*  ON THE RESTART LABEL «, t00=0x019b, t01=0x013e}
0x282fa…28322               Head {h00=0x0024, h01=0x0050, text=»*  A13 AND A14 REMAIN UNCHANGED.«, t00=0x019b, t01=0x015e}
0x28322…2832c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019b, t01=0x0186}
0x2832c…28340               Head {h00=0x0010, h01=0x0050, text=»BUFWAT EQU *«, t00=0x019b, t01=0x0190}
0x28340…28362               Head {h00=0x001e, h01=0x0050, text=» LDR A2,A13 SAVE REGISTERS«, t00=0x019c, t01=0x0014}
0x28362…28378               Head {h00=0x0012, h01=0x0050, text=» LDR A3,A12 . «, t00=0x019c, t01=0x0036}
0x28378…2838a               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x019c, t01=0x004c}
0x2838a…283b4               Head {h00=0x0026, h01=0x0050, text=» CF A15,GETBLK GET A MONITOR BLOCK«, t00=0x019c, t01=0x005e}
0x283b4…283e2               Head {h00=0x002a, h01=0x0050, text=» LDR A1,A4 BLOCK ADDRESS AS PARAMETER «, t00=0x019c, t01=0x0088}
0x283e2…28402               Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIME SET TIMER«, t00=0x019c, t01=0x00b6}
0x28402…2842a               Head {h00=0x0024, h01=0x0050, text=» DATA BUFW00 ACTIVATION ADDRESS «, t00=0x019c, t01=0x00d6}
0x2842a…2844a               Head {h00=0x001c, h01=0x0050, text=» DATA BUFDEL DELAY TIMER«, t00=0x019c, t01=0x00fe}
0x2844a…28456               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x019c, t01=0x011e}
0x28456…28484               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x019c, t01=0x012a}
0x28484…2848e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019c, t01=0x0158}
0x2848e…2849c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x019c, t01=0x0162}
0x2849c…284a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019c, t01=0x0170}
0x284a6…284ba               Head {h00=0x0010, h01=0x0050, text=»* ACTIVATION«, t00=0x019c, t01=0x017a}
0x284ba…284c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019c, t01=0x018e}
0x284c4…284d8               Head {h00=0x0010, h01=0x0050, text=»BUFW00 EQU *«, t00=0x019d, t01=0x0008}
0x284d8…28504               Head {h00=0x0028, h01=0x0050, text=» LDR A4,A1 GET MONITOR BLOCK ADDRESS«, t00=0x019d, t01=0x001c}
0x28504…28516               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x019d, t01=0x0048}
0x28516…2853a               Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RELEASE BLOCK«, t00=0x019d, t01=0x005a}
0x2853a…28546               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x019d, t01=0x007e}
0x28546…2856c               Head {h00=0x0022, h01=0x0050, text=» LDR A12,A3 RESTORE REGISTERS «, t00=0x019d, t01=0x008a}
0x2856c…28582               Head {h00=0x0012, h01=0x0050, text=» LDR A13,A2 . «, t00=0x019d, t01=0x00b0}
0x28582…285c2               Head {h00=0x003c, h01=0x0050, text=»         LDKL     A14,DCSTAK       A14:=CF STACK POINTER«, t00=0x019d, t01=0x00c6}
0x285c2…285e0               Head {h00=0x001a, h01=0x0050, text=» ABR A1 BACK TO CALLER«, t00=0x019d, t01=0x0106}
0x285e0…285ee               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x019d, t01=0x0124}
0x285ee…285f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019d, t01=0x0132}
0x285f8…28602               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019d, t01=0x013c}
0x28602…28644               Head {h00=0x003e, h01=0x0050, text=»* TRANSLATE THRESHOLD PERCENTAGE INTO A NUMBER OF PACKETS «, t00=0x019d, t01=0x0146}
0x28644…2864e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019d, t01=0x0188}
0x2864e…28682 (414, 0, 400) Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x019e, t01=0x0004}
0x28682…2868c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019e, t01=0x0038}
0x2868c…286a8               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x019e, t01=0x0042}
0x286a8…286c8               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x019e, t01=0x005e}
0x286c8…286f4               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x019e, t01=0x007e}
0x286f4…286fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019e, t01=0x00aa}
0x286fe…2871a               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x019e, t01=0x00b4}
0x2871a…28734               Head {h00=0x0016, h01=0x0050, text=»*  CF    A14,TRTHR«, t00=0x019e, t01=0x00d0}
0x28734…2873e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019e, t01=0x00ea}
0x2873e…2875a               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x019e, t01=0x00f4}
0x2875a…28794               Head {h00=0x0036, h01=0x0050, text=»*  THE NUMBER OF PACKETS IS STORED IN THE LC-ADM. «, t00=0x019e, t01=0x0110}
0x28794…287ac               Head {h00=0x0014, h01=0x0050, text=»*  A1 IS CHANGED«, t00=0x019e, t01=0x014a}
0x287ac…287b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019e, t01=0x0162}
0x287b6…287ca               Head {h00=0x0010, h01=0x0050, text=»TRTHR EQU * «, t00=0x019e, t01=0x016c}
0x287ca…287ec               Head {h00=0x001e, h01=0x0050, text=» STR A4,A14 SAVE REGISTER «, t00=0x019e, t01=0x0180}
0x287ec…287fe               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x019f, t01=0x0012}
0x287fe…28830               Head {h00=0x002e, h01=0x0050, text=» LC A1,LCREWN,A13 RECEIVE WINDOW SIZE = W «, t00=0x019f, t01=0x0024}
0x28830…28842               Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x019f, t01=0x0056}
0x28842…28860               Head {h00=0x001a, h01=0x0050, text=»         LDK      A4,0«, t00=0x019f, t01=0x0068}
0x28860…28874               Head {h00=0x0010, h01=0x0050, text=»TRTHR1 EQU *«, t00=0x019f, t01=0x0086}
0x28874…2888a               Head {h00=0x0012, h01=0x0050, text=» AD A4,THRESH «, t00=0x019f, t01=0x009a}
0x2888a…288a4               Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 GET P*W «, t00=0x019f, t01=0x00b0}
0x288a4…288ba               Head {h00=0x0012, h01=0x0050, text=» RB(NN) TRTHR1«, t00=0x019f, t01=0x00ca}
0x288ba…288ce               Head {h00=0x0010, h01=0x0050, text=» LDKL A1,-1 «, t00=0x019f, t01=0x00e0}
0x288ce…288e2               Head {h00=0x0010, h01=0x0050, text=»TRTHR2 EQU *«, t00=0x019f, t01=0x00f4}
0x288e2…288f4               Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x019f, t01=0x0108}
0x288f4…28910               Head {h00=0x0018, h01=0x0050, text=» SUK A4,100 P*W/100 «, t00=0x019f, t01=0x011a}
0x28910…28926               Head {h00=0x0012, h01=0x0050, text=» RB(NN) TRTHR2«, t00=0x019f, t01=0x0136}
0x28926…2895a               Head {h00=0x0030, h01=0x0050, text=» SC A1,LCTHRE,A13 THRESHOLD VALUE IN PACKETS«, t00=0x019f, t01=0x014c}
0x2895a…28980               Head {h00=0x0022, h01=0x0050, text=» LDR* A4,A14 RESTORE REGISTER «, t00=0x019f, t01=0x0180}
0x28980…28990               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01a0, t01=0x0016}
0x28990…2899e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01a0, t01=0x0026}
0x2899e…289b4               Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x01a0, t01=0x0034}
0x289b4…289be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a0, t01=0x004a}
0x289be…289c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a0, t01=0x0054}
0x289c8…28a04               Head {h00=0x0038, h01=0x0050, text=»* CALCULATION OF THE WINDOW SIZES AND PACKET LENGTH «, t00=0x01a0, t01=0x005e}
0x28a04…28a0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a0, t01=0x009a}
0x28a0e…28a42               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01a0, t01=0x00a4}
0x28a42…28a4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a0, t01=0x00d8}
0x28a4c…28a68               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01a0, t01=0x00e2}
0x28a68…28a88               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x01a0, t01=0x00fe}
0x28a88…28aac               Head {h00=0x0020, h01=0x0050, text=»*  A12 = LINE BLOCK ADDRESS «, t00=0x01a0, t01=0x011e}
0x28aac…28acc               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x01a0, t01=0x0142}
0x28acc…28af8               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01a0, t01=0x0162}
0x28af8…28b02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a0, t01=0x018e}
0x28b02…28b1e               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01a1, t01=0x0008}
0x28b1e…28b3a               Head {h00=0x0018, h01=0x0050, text=»*  CF    A14,GTWNDS «, t00=0x01a1, t01=0x0024}
0x28b3a…28b44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a1, t01=0x0040}
0x28b44…28b60               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01a1, t01=0x004a}
0x28b60…28b8a               Head {h00=0x0026, h01=0x0050, text=»*  REGISTERS A1 AND A3 ARE CHANGED«, t00=0x01a1, t01=0x0066}
0x28b8a…28b94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a1, t01=0x0090}
0x28b94…28ba8               Head {h00=0x0010, h01=0x0050, text=»GTWNDS EQU *«, t00=0x01a1, t01=0x009a}
0x28ba8…28bcc               Head {h00=0x0020, h01=0x0050, text=» ST A2,SAVE+6 SAVE REGISTER «, t00=0x01a1, t01=0x00ae}
0x28bcc…28bfe               Head {h00=0x002e, h01=0x0050, text=» LD A1,WNDSIZ,A12 PRESET ON MAXIMUM VALUES«, t00=0x01a1, t01=0x00d2}
0x28bfe…28c1a               Head {h00=0x0018, h01=0x0050, text=» SC A1,LCTRWN,A13 . «, t00=0x01a1, t01=0x0104}
0x28c1a…28c36               Head {h00=0x0018, h01=0x0050, text=» SC A1,LCREWN,A13 . «, t00=0x01a1, t01=0x0120}
0x28c36…28c52               Head {h00=0x0018, h01=0x0050, text=» LD A1,PACKLN,A12 . «, t00=0x01a1, t01=0x013c}
0x28c52…28c6e               Head {h00=0x0018, h01=0x0050, text=» ST A1,TRBFSZ,A13 . «, t00=0x01a1, t01=0x0158}
0x28c6e…28c8a               Head {h00=0x0018, h01=0x0050, text=» ST A1,REBFSZ,A13 . «, t00=0x01a1, t01=0x0174}
0x28c8a…28ca8               Head {h00=0x001a, h01=0x0050, text=» ADK A2,BEGDAT POINTER«, t00=0x01a1, t01=0x0190}
0x28ca8…28ccc               Head {h00=0x0020, h01=0x0050, text=» LCR A1,A2 GET LENGTH VALUE «, t00=0x01a2, t01=0x001e}
0x28ccc…28cf2               Head {h00=0x0022, h01=0x0050, text=» ANK A1,/F0 LENGTH CALLING DTE«, t00=0x01a2, t01=0x0042}
0x28cf2…28d06               Head {h00=0x0010, h01=0x0050, text=» SRL A1,4 . «, t00=0x01a2, t01=0x0068}
0x28d06…28d2a               Head {h00=0x0020, h01=0x0050, text=» LCR A3,A2 LENGTH CALLED DTE«, t00=0x01a2, t01=0x007c}
0x28d2a…28d3e               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/0F «, t00=0x01a2, t01=0x00a0}
0x28d3e…28d60               Head {h00=0x001e, h01=0x0050, text=» ADR A1,A3 ADD BOTH LENGTH«, t00=0x01a2, t01=0x00b4}
0x28d60…28d6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a2, t01=0x00d6}
0x28d6a…28d78               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01a2, t01=0x00e0}
0x28d78…28d82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a2, t01=0x00ee}
0x28d82…28da4               Head {h00=0x001e, h01=0x0050, text=» ADK A1,1 ROUNDED UPWARDS «, t00=0x01a2, t01=0x00f8}
0x28da4…28dc4               Head {h00=0x001c, h01=0x0050, text=» SRL A1,1 MAKE IT BYTES «, t00=0x01a2, t01=0x011a}
0x28dc4…28de6               Head {h00=0x001e, h01=0x0050, text=» ADR A2,A1 PASS DTE FIELDS«, t00=0x01a2, t01=0x013a}
0x28de6…28e0a               Head {h00=0x0020, h01=0x0050, text=» ADK A2,1 POINTS TO FACILITY«, t00=0x01a2, t01=0x015c}
0x28e0a…28e32               Head {h00=0x0024, h01=0x0050, text=» LCR A1,A2 FACILITY SPECIFIED ? «, t00=0x01a2, t01=0x0180}
0x28e32…28e46               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/3F «, t00=0x01a3, t01=0x0018}
0x28e46…28e5e               Head {h00=0x0014, h01=0x0050, text=» RF(Z) GTWND6 NO«, t00=0x01a3, t01=0x002c}
0x28e5e…28e88               Head {h00=0x0026, h01=0x0050, text=» ADK A2,1 POINTS TO FIRST FACILITY«, t00=0x01a3, t01=0x0044}
0x28e88…28e9c               Head {h00=0x0010, h01=0x0050, text=»GTWND1 EQU *«, t00=0x01a3, t01=0x006e}
0x28e9c…28ec0               Head {h00=0x0020, h01=0x0050, text=» LCR A3,A2 GET FACILITY CODE«, t00=0x01a3, t01=0x0082}
0x28ec0…28ee2               Head {h00=0x001e, h01=0x0050, text=» CWK A3,/02 FLOW CONTROL ?«, t00=0x01a3, t01=0x00a6}
0x28ee2…28efc               Head {h00=0x0016, h01=0x0050, text=» RF(E) GTWND2 YES «, t00=0x01a3, t01=0x00c8}
0x28efc…28f1a               Head {h00=0x001a, h01=0x0050, text=» ADK A2,2 TRY NEXT ONE«, t00=0x01a3, t01=0x00e2}
0x28f1a…28f3a               Head {h00=0x001c, h01=0x0050, text=» SUK A1,2 UPDATE LENGTH «, t00=0x01a3, t01=0x0100}
0x28f3a…28f5a               Head {h00=0x001c, h01=0x0050, text=» RF(NP) GTWND6 EXHAUSTED«, t00=0x01a3, t01=0x0120}
0x28f5a…28f76               Head {h00=0x0018, h01=0x0050, text=» RB GTWND1 NEXT ONE «, t00=0x01a3, t01=0x0140}
0x28f76…28f80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a3, t01=0x015c}
0x28f80…28fb8               Head {h00=0x0034, h01=0x0050, text=»* FACILITY FOR FLOW CONTROL SELECTION SPECIFIED «, t00=0x01a3, t01=0x0166}
0x28fb8…28fc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a4, t01=0x000e}
0x28fc2…28fd6               Head {h00=0x0010, h01=0x0050, text=»GTWND2 EQU *«, t00=0x01a4, t01=0x0018}
0x28fd6…28fe0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a4, t01=0x002c}
0x28fe0…28ffe               Head {h00=0x001a, h01=0x0050, text=»* GET TRANSMITTER DATA«, t00=0x01a4, t01=0x0036}
0x28ffe…29008               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a4, t01=0x0054}
0x29008…29036               Head {h00=0x002a, h01=0x0050, text=» ADK A2,1 POINTS TO FACILITY PARAMETER«, t00=0x01a4, t01=0x005e}
0x29036…29056               Head {h00=0x001c, h01=0x0050, text=» LCR A3,A2 GET PARAMETER«, t00=0x01a4, t01=0x008c}
0x29056…29080               Head {h00=0x0026, h01=0x0050, text=» ANK A3,/0F TRANSMITTER PARAMETERS«, t00=0x01a4, t01=0x00ac}
0x29080…290a6               Head {h00=0x0022, h01=0x0050, text=» SLL A3,1 PREPARE FOR INDEXING«, t00=0x01a4, t01=0x00d6}
0x290a6…290ca               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GTWND4 NOT SPECIFIED «, t00=0x01a4, t01=0x00fc}
0x290ca…290ee               Head {h00=0x0020, h01=0x0050, text=» LD A3,CLAS1-2,A3 GET VALUES«, t00=0x01a4, t01=0x0120}
0x290ee…29122               Head {h00=0x0030, h01=0x0050, text=» CC A3,TRBFSZ+1,A13 PACKET SIZE TOO LARGE ? «, t00=0x01a4, t01=0x0144}
0x29122…2913c               Head {h00=0x0016, h01=0x0050, text=» RF(NL) GTWND3 YES«, t00=0x01a4, t01=0x0178}
0x2913c…29174 (421, 0, 400) Head {h00=0x0034, h01=0x0050, text=» SC A3,TRBFSZ+1,A13 SAVE TRANSMITTER BUFFER SIZE«, t00=0x01a5, t01=0x0004}
0x29174…2917e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a5, t01=0x003c}
0x2917e…2918c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01a5, t01=0x0046}
0x2918c…29196               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a5, t01=0x0054}
0x29196…291aa               Head {h00=0x0010, h01=0x0050, text=»GTWND3 EQU *«, t00=0x01a5, t01=0x005e}
0x291aa…291bc               Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x01a5, t01=0x0072}
0x291bc…291ee               Head {h00=0x002e, h01=0x0050, text=» CC A3,LCTRWN,A13 WINDOW SIZE TOO LARGE ? «, t00=0x01a5, t01=0x0084}
0x291ee…29208               Head {h00=0x0016, h01=0x0050, text=» RF(NL) GTWND4 YES«, t00=0x01a5, t01=0x00b6}
0x29208…29232               Head {h00=0x0026, h01=0x0050, text=» SC A3,LCTRWN,A13 SAVE WINDOW SIZE«, t00=0x01a5, t01=0x00d0}
0x29232…2923c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a5, t01=0x00fa}
0x2923c…29258               Head {h00=0x0018, h01=0x0050, text=»* GET RECIEVER DATA «, t00=0x01a5, t01=0x0104}
0x29258…29262               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a5, t01=0x0120}
0x29262…29276               Head {h00=0x0010, h01=0x0050, text=»GTWND4 EQU *«, t00=0x01a5, t01=0x012a}
0x29276…2929c               Head {h00=0x0022, h01=0x0050, text=» LCR A3,A2 GET PARAMETER AGAIN«, t00=0x01a5, t01=0x013e}
0x2929c…292c2               Head {h00=0x0022, h01=0x0050, text=» ANK A3,/F0 RECEIVER PARAMETER«, t00=0x01a5, t01=0x0164}
0x292c2…292e8               Head {h00=0x0022, h01=0x0050, text=» SRL A3,3 PREPARE FOR INDEXING«, t00=0x01a5, t01=0x018a}
0x292e8…2930c               Head {h00=0x0020, h01=0x0050, text=» RF(Z) GTWND6 NOT SPECIFIED «, t00=0x01a6, t01=0x0020}
0x2930c…29330               Head {h00=0x0020, h01=0x0050, text=» LD A3,CLAS1-2,A3 GET VALUES«, t00=0x01a6, t01=0x0044}
0x29330…29364               Head {h00=0x0030, h01=0x0050, text=» CC A3,REBFSZ+1,A13 PACKET SIZE TOO LARGE ? «, t00=0x01a6, t01=0x0068}
0x29364…2937e               Head {h00=0x0016, h01=0x0050, text=» RF(NL) GTWND5 YES«, t00=0x01a6, t01=0x009c}
0x2937e…293b4               Head {h00=0x0032, h01=0x0050, text=» SC A3,REBFSZ+1,A13 SAVE RECEIVER BUFFER SIZE «, t00=0x01a6, t01=0x00b6}
0x293b4…293c8               Head {h00=0x0010, h01=0x0050, text=»GTWND5 EQU *«, t00=0x01a6, t01=0x00ec}
0x293c8…293da               Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x01a6, t01=0x0100}
0x293da…2940c               Head {h00=0x002e, h01=0x0050, text=» CC A3,LCREWN,A13 WINDOW SIZE TOO LARGE ? «, t00=0x01a6, t01=0x0112}
0x2940c…29426               Head {h00=0x0016, h01=0x0050, text=» RF(NL) GTWND6 YES«, t00=0x01a6, t01=0x0144}
0x29426…29450               Head {h00=0x0026, h01=0x0050, text=» SC A3,LCREWN,A13 SAVE WINDOW SIZE«, t00=0x01a6, t01=0x015e}
0x29450…29464               Head {h00=0x0010, h01=0x0050, text=»GTWND6 EQU *«, t00=0x01a6, t01=0x0188}
0x29464…2948a               Head {h00=0x0022, h01=0x0050, text=» LD A2,SAVE+6 RELOAD SAVED A2 «, t00=0x01a7, t01=0x000c}
0x2948a…2949a               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01a7, t01=0x0032}
0x2949a…294a8               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01a7, t01=0x0042}
0x294a8…294b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01a7, t01=0x0050}
0x294b4…294be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a7, t01=0x005c}
0x294be…294c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a7, t01=0x0066}
0x294c8…29506               Head {h00=0x003a, h01=0x0050, text=»* COMPLETE AN OUTPUT EVENT, DUE TO AN ERROR SITUATION «, t00=0x01a7, t01=0x0070}
0x29506…29510               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a7, t01=0x00ae}
0x29510…29544               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01a7, t01=0x00b8}
0x29544…2954e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a7, t01=0x00ec}
0x2954e…2956a               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01a7, t01=0x00f6}
0x2956a…29586               Head {h00=0x0018, h01=0x0050, text=»*  A3  = RETURN CODE«, t00=0x01a7, t01=0x0112}
0x29586…295a6               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x01a7, t01=0x012e}
0x295a6…295d2               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01a7, t01=0x014e}
0x295d2…295dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a7, t01=0x017a}
0x295dc…295f8               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01a7, t01=0x0184}
0x295f8…29614               Head {h00=0x0018, h01=0x0050, text=»*  CF    A14,CMEVNT «, t00=0x01a8, t01=0x0010}
0x29614…2961e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a8, t01=0x002c}
0x2961e…2963a               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01a8, t01=0x0036}
0x2963a…2965e               Head {h00=0x0020, h01=0x0050, text=»*  A1 ,A2 AND A6 ARE CHANGED«, t00=0x01a8, t01=0x0052}
0x2965e…29668               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a8, t01=0x0076}
0x29668…2967c               Head {h00=0x0010, h01=0x0050, text=»CMEVNT EQU *«, t00=0x01a8, t01=0x0080}
0x2967c…296a4               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A13 QUEUE ANCHOR ADDRESS«, t00=0x01a8, t01=0x0094}
0x296a4…296bc               Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEOUT .«, t00=0x01a8, t01=0x00bc}
0x296bc…296e2               Head {h00=0x0022, h01=0x0050, text=» LDK A2,NPRFLG SET MASK VALUE «, t00=0x01a8, t01=0x00d4}
0x296e2…296f6               Head {h00=0x0010, h01=0x0050, text=» C1R A2,A2 .«, t00=0x01a8, t01=0x00fa}
0x296f6…2971a               Head {h00=0x0020, h01=0x0050, text=» ANRS A2,A1 IS QUEUE EMPTY ?«, t00=0x01a8, t01=0x010e}
0x2971a…29734               Head {h00=0x0016, h01=0x0050, text=» RF(Z) CMEV20 YES «, t00=0x01a8, t01=0x0132}
0x29734…29760               Head {h00=0x0028, h01=0x0050, text=» CF A14,DEQUE GET ELEMENT FROM QUEUE«, t00=0x01a8, t01=0x014c}
0x29760…29778               Head {h00=0x0014, h01=0x0050, text=» LDKL A1,DWTTYP «, t00=0x01a8, t01=0x0178}
0x29778…2979e               Head {h00=0x0022, h01=0x0050, text=» CW A1,DWTCHP,A2 IS IT A DWT ?«, t00=0x01a8, t01=0x0190}
0x2979e…297b8               Head {h00=0x0016, h01=0x0050, text=» RF(NE) CMEV10 NO «, t00=0x01a9, t01=0x0026}
0x297b8…297dc               Head {h00=0x0020, h01=0x0050, text=» LDR A6,A2 A6 = DWT-ADDRESS «, t00=0x01a9, t01=0x0040}
0x297dc…29804               Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x01a9, t01=0x0064}
0x29804…29816               Head {h00=0x000e, h01=0x0050, text=» RB CMEVNT«, t00=0x01a9, t01=0x008c}
0x29816…29820               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x009e}
0x29820…2982e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01a9, t01=0x00a8}
0x2982e…29838               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x00b6}
0x29838…29860               Head {h00=0x0024, h01=0x0050, text=»* THE ELEMENT IS A SYSTEM BUFFER«, t00=0x01a9, t01=0x00c0}
0x29860…2986a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x00e8}
0x2986a…2987e               Head {h00=0x0010, h01=0x0050, text=»CMEV10 EQU *«, t00=0x01a9, t01=0x00f2}
0x2987e…298a4               Head {h00=0x0022, h01=0x0050, text=» CMR A2 RELEASE SYSTEM BUFFER «, t00=0x01a9, t01=0x0106}
0x298a4…298b6               Head {h00=0x000e, h01=0x0050, text=» RB CMEVNT«, t00=0x01a9, t01=0x012c}
0x298b6…298c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x013e}
0x298c0…298d4               Head {h00=0x0010, h01=0x0050, text=»CMEV20 EQU *«, t00=0x01a9, t01=0x0148}
0x298d4…298e4               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01a9, t01=0x015c}
0x298e4…298f2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01a9, t01=0x016c}
0x298f2…298fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x017a}
0x298fc…29906               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x0184}
0x29906…2993e               Head {h00=0x0034, h01=0x0050, text=»* THIS MODULE PERFORMS SOME TESTS ON A RECIEIVED«, t00=0x01a9, t01=0x018e}
0x2993e…29962               Head {h00=0x0020, h01=0x0050, text=»* DATA-, RR- OR RNR PACKET. «, t00=0x01aa, t01=0x0036}
0x29962…2996c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01aa, t01=0x005a}
0x2996c…299a0               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01aa, t01=0x0064}
0x299a0…299aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01aa, t01=0x0098}
0x299aa…299c6               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01aa, t01=0x00a2}
0x299c6…299e6               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x01aa, t01=0x00be}
0x299e6…29a06               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x01aa, t01=0x00de}
0x29a06…29a32               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01aa, t01=0x00fe}
0x29a32…29a3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01aa, t01=0x012a}
0x29a3c…29a58               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01aa, t01=0x0134}
0x29a58…29a72               Head {h00=0x0016, h01=0x0050, text=»*  CF    A14,TDARR«, t00=0x01aa, t01=0x0150}
0x29a72…29a7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01aa, t01=0x016a}
0x29a7c…29a98               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01aa, t01=0x0174}
0x29a98…29aba               Head {h00=0x001e, h01=0x0050, text=»*  A1 = 0 NO ERRORS FOUND «, t00=0x01aa, t01=0x0190}
0x29aba…29adc               Head {h00=0x001e, h01=0x0050, text=»*       1 P(R) ERROR FOUND«, t00=0x01ab, t01=0x0022}
0x29adc…29b22               Head {h00=0x0042, h01=0x0050, text=»*  WHEN A PROCEDURE ERROR IS DETECTED, THE VC WILL BE CLEARED «, t00=0x01ab, t01=0x0044}
0x29b22…29b5e               Head {h00=0x0038, h01=0x0050, text=»*  OR RESET AND THE MODULE RETURNS TO THE SCHEDULER.«, t00=0x01ab, t01=0x008a}
0x29b5e…29b68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ab, t01=0x00c6}
0x29b68…29b7c               Head {h00=0x0010, h01=0x0050, text=»TDARR EQU * «, t00=0x01ab, t01=0x00d0}
0x29b7c…29bb2               Head {h00=0x0032, h01=0x0050, text=» LDK A1,DATA.ST IS LC-STATUS = DATA TRANSFER ?«, t00=0x01ab, t01=0x00e4}
0x29bb2…29bce               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x01ab, t01=0x011a}
0x29bce…29be6               Head {h00=0x0014, h01=0x0050, text=» RF(E) TDA10 YES«, t00=0x01ab, t01=0x0136}
0x29be6…29bf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ab, t01=0x014e}
0x29bf0…29c38               Head {h00=0x0044, h01=0x0050, text=»* LC-STATUS IS NOT DATA TRANSFER, IF CLEAR: IGNORE PACKET, ELSE «, t00=0x01ab, t01=0x0158}
0x29c38…29c52               Head {h00=0x0016, h01=0x0050, text=»* PROCEDURE ERROR «, t00=0x01ac, t01=0x0010}
0x29c52…29c5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ac, t01=0x002a}
0x29c5c…29c8a               Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IS LC-STATUS = CLEAR ?«, t00=0x01ac, t01=0x0034}
0x29c8a…29ca6               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x01ac, t01=0x0062}
0x29ca6…29cc0               Head {h00=0x0016, h01=0x0050, text=» RF(NE) TDA00 YES «, t00=0x01ac, t01=0x007e}
0x29cc0…29ce4               Head {h00=0x0020, h01=0x0050, text=» CF A14,RLBUF IGNORE PACKET «, t00=0x01ac, t01=0x0098}
0x29ce4…29d12               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x01ac, t01=0x00bc}
0x29d12…29d1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ac, t01=0x00ea}
0x29d1c…29d2a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01ac, t01=0x00f4}
0x29d2a…29d34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ac, t01=0x0102}
0x29d34…29d60               Head {h00=0x0028, h01=0x0050, text=»* ILLEGAL STATE, SO PROCEDURE ERROR «, t00=0x01ac, t01=0x010c}
0x29d60…29d6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ac, t01=0x0138}
0x29d6a…29d7e               Head {h00=0x0010, h01=0x0050, text=»TDA00 EQU * «, t00=0x01ac, t01=0x0142}
0x29d7e…29da8               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x01ac, t01=0x0156}
0x29da8…29ddc               Head {h00=0x0030, h01=0x0050, text=» LDK A1,LOCPER DIAG. CODE = PROCEDURE ERROR «, t00=0x01ac, t01=0x0180}
0x29ddc…29e0e               Head {h00=0x002e, h01=0x0050, text=» ABL CLVC CLEAR VC AND RETURN TO SCHEDULER«, t00=0x01ad, t01=0x0024}
0x29e0e…29e18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ad, t01=0x0056}
0x29e18…29e5c               Head {h00=0x0040, h01=0x0050, text=»* STATE = DATA TRANSFER, IF SUB-STATE = RESET: IGNORE PACKET«, t00=0x01ad, t01=0x0060}
0x29e5c…29e66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ad, t01=0x00a4}
0x29e66…29e7a               Head {h00=0x0010, h01=0x0050, text=»TDA10 EQU * «, t00=0x01ad, t01=0x00ae}
0x29e7a…29ea6               Head {h00=0x0028, h01=0x0050, text=» LDK A1,RSET.ST IS LC-STATUS = RESET«, t00=0x01ad, t01=0x00c2}
0x29ea6…29ec2               Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSBST,A13 . «, t00=0x01ad, t01=0x00ee}
0x29ec2…29eda               Head {h00=0x0014, h01=0x0050, text=» RF(NE) TDA20 NO«, t00=0x01ad, t01=0x010a}
0x29eda…29f04               Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x01ad, t01=0x0122}
0x29f04…29f32               Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x01ad, t01=0x014c}
0x29f32…29f3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ad, t01=0x017a}
0x29f3c…29f7c               Head {h00=0x003c, h01=0x0050, text=»* TEST IF RECEIVED P(R) IS IN WINDOW: SLWE <= P(R) <= PS«, t00=0x01ad, t01=0x0184}
0x29f7c…29fa2               Head {h00=0x0022, h01=0x0050, text=»* OR P(R) - SLWE <= PS - SLWE «, t00=0x01ae, t01=0x0034}
0x29fa2…29fac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ae, t01=0x005a}
0x29fac…29fc0               Head {h00=0x0010, h01=0x0050, text=»TDA20 EQU * «, t00=0x01ae, t01=0x0064}
0x29fc0…29fea               Head {h00=0x0026, h01=0x0050, text=» LC A1,IDENT,A2 GET RECEIVED P(R) «, t00=0x01ae, t01=0x0078}
0x29fea…29ffe               Head {h00=0x0010, h01=0x0050, text=» SRL A1,5 . «, t00=0x01ae, t01=0x00a2}
0x29ffe…2a014               Head {h00=0x0012, h01=0x0050, text=» ANK A1,/07 . «, t00=0x01ae, t01=0x00b6}
0x2a014…2a040               Head {h00=0x0028, h01=0x0050, text=» LC A4,SLWE,A13 SEND LWE = OLD P(R) «, t00=0x01ae, t01=0x00cc}
0x2a040…2a056               Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x01ae, t01=0x00f8}
0x2a056…2a078               Head {h00=0x001e, h01=0x0050, text=» SUR A1,A4 GET P(R) - SLWE«, t00=0x01ae, t01=0x010e}
0x2a078…2a094               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/07 MODULO 8«, t00=0x01ae, t01=0x0130}
0x2a094…2a0b0               Head {h00=0x0018, h01=0x0050, text=» STR A1,A14 SAVE IT «, t00=0x01ae, t01=0x014c}
0x2a0b0…2a0d4               Head {h00=0x0020, h01=0x0050, text=» LC A1,PS,A13 GET PS - SLWE «, t00=0x01ae, t01=0x0168}
0x2a0d4…2a0e8               Head {h00=0x0010, h01=0x0050, text=» SUR A1,A4 .«, t00=0x01ae, t01=0x018c}
0x2a0e8…2a104               Head {h00=0x0018, h01=0x0050, text=» ANK A1,/07 MODULO 8«, t00=0x01af, t01=0x0010}
0x2a104…2a11c               Head {h00=0x0014, h01=0x0050, text=» CWR* A1,A14 >= «, t00=0x01af, t01=0x002c}
0x2a11c…2a136               Head {h00=0x0016, h01=0x0050, text=» RF(NL) TDA30 YES «, t00=0x01af, t01=0x0044}
0x2a136…2a144               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01af, t01=0x005e}
0x2a144…2a14e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x006c}
0x2a14e…2a180               Head {h00=0x002e, h01=0x0050, text=»* P(R) IS NOT IN WINDOW, RETURN CODE := 1 «, t00=0x01af, t01=0x0076}
0x2a180…2a18a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x00a8}
0x2a18a…2a1ac               Head {h00=0x001e, h01=0x0050, text=» LDK A1,1 SET RETURN CODE «, t00=0x01af, t01=0x00b2}
0x2a1ac…2a1be               Head {h00=0x000e, h01=0x0050, text=» RF TDA40 «, t00=0x01af, t01=0x00d4}
0x2a1be…2a1c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x00e6}
0x2a1c8…2a1e0               Head {h00=0x0014, h01=0x0050, text=»* PACKET CORRECT«, t00=0x01af, t01=0x00f0}
0x2a1e0…2a1ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x0108}
0x2a1ea…2a1fe               Head {h00=0x0010, h01=0x0050, text=»TDA30 EQU * «, t00=0x01af, t01=0x0112}
0x2a1fe…2a220               Head {h00=0x001e, h01=0x0050, text=» LDK A1,0 SET RETURN CODE «, t00=0x01af, t01=0x0126}
0x2a220…2a234               Head {h00=0x0010, h01=0x0050, text=»TDA40 EQU * «, t00=0x01af, t01=0x0148}
0x2a234…2a244               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01af, t01=0x015c}
0x2a244…2a252               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01af, t01=0x016c}
0x2a252…2a25c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x017a}
0x2a25c…2a266               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x0184}
0x2a266…2a2a0               Head {h00=0x0036, h01=0x0050, text=»* CALCULATE QUEUE ANCHOR ADDRESS AND QUEUE ELEMENT«, t00=0x01af, t01=0x018e}
0x2a2a0…2a2aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b0, t01=0x0038}
0x2a2aa…2a2de               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01b0, t01=0x0042}
0x2a2de…2a2e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b0, t01=0x0076}
0x2a2e8…2a304               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01b0, t01=0x0080}
0x2a304…2a324               Head {h00=0x001c, h01=0x0050, text=»*  A2  = ELEMENT ADDRESS«, t00=0x01b0, t01=0x009c}
0x2a324…2a344               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x01b0, t01=0x00bc}
0x2a344…2a370               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01b0, t01=0x00dc}
0x2a370…2a37a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b0, t01=0x0108}
0x2a37a…2a396               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01b0, t01=0x0112}
0x2a396…2a3b4               Head {h00=0x001a, h01=0x0050, text=»*  CF    A14,QUEI/QUEO«, t00=0x01b0, t01=0x012e}
0x2a3b4…2a3be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b0, t01=0x014c}
0x2a3be…2a3da               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01b0, t01=0x0156}
0x2a3da…2a3ea               Head {h00=0x000c, h01=0x0050, text=»*  NONE «, t00=0x01b0, t01=0x0172}
0x2a3ea…2a402               Head {h00=0x0014, h01=0x0050, text=»*  A1 IS CHANGED«, t00=0x01b0, t01=0x0182}
0x2a402…2a40c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b1, t01=0x000a}
0x2a40c…2a41e               Head {h00=0x000e, h01=0x0050, text=»QUEI EQU *«, t00=0x01b1, t01=0x0014}
0x2a41e…2a434               Head {h00=0x0012, h01=0x0050, text=» LDK A1,QUEINP«, t00=0x01b1, t01=0x0026}
0x2a434…2a446               Head {h00=0x000e, h01=0x0050, text=» RF QUEO00«, t00=0x01b1, t01=0x003c}
0x2a446…2a450               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b1, t01=0x004e}
0x2a450…2a462               Head {h00=0x000e, h01=0x0050, text=»QUEO EQU *«, t00=0x01b1, t01=0x0058}
0x2a462…2a478               Head {h00=0x0012, h01=0x0050, text=» LDK A1,QUEOUT«, t00=0x01b1, t01=0x006a}
0x2a478…2a48c               Head {h00=0x0010, h01=0x0050, text=»QUEO00 EQU *«, t00=0x01b1, t01=0x0080}
0x2a48c…2a4b8               Head {h00=0x0028, h01=0x0050, text=» ADR A1,A13 GET QUEUE ANCHOR ADDRESS«, t00=0x01b1, t01=0x0094}
0x2a4b8…2a4dc               Head {h00=0x0020, h01=0x0050, text=» CF A14,QUEUE QUEUE ELEMENT «, t00=0x01b1, t01=0x00c0}
0x2a4dc…2a4ec               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01b1, t01=0x00e4}
0x2a4ec…2a4fa               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01b1, t01=0x00f4}
0x2a4fa…2a504               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b1, t01=0x0102}
0x2a504…2a50e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b1, t01=0x010c}
0x2a50e…2a52c               Head {h00=0x001a, h01=0x0050, text=»* QUEUE ROUTINE (FIFO)«, t00=0x01b1, t01=0x0116}
0x2a52c…2a536               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b1, t01=0x0134}
0x2a536…2a56a               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01b1, t01=0x013e}
0x2a56a…2a574               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b1, t01=0x0172}
0x2a574…2a590               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01b1, t01=0x017c}
0x2a590…2a5b6               Head {h00=0x0022, h01=0x0050, text=»*  A1  = ADDRESS QUEUE ANCHOR «, t00=0x01b2, t01=0x0008}
0x2a5b6…2a5d6               Head {h00=0x001c, h01=0x0050, text=»*  A2  = ELEMENT ADDRESS«, t00=0x01b2, t01=0x002e}
0x2a5d6…2a602               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01b2, t01=0x004e}
0x2a602…2a60c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b2, t01=0x007a}
0x2a60c…2a628               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01b2, t01=0x0084}
0x2a628…2a642               Head {h00=0x0016, h01=0x0050, text=»*  CF    A14,QUEUE«, t00=0x01b2, t01=0x00a0}
0x2a642…2a64c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b2, t01=0x00ba}
0x2a64c…2a668               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01b2, t01=0x00c4}
0x2a668…2a68c               Head {h00=0x0020, h01=0x0050, text=»*  NO REGISTERS ARE CHANGED «, t00=0x01b2, t01=0x00e0}
0x2a68c…2a696               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b2, t01=0x0104}
0x2a696…2a6aa               Head {h00=0x0010, h01=0x0050, text=»QUEUE EQU * «, t00=0x01b2, t01=0x010e}
0x2a6aa…2a6c0               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x01b2, t01=0x0122}
0x2a6c0…2a6ea               Head {h00=0x0026, h01=0x0050, text=» ST A1,QUESAV SAVE REGISTERS A1-A3«, t00=0x01b2, t01=0x0138}
0x2a6ea…2a702               Head {h00=0x0014, h01=0x0050, text=» ST A2,QUESAV-2 «, t00=0x01b2, t01=0x0162}
0x2a702…2a71a               Head {h00=0x0014, h01=0x0050, text=» ST A3,QUESAV-4 «, t00=0x01b2, t01=0x017a}
0x2a71a…2a726 (435, 0, 398) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01b3, t01=0x0004}
0x2a726…2a73c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x01b3, t01=0x0010}
0x2a73c…2a766               Head {h00=0x0026, h01=0x0050, text=» MS 3,QUESAV-4 SAVE REGISTERSA1-A3«, t00=0x01b3, t01=0x0026}
0x2a766…2a772               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01b3, t01=0x0050}
0x2a772…2a786               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A1 «, t00=0x01b3, t01=0x005c}
0x2a786…2a7aa               Head {h00=0x0020, h01=0x0050, text=» ANKL A3,/FFFE QUEUE FILLED?«, t00=0x01b3, t01=0x0070}
0x2a7aa…2a7c2               Head {h00=0x0014, h01=0x0050, text=» RF(Z) QUE10 NO «, t00=0x01b3, t01=0x0094}
0x2a7c2…2a7cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b3, t01=0x00ac}
0x2a7cc…2a7da               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01b3, t01=0x00b6}
0x2a7da…2a7e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b3, t01=0x00c4}
0x2a7e4…2a7f8               Head {h00=0x0010, h01=0x0050, text=»QUE05 EQU * «, t00=0x01b3, t01=0x00ce}
0x2a7f8…2a81c               Head {h00=0x0020, h01=0x0050, text=» LDR A1,A3 GET NEXT ELEMENT «, t00=0x01b3, t01=0x00e2}
0x2a81c…2a842               Head {h00=0x0022, h01=0x0050, text=» LD A3,BFCHPT,A1 CHAIN FILLED?«, t00=0x01b3, t01=0x0106}
0x2a842…2a85c               Head {h00=0x0016, h01=0x0050, text=» RB(NZ) QUE05 YES «, t00=0x01b3, t01=0x012c}
0x2a85c…2a886               Head {h00=0x0026, h01=0x0050, text=» ST A2,BFCHPT,A1 STORE NEW ELEMENT«, t00=0x01b3, t01=0x0146}
0x2a886…2a898               Head {h00=0x000e, h01=0x0050, text=» RF QUE15 «, t00=0x01b3, t01=0x0170}
0x2a898…2a8ac               Head {h00=0x0010, h01=0x0050, text=»QUE10 EQU * «, t00=0x01b3, t01=0x0182}
0x2a8ac…2a8d8               Head {h00=0x0028, h01=0x0050, text=» ORRS A2,A1 STORE ELEMENT IN ANCHOR «, t00=0x01b4, t01=0x0008}
0x2a8d8…2a8ec               Head {h00=0x0010, h01=0x0050, text=»QUE15 EQU * «, t00=0x01b4, t01=0x0034}
0x2a8ec…2a91a               Head {h00=0x002a, h01=0x0050, text=» CM BFCHPT,A2 SET ZERO IN CHAINPOINTER«, t00=0x01b4, t01=0x0048}
0x2a91a…2a930               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x01b4, t01=0x0076}
0x2a930…2a95e               Head {h00=0x002a, h01=0x0050, text=» LD A1,QUESAV RESTORE REGISTERS A1-A3 «, t00=0x01b4, t01=0x008c}
0x2a95e…2a976               Head {h00=0x0014, h01=0x0050, text=» LD A2,QUESAV-2 «, t00=0x01b4, t01=0x00ba}
0x2a976…2a98e               Head {h00=0x0014, h01=0x0050, text=» LD A3,QUESAV-4 «, t00=0x01b4, t01=0x00d2}
0x2a98e…2a99a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01b4, t01=0x00ea}
0x2a99a…2a9b0               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x01b4, t01=0x00f6}
0x2a9b0…2a9de               Head {h00=0x002a, h01=0x0050, text=» ML 3,QUESAV-4 RESTORE REGISTERS A1-A3«, t00=0x01b4, t01=0x010c}
0x2a9de…2a9ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01b4, t01=0x013a}
0x2a9ea…2a9fa               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01b4, t01=0x0146}
0x2a9fa…2aa08               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01b4, t01=0x0156}
0x2aa08…2aa12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b4, t01=0x0164}
0x2aa12…2aa1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b4, t01=0x016e}
0x2aa1c…2aa3a               Head {h00=0x001a, h01=0x0050, text=»* QUEUE ROUTINE (LIFO)«, t00=0x01b4, t01=0x0178}
0x2aa3a…2aa44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b5, t01=0x0008}
0x2aa44…2aa78               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01b5, t01=0x0012}
0x2aa78…2aa82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b5, t01=0x0046}
0x2aa82…2aa9e               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01b5, t01=0x0050}
0x2aa9e…2aac4               Head {h00=0x0022, h01=0x0050, text=»*  A1  = ADDRESS QUEUE ANCHOR «, t00=0x01b5, t01=0x006c}
0x2aac4…2aae4               Head {h00=0x001c, h01=0x0050, text=»*  A2  = ELEMENT ADDRESS«, t00=0x01b5, t01=0x0092}
0x2aae4…2ab10               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01b5, t01=0x00b2}
0x2ab10…2ab1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b5, t01=0x00de}
0x2ab1a…2ab36               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01b5, t01=0x00e8}
0x2ab36…2ab52               Head {h00=0x0018, h01=0x0050, text=»*  CF    A14,QUEUEF «, t00=0x01b5, t01=0x0104}
0x2ab52…2ab5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b5, t01=0x0120}
0x2ab5c…2ab78               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01b5, t01=0x012a}
0x2ab78…2ab9c               Head {h00=0x0020, h01=0x0050, text=»*  NO REGISTERS ARE CHANGED «, t00=0x01b5, t01=0x0146}
0x2ab9c…2aba6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b5, t01=0x016a}
0x2aba6…2abba               Head {h00=0x0010, h01=0x0050, text=»QUEUEF EQU *«, t00=0x01b5, t01=0x0174}
0x2abba…2abe4               Head {h00=0x0026, h01=0x0050, text=» ST A3,QUESAV SAVE REGISTERS A3,A4«, t00=0x01b5, t01=0x0188}
0x2abe4…2abfc               Head {h00=0x0014, h01=0x0050, text=» ST A4,QUESAV-2 «, t00=0x01b6, t01=0x0022}
0x2abfc…2ac20               Head {h00=0x0020, h01=0x0050, text=»         CM       BFCHPT,A2 «, t00=0x01b6, t01=0x003a}
0x2ac20…2ac52               Head {h00=0x002e, h01=0x0050, text=» LDR* A4,A1 GET ADDRESS FROM QUEUE ANCHOR «, t00=0x01b6, t01=0x005e}
0x2ac52…2ac72               Head {h00=0x001c, h01=0x0050, text=» ANK A4,/01 SAVE BIT 15 «, t00=0x01b6, t01=0x0090}
0x2ac72…2ac88               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/FFFE«, t00=0x01b6, t01=0x00b0}
0x2ac88…2acb2               Head {h00=0x0026, h01=0x0050, text=» ANRS A3,A1 CLEAR BIT 15 OF ANCHOR«, t00=0x01b6, t01=0x00c6}
0x2acb2…2ace0               Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A1 ADDRESS FROM QUEUE ANCHOR «, t00=0x01b6, t01=0x00f0}
0x2ace0…2acf6               Head {h00=0x0012, h01=0x0050, text=» RF(Z) QUEF10 «, t00=0x01b6, t01=0x011e}
0x2acf6…2ad30               Head {h00=0x0036, h01=0x0050, text=» ST A3,BFCHPT,A2 STORE OLD POINTER IN NEW ELEMENT «, t00=0x01b6, t01=0x0134}
0x2ad30…2ad44               Head {h00=0x0010, h01=0x0050, text=»QUEF10 EQU *«, t00=0x01b6, t01=0x016e}
0x2ad44…2ad72               Head {h00=0x002a, h01=0x0050, text=» STR A2,A1 STORE NEW ELEMENT IN ANCHOR«, t00=0x01b6, t01=0x0182}
0x2ad72…2ada0               Head {h00=0x002a, h01=0x0050, text=» ORRS A4,A1 STORE OLD BIT 15 IN ANCHOR«, t00=0x01b7, t01=0x0020}
0x2ada0…2adce               Head {h00=0x002a, h01=0x0050, text=» LD A3,QUESAV RESTORE REGISTERS A3,A4 «, t00=0x01b7, t01=0x004e}
0x2adce…2ade6               Head {h00=0x0014, h01=0x0050, text=» LD A4,QUESAV-2 «, t00=0x01b7, t01=0x007c}
0x2ade6…2adf6               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01b7, t01=0x0094}
0x2adf6…2ae04               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01b7, t01=0x00a4}
0x2ae04…2ae0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b7, t01=0x00b2}
0x2ae0e…2ae18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b7, t01=0x00bc}
0x2ae18…2ae32               Head {h00=0x0016, h01=0x0050, text=»* DEQUEUE ROUTINE «, t00=0x01b7, t01=0x00c6}
0x2ae32…2ae3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b7, t01=0x00e0}
0x2ae3c…2ae70               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01b7, t01=0x00ea}
0x2ae70…2ae7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b7, t01=0x011e}
0x2ae7a…2ae96               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01b7, t01=0x0128}
0x2ae96…2aebc               Head {h00=0x0022, h01=0x0050, text=»*  A1  = ADDRESS QUEUE ANCHOR «, t00=0x01b7, t01=0x0144}
0x2aebc…2aee8               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01b7, t01=0x016a}
0x2aee8…2aef2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b8, t01=0x0008}
0x2aef2…2af0e               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01b8, t01=0x0012}
0x2af0e…2af28               Head {h00=0x0016, h01=0x0050, text=»*  CF    A14,DEQUE«, t00=0x01b8, t01=0x002e}
0x2af28…2af32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b8, t01=0x0048}
0x2af32…2af4e               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01b8, t01=0x0052}
0x2af4e…2af6e               Head {h00=0x001c, h01=0x0050, text=»*  A2 = ELEMENT ADDRESS «, t00=0x01b8, t01=0x006e}
0x2af6e…2af92               Head {h00=0x0020, h01=0x0050, text=»*  NO REGISTERS ARE CHANGED «, t00=0x01b8, t01=0x008e}
0x2af92…2af9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b8, t01=0x00b2}
0x2af9c…2afb0               Head {h00=0x0010, h01=0x0050, text=»DEQUE EQU * «, t00=0x01b8, t01=0x00bc}
0x2afb0…2afd6               Head {h00=0x0022, h01=0x0050, text=» ST A3,QUESAV SAVE REGISTER A3«, t00=0x01b8, t01=0x00d0}
0x2afd6…2b002               Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A1 GET ELEMENT FROM ANCHOR «, t00=0x01b8, t01=0x00f6}
0x2b002…2b034               Head {h00=0x002e, h01=0x0050, text=» LD A3,BFCHPT,A2 GET ADDRESS NEXT ELEMENT «, t00=0x01b8, t01=0x0122}
0x2b034…2b056               Head {h00=0x001e, h01=0x0050, text=» STR A3,A1 STORE IN ANCHOR«, t00=0x01b8, t01=0x0154}
0x2b056…2b080               Head {h00=0x0026, h01=0x0050, text=» CM BFCHPT,A2 ZERO IN CHAINPOINTER«, t00=0x01b8, t01=0x0176}
0x2b080…2b092               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x01b9, t01=0x0010}
0x2b092…2b0a6               Head {h00=0x0010, h01=0x0050, text=» ANK A3,1 . «, t00=0x01b9, t01=0x0022}
0x2b0a6…2b0d6               Head {h00=0x002c, h01=0x0050, text=» XRR A2,A3 RESET BIT 15 IN ELEMENT ADDR.«, t00=0x01b9, t01=0x0036}
0x2b0d6…2b100               Head {h00=0x0026, h01=0x0050, text=» LD A3,QUESAV RESTORE REGISTER A3 «, t00=0x01b9, t01=0x0066}
0x2b100…2b110               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01b9, t01=0x0090}
0x2b110…2b11e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01b9, t01=0x00a0}
0x2b11e…2b128               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b9, t01=0x00ae}
0x2b128…2b132               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b9, t01=0x00b8}
0x2b132…2b150               Head {h00=0x001a, h01=0x0050, text=»* START TIMER ROUTINE «, t00=0x01b9, t01=0x00c2}
0x2b150…2b15a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b9, t01=0x00e0}
0x2b15a…2b18e               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01b9, t01=0x00ea}
0x2b18e…2b198               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b9, t01=0x011e}
0x2b198…2b1b4               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01b9, t01=0x0128}
0x2b1b4…2b1d8               Head {h00=0x0020, h01=0x0050, text=»*  A4  = ACTIVATION ADDRESS «, t00=0x01b9, t01=0x0144}
0x2b1d8…2b1f8               Head {h00=0x001c, h01=0x0050, text=»*  A8  = TIME-OUT VALUE «, t00=0x01b9, t01=0x0168}
0x2b1f8…2b216               Head {h00=0x001a, h01=0x0050, text=»*  A12 = 1TH PARAMETER«, t00=0x01b9, t01=0x0188}
0x2b216…2b234               Head {h00=0x001a, h01=0x0050, text=»*  A13 = 2ND PARAMETER«, t00=0x01ba, t01=0x0016}
0x2b234…2b260               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01ba, t01=0x0034}
0x2b260…2b26a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ba, t01=0x0060}
0x2b26a…2b286               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01ba, t01=0x006a}
0x2b286…2b2a2               Head {h00=0x0018, h01=0x0050, text=»*  CF    A14,STRTIM «, t00=0x01ba, t01=0x0086}
0x2b2a2…2b2ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ba, t01=0x00a2}
0x2b2ac…2b2c8               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01ba, t01=0x00ac}
0x2b2c8…2b2e6               Head {h00=0x001a, h01=0x0050, text=»*  A4 = ADDRESS TIMER «, t00=0x01ba, t01=0x00c8}
0x2b2e6…2b310               Head {h00=0x0026, h01=0x0050, text=»*  NO OTHER REGISTERS ARE CHANGED «, t00=0x01ba, t01=0x00e6}
0x2b310…2b31a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ba, t01=0x0110}
0x2b31a…2b32e               Head {h00=0x0010, h01=0x0050, text=»STRTIM EQU *«, t00=0x01ba, t01=0x011a}
0x2b32e…2b344               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x01ba, t01=0x012e}
0x2b344…2b368               Head {h00=0x0020, h01=0x0050, text=» ST A1,TIMSAV SAVE REGISTERS«, t00=0x01ba, t01=0x0144}
0x2b368…2b380               Head {h00=0x0014, h01=0x0050, text=» ST A2,TIMSAV-2 «, t00=0x01ba, t01=0x0168}
0x2b380…2b398               Head {h00=0x0014, h01=0x0050, text=» ST A3,TIMSAV-4 «, t00=0x01ba, t01=0x0180}
0x2b398…2b3a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01bb, t01=0x0008}
0x2b3a4…2b3ba               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x01bb, t01=0x0014}
0x2b3ba…2b3e0               Head {h00=0x0022, h01=0x0050, text=» MS 3,TIMSAV-4 SAVE REGISTERS «, t00=0x01bb, t01=0x002a}
0x2b3e0…2b3ec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01bb, t01=0x0050}
0x2b3ec…2b40c               Head {h00=0x001c, h01=0x0050, text=» ST A8,STRPAR+2 SET TIME«, t00=0x01bb, t01=0x005c}
0x2b40c…2b42e               Head {h00=0x001e, h01=0x0050, text=» LDR A1,A13 LC-ADM ADDRESS«, t00=0x01bb, t01=0x007c}
0x2b42e…2b452               Head {h00=0x0020, h01=0x0050, text=» LDR A2,A4 DISPATCH ADDRESS «, t00=0x01bb, t01=0x009e}
0x2b452…2b474               Head {h00=0x001e, h01=0x0050, text=» LDR A3,A12 1TH PARAMETER «, t00=0x01bb, t01=0x00c2}
0x2b474…2b47e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bb, t01=0x00e4}
0x2b47e…2b48c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01bb, t01=0x00ee}
0x2b48c…2b496               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bb, t01=0x00fc}
0x2b496…2b4a8               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x01bb, t01=0x0106}
0x2b4a8…2b4d0               Head {h00=0x0024, h01=0x0050, text=» CF A15,GETBLK GET MONITOR BLOCK«, t00=0x01bb, t01=0x0118}
0x2b4d0…2b4f0               Head {h00=0x001c, h01=0x0050, text=» LDR A1,A4 ADDRESS BLOCK«, t00=0x01bb, t01=0x0140}
0x2b4f0…2b510               Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIME SET TIMER«, t00=0x01bb, t01=0x0160}
0x2b510…2b546               Head {h00=0x0032, h01=0x0050, text=»STRPAR DATA TIMACT TIMER ENTRY AFTER TIME OUT «, t00=0x01bb, t01=0x0180}
0x2b546…2b56c               Head {h00=0x0022, h01=0x0050, text=» DATA 0 TIMER VALUE IN 0,1 SEC«, t00=0x01bc, t01=0x0026}
0x2b56c…2b578               Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x01bc, t01=0x004c}
0x2b578…2b58e               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x01bc, t01=0x0058}
0x2b58e…2b5b6               Head {h00=0x0024, h01=0x0050, text=» LD A1,TIMSAV RESTORE REGISTERS «, t00=0x01bc, t01=0x006e}
0x2b5b6…2b5ce               Head {h00=0x0014, h01=0x0050, text=» LD A2,TIMSAV-2 «, t00=0x01bc, t01=0x0096}
0x2b5ce…2b5e6               Head {h00=0x0014, h01=0x0050, text=» LD A3,TIMSAV-4 «, t00=0x01bc, t01=0x00ae}
0x2b5e6…2b5f2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01bc, t01=0x00c6}
0x2b5f2…2b608               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x01bc, t01=0x00d2}
0x2b608…2b630               Head {h00=0x0024, h01=0x0050, text=» ML 3,TIMSAV-4 RESTORE REGISTERS«, t00=0x01bc, t01=0x00e8}
0x2b630…2b63c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01bc, t01=0x0110}
0x2b63c…2b64c               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01bc, t01=0x011c}
0x2b64c…2b656               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bc, t01=0x012c}
0x2b656…2b67c               Head {h00=0x0022, h01=0x0050, text=»*        RETURN AFTER TIME OUT«, t00=0x01bc, t01=0x0136}
0x2b67c…2b686               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bc, t01=0x015c}
0x2b686…2b69a               Head {h00=0x0010, h01=0x0050, text=»TIMACT EQU *«, t00=0x01bc, t01=0x0166}
0x2b69a…2b6be               Head {h00=0x0020, h01=0x0050, text=» LDKL A5,TTBX25 TTAB-ADDRESS«, t00=0x01bc, t01=0x017a}
0x2b6be…2b6e6               Head {h00=0x0024, h01=0x0050, text=» LD A2,2,A1 GET DISPATCH ADDRESS«, t00=0x01bd, t01=0x000e}
0x2b6e6…2b6f8               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x01bd, t01=0x0036}
0x2b6f8…2b71c               Head {h00=0x0020, h01=0x0050, text=» CF A15,ACTOT ACTIVATE TASK «, t00=0x01bd, t01=0x0048}
0x2b71c…2b72e               Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x01bd, t01=0x006c}
0x2b72e…2b73c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01bd, t01=0x007e}
0x2b73c…2b746               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bd, t01=0x008c}
0x2b746…2b750               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bd, t01=0x0096}
0x2b750…2b76e               Head {h00=0x001a, h01=0x0050, text=»* CANCEL TIMER ROUTINE«, t00=0x01bd, t01=0x00a0}
0x2b76e…2b778               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bd, t01=0x00be}
0x2b778…2b7ac               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01bd, t01=0x00c8}
0x2b7ac…2b7b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bd, t01=0x00fc}
0x2b7b6…2b7d2               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01bd, t01=0x0106}
0x2b7d2…2b7f0               Head {h00=0x001a, h01=0x0050, text=»*  A1  = ADDRESS TIMER«, t00=0x01bd, t01=0x0122}
0x2b7f0…2b81c               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01bd, t01=0x0140}
0x2b81c…2b826               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bd, t01=0x016c}
0x2b826…2b842               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01bd, t01=0x0176}
0x2b842…2b85e (446, 0, 400) Head {h00=0x0018, h01=0x0050, text=»*  CF    A14,CANTIM «, t00=0x01be, t01=0x0004}
0x2b85e…2b868               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01be, t01=0x0020}
0x2b868…2b884               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01be, t01=0x002a}
0x2b884…2b8a2               Head {h00=0x001a, h01=0x0050, text=»*  A1 = REMAINING TIME«, t00=0x01be, t01=0x0046}
0x2b8a2…2b8cc               Head {h00=0x0026, h01=0x0050, text=»*  NO OTHER REGISTERS ARE CHANGED «, t00=0x01be, t01=0x0064}
0x2b8cc…2b8d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01be, t01=0x008e}
0x2b8d6…2b8ea               Head {h00=0x0010, h01=0x0050, text=»CANTIM EQU *«, t00=0x01be, t01=0x0098}
0x2b8ea…2b90e               Head {h00=0x0020, h01=0x0050, text=» ST A2,TIMSAV SAVE REGISTERS«, t00=0x01be, t01=0x00ac}
0x2b90e…2b926               Head {h00=0x0014, h01=0x0050, text=» ST A3,TIMSAV-2 «, t00=0x01be, t01=0x00d0}
0x2b926…2b93e               Head {h00=0x0014, h01=0x0050, text=» ST A4,TIMSAV-4 «, t00=0x01be, t01=0x00e8}
0x2b93e…2b964               Head {h00=0x0022, h01=0x0050, text=» LDR A2,A1 ADDRESS TIMER VALUE«, t00=0x01be, t01=0x0100}
0x2b964…2b978               Head {h00=0x0010, h01=0x0050, text=»         INH«, t00=0x01be, t01=0x0126}
0x2b978…2b9a0               Head {h00=0x0024, h01=0x0050, text=» RF(Z) CANTEN NO TIMER SPECIFIED«, t00=0x01be, t01=0x013a}
0x2b9a0…2b9c4               Head {h00=0x0020, h01=0x0050, text=» LDR* A1,A2 GET TIMER VALUE «, t00=0x01be, t01=0x0162}
0x2b9c4…2b9e4               Head {h00=0x001c, h01=0x0050, text=» RF(Z) CANTEN TIMER = 0 «, t00=0x01be, t01=0x0186}
0x2b9e4…2ba0a               Head {h00=0x0022, h01=0x0050, text=» C1R A1,A1 GET REMAINING TIME «, t00=0x01bf, t01=0x0016}
0x2ba0a…2ba46               Head {h00=0x0038, h01=0x0050, text=»         CMR      A2               SET TIMER VALUE 0«, t00=0x01bf, t01=0x003c}
0x2ba46…2ba6e               Head {h00=0x0024, h01=0x0050, text=» LD A3,-2,A2 ADDRESS TIMOUTBLOCK«, t00=0x01bf, t01=0x0078}
0x2ba6e…2ba9a               Head {h00=0x0028, h01=0x0050, text=» LD A4,4,A3 ADDRESS ACTIVATIONBLOCK «, t00=0x01bf, t01=0x00a0}
0x2ba9a…2bab6               Head {h00=0x0018, h01=0x0050, text=» ST A1,4,A4 SAVE A1 «, t00=0x01bf, t01=0x00cc}
0x2bab6…2bac8               Head {h00=0x000e, h01=0x0050, text=» INH  . =1«, t00=0x01bf, t01=0x00e8}
0x2bac8…2baf6               Head {h00=0x002a, h01=0x0050, text=» CF A15,FREBLK RELEASE ACTIVATIONBLOCK«, t00=0x01bf, t01=0x00fa}
0x2baf6…2bb00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bf, t01=0x0128}
0x2bb00…2bb0e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01bf, t01=0x0132}
0x2bb0e…2bb18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bf, t01=0x0140}
0x2bb18…2bb2c               Head {h00=0x0010, h01=0x0050, text=»CANTEN EQU *«, t00=0x01bf, t01=0x014a}
0x2bb2c…2bb40               Head {h00=0x0010, h01=0x0050, text=»         ENB«, t00=0x01bf, t01=0x015e}
0x2bb40…2bb68               Head {h00=0x0024, h01=0x0050, text=» LD A2,TIMSAV RESTORE REGISTERS «, t00=0x01bf, t01=0x0172}
0x2bb68…2bb80               Head {h00=0x0014, h01=0x0050, text=» LD A3,TIMSAV-2 «, t00=0x01c0, t01=0x000a}
0x2bb80…2bb98               Head {h00=0x0014, h01=0x0050, text=» LD A4,TIMSAV-4 «, t00=0x01c0, t01=0x0022}
0x2bb98…2bba8               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01c0, t01=0x003a}
0x2bba8…2bbb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x004a}
0x2bbb2…2bbca               Head {h00=0x0014, h01=0x0050, text=» RES 3 SAVE AREA«, t00=0x01c0, t01=0x0054}
0x2bbca…2bbe0               Head {h00=0x0012, h01=0x0050, text=»TIMSAV EQU *-2«, t00=0x01c0, t01=0x006c}
0x2bbe0…2bbf6               Head {h00=0x0012, h01=0x0050, text=»QUESAV EQU *-2«, t00=0x01c0, t01=0x0082}
0x2bbf6…2bc0c               Head {h00=0x0012, h01=0x0050, text=»         EJECT«, t00=0x01c0, t01=0x0098}
0x2bc0c…2bc16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x00ae}
0x2bc16…2bc20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x00b8}
0x2bc20…2bc58               Head {h00=0x0034, h01=0x0050, text=»* MODULE TO CONTROL THE PROCESSES IN THE DC-TASK«, t00=0x01c0, t01=0x00c2}
0x2bc58…2bc62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x00fa}
0x2bc62…2bc96               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01c0, t01=0x0104}
0x2bc96…2bca0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x0138}
0x2bca0…2bcbc               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01c0, t01=0x0142}
0x2bcbc…2bccc               Head {h00=0x000c, h01=0x0050, text=»*  NONE «, t00=0x01c0, t01=0x015e}
0x2bccc…2bcd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x016e}
0x2bcd6…2bcf2               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01c0, t01=0x0178}
0x2bcf2…2bd0a (449, 0, 398) Head {h00=0x0014, h01=0x0050, text=»*  ABL    EXITDC«, t00=0x01c1, t01=0x0004}
0x2bd0a…2bd14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c1, t01=0x001c}
0x2bd14…2bd30               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01c1, t01=0x0026}
0x2bd30…2bd5c               Head {h00=0x0028, h01=0x0050, text=»*  AT ENTRY OF AN ACTIVATED PROCESS:«, t00=0x01c1, t01=0x0042}
0x2bd5c…2bd82               Head {h00=0x0022, h01=0x0050, text=»*  A1  = QUEUE ANCHOR ADDRESS «, t00=0x01c1, t01=0x006e}
0x2bd82…2bda6               Head {h00=0x0020, h01=0x0050, text=»*  A12 = LINE BLOCK ADDRESS «, t00=0x01c1, t01=0x0094}
0x2bda6…2bdc6               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x01c1, t01=0x00b8}
0x2bdc6…2bdf2               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01c1, t01=0x00d8}
0x2bdf2…2bdfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c1, t01=0x0104}
0x2bdfc…2be10               Head {h00=0x0010, h01=0x0050, text=»EXITDC EQU *«, t00=0x01c1, t01=0x010e}
0x2be10…2be3a               Head {h00=0x0026, h01=0x0050, text=» LDK A5,NPRFLG NO PROCESSING MASK «, t00=0x01c1, t01=0x0122}
0x2be3a…2be4e               Head {h00=0x0010, h01=0x0050, text=» C1R A6,A5 .«, t00=0x01c1, t01=0x014c}
0x2be4e…2be58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c1, t01=0x0160}
0x2be58…2be80               Head {h00=0x0024, h01=0x0050, text=»* GET SAVED LAST SCAN PARAMETERS«, t00=0x01c1, t01=0x016a}
0x2be80…2be8a (450, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c2, t01=0x0004}
0x2be8a…2beb6               Head {h00=0x0028, h01=0x0050, text=» LD A4,SCHEDC LOGICAL CHANNEL INDEX «, t00=0x01c2, t01=0x000e}
0x2beb6…2bed6               Head {h00=0x001c, h01=0x0050, text=» LD A7,SCHEDL LINE INDEX«, t00=0x01c2, t01=0x003a}
0x2bed6…2bf00               Head {h00=0x0026, h01=0x0050, text=» LDKL A14,DCSTAK SET STACK POINTER«, t00=0x01c2, t01=0x005a}
0x2bf00…2bf26               Head {h00=0x0022, h01=0x0050, text=» LDKL A10,-2 SCAN LOOP-COUNTER«, t00=0x01c2, t01=0x0084}
0x2bf26…2bf30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c2, t01=0x00aa}
0x2bf30…2bf3e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01c2, t01=0x00b4}
0x2bf3e…2bf48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c2, t01=0x00c2}
0x2bf48…2bf5c               Head {h00=0x0010, h01=0x0050, text=»EXIT00 EQU *«, t00=0x01c2, t01=0x00cc}
0x2bf5c…2bf8c               Head {h00=0x002c, h01=0x0050, text=» LDKL A12,LINTAB GET LINE BLOCK ADDRESS «, t00=0x01c2, t01=0x00e0}
0x2bf8c…2bfa2               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x01c2, t01=0x0110}
0x2bfa2…2bfb8               Head {h00=0x0012, h01=0x0050, text=» ADR A12,A7 . «, t00=0x01c2, t01=0x0126}
0x2bfb8…2bfce               Head {h00=0x0012, h01=0x0050, text=» ADR A12,A7 . «, t00=0x01c2, t01=0x013c}
0x2bfce…2bfda               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01c2, t01=0x0152}
0x2bfda…2bff2               Head {h00=0x0014, h01=0x0050, text=» LDR* A12,A12 . «, t00=0x01c2, t01=0x015e}
0x2bff2…2bffc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c2, t01=0x0176}
0x2bffc…2c01c               Head {h00=0x001c, h01=0x0050, text=»* TEST IF LINE CONNECTED«, t00=0x01c2, t01=0x0180}
0x2c01c…2c026               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c3, t01=0x0010}
0x2c026…2c04e               Head {h00=0x0024, h01=0x0050, text=»         LD       A13,CMNFLG,A12«, t00=0x01c3, t01=0x001a}
0x2c04e…2c088               Head {h00=0x0036, h01=0x0050, text=» RF(Z) EXIT04 NO! CONTINUE WITH NEXT LINE (IF ANY)«, t00=0x01c3, t01=0x0042}
0x2c088…2c092               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c3, t01=0x007c}
0x2c092…2c0be               Head {h00=0x0028, h01=0x0050, text=»* TEST IF ONLY STATISTIC FLAG IS SET«, t00=0x01c3, t01=0x0086}
0x2c0be…2c0c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c3, t01=0x00b2}
0x2c0c8…2c0e0               Head {h00=0x0014, h01=0x0050, text=» SUKL A13,STATFL«, t00=0x01c3, t01=0x00bc}
0x2c0e0…2c0fa               Head {h00=0x0016, h01=0x0050, text=» RF(Z) EXIT04 YES «, t00=0x01c3, t01=0x00d4}
0x2c0fa…2c126               Head {h00=0x0028, h01=0x0050, text=» ADK A4,1 TAKE NEXT LOGICAL CHANNEL «, t00=0x01c3, t01=0x00ee}
0x2c126…2c154               Head {h00=0x002a, h01=0x0050, text=» CC A4,NRLC,A12 IS THERE A NEXT ONE ? «, t00=0x01c3, t01=0x011a}
0x2c154…2c16e               Head {h00=0x0016, h01=0x0050, text=» RF(L) EXIT10 YES «, t00=0x01c3, t01=0x0148}
0x2c16e…2c182               Head {h00=0x0010, h01=0x0050, text=»EXIT04 EQU *«, t00=0x01c3, t01=0x0162}
0x2c182…2c1b8               Head {h00=0x0032, h01=0x0050, text=» LDKL A4,-1 PRESET FOR NEW LG.CH. OF NEXT LINE«, t00=0x01c3, t01=0x0176}
0x2c1b8…2c1ce               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x01c4, t01=0x001c}
0x2c1ce…2c1f2               Head {h00=0x0020, h01=0x0050, text=» ADK A7,1 UPDATE LINE INDEX «, t00=0x01c4, t01=0x0032}
0x2c1f2…2c220               Head {h00=0x002a, h01=0x0050, text=» CWK A7,SYNRLN IS THERE A NEXT LINE ? «, t00=0x01c4, t01=0x0056}
0x2c220…2c252               Head {h00=0x002e, h01=0x0050, text=»         RF(L)    EXIT30               YES«, t00=0x01c4, t01=0x0084}
0x2c252…2c280               Head {h00=0x002a, h01=0x0050, text=» LDK A7,0 START AGAIN WITH FIRST LINE «, t00=0x01c4, t01=0x00b6}
0x2c280…2c28c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01c4, t01=0x00e4}
0x2c28c…2c2a0               Head {h00=0x0010, h01=0x0050, text=» ADKL A10,1 «, t00=0x01c4, t01=0x00f0}
0x2c2a0…2c2c6               Head {h00=0x0022, h01=0x0050, text=» RF(Z) EXIT32 END OF SCANNING «, t00=0x01c4, t01=0x0104}
0x2c2c6…2c2f6               Head {h00=0x002c, h01=0x0050, text=»         RF       EXIT30               .«, t00=0x01c4, t01=0x012a}
0x2c2f6…2c300               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c4, t01=0x015a}
0x2c300…2c30e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01c4, t01=0x0164}
0x2c30e…2c318               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c4, t01=0x0172}
0x2c318…2c32c               Head {h00=0x0010, h01=0x0050, text=»EXIT10 EQU *«, t00=0x01c4, t01=0x017c}
0x2c32c…2c356               Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x01c4, t01=0x0190}
0x2c356…2c388               Head {h00=0x002e, h01=0x0050, text=» LDKL A8,OUTPCK PRESET ACTIVATION ADDRESS «, t00=0x01c5, t01=0x002a}
0x2c388…2c3b4               Head {h00=0x0028, h01=0x0050, text=» LDKL A9,1 PRESET PROCESS INDICATION«, t00=0x01c5, t01=0x005c}
0x2c3b4…2c3ea               Head {h00=0x0032, h01=0x0050, text=» LD A3,NRPNDT,A12 CHECK NR. OF OUTPUT REQUESTS«, t00=0x01c5, t01=0x0088}
0x2c3ea…2c402               Head {h00=0x0014, h01=0x0050, text=» CWK A3,SYNRTR .«, t00=0x01c5, t01=0x00be}
0x2c402…2c42e               Head {h00=0x0028, h01=0x0050, text=» RF(NL) EXIT20 MAXIMUM, SO NO OUTPUT«, t00=0x01c5, t01=0x00d6}
0x2c42e…2c45c               Head {h00=0x002a, h01=0x0050, text=» LDR A1,A12 CHECK RESTART OUTPUT QUEUE«, t00=0x01c5, t01=0x0102}
0x2c45c…2c474               Head {h00=0x0014, h01=0x0050, text=» ADK A1,RSTQUE .«, t00=0x01c5, t01=0x0130}
0x2c474…2c48a               Head {h00=0x0012, h01=0x0050, text=» LDR* A2,A1 . «, t00=0x01c5, t01=0x0148}
0x2c48a…2c4aa               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) EXIT35 NOT EMPTY«, t00=0x01c5, t01=0x015e}
0x2c4aa…2c4d0               Head {h00=0x0022, h01=0x0050, text=» LDR A1,A13 CHECK OUTPUT QUEUE«, t00=0x01c5, t01=0x017e}
0x2c4d0…2c4e8               Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEOUT .«, t00=0x01c6, t01=0x0014}
0x2c4e8…2c4fe               Head {h00=0x0012, h01=0x0050, text=» LDR* A2,A1 . «, t00=0x01c6, t01=0x002c}
0x2c4fe…2c522               Head {h00=0x0020, h01=0x0050, text=» RF(Z) EXIT20 QUEUE IS EMPTY«, t00=0x01c6, t01=0x0042}
0x2c522…2c534               Head {h00=0x000e, h01=0x0050, text=» TM A2,A6 «, t00=0x01c6, t01=0x0066}
0x2c534…2c568               Head {h00=0x0030, h01=0x0050, text=» RF(Z) EXIT20 ONLY NO PROCESSING FLAG IS SET«, t00=0x01c6, t01=0x0078}
0x2c568…2c592               Head {h00=0x0026, h01=0x0050, text=» TM A2,A5 TEST IF QUEUE IS BLOCKED«, t00=0x01c6, t01=0x00ac}
0x2c592…2c5c2               Head {h00=0x002c, h01=0x0050, text=» RF(Z) EXIT40 NO, SO PROCESS THIS QUEUE «, t00=0x01c6, t01=0x00d6}
0x2c5c2…2c5d6               Head {h00=0x0010, h01=0x0050, text=»EXIT20 EQU *«, t00=0x01c6, t01=0x0106}
0x2c5d6…2c606               Head {h00=0x002c, h01=0x0050, text=» LDKL A8,RHIP PRESET ACTIVATION ADDRESS «, t00=0x01c6, t01=0x011a}
0x2c606…2c632               Head {h00=0x0028, h01=0x0050, text=» LDKL A9,4 PRESET PROCESS INDICATION«, t00=0x01c6, t01=0x014a}
0x2c632…2c658               Head {h00=0x0022, h01=0x0050, text=» LDR A1,A13 CHECK INPUT QUEUE «, t00=0x01c6, t01=0x0176}
0x2c658…2c670               Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEINP .«, t00=0x01c7, t01=0x000c}
0x2c670…2c686               Head {h00=0x0012, h01=0x0050, text=» LDR* A2,A1 . «, t00=0x01c7, t01=0x0024}
0x2c686…2c6aa               Head {h00=0x0020, h01=0x0050, text=» RF(Z) EXIT30 QUEUE IS EMPTY«, t00=0x01c7, t01=0x003a}
0x2c6aa…2c6bc               Head {h00=0x000e, h01=0x0050, text=» TM A2,A6 «, t00=0x01c7, t01=0x005e}
0x2c6bc…2c6f0               Head {h00=0x0030, h01=0x0050, text=» RF(Z) EXIT30 ONLY NO PROCESSING FLAG IS SET«, t00=0x01c7, t01=0x0070}
0x2c6f0…2c71a               Head {h00=0x0026, h01=0x0050, text=» TM A2,A5 TEST IF QUEUE IS BLOCKED«, t00=0x01c7, t01=0x00a4}
0x2c71a…2c74a               Head {h00=0x002c, h01=0x0050, text=» RF(Z) EXIT40 NO, SO PROCESS THIS QUEUE «, t00=0x01c7, t01=0x00ce}
0x2c74a…2c754               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c7, t01=0x00fe}
0x2c754…2c762               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01c7, t01=0x0108}
0x2c762…2c76c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c7, t01=0x0116}
0x2c76c…2c79e               Head {h00=0x002e, h01=0x0050, text=»* CHECK IF A COMPLETED SCAN CYCLE IS DONE «, t00=0x01c7, t01=0x0120}
0x2c79e…2c7a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c7, t01=0x0152}
0x2c7a8…2c7bc               Head {h00=0x0010, h01=0x0050, text=»EXIT30 EQU *«, t00=0x01c7, t01=0x015c}
0x2c7bc…2c7d2               Head {h00=0x0012, h01=0x0050, text=» CW A4,SCHEDC «, t00=0x01c7, t01=0x0170}
0x2c7d2…2c800               Head {h00=0x002a, h01=0x0050, text=» RB(NE) EXIT00 CONTINUE WITH SCANNING «, t00=0x01c7, t01=0x0186}
0x2c800…2c824               Head {h00=0x0020, h01=0x0050, text=»         CW       A7,SCHEDL «, t00=0x01c8, t01=0x0024}
0x2c824…2c852               Head {h00=0x002a, h01=0x0050, text=» RB(NE) EXIT00 CONTINUE WITH SCANNING «, t00=0x01c8, t01=0x0048}
0x2c852…2c87c               Head {h00=0x0026, h01=0x0050, text=» CM DCLEVL SET PROCESS INDICATION «, t00=0x01c8, t01=0x0076}
0x2c87c…2c898               Head {h00=0x0018, h01=0x0050, text=»EXIT32   EQU      * «, t00=0x01c8, t01=0x00a0}
0x2c898…2c8b2               Head {h00=0x0016, h01=0x0050, text=» LKM  EXIT DC-TASK«, t00=0x01c8, t01=0x00bc}
0x2c8b2…2c8c2               Head {h00=0x000c, h01=0x0050, text=» DATA 3 «, t00=0x01c8, t01=0x00d6}
0x2c8c2…2c8cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c8, t01=0x00e6}
0x2c8cc…2c912               Head {h00=0x0042, h01=0x0050, text=»* A NOT EMPTY QUEUE IS FOUND, ACTIVATE THE CONCERNING PROCESS «, t00=0x01c8, t01=0x00f0}
0x2c912…2c91c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c8, t01=0x0136}
0x2c91c…2c930               Head {h00=0x0010, h01=0x0050, text=»EXIT35 EQU *«, t00=0x01c8, t01=0x0140}
0x2c930…2c96e               Head {h00=0x003a, h01=0x0050, text=» LD* A13,LC:TAB,A12 USE LOGICAL CHANNEL 0 FOR RESTART «, t00=0x01c8, t01=0x0154}
0x2c96e…2c982 (457, 0, 400) Head {h00=0x0010, h01=0x0050, text=»EXIT40 EQU *«, t00=0x01c9, t01=0x0004}
0x2c982…2c9ac               Head {h00=0x0026, h01=0x0050, text=» ST A4,SCHEDC SAVE SCAN PARAMETERS«, t00=0x01c9, t01=0x0018}
0x2c9ac…2c9c4               Head {h00=0x0014, h01=0x0050, text=» ST A7,SCHEDL . «, t00=0x01c9, t01=0x0042}
0x2c9c4…2c9f0               Head {h00=0x0028, h01=0x0050, text=» ST A9,DCLEVL SET PROCESS INDICATION«, t00=0x01c9, t01=0x005a}
0x2c9f0…2ca16               Head {h00=0x0022, h01=0x0050, text=» ABR A8 BRANCH TO THE ROUTINE «, t00=0x01c9, t01=0x0086}
0x2ca16…2ca20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c9, t01=0x00ac}
0x2ca20…2ca66               Head {h00=0x0042, h01=0x0050, text=»SCHEDC   DATA     0                     LOGICAL CHANNEL INDEX «, t00=0x01c9, t01=0x00b6}
0x2ca66…2ca86               Head {h00=0x001c, h01=0x0050, text=»SCHEDL DATA 0 LINE INDEX«, t00=0x01c9, t01=0x00fc}
0x2ca86…2ca94               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01c9, t01=0x011c}
0x2ca94…2ca9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c9, t01=0x012a}
0x2ca9e…2caa8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c9, t01=0x0134}
0x2caa8…2cad4               Head {h00=0x0028, h01=0x0050, text=»* ROUTINE TO RESET A VIRTUAL CIRCUIT«, t00=0x01c9, t01=0x013e}
0x2cad4…2cade               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c9, t01=0x016a}
0x2cade…2cb12               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01c9, t01=0x0174}
0x2cb12…2cb1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ca, t01=0x0018}
0x2cb1c…2cb38               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01ca, t01=0x0022}
0x2cb38…2cb58               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x01ca, t01=0x003e}
0x2cb58…2cb84               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01ca, t01=0x005e}
0x2cb84…2cb8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ca, t01=0x008a}
0x2cb8e…2cbaa               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01ca, t01=0x0094}
0x2cbaa…2cbc6               Head {h00=0x0018, h01=0x0050, text=»*  CF    A14,RSETVC «, t00=0x01ca, t01=0x00b0}
0x2cbc6…2cbd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ca, t01=0x00cc}
0x2cbd0…2cbec               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01ca, t01=0x00d6}
0x2cbec…2cbfc               Head {h00=0x000c, h01=0x0050, text=»*  NONE «, t00=0x01ca, t01=0x00f2}
0x2cbfc…2cc06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ca, t01=0x0102}
0x2cc06…2cc1a               Head {h00=0x0010, h01=0x0050, text=»RSETVC EQU *«, t00=0x01ca, t01=0x010c}
0x2cc1a…2cc3e               Head {h00=0x0020, h01=0x0050, text=»         CF       A14,SAVE8 «, t00=0x01ca, t01=0x0120}
0x2cc3e…2cc68               Head {h00=0x0026, h01=0x0050, text=» CF A14,CLLCAD CLEAR LC-ADM FIELDS«, t00=0x01ca, t01=0x0144}
0x2cc68…2cc72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ca, t01=0x016e}
0x2cc72…2cc8e               Head {h00=0x0018, h01=0x0050, text=»* EMPTY INPUT QUEUE «, t00=0x01ca, t01=0x0178}
0x2cc8e…2cc98 (459, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cb, t01=0x0004}
0x2cc98…2ccbc               Head {h00=0x0020, h01=0x0050, text=»         CF       A14,CLINPQ«, t00=0x01cb, t01=0x000e}
0x2ccbc…2ccc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cb, t01=0x0032}
0x2ccc6…2ccf0               Head {h00=0x0026, h01=0x0050, text=»* COMPLETE EVENTS IN OUTPUT QUEUE «, t00=0x01cb, t01=0x003c}
0x2ccf0…2ccfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cb, t01=0x0066}
0x2ccfa…2cd34               Head {h00=0x0036, h01=0x0050, text=» LD A1,LCDWT,A13 IS THERE A RELATION WITH AN USER «, t00=0x01cb, t01=0x0070}
0x2cd34…2cd4c               Head {h00=0x0014, h01=0x0050, text=» RF(Z) RSET20 NO«, t00=0x01cb, t01=0x00aa}
0x2cd4c…2cd70               Head {h00=0x0020, h01=0x0050, text=» LDKL A3,RSET.RC RETURN CODE«, t00=0x01cb, t01=0x00c2}
0x2cd70…2cd86               Head {h00=0x0012, h01=0x0050, text=» CF A14,CMEVNT«, t00=0x01cb, t01=0x00e6}
0x2cd86…2cd9a               Head {h00=0x0010, h01=0x0050, text=»RSET20 EQU *«, t00=0x01cb, t01=0x00fc}
0x2cd9a…2cdbe               Head {h00=0x0020, h01=0x0050, text=»         CF       A14,RELOA8«, t00=0x01cb, t01=0x0110}
0x2cdbe…2cdce               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01cb, t01=0x0134}
0x2cdce…2cdd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cb, t01=0x0144}
0x2cdd8…2cde6               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01cb, t01=0x014e}
0x2cde6…2cdf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cb, t01=0x015c}
0x2cdf0…2cdfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cb, t01=0x0166}
0x2cdfa…2ce24               Head {h00=0x0026, h01=0x0050, text=»* ROUTINE TO EMPTY THE INPUT QUEUE«, t00=0x01cb, t01=0x0170}
0x2ce24…2ce2e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cc, t01=0x000a}
0x2ce2e…2ce6a               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x01cc, t01=0x0014}
0x2ce6a…2ce74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cc, t01=0x0050}
0x2ce74…2ce90               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01cc, t01=0x005a}
0x2ce90…2ceb0               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x01cc, t01=0x0076}
0x2ceb0…2ced2               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x01cc, t01=0x0096}
0x2ced2…2cedc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cc, t01=0x00b8}
0x2cedc…2cef8               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01cc, t01=0x00c2}
0x2cef8…2cf08               Head {h00=0x000c, h01=0x0050, text=»*  NONE «, t00=0x01cc, t01=0x00de}
0x2cf08…2cf12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cc, t01=0x00ee}
0x2cf12…2cf2e               Head {h00=0x0018, h01=0x0050, text=»CLINPQ   EQU      * «, t00=0x01cc, t01=0x00f8}
0x2cf2e…2cf56               Head {h00=0x0024, h01=0x0050, text=» LDR A1,A13 QUEUE ANCHOR ADDRESS«, t00=0x01cc, t01=0x0114}
0x2cf56…2cf6e               Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEINP .«, t00=0x01cc, t01=0x013c}
0x2cf6e…2cf94               Head {h00=0x0022, h01=0x0050, text=» LDK A2,NPRFLG SET MASK VALUE «, t00=0x01cc, t01=0x0154}
0x2cf94…2cfa8               Head {h00=0x0010, h01=0x0050, text=» C1R A2,A2 .«, t00=0x01cc, t01=0x017a}
0x2cfa8…2cfcc               Head {h00=0x0020, h01=0x0050, text=» ANRS A2,A1 IS QUEUE EMPTY ?«, t00=0x01cc, t01=0x018e}
0x2cfcc…2cffa               Head {h00=0x002a, h01=0x0050, text=»         RF(Z)    CLINP1           YES«, t00=0x01cd, t01=0x0022}
0x2cffa…2d026               Head {h00=0x0028, h01=0x0050, text=» CF A14,DEQUE GET ELEMENT FROM QUEUE«, t00=0x01cd, t01=0x0050}
0x2d026…2d04a               Head {h00=0x0020, h01=0x0050, text=» CF A14,RLBUF RELEASE BUFFER«, t00=0x01cd, t01=0x007c}
0x2d04a…2d06a               Head {h00=0x001c, h01=0x0050, text=»         RB       CLINPQ«, t00=0x01cd, t01=0x00a0}
0x2d06a…2d074               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cd, t01=0x00c0}
0x2d074…2d090               Head {h00=0x0018, h01=0x0050, text=»CLINP1   EQU      * «, t00=0x01cd, t01=0x00ca}
0x2d090…2d0ae               Head {h00=0x001a, h01=0x0050, text=»         RTN      A14 «, t00=0x01cd, t01=0x00e6}
0x2d0ae…2d0bc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01cd, t01=0x0104}
0x2d0bc…2d0c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cd, t01=0x0112}
0x2d0c6…2d0d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cd, t01=0x011c}
0x2d0d0…2d0f8               Head {h00=0x0024, h01=0x0050, text=»* ROUTINE TO CLEAR LC-ADM FIELDS«, t00=0x01cd, t01=0x0126}
0x2d0f8…2d102               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cd, t01=0x014e}
0x2d102…2d136               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01cd, t01=0x0158}
0x2d136…2d140               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cd, t01=0x018c}
0x2d140…2d15c               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01ce, t01=0x0008}
0x2d15c…2d17a               Head {h00=0x001a, h01=0x0050, text=»*  A13 = LC-ADM FIELDS«, t00=0x01ce, t01=0x0024}
0x2d17a…2d1a6               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01ce, t01=0x0042}
0x2d1a6…2d1b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ce, t01=0x006e}
0x2d1b0…2d1cc               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01ce, t01=0x0078}
0x2d1cc…2d1e8               Head {h00=0x0018, h01=0x0050, text=»*  CF     A14,CLLCAD«, t00=0x01ce, t01=0x0094}
0x2d1e8…2d1f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ce, t01=0x00b0}
0x2d1f2…2d20e               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01ce, t01=0x00ba}
0x2d20e…2d21e               Head {h00=0x000c, h01=0x0050, text=»*  NONE «, t00=0x01ce, t01=0x00d6}
0x2d21e…2d236               Head {h00=0x0014, h01=0x0050, text=»*  A1 IS CHANGED«, t00=0x01ce, t01=0x00e6}
0x2d236…2d240               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ce, t01=0x00fe}
0x2d240…2d254               Head {h00=0x0010, h01=0x0050, text=»CLLCAD EQU *«, t00=0x01ce, t01=0x0108}
0x2d254…2d266               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x01ce, t01=0x011c}
0x2d266…2d296               Head {h00=0x002c, h01=0x0050, text=» ST A1,FLAGS,A13 CLEAR FIELDS IN LC-ADM «, t00=0x01ce, t01=0x012e}
0x2d296…2d2c0               Head {h00=0x0026, h01=0x0050, text=»         ST       A1,SYSBUF-2,A13 «, t00=0x01ce, t01=0x015e}
0x2d2c0…2d2d8               Head {h00=0x0014, h01=0x0050, text=» SC A1,PS,A13 . «, t00=0x01ce, t01=0x0188}
0x2d2d8…2d2f0               Head {h00=0x0014, h01=0x0050, text=» SC A1,PR,A13 . «, t00=0x01cf, t01=0x0010}
0x2d2f0…2d308               Head {h00=0x0014, h01=0x0050, text=» SC A1,RPS,A13 .«, t00=0x01cf, t01=0x0028}
0x2d308…2d322               Head {h00=0x0016, h01=0x0050, text=» SC A1,SLWE,A13 . «, t00=0x01cf, t01=0x0040}
0x2d322…2d348               Head {h00=0x0022, h01=0x0050, text=»         SC       A1,RLWE,A13 «, t00=0x01cf, t01=0x005a}
0x2d348…2d362               Head {h00=0x0016, h01=0x0050, text=» SC A1,NRNUBF,A13 «, t00=0x01cf, t01=0x0080}
0x2d362…2d372               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01cf, t01=0x009a}
0x2d372…2d380               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01cf, t01=0x00aa}
0x2d380…2d38a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cf, t01=0x00b8}
0x2d38a…2d394               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cf, t01=0x00c2}
0x2d394…2d3d0               Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE CALCULATES FROM THE FILE CODE OF THE «, t00=0x01cf, t01=0x00cc}
0x2d3d0…2d3fa               Head {h00=0x0026, h01=0x0050, text=»* LINE ECB THE LINE BLOCK ADDRESS «, t00=0x01cf, t01=0x0108}
0x2d3fa…2d404               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cf, t01=0x0132}
0x2d404…2d438               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01cf, t01=0x013c}
0x2d438…2d442               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cf, t01=0x0170}
0x2d442…2d45e               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01cf, t01=0x017a}
0x2d45e…2d480               Head {h00=0x001e, h01=0x0050, text=»*  A8  = LINE ECB ADDRESS «, t00=0x01d0, t01=0x0008}
0x2d480…2d4ac               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01d0, t01=0x002a}
0x2d4ac…2d4b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d0, t01=0x0056}
0x2d4b6…2d4d2               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01d0, t01=0x0060}
0x2d4d2…2d4ec               Head {h00=0x0016, h01=0x0050, text=»*  CF    A14,GTLBA«, t00=0x01d0, t01=0x007c}
0x2d4ec…2d4f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d0, t01=0x0096}
0x2d4f6…2d512               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01d0, t01=0x00a0}
0x2d512…2d536               Head {h00=0x0020, h01=0x0050, text=»*  A12 = LINE BLOCK ADDRESS «, t00=0x01d0, t01=0x00bc}
0x2d536…2d540               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d0, t01=0x00e0}
0x2d540…2d554               Head {h00=0x0010, h01=0x0050, text=»GTLBA EQU * «, t00=0x01d0, t01=0x00ea}
0x2d554…2d56a               Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=1 «, t00=0x01d0, t01=0x00fe}
0x2d56a…2d594               Head {h00=0x0026, h01=0x0050, text=» LD A12,LINTAB LINE BLOCK ADDRESS «, t00=0x01d0, t01=0x0114}
0x2d594…2d5a0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01d0, t01=0x013e}
0x2d5a0…2d5b6               Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x01d0, t01=0x014a}
0x2d5b6…2d5d8               Head {h00=0x001e, h01=0x0050, text=» STR A1,A14 SAVE REGISTER «, t00=0x01d0, t01=0x0160}
0x2d5d8…2d60e               Head {h00=0x0032, h01=0x0050, text=» LDKL A1,LINTAB TABLE WITH LINE BLOCK ADDRESS «, t00=0x01d0, t01=0x0182}
0x2d60e…2d622               Head {h00=0x0010, h01=0x0050, text=»GTLB00 EQU *«, t00=0x01d1, t01=0x0028}
0x2d622…2d64a               Head {h00=0x0024, h01=0x0050, text=» LDR* A12,A1 LINE BLOCK ADDRESS «, t00=0x01d1, t01=0x003c}
0x2d64a…2d674               Head {h00=0x0026, h01=0x0050, text=» LD A2,FILCOD,A12 CHECK FILE CODE «, t00=0x01d1, t01=0x0064}
0x2d674…2d68e               Head {h00=0x0016, h01=0x0050, text=» CC A2,ECBFC,A8 . «, t00=0x01d1, t01=0x008e}
0x2d68e…2d6b0               Head {h00=0x001e, h01=0x0050, text=» RF(E) GTLB10 CORRECT ONE «, t00=0x01d1, t01=0x00a8}
0x2d6b0…2d6c2               Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x01d1, t01=0x00ca}
0x2d6c2…2d6e8               Head {h00=0x0022, h01=0x0050, text=» RB GTLB00 TRY NEXT LINE BLOCK«, t00=0x01d1, t01=0x00dc}
0x2d6e8…2d6f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d1, t01=0x0102}
0x2d6f2…2d706               Head {h00=0x0010, h01=0x0050, text=»GTLB10 EQU *«, t00=0x01d1, t01=0x010c}
0x2d706…2d72c               Head {h00=0x0022, h01=0x0050, text=» LDR* A1,A14 RESTORE REGISTER «, t00=0x01d1, t01=0x0120}
0x2d72c…2d738               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01d1, t01=0x0146}
0x2d738…2d750               Head {h00=0x0014, h01=0x0050, text=» RTN A14 RETURN «, t00=0x01d1, t01=0x0152}
0x2d750…2d75e               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01d1, t01=0x016a}
0x2d75e…2d768               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d1, t01=0x0178}
0x2d768…2d772               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d1, t01=0x0182}
0x2d772…2d79a               Head {h00=0x0024, h01=0x0050, text=»* ROUTINE TO GET LC-ADM ADDRESS «, t00=0x01d1, t01=0x018c}
0x2d79a…2d7a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d2, t01=0x0024}
0x2d7a4…2d7d8               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01d2, t01=0x002e}
0x2d7d8…2d7e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d2, t01=0x0062}
0x2d7e2…2d7fe               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01d2, t01=0x006c}
0x2d7fe…2d826               Head {h00=0x0024, h01=0x0050, text=»*  A4  = LOGICAL CHANNEL NUMBER «, t00=0x01d2, t01=0x0088}
0x2d826…2d84a               Head {h00=0x0020, h01=0x0050, text=»*  A12 = LINE BLOCK ADDRESS «, t00=0x01d2, t01=0x00b0}
0x2d84a…2d876               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01d2, t01=0x00d4}
0x2d876…2d880               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d2, t01=0x0100}
0x2d880…2d89c               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01d2, t01=0x010a}
0x2d89c…2d8b8               Head {h00=0x0018, h01=0x0050, text=»*  CF    A14,GTLCAD «, t00=0x01d2, t01=0x0126}
0x2d8b8…2d8c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d2, t01=0x0142}
0x2d8c2…2d8de               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01d2, t01=0x014c}
0x2d8de…2d8fe               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x01d2, t01=0x0168}
0x2d8fe…2d908               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d2, t01=0x0188}
0x2d908…2d91c (467, 0, 400) Head {h00=0x0010, h01=0x0050, text=»GTLCAD EQU *«, t00=0x01d3, t01=0x0004}
0x2d91c…2d944               Head {h00=0x0024, h01=0x0050, text=» LDR A13,A4 PREPARE FOR INDEXING«, t00=0x01d3, t01=0x0018}
0x2d944…2d95a               Head {h00=0x0012, h01=0x0050, text=» ADR A13,A13 .«, t00=0x01d3, t01=0x0040}
0x2d95a…2d984               Head {h00=0x0026, h01=0x0050, text=» AD A13,LC:TAB,A12 LC-ADM ADDRESS «, t00=0x01d3, t01=0x0056}
0x2d984…2d9ac               Head {h00=0x0024, h01=0x0050, text=» LDR* A13,A13 GET LC-ADM ADDRESS«, t00=0x01d3, t01=0x0080}
0x2d9ac…2d9bc               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01d3, t01=0x00a8}
0x2d9bc…2d9ca               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01d3, t01=0x00b8}
0x2d9ca…2d9d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d3, t01=0x00c6}
0x2d9d4…2d9de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d3, t01=0x00d0}
0x2d9de…2da10               Head {h00=0x002e, h01=0x0050, text=»* MODULE TO ACTIVATE A CONFIRMATION TIMER «, t00=0x01d3, t01=0x00da}
0x2da10…2da1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d3, t01=0x010c}
0x2da1a…2da4e               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01d3, t01=0x0116}
0x2da4e…2da58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d3, t01=0x014a}
0x2da58…2da72               Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMTERS:«, t00=0x01d3, t01=0x0154}
0x2da72…2da92               Head {h00=0x001c, h01=0x0050, text=»*  A8  = TIME-OUT VALUE «, t00=0x01d3, t01=0x016e}
0x2da92…2dab2               Head {h00=0x001c, h01=0x0050, text=»*  A13 = LC-ADM ADDRESS «, t00=0x01d3, t01=0x018e}
0x2dab2…2dade               Head {h00=0x0028, h01=0x0050, text=»*  A14 = CALL FUNCTION STACK POINTER«, t00=0x01d4, t01=0x001e}
0x2dade…2dae8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d4, t01=0x004a}
0x2dae8…2db04               Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01d4, t01=0x0054}
0x2db04…2db1e               Head {h00=0x0016, h01=0x0050, text=»*  CF    A14,STTIM«, t00=0x01d4, t01=0x0070}
0x2db1e…2db28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d4, t01=0x008a}
0x2db28…2db44               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01d4, t01=0x0094}
0x2db44…2db70               Head {h00=0x0028, h01=0x0050, text=»*                 A1 AND A4 CHANGED «, t00=0x01d4, t01=0x00b0}
0x2db70…2db7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d4, t01=0x00dc}
0x2db7a…2db8e               Head {h00=0x0010, h01=0x0050, text=»STTIM EQU * «, t00=0x01d4, t01=0x00e6}
0x2db8e…2dbb6               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,TIMOUT ACTIVATION LABEL«, t00=0x01d4, t01=0x00fa}
0x2dbb6…2dbd8               Head {h00=0x001e, h01=0x0050, text=» CF A14,STRTIM START TIMER«, t00=0x01d4, t01=0x0122}
0x2dbd8…2dc04               Head {h00=0x0028, h01=0x0050, text=» ST A4,TIMADR,A13 SAVE TIMER ADDRESS«, t00=0x01d4, t01=0x0144}
0x2dc04…2dc32               Head {h00=0x002a, h01=0x0050, text=» LDK A1,CONTIM SET TIMER STARTED FLAG «, t00=0x01d4, t01=0x0170}
0x2dc32…2dc4e               Head {h00=0x0018, h01=0x0050, text=» ORS A1,FLAGS,A13 . «, t00=0x01d5, t01=0x000e}
0x2dc4e…2dc5e               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01d5, t01=0x002a}
0x2dc5e…2dc6c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01d5, t01=0x003a}
0x2dc6c…2dc76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x0048}
0x2dc76…2dc80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x0052}
0x2dc80…2dc8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x005c}
0x2dc8a…2dca6               Head {h00=0x0018, h01=0x0050, text=»* GET BUFFER ROUTINE«, t00=0x01d5, t01=0x0066}
0x2dca6…2dcb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x0082}
0x2dcb0…2dcec               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x01d5, t01=0x008c}
0x2dcec…2dcf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x00c8}
0x2dcf6…2dd12               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01d5, t01=0x00d2}
0x2dd12…2dd34               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x01d5, t01=0x00ee}
0x2dd34…2dd3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x0110}
0x2dd3e…2dd5a               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01d5, t01=0x011a}
0x2dd5a…2dd7a               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x01d5, t01=0x0136}
0x2dd7a…2dda4               Head {h00=0x0026, h01=0x0050, text=»*  NO OTHER REGISTERS ARE CHANGED «, t00=0x01d5, t01=0x0156}
0x2dda4…2ddae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x0180}
0x2ddae…2ddc2               Head {h00=0x0010, h01=0x0050, text=»GTBUF EQU * «, t00=0x01d5, t01=0x018a}
0x2ddc2…2ddde               Head {h00=0x0018, h01=0x0050, text=» STR A1,A14 SAVE A1 «, t00=0x01d6, t01=0x000e}
0x2ddde…2de08               Head {h00=0x0026, h01=0x0050, text=» LD A2,BUFANC BUFFER CHAIN ANCHOR «, t00=0x01d6, t01=0x002a}
0x2de08…2de32               Head {h00=0x0026, h01=0x0050, text=» RF(Z) GTBU10 NO BUFFER AVAILABLE «, t00=0x01d6, t01=0x0054}
0x2de32…2de5c               Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A2 GET BUFFER FROM CHAIN «, t00=0x01d6, t01=0x007e}
0x2de5c…2de74               Head {h00=0x0014, h01=0x0050, text=» ST A1,BUFANC . «, t00=0x01d6, t01=0x00a8}
0x2de74…2de96               Head {h00=0x001e, h01=0x0050, text=» ADK A2,2 START OF BUFFER «, t00=0x01d6, t01=0x00c0}
0x2de96…2deb4               Head {h00=0x001a, h01=0x0050, text=» LDR* A1,A14 RELOAD A1«, t00=0x01d6, t01=0x00e2}
0x2deb4…2dec4               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01d6, t01=0x0100}
0x2dec4…2ded8               Head {h00=0x0010, h01=0x0050, text=»GTBU10 EQU *«, t00=0x01d6, t01=0x0110}
0x2ded8…2deec               Head {h00=0x0010, h01=0x0050, text=» HLT  ERROR «, t00=0x01d6, t01=0x0124}
0x2deec…2def6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d6, t01=0x0138}
0x2def6…2df04               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01d6, t01=0x0142}
0x2df04…2df0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d6, t01=0x0150}
0x2df0e…2df18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d6, t01=0x015a}
0x2df18…2df38               Head {h00=0x001c, h01=0x0050, text=»* RELEASE BUFFER ROUTINE«, t00=0x01d6, t01=0x0164}
0x2df38…2df42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d6, t01=0x0184}
0x2df42…2df80               Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x01d6, t01=0x018e}
0x2df80…2df8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d7, t01=0x003c}
0x2df8a…2dfa6               Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01d7, t01=0x0046}
0x2dfa6…2dfc6               Head {h00=0x001c, h01=0x0050, text=»*  A2  = BUFFER ADDRESS «, t00=0x01d7, t01=0x0062}
0x2dfc6…2dfe8               Head {h00=0x001e, h01=0x0050, text=»*  A14 = CF STACK POINTER «, t00=0x01d7, t01=0x0082}
0x2dfe8…2dff2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d7, t01=0x00a4}
0x2dff2…2e00e               Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01d7, t01=0x00ae}
0x2e00e…2e01e               Head {h00=0x000c, h01=0x0050, text=»*  NONE «, t00=0x01d7, t01=0x00ca}
0x2e01e…2e028               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d7, t01=0x00da}
0x2e028…2e03c               Head {h00=0x0010, h01=0x0050, text=»RLBUF EQU * «, t00=0x01d7, t01=0x00e4}
0x2e03c…2e058               Head {h00=0x0018, h01=0x0050, text=» STR A1,A14 SAVE A1 «, t00=0x01d7, t01=0x00f8}
0x2e058…2e080               Head {h00=0x0024, h01=0x0050, text=» LD A1,BUFANC BUFFER POOL ANCHOR«, t00=0x01d7, t01=0x0114}
0x2e080…2e092               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x01d7, t01=0x013c}
0x2e092…2e0b2               Head {h00=0x001c, h01=0x0050, text=» STR A1,A2 PUT BUFFER.. «, t00=0x01d7, t01=0x014e}
0x2e0b2…2e0d6               Head {h00=0x0020, h01=0x0050, text=» ST A2,BUFANC FIRST IN QUEUE«, t00=0x01d7, t01=0x016e}
0x2e0d6…2e0f4 (472, 2, 76)  Head {h00=0x001a, h01=0x0050, text=» LDR* A1,A14 RELOAD A1«, t00=0x01d8, t01=0x0004}
0x2e0f4…2e104               Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01d8, t01=0x0022}
0x2e104…2e10e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d8, t01=0x0032}
0x2e10e…2e11a               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x01d8, t01=0x003c}
0x2e11a…2e11e               Head {h00=0x4004, h01=0x0000}
0x2e11e…2e122               01 d8 00 48                                                                                                                                                                                                                                       ┆   H┆
0x2e122…2e12a (473, 1, 8)   20 04 00 00 01 d9 00 04                                                                                                                                                                                                                           ┆        ┆
0x2e12a…2e17a (474, 0, 400) 00 10 00 50 20 50 45 52 46 20 44 45 56 49 44 58 00 02 00 04 00 14 00 50 20 4d 4f 56 45 20 57 42 32 2c 43 57 52 4f 57 20 00 02 00 18 00 14 00 50 20 4d 4f 56 45 20 43 43 52 4f 57 2c 57 42 32 20 00 02 00 30 00 22 00 50 20 43 42 45 20 43 43 50   ┆   P PERF DEVIDX       P MOVE WB2,CWROW        P MOVE CCROW,WB2    0 " P CBE CCP┆
0x2e17a…2e1ca               44 45 56 2c 3d 43 27 47 54 50 27 2c 50 52 54 31 30 20 47 54 50 20 00 02 00 48 00 04 00 50 00 02 00 6e 00 1e 00 50 20 45 44 57 52 54 20 4c 50 2c 46 44 45 56 54 42 28 49 4e 44 45 58 29 20 4c 50 00 02 00 76 00 0c 00 50 20 42 20 50 52 54 32 30   ┆DEV,=C'GTP',PRT10 GTP    H   P   n   P EDWRT LP,FDEVTB(INDEX) LP   v   P B PRT20┆
0x2e1ca…2e21a               00 02 00 98 00 04 00 50 00 02 00 a8 00 0a 00 50 50 52 54 31 30 20 00 02 00 b0 00 24 00 50 20 45 44 57 52 54 20 53 50 44 53 50 52 54 2c 46 44 45 56 54 42 28 49 4e 44 45 58 29 20 47 54 50 00 02 00 be 00 0a 00 50 50 52 54 32 30 20 00 02 00 e6   ┆       P       PPRT10      $ P EDWRT SPDSPRT,FDEVTB(INDEX) GTP       PPRT20     ┆
0x2e21a…2e26a               00 08 00 50 20 52 45 54 00 02 00 f4 00 0a 00 50 20 50 45 4e 44 20 00 02 01 00 00 0a 00 50 20 45 4a 45 43 54 00 02 01 0e 00 34 00 50 46 44 45 56 54 42 20 46 54 41 42 4c 45 20 46 52 4d 54 33 2c 46 52 4d 54 36 2c 46 52 4d 54 37 2c 46 52 4d 54   ┆   P RET       P PEND        P EJECT     4 PFDEVTB FTABLE FRMT3,FRMT6,FRMT7,FRMT┆
0x2e26a…2e2ba               38 2c 46 52 4d 54 37 2c 5c 5c 43 20 00 02 01 1c 00 2e 00 50 5c 5c 46 52 4d 54 38 2c 46 52 4d 54 37 2c 46 52 4d 54 35 2c 46 52 4d 54 38 2c 46 52 4d 54 35 2c 46 52 4d 54 38 2c 5c 5c 43 20 00 02 01 54 00 28 00 50 5c 5c 46 52 4d 54 35 2c 46 52   ┆8,FRMT7,  C      . P  FRMT8,FRMT7,FRMT5,FRMT8,FRMT5,FRMT8,  C    T ( P  FRMT5,FR┆
0x2e2ba…2e30a (475, 0, 400) 4d 54 39 2c 46 52 4d 54 39 2c 46 52 4d 54 38 2c 46 52 4d 54 38 2c 5c 5c 43 20 00 02 01 86 00 28 00 50 5c 5c 46 52 4d 54 34 2c 46 52 4d 54 33 2c 46 52 4d 54 31 2c 46 52 4d 54 31 2c 46 52 4d 54 31 2c 5c 5c 43 20 00 03 00 22 00 28 00 50 5c 5c   ┆MT9,FRMT9,FRMT8,FRMT8,  C      ( P  FRMT4,FRMT3,FRMT1,FRMT1,FRMT1,  C    " ( P  ┆
0x2e30a…2e35a               46 52 4d 54 33 2c 46 52 4d 54 38 2c 46 52 4d 54 31 2c 46 52 4d 54 34 2c 46 52 4d 54 32 2c 5c 5c 43 20 00 03 00 4e 00 28 00 50 5c 5c 46 52 4d 54 33 2c 46 52 4d 54 34 2c 46 52 4d 54 31 2c 46 52 4d 54 31 2c 46 52 4d 54 33 2c 5c 5c 43 20 00 03   ┆FRMT3,FRMT8,FRMT1,FRMT4,FRMT2,  C    N ( P  FRMT3,FRMT4,FRMT1,FRMT1,FRMT3,  C   ┆
0x2e35a…2e3aa               00 7a 00 24 00 50 5c 5c 46 52 4d 54 34 2c 46 52 4d 54 33 2c 46 52 4d 54 31 2c 46 52 4d 54 33 2c 46 52 4d 54 31 20 00 03 00 a6 00 0a 00 50 20 45 4a 45 43 54 00 03 00 ce 00 0e 00 50 46 52 4d 54 31 20 46 52 4d 54 00 03 00 dc 00 0e 00 50 20 46   ┆ z $ P  FRMT4,FRMT3,FRMT1,FRMT3,FRMT1        P EJECT       PFRMT1 FRMT       P F┆
0x2e3aa…2e3fa               4c 49 4e 4b 20 46 31 20 00 03 00 ee 00 16 00 50 20 46 42 54 20 43 42 50 52 54 2c 46 52 4d 31 31 30 20 00 03 01 00 00 0a 00 50 20 46 4e 4c 20 38 00 03 01 1a 00 12 00 50 20 46 4c 49 4e 4b 20 46 53 45 4c 43 54 20 00 03 01 28 00 0e 00 50 20 46   ┆LINK F1        P FBT CBPRT,FRM110        P FNL 8       P FLINK FSELCT    (   P F┆
0x2e3fa…2e44a               42 20 46 52 4d 31 32 30 00 03 01 3e 00 0a 00 50 46 52 4d 31 31 30 00 03 01 50 00 10 00 50 20 46 4c 49 4e 4b 20 46 46 4e 4c 34 00 03 01 5e 00 0a 00 50 46 52 4d 31 32 30 00 03 01 72 00 0a 00 50 20 46 4d 45 4e 44 00 03 01 80 00 0a 00 50 20 45   ┆B FRM120   >   PFRM110   P   P FLINK FFNL4   ^   PFRM120   r   P FMEND       P E┆
0x2e44a…2e49a (476, 0, 400) 4a 45 43 54 00 03 01 8e 00 0e 00 50 46 52 4d 54 32 20 46 52 4d 54 00 04 00 0c 00 0e 00 50 20 46 4c 49 4e 4b 20 46 31 20 00 04 00 1e 00 10 00 50 20 46 4c 49 4e 4b 20 46 42 55 46 20 00 04 00 30 00 0e 00 50 20 46 4c 49 4e 4b 20 46 43 57 00 04   ┆JECT       PFRMT2 FRMT       P FLINK F1        P FLINK FBUF    0   P FLINK FCW  ┆
0x2e49a…2e4ea               00 44 00 16 00 50 20 46 42 54 20 43 42 50 52 54 2c 46 52 4d 32 31 30 20 00 04 00 56 00 0a 00 50 20 46 4e 4c 20 36 00 04 00 70 00 12 00 50 20 46 4c 49 4e 4b 20 46 53 45 4c 43 54 20 00 04 00 7e 00 0e 00 50 20 46 42 20 46 52 4d 32 32 30 00 04   ┆ D   P FBT CBPRT,FRM210    V   P FNL 6   p   P FLINK FSELCT    ~   P FB FRM220  ┆
0x2e4ea…2e53a               00 94 00 0a 00 50 46 52 4d 32 31 30 00 04 00 a6 00 10 00 50 20 46 4c 49 4e 4b 20 46 46 4e 4c 34 00 04 00 b4 00 0a 00 50 46 52 4d 32 32 30 00 04 00 c8 00 0a 00 50 20 46 4d 45 4e 44 00 04 00 d6 00 0a 00 50 20 45 4a 45 43 54 00 04 00 e4 00 0e   ┆     PFRM210       P FLINK FFNL4       PFRM220       P FMEND       P EJECT      ┆
0x2e53a…2e58a               00 50 46 52 4d 54 33 20 46 52 4d 54 00 04 00 f2 00 0e 00 50 20 46 4c 49 4e 4b 20 46 31 20 00 04 01 04 00 0e 00 50 20 46 4c 49 4e 4b 20 46 43 57 00 04 01 16 00 16 00 50 20 46 42 54 20 43 42 50 52 54 2c 46 52 4d 33 31 30 20 00 04 01 28 00 0a   ┆ PFRMT3 FRMT       P FLINK F1        P FLINK FCW       P FBT CBPRT,FRM310    (  ┆
0x2e58a…2e5da               00 50 20 46 4e 4c 20 37 00 04 01 42 00 12 00 50 20 46 4c 49 4e 4b 20 46 53 45 4c 43 54 20 00 04 01 50 00 0e 00 50 20 46 42 20 46 52 4d 33 32 30 00 04 01 66 00 0a 00 50 46 52 4d 33 31 30 00 04 01 78 00 10 00 50 20 46 4c 49 4e 4b 20 46 46 4e   ┆ P FNL 7   B   P FLINK FSELCT    P   P FB FRM320   f   PFRM310   x   P FLINK FFN┆

Reduced view