|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 188708 (0x2e124)
Notes: pts_type(SC)
Names: »X25:L3.SC«
└─⟦13e5fd45a⟧ Bits:30009699 Philips computer tape "600507"
└─⟦this⟧ »TOSSWORK/X25:L3.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 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
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…00074 Head {h00=0x001c, h01=0x0050, text=» =2, MISSING RET.CODE«, t00=0x0000, t01=0x0058}
0x00074…0007e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0078}
0x0007e…000b2 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0000, t01=0x0082}
0x000b2…000bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b6}
0x000bc…000e2 Head {h00=0x0022, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00c0}
0x000e2…000ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e6}
0x000ec…0011c Head {h00=0x002c, h01=0x0050, text=»* X25-L3: DRIVER FOR DATA COMMUNICATION «, t00=0x0000, t01=0x00f0}
0x0011c…00142 Head {h00=0x0022, h01=0x0050, text=»* SERVING THE PACKET LEVEL AS«, t00=0x0000, t01=0x0120}
0x00142…00164 Head {h00=0x001e, h01=0x0050, text=»* DEFINED IN X25 LEVEL 3.«, t00=0x0000, t01=0x0146}
0x00164…0016e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0168}
0x0016e…00178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0172}
0x00178…001ac Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0000, t01=0x017c}
0x001ac…001b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0020}
0x001b6…001c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x002a}
0x001c0…001ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0034}
0x001ca…001d8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x003e}
0x001d8…001e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x004c}
0x001e2…00226 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0001, t01=0x0056}
0x00226…00230 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x009a}
0x00230…0023a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a4}
0x0023a…0024c Head {h00=0x000e, h01=0x0050, text=»* ORDERS :«, t00=0x0001, t01=0x00ae}
0x0024c…00256 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c0}
0x00256…00270 Head {h00=0x0016, h01=0x0050, text=»* /00 READ STATUS«, t00=0x0001, t01=0x00ca}
0x00270…0027a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e4}
0x0027a…0028e Head {h00=0x0010, h01=0x0050, text=»* /02 READ «, t00=0x0001, t01=0x00ee}
0x0028e…00298 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0102}
0x00298…002ac Head {h00=0x0010, h01=0x0050, text=»* /06 WRITE«, t00=0x0001, t01=0x010c}
0x002ac…002b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0120}
0x002b6…002ca Head {h00=0x0010, h01=0x0050, text=»* /21 OPEN «, t00=0x0001, t01=0x012a}
0x002ca…002d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x013e}
0x002d4…002e8 Head {h00=0x0010, h01=0x0050, text=»* /22 CLOSE«, t00=0x0001, t01=0x0148}
0x002e8…002f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x015c}
0x002f2…00310 Head {h00=0x001a, h01=0x0050, text=»* /24 CONNECT ACTIVE «, t00=0x0001, t01=0x0166}
0x00310…0031a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0184}
0x0031a…00338 Head {h00=0x001a, h01=0x0050, text=»* /27 CONNECT PASSIVE«, t00=0x0001, t01=0x018e}
0x00338…00342 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001c}
0x00342…0035c Head {h00=0x0016, h01=0x0050, text=»* /2F DISCONNECT «, t00=0x0002, t01=0x0026}
0x0035c…00366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0040}
0x00366…00384 Head {h00=0x001a, h01=0x0050, text=»* /2D GET STATISTICS «, t00=0x0002, t01=0x004a}
0x00384…0038e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0068}
0x0038e…003a8 Head {h00=0x0016, h01=0x0050, text=»* /38 SET STATUS «, t00=0x0002, t01=0x0072}
0x003a8…003b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x008c}
0x003b2…003ca Head {h00=0x0014, h01=0x0050, text=»* /39 SET TIMER«, t00=0x0002, t01=0x0096}
0x003ca…003d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ae}
0x003d4…003de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b8}
0x003de…00422 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0002, t01=0x00c2}
0x00422…0042c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0106}
0x0042c…0043a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0110}
0x0043a…00444 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x011e}
0x00444…00478 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0002, t01=0x0128}
0x00478…00482 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x015c}
0x00482…0049a Head {h00=0x0014, h01=0x0050, text=»* E N T R I E S «, t00=0x0002, t01=0x0166}
0x0049a…004a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x017e}
0x004a4…004d8 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0002, t01=0x0188}
0x004d8…004e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002c}
0x004e2…0050e Head {h00=0x0028, h01=0x0050, text=» ENTRY REQTIM REQUEST TIME OUT VALUE«, t00=0x0003, t01=0x0036}
0x0050e…00534 Head {h00=0x0022, h01=0x0050, text=» ENTRY X25:ON POWER ON ROUTINE«, t00=0x0003, t01=0x0062}
0x00534…00554 Head {h00=0x001c, h01=0x0050, text=» ENTRY DRX25 ACTIVATION «, t00=0x0003, t01=0x0088}
0x00554…0055e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00a8}
0x0055e…0056c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x00b2}
0x0056c…00576 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00c0}
0x00576…005aa Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0003, t01=0x00ca}
0x005aa…005b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00fe}
0x005b4…005d0 Head {h00=0x0018, h01=0x0050, text=»* E X T E R N A L S «, t00=0x0003, t01=0x0108}
0x005d0…005da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0124}
0x005da…0060e Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0003, t01=0x012e}
0x0060e…00618 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0162}
0x00618…00636 Head {h00=0x001a, h01=0x0050, text=»* ECB - DISPLACEMENTS «, t00=0x0003, t01=0x016c}
0x00636…00640 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x018a}
0x00640…0065e (4, 0, 400) Head {h00=0x001a, h01=0x0050, text=» EXTRN ECBFC FILE CODE«, t00=0x0004, t01=0x0004}
0x0065e…00682 Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBBA BUFFER ADDRESS «, t00=0x0004, t01=0x0022}
0x00682…006a8 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBRL REQUESTED LENGTH «, t00=0x0004, t01=0x0046}
0x006a8…006ce Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBEL EFFECTIVE LENGTH «, t00=0x0004, t01=0x006c}
0x006ce…006ee Head {h00=0x001c, h01=0x0050, text=» EXTRN ECBRC RETURN CODE«, t00=0x0004, t01=0x0092}
0x006ee…00704 Head {h00=0x0012, h01=0x0050, text=» EXTRN ECBCW1 «, t00=0x0004, t01=0x00b2}
0x00704…0071a Head {h00=0x0012, h01=0x0050, text=» EXTRN ECBCW2 «, t00=0x0004, t01=0x00c8}
0x0071a…00724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00de}
0x00724…0074e Head {h00=0x0026, h01=0x0050, text=»* DWT - DISPLACEMENTS: FIXED PART «, t00=0x0004, t01=0x00e8}
0x0074e…00758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0112}
0x00758…00780 Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTCHP CHANNEL PARAMETERS«, t00=0x0004, t01=0x011c}
0x00780…0079c Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0004, t01=0x0144}
0x0079c…007be Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB-ADDRESS «, t00=0x0004, t01=0x0160}
0x007be…007da Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTOPT OPTION«, t00=0x0004, t01=0x0182}
0x007da…007f4 Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0005, t01=0x000e}
0x007f4…00816 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTAB TTAB-ADDRESS«, t00=0x0005, t01=0x0028}
0x00816…00820 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x004a}
0x00820…0082e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0054}
0x0082e…00838 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0062}
0x00838…00852 Head {h00=0x0016, h01=0x0050, text=»* MONITOR ROUTINES«, t00=0x0005, t01=0x006c}
0x00852…0085c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0086}
0x0085c…00884 Head {h00=0x0024, h01=0x0050, text=» EXTRN FNDTID FIND TTAB-ADDRESS «, t00=0x0005, t01=0x0090}
0x00884…008a8 Head {h00=0x0020, h01=0x0050, text=» EXTRN SETIME TIMER ROUTINE «, t00=0x0005, t01=0x00b8}
0x008a8…008d4 Head {h00=0x0028, h01=0x0050, text=» EXTRN ACTOT TASK ACTIVATION ROUTINE«, t00=0x0005, t01=0x00dc}
0x008d4…008f8 Head {h00=0x0020, h01=0x0050, text=» EXTRN TDISP TOSS DISPATCHER«, t00=0x0005, t01=0x0108}
0x008f8…0092a Head {h00=0x002e, h01=0x0050, text=» EXTRN MOVSU MOVE DATA FROM SYSTEM TO USER«, t00=0x0005, t01=0x012c}
0x0092a…0095c Head {h00=0x002e, h01=0x0050, text=» EXTRN MOVUS MOVE DATA FROM USER TO SYSTEM«, t00=0x0005, t01=0x015e}
0x0095c…00986 Head {h00=0x0026, h01=0x0050, text=» EXTRN TENDIO TOSS END I/O ROUTINE«, t00=0x0005, t01=0x0190}
0x00986…009b0 Head {h00=0x0026, h01=0x0050, text=» EXTRN GETBLK GET A MONITOR BLOCK «, t00=0x0006, t01=0x002a}
0x009b0…009de Head {h00=0x002a, h01=0x0050, text=» EXTRN FREBLK RELEASE A MONITOR BLOCK «, t00=0x0006, t01=0x0054}
0x009de…00a02 Head {h00=0x0020, h01=0x0050, text=» EXTRN FNDDNT FIND LOCAL DTE«, t00=0x0006, t01=0x0082}
0x00a02…00a30 Head {h00=0x002a, h01=0x0050, text=» EXTRN GETDST GET SYMBOLIC DTE ADDRESS«, t00=0x0006, t01=0x00a6}
0x00a30…00a5e Head {h00=0x002a, h01=0x0050, text=» EXTRN GETDNA GET DTE NETWORK ADDRESS «, t00=0x0006, t01=0x00d4}
0x00a5e…00a98 Head {h00=0x0036, h01=0x0050, text=» EXTRN GETDNT GET DTE NETWORK ADDR.FOR A SPEC.TYPE«, t00=0x0006, t01=0x0102}
0x00a98…00ac8 Head {h00=0x002c, h01=0x0050, text=» EXTRN SCTDCT POINTER TO DC ADDR. TABLE «, t00=0x0006, t01=0x013c}
0x00ac8…00aea Head {h00=0x001e, h01=0x0050, text=» EXTRN TRAC TRACE ROUTINE «, t00=0x0006, t01=0x016c}
0x00aea…00b18 Head {h00=0x002a, h01=0x0050, text=» EXTRN TRTASK TTAB ADDRESS FOR #T-TASK«, t00=0x0006, t01=0x018e}
0x00b18…00b22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x002c}
0x00b22…00b3e Head {h00=0x0018, h01=0x0050, text=»* TTAB DISPLACEMENTS«, t00=0x0007, t01=0x0036}
0x00b3e…00b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0052}
0x00b48…00b68 Head {h00=0x001c, h01=0x0050, text=» EXTRN TTB:ST«, t00=0x0007, t01=0x005c}
0x00b68…00b82 Head {h00=0x0016, h01=0x0050, text=» EXTRN TTB:PW PSW «, t00=0x0007, t01=0x007c}
0x00b82…00bc0 Head {h00=0x003a, h01=0x0050, text=» EXTRN TTB:SA REGISTER SAVE AREA «, t00=0x0007, t01=0x0096}
0x00bc0…00bca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00d4}
0x00bca…00bd8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00de}
0x00bd8…00c2c Head {h00=0x0050, h01=0x0050, text=»****************************************************************************«, t00=0x0007, t01=0x00ec}
0x00c2c…00c36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0140}
0x00c36…00c6e Head {h00=0x0034, h01=0x0050, text=»* A PROGRAM VERSION USING MMU PAGING IS OBTAINED«, t00=0x0007, t01=0x014a}
0x00c6e…00c8e Head {h00=0x001c, h01=0x0050, text=»* BY SETTING MMUPAG TO 1«, t00=0x0007, t01=0x0182}
0x00c8e…00c98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0012}
0x00c98…00cac Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0008, t01=0x001c}
0x00cac…00cb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0030}
0x00cb6…00d0a Head {h00=0x0050, h01=0x0050, text=»****************************************************************************«, t00=0x0008, t01=0x003a}
0x00d0a…00d14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x008e}
0x00d14…00d4e Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0008, t01=0x0098}
0x00d4e…00d7e Head {h00=0x002c, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 TO 0«, t00=0x0008, t01=0x00d2}
0x00d7e…00d88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0102}
0x00d88…00d9c Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0008, t01=0x010c}
0x00d9c…00da6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0120}
0x00da6…00dfa Head {h00=0x0050, h01=0x0050, text=»*************************************************************************** «, t00=0x0008, t01=0x012a}
0x00dfa…00e04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x017e}
0x00e04…00e12 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x0188}
0x00e12…00e1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0008}
0x00e1c…00e2e Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x0009, t01=0x0012}
0x00e2e…00e5e Head {h00=0x002c, h01=0x0050, text=»SYNRLN EQU X:A NUMBER OF PHYSICAL LINES «, t00=0x0009, t01=0x0024}
0x00e5e…00e68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0054}
0x00e68…00e7c Head {h00=0x0010, h01=0x0050, text=»X:B EQU 600 «, t00=0x0009, t01=0x005e}
0x00e7c…00eb4 Head {h00=0x0034, h01=0x0050, text=»REQTIM EQU X:B REQUEST TIME OUT VALUE(IN 100MS) «, t00=0x0009, t01=0x0072}
0x00eb4…00ebe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00aa}
0x00ebe…00ed2 Head {h00=0x0010, h01=0x0050, text=»X:C EQU 128 «, t00=0x0009, t01=0x00b4}
0x00ed2…00f0a Head {h00=0x0034, h01=0x0050, text=»SYMXDL EQU X:C OVER ALL MAXIMUM USER DATA LENGTH«, t00=0x0009, t01=0x00c8}
0x00f0a…00f14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0100}
0x00f14…00f26 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 3 «, t00=0x0009, t01=0x010a}
0x00f26…00f5a Head {h00=0x0030, h01=0x0050, text=»SYNRL1 EQU X:D # OF LOGICAL CHANNELS LINE 1 «, t00=0x0009, t01=0x011c}
0x00f5a…00f64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0150}
0x00f64…00f76 Head {h00=0x000e, h01=0x0050, text=»X:H EQU 2 «, t00=0x0009, t01=0x015a}
0x00f76…00fac Head {h00=0x0032, h01=0x0050, text=»SYMXW1 EQU X:H WINDOW SIZE,PACKET LEVEL,LINE 1«, t00=0x0009, t01=0x016c}
0x00fac…00fb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0012}
0x00fb6…00fca Head {h00=0x0010, h01=0x0050, text=»X:L EQU 128 «, t00=0x000a, t01=0x001c}
0x00fca…01000 Head {h00=0x0032, h01=0x0050, text=»SYMDL1 EQU X:L MAXIMUM USER DATA LENGTH,LINE 1«, t00=0x000a, t01=0x0030}
0x01000…0100a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0066}
0x0100a…0101c Head {h00=0x000e, h01=0x0050, text=»X:P EQU 0 «, t00=0x000a, t01=0x0070}
0x0101c…01058 Head {h00=0x0038, h01=0x0050, text=»SYNRP1 EQU X:P # OF PERMANENT VIRTUAL CIRCUITS,LINE1«, t00=0x000a, t01=0x0082}
0x01058…01062 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00be}
0x01062…01074 Head {h00=0x000e, h01=0x0050, text=»X:T EQU 0 «, t00=0x000a, t01=0x00c8}
0x01074…010ae Head {h00=0x0036, h01=0x0050, text=»CALDTE EQU X:T LOCAL DTE-ADDRESS IN CALL PACKET ? «, t00=0x000a, t01=0x00da}
0x010ae…010b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0114}
0x010b8…010ca Head {h00=0x000e, h01=0x0050, text=»X:U EQU 0 «, t00=0x000a, t01=0x011e}
0x010ca…01104 Head {h00=0x0036, h01=0x0050, text=»STATI EQU X:U STATISTICS OF HDLC PROTOCOL HANDLER «, t00=0x000a, t01=0x0130}
0x01104…0110e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x016a}
0x0110e…0111c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0174}
0x0111c…01126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0182}
0x01126…0113c Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x000a, t01=0x018c}
0x0113c…01146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0012}
0x01146…01158 Head {h00=0x000e, h01=0x0050, text=»X:E EQU 3 «, t00=0x000b, t01=0x001c}
0x01158…0118c Head {h00=0x0030, h01=0x0050, text=»SYNRL2 EQU X:E # OF LOGICAL CHANNELS LINE 2 «, t00=0x000b, t01=0x002e}
0x0118c…01196 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0062}
0x01196…011a8 Head {h00=0x000e, h01=0x0050, text=»X:I EQU 2 «, t00=0x000b, t01=0x006c}
0x011a8…011de Head {h00=0x0032, h01=0x0050, text=»SYMXW2 EQU X:I WINDOW SIZE,PACKET LEVEL,LINE 2«, t00=0x000b, t01=0x007e}
0x011de…011e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b4}
0x011e8…011fc Head {h00=0x0010, h01=0x0050, text=»X:M EQU 128 «, t00=0x000b, t01=0x00be}
0x011fc…01232 Head {h00=0x0032, h01=0x0050, text=»SYMDL2 EQU X:M MAXIMUM USER DATA LENGTH,LINE 2«, t00=0x000b, t01=0x00d2}
0x01232…0123c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0108}
0x0123c…0124e Head {h00=0x000e, h01=0x0050, text=»X:Q EQU 0 «, t00=0x000b, t01=0x0112}
0x0124e…0128c Head {h00=0x003a, h01=0x0050, text=»SYNRP2 EQU X:Q # OF PERMANENT VIRTUAL CIRCUITS,LINE 2 «, t00=0x000b, t01=0x0124}
0x0128c…01296 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0162}
0x01296…012ac Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x000b, t01=0x016c}
0x012ac…012b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0182}
0x012b6…012c8 Head {h00=0x000e, h01=0x0050, text=»X:F EQU 3 «, t00=0x000b, t01=0x018c}
0x012c8…012fc Head {h00=0x0030, h01=0x0050, text=»SYNRL3 EQU X:F # OF LOGICAL CHANNELS,LINE 3 «, t00=0x000c, t01=0x000e}
0x012fc…01306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0042}
0x01306…01318 Head {h00=0x000e, h01=0x0050, text=»X:J EQU 2 «, t00=0x000c, t01=0x004c}
0x01318…0134e Head {h00=0x0032, h01=0x0050, text=»SYMXW3 EQU X:J WINDOW SIZE,PACKET LEVEL,LINE 3«, t00=0x000c, t01=0x005e}
0x0134e…01358 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0094}
0x01358…0136c Head {h00=0x0010, h01=0x0050, text=»X:N EQU 128 «, t00=0x000c, t01=0x009e}
0x0136c…013a2 Head {h00=0x0032, h01=0x0050, text=»SYMDL3 EQU X:N MAXIMUM USER DATA LENGTH,LINE 3«, t00=0x000c, t01=0x00b2}
0x013a2…013ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e8}
0x013ac…013be Head {h00=0x000e, h01=0x0050, text=»X:R EQU 0 «, t00=0x000c, t01=0x00f2}
0x013be…013fc Head {h00=0x003a, h01=0x0050, text=»SYNRP3 EQU X:R # OF PERMANENT VIRTUAL CIRCUITS,LINE 3 «, t00=0x000c, t01=0x0104}
0x013fc…01406 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0142}
0x01406…0141c Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=3 «, t00=0x000c, t01=0x014c}
0x0141c…01426 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0162}
0x01426…01438 Head {h00=0x000e, h01=0x0050, text=»X:G EQU 3 «, t00=0x000c, t01=0x016c}
0x01438…0146c Head {h00=0x0030, h01=0x0050, text=»SYNRL4 EQU X:G # OF LOGICAL CHANNELS,LINE 4 «, t00=0x000c, t01=0x017e}
0x0146c…01476 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0022}
0x01476…01488 Head {h00=0x000e, h01=0x0050, text=»X:K EQU 2 «, t00=0x000d, t01=0x002c}
0x01488…014be Head {h00=0x0032, h01=0x0050, text=»SYMXW4 EQU X:K WINDOW SIZE,PACKET LEVEL,LINE 4«, t00=0x000d, t01=0x003e}
0x014be…014c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0074}
0x014c8…014dc Head {h00=0x0010, h01=0x0050, text=»X:O EQU 128 «, t00=0x000d, t01=0x007e}
0x014dc…01512 Head {h00=0x0032, h01=0x0050, text=»SYMDL4 EQU X:O MAXIMUM USER DATA LENGTH,LINE 4«, t00=0x000d, t01=0x0092}
0x01512…0151c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c8}
0x0151c…0152e Head {h00=0x000e, h01=0x0050, text=»X:S EQU 0 «, t00=0x000d, t01=0x00d2}
0x0152e…0156c Head {h00=0x003a, h01=0x0050, text=»SYNRP4 EQU X:S # OF PERMANENT VIRTUAL CIRCUITS,LINE 4 «, t00=0x000d, t01=0x00e4}
0x0156c…01576 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0122}
0x01576…01582 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x012c}
0x01582…0158c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0138}
0x0158c…015bc Head {h00=0x002c, h01=0x0050, text=»SYNRRC EQU 2 # OF READ REQUESTS FOR HDLC«, t00=0x000d, t01=0x0142}
0x015bc…015c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0172}
0x015c6…015f8 Head {h00=0x002e, h01=0x0050, text=»SYNRTR EQU 2 # OF WRITE REQUESTS FOR HDLC «, t00=0x000d, t01=0x017c}
0x015f8…01602 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x001e}
0x01602…01632 Head {h00=0x002c, h01=0x0050, text=»SYUBNR EQU 2 # OF INPUT BUFFERS FOR HDLC«, t00=0x000e, t01=0x0028}
0x01632…0163c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0058}
0x0163c…01670 Head {h00=0x0030, h01=0x0050, text=»SYCLTM EQU 600 CLEAR TIME OUT VALUE IN 100MS«, t00=0x000e, t01=0x0062}
0x01670…0167a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0096}
0x0167a…016ae Head {h00=0x0030, h01=0x0050, text=»SYRETM EQU 600 RESET TIME OUT VALUE IN 100MS«, t00=0x000e, t01=0x00a0}
0x016ae…016b6 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x00d4}
0x016b6…016ec Head {h00=0x0032, h01=0x0050, text=»SYRSTM EQU 600 RESTART TIME OUT VALUE IN 100MS«, t00=0x000e, t01=0x00dc}
0x016ec…016f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0112}
0x016f6…0172e Head {h00=0x0034, h01=0x0050, text=»BUFDEL EQU 1 TIMER IN 100MS FOR WAIT FOR BUFFER «, t00=0x000e, t01=0x011c}
0x0172e…01738 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0154}
0x01738…0175e Head {h00=0x0022, h01=0x0050, text=»LOOP EQU 0 LOOP TEST IN MODEM «, t00=0x000e, t01=0x015e}
0x0175e…01768 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0184}
0x01768…01790 Head {h00=0x0024, h01=0x0050, text=»TRACE EQU 0 TRACE TASK IN SYSTEM«, t00=0x000e, t01=0x018e}
0x01790…017a6 Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x000f, t01=0x0026}
0x017a6…017b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x003c}
0x017b0…017be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0046}
0x017be…017c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0054}
0x017c8…017de Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=1 «, t00=0x000f, t01=0x005e}
0x017de…017f8 Head {h00=0x0016, h01=0x0050, text=»PERMVC EQU SYNRP1 «, t00=0x000f, t01=0x0074}
0x017f8…01818 Head {h00=0x001c, h01=0x0050, text=»SWITVC EQU SYNRL1-SYNRP1«, t00=0x000f, t01=0x008e}
0x01818…01824 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x00ae}
0x01824…0183a Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=2 «, t00=0x000f, t01=0x00ba}
0x0183a…0185a Head {h00=0x001c, h01=0x0050, text=»PERMVC EQU SYNRP1+SYNRP2«, t00=0x000f, t01=0x00d0}
0x0185a…0187a Head {h00=0x001c, h01=0x0050, text=»SWDUM1 EQU SYNRL1+SYNRL2«, t00=0x000f, t01=0x00f0}
0x0187a…0189a Head {h00=0x001c, h01=0x0050, text=»SWITVC EQU SWDUM1-PERMVC«, t00=0x000f, t01=0x0110}
0x0189a…018a6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0130}
0x018a6…018bc Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=3 «, t00=0x000f, t01=0x013c}
0x018bc…018dc Head {h00=0x001c, h01=0x0050, text=»PEDUM1 EQU SYNRP1+SYNRP2«, t00=0x000f, t01=0x0152}
0x018dc…018fc Head {h00=0x001c, h01=0x0050, text=»PERMVC EQU PEDUM1+SYNRP3«, t00=0x000f, t01=0x0172}
0x018fc…0191c (16, 0, 400) Head {h00=0x001c, h01=0x0050, text=»SWDUM1 EQU SYNRL1+SYNRL2«, t00=0x0010, t01=0x0004}
0x0191c…0193c Head {h00=0x001c, h01=0x0050, text=»SWDUM2 EQU SWDUM1+SYNRL3«, t00=0x0010, t01=0x0024}
0x0193c…0195c Head {h00=0x001c, h01=0x0050, text=»SWITVC EQU SWDUM2-PERMVC«, t00=0x0010, t01=0x0044}
0x0195c…01968 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0064}
0x01968…0197e Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=4 «, t00=0x0010, t01=0x0070}
0x0197e…0199e Head {h00=0x001c, h01=0x0050, text=»PEDUM1 EQU SYNRP1+SYNRP2«, t00=0x0010, t01=0x0086}
0x0199e…019be Head {h00=0x001c, h01=0x0050, text=»PEDUM2 EQU SYNRP3+SYNRP4«, t00=0x0010, t01=0x00a6}
0x019be…019de Head {h00=0x001c, h01=0x0050, text=»PERMVC EQU PEDUM1+PEDUM2«, t00=0x0010, t01=0x00c6}
0x019de…019fe Head {h00=0x001c, h01=0x0050, text=»SWDUM1 EQU SYNRL1+SYNRL2«, t00=0x0010, t01=0x00e6}
0x019fe…01a1e Head {h00=0x001c, h01=0x0050, text=»SWDUM2 EQU SYNRL3+SYNRL4«, t00=0x0010, t01=0x0106}
0x01a1e…01a3e Head {h00=0x001c, h01=0x0050, text=»SWDUM3 EQU SWDUM1+SWDUM2«, t00=0x0010, t01=0x0126}
0x01a3e…01a5e Head {h00=0x001c, h01=0x0050, text=»SWITVC EQU SWDUM3-PERMVC«, t00=0x0010, t01=0x0146}
0x01a5e…01a6a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0166}
0x01a6a…01a74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0172}
0x01a74…01aa6 Head {h00=0x002e, h01=0x0050, text=»* TRANSLATION TABLE FROM THROUGHPUT CLASS «, t00=0x0010, t01=0x017c}
0x01aa6…01ad0 Head {h00=0x0026, h01=0x0050, text=»* TO WINDOW SIZE AND PACKET LENGTH«, t00=0x0011, t01=0x001e}
0x01ad0…01ada Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0048}
0x01ada…01b1c Head {h00=0x003e, h01=0x0050, text=»CLAS1 BYTE 1,128 CLASS 1,LAYOUT: WINDOW SIZE/PACKET LENGTH«, t00=0x0011, t01=0x0052}
0x01b1c…01b38 Head {h00=0x0018, h01=0x0050, text=» BYTE 1,128 CLASS 2 «, t00=0x0011, t01=0x0094}
0x01b38…01b54 Head {h00=0x0018, h01=0x0050, text=» BYTE 1,128 CLASS 3 «, t00=0x0011, t01=0x00b0}
0x01b54…01b70 Head {h00=0x0018, h01=0x0050, text=» BYTE 1,128 CLASS 4 «, t00=0x0011, t01=0x00cc}
0x01b70…01b8c Head {h00=0x0018, h01=0x0050, text=» BYTE 1,128 CLASS 5 «, t00=0x0011, t01=0x00e8}
0x01b8c…01ba8 Head {h00=0x0018, h01=0x0050, text=» BYTE 1,128 CLASS 6 «, t00=0x0011, t01=0x0104}
0x01ba8…01bc4 Head {h00=0x0018, h01=0x0050, text=» BYTE 2,128 CLASS 7 «, t00=0x0011, t01=0x0120}
0x01bc4…01be0 Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 8 «, t00=0x0011, t01=0x013c}
0x01be0…01bfc Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 9 «, t00=0x0011, t01=0x0158}
0x01bfc…01c18 Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 10«, t00=0x0011, t01=0x0174}
0x01c18…01c34 Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 11«, t00=0x0011, t01=0x0190}
0x01c34…01c50 Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 12«, t00=0x0012, t01=0x001c}
0x01c50…01c6c Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 13«, t00=0x0012, t01=0x0038}
0x01c6c…01c88 Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 14«, t00=0x0012, t01=0x0054}
0x01c88…01ca4 Head {h00=0x0018, h01=0x0050, text=» BYTE 3,128 CLASS 15«, t00=0x0012, t01=0x0070}
0x01ca4…01cae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x008c}
0x01cae…01cc2 Head {h00=0x0010, h01=0x0050, text=» EJECT DWT «, t00=0x0012, t01=0x0096}
0x01cc2…01ccc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00aa}
0x01ccc…01ce8 Head {h00=0x0018, h01=0x0050, text=»* DWT DISPLACEMENTS «, t00=0x0012, t01=0x00b4}
0x01ce8…01cf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00d0}
0x01cf2…01d08 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0012, t01=0x00da}
0x01d08…01d26 Head {h00=0x001a, h01=0x0050, text=»DWTDRD EQU /10 DWTTQ+2«, t00=0x0012, t01=0x00f0}
0x01d26…01d32 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x010e}
0x01d32…01d48 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0012, t01=0x011a}
0x01d48…01d68 Head {h00=0x001c, h01=0x0050, text=»DWTDRD EQU /14 DWTMEC+2 «, t00=0x0012, t01=0x0130}
0x01d68…01d74 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0150}
0x01d74…01db6 Head {h00=0x003e, h01=0x0050, text=»DWTSTB EQU DWTDRD OFFSET REL START DWT TO STATISTIC BUFFER«, t00=0x0012, t01=0x015c}
0x01db6…01dec Head {h00=0x0032, h01=0x0050, text=»DWTCHD EQU DWTDRD+2 CONFIG CHAIN LINK HEAD DWT«, t00=0x0013, t01=0x000e}
0x01dec…01e22 Head {h00=0x0032, h01=0x0050, text=»DWTCHN EQU DWTDRD+4 CONFIG CHAIN LINK NEXT DWT«, t00=0x0013, t01=0x0044}
0x01e22…01e58 Head {h00=0x0032, h01=0x0050, text=»DWTLAD EQU DWTDRD+6 LOCAL SYMBOLIC DTE ADDRESS«, t00=0x0013, t01=0x007a}
0x01e58…01e90 Head {h00=0x0034, h01=0x0050, text=»DWTRAD EQU DWTDRD+8 REMOTE SYMBOLIC DTE ADDRESS «, t00=0x0013, t01=0x00b0}
0x01e90…01eba Head {h00=0x0026, h01=0x0050, text=»DWTWRO EQU DWTDRD+10 WRITE OPTION «, t00=0x0013, t01=0x00e8}
0x01eba…01eee Head {h00=0x0030, h01=0x0050, text=»DWTLCN EQU DWTDRD+11 LOGICAL CHANNEL NUMBER «, t00=0x0013, t01=0x0112}
0x01eee…01f18 Head {h00=0x0026, h01=0x0050, text=»DWTFNC EQU DWTDRD+12 FUNCTION CODE«, t00=0x0013, t01=0x0146}
0x01f18…01f3e Head {h00=0x0022, h01=0x0050, text=»DWTSTE EQU DWTDRD+13 DWT STATE«, t00=0x0013, t01=0x0170}
0x01f3e…01f6e Head {h00=0x002c, h01=0x0050, text=»DWTRTV EQU DWTDRD+14 REQUEST TIMER VALUE«, t00=0x0014, t01=0x0008}
0x01f6e…01fa0 Head {h00=0x002e, h01=0x0050, text=»DWTRTP EQU DWTDRD+16 REQUEST TIMER POINTER«, t00=0x0014, t01=0x0038}
0x01fa0…01fd4 Head {h00=0x0030, h01=0x0050, text=»DWTRCI EQU DWTDRD+18 RETURN CODE INFORMATION«, t00=0x0014, t01=0x006a}
0x01fd4…02014 Head {h00=0x003c, h01=0x0050, text=»DWTRES EQU DWTDRD+20 CAUSE AND DIAGNOSTIC CODE FOR RESET«, t00=0x0014, t01=0x009e}
0x02014…02054 Head {h00=0x003c, h01=0x0050, text=»DWTCLE EQU DWTDRD+22 CAUSE AND DIAGNOSTIC CODE FOR CLEAR«, t00=0x0014, t01=0x00de}
0x02054…0208c Head {h00=0x0034, h01=0x0050, text=»DWTIPQ EQU DWTDRD+24 INPUT QUEUE(IF LC CLEARED) «, t00=0x0014, t01=0x011e}
0x0208c…02096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0156}
0x02096…020d0 Head {h00=0x0036, h01=0x0050, text=»* IDENTIFICATION OF A DWT FOR A VC; USED IN DWTCHP«, t00=0x0014, t01=0x0160}
0x020d0…020da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x000a}
0x020da…02102 Head {h00=0x0024, h01=0x0050, text=»DWTTYP EQU 'VC' VIRTUAL CIRCUIT «, t00=0x0015, t01=0x0014}
0x02102…0210c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x003c}
0x0210c…02120 Head {h00=0x0010, h01=0x0050, text=» EJECT DWT «, t00=0x0015, t01=0x0046}
0x02120…0212a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005a}
0x0212a…0215c Head {h00=0x002e, h01=0x0050, text=»* INTERNAL FUNCTION CODES; USED IN DWTFNC «, t00=0x0015, t01=0x0064}
0x0215c…02166 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0096}
0x02166…0218a Head {h00=0x0020, h01=0x0050, text=»OPESYS EQU /00 OPEN REQUEST «, t00=0x0015, t01=0x00a0}
0x0218a…021ae Head {h00=0x0020, h01=0x0050, text=»CLOSYS EQU /02 CLOSE REQUEST«, t00=0x0015, t01=0x00c4}
0x021ae…021dc Head {h00=0x002a, h01=0x0050, text=»CONACT EQU /04 CONNECT ACTIVE REQUEST «, t00=0x0015, t01=0x00e8}
0x021dc…0220a Head {h00=0x002a, h01=0x0050, text=»CONPAS EQU /06 CONNECT PASSIVE REQUEST«, t00=0x0015, t01=0x0116}
0x0220a…02234 Head {h00=0x0026, h01=0x0050, text=»DISCAL EQU /08 DISCONNECT REQUEST «, t00=0x0015, t01=0x0144}
0x02234…02256 Head {h00=0x001e, h01=0x0050, text=»ACCCAL EQU /0A ACCEPT CALL«, t00=0x0015, t01=0x016e}
0x02256…02278 Head {h00=0x001e, h01=0x0050, text=»ACCDAT EQU /0C ACCEPT DATA«, t00=0x0015, t01=0x0190}
0x02278…022a2 Head {h00=0x0026, h01=0x0050, text=»REFDAT EQU /0E REFUSE DATA REQUEST«, t00=0x0016, t01=0x0022}
0x022a2…022c6 Head {h00=0x0020, h01=0x0050, text=»WRIDAT EQU /10 WRITE REQUEST«, t00=0x0016, t01=0x004c}
0x022c6…022ec Head {h00=0x0022, h01=0x0050, text=»WRIINT EQU /12 WRITE INTERRUPT«, t00=0x0016, t01=0x0070}
0x022ec…02310 Head {h00=0x0020, h01=0x0050, text=»READAT EQU /14 READ REQUEST «, t00=0x0016, t01=0x0096}
0x02310…0233a Head {h00=0x0026, h01=0x0050, text=»REASTA EQU /16 READ STATUS REQUEST«, t00=0x0016, t01=0x00ba}
0x0233a…02364 Head {h00=0x0026, h01=0x0050, text=»STATIS EQU /18 STATISTICAL REQUEST«, t00=0x0016, t01=0x00e4}
0x02364…0236e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x010e}
0x0236e…02398 Head {h00=0x0026, h01=0x0050, text=»* DWT STATE CODES; USED IN DWTSTE «, t00=0x0016, t01=0x0118}
0x02398…023a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0142}
0x023a2…023cc Head {h00=0x0026, h01=0x0050, text=»DISCON EQU /00 DISCONNECTED STATE «, t00=0x0016, t01=0x014c}
0x023cc…023f8 Head {h00=0x0028, h01=0x0050, text=»CONAD EQU /01 CONNECTED: ACCEPT DATA«, t00=0x0016, t01=0x0176}
0x023f8…02424 Head {h00=0x0028, h01=0x0050, text=»CONRD EQU /02 CONNECTED: REFUSE DATA«, t00=0x0017, t01=0x0012}
0x02424…02460 Head {h00=0x0038, h01=0x0050, text=»INCALR EQU /03 INC.CALL RECEIVED(WITH ACC/REF CALL) «, t00=0x0017, t01=0x003e}
0x02460…0249a Head {h00=0x0036, h01=0x0050, text=»INCALL EQU /04 INC.CALL REC.(WITHOUT ACC/REF CALL)«, t00=0x0017, t01=0x007a}
0x0249a…024be Head {h00=0x0020, h01=0x0050, text=»VCREL EQU /05 VC IS RELEASED«, t00=0x0017, t01=0x00b4}
0x024be…024c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00d8}
0x024c8…024fa Head {h00=0x002e, h01=0x0050, text=»* OPTION CODES; USED IN DWTOPT AND DWTWRO «, t00=0x0017, t01=0x00e2}
0x024fa…02504 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0114}
0x02504…02526 Head {h00=0x001e, h01=0x0050, text=»CLOOPT EQU /08 SOFT CLOSE «, t00=0x0017, t01=0x011e}
0x02526…02540 Head {h00=0x0016, h01=0x0050, text=»MOPT EQU /10 M-BIT«, t00=0x0017, t01=0x0140}
0x02540…02562 Head {h00=0x001e, h01=0x0050, text=»CALOPT EQU /20 ACCEPT CALL«, t00=0x0017, t01=0x015a}
0x02562…0258a Head {h00=0x0024, h01=0x0050, text=»INTOPT EQU /40 INTERRUPT PACKET «, t00=0x0017, t01=0x017c}
0x0258a…025a4 Head {h00=0x0016, h01=0x0050, text=»QOPT EQU /80 Q-BIT«, t00=0x0018, t01=0x0014}
0x025a4…025ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x002e}
0x025ae…025c2 Head {h00=0x0010, h01=0x0050, text=» EJECT USER«, t00=0x0018, t01=0x0038}
0x025c2…025cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x004c}
0x025cc…025f4 Head {h00=0x0024, h01=0x0050, text=»* RETURN CODES OF A USER REQUEST«, t00=0x0018, t01=0x0056}
0x025f4…025fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x007e}
0x025fe…02620 Head {h00=0x001e, h01=0x0050, text=»ACPT.RC EQU /0000 ACCEPTED«, t00=0x0018, t01=0x0088}
0x02620…02648 Head {h00=0x0024, h01=0x0050, text=»RQUE.RC EQU /8000 REQUEST ERROR «, t00=0x0018, t01=0x00aa}
0x02648…02672 Head {h00=0x0026, h01=0x0050, text=»ABOT.RC EQU /4000 REQUEST ABORTED «, t00=0x0018, t01=0x00d2}
0x02672…026a6 Head {h00=0x0030, h01=0x0050, text=»INTR.RC EQU /2000 INTERRUPT PACKET RECEIVED «, t00=0x0018, t01=0x00fc}
0x026a6…026d8 Head {h00=0x002e, h01=0x0050, text=»LAST.RC EQU /1000 LAST PACKET IN SEQUENCE «, t00=0x0018, t01=0x0130}
0x026d8…026fa Head {h00=0x001e, h01=0x0050, text=»NOTU.RC EQU /0800 NOT USED«, t00=0x0018, t01=0x0162}
0x026fa…02728 Head {h00=0x002a, h01=0x0050, text=»QBIT.RC EQU /0400 Q-BIT SET IN PACKET «, t00=0x0018, t01=0x0184}
0x02728…02760 Head {h00=0x0034, h01=0x0050, text=»NOLC.RC EQU /0200 LOGICAL CHANNEL NOT AVAILABLE «, t00=0x0019, t01=0x0022}
0x02760…02792 Head {h00=0x002e, h01=0x0050, text=»DATA.RC EQU /0100 DATA RECEIVED AND QUEUED«, t00=0x0019, t01=0x005a}
0x02792…027bc Head {h00=0x0026, h01=0x0050, text=»MORE.RC EQU /0080 MORE INFORMATION«, t00=0x0019, t01=0x008c}
0x027bc…027de Head {h00=0x001e, h01=0x0050, text=»TIMO.RC EQU /0040 TIME OUT«, t00=0x0019, t01=0x00b6}
0x027de…02810 Head {h00=0x002e, h01=0x0050, text=»RSET.RC EQU /0020 VC RESET,LOCAL OR REMOTE«, t00=0x0019, t01=0x00d8}
0x02810…02838 Head {h00=0x0024, h01=0x0050, text=»SEQE.RC EQU /0010 SEQUENCE ERROR«, t00=0x0019, t01=0x010a}
0x02838…02860 Head {h00=0x0024, h01=0x0050, text=»INVL.RC EQU /0008 INVALID LENGTH«, t00=0x0019, t01=0x0132}
0x02860…02894 Head {h00=0x0030, h01=0x0050, text=»CLEA.RC EQU /0004 VC CLEARED,LOCAL OR REMOTE«, t00=0x0019, t01=0x015a}
0x02894…028bc Head {h00=0x0024, h01=0x0050, text=»LOGE.RC EQU /0002 LOGICAL ERROR «, t00=0x0019, t01=0x018e}
0x028bc…028e4 Head {h00=0x0024, h01=0x0050, text=»PHYE.RC EQU /0001 PHYSICAL ERROR«, t00=0x001a, t01=0x0026}
0x028e4…02926 Head {h00=0x003e, h01=0x0050, text=»TOLD.RC EQU /0001 RETURN INFO.TOLD TO USER(INTERNAL PAR.) «, t00=0x001a, t01=0x004e}
0x02926…02930 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0090}
0x02930…02966 Head {h00=0x0032, h01=0x0050, text=»* RETURN CODES FROM LEVEL 3 TO REQUEST HANDLER«, t00=0x001a, t01=0x009a}
0x02966…02970 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00d0}
0x02970…02996 Head {h00=0x0022, h01=0x0050, text=»RTNOK EQU /00 RETURN CODE = OK«, t00=0x001a, t01=0x00da}
0x02996…029c0 Head {h00=0x0026, h01=0x0050, text=»CLEBUS EQU /02 CLEAR REQUEST BUSY «, t00=0x001a, t01=0x0100}
0x029c0…029ea Head {h00=0x0026, h01=0x0050, text=»DISCRM EQU /04 REMOTE DISCONNECTED«, t00=0x001a, t01=0x012a}
0x029ea…02a10 Head {h00=0x0022, h01=0x0050, text=»HRDERR EQU /06 HARDWARE ERROR «, t00=0x001a, t01=0x0154}
0x02a10…02a46 Head {h00=0x0032, h01=0x0050, text=»ILLSIZ EQU /0A NO MAX. PACKET LENGTH WHEN M=1 «, t00=0x001a, t01=0x017a}
0x02a46…02a7a Head {h00=0x0030, h01=0x0050, text=»INVSTA EQU /0C NO CORRECT LOG. CHANNEL STATE«, t00=0x001b, t01=0x0020}
0x02a7a…02ab2 Head {h00=0x0034, h01=0x0050, text=»MAXLNG EQU /0E MAX. LENGTH EXCEEDED FOR TRANSM. «, t00=0x001b, t01=0x0054}
0x02ab2…02ae6 Head {h00=0x0030, h01=0x0050, text=»NOLCAV EQU /10 NO LOGICAL CHANNEL AVAILABLE «, t00=0x001b, t01=0x008c}
0x02ae6…02b0e Head {h00=0x0024, h01=0x0050, text=»TMEOUT EQU /12 TIME OUT DETECTED«, t00=0x001b, t01=0x00c0}
0x02b0e…02b42 Head {h00=0x0030, h01=0x0050, text=»NOREMO EQU /14 REMOTE ADDRESS NOT SUPPORTED «, t00=0x001b, t01=0x00e8}
0x02b42…02b4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x011c}
0x02b4c…02b60 Head {h00=0x0010, h01=0x0050, text=» EJECT USER«, t00=0x001b, t01=0x0126}
0x02b60…02b6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x013a}
0x02b6a…02b98 Head {h00=0x002a, h01=0x0050, text=»* DIAGNOSTIC CODES FOR THE REMOTE USER«, t00=0x001b, t01=0x0144}
0x02b98…02ba2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0172}
0x02ba2…02bce Head {h00=0x0028, h01=0x0050, text=»LOCPER EQU /01 LOCAL PROCEDURE ERROR«, t00=0x001b, t01=0x017c}
0x02bce…02bf2 Head {h00=0x0020, h01=0x0050, text=»NOUSER EQU /02 NO USER KNOWN«, t00=0x001c, t01=0x0018}
0x02bf2…02c1c Head {h00=0x0026, h01=0x0050, text=»NOTINT EQU /03 NO INTERESTED USER «, t00=0x001c, t01=0x003c}
0x02c1c…02c48 Head {h00=0x0028, h01=0x0050, text=»RESLCH EQU /04 LOCAL SEQUENCE ERROR «, t00=0x001c, t01=0x0066}
0x02c48…02c52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0092}
0x02c52…02c80 Head {h00=0x002a, h01=0x0050, text=»* DIAGNOSTIC CODES FOR THE LOCAL USER «, t00=0x001c, t01=0x009c}
0x02c80…02c8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00ca}
0x02c8a…02cb4 Head {h00=0x0026, h01=0x0050, text=»LOCCLE EQU /80 VC IS CLEARED LOCAL«, t00=0x001c, t01=0x00d4}
0x02cb4…02ce2 Head {h00=0x002a, h01=0x0050, text=»RSTRED EQU /82 RESTART PACKET RECEIVED«, t00=0x001c, t01=0x00fe}
0x02ce2…02cec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x012c}
0x02cec…02d02 Head {h00=0x0012, h01=0x0050, text=» EJECT SYSTEM«, t00=0x001c, t01=0x0136}
0x02d02…02d0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x014c}
0x02d0c…02d36 Head {h00=0x0026, h01=0x0050, text=»* EQUATE VALUES FOR BUFFER LAY-OUT«, t00=0x001c, t01=0x0156}
0x02d36…02d40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0180}
0x02d40…02d6a Head {h00=0x0026, h01=0x0050, text=»BFCHPT EQU -2 QUEUE CHAIN POINTER «, t00=0x001c, t01=0x018a}
0x02d6a…02d8a Head {h00=0x001c, h01=0x0050, text=»HDLC EQU /00 HDLC HEADER«, t00=0x001d, t01=0x0024}
0x02d8a…02dba Head {h00=0x002c, h01=0x0050, text=»GNFRM EQU /02 GENERAL FORMAT IDENTIFIER «, t00=0x001d, t01=0x0044}
0x02dba…02dee Head {h00=0x0030, h01=0x0050, text=»QBIT EQU /02 CHARACTER DISPLACEMENT OF Q-BIT«, t00=0x001d, t01=0x0074}
0x02dee…02e1c Head {h00=0x002a, h01=0x0050, text=»LCIDNT EQU /03 LOGICAL CHANNEL NUMBER «, t00=0x001d, t01=0x00a8}
0x02e1c…02e3e Head {h00=0x001e, h01=0x0050, text=»IDENT EQU /04 PACKET TYPE «, t00=0x001d, t01=0x00d6}
0x02e3e…02e72 Head {h00=0x0030, h01=0x0050, text=»MBIT EQU /04 CHARACTER DISPLACEMENT OF M-BIT«, t00=0x001d, t01=0x00f8}
0x02e72…02ea2 Head {h00=0x002c, h01=0x0050, text=»BEGDAT EQU /05 USER DATA IN DATA PACKET «, t00=0x001d, t01=0x012c}
0x02ea2…02eda Head {h00=0x0034, h01=0x0050, text=»CAUSE EQU /05 RESET-, RESTART OR CLEARING CAUSE «, t00=0x001d, t01=0x015c}
0x02eda…02f00 (30, 0, 400) Head {h00=0x0022, h01=0x0050, text=»DGNCOD EQU /06 DIAGNOSTIC CODE«, t00=0x001e, t01=0x0004}
0x02f00…02f24 Head {h00=0x0020, h01=0x0050, text=»QPOS EQU /80 MASK FOR Q-BIT «, t00=0x001e, t01=0x002a}
0x02f24…02f48 Head {h00=0x0020, h01=0x0050, text=»MPOS EQU /10 MASK FOR M-BIT «, t00=0x001e, t01=0x004e}
0x02f48…02f52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0072}
0x02f52…02f7a Head {h00=0x0024, h01=0x0050, text=»* EQUATE VALUES FOR PACKET TYPES«, t00=0x001e, t01=0x007c}
0x02f7a…02f84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00a4}
0x02f84…02fa6 Head {h00=0x001e, h01=0x0050, text=»CAL.P EQU /0B CALL PACKET «, t00=0x001e, t01=0x00ae}
0x02fa6…02fd6 Head {h00=0x002c, h01=0x0050, text=»CAL.CP EQU /0F CALL CONFIRMATION PACKET «, t00=0x001e, t01=0x00d0}
0x02fd6…02ff8 Head {h00=0x001e, h01=0x0050, text=»CLE.P EQU /13 CLEAR PACKET«, t00=0x001e, t01=0x0100}
0x02ff8…03028 Head {h00=0x002c, h01=0x0050, text=»CLE.CP EQU /17 CLEAR CONFIRMATION PACKET«, t00=0x001e, t01=0x0122}
0x03028…0304a Head {h00=0x001e, h01=0x0050, text=»DATA.P EQU /01 DATA PACKET«, t00=0x001e, t01=0x0152}
0x0304a…03070 Head {h00=0x0022, h01=0x0050, text=»INT.P EQU /23 INTERRUPT PACKET«, t00=0x001e, t01=0x0174}
0x03070…030a4 Head {h00=0x0030, h01=0x0050, text=»INT.CP EQU /27 INTERRUPT CONFIRMATION PACKET«, t00=0x001f, t01=0x000a}
0x030a4…030c2 Head {h00=0x001a, h01=0x0050, text=»RR.P EQU /01 RR-PACKET«, t00=0x001f, t01=0x003e}
0x030c2…030e2 Head {h00=0x001c, h01=0x0050, text=»RNR.P EQU /05 RNR-PACKET«, t00=0x001f, t01=0x005c}
0x030e2…03106 Head {h00=0x0020, h01=0x0050, text=»RSET.P EQU /1B RESET PACKET «, t00=0x001f, t01=0x007c}
0x03106…03138 Head {h00=0x002e, h01=0x0050, text=»RSET.CP EQU /1F RESET CONFIRMATION PACKET «, t00=0x001f, t01=0x00a0}
0x03138…0315e Head {h00=0x0022, h01=0x0050, text=»RSTR.P EQU /FB RESTART PACKET «, t00=0x001f, t01=0x00d2}
0x0315e…03192 Head {h00=0x0030, h01=0x0050, text=»RSTR.CP EQU /FF RESTART CONFIRMATION PACKET «, t00=0x001f, t01=0x00f8}
0x03192…031a8 Head {h00=0x0012, h01=0x0050, text=» EJECT SYSTEM«, t00=0x001f, t01=0x012c}
0x031a8…031b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0142}
0x031b2…031dc Head {h00=0x0026, h01=0x0050, text=»* EQUATE VALUES FOR PACKET LENGTH «, t00=0x001f, t01=0x014c}
0x031dc…031e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0176}
0x031e6…0320e Head {h00=0x0024, h01=0x0050, text=»CAL.CL EQU /05 CALL CONFIRMATION«, t00=0x001f, t01=0x0180}
0x0320e…03230 Head {h00=0x001e, h01=0x0050, text=»CLE.L EQU /07 CLEAR PACKET«, t00=0x0020, t01=0x0018}
0x03230…03260 Head {h00=0x002c, h01=0x0050, text=»CLE.CL EQU /05 CLEAR CONFIRMATION PACKET«, t00=0x0020, t01=0x003a}
0x03260…03286 Head {h00=0x0022, h01=0x0050, text=»INT.L EQU /06 INTERRUPT PACKET«, t00=0x0020, t01=0x006a}
0x03286…032ba Head {h00=0x0030, h01=0x0050, text=»INT.CL EQU /05 INTERRUPT CONFIRMATION PACKET«, t00=0x0020, t01=0x0090}
0x032ba…032d8 Head {h00=0x001a, h01=0x0050, text=»RR.L EQU /05 RR-PACKET«, t00=0x0020, t01=0x00c4}
0x032d8…032fc Head {h00=0x0020, h01=0x0050, text=»RSET.L EQU /07 RESET PACKET «, t00=0x0020, t01=0x00e2}
0x032fc…0332e Head {h00=0x002e, h01=0x0050, text=»RSET.CL EQU /05 RESET CONFIRMATION PACKET «, t00=0x0020, t01=0x0106}
0x0332e…03354 Head {h00=0x0022, h01=0x0050, text=»RSTR.L EQU /07 RESTART PACKET «, t00=0x0020, t01=0x0138}
0x03354…03388 Head {h00=0x0030, h01=0x0050, text=»RSTR.CL EQU /05 RESTART CONFIRMATION PACKET «, t00=0x0020, t01=0x015e}
0x03388…03392 (33, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0004}
0x03392…033ac Head {h00=0x0016, h01=0x0050, text=»* SYSTEM VARIABLES«, t00=0x0021, t01=0x000e}
0x033ac…033b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0028}
0x033b6…033cc Head {h00=0x0012, h01=0x0050, text=»NEG EQU /8000 «, t00=0x0021, t01=0x0032}
0x033cc…033fe Head {h00=0x002e, h01=0x0050, text=»LOCAL EQU 'LP' LOCAL PACKET SWITCHING DTE «, t00=0x0021, t01=0x0048}
0x033fe…03430 Head {h00=0x002e, h01=0x0050, text=»SVCTYP EQU 'RS' REMOTE DTE REACHED VIA SVC«, t00=0x0021, t01=0x007a}
0x03430…03462 Head {h00=0x002e, h01=0x0050, text=»PVCTYP EQU 'RP' REMOTE DTE REACHED VIA PVC«, t00=0x0021, t01=0x00ac}
0x03462…03496 Head {h00=0x0030, h01=0x0050, text=»TSKID EQU '#X' TASK IDENTIFICATION X25-TASK «, t00=0x0021, t01=0x00de}
0x03496…034b2 Head {h00=0x0018, h01=0x0050, text=»SAVE RES 8 SAVE AREA«, t00=0x0021, t01=0x0112}
0x034b2…034e6 Head {h00=0x0030, h01=0x0050, text=»THRESH DATA 50 PERCENTAGE FOR WIND. UPDATING«, t00=0x0021, t01=0x012e}
0x034e6…03516 Head {h00=0x002c, h01=0x0050, text=»DCLEVL DATA 0 PROCESS INDICATION DC-TASK«, t00=0x0021, t01=0x0162}
0x03516…03538 (34, 0, 398) Head {h00=0x001e, h01=0x0050, text=» DATA 0,0 EXTEND DC-STACK «, t00=0x0022, t01=0x0004}
0x03538…0355c Head {h00=0x0020, h01=0x0050, text=» RES 12 CALL FUNCTION STACK «, t00=0x0022, t01=0x0026}
0x0355c…03580 Head {h00=0x0020, h01=0x0050, text=»DCSTAK EQU *-2 STACK POINTER«, t00=0x0022, t01=0x004a}
0x03580…0358a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x006e}
0x0358a…03594 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0078}
0x03594…035a6 Head {h00=0x000e, h01=0x0050, text=» EJECT LC«, t00=0x0022, t01=0x0082}
0x035a6…035b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0094}
0x035b0…035dc Head {h00=0x0028, h01=0x0050, text=»* LOGICAL CHANNEL TABLE DISPLACEMENT«, t00=0x0022, t01=0x009e}
0x035dc…035e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ca}
0x035e6…03602 Head {h00=0x0018, h01=0x0050, text=»LCSTAT EQU 0 STATUS «, t00=0x0022, t01=0x00d4}
0x03602…03628 Head {h00=0x0022, h01=0x0050, text=»LCSBST EQU LCSTAT+1 SUB-STATUS«, t00=0x0022, t01=0x00f0}
0x03628…03650 Head {h00=0x0024, h01=0x0050, text=»VCTYP EQU LCSBST+1 CIRCUIT TYPE «, t00=0x0022, t01=0x0116}
0x03650…0367e Head {h00=0x002a, h01=0x0050, text=»LCNUM EQU VCTYP+1 LOG. CHANNEL NUMBER «, t00=0x0022, t01=0x013e}
0x0367e…036a4 Head {h00=0x0022, h01=0x0050, text=»LCDWT EQU LCNUM+1 DWT ADDRESS «, t00=0x0022, t01=0x016c}
0x036a4…036ce (35, 0, 400) Head {h00=0x0026, h01=0x0050, text=»LCTHRE EQU LCDWT+2 THRESHOLD VALUE«, t00=0x0023, t01=0x0004}
0x036ce…03700 Head {h00=0x002e, h01=0x0050, text=»NRNUBF EQU LCTHRE+1 # OF NOT USED BUFFERS «, t00=0x0023, t01=0x002e}
0x03700…0372e Head {h00=0x002a, h01=0x0050, text=»QUEINP EQU NRNUBF+1 INPUT QUEUE ANCHOR«, t00=0x0023, t01=0x0060}
0x0372e…0375e Head {h00=0x002c, h01=0x0050, text=»QUEOUT EQU QUEINP+2 OUTPUT QUEUE ANCHOR «, t00=0x0023, t01=0x008e}
0x0375e…0378a Head {h00=0x0028, h01=0x0050, text=»LCTRWN EQU QUEOUT+2 TRANSMIT WINDOW «, t00=0x0023, t01=0x00be}
0x0378a…037b4 Head {h00=0x0026, h01=0x0050, text=»LCREWN EQU LCTRWN+1 RECEIVE WINDOW«, t00=0x0023, t01=0x00ea}
0x037b4…037e6 Head {h00=0x002e, h01=0x0050, text=»PS EQU LCREWN+1 NEXT PACKET SEND SEQU. NR.«, t00=0x0023, t01=0x0114}
0x037e6…0381a Head {h00=0x0030, h01=0x0050, text=»PR EQU PS+1 CURRENT PACKET RECEIVE SEQU. NR.«, t00=0x0023, t01=0x0146}
0x0381a…03846 Head {h00=0x0028, h01=0x0050, text=»RPS EQU PR+1 NEXT PS TO BE RECIEVED «, t00=0x0023, t01=0x017a}
0x03846…03878 Head {h00=0x002e, h01=0x0050, text=»SLWE EQU RPS+1 SEND LWE = LAST RECEIVED PR«, t00=0x0024, t01=0x0016}
0x03878…038b6 Head {h00=0x003a, h01=0x0050, text=»RLWE EQU SLWE+1 LAST TRANSMITTED PR«, t00=0x0024, t01=0x0048}
0x038b6…038d8 Head {h00=0x001e, h01=0x0050, text=»NOUSE EQU RLWE+1 NOT USED «, t00=0x0024, t01=0x0086}
0x038d8…03904 Head {h00=0x0028, h01=0x0050, text=»REMADR EQU NOUSE+1 REMOTE DTE IF PVC«, t00=0x0024, t01=0x00a8}
0x03904…0393a Head {h00=0x0032, h01=0x0050, text=»REBFSZ EQU REMADR+2 MAX.RECEIVE PACKET LENGTH «, t00=0x0024, t01=0x00d4}
0x0393a…03970 Head {h00=0x0032, h01=0x0050, text=»TRBFSZ EQU REBFSZ+2 MAX. TRANSM. PACKET LENGTH«, t00=0x0024, t01=0x010a}
0x03970…03990 Head {h00=0x001c, h01=0x0050, text=»FLAGS EQU TRBFSZ+2 FLAGS«, t00=0x0024, t01=0x0140}
0x03990…039b8 Head {h00=0x0024, h01=0x0050, text=»TIMADR EQU FLAGS+2 TIMER ADDRESS«, t00=0x0024, t01=0x0160}
0x039b8…039e8 Head {h00=0x002c, h01=0x0050, text=»SYSBUF EQU TIMADR+4 SYSTEM OUTPUT BUFFER«, t00=0x0024, t01=0x0188}
0x039e8…03a10 Head {h00=0x0024, h01=0x0050, text=»LCALNG EQU SYSBUF+8 TABLE LENGTH«, t00=0x0025, t01=0x0028}
0x03a10…03a1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0050}
0x03a1a…03a2c Head {h00=0x000e, h01=0x0050, text=» EJECT LC«, t00=0x0025, t01=0x005a}
0x03a2c…03a36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x006c}
0x03a36…03a68 Head {h00=0x002e, h01=0x0050, text=»* EQUATE VALUES FOR LOGICAL CHANNEL STATUS«, t00=0x0025, t01=0x0076}
0x03a68…03a72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00a8}
0x03a72…03a96 Head {h00=0x0020, h01=0x0050, text=»READ.ST EQU /00 READY STATE «, t00=0x0025, t01=0x00b2}
0x03a96…03abe Head {h00=0x0024, h01=0x0050, text=»LCAL.ST EQU /01 LOCAL CALL STATE«, t00=0x0025, t01=0x00d6}
0x03abe…03ae8 Head {h00=0x0026, h01=0x0050, text=»RCAL.ST EQU /02 REMOTE CALL STATE «, t00=0x0025, t01=0x00fe}
0x03ae8…03b14 Head {h00=0x0028, h01=0x0050, text=»DATA.ST EQU /03 DATA TRANSFER STATE «, t00=0x0025, t01=0x0128}
0x03b14…03b38 Head {h00=0x0020, h01=0x0050, text=»CLEA.ST EQU /04 CLEAR STATE «, t00=0x0025, t01=0x0154}
0x03b38…03b6c Head {h00=0x0030, h01=0x0050, text=»FLCN.ST EQU /00 FLOW CONTROL READY SUB-STATE«, t00=0x0025, t01=0x0178}
0x03b6c…03b94 Head {h00=0x0024, h01=0x0050, text=»RSET.ST EQU /01 RESET SUB-STATE «, t00=0x0026, t01=0x001c}
0x03b94…03b9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0044}
0x03b9e…03bc6 Head {h00=0x0024, h01=0x0050, text=»* EQUATE VALUES FOR CIRCUIT TYPE«, t00=0x0026, t01=0x004e}
0x03bc6…03bd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0076}
0x03bd0…03bfe Head {h00=0x002a, h01=0x0050, text=»PVC EQU /01 PERMANENT VIRTUAL CIRCUIT «, t00=0x0026, t01=0x0080}
0x03bfe…03c2a Head {h00=0x0028, h01=0x0050, text=»SVC EQU /00 SWITCHED VIRTUAL CIRCUIT«, t00=0x0026, t01=0x00ae}
0x03c2a…03c34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00da}
0x03c34…03c48 Head {h00=0x0010, h01=0x0050, text=» EJECT LINE«, t00=0x0026, t01=0x00e4}
0x03c48…03c52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00f8}
0x03c52…03c84 Head {h00=0x002e, h01=0x0050, text=»* LINE ADMINISTRATION BLOCK DISPLACEMENTS «, t00=0x0026, t01=0x0102}
0x03c84…03c8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0134}
0x03c8e…03cc0 Head {h00=0x002e, h01=0x0050, text=»FILCOD EQU 0 FILE CODE FOR LINE ADDRESSING«, t00=0x0026, t01=0x013e}
0x03cc0…03cf2 Head {h00=0x002e, h01=0x0050, text=»LC:TAB EQU FILCOD+2 LC-ADM'S TABLE ADDRESS«, t00=0x0026, t01=0x0170}
0x03cf2…03d24 Head {h00=0x002e, h01=0x0050, text=»PACKLN EQU LC:TAB+2 MAXIMUM PACKET LENGTH «, t00=0x0027, t01=0x0012}
0x03d24…03d54 Head {h00=0x002c, h01=0x0050, text=»WNDSIZ EQU PACKLN+2 MAXIMUM WINDOW SIZE «, t00=0x0027, t01=0x0044}
0x03d54…03d84 Head {h00=0x002c, h01=0x0050, text=»NRLC EQU WNDSIZ+2 # OF LOGICAL CHANNELS «, t00=0x0027, t01=0x0074}
0x03d84…03dbc Head {h00=0x0034, h01=0x0050, text=»NRPVC EQU NRLC+1 # OF PERMANENT VIRTUAL CIRCUITS«, t00=0x0027, t01=0x00a4}
0x03dbc…03df0 Head {h00=0x0030, h01=0x0050, text=»CHAIN EQU NRPVC+1 ANCHOR FOR CONNECTED DWT'S«, t00=0x0027, t01=0x00dc}
0x03df0…03e2a Head {h00=0x0036, h01=0x0050, text=»NRPNDT EQU CHAIN+2 # OF PENDING TRANSMIT REQUESTS «, t00=0x0027, t01=0x0110}
0x03e2a…03e5a Head {h00=0x002c, h01=0x0050, text=»RSTQUE EQU NRPNDT+2 RESTART QUEUE ANCHOR«, t00=0x0027, t01=0x014a}
0x03e5a…03e92 Head {h00=0x0034, h01=0x0050, text=»RTMADR EQU RSTQUE+2 RESTART CONF. TIMER ADDRESS «, t00=0x0027, t01=0x017a}
0x03e92…03ebe Head {h00=0x0028, h01=0x0050, text=»HRDSTA EQU RTMADR+2 HARDWARE STATUS «, t00=0x0028, t01=0x0022}
0x03ebe…03ee6 Head {h00=0x0024, h01=0x0050, text=»CMNFLG EQU HRDSTA+2 COMMON FLAGS«, t00=0x0028, t01=0x004e}
0x03ee6…03f16 Head {h00=0x002c, h01=0x0050, text=»LOCECB EQU CMNFLG+2 LINE OPEN/CLOSE ECB «, t00=0x0028, t01=0x0076}
0x03f16…03f50 Head {h00=0x0036, h01=0x0050, text=»UBNUM EQU LOCECB+12 BLOCK FOR (DIS)CONNECT REQUEST«, t00=0x0028, t01=0x00a6}
0x03f50…03f6c Head {h00=0x0018, h01=0x0050, text=» IFF MMUPAG+STATI=2 «, t00=0x0028, t01=0x00e0}
0x03f6c…03f8a Head {h00=0x001a, h01=0x0050, text=»D1 EQU UBNUM+SYUBNR+2 «, t00=0x0028, t01=0x00fc}
0x03f8a…03fba Head {h00=0x002c, h01=0x0050, text=»ECBINL EQU 12 LENGTH INPUT/OUTPUT ECB'S «, t00=0x0028, t01=0x011a}
0x03fba…03fea Head {h00=0x002c, h01=0x0050, text=»SYSBFL EQU SYMXDL+BEGDAT+1 BUFFER LENGTH«, t00=0x0028, t01=0x014a}
0x03fea…04018 Head {h00=0x002a, h01=0x0050, text=»ECBIN1 EQU D1+SYUBNR LINE INPUT ECB'S «, t00=0x0028, t01=0x017a}
0x04018…04024 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x0018}
0x04024…04040 Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+STATI=2 «, t00=0x0029, t01=0x0024}
0x04040…0405e Head {h00=0x001a, h01=0x0050, text=»D1 EQU UBNUM+SYUBNR+2 «, t00=0x0029, t01=0x0040}
0x0405e…04098 Head {h00=0x0036, h01=0x0050, text=»INTSTB EQU D1+SYUBNR INTERMEDIATESTATISTIC BUFFER «, t00=0x0029, t01=0x005e}
0x04098…040c8 Head {h00=0x002c, h01=0x0050, text=»ECBINL EQU 12 LENGTH INPUT/OUTPUT ECB'S «, t00=0x0029, t01=0x0098}
0x040c8…040f8 Head {h00=0x002c, h01=0x0050, text=»SYSBFL EQU SYMXDL+BEGDAT+1 BUFFER LENGTH«, t00=0x0029, t01=0x00c8}
0x040f8…04126 Head {h00=0x002a, h01=0x0050, text=»ECBIN1 EQU INTSTB+42 LINE INPUT ECB'S «, t00=0x0029, t01=0x00f8}
0x04126…04132 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x0126}
0x04132…04148 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRRC=1 «, t00=0x0029, t01=0x0132}
0x04148…04168 Head {h00=0x001c, h01=0x0050, text=»ECBIN2 EQU ECBIN1+ECBINL«, t00=0x0029, t01=0x0148}
0x04168…0417e Head {h00=0x0012, h01=0x0050, text=» IFF SYNRRC=2 «, t00=0x0029, t01=0x0168}
0x0417e…0419e Head {h00=0x001c, h01=0x0050, text=»ECBIN3 EQU ECBIN2+ECBINL«, t00=0x0029, t01=0x017e}
0x0419e…041b4 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRRC=3 «, t00=0x002a, t01=0x000e}
0x041b4…041d4 Head {h00=0x001c, h01=0x0050, text=»ECBIN4 EQU ECBIN3+ECBINL«, t00=0x002a, t01=0x0024}
0x041d4…041e0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0044}
0x041e0…041ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0050}
0x041ea…041fe Head {h00=0x0010, h01=0x0050, text=» EJECT LINE«, t00=0x002a, t01=0x005a}
0x041fe…04208 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x006e}
0x04208…0421e Head {h00=0x0012, h01=0x0050, text=» IFT SYNRRC=1 «, t00=0x002a, t01=0x0078}
0x0421e…0423e Head {h00=0x001c, h01=0x0050, text=»ECBOU1 EQU ECBIN1+ECBINL«, t00=0x002a, t01=0x008e}
0x0423e…0424a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x00ae}
0x0424a…04260 Head {h00=0x0012, h01=0x0050, text=» IFT SYNRRC=2 «, t00=0x002a, t01=0x00ba}
0x04260…04280 Head {h00=0x001c, h01=0x0050, text=»ECBOU1 EQU ECBIN2+ECBINL«, t00=0x002a, t01=0x00d0}
0x04280…0428c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x00f0}
0x0428c…042a2 Head {h00=0x0012, h01=0x0050, text=» IFT SYNRRC=3 «, t00=0x002a, t01=0x00fc}
0x042a2…042c2 Head {h00=0x001c, h01=0x0050, text=»ECBOU1 EQU ECBIN3+ECBINL«, t00=0x002a, t01=0x0112}
0x042c2…042ce Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0132}
0x042ce…042e4 Head {h00=0x0012, h01=0x0050, text=» IFT SYNRRC=4 «, t00=0x002a, t01=0x013e}
0x042e4…04304 Head {h00=0x001c, h01=0x0050, text=»ECBOU1 EQU ECBIN4+ECBINL«, t00=0x002a, t01=0x0154}
0x04304…04310 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0174}
0x04310…04330 Head {h00=0x001c, h01=0x0050, text=»SYSOU1 EQU ECBOU1+ECBINL«, t00=0x002a, t01=0x0180}
0x04330…04346 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRTR=1 «, t00=0x002b, t01=0x0010}
0x04346…04366 Head {h00=0x001c, h01=0x0050, text=»ECBOU2 EQU SYSOU1+SYSBFL«, t00=0x002b, t01=0x0026}
0x04366…04386 Head {h00=0x001c, h01=0x0050, text=»SYSOU2 EQU ECBOU2+ECBINL«, t00=0x002b, t01=0x0046}
0x04386…0439c Head {h00=0x0012, h01=0x0050, text=» IFF SYNRTR=2 «, t00=0x002b, t01=0x0066}
0x0439c…043bc Head {h00=0x001c, h01=0x0050, text=»ECBOU3 EQU SYSOU2+SYSBFL«, t00=0x002b, t01=0x007c}
0x043bc…043dc Head {h00=0x001c, h01=0x0050, text=»SYSOU3 EQU ECBOU3+ECBINL«, t00=0x002b, t01=0x009c}
0x043dc…043f2 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRTR=3 «, t00=0x002b, t01=0x00bc}
0x043f2…04412 Head {h00=0x001c, h01=0x0050, text=»ECBOU4 EQU SYSOU3+SYSBFL«, t00=0x002b, t01=0x00d2}
0x04412…04432 Head {h00=0x001c, h01=0x0050, text=»SYSOU4 EQU ECBOU4+ECBINL«, t00=0x002b, t01=0x00f2}
0x04432…0443e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x0112}
0x0443e…04454 Head {h00=0x0012, h01=0x0050, text=» IFT SYNRTR=1 «, t00=0x002b, t01=0x011e}
0x04454…04474 Head {h00=0x001c, h01=0x0050, text=»LNBLNG EQU SYSOU1+SYSBFL«, t00=0x002b, t01=0x0134}
0x04474…04480 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x0154}
0x04480…04496 Head {h00=0x0012, h01=0x0050, text=» IFT SYNRTR=2 «, t00=0x002b, t01=0x0160}
0x04496…044b6 Head {h00=0x001c, h01=0x0050, text=»LNBLNG EQU SYSOU2+SYSBFL«, t00=0x002b, t01=0x0176}
0x044b6…044c2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0008}
0x044c2…044d8 Head {h00=0x0012, h01=0x0050, text=» IFT SYNRTR=3 «, t00=0x002c, t01=0x0014}
0x044d8…044f8 Head {h00=0x001c, h01=0x0050, text=»LNBLNG EQU SYSOU3+SYSBFL«, t00=0x002c, t01=0x002a}
0x044f8…04504 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x004a}
0x04504…0451a Head {h00=0x0012, h01=0x0050, text=» IFT SYNRTR=4 «, t00=0x002c, t01=0x0056}
0x0451a…0453a Head {h00=0x001c, h01=0x0050, text=»LNBLNG EQU SYSOU4+SYSBFL«, t00=0x002c, t01=0x006c}
0x0453a…04546 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x008c}
0x04546…04550 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0098}
0x04550…04564 Head {h00=0x0010, h01=0x0050, text=» EJECT LINE«, t00=0x002c, t01=0x00a2}
0x04564…0456e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00b6}
0x0456e…0459e Head {h00=0x002c, h01=0x0050, text=»* ORDER CODES FOR HDLC PROTOCOL HANDLER «, t00=0x002c, t01=0x00c0}
0x0459e…045a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00f0}
0x045a8…045cc Head {h00=0x0020, h01=0x0050, text=»CONN EQU /21 CONNECT REQUEST«, t00=0x002c, t01=0x00fa}
0x045cc…045f4 Head {h00=0x0024, h01=0x0050, text=»DISCN EQU /22 DISCONNECT REQUEST«, t00=0x002c, t01=0x011e}
0x045f4…04618 Head {h00=0x0020, h01=0x0050, text=»RECEIV EQU /02 INPUT REQUEST«, t00=0x002c, t01=0x0146}
0x04618…0463e Head {h00=0x0022, h01=0x0050, text=»TRANSM EQU /06 OUTPUT REQUEST «, t00=0x002c, t01=0x016a}
0x0463e…04666 Head {h00=0x0024, h01=0x0050, text=»STATR EQU /2D STATISTIC REQUEST «, t00=0x002c, t01=0x0190}
0x04666…04670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0028}
0x04670…046a0 Head {h00=0x002c, h01=0x0050, text=»* RETURN CODES FOR HDLC PROTOCOL HANDLER«, t00=0x002d, t01=0x0032}
0x046a0…046aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0062}
0x046aa…046d2 Head {h00=0x0024, h01=0x0050, text=»HRDWER EQU /8000 HARDWARE ERROR «, t00=0x002d, t01=0x006c}
0x046d2…046fe Head {h00=0x0028, h01=0x0050, text=»REMDIS EQU /000D REMOTE DISCONNECTED«, t00=0x002d, t01=0x0094}
0x046fe…04728 Head {h00=0x0026, h01=0x0050, text=»DEFTIM EQU /000E DEFINITE TIME-OUT«, t00=0x002d, t01=0x00c0}
0x04728…04732 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00ea}
0x04732…0475c Head {h00=0x0026, h01=0x0050, text=»* EQUATE VALUES FOR FLAG POSITIONS«, t00=0x002d, t01=0x00f4}
0x0475c…04766 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x011e}
0x04766…04798 Head {h00=0x002e, h01=0x0050, text=»CONTIM EQU /10 CONFIRMATION TIMER RUNNING «, t00=0x002d, t01=0x0128}
0x04798…047c0 Head {h00=0x0024, h01=0x0050, text=»INTPNG EQU /20 INTERRUPT PENDING«, t00=0x002d, t01=0x015a}
0x047c0…047e2 Head {h00=0x001e, h01=0x0050, text=»REMBUS EQU /40 REMOTE BUSY«, t00=0x002d, t01=0x0182}
0x047e2…04816 Head {h00=0x0030, h01=0x0050, text=»NPRFLG EQU /01 NO PROCESSING FLAG FOR QUEUES«, t00=0x002e, t01=0x0014}
0x04816…04820 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0048}
0x04820…0484c Head {h00=0x0028, h01=0x0050, text=»* EQUATE VALUES FOR THE COMMON FLAGS«, t00=0x002e, t01=0x0052}
0x0484c…04856 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x007e}
0x04856…0487a Head {h00=0x0020, h01=0x0050, text=»RSTFLG EQU /01 RESTART BUSY «, t00=0x002e, t01=0x0088}
0x0487a…048a4 Head {h00=0x0026, h01=0x0050, text=»STRTFL EQU /80 LINE CONNECTED FLAG«, t00=0x002e, t01=0x00ac}
0x048a4…048d6 Head {h00=0x002e, h01=0x0050, text=»STATFL EQU /04 STATISTIC REQUEST BUSY FLAG«, t00=0x002e, t01=0x00d6}
0x048d6…04914 Head {h00=0x003a, h01=0x0050, text=»CLOFLG EQU /10 CLOSE BUSY FLAG«, t00=0x002e, t01=0x0108}
0x04914…04952 Head {h00=0x003a, h01=0x0050, text=»OPEFLG EQU /20 OPEN BUSY FLAG «, t00=0x002e, t01=0x0146}
0x04952…0495c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0184}
0x0495c…0496a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x018e}
0x0496a…04974 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x000c}
0x04974…049b0 Head {h00=0x0038, h01=0x0050, text=»* BLOCK WITH ADDRESSES OF LINE ADMINISTRATION BLOCKS«, t00=0x002f, t01=0x0016}
0x049b0…049ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0052}
0x049ba…049f0 Head {h00=0x0032, h01=0x0050, text=»LINTAB DATA LINBL1 ADDRESS 1ST LINE ADM. BLOCK«, t00=0x002f, t01=0x005c}
0x049f0…04a06 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x002f, t01=0x0092}
0x04a06…04a36 Head {h00=0x002c, h01=0x0050, text=» DATA LINBL2 ADDRESS 2ND LINE ADM. BLOCK«, t00=0x002f, t01=0x00a8}
0x04a36…04a4c Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x002f, t01=0x00d8}
0x04a4c…04a7c Head {h00=0x002c, h01=0x0050, text=» DATA LINBL3 ADDRESS 3TH LINE ADM. BLOCK«, t00=0x002f, t01=0x00ee}
0x04a7c…04a92 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=3 «, t00=0x002f, t01=0x011e}
0x04a92…04ac2 Head {h00=0x002c, h01=0x0050, text=» DATA LINBL4 ADDRESS 4TH LINE ADM. BLOCK«, t00=0x002f, t01=0x0134}
0x04ac2…04ace Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x0164}
0x04ace…04ad8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0170}
0x04ad8…04b02 Head {h00=0x0026, h01=0x0050, text=»* FIRST LINE ADMINISTRATION BLOCK «, t00=0x002f, t01=0x017a}
0x04b02…04b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0014}
0x04b0c…04b20 Head {h00=0x0010, h01=0x0050, text=»LINBL1 EQU *«, t00=0x0030, t01=0x001e}
0x04b20…04b3c Head {h00=0x0018, h01=0x0050, text=» DATA /60 FILE CODE «, t00=0x0030, t01=0x0032}
0x04b3c…04b6a Head {h00=0x002a, h01=0x0050, text=» DATA LCADM1 LOG. CHANNEL ADM. POINTER«, t00=0x0030, t01=0x004e}
0x04b6a…04b92 Head {h00=0x0024, h01=0x0050, text=» DATA SYMDL1 MAX. PACKET LENGTH «, t00=0x0030, t01=0x007c}
0x04b92…04bb8 Head {h00=0x0022, h01=0x0050, text=» DATA SYMXW1 MAX. WINDOW SIZE «, t00=0x0030, t01=0x00a4}
0x04bb8…04bf0 Head {h00=0x0034, h01=0x0050, text=» BYTE SYNRL1,SYNRP1 # OF LOG.CH. AND # OF PVC'S «, t00=0x0030, t01=0x00ca}
0x04bf0…04c0c Head {h00=0x0018, h01=0x0050, text=» RORG LINBL1+LNBLNG «, t00=0x0030, t01=0x0102}
0x04c0c…04c16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x011e}
0x04c16…04c48 Head {h00=0x002e, h01=0x0050, text=»* BLOCK WITH LOGICAL CHANNEL ADM. POINTERS«, t00=0x0030, t01=0x0128}
0x04c48…04c52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x015a}
0x04c52…04c66 Head {h00=0x0010, h01=0x0050, text=»LCADM1 EQU *«, t00=0x0030, t01=0x0164}
0x04c66…04c7c Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.1 «, t00=0x0030, t01=0x0178}
0x04c7c…04c92 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=1 «, t00=0x0030, t01=0x018e}
0x04c92…04ca8 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.2 «, t00=0x0031, t01=0x0014}
0x04ca8…04cbe Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=2 «, t00=0x0031, t01=0x002a}
0x04cbe…04cd4 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.3 «, t00=0x0031, t01=0x0040}
0x04cd4…04cea Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=3 «, t00=0x0031, t01=0x0056}
0x04cea…04d00 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.4 «, t00=0x0031, t01=0x006c}
0x04d00…04d16 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=4 «, t00=0x0031, t01=0x0082}
0x04d16…04d2c Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.5 «, t00=0x0031, t01=0x0098}
0x04d2c…04d42 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=5 «, t00=0x0031, t01=0x00ae}
0x04d42…04d58 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.6 «, t00=0x0031, t01=0x00c4}
0x04d58…04d6e Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=6 «, t00=0x0031, t01=0x00da}
0x04d6e…04d84 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.7 «, t00=0x0031, t01=0x00f0}
0x04d84…04d9a Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=7 «, t00=0x0031, t01=0x0106}
0x04d9a…04db0 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD1.8 «, t00=0x0031, t01=0x011c}
0x04db0…04dbc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0132}
0x04dbc…04dca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x013e}
0x04dca…04dd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x014c}
0x04dd4…04e04 Head {h00=0x002c, h01=0x0050, text=»* LOGICAL CHANNEL ADMINISTRATION BLOCKS «, t00=0x0031, t01=0x0156}
0x04e04…04e0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0186}
0x04e0e…04e24 Head {h00=0x0012, h01=0x0050, text=»LCAD1.1 EQU * «, t00=0x0031, t01=0x0190}
0x04e24…04e40 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.1+LCALNG«, t00=0x0032, t01=0x0016}
0x04e40…04e56 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=1 «, t00=0x0032, t01=0x0032}
0x04e56…04e6c Head {h00=0x0012, h01=0x0050, text=»LCAD1.2 EQU * «, t00=0x0032, t01=0x0048}
0x04e6c…04e88 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.2+LCALNG«, t00=0x0032, t01=0x005e}
0x04e88…04e9e Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=2 «, t00=0x0032, t01=0x007a}
0x04e9e…04eb4 Head {h00=0x0012, h01=0x0050, text=»LCAD1.3 EQU * «, t00=0x0032, t01=0x0090}
0x04eb4…04ed0 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.3+LCALNG«, t00=0x0032, t01=0x00a6}
0x04ed0…04ee6 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=3 «, t00=0x0032, t01=0x00c2}
0x04ee6…04efc Head {h00=0x0012, h01=0x0050, text=»LCAD1.4 EQU * «, t00=0x0032, t01=0x00d8}
0x04efc…04f18 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.4+LCALNG«, t00=0x0032, t01=0x00ee}
0x04f18…04f2e Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=4 «, t00=0x0032, t01=0x010a}
0x04f2e…04f44 Head {h00=0x0012, h01=0x0050, text=»LCAD1.5 EQU * «, t00=0x0032, t01=0x0120}
0x04f44…04f60 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.5+LCALNG«, t00=0x0032, t01=0x0136}
0x04f60…04f76 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=5 «, t00=0x0032, t01=0x0152}
0x04f76…04f8c Head {h00=0x0012, h01=0x0050, text=»LCAD1.6 EQU * «, t00=0x0032, t01=0x0168}
0x04f8c…04fa8 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.6+LCALNG«, t00=0x0032, t01=0x017e}
0x04fa8…04fbe Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=6 «, t00=0x0033, t01=0x000a}
0x04fbe…04fd4 Head {h00=0x0012, h01=0x0050, text=»LCAD1.7 EQU * «, t00=0x0033, t01=0x0020}
0x04fd4…04ff0 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.7+LCALNG«, t00=0x0033, t01=0x0036}
0x04ff0…05006 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL1=7 «, t00=0x0033, t01=0x0052}
0x05006…0501c Head {h00=0x0012, h01=0x0050, text=»LCAD1.8 EQU * «, t00=0x0033, t01=0x0068}
0x0501c…05038 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD1.8+LCALNG«, t00=0x0033, t01=0x007e}
0x05038…05044 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x009a}
0x05044…0505a Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0033, t01=0x00a6}
0x0505a…05068 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x00bc}
0x05068…05072 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00ca}
0x05072…0509c Head {h00=0x0026, h01=0x0050, text=»* SECOND LINE ADMINISTRATION BLOCK«, t00=0x0033, t01=0x00d4}
0x0509c…050a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00fe}
0x050a6…050ba Head {h00=0x0010, h01=0x0050, text=»LINBL2 EQU *«, t00=0x0033, t01=0x0108}
0x050ba…050d6 Head {h00=0x0018, h01=0x0050, text=» DATA /61 FILE CODE «, t00=0x0033, t01=0x011c}
0x050d6…05104 Head {h00=0x002a, h01=0x0050, text=» DATA LCADM2 LOG. CHANNEL ADM. POINTER«, t00=0x0033, t01=0x0138}
0x05104…0512c Head {h00=0x0024, h01=0x0050, text=» DATA SYMDL2 MAX. PACKET LENGTH «, t00=0x0033, t01=0x0166}
0x0512c…05152 Head {h00=0x0022, h01=0x0050, text=» DATA SYMXW2 MAX. WINDOW SIZE «, t00=0x0033, t01=0x018e}
0x05152…0518a Head {h00=0x0034, h01=0x0050, text=» BYTE SYNRL2,SYNRP2 # OF LOG.CH. AND # OF PVC'S «, t00=0x0034, t01=0x0024}
0x0518a…051a6 Head {h00=0x0018, h01=0x0050, text=» RORG LINBL2+LNBLNG «, t00=0x0034, t01=0x005c}
0x051a6…051b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0078}
0x051b0…051e2 Head {h00=0x002e, h01=0x0050, text=»* BLOCK WITH LOGICAL CHANNEL ADM. POINTERS«, t00=0x0034, t01=0x0082}
0x051e2…051ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00b4}
0x051ec…05200 Head {h00=0x0010, h01=0x0050, text=»LCADM2 EQU *«, t00=0x0034, t01=0x00be}
0x05200…05216 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.1 «, t00=0x0034, t01=0x00d2}
0x05216…0522c Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=1 «, t00=0x0034, t01=0x00e8}
0x0522c…05242 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.2 «, t00=0x0034, t01=0x00fe}
0x05242…05258 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=2 «, t00=0x0034, t01=0x0114}
0x05258…0526e Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.3 «, t00=0x0034, t01=0x012a}
0x0526e…05284 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=3 «, t00=0x0034, t01=0x0140}
0x05284…0529a Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.4 «, t00=0x0034, t01=0x0156}
0x0529a…052b0 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=4 «, t00=0x0034, t01=0x016c}
0x052b0…052c6 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.5 «, t00=0x0034, t01=0x0182}
0x052c6…052dc Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=5 «, t00=0x0035, t01=0x0008}
0x052dc…052f2 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.6 «, t00=0x0035, t01=0x001e}
0x052f2…05308 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=6 «, t00=0x0035, t01=0x0034}
0x05308…0531e Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.7 «, t00=0x0035, t01=0x004a}
0x0531e…05334 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=7 «, t00=0x0035, t01=0x0060}
0x05334…0534a Head {h00=0x0012, h01=0x0050, text=» DATA LCAD2.8 «, t00=0x0035, t01=0x0076}
0x0534a…05356 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x008c}
0x05356…05364 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x0098}
0x05364…0537a Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0035, t01=0x00a6}
0x0537a…05384 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00bc}
0x05384…053b4 Head {h00=0x002c, h01=0x0050, text=»* LOGICAL CHANNEL ADMINISTRATION BLOCKS «, t00=0x0035, t01=0x00c6}
0x053b4…053be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00f6}
0x053be…053d4 Head {h00=0x0012, h01=0x0050, text=»LCAD2.1 EQU * «, t00=0x0035, t01=0x0100}
0x053d4…053f0 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.1+LCALNG«, t00=0x0035, t01=0x0116}
0x053f0…05406 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=1 «, t00=0x0035, t01=0x0132}
0x05406…0541c Head {h00=0x0012, h01=0x0050, text=»LCAD2.2 EQU * «, t00=0x0035, t01=0x0148}
0x0541c…05438 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.2+LCALNG«, t00=0x0035, t01=0x015e}
0x05438…0544e Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=2 «, t00=0x0035, t01=0x017a}
0x0544e…05464 Head {h00=0x0012, h01=0x0050, text=»LCAD2.3 EQU * «, t00=0x0035, t01=0x0190}
0x05464…05480 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.3+LCALNG«, t00=0x0036, t01=0x0016}
0x05480…05496 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=3 «, t00=0x0036, t01=0x0032}
0x05496…054ac Head {h00=0x0012, h01=0x0050, text=»LCAD2.4 EQU * «, t00=0x0036, t01=0x0048}
0x054ac…054c8 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.4+LCALNG«, t00=0x0036, t01=0x005e}
0x054c8…054de Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=4 «, t00=0x0036, t01=0x007a}
0x054de…054f4 Head {h00=0x0012, h01=0x0050, text=»LCAD2.5 EQU * «, t00=0x0036, t01=0x0090}
0x054f4…05510 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.5+LCALNG«, t00=0x0036, t01=0x00a6}
0x05510…05526 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=5 «, t00=0x0036, t01=0x00c2}
0x05526…0553c Head {h00=0x0012, h01=0x0050, text=»LCAD2.6 EQU * «, t00=0x0036, t01=0x00d8}
0x0553c…05558 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.6+LCALNG«, t00=0x0036, t01=0x00ee}
0x05558…0556e Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=6 «, t00=0x0036, t01=0x010a}
0x0556e…05584 Head {h00=0x0012, h01=0x0050, text=»LCAD2.7 EQU * «, t00=0x0036, t01=0x0120}
0x05584…055a0 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.7+LCALNG«, t00=0x0036, t01=0x0136}
0x055a0…055b6 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL2=7 «, t00=0x0036, t01=0x0152}
0x055b6…055cc Head {h00=0x0012, h01=0x0050, text=»LCAD2.8 EQU * «, t00=0x0036, t01=0x0168}
0x055cc…055e8 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD2.8+LCALNG«, t00=0x0036, t01=0x017e}
0x055e8…055f4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x000a}
0x055f4…0560a Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0037, t01=0x0016}
0x0560a…05620 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x0037, t01=0x002c}
0x05620…0562e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0042}
0x0562e…05638 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0050}
0x05638…05662 Head {h00=0x0026, h01=0x0050, text=»* THIRTH LINE ADMINISTRATION BLOCK«, t00=0x0037, t01=0x005a}
0x05662…0566c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0084}
0x0566c…05680 Head {h00=0x0010, h01=0x0050, text=»LINBL3 EQU *«, t00=0x0037, t01=0x008e}
0x05680…0569c Head {h00=0x0018, h01=0x0050, text=» DATA /62 FILE CODE «, t00=0x0037, t01=0x00a2}
0x0569c…056ca Head {h00=0x002a, h01=0x0050, text=» DATA LCADM3 LOG. CHANNEL ADM. POINTER«, t00=0x0037, t01=0x00be}
0x056ca…056f2 Head {h00=0x0024, h01=0x0050, text=» DATA SYMDL3 MAX. PACKET LENGTH «, t00=0x0037, t01=0x00ec}
0x056f2…05718 Head {h00=0x0022, h01=0x0050, text=» DATA SYMXW3 MAX. WINDOW SIZE «, t00=0x0037, t01=0x0114}
0x05718…0574e Head {h00=0x0032, h01=0x0050, text=» BYTE SYNRL3,SYNRP3 # OF LOG.CH. AND # OF PV'S«, t00=0x0037, t01=0x013a}
0x0574e…0576a Head {h00=0x0018, h01=0x0050, text=» RORG LINBL3+LNBLNG «, t00=0x0037, t01=0x0170}
0x0576a…05774 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x018c}
0x05774…057a6 Head {h00=0x002e, h01=0x0050, text=»* BLOCK WITH LOGICAL CHANNEL ADM. POINTERS«, t00=0x0038, t01=0x0008}
0x057a6…057b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x003a}
0x057b0…057c4 Head {h00=0x0010, h01=0x0050, text=»LCADM3 EQU *«, t00=0x0038, t01=0x0044}
0x057c4…057da Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.1 «, t00=0x0038, t01=0x0058}
0x057da…057f0 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=1 «, t00=0x0038, t01=0x006e}
0x057f0…05806 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.2 «, t00=0x0038, t01=0x0084}
0x05806…0581c Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=2 «, t00=0x0038, t01=0x009a}
0x0581c…05832 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.3 «, t00=0x0038, t01=0x00b0}
0x05832…05848 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=3 «, t00=0x0038, t01=0x00c6}
0x05848…0585e Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.4 «, t00=0x0038, t01=0x00dc}
0x0585e…05874 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=4 «, t00=0x0038, t01=0x00f2}
0x05874…0588a Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.5 «, t00=0x0038, t01=0x0108}
0x0588a…058a0 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=5 «, t00=0x0038, t01=0x011e}
0x058a0…058b6 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.6 «, t00=0x0038, t01=0x0134}
0x058b6…058cc Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=6 «, t00=0x0038, t01=0x014a}
0x058cc…058e2 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.7 «, t00=0x0038, t01=0x0160}
0x058e2…058f8 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=7 «, t00=0x0038, t01=0x0176}
0x058f8…0590e Head {h00=0x0012, h01=0x0050, text=» DATA LCAD3.8 «, t00=0x0038, t01=0x018c}
0x0590e…0591a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0012}
0x0591a…05928 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x001e}
0x05928…0593e Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0039, t01=0x002c}
0x0593e…05954 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x0039, t01=0x0042}
0x05954…0595e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0058}
0x0595e…0598e Head {h00=0x002c, h01=0x0050, text=»* LOGICAL CHANNEL ADMINISTRATION BLOCKS «, t00=0x0039, t01=0x0062}
0x0598e…05998 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0092}
0x05998…059ae Head {h00=0x0012, h01=0x0050, text=»LCAD3.1 EQU * «, t00=0x0039, t01=0x009c}
0x059ae…059ca Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.1+LCALNG«, t00=0x0039, t01=0x00b2}
0x059ca…059e0 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=1 «, t00=0x0039, t01=0x00ce}
0x059e0…059f6 Head {h00=0x0012, h01=0x0050, text=»LCAD3.2 EQU * «, t00=0x0039, t01=0x00e4}
0x059f6…05a12 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.2+LCALNG«, t00=0x0039, t01=0x00fa}
0x05a12…05a28 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=2 «, t00=0x0039, t01=0x0116}
0x05a28…05a3e Head {h00=0x0012, h01=0x0050, text=»LCAD3.3 EQU * «, t00=0x0039, t01=0x012c}
0x05a3e…05a5a Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.3+LCALNG«, t00=0x0039, t01=0x0142}
0x05a5a…05a70 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=3 «, t00=0x0039, t01=0x015e}
0x05a70…05a86 Head {h00=0x0012, h01=0x0050, text=»LCAD3.4 EQU * «, t00=0x0039, t01=0x0174}
0x05a86…05aa2 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.4+LCALNG«, t00=0x0039, t01=0x018a}
0x05aa2…05ab8 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=4 «, t00=0x003a, t01=0x0016}
0x05ab8…05ace Head {h00=0x0012, h01=0x0050, text=»LCAD3.5 EQU * «, t00=0x003a, t01=0x002c}
0x05ace…05aea Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.5+LCALNG«, t00=0x003a, t01=0x0042}
0x05aea…05b00 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=5 «, t00=0x003a, t01=0x005e}
0x05b00…05b16 Head {h00=0x0012, h01=0x0050, text=»LCAD3.6 EQU * «, t00=0x003a, t01=0x0074}
0x05b16…05b32 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.6+LCALNG«, t00=0x003a, t01=0x008a}
0x05b32…05b48 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=6 «, t00=0x003a, t01=0x00a6}
0x05b48…05b5e Head {h00=0x0012, h01=0x0050, text=»LCAD3.7 EQU * «, t00=0x003a, t01=0x00bc}
0x05b5e…05b7a Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.7+LCALNG«, t00=0x003a, t01=0x00d2}
0x05b7a…05b90 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL3=7 «, t00=0x003a, t01=0x00ee}
0x05b90…05ba6 Head {h00=0x0012, h01=0x0050, text=»LCAD3.8 EQU * «, t00=0x003a, t01=0x0104}
0x05ba6…05bc2 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD3.8+LCALNG«, t00=0x003a, t01=0x011a}
0x05bc2…05bce Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x0136}
0x05bce…05be4 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x003a, t01=0x0142}
0x05be4…05bfa Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x003a, t01=0x0158}
0x05bfa…05c10 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=3 «, t00=0x003a, t01=0x016e}
0x05c10…05c1e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003a, t01=0x0184}
0x05c1e…05c28 (59, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0004}
0x05c28…05c52 Head {h00=0x0026, h01=0x0050, text=»* FOURTH LINE ADMINISTRATION BLOCK«, t00=0x003b, t01=0x000e}
0x05c52…05c5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0038}
0x05c5c…05c70 Head {h00=0x0010, h01=0x0050, text=»LINBL4 EQU *«, t00=0x003b, t01=0x0042}
0x05c70…05c8c Head {h00=0x0018, h01=0x0050, text=» DATA /63 FILE CODE «, t00=0x003b, t01=0x0056}
0x05c8c…05cba Head {h00=0x002a, h01=0x0050, text=» DATA LCADM4 LOG. CHANNEL ADM. POINTER«, t00=0x003b, t01=0x0072}
0x05cba…05ce2 Head {h00=0x0024, h01=0x0050, text=» DATA SYMDL4 MAX. PACKET LENGTH «, t00=0x003b, t01=0x00a0}
0x05ce2…05d08 Head {h00=0x0022, h01=0x0050, text=» DATA SYMXW4 MAX. WINDOW SIZE «, t00=0x003b, t01=0x00c8}
0x05d08…05d40 Head {h00=0x0034, h01=0x0050, text=» BYTE SYNRL4,SYNRP4 # OF LOG.CH. AND # OF PVC'S «, t00=0x003b, t01=0x00ee}
0x05d40…05d5c Head {h00=0x0018, h01=0x0050, text=» RORG LINBL4+LNBLNG «, t00=0x003b, t01=0x0126}
0x05d5c…05d66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0142}
0x05d66…05d98 Head {h00=0x002e, h01=0x0050, text=»* BLOCK WITH LOGICAL CHANNEL ADM. POINTERS«, t00=0x003b, t01=0x014c}
0x05d98…05da2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x017e}
0x05da2…05db6 Head {h00=0x0010, h01=0x0050, text=»LCADM4 EQU *«, t00=0x003b, t01=0x0188}
0x05db6…05dcc Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.1 «, t00=0x003c, t01=0x000c}
0x05dcc…05de2 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=1 «, t00=0x003c, t01=0x0022}
0x05de2…05df8 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.2 «, t00=0x003c, t01=0x0038}
0x05df8…05e0e Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=2 «, t00=0x003c, t01=0x004e}
0x05e0e…05e24 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.3 «, t00=0x003c, t01=0x0064}
0x05e24…05e3a Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=3 «, t00=0x003c, t01=0x007a}
0x05e3a…05e50 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.4 «, t00=0x003c, t01=0x0090}
0x05e50…05e66 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=4 «, t00=0x003c, t01=0x00a6}
0x05e66…05e7c Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.5 «, t00=0x003c, t01=0x00bc}
0x05e7c…05e92 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=5 «, t00=0x003c, t01=0x00d2}
0x05e92…05ea8 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.6 «, t00=0x003c, t01=0x00e8}
0x05ea8…05ebe Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=6 «, t00=0x003c, t01=0x00fe}
0x05ebe…05ed4 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.7 «, t00=0x003c, t01=0x0114}
0x05ed4…05eea Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=7 «, t00=0x003c, t01=0x012a}
0x05eea…05f00 Head {h00=0x0012, h01=0x0050, text=» DATA LCAD4.8 «, t00=0x003c, t01=0x0140}
0x05f00…05f0c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0156}
0x05f0c…05f1a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x0162}
0x05f1a…05f30 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x003c, t01=0x0170}
0x05f30…05f46 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=2 «, t00=0x003c, t01=0x0186}
0x05f46…05f5c Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=3 «, t00=0x003d, t01=0x000c}
0x05f5c…05f66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0022}
0x05f66…05f96 Head {h00=0x002c, h01=0x0050, text=»* LOGICAL CHANNEL ADMINISTRATION BLOCKS «, t00=0x003d, t01=0x002c}
0x05f96…05fa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x005c}
0x05fa0…05fb6 Head {h00=0x0012, h01=0x0050, text=»LCAD4.1 EQU * «, t00=0x003d, t01=0x0066}
0x05fb6…05fd2 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.1+LCALNG«, t00=0x003d, t01=0x007c}
0x05fd2…05fe8 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=1 «, t00=0x003d, t01=0x0098}
0x05fe8…05ffe Head {h00=0x0012, h01=0x0050, text=»LCAD4.2 EQU * «, t00=0x003d, t01=0x00ae}
0x05ffe…0601a Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.2+LCALNG«, t00=0x003d, t01=0x00c4}
0x0601a…06030 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=2 «, t00=0x003d, t01=0x00e0}
0x06030…06046 Head {h00=0x0012, h01=0x0050, text=»LCAD4.3 EQU * «, t00=0x003d, t01=0x00f6}
0x06046…06062 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.3+LCALNG«, t00=0x003d, t01=0x010c}
0x06062…06078 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=3 «, t00=0x003d, t01=0x0128}
0x06078…0608e Head {h00=0x0012, h01=0x0050, text=»LCAD4.4 EQU * «, t00=0x003d, t01=0x013e}
0x0608e…060aa Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.4+LCALNG«, t00=0x003d, t01=0x0154}
0x060aa…060c0 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=4 «, t00=0x003d, t01=0x0170}
0x060c0…060d6 Head {h00=0x0012, h01=0x0050, text=»LCAD4.5 EQU * «, t00=0x003d, t01=0x0186}
0x060d6…060f2 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.5+LCALNG«, t00=0x003e, t01=0x000c}
0x060f2…06108 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=5 «, t00=0x003e, t01=0x0028}
0x06108…0611e Head {h00=0x0012, h01=0x0050, text=»LCAD4.6 EQU * «, t00=0x003e, t01=0x003e}
0x0611e…0613a Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.6+LCALNG«, t00=0x003e, t01=0x0054}
0x0613a…06150 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=6 «, t00=0x003e, t01=0x0070}
0x06150…06166 Head {h00=0x0012, h01=0x0050, text=»LCAD4.7 EQU * «, t00=0x003e, t01=0x0086}
0x06166…06182 Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.7+LCALNG«, t00=0x003e, t01=0x009c}
0x06182…06198 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRL4=7 «, t00=0x003e, t01=0x00b8}
0x06198…061ae Head {h00=0x0012, h01=0x0050, text=»LCAD4.8 EQU * «, t00=0x003e, t01=0x00ce}
0x061ae…061ca Head {h00=0x0018, h01=0x0050, text=» RORG LCAD4.8+LCALNG«, t00=0x003e, t01=0x00e4}
0x061ca…061d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0100}
0x061d6…061e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x010c}
0x061e0…061ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003e, t01=0x0116}
0x061ee…061f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0124}
0x061f8…06202 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x012e}
0x06202…06218 Head {h00=0x0012, h01=0x0050, text=»* BUFFER POOL «, t00=0x003e, t01=0x0138}
0x06218…06222 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x014e}
0x06222…06274 Head {h00=0x004e, h01=0x0050, text=»* THE SIZE OF THE BUFFER AREAS CAN BE OBTAINED IN THE FOLLOWING WAY«, t00=0x003e, t01=0x0158}
0x06274…062c2 Head {h00=0x004a, h01=0x0050, text=»* NUMBER OF BUFFERS NEEDED PER LOGICAL CHANNEL = WINDOW SIZE «, t00=0x003f, t01=0x001a}
0x062c2…06312 Head {h00=0x004c, h01=0x0050, text=»* PER LINE SYNRRC BUFFERS FOR INPUT REQUEST AND SYUBNR BUFFERS «, t00=0x003f, t01=0x0068}
0x06312…06338 Head {h00=0x0022, h01=0x0050, text=»* TO BE USED BY HDLC «, t00=0x003f, t01=0x00b8}
0x06338…0638c Head {h00=0x0050, h01=0x0050, text=»* THE TOTAL NUMBER OF BUFFERS CAN THEN BE CALCULATED BY THE FORMULA«, t00=0x003f, t01=0x00de}
0x0638c…063da Head {h00=0x004a, h01=0x0050, text=»* SYNRLN*(SYNRRC+SYUBNR)+SYNRL1*SYMXW1+SYNRL2*SYMXW2+.... ETC«, t00=0x003f, t01=0x0132}
0x063da…063e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0180}
0x063e4…0643a Head {h00=0x0052, h01=0x0050, text=»* THE BUFFER LENGTH IS OBTAINED BY SYMXDL+BEGDAT+1. THIS IS THE LENGTH «, t00=0x003f, t01=0x018a}
0x0643a…06488 Head {h00=0x004a, h01=0x0050, text=»* IN CHARACTERS. THIS LENGTH HAS TO BE EVEN (CHAIN POINTER FOR «, t00=0x0040, t01=0x0050}
0x06488…064ac Head {h00=0x0020, h01=0x0050, text=»* QUEUEING EXCLUDED) «, t00=0x0040, t01=0x009e}
0x064ac…064b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00c2}
0x064b6…064d8 Head {h00=0x001e, h01=0x0050, text=»BUFLEN EQU SYMXDL+BEGDAT+1«, t00=0x0040, t01=0x00cc}
0x064d8…064e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00ee}
0x064e2…0652a Head {h00=0x0044, h01=0x0050, text=»* THE POOLSIZE IN WORDS IS OBTAINED BY NRBUF*(BUFLEN+2)/2«, t00=0x0040, t01=0x00f8}
0x0652a…06534 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0140}
0x06534…06548 Head {h00=0x0010, h01=0x0050, text=»X:V EQU 680 «, t00=0x0040, t01=0x014a}
0x06548…06574 Head {h00=0x0028, h01=0x0050, text=»POOLEN EQU X:V LENGTH OF BUFFER POOL«, t00=0x0040, t01=0x015e}
0x06574…06588 Head {h00=0x0010, h01=0x0050, text=»BUFPOL EQU *«, t00=0x0040, t01=0x018a}
0x06588…065a6 Head {h00=0x001a, h01=0x0050, text=» RES POOLEN POOL AREA «, t00=0x0041, t01=0x000e}
0x065a6…065c2 Head {h00=0x0018, h01=0x0050, text=» DATA 0 END OF QUEUE«, t00=0x0041, t01=0x002c}
0x065c2…065d6 Head {h00=0x0010, h01=0x0050, text=»BPEND EQU * «, t00=0x0041, t01=0x0048}
0x065d6…065e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x005c}
0x065e0…06602 Head {h00=0x001e, h01=0x0050, text=»* BUFFER POOL CHAIN ANCHOR«, t00=0x0041, t01=0x0066}
0x06602…0660c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0088}
0x0660c…06626 Head {h00=0x0016, h01=0x0050, text=»BUFANC DATA BUFPOL«, t00=0x0041, t01=0x0092}
0x06626…06630 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00ac}
0x06630…0663e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x00b6}
0x0663e…06648 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00c4}
0x06648…06672 Head {h00=0x0026, h01=0x0050, text=»* TTAB FOR #X-TASK IN X25 PACKAGE «, t00=0x0041, t01=0x00ce}
0x06672…0667c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00f8}
0x0667c…06692 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0041, t01=0x0102}
0x06692…066ba Head {h00=0x0024, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0 MMU TABLE «, t00=0x0041, t01=0x0118}
0x066ba…066da Head {h00=0x001c, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0 . «, t00=0x0041, t01=0x0140}
0x066da…066fe Head {h00=0x0020, h01=0x0050, text=» DATA 0 CURRENT SEGMENT BASE«, t00=0x0041, t01=0x0160}
0x066fe…06724 Head {h00=0x0022, h01=0x0050, text=» DATA 0 SEGMENT TABLE POINTER «, t00=0x0041, t01=0x0184}
0x06724…0674a Head {h00=0x0022, h01=0x0050, text=» DATA 0 SEGMENT BLOCK POINTER «, t00=0x0042, t01=0x001a}
0x0674a…06756 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0040}
0x06756…06788 Head {h00=0x002e, h01=0x0050, text=» DATA 0 APPLICATION CONTROL BLOCK POINTER «, t00=0x0042, t01=0x004c}
0x06788…0679c Head {h00=0x0010, h01=0x0050, text=»TTBX25 EQU *«, t00=0x0042, t01=0x007e}
0x0679c…067c2 Head {h00=0x0022, h01=0x0050, text=» DATA 0 DISPATCHER QUEUE LINK «, t00=0x0042, t01=0x0092}
0x067c2…067e8 Head {h00=0x0022, h01=0x0050, text=» DATA '#X' TASK IDENTIFICATION«, t00=0x0042, t01=0x00b8}
0x067e8…06808 Head {h00=0x001c, h01=0x0050, text=» DATA 50 PRIORITY LEVEL «, t00=0x0042, t01=0x00de}
0x06808…06828 Head {h00=0x001c, h01=0x0050, text=» DATA 0 PENDING POINTER «, t00=0x0042, t01=0x00fe}
0x06828…06854 Head {h00=0x0028, h01=0x0050, text=» DATA /C8C0 PSW(PROGRAM STATUS WORD)«, t00=0x0042, t01=0x011e}
0x06854…06874 Head {h00=0x001c, h01=0x0050, text=» DATA 0 DISPATCH ADDRESS«, t00=0x0042, t01=0x014a}
0x06874…068ac Head {h00=0x0034, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0 REGISTER SAVE AREA,A1-A14 «, t00=0x0042, t01=0x016a}
0x068ac…068ca Head {h00=0x001a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0 . «, t00=0x0043, t01=0x0012}
0x068ca…068d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0030}
0x068d4…068e2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0043, t01=0x003a}
0x068e2…068ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0048}
0x068ec…068f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0052}
0x068f6…0692c Head {h00=0x0032, h01=0x0050, text=»* MODULE CALLED BY TOSSIO FOR AN USER REQUEST «, t00=0x0043, t01=0x005c}
0x0692c…06936 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0092}
0x06936…0696a Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0043, t01=0x009c}
0x0696a…06974 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00d0}
0x06974…0698e Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMETER:«, t00=0x0043, t01=0x00da}
0x0698e…069aa Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x0043, t01=0x00f4}
0x069aa…069b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0110}
0x069b4…069d0 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0043, t01=0x011a}
0x069d0…069e8 Head {h00=0x0014, h01=0x0050, text=»* ABI DRX25 «, t00=0x0043, t01=0x0136}
0x069e8…069f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x014e}
0x069f2…06a1a Head {h00=0x0024, h01=0x0050, text=»***** DRIVER ADDRESS BLOCK *****«, t00=0x0043, t01=0x0158}
0x06a1a…06a3c Head {h00=0x001e, h01=0x0050, text=» DATA SYMXDL BUFFER LENGTH«, t00=0x0043, t01=0x0180}
0x06a3c…06a58 Head {h00=0x0018, h01=0x0050, text=» DATA 0 DEVICE INDEX«, t00=0x0044, t01=0x0012}
0x06a58…06a6c Head {h00=0x0010, h01=0x0050, text=»DRX25 EQU * «, t00=0x0044, t01=0x002e}
0x06a6c…06a94 Head {h00=0x0024, h01=0x0050, text=» DATA DRX250 ACTIVATION ADDRESS «, t00=0x0044, t01=0x0042}
0x06a94…06abe Head {h00=0x0026, h01=0x0050, text=» DATA ABTREQ ABORT ROUTINE ADDRESS«, t00=0x0044, t01=0x006a}
0x06abe…06ae6 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0044, t01=0x0094}
0x06ae6…06afa Head {h00=0x0010, h01=0x0050, text=»DRX250 EQU *«, t00=0x0044, t01=0x00bc}
0x06afa…06b16 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A6 PARAMETER«, t00=0x0044, t01=0x00d0}
0x06b16…06b3e Head {h00=0x0024, h01=0x0050, text=» LDKL A5,TTBX25 GET TTAB ADDRESS«, t00=0x0044, t01=0x00ec}
0x06b3e…06b66 Head {h00=0x0024, h01=0x0050, text=» LDKL A2,RHOP ACTIVATION ADDRESS«, t00=0x0044, t01=0x0114}
0x06b66…06b78 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0044, t01=0x013c}
0x06b78…06b9e Head {h00=0x0022, h01=0x0050, text=» CF A15,ACTOT ACTIVATE #X-TASK«, t00=0x0044, t01=0x014e}
0x06b9e…06bb0 Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0044, t01=0x0174}
0x06bb0…06bbe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0044, t01=0x0186}
0x06bbe…06bc8 (69, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0004}
0x06bc8…06bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x000e}
0x06bd2…06c0c Head {h00=0x0036, h01=0x0050, text=»* THIS MODULE IS CALLED AT MONITOR INITIATION TIME«, t00=0x0045, t01=0x0018}
0x06c0c…06c16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0052}
0x06c16…06c4a Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0045, t01=0x005c}
0x06c4a…06c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0090}
0x06c54…06c70 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0045, t01=0x009a}
0x06c70…06c80 Head {h00=0x000c, h01=0x0050, text=»* NONE «, t00=0x0045, t01=0x00b6}
0x06c80…06c8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00c6}
0x06c8a…06ca6 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0045, t01=0x00d0}
0x06ca6…06cc2 Head {h00=0x0018, h01=0x0050, text=»* CF A15,X25:ON «, t00=0x0045, t01=0x00ec}
0x06cc2…06ccc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0108}
0x06ccc…06ce0 Head {h00=0x0010, h01=0x0050, text=»X25:ON EQU *«, t00=0x0045, t01=0x0112}
0x06ce0…06d18 Head {h00=0x0034, h01=0x0050, text=» LDKL A1,LINTAB TABLE WITH LINE BLOCK ADDRESSES «, t00=0x0045, t01=0x0126}
0x06d18…06d2e Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0045, t01=0x015e}
0x06d2e…06d54 Head {h00=0x0022, h01=0x0050, text=» LDK A2,SYNRLN NUMBER OF LINES«, t00=0x0045, t01=0x0174}
0x06d54…06d60 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x000a}
0x06d60…06d6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0016}
0x06d6a…06d88 Head {h00=0x001a, h01=0x0050, text=»* INITIATE LINE BLOCK «, t00=0x0046, t01=0x0020}
0x06d88…06d92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x003e}
0x06d92…06da6 Head {h00=0x0010, h01=0x0050, text=»X25ON1 EQU *«, t00=0x0046, t01=0x0048}
0x06da6…06dcc Head {h00=0x0022, h01=0x0050, text=» LDR* A4,A1 LINE BLOCK ADDRESS«, t00=0x0046, t01=0x005c}
0x06dcc…06dec Head {h00=0x001c, h01=0x0050, text=» CM CMNFLG,A4 CLEAR FLAG«, t00=0x0046, t01=0x0082}
0x06dec…06e16 Head {h00=0x0026, h01=0x0050, text=» LD A6,CHAIN,A4 ANY DWT IN CHAIN ?«, t00=0x0046, t01=0x00a2}
0x06e16…06e2e Head {h00=0x0014, h01=0x0050, text=» RF(Z) X25ON3 NO«, t00=0x0046, t01=0x00cc}
0x06e2e…06e38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00e4}
0x06e38…06e4e Head {h00=0x0012, h01=0x0050, text=»* INITIATE DWT«, t00=0x0046, t01=0x00ee}
0x06e4e…06e58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0104}
0x06e58…06e6c Head {h00=0x0010, h01=0x0050, text=»X25ON2 EQU *«, t00=0x0046, t01=0x010e}
0x06e6c…06e80 Head {h00=0x0010, h01=0x0050, text=» LDKL A3,NEG«, t00=0x0046, t01=0x0122}
0x06e80…06ea2 Head {h00=0x001e, h01=0x0050, text=» ST A3,DWTST,A6 SET STATUS«, t00=0x0046, t01=0x0136}
0x06ea2…06ed6 Head {h00=0x0030, h01=0x0050, text=» CM DWTFNC,A6 CLEAR FUNCTION CODE AND STATE «, t00=0x0046, t01=0x0158}
0x06ed6…06f0a Head {h00=0x0030, h01=0x0050, text=» CM DWTRTP,A6 CLEAR RUNNING TIMER INDICATION«, t00=0x0046, t01=0x018c}
0x06f0a…06f3e Head {h00=0x0030, h01=0x0050, text=» LD A3,DWTCHN,A6 MORE DWT'S FOR THIS LINE ? «, t00=0x0047, t01=0x0030}
0x06f3e…06f48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0064}
0x06f48…06f56 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x006e}
0x06f56…06f6e Head {h00=0x0014, h01=0x0050, text=» CM DWTCHN,A6 . «, t00=0x0047, t01=0x007c}
0x06f6e…06f82 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A3 .«, t00=0x0047, t01=0x0094}
0x06f82…06f9c Head {h00=0x0016, h01=0x0050, text=» RB(NZ) X25ON2 YES«, t00=0x0047, t01=0x00a8}
0x06f9c…06fbc Head {h00=0x001c, h01=0x0050, text=» CM CHAIN,A4 RESET CHAIN«, t00=0x0047, t01=0x00c2}
0x06fbc…06fd0 Head {h00=0x0010, h01=0x0050, text=»X25ON3 EQU *«, t00=0x0047, t01=0x00e2}
0x06fd0…06fe6 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0047, t01=0x00f6}
0x06fe6…06ff8 Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0047, t01=0x010c}
0x06ff8…07016 Head {h00=0x001a, h01=0x0050, text=» SUK A2,1 NEXT LINE ? «, t00=0x0047, t01=0x011e}
0x07016…07030 Head {h00=0x0016, h01=0x0050, text=» RB(P) X25ON1 YES «, t00=0x0047, t01=0x013c}
0x07030…0703c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0156}
0x0703c…07046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0162}
0x07046…07064 Head {h00=0x001a, h01=0x0050, text=»* INITIATE BUFFER POOL«, t00=0x0047, t01=0x016c}
0x07064…0706e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x018a}
0x0706e…070a2 (72, 0, 398) Head {h00=0x0030, h01=0x0050, text=» LDKL A2,BUFPOL START ADDRESS OF BUFFER POOL«, t00=0x0048, t01=0x0004}
0x070a2…070ca Head {h00=0x0024, h01=0x0050, text=» ST A2,BUFANC BUFFER POOL ANCHOR«, t00=0x0048, t01=0x0038}
0x070ca…070de Head {h00=0x0010, h01=0x0050, text=»X25ON4 EQU *«, t00=0x0048, t01=0x0060}
0x070de…07104 Head {h00=0x0022, h01=0x0050, text=» LDR A1,A2 SAVE BUFFER ADDRESS«, t00=0x0048, t01=0x0074}
0x07104…0711c Head {h00=0x0014, h01=0x0050, text=» ADK A2,BUFLEN+2«, t00=0x0048, t01=0x009a}
0x0711c…0713c Head {h00=0x001c, h01=0x0050, text=» STR A2,A1 CREATE CHAIN «, t00=0x0048, t01=0x00b2}
0x0713c…0714e Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0048, t01=0x00d2}
0x0714e…07182 Head {h00=0x0030, h01=0x0050, text=» SUKL A3,BPEND END OF BUFFER POOL REACHED ? «, t00=0x0048, t01=0x00e4}
0x07182…0719a Head {h00=0x0014, h01=0x0050, text=» RB(L) X25ON4 NO«, t00=0x0048, t01=0x0118}
0x0719a…071b6 Head {h00=0x0018, h01=0x0050, text=» CMR A1 END OF CHAIN«, t00=0x0048, t01=0x0130}
0x071b6…071ca Head {h00=0x0010, h01=0x0050, text=» IFT TRACE=1«, t00=0x0048, t01=0x014c}
0x071ca…071d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0160}
0x071d4…071f2 Head {h00=0x001a, h01=0x0050, text=»* ACTIVATE TRACE TASK «, t00=0x0048, t01=0x016a}
0x071f2…071fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x0188}
0x071fc…07224 (73, 0, 400) Head {h00=0x0024, h01=0x0050, text=» LDKL A2,TRAC ACTIVATION ADDRESS«, t00=0x0049, t01=0x0004}
0x07224…07248 Head {h00=0x0020, h01=0x0050, text=» LDKL A5,TRTASK TTAB ADDRESS«, t00=0x0049, t01=0x002c}
0x07248…0726e Head {h00=0x0022, h01=0x0050, text=» CF A15,ACTOT ACTIVATE #T-TASK«, t00=0x0049, t01=0x0050}
0x0726e…0727a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0076}
0x0727a…07290 Head {h00=0x0012, h01=0x0050, text=» RTN A15 READY«, t00=0x0049, t01=0x0082}
0x07290…0729e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0049, t01=0x0098}
0x0729e…072a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00a6}
0x072a8…072c8 Head {h00=0x001c, h01=0x0050, text=»* ABORT REQUEST HANDLER «, t00=0x0049, t01=0x00b0}
0x072c8…072d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00d0}
0x072d2…07306 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0049, t01=0x00da}
0x07306…07310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x010e}
0x07310…0732a Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMETER:«, t00=0x0049, t01=0x0118}
0x0732a…07346 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x0049, t01=0x0132}
0x07346…07350 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x014e}
0x07350…0736c Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0049, t01=0x0158}
0x0736c…07388 Head {h00=0x0018, h01=0x0050, text=»* CF A15,ABTREQ «, t00=0x0049, t01=0x0174}
0x07388…07392 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0190}
0x07392…073ae Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x004a, t01=0x000a}
0x073ae…073be Head {h00=0x000c, h01=0x0050, text=»* NONE «, t00=0x004a, t01=0x0026}
0x073be…073fc Head {h00=0x003a, h01=0x0050, text=»* WHEN IT IS A ILLEGAL REQUEST THE ROUTINE WILL HALT «, t00=0x004a, t01=0x0036}
0x073fc…07406 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0074}
0x07406…0741a Head {h00=0x0010, h01=0x0050, text=»ABTREQ EQU *«, t00=0x004a, t01=0x007e}
0x0741a…07448 Head {h00=0x002a, h01=0x0050, text=» LDK A1,READAT WAS IT A READ REQUEST ?«, t00=0x004a, t01=0x0092}
0x07448…07462 Head {h00=0x0016, h01=0x0050, text=» CC A1,DWTFNC,A6 .«, t00=0x004a, t01=0x00c0}
0x07462…0747c Head {h00=0x0016, h01=0x0050, text=» RF(NE) ABT000 NO «, t00=0x004a, t01=0x00da}
0x0747c…074a2 Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTRTP,A6«, t00=0x004a, t01=0x00f4}
0x074a2…074c2 Head {h00=0x001c, h01=0x0050, text=» LDR A8,A14«, t00=0x004a, t01=0x011a}
0x074c2…074e6 Head {h00=0x0020, h01=0x0050, text=» LDKL A14,DCSTAK«, t00=0x004a, t01=0x013a}
0x074e6…07522 Head {h00=0x0038, h01=0x0050, text=» CF A14,CANTIM CANCEL TIMER«, t00=0x004a, t01=0x015e}
0x07522…07542 Head {h00=0x001c, h01=0x0050, text=» LDR A14,A8«, t00=0x004b, t01=0x000a}
0x07542…07566 Head {h00=0x0020, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x004b, t01=0x002a}
0x07566…0758c Head {h00=0x0022, h01=0x0050, text=» LD A8,DWTECB,A6«, t00=0x004b, t01=0x004e}
0x0758c…075b2 Head {h00=0x0022, h01=0x0050, text=» ST A1,ECBCW1,A8«, t00=0x004b, t01=0x0074}
0x075b2…075e0 Head {h00=0x002a, h01=0x0050, text=» LDKL A1,ABOT.RC RETURN CODE = ABORTED«, t00=0x004b, t01=0x009a}
0x075e0…07608 Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x004b, t01=0x00c8}
0x07608…0761c Head {h00=0x0010, h01=0x0050, text=»ABT000 EQU *«, t00=0x004b, t01=0x00f0}
0x0761c…07638 Head {h00=0x0018, h01=0x0050, text=» ABL TDISP DISPATCH «, t00=0x004b, t01=0x0104}
0x07638…07646 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004b, t01=0x0120}
0x07646…07650 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x012e}
0x07650…07694 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004b, t01=0x0138}
0x07694…0769e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x017c}
0x0769e…076c4 Head {h00=0x0022, h01=0x0050, text=»* REQUEST HANDLER OUTPUT PART «, t00=0x004b, t01=0x0186}
0x076c4…076ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x001c}
0x076ce…07712 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x004c, t01=0x0026}
0x07712…0771c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x006a}
0x0771c…0772e Head {h00=0x000e, h01=0x0050, text=»RHOP EQU *«, t00=0x004c, t01=0x0074}
0x0772e…0774c Head {h00=0x001a, h01=0x0050, text=» LDK A2,2«, t00=0x004c, t01=0x0086}
0x0774c…0778e Head {h00=0x003e, h01=0x0050, text=» ST A2,DCLEVL SET PROCESS INDICATION «, t00=0x004c, t01=0x00a4}
0x0778e…077b2 Head {h00=0x0020, h01=0x0050, text=» LDR A6,A1 COPY DWT ADDRESS «, t00=0x004c, t01=0x00e6}
0x077b2…077ca Head {h00=0x0014, h01=0x0050, text=» LD A8,DWTECB,A6«, t00=0x004c, t01=0x010a}
0x077ca…077e2 Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTSTE,A6«, t00=0x004c, t01=0x0122}
0x077e2…077fa Head {h00=0x0014, h01=0x0050, text=» LD A5,ECBRL,A8 «, t00=0x004c, t01=0x013a}
0x077fa…07820 Head {h00=0x0022, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER CODE«, t00=0x004c, t01=0x0152}
0x07820…0785a Head {h00=0x0036, h01=0x0050, text=» LDKL A11,TRANSP ROUTINE TO CALL TRANSPORT HANDLER«, t00=0x004c, t01=0x0178}
0x0785a…07886 Head {h00=0x0028, h01=0x0050, text=» LDKL A14,DCSTAK SUBR.STACK POINTER «, t00=0x004d, t01=0x0022}
0x07886…078aa Head {h00=0x0020, h01=0x0050, text=» ANK A7,/3F MASK ORDER CODE «, t00=0x004d, t01=0x004e}
0x078aa…078cc Head {h00=0x001e, h01=0x0050, text=» RF(Z) RSTS00 READ STATUS «, t00=0x004d, t01=0x0072}
0x078cc…078de Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x004d, t01=0x0094}
0x078de…078f8 Head {h00=0x0016, h01=0x0050, text=» RF(Z) READ00 READ«, t00=0x004d, t01=0x00a6}
0x078f8…07910 Head {h00=0x0014, h01=0x0050, text=» SUK A7,/06-/02 «, t00=0x004d, t01=0x00c0}
0x07910…0792c Head {h00=0x0018, h01=0x0050, text=» RF(Z) WRIT00 WRITE «, t00=0x004d, t01=0x00d8}
0x0792c…07944 Head {h00=0x0014, h01=0x0050, text=» SUK A7,/21-/06 «, t00=0x004d, t01=0x00f4}
0x07944…07960 Head {h00=0x0018, h01=0x0050, text=» ABL(Z) OPEN00 OPEN «, t00=0x004d, t01=0x010c}
0x07960…07978 Head {h00=0x0014, h01=0x0050, text=» SUK A7,/22-/21 «, t00=0x004d, t01=0x0128}
0x07978…07994 Head {h00=0x0018, h01=0x0050, text=» ABL(Z) CLOS00 CLOSE«, t00=0x004d, t01=0x0140}
0x07994…079ac Head {h00=0x0014, h01=0x0050, text=» SUK A7,/24-/22 «, t00=0x004d, t01=0x015c}
0x079ac…079d2 Head {h00=0x0022, h01=0x0050, text=» ABL(Z) CONA00 CONNECT ACTIVE «, t00=0x004d, t01=0x0174}
0x079d2…079dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x000a}
0x079dc…079ea Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004e, t01=0x0014}
0x079ea…079f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0022}
0x079f4…07a0c Head {h00=0x0014, h01=0x0050, text=» SUK A7,/27-/24 «, t00=0x004e, t01=0x002c}
0x07a0c…07a32 Head {h00=0x0022, h01=0x0050, text=» ABL(Z) CONP00 CONNECT PASSIVE«, t00=0x004e, t01=0x0044}
0x07a32…07a4a Head {h00=0x0014, h01=0x0050, text=» SUK A7,/2F-/27 «, t00=0x004e, t01=0x006a}
0x07a4a…07a6c Head {h00=0x001e, h01=0x0050, text=» ABL(Z) DISC00 DISCONNECT «, t00=0x004e, t01=0x0082}
0x07a6c…07a84 Head {h00=0x0014, h01=0x0050, text=» SUK A7,/38-/2F «, t00=0x004e, t01=0x00a4}
0x07a84…07aa6 Head {h00=0x001e, h01=0x0050, text=» ABL(Z) STAT00 SET STATUS «, t00=0x004e, t01=0x00bc}
0x07aa6…07abe Head {h00=0x0014, h01=0x0050, text=» SUK A7,/39-/38 «, t00=0x004e, t01=0x00de}
0x07abe…07ae2 Head {h00=0x0020, h01=0x0050, text=» ABL(Z) TIMO00 SET TIME OUT «, t00=0x004e, t01=0x00f6}
0x07ae2…07af6 Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x004e, t01=0x011a}
0x07af6…07b0a Head {h00=0x0010, h01=0x0050, text=» ADK A7,/39 «, t00=0x004e, t01=0x012e}
0x07b0a…07b1e Head {h00=0x0010, h01=0x0050, text=» SUK A7,/2D «, t00=0x004e, t01=0x0142}
0x07b1e…07b3e Head {h00=0x001c, h01=0x0050, text=» ABL(Z) STATS STATISTICS«, t00=0x004e, t01=0x0156}
0x07b3e…07b4a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x0176}
0x07b4a…07b5e Head {h00=0x0010, h01=0x0050, text=»ERRREQ EQU *«, t00=0x004e, t01=0x0182}
0x07b5e…07b84 Head {h00=0x0022, h01=0x0050, text=» LDKL A1,RQUE.RC REQUEST ERROR«, t00=0x004f, t01=0x0008}
0x07b84…07ba8 Head {h00=0x0020, h01=0x0050, text=» ABL RHEXIT COMPLETE REQUEST«, t00=0x004f, t01=0x002e}
0x07ba8…07bb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0052}
0x07bb2…07bc0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004f, t01=0x005c}
0x07bc0…07bca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x006a}
0x07bca…07c18 Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x004f, t01=0x0074}
0x07c18…07c22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00c2}
0x07c22…07c40 Head {h00=0x001a, h01=0x0050, text=»* READ STATUS REQUEST «, t00=0x004f, t01=0x00cc}
0x07c40…07c4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00ea}
0x07c4a…07c98 Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x004f, t01=0x00f4}
0x07c98…07ca2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0142}
0x07ca2…07cb6 Head {h00=0x0010, h01=0x0050, text=»RSTS00 EQU *«, t00=0x004f, t01=0x014c}
0x07cb6…07ce4 Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTLAD,A6 GET LOCAL DTE ADDRESS«, t00=0x004f, t01=0x0160}
0x07ce4…07d0a Head {h00=0x0022, h01=0x0050, text=» CF A14,FNDLIN GET LINE FLAGS «, t00=0x004f, t01=0x018e}
0x07d0a…07d1c Head {h00=0x000e, h01=0x0050, text=» SLL A1,8 «, t00=0x0050, t01=0x0024}
0x07d1c…07d3e Head {h00=0x001e, h01=0x0050, text=» ANK A4,/FF GET DWT STATE «, t00=0x0050, t01=0x0036}
0x07d3e…07d60 Head {h00=0x001e, h01=0x0050, text=» ORR A4,A1 PUT IT TOGETHER«, t00=0x0050, t01=0x0058}
0x07d60…07d78 Head {h00=0x0014, h01=0x0050, text=» ST A4,ECBCW1,A8«, t00=0x0050, t01=0x007a}
0x07d78…07d8e Head {h00=0x0012, h01=0x0050, text=» LDK A2,DWTRCI«, t00=0x0050, t01=0x0092}
0x07d8e…07da0 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0050, t01=0x00a8}
0x07da0…07dca Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A2 GET RETURN CODE INFO. «, t00=0x0050, t01=0x00ba}
0x07dca…07ddc Head {h00=0x000e, h01=0x0050, text=» LDR A7,A1«, t00=0x0050, t01=0x00e4}
0x07ddc…07e02 Head {h00=0x0022, h01=0x0050, text=» ANKL A1,-2 RESET TOLD.RC-BIT «, t00=0x0050, t01=0x00f6}
0x07e02…07e2c Head {h00=0x0026, h01=0x0050, text=» ANK A7,MORE.RC MORE INFORMATION ?«, t00=0x0050, t01=0x011c}
0x07e2c…07e46 Head {h00=0x0016, h01=0x0050, text=» ABL(Z) RHEXIT NO «, t00=0x0050, t01=0x0146}
0x07e46…07e68 Head {h00=0x001e, h01=0x0050, text=» ADK A5,0 REQUESTED LENGTH«, t00=0x0050, t01=0x0160}
0x07e68…07e8c Head {h00=0x0020, h01=0x0050, text=» RF(Z) RSTS10 NO USER BUFFER«, t00=0x0050, t01=0x0182}
0x07e8c…07eb4 Head {h00=0x0024, h01=0x0050, text=» ABL(N) ERRLEN INCORRECT LENGTH «, t00=0x0051, t01=0x0016}
0x07eb4…07ec6 Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0051, t01=0x003e}
0x07ec6…07eee Head {h00=0x0024, h01=0x0050, text=» ABL(NP) ERRLEN BUFFER TO SHORT «, t00=0x0051, t01=0x0050}
0x07eee…07ef8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0078}
0x07ef8…07f06 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0051, t01=0x0082}
0x07f06…07f10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0090}
0x07f10…07f30 Head {h00=0x001c, h01=0x0050, text=»* MORE INFORMATION FOUND«, t00=0x0051, t01=0x009a}
0x07f30…07f3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00ba}
0x07f3a…07f4e Head {h00=0x0010, h01=0x0050, text=»RSTS10 EQU *«, t00=0x0051, t01=0x00c4}
0x07f4e…07f76 Head {h00=0x0024, h01=0x0050, text=» XRRS A7,A2 RESET MORE INFO BIT «, t00=0x0051, t01=0x00d8}
0x07f76…07f8c Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0051, t01=0x0100}
0x07f8c…07fac Head {h00=0x001c, h01=0x0050, text=» ANK A1,RSET.RC+CLEA.RC «, t00=0x0051, t01=0x0116}
0x07fac…07fbe Head {h00=0x000e, h01=0x0050, text=» LDR A7,A1«, t00=0x0051, t01=0x0136}
0x07fbe…07fde Head {h00=0x001c, h01=0x0050, text=» ANK A1,RSET.RC RESET ? «, t00=0x0051, t01=0x0148}
0x07fde…07ff6 Head {h00=0x0014, h01=0x0050, text=» RF(Z) RSTS30 NO«, t00=0x0051, t01=0x0168}
0x07ff6…0801a Head {h00=0x0020, h01=0x0050, text=» XRRS A1,A2 RESET RESET-BIT «, t00=0x0051, t01=0x0180}
0x0801a…08024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0014}
0x08024…08046 Head {h00=0x001e, h01=0x0050, text=»* TEST IF RESET AND CLEAR «, t00=0x0052, t01=0x001e}
0x08046…08050 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0040}
0x08050…08068 Head {h00=0x0014, h01=0x0050, text=» ANK A7,CLEA.RC «, t00=0x0052, t01=0x004a}
0x08068…08080 Head {h00=0x0014, h01=0x0050, text=» RF(Z) RSTS15 NO«, t00=0x0052, t01=0x0062}
0x08080…080aa Head {h00=0x0026, h01=0x0050, text=» LDK A7,MORE.RC SET MORE INFO-BIT «, t00=0x0052, t01=0x007a}
0x080aa…080c0 Head {h00=0x0012, h01=0x0050, text=» XRRS A7,A2 . «, t00=0x0052, t01=0x00a4}
0x080c0…080d4 Head {h00=0x0010, h01=0x0050, text=»RSTS15 EQU *«, t00=0x0052, t01=0x00ba}
0x080d4…080e0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x00ce}
0x080e0…080fe Head {h00=0x001a, h01=0x0050, text=» LDK A7,RSET.RC RESET «, t00=0x0052, t01=0x00da}
0x080fe…08128 Head {h00=0x0026, h01=0x0050, text=» LDK A2,DWTRES DISP FOR RESET INFO«, t00=0x0052, t01=0x00f8}
0x08128…08148 Head {h00=0x001c, h01=0x0050, text=» ADK A5,0 USER BUFFER ? «, t00=0x0052, t01=0x0122}
0x08148…08162 Head {h00=0x0016, h01=0x0050, text=» ABL(Z) RHEXIT NO «, t00=0x0052, t01=0x0142}
0x08162…0816c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x015c}
0x0816c…0817a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x0166}
0x0817a…08184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0174}
0x08184…081aa Head {h00=0x0022, h01=0x0050, text=»* MOVE RESET/CLEAR INFORMATION«, t00=0x0052, t01=0x017e}
0x081aa…081b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0014}
0x081b4…081c8 Head {h00=0x0010, h01=0x0050, text=»RSTS20 EQU *«, t00=0x0053, t01=0x001e}
0x081c8…081da Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0053, t01=0x0032}
0x081da…081f2 Head {h00=0x0014, h01=0x0050, text=» LDK A3,2 LENGTH«, t00=0x0053, t01=0x0044}
0x081f2…0820a Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBEL,A8 «, t00=0x0053, t01=0x005c}
0x0820a…08220 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0053, t01=0x0074}
0x08220…08232 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0053, t01=0x008a}
0x08232…08256 Head {h00=0x0020, h01=0x0050, text=» LD A2,ECBBA,A8 USER BUFFER «, t00=0x0053, t01=0x009c}
0x08256…0826e Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTTAB,A6«, t00=0x0053, t01=0x00c0}
0x0826e…08280 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x0053, t01=0x00d8}
0x08280…082b4 Head {h00=0x0030, h01=0x0050, text=» CF A15,MOVSU MOVE RESET INFORMATION TO USER«, t00=0x0053, t01=0x00ea}
0x082b4…082c6 Head {h00=0x000e, h01=0x0050, text=» ENB . =1«, t00=0x0053, t01=0x011e}
0x082c6…082d2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x0130}
0x082d2…082e8 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0053, t01=0x013c}
0x082e8…08308 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 MOVE INFO...«, t00=0x0053, t01=0x0152}
0x08308…08332 Head {h00=0x0026, h01=0x0050, text=» ST* A1,ECBBA,A8 ...TO USER BUFFER«, t00=0x0053, t01=0x0172}
0x08332…0833e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x000c}
0x0833e…08350 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0054, t01=0x0018}
0x08350…08362 Head {h00=0x000e, h01=0x0050, text=» RF RHEXIT«, t00=0x0054, t01=0x002a}
0x08362…08378 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0054, t01=0x003c}
0x08378…0838c Head {h00=0x0010, h01=0x0050, text=»RSTS30 EQU *«, t00=0x0054, t01=0x0052}
0x0838c…0839e Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0054, t01=0x0066}
0x0839e…083be Head {h00=0x001c, h01=0x0050, text=» ANK A1,CLEA.RC CLEAR ? «, t00=0x0054, t01=0x0078}
0x083be…083e4 Head {h00=0x0022, h01=0x0050, text=» RF(Z) RHEXIT COMPLETE REQUEST«, t00=0x0054, t01=0x0098}
0x083e4…0841a Head {h00=0x0032, h01=0x0050, text=» LDK A3,TOLD.RC SET 'TOLD TO USER'-INDICATION «, t00=0x0054, t01=0x00be}
0x0841a…08430 Head {h00=0x0012, h01=0x0050, text=» ORRS A3,A2 . «, t00=0x0054, t01=0x00f4}
0x08430…0845a Head {h00=0x0026, h01=0x0050, text=» LDK A2,DWTCLE DISP FOR CLEAR INFO«, t00=0x0054, t01=0x010a}
0x0845a…0847a Head {h00=0x001c, h01=0x0050, text=» ADK A5,0 USER BUFFER ? «, t00=0x0054, t01=0x0134}
0x0847a…08490 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) RSTS20«, t00=0x0054, t01=0x0154}
0x08490…084b4 Head {h00=0x0020, h01=0x0050, text=» RF RHEXIT COMPLETE REQUEST «, t00=0x0054, t01=0x016a}
0x084b4…084c0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x018e}
0x084c0…084ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x000a}
0x084ca…084d8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0055, t01=0x0014}
0x084d8…084e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0022}
0x084e2…08526 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0055, t01=0x002c}
0x08526…08530 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0070}
0x08530…0855c Head {h00=0x0028, h01=0x0050, text=»* READ,WRITE AND SET STATUS REQUEST «, t00=0x0055, t01=0x007a}
0x0855c…08566 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00a6}
0x08566…085aa Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0055, t01=0x00b0}
0x085aa…085b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x00f4}
0x085b4…085c8 Head {h00=0x0010, h01=0x0050, text=»READ00 EQU *«, t00=0x0055, t01=0x00fe}
0x085c8…085dc Head {h00=0x0010, h01=0x0050, text=»WRIT00 EQU *«, t00=0x0055, t01=0x0112}
0x085dc…085f0 Head {h00=0x0010, h01=0x0050, text=»STAT00 EQU *«, t00=0x0055, t01=0x0126}
0x085f0…08608 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTLAD,A6«, t00=0x0055, t01=0x013a}
0x08608…08636 Head {h00=0x002a, h01=0x0050, text=» CF A14,FNDLIN FIND LINE BLOCK ADDRESS«, t00=0x0055, t01=0x0152}
0x08636…0865c Head {h00=0x0022, h01=0x0050, text=» ANK A1,STRTFL MASK START FLAG«, t00=0x0055, t01=0x0180}
0x0865c…0868a Head {h00=0x002a, h01=0x0050, text=» ABL(Z) ERRSYS INCORRECT SYSTEM STATE «, t00=0x0056, t01=0x0016}
0x0868a…0869e Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0056, t01=0x0044}
0x0869e…086b8 Head {h00=0x0016, h01=0x0050, text=» LDR A3,A4 DWTSTE «, t00=0x0056, t01=0x0058}
0x086b8…086e2 Head {h00=0x0026, h01=0x0050, text=» RF(Z) ERRSTE INCORRECT DWT STATE «, t00=0x0056, t01=0x0072}
0x086e2…086ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x009c}
0x086ec…08710 Head {h00=0x0020, h01=0x0050, text=»* GET LC-ADM ADDRESS «, t00=0x0056, t01=0x00a6}
0x08710…0871a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00ca}
0x0871a…08732 Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTLCN,A6«, t00=0x0056, t01=0x00d4}
0x08732…08748 Head {h00=0x0012, h01=0x0050, text=» CF A14,GTLCAD«, t00=0x0056, t01=0x00ec}
0x08748…08752 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0102}
0x08752…08776 Head {h00=0x0020, h01=0x0050, text=»* TEST ON RETURN INFORMATION«, t00=0x0056, t01=0x010c}
0x08776…08780 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0130}
0x08780…087b4 Head {h00=0x0030, h01=0x0050, text=» LD A1,DWTRCI,A6 GET RETURN CODE INFORMATION«, t00=0x0056, t01=0x013a}
0x087b4…087c6 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0056, t01=0x016e}
0x087c6…087ea Head {h00=0x0020, h01=0x0050, text=» ANK A2,MORE.RC MORE INFO ? «, t00=0x0056, t01=0x0180}
0x087ea…08802 Head {h00=0x0014, h01=0x0050, text=» RF(Z) READ20 NO«, t00=0x0057, t01=0x0014}
0x08802…08814 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0057, t01=0x002c}
0x08814…08846 Head {h00=0x002e, h01=0x0050, text=» ANK A2,TOLD.RC RETURN INFO TOLD TO USER ?«, t00=0x0057, t01=0x003e}
0x08846…0885c Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0057, t01=0x0070}
0x0885c…08876 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) READ10 YES«, t00=0x0057, t01=0x0086}
0x08876…08882 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x00a0}
0x08882…08898 Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0057, t01=0x00ac}
0x08898…088b2 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) READ15 YES«, t00=0x0057, t01=0x00c2}
0x088b2…088be Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x00dc}
0x088be…088cc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0057, t01=0x00e8}
0x088cc…088d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00f6}
0x088d6…08906 Head {h00=0x002c, h01=0x0050, text=» LDK A2,TOLD.RC TELL RETURN INFO TO USER«, t00=0x0057, t01=0x0100}
0x08906…08920 Head {h00=0x0016, h01=0x0050, text=» ORS A2,DWTRCI,A6 «, t00=0x0057, t01=0x0130}
0x08920…08944 Head {h00=0x0020, h01=0x0050, text=» RF RHEXIT COMPLETE REQUEST «, t00=0x0057, t01=0x014a}
0x08944…0895a Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0057, t01=0x016e}
0x0895a…08964 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0184}
0x08964…08982 Head {h00=0x001a, h01=0x0050, text=»* TEST IF RESET/CLEAR «, t00=0x0057, t01=0x018e}
0x08982…0898c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x001c}
0x0898c…089a0 Head {h00=0x0010, h01=0x0050, text=»READ10 EQU *«, t00=0x0058, t01=0x0026}
0x089a0…089b2 Head {h00=0x000e, h01=0x0050, text=» XRR A1,A2«, t00=0x0058, t01=0x003a}
0x089b2…089d2 Head {h00=0x001c, h01=0x0050, text=» ANK A1,CLEA.RC CLEAR ? «, t00=0x0058, t01=0x004c}
0x089d2…089ea Head {h00=0x0014, h01=0x0050, text=» RF(Z) READ15 NO«, t00=0x0058, t01=0x006c}
0x089ea…089fc Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0058, t01=0x0084}
0x089fc…08a1c Head {h00=0x001c, h01=0x0050, text=» ANK A2,RSET.RC RESET ? «, t00=0x0058, t01=0x0096}
0x08a1c…08a34 Head {h00=0x0014, h01=0x0050, text=» RF(Z) RHEXIT NO«, t00=0x0058, t01=0x00b6}
0x08a34…08a3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00ce}
0x08a3e…08a58 Head {h00=0x0016, h01=0x0050, text=»* RESET AND CLEAR «, t00=0x0058, t01=0x00d8}
0x08a58…08a62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00f2}
0x08a62…08a8c Head {h00=0x0026, h01=0x0050, text=» XRS A2,DWTRCI,A6 RESET RESET-BIT «, t00=0x0058, t01=0x00fc}
0x08a8c…08aba Head {h00=0x002a, h01=0x0050, text=» XRR A1,A2 INFORM USER ABOUT THE CLEAR«, t00=0x0058, t01=0x0126}
0x08aba…08acc Head {h00=0x000e, h01=0x0050, text=» RF RHEXIT«, t00=0x0058, t01=0x0154}
0x08acc…08ad8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0166}
0x08ad8…08aec Head {h00=0x0010, h01=0x0050, text=»READ15 EQU *«, t00=0x0058, t01=0x0172}
0x08aec…08b0e Head {h00=0x001e, h01=0x0050, text=» LDK A1,RSET.RC+MORE.RC+1 «, t00=0x0058, t01=0x0186}
0x08b0e…08b3a Head {h00=0x0028, h01=0x0050, text=» XRS A1,DWTRCI,A6 RESET RETURN INFO «, t00=0x0059, t01=0x0018}
0x08b3a…08b44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0044}
0x08b44…08b64 Head {h00=0x001c, h01=0x0050, text=»* SEPARATE THE REQUESTS «, t00=0x0059, t01=0x004e}
0x08b64…08b6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x006e}
0x08b6e…08b82 Head {h00=0x0010, h01=0x0050, text=»READ20 EQU *«, t00=0x0059, t01=0x0078}
0x08b82…08b9a Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTOR,A6 «, t00=0x0059, t01=0x008c}
0x08b9a…08bae Head {h00=0x0010, h01=0x0050, text=» ANK A4,/3F «, t00=0x0059, t01=0x00a4}
0x08bae…08bc0 Head {h00=0x000e, h01=0x0050, text=» SUK A4,6 «, t00=0x0059, t01=0x00b8}
0x08bc0…08be4 Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRIT05 WRITE REQUEST «, t00=0x0059, t01=0x00ca}
0x08be4…08c0e Head {h00=0x0026, h01=0x0050, text=» ABL(P) STAT05 SET STATUS REQUEST «, t00=0x0059, t01=0x00ee}
0x08c0e…08c1c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0059, t01=0x0118}
0x08c1c…08c26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0126}
0x08c26…08c44 Head {h00=0x001a, h01=0x0050, text=»* READ REQUEST «, t00=0x0059, t01=0x0130}
0x08c44…08c4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x014e}
0x08c4e…08c7c Head {h00=0x002a, h01=0x0050, text=» SU A5,REBFSZ,A13 RECEIVE BUFFER SIZE «, t00=0x0059, t01=0x0158}
0x08c7c…08ca2 Head {h00=0x0022, h01=0x0050, text=» RF(L) ERRLEN INCORRECT LENGTH«, t00=0x0059, t01=0x0186}
0x08ca2…08cac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x001c}
0x08cac…08cd0 Head {h00=0x0020, h01=0x0050, text=»* BRANCH ON DWT STATE«, t00=0x005a, t01=0x0026}
0x08cd0…08cda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x004a}
0x08cda…08cfe Head {h00=0x0020, h01=0x0050, text=» LDK A2,READAT FUNCTION CODE«, t00=0x005a, t01=0x0054}
0x08cfe…08d38 Head {h00=0x0036, h01=0x0050, text=» LDR A4,A3 SAVE DWT STATE «, t00=0x005a, t01=0x0078}
0x08d38…08d4a Head {h00=0x000e, h01=0x0050, text=» ADR A3,A3«, t00=0x005a, t01=0x00b2}
0x08d4a…08d76 Head {h00=0x0028, h01=0x0050, text=» SUK A3,ENDRST+2 TEST+2 UPPER BOUND «, t00=0x005a, t01=0x00c4}
0x08d76…08da6 Head {h00=0x002c, h01=0x0050, text=» ABI(L) RSTATE+ENDRST,A3 BRANCH ON STATE«, t00=0x005a, t01=0x00f0}
0x08da6…08db0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0120}
0x08db0…08dd2 Head {h00=0x001e, h01=0x0050, text=»* STATE TABLE,READ «, t00=0x005a, t01=0x012a}
0x08dd2…08ddc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x014c}
0x08ddc…08df0 Head {h00=0x0010, h01=0x0050, text=»RSTATE EQU *«, t00=0x005a, t01=0x0156}
0x08df0…08e1a Head {h00=0x0026, h01=0x0050, text=» DATA RCONAD CONNECTED ACCEPT DATA«, t00=0x005a, t01=0x016a}
0x08e1a…08e44 (91, 0, 400) Head {h00=0x0026, h01=0x0050, text=» DATA RCONRD CONNECTED REFUSE DATA«, t00=0x005b, t01=0x0004}
0x08e44…08e5a Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x005b, t01=0x002e}
0x08e5a…08e94 Head {h00=0x0036, h01=0x0050, text=» DATA RINCAR INCOMING CALL RECEIVED(WITH ACC/REF )«, t00=0x005b, t01=0x0044}
0x08e94…08ee8 Head {h00=0x0050, h01=0x0050, text=» DATA RINCAR INCOMING CALL RECEIVED(WITHOUT ACC/REF ) «, t00=0x005b, t01=0x007e}
0x08ee8…08f16 Head {h00=0x002a, h01=0x0050, text=» DATA RVCREL VIRTUAL CIRCUIT RELEASED «, t00=0x005b, t01=0x00d2}
0x08f16…08f22 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0100}
0x08f22…08f3e Head {h00=0x0018, h01=0x0050, text=»ENDRST EQU *-RSTATE «, t00=0x005b, t01=0x010c}
0x08f3e…08f48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0128}
0x08f48…08f5e Head {h00=0x0012, h01=0x0050, text=»* READ «, t00=0x005b, t01=0x0132}
0x08f5e…08f84 Head {h00=0x0022, h01=0x0050, text=»* CONNECTED REFUSE DATA«, t00=0x005b, t01=0x0148}
0x08f84…08f8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x016e}
0x08f8e…08fa2 Head {h00=0x0010, h01=0x0050, text=»RCONRD EQU *«, t00=0x005b, t01=0x0178}
0x08fa2…08fb8 Head {h00=0x0012, h01=0x0050, text=» LDK A2,ACCDAT«, t00=0x005b, t01=0x018c}
0x08fb8…08fde Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x005c, t01=0x0012}
0x08fde…0900a Head {h00=0x0028, h01=0x0050, text=» LDK A1,CONAD CONNECTED ACCEPT DATA «, t00=0x005c, t01=0x0038}
0x0900a…09022 Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTSTE,A6«, t00=0x005c, t01=0x0064}
0x09022…09046 Head {h00=0x0020, h01=0x0050, text=» LDK A2,READAT FUNCTION CODE«, t00=0x005c, t01=0x007c}
0x09046…09054 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005c, t01=0x00a0}
0x09054…0905e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00ae}
0x0905e…09074 Head {h00=0x0012, h01=0x0050, text=»* READ «, t00=0x005c, t01=0x00b8}
0x09074…0909a Head {h00=0x0022, h01=0x0050, text=»* CONNECTED ACCEPT DATA«, t00=0x005c, t01=0x00ce}
0x0909a…090a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00f4}
0x090a4…090b8 Head {h00=0x0010, h01=0x0050, text=»RCONAD EQU *«, t00=0x005c, t01=0x00fe}
0x090b8…090c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0112}
0x090c2…090e6 Head {h00=0x0020, h01=0x0050, text=»* DEBLOCK INPUT QUEUE«, t00=0x005c, t01=0x011c}
0x090e6…090f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0140}
0x090f0…09106 Head {h00=0x0012, h01=0x0050, text=» LDK A1,NPRFLG«, t00=0x005c, t01=0x014a}
0x09106…09118 Head {h00=0x000e, h01=0x0050, text=» C1R A1,A1«, t00=0x005c, t01=0x0160}
0x09118…09132 Head {h00=0x0016, h01=0x0050, text=» ANS A1,QUEINP,A13«, t00=0x005c, t01=0x0172}
0x09132…09148 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x005c, t01=0x018c}
0x09148…09182 Head {h00=0x0036, h01=0x0050, text=» SUK A4,INCALR CHECK DWT STATE«, t00=0x005d, t01=0x0012}
0x09182…091a2 Head {h00=0x001c, h01=0x0050, text=» RF(Z) READ30«, t00=0x005d, t01=0x004c}
0x091a2…091ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x006c}
0x091ac…091c2 Head {h00=0x0012, h01=0x0050, text=»* READ «, t00=0x005d, t01=0x0076}
0x091c2…09204 Head {h00=0x003e, h01=0x0050, text=»* INCOMING CALL RECEIVED,WITHOUT ACCEPT/REFUSE CALL«, t00=0x005d, t01=0x008c}
0x09204…0920e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00ce}
0x0920e…0924e Head {h00=0x003c, h01=0x0050, text=» LDK A1,CONAD CONNECTED ACCEPT DATA«, t00=0x005d, t01=0x00d8}
0x0924e…09274 Head {h00=0x0022, h01=0x0050, text=» SC A1,DWTSTE,A6«, t00=0x005d, t01=0x0118}
0x09274…09290 Head {h00=0x0018, h01=0x0050, text=»READ30 EQU * «, t00=0x005d, t01=0x013e}
0x09290…0929c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x015a}
0x0929c…092b4 Head {h00=0x0014, h01=0x0050, text=» SC A2,DWTFNC,A6«, t00=0x005d, t01=0x0166}
0x092b4…092d6 Head {h00=0x001e, h01=0x0050, text=» RF WRIT50 ACTIVATE TIMER «, t00=0x005d, t01=0x017e}
0x092d6…092e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0010}
0x092e0…092ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005e, t01=0x001a}
0x092ee…092f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0028}
0x092f8…0930e Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x005e, t01=0x0032}
0x0930e…09318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0048}
0x09318…0932e Head {h00=0x0012, h01=0x0050, text=»* READ «, t00=0x005e, t01=0x0052}
0x0932e…09356 Head {h00=0x0024, h01=0x0050, text=»* INCOMING CALL RECEIVED «, t00=0x005e, t01=0x0068}
0x09356…09360 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0090}
0x09360…09374 Head {h00=0x0010, h01=0x0050, text=»RINCAR EQU *«, t00=0x005e, t01=0x009a}
0x09374…0938e Head {h00=0x0016, h01=0x0050, text=» LD A1,QUEINP,A13 «, t00=0x005e, t01=0x00ae}
0x0938e…093a2 Head {h00=0x0010, h01=0x0050, text=» ANKL A1,-2 «, t00=0x005e, t01=0x00c8}
0x093a2…093b8 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) RCONAD«, t00=0x005e, t01=0x00dc}
0x093b8…093c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x00f2}
0x093c4…093ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x00fe}
0x093ce…09404 Head {h00=0x0032, h01=0x0050, text=»* WANTED ACTION NOT ALLOWED IN THIS DWT STATE «, t00=0x005e, t01=0x0108}
0x09404…0940e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x013e}
0x0940e…09422 Head {h00=0x0010, h01=0x0050, text=»ERRSTE EQU *«, t00=0x005e, t01=0x0148}
0x09422…0944a Head {h00=0x0024, h01=0x0050, text=» LDKL A1,SEQE.RC SEQUENCE ERROR «, t00=0x005e, t01=0x015c}
0x0944a…0946e Head {h00=0x0020, h01=0x0050, text=» RF RHEXIT COMPLETE REQUEST «, t00=0x005e, t01=0x0184}
0x0946e…09484 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x005f, t01=0x0018}
0x09484…0948e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x002e}
0x0948e…094a4 Head {h00=0x0012, h01=0x0050, text=»* READ «, t00=0x005f, t01=0x0038}
0x094a4…094cc Head {h00=0x0024, h01=0x0050, text=»* VIRTUAL CIRCUIT CLEARED«, t00=0x005f, t01=0x004e}
0x094cc…094d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0076}
0x094d6…094ea Head {h00=0x0010, h01=0x0050, text=»RVCREL EQU *«, t00=0x005f, t01=0x0080}
0x094ea…09516 Head {h00=0x0028, h01=0x0050, text=» ANK A1,CLEA.RC CONNECTION CLEARED ?«, t00=0x005f, t01=0x0094}
0x09516…09542 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) RHEXIT YES,COMPLETE REQUEST «, t00=0x005f, t01=0x00c0}
0x09542…0954c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00ec}
0x0954c…09574 Head {h00=0x0024, h01=0x0050, text=»* ACTIVATE RHIP TO GET A PACKET «, t00=0x005f, t01=0x00f6}
0x09574…0957e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x011e}
0x0957e…09596 Head {h00=0x0014, h01=0x0050, text=» SC A2,DWTFNC,A6«, t00=0x005f, t01=0x0128}
0x09596…095aa Head {h00=0x0010, h01=0x0050, text=» ABL RHIPRO «, t00=0x005f, t01=0x0140}
0x095aa…095b6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x0154}
0x095b6…095c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0160}
0x095c0…095ce Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005f, t01=0x016a}
0x095ce…095d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0178}
0x095d8…0961c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x005f, t01=0x0182}
0x0961c…09626 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0036}
0x09626…09644 Head {h00=0x001a, h01=0x0050, text=»* WRITE REQUEST«, t00=0x0060, t01=0x0040}
0x09644…0964e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x005e}
0x0964e…09692 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0060, t01=0x0068}
0x09692…0969c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00ac}
0x0969c…096b0 Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x0060, t01=0x00b6}
0x096b0…096ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00ca}
0x096ba…096de Head {h00=0x0020, h01=0x0050, text=»* BRANCH ON DWT STATE«, t00=0x0060, t01=0x00d4}
0x096de…096e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00f8}
0x096e8…096fe Head {h00=0x0012, h01=0x0050, text=» SUK A3,CONAD «, t00=0x0060, t01=0x0102}
0x096fe…0972a Head {h00=0x0028, h01=0x0050, text=» RF(Z) WRIT20 CONNECTED ACCEPT DATA «, t00=0x0060, t01=0x0118}
0x0972a…09746 Head {h00=0x0018, h01=0x0050, text=» SUK A3,CONRD-CONAD «, t00=0x0060, t01=0x0144}
0x09746…09772 Head {h00=0x0028, h01=0x0050, text=» RF(Z) WRIT20 CONNECTED REFUSE DATA «, t00=0x0060, t01=0x0160}
0x09772…09788 Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0060, t01=0x018c}
0x09788…097ae Head {h00=0x0022, h01=0x0050, text=» RB ERRSTE INCORRECT DWT STATE«, t00=0x0061, t01=0x0012}
0x097ae…097ba Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0038}
0x097ba…097d0 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0061, t01=0x0044}
0x097d0…097ec Head {h00=0x0018, h01=0x0050, text=» SUK A3,VCREL-CONRD «, t00=0x0061, t01=0x005a}
0x097ec…09816 Head {h00=0x0026, h01=0x0050, text=» RB(NZ) ERRSTE INCORRECT DWT STATE«, t00=0x0061, t01=0x0076}
0x09816…09820 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00a0}
0x09820…0982e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0061, t01=0x00aa}
0x0982e…09838 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00b8}
0x09838…09862 Head {h00=0x0026, h01=0x0050, text=»* VIRTUAL CIRCUIT RELEASED «, t00=0x0061, t01=0x00c2}
0x09862…0986c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00ec}
0x0986c…09880 Head {h00=0x0010, h01=0x0050, text=»WRIT10 EQU *«, t00=0x0061, t01=0x00f6}
0x09880…098b4 Head {h00=0x0030, h01=0x0050, text=» ANK A1,TOLD.RC CLEAR ALREADY TOLD TO USER ?«, t00=0x0061, t01=0x010a}
0x098b4…098de Head {h00=0x0026, h01=0x0050, text=» RB(NZ) ERRSTE YES,SEQUENCE ERROR «, t00=0x0061, t01=0x013e}
0x098de…09912 Head {h00=0x0030, h01=0x0050, text=» LDK A1,CLEA.RC VC CLEARED«, t00=0x0061, t01=0x0168}
0x09912…0992a Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTIPQ,A6«, t00=0x0062, t01=0x000c}
0x0992a…09952 Head {h00=0x0024, h01=0x0050, text=» ANKL A2,-2 ANYTHING IN QUEUE ? «, t00=0x0062, t01=0x0024}
0x09952…0996c Head {h00=0x0016, h01=0x0050, text=» RF(NZ) WRIT15 YES«, t00=0x0062, t01=0x004c}
0x0996c…0998e Head {h00=0x001e, h01=0x0050, text=» ORK A1,MORE.RC MORE INFO «, t00=0x0062, t01=0x0066}
0x0998e…099a0 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0062, t01=0x0088}
0x099a0…099d0 Head {h00=0x002c, h01=0x0050, text=» ORK A2,TOLD.RC RETURN CODE TOLD TO USER«, t00=0x0062, t01=0x009a}
0x099d0…099e8 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTRCI,A6«, t00=0x0062, t01=0x00ca}
0x099e8…099fa Head {h00=0x000e, h01=0x0050, text=» RF RHEXIT«, t00=0x0062, t01=0x00e2}
0x099fa…09a0e Head {h00=0x0010, h01=0x0050, text=»WRIT15 EQU *«, t00=0x0062, t01=0x00f4}
0x09a0e…09a3c Head {h00=0x002a, h01=0x0050, text=» LD A2,BFCHPT,A2 ONLY CLEAR IN QUEUE ?«, t00=0x0062, t01=0x0108}
0x09a3c…09a56 Head {h00=0x0016, h01=0x0050, text=» ABL(Z) RHIPRO YES«, t00=0x0062, t01=0x0136}
0x09a56…09a7e Head {h00=0x0024, h01=0x0050, text=» ORKL A1,DATA.RC DATA AVAILABLE «, t00=0x0062, t01=0x0150}
0x09a7e…09a8a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0062, t01=0x0178}
0x09a8a…09a98 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0062, t01=0x0184}
0x09a98…09aa2 (99, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0004}
0x09aa2…09aee Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x0063, t01=0x000e}
0x09aee…09af8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x005a}
0x09af8…09b1a Head {h00=0x001e, h01=0x0050, text=»* COMPLETE REQUEST «, t00=0x0063, t01=0x0064}
0x09b1a…09b24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0086}
0x09b24…09b6e Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x0063, t01=0x0090}
0x09b6e…09b78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00da}
0x09b78…09b8c Head {h00=0x0010, h01=0x0050, text=»RHEXIT EQU *«, t00=0x0063, t01=0x00e4}
0x09b8c…09b9e Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x0063, t01=0x00f8}
0x09b9e…09bca Head {h00=0x0028, h01=0x0050, text=» CF A15,TENDIO COMPLETE USER REQUEST«, t00=0x0063, t01=0x010a}
0x09bca…09bd6 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0063, t01=0x0136}
0x09bd6…09bea Head {h00=0x0010, h01=0x0050, text=»RHSCHE EQU *«, t00=0x0063, t01=0x0142}
0x09bea…09c12 Head {h00=0x0024, h01=0x0050, text=» ABL EXITDC CONTROL TO SCHEDULER«, t00=0x0063, t01=0x0156}
0x09c12…09c1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x017e}
0x09c1c…09c36 Head {h00=0x0016, h01=0x0050, text=»* CONNECTED«, t00=0x0063, t01=0x0188}
0x09c36…09c40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0012}
0x09c40…09c54 Head {h00=0x0010, h01=0x0050, text=»WRIT20 EQU *«, t00=0x0064, t01=0x001c}
0x09c54…09c76 Head {h00=0x001e, h01=0x0050, text=» ADK A5,0 REQUESTED LENGTH«, t00=0x0064, t01=0x0030}
0x09c76…09c9c Head {h00=0x0022, h01=0x0050, text=» RF(N) ERRLEN INCORRECT LENGTH«, t00=0x0064, t01=0x0052}
0x09c9c…09cc8 Head {h00=0x0028, h01=0x0050, text=» LC A3,DWTOPT,A6 GET NEW OPTION CODE«, t00=0x0064, t01=0x0078}
0x09cc8…09cda Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0064, t01=0x00a4}
0x09cda…09cfc Head {h00=0x001e, h01=0x0050, text=» ANK A4,INTOPT INTERRUPT ?«, t00=0x0064, t01=0x00b6}
0x09cfc…09d14 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRIT30 NO«, t00=0x0064, t01=0x00d8}
0x09d14…09d34 Head {h00=0x001c, h01=0x0050, text=» LDK A2,WRIINT INTERRUPT«, t00=0x0064, t01=0x00f0}
0x09d34…09d56 Head {h00=0x001e, h01=0x0050, text=» ADK A5,0 REQUESTED LENGTH«, t00=0x0064, t01=0x0110}
0x09d56…09d7c Head {h00=0x0022, h01=0x0050, text=» RF(N) ERRLEN INCORRECT LENGTH«, t00=0x0064, t01=0x0132}
0x09d7c…09d8e Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0064, t01=0x0158}
0x09d8e…09da4 Head {h00=0x0012, h01=0x0050, text=» RF(Z) WRIT45 «, t00=0x0064, t01=0x016a}
0x09da4…09db8 Head {h00=0x0010, h01=0x0050, text=»ERRLEN EQU *«, t00=0x0064, t01=0x0180}
0x09db8…09de2 (101, 0, 400) Head {h00=0x0026, h01=0x0050, text=» LDKL A1,INVL.RC INCORRECT LENGTH «, t00=0x0065, t01=0x0004}
0x09de2…09df4 Head {h00=0x000e, h01=0x0050, text=» RB RHEXIT«, t00=0x0065, t01=0x002e}
0x09df4…09dfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0040}
0x09dfe…09e0c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0065, t01=0x004a}
0x09e0c…09e16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0058}
0x09e16…09e2a Head {h00=0x0010, h01=0x0050, text=»* WRITE DATA«, t00=0x0065, t01=0x0062}
0x09e2a…09e34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0076}
0x09e34…09e48 Head {h00=0x0010, h01=0x0050, text=»WRIT30 EQU *«, t00=0x0065, t01=0x0080}
0x09e48…09e88 Head {h00=0x003c, h01=0x0050, text=» CW A5,TRBFSZ,A13 TRANSMIT BUFFER SIZE «, t00=0x0065, t01=0x0094}
0x09e88…09eae Head {h00=0x0022, h01=0x0050, text=» RB(G) ERRLEN INCORRECT LENGTH«, t00=0x0065, t01=0x00d4}
0x09eae…09ec0 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0065, t01=0x00fa}
0x09ec0…09ee0 Head {h00=0x001c, h01=0x0050, text=» ANK A4,MOPT MORE DATA ?«, t00=0x0065, t01=0x010c}
0x09ee0…09ef8 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRIT35 NO«, t00=0x0065, t01=0x012c}
0x09ef8…09f12 Head {h00=0x0016, h01=0x0050, text=» CW A5,TRBFSZ,A13 «, t00=0x0065, t01=0x0144}
0x09f12…09f28 Head {h00=0x0012, h01=0x0050, text=» RB(NE) ERRLEN«, t00=0x0065, t01=0x015e}
0x09f28…09f3c Head {h00=0x0010, h01=0x0050, text=»WRIT35 EQU *«, t00=0x0065, t01=0x0174}
0x09f3c…09f68 Head {h00=0x0028, h01=0x0050, text=» LC A1,DWTWRO,A6 GET OLD OPTION CODE«, t00=0x0065, t01=0x0188}
0x09f68…09f7a Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0066, t01=0x0024}
0x09f7a…09f9a Head {h00=0x001c, h01=0x0050, text=» ANK A1,MOPT MORE DATA ?«, t00=0x0066, t01=0x0036}
0x09f9a…09fb2 Head {h00=0x0014, h01=0x0050, text=» RF(Z) WRIT40 NO«, t00=0x0066, t01=0x0056}
0x09fb2…09fd0 Head {h00=0x001a, h01=0x0050, text=» ANK A2,QOPT OLD Q-BIT«, t00=0x0066, t01=0x006e}
0x09fd0…09fe2 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0066, t01=0x008c}
0x09fe2…0a000 Head {h00=0x001a, h01=0x0050, text=» ANK A4,QOPT NEW Q-BIT«, t00=0x0066, t01=0x009e}
0x0a000…0a01a Head {h00=0x0016, h01=0x0050, text=» SUR A2,A4 SAME ? «, t00=0x0066, t01=0x00bc}
0x0a01a…0a042 Head {h00=0x0024, h01=0x0050, text=» RB(NZ) ERRSTE NO,SEQUENCE ERROR«, t00=0x0066, t01=0x00d6}
0x0a042…0a056 Head {h00=0x0010, h01=0x0050, text=»WRIT40 EQU *«, t00=0x0066, t01=0x00fe}
0x0a056…0a072 Head {h00=0x0018, h01=0x0050, text=» LDK A2,WRIDAT DATA «, t00=0x0066, t01=0x0112}
0x0a072…0a0a0 Head {h00=0x002a, h01=0x0050, text=» SC A3,DWTWRO,A6 SAVE NEW OPTION CODE «, t00=0x0066, t01=0x012e}
0x0a0a0…0a0b4 Head {h00=0x0010, h01=0x0050, text=»WRIT45 EQU *«, t00=0x0066, t01=0x015c}
0x0a0b4…0a0da Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x0066, t01=0x0170}
0x0a0da…0a0e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0008}
0x0a0e4…0a0f2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0067, t01=0x0012}
0x0a0f2…0a0fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0020}
0x0a0fc…0a106 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x002a}
0x0a106…0a126 Head {h00=0x001c, h01=0x0050, text=»* ACTIVATE TIMER «, t00=0x0067, t01=0x0034}
0x0a126…0a130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0054}
0x0a130…0a144 Head {h00=0x0010, h01=0x0050, text=»WRIT50 EQU *«, t00=0x0067, t01=0x005e}
0x0a144…0a170 Head {h00=0x0028, h01=0x0050, text=» LD A8,DWTRTV,A6 REQUEST TIMER VALUE«, t00=0x0067, t01=0x0072}
0x0a170…0a1a4 Head {h00=0x0030, h01=0x0050, text=» RB(Z) RHSCHE NO TIMER,CONTROL TO SCHEDULER «, t00=0x0067, t01=0x009e}
0x0a1a4…0a1e0 Head {h00=0x0038, h01=0x0050, text=» LDKL A4,TIMOUT+1 TIME OUT ROUTINE «, t00=0x0067, t01=0x00d2}
0x0a1e0…0a1f4 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A6 «, t00=0x0067, t01=0x010e}
0x0a1f4…0a216 Head {h00=0x001e, h01=0x0050, text=» CF A14,STRTIM START TIMER«, t00=0x0067, t01=0x0122}
0x0a216…0a22e Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTRTP,A6«, t00=0x0067, t01=0x0144}
0x0a22e…0a256 Head {h00=0x0024, h01=0x0050, text=» RB RHSCHE CONTROL TO SCHEDULER «, t00=0x0067, t01=0x015c}
0x0a256…0a260 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0184}
0x0a260…0a26e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0067, t01=0x018e}
0x0a26e…0a278 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x000c}
0x0a278…0a282 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0016}
0x0a282…0a2c6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0068, t01=0x0020}
0x0a2c6…0a2d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0064}
0x0a2d0…0a2ee Head {h00=0x001a, h01=0x0050, text=»* OPEN REQUEST «, t00=0x0068, t01=0x006e}
0x0a2ee…0a2f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x008c}
0x0a2f8…0a33c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0068, t01=0x0096}
0x0a33c…0a346 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00da}
0x0a346…0a35a Head {h00=0x0010, h01=0x0050, text=»OPEN00 EQU *«, t00=0x0068, t01=0x00e4}
0x0a35a…0a38a Head {h00=0x002c, h01=0x0050, text=» CF A14,FNDLOC CONFIRM LOCAL DTE ADDRESS«, t00=0x0068, t01=0x00f8}
0x0a38a…0a3b0 Head {h00=0x0022, h01=0x0050, text=» ANK A1,STRTFL MASK START FLAG«, t00=0x0068, t01=0x0128}
0x0a3b0…0a3d0 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) ERRSYS LINE OPEN«, t00=0x0068, t01=0x014e}
0x0a3d0…0a3da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x016e}
0x0a3da…0a3f6 Head {h00=0x0018, h01=0x0050, text=»* LINE CLOSED«, t00=0x0068, t01=0x0178}
0x0a3f6…0a424 (105, 0, 400) Head {h00=0x002a, h01=0x0050, text=»* CHECK IF OPEN SYSTEM ALREADY PENDING«, t00=0x0069, t01=0x0004}
0x0a424…0a42e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0032}
0x0a42e…0a456 Head {h00=0x0024, h01=0x0050, text=» LD A3,CMNFLG,A12 «, t00=0x0069, t01=0x003c}
0x0a456…0a47a Head {h00=0x0020, h01=0x0050, text=» ANK A3,OPEFLG «, t00=0x0069, t01=0x0064}
0x0a47a…0a492 Head {h00=0x0014, h01=0x0050, text=» RF(Z) OPEN10 NO«, t00=0x0069, t01=0x0088}
0x0a492…0a4a6 Head {h00=0x0010, h01=0x0050, text=»ERRSYS EQU *«, t00=0x0069, t01=0x00a0}
0x0a4a6…0a4d6 Head {h00=0x002c, h01=0x0050, text=» LDKL A1,LOGE.RC INCORRECT SYSTEM STATE «, t00=0x0069, t01=0x00b4}
0x0a4d6…0a4fa Head {h00=0x0020, h01=0x0050, text=» RB RHEXIT COMPLETE REQUEST «, t00=0x0069, t01=0x00e4}
0x0a4fa…0a504 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0108}
0x0a504…0a512 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0069, t01=0x0112}
0x0a512…0a51c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0120}
0x0a51c…0a538 Head {h00=0x0018, h01=0x0050, text=»* CHECK TABLE LENGTH«, t00=0x0069, t01=0x012a}
0x0a538…0a542 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0146}
0x0a542…0a556 Head {h00=0x0010, h01=0x0050, text=»OPEN10 EQU *«, t00=0x0069, t01=0x0150}
0x0a556…0a568 Head {h00=0x000e, h01=0x0050, text=» ADK A5,0 «, t00=0x0069, t01=0x0164}
0x0a568…0a58e Head {h00=0x0022, h01=0x0050, text=» RF(Z) OPEN15 NO ADDRESS TABLE«, t00=0x0069, t01=0x0176}
0x0a58e…0a598 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x000c}
0x0a598…0a5c8 Head {h00=0x002c, h01=0x0050, text=»* ADDR. TABLE NOT SUPPORTED IN PRR 11.0 «, t00=0x006a, t01=0x0016}
0x0a5c8…0a5d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0046}
0x0a5d2…0a5f2 Head {h00=0x001c, h01=0x0050, text=» RB ERRLEN LENGTH ERROR «, t00=0x006a, t01=0x0050}
0x0a5f2…0a606 Head {h00=0x0010, h01=0x0050, text=»OPEN15 EQU *«, t00=0x006a, t01=0x0070}
0x0a606…0a63e Head {h00=0x0034, h01=0x0050, text=» LD A3,ECBCW2,A8 GET LOCAL SYMBOLIC DTE ADDRESS «, t00=0x006a, t01=0x0084}
0x0a63e…0a656 Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTLAD,A6«, t00=0x006a, t01=0x00bc}
0x0a656…0a678 Head {h00=0x001e, h01=0x0050, text=» LDK A2,OPESYS OPEN SYSTEM«, t00=0x006a, t01=0x00d4}
0x0a678…0a68c Head {h00=0x0010, h01=0x0050, text=»OPEN30 EQU *«, t00=0x006a, t01=0x00f6}
0x0a68c…0a6b2 Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x006a, t01=0x010a}
0x0a6b2…0a6c8 Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x006a, t01=0x0130}
0x0a6c8…0a6d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0146}
0x0a6d2…0a6fa Head {h00=0x0024, h01=0x0050, text=»* UPDATE PVC WITH REMOTE ADDRESS«, t00=0x006a, t01=0x0150}
0x0a6fa…0a704 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0178}
0x0a704…0a72e Head {h00=0x0026, h01=0x0050, text=» LDKL A1,PVCTYP PVC IDENTIFICATION«, t00=0x006a, t01=0x0182}
0x0a72e…0a762 Head {h00=0x0030, h01=0x0050, text=» LDKL A2,SCTDCT POINTER TO DC ADDRESS TABLE «, t00=0x006b, t01=0x001c}
0x0a762…0a77c Head {h00=0x0016, h01=0x0050, text=» LDKL A3,LINTAB-2 «, t00=0x006b, t01=0x0050}
0x0a77c…0a792 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x006b, t01=0x006a}
0x0a792…0a7b8 Head {h00=0x0022, h01=0x0050, text=» LDK A4,SYNRLN NUMBER OF LINES«, t00=0x006b, t01=0x0080}
0x0a7b8…0a7c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006b, t01=0x00a6}
0x0a7c4…0a7da Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x006b, t01=0x00b2}
0x0a7da…0a7ee Head {h00=0x0010, h01=0x0050, text=»OPEN40 EQU *«, t00=0x006b, t01=0x00c8}
0x0a7ee…0a826 Head {h00=0x0034, h01=0x0050, text=» ADK A3,2 POINTER TO LC-ADM BLOCK-POINTER TABLE «, t00=0x006b, t01=0x00dc}
0x0a826…0a84e Head {h00=0x0024, h01=0x0050, text=» LDR* A5,A3 LC-ADM BLOCK POINTER«, t00=0x006b, t01=0x0114}
0x0a84e…0a876 Head {h00=0x0024, h01=0x0050, text=» LC A7,NRPVC,A5 NUMBER OF PVC'S «, t00=0x006b, t01=0x013c}
0x0a876…0a894 Head {h00=0x001a, h01=0x0050, text=» RF(Z) OPEN80 NO PVC'S«, t00=0x006b, t01=0x0164}
0x0a894…0a8c0 Head {h00=0x0028, h01=0x0050, text=» LD A5,LC:TAB,A5 LC-ADM BLOCK TABLE «, t00=0x006b, t01=0x0182}
0x0a8c0…0a8ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x001e}
0x0a8ca…0a8d8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006c, t01=0x0028}
0x0a8d8…0a8e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0036}
0x0a8e2…0a90c Head {h00=0x0026, h01=0x0050, text=»* GET NEXT ENTRY IN DC ADDR. TABLE«, t00=0x006c, t01=0x0040}
0x0a90c…0a916 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x006a}
0x0a916…0a92a Head {h00=0x0010, h01=0x0050, text=»OPEN60 EQU *«, t00=0x006c, t01=0x0074}
0x0a92a…0a94c Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A2 END OF TABLE ?«, t00=0x006c, t01=0x0088}
0x0a94c…0a966 Head {h00=0x0016, h01=0x0050, text=» RF(Z) OPEN90 YES «, t00=0x006c, t01=0x00aa}
0x0a966…0a970 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00c4}
0x0a970…0a986 Head {h00=0x0012, h01=0x0050, text=»* TEST IF PVC «, t00=0x006c, t01=0x00ce}
0x0a986…0a990 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00e4}
0x0a990…0a9a4 Head {h00=0x0010, h01=0x0050, text=» CW A1,4,A2 «, t00=0x006c, t01=0x00ee}
0x0a9a4…0a9be Head {h00=0x0016, h01=0x0050, text=» RB(NE) OPEN60 NO «, t00=0x006c, t01=0x0102}
0x0a9be…0a9d2 Head {h00=0x0010, h01=0x0050, text=»OPEN70 EQU *«, t00=0x006c, t01=0x011c}
0x0a9d2…0a9f2 Head {h00=0x001c, h01=0x0050, text=» LDR* A8,A5 LC-ADM ENTRY«, t00=0x006c, t01=0x0130}
0x0a9f2…0aa1a Head {h00=0x0024, h01=0x0050, text=» LD A9,2,A2 GET SYMBOLIC ADDRESS«, t00=0x006c, t01=0x0150}
0x0aa1a…0aa44 Head {h00=0x0026, h01=0x0050, text=» ST A9,REMADR,A8 SAVE IT IN LC-ADM«, t00=0x006c, t01=0x0178}
0x0aa44…0aa66 Head {h00=0x001e, h01=0x0050, text=» ADK A5,2 ADDRESS NEXT LC «, t00=0x006d, t01=0x0012}
0x0aa66…0aa84 Head {h00=0x001a, h01=0x0050, text=» SUK A7,1 MORE PVC'S ?«, t00=0x006d, t01=0x0034}
0x0aa84…0aa9e Head {h00=0x0016, h01=0x0050, text=» RB(NZ) OPEN60 YES«, t00=0x006d, t01=0x0052}
0x0aa9e…0aab2 Head {h00=0x0010, h01=0x0050, text=»OPEN80 EQU *«, t00=0x006d, t01=0x006c}
0x0aab2…0aac8 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x006d, t01=0x0080}
0x0aac8…0aae6 Head {h00=0x001a, h01=0x0050, text=» SUK A4,1 MORE LINES ?«, t00=0x006d, t01=0x0096}
0x0aae6…0ab00 Head {h00=0x0016, h01=0x0050, text=» RB(NZ) OPEN40 YES«, t00=0x006d, t01=0x00b4}
0x0ab00…0ab0c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x00ce}
0x0ab0c…0ab20 Head {h00=0x0010, h01=0x0050, text=»OPEN90 EQU *«, t00=0x006d, t01=0x00da}
0x0ab20…0ab42 Head {h00=0x001e, h01=0x0050, text=» LDK A3,0 SET RETURN CODE «, t00=0x006d, t01=0x00ee}
0x0ab42…0ab6a Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x006d, t01=0x0110}
0x0ab6a…0ab7c Head {h00=0x000e, h01=0x0050, text=» RB RHSCHE«, t00=0x006d, t01=0x0138}
0x0ab7c…0ab86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x014a}
0x0ab86…0ab94 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006d, t01=0x0154}
0x0ab94…0ab9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0162}
0x0ab9e…0aba8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x016c}
0x0aba8…0abb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0176}
0x0abb2…0abfe Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x006d, t01=0x0180}
0x0abfe…0ac08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x003c}
0x0ac08…0ac2a Head {h00=0x001e, h01=0x0050, text=»* CONNECT PASSIVE REQUEST «, t00=0x006e, t01=0x0046}
0x0ac2a…0ac34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0068}
0x0ac34…0ac80 Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x006e, t01=0x0072}
0x0ac80…0ac8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00be}
0x0ac8a…0ac9e Head {h00=0x0010, h01=0x0050, text=»CONP00 EQU *«, t00=0x006e, t01=0x00c8}
0x0ac9e…0acb4 Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x006e, t01=0x00dc}
0x0acb4…0acd6 Head {h00=0x001e, h01=0x0050, text=» ABL ERRREQ REQUEST ERROR «, t00=0x006e, t01=0x00f2}
0x0acd6…0ace2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x0114}
0x0ace2…0acf8 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x006e, t01=0x0120}
0x0acf8…0ad1c Head {h00=0x0020, h01=0x0050, text=» LDK A2,CONPAS FUNCTION CODE«, t00=0x006e, t01=0x0136}
0x0ad1c…0ad2e Head {h00=0x000e, h01=0x0050, text=» RF CONA05«, t00=0x006e, t01=0x015a}
0x0ad2e…0ad3a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x016c}
0x0ad3a…0ad44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0178}
0x0ad44…0ad52 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006e, t01=0x0182}
0x0ad52…0ad5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0190}
0x0ad5c…0ada8 Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x006f, t01=0x000a}
0x0ada8…0adb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0056}
0x0adb2…0add2 Head {h00=0x001c, h01=0x0050, text=»* CONNECT ACTIVE REQUEST«, t00=0x006f, t01=0x0060}
0x0add2…0addc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0080}
0x0addc…0ae28 Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x006f, t01=0x008a}
0x0ae28…0ae32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00d6}
0x0ae32…0ae46 Head {h00=0x0010, h01=0x0050, text=»CONA00 EQU *«, t00=0x006f, t01=0x00e0}
0x0ae46…0ae5c Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x006f, t01=0x00f4}
0x0ae5c…0ae66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x010a}
0x0ae66…0ae84 Head {h00=0x001a, h01=0x0050, text=»* TEST MESSAGE LENGTH «, t00=0x006f, t01=0x0114}
0x0ae84…0ae8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0132}
0x0ae8e…0aea6 Head {h00=0x0014, h01=0x0050, text=» SUK A5,SYMXDL-5«, t00=0x006f, t01=0x013c}
0x0aea6…0aebc Head {h00=0x0012, h01=0x0050, text=» IFT CALDTE=1 «, t00=0x006f, t01=0x0154}
0x0aebc…0aece Head {h00=0x000e, h01=0x0050, text=» ADK A5,4 «, t00=0x006f, t01=0x016a}
0x0aece…0aeda Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x017c}
0x0aeda…0aef0 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x006f, t01=0x0188}
0x0aef0…0af16 Head {h00=0x0022, h01=0x0050, text=» RB(P) ERRLEN INCORRECT LENGTH«, t00=0x0070, t01=0x000e}
0x0af16…0af22 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x0034}
0x0af22…0af46 Head {h00=0x0020, h01=0x0050, text=» LDK A2,CONACT FUNCTION CODE«, t00=0x0070, t01=0x0040}
0x0af46…0af5a Head {h00=0x0010, h01=0x0050, text=»CONA05 EQU *«, t00=0x0070, t01=0x0064}
0x0af5a…0af8a Head {h00=0x002c, h01=0x0050, text=» CF A14,FNDLOC CONFIRM LOCAL DTE ADDRESS«, t00=0x0070, t01=0x0078}
0x0af8a…0afb0 Head {h00=0x0022, h01=0x0050, text=» ANK A1,STRTFL MASK START FLAG«, t00=0x0070, t01=0x00a8}
0x0afb0…0afdc Head {h00=0x0028, h01=0x0050, text=» RB(Z) ERRSYS INCORRECT SYSTEM STATE«, t00=0x0070, t01=0x00ce}
0x0afdc…0aff0 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0070, t01=0x00fa}
0x0aff0…0b006 Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0070, t01=0x010e}
0x0b006…0b032 Head {h00=0x0028, h01=0x0050, text=» ABL(NZ) ERRSTE INCORRECT DWT STATE «, t00=0x0070, t01=0x0124}
0x0b032…0b03e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x0150}
0x0b03e…0b054 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0070, t01=0x015c}
0x0b054…0b05e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0172}
0x0b05e…0b06c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0070, t01=0x017c}
0x0b06c…0b076 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x018a}
0x0b076…0b08c (113, 0, 400) Head {h00=0x0012, h01=0x0050, text=» RF(Z) CONA10 «, t00=0x0071, t01=0x0004}
0x0b08c…0b0a2 Head {h00=0x0012, h01=0x0050, text=» SUK A4,VCREL «, t00=0x0071, t01=0x001a}
0x0b0a2…0b0c8 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) CLOS10 SEQUENCE ERROR «, t00=0x0071, t01=0x0030}
0x0b0c8…0b0ec Head {h00=0x0020, h01=0x0050, text=» LD A1,DWTRCI,A6 RETURN INFO«, t00=0x0071, t01=0x0056}
0x0b0ec…0b0fe Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0071, t01=0x007a}
0x0b0fe…0b126 Head {h00=0x0024, h01=0x0050, text=» ANK A3,CLEA.RC CLEAR DETECTED ?«, t00=0x0071, t01=0x008c}
0x0b126…0b152 Head {h00=0x0028, h01=0x0050, text=» RF(Z) CLOS10 NO,CONNECT NOT ALLOWED«, t00=0x0071, t01=0x00b4}
0x0b152…0b178 Head {h00=0x0022, h01=0x0050, text=» ANK A1,TOLD.RC TOLD TO USER ?«, t00=0x0071, t01=0x00e0}
0x0b178…0b190 Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLOS10 NO«, t00=0x0071, t01=0x0106}
0x0b190…0b1a4 Head {h00=0x0010, h01=0x0050, text=»CONA10 EQU *«, t00=0x0071, t01=0x011e}
0x0b1a4…0b1b0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x0132}
0x0b1b0…0b1be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0071, t01=0x013e}
0x0b1be…0b1c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x014c}
0x0b1c8…0b1ee Head {h00=0x0022, h01=0x0050, text=»* SAVE SYMBOLIC DTE ADDRESSES «, t00=0x0071, t01=0x0156}
0x0b1ee…0b1f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x017c}
0x0b1f8…0b22c Head {h00=0x0030, h01=0x0050, text=» LD A3,ECBCW2,A8 LOCAL SYMBOLIC DTE ADDRESS «, t00=0x0071, t01=0x0186}
0x0b22c…0b244 Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTLAD,A6«, t00=0x0072, t01=0x002a}
0x0b244…0b278 Head {h00=0x0030, h01=0x0050, text=» LD A3,ECBCW1,A8 REMOTE SYMBOLIC DTE ADDRESS«, t00=0x0072, t01=0x0042}
0x0b278…0b290 Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTRAD,A6«, t00=0x0072, t01=0x0076}
0x0b290…0b2ba Head {h00=0x0026, h01=0x0050, text=» CM DWTRTP,A6 CLEAR TIMER ADDRESS «, t00=0x0072, t01=0x008e}
0x0b2ba…0b2e2 Head {h00=0x0024, h01=0x0050, text=» CM DWTIPQ,A6 CLEAR INPUT QUEUE «, t00=0x0072, t01=0x00b8}
0x0b2e2…0b30a Head {h00=0x0024, h01=0x0050, text=» CM DWTRCI,A6 CLEAR RETURN INFO.«, t00=0x0072, t01=0x00e0}
0x0b30a…0b346 Head {h00=0x0038, h01=0x0050, text=» CM DWTWRO,A6 CLEAR WRITE INFO.«, t00=0x0072, t01=0x0108}
0x0b346…0b36c Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x0072, t01=0x0144}
0x0b36c…0b394 Head {h00=0x0024, h01=0x0050, text=» CM DWTRCI,A6 CLEAR RETURN INFO «, t00=0x0072, t01=0x016a}
0x0b394…0b3bc (115, 0, 400) Head {h00=0x0024, h01=0x0050, text=» CF A14,PUTDWT PUT DWT IN CHAIN «, t00=0x0073, t01=0x0004}
0x0b3bc…0b3d2 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0073, t01=0x002c}
0x0b3d2…0b3e8 Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0073, t01=0x0042}
0x0b3e8…0b40e Head {h00=0x0022, h01=0x0050, text=» SUK A2,CONACT CONNECT ACTIVE «, t00=0x0073, t01=0x0058}
0x0b40e…0b428 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CONA40 NO!«, t00=0x0073, t01=0x007e}
0x0b428…0b44c Head {h00=0x0020, h01=0x0050, text=» LC A2,DWTOPT,A6 PVC-OPTION?«, t00=0x0073, t01=0x0098}
0x0b44c…0b45e Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0073, t01=0x00bc}
0x0b45e…0b478 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CONA40 NO «, t00=0x0073, t01=0x00ce}
0x0b478…0b484 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x00e8}
0x0b484…0b49a Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0073, t01=0x00f4}
0x0b49a…0b4b0 Head {h00=0x0012, h01=0x0050, text=» LDK A2,CONAD «, t00=0x0073, t01=0x010a}
0x0b4b0…0b4ea Head {h00=0x0036, h01=0x0050, text=» SC A2,DWTSTE,A6 DWT STATE: CONNECTED ACCEPT DATA «, t00=0x0073, t01=0x0120}
0x0b4ea…0b50e Head {h00=0x0020, h01=0x0050, text=» RF DISC40 COMPLETE REQUEST «, t00=0x0073, t01=0x015a}
0x0b50e…0b51a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x017e}
0x0b51a…0b530 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0073, t01=0x018a}
0x0b530…0b544 Head {h00=0x0010, h01=0x0050, text=»CONA40 EQU *«, t00=0x0074, t01=0x0010}
0x0b544…0b566 Head {h00=0x001e, h01=0x0050, text=» RB WRIT50 ACTIVATE TIMER «, t00=0x0074, t01=0x0024}
0x0b566…0b572 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x0046}
0x0b572…0b57c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0052}
0x0b57c…0b58a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x005c}
0x0b58a…0b594 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x006a}
0x0b594…0b5d8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0074, t01=0x0074}
0x0b5d8…0b5e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00b8}
0x0b5e2…0b600 Head {h00=0x001a, h01=0x0050, text=»* CLOSE REQUEST«, t00=0x0074, t01=0x00c2}
0x0b600…0b60a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00e0}
0x0b60a…0b64e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0074, t01=0x00ea}
0x0b64e…0b658 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x012e}
0x0b658…0b66c Head {h00=0x0010, h01=0x0050, text=»CLOS00 EQU *«, t00=0x0074, t01=0x0138}
0x0b66c…0b69c Head {h00=0x002c, h01=0x0050, text=» CF A14,FNDLOC CONFIRM LOCAL DTE ADDRESS«, t00=0x0074, t01=0x014c}
0x0b69c…0b6c2 Head {h00=0x0022, h01=0x0050, text=» ANK A1,STRTFL MASK START FLAG«, t00=0x0074, t01=0x017c}
0x0b6c2…0b6ea Head {h00=0x0024, h01=0x0050, text=» RF(Z) DISC40 CLOSE ALREADY DONE«, t00=0x0075, t01=0x0012}
0x0b6ea…0b6f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x003a}
0x0b6f4…0b708 Head {h00=0x0010, h01=0x0050, text=»* LINE OPEN «, t00=0x0075, t01=0x0044}
0x0b708…0b734 Head {h00=0x0028, h01=0x0050, text=»* CHECK IF CLOSE ALREADY IN PROGRESS«, t00=0x0075, t01=0x0058}
0x0b734…0b73e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0084}
0x0b73e…0b754 Head {h00=0x0012, h01=0x0050, text=» LDK A2,CLOSYS«, t00=0x0075, t01=0x008e}
0x0b754…0b77c Head {h00=0x0024, h01=0x0050, text=» LD A3,CMNFLG,A12 «, t00=0x0075, t01=0x00a4}
0x0b77c…0b7a0 Head {h00=0x0020, h01=0x0050, text=» ANK A3,CLOFLG «, t00=0x0075, t01=0x00cc}
0x0b7a0…0b7b8 Head {h00=0x0014, h01=0x0050, text=» RF(Z) DISC55 NO«, t00=0x0075, t01=0x00f0}
0x0b7b8…0b7cc Head {h00=0x0010, h01=0x0050, text=»CLOS10 EQU *«, t00=0x0075, t01=0x0108}
0x0b7cc…0b7ee Head {h00=0x001e, h01=0x0050, text=» ABL ERRSTE SEQUENCE ERROR«, t00=0x0075, t01=0x011c}
0x0b7ee…0b7f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x013e}
0x0b7f8…0b806 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0075, t01=0x0148}
0x0b806…0b810 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0156}
0x0b810…0b85c Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x0075, t01=0x0160}
0x0b85c…0b866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x001c}
0x0b866…0b882 Head {h00=0x0018, h01=0x0050, text=»* DISCONNECT REQUEST«, t00=0x0076, t01=0x0026}
0x0b882…0b88c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0042}
0x0b88c…0b8d8 Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x0076, t01=0x004c}
0x0b8d8…0b8e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0098}
0x0b8e2…0b8f6 Head {h00=0x0010, h01=0x0050, text=»DISC00 EQU *«, t00=0x0076, t01=0x00a2}
0x0b8f6…0b92e Head {h00=0x0034, h01=0x0050, text=» LD A1,DWTLAD,A6 GET LOCAL SYMBOLIC DTE ADDRESS «, t00=0x0076, t01=0x00b6}
0x0b92e…0b95c Head {h00=0x002a, h01=0x0050, text=» CF A14,FNDLIN FIND LINE BLOCK ADDRESS«, t00=0x0076, t01=0x00ee}
0x0b95c…0b982 Head {h00=0x0022, h01=0x0050, text=» ANK A1,STRTFL MASK START FLAG«, t00=0x0076, t01=0x011c}
0x0b982…0b9b0 Head {h00=0x002a, h01=0x0050, text=» ABL(Z) ERRSYS INCORRECT SYSTEM STATE «, t00=0x0076, t01=0x0142}
0x0b9b0…0b9c4 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0076, t01=0x0170}
0x0b9c4…0b9f2 Head {h00=0x002a, h01=0x0050, text=» RF(Z) DISC40 DISCONNECT ALREADY DONE «, t00=0x0076, t01=0x0184}
0x0b9f2…0ba1a Head {h00=0x0024, h01=0x0050, text=» CM DWTRCI,A6 CLEAR RETURN INFO «, t00=0x0077, t01=0x0022}
0x0ba1a…0ba30 Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0077, t01=0x004a}
0x0ba30…0ba42 Head {h00=0x000e, h01=0x0050, text=» RF DISC50«, t00=0x0077, t01=0x0060}
0x0ba42…0ba4e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x0072}
0x0ba4e…0ba64 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0077, t01=0x007e}
0x0ba64…0ba92 Head {h00=0x002a, h01=0x0050, text=» SUK A4,VCREL VIRTUAL CIRCUIT RELEASED«, t00=0x0077, t01=0x0094}
0x0ba92…0baac Head {h00=0x0016, h01=0x0050, text=» RF(NZ) DISC50 NO «, t00=0x0077, t01=0x00c2}
0x0baac…0bab6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x00dc}
0x0bab6…0bad2 Head {h00=0x0018, h01=0x0050, text=»* CLEAR INPUT QUEUE «, t00=0x0077, t01=0x00e6}
0x0bad2…0badc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0102}
0x0badc…0baf0 Head {h00=0x0010, h01=0x0050, text=»DISC10 EQU *«, t00=0x0077, t01=0x010c}
0x0baf0…0bb2e Head {h00=0x003a, h01=0x0050, text=» LDK A1,DWTIPQ INPUT QUEUE ANCHOR «, t00=0x0077, t01=0x0120}
0x0bb2e…0bb40 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x0077, t01=0x015e}
0x0bb40…0bb78 Head {h00=0x0034, h01=0x0050, text=» LD A2,DWTIPQ,A6 QUEUE EMPTY ?«, t00=0x0077, t01=0x0170}
0x0bb78…0bba6 Head {h00=0x002a, h01=0x0050, text=» RF(Z) DISC20 YES«, t00=0x0078, t01=0x0018}
0x0bba6…0bbe0 Head {h00=0x0036, h01=0x0050, text=» CF A14,DEQUE DEQUEUE ELEMENT«, t00=0x0078, t01=0x0046}
0x0bbe0…0bc1a Head {h00=0x0036, h01=0x0050, text=» CF A14,RLBUF RELEASE BUFFER «, t00=0x0078, t01=0x0080}
0x0bc1a…0bc36 Head {h00=0x0018, h01=0x0050, text=» RB DISC10 TAKE NEXT«, t00=0x0078, t01=0x00ba}
0x0bc36…0bc52 Head {h00=0x0018, h01=0x0050, text=»DISC20 EQU * «, t00=0x0078, t01=0x00d6}
0x0bc52…0bc8a Head {h00=0x0034, h01=0x0050, text=» LDK A1,DISCON DISCONNECTED «, t00=0x0078, t01=0x00f2}
0x0bc8a…0bcb0 Head {h00=0x0022, h01=0x0050, text=» SC A1,DWTSTE,A6«, t00=0x0078, t01=0x012a}
0x0bcb0…0bcbc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x0150}
0x0bcbc…0bcc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x015c}
0x0bcc6…0bcd4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0078, t01=0x0166}
0x0bcd4…0bcde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0174}
0x0bcde…0bcfe Head {h00=0x001c, h01=0x0050, text=»* REMOVE DWT FROM CHAIN «, t00=0x0078, t01=0x017e}
0x0bcfe…0bd08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x000e}
0x0bd08…0bd1c Head {h00=0x0010, h01=0x0050, text=»DISC25 EQU *«, t00=0x0079, t01=0x0018}
0x0bd1c…0bd4a Head {h00=0x002a, h01=0x0050, text=» CF A14,RELDWT RELEASE DWT FROM CHAIN «, t00=0x0079, t01=0x002c}
0x0bd4a…0bd5e Head {h00=0x0010, h01=0x0050, text=»DISC40 EQU *«, t00=0x0079, t01=0x005a}
0x0bd5e…0bd7e Head {h00=0x001c, h01=0x0050, text=» LDK A1,ACPT.RC ACCEPTED«, t00=0x0079, t01=0x006e}
0x0bd7e…0bda2 Head {h00=0x0020, h01=0x0050, text=» ABL RHEXIT COMPLETE REQUEST«, t00=0x0079, t01=0x008e}
0x0bda2…0bdb6 Head {h00=0x0010, h01=0x0050, text=»DISC50 EQU *«, t00=0x0079, t01=0x00b2}
0x0bdb6…0bdcc Head {h00=0x0012, h01=0x0050, text=» LDK A2,DISCAL«, t00=0x0079, t01=0x00c6}
0x0bdcc…0bde0 Head {h00=0x0010, h01=0x0050, text=»DISC55 EQU *«, t00=0x0079, t01=0x00dc}
0x0bde0…0bdf6 Head {h00=0x0012, h01=0x0050, text=» LDK A5,DISCON«, t00=0x0079, t01=0x00f0}
0x0bdf6…0be0a Head {h00=0x0010, h01=0x0050, text=»DISC60 EQU *«, t00=0x0079, t01=0x0106}
0x0be0a…0be30 Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x0079, t01=0x011a}
0x0be30…0be48 Head {h00=0x0014, h01=0x0050, text=» SC A5,DWTSTE,A6«, t00=0x0079, t01=0x0140}
0x0be48…0be5e Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0079, t01=0x0158}
0x0be5e…0be74 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0079, t01=0x016e}
0x0be74…0be7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0184}
0x0be7e…0beaa Head {h00=0x0028, h01=0x0050, text=»* TEST IF PERMANENT VIRTUAL CIRCUIT «, t00=0x0079, t01=0x018e}
0x0beaa…0beb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x002a}
0x0beb4…0becc Head {h00=0x0014, h01=0x0050, text=» LC A1,VCTYP,A13«, t00=0x007a, t01=0x0034}
0x0becc…0bee0 Head {h00=0x0010, h01=0x0050, text=» ANK A1,PVC «, t00=0x007a, t01=0x004c}
0x0bee0…0bef8 Head {h00=0x0014, h01=0x0050, text=» RF(Z) DISC70 NO«, t00=0x007a, t01=0x0060}
0x0bef8…0bf04 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x0078}
0x0bf04…0bf1a Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x007a, t01=0x0084}
0x0bf1a…0bf3e Head {h00=0x0020, h01=0x0050, text=» SUK A2,DISCAL DISCONNECT ? «, t00=0x007a, t01=0x009a}
0x0bf3e…0bf58 Head {h00=0x0016, h01=0x0050, text=» RB(Z) DISC25 YES «, t00=0x007a, t01=0x00be}
0x0bf58…0bf6c Head {h00=0x0010, h01=0x0050, text=»DISC70 EQU *«, t00=0x007a, t01=0x00d8}
0x0bf6c…0bf94 Head {h00=0x0024, h01=0x0050, text=» ABL RHSCHE CONTROL TO SCHEDULER«, t00=0x007a, t01=0x00ec}
0x0bf94…0bfa0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x0114}
0x0bfa0…0bfb6 Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x007a, t01=0x0120}
0x0bfb6…0bfc8 Head {h00=0x000e, h01=0x0050, text=» RB DISC25«, t00=0x007a, t01=0x0136}
0x0bfc8…0bfd4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x0148}
0x0bfd4…0bfde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0154}
0x0bfde…0bfec Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007a, t01=0x015e}
0x0bfec…0bff6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x016c}
0x0bff6…0c03a Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x007a, t01=0x0176}
0x0c03a…0c044 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x002a}
0x0c044…0c068 Head {h00=0x0020, h01=0x0050, text=»* SET STATUS REQUEST «, t00=0x007b, t01=0x0034}
0x0c068…0c072 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0058}
0x0c072…0c0b6 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x007b, t01=0x0062}
0x0c0b6…0c0c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00a6}
0x0c0c0…0c0d4 Head {h00=0x0010, h01=0x0050, text=»STAT05 EQU *«, t00=0x007b, t01=0x00b0}
0x0c0d4…0c0ea Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x007b, t01=0x00c4}
0x0c0ea…0c0fc Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x007b, t01=0x00da}
0x0c0fc…0c12a Head {h00=0x002a, h01=0x0050, text=» SUK A1,VCREL VIRTUAL CIRCUIT RELEASED«, t00=0x007b, t01=0x00ec}
0x0c12a…0c152 Head {h00=0x0024, h01=0x0050, text=» ABL(Z) WRIT10 COMPLETE REQUEST «, t00=0x007b, t01=0x011a}
0x0c152…0c15e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007b, t01=0x0142}
0x0c15e…0c18e Head {h00=0x002c, h01=0x0050, text=» LD A1,ECBCW1,A8 GET STATUS INFORMATION «, t00=0x007b, t01=0x014e}
0x0c18e…0c1a4 Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x007b, t01=0x017e}
0x0c1a4…0c1ca (124, 0, 400) Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) ERRREQ REQUEST ERROR «, t00=0x007c, t01=0x0004}
0x0c1ca…0c1d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x002a}
0x0c1d6…0c1ec Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x007c, t01=0x0036}
0x0c1ec…0c216 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) STAT20 ACCEPT CALL REQUEST«, t00=0x007c, t01=0x004c}
0x0c216…0c222 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x0076}
0x0c222…0c24e Head {h00=0x0028, h01=0x0050, text=» SUK A3,CONAD CONNECTED ACCEPT DATA «, t00=0x007c, t01=0x0082}
0x0c24e…0c268 Head {h00=0x0016, h01=0x0050, text=» RF(Z) STAT10 YES «, t00=0x007c, t01=0x00ae}
0x0c268…0c29a Head {h00=0x002e, h01=0x0050, text=» SUK A3,CONRD-CONAD CONNECTED REFUSE DATA «, t00=0x007c, t01=0x00c8}
0x0c29a…0c2c0 Head {h00=0x0022, h01=0x0050, text=» RB(NZ) CLOS10 SEQUENCE ERROR «, t00=0x007c, t01=0x00fa}
0x0c2c0…0c2ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0120}
0x0c2ca…0c2e8 Head {h00=0x001a, h01=0x0050, text=»* REFUSE DATA REQUEST «, t00=0x007c, t01=0x012a}
0x0c2e8…0c2f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0148}
0x0c2f2…0c306 Head {h00=0x0010, h01=0x0050, text=»STAT10 EQU *«, t00=0x007c, t01=0x0152}
0x0c306…0c328 Head {h00=0x001e, h01=0x0050, text=» LDK A2,REFDAT REFUSE DATA«, t00=0x007c, t01=0x0166}
0x0c328…0c33e Head {h00=0x0012, h01=0x0050, text=» LDK A1,CONRD «, t00=0x007c, t01=0x0188}
0x0c33e…0c356 Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTSTE,A6«, t00=0x007d, t01=0x000e}
0x0c356…0c37c Head {h00=0x0022, h01=0x0050, text=» CFR A14,A11 TRANSPORT HANDLER«, t00=0x007d, t01=0x0026}
0x0c37c…0c3a4 Head {h00=0x0024, h01=0x0050, text=» ABL RHSCHE CONTROL TO SCHEDULER«, t00=0x007d, t01=0x004c}
0x0c3a4…0c3ba Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x007d, t01=0x0074}
0x0c3ba…0c3c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x008a}
0x0c3c4…0c3d2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007d, t01=0x0094}
0x0c3d2…0c3dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00a2}
0x0c3dc…0c3fa Head {h00=0x001a, h01=0x0050, text=»* ACCEPT CALL REQUEST «, t00=0x007d, t01=0x00ac}
0x0c3fa…0c404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00ca}
0x0c404…0c418 Head {h00=0x0010, h01=0x0050, text=»STAT20 EQU *«, t00=0x007d, t01=0x00d4}
0x0c418…0c446 Head {h00=0x002a, h01=0x0050, text=» SUK A3,INCALR INCOMING CALL RECEIVED «, t00=0x007d, t01=0x00e8}
0x0c446…0c46c Head {h00=0x0022, h01=0x0050, text=» RB(NZ) CLOS10 SEQUENCE ERROR «, t00=0x007d, t01=0x0116}
0x0c46c…0c48e Head {h00=0x001e, h01=0x0050, text=» LDK A2,ACCCAL ACCEPT CALL«, t00=0x007d, t01=0x013c}
0x0c48e…0c4ba Head {h00=0x0028, h01=0x0050, text=» LDK A5,CONAD CONNECTED ACCEPT DATA «, t00=0x007d, t01=0x015e}
0x0c4ba…0c4de Head {h00=0x0020, h01=0x0050, text=» RB DISC60 TRANSPORT HANDLER«, t00=0x007d, t01=0x018a}
0x0c4de…0c4ea Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007e, t01=0x001e}
0x0c4ea…0c4f8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007e, t01=0x002a}
0x0c4f8…0c502 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0038}
0x0c502…0c54e Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x007e, t01=0x0042}
0x0c54e…0c558 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x008e}
0x0c558…0c576 Head {h00=0x001a, h01=0x0050, text=»* SET TIMEOUT REQUEST «, t00=0x007e, t01=0x0098}
0x0c576…0c580 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00b6}
0x0c580…0c5cc Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x007e, t01=0x00c0}
0x0c5cc…0c5d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x010c}
0x0c5d6…0c5ea Head {h00=0x0010, h01=0x0050, text=»TIMO00 EQU *«, t00=0x007e, t01=0x0116}
0x0c5ea…0c612 Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBCW1,A8 GET TIMER VALUE«, t00=0x007e, t01=0x012a}
0x0c612…0c62a Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTRTV,A6«, t00=0x007e, t01=0x0152}
0x0c62a…0c64e Head {h00=0x0020, h01=0x0050, text=» RB DISC40 COMPLETE REQUEST «, t00=0x007e, t01=0x016a}
0x0c64e…0c658 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x018e}
0x0c658…0c66c Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x007f, t01=0x0008}
0x0c66c…0c67a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007f, t01=0x001c}
0x0c67a…0c684 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x002a}
0x0c684…0c68e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0034}
0x0c68e…0c6d2 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x007f, t01=0x003e}
0x0c6d2…0c6dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0082}
0x0c6dc…0c6f8 Head {h00=0x0018, h01=0x0050, text=»* STATISTIC REQUEST «, t00=0x007f, t01=0x008c}
0x0c6f8…0c702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00a8}
0x0c702…0c746 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x007f, t01=0x00b2}
0x0c746…0c750 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00f6}
0x0c750…0c75a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0100}
0x0c75a…0c76e Head {h00=0x0010, h01=0x0050, text=»STATS EQU * «, t00=0x007f, t01=0x010a}
0x0c76e…0c794 Head {h00=0x0022, h01=0x0050, text=» CF A14,FNDLOC GET LINE NUMBER«, t00=0x007f, t01=0x011e}
0x0c794…0c7aa Head {h00=0x0012, h01=0x0050, text=» LDK A4,STATFL«, t00=0x007f, t01=0x0144}
0x0c7aa…0c7bc Head {h00=0x000e, h01=0x0050, text=» ANR A4,A1«, t00=0x007f, t01=0x015a}
0x0c7bc…0c7ea Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) ERRREQ STATISTIC REQUEST BUSY«, t00=0x007f, t01=0x016c}
0x0c7ea…0c802 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRL,A8 «, t00=0x0080, t01=0x000a}
0x0c802…0c826 Head {h00=0x0020, h01=0x0050, text=» ABL(NP) ERRLEN LENGTH ERROR«, t00=0x0080, t01=0x0022}
0x0c826…0c860 Head {h00=0x0036, h01=0x0050, text=» ORS A1,CMNFLG,A12 SET STATISTIC REQUEST BUSY FLAG«, t00=0x0080, t01=0x0046}
0x0c860…0c876 Head {h00=0x0012, h01=0x0050, text=» LDK A1,STATIS«, t00=0x0080, t01=0x0080}
0x0c876…0c8a2 Head {h00=0x0028, h01=0x0050, text=» SC A1,DWTFNC,A6 SAVE FUNCTION CODE «, t00=0x0080, t01=0x0096}
0x0c8a2…0c8ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00c2}
0x0c8ac…0c8ea Head {h00=0x003a, h01=0x0050, text=»* SAVE THREE WORDS OF THE USER ECB IN A MONITOR BLOCK «, t00=0x0080, t01=0x00cc}
0x0c8ea…0c8f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x010a}
0x0c8f4…0c90c Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBFC,A8 «, t00=0x0080, t01=0x0114}
0x0c90c…0c924 Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBBA,A8 «, t00=0x0080, t01=0x012c}
0x0c924…0c93c Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBCW2,A8«, t00=0x0080, t01=0x0144}
0x0c93c…0c94e Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x0080, t01=0x015c}
0x0c94e…0c984 Head {h00=0x0032, h01=0x0050, text=» CF A15,GETBLK GET A BLOCK AND SAVE REGISTERS «, t00=0x0080, t01=0x016e}
0x0c984…0c990 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0081, t01=0x0014}
0x0c990…0c9c2 Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTRTP,A6 SAVE BLOCK ADDRESS IN DWT«, t00=0x0081, t01=0x0020}
0x0c9c2…0c9f2 Head {h00=0x002c, h01=0x0050, text=» ST A6,ECBCW2,A8 SAVE DWT-ADDRESS IN ECB«, t00=0x0081, t01=0x0052}
0x0c9f2…0c9fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0082}
0x0c9fc…0ca0a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0081, t01=0x008c}
0x0ca0a…0ca14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x009a}
0x0ca14…0ca4a Head {h00=0x0032, h01=0x0050, text=»* PREPARE ECB FOR STATISTIC REQUEST TO LEVEL 2«, t00=0x0081, t01=0x00a4}
0x0ca4a…0ca54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00da}
0x0ca54…0ca6e Head {h00=0x0016, h01=0x0050, text=» LD A1,FILCOD,A12 «, t00=0x0081, t01=0x00e4}
0x0ca6e…0caa8 Head {h00=0x0036, h01=0x0050, text=» ST A1,ECBFC,A8 FILE CODE FOR LINE IDENTIFICATION «, t00=0x0081, t01=0x00fe}
0x0caa8…0cabe Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0081, t01=0x0138}
0x0cabe…0cad2 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A12 «, t00=0x0081, t01=0x014e}
0x0cad2…0cb0e Head {h00=0x0038, h01=0x0050, text=» ADK A1,INTSTB ADDRESS INTERMEDIATE STATISTIC BUFFER«, t00=0x0081, t01=0x0162}
0x0cb0e…0cb2c Head {h00=0x001a, h01=0x0050, text=» ST A1,ECBBA,A8 TO ECB«, t00=0x0082, t01=0x000e}
0x0cb2c…0cb38 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x002c}
0x0cb38…0cb4c Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x0082, t01=0x0038}
0x0cb4c…0cb78 Head {h00=0x0028, h01=0x0050, text=» LDR A1,A8 ECB-ADDRESS AS PARAMETER «, t00=0x0082, t01=0x004c}
0x0cb78…0cb82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0078}
0x0cb82…0cbae Head {h00=0x0028, h01=0x0050, text=»* ISSUE STATISTIC REQUEST TO LEVEL 2«, t00=0x0082, t01=0x0082}
0x0cbae…0cbb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00ae}
0x0cbb8…0cbdc Head {h00=0x0020, h01=0x0050, text=» LDK A7,STATR FUNCTION CODE «, t00=0x0082, t01=0x00b8}
0x0cbdc…0cbe8 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0082, t01=0x00dc}
0x0cbe8…0cbf8 Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x0082, t01=0x00e8}
0x0cbf8…0cc20 Head {h00=0x0024, h01=0x0050, text=» DATA STAEND ACTIVATION ADDRESS «, t00=0x0082, t01=0x00f8}
0x0cc20…0cc48 Head {h00=0x0024, h01=0x0050, text=» ABL EXITDC CONTROL TO SCHEDULER«, t00=0x0082, t01=0x0120}
0x0cc48…0cc52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0148}
0x0cc52…0cc60 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0082, t01=0x0152}
0x0cc60…0cc6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0160}
0x0cc6a…0cc88 Head {h00=0x001a, h01=0x0050, text=»* RETURN FROM LEVEL 2 «, t00=0x0082, t01=0x016a}
0x0cc88…0cc92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0188}
0x0cc92…0cca6 (131, 0, 398) Head {h00=0x0010, h01=0x0050, text=»STAEND EQU *«, t00=0x0083, t01=0x0004}
0x0cca6…0ccc4 Head {h00=0x001a, h01=0x0050, text=» LDR A8,A1 ECB-ADDRESS«, t00=0x0083, t01=0x0018}
0x0ccc4…0ccec Head {h00=0x0024, h01=0x0050, text=» LD A6,ECBCW2,A8 GET DWT-ADDRESS«, t00=0x0083, t01=0x0036}
0x0ccec…0cd1c Head {h00=0x002c, h01=0x0050, text=» LD A4,DWTRTP,A6 GET ADDRESS SAVE BLOCK «, t00=0x0083, t01=0x005e}
0x0cd1c…0cd32 Head {h00=0x0012, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x0083, t01=0x008e}
0x0cd32…0cd44 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x0083, t01=0x00a4}
0x0cd44…0cd68 Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RELEASE BLOCK«, t00=0x0083, t01=0x00b6}
0x0cd68…0cd74 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0083, t01=0x00da}
0x0cd74…0cd9e Head {h00=0x0026, h01=0x0050, text=» ST A1,ECBFC,A8 RESTORE FILE CODE «, t00=0x0083, t01=0x00e6}
0x0cd9e…0cdcc Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBCW2,A8 RESTORE CONTROL WORD «, t00=0x0083, t01=0x0110}
0x0cdcc…0cde2 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0083, t01=0x013e}
0x0cde2…0ce20 Head {h00=0x003a, h01=0x0050, text=» LD A1,ECBBA,A8 GET INTERMEDIATE STAT. BUFFER ADDRESS «, t00=0x0083, t01=0x0154}
0x0ce20…0ce52 (132, 0, 400) Head {h00=0x002e, h01=0x0050, text=» ST A2,ECBBA,A8 RESTORE OLD BUFFER ADDRESS«, t00=0x0084, t01=0x0004}
0x0ce52…0ce6a Head {h00=0x0014, h01=0x0050, text=» LD A4,ECBEL,A8 «, t00=0x0084, t01=0x0036}
0x0ce6a…0ce90 Head {h00=0x0022, h01=0x0050, text=» LDKL A14,DCSTAK STACK POINTER«, t00=0x0084, t01=0x004e}
0x0ce90…0cec4 Head {h00=0x0030, h01=0x0050, text=» CF A14,COPTUB COPY STAT.INFO.TO USER BUFFER«, t00=0x0084, t01=0x0074}
0x0cec4…0ced0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x00a8}
0x0ced0…0cee4 Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x0084, t01=0x00b4}
0x0cee4…0cf08 Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBRC,A8 RETURN CODE «, t00=0x0084, t01=0x00c8}
0x0cf08…0cf1a Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x0084, t01=0x00ec}
0x0cf1a…0cf4a Head {h00=0x002c, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST TO USER «, t00=0x0084, t01=0x00fe}
0x0cf4a…0cf56 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0084, t01=0x012e}
0x0cf56…0cf68 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0084, t01=0x013a}
0x0cf68…0cf96 Head {h00=0x002a, h01=0x0050, text=» CF A14,FNDLIN GET LINE BLOCK ADDRESS «, t00=0x0084, t01=0x014c}
0x0cf96…0cfac Head {h00=0x0012, h01=0x0050, text=» LDK A1,STATFL«, t00=0x0084, t01=0x017a}
0x0cfac…0cfbe Head {h00=0x000e, h01=0x0050, text=» C1R A1,A1«, t00=0x0084, t01=0x0190}
0x0cfbe…0cfee Head {h00=0x002c, h01=0x0050, text=» ANS A1,CMNFLG,A12 RESET STAT. BUSY FLAG«, t00=0x0085, t01=0x0012}
0x0cfee…0d01c Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0085, t01=0x0042}
0x0d01c…0d028 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x0070}
0x0d028…0d036 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0085, t01=0x007c}
0x0d036…0d040 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x008a}
0x0d040…0d072 Head {h00=0x002e, h01=0x0050, text=»* ROUTINE TO GET LINE INDEX AND/OR «, t00=0x0085, t01=0x0094}
0x0d072…0d096 Head {h00=0x0020, h01=0x0050, text=»* LINE BLOCK ADDRESS «, t00=0x0085, t01=0x00c6}
0x0d096…0d0a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x00ea}
0x0d0a0…0d0e4 Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0085, t01=0x00f4}
0x0d0e4…0d0ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x0138}
0x0d0ee…0d110 Head {h00=0x001e, h01=0x0050, text=»* INPUT PARAMETER :«, t00=0x0085, t01=0x0142}
0x0d110…0d142 Head {h00=0x002e, h01=0x0050, text=»* A1 =SYMBOLIC LOCAL DTE ADDRESS «, t00=0x0085, t01=0x0164}
0x0d142…0d14c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0008}
0x0d14c…0d170 Head {h00=0x0020, h01=0x0050, text=»* CALLING SEQUENCE : «, t00=0x0086, t01=0x0012}
0x0d170…0d190 Head {h00=0x001c, h01=0x0050, text=»* CF A14,FNDLIN«, t00=0x0086, t01=0x0036}
0x0d190…0d1c4 Head {h00=0x0030, h01=0x0050, text=»* CF A14,FNDLOC (A1 LOADED IN THE ROUTINE)«, t00=0x0086, t01=0x0056}
0x0d1c4…0d1ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x008a}
0x0d1ce…0d1f2 Head {h00=0x0020, h01=0x0050, text=»* OUTPUT PARAMETERS :«, t00=0x0086, t01=0x0094}
0x0d1f2…0d216 Head {h00=0x0020, h01=0x0050, text=»* A1 = COMMON FLAGS«, t00=0x0086, t01=0x00b8}
0x0d216…0d240 Head {h00=0x0026, h01=0x0050, text=»* A12= LINE BLOCK ADDRESS«, t00=0x0086, t01=0x00dc}
0x0d240…0d25c Head {h00=0x0018, h01=0x0050, text=»* A3 = LINE INDEX «, t00=0x0086, t01=0x0106}
0x0d25c…0d28e Head {h00=0x002e, h01=0x0050, text=»* NO OTHER REGISTERS ARE CHANGED «, t00=0x0086, t01=0x0122}
0x0d28e…0d298 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0154}
0x0d298…0d2ac Head {h00=0x0010, h01=0x0050, text=»FNDLOC EQU *«, t00=0x0086, t01=0x015e}
0x0d2ac…0d2da Head {h00=0x002a, h01=0x0050, text=» LD A1,ECBCW2,A8 GET LOCAL DTE ADDRESS«, t00=0x0086, t01=0x0172}
0x0d2da…0d2ee Head {h00=0x0010, h01=0x0050, text=»FNDLIN EQU *«, t00=0x0087, t01=0x0010}
0x0d2ee…0d30a Head {h00=0x0018, h01=0x0050, text=» STR A2,A14 SAVE A2 «, t00=0x0087, t01=0x0024}
0x0d30a…0d32a Head {h00=0x001c, h01=0x0050, text=» LDKL A3,LOCAL SET TYPE «, t00=0x0087, t01=0x0040}
0x0d32a…0d33c Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x0087, t01=0x0060}
0x0d33c…0d362 Head {h00=0x0022, h01=0x0050, text=» CF A15,FNDDNT FIND LOCAL DTE «, t00=0x0087, t01=0x0072}
0x0d362…0d374 Head {h00=0x000e, h01=0x0050, text=» ENB . =1«, t00=0x0087, t01=0x0098}
0x0d374…0d38e Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 FOUND ?«, t00=0x0087, t01=0x00aa}
0x0d38e…0d3a8 Head {h00=0x0016, h01=0x0050, text=» RF(NN) FNDL10 YES«, t00=0x0087, t01=0x00c4}
0x0d3a8…0d3d0 Head {h00=0x0024, h01=0x0050, text=» ADKL A14,4 ADJUST STACK POINTER«, t00=0x0087, t01=0x00de}
0x0d3d0…0d3f2 Head {h00=0x001e, h01=0x0050, text=» ABL ERRREQ REQUEST ERROR «, t00=0x0087, t01=0x0106}
0x0d3f2…0d406 Head {h00=0x0010, h01=0x0050, text=»FNDL10 EQU *«, t00=0x0087, t01=0x0128}
0x0d406…0d41c Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x0087, t01=0x013c}
0x0d41c…0d42e Head {h00=0x000e, h01=0x0050, text=» ADR A3,A3«, t00=0x0087, t01=0x0152}
0x0d42e…0d43a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0087, t01=0x0164}
0x0d43a…0d464 Head {h00=0x0026, h01=0x0050, text=» LD A12,LINTAB,A3 LINE ADM. TABLE «, t00=0x0087, t01=0x0170}
0x0d464…0d48e Head {h00=0x0026, h01=0x0050, text=» LD A1,CMNFLG,A12 GET COMMON FLAGS«, t00=0x0088, t01=0x000a}
0x0d48e…0d4ac Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A14 RELOAD A2«, t00=0x0088, t01=0x0034}
0x0d4ac…0d4bc Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0088, t01=0x0052}
0x0d4bc…0d4ca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0088, t01=0x0062}
0x0d4ca…0d4d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0070}
0x0d4d4…0d4de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x007a}
0x0d4de…0d4f8 Head {h00=0x0016, h01=0x0050, text=»* PUT DWT IN CHAIN«, t00=0x0088, t01=0x0084}
0x0d4f8…0d502 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x009e}
0x0d502…0d54e Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x0088, t01=0x00a8}
0x0d54e…0d558 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00f4}
0x0d558…0d574 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0088, t01=0x00fe}
0x0d574…0d590 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x0088, t01=0x011a}
0x0d590…0d5b8 Head {h00=0x0024, h01=0x0050, text=»* A12 = LINE ADM.BLOCK ADDRESS «, t00=0x0088, t01=0x0136}
0x0d5b8…0d5da Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x0088, t01=0x015e}
0x0d5da…0d5e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0180}
0x0d5e4…0d600 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0088, t01=0x018a}
0x0d600…0d618 Head {h00=0x0014, h01=0x0050, text=»* CF A14,PUTDWT«, t00=0x0089, t01=0x0016}
0x0d618…0d622 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x002e}
0x0d622…0d63e Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x0089, t01=0x0038}
0x0d63e…0d656 Head {h00=0x0014, h01=0x0050, text=»* A1 IS CHANGED«, t00=0x0089, t01=0x0054}
0x0d656…0d660 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x006c}
0x0d660…0d674 Head {h00=0x0010, h01=0x0050, text=»PUTDWT EQU *«, t00=0x0089, t01=0x0076}
0x0d674…0d690 Head {h00=0x0018, h01=0x0050, text=» STR A2,A14 SAVE A2 «, t00=0x0089, t01=0x008a}
0x0d690…0d6a4 Head {h00=0x0010, h01=0x0050, text=» LDR A2,A12 «, t00=0x0089, t01=0x00a6}
0x0d6a4…0d6ba Head {h00=0x0012, h01=0x0050, text=» ADK A2,CHAIN «, t00=0x0089, t01=0x00ba}
0x0d6ba…0d6ce Head {h00=0x0010, h01=0x0050, text=»PUTD10 EQU *«, t00=0x0089, t01=0x00d0}
0x0d6ce…0d6ec Head {h00=0x001a, h01=0x0050, text=» LDR* A1,A2 GET ANCHOR«, t00=0x0089, t01=0x00e4}
0x0d6ec…0d702 Head {h00=0x0012, h01=0x0050, text=» RF(Z) PUTD20 «, t00=0x0089, t01=0x0102}
0x0d702…0d714 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0089, t01=0x0118}
0x0d714…0d72a Head {h00=0x0012, h01=0x0050, text=» ADK A2,DWTCHN«, t00=0x0089, t01=0x012a}
0x0d72a…0d74c Head {h00=0x001e, h01=0x0050, text=» RB PUTD10 END OF CHAIN ? «, t00=0x0089, t01=0x0140}
0x0d74c…0d760 Head {h00=0x0010, h01=0x0050, text=»PUTD20 EQU *«, t00=0x0089, t01=0x0162}
0x0d760…0d780 Head {h00=0x001c, h01=0x0050, text=» STR A6,A2 PUT IN CHAIN «, t00=0x0089, t01=0x0176}
0x0d780…0d7a0 Head {h00=0x001c, h01=0x0050, text=» LDR* A2,A14 RESTORE A2 «, t00=0x008a, t01=0x0008}
0x0d7a0…0d7b0 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x008a, t01=0x0028}
0x0d7b0…0d7ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0038}
0x0d7ba…0d7c8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008a, t01=0x0042}
0x0d7c8…0d7d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0050}
0x0d7d2…0d7dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x005a}
0x0d7dc…0d7fc Head {h00=0x001c, h01=0x0050, text=»* RELEASE DWT FROM CHAIN«, t00=0x008a, t01=0x0064}
0x0d7fc…0d806 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0084}
0x0d806…0d854 Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x008a, t01=0x008e}
0x0d854…0d85e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x00dc}
0x0d85e…0d87a Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x008a, t01=0x00e6}
0x0d87a…0d896 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x008a, t01=0x0102}
0x0d896…0d8be Head {h00=0x0024, h01=0x0050, text=»* A12 = LINE ADM.BLOCK ADDRESS «, t00=0x008a, t01=0x011e}
0x0d8be…0d8e0 Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x008a, t01=0x0146}
0x0d8e0…0d8ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0168}
0x0d8ea…0d906 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x008a, t01=0x0172}
0x0d906…0d91e Head {h00=0x0014, h01=0x0050, text=»* CF A14,RELDWT«, t00=0x008a, t01=0x018e}
0x0d91e…0d928 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0016}
0x0d928…0d944 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x008b, t01=0x0020}
0x0d944…0d964 Head {h00=0x001c, h01=0x0050, text=»* A1 AND A2 ARE CHANGED«, t00=0x008b, t01=0x003c}
0x0d964…0d96e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x005c}
0x0d96e…0d982 Head {h00=0x0010, h01=0x0050, text=»RELDWT EQU *«, t00=0x008b, t01=0x0066}
0x0d982…0d996 Head {h00=0x0010, h01=0x0050, text=» LDR A2,A12 «, t00=0x008b, t01=0x007a}
0x0d996…0d9ac Head {h00=0x0012, h01=0x0050, text=» ADK A2,CHAIN «, t00=0x008b, t01=0x008e}
0x0d9ac…0d9d0 Head {h00=0x0020, h01=0x0050, text=» RF RELD20 FIRST IN CHAIN ? «, t00=0x008b, t01=0x00a4}
0x0d9d0…0d9e4 Head {h00=0x0010, h01=0x0050, text=»RELD10 EQU *«, t00=0x008b, t01=0x00c8}
0x0d9e4…0d9f6 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x008b, t01=0x00dc}
0x0d9f6…0da0c Head {h00=0x0012, h01=0x0050, text=» ADK A2,DWTCHN«, t00=0x008b, t01=0x00ee}
0x0da0c…0da20 Head {h00=0x0010, h01=0x0050, text=»RELD20 EQU *«, t00=0x008b, t01=0x0104}
0x0da20…0da40 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 GET NEXT DWT«, t00=0x008b, t01=0x0118}
0x0da40…0da62 Head {h00=0x001e, h01=0x0050, text=» RF(Z) RELD30 END OF CHAIN«, t00=0x008b, t01=0x0138}
0x0da62…0da7c Head {h00=0x0016, h01=0x0050, text=» CWR A1,A6 FOUND ?«, t00=0x008b, t01=0x015a}
0x0da7c…0da96 Head {h00=0x0016, h01=0x0050, text=» RB(NE) RELD10 NO «, t00=0x008b, t01=0x0174}
0x0da96…0daae Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTCHN,A6«, t00=0x008b, t01=0x018e}
0x0daae…0dad2 Head {h00=0x0020, h01=0x0050, text=» STR A1,A2 REMOVE FROM CHAIN«, t00=0x008c, t01=0x0016}
0x0dad2…0dae8 Head {h00=0x0012, h01=0x0050, text=» CM DWTCHN,A6 «, t00=0x008c, t01=0x003a}
0x0dae8…0dafc Head {h00=0x0010, h01=0x0050, text=»RELD30 EQU *«, t00=0x008c, t01=0x0050}
0x0dafc…0db0c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x008c, t01=0x0064}
0x0db0c…0db16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0074}
0x0db16…0db24 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008c, t01=0x007e}
0x0db24…0db2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x008c}
0x0db2e…0db54 Head {h00=0x0022, h01=0x0050, text=»* TRANSPORT HANDLER INTERFACE «, t00=0x008c, t01=0x0096}
0x0db54…0db5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x00bc}
0x0db5e…0db72 Head {h00=0x0010, h01=0x0050, text=»TRANSP EQU *«, t00=0x008c, t01=0x00c6}
0x0db72…0db9e Head {h00=0x0028, h01=0x0050, text=» SC A2,DWTFNC,A6 SAVE FUNCTION CODE «, t00=0x008c, t01=0x00da}
0x0db9e…0dbcc Head {h00=0x002a, h01=0x0050, text=» CF A14,TRANSH CALL TRANSPORT HANDLER «, t00=0x008c, t01=0x0106}
0x0dbcc…0dbea Head {h00=0x001a, h01=0x0050, text=» LDR A4,A4 RETURN CODE«, t00=0x008c, t01=0x0134}
0x0dbea…0dc10 Head {h00=0x0022, h01=0x0050, text=» RF(Z) TRANSR NO ERROR,RETURN «, t00=0x008c, t01=0x0152}
0x0dc10…0dc1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0178}
0x0dc1a…0dc3c Head {h00=0x001e, h01=0x0050, text=»* RETURN CODE TRANSLATION «, t00=0x008c, t01=0x0182}
0x0dc3c…0dc46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0014}
0x0dc46…0dc5e Head {h00=0x0014, h01=0x0050, text=» LD A1,RTNCTR,A4«, t00=0x008d, t01=0x001e}
0x0dc5e…0dc76 Head {h00=0x0014, h01=0x0050, text=» LDKL A4,RHEXIT «, t00=0x008d, t01=0x0036}
0x0dc76…0dca0 Head {h00=0x0026, h01=0x0050, text=» ST A4,4,A14 ADJUST RETURN ADDRESS«, t00=0x008d, t01=0x004e}
0x0dca0…0dcb4 Head {h00=0x0010, h01=0x0050, text=»TRANSR EQU *«, t00=0x008d, t01=0x0078}
0x0dcb4…0dcc4 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x008d, t01=0x008c}
0x0dcc4…0dcce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x009c}
0x0dcce…0dce2 Head {h00=0x0010, h01=0x0050, text=»RTNCTR EQU *«, t00=0x008d, t01=0x00a6}
0x0dce2…0dcf8 Head {h00=0x0012, h01=0x0050, text=» DATA ACPT.RC «, t00=0x008d, t01=0x00ba}
0x0dcf8…0dd14 Head {h00=0x0018, h01=0x0050, text=» DATA ACPT.RC ACCEPT«, t00=0x008d, t01=0x00d0}
0x0dd14…0dd42 Head {h00=0x002a, h01=0x0050, text=» DATA CLEA.RC VIRTUAL CIRCUIT CLEARED «, t00=0x008d, t01=0x00ec}
0x0dd42…0dd64 Head {h00=0x001e, h01=0x0050, text=» DATA PHYE.RC NOT OPERABLE«, t00=0x008d, t01=0x011a}
0x0dd64…0dd88 Head {h00=0x0020, h01=0x0050, text=» DATA SEQE.RC INVALID Q-BIT «, t00=0x008d, t01=0x013c}
0x0dd88…0ddac Head {h00=0x0020, h01=0x0050, text=» DATA INVL.RC INVALID LENGTH«, t00=0x008d, t01=0x0160}
0x0ddac…0ddd0 Head {h00=0x0020, h01=0x0050, text=» DATA SEQE.RC INVALID STATE «, t00=0x008d, t01=0x0184}
0x0ddd0…0ddf4 Head {h00=0x0020, h01=0x0050, text=» DATA INVL.RC INVALID LENGTH«, t00=0x008e, t01=0x0018}
0x0ddf4…0de26 Head {h00=0x002e, h01=0x0050, text=» DATA NOLC.RC NO LOGICAL CHANNEL AVAILABLE«, t00=0x008e, t01=0x003c}
0x0de26…0de4e Head {h00=0x0024, h01=0x0050, text=» DATA TIMO.RC TIME OUT DETECTED «, t00=0x008e, t01=0x006e}
0x0de4e…0de72 Head {h00=0x0020, h01=0x0050, text=» DATA RQUE.RC REQUEST ERROR «, t00=0x008e, t01=0x0096}
0x0de72…0de7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00ba}
0x0de7c…0de8a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008e, t01=0x00c4}
0x0de8a…0de94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00d2}
0x0de94…0dee0 Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x008e, t01=0x00dc}
0x0dee0…0deea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0128}
0x0deea…0df0e Head {h00=0x0020, h01=0x0050, text=»* REQUEST HANDLER INPUT PART«, t00=0x008e, t01=0x0132}
0x0df0e…0df18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0156}
0x0df18…0df64 Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x008e, t01=0x0160}
0x0df64…0df6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x001c}
0x0df6e…0df96 Head {h00=0x0024, h01=0x0050, text=»* ENTRY USED BY THE DC-SCHEDULER«, t00=0x008f, t01=0x0026}
0x0df96…0dfa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x004e}
0x0dfa0…0dfbc Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x008f, t01=0x0058}
0x0dfbc…0dfe2 Head {h00=0x0022, h01=0x0050, text=»* A1 = QUEUE ANCHOR ADDRESS «, t00=0x008f, t01=0x0074}
0x0dfe2…0e018 Head {h00=0x0032, h01=0x0050, text=»* A12 = ADDRESS OF LINE ADMINISTRATION BLOCK «, t00=0x008f, t01=0x009a}
0x0e018…0e04e Head {h00=0x0032, h01=0x0050, text=»* A13 = ADDRESS OF LOGICAL CHANNEL ADM.BLOCK «, t00=0x008f, t01=0x00d0}
0x0e04e…0e070 Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x008f, t01=0x0106}
0x0e070…0e07a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0128}
0x0e07a…0e08c Head {h00=0x000e, h01=0x0050, text=»RHIP EQU *«, t00=0x008f, t01=0x0132}
0x0e08c…0e0da Head {h00=0x004a, h01=0x0050, text=» LDK A7,0 A7:=INDICATION FOR RHIP-ENTRY-POINT«, t00=0x008f, t01=0x0144}
0x0e0da…0e0fa (144, 0, 400) Head {h00=0x001c, h01=0x0050, text=» RF RHIP10«, t00=0x0090, t01=0x0004}
0x0e0fa…0e104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0024}
0x0e104…0e13c Head {h00=0x0034, h01=0x0050, text=»* ENTRY USED BY THE REQUEST HANDLER OUTPUT PART «, t00=0x0090, t01=0x002e}
0x0e13c…0e146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0066}
0x0e146…0e162 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0090, t01=0x0070}
0x0e162…0e17e Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x0090, t01=0x008c}
0x0e17e…0e1a0 Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x0090, t01=0x00a8}
0x0e1a0…0e1aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00ca}
0x0e1aa…0e1be Head {h00=0x0010, h01=0x0050, text=»RHIPRO EQU *«, t00=0x0090, t01=0x00d4}
0x0e1be…0e1c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00e8}
0x0e1c8…0e1ee Head {h00=0x0022, h01=0x0050, text=»* SET ADDRESS OF QUEUE ANCHOR «, t00=0x0090, t01=0x00f2}
0x0e1ee…0e1f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0118}
0x0e1f8…0e21c Head {h00=0x0020, h01=0x0050, text=» LDK A1,DWTIPQ «, t00=0x0090, t01=0x0122}
0x0e21c…0e23c Head {h00=0x001c, h01=0x0050, text=» ADR A1,A6 «, t00=0x0090, t01=0x0146}
0x0e23c…0e28c Head {h00=0x004c, h01=0x0050, text=» LDK A7,6 A7:=INDICATION FOR RHIPRO-ENTRY-POINT«, t00=0x0090, t01=0x0166}
0x0e28c…0e2ce Head {h00=0x003e, h01=0x0050, text=» ST A7,DCLEVL SET DC-LEVEL-INDICATION«, t00=0x0091, t01=0x0026}
0x0e2ce…0e2d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0068}
0x0e2d8…0e2e6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0091, t01=0x0072}
0x0e2e6…0e2f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0080}
0x0e2f0…0e30a Head {h00=0x0016, h01=0x0050, text=»* DEQUEUE ELEMENT «, t00=0x0091, t01=0x008a}
0x0e30a…0e314 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00a4}
0x0e314…0e328 Head {h00=0x0010, h01=0x0050, text=»RHIP10 EQU *«, t00=0x0091, t01=0x00ae}
0x0e328…0e34c Head {h00=0x0020, h01=0x0050, text=» LDR A11,A1 A11=QUEUE ANCHOR«, t00=0x0091, t01=0x00c2}
0x0e34c…0e362 Head {h00=0x0012, h01=0x0050, text=» CF A14,DEQUE «, t00=0x0091, t01=0x00e6}
0x0e362…0e386 Head {h00=0x0020, h01=0x0050, text=» LDR A8,A2 A8=BUFFER ADDRESS«, t00=0x0091, t01=0x00fc}
0x0e386…0e390 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0120}
0x0e390…0e3b4 Head {h00=0x0020, h01=0x0050, text=»* GET TYPE OF PACKET «, t00=0x0091, t01=0x012a}
0x0e3b4…0e3be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x014e}
0x0e3be…0e3d0 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0091, t01=0x0158}
0x0e3d0…0e3f8 Head {h00=0x0024, h01=0x0050, text=» LC A2,IDENT,A8 A2:=PACKET TYPE «, t00=0x0091, t01=0x016a}
0x0e3f8…0e432 (146, 0, 400) Head {h00=0x0036, h01=0x0050, text=» LDK A3,0 A3:=PACKET TYPE INDEX FOR PROCESS-TABLE «, t00=0x0092, t01=0x0004}
0x0e432…0e43c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x003e}
0x0e43c…0e462 Head {h00=0x0022, h01=0x0050, text=»* TEST IF ENTRY POINT WAS RHIP«, t00=0x0092, t01=0x0048}
0x0e462…0e46c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x006e}
0x0e46c…0e48c Head {h00=0x001c, h01=0x0050, text=» LDR A7,A7 «, t00=0x0092, t01=0x0078}
0x0e48c…0e4ba Head {h00=0x002a, h01=0x0050, text=» RF(NZ) RHIP20 NO!«, t00=0x0092, t01=0x0098}
0x0e4ba…0e4c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x00c6}
0x0e4c4…0e4f0 Head {h00=0x0028, h01=0x0050, text=»* GET DWT ADDRESS FROM LC-ADM«, t00=0x0092, t01=0x00d0}
0x0e4f0…0e4fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x00fc}
0x0e4fa…0e522 Head {h00=0x0024, h01=0x0050, text=» LD A6,LCDWT,A13 A6=DWT ADDRESS «, t00=0x0092, t01=0x0106}
0x0e522…0e536 Head {h00=0x0010, h01=0x0050, text=»RHIP20 EQU *«, t00=0x0092, t01=0x012e}
0x0e536…0e540 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0142}
0x0e540…0e570 Head {h00=0x002c, h01=0x0050, text=»* GET PENDING REQUEST INDICATION «, t00=0x0092, t01=0x014c}
0x0e570…0e57a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x017c}
0x0e57a…0e592 Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTST,A6 «, t00=0x0092, t01=0x0186}
0x0e592…0e5ba Head {h00=0x0024, h01=0x0050, text=» RF(N) RHIP30 NO REQUEST PENDING«, t00=0x0093, t01=0x000e}
0x0e5ba…0e5c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0036}
0x0e5c4…0e5e8 Head {h00=0x0020, h01=0x0050, text=»* GET PENDING REQUEST«, t00=0x0093, t01=0x0040}
0x0e5e8…0e5f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0064}
0x0e5f2…0e604 Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x0093, t01=0x006e}
0x0e604…0e61c Head {h00=0x0014, h01=0x0050, text=» LC A5,DWTFNC,A6«, t00=0x0093, t01=0x0080}
0x0e61c…0e626 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0098}
0x0e626…0e634 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0093, t01=0x00a2}
0x0e634…0e63e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00b0}
0x0e63e…0e66c Head {h00=0x002a, h01=0x0050, text=»* TEST IF READ REQUEST PENDING «, t00=0x0093, t01=0x00ba}
0x0e66c…0e676 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00e8}
0x0e676…0e68c Head {h00=0x0012, h01=0x0050, text=» SUK A5,READAT«, t00=0x0093, t01=0x00f2}
0x0e68c…0e6a6 Head {h00=0x0016, h01=0x0050, text=» RF(Z) RHIP30 YES «, t00=0x0093, t01=0x0108}
0x0e6a6…0e6b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0122}
0x0e6b0…0e6d0 Head {h00=0x001c, h01=0x0050, text=»* RELOAD REQUEST «, t00=0x0093, t01=0x012c}
0x0e6d0…0e6da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x014c}
0x0e6da…0e6f0 Head {h00=0x0012, h01=0x0050, text=» ADK A5,READAT«, t00=0x0093, t01=0x0156}
0x0e6f0…0e704 Head {h00=0x0010, h01=0x0050, text=»RHIP30 EQU *«, t00=0x0093, t01=0x016c}
0x0e704…0e716 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A6«, t00=0x0093, t01=0x0180}
0x0e716…0e742 (148, 0, 400) Head {h00=0x0028, h01=0x0050, text=» RF(NZ) RHIP40 DWT ADDRESS AVAILABLE«, t00=0x0094, t01=0x0004}
0x0e742…0e758 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0094, t01=0x0030}
0x0e758…0e762 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0046}
0x0e762…0e782 Head {h00=0x001c, h01=0x0050, text=»* NO DWT ADDRESS «, t00=0x0094, t01=0x0050}
0x0e782…0e7b8 Head {h00=0x0032, h01=0x0050, text=»* TEST IF PACKET TYPE IS "CALL PACKET" «, t00=0x0094, t01=0x0070}
0x0e7b8…0e7c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x00a6}
0x0e7c2…0e7f0 Head {h00=0x002a, h01=0x0050, text=» LDK A3,6 A3:=INDEX FOR PROCESS-TABLE «, t00=0x0094, t01=0x00b0}
0x0e7f0…0e806 Head {h00=0x0012, h01=0x0050, text=» SUK A2,CAL.P «, t00=0x0094, t01=0x00de}
0x0e806…0e830 Head {h00=0x0026, h01=0x0050, text=» RF(Z) RHIP90 PROCESS CALL PACKET «, t00=0x0094, t01=0x00f4}
0x0e830…0e83a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x011e}
0x0e83a…0e844 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0128}
0x0e844…0e85c Head {h00=0x0014, h01=0x0050, text=»* NO CALL PACKET«, t00=0x0094, t01=0x0132}
0x0e85c…0e866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x014a}
0x0e866…0e872 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x0154}
0x0e872…0e87c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0160}
0x0e87c…0e8b0 Head {h00=0x0030, h01=0x0050, text=»* RELEASE BUFFER AND SEND CLEAR/RESET PACKET«, t00=0x0094, t01=0x016a}
0x0e8b0…0e8ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x000e}
0x0e8ba…0e8e4 Head {h00=0x0026, h01=0x0050, text=» LDK A1,NOUSER A1:=DIAGNOSTIC CODE«, t00=0x0095, t01=0x0018}
0x0e8e4…0e8f6 Head {h00=0x000e, h01=0x0050, text=» RF RHI100«, t00=0x0095, t01=0x0042}
0x0e8f6…0e900 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0054}
0x0e900…0e914 Head {h00=0x0010, h01=0x0050, text=»RHIP40 EQU *«, t00=0x0095, t01=0x005e}
0x0e914…0e938 Head {h00=0x0020, h01=0x0050, text=» LDK A1,DWTRCI «, t00=0x0095, t01=0x0072}
0x0e938…0e958 Head {h00=0x001c, h01=0x0050, text=» ADR A1,A6 «, t00=0x0095, t01=0x0096}
0x0e958…0e97c Head {h00=0x0020, h01=0x0050, text=» LDKL A9,DATA.RC«, t00=0x0095, t01=0x00b6}
0x0e97c…0e986 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00da}
0x0e986…0e994 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0095, t01=0x00e4}
0x0e994…0e99e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x00f2}
0x0e99e…0e9ca Head {h00=0x0028, h01=0x0050, text=»* TEST IF THERE IS MORE IN THE QUEUE«, t00=0x0095, t01=0x00fc}
0x0e9ca…0e9d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0128}
0x0e9d4…0e9f4 Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A11«, t00=0x0095, t01=0x0132}
0x0e9f4…0ea22 Head {h00=0x002a, h01=0x0050, text=» RF(Z) RHIP50 NO «, t00=0x0095, t01=0x0152}
0x0ea22…0ea54 Head {h00=0x002e, h01=0x0050, text=» ORRS A9,A1 SET INDICATION 'DATA RECEIVED'«, t00=0x0095, t01=0x0180}
0x0ea54…0ea74 Head {h00=0x001c, h01=0x0050, text=» RF RHIP60«, t00=0x0096, t01=0x0022}
0x0ea74…0ea90 Head {h00=0x0018, h01=0x0050, text=»RHIP50 EQU * «, t00=0x0096, t01=0x0042}
0x0ea90…0eab0 Head {h00=0x001c, h01=0x0050, text=» C1R A9,A9 «, t00=0x0096, t01=0x005e}
0x0eab0…0eae4 Head {h00=0x0030, h01=0x0050, text=» ANRS A9,A1 RESET INDICATION 'DATA RECEIVED'«, t00=0x0096, t01=0x007e}
0x0eae4…0eb00 Head {h00=0x0018, h01=0x0050, text=»RHIP60 EQU * «, t00=0x0096, t01=0x00b2}
0x0eb00…0eb16 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0096, t01=0x00ce}
0x0eb16…0eb20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00e4}
0x0eb20…0eb40 Head {h00=0x001c, h01=0x0050, text=»* DWT ADDRESS AVAILABLE «, t00=0x0096, t01=0x00ee}
0x0eb40…0eb66 Head {h00=0x0022, h01=0x0050, text=»* TEST IF ENTRY POINT WAS RHIP«, t00=0x0096, t01=0x010e}
0x0eb66…0eb70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0134}
0x0eb70…0eb90 Head {h00=0x001c, h01=0x0050, text=» LDR A7,A7 «, t00=0x0096, t01=0x013e}
0x0eb90…0ebbe Head {h00=0x002a, h01=0x0050, text=» RF(NZ) RHIP70 NO!«, t00=0x0096, t01=0x015e}
0x0ebbe…0ebc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x018c}
0x0ebc8…0ebe6 Head {h00=0x001a, h01=0x0050, text=»* TEST IF VC RELEASED «, t00=0x0097, t01=0x0008}
0x0ebe6…0ebf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0026}
0x0ebf0…0ec12 Head {h00=0x001e, h01=0x0050, text=» LDK A4,VCREL«, t00=0x0097, t01=0x0030}
0x0ec12…0ec26 Head {h00=0x0010, h01=0x0050, text=» LDR A10,A4 «, t00=0x0097, t01=0x0052}
0x0ec26…0ec4c Head {h00=0x0022, h01=0x0050, text=» LC A4,DWTSTE,A6«, t00=0x0097, t01=0x0066}
0x0ec4c…0ec6c Head {h00=0x001c, h01=0x0050, text=» SUR A10,A4«, t00=0x0097, t01=0x008c}
0x0ec6c…0ec9a Head {h00=0x002a, h01=0x0050, text=» RF(NZ) RHIP70 NO!«, t00=0x0097, t01=0x00ac}
0x0ec9a…0eca4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00da}
0x0eca4…0ecb2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0097, t01=0x00e4}
0x0ecb2…0ecbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00f2}
0x0ecbc…0ecd2 Head {h00=0x0012, h01=0x0050, text=»* VC RELEASED «, t00=0x0097, t01=0x00fc}
0x0ecd2…0ed06 Head {h00=0x0030, h01=0x0050, text=»* MOVE INPUT QUEUE ANCHOR FROM LC-ADM TO DWT«, t00=0x0097, t01=0x0112}
0x0ed06…0ed10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0146}
0x0ed10…0ed4c Head {h00=0x0038, h01=0x0050, text=» LDR* A7,A11 A1:=QUEUE ANCHOR «, t00=0x0097, t01=0x0150}
0x0ed4c…0ed62 Head {h00=0x0012, h01=0x0050, text=» RF(Z) RHIP65 «, t00=0x0097, t01=0x018c}
0x0ed62…0ed8a Head {h00=0x0024, h01=0x0050, text=» LDR* A4,A7 MORE DATA IN QUEUE ?«, t00=0x0098, t01=0x0012}
0x0ed8a…0eda4 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) RHIP65 YES«, t00=0x0098, t01=0x003a}
0x0eda4…0edd6 Head {h00=0x002e, h01=0x0050, text=» XRRS A9,A1 RESET MORE DATA BIT IN DWTRCI «, t00=0x0098, t01=0x0054}
0x0edd6…0edea Head {h00=0x0010, h01=0x0050, text=»RHIP65 EQU *«, t00=0x0098, t01=0x0086}
0x0edea…0ee32 Head {h00=0x0044, h01=0x0050, text=» CMR A11 CLEAR QUEUE ANCHOR IN LC.ADM «, t00=0x0098, t01=0x009a}
0x0ee32…0ee56 Head {h00=0x0020, h01=0x0050, text=» LDKL A11,DWTIPQ«, t00=0x0098, t01=0x00e2}
0x0ee56…0eea4 Head {h00=0x004a, h01=0x0050, text=» ADR A11,A6 A11:=ADDRESS OF QUEUE ANCHOR IN DWT«, t00=0x0098, t01=0x0106}
0x0eea4…0eee8 Head {h00=0x0040, h01=0x0050, text=» STR A7,A11 STORE QUEUE ANCHOR IN DWT«, t00=0x0098, t01=0x0154}
0x0eee8…0ef22 Head {h00=0x0036, h01=0x0050, text=» CM LCDWT,A13 CLEAR RELATION WITH LOGICAL CHANNEL «, t00=0x0099, t01=0x0008}
0x0ef22…0ef2e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0099, t01=0x0042}
0x0ef2e…0ef38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x004e}
0x0ef38…0ef6e Head {h00=0x0032, h01=0x0050, text=»* TEST IF PACKET TYPE IS "DATA PACKET" «, t00=0x0099, t01=0x0058}
0x0ef6e…0ef78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x008e}
0x0ef78…0ef8c Head {h00=0x0010, h01=0x0050, text=»RHIP70 EQU *«, t00=0x0099, t01=0x0098}
0x0ef8c…0efa2 Head {h00=0x0012, h01=0x0050, text=» LDK A4,DATA.P«, t00=0x0099, t01=0x00ac}
0x0efa2…0efb4 Head {h00=0x000e, h01=0x0050, text=» TM A4,A2 «, t00=0x0099, t01=0x00c2}
0x0efb4…0efde Head {h00=0x0026, h01=0x0050, text=» ABL(Z) DATPAC PROCESS DATA PACKET«, t00=0x0099, t01=0x00d4}
0x0efde…0efe8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00fe}
0x0efe8…0f008 Head {h00=0x001c, h01=0x0050, text=»* NO DATA PACKET «, t00=0x0099, t01=0x0108}
0x0f008…0f012 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0128}
0x0f012…0f026 Head {h00=0x0010, h01=0x0050, text=»RHIP80 EQU *«, t00=0x0099, t01=0x0132}
0x0f026…0f03e Head {h00=0x0014, h01=0x0050, text=» CC A2,TABLE,A3 «, t00=0x0099, t01=0x0146}
0x0f03e…0f05e Head {h00=0x001c, h01=0x0050, text=» RF(E) RHIP90 TYPE FOUND«, t00=0x0099, t01=0x015e}
0x0f05e…0f070 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0099, t01=0x017e}
0x0f070…0f098 Head {h00=0x0024, h01=0x0050, text=» RB RHIP80 TRY NEXT PACKET TYPE «, t00=0x0099, t01=0x0190}
0x0f098…0f0a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0028}
0x0f0a2…0f0b6 Head {h00=0x0010, h01=0x0050, text=»RHIP90 EQU *«, t00=0x009a, t01=0x0032}
0x0f0b6…0f0e4 Head {h00=0x002a, h01=0x0050, text=» ADR A3,A3 A3:=INDEX FOR PROCESS-TABLE«, t00=0x009a, t01=0x0046}
0x0f0e4…0f10a Head {h00=0x0022, h01=0x0050, text=» ABI PACPRO,A3 PROCESS PACKET «, t00=0x009a, t01=0x0074}
0x0f10a…0f114 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x009a}
0x0f114…0f122 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009a, t01=0x00a4}
0x0f122…0f12c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00b2}
0x0f12c…0f16a Head {h00=0x003a, h01=0x0050, text=»* TABLE OF MATCHING PACKET PROCESSING ROUTINES «, t00=0x009a, t01=0x00bc}
0x0f16a…0f174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00fa}
0x0f174…0f188 Head {h00=0x0010, h01=0x0050, text=»PACPRO EQU *«, t00=0x009a, t01=0x0104}
0x0f188…0f1b6 Head {h00=0x002a, h01=0x0050, text=» DATA HALT,HALT RESTART(-CONF.)PACKET «, t00=0x009a, t01=0x0118}
0x0f1b6…0f1e4 Head {h00=0x002a, h01=0x0050, text=» DATA RESPAC,HALT RESET(-CONF.)PACKET «, t00=0x009a, t01=0x0146}
0x0f1e4…0f1fa Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x009a, t01=0x0174}
0x0f1fa…0f228 Head {h00=0x002a, h01=0x0050, text=» DATA CLEPAC,HALT CLEAR(-CONF.)PACKET «, t00=0x009a, t01=0x018a}
0x0f228…0f256 Head {h00=0x002a, h01=0x0050, text=» DATA CALPAC,CALCON CALL(-CONF.)PACKET«, t00=0x009b, t01=0x0028}
0x0f256…0f262 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x0056}
0x0f262…0f296 Head {h00=0x0030, h01=0x0050, text=» DATA INTPAC,INTCON INTERRUPT(-CONF.)PACKET «, t00=0x009b, t01=0x0062}
0x0f296…0f2a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0096}
0x0f2a0…0f2cc Head {h00=0x0028, h01=0x0050, text=»* UNEXPECTED PACKET RECEIVED «, t00=0x009b, t01=0x00a0}
0x0f2cc…0f2d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x00cc}
0x0f2d6…0f2e8 Head {h00=0x000e, h01=0x0050, text=»HALT EQU *«, t00=0x009b, t01=0x00d6}
0x0f2e8…0f2f4 Head {h00=0x0008, h01=0x0050, text=» HLT«, t00=0x009b, t01=0x00e8}
0x0f2f4…0f2fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x00f4}
0x0f2fe…0f308 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x00fe}
0x0f308…0f326 Head {h00=0x001a, h01=0x0050, text=»* GENERAL EXIT OF RHIP«, t00=0x009b, t01=0x0108}
0x0f326…0f35a Head {h00=0x0030, h01=0x0050, text=»* RELEASE BUFFER AND SEND CLEAR/RESET PACKET«, t00=0x009b, t01=0x0126}
0x0f35a…0f364 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x015a}
0x0f364…0f378 Head {h00=0x0010, h01=0x0050, text=»RHI100 EQU *«, t00=0x009b, t01=0x0164}
0x0f378…0f38a Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x009b, t01=0x0178}
0x0f38a…0f3ae Head {h00=0x0020, h01=0x0050, text=» CF A14,RLBUF RELEASE BUFFER«, t00=0x009b, t01=0x018a}
0x0f3ae…0f3c2 Head {h00=0x0010, h01=0x0050, text=»RHI110 EQU *«, t00=0x009c, t01=0x001e}
0x0f3c2…0f3e0 Head {h00=0x001a, h01=0x0050, text=» ABL CLVC EXIT OF RHIP«, t00=0x009c, t01=0x0032}
0x0f3e0…0f3ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0050}
0x0f3ea…0f3f8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x005a}
0x0f3f8…0f402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0068}
0x0f402…0f43e Head {h00=0x0038, h01=0x0050, text=»* COMPLETE REQUEST WITH RETURNCODE "ACCEPTED"«, t00=0x009c, t01=0x0072}
0x0f43e…0f448 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00ae}
0x0f448…0f45c Head {h00=0x0010, h01=0x0050, text=»RHI120 EQU *«, t00=0x009c, t01=0x00b8}
0x0f45c…0f474 Head {h00=0x0014, h01=0x0050, text=» LDK A3,ACPT.RC «, t00=0x009c, t01=0x00cc}
0x0f474…0f47e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00e4}
0x0f47e…0f4bc Head {h00=0x003a, h01=0x0050, text=»* COMPLETE REQUEST WITH GIVEN RETURNCODE IN A3 «, t00=0x009c, t01=0x00ee}
0x0f4bc…0f4c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x012c}
0x0f4c6…0f4da Head {h00=0x0010, h01=0x0050, text=»RHI130 EQU *«, t00=0x009c, t01=0x0136}
0x0f4da…0f4f0 Head {h00=0x0012, h01=0x0050, text=» CF A14,CMPREQ«, t00=0x009c, t01=0x014a}
0x0f4f0…0f4fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0160}
0x0f4fa…0f522 Head {h00=0x0024, h01=0x0050, text=»* RELEASE BUFFER AND EXIT«, t00=0x009c, t01=0x016a}
0x0f522…0f52c (157, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0004}
0x0f52c…0f540 Head {h00=0x0010, h01=0x0050, text=»RHI140 EQU *«, t00=0x009d, t01=0x000e}
0x0f540…0f552 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x009d, t01=0x0022}
0x0f552…0f568 Head {h00=0x0012, h01=0x0050, text=» CF A14,RLBUF «, t00=0x009d, t01=0x0034}
0x0f568…0f57a Head {h00=0x000e, h01=0x0050, text=» RF RIPEXI«, t00=0x009d, t01=0x004a}
0x0f57a…0f584 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x005c}
0x0f584…0f5b8 Head {h00=0x0030, h01=0x0050, text=»* REQUEUE BUFFER,BLOCK QUEUE AND EXIT«, t00=0x009d, t01=0x0066}
0x0f5b8…0f5c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x009a}
0x0f5c2…0f5d6 Head {h00=0x0010, h01=0x0050, text=»RHI150 EQU *«, t00=0x009d, t01=0x00a4}
0x0f5d6…0f606 Head {h00=0x002c, h01=0x0050, text=» LDR A1,A11 A1:=ADDRESS OF QUEUE ANCHOR «, t00=0x009d, t01=0x00b8}
0x0f606…0f62c Head {h00=0x0022, h01=0x0050, text=» LDR A2,A8 A2:=BUFFER ADDRESS «, t00=0x009d, t01=0x00e8}
0x0f62c…0f642 Head {h00=0x0012, h01=0x0050, text=» CF A14,QUEUEF«, t00=0x009d, t01=0x010e}
0x0f642…0f64c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0124}
0x0f64c…0f662 Head {h00=0x0012, h01=0x0050, text=»* BLOCK QUEUE «, t00=0x009d, t01=0x012e}
0x0f662…0f66c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0144}
0x0f66c…0f698 Head {h00=0x0028, h01=0x0050, text=» LDK A1,NPRFLG A1:=0 PROCESSING FLAG«, t00=0x009d, t01=0x014e}
0x0f698…0f6ac Head {h00=0x0010, h01=0x0050, text=» ORRS A1,A11«, t00=0x009d, t01=0x017a}
0x0f6ac…0f6b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x018e}
0x0f6b6…0f6cc Head {h00=0x0012, h01=0x0050, text=»* EXIT OF RHIP«, t00=0x009e, t01=0x0008}
0x0f6cc…0f6d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x001e}
0x0f6d6…0f6f2 Head {h00=0x0018, h01=0x0050, text=»RIPEXI EQU * «, t00=0x009e, t01=0x0028}
0x0f6f2…0f706 Head {h00=0x0010, h01=0x0050, text=» ABL EXITDC «, t00=0x009e, t01=0x0044}
0x0f706…0f714 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009e, t01=0x0058}
0x0f714…0f71e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0066}
0x0f71e…0f728 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0070}
0x0f728…0f754 Head {h00=0x0028, h01=0x0050, text=»* TIMEOUT ROUTINE OF REQUEST HANDLER«, t00=0x009e, t01=0x007a}
0x0f754…0f75e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00a6}
0x0f75e…0f7aa Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x009e, t01=0x00b0}
0x0f7aa…0f7b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x00fc}
0x0f7b4…0f7d0 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x009e, t01=0x0106}
0x0f7d0…0f7ec Head {h00=0x0018, h01=0x0050, text=»* A12 = DWT ADDRESS«, t00=0x009e, t01=0x0122}
0x0f7ec…0f80c Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x009e, t01=0x013e}
0x0f80c…0f82e Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x009e, t01=0x015e}
0x0f82e…0f838 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0180}
0x0f838…0f854 Head {h00=0x0018, h01=0x0050, text=»TIMEXP EQU * «, t00=0x009e, t01=0x018a}
0x0f854…0f888 Head {h00=0x0030, h01=0x0050, text=» LDK A3,TIMO.RC PRE-SET RETURNCODE"TIMEOUT" «, t00=0x009f, t01=0x0016}
0x0f888…0f892 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x004a}
0x0f892…0f8ae Head {h00=0x0018, h01=0x0050, text=»* GET ADDRESS OF DWT«, t00=0x009f, t01=0x0054}
0x0f8ae…0f8b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0070}
0x0f8b8…0f8cc Head {h00=0x0010, h01=0x0050, text=» LDR A6,A12 «, t00=0x009f, t01=0x007a}
0x0f8cc…0f8d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x008e}
0x0f8d6…0f902 Head {h00=0x0028, h01=0x0050, text=»* TEST IF REQUEST ALREADY COMPLETED «, t00=0x009f, t01=0x0098}
0x0f902…0f90c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00c4}
0x0f90c…0f932 Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTRTP,A6«, t00=0x009f, t01=0x00ce}
0x0f932…0f962 Head {h00=0x002c, h01=0x0050, text=» RB(Z) RIPEXI YES! «, t00=0x009f, t01=0x00f4}
0x0f962…0f96c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0124}
0x0f96c…0f994 Head {h00=0x0024, h01=0x0050, text=»* CLEAR RUNNING TIMER INDICATION«, t00=0x009f, t01=0x012e}
0x0f994…0f99e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0156}
0x0f99e…0f9c2 Head {h00=0x0020, h01=0x0050, text=» CM DWTRTP,A6 «, t00=0x009f, t01=0x0160}
0x0f9c2…0f9cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0184}
0x0f9cc…0f9da Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009f, t01=0x018e}
0x0f9da…0f9e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x000c}
0x0f9e4…0fa06 Head {h00=0x001e, h01=0x0050, text=»* SCAN ON PENDING REQUEST «, t00=0x00a0, t01=0x0016}
0x0fa06…0fa10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0038}
0x0fa10…0fa2e Head {h00=0x001a, h01=0x0050, text=» LDK A5,0«, t00=0x00a0, t01=0x0042}
0x0fa2e…0fa54 Head {h00=0x0022, h01=0x0050, text=» LC A5,DWTFNC,A6«, t00=0x00a0, t01=0x0060}
0x0fa54…0fa7a Head {h00=0x0022, h01=0x0050, text=» LDR A7,A5 SAVE FUNCTION CODE «, t00=0x00a0, t01=0x0086}
0x0fa7a…0faa4 Head {h00=0x0026, h01=0x0050, text=» SUK A5,WRIDAT WRITE DATA REQUEST «, t00=0x00a0, t01=0x00ac}
0x0faa4…0fabe Head {h00=0x0016, h01=0x0050, text=» RF(Z) TIME00 YES «, t00=0x00a0, t01=0x00d6}
0x0fabe…0fae8 Head {h00=0x0026, h01=0x0050, text=» SUK A5,READAT-WRIDAT READ REQUEST«, t00=0x00a0, t01=0x00f0}
0x0fae8…0fb02 Head {h00=0x0016, h01=0x0050, text=» RF(Z) COMPLE YES «, t00=0x00a0, t01=0x011a}
0x0fb02…0fb38 Head {h00=0x0032, h01=0x0050, text=» ADK A5,READAT-WRIINT WRITE INTERRUPT REQUEST «, t00=0x00a0, t01=0x0134}
0x0fb38…0fb52 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) TIME30 NO «, t00=0x00a0, t01=0x016a}
0x0fb52…0fb5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0184}
0x0fb5c…0fb7e Head {h00=0x001e, h01=0x0050, text=»* TIMEOUT ON WRITE REQUEST«, t00=0x00a0, t01=0x018e}
0x0fb7e…0fbae Head {h00=0x002c, h01=0x0050, text=»* TEST IF REQUEST STILL IN OUTPUT QUEUE «, t00=0x00a1, t01=0x0020}
0x0fbae…0fbb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0050}
0x0fbb8…0fbcc Head {h00=0x0010, h01=0x0050, text=»TIME00 EQU *«, t00=0x00a1, t01=0x005a}
0x0fbcc…0fbec Head {h00=0x001c, h01=0x0050, text=» LDR A1,A13«, t00=0x00a1, t01=0x006e}
0x0fbec…0fc3a Head {h00=0x004a, h01=0x0050, text=» ADK A1,QUEOUT A1:=ADDRESS OF OUTPUT QUEUE ANCHOR «, t00=0x00a1, t01=0x008e}
0x0fc3a…0fc44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00dc}
0x0fc44…0fc64 Head {h00=0x001c, h01=0x0050, text=»* TEST IF QUEUE IS EMPTY«, t00=0x00a1, t01=0x00e6}
0x0fc64…0fc6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0106}
0x0fc6e…0fc8e Head {h00=0x001c, h01=0x0050, text=» LDR* A2,A1 «, t00=0x00a1, t01=0x0110}
0x0fc8e…0fcae Head {h00=0x001c, h01=0x0050, text=» RF(Z) TIME20«, t00=0x00a1, t01=0x0130}
0x0fcae…0fcb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0150}
0x0fcb8…0fce8 Head {h00=0x002c, h01=0x0050, text=»* TEST IF ONLY NO-PROCESSING FLAG IS SET«, t00=0x00a1, t01=0x015a}
0x0fce8…0fcf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x018a}
0x0fcf2…0fd06 (162, 0, 400) Head {h00=0x0010, h01=0x0050, text=»TIME10 EQU *«, t00=0x00a2, t01=0x0004}
0x0fd06…0fd24 Head {h00=0x001a, h01=0x0050, text=» SUK A2,1«, t00=0x00a2, t01=0x0018}
0x0fd24…0fd54 Head {h00=0x002c, h01=0x0050, text=» RF(Z) TIME20 YES! «, t00=0x00a2, t01=0x0036}
0x0fd54…0fd8e Head {h00=0x0036, h01=0x0050, text=» CF A14,DEQUE DEQUEUE ELEMENT«, t00=0x00a2, t01=0x0066}
0x0fd8e…0fd98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00a0}
0x0fd98…0fda6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a2, t01=0x00aa}
0x0fda6…0fdb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00b8}
0x0fdb0…0fde2 Head {h00=0x002e, h01=0x0050, text=»* TEST IF IT IS THE ONE WE ARE LOOKING FOR«, t00=0x00a2, t01=0x00c2}
0x0fde2…0fdec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00f4}
0x0fdec…0fe0c Head {h00=0x001c, h01=0x0050, text=» CWR A2,A6 «, t00=0x00a2, t01=0x00fe}
0x0fe0c…0fe3c Head {h00=0x002c, h01=0x0050, text=» RF(E) COMPLE YES! «, t00=0x00a2, t01=0x011e}
0x0fe3c…0fe46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x014e}
0x0fe46…0fe7e Head {h00=0x0034, h01=0x0050, text=»* TEST IF THERE IS ANOTHER ELEMENT IN THE QUEUE «, t00=0x00a2, t01=0x0158}
0x0fe7e…0fe88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0190}
0x0fe88…0fea8 Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A1 «, t00=0x00a3, t01=0x000a}
0x0fea8…0fee4 Head {h00=0x0038, h01=0x0050, text=» CF A14,QUEUE RE-QUEUE ELEMENT «, t00=0x00a3, t01=0x002a}
0x0fee4…0ff2c Head {h00=0x0044, h01=0x0050, text=» RB(NZ) TIME10 GET SECOND ELEMENT FROM QUEUE«, t00=0x00a3, t01=0x0066}
0x0ff2c…0ff36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00ae}
0x0ff36…0ff54 Head {h00=0x001a, h01=0x0050, text=»* ELEMENT NOT IN QUEUE«, t00=0x00a3, t01=0x00b8}
0x0ff54…0ff84 Head {h00=0x002c, h01=0x0050, text=»* IF NOT WRITE INTERRUPT,IGNORE TIMEOUT «, t00=0x00a3, t01=0x00d6}
0x0ff84…0ff8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0106}
0x0ff8e…0ffaa Head {h00=0x0018, h01=0x0050, text=»TIME20 EQU * «, t00=0x00a3, t01=0x0110}
0x0ffaa…0ffc0 Head {h00=0x0012, h01=0x0050, text=» SUK A7,WRIINT«, t00=0x00a3, t01=0x012c}
0x0ffc0…0ffd6 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) COMEXI«, t00=0x00a3, t01=0x0142}
0x0ffd6…0ffe0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0158}
0x0ffe0…10012 Head {h00=0x002e, h01=0x0050, text=»* COMPLETE REQUEST WITH TIMEOUT RETURNCODE«, t00=0x00a3, t01=0x0162}
0x10012…1001c (164, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x0004}
0x1001c…10030 Head {h00=0x0010, h01=0x0050, text=»COMPLE EQU *«, t00=0x00a4, t01=0x000e}
0x10030…10046 Head {h00=0x0012, h01=0x0050, text=» CF A14,CMPREQ«, t00=0x00a4, t01=0x0022}
0x10046…1005c Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x00a4, t01=0x0038}
0x1005c…10070 Head {h00=0x0010, h01=0x0050, text=»TIME30 EQU *«, t00=0x00a4, t01=0x004e}
0x10070…1007c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a4, t01=0x0062}
0x1007c…10090 Head {h00=0x0010, h01=0x0050, text=»COMEXI EQU *«, t00=0x00a4, t01=0x006e}
0x10090…100a2 Head {h00=0x000e, h01=0x0050, text=» RB RIPEXI«, t00=0x00a4, t01=0x0082}
0x100a2…100b8 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00a4, t01=0x0094}
0x100b8…100c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00aa}
0x100c2…100d0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a4, t01=0x00b4}
0x100d0…100da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00c2}
0x100da…100fa Head {h00=0x001c, h01=0x0050, text=»* RELEASE DWT FROM CHAIN«, t00=0x00a4, t01=0x00cc}
0x100fa…10104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00ec}
0x10104…10118 Head {h00=0x0010, h01=0x0050, text=»TIME30 EQU *«, t00=0x00a4, t01=0x00f6}
0x10118…1012e Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00a4, t01=0x010a}
0x1012e…10144 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x00a4, t01=0x0120}
0x10144…1016e Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTLAD,A6 LOCAL DTE ADDRESS«, t00=0x00a4, t01=0x0136}
0x1016e…1019c Head {h00=0x002a, h01=0x0050, text=» CF A14,FNDLIN GET LINE BLOCK ADDRESS «, t00=0x00a4, t01=0x0160}
0x1019c…101b2 Head {h00=0x0012, h01=0x0050, text=» CF A14,RELDWT«, t00=0x00a4, t01=0x018e}
0x101b2…101d2 Head {h00=0x001c, h01=0x0050, text=» LDK A3,TIMO.RC TIME OUT«, t00=0x00a5, t01=0x0014}
0x101d2…101de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a5, t01=0x0034}
0x101de…101f4 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00a5, t01=0x0040}
0x101f4…1020a Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=1 «, t00=0x00a5, t01=0x0056}
0x1020a…10234 Head {h00=0x0026, h01=0x0050, text=» LD A12,LINTAB LINE BLOCK ADDRESS «, t00=0x00a5, t01=0x006c}
0x10234…10262 Head {h00=0x002a, h01=0x0050, text=» CF A14,RELDWT RELEASE DWT FROM CHAIN «, t00=0x00a5, t01=0x0096}
0x10262…1026e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a5, t01=0x00c4}
0x1026e…10284 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00a5, t01=0x00d0}
0x10284…102b4 Head {h00=0x002c, h01=0x0050, text=» SUK A7,CONACT CONNECT ACTIVE REQUEST ? «, t00=0x00a5, t01=0x00e6}
0x102b4…102ce Head {h00=0x0016, h01=0x0050, text=» RF(Z) TIME40 YES «, t00=0x00a5, t01=0x0116}
0x102ce…10306 Head {h00=0x0034, h01=0x0050, text=» SUK A7,CONPAS-CONACT CONNECT PASSIVE REQUEST ? «, t00=0x00a5, t01=0x0130}
0x10306…10320 Head {h00=0x0016, h01=0x0050, text=» RB(Z) COMPLE YES «, t00=0x00a5, t01=0x0168}
0x10320…1032a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0182}
0x1032a…1034e Head {h00=0x0020, h01=0x0050, text=»* (AUTOMATIC)ACCEPT REQUEST «, t00=0x00a5, t01=0x018c}
0x1034e…10358 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0020}
0x10358…1036c Head {h00=0x0010, h01=0x0050, text=»TIME40 EQU *«, t00=0x00a6, t01=0x002a}
0x1036c…10376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x003e}
0x10376…1039c Head {h00=0x0022, h01=0x0050, text=»* CLEAR DWT TO LC-ADM RELATION«, t00=0x00a6, t01=0x0048}
0x1039c…103a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x006e}
0x103a6…103b8 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x00a6, t01=0x0078}
0x103b8…103da Head {h00=0x001e, h01=0x0050, text=» LC A4,DWTLCN,A6 LC NUMBER«, t00=0x00a6, t01=0x008a}
0x103da…10404 Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x00a6, t01=0x00ac}
0x10404…1042c Head {h00=0x0024, h01=0x0050, text=» CM LCDWT,A13 CLEAR DWT-ADDRESS «, t00=0x00a6, t01=0x00d6}
0x1042c…10454 Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x00a6, t01=0x00fe}
0x10454…10466 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x00a6, t01=0x0126}
0x10466…10494 Head {h00=0x002a, h01=0x0050, text=» RB RHI110 SEND CLEAR PACKET AND EXIT «, t00=0x00a6, t01=0x0138}
0x10494…1049e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0166}
0x1049e…104ac Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a6, t01=0x0170}
0x104ac…104b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x017e}
0x104b6…104c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0188}
0x104c0…104d6 (167, 0, 400) Head {h00=0x0012, h01=0x0050, text=»* CALL PACKET «, t00=0x00a7, t01=0x0004}
0x104d6…104e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x001a}
0x104e0…1052c Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00a7, t01=0x0024}
0x1052c…10536 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0070}
0x10536…10552 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00a7, t01=0x007a}
0x10552…10578 Head {h00=0x0022, h01=0x0050, text=»* A5 = REQUEST PENDING IND. «, t00=0x00a7, t01=0x0096}
0x10578…1059c Head {h00=0x0020, h01=0x0050, text=»* A6 = DWT ADDRESS OR ZERO«, t00=0x00a7, t01=0x00bc}
0x1059c…105bc Head {h00=0x001c, h01=0x0050, text=»* A8 = BUFFER ADDRESS «, t00=0x00a7, t01=0x00e0}
0x105bc…105da Head {h00=0x001a, h01=0x0050, text=»* A11 = QUEUE ANCHOR «, t00=0x00a7, t01=0x0100}
0x105da…105fc Head {h00=0x001e, h01=0x0050, text=»* A12 = LINE-ADM ADDRESS «, t00=0x00a7, t01=0x011e}
0x105fc…1061c Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x00a7, t01=0x0140}
0x1061c…1063e Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x00a7, t01=0x0160}
0x1063e…10648 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0182}
0x10648…1065c Head {h00=0x0010, h01=0x0050, text=»CALPAC EQU *«, t00=0x00a7, t01=0x018c}
0x1065c…10666 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0010}
0x10666…106a4 Head {h00=0x003a, h01=0x0050, text=»* TEST IF ONLY USER DATA HAS TO BE PASSED TO THE USER «, t00=0x00a8, t01=0x001a}
0x106a4…106ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0058}
0x106ae…106c0 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A6«, t00=0x00a8, t01=0x0062}
0x106c0…106dc Head {h00=0x0018, h01=0x0050, text=» ABL(NZ) CAL180 YES!«, t00=0x00a8, t01=0x0074}
0x106dc…106e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0090}
0x106e6…1070c Head {h00=0x0022, h01=0x0050, text=»* GET DWT FOR LOGICAL CHANNEL «, t00=0x00a8, t01=0x009a}
0x1070c…10716 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x00c0}
0x10716…10744 Head {h00=0x002a, h01=0x0050, text=» LD A6,CHAIN,A12 GET DWT CHAIN ANCHOR «, t00=0x00a8, t01=0x00ca}
0x10744…1077a Head {h00=0x0032, h01=0x0050, text=» RF(Z) CALP30 NO CONNECT REQUEST FOR THIS LINE«, t00=0x00a8, t01=0x00f8}
0x1077a…10784 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x012e}
0x10784…10792 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a8, t01=0x0138}
0x10792…1079c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0146}
0x1079c…107d0 Head {h00=0x0030, h01=0x0050, text=»* TEST IF CONNECT PASSIVE REQUEST IS PENDING«, t00=0x00a8, t01=0x0150}
0x107d0…107da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0184}
0x107da…107ee Head {h00=0x0010, h01=0x0050, text=»CALP10 EQU *«, t00=0x00a8, t01=0x018e}
0x107ee…10806 Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTST,A6 «, t00=0x00a9, t01=0x0012}
0x10806…1082e Head {h00=0x0024, h01=0x0050, text=» RF(N) CALP20 NO REQUEST PENDING«, t00=0x00a9, t01=0x002a}
0x1082e…10844 Head {h00=0x0012, h01=0x0050, text=» LDK A4,CONPAS«, t00=0x00a9, t01=0x0052}
0x10844…1086e Head {h00=0x0026, h01=0x0050, text=» CC A4,DWTFNC,A6 CONNECT PASSIVE ?«, t00=0x00a9, t01=0x0068}
0x1086e…10888 Head {h00=0x0016, h01=0x0050, text=» RF(E) CALP40 YES «, t00=0x00a9, t01=0x0092}
0x10888…1089c Head {h00=0x0010, h01=0x0050, text=»CALP20 EQU *«, t00=0x00a9, t01=0x00ac}
0x1089c…108c2 Head {h00=0x0022, h01=0x0050, text=» LD A6,DWTCHN,A6 GET NEXT DWT «, t00=0x00a9, t01=0x00c0}
0x108c2…108da Head {h00=0x0014, h01=0x0050, text=» RB(NZ) CALP10 .«, t00=0x00a9, t01=0x00e6}
0x108da…108e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x00fe}
0x108e4…1090a Head {h00=0x0022, h01=0x0050, text=»* NO MATCHING DWT FOUND«, t00=0x00a9, t01=0x0108}
0x1090a…1094e Head {h00=0x0040, h01=0x0050, text=»* RELEASE BUFFER AND SEND CLEAR/RESET PACKET AND EXIT«, t00=0x00a9, t01=0x012e}
0x1094e…10958 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0172}
0x10958…1096c Head {h00=0x0010, h01=0x0050, text=»CALP30 EQU *«, t00=0x00a9, t01=0x017c}
0x1096c…10996 Head {h00=0x0026, h01=0x0050, text=» LDK A1,NOTINT A1:=DIAGNOSTIC CODE«, t00=0x00a9, t01=0x0190}
0x10996…109a8 Head {h00=0x000e, h01=0x0050, text=» RB RHI100«, t00=0x00aa, t01=0x002a}
0x109a8…109b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x003c}
0x109b2…109e8 Head {h00=0x0032, h01=0x0050, text=»* TEST IF CALLING DTE-ADDRESS KNOWN BY SYSTEM «, t00=0x00aa, t01=0x0046}
0x109e8…109f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x007c}
0x109f2…10a06 Head {h00=0x0010, h01=0x0050, text=»CALP40 EQU *«, t00=0x00aa, t01=0x0086}
0x10a06…10a1c Head {h00=0x0012, h01=0x0050, text=» LDK A5,BEGDAT«, t00=0x00aa, t01=0x009a}
0x10a1c…10a2e Head {h00=0x000e, h01=0x0050, text=» ADR A5,A8«, t00=0x00aa, t01=0x00b0}
0x10a2e…10a38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x00c2}
0x10a38…10a7c Head {h00=0x0040, h01=0x0050, text=»* GET ADDRESS WHERE CALLING LENGTH IN PACKET WILL BE STORED «, t00=0x00aa, t01=0x00cc}
0x10a7c…10a86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0110}
0x10a86…10a98 Head {h00=0x000e, h01=0x0050, text=» LCR A1,A5«, t00=0x00aa, t01=0x011a}
0x10a98…10aaa Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x00aa, t01=0x012c}
0x10aaa…10abc Head {h00=0x000e, h01=0x0050, text=» LDR A2,A5«, t00=0x00aa, t01=0x013e}
0x10abc…10ad2 Head {h00=0x0012, h01=0x0050, text=» IFT CALDTE=1 «, t00=0x00aa, t01=0x0150}
0x10ad2…10adc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0166}
0x10adc…10aea Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00aa, t01=0x0170}
0x10aea…10af4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x017e}
0x10af4…10b28 Head {h00=0x0030, h01=0x0050, text=»* TEST IF CALLED DTE-ADDRESS ALSO IN PACKET «, t00=0x00aa, t01=0x0188}
0x10b28…10b32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x002c}
0x10b32…10b44 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x00ab, t01=0x0036}
0x10b44…10b58 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/0F «, t00=0x00ab, t01=0x0048}
0x10b58…10b70 Head {h00=0x0014, h01=0x0050, text=» RF(Z) CALP80 NO«, t00=0x00ab, t01=0x005c}
0x10b70…10b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x0074}
0x10b7a…10bb2 Head {h00=0x0034, h01=0x0050, text=»* MOVE CALLING DTE-ADDRESS TO CALLED DTE-ADDRESS«, t00=0x00ab, t01=0x007e}
0x10bb2…10bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x00b6}
0x10bbc…10bce Head {h00=0x000e, h01=0x0050, text=» LDR A7,A2«, t00=0x00ab, t01=0x00c0}
0x10bce…10bfe Head {h00=0x002c, h01=0x0050, text=» SRL A4,1 LENGTH OF CALLED DTE IN OCTADS«, t00=0x00ab, t01=0x00d2}
0x10bfe…10c16 Head {h00=0x0014, h01=0x0050, text=»* TRUCATED!!! «, t00=0x00ab, t01=0x0102}
0x10c16…10c28 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A4«, t00=0x00ab, t01=0x011a}
0x10c28…10c32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x012c}
0x10c32…10c7a Head {h00=0x0044, h01=0x0050, text=»* TEST IF CALLING DTE-ADDRESS STARTS ON OCTAD BOUNDARY IN PACKET«, t00=0x00ab, t01=0x0136}
0x10c7a…10c84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x017e}
0x10c84…10ca4 Head {h00=0x001c, h01=0x0050, text=» LDR A3,A1 «, t00=0x00ab, t01=0x0188}
0x10ca4…10cf4 Head {h00=0x004c, h01=0x0050, text=» SRL A1,4 A1:=LENGTH OF CALLING DTE IN SEMI-OCT«, t00=0x00ac, t01=0x0018}
0x10cf4…10d2c Head {h00=0x0034, h01=0x0050, text=» LDR A4,A1 LENGTH OF CALLING DTE IN SEMI-OCTADS «, t00=0x00ac, t01=0x0068}
0x10d2c…10d4a Head {h00=0x001a, h01=0x0050, text=» ANK A3,1«, t00=0x00ac, t01=0x00a0}
0x10d4a…10d64 Head {h00=0x0016, h01=0x0050, text=» RF(Z) CALP60 YES «, t00=0x00ac, t01=0x00be}
0x10d64…10d6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x00d8}
0x10d6e…10d7c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ac, t01=0x00e2}
0x10d7c…10d86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x00f0}
0x10d86…10db0 Head {h00=0x0026, h01=0x0050, text=»* DTE-ADDRESS STARTS 0N SEMI-OCTAD«, t00=0x00ac, t01=0x00fa}
0x10db0…10dba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0124}
0x10dba…10dce Head {h00=0x0010, h01=0x0050, text=»CALP50 EQU *«, t00=0x00ac, t01=0x012e}
0x10dce…10dee Head {h00=0x001c, h01=0x0050, text=» LCR A3,A5 «, t00=0x00ac, t01=0x0142}
0x10dee…10e2c Head {h00=0x003a, h01=0x0050, text=» SLL A3,8 A3:=HIGH ORDER DIGIT«, t00=0x00ac, t01=0x0162}
0x10e2c…10e7c Head {h00=0x004c, h01=0x0050, text=» ADK A5,1 UPDATE ADDRESS OF CALLING DTE IN PAC «, t00=0x00ad, t01=0x0010}
0x10e7c…10e9c Head {h00=0x001c, h01=0x0050, text=» LCR A3,A5 «, t00=0x00ad, t01=0x0060}
0x10e9c…10eda Head {h00=0x003a, h01=0x0050, text=» SRL A3,4 A3:=LOW ORDER DIGIT«, t00=0x00ad, t01=0x0080}
0x10eda…10f24 Head {h00=0x0046, h01=0x0050, text=» SCR A3,A7 STORE DIGITS AT BEGIN OF PACKET«, t00=0x00ad, t01=0x00be}
0x10f24…10f5e Head {h00=0x0036, h01=0x0050, text=» ADK A7,1 UPDATE ADDRESS «, t00=0x00ad, t01=0x0108}
0x10f5e…10f7c Head {h00=0x001a, h01=0x0050, text=» SUK A4,2«, t00=0x00ad, t01=0x0142}
0x10f7c…10fa6 Head {h00=0x0026, h01=0x0050, text=» RB(P) CALP50 MOVE NEXT TWO DIGITS«, t00=0x00ad, t01=0x0160}
0x10fa6…10fbc Head {h00=0x0012, h01=0x0050, text=» RF(NZ) CALP85«, t00=0x00ad, t01=0x018a}
0x10fbc…10fce Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x00ae, t01=0x0010}
0x10fce…10fe0 Head {h00=0x000e, h01=0x0050, text=» RF CALP85«, t00=0x00ae, t01=0x0022}
0x10fe0…10fea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x0034}
0x10fea…11018 Head {h00=0x002a, h01=0x0050, text=»* DTE-ADDRESS STARTS ON OCTAD BOUNDARY«, t00=0x00ae, t01=0x003e}
0x11018…11022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x006c}
0x11022…11036 Head {h00=0x0010, h01=0x0050, text=»CALP60 EQU *«, t00=0x00ae, t01=0x0076}
0x11036…11056 Head {h00=0x001c, h01=0x0050, text=» LCR A3,A1 «, t00=0x00ae, t01=0x008a}
0x11056…11076 Head {h00=0x001c, h01=0x0050, text=» SCR A3,A7 «, t00=0x00ae, t01=0x00aa}
0x11076…11094 Head {h00=0x001a, h01=0x0050, text=» ADK A7,1«, t00=0x00ae, t01=0x00ca}
0x11094…110b2 Head {h00=0x001a, h01=0x0050, text=» ADK A5,1«, t00=0x00ae, t01=0x00e8}
0x110b2…110d0 Head {h00=0x001a, h01=0x0050, text=» SUK A4,2«, t00=0x00ae, t01=0x0106}
0x110d0…110e6 Head {h00=0x0012, h01=0x0050, text=» RB(P) CALP60 «, t00=0x00ae, t01=0x0124}
0x110e6…110f8 Head {h00=0x000e, h01=0x0050, text=» RF CALP85«, t00=0x00ae, t01=0x013a}
0x110f8…1110c Head {h00=0x0010, h01=0x0050, text=»CALP80 EQU *«, t00=0x00ae, t01=0x014c}
0x1110c…11118 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x0160}
0x11118…1112e Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00ae, t01=0x016c}
0x1112e…11140 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x00ae, t01=0x0182}
0x11140…11152 (175, 0, 398) Head {h00=0x000e, h01=0x0050, text=» SRA A4,5 «, t00=0x00af, t01=0x0004}
0x11152…11168 Head {h00=0x0012, h01=0x0050, text=» RF(NN) CALP82«, t00=0x00af, t01=0x0016}
0x11168…1117a Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x00af, t01=0x002c}
0x1117a…1118e Head {h00=0x0010, h01=0x0050, text=»CALP82 EQU *«, t00=0x00af, t01=0x003e}
0x1118e…111b2 Head {h00=0x0020, h01=0x0050, text=» ANK A4,/0F LENGTH IN OCTETS«, t00=0x00af, t01=0x0052}
0x111b2…111c4 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A4«, t00=0x00af, t01=0x0076}
0x111c4…111d8 Head {h00=0x0010, h01=0x0050, text=»CALP85 EQU *«, t00=0x00af, t01=0x0088}
0x111d8…111e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x009c}
0x111e2…111f0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00af, t01=0x00a6}
0x111f0…111fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x00b4}
0x111fa…11214 Head {h00=0x0016, h01=0x0050, text=»* GET DTE-ADDRESS «, t00=0x00af, t01=0x00be}
0x11214…1121e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x00d8}
0x1121e…1123e Head {h00=0x001c, h01=0x0050, text=» LDKL A3,LOCAL SET TYPE «, t00=0x00af, t01=0x00e2}
0x1123e…11250 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x00af, t01=0x0102}
0x11250…11280 Head {h00=0x002c, h01=0x0050, text=» CF A15,GETDST GET SYMBOLIC DTE-ADDRESS «, t00=0x00af, t01=0x0114}
0x11280…11292 Head {h00=0x000e, h01=0x0050, text=» ENB . =1«, t00=0x00af, t01=0x0144}
0x11292…1129c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x0156}
0x1129c…112c8 Head {h00=0x0028, h01=0x0050, text=»* TEST IF SYMBOLIC DTE ADDRESS FOUND«, t00=0x00af, t01=0x0160}
0x112c8…112d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x018c}
0x112d2…112e4 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x00b0, t01=0x0008}
0x112e4…112fc Head {h00=0x0014, h01=0x0050, text=» RB(N) CALP30 NO«, t00=0x00b0, t01=0x001a}
0x112fc…11306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0032}
0x11306…11330 Head {h00=0x0026, h01=0x0050, text=»* TEST IF REMOTE ADDRESS ACCEPTED «, t00=0x00b0, t01=0x003c}
0x11330…1133a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0066}
0x1133a…11352 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTRAD,A6«, t00=0x00b0, t01=0x0070}
0x11352…1137c Head {h00=0x0026, h01=0x0050, text=» RF(Z) CALP90 ALL REMOTE ACCEPTED «, t00=0x00b0, t01=0x0088}
0x1137c…1138e Head {h00=0x000e, h01=0x0050, text=» CWR A1,A2«, t00=0x00b0, t01=0x00b2}
0x1138e…113ba Head {h00=0x0028, h01=0x0050, text=» RB(NE) CALP20 NOT ACCEPTED,TRY NEXT«, t00=0x00b0, t01=0x00c4}
0x113ba…113c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x00f0}
0x113c4…113d8 Head {h00=0x0010, h01=0x0050, text=»* DWT FOUND «, t00=0x00b0, t01=0x00fa}
0x113d8…113e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x010e}
0x113e2…113f6 Head {h00=0x0010, h01=0x0050, text=»CALP90 EQU *«, t00=0x00b0, t01=0x0118}
0x113f6…11430 Head {h00=0x0036, h01=0x0050, text=» ST A1,DWTRAD,A6 STORE REMOTE SYMBOLIC DTE-ADDRESS«, t00=0x00b0, t01=0x012c}
0x11430…11448 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTECB,A6«, t00=0x00b0, t01=0x0166}
0x11448…11460 Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW1,A2«, t00=0x00b0, t01=0x017e}
0x11460…1146a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x0008}
0x1146a…11478 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b1, t01=0x0012}
0x11478…11482 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x0020}
0x11482…114b0 Head {h00=0x002a, h01=0x0050, text=»* STORE LOG CHAN NUMBER IN DWT «, t00=0x00b1, t01=0x002a}
0x114b0…114ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x0058}
0x114ba…114e0 Head {h00=0x0022, h01=0x0050, text=» LC A1,LCIDNT,A8 GET LC NUMBER«, t00=0x00b1, t01=0x0062}
0x114e0…11508 Head {h00=0x0024, h01=0x0050, text=» SC A1,DWTLCN,A6 STORE IT IN DWT«, t00=0x00b1, t01=0x0088}
0x11508…11512 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x00b0}
0x11512…1153e Head {h00=0x0028, h01=0x0050, text=»* STORE DWT ADDRESS IN LC-ADM«, t00=0x00b1, t01=0x00ba}
0x1153e…11548 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x00e6}
0x11548…11560 Head {h00=0x0014, h01=0x0050, text=» ST A6,LCDWT,A13«, t00=0x00b1, t01=0x00f0}
0x11560…1156a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x0108}
0x1156a…1159e Head {h00=0x0030, h01=0x0050, text=»* TEST IF FACILITIES OR USER DATA AVAILABLE «, t00=0x00b1, t01=0x0112}
0x1159e…115a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x0146}
0x115a8…115ca Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A8 PACKET LENGTH «, t00=0x00b1, t01=0x0150}
0x115ca…115f2 Head {h00=0x0024, h01=0x0050, text=» ADR A3,A8 END ADDRESS OF PACKET«, t00=0x00b1, t01=0x0172}
0x115f2…11604 Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x00b2, t01=0x000a}
0x11604…1163a Head {h00=0x0032, h01=0x0050, text=» CWR A5,A3 FACILITIES OR USER DATA IN PACKET ?«, t00=0x00b2, t01=0x001c}
0x1163a…11652 Head {h00=0x0014, h01=0x0050, text=» RF(E) CAL150 NO«, t00=0x00b2, t01=0x0052}
0x11652…11686 Head {h00=0x0030, h01=0x0050, text=» STR A5,A8 STORE BEGIN ADDR.IN HDLC-HEADDER «, t00=0x00b2, t01=0x006a}
0x11686…11690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x009e}
0x11690…1169e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b2, t01=0x00a8}
0x1169e…116a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x00b6}
0x116a8…116ca Head {h00=0x001e, h01=0x0050, text=»* TEST IF FACILITIES ONLY «, t00=0x00b2, t01=0x00c0}
0x116ca…116d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x00e2}
0x116d4…116e6 Head {h00=0x000e, h01=0x0050, text=» LCR A1,A5«, t00=0x00b2, t01=0x00ec}
0x116e6…1172a Head {h00=0x0040, h01=0x0050, text=» ANK A1,/3F A1:=LENGTH OF FACILITIES «, t00=0x00b2, t01=0x00fe}
0x1172a…1176a Head {h00=0x003c, h01=0x0050, text=» RF(Z) CAL100 NO FACILITIES AT ALL «, t00=0x00b2, t01=0x0142}
0x1176a…1178a Head {h00=0x001c, h01=0x0050, text=» ADR A1,A5 «, t00=0x00b2, t01=0x0182}
0x1178a…117aa Head {h00=0x001c, h01=0x0050, text=» CWR A1,A3 «, t00=0x00b3, t01=0x0012}
0x117aa…117ee Head {h00=0x0040, h01=0x0050, text=» RF(NE) CAL100 FACILITIES AND USER DATA «, t00=0x00b3, t01=0x0032}
0x117ee…117f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x0076}
0x117f8…11812 Head {h00=0x0016, h01=0x0050, text=»* ONLY FACILITIES «, t00=0x00b3, t01=0x0080}
0x11812…1181c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x009a}
0x1181c…11860 Head {h00=0x0040, h01=0x0050, text=» ADK A1,1 ADD FACILITY-LENGTH OCTAD«, t00=0x00b3, t01=0x00a4}
0x11860…11880 Head {h00=0x001c, h01=0x0050, text=» SUR A1,A5 «, t00=0x00b3, t01=0x00e8}
0x11880…118a0 Head {h00=0x001c, h01=0x0050, text=» LDR A3,A1 «, t00=0x00b3, t01=0x0108}
0x118a0…118c0 Head {h00=0x001c, h01=0x0050, text=» RF CAL110«, t00=0x00b3, t01=0x0128}
0x118c0…118dc Head {h00=0x0018, h01=0x0050, text=»CAL100 EQU * «, t00=0x00b3, t01=0x0148}
0x118dc…118fa Head {h00=0x001a, h01=0x0050, text=» ADK A3,2«, t00=0x00b3, t01=0x0164}
0x118fa…1193a Head {h00=0x003c, h01=0x0050, text=» SUR A3,A5 A3:=LENGTH IN OCTADS «, t00=0x00b3, t01=0x0182}
0x1193a…11956 Head {h00=0x0018, h01=0x0050, text=»CAL110 EQU * «, t00=0x00b4, t01=0x0032}
0x11956…119a4 Head {h00=0x004a, h01=0x0050, text=» SC A3,LCIDNT,A8 STORE LENGTH IN LOGICAL CHAN.NUMBER«, t00=0x00b4, t01=0x004e}
0x119a4…119bc Head {h00=0x0014, h01=0x0050, text=» LDKL A3,DATA.RC«, t00=0x00b4, t01=0x009c}
0x119bc…119c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x00b4}
0x119c6…119fe Head {h00=0x0034, h01=0x0050, text=»* TEST IF OPTION SET IN CONNECT PASSIVE REQUEST «, t00=0x00b4, t01=0x00be}
0x119fe…11a08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x00f6}
0x11a08…11a1e Head {h00=0x0012, h01=0x0050, text=» LDK A2,INCALR«, t00=0x00b4, t01=0x0100}
0x11a1e…11a36 Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTOPT,A6«, t00=0x00b4, t01=0x0116}
0x11a36…11a4c Head {h00=0x0012, h01=0x0050, text=» ANK A4,CALOPT«, t00=0x00b4, t01=0x012e}
0x11a4c…11a66 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CAL130 YES«, t00=0x00b4, t01=0x0144}
0x11a66…11a70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x015e}
0x11a70…11a98 Head {h00=0x0024, h01=0x0050, text=»* SEND CALL CONFIRMATION «, t00=0x00b4, t01=0x0168}
0x11a98…11aa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0190}
0x11aa2…11aba Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTRCI,A6«, t00=0x00b5, t01=0x000a}
0x11aba…11ac4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0022}
0x11ac4…11ad2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b5, t01=0x002c}
0x11ad2…11adc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x003a}
0x11adc…11b04 Head {h00=0x0024, h01=0x0050, text=»* REQUEUE BUFFER AND BLOCK QUEUE«, t00=0x00b5, t01=0x0044}
0x11b04…11b0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x006c}
0x11b0e…11b2e Head {h00=0x001c, h01=0x0050, text=» LDR A2,A8 «, t00=0x00b5, t01=0x0076}
0x11b2e…11b4e Head {h00=0x001c, h01=0x0050, text=» LDR A1,A11«, t00=0x00b5, t01=0x0096}
0x11b4e…11b88 Head {h00=0x0036, h01=0x0050, text=» CF A14,QUEUEF REQUEUE BUFFER «, t00=0x00b5, t01=0x00b6}
0x11b88…11bac Head {h00=0x0020, h01=0x0050, text=» LDK A1,NPRFLG «, t00=0x00b5, t01=0x00f0}
0x11bac…11be2 Head {h00=0x0032, h01=0x0050, text=» ORRS A1,A11 BLOCK QUEUE«, t00=0x00b5, t01=0x0114}
0x11be2…11bf8 Head {h00=0x0012, h01=0x0050, text=» LDK A5,INCALL«, t00=0x00b5, t01=0x014a}
0x11bf8…11c0c Head {h00=0x0010, h01=0x0050, text=»CAL120 EQU *«, t00=0x00b5, t01=0x0160}
0x11c0c…11c22 Head {h00=0x0012, h01=0x0050, text=» LDK A2,ACCCAL«, t00=0x00b5, t01=0x0174}
0x11c22…11c3a Head {h00=0x0014, h01=0x0050, text=» LDKL A11,TRANSP«, t00=0x00b5, t01=0x018a}
0x11c3a…11c5a Head {h00=0x001c, h01=0x0050, text=» ABL DISC60 ACCEPT CALL «, t00=0x00b6, t01=0x0012}
0x11c5a…11c6e Head {h00=0x0010, h01=0x0050, text=»CAL130 EQU *«, t00=0x00b6, t01=0x0032}
0x11c6e…11c86 Head {h00=0x0014, h01=0x0050, text=» SC A2,DWTSTE,A6«, t00=0x00b6, t01=0x0046}
0x11c86…11c9c Head {h00=0x0012, h01=0x0050, text=» CF A14,CMPREQ«, t00=0x00b6, t01=0x005e}
0x11c9c…11ca6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x0074}
0x11ca6…11cda Head {h00=0x0030, h01=0x0050, text=»* REQUEUE BUFFER,BLOCK QUEUE AND EXIT«, t00=0x00b6, t01=0x007e}
0x11cda…11ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x00b2}
0x11ce4…11cf8 Head {h00=0x0010, h01=0x0050, text=»CAL140 EQU *«, t00=0x00b6, t01=0x00bc}
0x11cf8…11d0c Head {h00=0x0010, h01=0x0050, text=» ABL RHI150 «, t00=0x00b6, t01=0x00d0}
0x11d0c…11d16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x00e4}
0x11d16…11d24 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b6, t01=0x00ee}
0x11d24…11d2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x00fc}
0x11d2e…11d56 Head {h00=0x0024, h01=0x0050, text=»* NO USER DATA AVAILABLE «, t00=0x00b6, t01=0x0106}
0x11d56…11d8e Head {h00=0x0034, h01=0x0050, text=»* TEST IF OPTION SET IN CONNECT PASSIVE REQUEST «, t00=0x00b6, t01=0x012e}
0x11d8e…11d98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x0166}
0x11d98…11dac Head {h00=0x0010, h01=0x0050, text=»CAL150 EQU *«, t00=0x00b6, t01=0x0170}
0x11dac…11dc2 Head {h00=0x0012, h01=0x0050, text=» LDK A5,CONAD «, t00=0x00b6, t01=0x0184}
0x11dc2…11de8 Head {h00=0x0022, h01=0x0050, text=» LC A3,DWTOPT,A6«, t00=0x00b7, t01=0x000a}
0x11de8…11e0c Head {h00=0x0020, h01=0x0050, text=» ANK A3,CALOPT «, t00=0x00b7, t01=0x0030}
0x11e0c…11e26 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CAL155 YES«, t00=0x00b7, t01=0x0054}
0x11e26…11e46 Head {h00=0x001c, h01=0x0050, text=» LDR A2,A8 «, t00=0x00b7, t01=0x006e}
0x11e46…11e80 Head {h00=0x0036, h01=0x0050, text=» CF A14,RLBUF RELEASE BUFFER «, t00=0x00b7, t01=0x008e}
0x11e80…11e92 Head {h00=0x000e, h01=0x0050, text=» RB CAL120«, t00=0x00b7, t01=0x00c8}
0x11e92…11e9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x00da}
0x11e9c…11eb0 Head {h00=0x0010, h01=0x0050, text=»CAL155 EQU *«, t00=0x00b7, t01=0x00e4}
0x11eb0…11ec6 Head {h00=0x0012, h01=0x0050, text=» LDK A5,INCALR«, t00=0x00b7, t01=0x00f8}
0x11ec6…11f02 Head {h00=0x0038, h01=0x0050, text=» SC A5,DWTSTE,A6 CHANGE DWT STATE «, t00=0x00b7, t01=0x010e}
0x11f02…11f0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x014a}
0x11f0c…11f48 Head {h00=0x0038, h01=0x0050, text=»* COMPLETE REQUEST WITH RETURNCODE "ACCEPTED"«, t00=0x00b7, t01=0x0154}
0x11f48…11f70 Head {h00=0x0024, h01=0x0050, text=»* RELEASE BUFFER AND EXIT«, t00=0x00b7, t01=0x0190}
0x11f70…11f7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0028}
0x11f7a…11f8e Head {h00=0x0010, h01=0x0050, text=»CAL160 EQU *«, t00=0x00b8, t01=0x0032}
0x11f8e…11fa2 Head {h00=0x0010, h01=0x0050, text=» ABL RHI120 «, t00=0x00b8, t01=0x0046}
0x11fa2…11fbe Head {h00=0x0018, h01=0x0050, text=»CAL170 EQU * «, t00=0x00b8, t01=0x005a}
0x11fbe…11fde Head {h00=0x001c, h01=0x0050, text=» LDR A2,A8 «, t00=0x00b8, t01=0x0076}
0x11fde…12018 Head {h00=0x0036, h01=0x0050, text=» CF A14,RLBUF RELEASE BUFFER «, t00=0x00b8, t01=0x0096}
0x12018…12038 Head {h00=0x001c, h01=0x0050, text=» RB CAL120«, t00=0x00b8, t01=0x00d0}
0x12038…12046 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b8, t01=0x00f0}
0x12046…12050 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x00fe}
0x12050…12092 Head {h00=0x003e, h01=0x0050, text=»* MOVE INFORMATION OF INCOMMING CALL IN READ BUFFER«, t00=0x00b8, t01=0x0108}
0x12092…1209c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x014a}
0x1209c…120b8 Head {h00=0x0018, h01=0x0050, text=»CAL180 EQU * «, t00=0x00b8, t01=0x0154}
0x120b8…120c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0170}
0x120c2…120f0 Head {h00=0x002a, h01=0x0050, text=»* TEST IF READ REQUEST PENDING «, t00=0x00b8, t01=0x017a}
0x120f0…120fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0018}
0x120fa…1210c Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x00b9, t01=0x0022}
0x1210c…12126 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CAL190 NO «, t00=0x00b9, t01=0x0034}
0x12126…12130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x004e}
0x12130…12156 Head {h00=0x0022, h01=0x0050, text=»* READ REQUEST PENDING «, t00=0x00b9, t01=0x0058}
0x12156…12160 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x007e}
0x12160…121b0 Head {h00=0x004c, h01=0x0050, text=» LDR* A1,A8 A1:=ADDRESS OF FACILITY LENGTH IN PAC«, t00=0x00b9, t01=0x0088}
0x121b0…121ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x00d8}
0x121ba…12202 Head {h00=0x0044, h01=0x0050, text=»* GET NUMBER OF CHARACTERS TO MOVE FROM PACKET IN BUFFER «, t00=0x00b9, t01=0x00e2}
0x12202…1220c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x012a}
0x1220c…1222a Head {h00=0x001a, h01=0x0050, text=» LDK A4,0«, t00=0x00b9, t01=0x0134}
0x1222a…12250 Head {h00=0x0022, h01=0x0050, text=» LC A4,LCIDNT,A8«, t00=0x00b9, t01=0x0152}
0x12250…12274 Head {h00=0x0020, h01=0x0050, text=» CF A14,COPTUB«, t00=0x00b9, t01=0x0178}
0x12274…122c0 Head {h00=0x0048, h01=0x0050, text=» RB CAL160 COMPLETE REQUEST WITH RETURN CODE«, t00=0x00ba, t01=0x000c}
0x122c0…1230c Head {h00=0x0048, h01=0x0050, text=» 'ACCEPTED',RELEASE BUFFER AND EXIT «, t00=0x00ba, t01=0x0058}
0x1230c…12316 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00a4}
0x12316…1233a Head {h00=0x0020, h01=0x0050, text=»* TEST IF VC RELEASED«, t00=0x00ba, t01=0x00ae}
0x1233a…12344 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00d2}
0x12344…12358 Head {h00=0x0010, h01=0x0050, text=»CAL190 EQU *«, t00=0x00ba, t01=0x00dc}
0x12358…1236c Head {h00=0x0010, h01=0x0050, text=» LDR A10,A10«, t00=0x00ba, t01=0x00f0}
0x1236c…123a6 Head {h00=0x0036, h01=0x0050, text=» RB(NZ) CAL140 NO! REQUEUE BUFFER,BLOCK QUEUE,EXIT«, t00=0x00ba, t01=0x0104}
0x123a6…123d6 Head {h00=0x002c, h01=0x0050, text=» ABL RHI140 YES! RELEASE BUFFER AND EXIT«, t00=0x00ba, t01=0x013e}
0x123d6…123e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x016e}
0x123e0…123ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ba, t01=0x0178}
0x123ee…123f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x0186}
0x123f8…12402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x0190}
0x12402…12424 Head {h00=0x001e, h01=0x0050, text=»* CALL CONFIRMATION PACKET«, t00=0x00bb, t01=0x000a}
0x12424…1242e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x002c}
0x1242e…1247a Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00bb, t01=0x0036}
0x1247a…12484 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0082}
0x12484…124a0 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00bb, t01=0x008c}
0x124a0…124bc Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x00bb, t01=0x00a8}
0x124bc…124dc Head {h00=0x001c, h01=0x0050, text=»* A8 = BUFFER ADDRESS «, t00=0x00bb, t01=0x00c4}
0x124dc…124fe Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x00bb, t01=0x00e4}
0x124fe…12508 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0106}
0x12508…1251c Head {h00=0x0010, h01=0x0050, text=»CALCON EQU *«, t00=0x00bb, t01=0x0110}
0x1251c…1253e Head {h00=0x001e, h01=0x0050, text=» LDK A2,CONAD DWT STATE :=«, t00=0x00bb, t01=0x0124}
0x1253e…1256e Head {h00=0x002c, h01=0x0050, text=» SC A2,DWTSTE,A6 CONNECTED, ACCEPT DATA «, t00=0x00bb, t01=0x0146}
0x1256e…12578 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0176}
0x12578…125b4 Head {h00=0x0038, h01=0x0050, text=»* COMPLETE REQUEST WITH RETURNCODE "ACCEPTED"«, t00=0x00bb, t01=0x0180}
0x125b4…125dc Head {h00=0x0024, h01=0x0050, text=»* RELEASE BUFFER AND EXIT«, t00=0x00bc, t01=0x002c}
0x125dc…125e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0054}
0x125e6…125fa Head {h00=0x0010, h01=0x0050, text=» ABL RHI120 «, t00=0x00bc, t01=0x005e}
0x125fa…12604 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0072}
0x12604…12612 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bc, t01=0x007c}
0x12612…1261c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x008a}
0x1261c…12626 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0094}
0x12626…1263c Head {h00=0x0012, h01=0x0050, text=»* CLEAR PACKET«, t00=0x00bc, t01=0x009e}
0x1263c…12646 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x00b4}
0x12646…12694 Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x00bc, t01=0x00be}
0x12694…1269e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x010c}
0x1269e…126ba Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00bc, t01=0x0116}
0x126ba…126e6 Head {h00=0x0028, h01=0x0050, text=»* A5 = REQUEST PENDING INDICATION «, t00=0x00bc, t01=0x0132}
0x126e6…1271c Head {h00=0x0032, h01=0x0050, text=»* <0: NO REQUEST PENDING«, t00=0x00bc, t01=0x015e}
0x1271c…12754 (189, 0, 400) Head {h00=0x0034, h01=0x0050, text=»* =0: READ REQUEST PENDING«, t00=0x00bd, t01=0x0004}
0x12754…1278e Head {h00=0x0036, h01=0x0050, text=»* >0: OTHER REQUEST PENDING «, t00=0x00bd, t01=0x003c}
0x1278e…127ba Head {h00=0x0028, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00bd, t01=0x0076}
0x127ba…127da Head {h00=0x001c, h01=0x0050, text=»* A8 = BUFFER ADDRESS «, t00=0x00bd, t01=0x00a2}
0x127da…12808 Head {h00=0x002a, h01=0x0050, text=»* A11 = ADDRESS OF INPUT-QUEUE ANCHOR«, t00=0x00bd, t01=0x00c2}
0x12808…12838 Head {h00=0x002c, h01=0x0050, text=»* A14 = CF STACK POINTER«, t00=0x00bd, t01=0x00f0}
0x12838…12842 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0120}
0x12842…12856 Head {h00=0x0010, h01=0x0050, text=»CLEPAC EQU *«, t00=0x00bd, t01=0x012a}
0x12856…12888 Head {h00=0x002e, h01=0x0050, text=» LDK A3,CLEA.RC+MORE.RC CLEAR + MORE INFO «, t00=0x00bd, t01=0x013e}
0x12888…128b2 Head {h00=0x0026, h01=0x0050, text=» LDK A1,DWTCLE DISP FOR CLEAR INFO«, t00=0x00bd, t01=0x0170}
0x128b2…128c4 Head {h00=0x000e, h01=0x0050, text=» RF CLERES«, t00=0x00be, t01=0x000a}
0x128c4…128d0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00be, t01=0x001c}
0x128d0…128de Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00be, t01=0x0028}
0x128de…128e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0036}
0x128e8…128f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0040}
0x128f2…12908 Head {h00=0x0012, h01=0x0050, text=»* RESET PACKET«, t00=0x00be, t01=0x004a}
0x12908…12912 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0060}
0x12912…1295e Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00be, t01=0x006a}
0x1295e…12968 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x00b6}
0x12968…12984 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00be, t01=0x00c0}
0x12984…129b0 Head {h00=0x0028, h01=0x0050, text=»* A5 = REQUEST PENDING INDICATION «, t00=0x00be, t01=0x00dc}
0x129b0…129d8 Head {h00=0x0024, h01=0x0050, text=»* <0: NO REQUEST PENDING «, t00=0x00be, t01=0x0108}
0x129d8…12a02 Head {h00=0x0026, h01=0x0050, text=»* =0: READ REQUEST PENDING «, t00=0x00be, t01=0x0130}
0x12a02…12a2c Head {h00=0x0026, h01=0x0050, text=»* >0: OTHER REQUEST PENDING«, t00=0x00be, t01=0x015a}
0x12a2c…12a48 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x00be, t01=0x0184}
0x12a48…12a68 Head {h00=0x001c, h01=0x0050, text=»* A8 = BUFFER ADDRESS «, t00=0x00bf, t01=0x0010}
0x12a68…12a8a Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x00bf, t01=0x0030}
0x12a8a…12a94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x0052}
0x12a94…12aa8 Head {h00=0x0010, h01=0x0050, text=»RESPAC EQU *«, t00=0x00bf, t01=0x005c}
0x12aa8…12ad0 Head {h00=0x0024, h01=0x0050, text=» CM DWTRCI,A6 CLEAR RETURN INFO «, t00=0x00bf, t01=0x0070}
0x12ad0…12ae2 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x00bf, t01=0x0098}
0x12ae2…12afa Head {h00=0x0014, h01=0x0050, text=» SC A4,DWTWRO,A6«, t00=0x00bf, t01=0x00aa}
0x12afa…12b2c Head {h00=0x002e, h01=0x0050, text=» LDK A3,RSET.RC+MORE.RC RESET + MORE INFO «, t00=0x00bf, t01=0x00c2}
0x12b2c…12b56 Head {h00=0x0026, h01=0x0050, text=» LDK A1,DWTRES DISP FOR RESET INFO«, t00=0x00bf, t01=0x00f4}
0x12b56…12b6a Head {h00=0x0010, h01=0x0050, text=»CLERES EQU *«, t00=0x00bf, t01=0x011e}
0x12b6a…12b90 Head {h00=0x0022, h01=0x0050, text=» ADR A1,A6 WHERE TO STORE INFO«, t00=0x00bf, t01=0x0132}
0x12b90…12ba6 Head {h00=0x0012, h01=0x0050, text=» LDK A4,CAUSE «, t00=0x00bf, t01=0x0158}
0x12ba6…12be0 Head {h00=0x0036, h01=0x0050, text=» ADR A4,A8 A4:=STARTADDR.OF CAUSE-FIELD IN PACKET «, t00=0x00bf, t01=0x016e}
0x12be0…12bea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0018}
0x12bea…12c24 Head {h00=0x0036, h01=0x0050, text=»* GET CAUSE AND DIAGNOSTIC CODE FROM PACKET«, t00=0x00c0, t01=0x0022}
0x12c24…12c2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x005c}
0x12c2e…12c4e Head {h00=0x001c, h01=0x0050, text=» LCR A7,A4 «, t00=0x00c0, t01=0x0066}
0x12c4e…12c6e Head {h00=0x001c, h01=0x0050, text=» ECR A7,A7 «, t00=0x00c0, t01=0x0086}
0x12c6e…12c90 Head {h00=0x001e, h01=0x0050, text=» LC A7,1,A4 «, t00=0x00c0, t01=0x00a6}
0x12c90…12c9e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c0, t01=0x00c8}
0x12c9e…12ca8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x00d6}
0x12ca8…12ce0 Head {h00=0x0034, h01=0x0050, text=»* STORE RESET CAUSE AND DIAGNOSTIC IN DWT«, t00=0x00c0, t01=0x00e0}
0x12ce0…12cea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0118}
0x12cea…12d04 Head {h00=0x0016, h01=0x0050, text=» ORS A3,DWTRCI,A6 «, t00=0x00c0, t01=0x0122}
0x12d04…12d16 Head {h00=0x000e, h01=0x0050, text=» STR A7,A1«, t00=0x00c0, t01=0x013c}
0x12d16…12d20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x014e}
0x12d20…12d42 Head {h00=0x001e, h01=0x0050, text=»* TEST IF REQUEST PENDING «, t00=0x00c0, t01=0x0158}
0x12d42…12d4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x017a}
0x12d4c…12d5e Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x00c0, t01=0x0184}
0x12d5e…12d78 Head {h00=0x0016, h01=0x0050, text=» RF(N) RESP30 NO! «, t00=0x00c1, t01=0x0008}
0x12d78…12d82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0022}
0x12d82…12db2 Head {h00=0x002c, h01=0x0050, text=»* TEST IF CLOSE SYSTEM REQUEST PENDING«, t00=0x00c1, t01=0x002c}
0x12db2…12dbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x005c}
0x12dbc…12dd2 Head {h00=0x0012, h01=0x0050, text=» SUK A5,CLOSYS«, t00=0x00c1, t01=0x0066}
0x12dd2…12de6 Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x00c1, t01=0x007c}
0x12de6…12e02 Head {h00=0x0018, h01=0x0050, text=» RF(Z) RESP40 YES ! «, t00=0x00c1, t01=0x0090}
0x12e02…12e0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x00ac}
0x12e0c…12e3a Head {h00=0x002a, h01=0x0050, text=»* TEST IF STATISTIC REQUEST PENDING «, t00=0x00c1, t01=0x00b6}
0x12e3a…12e44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x00e4}
0x12e44…12e62 Head {h00=0x001a, h01=0x0050, text=» SUK A5,STATIS-CLOSYS «, t00=0x00c1, t01=0x00ee}
0x12e62…12e6e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c1, t01=0x010c}
0x12e6e…12e88 Head {h00=0x0016, h01=0x0050, text=» RF(Z) RESP40 YES «, t00=0x00c1, t01=0x0118}
0x12e88…12eb8 Head {h00=0x002c, h01=0x0050, text=» LDK A1,TOLD.RC RESET/CLEAR TOLD TO USER«, t00=0x00c1, t01=0x0132}
0x12eb8…12ed2 Head {h00=0x0016, h01=0x0050, text=» ORS A1,DWTRCI,A6 «, t00=0x00c1, t01=0x0162}
0x12ed2…12efa Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x00c1, t01=0x017c}
0x12efa…12f0e Head {h00=0x0010, h01=0x0050, text=»RESP30 EQU *«, t00=0x00c2, t01=0x0014}
0x12f0e…12f24 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00c2, t01=0x0028}
0x12f24…12f4a Head {h00=0x0022, h01=0x0050, text=» ANK A3,CLEA.RC CLEAR PACKET ?«, t00=0x00c2, t01=0x003e}
0x12f4a…12f62 Head {h00=0x0014, h01=0x0050, text=» RF(Z) RESP40 NO«, t00=0x00c2, t01=0x0064}
0x12f62…12f90 Head {h00=0x002a, h01=0x0050, text=» CF A14,RELDWT RELEASE DWT FROM CHAIN «, t00=0x00c2, t01=0x007c}
0x12f90…12f9c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c2, t01=0x00aa}
0x12f9c…12fa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x00b6}
0x12fa6…12fc8 Head {h00=0x001e, h01=0x0050, text=»* RELEASE BUFFER AND EXIT «, t00=0x00c2, t01=0x00c0}
0x12fc8…12fd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x00e2}
0x12fd2…12fe6 Head {h00=0x0010, h01=0x0050, text=»RESP40 EQU *«, t00=0x00c2, t01=0x00ec}
0x12fe6…12ffa Head {h00=0x0010, h01=0x0050, text=» ABL RHI140 «, t00=0x00c2, t01=0x0100}
0x12ffa…13008 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c2, t01=0x0114}
0x13008…13012 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x0122}
0x13012…1301c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x012c}
0x1301c…13032 Head {h00=0x0012, h01=0x0050, text=»* DATA PACKET «, t00=0x00c2, t01=0x0136}
0x13032…1303c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x014c}
0x1303c…13088 Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x00c2, t01=0x0156}
0x13088…13092 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x0012}
0x13092…130ae Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00c3, t01=0x001c}
0x130ae…130da Head {h00=0x0028, h01=0x0050, text=»* A5 = REQUEST PENDING INDICATION «, t00=0x00c3, t01=0x0038}
0x130da…13102 Head {h00=0x0024, h01=0x0050, text=»* <0: NO REQUEST PENDING «, t00=0x00c3, t01=0x0064}
0x13102…1312c Head {h00=0x0026, h01=0x0050, text=»* =0: READ REQUEST PENDING «, t00=0x00c3, t01=0x008c}
0x1312c…13156 Head {h00=0x0026, h01=0x0050, text=»* >0: OTHER REQUEST PENDING«, t00=0x00c3, t01=0x00b6}
0x13156…13172 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x00c3, t01=0x00e0}
0x13172…13192 Head {h00=0x001c, h01=0x0050, text=»* A8 = BUFFER ADDRESS «, t00=0x00c3, t01=0x00fc}
0x13192…131b8 Head {h00=0x0022, h01=0x0050, text=»* A10 = VC RELEASE INDICATION«, t00=0x00c3, t01=0x011c}
0x131b8…131ea Head {h00=0x002e, h01=0x0050, text=»* =0: VC RELEASED,ELSE NOT RELEASED«, t00=0x00c3, t01=0x0142}
0x131ea…13212 Head {h00=0x0024, h01=0x0050, text=»* A11 = ADDRESS OF QUEUE ANCHOR«, t00=0x00c3, t01=0x0174}
0x13212…13232 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x00c4, t01=0x000c}
0x13232…13254 Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x00c4, t01=0x002c}
0x13254…1325e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x004e}
0x1325e…13272 Head {h00=0x0010, h01=0x0050, text=»DATPAC EQU *«, t00=0x00c4, t01=0x0058}
0x13272…1328a Head {h00=0x0014, h01=0x0050, text=» LDKL A9,DATA.RC«, t00=0x00c4, t01=0x006c}
0x1328a…1329c Head {h00=0x000e, h01=0x0050, text=» LDR A3,A6«, t00=0x00c4, t01=0x0084}
0x1329c…132b2 Head {h00=0x0012, h01=0x0050, text=» ADK A3,DWTRCI«, t00=0x00c4, t01=0x0096}
0x132b2…132bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x00ac}
0x132bc…132ea Head {h00=0x002a, h01=0x0050, text=»* TEST IF READ REQUEST PENDING «, t00=0x00c4, t01=0x00b6}
0x132ea…132f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x00e4}
0x132f4…13306 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x00c4, t01=0x00ee}
0x13306…1331c Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DAT030«, t00=0x00c4, t01=0x0100}
0x1331c…13326 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x0116}
0x13326…13334 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c4, t01=0x0120}
0x13334…1333e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x012e}
0x1333e…13364 Head {h00=0x0022, h01=0x0050, text=»* READ REQUEST PENDING «, t00=0x00c4, t01=0x0138}
0x13364…13390 Head {h00=0x0028, h01=0x0050, text=»* COPY PACKET TO USER BUFFER «, t00=0x00c4, t01=0x015e}
0x13390…1339a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x018a}
0x1339a…133d2 (197, 0, 400) Head {h00=0x0034, h01=0x0050, text=» LDK A1,BEGDAT A1:=DISPL.IN PACKET FOR USER DATA«, t00=0x00c5, t01=0x0004}
0x133d2…1340a Head {h00=0x0034, h01=0x0050, text=» ADR A1,A8 A1:=STARTADDR.OF USER DATA IN PACKET «, t00=0x00c5, t01=0x003c}
0x1340a…1343e Head {h00=0x0030, h01=0x0050, text=» LDR* A4,A8 A4:=TOTAL LENGTH OF DATA PACKET «, t00=0x00c5, t01=0x0074}
0x1343e…1346c Head {h00=0x002a, h01=0x0050, text=» SUK A4,BEGDAT A4:=LENGTH OF USER DATA«, t00=0x00c5, t01=0x00a8}
0x1346c…13482 Head {h00=0x0012, h01=0x0050, text=» CF A14,COPTUB«, t00=0x00c5, t01=0x00d6}
0x13482…13498 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00c5, t01=0x00ec}
0x13498…134a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x0102}
0x134a2…134d4 Head {h00=0x002e, h01=0x0050, text=»* TEST IF DWT STATE IS VC RELEASED «, t00=0x00c5, t01=0x010c}
0x134d4…134de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x013e}
0x134de…13500 Head {h00=0x001e, h01=0x0050, text=» LDR A10,A10 «, t00=0x00c5, t01=0x0148}
0x13500…13530 Head {h00=0x002c, h01=0x0050, text=» RF(Z) DAT005 YES! «, t00=0x00c5, t01=0x016a}
0x13530…1353c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c6, t01=0x000a}
0x1353c…13556 Head {h00=0x0016, h01=0x0050, text=» LC A2,NRNUBF,A13 «, t00=0x00c6, t01=0x0016}
0x13556…13568 Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x00c6, t01=0x0030}
0x13568…135a0 Head {h00=0x0034, h01=0x0050, text=» SC A2,NRNUBF,A13 INCREMENT NR.OF UNUSED BUFFERS«, t00=0x00c6, t01=0x0042}
0x135a0…135bc Head {h00=0x0018, h01=0x0050, text=»DAT005 EQU * «, t00=0x00c6, t01=0x007a}
0x135bc…135c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x0096}
0x135c6…135ea Head {h00=0x0020, h01=0x0050, text=»* PREPARE RETURNCODE «, t00=0x00c6, t01=0x00a0}
0x135ea…135f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x00c4}
0x135f4…13608 Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A3 «, t00=0x00c6, t01=0x00ce}
0x13608…13612 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x00e2}
0x13612…13644 Head {h00=0x002e, h01=0x0050, text=»* TEST IF MORE-DATA-INDICATION SET «, t00=0x00c6, t01=0x00ec}
0x13644…1364e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x011e}
0x1364e…13664 Head {h00=0x0012, h01=0x0050, text=» LC A5,MBIT,A8«, t00=0x00c6, t01=0x0128}
0x13664…13678 Head {h00=0x0010, h01=0x0050, text=» ANK A5,MPOS«, t00=0x00c6, t01=0x013e}
0x13678…1368e Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DAT010«, t00=0x00c6, t01=0x0152}
0x1368e…13698 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x0168}
0x13698…136be Head {h00=0x0022, h01=0x0050, text=»* MORE DATA INDICATION NOT SET«, t00=0x00c6, t01=0x0172}
0x136be…136da Head {h00=0x0018, h01=0x0050, text=»* ADJUST RETURN CODE«, t00=0x00c7, t01=0x0008}
0x136da…136e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0024}
0x136e4…136fc Head {h00=0x0014, h01=0x0050, text=» ORKL A3,LAST.RC«, t00=0x00c7, t01=0x002e}
0x136fc…13706 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0046}
0x13706…13714 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c7, t01=0x0050}
0x13714…1371e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x005e}
0x1371e…13748 Head {h00=0x0026, h01=0x0050, text=»* TEST IF QUALIFIER-BIT SET«, t00=0x00c7, t01=0x0068}
0x13748…13752 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0092}
0x13752…13766 Head {h00=0x0010, h01=0x0050, text=»DAT010 EQU *«, t00=0x00c7, t01=0x009c}
0x13766…1377c Head {h00=0x0012, h01=0x0050, text=» LC A1,QBIT,A8«, t00=0x00c7, t01=0x00b0}
0x1377c…13790 Head {h00=0x0010, h01=0x0050, text=» ANK A1,QPOS«, t00=0x00c7, t01=0x00c6}
0x13790…137a6 Head {h00=0x0012, h01=0x0050, text=» RF(Z) DAT020 «, t00=0x00c7, t01=0x00da}
0x137a6…137b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x00f0}
0x137b0…137e6 Head {h00=0x0032, h01=0x0050, text=»* QUALIFIER-BIT SET; ADJUST RETURN CODE«, t00=0x00c7, t01=0x00fa}
0x137e6…137f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0130}
0x137f0…13808 Head {h00=0x0014, h01=0x0050, text=» ORKL A3,QBIT.RC«, t00=0x00c7, t01=0x013a}
0x13808…13812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0152}
0x13812…1384a Head {h00=0x0034, h01=0x0050, text=»* COMPLETE REQUEST WITH RETURNCODE IN A3 «, t00=0x00c7, t01=0x015c}
0x1384a…13872 (200, 0, 400) Head {h00=0x0024, h01=0x0050, text=»* RELEASE BUFFER AND EXIT«, t00=0x00c8, t01=0x0004}
0x13872…1387c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x002c}
0x1387c…13890 Head {h00=0x0010, h01=0x0050, text=»DAT020 EQU *«, t00=0x00c8, t01=0x0036}
0x13890…138a4 Head {h00=0x0010, h01=0x0050, text=» ABL RHI130 «, t00=0x00c8, t01=0x004a}
0x138a4…138ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x005e}
0x138ae…138d6 Head {h00=0x0024, h01=0x0050, text=»* NO READ REQUEST PENDING«, t00=0x00c8, t01=0x0068}
0x138d6…138e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0090}
0x138e0…138f4 Head {h00=0x0010, h01=0x0050, text=»DAT030 EQU *«, t00=0x00c8, t01=0x009a}
0x138f4…13922 Head {h00=0x002a, h01=0x0050, text=» ORRS A9,A3 SET DATA AVAILABLE IN DWT «, t00=0x00c8, t01=0x00ae}
0x13922…1392c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x00dc}
0x1392c…13960 Head {h00=0x0030, h01=0x0050, text=»* REQUEUE BUFFER,BLOCK QUEUE AND EXIT«, t00=0x00c8, t01=0x00e6}
0x13960…1396a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x011a}
0x1396a…1397e Head {h00=0x0010, h01=0x0050, text=» ABL RHI150 «, t00=0x00c8, t01=0x0124}
0x1397e…1398c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c8, t01=0x0138}
0x1398c…13996 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0146}
0x13996…139a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0150}
0x139a0…139ba Head {h00=0x0016, h01=0x0050, text=»* INTERRUPT PACKET«, t00=0x00c8, t01=0x015a}
0x139ba…139c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0174}
0x139c4…13a10 Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x00c8, t01=0x017e}
0x13a10…13a1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c9, t01=0x003a}
0x13a1a…13a36 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00c9, t01=0x0044}
0x13a36…13a62 Head {h00=0x0028, h01=0x0050, text=»* A5 = REQUEST PENDING INDICATION «, t00=0x00c9, t01=0x0060}
0x13a62…13a8a Head {h00=0x0024, h01=0x0050, text=»* <0: NO REQUEST PENDING «, t00=0x00c9, t01=0x008c}
0x13a8a…13ab4 Head {h00=0x0026, h01=0x0050, text=»* =0: READ REQUEST PENDING «, t00=0x00c9, t01=0x00b4}
0x13ab4…13ade Head {h00=0x0026, h01=0x0050, text=»* >0: OTHER REQUEST PENDING«, t00=0x00c9, t01=0x00de}
0x13ade…13afa Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x00c9, t01=0x0108}
0x13afa…13b1a Head {h00=0x001c, h01=0x0050, text=»* A8 = BUFFER ADDRESS «, t00=0x00c9, t01=0x0124}
0x13b1a…13b40 Head {h00=0x0022, h01=0x0050, text=»* A10 = VC RELEASE INDICATION«, t00=0x00c9, t01=0x0144}
0x13b40…13b72 Head {h00=0x002e, h01=0x0050, text=»* =0: VC RELEASED,ELSE NOT RELEASED«, t00=0x00c9, t01=0x016a}
0x13b72…13b9a Head {h00=0x0024, h01=0x0050, text=»* A11 = ADDRESS OF QUEUE ANCHOR«, t00=0x00ca, t01=0x000c}
0x13b9a…13bba Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x00ca, t01=0x0034}
0x13bba…13bdc Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x00ca, t01=0x0054}
0x13bdc…13be6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0076}
0x13be6…13bfa Head {h00=0x0010, h01=0x0050, text=»INTPAC EQU *«, t00=0x00ca, t01=0x0080}
0x13bfa…13c1e Head {h00=0x0020, h01=0x0050, text=» LDK A7,DWTRCI «, t00=0x00ca, t01=0x0094}
0x13c1e…13c3e Head {h00=0x001c, h01=0x0050, text=» ADR A7,A6 «, t00=0x00ca, t01=0x00b8}
0x13c3e…13c62 Head {h00=0x0020, h01=0x0050, text=» LDKL A3,INTR.RC«, t00=0x00ca, t01=0x00d8}
0x13c62…13c6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x00fc}
0x13c6c…13c92 Head {h00=0x0022, h01=0x0050, text=»* TEST IF READ REQUEST PENDING«, t00=0x00ca, t01=0x0106}
0x13c92…13c9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x012c}
0x13c9c…13cae Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x00ca, t01=0x0136}
0x13cae…13cc4 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) INT010«, t00=0x00ca, t01=0x0148}
0x13cc4…13cce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x015e}
0x13cce…13cdc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ca, t01=0x0168}
0x13cdc…13ce6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0176}
0x13ce6…13d0c Head {h00=0x0022, h01=0x0050, text=»* READ REQUEST PENDING «, t00=0x00ca, t01=0x0180}
0x13d0c…13d38 Head {h00=0x0028, h01=0x0050, text=»* COPY PACKET TO USER BUFFER «, t00=0x00cb, t01=0x0016}
0x13d38…13d74 Head {h00=0x0038, h01=0x0050, text=»* RESET INTERRUPT RECEIVED INDICATION IN DWT «, t00=0x00cb, t01=0x0042}
0x13d74…13d7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x007e}
0x13d7e…13d9e Head {h00=0x001c, h01=0x0050, text=» C1R A3,A3 «, t00=0x00cb, t01=0x0088}
0x13d9e…13dbe Head {h00=0x001c, h01=0x0050, text=» ANRS A3,A7 «, t00=0x00cb, t01=0x00a8}
0x13dbe…13df8 Head {h00=0x0036, h01=0x0050, text=» LDK A1,BEGDAT A1:=DISPL.IN PACKET FOR INTERRUPT- «, t00=0x00cb, t01=0x00c8}
0x13df8…13e0c Head {h00=0x0010, h01=0x0050, text=» USER DATA«, t00=0x00cb, t01=0x0102}
0x13e0c…13e42 Head {h00=0x0032, h01=0x0050, text=» ADR A1,A8 A1:=START ADDRESS OF INT.USER DATA «, t00=0x00cb, t01=0x0116}
0x13e42…13e6c Head {h00=0x0026, h01=0x0050, text=» LDK A4,1 LENGTH OF INT.USER DATA «, t00=0x00cb, t01=0x014c}
0x13e6c…13e82 Head {h00=0x0012, h01=0x0050, text=» CF A14,COPTUB«, t00=0x00cb, t01=0x0176}
0x13e82…13ed2 Head {h00=0x004c, h01=0x0050, text=» C1R A3,A3 A3:=RETURNCODE:INTERRUPT PACKET REC. «, t00=0x00cb, t01=0x018c}
0x13ed2…13ee6 Head {h00=0x0010, h01=0x0050, text=» ORR* A3,A7 «, t00=0x00cc, t01=0x004c}
0x13ee6…13f0e Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x00cc, t01=0x0060}
0x13f0e…13f20 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A8«, t00=0x00cc, t01=0x0088}
0x13f20…13f44 Head {h00=0x0020, h01=0x0050, text=» CF A14,RLBUF RELEASE BUFFER«, t00=0x00cc, t01=0x009a}
0x13f44…13f4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x00be}
0x13f4e…13f78 Head {h00=0x0026, h01=0x0050, text=»* TEST IF DWT STATE IS VC RELEASED«, t00=0x00cc, t01=0x00c8}
0x13f78…13f82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x00f2}
0x13f82…13fa4 Head {h00=0x001e, h01=0x0050, text=» LDR A10,A10 «, t00=0x00cc, t01=0x00fc}
0x13fa4…13fd4 Head {h00=0x002c, h01=0x0050, text=» RF(Z) INT008 YES! «, t00=0x00cc, t01=0x011e}
0x13fd4…13fde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x014e}
0x13fde…1400e Head {h00=0x002c, h01=0x0050, text=»* PREPARE INTERRUPT CONFIRMATION PACKET «, t00=0x00cc, t01=0x0158}
0x1400e…14018 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x0188}
0x14018…1402c (205, 0, 400) Head {h00=0x0010, h01=0x0050, text=»INT002 EQU *«, t00=0x00cd, t01=0x0004}
0x1402c…14054 Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x00cd, t01=0x0018}
0x14054…1406a Head {h00=0x0012, h01=0x0050, text=» ADK A2,SYSBUF«, t00=0x00cd, t01=0x0040}
0x1406a…14074 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0056}
0x14074…14094 Head {h00=0x001c, h01=0x0050, text=»* TEST IF BUFFER IS FREE«, t00=0x00cd, t01=0x0060}
0x14094…1409e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0080}
0x1409e…140b2 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A2 «, t00=0x00cd, t01=0x008a}
0x140b2…140cc Head {h00=0x0016, h01=0x0050, text=» RF(Z) INT004 YES «, t00=0x00cd, t01=0x009e}
0x140cc…140fc Head {h00=0x002c, h01=0x0050, text=» LDKL A1,INT002 A1:=REACTIVATION ADDRESS«, t00=0x00cd, t01=0x00b8}
0x140fc…14124 Head {h00=0x0024, h01=0x0050, text=» ABL BUFWAT WAIT FOR FREE BUFFER«, t00=0x00cd, t01=0x00e8}
0x14124…1412e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0110}
0x1412e…1413c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cd, t01=0x011a}
0x1413c…14146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0128}
0x14146…1415e Head {h00=0x0014, h01=0x0050, text=»* BUFFER IS FREE«, t00=0x00cd, t01=0x0132}
0x1415e…14168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x014a}
0x14168…1417c Head {h00=0x0010, h01=0x0050, text=»INT004 EQU *«, t00=0x00cd, t01=0x0154}
0x1417c…14192 Head {h00=0x0012, h01=0x0050, text=» LDK A1,INT.CP«, t00=0x00cd, t01=0x0168}
0x14192…141cc Head {h00=0x0036, h01=0x0050, text=» SC A1,IDENT,A2 SET INTERRUPT CONF.TYPE IN BUFFER «, t00=0x00cd, t01=0x017e}
0x141cc…14204 Head {h00=0x0034, h01=0x0050, text=» LDK A1,INT.CL PACKET LENGTH OF INTERRUPT CONF. «, t00=0x00ce, t01=0x0028}
0x14204…14232 Head {h00=0x002a, h01=0x0050, text=» ST A1,HDLC,A2 STORE LENGTH IN BUFFER «, t00=0x00ce, t01=0x0060}
0x14232…14246 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A13 «, t00=0x00ce, t01=0x008e}
0x14246…14280 Head {h00=0x0036, h01=0x0050, text=» ADK A1,QUEOUT A1:=ADDRESS OF OUTPUT QUEUE ANCHOR «, t00=0x00ce, t01=0x00a2}
0x14280…14296 Head {h00=0x0012, h01=0x0050, text=» CF A14,QUEUEF«, t00=0x00ce, t01=0x00dc}
0x14296…142a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x00f2}
0x142a0…142ce Head {h00=0x002a, h01=0x0050, text=»* SET PROCESSING FLAG FOR OUTPUT QUEUE«, t00=0x00ce, t01=0x00fc}
0x142ce…142d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x012a}
0x142d8…142ee Head {h00=0x0012, h01=0x0050, text=» LDK A2,NPRFLG«, t00=0x00ce, t01=0x0134}
0x142ee…14300 Head {h00=0x000e, h01=0x0050, text=» C1R A2,A2«, t00=0x00ce, t01=0x014a}
0x14300…1432a Head {h00=0x0026, h01=0x0050, text=» ANRS A2,A1 STORE PROCESSING FLAG «, t00=0x00ce, t01=0x015c}
0x1432a…14346 Head {h00=0x0018, h01=0x0050, text=»INT008 EQU * «, t00=0x00ce, t01=0x0186}
0x14346…1435e Head {h00=0x0014, h01=0x0050, text=» ABL EXITDC EXIT«, t00=0x00cf, t01=0x0012}
0x1435e…14368 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x002a}
0x14368…1438a Head {h00=0x001e, h01=0x0050, text=»* NO READ REQUEST PENDING «, t00=0x00cf, t01=0x0034}
0x1438a…143bc Head {h00=0x002e, h01=0x0050, text=»* SET INTERRUPT RECEIVED INDICATION IN DWT«, t00=0x00cf, t01=0x0056}
0x143bc…143c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x0088}
0x143c6…143da Head {h00=0x0010, h01=0x0050, text=»INT010 EQU *«, t00=0x00cf, t01=0x0092}
0x143da…143ee Head {h00=0x0010, h01=0x0050, text=» ORRS A3,A7 «, t00=0x00cf, t01=0x00a6}
0x143ee…143f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x00ba}
0x143f8…14426 Head {h00=0x002a, h01=0x0050, text=»* REQUEUE BUFFER,BLOCK QUEUE AND EXIT «, t00=0x00cf, t01=0x00c4}
0x14426…14430 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x00f2}
0x14430…14444 Head {h00=0x0010, h01=0x0050, text=» ABL RHI150 «, t00=0x00cf, t01=0x00fc}
0x14444…14452 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cf, t01=0x0110}
0x14452…1445c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x011e}
0x1445c…14466 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x0128}
0x14466…1448e Head {h00=0x0024, h01=0x0050, text=»* INTERRUPT CONFIRMATION PACKET «, t00=0x00cf, t01=0x0132}
0x1448e…14498 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x015a}
0x14498…144e6 Head {h00=0x004a, h01=0x0050, text=»********************************************************************* «, t00=0x00cf, t01=0x0164}
0x144e6…144f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x0022}
0x144f0…1450c Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00d0, t01=0x002c}
0x1450c…14536 Head {h00=0x0026, h01=0x0050, text=»* A5 = REQUEST PENDING INDICATOR«, t00=0x00d0, t01=0x0048}
0x14536…1456c Head {h00=0x0032, h01=0x0050, text=»* <0: NO REQUEST PENDING«, t00=0x00d0, t01=0x0072}
0x1456c…145a4 Head {h00=0x0034, h01=0x0050, text=»* =0: READ REQUEST PENDING«, t00=0x00d0, t01=0x00a8}
0x145a4…145de Head {h00=0x0036, h01=0x0050, text=»* >0: OTHER REQUEST PENDING «, t00=0x00d0, t01=0x00e0}
0x145de…1460a Head {h00=0x0028, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00d0, t01=0x011a}
0x1460a…1462a Head {h00=0x001c, h01=0x0050, text=»* A8 = BUFFER ADDRESS «, t00=0x00d0, t01=0x0146}
0x1462a…1464c Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x00d0, t01=0x0166}
0x1464c…14656 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x0188}
0x14656…1466a (209, 0, 398) Head {h00=0x0010, h01=0x0050, text=»INTCON EQU *«, t00=0x00d1, t01=0x0004}
0x1466a…14674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0018}
0x14674…1469a Head {h00=0x0022, h01=0x0050, text=»* TEST IF ANY REQUEST PENDING «, t00=0x00d1, t01=0x0022}
0x1469a…146a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0048}
0x146a4…146c4 Head {h00=0x001c, h01=0x0050, text=» LDR A5,A5 «, t00=0x00d1, t01=0x0052}
0x146c4…146da Head {h00=0x0012, h01=0x0050, text=» RF(N) INC020 «, t00=0x00d1, t01=0x0072}
0x146da…146e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0088}
0x146e4…14716 Head {h00=0x002e, h01=0x0050, text=»* TEST IF WRITE INTERRUPT REQUEST PENDING «, t00=0x00d1, t01=0x0092}
0x14716…14720 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x00c4}
0x14720…14744 Head {h00=0x0020, h01=0x0050, text=» SUK A5,WRIINT «, t00=0x00d1, t01=0x00ce}
0x14744…1476c Head {h00=0x0024, h01=0x0050, text=» RF(NZ) INC020 NO; IGNORE PACKET«, t00=0x00d1, t01=0x00f2}
0x1476c…14776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x011a}
0x14776…147b2 Head {h00=0x0038, h01=0x0050, text=»* INTERRUPT REQUEST PENDING; COMPLETE REQUEST«, t00=0x00d1, t01=0x0124}
0x147b2…147da Head {h00=0x0024, h01=0x0050, text=»* RELEASE BUFFER AND EXIT«, t00=0x00d1, t01=0x0160}
0x147da…147e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0188}
0x147e4…147f8 (210, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ABL RHI120 «, t00=0x00d2, t01=0x0004}
0x147f8…14802 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x0018}
0x14802…14824 Head {h00=0x001e, h01=0x0050, text=»* RELEASE BUFFER AND EXIT «, t00=0x00d2, t01=0x0022}
0x14824…1482e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x0044}
0x1482e…14842 Head {h00=0x0010, h01=0x0050, text=»INC020 EQU *«, t00=0x00d2, t01=0x004e}
0x14842…14856 Head {h00=0x0010, h01=0x0050, text=» ABL RHI140 «, t00=0x00d2, t01=0x0062}
0x14856…14864 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d2, t01=0x0076}
0x14864…1486e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x0084}
0x1486e…14878 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x008e}
0x14878…14898 Head {h00=0x001c, h01=0x0050, text=»* COMPLETE USER REQUEST «, t00=0x00d2, t01=0x0098}
0x14898…148a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x00b8}
0x148a2…148ee Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00d2, t01=0x00c2}
0x148ee…148f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x010e}
0x148f8…14914 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00d2, t01=0x0118}
0x14914…14930 Head {h00=0x0018, h01=0x0050, text=»* A3 = RETURN CODE«, t00=0x00d2, t01=0x0134}
0x14930…1494c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x00d2, t01=0x0150}
0x1494c…1496e Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x00d2, t01=0x016c}
0x1496e…14978 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x018e}
0x14978…14994 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00d3, t01=0x0008}
0x14994…149ac Head {h00=0x0014, h01=0x0050, text=»* CF A14,CMPREQ«, t00=0x00d3, t01=0x0024}
0x149ac…149b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x003c}
0x149b6…149d2 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00d3, t01=0x0046}
0x149d2…149f6 Head {h00=0x0020, h01=0x0050, text=»* NO REGISTERS ARE CHANGED «, t00=0x00d3, t01=0x0062}
0x149f6…14a00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0086}
0x14a00…14a14 Head {h00=0x0010, h01=0x0050, text=»CMPREQ EQU *«, t00=0x00d3, t01=0x0090}
0x14a14…14a2a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00d3, t01=0x00a4}
0x14a2a…14a48 Head {h00=0x001a, h01=0x0050, text=» ST A1,CMPSAV SAVE A1 «, t00=0x00d3, t01=0x00ba}
0x14a48…14a68 Head {h00=0x001c, h01=0x0050, text=» ST A2,CMPSAV+2 SAVE A2 «, t00=0x00d3, t01=0x00d8}
0x14a68…14a74 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d3, t01=0x00f8}
0x14a74…14a8a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x00d3, t01=0x0104}
0x14a8a…14aae Head {h00=0x0020, h01=0x0050, text=» MS 2,CMPSAV SAVE A1 AND A2 «, t00=0x00d3, t01=0x011a}
0x14aae…14aba Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d3, t01=0x013e}
0x14aba…14ac4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x014a}
0x14ac4…14ae6 Head {h00=0x001e, h01=0x0050, text=»* TEST IF REQUEST PENDING «, t00=0x00d3, t01=0x0154}
0x14ae6…14af0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0176}
0x14af0…14b16 Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x00d3, t01=0x0180}
0x14b16…14b44 Head {h00=0x002a, h01=0x0050, text=» RF(N) CMP020 NO!«, t00=0x00d4, t01=0x0016}
0x14b44…14b4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0044}
0x14b4e…14b5c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d4, t01=0x004e}
0x14b5c…14b66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x005c}
0x14b66…14b90 Head {h00=0x0026, h01=0x0050, text=»* TEST IF REQUEST TIMER IS RUNNING«, t00=0x00d4, t01=0x0066}
0x14b90…14b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0090}
0x14b9a…14bb2 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTRTP,A6«, t00=0x00d4, t01=0x009a}
0x14bb2…14bd8 Head {h00=0x0022, h01=0x0050, text=» RF(Z) CMP010 NO TIMER RUNNING«, t00=0x00d4, t01=0x00b2}
0x14bd8…14be2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x00d8}
0x14be2…14c00 Head {h00=0x001a, h01=0x0050, text=»* CANCEL RUNNING TIMER«, t00=0x00d4, t01=0x00e2}
0x14c00…14c0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0100}
0x14c0a…14c20 Head {h00=0x0012, h01=0x0050, text=» CF A14,CANTIM«, t00=0x00d4, t01=0x010a}
0x14c20…14c54 Head {h00=0x0030, h01=0x0050, text=» CM DWTRTP,A6 CLEAR RUNNING TIMER INDICATION«, t00=0x00d4, t01=0x0120}
0x14c54…14c68 Head {h00=0x0010, h01=0x0050, text=»CMP010 EQU *«, t00=0x00d4, t01=0x0154}
0x14c68…14c72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0168}
0x14c72…14c98 Head {h00=0x0022, h01=0x0050, text=»* PREPARE INTERFACE FOR TENDIO«, t00=0x00d4, t01=0x0172}
0x14c98…14ca2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0008}
0x14ca2…14cc6 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A3 A1:= RETURN CODE «, t00=0x00d5, t01=0x0012}
0x14cc6…14cd8 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x00d5, t01=0x0036}
0x14cd8…14d00 Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO COMPLETE REQUEST «, t00=0x00d5, t01=0x0048}
0x14d00…14d0c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00d5, t01=0x0070}
0x14d0c…14d28 Head {h00=0x0018, h01=0x0050, text=»CMP020 EQU * «, t00=0x00d5, t01=0x007c}
0x14d28…14d3e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00d5, t01=0x0098}
0x14d3e…14d5e Head {h00=0x001c, h01=0x0050, text=» LD A1,CMPSAV RELOAD A1 «, t00=0x00d5, t01=0x00ae}
0x14d5e…14d80 Head {h00=0x001e, h01=0x0050, text=» LD A2,CMPSAV+2 RELOAD A2 «, t00=0x00d5, t01=0x00ce}
0x14d80…14d8c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d5, t01=0x00f0}
0x14d8c…14da2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x00d5, t01=0x00fc}
0x14da2…14dc8 Head {h00=0x0022, h01=0x0050, text=» ML 2,CMPSAV RELOAD A1 AND A2 «, t00=0x00d5, t01=0x0112}
0x14dc8…14dd4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d5, t01=0x0138}
0x14dd4…14df6 Head {h00=0x001e, h01=0x0050, text=» RTN A14 RETURN TO CALLER «, t00=0x00d5, t01=0x0144}
0x14df6…14e00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0166}
0x14e00…14e1e Head {h00=0x001a, h01=0x0050, text=»* SAVE AREA FOR A1,A2 «, t00=0x00d5, t01=0x0170}
0x14e1e…14e28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x018e}
0x14e28…14e3c Head {h00=0x0010, h01=0x0050, text=»CMPSAV EQU *«, t00=0x00d6, t01=0x0008}
0x14e3c…14e4e Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x00d6, t01=0x001c}
0x14e4e…14e5c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d6, t01=0x002e}
0x14e5c…14e66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x003c}
0x14e66…14e70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0046}
0x14e70…14ea4 Head {h00=0x0030, h01=0x0050, text=»* COPY INFORMATION FROM SYSTEM TO USER AREA «, t00=0x00d6, t01=0x0050}
0x14ea4…14eae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0084}
0x14eae…14efa Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00d6, t01=0x008e}
0x14efa…14f04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x00da}
0x14f04…14f20 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00d6, t01=0x00e4}
0x14f20…14f46 Head {h00=0x0022, h01=0x0050, text=»* A1 = SYSTEM BUFFER ADDRESS«, t00=0x00d6, t01=0x0100}
0x14f46…14f68 Head {h00=0x001e, h01=0x0050, text=»* A4 = LENGTH OF BUFFER «, t00=0x00d6, t01=0x0126}
0x14f68…14f84 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x00d6, t01=0x0148}
0x14f84…14fa6 Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x00d6, t01=0x0164}
0x14fa6…14fb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0186}
0x14fb0…14fcc Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00d6, t01=0x0190}
0x14fcc…14fe4 Head {h00=0x0014, h01=0x0050, text=»* CF A14,COPTUB«, t00=0x00d7, t01=0x001c}
0x14fe4…14fee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x0034}
0x14fee…1500a Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00d7, t01=0x003e}
0x1500a…1501a Head {h00=0x000c, h01=0x0050, text=»* NONE «, t00=0x00d7, t01=0x005a}
0x1501a…15024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x006a}
0x15024…15038 Head {h00=0x0010, h01=0x0050, text=»COPTUB EQU *«, t00=0x00d7, t01=0x0074}
0x15038…15054 Head {h00=0x0018, h01=0x0050, text=» STR A3,A14 SAVE A3 «, t00=0x00d7, t01=0x0088}
0x15054…1507c Head {h00=0x0024, h01=0x0050, text=» LD A3,DWTECB,A6 GET ECB ADDRESS«, t00=0x00d7, t01=0x00a4}
0x1507c…150ac Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBBA,A3 GET USER BUFFER ADDRESS «, t00=0x00d7, t01=0x00cc}
0x150ac…150d8 Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBEL,A3 SET EFFECTIVE LENGTH«, t00=0x00d7, t01=0x00fc}
0x150d8…150f8 Head {h00=0x001c, h01=0x0050, text=» LDR A3,A4 BUFFER LENGTH«, t00=0x00d7, t01=0x0128}
0x150f8…15122 Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTTAB,A6 GET TTAB ADDRESS «, t00=0x00d7, t01=0x0148}
0x15122…15134 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x00d7, t01=0x0172}
0x15134…15168 Head {h00=0x0030, h01=0x0050, text=» CF A15,MOVSU MOVE DATA FROM SYSTEM TO USER «, t00=0x00d7, t01=0x0184}
0x15168…1517a Head {h00=0x000e, h01=0x0050, text=» ENB . =1«, t00=0x00d8, t01=0x0028}
0x1517a…1519a Head {h00=0x001c, h01=0x0050, text=» LDR* A3,A14 RESTORE A3 «, t00=0x00d8, t01=0x003a}
0x1519a…151aa Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x00d8, t01=0x005a}
0x151aa…151b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x006a}
0x151b4…151c2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d8, t01=0x0074}
0x151c2…151cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0082}
0x151cc…151d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x008c}
0x151d6…15204 Head {h00=0x002a, h01=0x0050, text=»* SAVE REGISTERS A1-A8 IN DC SAVE AREA«, t00=0x00d8, t01=0x0096}
0x15204…1520e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x00c4}
0x1520e…1525a Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x00d8, t01=0x00ce}
0x1525a…15264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x011a}
0x15264…15280 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00d8, t01=0x0124}
0x15280…15298 Head {h00=0x0014, h01=0x0050, text=»* CF A14,SAVE8 «, t00=0x00d8, t01=0x0140}
0x15298…152a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0158}
0x152a2…152be Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00d8, t01=0x0162}
0x152be…152e2 Head {h00=0x0020, h01=0x0050, text=»* NO REGISTERS ARE CHANGED «, t00=0x00d8, t01=0x017e}
0x152e2…152ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0012}
0x152ec…15300 Head {h00=0x0010, h01=0x0050, text=»SAVE8 EQU * «, t00=0x00d9, t01=0x001c}
0x15300…15316 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00d9, t01=0x0030}
0x15316…1532a Head {h00=0x0010, h01=0x0050, text=» ST A1,SAVE «, t00=0x00d9, t01=0x0046}
0x1532a…15340 Head {h00=0x0012, h01=0x0050, text=» ST A2,SAVE+2 «, t00=0x00d9, t01=0x005a}
0x15340…15356 Head {h00=0x0012, h01=0x0050, text=» ST A3,SAVE+4 «, t00=0x00d9, t01=0x0070}
0x15356…1536c Head {h00=0x0012, h01=0x0050, text=» ST A4,SAVE+6 «, t00=0x00d9, t01=0x0086}
0x1536c…15382 Head {h00=0x0012, h01=0x0050, text=» ST A5,SAVE+8 «, t00=0x00d9, t01=0x009c}
0x15382…15398 Head {h00=0x0012, h01=0x0050, text=» ST A6,SAVE+10«, t00=0x00d9, t01=0x00b2}
0x15398…153ae Head {h00=0x0012, h01=0x0050, text=» ST A7,SAVE+12«, t00=0x00d9, t01=0x00c8}
0x153ae…153c4 Head {h00=0x0012, h01=0x0050, text=» ST A8,SAVE+14«, t00=0x00d9, t01=0x00de}
0x153c4…153d0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d9, t01=0x00f4}
0x153d0…153e6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x00d9, t01=0x0100}
0x153e6…153f8 Head {h00=0x000e, h01=0x0050, text=» MS 8,SAVE«, t00=0x00d9, t01=0x0116}
0x153f8…15404 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d9, t01=0x0128}
0x15404…15414 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x00d9, t01=0x0134}
0x15414…15422 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d9, t01=0x0144}
0x15422…1542c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0152}
0x1542c…15436 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x015c}
0x15436…15468 Head {h00=0x002e, h01=0x0050, text=»* RELOAD REGISTERS A1-A8 FROM DC SAVE AREA«, t00=0x00d9, t01=0x0166}
0x15468…15472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x0008}
0x15472…154be Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x00da, t01=0x0012}
0x154be…154c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x005e}
0x154c8…154e4 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00da, t01=0x0068}
0x154e4…154fc Head {h00=0x0014, h01=0x0050, text=»* CF A14,RELOA8«, t00=0x00da, t01=0x0084}
0x154fc…15506 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x009c}
0x15506…15522 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00da, t01=0x00a6}
0x15522…1554a Head {h00=0x0024, h01=0x0050, text=»* REGISTERS A1-A8 ARE RELOADED «, t00=0x00da, t01=0x00c2}
0x1554a…15554 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x00ea}
0x15554…15568 Head {h00=0x0010, h01=0x0050, text=»RELOA8 EQU *«, t00=0x00da, t01=0x00f4}
0x15568…1557e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00da, t01=0x0108}
0x1557e…15592 Head {h00=0x0010, h01=0x0050, text=» LD A1,SAVE «, t00=0x00da, t01=0x011e}
0x15592…155a8 Head {h00=0x0012, h01=0x0050, text=» LD A2,SAVE+2 «, t00=0x00da, t01=0x0132}
0x155a8…155be Head {h00=0x0012, h01=0x0050, text=» LD A3,SAVE+4 «, t00=0x00da, t01=0x0148}
0x155be…155d4 Head {h00=0x0012, h01=0x0050, text=» LD A4,SAVE+6 «, t00=0x00da, t01=0x015e}
0x155d4…155ea Head {h00=0x0012, h01=0x0050, text=» LD A5,SAVE+8 «, t00=0x00da, t01=0x0174}
0x155ea…15600 Head {h00=0x0012, h01=0x0050, text=» LD A6,SAVE+10«, t00=0x00da, t01=0x018a}
0x15600…15616 Head {h00=0x0012, h01=0x0050, text=» LD A7,SAVE+12«, t00=0x00db, t01=0x0010}
0x15616…1562c Head {h00=0x0012, h01=0x0050, text=» LD A8,SAVE+14«, t00=0x00db, t01=0x0026}
0x1562c…15638 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00db, t01=0x003c}
0x15638…1564e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x00db, t01=0x0048}
0x1564e…15660 Head {h00=0x000e, h01=0x0050, text=» ML 8,SAVE«, t00=0x00db, t01=0x005e}
0x15660…1566c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00db, t01=0x0070}
0x1566c…1568e Head {h00=0x001e, h01=0x0050, text=» RTN A14 RETURN TO CALLER «, t00=0x00db, t01=0x007c}
0x1568e…1569c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00db, t01=0x009e}
0x1569c…156a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00db, t01=0x00ac}
0x156a6…156b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00db, t01=0x00b6}
0x156b0…156f0 Head {h00=0x003c, h01=0x0050, text=»* THIS MODULE SELECTS FROM THE DWT THE TRANSPORT HANDLER«, t00=0x00db, t01=0x00c0}
0x156f0…1571c Head {h00=0x0028, h01=0x0050, text=»* FUNCTION WHICH HAS TO BE EXECUTED.«, t00=0x00db, t01=0x0100}
0x1571c…15726 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00db, t01=0x012c}
0x15726…1575a Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x00db, t01=0x0136}
0x1575a…15764 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00db, t01=0x016a}
0x15764…15780 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00db, t01=0x0174}
0x15780…157bc Head {h00=0x0038, h01=0x0050, text=»* A6 = DWT-ADDRESS (NOT FOR START & STOP REQUEST) «, t00=0x00db, t01=0x0190}
0x157bc…157e0 Head {h00=0x0020, h01=0x0050, text=»* A12 = LINE BLOCK ADDRESS «, t00=0x00dc, t01=0x003c}
0x157e0…1580c Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x00dc, t01=0x0060}
0x1580c…15816 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x008c}
0x15816…15832 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00dc, t01=0x0096}
0x15832…1584e Head {h00=0x0018, h01=0x0050, text=»* CF A14,TRANSH «, t00=0x00dc, t01=0x00b2}
0x1584e…15858 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x00ce}
0x15858…15874 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00dc, t01=0x00d8}
0x15874…15890 Head {h00=0x0018, h01=0x0050, text=»* A4 = RETURN CODE«, t00=0x00dc, t01=0x00f4}
0x15890…158b0 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x00dc, t01=0x0110}
0x158b0…158da Head {h00=0x0026, h01=0x0050, text=»* NO OTHER REGISTERS ARE CHANGED «, t00=0x00dc, t01=0x0130}
0x158da…158e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x015a}
0x158e4…158f8 Head {h00=0x0010, h01=0x0050, text=»TRANSH EQU *«, t00=0x00dc, t01=0x0164}
0x158f8…15936 Head {h00=0x003a, h01=0x0050, text=» CF A14,SAVE8 SAVE REGISTERS«, t00=0x00dc, t01=0x0178}
0x15936…15960 Head {h00=0x0026, h01=0x0050, text=» LC A1,DWTFNC,A6 GET FUNCTION CODE«, t00=0x00dd, t01=0x0026}
0x15960…15976 Head {h00=0x0012, h01=0x0050, text=» ANK A1,/FF . «, t00=0x00dd, t01=0x0050}
0x15976…159a2 Head {h00=0x0028, h01=0x0050, text=» LC A4,DWTLCN,A6 GET LC-ADM ADDRESS «, t00=0x00dd, t01=0x0066}
0x159a2…159b8 Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x00dd, t01=0x0092}
0x159b8…159cc Head {h00=0x0010, h01=0x0050, text=» SLL A4,1 . «, t00=0x00dd, t01=0x00a8}
0x159cc…159e8 Head {h00=0x0018, h01=0x0050, text=» AD A4,LC:TAB,A12 . «, t00=0x00dd, t01=0x00bc}
0x159e8…159fe Head {h00=0x0012, h01=0x0050, text=» LDR* A13,A4 .«, t00=0x00dd, t01=0x00d8}
0x159fe…15a4e Head {h00=0x004c, h01=0x0050, text=» ABI TABTH,A1 BRANCH TO THE CONCERNING ROUTINE«, t00=0x00dd, t01=0x00ee}
0x15a4e…15a58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x013e}
0x15a58…15a66 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00dd, t01=0x0148}
0x15a66…15a70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x0156}
0x15a70…15a8e Head {h00=0x001a, h01=0x0050, text=»* GENERAL RETURN PART «, t00=0x00dd, t01=0x0160}
0x15a8e…15a98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x017e}
0x15a98…15aac Head {h00=0x0010, h01=0x0050, text=»READY EQU * «, t00=0x00dd, t01=0x0188}
0x15aac…15aec Head {h00=0x003c, h01=0x0050, text=» ST A4,SAVE+6 SAVE RETURN CODE«, t00=0x00de, t01=0x000c}
0x15aec…15b10 Head {h00=0x0020, h01=0x0050, text=» CF A14,RELOA8«, t00=0x00de, t01=0x004c}
0x15b10…15b3c Head {h00=0x0028, h01=0x0050, text=» RTN A14 BACK TO THE REQUEST HANDLER«, t00=0x00de, t01=0x0070}
0x15b3c…15b46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x009c}
0x15b46…15b7c Head {h00=0x0032, h01=0x0050, text=»* BRANCH TABLE FOR TRANSPORT HANDLER FUNCTIONS«, t00=0x00de, t01=0x00a6}
0x15b7c…15b86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x00dc}
0x15b86…15b9a Head {h00=0x0010, h01=0x0050, text=»TABTH EQU * «, t00=0x00de, t01=0x00e6}
0x15b9a…15bba Head {h00=0x001c, h01=0x0050, text=» DATA START OPEN REQUEST«, t00=0x00de, t01=0x00fa}
0x15bba…15bdc Head {h00=0x001e, h01=0x0050, text=» DATA STPINT CLOSE REQUEST«, t00=0x00de, t01=0x011a}
0x15bdc…15c06 Head {h00=0x0026, h01=0x0050, text=» DATA CALLR CONNECT ACTIVE REQUEST«, t00=0x00de, t01=0x013c}
0x15c06…15c1c Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00de, t01=0x0166}
0x15c1c…15c48 Head {h00=0x0028, h01=0x0050, text=» DATA CALL30 CONNECT PASSIVE REQUEST«, t00=0x00de, t01=0x017c}
0x15c48…15c6e Head {h00=0x0022, h01=0x0050, text=» DATA CLEAR DISCONNECT REQUEST«, t00=0x00df, t01=0x0018}
0x15c6e…15c8e Head {h00=0x001c, h01=0x0050, text=» DATA CALLCR ACCEPT CALL«, t00=0x00df, t01=0x003e}
0x15c8e…15c9a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x005e}
0x15c9a…15cb0 Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x00df, t01=0x006a}
0x15cb0…15cda Head {h00=0x0026, h01=0x0050, text=» DATA HLT CONNECT PASSIVE REQUEST «, t00=0x00df, t01=0x0080}
0x15cda…15d00 Head {h00=0x0022, h01=0x0050, text=» DATA CLEAR DISCONNECT REQUEST«, t00=0x00df, t01=0x00aa}
0x15d00…15d1e Head {h00=0x001a, h01=0x0050, text=» DATA HLT ACCEPT CALL «, t00=0x00df, t01=0x00d0}
0x15d1e…15d2a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00df, t01=0x00ee}
0x15d2a…15d4e Head {h00=0x0020, h01=0x0050, text=» DATA RRR ACCEPT DATA(READ) «, t00=0x00df, t01=0x00fa}
0x15d4e…15d74 Head {h00=0x0022, h01=0x0050, text=» DATA RNRR REFUSE DATA REQUEST«, t00=0x00df, t01=0x011e}
0x15d74…15d94 Head {h00=0x001c, h01=0x0050, text=» DATA DATA WRITE REQUEST«, t00=0x00df, t01=0x0144}
0x15d94…15dbe Head {h00=0x0026, h01=0x0050, text=» DATA INTR WRITE INTERRUPT REQUEST«, t00=0x00df, t01=0x0164}
0x15dbe…15dc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x018e}
0x15dc8…15ddc Head {h00=0x0010, h01=0x0050, text=»STPINT EQU *«, t00=0x00e0, t01=0x0008}
0x15ddc…15df0 Head {h00=0x0010, h01=0x0050, text=» CF A14,STOP«, t00=0x00e0, t01=0x001c}
0x15df0…15e02 Head {h00=0x000e, h01=0x0050, text=» RB READY «, t00=0x00e0, t01=0x0030}
0x15e02…15e0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0042}
0x15e0c…15e1a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e0, t01=0x004c}
0x15e1a…15e24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x005a}
0x15e24…15e2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0064}
0x15e2e…15e5e Head {h00=0x002c, h01=0x0050, text=»* PROCESSING OF THE OPEN SYSTEM REQUEST «, t00=0x00e0, t01=0x006e}
0x15e5e…15e68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x009e}
0x15e68…15e9c Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x00e0, t01=0x00a8}
0x15e9c…15ea6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x00dc}
0x15ea6…15ec2 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00e0, t01=0x00e6}
0x15ec2…15ee6 Head {h00=0x0020, h01=0x0050, text=»* A12 = LINE BLOCK ADDRESS «, t00=0x00e0, t01=0x0102}
0x15ee6…15f12 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x00e0, t01=0x0126}
0x15f12…15f1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0152}
0x15f1c…15f38 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00e0, t01=0x015c}
0x15f38…15f50 Head {h00=0x0014, h01=0x0050, text=»* ABL START «, t00=0x00e0, t01=0x0178}
0x15f50…15f80 Head {h00=0x002c, h01=0x0050, text=»* A RETURN IS MADE TO THE LABEL "READY"«, t00=0x00e0, t01=0x0190}
0x15f80…15f8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0030}
0x15f8a…15fa6 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00e1, t01=0x003a}
0x15fa6…15fc2 Head {h00=0x0018, h01=0x0050, text=»* A4 = RETURN CODE«, t00=0x00e1, t01=0x0056}
0x15fc2…15fcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0072}
0x15fcc…15fe0 Head {h00=0x0010, h01=0x0050, text=»START EQU * «, t00=0x00e1, t01=0x007c}
0x15fe0…1600a Head {h00=0x0026, h01=0x0050, text=» LDK A4,HRDERR PRESET RETURN CODE «, t00=0x00e1, t01=0x0090}
0x1600a…16034 Head {h00=0x0026, h01=0x0050, text=» LDK A1,CLOFLG CLOSE STILL BUSY ? «, t00=0x00e1, t01=0x00ba}
0x16034…16050 Head {h00=0x0018, h01=0x0050, text=» AN A1,CMNFLG,A12 . «, t00=0x00e1, t01=0x00e4}
0x16050…1606a Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) READY YES«, t00=0x00e1, t01=0x0100}
0x1606a…1607c Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x00e1, t01=0x011a}
0x1607c…16086 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x012c}
0x16086…160a6 Head {h00=0x001c, h01=0x0050, text=»* INITIATE LC-ADM TABLES«, t00=0x00e1, t01=0x0136}
0x160a6…160b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0156}
0x160b0…160e2 Head {h00=0x002e, h01=0x0050, text=» LC A4,NRLC,A12 GET # OF LOGICAL CHANNELS «, t00=0x00e1, t01=0x0160}
0x160e2…160f8 (226, 0, 400) Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x00e2, t01=0x0004}
0x160f8…1610c Head {h00=0x0010, h01=0x0050, text=» SUK A4,1 . «, t00=0x00e2, t01=0x001a}
0x1610c…16122 Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x00e2, t01=0x002e}
0x16122…1614a Head {h00=0x0024, h01=0x0050, text=» LC A7,NRPVC,A12 GET # OF PVC'S «, t00=0x00e2, t01=0x0044}
0x1614a…16160 Head {h00=0x0012, h01=0x0050, text=» ANK A7,/FF . «, t00=0x00e2, t01=0x006c}
0x16160…16174 Head {h00=0x0010, h01=0x0050, text=» SUK A7,1 . «, t00=0x00e2, t01=0x0082}
0x16174…16180 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e2, t01=0x0096}
0x16180…1618a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00a2}
0x1618a…16198 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e2, t01=0x00ac}
0x16198…161ac Head {h00=0x0010, h01=0x0050, text=»STRT00 EQU *«, t00=0x00e2, t01=0x00ba}
0x161ac…161d6 Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x00e2, t01=0x00ce}
0x161d6…16206 Head {h00=0x002c, h01=0x0050, text=» SC A4,LCNUM,A13 LOGICAL CHANNEL NUMBER «, t00=0x00e2, t01=0x00f8}
0x16206…16236 Head {h00=0x002c, h01=0x0050, text=» ST A2,LCSTAT,A13 STATUS AND SUB-STATUS «, t00=0x00e2, t01=0x0128}
0x16236…16260 Head {h00=0x0026, h01=0x0050, text=» ST A2,FLAGS,A13 BOOLEAN VARIABLES«, t00=0x00e2, t01=0x0158}
0x16260…16280 Head {h00=0x001c, h01=0x0050, text=» SC A2,VCTYP,A13 VC-TYPE«, t00=0x00e2, t01=0x0182}
0x16280…162ac Head {h00=0x0028, h01=0x0050, text=» SC A2,NRNUBF,A13 FREE INPUT BUFFERS«, t00=0x00e3, t01=0x0012}
0x162ac…162d8 Head {h00=0x0028, h01=0x0050, text=» ST A2,LCDWT,A13 LC TO DWT RELATION «, t00=0x00e3, t01=0x003e}
0x162d8…16300 Head {h00=0x0024, h01=0x0050, text=» ST A2,QUEINP,A13 RH-INPUT QUEUE«, t00=0x00e3, t01=0x006a}
0x16300…1632a Head {h00=0x0026, h01=0x0050, text=» ST A2,QUEOUT,A13 TH-OUTPUT QUEUE «, t00=0x00e3, t01=0x0092}
0x1632a…16358 Head {h00=0x002a, h01=0x0050, text=» ST A2,TIMADR,A13 TIMER BLOCK ADDRESS «, t00=0x00e3, t01=0x00bc}
0x16358…16384 Head {h00=0x0028, h01=0x0050, text=» ST A2,SYSBUF,A13 FREE SYSTEM BUFFER«, t00=0x00e3, t01=0x00ea}
0x16384…1639a Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/1000«, t00=0x00e3, t01=0x0116}
0x1639a…163ce Head {h00=0x0030, h01=0x0050, text=» ORR A1,A4 GENERAL FORMAT + LOG. CHANNEL NR.«, t00=0x00e3, t01=0x012c}
0x163ce…163f0 Head {h00=0x001e, h01=0x0050, text=» ST A1,SYSBUF+LCIDNT-1,A13«, t00=0x00e3, t01=0x0160}
0x163f0…16406 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00e3, t01=0x0182}
0x16406…1641c Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x00e4, t01=0x0008}
0x1641c…1643e Head {h00=0x001e, h01=0x0050, text=» CWR A7,A4 IS THIS A PVC ?«, t00=0x00e4, t01=0x001e}
0x1643e…16458 Head {h00=0x0016, h01=0x0050, text=» RF(NE) STRT02 NO «, t00=0x00e4, t01=0x0040}
0x16458…16464 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e4, t01=0x005a}
0x16464…1647a Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x00e4, t01=0x0066}
0x1647a…1649c Head {h00=0x001e, h01=0x0050, text=» LDKL A8,PVC SET PVC TYPE «, t00=0x00e4, t01=0x007c}
0x1649c…164b6 Head {h00=0x0016, h01=0x0050, text=» SC A8,VCTYP,A13 .«, t00=0x00e4, t01=0x009e}
0x164b6…164e6 Head {h00=0x002c, h01=0x0050, text=» LDKL A8,DATA.ST SET DATA TRANSFER STATE«, t00=0x00e4, t01=0x00b8}
0x164e6…16502 Head {h00=0x0018, h01=0x0050, text=» SC A8,LCSTAT,A13 . «, t00=0x00e4, t01=0x00e8}
0x16502…1652c Head {h00=0x0026, h01=0x0050, text=» LD A1,WNDSIZ,A12 SET WINDOW SIZES«, t00=0x00e4, t01=0x0104}
0x1652c…16548 Head {h00=0x0018, h01=0x0050, text=» SC A1,LCREWN,A13 . «, t00=0x00e4, t01=0x012e}
0x16548…16564 Head {h00=0x0018, h01=0x0050, text=» SC A1,LCTRWN,A13 . «, t00=0x00e4, t01=0x014a}
0x16564…16590 Head {h00=0x0028, h01=0x0050, text=» LD A1,PACKLN,A12 SET PACKET LENGTH «, t00=0x00e4, t01=0x0166}
0x16590…165ac (229, 0, 400) Head {h00=0x0018, h01=0x0050, text=» ST A1,TRBFSZ,A13 . «, t00=0x00e5, t01=0x0004}
0x165ac…165c8 Head {h00=0x0018, h01=0x0050, text=» ST A1,REBFSZ,A13 . «, t00=0x00e5, t01=0x0020}
0x165c8…165fc Head {h00=0x0030, h01=0x0050, text=» CF A14,TRTHR TRANSLATE THRESHOLD PERCENTAGE«, t00=0x00e5, t01=0x003c}
0x165fc…16626 Head {h00=0x0026, h01=0x0050, text=» CF A14,CLLCAD CLEAR LC-ADM FIELDS«, t00=0x00e5, t01=0x0070}
0x16626…1663a Head {h00=0x0010, h01=0x0050, text=» SUK A7,1 . «, t00=0x00e5, t01=0x009a}
0x1663a…1664e Head {h00=0x0010, h01=0x0050, text=»STRT02 EQU *«, t00=0x00e5, t01=0x00ae}
0x1664e…1665a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e5, t01=0x00c2}
0x1665a…1667a Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 NEXT LC-ADM ? «, t00=0x00e5, t01=0x00ce}
0x1667a…16694 Head {h00=0x0016, h01=0x0050, text=» RB(NN) STRT00 YES«, t00=0x00e5, t01=0x00ee}
0x16694…1669e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0108}
0x1669e…166ac Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e5, t01=0x0112}
0x166ac…166b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0120}
0x166b6…166d4 Head {h00=0x001a, h01=0x0050, text=»* INITIATE LINE BLOCK «, t00=0x00e5, t01=0x012a}
0x166d4…166de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0148}
0x166de…16702 Head {h00=0x0020, h01=0x0050, text=» LD A1,FILCOD,A12 FILE CODE «, t00=0x00e5, t01=0x0152}
0x16702…16726 Head {h00=0x0020, h01=0x0050, text=» LDR A8,A12 LINE ECB-ADDRESS«, t00=0x00e5, t01=0x0176}
0x16726…16740 Head {h00=0x0016, h01=0x0050, text=» ADKL A8,LOCECB . «, t00=0x00e6, t01=0x000a}
0x16740…16762 Head {h00=0x001e, h01=0x0050, text=» STR A1,A8 SAVE FILE CODE «, t00=0x00e6, t01=0x0024}
0x16762…1679a Head {h00=0x0034, h01=0x0050, text=» CM NRPNDT,A12 NUMBER OF PENDING OUTPUT REQUESTS«, t00=0x00e6, t01=0x0046}
0x1679a…167c0 Head {h00=0x0022, h01=0x0050, text=» CM HRDSTA,A12 HARDWARE STATUS«, t00=0x00e6, t01=0x007e}
0x167c0…167ec Head {h00=0x0028, h01=0x0050, text=» CM RTMADR,A12 RESTART TIMER ADDRESS«, t00=0x00e6, t01=0x00a4}
0x167ec…1681e Head {h00=0x002e, h01=0x0050, text=» CM RSTQUE,A12 CLEAR RESTART QUEUE ANCHOR «, t00=0x00e6, t01=0x00d0}
0x1681e…16828 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x0102}
0x16828…16848 Head {h00=0x001c, h01=0x0050, text=»* INITIATE OUTPUT ECB'S «, t00=0x00e6, t01=0x010c}
0x16848…16852 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x012c}
0x16852…1687c Head {h00=0x0026, h01=0x0050, text=» LDK A2,SYNRTR GET NUMBER OF ECB'S«, t00=0x00e6, t01=0x0136}
0x1687c…168a6 Head {h00=0x0026, h01=0x0050, text=» LDR A3,A12 GET FIRST ECB ADDRESS «, t00=0x00e6, t01=0x0160}
0x168a6…168be Head {h00=0x0014, h01=0x0050, text=» ADK A3,ECBOU1 .«, t00=0x00e6, t01=0x018a}
0x168be…168d2 Head {h00=0x0010, h01=0x0050, text=»STRT05 EQU *«, t00=0x00e7, t01=0x0012}
0x168d2…168f8 Head {h00=0x0022, h01=0x0050, text=» ST A1,ECBFC,A3 SAVE FILE CODE«, t00=0x00e7, t01=0x0026}
0x168f8…16922 Head {h00=0x0026, h01=0x0050, text=» CM ECBBA,A3 CLEAR BUFFER ADDRESS «, t00=0x00e7, t01=0x004c}
0x16922…1694c Head {h00=0x0026, h01=0x0050, text=» ADK A3,ECBINL+SYSBFL«, t00=0x00e7, t01=0x0076}
0x1694c…1695e Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x00e7, t01=0x00a0}
0x1695e…1697c Head {h00=0x001a, h01=0x0050, text=» RB(P) STRT05 NEXT ECB«, t00=0x00e7, t01=0x00b2}
0x1697c…16986 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x00d0}
0x16986…169a8 Head {h00=0x001e, h01=0x0050, text=»* PREPARE OPEN REQUEST ECB«, t00=0x00e7, t01=0x00da}
0x169a8…169b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x00fc}
0x169b2…169d2 Head {h00=0x001c, h01=0x0050, text=» LDR A8,A12 ECB-ADDRESS «, t00=0x00e7, t01=0x0106}
0x169d2…169ec Head {h00=0x0016, h01=0x0050, text=» ADKL A8,LOCECB . «, t00=0x00e7, t01=0x0126}
0x169ec…16a12 Head {h00=0x0022, h01=0x0050, text=» LDR A4,A12 ADDRESS USER BLOCK«, t00=0x00e7, t01=0x0140}
0x16a12…16a2a Head {h00=0x0014, h01=0x0050, text=» ADK A4,UBNUM . «, t00=0x00e7, t01=0x0166}
0x16a2a…16a48 Head {h00=0x001a, h01=0x0050, text=» ST A4,ECBBA,A8 TO ECB«, t00=0x00e7, t01=0x017e}
0x16a48…16a76 Head {h00=0x002a, h01=0x0050, text=» LD A5,PACKLN,A12 RECEIVE BUFFER SIZE «, t00=0x00e8, t01=0x000c}
0x16a76…16a8e Head {h00=0x0014, h01=0x0050, text=» ADK A5,BEGDAT .«, t00=0x00e8, t01=0x003a}
0x16a8e…16aa8 Head {h00=0x0016, h01=0x0050, text=» ST A5,ECBRL,A8 . «, t00=0x00e8, t01=0x0052}
0x16aa8…16ab2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x006c}
0x16ab2…16ac0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e8, t01=0x0076}
0x16ac0…16aca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x0084}
0x16aca…16aec Head {h00=0x001e, h01=0x0050, text=»* SET OPEN BUSY INDICATION«, t00=0x00e8, t01=0x008e}
0x16aec…16af6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x00b0}
0x16af6…16b0c Head {h00=0x0012, h01=0x0050, text=» LDK A3,OPEFLG«, t00=0x00e8, t01=0x00ba}
0x16b0c…16b26 Head {h00=0x0016, h01=0x0050, text=» ORS A3,CMNFLG,A12«, t00=0x00e8, t01=0x00d0}
0x16b26…16b30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x00ea}
0x16b30…16b60 Head {h00=0x002c, h01=0x0050, text=»* PREPARE USER BLOCK WITH INPUT BUFFERS «, t00=0x00e8, t01=0x00f4}
0x16b60…16b6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x0124}
0x16b6a…16b98 Head {h00=0x002a, h01=0x0050, text=» LDK A3,SYUBNR NUMBER OF USER BUFFERS «, t00=0x00e8, t01=0x012e}
0x16b98…16bac Head {h00=0x0010, h01=0x0050, text=» STR A3,A4 .«, t00=0x00e8, t01=0x015c}
0x16bac…16bc0 Head {h00=0x0010, h01=0x0050, text=»STRT10 EQU *«, t00=0x00e8, t01=0x0170}
0x16bc0…16be6 Head {h00=0x0022, h01=0x0050, text=» ADK A4,2 UPDATE STORE POINTER«, t00=0x00e8, t01=0x0184}
0x16be6…16c08 Head {h00=0x001e, h01=0x0050, text=» CF A14,GTBUF GET A BUFFER«, t00=0x00e9, t01=0x001a}
0x16c08…16c2e Head {h00=0x0022, h01=0x0050, text=» STR A2,A4 SAVE BUFFER ADDRESS«, t00=0x00e9, t01=0x003c}
0x16c2e…16c56 Head {h00=0x0024, h01=0x0050, text=» SUK A3,1 MORE BUFFERS NEEDED ? «, t00=0x00e9, t01=0x0062}
0x16c56…16c70 Head {h00=0x0016, h01=0x0050, text=» RB(P) STRT10 YES «, t00=0x00e9, t01=0x008a}
0x16c70…16c94 Head {h00=0x0020, h01=0x0050, text=» LDK A7,CONN+/80 ORDER CODE «, t00=0x00e9, t01=0x00a4}
0x16c94…16cbc Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTRTV,A6 GET TIMER VALUE«, t00=0x00e9, t01=0x00c8}
0x16cbc…16cd0 Head {h00=0x0010, h01=0x0050, text=»STRT20 EQU *«, t00=0x00e9, t01=0x00f0}
0x16cd0…16cf6 Head {h00=0x0022, h01=0x0050, text=» LKM ISSUE OPEN LINE REQUEST «, t00=0x00e9, t01=0x0104}
0x16cf6…16d06 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x00e9, t01=0x012a}
0x16d06…16d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x013a}
0x16d10…16d3c Head {h00=0x0028, h01=0x0050, text=»* AFTER COMPLETION,CHECK RETURN CODE«, t00=0x00e9, t01=0x0144}
0x16d3c…16d46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x0170}
0x16d46…16d5e Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBRC,A8 «, t00=0x00e9, t01=0x017a}
0x16d5e…16d7e (234, 0, 400) Head {h00=0x001c, h01=0x0050, text=» RF(Z) STRT40 NO ERRORS «, t00=0x00ea, t01=0x0004}
0x16d7e…16da8 Head {h00=0x0026, h01=0x0050, text=» LDKL A3,HRDWER HARDWARE ERRORS ? «, t00=0x00ea, t01=0x0024}
0x16da8…16dbc Head {h00=0x0010, h01=0x0050, text=» ANR A3,A1 .«, t00=0x00ea, t01=0x004e}
0x16dbc…16dd4 Head {h00=0x0014, h01=0x0050, text=» RF(Z) STRT30 NO«, t00=0x00ea, t01=0x0062}
0x16dd4…16dfa Head {h00=0x0022, h01=0x0050, text=» ST A1,HRDSTA,A12 SAVE STATUS «, t00=0x00ea, t01=0x007a}
0x16dfa…16e1c Head {h00=0x001e, h01=0x0050, text=» LDK A4,HRDERR RETURN CODE«, t00=0x00ea, t01=0x00a0}
0x16e1c…16e2e Head {h00=0x000e, h01=0x0050, text=» RF RETUR2«, t00=0x00ea, t01=0x00c2}
0x16e2e…16e38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00d4}
0x16e38…16e46 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ea, t01=0x00de}
0x16e46…16e50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x00ec}
0x16e50…16e70 Head {h00=0x001c, h01=0x0050, text=»* TEST ON TYPE OF ERROR «, t00=0x00ea, t01=0x00f6}
0x16e70…16e7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x0116}
0x16e7a…16e8e Head {h00=0x0010, h01=0x0050, text=»STRT30 EQU *«, t00=0x00ea, t01=0x0120}
0x16e8e…16eb6 Head {h00=0x0024, h01=0x0050, text=» LDK A4,DISCRM PRESET REURN CODE«, t00=0x00ea, t01=0x0134}
0x16eb6…16ee2 Head {h00=0x0028, h01=0x0050, text=» CWK A1,REMDIS IS IT REMOTE DISC. ? «, t00=0x00ea, t01=0x015c}
0x16ee2…16efc Head {h00=0x0016, h01=0x0050, text=» RF(E) RETUR2 YES «, t00=0x00ea, t01=0x0188}
0x16efc…16f1e Head {h00=0x001e, h01=0x0050, text=» CWK A1,DEFTIM TIME-OUT ? «, t00=0x00eb, t01=0x0012}
0x16f1e…16f38 Head {h00=0x0016, h01=0x0050, text=» ABL(NE) HLT ERROR«, t00=0x00eb, t01=0x0034}
0x16f38…16f56 Head {h00=0x001a, h01=0x0050, text=» LDR A2,A2 TIME OUT ? «, t00=0x00eb, t01=0x004e}
0x16f56…16f6e Head {h00=0x0014, h01=0x0050, text=» RB(Z) STRT20 NO«, t00=0x00eb, t01=0x006c}
0x16f6e…16f98 Head {h00=0x0026, h01=0x0050, text=» LDK A4,TMEOUT PRESET RETURN CODE «, t00=0x00eb, t01=0x0084}
0x16f98…16fb8 Head {h00=0x001c, h01=0x0050, text=» SUKL A2,330 TIME OUT ? «, t00=0x00eb, t01=0x00ae}
0x16fb8…16fe2 Head {h00=0x0026, h01=0x0050, text=» RF(N) RETUR2 YES,COMPLETE REQUEST«, t00=0x00eb, t01=0x00ce}
0x16fe2…17000 Head {h00=0x001a, h01=0x0050, text=» RB STRT20 NO,CONTINUE«, t00=0x00eb, t01=0x00f8}
0x17000…1700a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x0116}
0x1700a…17018 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00eb, t01=0x0120}
0x17018…17022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x012e}
0x17022…1704c Head {h00=0x0026, h01=0x0050, text=»* ISSUE A NUMBER OF INPUT REQUESTS«, t00=0x00eb, t01=0x0138}
0x1704c…17056 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x0162}
0x17056…1706a Head {h00=0x0010, h01=0x0050, text=»STRT40 EQU *«, t00=0x00eb, t01=0x016c}
0x1706a…17098 Head {h00=0x002a, h01=0x0050, text=» LDK A1,STRTFL SET SYSTEM STARTED FLAG«, t00=0x00eb, t01=0x0180}
0x17098…170b4 Head {h00=0x0018, h01=0x0050, text=» ORS A1,CMNFLG,A12 .«, t00=0x00ec, t01=0x001e}
0x170b4…170e4 Head {h00=0x002c, h01=0x0050, text=» LDK A4,SYNRRC NUMBER OF INPUT REQUESTS «, t00=0x00ec, t01=0x003a}
0x170e4…17110 Head {h00=0x0028, h01=0x0050, text=» LDR A8,A12 ADDRESS FIRST INPUT ECB «, t00=0x00ec, t01=0x006a}
0x17110…1712a Head {h00=0x0016, h01=0x0050, text=» ADKL A8,ECBIN1 . «, t00=0x00ec, t01=0x0096}
0x1712a…1713e Head {h00=0x0010, h01=0x0050, text=»STRT50 EQU *«, t00=0x00ec, t01=0x00b0}
0x1713e…17168 Head {h00=0x0026, h01=0x0050, text=» LD A1,FILCOD,A12 FILE CODE TO ECB«, t00=0x00ec, t01=0x00c4}
0x17168…17182 Head {h00=0x0016, h01=0x0050, text=» ST A1,ECBFC,A8 . «, t00=0x00ec, t01=0x00ee}
0x17182…171ac Head {h00=0x0026, h01=0x0050, text=» CF A14,GTBUF GET AN INPUT BUFFER «, t00=0x00ec, t01=0x0108}
0x171ac…171c6 Head {h00=0x0016, h01=0x0050, text=» ST A2,ECBBA,A8 . «, t00=0x00ec, t01=0x0132}
0x171c6…171f4 Head {h00=0x002a, h01=0x0050, text=» LD A1,PACKLN,A12 RECEIVE BUFFER SIZE «, t00=0x00ec, t01=0x014c}
0x171f4…1720c Head {h00=0x0014, h01=0x0050, text=» ADK A1,BEGDAT .«, t00=0x00ec, t01=0x017a}
0x1720c…17226 (237, 0, 400) Head {h00=0x0016, h01=0x0050, text=» ST A1,ECBRL,A8 . «, t00=0x00ed, t01=0x0004}
0x17226…17254 Head {h00=0x002a, h01=0x0050, text=» LDR A1,A8 PARAMETER AFTER COMPLETION «, t00=0x00ed, t01=0x001e}
0x17254…17276 Head {h00=0x001e, h01=0x0050, text=» LDK A7,RECEIV ORDER CODE «, t00=0x00ed, t01=0x004c}
0x17276…17298 Head {h00=0x001e, h01=0x0050, text=» LKM ISSUE INPUT REQUEST «, t00=0x00ed, t01=0x006e}
0x17298…172a8 Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x00ed, t01=0x0090}
0x172a8…172ce Head {h00=0x0022, h01=0x0050, text=» DATA ENDIN ACTIVATION ADDRESS«, t00=0x00ed, t01=0x00a0}
0x172ce…172fa Head {h00=0x0028, h01=0x0050, text=» ADKL A8,ECBINL GET NEXT ECB-ADDRESS«, t00=0x00ed, t01=0x00c6}
0x172fa…17316 Head {h00=0x0018, h01=0x0050, text=» SUK A4,1 NEXT ONE ?«, t00=0x00ed, t01=0x00f2}
0x17316…17330 Head {h00=0x0016, h01=0x0050, text=» RB(P) STRT50 YES «, t00=0x00ed, t01=0x010e}
0x17330…1733a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0128}
0x1733a…17348 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ed, t01=0x0132}
0x17348…17352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0140}
0x17352…1738a Head {h00=0x0034, h01=0x0050, text=»* PREPARE RESTART PACKET AND QUEUE IT FOR OUTPUT«, t00=0x00ed, t01=0x014a}
0x1738a…17394 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0182}
0x17394…173bc Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x00ed, t01=0x018c}
0x173bc…173d4 Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x00ee, t01=0x0024}
0x173d4…173fe Head {h00=0x0026, h01=0x0050, text=» LDK A1,RSTR.P RESTART PACKET TYPE«, t00=0x00ee, t01=0x003c}
0x173fe…17418 Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x00ee, t01=0x0066}
0x17418…1742a Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x00ee, t01=0x0080}
0x1742a…17450 Head {h00=0x0022, h01=0x0050, text=» SC A1,CAUSE,A2 RESTART CAUSE «, t00=0x00ee, t01=0x0092}
0x17450…17478 Head {h00=0x0024, h01=0x0050, text=» SC A1,DGNCOD,A2 DIAGNOSTIC CODE«, t00=0x00ee, t01=0x00b8}
0x17478…1749c Head {h00=0x0020, h01=0x0050, text=» LDK A1,RSTR.L PACKET LENGTH«, t00=0x00ee, t01=0x00e0}
0x1749c…174b4 Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x00ee, t01=0x0104}
0x174b4…174e4 Head {h00=0x002c, h01=0x0050, text=» LDR A1,A12 OUTPUT QUEUE ANCHOR ADDRESS «, t00=0x00ee, t01=0x011c}
0x174e4…174fc Head {h00=0x0014, h01=0x0050, text=» ADK A1,RSTQUE .«, t00=0x00ee, t01=0x014c}
0x174fc…17520 Head {h00=0x0020, h01=0x0050, text=» CF A14,QUEUE QUEUE ELEMENT «, t00=0x00ee, t01=0x0164}
0x17520…1754c Head {h00=0x0028, h01=0x0050, text=» LDK A1,RSTFLG SET RESTART BUSY FLAG«, t00=0x00ee, t01=0x0188}
0x1754c…17568 Head {h00=0x0018, h01=0x0050, text=» ORS A1,CMNFLG,A12 .«, t00=0x00ef, t01=0x0024}
0x17568…17572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x0040}
0x17572…17588 Head {h00=0x0012, h01=0x0050, text=»* START TIMER «, t00=0x00ef, t01=0x004a}
0x17588…17592 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x0060}
0x17592…175b8 Head {h00=0x0022, h01=0x0050, text=» LDR A2,A13 SAVE REGISTER A13 «, t00=0x00ef, t01=0x006a}
0x175b8…175d6 Head {h00=0x001a, h01=0x0050, text=» SUR A13,A13 CLEAR IT «, t00=0x00ef, t01=0x0090}
0x175d6…17600 Head {h00=0x0026, h01=0x0050, text=» LDKL A4,TIMOUT ACTIVATION ADDRESS«, t00=0x00ef, t01=0x00ae}
0x17600…17626 Head {h00=0x0022, h01=0x0050, text=» LDKL A8,SYRSTM TIME-OUT VALUE«, t00=0x00ef, t01=0x00d8}
0x17626…17648 Head {h00=0x001e, h01=0x0050, text=» CF A14,STRTIM START TIMER«, t00=0x00ef, t01=0x00fe}
0x17648…17674 Head {h00=0x0028, h01=0x0050, text=» ST A4,RTMADR,A12 SAVE TIMER ADDRESS«, t00=0x00ef, t01=0x0120}
0x17674…1769a Head {h00=0x0022, h01=0x0050, text=» LDR A13,A2 RESTORE REGISTERS «, t00=0x00ef, t01=0x014c}
0x1769a…176c2 Head {h00=0x0024, h01=0x0050, text=» LDK A4,RTNOK RETURN CODE := OK «, t00=0x00ef, t01=0x0172}
0x176c2…176cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x000a}
0x176cc…176da Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f0, t01=0x0014}
0x176da…176e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0022}
0x176e4…176f4 Head {h00=0x000c, h01=0x0050, text=»* READY «, t00=0x00f0, t01=0x002c}
0x176f4…176fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x003c}
0x176fe…17712 Head {h00=0x0010, h01=0x0050, text=»RETURN EQU *«, t00=0x00f0, t01=0x0046}
0x17712…1771c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x005a}
0x1771c…17748 Head {h00=0x0028, h01=0x0050, text=»* RESET OPEN SYSTEM BUSY INDICATION «, t00=0x00f0, t01=0x0064}
0x17748…17752 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0090}
0x17752…17768 Head {h00=0x0012, h01=0x0050, text=» LDK A1,OPEFLG«, t00=0x00f0, t01=0x009a}
0x17768…17788 Head {h00=0x001c, h01=0x0050, text=» C1R A1,A1 «, t00=0x00f0, t01=0x00b0}
0x17788…177b0 Head {h00=0x0024, h01=0x0050, text=» ANS A1,CMNFLG,A12 «, t00=0x00f0, t01=0x00d0}
0x177b0…177d2 Head {h00=0x001e, h01=0x0050, text=» ABL READY BACK TO CALLER «, t00=0x00f0, t01=0x00f8}
0x177d2…177dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x011a}
0x177dc…17808 Head {h00=0x0028, h01=0x0050, text=»* RELEASE BUFFERS, CONNECTION FAILED«, t00=0x00f0, t01=0x0124}
0x17808…17812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0150}
0x17812…17826 Head {h00=0x0010, h01=0x0050, text=»RETUR2 EQU *«, t00=0x00f0, t01=0x015a}
0x17826…1783c Head {h00=0x0012, h01=0x0050, text=» LDK A3,SYUBNR«, t00=0x00f0, t01=0x016e}
0x1783c…1786c Head {h00=0x002c, h01=0x0050, text=» LD A1,ECBBA,A8 PARAMETER BLOCK ADDRESS «, t00=0x00f0, t01=0x0184}
0x1786c…17880 Head {h00=0x0010, h01=0x0050, text=»RETUR4 EQU *«, t00=0x00f1, t01=0x0024}
0x17880…17892 Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x00f1, t01=0x0038}
0x17892…178c2 Head {h00=0x002c, h01=0x0050, text=» LDR* A2,A1 A2 := BUFFER TO BE RELEASED «, t00=0x00f1, t01=0x004a}
0x178c2…178d8 Head {h00=0x0012, h01=0x0050, text=» CF A14,RLBUF «, t00=0x00f1, t01=0x007a}
0x178d8…178ea Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x00f1, t01=0x0090}
0x178ea…17914 Head {h00=0x0026, h01=0x0050, text=» RB(P) RETUR4 RELEASE NEXT BUFFER «, t00=0x00f1, t01=0x00a2}
0x17914…17926 Head {h00=0x000e, h01=0x0050, text=» RB RETURN«, t00=0x00f1, t01=0x00cc}
0x17926…17934 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f1, t01=0x00de}
0x17934…1793e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x00ec}
0x1793e…17948 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x00f6}
0x17948…17978 Head {h00=0x002c, h01=0x0050, text=»* PROCESSING OF THE CLOSE SYSTEM REQUEST«, t00=0x00f1, t01=0x0100}
0x17978…17982 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0130}
0x17982…179b6 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x00f1, t01=0x013a}
0x179b6…179c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x016e}
0x179c0…179dc Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00f1, t01=0x0178}
0x179dc…17a10 (242, 0, 400) Head {h00=0x0030, h01=0x0050, text=»* A6 = DWT ADDRESS OR ZERO (INTERNAL CALL)«, t00=0x00f2, t01=0x0004}
0x17a10…17a34 Head {h00=0x0020, h01=0x0050, text=»* A12 = LINE BLOCK ADDRESS «, t00=0x00f2, t01=0x0038}
0x17a34…17a58 Head {h00=0x0020, h01=0x0050, text=»* A14 = CALL FUNCTION STACK«, t00=0x00f2, t01=0x005c}
0x17a58…17a62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x0080}
0x17a62…17a7e Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00f2, t01=0x008a}
0x17a7e…17a98 Head {h00=0x0016, h01=0x0050, text=»* CF A14,STOP «, t00=0x00f2, t01=0x00a6}
0x17a98…17aa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x00c0}
0x17aa2…17abe Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00f2, t01=0x00ca}
0x17abe…17ada Head {h00=0x0018, h01=0x0050, text=»* A4 = RETURN CODE«, t00=0x00f2, t01=0x00e6}
0x17ada…17b14 Head {h00=0x0036, h01=0x0050, text=»* A1,A2,A3,A5,A6,A7,A8 ARE CHANGED«, t00=0x00f2, t01=0x0102}
0x17b14…17b1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x013c}
0x17b1e…17b30 Head {h00=0x000e, h01=0x0050, text=»STOP EQU *«, t00=0x00f2, t01=0x0146}
0x17b30…17b3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x0158}
0x17b3a…17b5c Head {h00=0x001e, h01=0x0050, text=»* GET LINE IDENTIFICATION «, t00=0x00f2, t01=0x0162}
0x17b5c…17b66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x0184}
0x17b66…17b8a Head {h00=0x0020, h01=0x0050, text=» LDK A1,CLOFLG «, t00=0x00f2, t01=0x018e}
0x17b8a…17bc0 Head {h00=0x0032, h01=0x0050, text=» AN A1,CMNFLG,A12 CLOSE BUSY?«, t00=0x00f3, t01=0x0022}
0x17bc0…17bee Head {h00=0x002a, h01=0x0050, text=» RF(NZ) CLOS40 YES«, t00=0x00f3, t01=0x0058}
0x17bee…17c12 Head {h00=0x0020, h01=0x0050, text=» LDK A1,CLOFLG «, t00=0x00f3, t01=0x0086}
0x17c12…17c4c Head {h00=0x0036, h01=0x0050, text=» ORS A1,CMNFLG,A12 SET CLOSE BUSY «, t00=0x00f3, t01=0x00aa}
0x17c4c…17c56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x00e4}
0x17c56…17c64 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f3, t01=0x00ee}
0x17c64…17c6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x00fc}
0x17c6e…17c92 Head {h00=0x0020, h01=0x0050, text=»* PREPARE CLOSE REQUEST ECB «, t00=0x00f3, t01=0x0106}
0x17c92…17c9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x012a}
0x17c9c…17cc0 Head {h00=0x0020, h01=0x0050, text=» LDR A8,A12 LINE ECB-ADDRESS«, t00=0x00f3, t01=0x0134}
0x17cc0…17cda Head {h00=0x0016, h01=0x0050, text=» ADKL A8,LOCECB . «, t00=0x00f3, t01=0x0158}
0x17cda…17d00 Head {h00=0x0022, h01=0x0050, text=» LDR A1,A12 ADDRESS USER BLOCK«, t00=0x00f3, t01=0x0172}
0x17d00…17d18 Head {h00=0x0014, h01=0x0050, text=» ADK A1,UBNUM . «, t00=0x00f4, t01=0x0008}
0x17d18…17d32 Head {h00=0x0016, h01=0x0050, text=» ST A1,ECBBA,A8 . «, t00=0x00f4, t01=0x0020}
0x17d32…17d5c Head {h00=0x0026, h01=0x0050, text=» ST A6,ECBCW1,A8 SAVE DWT ADDRESS «, t00=0x00f4, t01=0x003a}
0x17d5c…17d8a Head {h00=0x002a, h01=0x0050, text=» LDK A4,SYUBNR NUMBER OF USER BUFFERS «, t00=0x00f4, t01=0x0064}
0x17d8a…17d9e Head {h00=0x0010, h01=0x0050, text=» STR A4,A1 .«, t00=0x00f4, t01=0x0092}
0x17d9e…17da8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x00a6}
0x17da8…17dda Head {h00=0x002e, h01=0x0050, text=»* TEST IF THERE IS ANY PENDING REQUESTS TO«, t00=0x00f4, t01=0x00b0}
0x17dda…17e08 Head {h00=0x002a, h01=0x0050, text=»* COMPLETE FOR THIS LINE(IF ALLOWED !)«, t00=0x00f4, t01=0x00e2}
0x17e08…17e12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x0110}
0x17e12…17e24 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A6«, t00=0x00f4, t01=0x011a}
0x17e24…17e38 Head {h00=0x0010, h01=0x0050, text=»CLOS01 EQU *«, t00=0x00f4, t01=0x012c}
0x17e38…17e66 Head {h00=0x002a, h01=0x0050, text=» LD A6,CHAIN,A12 GET DWT CHAIN ANCHOR «, t00=0x00f4, t01=0x0140}
0x17e66…17e90 Head {h00=0x0026, h01=0x0050, text=» RF(Z) CLOS30 NO CONNECTION ACTIVE«, t00=0x00f4, t01=0x016e}
0x17e90…17ea4 Head {h00=0x0010, h01=0x0050, text=»CLOS05 EQU *«, t00=0x00f5, t01=0x0008}
0x17ea4…17eae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f5, t01=0x001c}
0x17eae…17ed6 Head {h00=0x0024, h01=0x0050, text=»* TEST IF DISCONNECTION ALLOWED «, t00=0x00f5, t01=0x0026}
0x17ed6…17ee0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f5, t01=0x004e}
0x17ee0…17f02 Head {h00=0x001e, h01=0x0050, text=» ADK A5,0 INTERNAL CALL ? «, t00=0x00f5, t01=0x0058}
0x17f02…17f1c Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLOS15 YES «, t00=0x00f5, t01=0x007a}
0x17f1c…17f42 Head {h00=0x0022, h01=0x0050, text=» LDK A3,SEQE.RC SEQUENCE ERROR«, t00=0x00f5, t01=0x0094}
0x17f42…17f5a Head {h00=0x0014, h01=0x0050, text=» LC A1,DWTOPT,A5«, t00=0x00f5, t01=0x00ba}
0x17f5a…17f80 Head {h00=0x0022, h01=0x0050, text=» ANK A1,CLOOPT CLOSE ALLOWED ?«, t00=0x00f5, t01=0x00d2}
0x17f80…17f9a Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLOS15 YES «, t00=0x00f5, t01=0x00f8}
0x17f9a…17fb6 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A5 RELOAD A6«, t00=0x00f5, t01=0x0112}
0x17fb6…17fcc Head {h00=0x0012, h01=0x0050, text=» LDK A1,CLOFLG«, t00=0x00f5, t01=0x012e}
0x17fcc…17ffc Head {h00=0x002c, h01=0x0050, text=» XRS A1,CMNFLG,A12 RESET CLOSE BUSY IND.«, t00=0x00f5, t01=0x0144}
0x17ffc…18020 Head {h00=0x0020, h01=0x0050, text=» RF CLOS55 COMPLETE REQUEST «, t00=0x00f5, t01=0x0174}
0x18020…1802a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f6, t01=0x0008}
0x1802a…18038 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f6, t01=0x0012}
0x18038…18042 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f6, t01=0x0020}
0x18042…18056 Head {h00=0x0010, h01=0x0050, text=»CLOS15 EQU *«, t00=0x00f6, t01=0x002a}
0x18056…1807c Head {h00=0x0022, h01=0x0050, text=» LDK A3,LOGE.RC LOGICAL ERROR «, t00=0x00f6, t01=0x003e}
0x1807c…18092 Head {h00=0x0012, h01=0x0050, text=» LDK A2,DISCON«, t00=0x00f6, t01=0x0064}
0x18092…180a4 Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x00f6, t01=0x007a}
0x180a4…180ce Head {h00=0x0026, h01=0x0050, text=» LC A7,DWTFNC,A6 GET FUNCTION CODE«, t00=0x00f6, t01=0x008c}
0x180ce…180e0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x00f6, t01=0x00b6}
0x180e0…180f4 Head {h00=0x0010, h01=0x0050, text=» IFT STATI=1«, t00=0x00f6, t01=0x00c8}
0x180f4…1811e Head {h00=0x0026, h01=0x0050, text=» SUK A7,STATIS STATISTIC REQUEST ?«, t00=0x00f6, t01=0x00dc}
0x1811e…18138 Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLOS16 YES «, t00=0x00f6, t01=0x0106}
0x18138…1814e Head {h00=0x0012, h01=0x0050, text=» ADK A7,STATIS«, t00=0x00f6, t01=0x0120}
0x1814e…1815a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00f6, t01=0x0136}
0x1815a…18180 Head {h00=0x0022, h01=0x0050, text=» SUK A1,CLOSYS CLOSE SYSTEM ? «, t00=0x00f6, t01=0x0142}
0x18180…1819a Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CLOS18 NO «, t00=0x00f6, t01=0x0168}
0x1819a…181ae Head {h00=0x0010, h01=0x0050, text=»CLOS16 EQU *«, t00=0x00f6, t01=0x0182}
0x181ae…181da Head {h00=0x0028, h01=0x0050, text=» CW A2,DWTSTE,A6 DWT DISCONNECTED ? «, t00=0x00f7, t01=0x0008}
0x181da…181f4 Head {h00=0x0016, h01=0x0050, text=» RF(E) CLOS25 YES «, t00=0x00f7, t01=0x0034}
0x181f4…18208 Head {h00=0x0010, h01=0x0050, text=»CLOS18 EQU *«, t00=0x00f7, t01=0x004e}
0x18208…18220 Head {h00=0x0014, h01=0x0050, text=» SC A2,DWTSTE,A6«, t00=0x00f7, t01=0x0062}
0x18220…1824a Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTST,A6 REQUEST PENDING ? «, t00=0x00f7, t01=0x007a}
0x1824a…18262 Head {h00=0x0014, h01=0x0050, text=» RF(N) CLOS19 NO«, t00=0x00f7, t01=0x00a4}
0x18262…1828a Head {h00=0x0024, h01=0x0050, text=» SUK A7,CONPAS CONNECT PASSIVE ?«, t00=0x00f7, t01=0x00bc}
0x1828a…182a4 Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLOS20 YES «, t00=0x00f7, t01=0x00e4}
0x182a4…182b8 Head {h00=0x0010, h01=0x0050, text=»CLOS19 EQU *«, t00=0x00f7, t01=0x00fe}
0x182b8…182d0 Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTLCN,A6«, t00=0x00f7, t01=0x0112}
0x182d0…182fa Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x00f7, t01=0x012a}
0x182fa…18326 Head {h00=0x0028, h01=0x0050, text=» CM LCDWT,A13 CLEAR RELATION LC-DWT «, t00=0x00f7, t01=0x0154}
0x18326…1833a Head {h00=0x0010, h01=0x0050, text=»CLOS20 EQU *«, t00=0x00f7, t01=0x0180}
0x1833a…18368 (248, 0, 400) Head {h00=0x002a, h01=0x0050, text=» CF A14,RELDWT RELEASE DWT FROM CHAIN «, t00=0x00f8, t01=0x0004}
0x18368…18388 Head {h00=0x001c, h01=0x0050, text=» ADK A1,0 CLOSE SYSTEM ?«, t00=0x00f8, t01=0x0032}
0x18388…183a2 Head {h00=0x0016, h01=0x0050, text=» RB(Z) CLOS01 YES «, t00=0x00f8, t01=0x0052}
0x183a2…183ca Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x00f8, t01=0x006c}
0x183ca…183e6 Head {h00=0x0018, h01=0x0050, text=» RB CLOS01 TAKE NEXT«, t00=0x00f8, t01=0x0094}
0x183e6…183f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x00b0}
0x183f0…183fe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f8, t01=0x00ba}
0x183fe…18408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x00c8}
0x18408…1842e Head {h00=0x0022, h01=0x0050, text=»* TEST IF MORE DWT'S IN CHAIN «, t00=0x00f8, t01=0x00d2}
0x1842e…18438 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x00f8}
0x18438…1844c Head {h00=0x0010, h01=0x0050, text=»CLOS25 EQU *«, t00=0x00f8, t01=0x0102}
0x1844c…18464 Head {h00=0x0014, h01=0x0050, text=» LD A6,DWTCHN,A6«, t00=0x00f8, t01=0x0116}
0x18464…1847e Head {h00=0x0016, h01=0x0050, text=» RB(NZ) CLOS05 YES«, t00=0x00f8, t01=0x012e}
0x1847e…18492 Head {h00=0x0010, h01=0x0050, text=»CLOS30 EQU *«, t00=0x00f8, t01=0x0148}
0x18492…1849c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x015c}
0x1849c…184b8 Head {h00=0x0018, h01=0x0050, text=»* ISSUE STOP REQUEST«, t00=0x00f8, t01=0x0166}
0x184b8…184c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x0182}
0x184c2…184ee Head {h00=0x0028, h01=0x0050, text=» LDK A7,DISCN ORDER CODE,CLOSE LINE «, t00=0x00f8, t01=0x018c}
0x184ee…1851e Head {h00=0x002c, h01=0x0050, text=» LDR A1,A8 PARAMETER FOR ACTIVATION PART«, t00=0x00f9, t01=0x0028}
0x1851e…1852a Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x00f9, t01=0x0058}
0x1852a…1853a Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x00f9, t01=0x0064}
0x1853a…18560 Head {h00=0x0022, h01=0x0050, text=» DATA CLOEND ACTIVATION LABEL «, t00=0x00f9, t01=0x0074}
0x18560…18574 Head {h00=0x0010, h01=0x0050, text=»CLOS40 EQU *«, t00=0x00f9, t01=0x009a}
0x18574…1859a Head {h00=0x0022, h01=0x0050, text=» LDK A4,RTNOK SET RETURN CODE «, t00=0x00f9, t01=0x00ae}
0x1859a…185ba Head {h00=0x001c, h01=0x0050, text=» RTN A14 BACK TO CALLER «, t00=0x00f9, t01=0x00d4}
0x185ba…185c8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f9, t01=0x00f4}
0x185c8…185d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x0102}
0x185d2…1860a Head {h00=0x0034, h01=0x0050, text=»* ACTIVATION PART AFTER COMPLETED CLOSE REQUEST «, t00=0x00f9, t01=0x010c}
0x1860a…18614 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x0144}
0x18614…18628 Head {h00=0x0010, h01=0x0050, text=»CLOEND EQU *«, t00=0x00f9, t01=0x014e}
0x18628…18660 Head {h00=0x0034, h01=0x0050, text=» LDKL A14,DCSTAK SET CALL FUNCTION STACK POINTER«, t00=0x00f9, t01=0x0162}
0x18660…18684 Head {h00=0x0020, h01=0x0050, text=» LDR A8,A1 SAVE ECB-ADDRESS «, t00=0x00fa, t01=0x000a}
0x18684…186b0 Head {h00=0x0028, h01=0x0050, text=» CF A14,GTLBA GET LINE BLOCK ADDRESS«, t00=0x00fa, t01=0x002e}
0x186b0…186da Head {h00=0x0026, h01=0x0050, text=» LDK A1,STRTFL+CLOFLG RESET FLAGS «, t00=0x00fa, t01=0x005a}
0x186da…186fe Head {h00=0x0020, h01=0x0050, text=» ORK A1,RSTFLG «, t00=0x00fa, t01=0x0084}
0x186fe…18712 Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x00fa, t01=0x00a8}
0x18712…1872e Head {h00=0x0018, h01=0x0050, text=» ANS A1,CMNFLG,A12 .«, t00=0x00fa, t01=0x00bc}
0x1872e…18758 Head {h00=0x0026, h01=0x0050, text=» LD A4,ECBBA,A8 ADDRESS USER BLOCK«, t00=0x00fa, t01=0x00d8}
0x18758…18782 Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A4 NUMBER OF USER BUFFERS«, t00=0x00fa, t01=0x0102}
0x18782…18796 Head {h00=0x0010, h01=0x0050, text=»CLOS50 EQU *«, t00=0x00fa, t01=0x012c}
0x18796…187a8 Head {h00=0x000e, h01=0x0050, text=» ADK A4,2 «, t00=0x00fa, t01=0x0140}
0x187a8…187ca Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A4 BUFFER ADDRESS«, t00=0x00fa, t01=0x0152}
0x187ca…187f4 Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF RELEASE INPUT BUFFER«, t00=0x00fa, t01=0x0174}
0x187f4…18810 Head {h00=0x0018, h01=0x0050, text=» SUK A3,1 NEXT ONE ?«, t00=0x00fb, t01=0x000e}
0x18810…1882a Head {h00=0x0016, h01=0x0050, text=» RB(P) CLOS50 YES «, t00=0x00fb, t01=0x002a}
0x1882a…18852 Head {h00=0x0024, h01=0x0050, text=» LD A6,ECBCW1,A8 GET DWT ADDRESS«, t00=0x00fb, t01=0x0044}
0x18852…1885c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x006c}
0x1885c…18882 Head {h00=0x0022, h01=0x0050, text=»* TEST IF DWT ADDRESS IS VALID«, t00=0x00fb, t01=0x0076}
0x18882…1888c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x009c}
0x1888c…188ac Head {h00=0x001c, h01=0x0050, text=» RF(Z) CLOS60«, t00=0x00fb, t01=0x00a6}
0x188ac…188be Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x00fb, t01=0x00c6}
0x188be…188d2 Head {h00=0x0010, h01=0x0050, text=»CLOS55 EQU *«, t00=0x00fb, t01=0x00d8}
0x188d2…188fa Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x00fb, t01=0x00ec}
0x188fa…1890e Head {h00=0x0010, h01=0x0050, text=»CLOS60 EQU *«, t00=0x00fb, t01=0x0114}
0x1890e…18936 Head {h00=0x0024, h01=0x0050, text=» ABL EXITDC CONTROL TO SCHEDULER«, t00=0x00fb, t01=0x0128}
0x18936…18944 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00fb, t01=0x0150}
0x18944…1894e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x015e}
0x1894e…1897e Head {h00=0x002c, h01=0x0050, text=»* PROCESSING OF A CONNECT ACTIVE REQUEST«, t00=0x00fb, t01=0x0168}
0x1897e…18988 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x0008}
0x18988…189bc Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x00fc, t01=0x0012}
0x189bc…189c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x0046}
0x189c6…189e2 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x00fc, t01=0x0050}
0x189e2…189fe Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x00fc, t01=0x006c}
0x189fe…18a2a Head {h00=0x0028, h01=0x0050, text=»* A12 = LINE CONTROL BLOCK ADDRESS «, t00=0x00fc, t01=0x0088}
0x18a2a…18a56 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x00fc, t01=0x00b4}
0x18a56…18a60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x00e0}
0x18a60…18a7c Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x00fc, t01=0x00ea}
0x18a7c…18a94 Head {h00=0x0014, h01=0x0050, text=»* ABL CALLR «, t00=0x00fc, t01=0x0106}
0x18a94…18ac2 Head {h00=0x002a, h01=0x0050, text=»* A RETURN IS MADE TO THE LABEL READY«, t00=0x00fc, t01=0x011e}
0x18ac2…18acc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x014c}
0x18acc…18ae8 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x00fc, t01=0x0156}
0x18ae8…18b04 Head {h00=0x0018, h01=0x0050, text=»* A4 = RETURN CODE «, t00=0x00fc, t01=0x0172}
0x18b04…18b24 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x00fc, t01=0x018e}
0x18b24…18b2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x001e}
0x18b2e…18b42 Head {h00=0x0010, h01=0x0050, text=»CALLR EQU * «, t00=0x00fd, t01=0x0028}
0x18b42…18b58 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00fd, t01=0x003c}
0x18b58…18b92 Head {h00=0x0036, h01=0x0050, text=» LC A1,DWTOPT,A6 PVC REQUESTED ?«, t00=0x00fd, t01=0x0052}
0x18b92…18bb2 Head {h00=0x001c, h01=0x0050, text=» ANK A1,PVC«, t00=0x00fd, t01=0x008c}
0x18bb2…18be0 Head {h00=0x002a, h01=0x0050, text=» RF(NZ) CALLPV YES«, t00=0x00fd, t01=0x00ac}
0x18be0…18bea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x00da}
0x18bea…18c14 Head {h00=0x0026, h01=0x0050, text=»* TEST IF REMOTE DTE IS SUPPORTED «, t00=0x00fd, t01=0x00e4}
0x18c14…18c1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x010e}
0x18c1e…18c36 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTRAD,A6«, t00=0x00fd, t01=0x0118}
0x18c36…18c56 Head {h00=0x001c, h01=0x0050, text=» LDKL A3,SVCTYP SET TYPE«, t00=0x00fd, t01=0x0130}
0x18c56…18c6c Head {h00=0x0012, h01=0x0050, text=» LDK A4,NOLCAV«, t00=0x00fd, t01=0x0150}
0x18c6c…18c7e Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x00fd, t01=0x0166}
0x18c7e…18c9e Head {h00=0x001c, h01=0x0050, text=» CF A15,FNDDNT FIND DTE «, t00=0x00fd, t01=0x0178}
0x18c9e…18cb0 Head {h00=0x000e, h01=0x0050, text=» ENB . =1«, t00=0x00fe, t01=0x0008}
0x18cb0…18cca Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 FOUND ?«, t00=0x00fe, t01=0x001a}
0x18cca…18ce2 Head {h00=0x0014, h01=0x0050, text=» RF(N) CALL40 NO«, t00=0x00fe, t01=0x0034}
0x18ce2…18cec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x004c}
0x18cec…18cfa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00fe, t01=0x0056}
0x18cfa…18d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x0064}
0x18d04…18d30 Head {h00=0x0028, h01=0x0050, text=»* SEARCH FOR A READY LOGICAL CHANNEL«, t00=0x00fe, t01=0x006e}
0x18d30…18d3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x009a}
0x18d3a…18d6c Head {h00=0x002e, h01=0x0050, text=» LC A4,NRLC,A12 GET # OF LOGICAL CHANNELS «, t00=0x00fe, t01=0x00a4}
0x18d6c…18d82 Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x00fe, t01=0x00d6}
0x18d82…18d96 Head {h00=0x0010, h01=0x0050, text=» SUK A4,1 . «, t00=0x00fe, t01=0x00ec}
0x18d96…18daa Head {h00=0x0010, h01=0x0050, text=»CALL00 EQU *«, t00=0x00fe, t01=0x0100}
0x18daa…18dd4 Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x00fe, t01=0x0114}
0x18dd4…18df8 Head {h00=0x0020, h01=0x0050, text=» LC A1,LCSTAT,A13 LC-STATUS «, t00=0x00fe, t01=0x013e}
0x18df8…18e0c Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x00fe, t01=0x0162}
0x18e0c…18e28 Head {h00=0x0018, h01=0x0050, text=» RF(Z) CALL10 READY «, t00=0x00fe, t01=0x0176}
0x18e28…18e48 (255, 0, 400) Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 TRY NEXT ENTRY«, t00=0x00ff, t01=0x0004}
0x18e48…18e62 Head {h00=0x0016, h01=0x0050, text=» RB(NN) CALL00 YES«, t00=0x00ff, t01=0x0024}
0x18e62…18e70 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ff, t01=0x003e}
0x18e70…18e92 Head {h00=0x001e, h01=0x0050, text=» IFT PERMVC=0«, t00=0x00ff, t01=0x004c}
0x18e92…18eae Head {h00=0x0018, h01=0x0050, text=»CALLPV EQU * «, t00=0x00ff, t01=0x006e}
0x18eae…18ec2 Head {h00=0x0010, h01=0x0050, text=» XIF«, t00=0x00ff, t01=0x008a}
0x18ec2…18ed8 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x00ff, t01=0x009e}
0x18ed8…18f16 Head {h00=0x003a, h01=0x0050, text=» LDK A4,NOLCAV RETURN CODE := NO LOG. CHAN. AVAILABLE «, t00=0x00ff, t01=0x00b4}
0x18f16…18f38 Head {h00=0x001e, h01=0x0050, text=» RF CALL40 BACK TO CALLER «, t00=0x00ff, t01=0x00f2}
0x18f38…18f4c Head {h00=0x0010, h01=0x0050, text=»CALL10 EQU *«, t00=0x00ff, t01=0x0114}
0x18f4c…18f78 Head {h00=0x0028, h01=0x0050, text=» SC A4,DWTLCN,A6 SAVE LC-NUM IN DWT «, t00=0x00ff, t01=0x0128}
0x18f78…18f82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ff, t01=0x0154}
0x18f82…18f9c Head {h00=0x0016, h01=0x0050, text=»* COMPLETE LC-ADM «, t00=0x00ff, t01=0x015e}
0x18f9c…18fa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ff, t01=0x0178}
0x18fa6…18fd4 Head {h00=0x002a, h01=0x0050, text=» LDK A1,LCAL.ST LC-STAT := LOCAL-CALL «, t00=0x00ff, t01=0x0182}
0x18fd4…18ff0 Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSTAT,A13 . «, t00=0x0100, t01=0x0020}
0x18ff0…1901c Head {h00=0x0028, h01=0x0050, text=» LDK A1,0 ALL INPUT BUFFERS ARE USED«, t00=0x0100, t01=0x003c}
0x1901c…19038 Head {h00=0x0018, h01=0x0050, text=» SC A1,NRNUBF,A13 . «, t00=0x0100, t01=0x0068}
0x19038…19062 Head {h00=0x0026, h01=0x0050, text=» ST A6,LCDWT,A13 SAVE DWT-ADDRESS «, t00=0x0100, t01=0x0084}
0x19062…1906e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0100, t01=0x00ae}
0x1906e…19084 Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0100, t01=0x00ba}
0x19084…19096 Head {h00=0x000e, h01=0x0050, text=» RF CALLPV«, t00=0x0100, t01=0x00d0}
0x19096…190a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x00e2}
0x190a0…190ae Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0100, t01=0x00ec}
0x190ae…190ba Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0100, t01=0x00fa}
0x190ba…190c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x0106}
0x190c4…190ee Head {h00=0x0026, h01=0x0050, text=»* QUEUE CONNECT REQUEST FOR OUTPUT«, t00=0x0100, t01=0x0110}
0x190ee…190f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x013a}
0x190f8…1910c Head {h00=0x0010, h01=0x0050, text=»CALL20 EQU *«, t00=0x0100, t01=0x0144}
0x1910c…1912e Head {h00=0x001e, h01=0x0050, text=» LDR A2,A6 ELEMENT ADDRESS«, t00=0x0100, t01=0x0158}
0x1912e…19150 Head {h00=0x001e, h01=0x0050, text=» CF A14,QUEO QUEUE ELEMENT«, t00=0x0100, t01=0x017a}
0x19150…1915a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x000c}
0x1915a…1916a Head {h00=0x000c, h01=0x0050, text=»* READY «, t00=0x0101, t01=0x0016}
0x1916a…19174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x0026}
0x19174…19188 Head {h00=0x0010, h01=0x0050, text=»CALL30 EQU *«, t00=0x0101, t01=0x0030}
0x19188…191b0 Head {h00=0x0024, h01=0x0050, text=» LDK A4,RTNOK RETURN CODE := OK «, t00=0x0101, t01=0x0044}
0x191b0…191c4 Head {h00=0x0010, h01=0x0050, text=»CALL40 EQU *«, t00=0x0101, t01=0x006c}
0x191c4…191d6 Head {h00=0x000e, h01=0x0050, text=» ABL READY«, t00=0x0101, t01=0x0080}
0x191d6…191ec Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0101, t01=0x0092}
0x191ec…191fa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0101, t01=0x00a8}
0x191fa…19204 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x00b6}
0x19204…19240 Head {h00=0x0038, h01=0x0050, text=»* A CONNECT REQUEST FOR A PERMANENT VIRTUAL CIRCUIT «, t00=0x0101, t01=0x00c0}
0x19240…1924a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x00fc}
0x1924a…1925e Head {h00=0x0010, h01=0x0050, text=»CALLPV EQU *«, t00=0x0101, t01=0x0106}
0x1925e…19268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x011a}
0x19268…19298 Head {h00=0x002c, h01=0x0050, text=»* SEARCH FOR A NOT USED LOGICAL CHANNEL «, t00=0x0101, t01=0x0124}
0x19298…192a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x0154}
0x192a2…192d0 Head {h00=0x002a, h01=0x0050, text=» LC A4,NRLC,A12 GET # OF LOG. CHANNELS«, t00=0x0101, t01=0x015e}
0x192d0…192e6 Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x0101, t01=0x018c}
0x192e6…192fa Head {h00=0x0010, h01=0x0050, text=» SUK A4,1 . «, t00=0x0102, t01=0x0012}
0x192fa…1932e Head {h00=0x0030, h01=0x0050, text=» LDK A1,NOREMO REMOTE ADDRESS NOT SUPPORTED «, t00=0x0102, t01=0x0026}
0x1932e…19342 Head {h00=0x0010, h01=0x0050, text=»CALL60 EQU *«, t00=0x0102, t01=0x005a}
0x19342…1936c Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x0102, t01=0x006e}
0x1936c…1938e Head {h00=0x001e, h01=0x0050, text=» LDK A3,PVC IS IT A PVC ? «, t00=0x0102, t01=0x0098}
0x1938e…193a8 Head {h00=0x0016, h01=0x0050, text=» CC A3,VCTYP,A13 .«, t00=0x0102, t01=0x00ba}
0x193a8…193c2 Head {h00=0x0016, h01=0x0050, text=» RF(NE) CALL70 NO «, t00=0x0102, t01=0x00d4}
0x193c2…19408 Head {h00=0x0042, h01=0x0050, text=» LD A3,DWTRAD,A6 THE REQUESTED DESTINATION ?«, t00=0x0102, t01=0x00ee}
0x19408…19430 Head {h00=0x0024, h01=0x0050, text=» CW A3,REMADR,A13 «, t00=0x0102, t01=0x0134}
0x19430…1944a Head {h00=0x0016, h01=0x0050, text=» RF(NE) CALL70 NO «, t00=0x0102, t01=0x015c}
0x1944a…1947e Head {h00=0x0030, h01=0x0050, text=» LDK A1,NOLCAV NO LOGICAL CHANNEL AVAILABLE «, t00=0x0102, t01=0x0176}
0x1947e…194aa Head {h00=0x0028, h01=0x0050, text=» LD A3,LCDWT,A13 LC ALREADY IN USE ?«, t00=0x0103, t01=0x001a}
0x194aa…194c2 Head {h00=0x0014, h01=0x0050, text=» RF(Z) CALL80 NO«, t00=0x0103, t01=0x0046}
0x194c2…194d6 Head {h00=0x0010, h01=0x0050, text=»CALL70 EQU *«, t00=0x0103, t01=0x005e}
0x194d6…194f6 Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 TRY NEXT ENTRY«, t00=0x0103, t01=0x0072}
0x194f6…1950e Head {h00=0x0014, h01=0x0050, text=» RB(NN) CALL60 .«, t00=0x0103, t01=0x0092}
0x1950e…19530 Head {h00=0x001e, h01=0x0050, text=» LDR A4,A1 GET RETURN CODE«, t00=0x0103, t01=0x00aa}
0x19530…19552 Head {h00=0x001e, h01=0x0050, text=» RB CALL40 BACK TO CALLER «, t00=0x0103, t01=0x00cc}
0x19552…1955c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0103, t01=0x00ee}
0x1955c…19570 Head {h00=0x0010, h01=0x0050, text=»CALL80 EQU *«, t00=0x0103, t01=0x00f8}
0x19570…195a2 Head {h00=0x002e, h01=0x0050, text=» SC A4,DWTLCN,A6 SAVE LOG. CHAN. NR IN DWT«, t00=0x0103, t01=0x010c}
0x195a2…195de Head {h00=0x0038, h01=0x0050, text=» ST A6,LCDWT,A13 SAVE DWT ADDRESS «, t00=0x0103, t01=0x013e}
0x195de…19618 Head {h00=0x0036, h01=0x0050, text=» RB CALL30 BACK TO CALLER «, t00=0x0103, t01=0x017a}
0x19618…19624 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0104, t01=0x0024}
0x19624…1963a Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0104, t01=0x0030}
0x1963a…19648 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0104, t01=0x0046}
0x19648…19652 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x0054}
0x19652…1965c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x005e}
0x1965c…1968a Head {h00=0x002a, h01=0x0050, text=»* PROCESSING OF AN ACCEPT CALL REQUEST«, t00=0x0104, t01=0x0068}
0x1968a…19694 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x0096}
0x19694…196c8 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0104, t01=0x00a0}
0x196c8…196d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x00d4}
0x196d2…196ee Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0104, t01=0x00de}
0x196ee…1970a Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0104, t01=0x00fa}
0x1970a…1972a Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0104, t01=0x0116}
0x1972a…19756 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0104, t01=0x0136}
0x19756…19760 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x0162}
0x19760…1977c Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0104, t01=0x016c}
0x1977c…19794 Head {h00=0x0014, h01=0x0050, text=»* ABL CALLCR«, t00=0x0104, t01=0x0188}
0x19794…197c2 Head {h00=0x002a, h01=0x0050, text=»* A RETURN IS MADE TO THE LABEL READY«, t00=0x0105, t01=0x0010}
0x197c2…197cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x003e}
0x197cc…197e8 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x0105, t01=0x0048}
0x197e8…19804 Head {h00=0x0018, h01=0x0050, text=»* A4 = RETURN CODE «, t00=0x0105, t01=0x0064}
0x19804…1980e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x0080}
0x1980e…19822 Head {h00=0x0010, h01=0x0050, text=»CALLCR EQU *«, t00=0x0105, t01=0x008a}
0x19822…1985a Head {h00=0x0034, h01=0x0050, text=» LDK A4,INVSTA PRESET RETURN CODE := ILL. STATUS«, t00=0x0105, t01=0x009e}
0x1985a…1988c Head {h00=0x002e, h01=0x0050, text=» LDK A1,RCAL.ST LC-STATUS = REMOTE CALL ? «, t00=0x0105, t01=0x00d6}
0x1988c…198a8 Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0105, t01=0x0108}
0x198a8…198c8 Head {h00=0x001c, h01=0x0050, text=» RB(NE) CALL40 NO, ERROR«, t00=0x0105, t01=0x0124}
0x198c8…198d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x0144}
0x198d2…198ea Head {h00=0x0014, h01=0x0050, text=»* UPDATE LC-ADM «, t00=0x0105, t01=0x014e}
0x198ea…198f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x0166}
0x198f4…19926 Head {h00=0x002e, h01=0x0050, text=» LDK A1,DATA.ST LC-STATUS := DATA TRANSFER«, t00=0x0105, t01=0x0170}
0x19926…1993a Head {h00=0x0010, h01=0x0050, text=» ECR A1,A1 .«, t00=0x0106, t01=0x0012}
0x1993a…19974 Head {h00=0x0036, h01=0x0050, text=» ST A1,LCSTAT,A13 LC-SUBSTAT := FLOW CONTROL READY«, t00=0x0106, t01=0x0026}
0x19974…199a2 Head {h00=0x002a, h01=0x0050, text=» CF A14,CLLCAD CLEAR FIELDS IN LC-ADM «, t00=0x0106, t01=0x0060}
0x199a2…199ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x008e}
0x199ac…199ba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0106, t01=0x0098}
0x199ba…199c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x00a6}
0x199c4…19a00 Head {h00=0x0038, h01=0x0050, text=»* IF ACCEPT REQUEST FROM USER THEN EMPTY INPUT QUEUE«, t00=0x0106, t01=0x00b0}
0x19a00…19a0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x00ec}
0x19a0a…19a20 Head {h00=0x0012, h01=0x0050, text=» LDK A1,INCALR«, t00=0x0106, t01=0x00f6}
0x19a20…19a38 Head {h00=0x0014, h01=0x0050, text=» CC A1,DWTSTE,A6«, t00=0x0106, t01=0x010c}
0x19a38…19a5e Head {h00=0x0022, h01=0x0050, text=» RB(NE) CALL20 NO USER REQUEST«, t00=0x0106, t01=0x0124}
0x19a5e…19a82 Head {h00=0x0020, h01=0x0050, text=» CF A14,CLINPQ«, t00=0x0106, t01=0x014a}
0x19a82…19a8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x016e}
0x19a8c…19ab6 Head {h00=0x0026, h01=0x0050, text=»* RESET DATA AVAILABLE INDICATION «, t00=0x0106, t01=0x0178}
0x19ab6…19ac0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x0012}
0x19ac0…19ad6 Head {h00=0x0012, h01=0x0050, text=» CM DWTRCI,A6 «, t00=0x0107, t01=0x001c}
0x19ad6…19ae0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x0032}
0x19ae0…19b02 Head {h00=0x001e, h01=0x0050, text=»* QUEUE PACKET AND RETURN «, t00=0x0107, t01=0x003c}
0x19b02…19b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x005e}
0x19b0c…19b1e Head {h00=0x000e, h01=0x0050, text=» RB CALL20«, t00=0x0107, t01=0x0068}
0x19b1e…19b28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x007a}
0x19b28…19b34 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0107, t01=0x0084}
0x19b34…19b42 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0107, t01=0x0090}
0x19b42…19b4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x009e}
0x19b4c…19b56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x00a8}
0x19b56…19b8a Head {h00=0x0030, h01=0x0050, text=»* PROCESSING OF A DATA TRANSMISSION REQUEST «, t00=0x0107, t01=0x00b2}
0x19b8a…19b94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x00e6}
0x19b94…19bc8 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0107, t01=0x00f0}
0x19bc8…19bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x0124}
0x19bd2…19bee Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0107, t01=0x012e}
0x19bee…19c0a Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0107, t01=0x014a}
0x19c0a…19c2a Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0107, t01=0x0166}
0x19c2a…19c56 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0107, t01=0x0186}
0x19c56…19c60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x0022}
0x19c60…19c7c Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0108, t01=0x002c}
0x19c7c…19c92 Head {h00=0x0012, h01=0x0050, text=»* ABL DATA«, t00=0x0108, t01=0x0048}
0x19c92…19cc0 Head {h00=0x002a, h01=0x0050, text=»* A RETURN IS MADE TO THE LABEL READY«, t00=0x0108, t01=0x005e}
0x19cc0…19cca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x008c}
0x19cca…19ce6 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x0108, t01=0x0096}
0x19ce6…19d02 Head {h00=0x0018, h01=0x0050, text=»* A4 = RETURN CODE «, t00=0x0108, t01=0x00b2}
0x19d02…19d0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x00ce}
0x19d0c…19d1e Head {h00=0x000e, h01=0x0050, text=»DATA EQU *«, t00=0x0108, t01=0x00d8}
0x19d1e…19d48 Head {h00=0x0026, h01=0x0050, text=» LDK A4,INVSTA PRESET RETURN CODE «, t00=0x0108, t01=0x00ea}
0x19d48…19d60 Head {h00=0x0014, h01=0x0050, text=» LDK A1,DATA.ST «, t00=0x0108, t01=0x0114}
0x19d60…19d94 Head {h00=0x0030, h01=0x0050, text=» CC A1,LCSTAT,A13 LC-STATUS = DATA TRANSF. ?«, t00=0x0108, t01=0x012c}
0x19d94…19db4 Head {h00=0x001c, h01=0x0050, text=» RB(NE) CALL40 NO, ERROR«, t00=0x0108, t01=0x0160}
0x19db4…19dbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x0180}
0x19dbe…19de0 Head {h00=0x001e, h01=0x0050, text=»* QUEUE REQUEST AND RETURN«, t00=0x0108, t01=0x018a}
0x19de0…19dea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x001c}
0x19dea…19dfe Head {h00=0x0010, h01=0x0050, text=»DATA10 EQU *«, t00=0x0109, t01=0x0026}
0x19dfe…19e10 Head {h00=0x000e, h01=0x0050, text=» RB CALL20«, t00=0x0109, t01=0x003a}
0x19e10…19e1e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0109, t01=0x004c}
0x19e1e…19e28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x005a}
0x19e28…19e32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x0064}
0x19e32…19e5e Head {h00=0x0028, h01=0x0050, text=»* PROCESSING OF A DISCONNECT REQUEST«, t00=0x0109, t01=0x006e}
0x19e5e…19e68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x009a}
0x19e68…19e9c Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0109, t01=0x00a4}
0x19e9c…19ea6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x00d8}
0x19ea6…19ec2 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0109, t01=0x00e2}
0x19ec2…19ede Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0109, t01=0x00fe}
0x19ede…19efe Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0109, t01=0x011a}
0x19efe…19f2a Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0109, t01=0x013a}
0x19f2a…19f34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x0166}
0x19f34…19f50 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0109, t01=0x0170}
0x19f50…19f68 Head {h00=0x0014, h01=0x0050, text=»* ABL CLEAR «, t00=0x0109, t01=0x018c}
0x19f68…19f96 Head {h00=0x002a, h01=0x0050, text=»* A RETURN IS MADE TO THE LABEL READY«, t00=0x010a, t01=0x0014}
0x19f96…19fa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x0042}
0x19fa0…19fbc Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x010a, t01=0x004c}
0x19fbc…19fd8 Head {h00=0x0018, h01=0x0050, text=»* A4 = RETURN CODE «, t00=0x010a, t01=0x0068}
0x19fd8…19fe2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x0084}
0x19fe2…19ff6 Head {h00=0x0010, h01=0x0050, text=»CLEAR EQU * «, t00=0x010a, t01=0x008e}
0x19ff6…1a00c Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x010a, t01=0x00a2}
0x1a00c…1a048 Head {h00=0x0038, h01=0x0050, text=» LC A1,VCTYP,A13 PVC CONCERNING ? «, t00=0x010a, t01=0x00b8}
0x1a048…1a068 Head {h00=0x001c, h01=0x0050, text=» ANK A1,PVC«, t00=0x010a, t01=0x00f4}
0x1a068…1a082 Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLEA00 NO! «, t00=0x010a, t01=0x0114}
0x1a082…1a08e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x010a, t01=0x012e}
0x1a08e…1a0b6 Head {h00=0x0024, h01=0x0050, text=» CF A14,CLINPQ CLEAR INPUT QUEUE«, t00=0x010a, t01=0x013a}
0x1a0b6…1a0e6 Head {h00=0x002c, h01=0x0050, text=» CM LCDWT,A13 RELEASE RELATION WITH DWT «, t00=0x010a, t01=0x0162}
0x1a0e6…1a0f8 (267, 0, 400) Head {h00=0x000e, h01=0x0050, text=» RB CALL30«, t00=0x010b, t01=0x0004}
0x1a0f8…1a102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x0016}
0x1a102…1a118 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x010b, t01=0x0020}
0x1a118…1a12c Head {h00=0x0010, h01=0x0050, text=»CLEA00 EQU *«, t00=0x010b, t01=0x0036}
0x1a12c…1a158 Head {h00=0x0028, h01=0x0050, text=» LDK A1,CLEA.ST LC-STATUS = CLEAR ? «, t00=0x010b, t01=0x004a}
0x1a158…1a174 Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x010b, t01=0x0076}
0x1a174…1a1a8 Head {h00=0x0030, h01=0x0050, text=» RF(NE) CLEA10 NO «, t00=0x010b, t01=0x0092}
0x1a1a8…1a1b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x00c6}
0x1a1b2…1a1c0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010b, t01=0x00d0}
0x1a1c0…1a1ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x00de}
0x1a1ca…1a1e2 Head {h00=0x0014, h01=0x0050, text=»* REFUSE REQUEST«, t00=0x010b, t01=0x00e8}
0x1a1e2…1a1ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x0100}
0x1a1ec…1a212 Head {h00=0x0022, h01=0x0050, text=» LDK A4,CLEBUS SET RETURN CODE«, t00=0x010b, t01=0x010a}
0x1a212…1a224 Head {h00=0x000e, h01=0x0050, text=» RB CALL40«, t00=0x010b, t01=0x0130}
0x1a224…1a22e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x0142}
0x1a22e…1a244 Head {h00=0x0012, h01=0x0050, text=»* START TIMER «, t00=0x010b, t01=0x014c}
0x1a244…1a24e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x0162}
0x1a24e…1a26a Head {h00=0x0018, h01=0x0050, text=»CLEA10 EQU *«, t00=0x010b, t01=0x016c}
0x1a26a…1a290 Head {h00=0x0022, h01=0x0050, text=» LDKL A8,SYCLTM TIME-OUT VALUE«, t00=0x010b, t01=0x0188}
0x1a290…1a2b2 Head {h00=0x001e, h01=0x0050, text=» CF A14,STTIM START TIMER «, t00=0x010c, t01=0x001e}
0x1a2b2…1a2bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x0040}
0x1a2bc…1a2d4 Head {h00=0x0014, h01=0x0050, text=»* UPDATE LC-ADM «, t00=0x010c, t01=0x004a}
0x1a2d4…1a2de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x0062}
0x1a2de…1a30a Head {h00=0x0028, h01=0x0050, text=» LDK A1,CLEA.ST NEW STATUS := CLEAR «, t00=0x010c, t01=0x006c}
0x1a30a…1a326 Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSTAT,A13 . «, t00=0x010c, t01=0x0098}
0x1a326…1a330 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x00b4}
0x1a330…1a34c Head {h00=0x0018, h01=0x0050, text=»* EMPTY INPUT QUEUE «, t00=0x010c, t01=0x00be}
0x1a34c…1a356 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x00da}
0x1a356…1a37a Head {h00=0x0020, h01=0x0050, text=» CF A14,CLINPQ«, t00=0x010c, t01=0x00e4}
0x1a37a…1a384 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x0108}
0x1a384…1a3a6 Head {h00=0x001e, h01=0x0050, text=»* QUEUE ELEMENT AND RETURN«, t00=0x010c, t01=0x0112}
0x1a3a6…1a3b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x0134}
0x1a3b0…1a3c2 Head {h00=0x000e, h01=0x0050, text=» RB CALL20«, t00=0x010c, t01=0x013e}
0x1a3c2…1a3cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x0150}
0x1a3cc…1a3d8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x010c, t01=0x015a}
0x1a3d8…1a3e6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010c, t01=0x0166}
0x1a3e6…1a3f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x0174}
0x1a3f0…1a3fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x017e}
0x1a3fa…1a42a Head {h00=0x002c, h01=0x0050, text=»* PROCESSING OF THE ACCEPT DATA REQUEST «, t00=0x010c, t01=0x0188}
0x1a42a…1a434 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010d, t01=0x0028}
0x1a434…1a468 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x010d, t01=0x0032}
0x1a468…1a472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010d, t01=0x0066}
0x1a472…1a48e Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x010d, t01=0x0070}
0x1a48e…1a4aa Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x010d, t01=0x008c}
0x1a4aa…1a4ca Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x010d, t01=0x00a8}
0x1a4ca…1a4f6 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x010d, t01=0x00c8}
0x1a4f6…1a500 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010d, t01=0x00f4}
0x1a500…1a51c Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x010d, t01=0x00fe}
0x1a51c…1a532 Head {h00=0x0012, h01=0x0050, text=»* ABL RRR «, t00=0x010d, t01=0x011a}
0x1a532…1a560 Head {h00=0x002a, h01=0x0050, text=»* A RETURN IS MADE TO THE LABEL READY«, t00=0x010d, t01=0x0130}
0x1a560…1a56a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010d, t01=0x015e}
0x1a56a…1a586 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x010d, t01=0x0168}
0x1a586…1a5a2 Head {h00=0x0018, h01=0x0050, text=»* A4 = RETURN CODE «, t00=0x010d, t01=0x0184}
0x1a5a2…1a5ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0010}
0x1a5ac…1a5be Head {h00=0x000e, h01=0x0050, text=»RRR EQU * «, t00=0x010e, t01=0x001a}
0x1a5be…1a5e8 Head {h00=0x0026, h01=0x0050, text=» LDK A4,INVSTA PRESET RETURN CODE «, t00=0x010e, t01=0x002c}
0x1a5e8…1a600 Head {h00=0x0014, h01=0x0050, text=» LDK A1,DATA.ST «, t00=0x010e, t01=0x0056}
0x1a600…1a636 Head {h00=0x0032, h01=0x0050, text=» CC A1,LCSTAT,A13 LC-STATUS = DATA TRANSFER ? «, t00=0x010e, t01=0x006e}
0x1a636…1a656 Head {h00=0x001c, h01=0x0050, text=» RB(NE) CALL40 NO, ERROR«, t00=0x010e, t01=0x00a4}
0x1a656…1a660 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x00c4}
0x1a660…1a692 Head {h00=0x002e, h01=0x0050, text=»* QUEUE ELEMENT AS FIRST FOR TRANSMISSION «, t00=0x010e, t01=0x00ce}
0x1a692…1a69c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0100}
0x1a69c…1a6bc Head {h00=0x001c, h01=0x0050, text=» RF INTR00«, t00=0x010e, t01=0x010a}
0x1a6bc…1a6ca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010e, t01=0x012a}
0x1a6ca…1a6d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0138}
0x1a6d4…1a6de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0142}
0x1a6de…1a70e Head {h00=0x002c, h01=0x0050, text=»* PROCESSING OF THE REFUSE DATA REQUEST «, t00=0x010e, t01=0x014c}
0x1a70e…1a718 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x017c}
0x1a718…1a74c Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x010e, t01=0x0186}
0x1a74c…1a756 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x002a}
0x1a756…1a772 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x010f, t01=0x0034}
0x1a772…1a78e Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x010f, t01=0x0050}
0x1a78e…1a7ae Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x010f, t01=0x006c}
0x1a7ae…1a7da Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x010f, t01=0x008c}
0x1a7da…1a7e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x00b8}
0x1a7e4…1a800 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x010f, t01=0x00c2}
0x1a800…1a816 Head {h00=0x0012, h01=0x0050, text=»* ABL RNRR«, t00=0x010f, t01=0x00de}
0x1a816…1a844 Head {h00=0x002a, h01=0x0050, text=»* A RETURN IS MADE TO THE LABEL READY«, t00=0x010f, t01=0x00f4}
0x1a844…1a84e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x0122}
0x1a84e…1a86a Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x010f, t01=0x012c}
0x1a86a…1a886 Head {h00=0x0018, h01=0x0050, text=»* A4 = RETURN CODE «, t00=0x010f, t01=0x0148}
0x1a886…1a890 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x0164}
0x1a890…1a8a2 Head {h00=0x000e, h01=0x0050, text=»RNRR EQU *«, t00=0x010f, t01=0x016e}
0x1a8a2…1a8cc Head {h00=0x0026, h01=0x0050, text=» LDK A4,INVSTA PRESET RETURN CODE «, t00=0x010f, t01=0x0180}
0x1a8cc…1a8e4 Head {h00=0x0014, h01=0x0050, text=» LDK A1,DATA.ST «, t00=0x0110, t01=0x001a}
0x1a8e4…1a91a Head {h00=0x0032, h01=0x0050, text=» CC A1,LCSTAT,A13 LC-STATUS = DATA TRANSFER ? «, t00=0x0110, t01=0x0032}
0x1a91a…1a93a Head {h00=0x001c, h01=0x0050, text=» RB(NE) CALL40 NO, ERROR«, t00=0x0110, t01=0x0068}
0x1a93a…1a944 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x0088}
0x1a944…1a960 Head {h00=0x0018, h01=0x0050, text=»* BLOCK INPUT QUEUE «, t00=0x0110, t01=0x0092}
0x1a960…1a96a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x00ae}
0x1a96a…1a980 Head {h00=0x0012, h01=0x0050, text=» LDK A1,NPRFLG«, t00=0x0110, t01=0x00b8}
0x1a980…1a99a Head {h00=0x0016, h01=0x0050, text=» ORS A1,QUEINP,A13«, t00=0x0110, t01=0x00ce}
0x1a99a…1a9a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x00e8}
0x1a9a4…1a9cc Head {h00=0x0024, h01=0x0050, text=»* QUEUE ELEMENT FOR TRANSMISSION«, t00=0x0110, t01=0x00f2}
0x1a9cc…1a9d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x011a}
0x1a9d6…1a9f6 Head {h00=0x001c, h01=0x0050, text=» RF INTR00«, t00=0x0110, t01=0x0124}
0x1a9f6…1aa04 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0110, t01=0x0144}
0x1aa04…1aa0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x0152}
0x1aa0e…1aa18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x015c}
0x1aa18…1aa4c Head {h00=0x0030, h01=0x0050, text=»* PROCESSING OF THE WRITE INTERRUPT REQUEST «, t00=0x0110, t01=0x0166}
0x1aa4c…1aa56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x000a}
0x1aa56…1aa8a Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0111, t01=0x0014}
0x1aa8a…1aa94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x0048}
0x1aa94…1aab0 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0111, t01=0x0052}
0x1aab0…1aacc Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0111, t01=0x006e}
0x1aacc…1aaec Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0111, t01=0x008a}
0x1aaec…1ab18 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0111, t01=0x00aa}
0x1ab18…1ab22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x00d6}
0x1ab22…1ab3e Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0111, t01=0x00e0}
0x1ab3e…1ab54 Head {h00=0x0012, h01=0x0050, text=»* ABL INTR«, t00=0x0111, t01=0x00fc}
0x1ab54…1ab5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x0112}
0x1ab5e…1ab7a Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x0111, t01=0x011c}
0x1ab7a…1ab96 Head {h00=0x0018, h01=0x0050, text=»* A4 = RETURN CODE «, t00=0x0111, t01=0x0138}
0x1ab96…1aba0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x0154}
0x1aba0…1abb2 Head {h00=0x000e, h01=0x0050, text=»INTR EQU *«, t00=0x0111, t01=0x015e}
0x1abb2…1abdc Head {h00=0x0026, h01=0x0050, text=» LDK A4,INVSTA PRESET RETURN CODE «, t00=0x0111, t01=0x0170}
0x1abdc…1abf4 Head {h00=0x0014, h01=0x0050, text=» LDK A1,DATA.ST «, t00=0x0112, t01=0x000a}
0x1abf4…1ac2a Head {h00=0x0032, h01=0x0050, text=» CC A1,LCSTAT,A13 LC-STATUS = DATA TRANSFER ? «, t00=0x0112, t01=0x0022}
0x1ac2a…1ac4a Head {h00=0x001c, h01=0x0050, text=» RB(NE) CALL40 NO, ERROR«, t00=0x0112, t01=0x0058}
0x1ac4a…1ac70 Head {h00=0x0022, h01=0x0050, text=» LDK A4,SEQE.RC SEQUENCE ERROR«, t00=0x0112, t01=0x0078}
0x1ac70…1ac9a Head {h00=0x0026, h01=0x0050, text=» LDK A1,INTPNG INTERRUPT PENDING ?«, t00=0x0112, t01=0x009e}
0x1ac9a…1acb4 Head {h00=0x0016, h01=0x0050, text=» AN A1,FLAGS,A13 .«, t00=0x0112, t01=0x00c8}
0x1acb4…1acd0 Head {h00=0x0018, h01=0x0050, text=» RB(NZ) CALL40 YES !«, t00=0x0112, t01=0x00e2}
0x1acd0…1ad1a Head {h00=0x0046, h01=0x0050, text=» LDK A1,INTPNG SET INTERRUPT PENDING FLAG«, t00=0x0112, t01=0x00fe}
0x1ad1a…1ad40 Head {h00=0x0022, h01=0x0050, text=» ORS A1,FLAGS,A13«, t00=0x0112, t01=0x0148}
0x1ad40…1ad4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0112, t01=0x016e}
0x1ad4a…1ad58 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0112, t01=0x0178}
0x1ad58…1ad62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0112, t01=0x0186}
0x1ad62…1ad8a Head {h00=0x0024, h01=0x0050, text=»* QUEUE ELEMENT FOR TRANSMISSION«, t00=0x0112, t01=0x0190}
0x1ad8a…1ad94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0028}
0x1ad94…1adb0 Head {h00=0x0018, h01=0x0050, text=»INTR00 EQU * «, t00=0x0113, t01=0x0032}
0x1adb0…1add2 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A6 ELEMENT ADDRESS«, t00=0x0113, t01=0x004e}
0x1add2…1adfa Head {h00=0x0024, h01=0x0050, text=» LDR A1,A13 QUEUE ANCHOR ADDRESS«, t00=0x0113, t01=0x0070}
0x1adfa…1ae12 Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEOUT .«, t00=0x0113, t01=0x0098}
0x1ae12…1ae40 Head {h00=0x002a, h01=0x0050, text=» CF A14,QUEUEF QUEUE AS FIRST ELEMENT «, t00=0x0113, t01=0x00b0}
0x1ae40…1ae70 Head {h00=0x002c, h01=0x0050, text=» LDK A2,NPRFLG RESET NO PROCESSING FLAG «, t00=0x0113, t01=0x00de}
0x1ae70…1ae84 Head {h00=0x0010, h01=0x0050, text=» C1R A2,A2 .«, t00=0x0113, t01=0x010e}
0x1ae84…1ae9a Head {h00=0x0012, h01=0x0050, text=» ANRS A2,A1 . «, t00=0x0113, t01=0x0122}
0x1ae9a…1aebc Head {h00=0x001e, h01=0x0050, text=» ABL CALL30 BACK TO CALLER«, t00=0x0113, t01=0x0138}
0x1aebc…1aeca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0113, t01=0x015a}
0x1aeca…1aed4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0168}
0x1aed4…1aede Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0172}
0x1aede…1af14 Head {h00=0x0032, h01=0x0050, text=»* THIS MODULE GETS CONTROL FROM THE SCHEDULER «, t00=0x0113, t01=0x017c}
0x1af14…1af3c Head {h00=0x0024, h01=0x0050, text=»* IN ORDER TO TRANSMIT A PACKET «, t00=0x0114, t01=0x0022}
0x1af3c…1af46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x004a}
0x1af46…1af7a Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0114, t01=0x0054}
0x1af7a…1af84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x0088}
0x1af84…1afa0 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0114, t01=0x0092}
0x1afa0…1afc6 Head {h00=0x0022, h01=0x0050, text=»* A1 = QUEUE ANCHOR ADDRESS «, t00=0x0114, t01=0x00ae}
0x1afc6…1afea Head {h00=0x0020, h01=0x0050, text=»* A12 = LINE BLOCK ADDRESS «, t00=0x0114, t01=0x00d4}
0x1afea…1b00a Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0114, t01=0x00f8}
0x1b00a…1b036 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0114, t01=0x0118}
0x1b036…1b040 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x0144}
0x1b040…1b05c Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0114, t01=0x014e}
0x1b05c…1b074 Head {h00=0x0014, h01=0x0050, text=»* ABL OUTPCK«, t00=0x0114, t01=0x016a}
0x1b074…1b07e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x0182}
0x1b07e…1b092 Head {h00=0x0010, h01=0x0050, text=»OUTPCK EQU *«, t00=0x0114, t01=0x018c}
0x1b092…1b09c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0115, t01=0x0010}
0x1b09c…1b0b8 Head {h00=0x0018, h01=0x0050, text=»* GET AN OUTPUT ECB «, t00=0x0115, t01=0x001a}
0x1b0b8…1b0c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0115, t01=0x0036}
0x1b0c2…1b0e6 Head {h00=0x0020, h01=0x0050, text=» LDR A3,A12 FIRST OUTPUT ECB«, t00=0x0115, t01=0x0040}
0x1b0e6…1b0fe Head {h00=0x0014, h01=0x0050, text=» ADK A3,ECBOU1 .«, t00=0x0115, t01=0x0064}
0x1b0fe…1b112 Head {h00=0x0010, h01=0x0050, text=»OUTP00 EQU *«, t00=0x0115, t01=0x007c}
0x1b112…1b138 Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBBA,A3 IS ECB BUSY ? «, t00=0x0115, t01=0x0090}
0x1b138…1b150 Head {h00=0x0014, h01=0x0050, text=» RF(Z) OUTP10 NO«, t00=0x0115, t01=0x00b6}
0x1b150…1b17e Head {h00=0x002a, h01=0x0050, text=» ADK A3,ECBINL+SYSBFL NEXT OUTPUT ECB «, t00=0x0115, t01=0x00ce}
0x1b17e…1b192 Head {h00=0x0010, h01=0x0050, text=» RB OUTP00 .«, t00=0x0115, t01=0x00fc}
0x1b192…1b19c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0115, t01=0x0110}
0x1b19c…1b1b0 Head {h00=0x0010, h01=0x0050, text=»OUTP10 EQU *«, t00=0x0115, t01=0x011a}
0x1b1b0…1b1ce Head {h00=0x001a, h01=0x0050, text=» LDR A8,A3 ECB-ADDRESS«, t00=0x0115, t01=0x012e}
0x1b1ce…1b1e4 Head {h00=0x0012, h01=0x0050, text=» ADK A3,ECBINL«, t00=0x0115, t01=0x014c}
0x1b1e4…1b210 Head {h00=0x0028, h01=0x0050, text=» ST A3,ECBBA,A8 SYSTEM OUTPUT BUFFER«, t00=0x0115, t01=0x0162}
0x1b210…1b236 Head {h00=0x0022, h01=0x0050, text=» CM HDLC,A3 CLEAR HDLC-HEADER «, t00=0x0115, t01=0x018e}
0x1b236…1b24a Head {h00=0x0010, h01=0x0050, text=» LDK A4,/10 «, t00=0x0116, t01=0x0024}
0x1b24a…1b27c Head {h00=0x002e, h01=0x0050, text=» SC A4,GNFRM,A3 GENERAL FORMAT IDENTIFIER «, t00=0x0116, t01=0x0038}
0x1b27c…1b286 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0116, t01=0x006a}
0x1b286…1b294 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0116, t01=0x0074}
0x1b294…1b29e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0116, t01=0x0082}
0x1b29e…1b2c2 Head {h00=0x0020, h01=0x0050, text=»* DEQUEUE AND CHECK ELEMENT «, t00=0x0116, t01=0x008c}
0x1b2c2…1b2cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0116, t01=0x00b0}
0x1b2cc…1b2ee Head {h00=0x001e, h01=0x0050, text=» CF A14,DEQUE GET ELEMENT «, t00=0x0116, t01=0x00ba}
0x1b2ee…1b31c Head {h00=0x002a, h01=0x0050, text=» ST A1,SAVE SAVE QUEUE ANCHOR ADDRESS «, t00=0x0116, t01=0x00dc}
0x1b31c…1b334 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,DWTTYP «, t00=0x0116, t01=0x010a}
0x1b334…1b358 Head {h00=0x0020, h01=0x0050, text=» CW A1,DWTCHP,A2 CHECK TYPE «, t00=0x0116, t01=0x0122}
0x1b358…1b376 Head {h00=0x001a, h01=0x0050, text=» ABL(NE) OUT400 NO DWT«, t00=0x0116, t01=0x0146}
0x1b376…1b39a Head {h00=0x0020, h01=0x0050, text=» LDR A6,A2 SAVE DWT-ADDRESS «, t00=0x0116, t01=0x0164}
0x1b39a…1b3c2 Head {h00=0x0024, h01=0x0050, text=» LD A9,DWTECB,A6 GET ECB-ADDRESS«, t00=0x0116, t01=0x0188}
0x1b3c2…1b3f2 Head {h00=0x002c, h01=0x0050, text=» ABL(Z) EXITDC ELEMENT ALREADY COMPLETED«, t00=0x0117, t01=0x0020}
0x1b3f2…1b40a Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTLCN,A6«, t00=0x0117, t01=0x0050}
0x1b40a…1b43a Head {h00=0x002c, h01=0x0050, text=» SC A4,LCIDNT,A3 LOGICAL CHANNEL NUMBER «, t00=0x0117, t01=0x0068}
0x1b43a…1b444 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x0098}
0x1b444…1b468 Head {h00=0x0020, h01=0x0050, text=»* SELECTION ON REQUEST TYPE «, t00=0x0117, t01=0x00a2}
0x1b468…1b472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x00c6}
0x1b472…1b498 Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 SAVE BUFFER ADDRESS«, t00=0x0117, t01=0x00d0}
0x1b498…1b4c2 Head {h00=0x0026, h01=0x0050, text=» LC A3,DWTFNC,A6 GET FUNCTION CODE«, t00=0x0117, t01=0x00f6}
0x1b4c2…1b4d8 Head {h00=0x0012, h01=0x0050, text=» ANK A3,/FF . «, t00=0x0117, t01=0x0120}
0x1b4d8…1b4ee Head {h00=0x0012, h01=0x0050, text=» SUK A3,CONACT«, t00=0x0117, t01=0x0136}
0x1b4ee…1b504 Head {h00=0x0012, h01=0x0050, text=» ABI OUTTAB,A3«, t00=0x0117, t01=0x014c}
0x1b504…1b50e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x0162}
0x1b50e…1b51c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0117, t01=0x016c}
0x1b51c…1b526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x017a}
0x1b526…1b544 Head {h00=0x001a, h01=0x0050, text=»* REQUEST OUTPUT TABLE«, t00=0x0117, t01=0x0184}
0x1b544…1b54e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x0012}
0x1b54e…1b562 Head {h00=0x0010, h01=0x0050, text=»OUTTAB EQU *«, t00=0x0118, t01=0x001c}
0x1b562…1b578 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0118, t01=0x0030}
0x1b578…1b5a4 Head {h00=0x0028, h01=0x0050, text=» DATA OUT100 CONNECT ACTIVE REQUEST «, t00=0x0118, t01=0x0046}
0x1b5a4…1b5ce Head {h00=0x0026, h01=0x0050, text=» DATA HLT CONNECT PASSIVE REQUEST «, t00=0x0118, t01=0x0072}
0x1b5ce…1b5f6 Head {h00=0x0024, h01=0x0050, text=» DATA OUT200 DISCONNECT REQUEST «, t00=0x0118, t01=0x009c}
0x1b5f6…1b616 Head {h00=0x001c, h01=0x0050, text=» DATA OUT210 ACCEPT CALL«, t00=0x0118, t01=0x00c4}
0x1b616…1b622 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0118, t01=0x00e4}
0x1b622…1b638 Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0118, t01=0x00f0}
0x1b638…1b660 Head {h00=0x0024, h01=0x0050, text=» DATA HLT CONNECT ACTIVE REQUEST«, t00=0x0118, t01=0x0106}
0x1b660…1b68a Head {h00=0x0026, h01=0x0050, text=» DATA HLT CONNECT PASSIVE REQUEST «, t00=0x0118, t01=0x012e}
0x1b68a…1b6ae Head {h00=0x0020, h01=0x0050, text=» DATA HLT DISCONNECT REQUEST«, t00=0x0118, t01=0x0158}
0x1b6ae…1b6cc Head {h00=0x001a, h01=0x0050, text=» DATA HLT ACCEPT CALL «, t00=0x0118, t01=0x017c}
0x1b6cc…1b6d8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0119, t01=0x000a}
0x1b6d8…1b6f8 Head {h00=0x001c, h01=0x0050, text=» DATA OUT300 ACCEPT DATA«, t00=0x0119, t01=0x0016}
0x1b6f8…1b720 Head {h00=0x0024, h01=0x0050, text=» DATA OUT310 REFUSE DATA REQUEST«, t00=0x0119, t01=0x0036}
0x1b720…1b742 Head {h00=0x001e, h01=0x0050, text=» DATA OUT000 WRITE REQUEST«, t00=0x0119, t01=0x005e}
0x1b742…1b76e Head {h00=0x0028, h01=0x0050, text=» DATA OUT220 WRITE INTERRUPT REQUEST«, t00=0x0119, t01=0x0080}
0x1b76e…1b794 Head {h00=0x0022, h01=0x0050, text=» DATA OUT300 READ(ACCEPT DATA)«, t00=0x0119, t01=0x00ac}
0x1b794…1b79e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x00d2}
0x1b79e…1b7b6 Head {h00=0x0014, h01=0x0050, text=»HLT HLT ILLEGAL«, t00=0x0119, t01=0x00dc}
0x1b7b6…1b7c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x00f4}
0x1b7c0…1b7ce Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0119, t01=0x00fe}
0x1b7ce…1b7d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x010c}
0x1b7d8…1b806 Head {h00=0x002a, h01=0x0050, text=»* A DATA PACKET HAS TO BE TRANSMITTED «, t00=0x0119, t01=0x0116}
0x1b806…1b810 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x0144}
0x1b810…1b824 Head {h00=0x0010, h01=0x0050, text=»OUT000 EQU *«, t00=0x0119, t01=0x014e}
0x1b824…1b83a Head {h00=0x0012, h01=0x0050, text=» LDK A1,REMBUS«, t00=0x0119, t01=0x0162}
0x1b83a…1b86c Head {h00=0x002e, h01=0x0050, text=» AN A1,FLAGS,A13 IS REMOTE STATION BUSY ? «, t00=0x0119, t01=0x0178}
0x1b86c…1b886 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) OUT050 YES«, t00=0x011a, t01=0x001a}
0x1b886…1b890 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x0034}
0x1b890…1b8aa Head {h00=0x0016, h01=0x0050, text=»* IS WINDOW FULL ?«, t00=0x011a, t01=0x003e}
0x1b8aa…1b8b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x0058}
0x1b8b4…1b8c6 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x011a, t01=0x0062}
0x1b8c6…1b8d8 Head {h00=0x000e, h01=0x0050, text=» LDK A5,0 «, t00=0x011a, t01=0x0074}
0x1b8d8…1b902 Head {h00=0x0026, h01=0x0050, text=» LC A4,PS,A13 PS TO BE TRANSMITTED«, t00=0x011a, t01=0x0086}
0x1b902…1b930 Head {h00=0x002a, h01=0x0050, text=» LC A5,SLWE,A13 SEND LOWER WINDOW EDGE«, t00=0x011a, t01=0x00b0}
0x1b930…1b94c Head {h00=0x0018, h01=0x0050, text=» SUR A4,A5 PS - LWE «, t00=0x011a, t01=0x00de}
0x1b94c…1b968 Head {h00=0x0018, h01=0x0050, text=» ANK A4,/07 MODULO 8«, t00=0x011a, t01=0x00fa}
0x1b968…1b99c Head {h00=0x0030, h01=0x0050, text=» CC A4,LCTRWN,A13 MUST BE WITHIN WINDOW SIZE«, t00=0x011a, t01=0x0116}
0x1b99c…1b9c2 Head {h00=0x0022, h01=0x0050, text=» RF(NL) OUT050 WINDOW IS FULL «, t00=0x011a, t01=0x014a}
0x1b9c2…1b9cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x0170}
0x1b9cc…1b9f0 Head {h00=0x0020, h01=0x0050, text=»* PREPARE DATA PACKET HEADER«, t00=0x011a, t01=0x017a}
0x1b9f0…1b9fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011b, t01=0x000e}
0x1b9fa…1ba20 Head {h00=0x0022, h01=0x0050, text=» LC A1,DWTWRO,A6 WRITE OPTION «, t00=0x011b, t01=0x0018}
0x1ba20…1ba3a Head {h00=0x0016, h01=0x0050, text=» LDR A3,A1 SAVE IT«, t00=0x011b, t01=0x003e}
0x1ba3a…1ba4e Head {h00=0x0010, h01=0x0050, text=» ANK A1,QPOS«, t00=0x011b, t01=0x0058}
0x1ba4e…1ba60 Head {h00=0x000e, h01=0x0050, text=» ECR A1,A1«, t00=0x011b, t01=0x006c}
0x1ba60…1ba86 Head {h00=0x0022, h01=0x0050, text=» ORS A1,GNFRM,A2 INCLUDE Q-BIT«, t00=0x011b, t01=0x007e}
0x1ba86…1ba9e Head {h00=0x0014, h01=0x0050, text=» LC A1,PS,A13 PS«, t00=0x011b, t01=0x00a4}
0x1ba9e…1bacc Head {h00=0x002a, h01=0x0050, text=» SLL A1,1 PUT IT ON THE RIGHT POSITION«, t00=0x011b, t01=0x00bc}
0x1bacc…1bae0 Head {h00=0x0010, h01=0x0050, text=» ANK A3,MPOS«, t00=0x011b, t01=0x00ea}
0x1bae0…1bb00 Head {h00=0x001c, h01=0x0050, text=» ORR A1,A3 INCLUDE M-BIT«, t00=0x011b, t01=0x00fe}
0x1bb00…1bb18 Head {h00=0x0014, h01=0x0050, text=» LC A3,PR,A13 PR«, t00=0x011b, t01=0x011e}
0x1bb18…1bb62 Head {h00=0x0046, h01=0x0050, text=» SC A3,RLWE,A13 SAVE IT AS LAST TRANSMITTED PR «, t00=0x011b, t01=0x0136}
0x1bb62…1bb90 Head {h00=0x002a, h01=0x0050, text=» SLL A3,5 PUT IT ON THE RIGHT POSITION«, t00=0x011b, t01=0x0180}
0x1bb90…1bbb0 Head {h00=0x001c, h01=0x0050, text=» ORR A1,A3 ALL TOGETHER «, t00=0x011c, t01=0x001e}
0x1bbb0…1bbba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x003e}
0x1bbba…1bbc8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011c, t01=0x0048}
0x1bbc8…1bbd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x0056}
0x1bbd2…1bbfa Head {h00=0x0024, h01=0x0050, text=»* INCREMENT SEND SEQUENCE NUMBER«, t00=0x011c, t01=0x0060}
0x1bbfa…1bc04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x0088}
0x1bc04…1bc3a Head {h00=0x0032, h01=0x0050, text=» LC A5,PS,A13 GET OLD PS «, t00=0x011c, t01=0x0092}
0x1bc3a…1bc6e Head {h00=0x0030, h01=0x0050, text=» ADK A5,1 INCREMENT«, t00=0x011c, t01=0x00c8}
0x1bc6e…1bca2 Head {h00=0x0030, h01=0x0050, text=» ANK A5,/07 MODULO 8 «, t00=0x011c, t01=0x00fc}
0x1bca2…1bcd8 Head {h00=0x0032, h01=0x0050, text=» SC A5,PS,A13 SAVE NEW PS«, t00=0x011c, t01=0x0130}
0x1bcd8…1bd0e Head {h00=0x0032, h01=0x0050, text=» SC A1,IDENT,A2 SAVE PS & PR IN OUTPUT BUFFER «, t00=0x011c, t01=0x0166}
0x1bd0e…1bd18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x000c}
0x1bd18…1bd42 Head {h00=0x0026, h01=0x0050, text=»* COPY USER DATA TO OUTPUT BUFFER «, t00=0x011d, t01=0x0016}
0x1bd42…1bd4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x0040}
0x1bd4c…1bd78 Head {h00=0x0028, h01=0x0050, text=» LD A1,ECBBA,A9 USER BUFFER ADDRESS «, t00=0x011d, t01=0x004a}
0x1bd78…1bd9c Head {h00=0x0020, h01=0x0050, text=» ADK A2,BEGDAT WHERE TO MOVE«, t00=0x011d, t01=0x0076}
0x1bd9c…1bdb4 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBRL,A9 «, t00=0x011d, t01=0x009a}
0x1bdb4…1bdc6 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x011d, t01=0x00b2}
0x1bdc6…1bddc Head {h00=0x0012, h01=0x0050, text=» ADK A4,BEGDAT«, t00=0x011d, t01=0x00c4}
0x1bddc…1be02 Head {h00=0x0022, h01=0x0050, text=» ST A4,ECBRL,A8 OUTPUT BUFFER «, t00=0x011d, t01=0x00da}
0x1be02…1be1a Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTTAB,A6«, t00=0x011d, t01=0x0100}
0x1be1a…1be48 Head {h00=0x002a, h01=0x0050, text=» CF A15,MOVUS MOVE FROM USER TO SYSTEM«, t00=0x011d, t01=0x0118}
0x1be48…1be52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x0146}
0x1be52…1be70 Head {h00=0x001a, h01=0x0050, text=»* ISSUE OUTPUT REQUEST«, t00=0x011d, t01=0x0150}
0x1be70…1be7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x016e}
0x1be7a…1be8e Head {h00=0x0010, h01=0x0050, text=»OUT040 EQU *«, t00=0x011d, t01=0x0178}
0x1be8e…1beb2 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A8 PARAMETER ADDRESS«, t00=0x011d, t01=0x018c}
0x1beb2…1bed4 Head {h00=0x001e, h01=0x0050, text=» LDK A7,TRANSM ORDER CODE «, t00=0x011e, t01=0x0020}
0x1bed4…1bede Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x0042}
0x1bede…1beea Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x011e, t01=0x004c}
0x1beea…1befa Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x011e, t01=0x0058}
0x1befa…1bf30 Head {h00=0x0032, h01=0x0050, text=» DATA ENDOUT ACTIVATION LABEL AFTER COMPLETION«, t00=0x011e, t01=0x0068}
0x1bf30…1bf7e Head {h00=0x004a, h01=0x0050, text=» IM NRPNDT,A12 INCREMENT NUMBER OF PENDING OUTPUT «, t00=0x011e, t01=0x009e}
0x1bf7e…1bfaa Head {h00=0x0028, h01=0x0050, text=» RF OUT060 CONTROL BACK TO SCHEDULER«, t00=0x011e, t01=0x00ec}
0x1bfaa…1bfb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x0118}
0x1bfb4…1bfc2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011e, t01=0x0122}
0x1bfc2…1bfcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x0130}
0x1bfcc…1bffc Head {h00=0x002c, h01=0x0050, text=»* NO TRANSMISSION ALLOWED AT THIS MOMENT«, t00=0x011e, t01=0x013a}
0x1bffc…1c006 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x016a}
0x1c006…1c01a Head {h00=0x0010, h01=0x0050, text=»OUT050 EQU *«, t00=0x011e, t01=0x0174}
0x1c01a…1c03c Head {h00=0x001e, h01=0x0050, text=» CM ECBBA,A8«, t00=0x011e, t01=0x0188}
0x1c03c…1c064 Head {h00=0x0024, h01=0x0050, text=» LD A1,SAVE QUEUE ANCHOR ADDRESS«, t00=0x011f, t01=0x001a}
0x1c064…1c086 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A6 ELEMENT ADDRESS«, t00=0x011f, t01=0x0042}
0x1c086…1c0b2 Head {h00=0x0028, h01=0x0050, text=» CF A14,QUEUEF ELEMENT BACK TO QUEUE«, t00=0x011f, t01=0x0064}
0x1c0b2…1c0e2 Head {h00=0x002c, h01=0x0050, text=» LDK A2,NPRFLG SET "NO PROCESSING" FLAG «, t00=0x011f, t01=0x0090}
0x1c0e2…1c0f8 Head {h00=0x0012, h01=0x0050, text=» ORRS A2,A1 . «, t00=0x011f, t01=0x00c0}
0x1c0f8…1c10c Head {h00=0x0010, h01=0x0050, text=»OUT060 EQU *«, t00=0x011f, t01=0x00d6}
0x1c10c…1c13a Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x011f, t01=0x00ea}
0x1c13a…1c150 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x011f, t01=0x0118}
0x1c150…1c15a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x012e}
0x1c15a…1c168 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011f, t01=0x0138}
0x1c168…1c172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x0146}
0x1c172…1c19c Head {h00=0x0026, h01=0x0050, text=»* PREPARE AND TRANSMIT CALL PACKET«, t00=0x011f, t01=0x0150}
0x1c19c…1c1a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x017a}
0x1c1a6…1c1ba Head {h00=0x0010, h01=0x0050, text=»OUT100 EQU *«, t00=0x011f, t01=0x0184}
0x1c1ba…1c1d0 Head {h00=0x0012, h01=0x0050, text=» LDK A1,CAL.P «, t00=0x0120, t01=0x0008}
0x1c1d0…1c1f4 Head {h00=0x0020, h01=0x0050, text=» SC A1,IDENT,A2 PACKET TYPE «, t00=0x0120, t01=0x001e}
0x1c1f4…1c1fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x0042}
0x1c1fe…1c21e Head {h00=0x001c, h01=0x0050, text=»* GET REMOTE DTE-ADDRESS«, t00=0x0120, t01=0x004c}
0x1c21e…1c228 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x006c}
0x1c228…1c240 Head {h00=0x0014, h01=0x0050, text=» ADK A2,BEGDAT+1«, t00=0x0120, t01=0x0076}
0x1c240…1c252 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0120, t01=0x008e}
0x1c252…1c26a Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTRAD,A6«, t00=0x0120, t01=0x00a0}
0x1c26a…1c28a Head {h00=0x001c, h01=0x0050, text=» LDKL A3,SVCTYP SET TYPE«, t00=0x0120, t01=0x00b8}
0x1c28a…1c29c Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x0120, t01=0x00d8}
0x1c29c…1c2c8 Head {h00=0x0028, h01=0x0050, text=» CF A15,GETDNT GET REAL DTE-ADDRESS «, t00=0x0120, t01=0x00ea}
0x1c2c8…1c2da Head {h00=0x000e, h01=0x0050, text=» ENB . =1«, t00=0x0120, t01=0x0116}
0x1c2da…1c2f8 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A1 SAVE LENGTH«, t00=0x0120, t01=0x0128}
0x1c2f8…1c30e Head {h00=0x0012, h01=0x0050, text=» IFT CALDTE=1 «, t00=0x0120, t01=0x0146}
0x1c30e…1c318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x015c}
0x1c318…1c338 Head {h00=0x001c, h01=0x0050, text=»* GET LOCAL DTE-ADDRESS «, t00=0x0120, t01=0x0166}
0x1c338…1c342 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x0186}
0x1c342…1c362 Head {h00=0x001c, h01=0x0050, text=» LDR A7,A2 SAVE ADDRESS «, t00=0x0120, t01=0x0190}
0x1c362…1c37a Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTLAD,A6«, t00=0x0121, t01=0x0020}
0x1c37a…1c38c Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x0121, t01=0x0038}
0x1c38c…1c3ba Head {h00=0x002a, h01=0x0050, text=» CF A15,GETDNA GET DTE NETWORK ADDRESS«, t00=0x0121, t01=0x004a}
0x1c3ba…1c3cc Head {h00=0x000e, h01=0x0050, text=» ENB . =1«, t00=0x0121, t01=0x0078}
0x1c3cc…1c3f6 Head {h00=0x0026, h01=0x0050, text=» SLL A1,4 PUT IT IN RIGTH POSITION«, t00=0x0121, t01=0x008a}
0x1c3f6…1c428 Head {h00=0x002e, h01=0x0050, text=» ORR A3,A1 CALLING AND CALLED DTE-ADDRESS «, t00=0x0121, t01=0x00b4}
0x1c428…1c432 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x00e6}
0x1c432…1c440 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0121, t01=0x00f0}
0x1c440…1c44a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x00fe}
0x1c44a…1c47e Head {h00=0x0030, h01=0x0050, text=»* TEST IF LOCAL DTE-ADDRESS HAS TO BE MOVED «, t00=0x0121, t01=0x0108}
0x1c47e…1c488 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x013c}
0x1c488…1c4b8 Head {h00=0x002c, h01=0x0050, text=» LDR A5,A3 REMOTE DTE-ADDRESS LENGTH... «, t00=0x0121, t01=0x0146}
0x1c4b8…1c4e8 Head {h00=0x002c, h01=0x0050, text=» ANK A5,/01 GIVES SEMI-OCTET BOUNDARY ? «, t00=0x0121, t01=0x0176}
0x1c4e8…1c500 Head {h00=0x0014, h01=0x0050, text=» RF(Z) OUT145 NO«, t00=0x0122, t01=0x0016}
0x1c500…1c50a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x002e}
0x1c50a…1c52a Head {h00=0x001c, h01=0x0050, text=»* MOVE LOCAL DTE-ADDRESS«, t00=0x0122, t01=0x0038}
0x1c52a…1c534 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0058}
0x1c534…1c560 Head {h00=0x0028, h01=0x0050, text=» SRL A1,4 A1:=LENGTH IN SEMI-OCTETS «, t00=0x0122, t01=0x0062}
0x1c560…1c586 Head {h00=0x0022, h01=0x0050, text=» LDR A5,A7 A7:=WHERE TO GET IT«, t00=0x0122, t01=0x008e}
0x1c586…1c5ae Head {h00=0x0024, h01=0x0050, text=» SUK A5,/01 A5:=WHERE TO PUT IT «, t00=0x0122, t01=0x00b4}
0x1c5ae…1c5c2 Head {h00=0x0010, h01=0x0050, text=»OUT130 EQU *«, t00=0x0122, t01=0x00dc}
0x1c5c2…1c5f2 Head {h00=0x002c, h01=0x0050, text=» LCR A2,A5 GET STORED SECOND SEMI-OCTET «, t00=0x0122, t01=0x00f0}
0x1c5f2…1c604 Head {h00=0x000e, h01=0x0050, text=» SLL A2,4 «, t00=0x0122, t01=0x0120}
0x1c604…1c616 Head {h00=0x000e, h01=0x0050, text=» LCR A2,A7«, t00=0x0122, t01=0x0132}
0x1c616…1c644 Head {h00=0x002a, h01=0x0050, text=» SRL A2,4 PUT TWO SEMI-OCTETS TOGETHER«, t00=0x0122, t01=0x0144}
0x1c644…1c666 Head {h00=0x001e, h01=0x0050, text=» SCR A2,A5 AND STORE THEM «, t00=0x0122, t01=0x0172}
0x1c666…1c68e (291, 0, 398) Head {h00=0x0024, h01=0x0050, text=» ADK A5,1 INCREMENT 'TO'-POINTER«, t00=0x0123, t01=0x0004}
0x1c68e…1c6ae Head {h00=0x001c, h01=0x0050, text=» SUK A1,1 DECRESE LENGTH«, t00=0x0123, t01=0x002c}
0x1c6ae…1c6ca Head {h00=0x0018, h01=0x0050, text=» RF(Z) OUT140 READY «, t00=0x0123, t01=0x004c}
0x1c6ca…1c6f6 Head {h00=0x0028, h01=0x0050, text=» LCR A2,A7 GET NEXT TWO SEMI-OCTETS «, t00=0x0123, t01=0x0068}
0x1c6f6…1c708 Head {h00=0x000e, h01=0x0050, text=» SLL A2,4 «, t00=0x0123, t01=0x0094}
0x1c708…1c732 Head {h00=0x0026, h01=0x0050, text=» SCR A2,A5 STORE SECOND SEMI-OCTET«, t00=0x0123, t01=0x00a6}
0x1c732…1c75c Head {h00=0x0026, h01=0x0050, text=» ADK A7,1 INCREMENT 'FROM'-POINTER«, t00=0x0123, t01=0x00d0}
0x1c75c…1c776 Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 READY ? «, t00=0x0123, t01=0x00fa}
0x1c776…1c78e Head {h00=0x0014, h01=0x0050, text=» RB(P) OUT130 NO«, t00=0x0123, t01=0x0114}
0x1c78e…1c7a0 Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x0123, t01=0x012c}
0x1c7a0…1c7b4 Head {h00=0x0010, h01=0x0050, text=»OUT140 EQU *«, t00=0x0123, t01=0x013e}
0x1c7b4…1c7d8 Head {h00=0x0020, h01=0x0050, text=» LDR A2,A5 NEXT FREE ADDRESS«, t00=0x0123, t01=0x0152}
0x1c7d8…1c7ec Head {h00=0x0010, h01=0x0050, text=»OUT145 EQU *«, t00=0x0123, t01=0x0176}
0x1c7ec…1c7f8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0123, t01=0x018a}
0x1c7f8…1c802 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x0008}
0x1c802…1c810 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0124, t01=0x0012}
0x1c810…1c81a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x0020}
0x1c81a…1c830 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0124, t01=0x002a}
0x1c830…1c844 Head {h00=0x0010, h01=0x0050, text=» IFT LOOP=1 «, t00=0x0124, t01=0x0040}
0x1c844…1c84e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x0054}
0x1c84e…1c87a Head {h00=0x0028, h01=0x0050, text=»* EXCHANGE CALLING AND CALLED LENGTH«, t00=0x0124, t01=0x005e}
0x1c87a…1c884 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x008a}
0x1c884…1c896 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x0124, t01=0x0094}
0x1c896…1c8a8 Head {h00=0x000e, h01=0x0050, text=» SRL A3,8 «, t00=0x0124, t01=0x00a6}
0x1c8a8…1c8b4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0124, t01=0x00b8}
0x1c8b4…1c8ca Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0124, t01=0x00c4}
0x1c8ca…1c8dc Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0124, t01=0x00da}
0x1c8dc…1c90e Head {h00=0x002e, h01=0x0050, text=» SCR A3,A4 STORE CALLING AND CALLED LENGTH«, t00=0x0124, t01=0x00ec}
0x1c90e…1c918 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x011e}
0x1c918…1c93e Head {h00=0x0022, h01=0x0050, text=»* USER FACILITIES & USER DATA «, t00=0x0124, t01=0x0128}
0x1c93e…1c948 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x014e}
0x1c948…1c960 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBRL,A9 «, t00=0x0124, t01=0x0158}
0x1c960…1c988 Head {h00=0x0024, h01=0x0050, text=» RF(Z) OUT180 NO DATA SPECIFIED «, t00=0x0124, t01=0x0170}
0x1c988…1c9a0 Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTTAB,A6«, t00=0x0125, t01=0x0008}
0x1c9a0…1c9aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0125, t01=0x0020}
0x1c9aa…1c9cc Head {h00=0x001e, h01=0x0050, text=»* TEST IF FACILITIES ONLY «, t00=0x0125, t01=0x002a}
0x1c9cc…1c9d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0125, t01=0x004c}
0x1c9d6…1c9ee Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBBA,A9 «, t00=0x0125, t01=0x0056}
0x1c9ee…1ca00 Head {h00=0x000e, h01=0x0050, text=» LCR A7,A1«, t00=0x0125, t01=0x006e}
0x1ca00…1ca24 Head {h00=0x0020, h01=0x0050, text=» ANK A7,/FF FACILITY LENGTH «, t00=0x0125, t01=0x0080}
0x1ca24…1ca64 Head {h00=0x003c, h01=0x0050, text=» RF(Z) OUT150 NO FACILITIES AT ALL «, t00=0x0125, t01=0x00a4}
0x1ca64…1ca82 Head {h00=0x001a, h01=0x0050, text=» ADK A7,1«, t00=0x0125, t01=0x00e4}
0x1ca82…1caa2 Head {h00=0x001c, h01=0x0050, text=» SUR A7,A3 «, t00=0x0125, t01=0x0102}
0x1caa2…1cadc Head {h00=0x0036, h01=0x0050, text=» RF(Z) OUT148 FACILITIES ONLY«, t00=0x0125, t01=0x0122}
0x1cadc…1cb2a Head {h00=0x004a, h01=0x0050, text=» LDK A7,0 A7:=INDICATION NOT ONLY FACILITIES «, t00=0x0125, t01=0x015c}
0x1cb2a…1cb4a Head {h00=0x001c, h01=0x0050, text=» RF OUT150«, t00=0x0126, t01=0x001a}
0x1cb4a…1cb54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x003a}
0x1cb54…1cb70 Head {h00=0x0018, h01=0x0050, text=»OUT148 EQU * «, t00=0x0126, t01=0x0044}
0x1cb70…1cbba Head {h00=0x0046, h01=0x0050, text=» LDK A7,/C0 A7:=INDICATION FACILITIES ONLY «, t00=0x0126, t01=0x0060}
0x1cbba…1cbce Head {h00=0x0010, h01=0x0050, text=»OUT150 EQU *«, t00=0x0126, t01=0x00aa}
0x1cbce…1cbe0 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x0126, t01=0x00be}
0x1cbe0…1cc0e Head {h00=0x002a, h01=0x0050, text=» CF A15,MOVUS MOVE FROM USER TO SYSTEM«, t00=0x0126, t01=0x00d0}
0x1cc0e…1cc20 Head {h00=0x000e, h01=0x0050, text=» ENB . =1«, t00=0x0126, t01=0x00fe}
0x1cc20…1cc2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0110}
0x1cc2a…1cc38 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0126, t01=0x011a}
0x1cc38…1cc42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0128}
0x1cc42…1cc64 Head {h00=0x001e, h01=0x0050, text=»* TEST IF ONLY FACILITIES «, t00=0x0126, t01=0x0132}
0x1cc64…1cc6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0154}
0x1cc6e…1cc8e Head {h00=0x001c, h01=0x0050, text=» LDR A7,A7 «, t00=0x0126, t01=0x015e}
0x1cc8e…1ccbc Head {h00=0x002a, h01=0x0050, text=» RF(Z) OUT190 NO «, t00=0x0126, t01=0x017e}
0x1ccbc…1ccdc Head {h00=0x001c, h01=0x0050, text=» RF OUT188«, t00=0x0127, t01=0x001c}
0x1ccdc…1cce6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x003c}
0x1cce6…1cd06 Head {h00=0x001c, h01=0x0050, text=»* NO USER DATA SPECIFIED«, t00=0x0127, t01=0x0046}
0x1cd06…1cd10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x0066}
0x1cd10…1cd24 Head {h00=0x0010, h01=0x0050, text=»OUT180 EQU *«, t00=0x0127, t01=0x0070}
0x1cd24…1cd36 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0127, t01=0x0084}
0x1cd36…1cd60 Head {h00=0x0026, h01=0x0050, text=» SCR A1,A2 FACILITY LENGTH = ZERO «, t00=0x0127, t01=0x0096}
0x1cd60…1cd80 Head {h00=0x001c, h01=0x0050, text=» ADK A2,1 UPDATE POINTER«, t00=0x0127, t01=0x00c0}
0x1cd80…1cd9c Head {h00=0x0018, h01=0x0050, text=»OUT188 EQU * «, t00=0x0127, t01=0x00e0}
0x1cd9c…1cdb0 Head {h00=0x0010, h01=0x0050, text=» LDK A1,/C0 «, t00=0x0127, t01=0x00fc}
0x1cdb0…1cdda Head {h00=0x0026, h01=0x0050, text=» SCR A1,A2 SET PROTOCOL IDENTIFIER«, t00=0x0127, t01=0x0110}
0x1cdda…1cdfa Head {h00=0x001c, h01=0x0050, text=» ADK A2,1 UPDATE POINTER«, t00=0x0127, t01=0x013a}
0x1cdfa…1ce04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x015a}
0x1ce04…1ce2e Head {h00=0x0026, h01=0x0050, text=»* CALCULATE LENGTH OF CALL PACKET «, t00=0x0127, t01=0x0164}
0x1ce2e…1ce38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x018e}
0x1ce38…1ce4c Head {h00=0x0010, h01=0x0050, text=»OUT190 EQU *«, t00=0x0128, t01=0x0008}
0x1ce4c…1ce64 Head {h00=0x0014, h01=0x0050, text=» SU A2,ECBBA,A8 «, t00=0x0128, t01=0x001c}
0x1ce64…1ce8a Head {h00=0x0022, h01=0x0050, text=» ST A2,ECBRL,A8 LENGTH TO ECB «, t00=0x0128, t01=0x0034}
0x1ce8a…1ce94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x005a}
0x1ce94…1ceae Head {h00=0x0016, h01=0x0050, text=»* COMPLETE LC-ADM «, t00=0x0128, t01=0x0064}
0x1ceae…1ceb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x007e}
0x1ceb8…1cee4 Head {h00=0x0028, h01=0x0050, text=» LD A2,ECBBA,A8 ADDRESS CALL PACKET «, t00=0x0128, t01=0x0088}
0x1cee4…1cf1a Head {h00=0x0032, h01=0x0050, text=» CF A14,GTWNDS GET WINDOW SIZE & PACKET LENGTH«, t00=0x0128, t01=0x00b4}
0x1cf1a…1cf4e Head {h00=0x0030, h01=0x0050, text=» CF A14,TRTHR TRANSLATE THRESHOLD PERCENTAGE«, t00=0x0128, t01=0x00ea}
0x1cf4e…1cf62 Head {h00=0x0010, h01=0x0050, text=»OUT195 EQU *«, t00=0x0128, t01=0x011e}
0x1cf62…1cf8a Head {h00=0x0024, h01=0x0050, text=» ABL OUT040 ISSUE OUTPUT REQUEST«, t00=0x0128, t01=0x0132}
0x1cf8a…1cf98 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0128, t01=0x015a}
0x1cf98…1cfa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x0168}
0x1cfa2…1cfc8 Head {h00=0x0022, h01=0x0050, text=»* TRANSMISSION OF CLEAR PACKET«, t00=0x0128, t01=0x0172}
0x1cfc8…1cfd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0129, t01=0x0008}
0x1cfd2…1cfe6 Head {h00=0x0010, h01=0x0050, text=»OUT200 EQU *«, t00=0x0129, t01=0x0012}
0x1cfe6…1cffc Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0129, t01=0x0026}
0x1cffc…1d020 Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBBA,A9 USER BUFFER «, t00=0x0129, t01=0x003c}
0x1d020…1d054 Head {h00=0x0030, h01=0x0050, text=» ADK A2,DGNCOD DIAGNOSTIC CODE DISPLACEMENT «, t00=0x0129, t01=0x0060}
0x1d054…1d06c Head {h00=0x0014, h01=0x0050, text=» LDK A3,1 LENGTH«, t00=0x0129, t01=0x0094}
0x1d06c…1d084 Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTTAB,A6«, t00=0x0129, t01=0x00ac}
0x1d084…1d096 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x0129, t01=0x00c4}
0x1d096…1d0c4 Head {h00=0x002a, h01=0x0050, text=» CF A15,MOVUS MOVE FROM USER TO SYSTEM«, t00=0x0129, t01=0x00d6}
0x1d0c4…1d0d6 Head {h00=0x000e, h01=0x0050, text=» ENB . =1«, t00=0x0129, t01=0x0104}
0x1d0d6…1d10c Head {h00=0x0032, h01=0x0050, text=» SUK A2,DGNCOD+1 RESTORE SYSTEM BUFFER ADDRESS«, t00=0x0129, t01=0x0116}
0x1d10c…1d118 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0129, t01=0x014c}
0x1d118…1d12e Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0129, t01=0x0158}
0x1d12e…1d144 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0129, t01=0x016e}
0x1d144…1d16c Head {h00=0x0024, h01=0x0050, text=» LC* A1,ECBBA,A9 DIAGNOSTIC CODE«, t00=0x0129, t01=0x0184}
0x1d16c…1d184 Head {h00=0x0014, h01=0x0050, text=» SC A1,DGNCOD,A2«, t00=0x012a, t01=0x001c}
0x1d184…1d196 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x012a, t01=0x0034}
0x1d196…1d1a2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012a, t01=0x0046}
0x1d1a2…1d1b8 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x012a, t01=0x0052}
0x1d1b8…1d1e2 Head {h00=0x0026, h01=0x0050, text=» SC A3,CAUSE,A2 RESET CAUSE FIELD «, t00=0x012a, t01=0x0068}
0x1d1e2…1d20a Head {h00=0x0024, h01=0x0050, text=» LDK A1,CLE.P CLEAR PACKET TYPE «, t00=0x012a, t01=0x0092}
0x1d20a…1d22e Head {h00=0x0020, h01=0x0050, text=» LDK A4,CLE.L PACKET LENGTH «, t00=0x012a, t01=0x00ba}
0x1d22e…1d240 Head {h00=0x000e, h01=0x0050, text=» RF OUT260«, t00=0x012a, t01=0x00de}
0x1d240…1d24a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x00f0}
0x1d24a…1d27c Head {h00=0x002e, h01=0x0050, text=»* TRANSMISSION OF CALL CONFIRMATION PACKET«, t00=0x012a, t01=0x00fa}
0x1d27c…1d286 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x012c}
0x1d286…1d29a Head {h00=0x0010, h01=0x0050, text=»OUT210 EQU *«, t00=0x012a, t01=0x0136}
0x1d29a…1d2ce Head {h00=0x0030, h01=0x0050, text=» LDK A1,CAL.CP CALL CONFIRMATION PACKET TYPE«, t00=0x012a, t01=0x014a}
0x1d2ce…1d2f2 Head {h00=0x0020, h01=0x0050, text=» LDK A4,CAL.CL PACKET LENGTH«, t00=0x012a, t01=0x017e}
0x1d2f2…1d304 Head {h00=0x000e, h01=0x0050, text=» RF OUT260«, t00=0x012b, t01=0x0012}
0x1d304…1d30e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x0024}
0x1d30e…1d31a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012b, t01=0x002e}
0x1d31a…1d324 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x003a}
0x1d324…1d332 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012b, t01=0x0044}
0x1d332…1d33c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x0052}
0x1d33c…1d366 Head {h00=0x0026, h01=0x0050, text=»* TRANSMISSION OF INTERRUPT PACKET«, t00=0x012b, t01=0x005c}
0x1d366…1d370 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x0086}
0x1d370…1d384 Head {h00=0x0010, h01=0x0050, text=»OUT220 EQU *«, t00=0x012b, t01=0x0090}
0x1d384…1d39a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x012b, t01=0x00a4}
0x1d39a…1d3be Head {h00=0x0020, h01=0x0050, text=» LD A1,ECBBA,A9 USER BUFFER «, t00=0x012b, t01=0x00ba}
0x1d3be…1d3f0 Head {h00=0x002e, h01=0x0050, text=» ADK A2,CAUSE INTERRUPT DATA DISPLACEMENT «, t00=0x012b, t01=0x00de}
0x1d3f0…1d408 Head {h00=0x0014, h01=0x0050, text=» LDK A3,1 LENGTH«, t00=0x012b, t01=0x0110}
0x1d408…1d420 Head {h00=0x0014, h01=0x0050, text=» LD A5,DWTTAB,A6«, t00=0x012b, t01=0x0128}
0x1d420…1d432 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x012b, t01=0x0140}
0x1d432…1d460 Head {h00=0x002a, h01=0x0050, text=» CF A15,MOVUS MOVE FROM USER TO SYSTEM«, t00=0x012b, t01=0x0152}
0x1d460…1d472 Head {h00=0x000e, h01=0x0050, text=» ENB . =1«, t00=0x012b, t01=0x0180}
0x1d472…1d4a8 (300, 0, 400) Head {h00=0x0032, h01=0x0050, text=» SUK A2,CAUSE+1 RESTORE SYSTEM BUFFER ADDRESS «, t00=0x012c, t01=0x0004}
0x1d4a8…1d4b4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012c, t01=0x003a}
0x1d4b4…1d4ca Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x012c, t01=0x0046}
0x1d4ca…1d4f2 Head {h00=0x0024, h01=0x0050, text=» LC* A1,ECBBA,A9 INTERRUPT DATA «, t00=0x012c, t01=0x005c}
0x1d4f2…1d50a Head {h00=0x0014, h01=0x0050, text=» SC A1,CAUSE,A2 «, t00=0x012c, t01=0x0084}
0x1d50a…1d516 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012c, t01=0x009c}
0x1d516…1d542 Head {h00=0x0028, h01=0x0050, text=» LDK A1,INT.P INTERRUPT PACKET TYPE «, t00=0x012c, t01=0x00a8}
0x1d542…1d566 Head {h00=0x0020, h01=0x0050, text=» LDK A4,INT.L PACKET LENGTH «, t00=0x012c, t01=0x00d4}
0x1d566…1d57a Head {h00=0x0010, h01=0x0050, text=»OUT260 EQU *«, t00=0x012c, t01=0x00f8}
0x1d57a…1d592 Head {h00=0x0014, h01=0x0050, text=» SC A1,IDENT,A2 «, t00=0x012c, t01=0x010c}
0x1d592…1d5ae Head {h00=0x0018, h01=0x0050, text=»OUT270 EQU * «, t00=0x012c, t01=0x0124}
0x1d5ae…1d5d4 Head {h00=0x0022, h01=0x0050, text=» ST A4,ECBRL,A8 PACKET LENGTH «, t00=0x012c, t01=0x0140}
0x1d5d4…1d5fc Head {h00=0x0024, h01=0x0050, text=» ABL OUT040 ISSUE OUTPUT REQUEST«, t00=0x012c, t01=0x0166}
0x1d5fc…1d60a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012c, t01=0x018e}
0x1d60a…1d614 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x000c}
0x1d614…1d640 Head {h00=0x0028, h01=0x0050, text=»* TRANSMISSION OF RR- OR RNR PACKET «, t00=0x012d, t01=0x0016}
0x1d640…1d64a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x0042}
0x1d64a…1d65e Head {h00=0x0010, h01=0x0050, text=»OUT300 EQU *«, t00=0x012d, t01=0x004c}
0x1d65e…1d682 Head {h00=0x0020, h01=0x0050, text=» LDK A1,RR.P RR-PACKET TYPE «, t00=0x012d, t01=0x0060}
0x1d682…1d694 Head {h00=0x000e, h01=0x0050, text=» RF OUT320«, t00=0x012d, t01=0x0084}
0x1d694…1d69e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x0096}
0x1d69e…1d6b2 Head {h00=0x0010, h01=0x0050, text=»OUT310 EQU *«, t00=0x012d, t01=0x00a0}
0x1d6b2…1d6d8 Head {h00=0x0022, h01=0x0050, text=» LDK A1,RNR.P RNR-PACKET TYPE «, t00=0x012d, t01=0x00b4}
0x1d6d8…1d6ec Head {h00=0x0010, h01=0x0050, text=»OUT320 EQU *«, t00=0x012d, t01=0x00da}
0x1d6ec…1d708 Head {h00=0x0018, h01=0x0050, text=» LC A3,PR,A13 GET PR«, t00=0x012d, t01=0x00ee}
0x1d708…1d74e Head {h00=0x0042, h01=0x0050, text=» SC A3,RLWE,A13 SAVE IT AS LAST TRANMITTED «, t00=0x012d, t01=0x010a}
0x1d74e…1d760 Head {h00=0x000e, h01=0x0050, text=» SLL A3,5 «, t00=0x012d, t01=0x0150}
0x1d760…1d78c Head {h00=0x0028, h01=0x0050, text=» ORR A3,A1 COMBINE WITH PACKET TYPE «, t00=0x012d, t01=0x0162}
0x1d78c…1d7b4 Head {h00=0x0024, h01=0x0050, text=» SC A3,IDENT,A2 TO OUTPUT BUFFER«, t00=0x012d, t01=0x018e}
0x1d7b4…1d7d6 Head {h00=0x001e, h01=0x0050, text=» LDK A4,RR.L PACKET LENGTH«, t00=0x012e, t01=0x0026}
0x1d7d6…1d7fe Head {h00=0x0024, h01=0x0050, text=» RB OUT270 ISSUE OUTPUT REQUEST «, t00=0x012e, t01=0x0048}
0x1d7fe…1d808 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x0070}
0x1d808…1d82a Head {h00=0x001e, h01=0x0050, text=»* TRANSMISSION OF A PACKET«, t00=0x012e, t01=0x007a}
0x1d82a…1d834 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x009c}
0x1d834…1d848 Head {h00=0x0010, h01=0x0050, text=»OUT400 EQU *«, t00=0x012e, t01=0x00a6}
0x1d848…1d876 Head {h00=0x002a, h01=0x0050, text=» ST A2,ECBBA,A8 BUFFER ADDRESS TO ECB «, t00=0x012e, t01=0x00ba}
0x1d876…1d88c Head {h00=0x0012, h01=0x0050, text=» LDK A1,RSET.P«, t00=0x012e, t01=0x00e8}
0x1d88c…1d8ba Head {h00=0x002a, h01=0x0050, text=» CC A1,IDENT,A2 IS IT A RESET PACKET ?«, t00=0x012e, t01=0x00fe}
0x1d8ba…1d8d4 Head {h00=0x0016, h01=0x0050, text=» RF(NE) OUT410 NO «, t00=0x012e, t01=0x012c}
0x1d8d4…1d8fe Head {h00=0x0026, h01=0x0050, text=» LDK A1,NPRFLG BLOCK OUTPUT QUEUE «, t00=0x012e, t01=0x0146}
0x1d8fe…1d91a Head {h00=0x0018, h01=0x0050, text=» ORS A1,QUEOUT,A13 .«, t00=0x012e, t01=0x0170}
0x1d91a…1d92e Head {h00=0x0010, h01=0x0050, text=»OUT410 EQU *«, t00=0x012e, t01=0x018c}
0x1d92e…1d952 Head {h00=0x0020, h01=0x0050, text=» LD A4,HDLC,A2 BUFFER LENGTH«, t00=0x012f, t01=0x0010}
0x1d952…1d97a Head {h00=0x0024, h01=0x0050, text=» RB OUT270 ISSUE OUTPUT REQUEST «, t00=0x012f, t01=0x0034}
0x1d97a…1d988 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012f, t01=0x005c}
0x1d988…1d992 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x006a}
0x1d992…1d99c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x0074}
0x1d99c…1d9d6 Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE HANDLES A COMPLETED OUTPUT REQUEST «, t00=0x012f, t01=0x007e}
0x1d9d6…1d9e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x00b8}
0x1d9e0…1da14 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x012f, t01=0x00c2}
0x1da14…1da1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x00f6}
0x1da1e…1da3a Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x012f, t01=0x0100}
0x1da3a…1da56 Head {h00=0x0018, h01=0x0050, text=»* A1 = ECB-ADDRESS «, t00=0x012f, t01=0x011c}
0x1da56…1da60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x0138}
0x1da60…1da7c Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x012f, t01=0x0142}
0x1da7c…1daa2 Head {h00=0x0022, h01=0x0050, text=»* ACTIVATION ON LABEL ENDOUT «, t00=0x012f, t01=0x015e}
0x1daa2…1daac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x0184}
0x1daac…1dac0 Head {h00=0x0010, h01=0x0050, text=»ENDOUT EQU *«, t00=0x012f, t01=0x018e}
0x1dac0…1dae8 Head {h00=0x0024, h01=0x0050, text=» LDK A3,1 SET PROCESS INDICATION«, t00=0x0130, t01=0x0012}
0x1dae8…1db00 Head {h00=0x0014, h01=0x0050, text=» ST A3,DCLEVL . «, t00=0x0130, t01=0x003a}
0x1db00…1db2a Head {h00=0x0026, h01=0x0050, text=» LDKL A14,DCSTAK SET STACK POINTER«, t00=0x0130, t01=0x0052}
0x1db2a…1db4e Head {h00=0x0020, h01=0x0050, text=» LDR A8,A1 SAVE ECB-ADDRESS «, t00=0x0130, t01=0x007c}
0x1db4e…1db7a Head {h00=0x0028, h01=0x0050, text=» CF A14,GTLBA GET LINE BLOCK ADDRESS«, t00=0x0130, t01=0x00a0}
0x1db7a…1dba0 Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBBA,A8 BUFFER ADDRESS«, t00=0x0130, t01=0x00cc}
0x1dba0…1dbbe Head {h00=0x001a, h01=0x0050, text=» CM ECBBA,A8 FREE ECB «, t00=0x0130, t01=0x00f2}
0x1dbbe…1dbe2 Head {h00=0x0020, h01=0x0050, text=» CM HDLC,A2 FREE DWT-BUFFER «, t00=0x0130, t01=0x0110}
0x1dbe2…1dc0a Head {h00=0x0024, h01=0x0050, text=» LD A5,ECBRC,A8 GET RETURN CODE «, t00=0x0130, t01=0x0134}
0x1dc0a…1dc32 Head {h00=0x0024, h01=0x0050, text=» RF(Z) ENDO30 CORRECT COMPLETED «, t00=0x0130, t01=0x015c}
0x1dc32…1dc58 Head {h00=0x0022, h01=0x0050, text=» CWK A5,18 TRANSMITTER RESET ?«, t00=0x0130, t01=0x0184}
0x1dc58…1dc72 Head {h00=0x0016, h01=0x0050, text=» RF(E) ENDO30 YES «, t00=0x0131, t01=0x001a}
0x1dc72…1dc7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x0034}
0x1dc7c…1dc8a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0131, t01=0x003e}
0x1dc8a…1dc94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x004c}
0x1dc94…1dce2 Head {h00=0x004a, h01=0x0050, text=»* THE OUTPUT REQUEST IS NOT CORRECT COMPLETED. WHEN THIS IS THE FIRST «, t00=0x0131, t01=0x0056}
0x1dce2…1dd2e Head {h00=0x0048, h01=0x0050, text=»* TIME A DISCONNECT REQUEST FOR THE DC-CONNECTION WILL BE GIVEN AND «, t00=0x0131, t01=0x00a4}
0x1dd2e…1dd74 Head {h00=0x0042, h01=0x0050, text=»* ALL NOT READY SVC'S WILL BE CLEARED LOCAL AND ALL RELATIONS «, t00=0x0131, t01=0x00f0}
0x1dd74…1dd9c Head {h00=0x0024, h01=0x0050, text=»* DWT <--> PVC WILL BE RELEASED.«, t00=0x0131, t01=0x0136}
0x1dd9c…1dda6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x015e}
0x1dda6…1ddd4 Head {h00=0x002a, h01=0x0050, text=» LD A3,CMNFLG,A12 IS SUBSYS STARTED ? «, t00=0x0131, t01=0x0168}
0x1ddd4…1ddec Head {h00=0x0014, h01=0x0050, text=» ANK A3,STRTFL .«, t00=0x0132, t01=0x0008}
0x1ddec…1de0e Head {h00=0x001e, h01=0x0050, text=» RF(Z) ENDO20 ALREADY DOWN«, t00=0x0132, t01=0x0020}
0x1de0e…1de36 Head {h00=0x0024, h01=0x0050, text=» LDK A1,STRTFL RESET START FLAG «, t00=0x0132, t01=0x0042}
0x1de36…1de4a Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x0132, t01=0x006a}
0x1de4a…1de66 Head {h00=0x0018, h01=0x0050, text=» ANS A1,CMNFLG,A12 .«, t00=0x0132, t01=0x007e}
0x1de66…1de90 Head {h00=0x0026, h01=0x0050, text=» ST A5,HRDSTA,A12 SAVE RETURN CODE«, t00=0x0132, t01=0x009a}
0x1de90…1ded0 Head {h00=0x003c, h01=0x0050, text=» LDK A6,0 NO DWT AVAILABLE «, t00=0x0132, t01=0x00c4}
0x1ded0…1df02 Head {h00=0x002e, h01=0x0050, text=» CF A14,STOP ISSUE DISCONNECT LINE REQUEST«, t00=0x0132, t01=0x0104}
0x1df02…1df36 Head {h00=0x0030, h01=0x0050, text=» LDK A1,LOCCLE DIAGN. CODE = LOST CONNECTION«, t00=0x0132, t01=0x0136}
0x1df36…1df62 Head {h00=0x0028, h01=0x0050, text=» CF A14,CLAVCS CLEAR ALL VC'S LOCAL «, t00=0x0132, t01=0x016a}
0x1df62…1df76 Head {h00=0x0010, h01=0x0050, text=»ENDO20 EQU *«, t00=0x0133, t01=0x0008}
0x1df76…1df8a Head {h00=0x0010, h01=0x0050, text=» LDKL A1,-1 «, t00=0x0133, t01=0x001c}
0x1df8a…1dfca Head {h00=0x003c, h01=0x0050, text=» ADS A1,NRPNDT,A12 DECREASE # OF PENDING TRANSM. REQUE. «, t00=0x0133, t01=0x0030}
0x1dfca…1dff8 Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0133, t01=0x0070}
0x1dff8…1e002 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x009e}
0x1e002…1e02c Head {h00=0x0026, h01=0x0050, text=»* CORRECT COMPLETED OUTPUT REQUEST«, t00=0x0133, t01=0x00a8}
0x1e02c…1e036 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x00d2}
0x1e036…1e04a Head {h00=0x0010, h01=0x0050, text=»ENDO30 EQU *«, t00=0x0133, t01=0x00dc}
0x1e04a…1e07a Head {h00=0x002c, h01=0x0050, text=» LC A4,LCIDNT,A2 LOGICAL CHANNEL NUMBER «, t00=0x0133, t01=0x00f0}
0x1e07a…1e090 Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x0133, t01=0x0120}
0x1e090…1e0ba Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x0133, t01=0x0136}
0x1e0ba…1e0e2 Head {h00=0x0024, h01=0x0050, text=» LD A6,LCDWT,A13 GET DWT-ADDRESS«, t00=0x0133, t01=0x0160}
0x1e0e2…1e0fe Head {h00=0x0018, h01=0x0050, text=» RF(Z) ENDO56 NO DWT«, t00=0x0133, t01=0x0188}
0x1e0fe…1e120 Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT-STATUS«, t00=0x0134, t01=0x0014}
0x1e120…1e136 Head {h00=0x0012, h01=0x0050, text=» RF(N) ENDO56 «, t00=0x0134, t01=0x0036}
0x1e136…1e140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x004c}
0x1e140…1e14e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0134, t01=0x0056}
0x1e14e…1e158 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x0064}
0x1e158…1e176 Head {h00=0x001a, h01=0x0050, text=»* TEST IF DATA PACKET «, t00=0x0134, t01=0x006e}
0x1e176…1e180 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x008c}
0x1e180…1e198 Head {h00=0x0014, h01=0x0050, text=» LC A3,IDENT,A2 «, t00=0x0134, t01=0x0096}
0x1e198…1e1b8 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A3 «, t00=0x0134, t01=0x00ae}
0x1e1b8…1e1ce Head {h00=0x0012, h01=0x0050, text=» ANK A3,DATA.P«, t00=0x0134, t01=0x00ce}
0x1e1ce…1e1e8 Head {h00=0x0016, h01=0x0050, text=» RF(Z) ENDO58 YES «, t00=0x0134, t01=0x00e4}
0x1e1e8…1e1f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x00fe}
0x1e1f2…1e20e Head {h00=0x0018, h01=0x0050, text=»* TEST IF RNR PACKET«, t00=0x0134, t01=0x0108}
0x1e20e…1e218 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x0124}
0x1e218…1e23e Head {h00=0x0022, h01=0x0050, text=» LC A4,DWTFNC,A6«, t00=0x0134, t01=0x012e}
0x1e23e…1e25e Head {h00=0x001c, h01=0x0050, text=» ANK A1,/1F«, t00=0x0134, t01=0x0154}
0x1e25e…1e274 Head {h00=0x0012, h01=0x0050, text=» SUK A1,RNR.P «, t00=0x0134, t01=0x0174}
0x1e274…1e28a Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0134, t01=0x018a}
0x1e28a…1e2a4 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO46 NO «, t00=0x0135, t01=0x0010}
0x1e2a4…1e2b0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0135, t01=0x002a}
0x1e2b0…1e2c6 Head {h00=0x0012, h01=0x0050, text=» IFT SWITVC=0 «, t00=0x0135, t01=0x0036}
0x1e2c6…1e2e0 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO56 NO «, t00=0x0135, t01=0x004c}
0x1e2e0…1e2ec Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0135, t01=0x0066}
0x1e2ec…1e32c Head {h00=0x003c, h01=0x0050, text=» SUK A4,REFDAT REFUSE DATA REQUEST? «, t00=0x0135, t01=0x0072}
0x1e32c…1e346 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO56 NO «, t00=0x0135, t01=0x00b2}
0x1e346…1e35c Head {h00=0x0012, h01=0x0050, text=» RF ENDO58 YES«, t00=0x0135, t01=0x00cc}
0x1e35c…1e372 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0135, t01=0x00e2}
0x1e372…1e37c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x00f8}
0x1e37c…1e3a6 Head {h00=0x0026, h01=0x0050, text=»* TEST IF CALL CONFIRMATION PACKET«, t00=0x0135, t01=0x0102}
0x1e3a6…1e3b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x012c}
0x1e3b0…1e3cc Head {h00=0x0018, h01=0x0050, text=»ENDO46 EQU * «, t00=0x0135, t01=0x0136}
0x1e3cc…1e3e8 Head {h00=0x0018, h01=0x0050, text=» SUK A1,CAL.CP-RNR.P«, t00=0x0135, t01=0x0152}
0x1e3e8…1e402 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO48 NO «, t00=0x0135, t01=0x016e}
0x1e402…1e42e Head {h00=0x0028, h01=0x0050, text=» SUK A4,ACCCAL ACCEPT CALL REQUEST ?«, t00=0x0135, t01=0x0188}
0x1e42e…1e448 Head {h00=0x0016, h01=0x0050, text=» RF(Z) ENDO58 YES «, t00=0x0136, t01=0x0024}
0x1e448…1e45e Head {h00=0x0012, h01=0x0050, text=» RF ENDO56 NO «, t00=0x0136, t01=0x003e}
0x1e45e…1e468 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x0054}
0x1e468…1e476 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0136, t01=0x005e}
0x1e476…1e480 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x006c}
0x1e480…1e49e Head {h00=0x001a, h01=0x0050, text=»* TEST IF CLEAR PACKET«, t00=0x0136, t01=0x0076}
0x1e49e…1e4a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x0094}
0x1e4a8…1e4c4 Head {h00=0x0018, h01=0x0050, text=»ENDO48 EQU * «, t00=0x0136, t01=0x009e}
0x1e4c4…1e4e0 Head {h00=0x0018, h01=0x0050, text=» SUK A1,CLE.P-CAL.CP«, t00=0x0136, t01=0x00ba}
0x1e4e0…1e4fa Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO56 NO «, t00=0x0136, t01=0x00d6}
0x1e4fa…1e526 Head {h00=0x0028, h01=0x0050, text=» SUK A4,DISCAL DISCONNECT REQUEST ? «, t00=0x0136, t01=0x00f0}
0x1e526…1e540 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) ENDO56 NO «, t00=0x0136, t01=0x011c}
0x1e540…1e554 Head {h00=0x0010, h01=0x0050, text=»ENDO50 EQU *«, t00=0x0136, t01=0x0136}
0x1e554…1e582 Head {h00=0x002a, h01=0x0050, text=» CF A14,RELDWT RELEASE DWT FROM CHAIN «, t00=0x0136, t01=0x014a}
0x1e582…1e5b6 Head {h00=0x0030, h01=0x0050, text=» CM LCDWT,A13 RELEASE RELATION WITH THE DWT «, t00=0x0136, t01=0x0178}
0x1e5b6…1e5ca Head {h00=0x0010, h01=0x0050, text=»ENDO52 EQU *«, t00=0x0137, t01=0x001c}
0x1e5ca…1e5ee Head {h00=0x0020, h01=0x0050, text=» LDK A3,ACPT.RC RETURN CODE «, t00=0x0137, t01=0x0030}
0x1e5ee…1e5fa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0137, t01=0x0054}
0x1e5fa…1e60e Head {h00=0x0010, h01=0x0050, text=»ENDO54 EQU *«, t00=0x0137, t01=0x0060}
0x1e60e…1e636 Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x0137, t01=0x0074}
0x1e636…1e64a Head {h00=0x0010, h01=0x0050, text=»ENDO56 EQU *«, t00=0x0137, t01=0x009c}
0x1e64a…1e65c Head {h00=0x000e, h01=0x0050, text=» RB ENDO20«, t00=0x0137, t01=0x00b0}
0x1e65c…1e670 Head {h00=0x0010, h01=0x0050, text=»ENDO58 EQU *«, t00=0x0137, t01=0x00c2}
0x1e670…1e688 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTRCI,A6«, t00=0x0137, t01=0x00d6}
0x1e688…1e69a Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0137, t01=0x00ee}
0x1e69a…1e6be Head {h00=0x0020, h01=0x0050, text=» ANK A1,MORE.RC MORE INFO ? «, t00=0x0137, t01=0x0100}
0x1e6be…1e6d6 Head {h00=0x0014, h01=0x0050, text=» RB(Z) ENDO54 NO«, t00=0x0137, t01=0x0124}
0x1e6d6…1e6f8 Head {h00=0x001e, h01=0x0050, text=» LDK A1,TOLD.RC INDICATE..«, t00=0x0137, t01=0x013c}
0x1e6f8…1e720 Head {h00=0x0024, h01=0x0050, text=» XRS A1,DWTRCI,A6 ..TOLD TO USER«, t00=0x0137, t01=0x015e}
0x1e720…1e744 Head {h00=0x0020, h01=0x0050, text=» RB ENDO54 COMPLETE REQUEST «, t00=0x0137, t01=0x0186}
0x1e744…1e752 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0138, t01=0x001a}
0x1e752…1e75c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x0028}
0x1e75c…1e79c Head {h00=0x003c, h01=0x0050, text=»* THIS MODULE IS ACTIVATED WHEN A CONFIRMATION TIMER OF «, t00=0x0138, t01=0x0032}
0x1e79c…1e7ba Head {h00=0x001a, h01=0x0050, text=»* THE DC-TASK EXPIRES.«, t00=0x0138, t01=0x0072}
0x1e7ba…1e7c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x0090}
0x1e7c4…1e7fa Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0138, t01=0x009a}
0x1e7fa…1e804 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x00d0}
0x1e804…1e820 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0138, t01=0x00da}
0x1e820…1e848 Head {h00=0x0024, h01=0x0050, text=»* A1 = PARAMETER BLOCK ADDRESS «, t00=0x0138, t01=0x00f6}
0x1e848…1e852 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x011e}
0x1e852…1e86e Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0138, t01=0x0128}
0x1e86e…1e894 Head {h00=0x0022, h01=0x0050, text=»* ACTIVATION ON LABEL TIMOUT «, t00=0x0138, t01=0x0144}
0x1e894…1e89e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x016a}
0x1e89e…1e8b2 Head {h00=0x0010, h01=0x0050, text=»TIMOUT EQU *«, t00=0x0138, t01=0x0174}
0x1e8b2…1e8da Head {h00=0x0024, h01=0x0050, text=» LDK A3,5 SET PROCESS INDICATOR «, t00=0x0138, t01=0x0188}
0x1e8da…1e8f2 Head {h00=0x0014, h01=0x0050, text=» ST A3,DCLEVL . «, t00=0x0139, t01=0x0020}
0x1e8f2…1e91c Head {h00=0x0026, h01=0x0050, text=» LDKL A14,DCSTAK SET STACK POINTER«, t00=0x0139, t01=0x0038}
0x1e91c…1e946 Head {h00=0x0026, h01=0x0050, text=» LDR A4,A1 ADDRESS PARAMETER BLOCK«, t00=0x0139, t01=0x0062}
0x1e946…1e958 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x0139, t01=0x008c}
0x1e958…1e97e Head {h00=0x0022, h01=0x0050, text=» CF A15,FREBLK GET PARAMETERS «, t00=0x0139, t01=0x009e}
0x1e97e…1e98a Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0139, t01=0x00c4}
0x1e98a…1e9b0 Head {h00=0x0022, h01=0x0050, text=» LDR A12,A3 LINE BLOCK ADDRESS«, t00=0x0139, t01=0x00d0}
0x1e9b0…1e9d2 Head {h00=0x001e, h01=0x0050, text=» LDR A13,A1 LC-ADM ADDRESS«, t00=0x0139, t01=0x00f6}
0x1e9d2…1e9e4 Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x0139, t01=0x0118}
0x1e9e4…1ea18 Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) TIMEXP TIME-OUT OF REQUEST HANDLER «, t00=0x0139, t01=0x012a}
0x1ea18…1ea2c Head {h00=0x0010, h01=0x0050, text=» LDR A13,A13«, t00=0x0139, t01=0x015e}
0x1ea2c…1ea58 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) TIM10 NO RESTART CONF. TIMER«, t00=0x0139, t01=0x0172}
0x1ea58…1ea62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x000e}
0x1ea62…1eaa6 Head {h00=0x0040, h01=0x0050, text=»* A RESTART CONFIRMATION TIMER IS EXPIRED, SO CLEAR ALL NOT «, t00=0x013a, t01=0x0018}
0x1eaa6…1eac2 Head {h00=0x0018, h01=0x0050, text=»* READY VC'S LOCAL. «, t00=0x013a, t01=0x005c}
0x1eac2…1eacc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x0078}
0x1eacc…1eaf6 Head {h00=0x0026, h01=0x0050, text=» CM RTMADR,A12 CLEAR TIMER ADDRESS«, t00=0x013a, t01=0x0082}
0x1eaf6…1eb2c Head {h00=0x0032, h01=0x0050, text=» LDK A1,RSTFLG IS A RESTART PROCEDURE ACTIVE ?«, t00=0x013a, t01=0x00ac}
0x1eb2c…1eb48 Head {h00=0x0018, h01=0x0050, text=» AN A1,CMNFLG,A12 . «, t00=0x013a, t01=0x00e2}
0x1eb48…1eb60 Head {h00=0x0014, h01=0x0050, text=» RF(Z) TIM40 NO «, t00=0x013a, t01=0x00fe}
0x1eb60…1eb82 Head {h00=0x001e, h01=0x0050, text=» LDK A1,LOCCLE DIAGN. CODE«, t00=0x013a, t01=0x0116}
0x1eb82…1ebae Head {h00=0x0028, h01=0x0050, text=» CF A14,CLAVCS CLEAR ALL VC'S LOCAL «, t00=0x013a, t01=0x0138}
0x1ebae…1ebc0 Head {h00=0x000e, h01=0x0050, text=» RF TIM40 «, t00=0x013a, t01=0x0164}
0x1ebc0…1ebce Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x013a, t01=0x0176}
0x1ebce…1ebd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x0184}
0x1ebd8…1ec12 Head {h00=0x0036, h01=0x0050, text=»* THE TIMER OF A RESET OR CLEAR PACKET IS EXPIRED «, t00=0x013a, t01=0x018e}
0x1ec12…1ec1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x0038}
0x1ec1c…1ec30 Head {h00=0x0010, h01=0x0050, text=»TIM10 EQU * «, t00=0x013b, t01=0x0042}
0x1ec30…1ec5a Head {h00=0x0026, h01=0x0050, text=» CM TIMADR,A13 CLEAR TIMER ADDRESS«, t00=0x013b, t01=0x0056}
0x1ec5a…1ec90 Head {h00=0x0032, h01=0x0050, text=» LDK A1,CONTIM IS CONFIRMATION TIMER STARTED ?«, t00=0x013b, t01=0x0080}
0x1ec90…1ecaa Head {h00=0x0016, h01=0x0050, text=» AN A1,FLAGS,A13 .«, t00=0x013b, t01=0x00b6}
0x1ecaa…1ecc2 Head {h00=0x0014, h01=0x0050, text=» RF(Z) TIM40 NO «, t00=0x013b, t01=0x00d0}
0x1ecc2…1ecec Head {h00=0x0026, h01=0x0050, text=» XRS A1,FLAGS,A13 RESET TIMER FLAG«, t00=0x013b, t01=0x00e8}
0x1ecec…1ed02 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x013b, t01=0x0112}
0x1ed02…1ed30 Head {h00=0x002a, h01=0x0050, text=» LDK A1,RSET.ST IS LC-STATUS = RESET ?«, t00=0x013b, t01=0x0128}
0x1ed30…1ed4c Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSBST,A13 . «, t00=0x013b, t01=0x0156}
0x1ed4c…1ed7c Head {h00=0x002c, h01=0x0050, text=» RF(NE) TIM30 NO, SO IT MUST BE A CLEAR «, t00=0x013b, t01=0x0172}
0x1ed7c…1ed88 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013c, t01=0x0012}
0x1ed88…1ed92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x001e}
0x1ed92…1edcc Head {h00=0x0036, h01=0x0050, text=»* A RESET TIMER IS EXPIRED, SO CLEAR CONCERNING VC«, t00=0x013c, t01=0x0028}
0x1edcc…1edd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x0062}
0x1edd6…1edfa Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 RESET SUB-STATUS «, t00=0x013c, t01=0x006c}
0x1edfa…1ee16 Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSBST,A13 . «, t00=0x013c, t01=0x0090}
0x1ee16…1ee46 Head {h00=0x002c, h01=0x0050, text=» LDK A1,NPRFLG RESET NO PROCESSING FLAG «, t00=0x013c, t01=0x00ac}
0x1ee46…1ee5a Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x013c, t01=0x00dc}
0x1ee5a…1ee76 Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEOUT,A13 .«, t00=0x013c, t01=0x00f0}
0x1ee76…1ee8c Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x013c, t01=0x010c}
0x1ee8c…1eea2 Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x013c, t01=0x0122}
0x1eea2…1eec4 Head {h00=0x001e, h01=0x0050, text=» LDK A1,PVC IS IT A PVC ? «, t00=0x013c, t01=0x0138}
0x1eec4…1eede Head {h00=0x0016, h01=0x0050, text=» CC A1,VCTYP,A13 .«, t00=0x013c, t01=0x015a}
0x1eede…1eef6 Head {h00=0x0014, h01=0x0050, text=» RF(E) TIM20 YES«, t00=0x013c, t01=0x0174}
0x1eef6…1ef02 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013c, t01=0x018c}
0x1ef02…1ef18 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x013d, t01=0x0008}
0x1ef18…1ef3a Head {h00=0x001e, h01=0x0050, text=» LDK A1,LOCPER DIAGN. CODE«, t00=0x013d, t01=0x001e}
0x1ef3a…1ef6c Head {h00=0x002e, h01=0x0050, text=» ABL CLVC CLEAR VC AND RETURN TO SCHEDULER«, t00=0x013d, t01=0x0040}
0x1ef6c…1ef78 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013d, t01=0x0072}
0x1ef78…1ef82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x007e}
0x1ef82…1ef90 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x013d, t01=0x0088}
0x1ef90…1ef9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x0096}
0x1ef9a…1efc4 Head {h00=0x0026, h01=0x0050, text=»* COMPLETE EVENTS IN OUTPUT QUEUE «, t00=0x013d, t01=0x00a0}
0x1efc4…1efce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x00ca}
0x1efce…1efe2 Head {h00=0x0010, h01=0x0050, text=»TIM20 EQU * «, t00=0x013d, t01=0x00d4}
0x1efe2…1f006 Head {h00=0x0020, h01=0x0050, text=» LDKL A3,RSET.RC RC = RESET «, t00=0x013d, t01=0x00e8}
0x1f006…1f01c Head {h00=0x0012, h01=0x0050, text=» CF A14,CMEVNT«, t00=0x013d, t01=0x010c}
0x1f01c…1f032 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x013d, t01=0x0122}
0x1f032…1f044 Head {h00=0x000e, h01=0x0050, text=» RF TIM40 «, t00=0x013d, t01=0x0138}
0x1f044…1f04e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x014a}
0x1f04e…1f070 Head {h00=0x001e, h01=0x0050, text=»* A CLEAR TIMER IS EXPIRED«, t00=0x013d, t01=0x0154}
0x1f070…1f07a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x0176}
0x1f07a…1f08e Head {h00=0x0010, h01=0x0050, text=»TIM30 EQU * «, t00=0x013d, t01=0x0180}
0x1f08e…1f0bc (318, 0, 400) Head {h00=0x002a, h01=0x0050, text=» CM LCSTAT,A13 NEW LC-STATUS := READY «, t00=0x013e, t01=0x0004}
0x1f0bc…1f0c8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013e, t01=0x0032}
0x1f0c8…1f0dc Head {h00=0x0010, h01=0x0050, text=»TIM40 EQU * «, t00=0x013e, t01=0x003e}
0x1f0dc…1f10a Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x013e, t01=0x0052}
0x1f10a…1f118 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x013e, t01=0x0080}
0x1f118…1f122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x008e}
0x1f122…1f12c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x0098}
0x1f12c…1f15e Head {h00=0x002e, h01=0x0050, text=»* PROCESSING OF A COMPLETED INPUT REQUEST «, t00=0x013e, t01=0x00a2}
0x1f15e…1f168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x00d4}
0x1f168…1f19c Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x013e, t01=0x00de}
0x1f19c…1f1a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x0112}
0x1f1a6…1f1c2 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x013e, t01=0x011c}
0x1f1c2…1f1de Head {h00=0x0018, h01=0x0050, text=»* A1 = ECB-ADDRESS «, t00=0x013e, t01=0x0138}
0x1f1de…1f1e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x0154}
0x1f1e8…1f204 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x013e, t01=0x015e}
0x1f204…1f222 Head {h00=0x001a, h01=0x0050, text=»* ACTIVATION ON LABEL«, t00=0x013e, t01=0x017a}
0x1f222…1f22c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x0008}
0x1f22c…1f240 Head {h00=0x0010, h01=0x0050, text=»ENDIN EQU * «, t00=0x013f, t01=0x0012}
0x1f240…1f268 Head {h00=0x0024, h01=0x0050, text=» LDK A3,3 SET PROCESS INDICATOR «, t00=0x013f, t01=0x0026}
0x1f268…1f280 Head {h00=0x0014, h01=0x0050, text=» ST A3,DCLEVL . «, t00=0x013f, t01=0x004e}
0x1f280…1f2b2 Head {h00=0x002e, h01=0x0050, text=» LDKL A14,DCSTAK SET RETURN STACK POINTER «, t00=0x013f, t01=0x0066}
0x1f2b2…1f2d6 Head {h00=0x0020, h01=0x0050, text=» LDR A8,A1 SAVE ECB-ADDRESS «, t00=0x013f, t01=0x0098}
0x1f2d6…1f302 Head {h00=0x0028, h01=0x0050, text=» CF A14,GTLBA GET LINE BLOCK ADDRESS«, t00=0x013f, t01=0x00bc}
0x1f302…1f32a Head {h00=0x0024, h01=0x0050, text=» LD A5,ECBRC,A8 GET RETURN CODE «, t00=0x013f, t01=0x00e8}
0x1f32a…1f350 Head {h00=0x0022, h01=0x0050, text=» RF(Z) END20 CORRECT COMPLETED«, t00=0x013f, t01=0x0110}
0x1f350…1f374 Head {h00=0x0020, h01=0x0050, text=» CWK A5,17 RECEIVER RESET ? «, t00=0x013f, t01=0x0136}
0x1f374…1f38c Head {h00=0x0014, h01=0x0050, text=» RF(E) END20 YES«, t00=0x013f, t01=0x015a}
0x1f38c…1f39a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x013f, t01=0x0172}
0x1f39a…1f3a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x0180}
0x1f3a4…1f3f0 Head {h00=0x0048, h01=0x0050, text=»* THE INPUT REQUEST IS NOT CORRECT COMPLETED. WHEN THIS IS THE FIRST«, t00=0x013f, t01=0x018a}
0x1f3f0…1f43c Head {h00=0x0048, h01=0x0050, text=»* TIME A DISCONNECT REQUEST FOR THE DC-CONNECTION WILL BE GIVEN AND «, t00=0x0140, t01=0x0046}
0x1f43c…1f482 Head {h00=0x0042, h01=0x0050, text=»* ALL NOT READY SVC'S WILL BE CLEARED LOCAL AND ALL RELATIONS «, t00=0x0140, t01=0x0092}
0x1f482…1f4aa Head {h00=0x0024, h01=0x0050, text=»* DWT <--> PVC WILL BE RELEASED.«, t00=0x0140, t01=0x00d8}
0x1f4aa…1f4b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x0100}
0x1f4b4…1f4da Head {h00=0x0022, h01=0x0050, text=» LD A2,ECBBA,A8 BUFFER ADDRESS«, t00=0x0140, t01=0x010a}
0x1f4da…1f4f8 Head {h00=0x001a, h01=0x0050, text=» CM ECBBA,A8 FREE ECB «, t00=0x0140, t01=0x0130}
0x1f4f8…1f528 Head {h00=0x002c, h01=0x0050, text=» CF A14,RLBUF INPUT BUFFER BACK TO POOL «, t00=0x0140, t01=0x014e}
0x1f528…1f556 Head {h00=0x002a, h01=0x0050, text=» LD A3,CMNFLG,A12 IS SUBSYS STARTED ? «, t00=0x0140, t01=0x017e}
0x1f556…1f56e Head {h00=0x0014, h01=0x0050, text=» ANK A3,STRTFL .«, t00=0x0141, t01=0x001c}
0x1f56e…1f590 Head {h00=0x001e, h01=0x0050, text=» RF(Z) END10 ALREADY DOWN «, t00=0x0141, t01=0x0034}
0x1f590…1f5b8 Head {h00=0x0024, h01=0x0050, text=» LDK A1,STRTFL RESET START FLAG «, t00=0x0141, t01=0x0056}
0x1f5b8…1f5cc Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x0141, t01=0x007e}
0x1f5cc…1f5e8 Head {h00=0x0018, h01=0x0050, text=» ANS A1,CMNFLG,A12 .«, t00=0x0141, t01=0x0092}
0x1f5e8…1f622 Head {h00=0x0036, h01=0x0050, text=» ST A5,HRDSTA,A12 SAVE RETURN CODE IN HARDWARE STA«, t00=0x0141, t01=0x00ae}
0x1f622…1f662 Head {h00=0x003c, h01=0x0050, text=» LDK A6,0 NO DWT AVAILABLE «, t00=0x0141, t01=0x00e8}
0x1f662…1f694 Head {h00=0x002e, h01=0x0050, text=» CF A14,STOP ISSUE DISCONNECT LINE REQUEST«, t00=0x0141, t01=0x0128}
0x1f694…1f6c8 Head {h00=0x0030, h01=0x0050, text=» LDK A1,LOCCLE DIAGN. CODE = LOST CONNECTION«, t00=0x0141, t01=0x015a}
0x1f6c8…1f6f4 Head {h00=0x0028, h01=0x0050, text=» CF A14,CLAVCS CLEAR ALL VC'S LOCAL «, t00=0x0141, t01=0x018e}
0x1f6f4…1f708 Head {h00=0x0010, h01=0x0050, text=»END10 EQU * «, t00=0x0142, t01=0x002a}
0x1f708…1f736 Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0142, t01=0x003e}
0x1f736…1f740 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x006c}
0x1f740…1f770 Head {h00=0x002c, h01=0x0050, text=»* THE INPUT REQUEST IS CORRECT COMPLETED«, t00=0x0142, t01=0x0076}
0x1f770…1f77a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x00a6}
0x1f77a…1f78e Head {h00=0x0010, h01=0x0050, text=»END20 EQU * «, t00=0x0142, t01=0x00b0}
0x1f78e…1f7b4 Head {h00=0x0022, h01=0x0050, text=» LD A5,ECBBA,A8 BUFFER ADDRESS«, t00=0x0142, t01=0x00c4}
0x1f7b4…1f7e4 Head {h00=0x002c, h01=0x0050, text=» LD A3,ECBEL,A8 EFFECTIVE BUFFER LENGTH «, t00=0x0142, t01=0x00ea}
0x1f7e4…1f7f6 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0142, t01=0x011a}
0x1f7f6…1f826 Head {h00=0x002c, h01=0x0050, text=» LC A4,LCIDNT,A5 LOGICAL CHANNEL NUMBER «, t00=0x0142, t01=0x012c}
0x1f826…1f83a Head {h00=0x0010, h01=0x0050, text=» IFT LOOP=1 «, t00=0x0142, t01=0x015c}
0x1f83a…1f844 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x0170}
0x1f844…1f852 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0142, t01=0x017a}
0x1f852…1f85c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x0188}
0x1f85c…1f878 (323, 0, 400) Head {h00=0x0018, h01=0x0050, text=»* ONLY FOR LOOP TEST«, t00=0x0143, t01=0x0004}
0x1f878…1f882 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x0020}
0x1f882…1f89a Head {h00=0x0014, h01=0x0050, text=» LC A6,NRLC,A12 «, t00=0x0143, t01=0x002a}
0x1f89a…1f8ae Head {h00=0x0010, h01=0x0050, text=» ANK A6,/FF «, t00=0x0143, t01=0x0042}
0x1f8ae…1f8cc Head {h00=0x001a, h01=0x0050, text=» SUK A6,1«, t00=0x0143, t01=0x0056}
0x1f8cc…1f8e2 Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0143, t01=0x0074}
0x1f8e2…1f8fa Head {h00=0x0014, h01=0x0050, text=» LC A2,NRPVC,A12«, t00=0x0143, t01=0x008a}
0x1f8fa…1f90e Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0143, t01=0x00a2}
0x1f90e…1f920 Head {h00=0x000e, h01=0x0050, text=» CWR A2,A4«, t00=0x0143, t01=0x00b6}
0x1f920…1f93a Head {h00=0x0016, h01=0x0050, text=» RF(NG) LOOP1 SVC «, t00=0x0143, t01=0x00c8}
0x1f93a…1f94c Head {h00=0x000e, h01=0x0050, text=» LDR A6,A2«, t00=0x0143, t01=0x00e2}
0x1f94c…1f95e Head {h00=0x000e, h01=0x0050, text=» SUK A6,1 «, t00=0x0143, t01=0x00f4}
0x1f95e…1f970 Head {h00=0x000e, h01=0x0050, text=» RF LOOP2 «, t00=0x0143, t01=0x0106}
0x1f970…1f984 Head {h00=0x0010, h01=0x0050, text=»LOOP1 EQU * «, t00=0x0143, t01=0x0118}
0x1f984…1f99a Head {h00=0x0012, h01=0x0050, text=» ADR A6,A2 PVC«, t00=0x0143, t01=0x012c}
0x1f99a…1f9ae Head {h00=0x0010, h01=0x0050, text=»LOOP2 EQU * «, t00=0x0143, t01=0x0142}
0x1f9ae…1f9ba Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0143, t01=0x0156}
0x1f9ba…1f9ce Head {h00=0x0010, h01=0x0050, text=» IFT LOOP=1 «, t00=0x0143, t01=0x0162}
0x1f9ce…1f9e0 Head {h00=0x000e, h01=0x0050, text=» SUR A6,A4«, t00=0x0143, t01=0x0176}
0x1f9e0…1f9f2 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A6«, t00=0x0143, t01=0x0188}
0x1f9f2…1fa0a Head {h00=0x0014, h01=0x0050, text=» SC A4,LCIDNT,A5«, t00=0x0144, t01=0x000a}
0x1fa0a…1fa2e Head {h00=0x0020, h01=0x0050, text=»* END OF ONLY LOOP-TEST!!!! «, t00=0x0144, t01=0x0022}
0x1fa2e…1fa3a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0144, t01=0x0046}
0x1fa3a…1fa6a Head {h00=0x002c, h01=0x0050, text=» CC A4,NRLC,A12 LC-NUMBER WITHIN LIMITS?«, t00=0x0144, t01=0x0052}
0x1fa6a…1fa82 Head {h00=0x0014, h01=0x0050, text=» RF(L) END30 YES«, t00=0x0144, t01=0x0082}
0x1fa82…1fa90 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0144, t01=0x009a}
0x1fa90…1fa9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x00a8}
0x1fa9a…1fad8 Head {h00=0x003a, h01=0x0050, text=»* IGNORE RECEIVED BUFFER AND ISSUE A NEW INPUT REQUEST«, t00=0x0144, t01=0x00b2}
0x1fad8…1fae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x00f0}
0x1fae2…1fb00 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A8 ECB-ADDRESS«, t00=0x0144, t01=0x00fa}
0x1fb00…1fb30 Head {h00=0x002c, h01=0x0050, text=» LDK A7,RECEIV FUNCTION CODE FOR RECEIVE«, t00=0x0144, t01=0x0118}
0x1fb30…1fb3c Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0144, t01=0x0148}
0x1fb3c…1fb4c Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x0144, t01=0x0154}
0x1fb4c…1fb72 Head {h00=0x0022, h01=0x0050, text=» DATA ENDIN ACTIVATION ADDRESS«, t00=0x0144, t01=0x0164}
0x1fb72…1fb9e Head {h00=0x0028, h01=0x0050, text=» RB END10 CONTROL BACK TO SCHEDULER «, t00=0x0144, t01=0x018a}
0x1fb9e…1fba8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x0026}
0x1fba8…1fbc6 Head {h00=0x001a, h01=0x0050, text=»* LC-NUMBER IS CORRECT«, t00=0x0145, t01=0x0030}
0x1fbc6…1fbd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x004e}
0x1fbd0…1fbe4 Head {h00=0x0010, h01=0x0050, text=»END30 EQU * «, t00=0x0145, t01=0x0058}
0x1fbe4…1fc0e Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x0145, t01=0x006c}
0x1fc0e…1fc38 Head {h00=0x0026, h01=0x0050, text=» CF A14,GTBUF GET AN INPUT BUFFER «, t00=0x0145, t01=0x0096}
0x1fc38…1fc56 Head {h00=0x001a, h01=0x0050, text=» ST A2,ECBBA,A8 TO ECB«, t00=0x0145, t01=0x00c0}
0x1fc56…1fc82 Head {h00=0x0028, h01=0x0050, text=» LDR A1,A8 ECB-ADDRESS AS PARAMETER «, t00=0x0145, t01=0x00de}
0x1fc82…1fcb2 Head {h00=0x002c, h01=0x0050, text=» LDK A7,RECEIV FUNCTION CODE FOR RECEIVE«, t00=0x0145, t01=0x010a}
0x1fcb2…1fcdc Head {h00=0x0026, h01=0x0050, text=» LKM ISSUE A NEW RECEIVE REQUEST «, t00=0x0145, t01=0x013a}
0x1fcdc…1fcec Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x0145, t01=0x0164}
0x1fcec…1fd12 Head {h00=0x0022, h01=0x0050, text=» DATA ENDIN ACTIVATION ADDRESS«, t00=0x0145, t01=0x0174}
0x1fd12…1fd1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0146, t01=0x000a}
0x1fd1c…1fd4c Head {h00=0x002c, h01=0x0050, text=»* TEST IF A RESTART PROCEDURE IS ACTIVE «, t00=0x0146, t01=0x0014}
0x1fd4c…1fd56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0146, t01=0x0044}
0x1fd56…1fd78 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A5 BUFFER ADDRESS «, t00=0x0146, t01=0x004e}
0x1fd78…1fda8 Head {h00=0x002c, h01=0x0050, text=» LD A4,CMNFLG,A12 IS RESTART FLAG SET ? «, t00=0x0146, t01=0x0070}
0x1fda8…1fdc0 Head {h00=0x0014, h01=0x0050, text=» ANK A4,RSTFLG .«, t00=0x0146, t01=0x00a0}
0x1fdc0…1fdfa Head {h00=0x0036, h01=0x0050, text=» LC A4,IDENT,A2 GET PACKET TYPE«, t00=0x0146, t01=0x00b8}
0x1fdfa…1fe2a Head {h00=0x002c, h01=0x0050, text=» RF(Z) END40 NO RESTART PROCEDURE ACTIVE«, t00=0x0146, t01=0x00f2}
0x1fe2a…1fe40 Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x0146, t01=0x0122}
0x1fe40…1fe6e Head {h00=0x002a, h01=0x0050, text=» CWK A4,RSTR.P IS IT A RESTART PACKET «, t00=0x0146, t01=0x0138}
0x1fe6e…1fe86 Head {h00=0x0014, h01=0x0050, text=» RF(E) END40 YES«, t00=0x0146, t01=0x0166}
0x1fe86…1feba Head {h00=0x0030, h01=0x0050, text=» CWK A4,RSTR.CP IS IT A RESTART CONF. PACKET«, t00=0x0146, t01=0x017e}
0x1feba…1fed2 Head {h00=0x0014, h01=0x0050, text=» RF(E) END40 YES«, t00=0x0147, t01=0x0022}
0x1fed2…1fefc Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF RELEASE INPUT BUFFER«, t00=0x0147, t01=0x003a}
0x1fefc…1ff28 Head {h00=0x0028, h01=0x0050, text=» RB END10 CONTROL BACK TO SCHEDULER «, t00=0x0147, t01=0x0064}
0x1ff28…1ff36 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0147, t01=0x0090}
0x1ff36…1ff40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x009e}
0x1ff40…1ff6a Head {h00=0x0026, h01=0x0050, text=»* SEARCH PACKET DEPENDENT ROUTINE «, t00=0x0147, t01=0x00a8}
0x1ff6a…1ff74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x00d2}
0x1ff74…1ff88 Head {h00=0x0010, h01=0x0050, text=»END40 EQU * «, t00=0x0147, t01=0x00dc}
0x1ff88…1ff9e Head {h00=0x0012, h01=0x0050, text=» LDK A5,DATA.P«, t00=0x0147, t01=0x00f0}
0x1ff9e…1ffc6 Head {h00=0x0024, h01=0x0050, text=» TM A4,A5 IS IT A DATA PACKET ? «, t00=0x0147, t01=0x0106}
0x1ffc6…1ffe0 Head {h00=0x0016, h01=0x0050, text=» ABL(Z) DATIN YES «, t00=0x0147, t01=0x012e}
0x1ffe0…1fff4 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/1F «, t00=0x0147, t01=0x0148}
0x1fff4…20008 Head {h00=0x0010, h01=0x0050, text=» LDK A5,RR.P«, t00=0x0147, t01=0x015c}
0x20008…2002e Head {h00=0x0022, h01=0x0050, text=» CWR A4,A5 IS IT A RR-PACKET ?«, t00=0x0147, t01=0x0170}
0x2002e…20046 Head {h00=0x0014, h01=0x0050, text=» ABL(E) RRIN YES«, t00=0x0148, t01=0x0008}
0x20046…2005c Head {h00=0x0012, h01=0x0050, text=» LDK A5,RNR.P «, t00=0x0148, t01=0x0020}
0x2005c…20084 Head {h00=0x0024, h01=0x0050, text=» CWR A4,A5 IS IT AN RNR-PACKET ?«, t00=0x0148, t01=0x0036}
0x20084…2009e Head {h00=0x0016, h01=0x0050, text=» ABL(E) RNRIN YES «, t00=0x0148, t01=0x005e}
0x2009e…200b4 Head {h00=0x0012, h01=0x0050, text=» LDK A5,TABLNG«, t00=0x0148, t01=0x0078}
0x200b4…200c8 Head {h00=0x0010, h01=0x0050, text=»END50 EQU * «, t00=0x0148, t01=0x008e}
0x200c8…200ee Head {h00=0x0022, h01=0x0050, text=» LC A4,IDENT,A2 «, t00=0x0148, t01=0x00a2}
0x200ee…2011c Head {h00=0x002a, h01=0x0050, text=» CC A4,TABLE,A5 SEARCH IDENT IN TABLE «, t00=0x0148, t01=0x00c8}
0x2011c…20136 Head {h00=0x0016, h01=0x0050, text=» RF(E) END70 FOUND«, t00=0x0148, t01=0x00f6}
0x20136…20148 Head {h00=0x000e, h01=0x0050, text=» SUK A5,1 «, t00=0x0148, t01=0x0110}
0x20148…2016a Head {h00=0x001e, h01=0x0050, text=» RB(NN) END50 TRY NEXT ONE«, t00=0x0148, t01=0x0122}
0x2016a…20174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x0144}
0x20174…20192 Head {h00=0x001a, h01=0x0050, text=»* INVALID PACKET TYPE «, t00=0x0148, t01=0x014e}
0x20192…2019c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x016c}
0x2019c…201b0 Head {h00=0x0010, h01=0x0050, text=»END60 EQU * «, t00=0x0148, t01=0x0176}
0x201b0…201da Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF RELEASE INPUT BUFFER«, t00=0x0148, t01=0x018a}
0x201da…20212 Head {h00=0x0034, h01=0x0050, text=» LDK A1,LOCPER DIAGNOSTIC CODE = PROCEDURE ERRO «, t00=0x0149, t01=0x0024}
0x20212…20242 Head {h00=0x002c, h01=0x0050, text=» ABL CLVC CLEAR VC AND RETURN TO SCHED. «, t00=0x0149, t01=0x005c}
0x20242…2024c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x008c}
0x2024c…2025a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0149, t01=0x0096}
0x2025a…20264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x00a4}
0x20264…2029e Head {h00=0x0036, h01=0x0050, text=»* PACKET TYPE FOUND, BRANCH TO CONCERNING ROUTINE «, t00=0x0149, t01=0x00ae}
0x2029e…202a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x00e8}
0x202a8…202bc Head {h00=0x0010, h01=0x0050, text=»END70 EQU * «, t00=0x0149, t01=0x00f2}
0x202bc…202e2 Head {h00=0x0022, h01=0x0050, text=» SLL A5,1 PREPARE FOR INDEXING«, t00=0x0149, t01=0x0106}
0x202e2…2030a Head {h00=0x0024, h01=0x0050, text=» ABI BRATAB,A5 BRANCH TO MODULE «, t00=0x0149, t01=0x012c}
0x2030a…20314 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x0154}
0x20314…20330 Head {h00=0x0018, h01=0x0050, text=»* PACKET TYPE TABLE «, t00=0x0149, t01=0x015e}
0x20330…2033a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x017a}
0x2033a…2034e Head {h00=0x0010, h01=0x0050, text=»TABLE EQU * «, t00=0x0149, t01=0x0184}
0x2034e…20382 Head {h00=0x0030, h01=0x0050, text=» BYTE RSTR.P,RSTR.CP RESTART(-CONF.) PACKET «, t00=0x014a, t01=0x0008}
0x20382…203b4 Head {h00=0x002e, h01=0x0050, text=» BYTE RSET.P,RSET.CP RESET(-CONF.) PACKET «, t00=0x014a, t01=0x003c}
0x203b4…203ca Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x014a, t01=0x006e}
0x203ca…203fa Head {h00=0x002c, h01=0x0050, text=» BYTE CLE.P,CLE.CP CLEAR(-CONF.) PACKET «, t00=0x014a, t01=0x0084}
0x203fa…20428 Head {h00=0x002a, h01=0x0050, text=» BYTE CAL.P,CAL.CP CALL(-CONF.) PACKET«, t00=0x014a, t01=0x00b4}
0x20428…20434 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x014a, t01=0x00e2}
0x20434…20468 Head {h00=0x0030, h01=0x0050, text=» BYTE INT.P,INT.CP INTERRUPT(-CONF.) PACKET «, t00=0x014a, t01=0x00ee}
0x20468…20492 Head {h00=0x0026, h01=0x0050, text=»TABLNG EQU *-1-TABLE TABLE LENGTH «, t00=0x014a, t01=0x0122}
0x20492…2049c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x014c}
0x2049c…204b2 Head {h00=0x0012, h01=0x0050, text=»* BRANCH TABLE«, t00=0x014a, t01=0x0156}
0x204b2…204bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x016c}
0x204bc…204d0 Head {h00=0x0010, h01=0x0050, text=»BRATAB EQU *«, t00=0x014a, t01=0x0176}
0x204d0…204ec Head {h00=0x0018, h01=0x0050, text=» DATA RSTIN RESTART «, t00=0x014a, t01=0x018a}
0x204ec…20516 Head {h00=0x0026, h01=0x0050, text=» DATA RSTCIN RESTART CONFIRMATION «, t00=0x014b, t01=0x0016}
0x20516…20530 Head {h00=0x0016, h01=0x0050, text=» DATA RESIN RESET «, t00=0x014b, t01=0x0040}
0x20530…20558 Head {h00=0x0024, h01=0x0050, text=» DATA RESCIN RESET CONFIRMATION «, t00=0x014b, t01=0x005a}
0x20558…2056e Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x014b, t01=0x0082}
0x2056e…20588 Head {h00=0x0016, h01=0x0050, text=» DATA CLRIN CLEAR «, t00=0x014b, t01=0x0098}
0x20588…205b0 Head {h00=0x0024, h01=0x0050, text=» DATA CLRCIN CLEAR CONFIRMATION «, t00=0x014b, t01=0x00b2}
0x205b0…205ca Head {h00=0x0016, h01=0x0050, text=» DATA CALLIN CALL «, t00=0x014b, t01=0x00da}
0x205ca…205f0 Head {h00=0x0022, h01=0x0050, text=» DATA CALCIN CALL CONFIRMATION«, t00=0x014b, t01=0x00f4}
0x205f0…205fc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x014b, t01=0x011a}
0x205fc…2061a Head {h00=0x001a, h01=0x0050, text=» DATA INTIN INTERRUPT «, t00=0x014b, t01=0x0126}
0x2061a…20646 Head {h00=0x0028, h01=0x0050, text=» DATA INTCIN INTERRUPT CONFIRMATION «, t00=0x014b, t01=0x0144}
0x20646…20654 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x014b, t01=0x0170}
0x20654…2065e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x017e}
0x2065e…2068a Head {h00=0x0028, h01=0x0050, text=»* PROCESSING OF RECEIVED DATA PACKET«, t00=0x014b, t01=0x0188}
0x2068a…20694 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0024}
0x20694…206c8 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x014c, t01=0x002e}
0x206c8…206d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0062}
0x206d2…206ee Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x014c, t01=0x006c}
0x206ee…2070e Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x014c, t01=0x0088}
0x2070e…2072c Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER LENGTH«, t00=0x014c, t01=0x00a8}
0x2072c…2074c Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x014c, t01=0x00c6}
0x2074c…20778 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x014c, t01=0x00e6}
0x20778…20782 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0112}
0x20782…2079e Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x014c, t01=0x011c}
0x2079e…207b6 Head {h00=0x0014, h01=0x0050, text=»* ABL DATIN «, t00=0x014c, t01=0x0138}
0x207b6…207c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0150}
0x207c0…207d4 Head {h00=0x0010, h01=0x0050, text=»DATIN EQU * «, t00=0x014c, t01=0x015a}
0x207d4…20806 Head {h00=0x002e, h01=0x0050, text=» CF A14,TDARR TEST PART OF PACKET CONTENTS«, t00=0x014c, t01=0x016e}
0x20806…20820 Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 O.K. ? «, t00=0x014d, t01=0x0010}
0x20820…20838 Head {h00=0x0014, h01=0x0050, text=» RF(NZ) DAT00 NO«, t00=0x014d, t01=0x002a}
0x20838…20860 Head {h00=0x0024, h01=0x0050, text=» LC A1,IDENT,A2 GET RECEIVED PS «, t00=0x014d, t01=0x0042}
0x20860…20874 Head {h00=0x0010, h01=0x0050, text=» SRL A1,1 . «, t00=0x014d, t01=0x006a}
0x20874…2088a Head {h00=0x0012, h01=0x0050, text=» ANK A1,/07 . «, t00=0x014d, t01=0x007e}
0x2088a…208be Head {h00=0x0030, h01=0x0050, text=» CC A1,RPS,A13 DOES IT MATCH WITH THE LC-ADM«, t00=0x014d, t01=0x0094}
0x208be…208d6 Head {h00=0x0014, h01=0x0050, text=» RF(NE) DAT00 NO«, t00=0x014d, t01=0x00c8}
0x208d6…208e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x00e0}
0x208e0…2090c Head {h00=0x0028, h01=0x0050, text=»* TEST IF RECEIVED P(S) IS IN WINDOW«, t00=0x014d, t01=0x00ea}
0x2090c…20916 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x0116}
0x20916…20946 Head {h00=0x002c, h01=0x0050, text=» LDK A7,0 PRESET WINDOW NOT FULL INDIC. «, t00=0x014d, t01=0x0120}
0x20946…2097c Head {h00=0x0032, h01=0x0050, text=» LC A5,RLWE,A13 GET NUMBER OF PACKETS IN WIND.«, t00=0x014d, t01=0x0150}
0x2097c…20990 Head {h00=0x0010, h01=0x0050, text=» SUR A1,A5 .«, t00=0x014d, t01=0x0186}
0x20990…209a6 Head {h00=0x0012, h01=0x0050, text=» ANK A1,/07 . «, t00=0x014e, t01=0x000a}
0x209a6…209ba Head {h00=0x0010, h01=0x0050, text=» ADK A1,1 . «, t00=0x014e, t01=0x0020}
0x209ba…209ec Head {h00=0x002e, h01=0x0050, text=» CC A1,LCREWN,A13 COMPARE WITH WINDOW SIZE«, t00=0x014e, t01=0x0034}
0x209ec…20a14 Head {h00=0x0024, h01=0x0050, text=» RF(L) DAT20 WINDOW IS NOT FULL «, t00=0x014e, t01=0x0066}
0x20a14…20a40 Head {h00=0x0028, h01=0x0050, text=» RF(G) DAT00 OUT OF WINDOW, RESET LC«, t00=0x014e, t01=0x008e}
0x20a40…20a68 Head {h00=0x0024, h01=0x0050, text=» LDK A7,1 SET WINDOW FULL INDIC.«, t00=0x014e, t01=0x00ba}
0x20a68…20a7c Head {h00=0x0010, h01=0x0050, text=» RF DAT20 . «, t00=0x014e, t01=0x00e2}
0x20a7c…20a8a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x014e, t01=0x00f6}
0x20a8a…20a94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x0104}
0x20a94…20ad4 Head {h00=0x003c, h01=0x0050, text=»* PACKET RECEIVED OUT OF SEQUENCE, START RESET PROCEDURE«, t00=0x014e, t01=0x010e}
0x20ad4…20ade Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x014e}
0x20ade…20af2 Head {h00=0x0010, h01=0x0050, text=»DAT00 EQU * «, t00=0x014e, t01=0x0158}
0x20af2…20b20 Head {h00=0x002a, h01=0x0050, text=» LDK A1,RSET.ST LC-SUBSTATUS := RESET «, t00=0x014e, t01=0x016c}
0x20b20…20b3c Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSBST,A13 . «, t00=0x014f, t01=0x000a}
0x20b3c…20b46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x0026}
0x20b46…20b76 Head {h00=0x002c, h01=0x0050, text=»* PREPARE AND QUEUE RESET PACKET FOR RH «, t00=0x014f, t01=0x0030}
0x20b76…20b80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x0060}
0x20b80…20bb0 Head {h00=0x002c, h01=0x0050, text=» LC A1,LCNUM,A13 LOGICAL CHANNEL NUMBER «, t00=0x014f, t01=0x006a}
0x20bb0…20bca Head {h00=0x0016, h01=0x0050, text=» SC A1,LCIDNT,A2 .«, t00=0x014f, t01=0x009a}
0x20bca…20c02 Head {h00=0x0034, h01=0x0050, text=» LDK A1,RSET.P PACKET TYPE FOR RESET INDICATION «, t00=0x014f, t01=0x00b4}
0x20c02…20c1a Head {h00=0x0014, h01=0x0050, text=» SC A1,IDENT,A2 «, t00=0x014f, t01=0x00ec}
0x20c1a…20c50 Head {h00=0x0032, h01=0x0050, text=» LDK A1,RSET.L LENGTH INTERN. RESET CONF NOT. «, t00=0x014f, t01=0x0104}
0x20c50…20c76 Head {h00=0x0022, h01=0x0050, text=» ST A1,HDLC,A2 TO HDLC HEADER «, t00=0x014f, t01=0x013a}
0x20c76…20c88 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x014f, t01=0x0160}
0x20c88…20cb2 Head {h00=0x0026, h01=0x0050, text=» SC A1,CAUSE,A2 CLEAR RESET CAUSE «, t00=0x014f, t01=0x0172}
0x20cb2…20cc8 Head {h00=0x0012, h01=0x0050, text=» LDK A1,RESLCH«, t00=0x0150, t01=0x000c}
0x20cc8…20cf4 Head {h00=0x0028, h01=0x0050, text=» SC A1,DGNCOD,A2 SET DIAGNOSTIC CODE«, t00=0x0150, t01=0x0022}
0x20cf4…20d18 Head {h00=0x0020, h01=0x0050, text=» CF A14,RSETVC«, t00=0x0150, t01=0x004e}
0x20d18…20d48 Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x0150, t01=0x0072}
0x20d48…20d52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x00a2}
0x20d52…20d88 Head {h00=0x0032, h01=0x0050, text=»* PREPARE RESET PACKET AND QUEUE IT FOR OUTPUT«, t00=0x0150, t01=0x00ac}
0x20d88…20d92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x00e2}
0x20d92…20da6 Head {h00=0x0010, h01=0x0050, text=»DAT05 EQU * «, t00=0x0150, t01=0x00ec}
0x20da6…20dce Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x0150, t01=0x0100}
0x20dce…20de6 Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x0150, t01=0x0128}
0x20de6…20e06 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x0150, t01=0x0140}
0x20e06…20e1e Head {h00=0x0014, h01=0x0050, text=» RF(Z) DAT10 YES«, t00=0x0150, t01=0x0160}
0x20e1e…20e28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x0178}
0x20e28…20e56 Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x0150, t01=0x0182}
0x20e56…20e60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x0020}
0x20e60…20e8c Head {h00=0x0028, h01=0x0050, text=» LDKL A1,DAT05 REACTIVATION ADDRESS «, t00=0x0151, t01=0x002a}
0x20e8c…20ea0 Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x0151, t01=0x0056}
0x20ea0…20eaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x006a}
0x20eaa…20eb8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0151, t01=0x0074}
0x20eb8…20ec2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x0082}
0x20ec2…20ed6 Head {h00=0x0010, h01=0x0050, text=»DAT10 EQU * «, t00=0x0151, t01=0x008c}
0x20ed6…20eec Head {h00=0x0012, h01=0x0050, text=» LDK A1,RSET.P«, t00=0x0151, t01=0x00a0}
0x20eec…20f10 Head {h00=0x0020, h01=0x0050, text=» SC A1,IDENT,A2 PACKET TYPE «, t00=0x0151, t01=0x00b6}
0x20f10…20f22 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0151, t01=0x00da}
0x20f22…20f4c Head {h00=0x0026, h01=0x0050, text=» SC A1,CAUSE,A2 CLEAR RESET CAUSE «, t00=0x0151, t01=0x00ec}
0x20f4c…20f62 Head {h00=0x0012, h01=0x0050, text=» LDK A1,RESLCH«, t00=0x0151, t01=0x0116}
0x20f62…20f8a Head {h00=0x0024, h01=0x0050, text=» SC A1,DGNCOD,A2 DIAGNOSTIC CODE«, t00=0x0151, t01=0x012c}
0x20f8a…20fc4 Head {h00=0x0036, h01=0x0050, text=» LDK A1,RSET.L RESET PACKET LENGTH TO HDLC HEADER «, t00=0x0151, t01=0x0154}
0x20fc4…20fdc Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0151, t01=0x018e}
0x20fdc…2100c Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEO PUT ELEMENT IN OUTPUT QUEUE«, t00=0x0152, t01=0x0016}
0x2100c…2103c Head {h00=0x002c, h01=0x0050, text=» LDKL A8,SYRETM RESET CONFIRMATION TIMER«, t00=0x0152, t01=0x0046}
0x2103c…2105e Head {h00=0x001e, h01=0x0050, text=» CF A14,STTIM START TIMER «, t00=0x0152, t01=0x0076}
0x2105e…2108c Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0152, t01=0x0098}
0x2108c…21096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0152, t01=0x00c6}
0x21096…210b2 Head {h00=0x0018, h01=0x0050, text=»* TEST CURRENT M-BIT«, t00=0x0152, t01=0x00d0}
0x210b2…210bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0152, t01=0x00ec}
0x210bc…210d0 Head {h00=0x0010, h01=0x0050, text=»DAT20 EQU * «, t00=0x0152, t01=0x00f6}
0x210d0…210f8 Head {h00=0x0024, h01=0x0050, text=» LC A1,MBIT,A2 GET CURRENT M-BIT«, t00=0x0152, t01=0x010a}
0x210f8…2110e Head {h00=0x0012, h01=0x0050, text=» ANK A1,MPOS .«, t00=0x0152, t01=0x0132}
0x2110e…21130 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DAT30 M-BIT NOT SET«, t00=0x0152, t01=0x0148}
0x21130…2113a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0152, t01=0x016a}
0x2113a…21172 Head {h00=0x0034, h01=0x0050, text=»* M-BIT IS SET, SO DATA LENGTH HAS TO BE MAXIMUM«, t00=0x0152, t01=0x0174}
0x21172…2117c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x001c}
0x2117c…211b4 Head {h00=0x0034, h01=0x0050, text=» LD A1,TRBFSZ,A13 MAX.DATA LENGTH IN DATA PACKET«, t00=0x0153, t01=0x0026}
0x211b4…211d6 Head {h00=0x001e, h01=0x0050, text=» ADK A1,BEGDAT ADD HEADERS«, t00=0x0153, t01=0x005e}
0x211d6…211e8 Head {h00=0x000e, h01=0x0050, text=» CWR A1,A3«, t00=0x0153, t01=0x0080}
0x211e8…21210 Head {h00=0x0024, h01=0x0050, text=» RF(E) DAT30 OK, THEY ARE EQUAL «, t00=0x0153, t01=0x0092}
0x21210…2121a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x00ba}
0x2121a…21248 Head {h00=0x002a, h01=0x0050, text=»* DATA LENGTH NOT MAXIMUM, SO CLEAR VC«, t00=0x0153, t01=0x00c4}
0x21248…21252 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x00f2}
0x21252…21284 Head {h00=0x002e, h01=0x0050, text=» RB END60 CLEAR VC AND RETURN TO SCHEDULER«, t00=0x0153, t01=0x00fc}
0x21284…2128e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x012e}
0x2128e…2129c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0153, t01=0x0138}
0x2129c…212a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x0146}
0x212a6…212ce Head {h00=0x0024, h01=0x0050, text=»* UPDATE PS TO BE RECEIVED NEXT «, t00=0x0153, t01=0x0150}
0x212ce…212d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x0178}
0x212d8…212ec Head {h00=0x0010, h01=0x0050, text=»DAT30 EQU * «, t00=0x0153, t01=0x0182}
0x212ec…2130a Head {h00=0x001a, h01=0x0050, text=» LC A1,RPS,A13 GET RPS«, t00=0x0154, t01=0x0008}
0x2130a…21326 Head {h00=0x0018, h01=0x0050, text=» ADK A1,1 INCREMENT «, t00=0x0154, t01=0x0026}
0x21326…21342 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/07 MODULO 8«, t00=0x0154, t01=0x0042}
0x21342…2135a Head {h00=0x0014, h01=0x0050, text=» SC A1,RPS,A13 .«, t00=0x0154, t01=0x005e}
0x2135a…21364 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x0076}
0x21364…2137e Head {h00=0x0016, h01=0x0050, text=»* GET RECEIVED PR «, t00=0x0154, t01=0x0080}
0x2137e…21388 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x009a}
0x21388…213bc Head {h00=0x0030, h01=0x0050, text=» LC A1,IDENT,A2 GET PR FROM RECEIVED PACKET «, t00=0x0154, t01=0x00a4}
0x213bc…213d0 Head {h00=0x0010, h01=0x0050, text=» SRL A1,5 . «, t00=0x0154, t01=0x00d8}
0x213d0…213e6 Head {h00=0x0012, h01=0x0050, text=» ANK A1,/07 . «, t00=0x0154, t01=0x00ec}
0x213e6…213f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x0102}
0x213f0…21438 Head {h00=0x0044, h01=0x0050, text=»* IF IT IS A SEND WINDOW UPDATING, RESET "NO PROCESSING" FLAG OF«, t00=0x0154, t01=0x010c}
0x21438…2144e Head {h00=0x0012, h01=0x0050, text=»* OUTPUT QUEUE«, t00=0x0154, t01=0x0154}
0x2144e…21458 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x016a}
0x21458…21490 Head {h00=0x0034, h01=0x0050, text=» CC A1,SLWE,A13 COMPARE WITH SEND LOWER WINDOW E«, t00=0x0154, t01=0x0174}
0x21490…214b0 Head {h00=0x001c, h01=0x0050, text=» RF(E) DAT50 NO UPDATING«, t00=0x0155, t01=0x001c}
0x214b0…214d6 Head {h00=0x0022, h01=0x0050, text=» SC A1,SLWE,A13 SAVE NEW VALUE«, t00=0x0155, t01=0x003c}
0x214d6…21508 Head {h00=0x002e, h01=0x0050, text=» LDK A1,NPRFLG RESET "NO PROCESSING" FLAG «, t00=0x0155, t01=0x0062}
0x21508…21528 Head {h00=0x001c, h01=0x0050, text=» C1R A1,A1 «, t00=0x0155, t01=0x0094}
0x21528…21544 Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEOUT,A13 .«, t00=0x0155, t01=0x00b4}
0x21544…2154e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x00d0}
0x2154e…21578 Head {h00=0x0026, h01=0x0050, text=»* QUEUE PACKET FOR REQUEST HANDLER«, t00=0x0155, t01=0x00da}
0x21578…21582 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x0104}
0x21582…21596 Head {h00=0x0010, h01=0x0050, text=»DAT50 EQU * «, t00=0x0155, t01=0x010e}
0x21596…215ce Head {h00=0x0034, h01=0x0050, text=» ST A3,HDLC,A2 SAVE PACKET LENGTH IN HDLC-HEADE «, t00=0x0155, t01=0x0122}
0x215ce…215fe Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x0155, t01=0x015a}
0x215fe…21608 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x018a}
0x21608…21616 (342, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0156, t01=0x0004}
0x21616…21620 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0012}
0x21620…21648 Head {h00=0x0024, h01=0x0050, text=»* CAN RECEIVE WINDOW BE UPDATED «, t00=0x0156, t01=0x001c}
0x21648…21652 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0044}
0x21652…21666 Head {h00=0x0010, h01=0x0050, text=»DAT60 EQU * «, t00=0x0156, t01=0x004e}
0x21666…21696 Head {h00=0x002c, h01=0x0050, text=» LDK A3,0 PRESET INDIC.: NO PR UPDATING «, t00=0x0156, t01=0x0062}
0x21696…216d0 Head {h00=0x0036, h01=0x0050, text=» LC A1,NRNUBF,A13 ARE ALL RESERVED BUFFERS USED ? «, t00=0x0156, t01=0x0092}
0x216d0…216e6 Head {h00=0x0012, h01=0x0050, text=» ANK A1,/FF . «, t00=0x0156, t01=0x00cc}
0x216e6…216fe Head {h00=0x0014, h01=0x0050, text=» RF(Z) DAT70 YES«, t00=0x0156, t01=0x00e2}
0x216fe…21726 Head {h00=0x0024, h01=0x0050, text=» LDK A3,1 SET INDIC.: PR UPDATED«, t00=0x0156, t01=0x00fa}
0x21726…21730 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0122}
0x21730…21744 Head {h00=0x0010, h01=0x0050, text=»* UPDATE PR «, t00=0x0156, t01=0x012c}
0x21744…2174e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0140}
0x2174e…2177e Head {h00=0x002c, h01=0x0050, text=» LC A4,PR,A13 UPDATE PR TO BE SENT NEXT «, t00=0x0156, t01=0x014a}
0x2177e…217b0 Head {h00=0x002e, h01=0x0050, text=» ADR A4,A1 ADD NUMBER OF NOT USED BUFFERS «, t00=0x0156, t01=0x017a}
0x217b0…217cc Head {h00=0x0018, h01=0x0050, text=» ANK A4,/07 MODULO 8«, t00=0x0157, t01=0x001c}
0x217cc…217e4 Head {h00=0x0014, h01=0x0050, text=» SC A4,PR,A13 . «, t00=0x0157, t01=0x0038}
0x217e4…21814 Head {h00=0x002c, h01=0x0050, text=» SUR A1,A1 ALL RES. BUFFERS ARE NOW USED«, t00=0x0157, t01=0x0050}
0x21814…21830 Head {h00=0x0018, h01=0x0050, text=» SC A1,NRNUBF,A13 . «, t00=0x0157, t01=0x0080}
0x21830…2183a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x009c}
0x2183a…21882 Head {h00=0x0044, h01=0x0050, text=»* DID THE RECEIVED PS PASSES THE THRESHOLD OF THE RECEIVE WINDOW«, t00=0x0157, t01=0x00a6}
0x21882…2188c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x00ee}
0x2188c…218a0 Head {h00=0x0010, h01=0x0050, text=»DAT70 EQU * «, t00=0x0157, t01=0x00f8}
0x218a0…218b2 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0157, t01=0x010c}
0x218b2…218d4 Head {h00=0x001e, h01=0x0050, text=» LC A1,RPS,A13 RECEIVED PS«, t00=0x0157, t01=0x011e}
0x218d4…21906 Head {h00=0x002e, h01=0x0050, text=» LC A2,RLWE,A13 RECEIVER LOWER WINDOW EDGE«, t00=0x0157, t01=0x0140}
0x21906…21924 Head {h00=0x001a, h01=0x0050, text=» SUR A1,A2 RPS - RLWE «, t00=0x0157, t01=0x0172}
0x21924…21940 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/07 MODULO 8«, t00=0x0157, t01=0x0190}
0x21940…21978 Head {h00=0x0034, h01=0x0050, text=» CC A1,LCTHRE,A13 DID IT PASSED THE THRESHOLD ? «, t00=0x0158, t01=0x001c}
0x21978…21992 Head {h00=0x0016, h01=0x0050, text=» RF(NG) DAT130 NO «, t00=0x0158, t01=0x0054}
0x21992…2199c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x006e}
0x2199c…219aa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0158, t01=0x0078}
0x219aa…219b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x0086}
0x219b4…219ec Head {h00=0x0034, h01=0x0050, text=»* IF RECEIVE WINDOW IS NOT UPDATED, WAIT FOR IT «, t00=0x0158, t01=0x0090}
0x219ec…219f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x00c8}
0x219f6…21a08 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0158, t01=0x00d2}
0x21a08…21a2c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DAT90 IT IS UPDATED «, t00=0x0158, t01=0x00e4}
0x21a2c…21a50 Head {h00=0x0020, h01=0x0050, text=» LDR A7,A7 IS WINDOW FULL ? «, t00=0x0158, t01=0x0108}
0x21a50…21a7c Head {h00=0x0028, h01=0x0050, text=» RF(Z) DAT130 NO, DON'T WAIT FOR IT «, t00=0x0158, t01=0x012c}
0x21a7c…21ab2 Head {h00=0x0032, h01=0x0050, text=» LDR A1,A13 PARAMETER FOR DELAY AND ACTIVATION«, t00=0x0158, t01=0x0158}
0x21ab2…21ac6 Head {h00=0x0010, h01=0x0050, text=» LD A7,TSKID«, t00=0x0158, t01=0x018e}
0x21ac6…21ae8 Head {h00=0x001e, h01=0x0050, text=» LDKL A8,BUFDEL DELAY TIME«, t00=0x0159, t01=0x0012}
0x21ae8…21af4 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0159, t01=0x0034}
0x21af4…21b04 Head {h00=0x000c, h01=0x0050, text=» DATA -6«, t00=0x0159, t01=0x0040}
0x21b04…21b2a Head {h00=0x0022, h01=0x0050, text=» DATA DAT80 ACTIVATION ADDRESS«, t00=0x0159, t01=0x0050}
0x21b2a…21b56 Head {h00=0x0028, h01=0x0050, text=» RF DAT130 CONTROL BACK TO SCHEDULER«, t00=0x0159, t01=0x0076}
0x21b56…21b60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x00a2}
0x21b60…21b74 Head {h00=0x0010, h01=0x0050, text=»DAT80 EQU * «, t00=0x0159, t01=0x00ac}
0x21b74…21b9e Head {h00=0x0026, h01=0x0050, text=» LDR A13,A1 RESTORE LC-ADM ADDRESS«, t00=0x0159, t01=0x00c0}
0x21b9e…21be4 Head {h00=0x0042, h01=0x0050, text=» LDK A7,1 SET WINDOW FULL INDICATION «, t00=0x0159, t01=0x00ea}
0x21be4…21c10 Head {h00=0x0028, h01=0x0050, text=» LDKL A14,DCSTAK RESET STACK POINTER«, t00=0x0159, t01=0x0130}
0x21c10…21c22 Head {h00=0x000e, h01=0x0050, text=» RB DAT60 «, t00=0x0159, t01=0x015c}
0x21c22…21c2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x016e}
0x21c2c…21c7a Head {h00=0x004a, h01=0x0050, text=»* THE RECEIVE WINDOW IS UPDATED, CAN NEW PR BE SENT IN A DATA PACKET ?«, t00=0x0159, t01=0x0178}
0x21c7a…21c84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0036}
0x21c84…21c98 Head {h00=0x0010, h01=0x0050, text=»DAT90 EQU * «, t00=0x015a, t01=0x0040}
0x21c98…21cca Head {h00=0x002e, h01=0x0050, text=» LD A1,QUEOUT,A13 IS OUTPUT QUEUE EMPTY ? «, t00=0x015a, t01=0x0054}
0x21cca…21ce4 Head {h00=0x0016, h01=0x0050, text=» RF(Z) DAT100 YES «, t00=0x015a, t01=0x0086}
0x21ce4…21cee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x00a0}
0x21cee…21d1c Head {h00=0x002a, h01=0x0050, text=»* TEST IF ONLY NO-PROCESSING FLAG SET «, t00=0x015a, t01=0x00aa}
0x21d1c…21d26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x00d8}
0x21d26…21d44 Head {h00=0x001a, h01=0x0050, text=» SUK A1,1«, t00=0x015a, t01=0x00e2}
0x21d44…21d72 Head {h00=0x002a, h01=0x0050, text=» RF(Z) DAT100 YES«, t00=0x015a, t01=0x0100}
0x21d72…21d7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x012e}
0x21d7c…21d8a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015a, t01=0x0138}
0x21d8a…21d94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0146}
0x21d94…21db4 Head {h00=0x001c, h01=0x0050, text=»* REMOTE BUSY FLAG SET ?«, t00=0x015a, t01=0x0150}
0x21db4…21dbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0170}
0x21dbe…21dd4 Head {h00=0x0012, h01=0x0050, text=» LDK A3,REMBUS«, t00=0x015a, t01=0x017a}
0x21dd4…21dec Head {h00=0x0014, h01=0x0050, text=» AN A3,FLAGS,A13«, t00=0x015a, t01=0x0190}
0x21dec…21e02 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DAT100«, t00=0x015b, t01=0x0018}
0x21e02…21e0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x002e}
0x21e0c…21e2c Head {h00=0x001c, h01=0x0050, text=»* IS SEND WINDOW FULL ? «, t00=0x015b, t01=0x0038}
0x21e2c…21e36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x0058}
0x21e36…21e4c Head {h00=0x0012, h01=0x0050, text=» LC A1,PS,A13 «, t00=0x015b, t01=0x0062}
0x21e4c…21e64 Head {h00=0x0014, h01=0x0050, text=» LC A2,SLWE,A13 «, t00=0x015b, t01=0x0078}
0x21e64…21e76 Head {h00=0x000e, h01=0x0050, text=» SUR A1,A2«, t00=0x015b, t01=0x0090}
0x21e76…21e88 Head {h00=0x000e, h01=0x0050, text=» ANK A1,/7«, t00=0x015b, t01=0x00a2}
0x21e88…21ea2 Head {h00=0x0016, h01=0x0050, text=» CC A1,LCTRWN,A13 «, t00=0x015b, t01=0x00b4}
0x21ea2…21eba Head {h00=0x0014, h01=0x0050, text=» RF(L) DAT130 NO«, t00=0x015b, t01=0x00ce}
0x21eba…21ec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x00e6}
0x21ec4…21ee6 Head {h00=0x001e, h01=0x0050, text=»* SEND NEW PR IN RR-PACKET«, t00=0x015b, t01=0x00f0}
0x21ee6…21ef0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x0112}
0x21ef0…21f04 Head {h00=0x0010, h01=0x0050, text=»DAT100 EQU *«, t00=0x015b, t01=0x011c}
0x21f04…21f2c Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x015b, t01=0x0130}
0x21f2c…21f44 Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x015b, t01=0x0158}
0x21f44…21f64 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x015b, t01=0x0170}
0x21f64…21f7e Head {h00=0x0016, h01=0x0050, text=» RF(Z) DAT120 YES «, t00=0x015b, t01=0x0190}
0x21f7e…21f88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x001a}
0x21f88…21fb6 Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x015c, t01=0x0024}
0x21fb6…21fc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x0052}
0x21fc0…21fec Head {h00=0x0028, h01=0x0050, text=» LDKL A1,DAT100 REACTIVATION ADDRESS«, t00=0x015c, t01=0x005c}
0x21fec…22000 Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x015c, t01=0x0088}
0x22000…2200a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x009c}
0x2200a…22018 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015c, t01=0x00a6}
0x22018…22022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x00b4}
0x22022…22036 Head {h00=0x0010, h01=0x0050, text=»DAT120 EQU *«, t00=0x015c, t01=0x00be}
0x22036…22064 Head {h00=0x002a, h01=0x0050, text=» LC A1,PR,A13 PR «, t00=0x015c, t01=0x00d2}
0x22064…220a6 Head {h00=0x003e, h01=0x0050, text=» SC A1,RLWE,A13 SAVE IT AS LAST SENT PR«, t00=0x015c, t01=0x0100}
0x220a6…220de Head {h00=0x0034, h01=0x0050, text=» SLL A1,5 PR IN PACKET «, t00=0x015c, t01=0x0142}
0x220de…220f4 Head {h00=0x0012, h01=0x0050, text=» ORK A1,RR.P .«, t00=0x015c, t01=0x017a}
0x220f4…2210e Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x015c, t01=0x0190}
0x2210e…22140 Head {h00=0x002e, h01=0x0050, text=» LDK A1,RR.L PACKET LENGTH TO HDLC-HEADER «, t00=0x015d, t01=0x001a}
0x22140…22158 Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x015d, t01=0x004c}
0x22158…22162 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x0064}
0x22162…22196 Head {h00=0x0030, h01=0x0050, text=»* RESET NO PROCESSING FLAG AND QUEUE PACKET «, t00=0x015d, t01=0x006e}
0x22196…221a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x00a2}
0x221a0…221d2 Head {h00=0x002e, h01=0x0050, text=» LDK A1,NPRFLG RESET "NO PROCESSING" FLAG «, t00=0x015d, t01=0x00ac}
0x221d2…221f2 Head {h00=0x001c, h01=0x0050, text=» C1R A1,A1 «, t00=0x015d, t01=0x00de}
0x221f2…2220e Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEOUT,A13 .«, t00=0x015d, t01=0x00fe}
0x2220e…22238 Head {h00=0x0026, h01=0x0050, text=» LDR A1,A13 QUEUE ELEMENT AS FIRST«, t00=0x015d, t01=0x011a}
0x22238…22250 Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEOUT .«, t00=0x015d, t01=0x0144}
0x22250…22268 Head {h00=0x0014, h01=0x0050, text=» CF A14,QUEUEF .«, t00=0x015d, t01=0x015c}
0x22268…2227c Head {h00=0x0010, h01=0x0050, text=»DAT130 EQU *«, t00=0x015d, t01=0x0174}
0x2227c…222aa Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x015d, t01=0x0188}
0x222aa…222b8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015e, t01=0x0026}
0x222b8…222c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x0034}
0x222c2…222cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x003e}
0x222cc…222f6 Head {h00=0x0026, h01=0x0050, text=»* PROCESSING OF RECEIVED RR-PACKET«, t00=0x015e, t01=0x0048}
0x222f6…22300 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x0072}
0x22300…22334 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x015e, t01=0x007c}
0x22334…2233e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x00b0}
0x2233e…22358 Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMETER:«, t00=0x015e, t01=0x00ba}
0x22358…22378 Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x015e, t01=0x00d4}
0x22378…22398 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x015e, t01=0x00f4}
0x22398…223c4 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x015e, t01=0x0114}
0x223c4…223ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x0140}
0x223ce…223ea Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x015e, t01=0x014a}
0x223ea…223fe Head {h00=0x0010, h01=0x0050, text=»* ABL RRIN«, t00=0x015e, t01=0x0166}
0x223fe…22408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x017a}
0x22408…2241a Head {h00=0x000e, h01=0x0050, text=»RRIN EQU *«, t00=0x015e, t01=0x0184}
0x2241a…2243e Head {h00=0x0020, h01=0x0050, text=» CF A14,TDARR TEST RR-PACKET«, t00=0x015f, t01=0x0008}
0x2243e…22466 Head {h00=0x0024, h01=0x0050, text=» LDR A1,A1 PR OUT OF SEQUENCE ? «, t00=0x015f, t01=0x002c}
0x22466…22498 Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) DAT00 YES RESET LC (MODULE DATIN)«, t00=0x015f, t01=0x0054}
0x22498…224a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x0086}
0x224a2…224c8 Head {h00=0x0022, h01=0x0050, text=»* TEST IF REMOTE BUSY FLAG SET«, t00=0x015f, t01=0x0090}
0x224c8…224d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x00b6}
0x224d2…224f8 Head {h00=0x0022, h01=0x0050, text=» LD A1,FLAGS,A13 «, t00=0x015f, t01=0x00c0}
0x224f8…2251c Head {h00=0x0020, h01=0x0050, text=» ANK A1,REMBUS «, t00=0x015f, t01=0x00e6}
0x2251c…2254a Head {h00=0x002a, h01=0x0050, text=» RF(Z) RNRI00 NO!«, t00=0x015f, t01=0x010a}
0x2254a…2256a Head {h00=0x001c, h01=0x0050, text=» C1R A1,A1 «, t00=0x015f, t01=0x0138}
0x2256a…225ac Head {h00=0x003e, h01=0x0050, text=» ANS A1,FLAGS,A13 RESET REMOTE BUSY FLAG «, t00=0x015f, t01=0x0158}
0x225ac…225d0 Head {h00=0x0020, h01=0x0050, text=» LDK A1,NPRFLG «, t00=0x0160, t01=0x000a}
0x225d0…225f0 Head {h00=0x001c, h01=0x0050, text=» C1R A1,A1 «, t00=0x0160, t01=0x002e}
0x225f0…22634 Head {h00=0x0040, h01=0x0050, text=» ANS A1,QUEOUT,A13 RESET NO PROCESSING FLAG «, t00=0x0160, t01=0x004e}
0x22634…22654 Head {h00=0x001c, h01=0x0050, text=» RF RNRI00 «, t00=0x0160, t01=0x0092}
0x22654…22662 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0160, t01=0x00b2}
0x22662…2266c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x00c0}
0x2266c…22698 Head {h00=0x0028, h01=0x0050, text=»* PROCESSING OF RECEIVED RNR-PACKET «, t00=0x0160, t01=0x00ca}
0x22698…226a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x00f6}
0x226a2…226d6 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0160, t01=0x0100}
0x226d6…226e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x0134}
0x226e0…226fa Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMETER:«, t00=0x0160, t01=0x013e}
0x226fa…2271a Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x0160, t01=0x0158}
0x2271a…2273a Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0160, t01=0x0178}
0x2273a…22766 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0161, t01=0x0008}
0x22766…22770 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x0034}
0x22770…2278c Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0161, t01=0x003e}
0x2278c…227a0 Head {h00=0x0010, h01=0x0050, text=»* ABL RNRIN«, t00=0x0161, t01=0x005a}
0x227a0…227aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x006e}
0x227aa…227be Head {h00=0x0010, h01=0x0050, text=»RNRIN EQU * «, t00=0x0161, t01=0x0078}
0x227be…227e2 Head {h00=0x0020, h01=0x0050, text=» CF A14,TDARR TEST RR-PACKET«, t00=0x0161, t01=0x008c}
0x227e2…2280a Head {h00=0x0024, h01=0x0050, text=» LDR A1,A1 PR OUT OF SEQUENCE ? «, t00=0x0161, t01=0x00b0}
0x2280a…2283c Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) DAT00 YES RESET LC (MODULE DATIN)«, t00=0x0161, t01=0x00d8}
0x2283c…22868 Head {h00=0x0028, h01=0x0050, text=» LDK A1,REMBUS SET REMOTE BUSY FLAG «, t00=0x0161, t01=0x010a}
0x22868…22884 Head {h00=0x0018, h01=0x0050, text=» ORS A1,FLAGS,A13 . «, t00=0x0161, t01=0x0136}
0x22884…2288e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x0152}
0x2288e…228a8 Head {h00=0x0016, h01=0x0050, text=»* GET RECEIVED PR «, t00=0x0161, t01=0x015c}
0x228a8…228b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x0176}
0x228b2…228c6 Head {h00=0x0010, h01=0x0050, text=»RNRI00 EQU *«, t00=0x0161, t01=0x0180}
0x228c6…228fa (354, 0, 400) Head {h00=0x0030, h01=0x0050, text=» LC A1,IDENT,A2 GET PR FROM RECEIVED PACKET «, t00=0x0162, t01=0x0004}
0x228fa…2290e Head {h00=0x0010, h01=0x0050, text=» SRL A1,5 . «, t00=0x0162, t01=0x0038}
0x2290e…22924 Head {h00=0x0012, h01=0x0050, text=» ANK A1,/07 . «, t00=0x0162, t01=0x004c}
0x22924…2292e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x0062}
0x2292e…2293c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0162, t01=0x006c}
0x2293c…22946 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x007a}
0x22946…2298e Head {h00=0x0044, h01=0x0050, text=»* IF IT IS A SEND WINDOW UPDATING, RESET "NO PROCESSING" FLAG OF«, t00=0x0162, t01=0x0084}
0x2298e…229a4 Head {h00=0x0012, h01=0x0050, text=»* OUTPUT QUEUE«, t00=0x0162, t01=0x00cc}
0x229a4…229ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x00e2}
0x229ae…229e6 Head {h00=0x0034, h01=0x0050, text=» CC A1,SLWE,A13 COMPARE WITH SEND LOWER WINDOW E«, t00=0x0162, t01=0x00ec}
0x229e6…22a08 Head {h00=0x001e, h01=0x0050, text=» RF(E) RNRI10 NO UPDATING «, t00=0x0162, t01=0x0124}
0x22a08…22a2e Head {h00=0x0022, h01=0x0050, text=» SC A1,SLWE,A13 SAVE NEW VALUE«, t00=0x0162, t01=0x0146}
0x22a2e…22a60 Head {h00=0x002e, h01=0x0050, text=» LDK A1,NPRFLG RESET "NO PROCESSING" FLAG «, t00=0x0162, t01=0x016c}
0x22a60…22a80 Head {h00=0x001c, h01=0x0050, text=» C1R A1,A1 «, t00=0x0163, t01=0x000e}
0x22a80…22a9c Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEOUT,A13 .«, t00=0x0163, t01=0x002e}
0x22a9c…22ab0 Head {h00=0x0010, h01=0x0050, text=»RNRI10 EQU *«, t00=0x0163, t01=0x004a}
0x22ab0…22ada Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x0163, t01=0x005e}
0x22ada…22b08 Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0163, t01=0x0088}
0x22b08…22b1e Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0163, t01=0x00b6}
0x22b1e…22b2c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0163, t01=0x00cc}
0x22b2c…22b36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x00da}
0x22b36…22b40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x00e4}
0x22b40…22b6c Head {h00=0x0028, h01=0x0050, text=»* PROCESSING OF RECEIVED CALL-PACKET«, t00=0x0163, t01=0x00ee}
0x22b6c…22b76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x011a}
0x22b76…22baa Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0163, t01=0x0124}
0x22baa…22bb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x0158}
0x22bb4…22bd0 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0163, t01=0x0162}
0x22bd0…22bf0 Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x0163, t01=0x017e}
0x22bf0…22c0e Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER LENGTH«, t00=0x0164, t01=0x000e}
0x22c0e…22c2e Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0164, t01=0x002c}
0x22c2e…22c5a Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0164, t01=0x004c}
0x22c5a…22c64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x0078}
0x22c64…22c80 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0164, t01=0x0082}
0x22c80…22c98 Head {h00=0x0014, h01=0x0050, text=»* ABL CALLIN«, t00=0x0164, t01=0x009e}
0x22c98…22ca2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x00b6}
0x22ca2…22cb6 Head {h00=0x0010, h01=0x0050, text=»CALLIN EQU *«, t00=0x0164, t01=0x00c0}
0x22cb6…22ce4 Head {h00=0x002a, h01=0x0050, text=» LDK A1,READ.ST IS LC-STATUS: READY ? «, t00=0x0164, t01=0x00d4}
0x22ce4…22d00 Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0164, t01=0x0102}
0x22d00…22d1a Head {h00=0x0016, h01=0x0050, text=» RF(E) CALLI1 YES «, t00=0x0164, t01=0x011e}
0x22d1a…22d44 Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF RELEASE INPUT BUFFER«, t00=0x0164, t01=0x0138}
0x22d44…22d76 Head {h00=0x002e, h01=0x0050, text=» LDK A1,LCAL.ST IS LC-STATUS: LOCAL-CALL ?«, t00=0x0164, t01=0x0162}
0x22d76…22d92 (357, 0, 398) Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0165, t01=0x0004}
0x22d92…22db8 Head {h00=0x0022, h01=0x0050, text=» RF(NE) CALC00 NO, SO CLEAR VC«, t00=0x0165, t01=0x0020}
0x22db8…22dc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x0046}
0x22dc2…22dfe Head {h00=0x0038, h01=0x0050, text=»* A CALL COLLISION IS OCCURED, IGNORE RECEIVED CALL «, t00=0x0165, t01=0x0050}
0x22dfe…22e08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x008c}
0x22e08…22e36 Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0165, t01=0x0096}
0x22e36…22e40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x00c4}
0x22e40…22e84 Head {h00=0x0040, h01=0x0050, text=»* THE LC-STATUS IS VALID IN COMBINATION WITH THE CALL PACKET«, t00=0x0165, t01=0x00ce}
0x22e84…22e8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x0112}
0x22e8e…22ea2 Head {h00=0x0010, h01=0x0050, text=»CALLI1 EQU *«, t00=0x0165, t01=0x011c}
0x22ea2…22ed6 Head {h00=0x0030, h01=0x0050, text=» ST A3,HDLC,A2 SAVE BUFFER LENGTH IN BUFFER «, t00=0x0165, t01=0x0130}
0x22ed6…22f04 Head {h00=0x002a, h01=0x0050, text=» LDK A1,RCAL.ST LC-STAT := REMOTE CALL«, t00=0x0165, t01=0x0164}
0x22f04…22f20 (358, 0, 400) Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSTAT,A13 . «, t00=0x0166, t01=0x0004}
0x22f20…22f50 Head {h00=0x002c, h01=0x0050, text=» LDK A1,0 ALL RESERVED BUFFERS ARE USED «, t00=0x0166, t01=0x0020}
0x22f50…22f6c Head {h00=0x0018, h01=0x0050, text=» SC A1,NRNUBF,A13 . «, t00=0x0166, t01=0x0050}
0x22f6c…22f7a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0166, t01=0x006c}
0x22f7a…22f84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x007a}
0x22f84…22fb0 Head {h00=0x0028, h01=0x0050, text=»* GET WINDOW SIZES AND PACKET LENGTH«, t00=0x0166, t01=0x0084}
0x22fb0…22fba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x00b0}
0x22fba…22fd0 Head {h00=0x0012, h01=0x0050, text=» CF A14,GTWNDS«, t00=0x0166, t01=0x00ba}
0x22fd0…22fda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x00d0}
0x22fda…2300c Head {h00=0x002e, h01=0x0050, text=»* CHANGE TRANSMIT AND RECEIVE WINDOW SIZES«, t00=0x0166, t01=0x00da}
0x2300c…23016 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x010c}
0x23016…23030 Head {h00=0x0016, h01=0x0050, text=» LC A1,LCTRWN,A13 «, t00=0x0166, t01=0x0116}
0x23030…23042 Head {h00=0x000e, h01=0x0050, text=» ECR A1,A1«, t00=0x0166, t01=0x0130}
0x23042…2305c Head {h00=0x0016, h01=0x0050, text=» LC A1,LCREWN,A13 «, t00=0x0166, t01=0x0142}
0x2305c…23076 Head {h00=0x0016, h01=0x0050, text=» SC A1,LCTRWN,A13 «, t00=0x0166, t01=0x015c}
0x23076…23088 Head {h00=0x000e, h01=0x0050, text=» ECR A1,A1«, t00=0x0166, t01=0x0176}
0x23088…230a2 Head {h00=0x0016, h01=0x0050, text=» SC A1,LCREWN,A13 «, t00=0x0166, t01=0x0188}
0x230a2…230ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0012}
0x230ac…230e0 Head {h00=0x0030, h01=0x0050, text=»* CHANGE TRANSMIT AND RECEIVE PACKET LENGTH «, t00=0x0167, t01=0x001c}
0x230e0…230ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0050}
0x230ea…23104 Head {h00=0x0016, h01=0x0050, text=» LD A1,TRBFSZ,A13 «, t00=0x0167, t01=0x005a}
0x23104…2311e Head {h00=0x0016, h01=0x0050, text=» LD A3,REBFSZ,A13 «, t00=0x0167, t01=0x0074}
0x2311e…23138 Head {h00=0x0016, h01=0x0050, text=» ST A3,TRBFSZ,A13 «, t00=0x0167, t01=0x008e}
0x23138…23152 Head {h00=0x0016, h01=0x0050, text=» ST A1,REBFSZ,A13 «, t00=0x0167, t01=0x00a8}
0x23152…2315c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x00c2}
0x2315c…2319e Head {h00=0x003e, h01=0x0050, text=»* TRANSLATE THRESHOLD PERCENTAGE INTO A NUMBER OF PACKETS «, t00=0x0167, t01=0x00cc}
0x2319e…231a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x010e}
0x231a8…231be Head {h00=0x0012, h01=0x0050, text=» CF A14,TRTHR «, t00=0x0167, t01=0x0118}
0x231be…231c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x012e}
0x231c8…231f6 Head {h00=0x002a, h01=0x0050, text=»* QUEUE PACKET FOR THE REQUEST HANDLER«, t00=0x0167, t01=0x0138}
0x231f6…23200 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0166}
0x23200…23212 Head {h00=0x000e, h01=0x0050, text=» RF CALC20«, t00=0x0167, t01=0x0170}
0x23212…23220 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0167, t01=0x0182}
0x23220…2322a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0190}
0x2322a…23234 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x000a}
0x23234…2326e Head {h00=0x0036, h01=0x0050, text=»* PROCESSING OF RECEIVED CALL CONFIRMATION PACKET «, t00=0x0168, t01=0x0014}
0x2326e…23278 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x004e}
0x23278…232ac Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0168, t01=0x0058}
0x232ac…232b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x008c}
0x232b6…232d2 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0168, t01=0x0096}
0x232d2…232f2 Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x0168, t01=0x00b2}
0x232f2…23310 Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER LENGTH«, t00=0x0168, t01=0x00d2}
0x23310…23330 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0168, t01=0x00f0}
0x23330…2335c Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0168, t01=0x0110}
0x2335c…23366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x013c}
0x23366…23382 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0168, t01=0x0146}
0x23382…2339a Head {h00=0x0014, h01=0x0050, text=»* ABL CALCIN«, t00=0x0168, t01=0x0162}
0x2339a…233a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x017a}
0x233a4…233b8 Head {h00=0x0010, h01=0x0050, text=»CALCIN EQU *«, t00=0x0168, t01=0x0184}
0x233b8…233ee Head {h00=0x0032, h01=0x0050, text=» LDK A1,LCAL.ST IS LC-STATUS: LOCAL-CALL STATE«, t00=0x0169, t01=0x0008}
0x233ee…2340a Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0169, t01=0x003e}
0x2340a…23424 Head {h00=0x0016, h01=0x0050, text=» RF(E) CALC10 YES «, t00=0x0169, t01=0x005a}
0x23424…2342e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x0074}
0x2342e…23452 Head {h00=0x0020, h01=0x0050, text=»* ILLEGAL STATE, SO CLEAR VC«, t00=0x0169, t01=0x007e}
0x23452…2345c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x00a2}
0x2345c…23486 Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x0169, t01=0x00ac}
0x23486…2349a Head {h00=0x0010, h01=0x0050, text=»CALC00 EQU *«, t00=0x0169, t01=0x00d6}
0x2349a…234d2 Head {h00=0x0034, h01=0x0050, text=» LDK A1,LOCPER DIAGNOSTIC CODE = PROCEDURE ERRO «, t00=0x0169, t01=0x00ea}
0x234d2…23502 Head {h00=0x002c, h01=0x0050, text=» ABL CLVC CLEAR VC AND RETURN TO SCHED. «, t00=0x0169, t01=0x0122}
0x23502…2350c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x0152}
0x2350c…2351a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0169, t01=0x015c}
0x2351a…23524 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x016a}
0x23524…2355a Head {h00=0x0032, h01=0x0050, text=»* STATUS WILL BE DATA TRANSFER, UPDATE LC-ADM «, t00=0x0169, t01=0x0174}
0x2355a…23564 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x001a}
0x23564…23578 Head {h00=0x0010, h01=0x0050, text=»CALC10 EQU *«, t00=0x016a, t01=0x0024}
0x23578…235aa Head {h00=0x002e, h01=0x0050, text=» LDK A1,DATA.ST LC-STATUS := DATA TRANSFER«, t00=0x016a, t01=0x0038}
0x235aa…235be Head {h00=0x0010, h01=0x0050, text=» ECR A1,A1 .«, t00=0x016a, t01=0x006a}
0x235be…235f8 Head {h00=0x0036, h01=0x0050, text=» ST A1,LCSTAT,A13 SUBSTATUS := FLOW CONTROL READY «, t00=0x016a, t01=0x007e}
0x235f8…23622 Head {h00=0x0026, h01=0x0050, text=» CF A14,CLLCAD CLEAR LC-ADM FIELDS«, t00=0x016a, t01=0x00b8}
0x23622…2362c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x00e2}
0x2362c…23656 Head {h00=0x0026, h01=0x0050, text=»* UPDATE CALL CONFIRMATION PACKET «, t00=0x016a, t01=0x00ec}
0x23656…23660 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0116}
0x23660…23694 Head {h00=0x0030, h01=0x0050, text=» ST A3,HDLC,A2 PACKET LENGTH TO HDLC-HEADER «, t00=0x016a, t01=0x0120}
0x23694…2369e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0154}
0x2369e…236c0 Head {h00=0x001e, h01=0x0050, text=»* QUEUE PACKET AND RETURN «, t00=0x016a, t01=0x015e}
0x236c0…236ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0180}
0x236ca…236de Head {h00=0x0010, h01=0x0050, text=»CALC20 EQU *«, t00=0x016a, t01=0x018a}
0x236de…2370e Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x016b, t01=0x000e}
0x2370e…2373c Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x016b, t01=0x003e}
0x2373c…2374a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016b, t01=0x006c}
0x2374a…23754 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x007a}
0x23754…2375e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x0084}
0x2375e…2378c Head {h00=0x002a, h01=0x0050, text=»* PROCESSING OF RECEIVED CLEAR PACKET «, t00=0x016b, t01=0x008e}
0x2378c…23796 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x00bc}
0x23796…237ca Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x016b, t01=0x00c6}
0x237ca…237d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x00fa}
0x237d4…237ee Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMETER:«, t00=0x016b, t01=0x0104}
0x237ee…2380e Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x016b, t01=0x011e}
0x2380e…2382c Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER LENGTH«, t00=0x016b, t01=0x013e}
0x2382c…2384c Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x016b, t01=0x015c}
0x2384c…23878 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x016b, t01=0x017c}
0x23878…23882 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x0018}
0x23882…2389e Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x016c, t01=0x0022}
0x2389e…238b6 Head {h00=0x0014, h01=0x0050, text=»* ABL CLRIN «, t00=0x016c, t01=0x003e}
0x238b6…238c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x0056}
0x238c0…238d4 Head {h00=0x0010, h01=0x0050, text=»CLRIN EQU * «, t00=0x016c, t01=0x0060}
0x238d4…238ea Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x016c, t01=0x0074}
0x238ea…2391e Head {h00=0x0030, h01=0x0050, text=» LC A1,VCTYP,A13 GET TYPE OF LOGICAL CHANNEL«, t00=0x016c, t01=0x008a}
0x2391e…23934 Head {h00=0x0012, h01=0x0050, text=» ANK A1,/FF . «, t00=0x016c, t01=0x00be}
0x23934…23968 Head {h00=0x0030, h01=0x0050, text=» CWK A1,SVC IS IT A SWITCH VIRTUAL CIRCUIT ?«, t00=0x016c, t01=0x00d4}
0x23968…23980 Head {h00=0x0014, h01=0x0050, text=» RF(E) CLR00 YES«, t00=0x016c, t01=0x0108}
0x23980…239b4 Head {h00=0x0030, h01=0x0050, text=» LDK A1,LOCPER DIAGN. CODE : PROCEDURE ERROR«, t00=0x016c, t01=0x0120}
0x239b4…239d0 Head {h00=0x0018, h01=0x0050, text=» ABL CLVC RESET PVC «, t00=0x016c, t01=0x0154}
0x239d0…239da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x0170}
0x239da…239ee Head {h00=0x0010, h01=0x0050, text=»CLR00 EQU * «, t00=0x016c, t01=0x017a}
0x239ee…239fa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x016c, t01=0x018e}
0x239fa…23a10 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x016d, t01=0x000a}
0x23a10…23a3e Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IS LC-STATUS = CLEAR ?«, t00=0x016d, t01=0x0020}
0x23a3e…23a5a Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x016d, t01=0x004e}
0x23a5a…23a88 Head {h00=0x002a, h01=0x0050, text=» RF(E) CLRCIN YES, CO CLEAR COLLISION «, t00=0x016d, t01=0x006a}
0x23a88…23a92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x0098}
0x23a92…23aa0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016d, t01=0x00a2}
0x23aa0…23aaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x00b0}
0x23aaa…23adc Head {h00=0x002e, h01=0x0050, text=»* HAS THE REQUEST HANDLER TO BE NOTIFIED ?«, t00=0x016d, t01=0x00ba}
0x23adc…23ae6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x00ec}
0x23ae6…23b1a Head {h00=0x0030, h01=0x0050, text=» LD A6,LCDWT,A13 DOES THE RH KNOWS THIS VC ?«, t00=0x016d, t01=0x00f6}
0x23b1a…23b32 Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLR10 NO «, t00=0x016d, t01=0x012a}
0x23b32…23b54 Head {h00=0x001e, h01=0x0050, text=» LDK A1,VCREL«, t00=0x016d, t01=0x0142}
0x23b54…23b7a Head {h00=0x0022, h01=0x0050, text=» SC A1,DWTSTE,A6«, t00=0x016d, t01=0x0164}
0x23b7a…23ba4 Head {h00=0x0026, h01=0x0050, text=» LDK A1,NPRFLG UNBLOCK INPUT QUEUE«, t00=0x016d, t01=0x018a}
0x23ba4…23bb8 Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x016e, t01=0x0024}
0x23bb8…23bd4 Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEINP,A13 .«, t00=0x016e, t01=0x0038}
0x23bd4…23c08 Head {h00=0x0030, h01=0x0050, text=» ST A3,HDLC,A2 PACKET LENGTH TO HDLC-HEADER «, t00=0x016e, t01=0x0054}
0x23c08…23c38 Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x016e, t01=0x0088}
0x23c38…23c4a Head {h00=0x000e, h01=0x0050, text=» RF CLR15 «, t00=0x016e, t01=0x00b8}
0x23c4a…23c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x00ca}
0x23c54…23c68 Head {h00=0x0010, h01=0x0050, text=»CLR10 EQU * «, t00=0x016e, t01=0x00d4}
0x23c68…23c92 Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x016e, t01=0x00e8}
0x23c92…23c9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x0112}
0x23c9c…23caa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016e, t01=0x011c}
0x23caa…23cb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x012a}
0x23cb4…23d04 Head {h00=0x004c, h01=0x0050, text=»* LC-STATUS WAS "NOT CLEAR", SO SEND CLEAR CONFIRMATION TO REMOTE STATIO«, t00=0x016e, t01=0x0134}
0x23d04…23d0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x0184}
0x23d0e…23d22 Head {h00=0x0010, h01=0x0050, text=»CLR15 EQU * «, t00=0x016e, t01=0x018e}
0x23d22…23d2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x0012}
0x23d2c…23d48 Head {h00=0x0018, h01=0x0050, text=»* EMPTY OUTPUT QUEUE«, t00=0x016f, t01=0x001c}
0x23d48…23d52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x0038}
0x23d52…23d80 Head {h00=0x002a, h01=0x0050, text=» LDKL A3,CLEA.RC RETURN CODE FOR USER «, t00=0x016f, t01=0x0042}
0x23d80…23d96 Head {h00=0x0012, h01=0x0050, text=» CF A14,CMEVNT«, t00=0x016f, t01=0x0070}
0x23d96…23daa Head {h00=0x0010, h01=0x0050, text=»CLR20 EQU * «, t00=0x016f, t01=0x0086}
0x23daa…23dd2 Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x016f, t01=0x009a}
0x23dd2…23dea Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x016f, t01=0x00c2}
0x23dea…23e0a Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x016f, t01=0x00da}
0x23e0a…23e22 Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLR30 YES«, t00=0x016f, t01=0x00fa}
0x23e22…23e2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x0112}
0x23e2c…23e5a Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x016f, t01=0x011c}
0x23e5a…23e64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x014a}
0x23e64…23e90 Head {h00=0x0028, h01=0x0050, text=» LDKL A1,CLR20 REACTIVATION ADDRESS «, t00=0x016f, t01=0x0154}
0x23e90…23ea4 Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x016f, t01=0x0180}
0x23ea4…23eae (368, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x0004}
0x23eae…23ec2 Head {h00=0x0010, h01=0x0050, text=»CLR30 EQU * «, t00=0x0170, t01=0x000e}
0x23ec2…23eee Head {h00=0x0028, h01=0x0050, text=» LDK A1,CLE.CP PACKET IDENTIFICATION«, t00=0x0170, t01=0x0022}
0x23eee…23f08 Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x0170, t01=0x004e}
0x23f08…23f3c Head {h00=0x0030, h01=0x0050, text=» LDK A1,CLE.CL PACKET LENGTH TO HDLC-HEADER «, t00=0x0170, t01=0x0068}
0x23f3c…23f54 Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0170, t01=0x009c}
0x23f54…23f90 Head {h00=0x0038, h01=0x0050, text=» CM LCSTAT,A13 NEW STATUS:=READY«, t00=0x0170, t01=0x00b4}
0x23f90…23f9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x00f0}
0x23f9a…23fb0 Head {h00=0x0012, h01=0x0050, text=»* QUEUE PACKET«, t00=0x0170, t01=0x00fa}
0x23fb0…23fba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x0110}
0x23fba…23fce Head {h00=0x0010, h01=0x0050, text=»CLR40 EQU * «, t00=0x0170, t01=0x011a}
0x23fce…23ffe Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEO PUT ELEMENT IN OUTPUT QUEUE«, t00=0x0170, t01=0x012e}
0x23ffe…24012 Head {h00=0x0010, h01=0x0050, text=»CLR50 EQU * «, t00=0x0170, t01=0x015e}
0x24012…24040 Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0170, t01=0x0172}
0x24040…2404e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0171, t01=0x0010}
0x2404e…24058 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x001e}
0x24058…24062 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x0028}
0x24062…2409c Head {h00=0x0036, h01=0x0050, text=»* PROCESSING OF RECEIVED CLEAR CONFIRMATION PACKET«, t00=0x0171, t01=0x0032}
0x2409c…240a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x006c}
0x240a6…240da Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0171, t01=0x0076}
0x240da…240e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x00aa}
0x240e4…24100 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0171, t01=0x00b4}
0x24100…24120 Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x0171, t01=0x00d0}
0x24120…24140 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0171, t01=0x00f0}
0x24140…2416c Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0171, t01=0x0110}
0x2416c…24176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x013c}
0x24176…2418a Head {h00=0x0010, h01=0x0050, text=»CLRCIN EQU *«, t00=0x0171, t01=0x0146}
0x2418a…241b4 Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x0171, t01=0x015a}
0x241b4…241be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x0184}
0x241be…241ea Head {h00=0x0028, h01=0x0050, text=»* RESET CONFIRMATION TIMER AND FLAG «, t00=0x0171, t01=0x018e}
0x241ea…241f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x002a}
0x241f4…24226 Head {h00=0x002e, h01=0x0050, text=» LD A1,TIMADR,A13 GET ADDRESS TIMER BLOCK «, t00=0x0172, t01=0x0034}
0x24226…2424a Head {h00=0x0020, h01=0x0050, text=» CF A14,CANTIM CANCEL TIMER «, t00=0x0172, t01=0x0066}
0x2424a…24274 Head {h00=0x0026, h01=0x0050, text=» CM TIMADR,A13 CLEAR TIMER ADDRESS«, t00=0x0172, t01=0x008a}
0x24274…242a4 Head {h00=0x002c, h01=0x0050, text=» LDK A1,CONTIM RESET TIMER STARTED FLAG «, t00=0x0172, t01=0x00b4}
0x242a4…242b8 Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x0172, t01=0x00e4}
0x242b8…242d4 Head {h00=0x0018, h01=0x0050, text=» ANS A1,FLAGS,A13 . «, t00=0x0172, t01=0x00f8}
0x242d4…24302 Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IS LC-STATUS = CLEAR ?«, t00=0x0172, t01=0x0114}
0x24302…2431e Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0172, t01=0x0142}
0x2431e…24338 Head {h00=0x0016, h01=0x0050, text=» RF(E) CLRC00 YES «, t00=0x0172, t01=0x015e}
0x24338…24366 Head {h00=0x002a, h01=0x0050, text=» LDK A1,READ.ST IS LC-STATUS = READY ?«, t00=0x0172, t01=0x0178}
0x24366…24382 Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0173, t01=0x0016}
0x24382…2439c Head {h00=0x0016, h01=0x0050, text=» RF(E) CLRC10 YES «, t00=0x0173, t01=0x0032}
0x2439c…243a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x004c}
0x243a6…243b4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0173, t01=0x0056}
0x243b4…243be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x0064}
0x243be…243f8 Head {h00=0x0036, h01=0x0050, text=»* STATUS IS NOT READY OR CLEAR, SO PROCEDURE ERROR«, t00=0x0173, t01=0x006e}
0x243f8…24402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x00a8}
0x24402…2441e Head {h00=0x0018, h01=0x0050, text=» RB CALC00 CLEAR VC «, t00=0x0173, t01=0x00b2}
0x2441e…24428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x00ce}
0x24428…2443c Head {h00=0x0010, h01=0x0050, text=»CLRC00 EQU *«, t00=0x0173, t01=0x00d8}
0x2443c…24466 Head {h00=0x0026, h01=0x0050, text=» CM LCSTAT,A13 SET STATUS := READY«, t00=0x0173, t01=0x00ec}
0x24466…2447a Head {h00=0x0010, h01=0x0050, text=»CLRC10 EQU *«, t00=0x0173, t01=0x0116}
0x2447a…244a6 Head {h00=0x0028, h01=0x0050, text=» RB CLR50 CONTROL BACK TO SCHEDULER «, t00=0x0173, t01=0x012a}
0x244a6…244b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x0156}
0x244b0…244bc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0173, t01=0x0160}
0x244bc…244c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x016c}
0x244c6…244d4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0173, t01=0x0176}
0x244d4…244de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x0184}
0x244de…244e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x018e}
0x244e8…24516 Head {h00=0x002a, h01=0x0050, text=»* PROCESSING OF RECEIVED RESET PACKET «, t00=0x0174, t01=0x0008}
0x24516…24520 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0036}
0x24520…24554 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0174, t01=0x0040}
0x24554…2455e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0074}
0x2455e…2457a Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0174, t01=0x007e}
0x2457a…2459a Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x0174, t01=0x009a}
0x2459a…245b8 Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER LENGTH«, t00=0x0174, t01=0x00ba}
0x245b8…245d8 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0174, t01=0x00d8}
0x245d8…24604 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0174, t01=0x00f8}
0x24604…2460e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0124}
0x2460e…2462a Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0174, t01=0x012e}
0x2462a…24642 Head {h00=0x0014, h01=0x0050, text=»* ABL RESIN «, t00=0x0174, t01=0x014a}
0x24642…2464c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0162}
0x2464c…24660 Head {h00=0x0010, h01=0x0050, text=»RESIN EQU * «, t00=0x0174, t01=0x016c}
0x24660…2468e Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IF LC-STATUS = CLEAR ?«, t00=0x0174, t01=0x0180}
0x2468e…246aa Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0175, t01=0x001e}
0x246aa…246d2 Head {h00=0x0024, h01=0x0050, text=» RF(E) RESC00 YES, IGNORE PACKET«, t00=0x0175, t01=0x003a}
0x246d2…246dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x0062}
0x246dc…2470c Head {h00=0x002c, h01=0x0050, text=»* TEST IF A RESET COLLISION HAS OCCURED «, t00=0x0175, t01=0x006c}
0x2470c…24716 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x009c}
0x24716…24744 Head {h00=0x002a, h01=0x0050, text=» LDK A1,RSET.ST IS LC-STATUS = RESET ?«, t00=0x0175, t01=0x00a6}
0x24744…24760 Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSBST,A13 . «, t00=0x0175, t01=0x00d4}
0x24760…2477a Head {h00=0x0016, h01=0x0050, text=» RF(E) RESCIN YES «, t00=0x0175, t01=0x00f0}
0x2477a…24784 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x010a}
0x24784…247c0 Head {h00=0x0038, h01=0x0050, text=»* TEST IF CURRENT STATUS MATCH WITH RECEIVED PACKET «, t00=0x0175, t01=0x0114}
0x247c0…247ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x0150}
0x247ca…24800 Head {h00=0x0032, h01=0x0050, text=» LDK A1,DATA.ST IS LC-STATUS = DATA TRANSFER ?«, t00=0x0175, t01=0x015a}
0x24800…2481c Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0175, t01=0x0190}
0x2481c…2484a Head {h00=0x002a, h01=0x0050, text=» RF(NE) RESC10 NO, SO PROCEDURE ERROR «, t00=0x0176, t01=0x001c}
0x2484a…24854 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x004a}
0x24854…24862 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0176, t01=0x0054}
0x24862…2486c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x0062}
0x2486c…248a2 Head {h00=0x0032, h01=0x0050, text=»* LC-STATUS IS DATA TRANSFER, SO RESET LC-ADM «, t00=0x0176, t01=0x006c}
0x248a2…248ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x00a2}
0x248ac…248e0 Head {h00=0x0030, h01=0x0050, text=» ST A3,HDLC,A2 PACKET LENGTH TO HDLC-HEADER «, t00=0x0176, t01=0x00ac}
0x248e0…2490c Head {h00=0x0028, h01=0x0050, text=» CF A14,RSETVC RESET VIRTUAL CIRCUIT«, t00=0x0176, t01=0x00e0}
0x2490c…2493c Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x0176, t01=0x010c}
0x2493c…24946 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x013c}
0x24946…2497e Head {h00=0x0034, h01=0x0050, text=»* PREPARE AND TRANSMIT RESET CONFIRMATION PACKET«, t00=0x0176, t01=0x0146}
0x2497e…24988 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x017e}
0x24988…2499c Head {h00=0x0010, h01=0x0050, text=»RES40 EQU * «, t00=0x0176, t01=0x0188}
0x2499c…249c4 Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x0177, t01=0x000c}
0x249c4…249dc Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x0177, t01=0x0034}
0x249dc…249fc Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x0177, t01=0x004c}
0x249fc…24a14 Head {h00=0x0014, h01=0x0050, text=» RF(Z) RES60 YES«, t00=0x0177, t01=0x006c}
0x24a14…24a1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x0084}
0x24a1e…24a4c Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x0177, t01=0x008e}
0x24a4c…24a56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x00bc}
0x24a56…24a82 Head {h00=0x0028, h01=0x0050, text=» LDKL A1,RES40 REACTIVATION ADDRESS «, t00=0x0177, t01=0x00c6}
0x24a82…24a96 Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x0177, t01=0x00f2}
0x24a96…24aa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x0106}
0x24aa0…24ab4 Head {h00=0x0010, h01=0x0050, text=»RES60 EQU * «, t00=0x0177, t01=0x0110}
0x24ab4…24ae4 Head {h00=0x002c, h01=0x0050, text=» LDK A1,RSET.CP RESET CONF. PACKET TYPE «, t00=0x0177, t01=0x0124}
0x24ae4…24afe Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x0177, t01=0x0154}
0x24afe…24b32 Head {h00=0x0030, h01=0x0050, text=» LDK A1,RSET.CL PACKET LENGTH TO HDLC-HEADER«, t00=0x0177, t01=0x016e}
0x24b32…24b4a Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0178, t01=0x0012}
0x24b4a…24b54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x002a}
0x24b54…24b6c Head {h00=0x0014, h01=0x0050, text=»* QUEUE ELEMENT «, t00=0x0178, t01=0x0034}
0x24b6c…24b76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x004c}
0x24b76…24b8a Head {h00=0x0010, h01=0x0050, text=» CF A14,QUEO«, t00=0x0178, t01=0x0056}
0x24b8a…24bb8 Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x0178, t01=0x006a}
0x24bb8…24bc6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0178, t01=0x0098}
0x24bc6…24bd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x00a6}
0x24bd0…24bda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x00b0}
0x24bda…24c16 Head {h00=0x0038, h01=0x0050, text=»* PROCESSING OF A RECEIVED RESET CONFIRMATION PACKET«, t00=0x0178, t01=0x00ba}
0x24c16…24c20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x00f6}
0x24c20…24c54 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0178, t01=0x0100}
0x24c54…24c5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x0134}
0x24c5e…24c7a Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0178, t01=0x013e}
0x24c7a…24c9a Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x0178, t01=0x015a}
0x24c9a…24cba Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0178, t01=0x017a}
0x24cba…24ce6 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0179, t01=0x000a}
0x24ce6…24cf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0179, t01=0x0036}
0x24cf0…24d0c Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0179, t01=0x0040}
0x24d0c…24d24 Head {h00=0x0014, h01=0x0050, text=»* ABL RESCIN«, t00=0x0179, t01=0x005c}
0x24d24…24d2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0179, t01=0x0074}
0x24d2e…24d42 Head {h00=0x0010, h01=0x0050, text=»RESCIN EQU *«, t00=0x0179, t01=0x007e}
0x24d42…24d70 Head {h00=0x002a, h01=0x0050, text=» LD A1,TIMADR,A13 TIMER BLOCK ADDRESS «, t00=0x0179, t01=0x0092}
0x24d70…24d94 Head {h00=0x0020, h01=0x0050, text=» CF A14,CANTIM CANCEL TIMER «, t00=0x0179, t01=0x00c0}
0x24d94…24daa Head {h00=0x0012, h01=0x0050, text=» CM TIMADR,A13«, t00=0x0179, t01=0x00e4}
0x24daa…24dc0 Head {h00=0x0012, h01=0x0050, text=» LDK A3,CONTIM«, t00=0x0179, t01=0x00fa}
0x24dc0…24dd2 Head {h00=0x000e, h01=0x0050, text=» C1R A3,A3«, t00=0x0179, t01=0x0110}
0x24dd2…24dee Head {h00=0x0018, h01=0x0050, text=» ANS A3,FLAGS,A13 . «, t00=0x0179, t01=0x0122}
0x24dee…24e26 Head {h00=0x0034, h01=0x0050, text=» LDK A1,RSET.ST IS LC-STATUS = DATA-TRANSF/RESET«, t00=0x0179, t01=0x013e}
0x24e26…24e42 Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSBST,A13 . «, t00=0x0179, t01=0x0176}
0x24e42…24e5c (378, 0, 400) Head {h00=0x0016, h01=0x0050, text=» RF(NE) RESC10 NO «, t00=0x017a, t01=0x0004}
0x24e5c…24e92 Head {h00=0x0032, h01=0x0050, text=» LDK A1,FLCN.ST SUB-STATUS := FLOW CNTRL READY«, t00=0x017a, t01=0x001e}
0x24e92…24eae Head {h00=0x0018, h01=0x0050, text=» SC A1,LCSBST,A13 . «, t00=0x017a, t01=0x0054}
0x24eae…24ede Head {h00=0x002c, h01=0x0050, text=» LDK A1,NPRFLG RESET NO PROCESSING FLAG «, t00=0x017a, t01=0x0070}
0x24ede…24ef2 Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x017a, t01=0x00a0}
0x24ef2…24f0e Head {h00=0x0018, h01=0x0050, text=» ANS A1,QUEOUT,A13 .«, t00=0x017a, t01=0x00b4}
0x24f0e…24f22 Head {h00=0x0010, h01=0x0050, text=»RESC00 EQU *«, t00=0x017a, t01=0x00d0}
0x24f22…24f4c Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x017a, t01=0x00e4}
0x24f4c…24f7a Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x017a, t01=0x010e}
0x24f7a…24f84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017a, t01=0x013c}
0x24f84…24f92 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x017a, t01=0x0146}
0x24f92…24f9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017a, t01=0x0154}
0x24f9c…24fc0 Head {h00=0x0020, h01=0x0050, text=»* ILLEGAL STATE, SO CLEAR VC«, t00=0x017a, t01=0x015e}
0x24fc0…24fca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017a, t01=0x0182}
0x24fca…24fde Head {h00=0x0010, h01=0x0050, text=»RESC10 EQU *«, t00=0x017a, t01=0x018c}
0x24fde…25008 Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x017b, t01=0x0010}
0x25008…2503c Head {h00=0x0030, h01=0x0050, text=» LDK A1,LOCPER DIAGN. CODE = PROCEDURE ERROR«, t00=0x017b, t01=0x003a}
0x2503c…2506c Head {h00=0x002c, h01=0x0050, text=» ABL CLVC CLEAR VC AND RETURN TO SCHED. «, t00=0x017b, t01=0x006e}
0x2506c…2507a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x017b, t01=0x009e}
0x2507a…25084 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017b, t01=0x00ac}
0x25084…2508e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017b, t01=0x00b6}
0x2508e…250c0 Head {h00=0x002e, h01=0x0050, text=»* PROCESSING OF A RECEIVED RESTART PACKET «, t00=0x017b, t01=0x00c0}
0x250c0…250ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017b, t01=0x00f2}
0x250ca…250fe Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x017b, t01=0x00fc}
0x250fe…25108 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017b, t01=0x0130}
0x25108…25124 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x017b, t01=0x013a}
0x25124…25144 Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x017b, t01=0x0156}
0x25144…25166 Head {h00=0x001e, h01=0x0050, text=»* A12=LINE BLOCK ADDRESS «, t00=0x017b, t01=0x0176}
0x25166…25192 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x017c, t01=0x0008}
0x25192…2519c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017c, t01=0x0034}
0x2519c…251b8 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x017c, t01=0x003e}
0x251b8…251d0 Head {h00=0x0014, h01=0x0050, text=»* ABL RSTIN «, t00=0x017c, t01=0x005a}
0x251d0…251da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017c, t01=0x0072}
0x251da…251ee Head {h00=0x0010, h01=0x0050, text=»RSTIN EQU * «, t00=0x017c, t01=0x007c}
0x251ee…2521c Head {h00=0x002a, h01=0x0050, text=» LDK A1,RSTFLG ALREADY RESTART BUSY ? «, t00=0x017c, t01=0x0090}
0x2521c…25238 Head {h00=0x0018, h01=0x0050, text=» AN A1,CMNFLG,A12 . «, t00=0x017c, t01=0x00be}
0x25238…25266 Head {h00=0x002a, h01=0x0050, text=» RF(NZ) RSTCIN YES, RESTART COLLISION «, t00=0x017c, t01=0x00da}
0x25266…25290 Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x017c, t01=0x0108}
0x25290…2529a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017c, t01=0x0132}
0x2529a…252c2 Head {h00=0x0024, h01=0x0050, text=»* CLEAR ALL NOT READY VC'S LOCAL«, t00=0x017c, t01=0x013c}
0x252c2…252cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017c, t01=0x0164}
0x252cc…25302 Head {h00=0x0032, h01=0x0050, text=» LDK A1,RSTRED DIAGN. CODE = RESTART RECEIVED «, t00=0x017c, t01=0x016e}
0x25302…2532e Head {h00=0x0028, h01=0x0050, text=» CF A14,CLAVCS CLEAR ALL VC'S LOCAL «, t00=0x017d, t01=0x0014}
0x2532e…25338 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017d, t01=0x0040}
0x25338…25372 Head {h00=0x0036, h01=0x0050, text=»* PREPARE AND TRANSMIT RESTART CONFIRMATION PACKET«, t00=0x017d, t01=0x004a}
0x25372…2537c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017d, t01=0x0084}
0x2537c…25390 Head {h00=0x0010, h01=0x0050, text=»RST00 EQU * «, t00=0x017d, t01=0x008e}
0x25390…253b8 Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x017d, t01=0x00a2}
0x253b8…253d0 Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x017d, t01=0x00ca}
0x253d0…253f0 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x017d, t01=0x00e2}
0x253f0…25408 Head {h00=0x0014, h01=0x0050, text=» RF(Z) RST20 YES«, t00=0x017d, t01=0x0102}
0x25408…25412 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017d, t01=0x011a}
0x25412…25420 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x017d, t01=0x0124}
0x25420…2542a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017d, t01=0x0132}
0x2542a…25458 Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x017d, t01=0x013c}
0x25458…25462 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017d, t01=0x016a}
0x25462…2548e Head {h00=0x0028, h01=0x0050, text=» LDKL A1,RST00 REACTIVATION ADDRESS «, t00=0x017d, t01=0x0174}
0x2548e…254a2 Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x017e, t01=0x0010}
0x254a2…254ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017e, t01=0x0024}
0x254ac…254c0 Head {h00=0x0010, h01=0x0050, text=»RST20 EQU * «, t00=0x017e, t01=0x002e}
0x254c0…254f2 Head {h00=0x002e, h01=0x0050, text=» LDK A1,RSTR.CP RESTART CONF. PACKET TYPE «, t00=0x017e, t01=0x0042}
0x254f2…2550c Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x017e, t01=0x0074}
0x2550c…25532 Head {h00=0x0022, h01=0x0050, text=» LDK A1,RSTR.CL PACKET LENGTH «, t00=0x017e, t01=0x008e}
0x25532…2554a Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x017e, t01=0x00b4}
0x2554a…25554 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017e, t01=0x00cc}
0x25554…2557c Head {h00=0x0024, h01=0x0050, text=»* STORE ELEMENT IN RESTART QUEUE«, t00=0x017e, t01=0x00d6}
0x2557c…25586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017e, t01=0x00fe}
0x25586…255ae Head {h00=0x0024, h01=0x0050, text=» LDR A1,A12 QUEUE ANCHOR ADDRESS«, t00=0x017e, t01=0x0108}
0x255ae…255c6 Head {h00=0x0014, h01=0x0050, text=» ADK A1,RSTQUE .«, t00=0x017e, t01=0x0130}
0x255c6…255ea Head {h00=0x0020, h01=0x0050, text=» CF A14,QUEUE QUEUE ELEMENT «, t00=0x017e, t01=0x0148}
0x255ea…25616 Head {h00=0x0028, h01=0x0050, text=» RF RSTC20 CONTROL BACK TO SCHEDULER«, t00=0x017e, t01=0x016c}
0x25616…25624 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x017f, t01=0x0008}
0x25624…2562e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x0016}
0x2562e…25638 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x0020}
0x25638…25676 Head {h00=0x003a, h01=0x0050, text=»* PROCESSING OF A RECEIVED RESTART CONFIRMATION PACKET«, t00=0x017f, t01=0x002a}
0x25676…25680 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x0068}
0x25680…256b4 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x017f, t01=0x0072}
0x256b4…256be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x00a6}
0x256be…256da Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x017f, t01=0x00b0}
0x256da…256fa Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x017f, t01=0x00cc}
0x256fa…2571e Head {h00=0x0020, h01=0x0050, text=»* A12 = LINE BLOCK ADDRESS «, t00=0x017f, t01=0x00ec}
0x2571e…2574a Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x017f, t01=0x0110}
0x2574a…25754 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x013c}
0x25754…25770 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x017f, t01=0x0146}
0x25770…25788 Head {h00=0x0014, h01=0x0050, text=»* ABL RSTCIN«, t00=0x017f, t01=0x0162}
0x25788…25792 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x017a}
0x25792…257a6 Head {h00=0x0010, h01=0x0050, text=»RSTCIN EQU *«, t00=0x017f, t01=0x0184}
0x257a6…257b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0180, t01=0x0008}
0x257b0…257c6 Head {h00=0x0012, h01=0x0050, text=»* RESET TIMER «, t00=0x0180, t01=0x0012}
0x257c6…257d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0180, t01=0x0028}
0x257d0…257fa Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x0180, t01=0x0032}
0x257fa…25822 Head {h00=0x0024, h01=0x0050, text=» LD A1,RTMADR,A12 TIMER ACTIVE ?«, t00=0x0180, t01=0x005c}
0x25822…25846 Head {h00=0x0020, h01=0x0050, text=» CF A14,CANTIM CANCEL TIMER «, t00=0x0180, t01=0x0084}
0x25846…2585c Head {h00=0x0012, h01=0x0050, text=» CM RTMADR,A12«, t00=0x0180, t01=0x00a8}
0x2585c…2588c Head {h00=0x002c, h01=0x0050, text=» LDK A1,RSTFLG RESTART PROCEDURE BUSY ? «, t00=0x0180, t01=0x00be}
0x2588c…258a8 Head {h00=0x0018, h01=0x0050, text=» AN A1,CMNFLG,A12 . «, t00=0x0180, t01=0x00ee}
0x258a8…258d0 Head {h00=0x0024, h01=0x0050, text=» RF(Z) RSTC20 NO, IGNORE PACKET «, t00=0x0180, t01=0x010a}
0x258d0…25908 Head {h00=0x0034, h01=0x0050, text=» XRS A1,CMNFLG,A12 RESET RESTART PROC. BUSY FLAG«, t00=0x0180, t01=0x0132}
0x25908…2591c Head {h00=0x0010, h01=0x0050, text=»RSTC20 EQU *«, t00=0x0180, t01=0x016a}
0x2591c…25930 Head {h00=0x0010, h01=0x0050, text=» ABL EXITDC «, t00=0x0180, t01=0x017e}
0x25930…2593e (385, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0181, t01=0x0004}
0x2593e…25948 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0181, t01=0x0012}
0x25948…25952 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0181, t01=0x001c}
0x25952…25984 Head {h00=0x002e, h01=0x0050, text=»* PROCESSING OF RECEIVED INTERRUPT PACKET «, t00=0x0181, t01=0x0026}
0x25984…2598e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0181, t01=0x0058}
0x2598e…259c2 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0181, t01=0x0062}
0x259c2…259cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0181, t01=0x0096}
0x259cc…259e8 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0181, t01=0x00a0}
0x259e8…25a08 Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x0181, t01=0x00bc}
0x25a08…25a26 Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER LENGTH«, t00=0x0181, t01=0x00dc}
0x25a26…25a46 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0181, t01=0x00fa}
0x25a46…25a72 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0181, t01=0x011a}
0x25a72…25a7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0181, t01=0x0146}
0x25a7c…25a98 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0181, t01=0x0150}
0x25a98…25ab0 Head {h00=0x0014, h01=0x0050, text=»* ABL INTIN «, t00=0x0181, t01=0x016c}
0x25ab0…25aba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0181, t01=0x0184}
0x25aba…25ace Head {h00=0x0010, h01=0x0050, text=»INTIN EQU * «, t00=0x0181, t01=0x018e}
0x25ace…25b04 Head {h00=0x0032, h01=0x0050, text=» LDK A4,0 INDICATE ENTRY FOR INTERRUPT PACKET «, t00=0x0182, t01=0x0012}
0x25b04…25b0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0182, t01=0x0048}
0x25b0e…25b50 Head {h00=0x003e, h01=0x0050, text=»* THE NEXT PART OF CODING IS COMMON FOR THE PROCESSING OF «, t00=0x0182, t01=0x0052}
0x25b50…25b8e Head {h00=0x003a, h01=0x0050, text=»* AN INTERRUPT- AND AN INTERRUPT CONFIRMATION PACKET. «, t00=0x0182, t01=0x0094}
0x25b8e…25b98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0182, t01=0x00d2}
0x25b98…25bac Head {h00=0x0010, h01=0x0050, text=»INT00 EQU * «, t00=0x0182, t01=0x00dc}
0x25bac…25be2 Head {h00=0x0032, h01=0x0050, text=» LDK A1,DATA.ST IS LC-STATUS = DATA TRANSFER ?«, t00=0x0182, t01=0x00f0}
0x25be2…25bfe Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0182, t01=0x0126}
0x25bfe…25c16 Head {h00=0x0014, h01=0x0050, text=» RF(E) INT20 YES«, t00=0x0182, t01=0x0142}
0x25c16…25c20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0182, t01=0x015a}
0x25c20…25c68 Head {h00=0x0044, h01=0x0050, text=»* LC-STATUS IS NOT DATA TRANSFER, IF CLEAR: IGNORE PACKET, ELSE «, t00=0x0182, t01=0x0164}
0x25c68…25c82 Head {h00=0x0016, h01=0x0050, text=»* PROCEDURE ERROR.«, t00=0x0183, t01=0x001c}
0x25c82…25c8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0183, t01=0x0036}
0x25c8c…25cba Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IS LC-STATUS = CLEAR ?«, t00=0x0183, t01=0x0040}
0x25cba…25cd6 Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0183, t01=0x006e}
0x25cd6…25d04 Head {h00=0x002a, h01=0x0050, text=» RB(NE) RESC10 NO, SO PROCEDURE ERROR «, t00=0x0183, t01=0x008a}
0x25d04…25d24 Head {h00=0x001c, h01=0x0050, text=» RB RESC00 IGNORE PACKET«, t00=0x0183, t01=0x00b8}
0x25d24…25d2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0183, t01=0x00d8}
0x25d2e…25d3c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0183, t01=0x00e2}
0x25d3c…25d46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0183, t01=0x00f0}
0x25d46…25d8a Head {h00=0x0040, h01=0x0050, text=»* STATE = DATA TRANSFER, IF SUB-STATE = RESET: IGNORE PACKET«, t00=0x0183, t01=0x00fa}
0x25d8a…25d94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0183, t01=0x013e}
0x25d94…25da8 Head {h00=0x0010, h01=0x0050, text=»INT20 EQU * «, t00=0x0183, t01=0x0148}
0x25da8…25dda Head {h00=0x002e, h01=0x0050, text=» LC A1,LCSBST,A13 IS LC-SUBSTATUS = RESET «, t00=0x0183, t01=0x015c}
0x25dda…25df4 Head {h00=0x0016, h01=0x0050, text=» ANK A1,RSET.STA .«, t00=0x0183, t01=0x018e}
0x25df4…25e18 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) RESC00 IGNORE PACKET«, t00=0x0184, t01=0x0018}
0x25e18…25e22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0184, t01=0x003c}
0x25e22…25e4c Head {h00=0x0026, h01=0x0050, text=»* QUEUE PACKET FOR REQUEST HANDLER«, t00=0x0184, t01=0x0046}
0x25e4c…25e56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0184, t01=0x0070}
0x25e56…25e6a Head {h00=0x0010, h01=0x0050, text=»INT30 EQU * «, t00=0x0184, t01=0x007a}
0x25e6a…25e9e Head {h00=0x0030, h01=0x0050, text=» ST A3,HDLC,A2 SAVE PACKET LENGTH IN BUFFER «, t00=0x0184, t01=0x008e}
0x25e9e…25ee8 Head {h00=0x0046, h01=0x0050, text=» LDR A1,A13 INPUT QUEUE ANCHOR ADDRESS«, t00=0x0184, t01=0x00c2}
0x25ee8…25f0c Head {h00=0x0020, h01=0x0050, text=» ADK A1,QUEINP «, t00=0x0184, t01=0x010c}
0x25f0c…25f52 Head {h00=0x0042, h01=0x0050, text=» CF A14,QUEUEF QUEUE ELEMENT AS FIRST«, t00=0x0184, t01=0x0130}
0x25f52…25f9a Head {h00=0x0044, h01=0x0050, text=» LDK A2,NPRFLG RESET NO PROCESSING FLAG«, t00=0x0184, t01=0x0176}
0x25f9a…25fba Head {h00=0x001c, h01=0x0050, text=» C1R A2,A2 «, t00=0x0185, t01=0x002e}
0x25fba…25fda Head {h00=0x001c, h01=0x0050, text=» ANRS A2,A1 «, t00=0x0185, t01=0x004e}
0x25fda…25fec Head {h00=0x000e, h01=0x0050, text=» LDR A4,A4«, t00=0x0185, t01=0x006e}
0x25fec…26024 Head {h00=0x0034, h01=0x0050, text=» RF(NZ) INTC10 CONTINUE WITH SPECIFIC PROCESSING«, t00=0x0185, t01=0x0080}
0x26024…26048 Head {h00=0x0020, h01=0x0050, text=» OF INTERRUPT CONF. PACKET«, t00=0x0185, t01=0x00b8}
0x26048…2607a Head {h00=0x002e, h01=0x0050, text=» RB RSTC20 CONTROL BLOCK BACK TO SCHEDULER«, t00=0x0185, t01=0x00dc}
0x2607a…26088 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0185, t01=0x010e}
0x26088…26092 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0185, t01=0x011c}
0x26092…2609c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0185, t01=0x0126}
0x2609c…260da Head {h00=0x003a, h01=0x0050, text=»* PROCESSING OF RECEIVED INTERRUPT CONFIRMATION PACKET«, t00=0x0185, t01=0x0130}
0x260da…260e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0185, t01=0x016e}
0x260e4…26118 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0185, t01=0x0178}
0x26118…26122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0186, t01=0x001c}
0x26122…2613e Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0186, t01=0x0026}
0x2613e…2615e Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x0186, t01=0x0042}
0x2615e…2617c Head {h00=0x001a, h01=0x0050, text=»* A3 = BUFFER LENGTH«, t00=0x0186, t01=0x0062}
0x2617c…2619c Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0186, t01=0x0080}
0x2619c…261c8 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0186, t01=0x00a0}
0x261c8…261d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0186, t01=0x00cc}
0x261d2…261ee Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0186, t01=0x00d6}
0x261ee…26206 Head {h00=0x0014, h01=0x0050, text=»* ABL INTCIN«, t00=0x0186, t01=0x00f2}
0x26206…2621a Head {h00=0x0010, h01=0x0050, text=»INTCIN EQU *«, t00=0x0186, t01=0x010a}
0x2621a…26256 Head {h00=0x0038, h01=0x0050, text=» LDK A4,1 INDICATION FOR INTERR. CONF. PACKET ENTRY «, t00=0x0186, t01=0x011e}
0x26256…26260 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0186, t01=0x015a}
0x26260…262a4 Head {h00=0x0040, h01=0x0050, text=»* STATUS CKECKING ETC. IS DONE IN COMMON PART OF CODING WITH«, t00=0x0186, t01=0x0164}
0x262a4…262d4 Head {h00=0x002c, h01=0x0050, text=»* THE PROCESSING OF A INTERRUPT PACKET. «, t00=0x0187, t01=0x0018}
0x262d4…262de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0187, t01=0x0048}
0x262de…262f0 Head {h00=0x000e, h01=0x0050, text=» RB INT00 «, t00=0x0187, t01=0x0052}
0x262f0…262fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0187, t01=0x0064}
0x262fa…26320 Head {h00=0x0022, h01=0x0050, text=»* RESET INTERRUPT PENDING FLAG«, t00=0x0187, t01=0x006e}
0x26320…2632a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0187, t01=0x0094}
0x2632a…2633e Head {h00=0x0010, h01=0x0050, text=»INTC10 EQU *«, t00=0x0187, t01=0x009e}
0x2633e…26372 Head {h00=0x0030, h01=0x0050, text=» LDK A1,INTPNG RESET INTERRUPT PENDING FLAG «, t00=0x0187, t01=0x00b2}
0x26372…26386 Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x0187, t01=0x00e6}
0x26386…263a2 Head {h00=0x0018, h01=0x0050, text=» ANS A1,FLAGS,A13 . «, t00=0x0187, t01=0x00fa}
0x263a2…263d4 Head {h00=0x002e, h01=0x0050, text=» RB RSTC20 CONTROL BLOCK BACK TO SCHEDULER«, t00=0x0187, t01=0x0116}
0x263d4…263e2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0187, t01=0x0148}
0x263e2…263ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0187, t01=0x0156}
0x263ec…263f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0187, t01=0x0160}
0x263f6…2642c Head {h00=0x0032, h01=0x0050, text=»* THIS MODULE PERFORMS THE CLEARING RESP. THE «, t00=0x0187, t01=0x016a}
0x2642c…26454 Head {h00=0x0024, h01=0x0050, text=»* RESETTING OF A SVC RESP. PVC. «, t00=0x0188, t01=0x0010}
0x26454…2645e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0188, t01=0x0038}
0x2645e…26492 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0188, t01=0x0042}
0x26492…2649c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0188, t01=0x0076}
0x2649c…264b8 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0188, t01=0x0080}
0x264b8…264d8 Head {h00=0x001c, h01=0x0050, text=»* A1 = DIAGNOSTIC CODE«, t00=0x0188, t01=0x009c}
0x264d8…264f8 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x0188, t01=0x00bc}
0x264f8…26524 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0188, t01=0x00dc}
0x26524…2652e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0188, t01=0x0108}
0x2652e…2654a Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0188, t01=0x0112}
0x2654a…26560 Head {h00=0x0012, h01=0x0050, text=»* ABL CLVC«, t00=0x0188, t01=0x012e}
0x26560…2656a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0188, t01=0x0144}
0x2656a…2657c Head {h00=0x000e, h01=0x0050, text=»CLVC EQU *«, t00=0x0188, t01=0x014e}
0x2657c…265a4 Head {h00=0x0024, h01=0x0050, text=» LDR A5,A1 SAVE DIAGNOSTIC CODE «, t00=0x0188, t01=0x0160}
0x265a4…265ba Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0188, t01=0x0188}
0x265ba…265d0 Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0189, t01=0x000e}
0x265d0…265da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0189, t01=0x0024}
0x265da…265f6 Head {h00=0x0018, h01=0x0050, text=»* SELECT ON VC-TYPE «, t00=0x0189, t01=0x002e}
0x265f6…26600 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0189, t01=0x004a}
0x26600…26620 Head {h00=0x001c, h01=0x0050, text=» LDK A1,PVC GET VC-TYPE «, t00=0x0189, t01=0x0054}
0x26620…2663a Head {h00=0x0016, h01=0x0050, text=» CC A1,VCTYP,A13 .«, t00=0x0189, t01=0x0074}
0x2663a…26662 Head {h00=0x0024, h01=0x0050, text=» RF(E) CLV100 TYPE IS PERMANENT «, t00=0x0189, t01=0x008e}
0x26662…2666c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0189, t01=0x00b6}
0x2666c…2668e Head {h00=0x001e, h01=0x0050, text=»* SWITCHED VIRTUAL CIRCUIT«, t00=0x0189, t01=0x00c0}
0x2668e…26698 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0189, t01=0x00e2}
0x26698…266a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0189, t01=0x00ec}
0x266a4…266ba Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0189, t01=0x00f8}
0x266ba…266e8 Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IS LC-STATUS = CLEAR ?«, t00=0x0189, t01=0x010e}
0x266e8…26704 Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x0189, t01=0x013c}
0x26704…26728 Head {h00=0x0020, h01=0x0050, text=» RF(E) CLVC60 YES, NO ACTION«, t00=0x0189, t01=0x0158}
0x26728…26764 Head {h00=0x0038, h01=0x0050, text=» SC A1,LCSTAT,A13 LC-STATUS:=CLEAR «, t00=0x0189, t01=0x017c}
0x26764…2676e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x0028}
0x2676e…2677c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x018a, t01=0x0032}
0x2677c…26786 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x0040}
0x26786…267a2 Head {h00=0x0018, h01=0x0050, text=»* EMPTY INPUT QUEUE «, t00=0x018a, t01=0x004a}
0x267a2…267ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x0066}
0x267ac…267d0 Head {h00=0x0020, h01=0x0050, text=» CF A14,CLINPQ«, t00=0x018a, t01=0x0070}
0x267d0…267da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x0094}
0x267da…26804 Head {h00=0x0026, h01=0x0050, text=»* COMPLETE EVENTS IN OUTPUT QUEUE «, t00=0x018a, t01=0x009e}
0x26804…2680e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x00c8}
0x2680e…26826 Head {h00=0x0014, h01=0x0050, text=» LDKL A3,CLEA.RC«, t00=0x018a, t01=0x00d2}
0x26826…2683c Head {h00=0x0012, h01=0x0050, text=» CF A14,CMEVNT«, t00=0x018a, t01=0x00ea}
0x2683c…26846 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x0100}
0x26846…26876 Head {h00=0x002c, h01=0x0050, text=»* SEND NOTIFICATION TO RH, IF APPLICABLE«, t00=0x018a, t01=0x010a}
0x26876…26880 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018a, t01=0x013a}
0x26880…268b4 Head {h00=0x0030, h01=0x0050, text=» LD A6,LCDWT,A13 DOES THE RH KNOWS THIS LC ?«, t00=0x018a, t01=0x0144}
0x268b4…268cc Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLVC20 NO«, t00=0x018a, t01=0x0178}
0x268cc…268ee Head {h00=0x001e, h01=0x0050, text=» LDK A1,VCREL«, t00=0x018a, t01=0x0190}
0x268ee…26914 Head {h00=0x0022, h01=0x0050, text=» SC A1,DWTSTE,A6«, t00=0x018b, t01=0x0022}
0x26914…2693e Head {h00=0x0026, h01=0x0050, text=» CF A14,GTBUF GET AN INPUT BUFFER «, t00=0x018b, t01=0x0048}
0x2693e…2696e Head {h00=0x002c, h01=0x0050, text=» LC A1,LCNUM,A13 LOGICAL CHANNEL NUMBER «, t00=0x018b, t01=0x0072}
0x2696e…26988 Head {h00=0x0016, h01=0x0050, text=» SC A1,LCIDNT,A2 .«, t00=0x018b, t01=0x00a2}
0x26988…269b2 Head {h00=0x0026, h01=0x0050, text=» LDK A1,CLE.P INTERNAL PACKET TYPE«, t00=0x018b, t01=0x00bc}
0x269b2…269cc Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x018b, t01=0x00e6}
0x269cc…269e6 Head {h00=0x0016, h01=0x0050, text=» SC A5,DGNCOD,A2 .«, t00=0x018b, t01=0x0100}
0x269e6…26a0a Head {h00=0x0020, h01=0x0050, text=» LDK A1,CLE.L PACKET LENGTH «, t00=0x018b, t01=0x011a}
0x26a0a…26a22 Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x018b, t01=0x013e}
0x26a22…26a52 Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x018b, t01=0x0156}
0x26a52…26a84 Head {h00=0x002e, h01=0x0050, text=» LD A1,TIMADR,A13 GET TIMER BLOCK ADDRESS «, t00=0x018b, t01=0x0186}
0x26a84…26aa8 Head {h00=0x0020, h01=0x0050, text=» CF A14,CANTIM CANCEL TIMER «, t00=0x018c, t01=0x0028}
0x26aa8…26acc Head {h00=0x0020, h01=0x0050, text=» CM TIMADR,A13«, t00=0x018c, t01=0x004c}
0x26acc…26ad6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018c, t01=0x0070}
0x26ad6…26ae4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x018c, t01=0x007a}
0x26ae4…26aee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018c, t01=0x0088}
0x26aee…26b32 Head {h00=0x0040, h01=0x0050, text=»* PREPARE CLEAR PACKET AND TRANSMIT IT TO THE REMOTE STATION«, t00=0x018c, t01=0x0092}
0x26b32…26b3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018c, t01=0x00d6}
0x26b3c…26b50 Head {h00=0x0010, h01=0x0050, text=»CLVC20 EQU *«, t00=0x018c, t01=0x00e0}
0x26b50…26b78 Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x018c, t01=0x00f4}
0x26b78…26b90 Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x018c, t01=0x011c}
0x26b90…26bb0 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x018c, t01=0x0134}
0x26bb0…26bca Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLVC40 YES «, t00=0x018c, t01=0x0154}
0x26bca…26bd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018c, t01=0x016e}
0x26bd4…26c02 Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x018c, t01=0x0178}
0x26c02…26c0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018d, t01=0x0016}
0x26c0c…26c38 Head {h00=0x0028, h01=0x0050, text=» LDKL A1,CLVC20 REACTIVATION ADDRESS«, t00=0x018d, t01=0x0020}
0x26c38…26c4c Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x018d, t01=0x004c}
0x26c4c…26c56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018d, t01=0x0060}
0x26c56…26c6a Head {h00=0x0010, h01=0x0050, text=»CLVC40 EQU *«, t00=0x018d, t01=0x006a}
0x26c6a…26c92 Head {h00=0x0024, h01=0x0050, text=» LDK A1,CLE.P CLEAR PACKET TYPE «, t00=0x018d, t01=0x007e}
0x26c92…26cac Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x018d, t01=0x00a6}
0x26cac…26cd4 Head {h00=0x0024, h01=0x0050, text=» SC A5,DGNCOD,A2 DIAGNOSTIC CODE«, t00=0x018d, t01=0x00c0}
0x26cd4…26ce6 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x018d, t01=0x00e8}
0x26ce6…26d12 Head {h00=0x0028, h01=0x0050, text=» SC A1,CAUSE,A2 CLEAR CLEARING CAUSE«, t00=0x018d, t01=0x00fa}
0x26d12…26d3c Head {h00=0x0026, h01=0x0050, text=» LDK A1,CLE.L CLEAR PACKET LENGTH «, t00=0x018d, t01=0x0126}
0x26d3c…26d54 Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x018d, t01=0x0150}
0x26d54…26d84 Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEO PUT ELEMENT IN OUTPUT QUEUE«, t00=0x018d, t01=0x0168}
0x26d84…26d8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018e, t01=0x0008}
0x26d8e…26db0 Head {h00=0x001e, h01=0x0050, text=»* START CONFIRMATION TIMER«, t00=0x018e, t01=0x0012}
0x26db0…26dba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018e, t01=0x0034}
0x26dba…26dea Head {h00=0x002c, h01=0x0050, text=» LDKL A8,SYCLTM CLEAR CONFIRMATION TIMER«, t00=0x018e, t01=0x003e}
0x26dea…26e0c Head {h00=0x001e, h01=0x0050, text=» CF A14,STTIM START TIMER «, t00=0x018e, t01=0x006e}
0x26e0c…26e20 Head {h00=0x0010, h01=0x0050, text=»CLVC60 EQU *«, t00=0x018e, t01=0x0090}
0x26e20…26e4e Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x018e, t01=0x00a4}
0x26e4e…26e5a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x018e, t01=0x00d2}
0x26e5a…26e70 Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x018e, t01=0x00de}
0x26e70…26e7e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x018e, t01=0x00f4}
0x26e7e…26e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018e, t01=0x0102}
0x26e88…26eac Head {h00=0x0020, h01=0x0050, text=»* PERMANENT VIRTUAL CIRCUITS«, t00=0x018e, t01=0x010c}
0x26eac…26eb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018e, t01=0x0130}
0x26eb6…26eca Head {h00=0x0010, h01=0x0050, text=»CLV100 EQU *«, t00=0x018e, t01=0x013a}
0x26eca…26efa Head {h00=0x002c, h01=0x0050, text=» LDK A1,RSET.ST IS SUB-STATUS = RESET ? «, t00=0x018e, t01=0x014e}
0x26efa…26f16 Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSBST,A13 . «, t00=0x018e, t01=0x017e}
0x26f16…26f3a Head {h00=0x0020, h01=0x0050, text=» RF(E) CLV160 YES, NO ACTION«, t00=0x018f, t01=0x000a}
0x26f3a…26f66 Head {h00=0x0028, h01=0x0050, text=» SC A1,LCSBST,A13 SUBSTATUS := RESET«, t00=0x018f, t01=0x002e}
0x26f66…26f70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018f, t01=0x005a}
0x26f70…26f90 Head {h00=0x001c, h01=0x0050, text=»* RESET VIRTUAL CIRCUIT «, t00=0x018f, t01=0x0064}
0x26f90…26f9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018f, t01=0x0084}
0x26f9a…26fb0 Head {h00=0x0012, h01=0x0050, text=» CF A14,RSETVC«, t00=0x018f, t01=0x008e}
0x26fb0…26fba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018f, t01=0x00a4}
0x26fba…26fea Head {h00=0x002c, h01=0x0050, text=»* SEND NOTIFICATION TO RH, IF APPLICABLE«, t00=0x018f, t01=0x00ae}
0x26fea…26ff4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x018f, t01=0x00de}
0x26ff4…27028 Head {h00=0x0030, h01=0x0050, text=» LD A1,LCDWT,A13 DOES THE RH KNOWS THIS LC ?«, t00=0x018f, t01=0x00e8}
0x27028…27040 Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLV130 NO«, t00=0x018f, t01=0x011c}
0x27040…2706a Head {h00=0x0026, h01=0x0050, text=» CF A14,GTBUF GET AN INPUT BUFFER «, t00=0x018f, t01=0x0134}
0x2706a…2709a Head {h00=0x002c, h01=0x0050, text=» LC A1,LCNUM,A13 LOGICAL CHANNEL NUMBER «, t00=0x018f, t01=0x015e}
0x2709a…270b4 Head {h00=0x0016, h01=0x0050, text=» SC A1,LCIDNT,A2 .«, t00=0x018f, t01=0x018e}
0x270b4…270d6 Head {h00=0x001e, h01=0x0050, text=» LDK A1,RSET.P PACKET TYPE«, t00=0x0190, t01=0x0018}
0x270d6…270f0 Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x0190, t01=0x003a}
0x270f0…2710a Head {h00=0x0016, h01=0x0050, text=» SC A5,DGNCOD,A2 .«, t00=0x0190, t01=0x0054}
0x2710a…2712e Head {h00=0x0020, h01=0x0050, text=» LDK A1,RSET.L PACKET LENGTH«, t00=0x0190, t01=0x006e}
0x2712e…27146 Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0190, t01=0x0092}
0x27146…27176 Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x0190, t01=0x00aa}
0x27176…271a8 Head {h00=0x002e, h01=0x0050, text=» LD A1,TIMADR,A13 GET TIMER BLOCK ADDRESS «, t00=0x0190, t01=0x00da}
0x271a8…271cc Head {h00=0x0020, h01=0x0050, text=» CF A14,CANTIM CANCEL TIMER «, t00=0x0190, t01=0x010c}
0x271cc…271e2 Head {h00=0x0012, h01=0x0050, text=» CM TIMADR,A13«, t00=0x0190, t01=0x0130}
0x271e2…271ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0190, t01=0x0146}
0x271ec…271fa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0190, t01=0x0150}
0x271fa…27204 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0190, t01=0x015e}
0x27204…27248 Head {h00=0x0040, h01=0x0050, text=»* PREPARE RESET PACKET AND TRANSMIT IT TO THE REMOTE STATION«, t00=0x0190, t01=0x0168}
0x27248…27252 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0191, t01=0x001c}
0x27252…27266 Head {h00=0x0010, h01=0x0050, text=»CLV130 EQU *«, t00=0x0191, t01=0x0026}
0x27266…2728e Head {h00=0x0024, h01=0x0050, text=» LDR A2,A13 GET AN OUTPUT BUFFER«, t00=0x0191, t01=0x003a}
0x2728e…272a6 Head {h00=0x0014, h01=0x0050, text=» ADK A2,SYSBUF .«, t00=0x0191, t01=0x0062}
0x272a6…272c6 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 IS IT FREE ?«, t00=0x0191, t01=0x007a}
0x272c6…272e0 Head {h00=0x0016, h01=0x0050, text=» RF(Z) CLV150 YES «, t00=0x0191, t01=0x009a}
0x272e0…272ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0191, t01=0x00b4}
0x272ea…27318 Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF OUTPUT BUFFER «, t00=0x0191, t01=0x00be}
0x27318…27322 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0191, t01=0x00ec}
0x27322…2734e Head {h00=0x0028, h01=0x0050, text=» LDKL A1,CLV130 REACTIVATION ADDRESS«, t00=0x0191, t01=0x00f6}
0x2734e…27362 Head {h00=0x0010, h01=0x0050, text=» ABL BUFWAT «, t00=0x0191, t01=0x0122}
0x27362…2736c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0191, t01=0x0136}
0x2736c…27380 Head {h00=0x0010, h01=0x0050, text=»CLV150 EQU *«, t00=0x0191, t01=0x0140}
0x27380…273a8 Head {h00=0x0024, h01=0x0050, text=» LDK A1,RSET.P RESET PACKET TYPE«, t00=0x0191, t01=0x0154}
0x273a8…273c2 Head {h00=0x0016, h01=0x0050, text=» SC A1,IDENT,A2 . «, t00=0x0191, t01=0x017c}
0x273c2…273ea Head {h00=0x0024, h01=0x0050, text=» SC A5,DGNCOD,A2 DIAGNOSTIC CODE«, t00=0x0192, t01=0x0008}
0x273ea…273fc Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0192, t01=0x0030}
0x273fc…27426 Head {h00=0x0026, h01=0x0050, text=» SC A1,CAUSE,A2 CLEAR RESET CAUSE «, t00=0x0192, t01=0x0042}
0x27426…27450 Head {h00=0x0026, h01=0x0050, text=» LDK A1,RSET.L RESET PACKET LENGTH«, t00=0x0192, t01=0x006c}
0x27450…27468 Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0192, t01=0x0096}
0x27468…27498 Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEO PUT ELEMENT IN OUTPUT QUEUE«, t00=0x0192, t01=0x00ae}
0x27498…274a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0192, t01=0x00de}
0x274a2…274c4 Head {h00=0x001e, h01=0x0050, text=»* START CONFIRMATION TIMER«, t00=0x0192, t01=0x00e8}
0x274c4…274ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0192, t01=0x010a}
0x274ce…274fe Head {h00=0x002c, h01=0x0050, text=» LDKL A8,SYRETM RESET CONFIRMATION TIMER«, t00=0x0192, t01=0x0114}
0x274fe…27520 Head {h00=0x001e, h01=0x0050, text=» CF A14,STTIM START TIMER «, t00=0x0192, t01=0x0144}
0x27520…27534 Head {h00=0x0010, h01=0x0050, text=»CLV160 EQU *«, t00=0x0192, t01=0x0166}
0x27534…27548 Head {h00=0x0010, h01=0x0050, text=» ABL EXITDC «, t00=0x0192, t01=0x017a}
0x27548…27554 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0192, t01=0x018e}
0x27554…27562 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0193, t01=0x000a}
0x27562…2756c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0193, t01=0x0018}
0x2756c…27576 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0193, t01=0x0022}
0x27576…275ac Head {h00=0x0032, h01=0x0050, text=»* THIS MODULE RELEASE ALL RELATION BETWEEN THE«, t00=0x0193, t01=0x002c}
0x275ac…275e4 Head {h00=0x0034, h01=0x0050, text=»* DWT AND THE LOGICAL CHANNELS. THE LC IS PLACED«, t00=0x0193, t01=0x0062}
0x275e4…27604 Head {h00=0x001c, h01=0x0050, text=»* IN THE INITIAL STATE. «, t00=0x0193, t01=0x009a}
0x27604…2760e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0193, t01=0x00ba}
0x2760e…27642 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0193, t01=0x00c4}
0x27642…2764c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0193, t01=0x00f8}
0x2764c…27668 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x0193, t01=0x0102}
0x27668…27694 Head {h00=0x0028, h01=0x0050, text=»* A1 = DIAGNOSTIC CODE FOR THE RH «, t00=0x0193, t01=0x011e}
0x27694…276b8 Head {h00=0x0020, h01=0x0050, text=»* A12 = LINE BLOCK ADDRESS «, t00=0x0193, t01=0x014a}
0x276b8…276e4 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x0193, t01=0x016e}
0x276e4…276ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0194, t01=0x000a}
0x276ee…2770a Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x0194, t01=0x0014}
0x2770a…27726 Head {h00=0x0018, h01=0x0050, text=»* CF A14,CLAVCS «, t00=0x0194, t01=0x0030}
0x27726…27730 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0194, t01=0x004c}
0x27730…2774c Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x0194, t01=0x0056}
0x2774c…27770 Head {h00=0x0020, h01=0x0050, text=»* NO REGISTERS ARE CHANGED «, t00=0x0194, t01=0x0072}
0x27770…2777a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0194, t01=0x0096}
0x2777a…2778e Head {h00=0x0010, h01=0x0050, text=»CLAVCS EQU *«, t00=0x0194, t01=0x00a0}
0x2778e…277cc Head {h00=0x003a, h01=0x0050, text=» CF A14,SAVE8 SAVE REGISTERS«, t00=0x0194, t01=0x00b4}
0x277cc…277e8 Head {h00=0x0018, h01=0x0050, text=» LDR A7,A13 SAVE A13«, t00=0x0194, t01=0x00f2}
0x277e8…277f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0194, t01=0x010e}
0x277f2…27818 Head {h00=0x0022, h01=0x0050, text=»* RELEASE ALL LOGICAL CHANNELS«, t00=0x0194, t01=0x0118}
0x27818…27822 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0194, t01=0x013e}
0x27822…27854 Head {h00=0x002e, h01=0x0050, text=» LC A4,NRLC,A12 GET # OF LOGICAL CHANNELS «, t00=0x0194, t01=0x0148}
0x27854…2786a Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x0194, t01=0x017a}
0x2786a…2787e Head {h00=0x0010, h01=0x0050, text=» SUK A4,1 . «, t00=0x0194, t01=0x0190}
0x2787e…27892 Head {h00=0x0010, h01=0x0050, text=»CLAV00 EQU *«, t00=0x0195, t01=0x0014}
0x27892…278bc Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x0195, t01=0x0028}
0x278bc…278c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0195, t01=0x0052}
0x278c6…278d4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0195, t01=0x005c}
0x278d4…278de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0195, t01=0x006a}
0x278de…27906 Head {h00=0x0024, h01=0x0050, text=» CF A14,CLINPQ CLEAR INPUT QUEUE«, t00=0x0195, t01=0x0074}
0x27906…2791c Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0195, t01=0x009c}
0x2791c…2792e Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0195, t01=0x00b2}
0x2792e…27944 Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0195, t01=0x00c4}
0x27944…27964 Head {h00=0x001c, h01=0x0050, text=» LC A1,VCTYP,A13 VC-TYPE«, t00=0x0195, t01=0x00da}
0x27964…2797a Head {h00=0x0012, h01=0x0050, text=» ANK A1,/FF . «, t00=0x0195, t01=0x00fa}
0x2797a…279a8 Head {h00=0x002a, h01=0x0050, text=» RF(Z) CLAV10 SWITCHED VIRTUAL CIRCUIT«, t00=0x0195, t01=0x0110}
0x279a8…279b4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0195, t01=0x013e}
0x279b4…279ca Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0195, t01=0x014a}
0x279ca…279f2 Head {h00=0x0024, h01=0x0050, text=» LDK A2,DATA.ST PRESET LC-STATUS«, t00=0x0195, t01=0x0160}
0x279f2…27a06 Head {h00=0x0010, h01=0x0050, text=» ECR A2,A2 .«, t00=0x0195, t01=0x0188}
0x27a06…27a12 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0196, t01=0x000c}
0x27a12…27a26 Head {h00=0x0010, h01=0x0050, text=»CLAV10 EQU *«, t00=0x0196, t01=0x0018}
0x27a26…27a5c Head {h00=0x0032, h01=0x0050, text=» ST A2,LCSTAT,A13 SET STATUS TO INITIALE VALUE«, t00=0x0196, t01=0x002c}
0x27a5c…27a92 Head {h00=0x0032, h01=0x0050, text=» LD A6,LCDWT,A13 IS THERE RELATION WITH A DWT «, t00=0x0196, t01=0x0062}
0x27a92…27aaa Head {h00=0x0014, h01=0x0050, text=» RF(Z) CLAV30 NO«, t00=0x0196, t01=0x0098}
0x27aaa…27ac0 Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0196, t01=0x00b0}
0x27ac0…27ad6 Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0196, t01=0x00c6}
0x27ad6…27aee Head {h00=0x0014, h01=0x0050, text=» ADK A1,0 PVC ? «, t00=0x0196, t01=0x00dc}
0x27aee…27b08 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) CLAV15 YES«, t00=0x0196, t01=0x00f4}
0x27b08…27b14 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0196, t01=0x010e}
0x27b14…27b2a Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0196, t01=0x011a}
0x27b2a…27b4c Head {h00=0x001e, h01=0x0050, text=» LDK A1,VCREL«, t00=0x0196, t01=0x0130}
0x27b4c…27b72 Head {h00=0x0022, h01=0x0050, text=» SC A1,DWTSTE,A6«, t00=0x0196, t01=0x0152}
0x27b72…27b86 Head {h00=0x0010, h01=0x0050, text=»CLAV15 EQU *«, t00=0x0196, t01=0x0178}
0x27b86…27b92 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0196, t01=0x018c}
0x27b92…27b9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0197, t01=0x0008}
0x27b9c…27bb8 Head {h00=0x0018, h01=0x0050, text=»* RESET TIMER FLAGS «, t00=0x0197, t01=0x0012}
0x27bb8…27bce Head {h00=0x0012, h01=0x0050, text=»* CANCEL TIMER«, t00=0x0197, t01=0x002e}
0x27bce…27bd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0197, t01=0x0044}
0x27bd8…27bf2 Head {h00=0x0016, h01=0x0050, text=» LD A1,TIMADR,A13 «, t00=0x0197, t01=0x004e}
0x27bf2…27c08 Head {h00=0x0012, h01=0x0050, text=» CF A14,CANTIM«, t00=0x0197, t01=0x0068}
0x27c08…27c1e Head {h00=0x0012, h01=0x0050, text=» CM TIMADR,A13«, t00=0x0197, t01=0x007e}
0x27c1e…27c40 Head {h00=0x001e, h01=0x0050, text=» LDK A1,CONTIM MASK VALUE «, t00=0x0197, t01=0x0094}
0x27c40…27c54 Head {h00=0x0010, h01=0x0050, text=» C1R A1,A1 .«, t00=0x0197, t01=0x00b6}
0x27c54…27c78 Head {h00=0x0020, h01=0x0050, text=» ANS A1,FLAGS,A13 RESET FLAG«, t00=0x0197, t01=0x00ca}
0x27c78…27c82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0197, t01=0x00ee}
0x27c82…27cac Head {h00=0x0026, h01=0x0050, text=»* COMPLETE PENDING OUTPUT REQUESTS«, t00=0x0197, t01=0x00f8}
0x27cac…27cd0 Head {h00=0x0020, h01=0x0050, text=» LDKL A3,CLEA.RC RETURN CODE«, t00=0x0197, t01=0x0122}
0x27cd0…27cda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0197, t01=0x0146}
0x27cda…27cf0 Head {h00=0x0012, h01=0x0050, text=» CF A14,CMEVNT«, t00=0x0197, t01=0x0150}
0x27cf0…27cfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0197, t01=0x0166}
0x27cfa…27d08 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0197, t01=0x0170}
0x27d08…27d12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0197, t01=0x017e}
0x27d12…27d46 Head {h00=0x0030, h01=0x0050, text=»* PREPARE CLEAR OR RESET NOTIFICATION FOR RH«, t00=0x0197, t01=0x0188}
0x27d46…27d50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0198, t01=0x002c}
0x27d50…27d7a Head {h00=0x0026, h01=0x0050, text=» CF A14,GTBUF GET AN INPUT BUFFER «, t00=0x0198, t01=0x0036}
0x27d7a…27daa Head {h00=0x002c, h01=0x0050, text=» LC A1,LCNUM,A13 LOGICAL CHANNEL NUMBER «, t00=0x0198, t01=0x0060}
0x27daa…27dc4 Head {h00=0x0016, h01=0x0050, text=» SC A1,LCIDNT,A2 .«, t00=0x0198, t01=0x0090}
0x27dc4…27dda Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x0198, t01=0x00aa}
0x27dda…27dfe Head {h00=0x0020, h01=0x0050, text=» LDK A3,CLEA.RC RETURN CODE «, t00=0x0198, t01=0x00c0}
0x27dfe…27e2e Head {h00=0x002c, h01=0x0050, text=» LDK A1,CLE.P PRESET PACKET TYPE = CLEAR«, t00=0x0198, t01=0x00e4}
0x27e2e…27e44 Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0198, t01=0x0114}
0x27e44…27e64 Head {h00=0x001c, h01=0x0050, text=» LC A3,VCTYP,A13 VC-TYPE«, t00=0x0198, t01=0x012a}
0x27e64…27e7a Head {h00=0x0012, h01=0x0050, text=» ANK A3,/FF . «, t00=0x0198, t01=0x014a}
0x27e7a…27ea8 Head {h00=0x002a, h01=0x0050, text=» RF(Z) CLAV20 SWITCHED VIRTUAL CIRCUIT«, t00=0x0198, t01=0x0160}
0x27ea8…27eb4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0198, t01=0x018e}
0x27eb4…27eca Head {h00=0x0012, h01=0x0050, text=» IFF PERMVC=0 «, t00=0x0199, t01=0x000a}
0x27eca…27eee Head {h00=0x0020, h01=0x0050, text=» LDK A3,RSET.RC RETURN CODE «, t00=0x0199, t01=0x0020}
0x27eee…27f18 Head {h00=0x0026, h01=0x0050, text=» LDK A1,RSET.P PACKET TYPE = RESET«, t00=0x0199, t01=0x0044}
0x27f18…27f2c Head {h00=0x0010, h01=0x0050, text=»CLAV20 EQU *«, t00=0x0199, t01=0x006e}
0x27f2c…27f38 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0199, t01=0x0082}
0x27f38…27f60 Head {h00=0x0024, h01=0x0050, text=» SC A1,IDENT,A2 SAVE PACKET TYPE«, t00=0x0199, t01=0x008e}
0x27f60…27f88 Head {h00=0x0024, h01=0x0050, text=» LD A1,SAVE GET INPUT PARAMETER «, t00=0x0199, t01=0x00b6}
0x27f88…27fb0 Head {h00=0x0024, h01=0x0050, text=» SC A1,DGNCOD,A2 DIAGNOSTIC CODE«, t00=0x0199, t01=0x00de}
0x27fb0…27fd4 Head {h00=0x0020, h01=0x0050, text=» LDK A1,CLE.L PACKET LENGTH «, t00=0x0199, t01=0x0106}
0x27fd4…27fec Head {h00=0x0014, h01=0x0050, text=» ST A1,HDLC,A2 .«, t00=0x0199, t01=0x012a}
0x27fec…2801c Head {h00=0x002c, h01=0x0050, text=» CF A14,QUEI PUT ELEMENT IN INPUT QUEUE «, t00=0x0199, t01=0x0142}
0x2801c…28030 Head {h00=0x0010, h01=0x0050, text=»CLAV30 EQU *«, t00=0x0199, t01=0x0172}
0x28030…28056 Head {h00=0x0022, h01=0x0050, text=» SUK A4,1 NEXT ENTRY IN LC:TAB«, t00=0x0199, t01=0x0186}
0x28056…2806e Head {h00=0x0014, h01=0x0050, text=» RB(NN) CLAV00 .«, t00=0x019a, t01=0x001c}
0x2806e…28078 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019a, t01=0x0034}
0x28078…28088 Head {h00=0x000c, h01=0x0050, text=»* READY «, t00=0x019a, t01=0x003e}
0x28088…28092 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019a, t01=0x004e}
0x28092…280ce Head {h00=0x0038, h01=0x0050, text=» LDR A13,A7 RELOAD SAVED A13 «, t00=0x019a, t01=0x0058}
0x280ce…280f2 Head {h00=0x0020, h01=0x0050, text=» CF A14,RELOA8«, t00=0x019a, t01=0x0094}
0x280f2…28112 Head {h00=0x001c, h01=0x0050, text=» RTN A14 BACK TO CALLER «, t00=0x019a, t01=0x00b8}
0x28112…28120 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x019a, t01=0x00d8}
0x28120…2812a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019a, t01=0x00e6}
0x2812a…28134 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019a, t01=0x00f0}
0x28134…28162 Head {h00=0x002a, h01=0x0050, text=»* WAIT FOR RELEASING OF SYSTEM BUFFER «, t00=0x019a, t01=0x00fa}
0x28162…2816c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019a, t01=0x0128}
0x2816c…281a0 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x019a, t01=0x0132}
0x281a0…281aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019a, t01=0x0166}
0x281aa…281c6 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x019a, t01=0x0170}
0x281c6…281e6 Head {h00=0x001c, h01=0x0050, text=»* A1 = RESTART ADDRESS«, t00=0x019a, t01=0x018c}
0x281e6…28218 Head {h00=0x002e, h01=0x0050, text=»* A12 = LINE BLOCK ADDRESS«, t00=0x019b, t01=0x001c}
0x28218…28238 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x019b, t01=0x004e}
0x28238…28242 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019b, t01=0x006e}
0x28242…2825e Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x019b, t01=0x0078}
0x2825e…28276 Head {h00=0x0014, h01=0x0050, text=»* ABL BUFWAT«, t00=0x019b, t01=0x0094}
0x28276…28280 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019b, t01=0x00ac}
0x28280…2829c Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x019b, t01=0x00b6}
0x2829c…282d4 Head {h00=0x0034, h01=0x0050, text=»* AFTER A CERTAIN TIME THE CALLER IS ACTIVATED «, t00=0x019b, t01=0x00d2}
0x282d4…282f4 Head {h00=0x001c, h01=0x0050, text=»* ON THE RESTART LABEL «, t00=0x019b, t01=0x010a}
0x282f4…2831c Head {h00=0x0024, h01=0x0050, text=»* A13 AND A14 REMAIN UNCHANGED.«, t00=0x019b, t01=0x012a}
0x2831c…28326 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019b, t01=0x0152}
0x28326…2833a Head {h00=0x0010, h01=0x0050, text=»BUFWAT EQU *«, t00=0x019b, t01=0x015c}
0x2833a…2835c Head {h00=0x001e, h01=0x0050, text=» LDR A2,A13 SAVE REGISTERS«, t00=0x019b, t01=0x0170}
0x2835c…28372 (412, 0, 400) Head {h00=0x0012, h01=0x0050, text=» LDR A3,A12 . «, t00=0x019c, t01=0x0004}
0x28372…28384 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x019c, t01=0x001a}
0x28384…283ae Head {h00=0x0026, h01=0x0050, text=» CF A15,GETBLK GET A MONITOR BLOCK«, t00=0x019c, t01=0x002c}
0x283ae…283dc Head {h00=0x002a, h01=0x0050, text=» LDR A1,A4 BLOCK ADDRESS AS PARAMETER «, t00=0x019c, t01=0x0056}
0x283dc…283fc Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIME SET TIMER«, t00=0x019c, t01=0x0084}
0x283fc…28424 Head {h00=0x0024, h01=0x0050, text=» DATA BUFW00 ACTIVATION ADDRESS «, t00=0x019c, t01=0x00a4}
0x28424…28444 Head {h00=0x001c, h01=0x0050, text=» DATA BUFDEL DELAY TIMER«, t00=0x019c, t01=0x00cc}
0x28444…28450 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x019c, t01=0x00ec}
0x28450…2847e Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x019c, t01=0x00f8}
0x2847e…28488 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019c, t01=0x0126}
0x28488…28496 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x019c, t01=0x0130}
0x28496…284a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019c, t01=0x013e}
0x284a0…284b4 Head {h00=0x0010, h01=0x0050, text=»* ACTIVATION«, t00=0x019c, t01=0x0148}
0x284b4…284be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019c, t01=0x015c}
0x284be…284d2 Head {h00=0x0010, h01=0x0050, text=»BUFW00 EQU *«, t00=0x019c, t01=0x0166}
0x284d2…284fe Head {h00=0x0028, h01=0x0050, text=» LDR A4,A1 GET MONITOR BLOCK ADDRESS«, t00=0x019c, t01=0x017a}
0x284fe…28510 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x019d, t01=0x0016}
0x28510…28534 Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RELEASE BLOCK«, t00=0x019d, t01=0x0028}
0x28534…28540 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x019d, t01=0x004c}
0x28540…28566 Head {h00=0x0022, h01=0x0050, text=» LDR A12,A3 RESTORE REGISTERS «, t00=0x019d, t01=0x0058}
0x28566…2857c Head {h00=0x0012, h01=0x0050, text=» LDR A13,A2 . «, t00=0x019d, t01=0x007e}
0x2857c…285bc Head {h00=0x003c, h01=0x0050, text=» LDKL A14,DCSTAK A14:=CF STACK POINTER«, t00=0x019d, t01=0x0094}
0x285bc…285da Head {h00=0x001a, h01=0x0050, text=» ABR A1 BACK TO CALLER«, t00=0x019d, t01=0x00d4}
0x285da…285e8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x019d, t01=0x00f2}
0x285e8…285f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019d, t01=0x0100}
0x285f2…285fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019d, t01=0x010a}
0x285fc…2863e Head {h00=0x003e, h01=0x0050, text=»* TRANSLATE THRESHOLD PERCENTAGE INTO A NUMBER OF PACKETS «, t00=0x019d, t01=0x0114}
0x2863e…28648 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019d, t01=0x0156}
0x28648…2867c Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x019d, t01=0x0160}
0x2867c…28686 (414, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019e, t01=0x0004}
0x28686…286a2 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x019e, t01=0x000e}
0x286a2…286c2 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x019e, t01=0x002a}
0x286c2…286ee Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x019e, t01=0x004a}
0x286ee…286f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019e, t01=0x0076}
0x286f8…28714 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x019e, t01=0x0080}
0x28714…2872e Head {h00=0x0016, h01=0x0050, text=»* CF A14,TRTHR«, t00=0x019e, t01=0x009c}
0x2872e…28738 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019e, t01=0x00b6}
0x28738…28754 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x019e, t01=0x00c0}
0x28754…2878e Head {h00=0x0036, h01=0x0050, text=»* THE NUMBER OF PACKETS IS STORED IN THE LC-ADM. «, t00=0x019e, t01=0x00dc}
0x2878e…287a6 Head {h00=0x0014, h01=0x0050, text=»* A1 IS CHANGED«, t00=0x019e, t01=0x0116}
0x287a6…287b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x019e, t01=0x012e}
0x287b0…287c4 Head {h00=0x0010, h01=0x0050, text=»TRTHR EQU * «, t00=0x019e, t01=0x0138}
0x287c4…287e6 Head {h00=0x001e, h01=0x0050, text=» STR A4,A14 SAVE REGISTER «, t00=0x019e, t01=0x014c}
0x287e6…287f8 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x019e, t01=0x016e}
0x287f8…2882a Head {h00=0x002e, h01=0x0050, text=» LC A1,LCREWN,A13 RECEIVE WINDOW SIZE = W «, t00=0x019e, t01=0x0180}
0x2882a…2883c Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x019f, t01=0x0022}
0x2883c…2885a Head {h00=0x001a, h01=0x0050, text=» LDK A4,0«, t00=0x019f, t01=0x0034}
0x2885a…2886e Head {h00=0x0010, h01=0x0050, text=»TRTHR1 EQU *«, t00=0x019f, t01=0x0052}
0x2886e…28884 Head {h00=0x0012, h01=0x0050, text=» AD A4,THRESH «, t00=0x019f, t01=0x0066}
0x28884…2889e Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 GET P*W «, t00=0x019f, t01=0x007c}
0x2889e…288b4 Head {h00=0x0012, h01=0x0050, text=» RB(NN) TRTHR1«, t00=0x019f, t01=0x0096}
0x288b4…288c8 Head {h00=0x0010, h01=0x0050, text=» LDKL A1,-1 «, t00=0x019f, t01=0x00ac}
0x288c8…288dc Head {h00=0x0010, h01=0x0050, text=»TRTHR2 EQU *«, t00=0x019f, t01=0x00c0}
0x288dc…288ee Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x019f, t01=0x00d4}
0x288ee…2890a Head {h00=0x0018, h01=0x0050, text=» SUK A4,100 P*W/100 «, t00=0x019f, t01=0x00e6}
0x2890a…28920 Head {h00=0x0012, h01=0x0050, text=» RB(NN) TRTHR2«, t00=0x019f, t01=0x0102}
0x28920…28954 Head {h00=0x0030, h01=0x0050, text=» SC A1,LCTHRE,A13 THRESHOLD VALUE IN PACKETS«, t00=0x019f, t01=0x0118}
0x28954…2897a Head {h00=0x0022, h01=0x0050, text=» LDR* A4,A14 RESTORE REGISTER «, t00=0x019f, t01=0x014c}
0x2897a…2898a Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x019f, t01=0x0172}
0x2898a…28998 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x019f, t01=0x0182}
0x28998…289ae Head {h00=0x0012, h01=0x0050, text=» IFF SWITVC=0 «, t00=0x019f, t01=0x0190}
0x289ae…289b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a0, t01=0x0016}
0x289b8…289c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a0, t01=0x0020}
0x289c2…289fe Head {h00=0x0038, h01=0x0050, text=»* CALCULATION OF THE WINDOW SIZES AND PACKET LENGTH «, t00=0x01a0, t01=0x002a}
0x289fe…28a08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a0, t01=0x0066}
0x28a08…28a3c Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01a0, t01=0x0070}
0x28a3c…28a46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a0, t01=0x00a4}
0x28a46…28a62 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01a0, t01=0x00ae}
0x28a62…28a82 Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x01a0, t01=0x00ca}
0x28a82…28aa6 Head {h00=0x0020, h01=0x0050, text=»* A12 = LINE BLOCK ADDRESS «, t00=0x01a0, t01=0x00ea}
0x28aa6…28ac6 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x01a0, t01=0x010e}
0x28ac6…28af2 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01a0, t01=0x012e}
0x28af2…28afc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a0, t01=0x015a}
0x28afc…28b18 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01a0, t01=0x0164}
0x28b18…28b34 Head {h00=0x0018, h01=0x0050, text=»* CF A14,GTWNDS «, t00=0x01a0, t01=0x0180}
0x28b34…28b3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a1, t01=0x000c}
0x28b3e…28b5a Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01a1, t01=0x0016}
0x28b5a…28b84 Head {h00=0x0026, h01=0x0050, text=»* REGISTERS A1 AND A3 ARE CHANGED«, t00=0x01a1, t01=0x0032}
0x28b84…28b8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a1, t01=0x005c}
0x28b8e…28ba2 Head {h00=0x0010, h01=0x0050, text=»GTWNDS EQU *«, t00=0x01a1, t01=0x0066}
0x28ba2…28bc6 Head {h00=0x0020, h01=0x0050, text=» ST A2,SAVE+6 SAVE REGISTER «, t00=0x01a1, t01=0x007a}
0x28bc6…28bf8 Head {h00=0x002e, h01=0x0050, text=» LD A1,WNDSIZ,A12 PRESET ON MAXIMUM VALUES«, t00=0x01a1, t01=0x009e}
0x28bf8…28c14 Head {h00=0x0018, h01=0x0050, text=» SC A1,LCTRWN,A13 . «, t00=0x01a1, t01=0x00d0}
0x28c14…28c30 Head {h00=0x0018, h01=0x0050, text=» SC A1,LCREWN,A13 . «, t00=0x01a1, t01=0x00ec}
0x28c30…28c4c Head {h00=0x0018, h01=0x0050, text=» LD A1,PACKLN,A12 . «, t00=0x01a1, t01=0x0108}
0x28c4c…28c68 Head {h00=0x0018, h01=0x0050, text=» ST A1,TRBFSZ,A13 . «, t00=0x01a1, t01=0x0124}
0x28c68…28c84 Head {h00=0x0018, h01=0x0050, text=» ST A1,REBFSZ,A13 . «, t00=0x01a1, t01=0x0140}
0x28c84…28ca2 Head {h00=0x001a, h01=0x0050, text=» ADK A2,BEGDAT POINTER«, t00=0x01a1, t01=0x015c}
0x28ca2…28cc6 Head {h00=0x0020, h01=0x0050, text=» LCR A1,A2 GET LENGTH VALUE «, t00=0x01a1, t01=0x017a}
0x28cc6…28cec Head {h00=0x0022, h01=0x0050, text=» ANK A1,/F0 LENGTH CALLING DTE«, t00=0x01a2, t01=0x000e}
0x28cec…28d00 Head {h00=0x0010, h01=0x0050, text=» SRL A1,4 . «, t00=0x01a2, t01=0x0034}
0x28d00…28d24 Head {h00=0x0020, h01=0x0050, text=» LCR A3,A2 LENGTH CALLED DTE«, t00=0x01a2, t01=0x0048}
0x28d24…28d38 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/0F «, t00=0x01a2, t01=0x006c}
0x28d38…28d5a Head {h00=0x001e, h01=0x0050, text=» ADR A1,A3 ADD BOTH LENGTH«, t00=0x01a2, t01=0x0080}
0x28d5a…28d64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a2, t01=0x00a2}
0x28d64…28d72 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01a2, t01=0x00ac}
0x28d72…28d7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a2, t01=0x00ba}
0x28d7c…28d9e Head {h00=0x001e, h01=0x0050, text=» ADK A1,1 ROUNDED UPWARDS «, t00=0x01a2, t01=0x00c4}
0x28d9e…28dbe Head {h00=0x001c, h01=0x0050, text=» SRL A1,1 MAKE IT BYTES «, t00=0x01a2, t01=0x00e6}
0x28dbe…28de0 Head {h00=0x001e, h01=0x0050, text=» ADR A2,A1 PASS DTE FIELDS«, t00=0x01a2, t01=0x0106}
0x28de0…28e04 Head {h00=0x0020, h01=0x0050, text=» ADK A2,1 POINTS TO FACILITY«, t00=0x01a2, t01=0x0128}
0x28e04…28e2c Head {h00=0x0024, h01=0x0050, text=» LCR A1,A2 FACILITY SPECIFIED ? «, t00=0x01a2, t01=0x014c}
0x28e2c…28e40 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/3F «, t00=0x01a2, t01=0x0174}
0x28e40…28e58 Head {h00=0x0014, h01=0x0050, text=» RF(Z) GTWND6 NO«, t00=0x01a2, t01=0x0188}
0x28e58…28e82 Head {h00=0x0026, h01=0x0050, text=» ADK A2,1 POINTS TO FIRST FACILITY«, t00=0x01a3, t01=0x0010}
0x28e82…28e96 Head {h00=0x0010, h01=0x0050, text=»GTWND1 EQU *«, t00=0x01a3, t01=0x003a}
0x28e96…28eba Head {h00=0x0020, h01=0x0050, text=» LCR A3,A2 GET FACILITY CODE«, t00=0x01a3, t01=0x004e}
0x28eba…28edc Head {h00=0x001e, h01=0x0050, text=» CWK A3,/02 FLOW CONTROL ?«, t00=0x01a3, t01=0x0072}
0x28edc…28ef6 Head {h00=0x0016, h01=0x0050, text=» RF(E) GTWND2 YES «, t00=0x01a3, t01=0x0094}
0x28ef6…28f14 Head {h00=0x001a, h01=0x0050, text=» ADK A2,2 TRY NEXT ONE«, t00=0x01a3, t01=0x00ae}
0x28f14…28f34 Head {h00=0x001c, h01=0x0050, text=» SUK A1,2 UPDATE LENGTH «, t00=0x01a3, t01=0x00cc}
0x28f34…28f54 Head {h00=0x001c, h01=0x0050, text=» RF(NP) GTWND6 EXHAUSTED«, t00=0x01a3, t01=0x00ec}
0x28f54…28f70 Head {h00=0x0018, h01=0x0050, text=» RB GTWND1 NEXT ONE «, t00=0x01a3, t01=0x010c}
0x28f70…28f7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a3, t01=0x0128}
0x28f7a…28fb2 Head {h00=0x0034, h01=0x0050, text=»* FACILITY FOR FLOW CONTROL SELECTION SPECIFIED «, t00=0x01a3, t01=0x0132}
0x28fb2…28fbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a3, t01=0x016a}
0x28fbc…28fd0 Head {h00=0x0010, h01=0x0050, text=»GTWND2 EQU *«, t00=0x01a3, t01=0x0174}
0x28fd0…28fda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a3, t01=0x0188}
0x28fda…28ff8 (420, 0, 400) Head {h00=0x001a, h01=0x0050, text=»* GET TRANSMITTER DATA«, t00=0x01a4, t01=0x0004}
0x28ff8…29002 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a4, t01=0x0022}
0x29002…29030 Head {h00=0x002a, h01=0x0050, text=» ADK A2,1 POINTS TO FACILITY PARAMETER«, t00=0x01a4, t01=0x002c}
0x29030…29050 Head {h00=0x001c, h01=0x0050, text=» LCR A3,A2 GET PARAMETER«, t00=0x01a4, t01=0x005a}
0x29050…2907a Head {h00=0x0026, h01=0x0050, text=» ANK A3,/0F TRANSMITTER PARAMETERS«, t00=0x01a4, t01=0x007a}
0x2907a…290a0 Head {h00=0x0022, h01=0x0050, text=» SLL A3,1 PREPARE FOR INDEXING«, t00=0x01a4, t01=0x00a4}
0x290a0…290c4 Head {h00=0x0020, h01=0x0050, text=» RF(Z) GTWND4 NOT SPECIFIED «, t00=0x01a4, t01=0x00ca}
0x290c4…290e8 Head {h00=0x0020, h01=0x0050, text=» LD A3,CLAS1-2,A3 GET VALUES«, t00=0x01a4, t01=0x00ee}
0x290e8…2911c Head {h00=0x0030, h01=0x0050, text=» CC A3,TRBFSZ+1,A13 PACKET SIZE TOO LARGE ? «, t00=0x01a4, t01=0x0112}
0x2911c…29136 Head {h00=0x0016, h01=0x0050, text=» RF(NL) GTWND3 YES«, t00=0x01a4, t01=0x0146}
0x29136…2916e Head {h00=0x0034, h01=0x0050, text=» SC A3,TRBFSZ+1,A13 SAVE TRANSMITTER BUFFER SIZE«, t00=0x01a4, t01=0x0160}
0x2916e…29178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a5, t01=0x0008}
0x29178…29186 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01a5, t01=0x0012}
0x29186…29190 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a5, t01=0x0020}
0x29190…291a4 Head {h00=0x0010, h01=0x0050, text=»GTWND3 EQU *«, t00=0x01a5, t01=0x002a}
0x291a4…291b6 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x01a5, t01=0x003e}
0x291b6…291e8 Head {h00=0x002e, h01=0x0050, text=» CC A3,LCTRWN,A13 WINDOW SIZE TOO LARGE ? «, t00=0x01a5, t01=0x0050}
0x291e8…29202 Head {h00=0x0016, h01=0x0050, text=» RF(NL) GTWND4 YES«, t00=0x01a5, t01=0x0082}
0x29202…2922c Head {h00=0x0026, h01=0x0050, text=» SC A3,LCTRWN,A13 SAVE WINDOW SIZE«, t00=0x01a5, t01=0x009c}
0x2922c…29236 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a5, t01=0x00c6}
0x29236…29252 Head {h00=0x0018, h01=0x0050, text=»* GET RECIEVER DATA «, t00=0x01a5, t01=0x00d0}
0x29252…2925c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a5, t01=0x00ec}
0x2925c…29270 Head {h00=0x0010, h01=0x0050, text=»GTWND4 EQU *«, t00=0x01a5, t01=0x00f6}
0x29270…29296 Head {h00=0x0022, h01=0x0050, text=» LCR A3,A2 GET PARAMETER AGAIN«, t00=0x01a5, t01=0x010a}
0x29296…292bc Head {h00=0x0022, h01=0x0050, text=» ANK A3,/F0 RECEIVER PARAMETER«, t00=0x01a5, t01=0x0130}
0x292bc…292e2 Head {h00=0x0022, h01=0x0050, text=» SRL A3,3 PREPARE FOR INDEXING«, t00=0x01a5, t01=0x0156}
0x292e2…29306 Head {h00=0x0020, h01=0x0050, text=» RF(Z) GTWND6 NOT SPECIFIED «, t00=0x01a5, t01=0x017c}
0x29306…2932a Head {h00=0x0020, h01=0x0050, text=» LD A3,CLAS1-2,A3 GET VALUES«, t00=0x01a6, t01=0x0010}
0x2932a…2935e Head {h00=0x0030, h01=0x0050, text=» CC A3,REBFSZ+1,A13 PACKET SIZE TOO LARGE ? «, t00=0x01a6, t01=0x0034}
0x2935e…29378 Head {h00=0x0016, h01=0x0050, text=» RF(NL) GTWND5 YES«, t00=0x01a6, t01=0x0068}
0x29378…293ae Head {h00=0x0032, h01=0x0050, text=» SC A3,REBFSZ+1,A13 SAVE RECEIVER BUFFER SIZE «, t00=0x01a6, t01=0x0082}
0x293ae…293c2 Head {h00=0x0010, h01=0x0050, text=»GTWND5 EQU *«, t00=0x01a6, t01=0x00b8}
0x293c2…293d4 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x01a6, t01=0x00cc}
0x293d4…29406 Head {h00=0x002e, h01=0x0050, text=» CC A3,LCREWN,A13 WINDOW SIZE TOO LARGE ? «, t00=0x01a6, t01=0x00de}
0x29406…29420 Head {h00=0x0016, h01=0x0050, text=» RF(NL) GTWND6 YES«, t00=0x01a6, t01=0x0110}
0x29420…2944a Head {h00=0x0026, h01=0x0050, text=» SC A3,LCREWN,A13 SAVE WINDOW SIZE«, t00=0x01a6, t01=0x012a}
0x2944a…2945e Head {h00=0x0010, h01=0x0050, text=»GTWND6 EQU *«, t00=0x01a6, t01=0x0154}
0x2945e…29484 Head {h00=0x0022, h01=0x0050, text=» LD A2,SAVE+6 RELOAD SAVED A2 «, t00=0x01a6, t01=0x0168}
0x29484…29494 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01a6, t01=0x018e}
0x29494…294a2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01a7, t01=0x000e}
0x294a2…294ae Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01a7, t01=0x001c}
0x294ae…294b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a7, t01=0x0028}
0x294b8…294c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a7, t01=0x0032}
0x294c2…29500 Head {h00=0x003a, h01=0x0050, text=»* COMPLETE AN OUTPUT EVENT, DUE TO AN ERROR SITUATION «, t00=0x01a7, t01=0x003c}
0x29500…2950a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a7, t01=0x007a}
0x2950a…2953e Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01a7, t01=0x0084}
0x2953e…29548 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a7, t01=0x00b8}
0x29548…29564 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01a7, t01=0x00c2}
0x29564…29580 Head {h00=0x0018, h01=0x0050, text=»* A3 = RETURN CODE«, t00=0x01a7, t01=0x00de}
0x29580…295a0 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x01a7, t01=0x00fa}
0x295a0…295cc Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01a7, t01=0x011a}
0x295cc…295d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a7, t01=0x0146}
0x295d6…295f2 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01a7, t01=0x0150}
0x295f2…2960e Head {h00=0x0018, h01=0x0050, text=»* CF A14,CMEVNT «, t00=0x01a7, t01=0x016c}
0x2960e…29618 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a7, t01=0x0188}
0x29618…29634 (424, 0, 400) Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01a8, t01=0x0004}
0x29634…29658 Head {h00=0x0020, h01=0x0050, text=»* A1 ,A2 AND A6 ARE CHANGED«, t00=0x01a8, t01=0x0020}
0x29658…29662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a8, t01=0x0044}
0x29662…29676 Head {h00=0x0010, h01=0x0050, text=»CMEVNT EQU *«, t00=0x01a8, t01=0x004e}
0x29676…2969e Head {h00=0x0024, h01=0x0050, text=» LDR A1,A13 QUEUE ANCHOR ADDRESS«, t00=0x01a8, t01=0x0062}
0x2969e…296b6 Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEOUT .«, t00=0x01a8, t01=0x008a}
0x296b6…296dc Head {h00=0x0022, h01=0x0050, text=» LDK A2,NPRFLG SET MASK VALUE «, t00=0x01a8, t01=0x00a2}
0x296dc…296f0 Head {h00=0x0010, h01=0x0050, text=» C1R A2,A2 .«, t00=0x01a8, t01=0x00c8}
0x296f0…29714 Head {h00=0x0020, h01=0x0050, text=» ANRS A2,A1 IS QUEUE EMPTY ?«, t00=0x01a8, t01=0x00dc}
0x29714…2972e Head {h00=0x0016, h01=0x0050, text=» RF(Z) CMEV20 YES «, t00=0x01a8, t01=0x0100}
0x2972e…2975a Head {h00=0x0028, h01=0x0050, text=» CF A14,DEQUE GET ELEMENT FROM QUEUE«, t00=0x01a8, t01=0x011a}
0x2975a…29772 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,DWTTYP «, t00=0x01a8, t01=0x0146}
0x29772…29798 Head {h00=0x0022, h01=0x0050, text=» CW A1,DWTCHP,A2 IS IT A DWT ?«, t00=0x01a8, t01=0x015e}
0x29798…297b2 Head {h00=0x0016, h01=0x0050, text=» RF(NE) CMEV10 NO «, t00=0x01a8, t01=0x0184}
0x297b2…297d6 Head {h00=0x0020, h01=0x0050, text=» LDR A6,A2 A6 = DWT-ADDRESS «, t00=0x01a9, t01=0x000e}
0x297d6…297fe Head {h00=0x0024, h01=0x0050, text=» CF A14,CMPREQ COMPLETE REQUEST «, t00=0x01a9, t01=0x0032}
0x297fe…29810 Head {h00=0x000e, h01=0x0050, text=» RB CMEVNT«, t00=0x01a9, t01=0x005a}
0x29810…2981a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x006c}
0x2981a…29828 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01a9, t01=0x0076}
0x29828…29832 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x0084}
0x29832…2985a Head {h00=0x0024, h01=0x0050, text=»* THE ELEMENT IS A SYSTEM BUFFER«, t00=0x01a9, t01=0x008e}
0x2985a…29864 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x00b6}
0x29864…29878 Head {h00=0x0010, h01=0x0050, text=»CMEV10 EQU *«, t00=0x01a9, t01=0x00c0}
0x29878…2989e Head {h00=0x0022, h01=0x0050, text=» CMR A2 RELEASE SYSTEM BUFFER «, t00=0x01a9, t01=0x00d4}
0x2989e…298b0 Head {h00=0x000e, h01=0x0050, text=» RB CMEVNT«, t00=0x01a9, t01=0x00fa}
0x298b0…298ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x010c}
0x298ba…298ce Head {h00=0x0010, h01=0x0050, text=»CMEV20 EQU *«, t00=0x01a9, t01=0x0116}
0x298ce…298de Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01a9, t01=0x012a}
0x298de…298ec Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01a9, t01=0x013a}
0x298ec…298f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x0148}
0x298f6…29900 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01a9, t01=0x0152}
0x29900…29938 Head {h00=0x0034, h01=0x0050, text=»* THIS MODULE PERFORMS SOME TESTS ON A RECIEIVED«, t00=0x01a9, t01=0x015c}
0x29938…2995c (426, 0, 400) Head {h00=0x0020, h01=0x0050, text=»* DATA-, RR- OR RNR PACKET. «, t00=0x01aa, t01=0x0004}
0x2995c…29966 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01aa, t01=0x0028}
0x29966…2999a Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01aa, t01=0x0032}
0x2999a…299a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01aa, t01=0x0066}
0x299a4…299c0 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01aa, t01=0x0070}
0x299c0…299e0 Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x01aa, t01=0x008c}
0x299e0…29a00 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x01aa, t01=0x00ac}
0x29a00…29a2c Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01aa, t01=0x00cc}
0x29a2c…29a36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01aa, t01=0x00f8}
0x29a36…29a52 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01aa, t01=0x0102}
0x29a52…29a6c Head {h00=0x0016, h01=0x0050, text=»* CF A14,TDARR«, t00=0x01aa, t01=0x011e}
0x29a6c…29a76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01aa, t01=0x0138}
0x29a76…29a92 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01aa, t01=0x0142}
0x29a92…29ab4 Head {h00=0x001e, h01=0x0050, text=»* A1 = 0 NO ERRORS FOUND «, t00=0x01aa, t01=0x015e}
0x29ab4…29ad6 Head {h00=0x001e, h01=0x0050, text=»* 1 P(R) ERROR FOUND«, t00=0x01aa, t01=0x0180}
0x29ad6…29b1c Head {h00=0x0042, h01=0x0050, text=»* WHEN A PROCEDURE ERROR IS DETECTED, THE VC WILL BE CLEARED «, t00=0x01ab, t01=0x0012}
0x29b1c…29b58 Head {h00=0x0038, h01=0x0050, text=»* OR RESET AND THE MODULE RETURNS TO THE SCHEDULER.«, t00=0x01ab, t01=0x0058}
0x29b58…29b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ab, t01=0x0094}
0x29b62…29b76 Head {h00=0x0010, h01=0x0050, text=»TDARR EQU * «, t00=0x01ab, t01=0x009e}
0x29b76…29bac Head {h00=0x0032, h01=0x0050, text=» LDK A1,DATA.ST IS LC-STATUS = DATA TRANSFER ?«, t00=0x01ab, t01=0x00b2}
0x29bac…29bc8 Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x01ab, t01=0x00e8}
0x29bc8…29be0 Head {h00=0x0014, h01=0x0050, text=» RF(E) TDA10 YES«, t00=0x01ab, t01=0x0104}
0x29be0…29bea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ab, t01=0x011c}
0x29bea…29c32 Head {h00=0x0044, h01=0x0050, text=»* LC-STATUS IS NOT DATA TRANSFER, IF CLEAR: IGNORE PACKET, ELSE «, t00=0x01ab, t01=0x0126}
0x29c32…29c4c Head {h00=0x0016, h01=0x0050, text=»* PROCEDURE ERROR «, t00=0x01ab, t01=0x016e}
0x29c4c…29c56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ab, t01=0x0188}
0x29c56…29c84 (428, 0, 400) Head {h00=0x002a, h01=0x0050, text=» LDK A1,CLEA.ST IS LC-STATUS = CLEAR ?«, t00=0x01ac, t01=0x0004}
0x29c84…29ca0 Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSTAT,A13 . «, t00=0x01ac, t01=0x0032}
0x29ca0…29cba Head {h00=0x0016, h01=0x0050, text=» RF(NE) TDA00 YES «, t00=0x01ac, t01=0x004e}
0x29cba…29cde Head {h00=0x0020, h01=0x0050, text=» CF A14,RLBUF IGNORE PACKET «, t00=0x01ac, t01=0x0068}
0x29cde…29d0c Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x01ac, t01=0x008c}
0x29d0c…29d16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ac, t01=0x00ba}
0x29d16…29d24 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01ac, t01=0x00c4}
0x29d24…29d2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ac, t01=0x00d2}
0x29d2e…29d5a Head {h00=0x0028, h01=0x0050, text=»* ILLEGAL STATE, SO PROCEDURE ERROR «, t00=0x01ac, t01=0x00dc}
0x29d5a…29d64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ac, t01=0x0108}
0x29d64…29d78 Head {h00=0x0010, h01=0x0050, text=»TDA00 EQU * «, t00=0x01ac, t01=0x0112}
0x29d78…29da2 Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x01ac, t01=0x0126}
0x29da2…29dd6 Head {h00=0x0030, h01=0x0050, text=» LDK A1,LOCPER DIAG. CODE = PROCEDURE ERROR «, t00=0x01ac, t01=0x0150}
0x29dd6…29e08 Head {h00=0x002e, h01=0x0050, text=» ABL CLVC CLEAR VC AND RETURN TO SCHEDULER«, t00=0x01ac, t01=0x0184}
0x29e08…29e12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ad, t01=0x0026}
0x29e12…29e56 Head {h00=0x0040, h01=0x0050, text=»* STATE = DATA TRANSFER, IF SUB-STATE = RESET: IGNORE PACKET«, t00=0x01ad, t01=0x0030}
0x29e56…29e60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ad, t01=0x0074}
0x29e60…29e74 Head {h00=0x0010, h01=0x0050, text=»TDA10 EQU * «, t00=0x01ad, t01=0x007e}
0x29e74…29ea0 Head {h00=0x0028, h01=0x0050, text=» LDK A1,RSET.ST IS LC-STATUS = RESET«, t00=0x01ad, t01=0x0092}
0x29ea0…29ebc Head {h00=0x0018, h01=0x0050, text=» CC A1,LCSBST,A13 . «, t00=0x01ad, t01=0x00be}
0x29ebc…29ed4 Head {h00=0x0014, h01=0x0050, text=» RF(NE) TDA20 NO«, t00=0x01ad, t01=0x00da}
0x29ed4…29efe Head {h00=0x0026, h01=0x0050, text=» CF A14,RLBUF BUFFER BACK TO POOL «, t00=0x01ad, t01=0x00f2}
0x29efe…29f2c Head {h00=0x002a, h01=0x0050, text=» ABL EXITDC CONTROL BACK TO SCHEDULER «, t00=0x01ad, t01=0x011c}
0x29f2c…29f36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ad, t01=0x014a}
0x29f36…29f76 Head {h00=0x003c, h01=0x0050, text=»* TEST IF RECEIVED P(R) IS IN WINDOW: SLWE <= P(R) <= PS«, t00=0x01ad, t01=0x0154}
0x29f76…29f9c (430, 0, 400) Head {h00=0x0022, h01=0x0050, text=»* OR P(R) - SLWE <= PS - SLWE «, t00=0x01ae, t01=0x0004}
0x29f9c…29fa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ae, t01=0x002a}
0x29fa6…29fba Head {h00=0x0010, h01=0x0050, text=»TDA20 EQU * «, t00=0x01ae, t01=0x0034}
0x29fba…29fe4 Head {h00=0x0026, h01=0x0050, text=» LC A1,IDENT,A2 GET RECEIVED P(R) «, t00=0x01ae, t01=0x0048}
0x29fe4…29ff8 Head {h00=0x0010, h01=0x0050, text=» SRL A1,5 . «, t00=0x01ae, t01=0x0072}
0x29ff8…2a00e Head {h00=0x0012, h01=0x0050, text=» ANK A1,/07 . «, t00=0x01ae, t01=0x0086}
0x2a00e…2a03a Head {h00=0x0028, h01=0x0050, text=» LC A4,SLWE,A13 SEND LWE = OLD P(R) «, t00=0x01ae, t01=0x009c}
0x2a03a…2a050 Head {h00=0x0012, h01=0x0050, text=» ANK A4,/FF . «, t00=0x01ae, t01=0x00c8}
0x2a050…2a072 Head {h00=0x001e, h01=0x0050, text=» SUR A1,A4 GET P(R) - SLWE«, t00=0x01ae, t01=0x00de}
0x2a072…2a08e Head {h00=0x0018, h01=0x0050, text=» ANK A1,/07 MODULO 8«, t00=0x01ae, t01=0x0100}
0x2a08e…2a0aa Head {h00=0x0018, h01=0x0050, text=» STR A1,A14 SAVE IT «, t00=0x01ae, t01=0x011c}
0x2a0aa…2a0ce Head {h00=0x0020, h01=0x0050, text=» LC A1,PS,A13 GET PS - SLWE «, t00=0x01ae, t01=0x0138}
0x2a0ce…2a0e2 Head {h00=0x0010, h01=0x0050, text=» SUR A1,A4 .«, t00=0x01ae, t01=0x015c}
0x2a0e2…2a0fe Head {h00=0x0018, h01=0x0050, text=» ANK A1,/07 MODULO 8«, t00=0x01ae, t01=0x0170}
0x2a0fe…2a116 Head {h00=0x0014, h01=0x0050, text=» CWR* A1,A14 >= «, t00=0x01ae, t01=0x018c}
0x2a116…2a130 Head {h00=0x0016, h01=0x0050, text=» RF(NL) TDA30 YES «, t00=0x01af, t01=0x0014}
0x2a130…2a13e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01af, t01=0x002e}
0x2a13e…2a148 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x003c}
0x2a148…2a17a Head {h00=0x002e, h01=0x0050, text=»* P(R) IS NOT IN WINDOW, RETURN CODE := 1 «, t00=0x01af, t01=0x0046}
0x2a17a…2a184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x0078}
0x2a184…2a1a6 Head {h00=0x001e, h01=0x0050, text=» LDK A1,1 SET RETURN CODE «, t00=0x01af, t01=0x0082}
0x2a1a6…2a1b8 Head {h00=0x000e, h01=0x0050, text=» RF TDA40 «, t00=0x01af, t01=0x00a4}
0x2a1b8…2a1c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x00b6}
0x2a1c2…2a1da Head {h00=0x0014, h01=0x0050, text=»* PACKET CORRECT«, t00=0x01af, t01=0x00c0}
0x2a1da…2a1e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x00d8}
0x2a1e4…2a1f8 Head {h00=0x0010, h01=0x0050, text=»TDA30 EQU * «, t00=0x01af, t01=0x00e2}
0x2a1f8…2a21a Head {h00=0x001e, h01=0x0050, text=» LDK A1,0 SET RETURN CODE «, t00=0x01af, t01=0x00f6}
0x2a21a…2a22e Head {h00=0x0010, h01=0x0050, text=»TDA40 EQU * «, t00=0x01af, t01=0x0118}
0x2a22e…2a23e Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01af, t01=0x012c}
0x2a23e…2a24c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01af, t01=0x013c}
0x2a24c…2a256 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x014a}
0x2a256…2a260 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01af, t01=0x0154}
0x2a260…2a29a Head {h00=0x0036, h01=0x0050, text=»* CALCULATE QUEUE ANCHOR ADDRESS AND QUEUE ELEMENT«, t00=0x01af, t01=0x015e}
0x2a29a…2a2a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b0, t01=0x0008}
0x2a2a4…2a2d8 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01b0, t01=0x0012}
0x2a2d8…2a2e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b0, t01=0x0046}
0x2a2e2…2a2fe Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01b0, t01=0x0050}
0x2a2fe…2a31e Head {h00=0x001c, h01=0x0050, text=»* A2 = ELEMENT ADDRESS«, t00=0x01b0, t01=0x006c}
0x2a31e…2a33e Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x01b0, t01=0x008c}
0x2a33e…2a36a Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01b0, t01=0x00ac}
0x2a36a…2a374 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b0, t01=0x00d8}
0x2a374…2a390 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01b0, t01=0x00e2}
0x2a390…2a3ae Head {h00=0x001a, h01=0x0050, text=»* CF A14,QUEI/QUEO«, t00=0x01b0, t01=0x00fe}
0x2a3ae…2a3b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b0, t01=0x011c}
0x2a3b8…2a3d4 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01b0, t01=0x0126}
0x2a3d4…2a3e4 Head {h00=0x000c, h01=0x0050, text=»* NONE «, t00=0x01b0, t01=0x0142}
0x2a3e4…2a3fc Head {h00=0x0014, h01=0x0050, text=»* A1 IS CHANGED«, t00=0x01b0, t01=0x0152}
0x2a3fc…2a406 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b0, t01=0x016a}
0x2a406…2a418 Head {h00=0x000e, h01=0x0050, text=»QUEI EQU *«, t00=0x01b0, t01=0x0174}
0x2a418…2a42e Head {h00=0x0012, h01=0x0050, text=» LDK A1,QUEINP«, t00=0x01b0, t01=0x0186}
0x2a42e…2a440 Head {h00=0x000e, h01=0x0050, text=» RF QUEO00«, t00=0x01b1, t01=0x000c}
0x2a440…2a44a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b1, t01=0x001e}
0x2a44a…2a45c Head {h00=0x000e, h01=0x0050, text=»QUEO EQU *«, t00=0x01b1, t01=0x0028}
0x2a45c…2a472 Head {h00=0x0012, h01=0x0050, text=» LDK A1,QUEOUT«, t00=0x01b1, t01=0x003a}
0x2a472…2a486 Head {h00=0x0010, h01=0x0050, text=»QUEO00 EQU *«, t00=0x01b1, t01=0x0050}
0x2a486…2a4b2 Head {h00=0x0028, h01=0x0050, text=» ADR A1,A13 GET QUEUE ANCHOR ADDRESS«, t00=0x01b1, t01=0x0064}
0x2a4b2…2a4d6 Head {h00=0x0020, h01=0x0050, text=» CF A14,QUEUE QUEUE ELEMENT «, t00=0x01b1, t01=0x0090}
0x2a4d6…2a4e6 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01b1, t01=0x00b4}
0x2a4e6…2a4f4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01b1, t01=0x00c4}
0x2a4f4…2a4fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b1, t01=0x00d2}
0x2a4fe…2a508 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b1, t01=0x00dc}
0x2a508…2a526 Head {h00=0x001a, h01=0x0050, text=»* QUEUE ROUTINE (FIFO)«, t00=0x01b1, t01=0x00e6}
0x2a526…2a530 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b1, t01=0x0104}
0x2a530…2a564 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01b1, t01=0x010e}
0x2a564…2a56e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b1, t01=0x0142}
0x2a56e…2a58a Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01b1, t01=0x014c}
0x2a58a…2a5b0 Head {h00=0x0022, h01=0x0050, text=»* A1 = ADDRESS QUEUE ANCHOR «, t00=0x01b1, t01=0x0168}
0x2a5b0…2a5d0 Head {h00=0x001c, h01=0x0050, text=»* A2 = ELEMENT ADDRESS«, t00=0x01b1, t01=0x018e}
0x2a5d0…2a5fc Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01b2, t01=0x001e}
0x2a5fc…2a606 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b2, t01=0x004a}
0x2a606…2a622 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01b2, t01=0x0054}
0x2a622…2a63c Head {h00=0x0016, h01=0x0050, text=»* CF A14,QUEUE«, t00=0x01b2, t01=0x0070}
0x2a63c…2a646 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b2, t01=0x008a}
0x2a646…2a662 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01b2, t01=0x0094}
0x2a662…2a686 Head {h00=0x0020, h01=0x0050, text=»* NO REGISTERS ARE CHANGED «, t00=0x01b2, t01=0x00b0}
0x2a686…2a690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b2, t01=0x00d4}
0x2a690…2a6a4 Head {h00=0x0010, h01=0x0050, text=»QUEUE EQU * «, t00=0x01b2, t01=0x00de}
0x2a6a4…2a6ba Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x01b2, t01=0x00f2}
0x2a6ba…2a6e4 Head {h00=0x0026, h01=0x0050, text=» ST A1,QUESAV SAVE REGISTERS A1-A3«, t00=0x01b2, t01=0x0108}
0x2a6e4…2a6fc Head {h00=0x0014, h01=0x0050, text=» ST A2,QUESAV-2 «, t00=0x01b2, t01=0x0132}
0x2a6fc…2a714 Head {h00=0x0014, h01=0x0050, text=» ST A3,QUESAV-4 «, t00=0x01b2, t01=0x014a}
0x2a714…2a720 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01b2, t01=0x0162}
0x2a720…2a736 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x01b2, t01=0x016e}
0x2a736…2a760 Head {h00=0x0026, h01=0x0050, text=» MS 3,QUESAV-4 SAVE REGISTERSA1-A3«, t00=0x01b2, t01=0x0184}
0x2a760…2a76c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01b3, t01=0x001e}
0x2a76c…2a780 Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A1 «, t00=0x01b3, t01=0x002a}
0x2a780…2a7a4 Head {h00=0x0020, h01=0x0050, text=» ANKL A3,/FFFE QUEUE FILLED?«, t00=0x01b3, t01=0x003e}
0x2a7a4…2a7bc Head {h00=0x0014, h01=0x0050, text=» RF(Z) QUE10 NO «, t00=0x01b3, t01=0x0062}
0x2a7bc…2a7c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b3, t01=0x007a}
0x2a7c6…2a7d4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01b3, t01=0x0084}
0x2a7d4…2a7de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b3, t01=0x0092}
0x2a7de…2a7f2 Head {h00=0x0010, h01=0x0050, text=»QUE05 EQU * «, t00=0x01b3, t01=0x009c}
0x2a7f2…2a816 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A3 GET NEXT ELEMENT «, t00=0x01b3, t01=0x00b0}
0x2a816…2a83c Head {h00=0x0022, h01=0x0050, text=» LD A3,BFCHPT,A1 CHAIN FILLED?«, t00=0x01b3, t01=0x00d4}
0x2a83c…2a856 Head {h00=0x0016, h01=0x0050, text=» RB(NZ) QUE05 YES «, t00=0x01b3, t01=0x00fa}
0x2a856…2a880 Head {h00=0x0026, h01=0x0050, text=» ST A2,BFCHPT,A1 STORE NEW ELEMENT«, t00=0x01b3, t01=0x0114}
0x2a880…2a892 Head {h00=0x000e, h01=0x0050, text=» RF QUE15 «, t00=0x01b3, t01=0x013e}
0x2a892…2a8a6 Head {h00=0x0010, h01=0x0050, text=»QUE10 EQU * «, t00=0x01b3, t01=0x0150}
0x2a8a6…2a8d2 Head {h00=0x0028, h01=0x0050, text=» ORRS A2,A1 STORE ELEMENT IN ANCHOR «, t00=0x01b3, t01=0x0164}
0x2a8d2…2a8e6 Head {h00=0x0010, h01=0x0050, text=»QUE15 EQU * «, t00=0x01b3, t01=0x0190}
0x2a8e6…2a914 Head {h00=0x002a, h01=0x0050, text=» CM BFCHPT,A2 SET ZERO IN CHAINPOINTER«, t00=0x01b4, t01=0x0014}
0x2a914…2a92a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x01b4, t01=0x0042}
0x2a92a…2a958 Head {h00=0x002a, h01=0x0050, text=» LD A1,QUESAV RESTORE REGISTERS A1-A3 «, t00=0x01b4, t01=0x0058}
0x2a958…2a970 Head {h00=0x0014, h01=0x0050, text=» LD A2,QUESAV-2 «, t00=0x01b4, t01=0x0086}
0x2a970…2a988 Head {h00=0x0014, h01=0x0050, text=» LD A3,QUESAV-4 «, t00=0x01b4, t01=0x009e}
0x2a988…2a994 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01b4, t01=0x00b6}
0x2a994…2a9aa Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x01b4, t01=0x00c2}
0x2a9aa…2a9d8 Head {h00=0x002a, h01=0x0050, text=» ML 3,QUESAV-4 RESTORE REGISTERS A1-A3«, t00=0x01b4, t01=0x00d8}
0x2a9d8…2a9e4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01b4, t01=0x0106}
0x2a9e4…2a9f4 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01b4, t01=0x0112}
0x2a9f4…2aa02 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01b4, t01=0x0122}
0x2aa02…2aa0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b4, t01=0x0130}
0x2aa0c…2aa16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b4, t01=0x013a}
0x2aa16…2aa34 Head {h00=0x001a, h01=0x0050, text=»* QUEUE ROUTINE (LIFO)«, t00=0x01b4, t01=0x0144}
0x2aa34…2aa3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b4, t01=0x0162}
0x2aa3e…2aa72 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01b4, t01=0x016c}
0x2aa72…2aa7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b5, t01=0x0010}
0x2aa7c…2aa98 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01b5, t01=0x001a}
0x2aa98…2aabe Head {h00=0x0022, h01=0x0050, text=»* A1 = ADDRESS QUEUE ANCHOR «, t00=0x01b5, t01=0x0036}
0x2aabe…2aade Head {h00=0x001c, h01=0x0050, text=»* A2 = ELEMENT ADDRESS«, t00=0x01b5, t01=0x005c}
0x2aade…2ab0a Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01b5, t01=0x007c}
0x2ab0a…2ab14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b5, t01=0x00a8}
0x2ab14…2ab30 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01b5, t01=0x00b2}
0x2ab30…2ab4c Head {h00=0x0018, h01=0x0050, text=»* CF A14,QUEUEF «, t00=0x01b5, t01=0x00ce}
0x2ab4c…2ab56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b5, t01=0x00ea}
0x2ab56…2ab72 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01b5, t01=0x00f4}
0x2ab72…2ab96 Head {h00=0x0020, h01=0x0050, text=»* NO REGISTERS ARE CHANGED «, t00=0x01b5, t01=0x0110}
0x2ab96…2aba0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b5, t01=0x0134}
0x2aba0…2abb4 Head {h00=0x0010, h01=0x0050, text=»QUEUEF EQU *«, t00=0x01b5, t01=0x013e}
0x2abb4…2abde Head {h00=0x0026, h01=0x0050, text=» ST A3,QUESAV SAVE REGISTERS A3,A4«, t00=0x01b5, t01=0x0152}
0x2abde…2abf6 Head {h00=0x0014, h01=0x0050, text=» ST A4,QUESAV-2 «, t00=0x01b5, t01=0x017c}
0x2abf6…2ac1a (438, 0, 400) Head {h00=0x0020, h01=0x0050, text=» CM BFCHPT,A2 «, t00=0x01b6, t01=0x0004}
0x2ac1a…2ac4c Head {h00=0x002e, h01=0x0050, text=» LDR* A4,A1 GET ADDRESS FROM QUEUE ANCHOR «, t00=0x01b6, t01=0x0028}
0x2ac4c…2ac6c Head {h00=0x001c, h01=0x0050, text=» ANK A4,/01 SAVE BIT 15 «, t00=0x01b6, t01=0x005a}
0x2ac6c…2ac82 Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/FFFE«, t00=0x01b6, t01=0x007a}
0x2ac82…2acac Head {h00=0x0026, h01=0x0050, text=» ANRS A3,A1 CLEAR BIT 15 OF ANCHOR«, t00=0x01b6, t01=0x0090}
0x2acac…2acda Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A1 ADDRESS FROM QUEUE ANCHOR «, t00=0x01b6, t01=0x00ba}
0x2acda…2acf0 Head {h00=0x0012, h01=0x0050, text=» RF(Z) QUEF10 «, t00=0x01b6, t01=0x00e8}
0x2acf0…2ad2a Head {h00=0x0036, h01=0x0050, text=» ST A3,BFCHPT,A2 STORE OLD POINTER IN NEW ELEMENT «, t00=0x01b6, t01=0x00fe}
0x2ad2a…2ad3e Head {h00=0x0010, h01=0x0050, text=»QUEF10 EQU *«, t00=0x01b6, t01=0x0138}
0x2ad3e…2ad6c Head {h00=0x002a, h01=0x0050, text=» STR A2,A1 STORE NEW ELEMENT IN ANCHOR«, t00=0x01b6, t01=0x014c}
0x2ad6c…2ad9a Head {h00=0x002a, h01=0x0050, text=» ORRS A4,A1 STORE OLD BIT 15 IN ANCHOR«, t00=0x01b6, t01=0x017a}
0x2ad9a…2adc8 Head {h00=0x002a, h01=0x0050, text=» LD A3,QUESAV RESTORE REGISTERS A3,A4 «, t00=0x01b7, t01=0x0018}
0x2adc8…2ade0 Head {h00=0x0014, h01=0x0050, text=» LD A4,QUESAV-2 «, t00=0x01b7, t01=0x0046}
0x2ade0…2adf0 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01b7, t01=0x005e}
0x2adf0…2adfe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01b7, t01=0x006e}
0x2adfe…2ae08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b7, t01=0x007c}
0x2ae08…2ae12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b7, t01=0x0086}
0x2ae12…2ae2c Head {h00=0x0016, h01=0x0050, text=»* DEQUEUE ROUTINE «, t00=0x01b7, t01=0x0090}
0x2ae2c…2ae36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b7, t01=0x00aa}
0x2ae36…2ae6a Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01b7, t01=0x00b4}
0x2ae6a…2ae74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b7, t01=0x00e8}
0x2ae74…2ae90 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01b7, t01=0x00f2}
0x2ae90…2aeb6 Head {h00=0x0022, h01=0x0050, text=»* A1 = ADDRESS QUEUE ANCHOR «, t00=0x01b7, t01=0x010e}
0x2aeb6…2aee2 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01b7, t01=0x0134}
0x2aee2…2aeec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b7, t01=0x0160}
0x2aeec…2af08 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01b7, t01=0x016a}
0x2af08…2af22 Head {h00=0x0016, h01=0x0050, text=»* CF A14,DEQUE«, t00=0x01b7, t01=0x0186}
0x2af22…2af2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b8, t01=0x0010}
0x2af2c…2af48 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01b8, t01=0x001a}
0x2af48…2af68 Head {h00=0x001c, h01=0x0050, text=»* A2 = ELEMENT ADDRESS «, t00=0x01b8, t01=0x0036}
0x2af68…2af8c Head {h00=0x0020, h01=0x0050, text=»* NO REGISTERS ARE CHANGED «, t00=0x01b8, t01=0x0056}
0x2af8c…2af96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b8, t01=0x007a}
0x2af96…2afaa Head {h00=0x0010, h01=0x0050, text=»DEQUE EQU * «, t00=0x01b8, t01=0x0084}
0x2afaa…2afd0 Head {h00=0x0022, h01=0x0050, text=» ST A3,QUESAV SAVE REGISTER A3«, t00=0x01b8, t01=0x0098}
0x2afd0…2affc Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A1 GET ELEMENT FROM ANCHOR «, t00=0x01b8, t01=0x00be}
0x2affc…2b02e Head {h00=0x002e, h01=0x0050, text=» LD A3,BFCHPT,A2 GET ADDRESS NEXT ELEMENT «, t00=0x01b8, t01=0x00ea}
0x2b02e…2b050 Head {h00=0x001e, h01=0x0050, text=» STR A3,A1 STORE IN ANCHOR«, t00=0x01b8, t01=0x011c}
0x2b050…2b07a Head {h00=0x0026, h01=0x0050, text=» CM BFCHPT,A2 ZERO IN CHAINPOINTER«, t00=0x01b8, t01=0x013e}
0x2b07a…2b08c Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x01b8, t01=0x0168}
0x2b08c…2b0a0 Head {h00=0x0010, h01=0x0050, text=» ANK A3,1 . «, t00=0x01b8, t01=0x017a}
0x2b0a0…2b0d0 Head {h00=0x002c, h01=0x0050, text=» XRR A2,A3 RESET BIT 15 IN ELEMENT ADDR.«, t00=0x01b8, t01=0x018e}
0x2b0d0…2b0fa Head {h00=0x0026, h01=0x0050, text=» LD A3,QUESAV RESTORE REGISTER A3 «, t00=0x01b9, t01=0x002e}
0x2b0fa…2b10a Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01b9, t01=0x0058}
0x2b10a…2b118 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01b9, t01=0x0068}
0x2b118…2b122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b9, t01=0x0076}
0x2b122…2b12c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b9, t01=0x0080}
0x2b12c…2b14a Head {h00=0x001a, h01=0x0050, text=»* START TIMER ROUTINE «, t00=0x01b9, t01=0x008a}
0x2b14a…2b154 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b9, t01=0x00a8}
0x2b154…2b188 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01b9, t01=0x00b2}
0x2b188…2b192 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01b9, t01=0x00e6}
0x2b192…2b1ae Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01b9, t01=0x00f0}
0x2b1ae…2b1d2 Head {h00=0x0020, h01=0x0050, text=»* A4 = ACTIVATION ADDRESS «, t00=0x01b9, t01=0x010c}
0x2b1d2…2b1f2 Head {h00=0x001c, h01=0x0050, text=»* A8 = TIME-OUT VALUE «, t00=0x01b9, t01=0x0130}
0x2b1f2…2b210 Head {h00=0x001a, h01=0x0050, text=»* A12 = 1TH PARAMETER«, t00=0x01b9, t01=0x0150}
0x2b210…2b22e Head {h00=0x001a, h01=0x0050, text=»* A13 = 2ND PARAMETER«, t00=0x01b9, t01=0x016e}
0x2b22e…2b25a Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01b9, t01=0x018c}
0x2b25a…2b264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ba, t01=0x0028}
0x2b264…2b280 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01ba, t01=0x0032}
0x2b280…2b29c Head {h00=0x0018, h01=0x0050, text=»* CF A14,STRTIM «, t00=0x01ba, t01=0x004e}
0x2b29c…2b2a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ba, t01=0x006a}
0x2b2a6…2b2c2 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01ba, t01=0x0074}
0x2b2c2…2b2e0 Head {h00=0x001a, h01=0x0050, text=»* A4 = ADDRESS TIMER «, t00=0x01ba, t01=0x0090}
0x2b2e0…2b30a Head {h00=0x0026, h01=0x0050, text=»* NO OTHER REGISTERS ARE CHANGED «, t00=0x01ba, t01=0x00ae}
0x2b30a…2b314 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ba, t01=0x00d8}
0x2b314…2b328 Head {h00=0x0010, h01=0x0050, text=»STRTIM EQU *«, t00=0x01ba, t01=0x00e2}
0x2b328…2b33e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x01ba, t01=0x00f6}
0x2b33e…2b362 Head {h00=0x0020, h01=0x0050, text=» ST A1,TIMSAV SAVE REGISTERS«, t00=0x01ba, t01=0x010c}
0x2b362…2b37a Head {h00=0x0014, h01=0x0050, text=» ST A2,TIMSAV-2 «, t00=0x01ba, t01=0x0130}
0x2b37a…2b392 Head {h00=0x0014, h01=0x0050, text=» ST A3,TIMSAV-4 «, t00=0x01ba, t01=0x0148}
0x2b392…2b39e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01ba, t01=0x0160}
0x2b39e…2b3b4 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x01ba, t01=0x016c}
0x2b3b4…2b3da Head {h00=0x0022, h01=0x0050, text=» MS 3,TIMSAV-4 SAVE REGISTERS «, t00=0x01ba, t01=0x0182}
0x2b3da…2b3e6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01bb, t01=0x0018}
0x2b3e6…2b406 Head {h00=0x001c, h01=0x0050, text=» ST A8,STRPAR+2 SET TIME«, t00=0x01bb, t01=0x0024}
0x2b406…2b428 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A13 LC-ADM ADDRESS«, t00=0x01bb, t01=0x0044}
0x2b428…2b44c Head {h00=0x0020, h01=0x0050, text=» LDR A2,A4 DISPATCH ADDRESS «, t00=0x01bb, t01=0x0066}
0x2b44c…2b46e Head {h00=0x001e, h01=0x0050, text=» LDR A3,A12 1TH PARAMETER «, t00=0x01bb, t01=0x008a}
0x2b46e…2b478 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bb, t01=0x00ac}
0x2b478…2b486 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01bb, t01=0x00b6}
0x2b486…2b490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bb, t01=0x00c4}
0x2b490…2b4a2 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x01bb, t01=0x00ce}
0x2b4a2…2b4ca Head {h00=0x0024, h01=0x0050, text=» CF A15,GETBLK GET MONITOR BLOCK«, t00=0x01bb, t01=0x00e0}
0x2b4ca…2b4ea Head {h00=0x001c, h01=0x0050, text=» LDR A1,A4 ADDRESS BLOCK«, t00=0x01bb, t01=0x0108}
0x2b4ea…2b50a Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIME SET TIMER«, t00=0x01bb, t01=0x0128}
0x2b50a…2b540 Head {h00=0x0032, h01=0x0050, text=»STRPAR DATA TIMACT TIMER ENTRY AFTER TIME OUT «, t00=0x01bb, t01=0x0148}
0x2b540…2b566 Head {h00=0x0022, h01=0x0050, text=» DATA 0 TIMER VALUE IN 0,1 SEC«, t00=0x01bb, t01=0x017e}
0x2b566…2b572 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x01bc, t01=0x0014}
0x2b572…2b588 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x01bc, t01=0x0020}
0x2b588…2b5b0 Head {h00=0x0024, h01=0x0050, text=» LD A1,TIMSAV RESTORE REGISTERS «, t00=0x01bc, t01=0x0036}
0x2b5b0…2b5c8 Head {h00=0x0014, h01=0x0050, text=» LD A2,TIMSAV-2 «, t00=0x01bc, t01=0x005e}
0x2b5c8…2b5e0 Head {h00=0x0014, h01=0x0050, text=» LD A3,TIMSAV-4 «, t00=0x01bc, t01=0x0076}
0x2b5e0…2b5ec Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01bc, t01=0x008e}
0x2b5ec…2b602 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x01bc, t01=0x009a}
0x2b602…2b62a Head {h00=0x0024, h01=0x0050, text=» ML 3,TIMSAV-4 RESTORE REGISTERS«, t00=0x01bc, t01=0x00b0}
0x2b62a…2b636 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01bc, t01=0x00d8}
0x2b636…2b646 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01bc, t01=0x00e4}
0x2b646…2b650 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bc, t01=0x00f4}
0x2b650…2b676 Head {h00=0x0022, h01=0x0050, text=»* RETURN AFTER TIME OUT«, t00=0x01bc, t01=0x00fe}
0x2b676…2b680 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bc, t01=0x0124}
0x2b680…2b694 Head {h00=0x0010, h01=0x0050, text=»TIMACT EQU *«, t00=0x01bc, t01=0x012e}
0x2b694…2b6b8 Head {h00=0x0020, h01=0x0050, text=» LDKL A5,TTBX25 TTAB-ADDRESS«, t00=0x01bc, t01=0x0142}
0x2b6b8…2b6e0 Head {h00=0x0024, h01=0x0050, text=» LD A2,2,A1 GET DISPATCH ADDRESS«, t00=0x01bc, t01=0x0166}
0x2b6e0…2b6f2 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x01bc, t01=0x018e}
0x2b6f2…2b716 Head {h00=0x0020, h01=0x0050, text=» CF A15,ACTOT ACTIVATE TASK «, t00=0x01bd, t01=0x0010}
0x2b716…2b728 Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x01bd, t01=0x0034}
0x2b728…2b736 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01bd, t01=0x0046}
0x2b736…2b740 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bd, t01=0x0054}
0x2b740…2b74a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bd, t01=0x005e}
0x2b74a…2b768 Head {h00=0x001a, h01=0x0050, text=»* CANCEL TIMER ROUTINE«, t00=0x01bd, t01=0x0068}
0x2b768…2b772 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bd, t01=0x0086}
0x2b772…2b7a6 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01bd, t01=0x0090}
0x2b7a6…2b7b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bd, t01=0x00c4}
0x2b7b0…2b7cc Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01bd, t01=0x00ce}
0x2b7cc…2b7ea Head {h00=0x001a, h01=0x0050, text=»* A1 = ADDRESS TIMER«, t00=0x01bd, t01=0x00ea}
0x2b7ea…2b816 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01bd, t01=0x0108}
0x2b816…2b820 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bd, t01=0x0134}
0x2b820…2b83c Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01bd, t01=0x013e}
0x2b83c…2b858 Head {h00=0x0018, h01=0x0050, text=»* CF A14,CANTIM «, t00=0x01bd, t01=0x015a}
0x2b858…2b862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bd, t01=0x0176}
0x2b862…2b87e Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01bd, t01=0x0180}
0x2b87e…2b89c Head {h00=0x001a, h01=0x0050, text=»* A1 = REMAINING TIME«, t00=0x01be, t01=0x000c}
0x2b89c…2b8c6 Head {h00=0x0026, h01=0x0050, text=»* NO OTHER REGISTERS ARE CHANGED «, t00=0x01be, t01=0x002a}
0x2b8c6…2b8d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01be, t01=0x0054}
0x2b8d0…2b8e4 Head {h00=0x0010, h01=0x0050, text=»CANTIM EQU *«, t00=0x01be, t01=0x005e}
0x2b8e4…2b908 Head {h00=0x0020, h01=0x0050, text=» ST A2,TIMSAV SAVE REGISTERS«, t00=0x01be, t01=0x0072}
0x2b908…2b920 Head {h00=0x0014, h01=0x0050, text=» ST A3,TIMSAV-2 «, t00=0x01be, t01=0x0096}
0x2b920…2b938 Head {h00=0x0014, h01=0x0050, text=» ST A4,TIMSAV-4 «, t00=0x01be, t01=0x00ae}
0x2b938…2b95e Head {h00=0x0022, h01=0x0050, text=» LDR A2,A1 ADDRESS TIMER VALUE«, t00=0x01be, t01=0x00c6}
0x2b95e…2b972 Head {h00=0x0010, h01=0x0050, text=» INH«, t00=0x01be, t01=0x00ec}
0x2b972…2b99a Head {h00=0x0024, h01=0x0050, text=» RF(Z) CANTEN NO TIMER SPECIFIED«, t00=0x01be, t01=0x0100}
0x2b99a…2b9be Head {h00=0x0020, h01=0x0050, text=» LDR* A1,A2 GET TIMER VALUE «, t00=0x01be, t01=0x0128}
0x2b9be…2b9de Head {h00=0x001c, h01=0x0050, text=» RF(Z) CANTEN TIMER = 0 «, t00=0x01be, t01=0x014c}
0x2b9de…2ba04 Head {h00=0x0022, h01=0x0050, text=» C1R A1,A1 GET REMAINING TIME «, t00=0x01be, t01=0x016c}
0x2ba04…2ba40 (447, 0, 398) Head {h00=0x0038, h01=0x0050, text=» CMR A2 SET TIMER VALUE 0«, t00=0x01bf, t01=0x0004}
0x2ba40…2ba68 Head {h00=0x0024, h01=0x0050, text=» LD A3,-2,A2 ADDRESS TIMOUTBLOCK«, t00=0x01bf, t01=0x0040}
0x2ba68…2ba94 Head {h00=0x0028, h01=0x0050, text=» LD A4,4,A3 ADDRESS ACTIVATIONBLOCK «, t00=0x01bf, t01=0x0068}
0x2ba94…2bab0 Head {h00=0x0018, h01=0x0050, text=» ST A1,4,A4 SAVE A1 «, t00=0x01bf, t01=0x0094}
0x2bab0…2bac2 Head {h00=0x000e, h01=0x0050, text=» INH . =1«, t00=0x01bf, t01=0x00b0}
0x2bac2…2baf0 Head {h00=0x002a, h01=0x0050, text=» CF A15,FREBLK RELEASE ACTIVATIONBLOCK«, t00=0x01bf, t01=0x00c2}
0x2baf0…2bafa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bf, t01=0x00f0}
0x2bafa…2bb08 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01bf, t01=0x00fa}
0x2bb08…2bb12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01bf, t01=0x0108}
0x2bb12…2bb26 Head {h00=0x0010, h01=0x0050, text=»CANTEN EQU *«, t00=0x01bf, t01=0x0112}
0x2bb26…2bb3a Head {h00=0x0010, h01=0x0050, text=» ENB«, t00=0x01bf, t01=0x0126}
0x2bb3a…2bb62 Head {h00=0x0024, h01=0x0050, text=» LD A2,TIMSAV RESTORE REGISTERS «, t00=0x01bf, t01=0x013a}
0x2bb62…2bb7a Head {h00=0x0014, h01=0x0050, text=» LD A3,TIMSAV-2 «, t00=0x01bf, t01=0x0162}
0x2bb7a…2bb92 Head {h00=0x0014, h01=0x0050, text=» LD A4,TIMSAV-4 «, t00=0x01bf, t01=0x017a}
0x2bb92…2bba2 (448, 0, 400) Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01c0, t01=0x0004}
0x2bba2…2bbac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x0014}
0x2bbac…2bbc4 Head {h00=0x0014, h01=0x0050, text=» RES 3 SAVE AREA«, t00=0x01c0, t01=0x001e}
0x2bbc4…2bbda Head {h00=0x0012, h01=0x0050, text=»TIMSAV EQU *-2«, t00=0x01c0, t01=0x0036}
0x2bbda…2bbf0 Head {h00=0x0012, h01=0x0050, text=»QUESAV EQU *-2«, t00=0x01c0, t01=0x004c}
0x2bbf0…2bc06 Head {h00=0x0012, h01=0x0050, text=» EJECT«, t00=0x01c0, t01=0x0062}
0x2bc06…2bc10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x0078}
0x2bc10…2bc1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x0082}
0x2bc1a…2bc52 Head {h00=0x0034, h01=0x0050, text=»* MODULE TO CONTROL THE PROCESSES IN THE DC-TASK«, t00=0x01c0, t01=0x008c}
0x2bc52…2bc5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x00c4}
0x2bc5c…2bc90 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01c0, t01=0x00ce}
0x2bc90…2bc9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x0102}
0x2bc9a…2bcb6 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01c0, t01=0x010c}
0x2bcb6…2bcc6 Head {h00=0x000c, h01=0x0050, text=»* NONE «, t00=0x01c0, t01=0x0128}
0x2bcc6…2bcd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x0138}
0x2bcd0…2bcec Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01c0, t01=0x0142}
0x2bcec…2bd04 Head {h00=0x0014, h01=0x0050, text=»* ABL EXITDC«, t00=0x01c0, t01=0x015e}
0x2bd04…2bd0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c0, t01=0x0176}
0x2bd0e…2bd2a Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01c0, t01=0x0180}
0x2bd2a…2bd56 Head {h00=0x0028, h01=0x0050, text=»* AT ENTRY OF AN ACTIVATED PROCESS:«, t00=0x01c1, t01=0x000c}
0x2bd56…2bd7c Head {h00=0x0022, h01=0x0050, text=»* A1 = QUEUE ANCHOR ADDRESS «, t00=0x01c1, t01=0x0038}
0x2bd7c…2bda0 Head {h00=0x0020, h01=0x0050, text=»* A12 = LINE BLOCK ADDRESS «, t00=0x01c1, t01=0x005e}
0x2bda0…2bdc0 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x01c1, t01=0x0082}
0x2bdc0…2bdec Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01c1, t01=0x00a2}
0x2bdec…2bdf6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c1, t01=0x00ce}
0x2bdf6…2be0a Head {h00=0x0010, h01=0x0050, text=»EXITDC EQU *«, t00=0x01c1, t01=0x00d8}
0x2be0a…2be34 Head {h00=0x0026, h01=0x0050, text=» LDK A5,NPRFLG NO PROCESSING MASK «, t00=0x01c1, t01=0x00ec}
0x2be34…2be48 Head {h00=0x0010, h01=0x0050, text=» C1R A6,A5 .«, t00=0x01c1, t01=0x0116}
0x2be48…2be52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c1, t01=0x012a}
0x2be52…2be7a Head {h00=0x0024, h01=0x0050, text=»* GET SAVED LAST SCAN PARAMETERS«, t00=0x01c1, t01=0x0134}
0x2be7a…2be84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c1, t01=0x015c}
0x2be84…2beb0 Head {h00=0x0028, h01=0x0050, text=» LD A4,SCHEDC LOGICAL CHANNEL INDEX «, t00=0x01c1, t01=0x0166}
0x2beb0…2bed0 (450, 0, 400) Head {h00=0x001c, h01=0x0050, text=» LD A7,SCHEDL LINE INDEX«, t00=0x01c2, t01=0x0004}
0x2bed0…2befa Head {h00=0x0026, h01=0x0050, text=» LDKL A14,DCSTAK SET STACK POINTER«, t00=0x01c2, t01=0x0024}
0x2befa…2bf20 Head {h00=0x0022, h01=0x0050, text=» LDKL A10,-2 SCAN LOOP-COUNTER«, t00=0x01c2, t01=0x004e}
0x2bf20…2bf2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c2, t01=0x0074}
0x2bf2a…2bf38 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01c2, t01=0x007e}
0x2bf38…2bf42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c2, t01=0x008c}
0x2bf42…2bf56 Head {h00=0x0010, h01=0x0050, text=»EXIT00 EQU *«, t00=0x01c2, t01=0x0096}
0x2bf56…2bf86 Head {h00=0x002c, h01=0x0050, text=» LDKL A12,LINTAB GET LINE BLOCK ADDRESS «, t00=0x01c2, t01=0x00aa}
0x2bf86…2bf9c Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x01c2, t01=0x00da}
0x2bf9c…2bfb2 Head {h00=0x0012, h01=0x0050, text=» ADR A12,A7 . «, t00=0x01c2, t01=0x00f0}
0x2bfb2…2bfc8 Head {h00=0x0012, h01=0x0050, text=» ADR A12,A7 . «, t00=0x01c2, t01=0x0106}
0x2bfc8…2bfd4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01c2, t01=0x011c}
0x2bfd4…2bfec Head {h00=0x0014, h01=0x0050, text=» LDR* A12,A12 . «, t00=0x01c2, t01=0x0128}
0x2bfec…2bff6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c2, t01=0x0140}
0x2bff6…2c016 Head {h00=0x001c, h01=0x0050, text=»* TEST IF LINE CONNECTED«, t00=0x01c2, t01=0x014a}
0x2c016…2c020 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c2, t01=0x016a}
0x2c020…2c048 Head {h00=0x0024, h01=0x0050, text=» LD A13,CMNFLG,A12«, t00=0x01c2, t01=0x0174}
0x2c048…2c082 Head {h00=0x0036, h01=0x0050, text=» RF(Z) EXIT04 NO! CONTINUE WITH NEXT LINE (IF ANY)«, t00=0x01c3, t01=0x000c}
0x2c082…2c08c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c3, t01=0x0046}
0x2c08c…2c0b8 Head {h00=0x0028, h01=0x0050, text=»* TEST IF ONLY STATISTIC FLAG IS SET«, t00=0x01c3, t01=0x0050}
0x2c0b8…2c0c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c3, t01=0x007c}
0x2c0c2…2c0da Head {h00=0x0014, h01=0x0050, text=» SUKL A13,STATFL«, t00=0x01c3, t01=0x0086}
0x2c0da…2c0f4 Head {h00=0x0016, h01=0x0050, text=» RF(Z) EXIT04 YES «, t00=0x01c3, t01=0x009e}
0x2c0f4…2c120 Head {h00=0x0028, h01=0x0050, text=» ADK A4,1 TAKE NEXT LOGICAL CHANNEL «, t00=0x01c3, t01=0x00b8}
0x2c120…2c14e Head {h00=0x002a, h01=0x0050, text=» CC A4,NRLC,A12 IS THERE A NEXT ONE ? «, t00=0x01c3, t01=0x00e4}
0x2c14e…2c168 Head {h00=0x0016, h01=0x0050, text=» RF(L) EXIT10 YES «, t00=0x01c3, t01=0x0112}
0x2c168…2c17c Head {h00=0x0010, h01=0x0050, text=»EXIT04 EQU *«, t00=0x01c3, t01=0x012c}
0x2c17c…2c1b2 Head {h00=0x0032, h01=0x0050, text=» LDKL A4,-1 PRESET FOR NEW LG.CH. OF NEXT LINE«, t00=0x01c3, t01=0x0140}
0x2c1b2…2c1c8 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x01c3, t01=0x0176}
0x2c1c8…2c1ec Head {h00=0x0020, h01=0x0050, text=» ADK A7,1 UPDATE LINE INDEX «, t00=0x01c3, t01=0x018c}
0x2c1ec…2c21a Head {h00=0x002a, h01=0x0050, text=» CWK A7,SYNRLN IS THERE A NEXT LINE ? «, t00=0x01c4, t01=0x0020}
0x2c21a…2c24c Head {h00=0x002e, h01=0x0050, text=» RF(L) EXIT30 YES«, t00=0x01c4, t01=0x004e}
0x2c24c…2c27a Head {h00=0x002a, h01=0x0050, text=» LDK A7,0 START AGAIN WITH FIRST LINE «, t00=0x01c4, t01=0x0080}
0x2c27a…2c286 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01c4, t01=0x00ae}
0x2c286…2c29a Head {h00=0x0010, h01=0x0050, text=» ADKL A10,1 «, t00=0x01c4, t01=0x00ba}
0x2c29a…2c2c0 Head {h00=0x0022, h01=0x0050, text=» RF(Z) EXIT32 END OF SCANNING «, t00=0x01c4, t01=0x00ce}
0x2c2c0…2c2f0 Head {h00=0x002c, h01=0x0050, text=» RF EXIT30 .«, t00=0x01c4, t01=0x00f4}
0x2c2f0…2c2fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c4, t01=0x0124}
0x2c2fa…2c308 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01c4, t01=0x012e}
0x2c308…2c312 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c4, t01=0x013c}
0x2c312…2c326 Head {h00=0x0010, h01=0x0050, text=»EXIT10 EQU *«, t00=0x01c4, t01=0x0146}
0x2c326…2c350 Head {h00=0x0026, h01=0x0050, text=» CF A14,GTLCAD GET LC-ADM ADDRESS «, t00=0x01c4, t01=0x015a}
0x2c350…2c382 Head {h00=0x002e, h01=0x0050, text=» LDKL A8,OUTPCK PRESET ACTIVATION ADDRESS «, t00=0x01c4, t01=0x0184}
0x2c382…2c3ae Head {h00=0x0028, h01=0x0050, text=» LDKL A9,1 PRESET PROCESS INDICATION«, t00=0x01c5, t01=0x0026}
0x2c3ae…2c3e4 Head {h00=0x0032, h01=0x0050, text=» LD A3,NRPNDT,A12 CHECK NR. OF OUTPUT REQUESTS«, t00=0x01c5, t01=0x0052}
0x2c3e4…2c3fc Head {h00=0x0014, h01=0x0050, text=» CWK A3,SYNRTR .«, t00=0x01c5, t01=0x0088}
0x2c3fc…2c428 Head {h00=0x0028, h01=0x0050, text=» RF(NL) EXIT20 MAXIMUM, SO NO OUTPUT«, t00=0x01c5, t01=0x00a0}
0x2c428…2c456 Head {h00=0x002a, h01=0x0050, text=» LDR A1,A12 CHECK RESTART OUTPUT QUEUE«, t00=0x01c5, t01=0x00cc}
0x2c456…2c46e Head {h00=0x0014, h01=0x0050, text=» ADK A1,RSTQUE .«, t00=0x01c5, t01=0x00fa}
0x2c46e…2c484 Head {h00=0x0012, h01=0x0050, text=» LDR* A2,A1 . «, t00=0x01c5, t01=0x0112}
0x2c484…2c4a4 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) EXIT35 NOT EMPTY«, t00=0x01c5, t01=0x0128}
0x2c4a4…2c4ca Head {h00=0x0022, h01=0x0050, text=» LDR A1,A13 CHECK OUTPUT QUEUE«, t00=0x01c5, t01=0x0148}
0x2c4ca…2c4e2 Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEOUT .«, t00=0x01c5, t01=0x016e}
0x2c4e2…2c4f8 Head {h00=0x0012, h01=0x0050, text=» LDR* A2,A1 . «, t00=0x01c5, t01=0x0186}
0x2c4f8…2c51c Head {h00=0x0020, h01=0x0050, text=» RF(Z) EXIT20 QUEUE IS EMPTY«, t00=0x01c6, t01=0x000c}
0x2c51c…2c52e Head {h00=0x000e, h01=0x0050, text=» TM A2,A6 «, t00=0x01c6, t01=0x0030}
0x2c52e…2c562 Head {h00=0x0030, h01=0x0050, text=» RF(Z) EXIT20 ONLY NO PROCESSING FLAG IS SET«, t00=0x01c6, t01=0x0042}
0x2c562…2c58c Head {h00=0x0026, h01=0x0050, text=» TM A2,A5 TEST IF QUEUE IS BLOCKED«, t00=0x01c6, t01=0x0076}
0x2c58c…2c5bc Head {h00=0x002c, h01=0x0050, text=» RF(Z) EXIT40 NO, SO PROCESS THIS QUEUE «, t00=0x01c6, t01=0x00a0}
0x2c5bc…2c5d0 Head {h00=0x0010, h01=0x0050, text=»EXIT20 EQU *«, t00=0x01c6, t01=0x00d0}
0x2c5d0…2c600 Head {h00=0x002c, h01=0x0050, text=» LDKL A8,RHIP PRESET ACTIVATION ADDRESS «, t00=0x01c6, t01=0x00e4}
0x2c600…2c62c Head {h00=0x0028, h01=0x0050, text=» LDKL A9,4 PRESET PROCESS INDICATION«, t00=0x01c6, t01=0x0114}
0x2c62c…2c652 Head {h00=0x0022, h01=0x0050, text=» LDR A1,A13 CHECK INPUT QUEUE «, t00=0x01c6, t01=0x0140}
0x2c652…2c66a Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEINP .«, t00=0x01c6, t01=0x0166}
0x2c66a…2c680 Head {h00=0x0012, h01=0x0050, text=» LDR* A2,A1 . «, t00=0x01c6, t01=0x017e}
0x2c680…2c6a4 (455, 0, 400) Head {h00=0x0020, h01=0x0050, text=» RF(Z) EXIT30 QUEUE IS EMPTY«, t00=0x01c7, t01=0x0004}
0x2c6a4…2c6b6 Head {h00=0x000e, h01=0x0050, text=» TM A2,A6 «, t00=0x01c7, t01=0x0028}
0x2c6b6…2c6ea Head {h00=0x0030, h01=0x0050, text=» RF(Z) EXIT30 ONLY NO PROCESSING FLAG IS SET«, t00=0x01c7, t01=0x003a}
0x2c6ea…2c714 Head {h00=0x0026, h01=0x0050, text=» TM A2,A5 TEST IF QUEUE IS BLOCKED«, t00=0x01c7, t01=0x006e}
0x2c714…2c744 Head {h00=0x002c, h01=0x0050, text=» RF(Z) EXIT40 NO, SO PROCESS THIS QUEUE «, t00=0x01c7, t01=0x0098}
0x2c744…2c74e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c7, t01=0x00c8}
0x2c74e…2c75c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01c7, t01=0x00d2}
0x2c75c…2c766 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c7, t01=0x00e0}
0x2c766…2c798 Head {h00=0x002e, h01=0x0050, text=»* CHECK IF A COMPLETED SCAN CYCLE IS DONE «, t00=0x01c7, t01=0x00ea}
0x2c798…2c7a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c7, t01=0x011c}
0x2c7a2…2c7b6 Head {h00=0x0010, h01=0x0050, text=»EXIT30 EQU *«, t00=0x01c7, t01=0x0126}
0x2c7b6…2c7cc Head {h00=0x0012, h01=0x0050, text=» CW A4,SCHEDC «, t00=0x01c7, t01=0x013a}
0x2c7cc…2c7fa Head {h00=0x002a, h01=0x0050, text=» RB(NE) EXIT00 CONTINUE WITH SCANNING «, t00=0x01c7, t01=0x0150}
0x2c7fa…2c81e Head {h00=0x0020, h01=0x0050, text=» CW A7,SCHEDL «, t00=0x01c7, t01=0x017e}
0x2c81e…2c84c Head {h00=0x002a, h01=0x0050, text=» RB(NE) EXIT00 CONTINUE WITH SCANNING «, t00=0x01c8, t01=0x0012}
0x2c84c…2c876 Head {h00=0x0026, h01=0x0050, text=» CM DCLEVL SET PROCESS INDICATION «, t00=0x01c8, t01=0x0040}
0x2c876…2c892 Head {h00=0x0018, h01=0x0050, text=»EXIT32 EQU * «, t00=0x01c8, t01=0x006a}
0x2c892…2c8ac Head {h00=0x0016, h01=0x0050, text=» LKM EXIT DC-TASK«, t00=0x01c8, t01=0x0086}
0x2c8ac…2c8bc Head {h00=0x000c, h01=0x0050, text=» DATA 3 «, t00=0x01c8, t01=0x00a0}
0x2c8bc…2c8c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c8, t01=0x00b0}
0x2c8c6…2c90c Head {h00=0x0042, h01=0x0050, text=»* A NOT EMPTY QUEUE IS FOUND, ACTIVATE THE CONCERNING PROCESS «, t00=0x01c8, t01=0x00ba}
0x2c90c…2c916 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c8, t01=0x0100}
0x2c916…2c92a Head {h00=0x0010, h01=0x0050, text=»EXIT35 EQU *«, t00=0x01c8, t01=0x010a}
0x2c92a…2c968 Head {h00=0x003a, h01=0x0050, text=» LD* A13,LC:TAB,A12 USE LOGICAL CHANNEL 0 FOR RESTART «, t00=0x01c8, t01=0x011e}
0x2c968…2c97c Head {h00=0x0010, h01=0x0050, text=»EXIT40 EQU *«, t00=0x01c8, t01=0x015c}
0x2c97c…2c9a6 Head {h00=0x0026, h01=0x0050, text=» ST A4,SCHEDC SAVE SCAN PARAMETERS«, t00=0x01c8, t01=0x0170}
0x2c9a6…2c9be Head {h00=0x0014, h01=0x0050, text=» ST A7,SCHEDL . «, t00=0x01c9, t01=0x000a}
0x2c9be…2c9ea Head {h00=0x0028, h01=0x0050, text=» ST A9,DCLEVL SET PROCESS INDICATION«, t00=0x01c9, t01=0x0022}
0x2c9ea…2ca10 Head {h00=0x0022, h01=0x0050, text=» ABR A8 BRANCH TO THE ROUTINE «, t00=0x01c9, t01=0x004e}
0x2ca10…2ca1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c9, t01=0x0074}
0x2ca1a…2ca60 Head {h00=0x0042, h01=0x0050, text=»SCHEDC DATA 0 LOGICAL CHANNEL INDEX «, t00=0x01c9, t01=0x007e}
0x2ca60…2ca80 Head {h00=0x001c, h01=0x0050, text=»SCHEDL DATA 0 LINE INDEX«, t00=0x01c9, t01=0x00c4}
0x2ca80…2ca8e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01c9, t01=0x00e4}
0x2ca8e…2ca98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c9, t01=0x00f2}
0x2ca98…2caa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c9, t01=0x00fc}
0x2caa2…2cace Head {h00=0x0028, h01=0x0050, text=»* ROUTINE TO RESET A VIRTUAL CIRCUIT«, t00=0x01c9, t01=0x0106}
0x2cace…2cad8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c9, t01=0x0132}
0x2cad8…2cb0c Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01c9, t01=0x013c}
0x2cb0c…2cb16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01c9, t01=0x0170}
0x2cb16…2cb32 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01c9, t01=0x017a}
0x2cb32…2cb52 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x01ca, t01=0x0008}
0x2cb52…2cb7e Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01ca, t01=0x0028}
0x2cb7e…2cb88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ca, t01=0x0054}
0x2cb88…2cba4 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01ca, t01=0x005e}
0x2cba4…2cbc0 Head {h00=0x0018, h01=0x0050, text=»* CF A14,RSETVC «, t00=0x01ca, t01=0x007a}
0x2cbc0…2cbca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ca, t01=0x0096}
0x2cbca…2cbe6 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01ca, t01=0x00a0}
0x2cbe6…2cbf6 Head {h00=0x000c, h01=0x0050, text=»* NONE «, t00=0x01ca, t01=0x00bc}
0x2cbf6…2cc00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ca, t01=0x00cc}
0x2cc00…2cc14 Head {h00=0x0010, h01=0x0050, text=»RSETVC EQU *«, t00=0x01ca, t01=0x00d6}
0x2cc14…2cc38 Head {h00=0x0020, h01=0x0050, text=» CF A14,SAVE8 «, t00=0x01ca, t01=0x00ea}
0x2cc38…2cc62 Head {h00=0x0026, h01=0x0050, text=» CF A14,CLLCAD CLEAR LC-ADM FIELDS«, t00=0x01ca, t01=0x010e}
0x2cc62…2cc6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ca, t01=0x0138}
0x2cc6c…2cc88 Head {h00=0x0018, h01=0x0050, text=»* EMPTY INPUT QUEUE «, t00=0x01ca, t01=0x0142}
0x2cc88…2cc92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ca, t01=0x015e}
0x2cc92…2ccb6 Head {h00=0x0020, h01=0x0050, text=» CF A14,CLINPQ«, t00=0x01ca, t01=0x0168}
0x2ccb6…2ccc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ca, t01=0x018c}
0x2ccc0…2ccea Head {h00=0x0026, h01=0x0050, text=»* COMPLETE EVENTS IN OUTPUT QUEUE «, t00=0x01cb, t01=0x0008}
0x2ccea…2ccf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cb, t01=0x0032}
0x2ccf4…2cd2e Head {h00=0x0036, h01=0x0050, text=» LD A1,LCDWT,A13 IS THERE A RELATION WITH AN USER «, t00=0x01cb, t01=0x003c}
0x2cd2e…2cd46 Head {h00=0x0014, h01=0x0050, text=» RF(Z) RSET20 NO«, t00=0x01cb, t01=0x0076}
0x2cd46…2cd6a Head {h00=0x0020, h01=0x0050, text=» LDKL A3,RSET.RC RETURN CODE«, t00=0x01cb, t01=0x008e}
0x2cd6a…2cd80 Head {h00=0x0012, h01=0x0050, text=» CF A14,CMEVNT«, t00=0x01cb, t01=0x00b2}
0x2cd80…2cd94 Head {h00=0x0010, h01=0x0050, text=»RSET20 EQU *«, t00=0x01cb, t01=0x00c8}
0x2cd94…2cdb8 Head {h00=0x0020, h01=0x0050, text=» CF A14,RELOA8«, t00=0x01cb, t01=0x00dc}
0x2cdb8…2cdc8 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01cb, t01=0x0100}
0x2cdc8…2cdd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cb, t01=0x0110}
0x2cdd2…2cde0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01cb, t01=0x011a}
0x2cde0…2cdea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cb, t01=0x0128}
0x2cdea…2cdf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cb, t01=0x0132}
0x2cdf4…2ce1e Head {h00=0x0026, h01=0x0050, text=»* ROUTINE TO EMPTY THE INPUT QUEUE«, t00=0x01cb, t01=0x013c}
0x2ce1e…2ce28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cb, t01=0x0166}
0x2ce28…2ce64 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x01cb, t01=0x0170}
0x2ce64…2ce6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cc, t01=0x001c}
0x2ce6e…2ce8a Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01cc, t01=0x0026}
0x2ce8a…2ceaa Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x01cc, t01=0x0042}
0x2ceaa…2cecc Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x01cc, t01=0x0062}
0x2cecc…2ced6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cc, t01=0x0084}
0x2ced6…2cef2 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01cc, t01=0x008e}
0x2cef2…2cf02 Head {h00=0x000c, h01=0x0050, text=»* NONE «, t00=0x01cc, t01=0x00aa}
0x2cf02…2cf0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cc, t01=0x00ba}
0x2cf0c…2cf28 Head {h00=0x0018, h01=0x0050, text=»CLINPQ EQU * «, t00=0x01cc, t01=0x00c4}
0x2cf28…2cf50 Head {h00=0x0024, h01=0x0050, text=» LDR A1,A13 QUEUE ANCHOR ADDRESS«, t00=0x01cc, t01=0x00e0}
0x2cf50…2cf68 Head {h00=0x0014, h01=0x0050, text=» ADK A1,QUEINP .«, t00=0x01cc, t01=0x0108}
0x2cf68…2cf8e Head {h00=0x0022, h01=0x0050, text=» LDK A2,NPRFLG SET MASK VALUE «, t00=0x01cc, t01=0x0120}
0x2cf8e…2cfa2 Head {h00=0x0010, h01=0x0050, text=» C1R A2,A2 .«, t00=0x01cc, t01=0x0146}
0x2cfa2…2cfc6 Head {h00=0x0020, h01=0x0050, text=» ANRS A2,A1 IS QUEUE EMPTY ?«, t00=0x01cc, t01=0x015a}
0x2cfc6…2cff4 Head {h00=0x002a, h01=0x0050, text=» RF(Z) CLINP1 YES«, t00=0x01cc, t01=0x017e}
0x2cff4…2d020 Head {h00=0x0028, h01=0x0050, text=» CF A14,DEQUE GET ELEMENT FROM QUEUE«, t00=0x01cd, t01=0x001c}
0x2d020…2d044 Head {h00=0x0020, h01=0x0050, text=» CF A14,RLBUF RELEASE BUFFER«, t00=0x01cd, t01=0x0048}
0x2d044…2d064 Head {h00=0x001c, h01=0x0050, text=» RB CLINPQ«, t00=0x01cd, t01=0x006c}
0x2d064…2d06e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cd, t01=0x008c}
0x2d06e…2d08a Head {h00=0x0018, h01=0x0050, text=»CLINP1 EQU * «, t00=0x01cd, t01=0x0096}
0x2d08a…2d0a8 Head {h00=0x001a, h01=0x0050, text=» RTN A14 «, t00=0x01cd, t01=0x00b2}
0x2d0a8…2d0b6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01cd, t01=0x00d0}
0x2d0b6…2d0c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cd, t01=0x00de}
0x2d0c0…2d0ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cd, t01=0x00e8}
0x2d0ca…2d0f2 Head {h00=0x0024, h01=0x0050, text=»* ROUTINE TO CLEAR LC-ADM FIELDS«, t00=0x01cd, t01=0x00f2}
0x2d0f2…2d0fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cd, t01=0x011a}
0x2d0fc…2d130 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01cd, t01=0x0124}
0x2d130…2d13a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cd, t01=0x0158}
0x2d13a…2d156 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01cd, t01=0x0162}
0x2d156…2d174 Head {h00=0x001a, h01=0x0050, text=»* A13 = LC-ADM FIELDS«, t00=0x01cd, t01=0x017e}
0x2d174…2d1a0 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01ce, t01=0x000c}
0x2d1a0…2d1aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ce, t01=0x0038}
0x2d1aa…2d1c6 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01ce, t01=0x0042}
0x2d1c6…2d1e2 Head {h00=0x0018, h01=0x0050, text=»* CF A14,CLLCAD«, t00=0x01ce, t01=0x005e}
0x2d1e2…2d1ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ce, t01=0x007a}
0x2d1ec…2d208 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01ce, t01=0x0084}
0x2d208…2d218 Head {h00=0x000c, h01=0x0050, text=»* NONE «, t00=0x01ce, t01=0x00a0}
0x2d218…2d230 Head {h00=0x0014, h01=0x0050, text=»* A1 IS CHANGED«, t00=0x01ce, t01=0x00b0}
0x2d230…2d23a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01ce, t01=0x00c8}
0x2d23a…2d24e Head {h00=0x0010, h01=0x0050, text=»CLLCAD EQU *«, t00=0x01ce, t01=0x00d2}
0x2d24e…2d260 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x01ce, t01=0x00e6}
0x2d260…2d290 Head {h00=0x002c, h01=0x0050, text=» ST A1,FLAGS,A13 CLEAR FIELDS IN LC-ADM «, t00=0x01ce, t01=0x00f8}
0x2d290…2d2ba Head {h00=0x0026, h01=0x0050, text=» ST A1,SYSBUF-2,A13 «, t00=0x01ce, t01=0x0128}
0x2d2ba…2d2d2 Head {h00=0x0014, h01=0x0050, text=» SC A1,PS,A13 . «, t00=0x01ce, t01=0x0152}
0x2d2d2…2d2ea Head {h00=0x0014, h01=0x0050, text=» SC A1,PR,A13 . «, t00=0x01ce, t01=0x016a}
0x2d2ea…2d302 Head {h00=0x0014, h01=0x0050, text=» SC A1,RPS,A13 .«, t00=0x01ce, t01=0x0182}
0x2d302…2d31c Head {h00=0x0016, h01=0x0050, text=» SC A1,SLWE,A13 . «, t00=0x01cf, t01=0x000a}
0x2d31c…2d342 Head {h00=0x0022, h01=0x0050, text=» SC A1,RLWE,A13 «, t00=0x01cf, t01=0x0024}
0x2d342…2d35c Head {h00=0x0016, h01=0x0050, text=» SC A1,NRNUBF,A13 «, t00=0x01cf, t01=0x004a}
0x2d35c…2d36c Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01cf, t01=0x0064}
0x2d36c…2d37a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01cf, t01=0x0074}
0x2d37a…2d384 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cf, t01=0x0082}
0x2d384…2d38e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cf, t01=0x008c}
0x2d38e…2d3ca Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE CALCULATES FROM THE FILE CODE OF THE «, t00=0x01cf, t01=0x0096}
0x2d3ca…2d3f4 Head {h00=0x0026, h01=0x0050, text=»* LINE ECB THE LINE BLOCK ADDRESS «, t00=0x01cf, t01=0x00d2}
0x2d3f4…2d3fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cf, t01=0x00fc}
0x2d3fe…2d432 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01cf, t01=0x0106}
0x2d432…2d43c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01cf, t01=0x013a}
0x2d43c…2d458 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01cf, t01=0x0144}
0x2d458…2d47a Head {h00=0x001e, h01=0x0050, text=»* A8 = LINE ECB ADDRESS «, t00=0x01cf, t01=0x0160}
0x2d47a…2d4a6 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01cf, t01=0x0182}
0x2d4a6…2d4b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d0, t01=0x001e}
0x2d4b0…2d4cc Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01d0, t01=0x0028}
0x2d4cc…2d4e6 Head {h00=0x0016, h01=0x0050, text=»* CF A14,GTLBA«, t00=0x01d0, t01=0x0044}
0x2d4e6…2d4f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d0, t01=0x005e}
0x2d4f0…2d50c Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01d0, t01=0x0068}
0x2d50c…2d530 Head {h00=0x0020, h01=0x0050, text=»* A12 = LINE BLOCK ADDRESS «, t00=0x01d0, t01=0x0084}
0x2d530…2d53a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d0, t01=0x00a8}
0x2d53a…2d54e Head {h00=0x0010, h01=0x0050, text=»GTLBA EQU * «, t00=0x01d0, t01=0x00b2}
0x2d54e…2d564 Head {h00=0x0012, h01=0x0050, text=» IFT SYNRLN=1 «, t00=0x01d0, t01=0x00c6}
0x2d564…2d58e Head {h00=0x0026, h01=0x0050, text=» LD A12,LINTAB LINE BLOCK ADDRESS «, t00=0x01d0, t01=0x00dc}
0x2d58e…2d59a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01d0, t01=0x0106}
0x2d59a…2d5b0 Head {h00=0x0012, h01=0x0050, text=» IFF SYNRLN=1 «, t00=0x01d0, t01=0x0112}
0x2d5b0…2d5d2 Head {h00=0x001e, h01=0x0050, text=» STR A1,A14 SAVE REGISTER «, t00=0x01d0, t01=0x0128}
0x2d5d2…2d608 Head {h00=0x0032, h01=0x0050, text=» LDKL A1,LINTAB TABLE WITH LINE BLOCK ADDRESS «, t00=0x01d0, t01=0x014a}
0x2d608…2d61c Head {h00=0x0010, h01=0x0050, text=»GTLB00 EQU *«, t00=0x01d0, t01=0x0180}
0x2d61c…2d644 (465, 0, 400) Head {h00=0x0024, h01=0x0050, text=» LDR* A12,A1 LINE BLOCK ADDRESS «, t00=0x01d1, t01=0x0004}
0x2d644…2d66e Head {h00=0x0026, h01=0x0050, text=» LD A2,FILCOD,A12 CHECK FILE CODE «, t00=0x01d1, t01=0x002c}
0x2d66e…2d688 Head {h00=0x0016, h01=0x0050, text=» CC A2,ECBFC,A8 . «, t00=0x01d1, t01=0x0056}
0x2d688…2d6aa Head {h00=0x001e, h01=0x0050, text=» RF(E) GTLB10 CORRECT ONE «, t00=0x01d1, t01=0x0070}
0x2d6aa…2d6bc Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x01d1, t01=0x0092}
0x2d6bc…2d6e2 Head {h00=0x0022, h01=0x0050, text=» RB GTLB00 TRY NEXT LINE BLOCK«, t00=0x01d1, t01=0x00a4}
0x2d6e2…2d6ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d1, t01=0x00ca}
0x2d6ec…2d700 Head {h00=0x0010, h01=0x0050, text=»GTLB10 EQU *«, t00=0x01d1, t01=0x00d4}
0x2d700…2d726 Head {h00=0x0022, h01=0x0050, text=» LDR* A1,A14 RESTORE REGISTER «, t00=0x01d1, t01=0x00e8}
0x2d726…2d732 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x01d1, t01=0x010e}
0x2d732…2d74a Head {h00=0x0014, h01=0x0050, text=» RTN A14 RETURN «, t00=0x01d1, t01=0x011a}
0x2d74a…2d758 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01d1, t01=0x0132}
0x2d758…2d762 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d1, t01=0x0140}
0x2d762…2d76c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d1, t01=0x014a}
0x2d76c…2d794 Head {h00=0x0024, h01=0x0050, text=»* ROUTINE TO GET LC-ADM ADDRESS «, t00=0x01d1, t01=0x0154}
0x2d794…2d79e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d1, t01=0x017c}
0x2d79e…2d7d2 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01d1, t01=0x0186}
0x2d7d2…2d7dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d2, t01=0x002a}
0x2d7dc…2d7f8 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01d2, t01=0x0034}
0x2d7f8…2d820 Head {h00=0x0024, h01=0x0050, text=»* A4 = LOGICAL CHANNEL NUMBER «, t00=0x01d2, t01=0x0050}
0x2d820…2d844 Head {h00=0x0020, h01=0x0050, text=»* A12 = LINE BLOCK ADDRESS «, t00=0x01d2, t01=0x0078}
0x2d844…2d870 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01d2, t01=0x009c}
0x2d870…2d87a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d2, t01=0x00c8}
0x2d87a…2d896 Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01d2, t01=0x00d2}
0x2d896…2d8b2 Head {h00=0x0018, h01=0x0050, text=»* CF A14,GTLCAD «, t00=0x01d2, t01=0x00ee}
0x2d8b2…2d8bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d2, t01=0x010a}
0x2d8bc…2d8d8 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01d2, t01=0x0114}
0x2d8d8…2d8f8 Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x01d2, t01=0x0130}
0x2d8f8…2d902 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d2, t01=0x0150}
0x2d902…2d916 Head {h00=0x0010, h01=0x0050, text=»GTLCAD EQU *«, t00=0x01d2, t01=0x015a}
0x2d916…2d93e Head {h00=0x0024, h01=0x0050, text=» LDR A13,A4 PREPARE FOR INDEXING«, t00=0x01d2, t01=0x016e}
0x2d93e…2d954 Head {h00=0x0012, h01=0x0050, text=» ADR A13,A13 .«, t00=0x01d3, t01=0x0008}
0x2d954…2d97e Head {h00=0x0026, h01=0x0050, text=» AD A13,LC:TAB,A12 LC-ADM ADDRESS «, t00=0x01d3, t01=0x001e}
0x2d97e…2d9a6 Head {h00=0x0024, h01=0x0050, text=» LDR* A13,A13 GET LC-ADM ADDRESS«, t00=0x01d3, t01=0x0048}
0x2d9a6…2d9b6 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01d3, t01=0x0070}
0x2d9b6…2d9c4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01d3, t01=0x0080}
0x2d9c4…2d9ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d3, t01=0x008e}
0x2d9ce…2d9d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d3, t01=0x0098}
0x2d9d8…2da0a Head {h00=0x002e, h01=0x0050, text=»* MODULE TO ACTIVATE A CONFIRMATION TIMER «, t00=0x01d3, t01=0x00a2}
0x2da0a…2da14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d3, t01=0x00d4}
0x2da14…2da48 Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x01d3, t01=0x00de}
0x2da48…2da52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d3, t01=0x0112}
0x2da52…2da6c Head {h00=0x0016, h01=0x0050, text=»* INPUT PARAMTERS:«, t00=0x01d3, t01=0x011c}
0x2da6c…2da8c Head {h00=0x001c, h01=0x0050, text=»* A8 = TIME-OUT VALUE «, t00=0x01d3, t01=0x0136}
0x2da8c…2daac Head {h00=0x001c, h01=0x0050, text=»* A13 = LC-ADM ADDRESS «, t00=0x01d3, t01=0x0156}
0x2daac…2dad8 Head {h00=0x0028, h01=0x0050, text=»* A14 = CALL FUNCTION STACK POINTER«, t00=0x01d3, t01=0x0176}
0x2dad8…2dae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d4, t01=0x0012}
0x2dae2…2dafe Head {h00=0x0018, h01=0x0050, text=»* CALLING SEQUENCE: «, t00=0x01d4, t01=0x001c}
0x2dafe…2db18 Head {h00=0x0016, h01=0x0050, text=»* CF A14,STTIM«, t00=0x01d4, t01=0x0038}
0x2db18…2db22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d4, t01=0x0052}
0x2db22…2db3e Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01d4, t01=0x005c}
0x2db3e…2db6a Head {h00=0x0028, h01=0x0050, text=»* A1 AND A4 CHANGED «, t00=0x01d4, t01=0x0078}
0x2db6a…2db74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d4, t01=0x00a4}
0x2db74…2db88 Head {h00=0x0010, h01=0x0050, text=»STTIM EQU * «, t00=0x01d4, t01=0x00ae}
0x2db88…2dbb0 Head {h00=0x0024, h01=0x0050, text=» LDKL A4,TIMOUT ACTIVATION LABEL«, t00=0x01d4, t01=0x00c2}
0x2dbb0…2dbd2 Head {h00=0x001e, h01=0x0050, text=» CF A14,STRTIM START TIMER«, t00=0x01d4, t01=0x00ea}
0x2dbd2…2dbfe Head {h00=0x0028, h01=0x0050, text=» ST A4,TIMADR,A13 SAVE TIMER ADDRESS«, t00=0x01d4, t01=0x010c}
0x2dbfe…2dc2c Head {h00=0x002a, h01=0x0050, text=» LDK A1,CONTIM SET TIMER STARTED FLAG «, t00=0x01d4, t01=0x0138}
0x2dc2c…2dc48 Head {h00=0x0018, h01=0x0050, text=» ORS A1,FLAGS,A13 . «, t00=0x01d4, t01=0x0166}
0x2dc48…2dc58 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01d4, t01=0x0182}
0x2dc58…2dc66 (469, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01d5, t01=0x0004}
0x2dc66…2dc70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x0012}
0x2dc70…2dc7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x001c}
0x2dc7a…2dc84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x0026}
0x2dc84…2dca0 Head {h00=0x0018, h01=0x0050, text=»* GET BUFFER ROUTINE«, t00=0x01d5, t01=0x0030}
0x2dca0…2dcaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x004c}
0x2dcaa…2dce6 Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x01d5, t01=0x0056}
0x2dce6…2dcf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x0092}
0x2dcf0…2dd0c Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01d5, t01=0x009c}
0x2dd0c…2dd2e Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x01d5, t01=0x00b8}
0x2dd2e…2dd38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x00da}
0x2dd38…2dd54 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01d5, t01=0x00e4}
0x2dd54…2dd74 Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x01d5, t01=0x0100}
0x2dd74…2dd9e Head {h00=0x0026, h01=0x0050, text=»* NO OTHER REGISTERS ARE CHANGED «, t00=0x01d5, t01=0x0120}
0x2dd9e…2dda8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d5, t01=0x014a}
0x2dda8…2ddbc Head {h00=0x0010, h01=0x0050, text=»GTBUF EQU * «, t00=0x01d5, t01=0x0154}
0x2ddbc…2ddd8 Head {h00=0x0018, h01=0x0050, text=» STR A1,A14 SAVE A1 «, t00=0x01d5, t01=0x0168}
0x2ddd8…2de02 Head {h00=0x0026, h01=0x0050, text=» LD A2,BUFANC BUFFER CHAIN ANCHOR «, t00=0x01d5, t01=0x0184}
0x2de02…2de2c Head {h00=0x0026, h01=0x0050, text=» RF(Z) GTBU10 NO BUFFER AVAILABLE «, t00=0x01d6, t01=0x001e}
0x2de2c…2de56 Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A2 GET BUFFER FROM CHAIN «, t00=0x01d6, t01=0x0048}
0x2de56…2de6e Head {h00=0x0014, h01=0x0050, text=» ST A1,BUFANC . «, t00=0x01d6, t01=0x0072}
0x2de6e…2de90 Head {h00=0x001e, h01=0x0050, text=» ADK A2,2 START OF BUFFER «, t00=0x01d6, t01=0x008a}
0x2de90…2deae Head {h00=0x001a, h01=0x0050, text=» LDR* A1,A14 RELOAD A1«, t00=0x01d6, t01=0x00ac}
0x2deae…2debe Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01d6, t01=0x00ca}
0x2debe…2ded2 Head {h00=0x0010, h01=0x0050, text=»GTBU10 EQU *«, t00=0x01d6, t01=0x00da}
0x2ded2…2dee6 Head {h00=0x0010, h01=0x0050, text=» HLT ERROR «, t00=0x01d6, t01=0x00ee}
0x2dee6…2def0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d6, t01=0x0102}
0x2def0…2defe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x01d6, t01=0x010c}
0x2defe…2df08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d6, t01=0x011a}
0x2df08…2df12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d6, t01=0x0124}
0x2df12…2df32 Head {h00=0x001c, h01=0x0050, text=»* RELEASE BUFFER ROUTINE«, t00=0x01d6, t01=0x012e}
0x2df32…2df3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d6, t01=0x014e}
0x2df3c…2df7a Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x01d6, t01=0x0158}
0x2df7a…2df84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d7, t01=0x0008}
0x2df84…2dfa0 Head {h00=0x0018, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x01d7, t01=0x0012}
0x2dfa0…2dfc0 Head {h00=0x001c, h01=0x0050, text=»* A2 = BUFFER ADDRESS «, t00=0x01d7, t01=0x002e}
0x2dfc0…2dfe2 Head {h00=0x001e, h01=0x0050, text=»* A14 = CF STACK POINTER «, t00=0x01d7, t01=0x004e}
0x2dfe2…2dfec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d7, t01=0x0070}
0x2dfec…2e008 Head {h00=0x0018, h01=0x0050, text=»* OUTPUT PARAMETERS:«, t00=0x01d7, t01=0x007a}
0x2e008…2e018 Head {h00=0x000c, h01=0x0050, text=»* NONE «, t00=0x01d7, t01=0x0096}
0x2e018…2e022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d7, t01=0x00a6}
0x2e022…2e036 Head {h00=0x0010, h01=0x0050, text=»RLBUF EQU * «, t00=0x01d7, t01=0x00b0}
0x2e036…2e052 Head {h00=0x0018, h01=0x0050, text=» STR A1,A14 SAVE A1 «, t00=0x01d7, t01=0x00c4}
0x2e052…2e07a Head {h00=0x0024, h01=0x0050, text=» LD A1,BUFANC BUFFER POOL ANCHOR«, t00=0x01d7, t01=0x00e0}
0x2e07a…2e08c Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x01d7, t01=0x0108}
0x2e08c…2e0ac Head {h00=0x001c, h01=0x0050, text=» STR A1,A2 PUT BUFFER.. «, t00=0x01d7, t01=0x011a}
0x2e0ac…2e0d0 Head {h00=0x0020, h01=0x0050, text=» ST A2,BUFANC FIRST IN QUEUE«, t00=0x01d7, t01=0x013a}
0x2e0d0…2e0ee Head {h00=0x001a, h01=0x0050, text=» LDR* A1,A14 RELOAD A1«, t00=0x01d7, t01=0x015e}
0x2e0ee…2e0fe Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x01d7, t01=0x017c}
0x2e0fe…2e108 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x01d7, t01=0x018c}
0x2e108…2e114 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x01d8, t01=0x0008}
0x2e114…2e118 Head {h00=0x4004, h01=0x0000}
0x2e118…2e11c 01 d8 00 14 ┆ ┆
0x2e11c…2e124 (473, 1, 8) 20 04 00 00 01 d9 00 04 ┆ ┆