|
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: 147652 (0x240c4)
Notes: pts_type(SC)
Names: »DRPL01.SC«
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
└─⟦this⟧ »TOSSWORK/DRPL01.SC«
IDENT DRPL01 REL 11.0 81-05-27 870105041100 =5,CORR. OF RWSI-CWT:S , OPEN LINE PROC. & COND. ASS. REL 11.0 81-05-22 =4,CORR. OF CWT-DISPL. REL 11.0 81-05-20 =3,CORR. OF TIMER NAME REL 11.0 81-04-29 =2,CORR. OF OPEN LINE PROCEDURE REL 11.0 81-04-21 GENERAL UPDATE FOR RWSI REL 11.0 81-01-26 =1,OPEN LINE PARAM. AREA EXPANDED PRR 11.0 80-11-19 * * * * ************************************************************ * * PHILIPS TERMINAL SYSTEM PTS * * DRPL01 = DRIVER PROCESSOR FOR LINE CONTROL, * LOCAL & REMOTE CONNECTIONS * * * ************************************************************ * * * THIS PROGRAM HANDLES I/O OPERATIONS ON THE * PROCESSOR FOR LINE CONTROL (PLC). IT IS * CALLED FROM THE TERMINAL DEVICE DRIVERS. * * INPUT AND OUTPUT OF CHARACTERS FROM/TO THE * TERMINAL DEVICE DRIVERS ARE MADE ON CHARACTER * BASIS. BLOCKING AND DEBLOCKING OF CHARACTERS * IN DATA PACKETS ARE HANDLED BY THIS DRIVER. * EJECT * * THE PROGRAM IS DIVIDED INTO A NUMBER OF SECTIONS. * SECTIONS CONTAINING PROGRAM CODE ARE DIVIDED * INTO ROUTINES. THE ROUTINES ARE LISTED AT * BEGINNING OF EACH SECTION. THE SECTIONS, IN * ORDER OF APPEARANCE IN LIST, ARE: * * NAME FUNCTION * * ENTRIES DECLARE ENTRY POINTS * EXTERNALS DECLARE EXTERNAL REFERENCES * CONDITION SET CONDITIONAL ASSEMBLY PARAMETERS * CONSTANTS SET CONSTANT VALUES * DATA DATA AREAS * * REQUEST DEVICE DRIVER REQUEST ROUTINES * INTERRUPT INTERRUPT ENTRIES * RECOVERY SYSTEM START, POWER FAIL AND RECOVERY * DISPATCH LOCAL PLC DISPATCHER * ROUTINE COMMON SERVICE ROUTINES * SUBROUTIN COMMON SERVICE SUBROUTINES * TBUFF BUFFER HANDLING SUBROUTINES * EJECT * *********** * ENTRIES * *********** * * I/O REQUESTS * ENTRY PLCHRI CHARACTER INPUT ENTRY PLSTBL DEFINE START OF OUTPUT BLOCK ENTRY PLCHRO CHARACTER OUTPUT ENTRY PLENBL DEFINE END OF OUTPUT BLOCK ENTRY PLDISP LOCAL DISPATCHER ENTRY PRCHRI CHR INP REMOTE ENTRY PRSTBL START OUTP BLOCK, REMOTE ENTRY PRCHRO CHR OUTP. REMOTE ENTRY PRENBL END OUTP BLOCK, REMOTE ENTRY PRDISP LOCAL DSIP. REMOTE ENTRY PLTEST TEST COMMANDS ENTRY CWTPLC CWT TABLE ENTRY GETDWT GET DWT SUBROUTINE * * * INTERRUPTS * ENTRY IHPL01 PLC NUMBER 0 ENTRY IHPL02 PLC NUMBER 1 ENTRY IHPL03 PLC NUMBER 2 ENTRY IHPL04 PLC NUMBER 3 * ENTRY IHPR01 PLC NUMBER 5,REMOTE ENTRY IHPR02 6,REMOTE ENTRY IHPR03 7,REMOTE ENTRY IHPR04 8,REMOTE * * RECOVERY AT TC POWER UP * ENTRY PLON RECOVER ALL DEFINED PLC:S * EJECT * ************* * EXTERNALS * ************* * * TOSS MONITOR * * ROUTINES EXTRN TDISP TOSS DISPATCHER EXTRN QMJOB QUEUE MONITOR JOB EXTRN MEXIT EXIT FROM MONITOR JOB EXTRN GETBLK GET MONITOR BLOCK EXTRN FREBLK RETURN MONITOR BLOCK EXTRN SAVE8 PUSH A1-A8 ON A15 STACK EXTRN SETIME SET TIMER * DATA WORDS EXTRN PFPOST POWER FAIL FLAG EXTRN INTSAV LATEST INTERRUPT SAVE AREA * * * DRND01 SERVICE ROUTINES * EXTRN NDSAV8 SAVE A3-A5, A7-A8 IN DWT EXTRN NDGET8 GET A3-A5, A7-A8 FROM DWT EXTRN NDREWS CALL RECOVERY FOR ALL DEV ON WS EXTRN NDREDW CALL RECOVERY FOR DWT EXTRN NDGEDN GET HIGEST DWT NUMBER ON WS EXTRN NDGEDW GET DWT ADDRESS * EJECT * * DRND01 ROUTINES FOR RETURN TO DEVICE DRIVER * EXTRN NDREPO POP, OK & RETURN EXTRN NDRETO OK & RETURN EXTRN NDREP POP & RETURN EXTRN NDRET RETURN * * * DWT DISPLACEMENTS * EXTRN DWTCHP CHANNEL PARAMETERS EXTRN DWTST STATUS FLAGS EXTRN DWTOR ORDER (RIGHT BYTE) EXTRN DWTADR DRIVER ADDRESS BLOCK ADDRESS EXTRN DWTOTQ QUEUE LINK EXTRN DWTCP2 SECOND CHANNEL PARAMETER WORD EXTRN DWTLD1 PLC INPUT/OUTPUT BUFFER ADDR EXTRN DWTLD2 PLC FLOW CONTROL COUNTERS EXTRN DWTTBU PLC TEST COMMANDS BUFFER ADDR EXTRN DWTTLN PLC TEST COMMANDS BUFFER LENGTH EXTRN DWTTCW PLC TEST COMMANDS SPECIAL PARAM * EJECT * * WORK STATION TABLES * EXTRN INTPL1 PLC 1 EXTRN INTPL2 PLC 2 EXTRN INTPL3 PLC 3 EXTRN INTPL4 PLC 4 * EXTRN INTPR1 REMOTE EXTRN INTPR2 REMOTE EXTRN INTPR3 REMOTE EXTRN INTPR4 REMOTE * * MISCELLANEOUS * EXTRN INTADR INTERRUPT ADDR IN DRIVER ADDR BLOCK * EJECT * ************************ * CONDITIONAL ASSEMBLY * ************************ * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 1 * * * PLCNRL DEFINES NUMBER OF LOCAL PLC:S ACTUALLY CONNECTED (0-4) * X:A EQU 1 PLCNRL EQU X:A * * PLCNRR DEFINES THE NUMBER OF REMOTE PLC:S ACTUALLY CONN. (0-4) * X:B EQU 0 PLCNRR EQU X:B * * EJECT * ************* * CONSTANTS * ************* * * SYSTEM PARAMETER DEFINITION * * LEVEL 3 FLOW CONTROL WINDOW SIZE (1-7) WINDOW EQU 2 * * MAXIMAL NUMBER OF WORK STATIONS PER PLC (1-32) MAXWS EQU 32 * * DELAY BEFORE EXECUTING "TEST CU" AT RESTART. (IN 100 MS) STADLY EQU 100 10 SECONDS * * LENGTH OF USER PART OF SHORT OUTPUT BUFFER IN WORDS (1-128) SOBUFU EQU 3 * * LENGTH OF USER PART OF GENERAL READ BUFFER IN WORDS (1-128) GRBUFU EQU 70 * * INACTIVITY TIMER (MINUTES) TIMACT EQU 5 * * IF PLCTST IS 1 THE PLC DIAGNOSTIC COMMANDS ARE HANDLED * BY THIS DRIVER. * PLCTST EQU 0 * * * A TEST VERSION OF THE DRIVER IS OBTAINED BY SETTING UTTEST><0 * IF UTTEST=1 THE TEST CODE IS INCLUDUD BUT TRAP IS NOT USED * IF UTTEST=2 THE TEST CODE IS INCLUDED AND TRAP IS USED * UTTEST EQU 0 * * * LOBUFN IS THE NUMBER OF LONG OUTPUT BUFFERS USED * FOR EACH PLC (1-6) * LOBUFN EQU 3 * * * LOBUFU IS THE LENGTH OF THE USER PART OF A LONG * OUTPUT BUFFER IN WORDS (1-128) * LOBUFU EQU 70 * EJECT * * HARDWARE INTERRUPT LEVELS * THESE LEVELS MUST CORRESPOND TO INTERRUPT * VECTOR IN SYSTAB * INTLV0 EQU 26 PLC NUMBER 1 INTLV1 EQU 27 PLC NUMBER 2 INTLV2 EQU 24 PLC NUMBER 3 INTLV3 EQU 25 PLC NUMBER 4 INTRV0 EQU 18 PLC NUMBER 5, REMOTE INTRV1 EQU 19 6, REMOTE INTRV2 EQU 20 7, REMOTE INTRV3 EQU 21 8, REMOTE * * CHANNEL UNIT DEVICE ADDRESSES * PLCDA0 EQU /06 PLC 1 PLCDA1 EQU /07 PLC 2 PLCDA2 EQU /26 PLC 3 PLCDA3 EQU /27 PLC 4 PLCDA4 EQU /3A PLC 5 PLCDA5 EQU /3B PLC 6 PLCDA6 EQU /2A PLC 7 PLCDA7 EQU /2B PLC 8 * EJECT * * BUFFER AREA PARAMETER DEFINITION * HEADLW EQU 4 BUFFER HEADER LENGTH (WORDS) FLOWLW EQU 2 FLOW CONTROL FIELD LENGTH (WORDS) SYSTLW EQU HEADLW+FLOWLW SYSTEM PART OF BUFFER * * LONG OUTPUT BUFFERS LOBUF1 EQU SYSTLW+LOBUFU LENGTH OF ONE BUFFER (WORDS) LOBUF2 EQU LOBUF1+LOBUF1 2 BUFFERS LOBUF3 EQU LOBUF2+LOBUF1 LOBUF4 EQU LOBUF3+LOBUF1 LOBUF5 EQU LOBUF4+LOBUF1 LOBUF6 EQU LOBUF5+LOBUF1 IFT LOBUFN=1 LOBUFS EQU LOBUF1 LENGTH OF BUFFER AREA (WORDS) XIF IFT LOBUFN=2 LOBUFS EQU LOBUF2 LENGTH OF BUFFER AREA (WORDS) XIF IFT LOBUFN=3 LOBUFS EQU LOBUF3 LENGTH OF BUFFER AREA (WORDS) XIF IFT LOBUFN=4 LOBUFS EQU LOBUF4 LENGTH OF BUFFER AREA (WORDS) XIF IFT LOBUFN=5 LOBUFS EQU LOBUF5 LENGTH OF BUFFER AREA (WORDS) XIF IFT LOBUFN=6 LOBUFS EQU LOBUF6 LENGTH OF BUFFER AREA (WORDS) XIF * EJECT * * SHORT OUTPUT BUFFERS SOBUF1 EQU SYSTLW+SOBUFU LENGTH OF ONE BUFFER (WORDS) SOBUF2 EQU SOBUF1+SOBUF1 2 BUFFERS SOBUF4 EQU SOBUF2+SOBUF2 SOBUF8 EQU SOBUF4+SOBUF4 SOBUFS EQU SOBUF8 LENGTH OF BUFFER AREA (WORDS) * * GENERAL READ BUFFERS GRBUF1 EQU SYSTLW+GRBUFU LENGTH OF ONE BUFFER (WORDS) GRBUF2 EQU GRBUF1+GRBUF1 GRBUFS EQU GRBUF2 LENGTH OF BUFFER AREA (WORDS) * * LENGTHS OF USER PART OF BUFFERS (BYTES) SOBUFL EQU SOBUFU+SOBUFU SHORT OUTPUT BUFFERS LOBUFL EQU LOBUFU+LOBUFU LONG OUTPUT BUFFERS GRBUFL EQU GRBUFU+GRBUFU GENERAL READ BUFFERS * EJECT * * CONTROLLER COMMAND RECORD (CCR) LAYOUT * CCRDLS EQU 0 DATA LINK STATION INDEX CCRCMD EQU 1 COMMAND CODE CCRSU1 EQU 2 SUBCOMMAND BYTE 1 CCRSU2 EQU 3 SUBCOMMAND BYTE 2 CCRSUB EQU 2 SUBCOMMAND WORD CCRSTA EQU 4 STATUS WORD CCRIDB EQU 7 IDENTITY, BYTE FIELD CCRIDW EQU 8 IDENTITY, WORD FIELD CCRLEN EQU 10 BUFFER LENGTH (BYTES) CCRC1B EQU 12 DATA CHAINING CTRL & MSB BUFFER ADDR CCRBUF EQU 14 BUFFER ADDRESS * * * BUFFER LAYOUT * * HEADER LENGTH BUFHLN EQU HEADLW+HEADLW LENGTH (BYTES) * HEADER LAYOUT BUFLNK EQU -8 FREE LIST LINK BUFDWT EQU -6 DWT ADDRESS BUFLEN EQU -4 LENGTH OF TEXT IN BUFFER BUFBIX EQU -2 BYTE INDEX * X25 CONTROL FIELD LAYOUT X25LGN EQU 0 LOGICAL CHANNEL GROUP NUMBER X25LCN EQU 1 LOGICAL CHANNEL NUMBER X25FLW EQU 2 FLOW CONTROL INFORMATION X25DAT EQU 3 START OF USER DATA * EJECT * * PLC COMMAND CODES * CMDTC EQU /80 TEST CHANNEL UNIT CMDOP EQU /86 OPEN LINE CMDOD EQU /85 OPEN DLS CMDPS EQU /84 GET LINE STATISTICS CMDDS EQU /83 GET DLS STATISTICS CMDRM EQU /87 READ LOCAL MEMORY CMDSW EQU /40 STANDARD WRITE CMDFW EQU /41 FAST WRITE CMDGR EQU /20 GENERAL READ * * * APPLICATION TEST COMMAND CODES * ORDPS EQU 1 GET LINE STATISTICS ORDDS EQU 2 GER DLS STATISTICS ORDRM EQU 3 READ LOCAL MEMORY * * * MESSAGE TYPES * TYERR EQU 0 ILLEGAL TYPE OR ERROR TYNFLO EQU 2 DATA PACKET WITH NO FLOW CONTROL TYSTAT EQU 4 DEVICE STATUS MESSAGE TYDATA EQU 6 NORMAL DATA PACKET TYRR EQU 8 RECIEVE READY PACKET TYRES EQU 10 RESET PACKET TYRESC EQU 12 RESET CONFIRMATION PACKET * EJECT * * DWT STATUS FLAGS (DWTST) * DWFBSY EQU /8000 DEVICE NOT BUSY DWFECH EQU /2000 ECHO MODE DWFINP EQU /0020 INPUT REQUESTED DWFRES EQU /0008 RESET SEQUENCE ACTIVE DWFAK3 EQU /0004 WAITING FOR LEVEL 3 ACK DWFPLC EQU DWFRES+DWFAK3 PLC FLAGS DWFTY1 EQU /0002 USE ONLY TYPE 1 DATA PACKETS DWFSAC EQU /0001 WAIT FOR LEVEL 3 ACK * * * PLC STATUS FLAGS (CCRSTA) * STANOC EQU /0001 NO CONNECTION STALIR EQU /0004 LINK RESET STADNO EQU /1000 DCE NOT OPERABLE STAE1 EQU STANOC+STALIR DUMMY STAERR EQU STAE1+STADNO ERROR IN COMMUNICATION * STAREQ EQU /8000 REQUEST ERROR STANOB EQU /0800 NO BUFFERS FOR CCR STAPOL EQU /0100 POLLING STOPPED STACOM EQU /0080 COMMUNICATION REESTABLISHED STASEQ EQU /0010 SEQUENCE ERROR STAILL EQU /0008 ILLEGAL LENGTH STALER EQU /0002 LINK ERROR * EJECT * * WORK STATION STATUS FLAGS * WSFERR EQU /01 COMMUNICATION ERROR * * * MASKS FOR CHANNEL PARAMETERS * MASKPL EQU /0F PLC NUMBER (0-3 USED) MASKWS EQU /3F WORK STATION NUMBER (1-32 USED) MASKLC EQU /3F LOGICAL CHANNEL (0-7 USED) * * * RETURN CODES * * AT REQUEST RETURN NOTOPR EQU /0001 NOT OPERABLE LINERR EQU /0004 LINK ERROR PLSERR EQU /0001 SOFTWARE ERROR * AT RECOVERY ENTRY RETCP EQU /0001 TC POWER UP RESECP EQU /0002 SECONDARY POWER UP RELINE EQU /0004 LINK ERROR * * * MISCELLANEOUS * PLCERR EQU /F1 SOP ERROR CODE AT TRAP CIDINT EQU 8 OFFSET TO INTERRUPT DESCRIPTOR MAXFR EQU 4 MAX OUTSTANDING FRAMES ON LEVEL 2 * EJECT * ************** * DATA AREAS * ************** * * CWT ADDRESS TABLE * CWTPLC EQU * TABCWT EQU * IFF PLCNRL=0 DATA PL0CWT CWT FOR PLC NR 1 IFF PLCNRL=1 DATA PL1CWT CWT FOR PLC NR 2 IFF PLCNRL=2 DATA PL2CWT CWT FOR PLC NR 3 IFF PLCNRL=3 DATA PL3CWT CWT FOR PLC NR 4 XIF * IFF PLCNRL=4 DATA 0 PLC NR 4 NOT CONNECTED IFF PLCNRL=3 DATA 0 PLC NR 3 NOT CONNECTED IFF PLCNRL=2 DATA 0 PLC NR 2 NOT CONNECTED IFF PLCNRL=1 =5 DATA 0 PLC NR 1 NOT CONNECTED =5 XIF * IFF PLCNRR=0 DATA PR1CWT CWT FOR PLC NR. 5, REM. IFF PLCNRR=1 DATA PR2CWT CWT FOR PLC NR. 6, REM. IFF PLCNRR=2 DATA PR3CWT CWT FOR PLC NR. 7, REM. IFF PLCNRR=3 DATA PR4CWT CWT FOR PLC NR. 8, REM. XIF * IFF PLCNRR=4 DATA 0 PLC NR 8 NOT CONNECTED IFF PLCNRR=3 DATA 0 PLC NR 7 NOT CONNECTED IFF PLCNRR=2 DATA 0 PLC NR 6 NOT CONNECTED IFF PLCNRR=1 DATA 0 PLC NR 5 NOT CONNECTED XIF * EJECT * * OPARR1 EQU * IFF PLCNRR=0 U =5 DATA OPNR10 LINE 0 DATA OPNR11 LINE 1 DATA OPNR12 LINE 2 DATA OPNR13 LINE 3 XIF OPARR2 EQU * IFF PLCNRR=0 U =5 IFF PLCNRR=1 U =5 DATA OPNR20 LINE 0 DATA OPNR21 LINE 1 DATA OPNR22 LINE 2 DATA OPNR23 LINE 3 XIF OPARR3 EQU * IFF PLCNRR=0 U =5 IFF PLCNRR=1 U =5 IFF PLCNRR=2 U =5 DATA OPNR30 LINE 0 DATA OPNR31 LINE 1 DATA OPNR32 LINE 2 DATA OPNR33 LINE 3 XIF OPARR4 EQU * IFF PLCNRR=0 U =5 IFF PLCNRR=1 U =5 IFF PLCNRR=2 U =5 IFF PLCNRR=3 U =5 DATA OPNR40 LINE 0 DATA OPNR41 LINE 1 DATA OPNR42 LINE 2 DATA OPNR43 LINE 3 XIF * OPARL1 EQU * U =5 DATA OPNL10 LOCAL PLC 1 =5 OPARL2 EQU * U =5 DATA OPNL20 LOCAL PLC 2 =5 OPARL3 EQU * U =5 DATA OPNL30 LOCAL PLC 3 =5 OPARL4 EQU * U =5 DATA OPNL40 LOCAL PLC 4 =5 EJECT * * OPEN LINE PARAMETER AREAS, LOCAL * * STANDARD AREAS : * PRIMARY STATION * FULL DUPLEX * 96000 BITS/SEC * NO NRZI ENCODING * 5 RETRANSMISSIONS * 5 MIN. TIME OUT * * OPNL40 EQU * LOCAL PLC 4, LINE 0 IFF PLCNRL=0 IFF PLCNRL=1 IFF PLCNRL=2 IFF PLCNRL=3 DATA /0101,/A000,/0D05,TIMACT,0,0 XIF OPNL30 EQU * LOCAL PLC 3, LINE 0 IFF PLCNRL=0 IFF PLCNRL=1 IFF PLCNRL=2 DATA /0101,/A000,/0D05,TIMACT,0,0 U =3 XIF OPNL20 EQU * LOCAL PLC 2, LINE 0 IFF PLCNRL=0 IFF PLCNRL=1 DATA /0101,/A000,/0D05,TIMACT,0,0 XIF OPNL10 EQU * LOCAL PLC 1, LINE 0 IFF PLCNRL=0 DATA /0101,/A000,/0D05,TIMACT,0,0 XIF * * END OF LOCAL LINE PARAMETER AREAS * EJECT * * OPEN LINE PARAMETER AREAS, REMOTE * * STANDARD AREAS : * PRIMARY STATION * FULL DUPLEX * 2400 BITS/SEC * NO NRZI ENCODING * POLLING 13HZ * 5 RETRANSMISSIONS * 5 MIN. TIME OUT * * * REMOTE PLC 4 OPNR40 EQU * LINE 0 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 IFF PLCNRR=3 DATA /0103,/0400,/0D05,TIMACT,/0108,0 XIF OPNR41 EQU * LINE 1 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 IFF PLCNRR=3 DATA /0103,/0400,/0D05,TIMACT,/0908,0 XIF OPNR42 EQU * LINE 3 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 IFF PLCNRR=3 DATA /0103,/0400,/0D05,TIMACT,/0B08,0 XIF OPNR43 EQU * LINE 3 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 IFF PLCNRR=3 DATA /0103,/0400,/0D05,TIMACT,/1308,0 XIF * REMOTE PLC 3 OPNR30 EQU * LINE 0 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 DATA /0103,/0400,/0D05,TIMACT,/0108,0 XIF OPNR31 EQU * LINE 1 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 DATA /0103,/0400,/0D05,TIMACT,/0908,0 XIF OPNR32 EQU * LINE 2 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 DATA /0103,/0400,/0D05,TIMACT,/0B08,0 XIF OPNR33 EQU * LINE 3 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 DATA /0103,/0400,/0D05,TIMACT,/1308,0 XIF * * REMOTE PLC 2 OPNR20 EQU * LINE 0 IFF PLCNRR=0 IFF PLCNRR=1 DATA /0103,/0400,/0D05,TIMACT,/0108,0 XIF OPNR21 EQU * LINE 1 IFF PLCNRR=0 IFF PLCNRR=1 DATA /0103,/0400,/0D05,TIMACT,/0908,0 XIF OPNR22 EQU * LINE 2 IFF PLCNRR=0 IFF PLCNRR=1 DATA /0103,/0400,/0D05,TIMACT,/0B08,0 XIF OPNR23 EQU * LINE 3 IFF PLCNRR=0 IFF PLCNRR=1 DATA /0103,/0400,/0D05,TIMACT,/1308,0 XIF * * REMOTE PLC 1 OPNR10 EQU * LINE 0 IFF PLCNRR=0 DATA /0103,/0400,/0D05,TIMACT,/0108,0 XIF OPNR11 EQU * LINE 1 IFF PLCNRR=0 DATA /0103,/0400,/0D05,TIMACT,/0908,0 XIF OPNR12 EQU * LINE 2 IFF PLCNRR=0 DATA /0103,/0400,/0D05,TIMACT,/0B08,0 XIF OPNR13 EQU * LINE 3 IFF PLCNRR=0 DATA /0103,/0400,/0D05,TIMACT,/1308,0 XIF * END OF REMOTE LINE PARAMETER AREAS * * PLCPFP DATA 0 PLC LOCAL POWER FAIL FLAG * IFF UTTEST=0 TEST VERSION OF DRIVER * EJECT * UTTST DATA UTTEST 1 = TRAP NOT USED * * * QUEUE STATISTICS COUNTERS * EACH COUNTER HAS ONE WORD / PLC * STATAR EQU * WIQSTA RES 8 WINDOW QUEUE SBQSTA RES 8 SHORT BUFFERS QUEUE LBQSTA RES 8 LONG BUFFERS QUEUE CCQSTA RES 8 CCA QUEUE STATLN EQU *-STATAR TABLE LENGTH * XIF EJECT * * * CWT DISPLACEMENTS * CWTOPR EQU /00 CU OPERABLE CWTCCB EQU /02 CCA BUSY CWTGR EQU /04 GENERAL READ ALLOWED CWTPNR EQU /06 CU NUMBER (0-7) CWTABW EQU /08 WS TO ABORT CWTPLS EQU /0A LATEST PLC RCA STATUS CWTLNO EQU /0C LINE NO INDICATOR CWTPAR EQU /0E INDEX TO PARAMETER AREA CWTOPP EQU /10 OPEN LINE PARAMETER AREA ADDRESS =2 CWTINT EQU /12 WS TABLE ADDRESS CWTBUF EQU /14 INP. BUFFER ADDRESS CWTSBQ EQU /16 QUEUE FOR SHORT OUTP. BUFFERS CWTLBQ EQU /18 QUEUE FOR LONG OUTP. BUFFERS CWTCCQ EQU /1A QUEUE FOR CCA FREE CWTMBQ EQU /1C QUEUE OF ALLOCATED MON. BLOCKS CWTTPR EQU /1E TIMER POINTER CWTCIO EQU /20 CIO START INSTR. CWTST3 EQU /22 SST INSTR. CWTCSD EQU /24 CTRL UNIT START DESCRIPTOR CWTCID EQU /2A CTRL UNIT INTERF. DESCR. CWTCCA EQU /34 COMMAND CTRL AREA CWTRCA EQU /44 RESPONSE CTRL AREA CWTPBS EQU /54 POOLBL. SHORT OUTP. BUFFERS CWTPBL EQU /5E POOLBL. LONG OUTP. BUFFERS =2 CWTPBG EQU /68 POOLBL. GENERAL READ BUFFERS CWTWSS EQU /72 WS STATUS CWTSOB EQU MAXWS+MAXWS+/74 SH. OUTP. BUFFERS =4 CWTLOB EQU CWTSOB+SOBUFS LONG OUTP. BUFFERS CWTGRB EQU CWTLOB+LOBUFS GEN. READ BUFFERS EJECT * IFF PLCNRL=0 * CWT FOR PLC NUMBER 1 * PL0CWT EQU * * * FLAGS RES 1 PLC OPERABLE FLAG DATA 0 CCA BUSY FLAG (0=FREE) DATA 1 GENERAL READ ALLOWED (0=ALLOWED) * * DATA WORDS DATA 0 PLC NUMBER (0-3) DATA 0 WORK STATION TO ABORT (0=NO ABORT) DATA 0 LATEST PLC RCA STATUS DATA 0 LINE NO INDICATOR DATA 0 INDEX PARAMETER AREA * * POINTERS AND QUEUE HEADS DATA OPARL1 OPEN LINE PARAMETER AREA ADDR DATA INTPL1 WORK STATION TABLE ADDRESS DATA 0 INPUT BUFFER ADDRESS DATA 0 QUEUE FOR SHORT OUTPUT BUFFER DATA 0 QUEUE FOR LONG OUTPUT BUFFER DATA 0 QUEUE FOR CCA FREE DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS DATA 0 TIMER POINTER FOR RESTART DELAY * * INSTRUCTIONS CIO A3,1,PLCDA0 START I/O OPERATION SST A3,PLCDA0 RELEASE RCA AND RESET INTERRUPT * * PLC CONTROL AREAS * CONTROL UNIT START DESCRIPTOR (3 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PL0CWT+CWTCID CID ADDRESS DATA INTLV0 INTERRUPT LEVEL * CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PL0CWT+CWTCCA CCA ADDRESS DATA 0 DUMMY & MSB ADDRESS DATA PL0CWT+CWTRCA RCA ADDRESS DATA 0 INTERRUPT SPECIFICATION RES 8 COMMAND CONTROL AREA RES 8 RESPONSE CONTROL AREA * * POOLBLOCKS DATA 'SO',0 ID & FLAGS DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH DATA SOBUFS+SOBUFS AREA LENGTH DATA 'LO',0 DATA 0,LOBUF1+LOBUF1 DATA LOBUFS+LOBUFS DATA 'GR',0 DATA 0,GRBUF1+GRBUF1 DATA GRBUFS+GRBUFS * * WORK STATION STATUS WORDS. 1 WORD / WS RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. * * BUFFER AREAS RES SOBUFS SHORT OUTPUT BUFFERS RES LOBUFS LONG OUTPUT BUFFERS RES GRBUFS GENERAL READ BUFFERS * * XIF IFF PLCNRL=1 * EJECT * * CWT FOR PLC NUMBER 2 * PL1CWT EQU * * * FLAGS RES 1 PLC OPERABLE FLAG DATA 0 CCA BUSY FLAG (0=FREE) DATA 1 GENERAL READ ALLOWED (0=ALLOWED) * * DATA WORDS DATA 1 PLC NUMBER (0-3) DATA 0 WORK STATION TO ABORT (0=NO ABORT) DATA 0 LATEST PLC RCA STATUS DATA 0 LINE NO INDICATOR DATA 0 INDEX TO PARAMETER AREA * * POINTERS AND QUEUE HEADS DATA OPARL2 OPEN LINE PARAMETER AREA ADDR DATA INTPL2 WORK STATION TABLE ADDRESS DATA 0 INPUT BUFFER ADDRESS DATA 0 QUEUE FOR SHORT OUTPUT BUFFER DATA 0 QUEUE FOR LONG OUTPUT BUFFER DATA 0 QUEUE FOR CCA FREE DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS DATA 0 TIMER POINTER FOR RESTART DELAY * * INSTRUCTIONS CIO A3,1,PLCDA1 START I/O OPERATION SST A3,PLCDA1 RELEASE RCA AND RESET INTERRUPT * * PLC CONTROL AREAS * CONTROL UNIT START DESCRIPTOR (3 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PL1CWT+CWTCID CID ADDRESS DATA INTLV1 INTERRUPT LEVEL * CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PL1CWT+CWTCCA CCA ADDRESS DATA 0 DUMMY & MSB ADDRESS DATA PL1CWT+CWTRCA RCA ADDRESS DATA 0 INTERRUPT SPECIFICATION RES 8 COMMAND CONTROL AREA RES 8 RESPONSE CONTROL AREA * * POOLBLOCKS (5 WORDS / BLOCK) DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH DATA SOBUFS+SOBUFS AREA LENGTH DATA 'LO',0 ID = "LONG OUTPUT" DATA 0,LOBUF1+LOBUF1 DATA LOBUFS+LOBUFS DATA 'GR',0 ID = "GENERAL READ" DATA 0,GRBUF1+GRBUF1 DATA GRBUFS+GRBUFS * * WORK STATION STATUS WORDS. 1 WORD / WS RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. * * BUFFER AREAS RES SOBUFS SHORT OUTPUT BUFFERS RES LOBUFS LONG OUTPUT BUFFERS RES GRBUFS GENERAL READ BUFFERS * * IFF PLCNRL=2 * EJECT * * CWT FOR PLC NUMBER 3 * PL2CWT EQU * * * FLAGS RES 1 PLC OPERABLE FLAG DATA 0 CCA BUSY FLAG (0=FREE) DATA 1 GENERAL READ ALLOWED (0=ALLOWED) * * DATA WORDS DATA 2 PLC NUMBER (0-3) DATA 0 WORK STATION TO ABORT (0=NO ABORT) DATA 0 LATEST PLC RCA STATUS DATA 0 LINE NO INDICATOR DATA 0 INDEX TO PARAMETER AREA * * POINTERS AND QUEUE HEADS DATA OPARL3 OPEN LINE PARAMETER AREA ADDR DATA INTPL3 WORK STATION TABLE ADDRESS DATA 0 INPUT BUFFER ADDRESS DATA 0 QUEUE FOR SHORT OUTPUT BUFFER DATA 0 QUEUE FOR LONG OUTPUT BUFFER DATA 0 QUEUE FOR CCA FREE DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS DATA 0 TIMER POINTER FOR RESTART DELAY * * INSTRUCTIONS CIO A3,1,PLCDA2 START I/O OPERATION SST A3,PLCDA2 RELEASE RCA AND RESET INTERRUPT * * PLC CONTROL AREAS * CONTROL UNIT START DESCRIPTOR (3 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PL2CWT+CWTCID CID ADDRESS DATA INTLV2 INTERRUPT LEVEL * CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PL2CWT+CWTCCA CCA ADDRESS DATA 0 DUMMY & MSB ADDRESS DATA PL2CWT+CWTRCA RCA ADDRESS DATA 0 INTERRUPT SPECIFICATION RES 8 COMMAND CONTROL AREA RES 8 RESPONSE CONTROL AREA * * POOLBLOCKS (5 WORDS / BLOCK) DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH DATA SOBUFS+SOBUFS AREA LENGTH DATA 'LO',0 ID = "LONG OUTPUT" DATA 0,LOBUF1+LOBUF1 DATA LOBUFS+LOBUFS DATA 'GR',0 ID = "GENERAL READ" DATA 0,GRBUF1+GRBUF1 DATA GRBUFS+GRBUFS * * WORK STATION STATUS WORDS. 1 WORD / WS RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. * * BUFFER AREAS RES SOBUFS SHORT OUTPUT BUFFERS RES LOBUFS LONG OUTPUT BUFFERS RES GRBUFS GENERAL READ BUFFERS * * IFF PLCNRL=3 * EJECT * * CWT FOR PLC NUMBER 4 * PL3CWT EQU * * * FLAGS RES 1 PLC OPERABLE FLAG DATA 0 CCA BUSY FLAG (0=FREE) DATA 1 GENERAL READ ALLOWED (0=ALLOWED) * * DATA WORDS DATA 3 PLC NUMBER (0-3) DATA 0 WORK STATION TO ABORT (0=NO ABORT) DATA 0 LATEST PLC RCA STATUS DATA 0 LINE NO INDICATOR DATA 0 INDEX TO PARAMETER AREA * * POINTERS AND QUEUE HEADS DATA OPARL4 OPEN LINE PARAMETER AREA ADDR DATA INTPL4 WORK STATION TABLE ADDRESS DATA 0 INPUT BUFFER ADDRESS DATA 0 QUEUE FOR SHORT OUTPUT BUFFER DATA 0 QUEUE FOR LONG OUTPUT BUFFER DATA 0 QUEUE FOR CCA FREE DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS DATA 0 TIMER POINTER FOR RESTART DELAY * * INSTRUCTIONS CIO A3,1,PLCDA3 START I/O OPERATION SST A3,PLCDA3 RELEASE RCA AND RESET INTERRUPT * * PLC CONTROL AREAS * CONTROL UNIT START DESCRIPTOR (3 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PL3CWT+CWTCID CID ADDRESS DATA INTLV3 INTERRUPT LEVEL * CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PL3CWT+CWTCCA CCA ADDRESS DATA 0 DUMMY & MSB ADDRESS DATA PL3CWT+CWTRCA RCA ADDRESS DATA 0 INTERRUPT SPECIFICATION RES 8 COMMAND CONTROL AREA RES 8 RESPONSE CONTROL AREA * * POOLBLOCKS (5 WORDS / BLOCK) DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH DATA SOBUFS+SOBUFS AREA LENGTH DATA 'LO',0 ID = "LONG OUTPUT" DATA 0,LOBUF1+LOBUF1 DATA LOBUFS+LOBUFS DATA 'GR',0 ID = "GENERAL READ" DATA 0,GRBUF1+GRBUF1 DATA GRBUFS+GRBUFS * * WORK STATION STATUS WORDS. 1 WORD / WS RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. * * BUFFER AREAS RES SOBUFS SHORT OUTPUT BUFFERS RES LOBUFS LONG OUTPUT BUFFERS RES GRBUFS GENERAL READ BUFFERS XIF * EJECT IFF PLCNRR=0 * * CWT FOR PLC NUMBER 5 REMOTE * PR1CWT EQU * * * FLAGS RES 1 PLC OPERABLE FLAG DATA 0 CCA BUSY FLAG (0=FREE) DATA 1 GENERAL READ ALLOWED (0=ALLOWED) * * DATA WORDS DATA 4 PLC NUMBER (4-7) =5 DATA 0 WORK STATION TO ABORT (0=NO ABORT) DATA 0 LATEST PLC RCA STATUS DATA 0 LINE NO INDICATOR DATA 0 INDEX TO PARAMETER AREAS * * POINTERS AND QUEUE HEADS DATA OPARR1 OPEN LINE PARAMETER AREA ADDRESSES DATA INTPR1 WORK STATION TABLE ADDRESS DATA 0 INPUT BUFFER ADDRESS DATA 0 QUEUE FOR SHORT OUTPUT BUFFER DATA 0 QUEUE FOR LONG OUTPUT BUFFER DATA 0 QUEUE FOR CCA FREE DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS DATA 0 TIMER POINTER FOR RESTART DELAY * * INSTRUCTIONS CIO A3,1,PLCDA4 START I/O OPERATION SST A3,PLCDA4 RELEASE RCA AND RESET INTERRUPT * * PLC CONTROL AREAS * CONTROL UNIT START DESCRIPTOR (3 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PR1CWT+CWTCID CID ADDRESS DATA INTRV0 INTERRUPT LEVEL * CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PR1CWT+CWTCCA CCA ADDRESS DATA 0 DUMMY & MSB ADDRESS DATA PR1CWT+CWTRCA RCA ADDRESS DATA 0 INTERRUPT SPECIFICATION RES 8 COMMAND CONTROL AREA RES 8 RESPONSE CONTROL AREA * * POOLBLOCKS (5 WORDS / BLOCK) DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH DATA SOBUFS+SOBUFS AREA LENGTH DATA 'LO',0 ID = "LONG OUTPUT" DATA 0,LOBUF1+LOBUF1 DATA LOBUFS+LOBUFS DATA 'GR',0 ID = "GENERAL READ" DATA 0,GRBUF1+GRBUF1 DATA GRBUFS+GRBUFS * * WORK STATION STATUS WORDS. 1 WORD / WS RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. * * BUFFER AREAS RES SOBUFS SHORT OUTPUT BUFFERS RES LOBUFS LONG OUTPUT BUFFERS RES GRBUFS GENERAL READ BUFFERS * * EJECT IFF PLCNRR=1 * * CWT FOR PLC NUMBER 6 REMOTE * PR2CWT EQU * * * FLAGS RES 1 PLC OPERABLE FLAG DATA 0 CCA BUSY FLAG (0=FREE) DATA 1 GENERAL READ ALLOWED (0=ALLOWED) * * DATA WORDS DATA 5 PLC NUMBER (4-7) =5 DATA 0 WORK STATION TO ABORT (0=NO ABORT) DATA 0 LATEST PLC RCA STATUS DATA 0 LINE NO INDICATOR =5 DATA 0 INDEX TO PARAMETER AREAS =5 * * POINTERS AND QUEUE HEADS DATA OPARR2 OPEN LINE PARAMETER AREA ADDRESSES DATA INTPR2 WORK STATION TABLE ADDRESS DATA 0 INPUT BUFFER ADDRESS DATA 0 QUEUE FOR SHORT OUTPUT BUFFER DATA 0 QUEUE FOR LONG OUTPUT BUFFER DATA 0 QUEUE FOR CCA FREE DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS DATA 0 TIMER POINTER FOR RESTART DELAY * * INSTRUCTIONS CIO A3,1,PLCDA5 START I/O OPERATION SST A3,PLCDA5 RELEASE RCA AND RESET INTERRUPT * * PLC CONTROL AREAS * CONTROL UNIT START DESCRIPTOR (3 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PR2CWT+CWTCID CID ADDRESS DATA INTRV1 INTERRUPT LEVEL * CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PR2CWT+CWTCCA CCA ADDRESS DATA 0 DUMMY & MSB ADDRESS DATA PR2CWT+CWTRCA RCA ADDRESS DATA 0 INTERRUPT SPECIFICATION RES 8 COMMAND CONTROL AREA RES 8 RESPONSE CONTROL AREA * * POOLBLOCKS (5 WORDS / BLOCK) DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH DATA SOBUFS+SOBUFS AREA LENGTH DATA 'LO',0 ID = "LONG OUTPUT" DATA 0,LOBUF1+LOBUF1 DATA LOBUFS+LOBUFS DATA 'GR',0 ID = "GENERAL READ" DATA 0,GRBUF1+GRBUF1 DATA GRBUFS+GRBUFS * * WORK STATION STATUS WORDS. 1 WORD / WS RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. * * BUFFER AREAS RES SOBUFS SHORT OUTPUT BUFFERS RES LOBUFS LONG OUTPUT BUFFERS RES GRBUFS GENERAL READ BUFFERS * * EJECT IFF PLCNRR=2 * * CWT FOR PLC NUMBER 7 REMOTE * PR3CWT EQU * * * FLAGS RES 1 PLC OPERABLE FLAG DATA 0 CCA BUSY FLAG (0=FREE) DATA 1 GENERAL READ ALLOWED (0=ALLOWED) * * DATA WORDS DATA 6 PLC NUMBER (4-7) =5 DATA 0 WORK STATION TO ABORT (0=NO ABORT) DATA 0 LATEST PLC RCA STATUS DATA 0 LINE NO INDICATOR DATA 0 INDEX TO PARAMETER AREAS * * POINTERS AND QUEUE HEADS DATA OPARR3 OPEN LINE PARAMETER AREA ADDRESSES DATA INTPR3 WORK STATION TABLE ADDRESS DATA 0 INPUT BUFFER ADDRESS DATA 0 QUEUE FOR SHORT OUTPUT BUFFER DATA 0 QUEUE FOR LONG OUTPUT BUFFER DATA 0 QUEUE FOR CCA FREE DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS DATA 0 TIMER POINTER FOR RESTART DELAY * * INSTRUCTIONS CIO A3,1,PLCDA6 START I/O OPERATION SST A3,PLCDA6 RELEASE RCA AND RESET INTERRUPT * * PLC CONTROL AREAS * CONTROL UNIT START DESCRIPTOR (3 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PR3CWT+CWTCID CID ADDRESS DATA INTRV2 INTERRUPT LEVEL * CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PR3CWT+CWTCCA CCA ADDRESS DATA 0 DUMMY & MSB ADDRESS DATA PR3CWT+CWTRCA RCA ADDRESS DATA 0 INTERRUPT SPECIFICATION RES 8 COMMAND CONTROL AREA RES 8 RESPONSE CONTROL AREA * * POOLBLOCKS (5 WORDS / BLOCK) DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH DATA SOBUFS+SOBUFS AREA LENGTH DATA 'LO',0 ID = "LONG OUTPUT" DATA 0,LOBUF1+LOBUF1 DATA LOBUFS+LOBUFS DATA 'GR',0 ID = "GENERAL READ" DATA 0,GRBUF1+GRBUF1 DATA GRBUFS+GRBUFS * * WORK STATION STATUS WORDS. 1 WORD / WS RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. * * BUFFER AREAS RES SOBUFS SHORT OUTPUT BUFFERS RES LOBUFS LONG OUTPUT BUFFERS RES GRBUFS GENERAL READ BUFFERS * * EJECT IFF PLCNRR=3 * * CWT FOR PLC NUMBER 8 REMOTE * PR4CWT EQU * * * FLAGS RES 1 PLC OPERABLE FLAG DATA 0 CCA BUSY FLAG (0=FREE) DATA 1 GENERAL READ ALLOWED (0=ALLOWED) * * DATA WORDS DATA 7 PLC NUMBER (4-7) =5 DATA 0 WORK STATION TO ABORT (0=NO ABORT) DATA 0 LATEST PLC RCA STATUS DATA 0 LINE NO INDICATOR DATA 0 INDEX TO PARAMETER AREAS * * POINTERS AND QUEUE HEADS DATA OPARR4 OPEN LINE PARAMETER AREA ADDRESSES DATA INTPR4 WORK STATION TABLE ADDRESS DATA 0 INPUT BUFFER ADDRESS DATA 0 QUEUE FOR SHORT OUTPUT BUFFER DATA 0 QUEUE FOR LONG OUTPUT BUFFER DATA 0 QUEUE FOR CCA FREE DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS DATA 0 TIMER POINTER FOR RESTART DELAY * * INSTRUCTIONS CIO A3,1,PLCDA7 START I/O OPERATION SST A3,PLCDA7 RELEASE RCA AND RESET INTERRUPT * * PLC CONTROL AREAS * CONTROL UNIT START DESCRIPTOR (3 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PR4CWT+CWTCID CID ADDRESS DATA INTRV3 INTERRUPT LEVEL * CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) DATA 0 DUMMY & MSB ADDRESS DATA PR4CWT+CWTCCA CCA ADDRESS DATA 0 DUMMY & MSB ADDRESS DATA PR4CWT+CWTRCA RCA ADDRESS DATA 0 INTERRUPT SPECIFICATION RES 8 COMMAND CONTROL AREA RES 8 RESPONSE CONTROL AREA * * POOLBLOCKS (5 WORDS / BLOCK) DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH DATA SOBUFS+SOBUFS AREA LENGTH DATA 'LO',0 ID = "LONG OUTPUT" DATA 0,LOBUF1+LOBUF1 DATA LOBUFS+LOBUFS DATA 'GR',0 ID = "GENERAL READ" DATA 0,GRBUF1+GRBUF1 DATA GRBUFS+GRBUFS * * WORK STATION STATUS WORDS. 1 WORD / WS RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. * * BUFFER AREAS RES SOBUFS SHORT OUTPUT BUFFERS RES LOBUFS LONG OUTPUT BUFFERS RES GRBUFS GENERAL READ BUFFERS * * XIF EJECT * * I/O COMPLETION DISPATCH TABLE * * THE MOST FREQUENTLY USED ROUTINES ARE PLACED * AT THE END OF THE TABLE, AS IT IS SCANNED * FROM THE END. * CMDTAB EQU * DATA CMDTC COMMAND CODE "TEST CHANNEL UNIT" DATA COMPTC START OF "TEST CU" COMPLETION ROUTINE DATA 0 ALLOWED STATUS FOR "TEST CU" COMMAND CMDTB1 EQU *-CMDTAB LENGTH OF ONE ENTRY DATA CMDOP OPEN LINE DATA COMPOP DATA 0 DATA CMDOD OPEN DLS DATA COMPOD DATA STADNO+STANOC IFT PLCTST=1 DATA CMDPS GET LINE STATISTICS DATA COMPPS STAE2 EQU STAREQ+STAILL DUMMY STAE3 EQU STASEQ+STANOB DUMMY DATA STAE2+STAE3 DATA CMDDS GET DLS STATISTICS DATA COMPDS DATA STAE2+STAE3 DATA CMDRM READ LOCAL MEMORY DATA COMPRM DATA STAE2 * EJECT * XIF DATA CMDSW STANDARD WRITE DATA COMPSW DATA STAERR DATA CMDFW FAST WRITE DATA COMPFW DATA STAERR DATA CMDGR GENERAL READ DATA COMPGR DATA 0 CMDTBL EQU *-CMDTAB TABLE LENGTH * EJECT * * READ COMPLETION DISPATCH TABLE * * THIS TABLE IS INDEXED BY THE "MESSAGE TYPE" * CONSTANTS DEFINED ABOVE. REAROU EQU * DATA GRERR1 ERROR ROUTINE DATA GRERR1 DATA PACKET NO FLOW C. (NOT IMPLEM.) DATA GRSTAT DEVICE STATUS DATA PACKET DATA GRDATA NORMAL DATA PACKET DATA GRRR RECIEVE READY PACKET DATA GRRES RESET PACKET DATA GRERR1 RESET CONFIRM. PACKET (NOT IMPLEM.) * * * WRITE COMPLETION DISPATCH TABLE * * THIS TABLE IS INDEXED BY THE "MESSAGE TYPE" * CONSTANTS DEFINED ABOVE. WRIROU EQU * DATA WRERR ERROR ROUTINE DATA WRNFLO DATA PACKET WITHOUT FLOW CONTROL DATA WRERR DEVICE STATUS DATA (NOT RELEVANT) DATA WRDATA NORMAL DATA PACKET DATA WRRR RECIEVE READY PACKET DATA WRERR RESET PACKET (NOT IMPLEMENTED) DATA WRRESC RESET CONFIRMATION PACKET * EJECT * ******************** * REQUEST ROUTINES * ******************** * * THIS SECTION CONTAINS REQUEST HANDLING ROUTINES. * THE REQUEST ROUTINES ARE CALLED FROM TERMINAL * DEVICE DRIVERS. THIS IS NORMALLY DONE THROUGH * THE TERMINAL NETWORK DISTRIBUTOR DRIVER (DRND01). * THE DISTRIBUTOR DRIVER WILL SWITCH CALL TO * CONNECTED LINE DRIVER. RETURN IS MADE DIRECTLY * FROM THIS DRIVER TO TERMINAL DEVICE DRIVER. * A CALL WILL NORMALLY RESULT IN A WAIT FOR SOME * I/O ACTION AND DISPATCHING. THIS MEANS, THAT AT * TIME OF CALL THE DEVICE DRIVER MAY NOT HAVE ANY * DATA ON THE A15 STACK. * * ROUTINES IN ORDER OF APPEARANCE IN CODE: * * NAME FUNCTION * * PLCHRI INPUT OF ONE CHARACTER * PLSTBL DEFINE START OF OUTPUT BLOCK * PLCHRO OUTPUT OF ONE CHARACTER * PLENBL DEFINE END OF OUTPUT BLOCK * PLTEST PERFORM PLC TEST FUNCTION * EJECT * ************************************************************ * * ROUTINE NAME: * PLCHRI * * FUNCTION: * THIS ROUTINE FETCHES ONE CHARACTER FROM THE * INPUT BUFFER. IF NO BUFFER HAS ARRIVED, "INPUT * REQUESTED" FLAG IN DWT IS SET, AND CALLING * PROCESS IS SUSPENDED UNTIL A BUFFER ARRIVES. * * CALL: * ABI INPTAB,A1 * CF A5,PLCHRI * * INPUT: * A6 = DWT ADDRESS * * OUTPUT: * AT RETURN TO DEVICE DRIVER * A1 = BITS 0-14 CHANGED * BIT 15 1 IF MORE CHAR IN BUFFER * A2 = BITS 0-7 ZERO * BITS 8-15 CHARACTER * INTERR. ENABLED * ************************************************************ * PLCHRI EQU * PRCHRI EQU * STR A4,A15 PUSH A4 LD A4,DWTLD1,A6 INPUT TEXT WAITING? RF(Z) CI100 NO, WAIT FOR TEXT * EJECT * CF A15,PLGECH GET CHARACTER FROM BUFFER LDR A1,A1 CHECK RETURN STATUS RF(N) CI100 BUFFER EMPTY, WAIT FOR NEXT LDR* A4,A15 POP A4 RF CI110 RETURN TO DEVICE DRIVER * * CI100 EQU * LDR* A4,A15 POP A4 LDK A2,DWFINP FLAG "INPUT REQUESTED" ORS A2,DWTST,A6 SET INPUT REQUESTED IN DWT CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT ABL PLDISP LOCAL DISPATCHER * * * ENTRY IS MADE HERE WHEN A NEW BUFFER HAS ARRIVED * REGISTERS ON ENTRY: * A1 = NR OF CHARACTERS LEFT IN BUFFER * A2 = BITS 0-7 ZERO * BITS 8-15 CHARACTER * A4 = BUFFER ADDRESS * A6 = DWT ADDRESS * INPRST EQU * LDKL A3,/FFFF-DWFINP MASK FOR INPUT REQUESTED ANS A3,DWTST,A6 RESET FLAG ST A4,DWTLD1,A6 LINK BUFFER TO DWT * CF A15,NDGET8 GET A3-A5, A7-A8 FROM DWT * EJECT * CI110 EQU * * RETURN TO DEVICE DRIVER LDR A1,A1 ANY CHAR LEFT IN BUFFER? RF(Z) CI120 NO, CONTINUE LDK A1,1 INDICATE MORE CHARACTERS RF CI130 * CI120 EQU * CM DWTLD1,A6 UNLINK BUFFER CI130 EQU * ENB RTN A5 * EJECT * ************************************************************ * * ROUTINE NAME: * PLSTBL * * FUNCTION: * THIS ROUTINE DEFINES START OF AN OUTPUT BLOCK. * IT ALLOCATES AN OUTPUT BUFFER, AND LINKS IT * TO THE DWT. * * CALL: * ABI STBTAB,A1 * CF A5,PLSTBL * * INPUT: * A2 = MAXIMAL LENGTH OF TEXT IN BLOCK (BYTES) * A6 = DWT ADDRESS * * OUTPUT: * AT RETURN TO DEVICE DRIVER * A1 = RETURN CODE * 0 IF OK * NOT 0 IF ERROR * A2 = DEVICE STATUS (IF RELEVANT, IE A1=0) * CR = CONTENTS OF A1 * INTERR. ENABLED * ************************************************************ * PLSTBL EQU * PRSTBL EQU * ENB CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT CF A15,GETCWT A5 := CWT ADDRESS * EJECT * LD A1,DWTLD1,A6 BUFFER ALREADY ALLOCATED? ABL(NZ) NDREPO YES, SET OK & RETURN CF A15,GETLCS A1 := STATUS & INH RF(NZ) SBERR2 ERROR, RETURN * * CHECK LEVEL 3 WINDOW LDR A3,A2 SAVE MAX BLOCK LENGTH LD A1,DWTST,A6 DWT STATUS ANKL A1,DWFECH+DWFTY1 ECHO OR ONLY TYPE 1? RF(NZ) SB090 YES, DON'T CHECK WINDOW CF A15,GETOFR A2 := NR OF OUTSTANDING FRAMES LDR A2,A2 ANY FRAMES OUTSTANDING? RF(Z) SB090 NO, CONTINUE LD A1,DWTST,A6 DWT STATUS ANK A1,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? RF(NZ) SBERR YES, NO FRAMES MAY BE OUT. ERROR SUK A2,WINDOW WINDOW FULL? RF(N) SB090 NO, CONTINUE * DWT WILL HAVE TO WAIT UNTIL WINDOW IS OPEN ST A3,DWTLD1,A6 SAVE REQUESTED BUFFER LENGTH LDK A1,DWFAK3 FLAG "WAITING FOR LEVEL 3 ACK" ORS A1,DWTST,A6 SET FLAG IN DWT STATUS IFF UTTEST=0 QUEUE STATISTICS LD A1,CWTPNR,A5 PLC NUMBER SLA A1,1 MAKE INDEX IM WIQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER XIF ABL PLDSP2 LOCAL DISPATCHER * * * ENTRY IS MADE HERE WHEN WINDOW IS OPEN AGAIN * (AFTER A LEVEL 3 ACK) * REGISTER CONTENTS ON ENTRY: * A1 = RETURN CODE * A5 = CWT ADDRESS * A6 = DWT ADDRESS * WINRST EQU * LD A3,DWTLD1,A6 RESTORE REQUESTED BUFFER LENGTH CM DWTLD1,A6 LDR A1,A1 RETURN CODE RF(NZ) SBERR2 ERROR, RETURN TO DEVICE DRIVER * * SB090 EQU * LDR A7,A5 CWK A3,SOBUFL SHORT BUFFER ENOUGH? RF(G) SB100 NO, TAKE LONG BUFFER * * ALLOCATE SHORT OUTPUT BUFFER ADK A7,CWTPBS POOLBLOCK FOR SHORT BUFFERS CF A15,PLGTBU ALLOCATE BUFFER RF(NZ) SB120 COMMON PART FOR SHORT/LONG LDK A7,CWTSBQ NO BUFFER LEFT. SET QUEUE HEAD IFF UTTEST=0 QUEUE STATISTICS LD A1,CWTPNR,A5 PLC NUMBER SLA A1,1 MAKE INDEX IM SBQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER XIF RF SB110 COMMON PART FOR NO BUFFER * SB100 EQU * CWK A3,LOBUFL LONG BUFFER ENOUGH? RF(G) SBERR NO, ERROR * ALLOCATE LONG OUTPUT BUFFER ADK A7,CWTPBL POOLBLOCK FOR LONG BUFFERS CF A15,PLGTBU ALLOCATE BUFFER RF(NZ) SB120 COMMON PART FOR SHORT/LONG LDK A7,CWTLBQ NO BUFFER LEFT. SET QUEUE HEAD IFF UTTEST=0 QUEUE STATISTICS LD A1,CWTPNR,A5 PLC NUMBER SLA A1,1 MAKE INDEX IM LBQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER XIF * SB110 EQU * * NO BUFFER WAS AVAILABLE. PUT REQUEST IN QUEUE. ADR A7,A5 A7 := QUEUE HEAD ADDRESS LDR A4,A6 DWT ADDRESS ADKL A4,DWTOTQ QUEUE LINK ADDRESS CF A15,LNKLST PUT LAST IN QUEUE ABL PLDSP2 LOCAL DISPATCHER * * * ENTRY IS MADE HERE WHEN A BUFFER IS FREE * REGISTERS ON ENTRY: * A1 = RETURN CODE * A4 = BUFFER ADDRESS (IF A1=0) * A5 = CWT ADDRESS * A6 = DWT ADDRESS * BUFRST EQU * LDR A1,A1 RETURN CODE RF(NZ) SBERR2 RETURN IF ERROR SB120 EQU * LDK A2,X25DAT LENGTH OF X25 HEADER ST A2,BUFBIX,A4 BYTE INDEX := START OF DATA ST A4,DWTLD1,A6 SAVE BUFFER ADDRESS IN DWT * ABL NDREPO RETURN TO DEVICE DRIVER * RETURN CODE := OK * * SBERR EQU * LDK A1,PLSERR RET CODE := SW ERROR SBERR2 EQU * LDK A2,0 RESET DEVICE STATUS ABL NDREP RETURN TO DEVICE DRIVER * EJECT * ************************************************************ * * ROUTINE NAME: * PLCHRO * * FUNCTION: * THIS ROUTINE WRITES ONE CHARACTER TO OUTPUT BUFFER. * * CALL: * ABI OUPTAB,A1 * CF A5,PLCHRO * * INPUT: * A2 = BITS 0-7 IRRELEVANT * BITS 8-15 CHARACTER * A6 = DWT ADDRESS * * OUTPUT: * AT RETURN TO DEVICE DRIVER * A1 = RETURN CODE * 0 IF OK * NOT 0 IF ERROR * A2 = DEVICE STATUS (IF RELEVANT, IE A1=0) * CR = CONTENTS OF A1 * INTERR. ENABLED * ************************************************************ * PLCHRO EQU * PRCHRO EQU * ENB * EJECT * STR A4,A15 PUSH A4 LD A4,DWTLD1,A6 BUFFER ADDRESS RF(Z) COERR2 ERROR IF NO BUFFER CF A15,PLPUCH PUT CHARACTER IN BUFFER LDR A1,A1 CHECK RETURN CODE RF(NZ) COERR1 ERROR IF BUFFER FULL * LDR* A4,A15 POP A4 * RETURN DIRECTLY INSTEAD OF THROUGH NDRETO TO GET * FASTER PROCESSING. ENB ADK A5,4 ADJUST STACK LDR A2,A1 DEVICE STATUS & RET CODE := OK ABR* A5 RETURN TO DEVICE DRIVER * * COERR1 EQU * CF A15,PLRLBU RELEASE BUFFER CM DWTLD1,A6 INDICATE NO BUFFER COERR2 EQU * LDR* A4,A15 POP A4 LDK A1,PLSERR RET CODE := SW ERROR ABL NDRET RETURN TO DEVICE DRIVER * EJECT * ************************************************************ * * ROUTINE NAME: * PLENBL * * FUNCTION: * THIS ROUTINE DEFINES END OF OUTPUT BLOCK. * IT SENDS THE BLOCK TO PLC AND WAITS FOR * ACKNOWLEDGE. * * CALL: * ABI ENBTAB,A1 * CF A5,PLENBL * * INPUT: * A6 = DWT ADDRESS * * OUTPUT: * AT RETURN TO DEVICE DRIVER * A1 = RETURN CODE * 0 IF OK * NOT 0 IF ERROR * A2 = DEVICE STATUS (IF RELEVANT, IE A1=0) * CR = CONTENTS OF A1 * INTERR. ENABLED * ************************************************************ * PLENBL EQU * PRENBL EQU * ENB CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT CF A15,GETCWT A5 := CWT ADDRESS * EJECT * LDK A1,PLSERR SET RET CODE JUST IN CASE LD A2,DWTLD1,A6 BUFFER ADDRESS ABL(Z) NDREP ERROR IF NO BUFFER. RETURN CF A15,GETLCS A1 := STATUS & INH RF(NZ) EBERR1 RETURN IF ERROR * LDR A3,A6 DWT ADDRESS ADKL A3,DWTOTQ QUEUE POINTER CF A15,PLCCCS RESERVE CCA CM DWTOTQ,A6 RESET QUEUE ELEMENT POINTER LDR A1,A1 RETURN CODE RF(NZ) EBERR1 RETURN IF ERROR * * WRITE PARAMETERS IN CCA AND X25 HEADER ENB LD A4,DWTLD1,A6 BUFFER ADDRESS ST A4,CWTCCA+CCRBUF,A5 TO CCA CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR LDK A3,CMDFW ASSUME FAST WRITE LD A2,DWTST,A6 DEVICE STATUS LDR A7,A2 SAVE ANKL A7,DWFECH ECHO OUTPUT? RF(NZ) EB090 YES, USE TYPE 1 LDK A3,CMDSW NOT ECHO, USE STANDARD WRITE ANK A2,DWFTY1 ONLY TYPE 1 ALLOWED? RF(Z) EB100 NO, USE TYPE 2 * EJECT * EB090 EQU * * NO FLOW CONTROL CF A15,WRADR1 WRITE LINE ADDRESS. NO FLOW C LDK A2,TYNFLO MESSAGE TYPE := NO FLOW CONTROL RF EB110 CONTINUE * EB100 EQU * * FLOW CONTROL CF A15,WRADR2 WRITE LINE ADDRESS. FLOW CTRL CF A15,FWOPSR FETCH AND UPDATE FLOW CONTROL SC A2,X25FLW,A4 P(R) & P(S) TO PACKET LDK A2,TYDATA MESSAGE TYPE := NORMAL DATA * EB110 EQU * SC A2,CWTCCA+CCRIDB,A5 MESSAGE TYPE TO CCA SC A3,CWTCCA+CCRCMD,A5 COMMAND TO CCA ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA LD A3,BUFBIX,A4 BYTE INDEX ST A3,CWTCCA+CCRLEN,A5 BUFFER LENGTH TO CCA * CF A15,GETLCS A1 := STATUS & INH RF(NZ) EBERR2 RETURN IF ERROR CF A15,PLCCIO EXECUTE CIO START RF(NZ) EBERR1 HANDLE ERROR ABL PLDSP2 LOCAL DISPATCHER * EJECT * * ENTRY TO ACKRST IS MADE WHEN I/O OPERATION * IS COMPLETED. * REGISTER CONTENTS ON ENTRY: * A1 = RETURN CODE * A5 = CWT ADDRESS * A6 = DWT ADDRESS * A7 = MESSAGE TYPE * ACKRST EQU * LDK A2,0 RESET DEVICE STATUS LDR A1,A1 ANY ERROR? RF(NZ) EB130 YES, RETURN * LD A3,DWTST,A6 DWT STATUS LDR A4,A3 ANK A4,DWFRES RESET PACKET RECIEVED? RF(Z) EB120 NO LDK A1,LINERR YES. RET CODE := LINK RESET RF EB130 RETURN * EB120 EQU * CWK A7,TYNFLO PACKET WITH NO FLOW CONTROL? RF(E) EB130 YES, RETURN ANK A3,DWFSAC WAIT FOR LEVEL 3 ACK? RF(Z) EB130 NO, RETURN * LDK A3,DWFAK3 FLAG "WAITING FOR LEVEL 3 ACK" ORS A3,DWTST,A6 SET FLAG IN DWT STATUS ABL PLDSP2 LOCAL DISPATCHER * EJECT * * ENTRY IS MADE HERE WHEN ACK ON LEVEL 3 HAVE BEEN RECIEVED * REGISTER CONTENTS ON ENTRY: * A1 = RETURN CODE * A2 = DEVICE STATUS (IF RELEVANT, IE A1=0) * A5 = CWT ADDRESS * A6 = DWT ADDRESS * AK3RST EQU * * EB130 EQU * * ABL NDREP RETURN TO DEVICE DRIVER * * * EBERR2 EQU * CM CWTCCB,A5 SET CCA FREE EBERR1 EQU * LD A4,DWTLD1,A6 OUTPUT BUFFER ADDRESS CF A15,PLRLBU RELEASE BUFFER CM DWTLD1,A6 INDICATE NO BUFFER CM DWTLD2,A6 RESET FLOW CONTROL ABL NDREP RETURN TO DEVICE DRIVER * EJECT * ************************************************************ * * ROUTINE NAME: * PLTEST * * FUNCTION: * THIS ROUTINE HANDLES TEST COMMANDS FOR PLC. * THE TEST COMMANDS ARE GENERATED BY A TEST * COMMAND "DRIVER" WITH AN INTERFACE SIMILAR TO * THAT OF THE NORMAL TERMINAL DEVICE DRIVERS. * CALL IS MADE DIRECTLY TO THE PLC DRIVER, AND * NOT THROUGH THE TERMINAL NETWORK DISTRIBUTOR, * AS THIS FUNCTION IS NOT AVAILABLE FOR OTHER * LINE DRIVERS. * * CALL: * CF A5,PLTEST * * INPUT: * A6 = DWT ADDRESS * * OUTPUT: * AT RETURN TO DEVICE DRIVER * A1 = RETURN CODE * 0 IF OK * NOT 0 IF ERROR * A2 = CHANGED * CR = CONTENTS OF A1 * INTERR. ENABLED * ************************************************************ * EJECT * PLTEST EQU * IFT PLCTST=1 CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT CF A15,GETCWT A5 := CWT ADDRESS CF A15,PLCCCA RESERVE CCA * ENB ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA CM CWTCCA+CCRC1B,A5 DATA CHAINING & MSB OF BUFFER ADDR LD A4,DWTTBU,A6 USER REQUEST BUFFER ADDRESS ST A4,CWTCCA+CCRBUF,A5 TO CCA LD A2,DWTTLN,A6 USER REQUEST BUFFER LENGTH ST A2,CWTCCA+CCRLEN,A5 LENGTH TO CCA LD A3,DWTTCW,A6 USER REQUEST CONTROL WORD * * DETERMINE TYPE OF TEST ORDER LC A1,DWTOR+1,A6 USER REQUEST ORDER CODE ANK A1,/3F CLEAN CWK A1,ORDPS GET LINE STATISTICS? RF(E) TE100 YES, HANDLE CWK A1,ORDDS GET DLS STATISTICS? RF(E) TE110 YES, HANDLE CWK A1,ORDRM READ LOCAL MEMORY? RF(NE) TEERR2 NO, COMMAND NOT DEFINED. ERROR * * READ LOCAL MEMORY ST A3,CWTCCA+CCRSUB,A5 PLC MEMORY ADDRESS TO CCA LDK A3,CMDRM PLC COMMAND READ LOCAL MEMORY RF TE120 TO COMMON PART * TE100 EQU * * GET LINE STATISTICS LDK A3,CMDPS PLC COMMAND GET LINE STATISTICS RF TE120 TO COMMON PART * TE110 EQU * * GET DLS STATISTICS LC A3,DWTCP2,A6 CHANNEL PARAMETER ANK A3,MASKWS CLEAN WS NUMBER SLL A3,8 TO LEFT BYTE ADK A3,CMDDS PLC COMMAND GET DLS STATISTICS * TE120 EQU * ST A3,CWTCCA+CCRDLS,A5 DLS INDEX & COMMAND TO CCA * CF A15,PLCCIO EXECUTE CIO START RF(NZ) TEERR1 ERROR. HANDLE ABL PLDSP2 LOCAL DISPATCER. WAIT * * * ENTRY IS MADE TO TSTRST WHEN COMMAND IS COMPLETED. * REGISTER CONTENTS ON ENTRY: * A1 = RETURN CODE * A5 = CWT ADDRESS * A6 = DWT ADDRESS * TSTRST EQU * ABL NDREP RETURN TO DEVICE DRIVER * * TEERR2 EQU * CM CWTCCB,A5 INDICATE CCA FREE LDK A1,PLSERR RET CODE := SW ERROR TEERR1 EQU * ABL NDREP RETURN TO DEVICE DRIVER XIF * EJECT * ********************** * INTERRUPT ROUTINES * ********************** * * THIS SECTION CONTAINS INTERRUPT HANDLING ROUTINES. * IT IS ENTERED IMMEDIATELY AT A RELEASE, * ATTENTION OR I/O COMPLETION INTERRUPT. * ALL ROUTINES ARE EXECUTED * ON INTERRUPT PRIORITY. AFTER PROCESSING, EXIT IS * MADE EITHER TO SOME ROUTINE WAITING FOR THE INTERRUPT, * TO THE LOCAL PLC DISPATCHER OR TO TOSS DISPATCHER. * ON EXIT, A15 STACK CONTAINS INTERRUPT RETURN AND * A1-A8. * * * ROUTINES IN ORDER OF APPEARANCE IN CODE: * * NAME FUNCTION * * IHPL INTERRUPT ENTRY * PLIHR HANDLE RELEASE INTERRUPT * PLIHA HANDLE ATTENTION INTERRUPT * PLIHC HANDLE I/O COMPLETION INTERRUPT * COMPSTA HANDLE COMPLETION OF START COMMANDS * (TEST CU, OPEN LINE, OPEN DLS) * COMPTEST HANDLE COMPLETION OF TEST COMMANDS * (PLC STATISTICS, DLS STAT., READ LOCAL MEMORY) * COMPWRI HANDLE COMPLETION OF WRITE COMMANDS * COMPGR HANDLE COMPLETION OF GENERAL READ COMMANDS * GRERR HANDLE ERRORS AT GENERAL READ * GRSACK HANDLE STATUS AND RR MESSAGE FROM DEVICE * GRDATA HANDLE DATA INPUT FROM DEVICE * GRRES HANDLE RESET MESSAGE FROM SECONDARY * EJECT * ************************************************************ * * ROUTINE NAME: * IHPL * * FUNCTION: * THIS ROUTINE CONTAINS INTERRUPT ENTRIES FOR * ALL PLC:S INCLUDED. IT SAVES A1-A8, SETS CWT * ADDRESS AND EXITS TO RELEASE OR I/O COMPLETION * INTERRUPT HANDLER. * * CALL: * HARDWARE INTERRUPT * * INPUT: * A15 = SYSTEM STACK POINTER * INTERR. INHIBITED * MODE SYSTEM * * OUTPUT: * A5 = CWT ADDRESS * ************************************************************ * IHPL01 EQU * IFF PLCNRL=0 U =5 IFT CPU852=1 CF A15,SAVE8 PUSH A1-A8 XIF IFF PLCNRL=0 U =5 IFF CPU852=1 MSR 8,A15 PUSH A1-A8 XIF * IFF PLCNRL=0 U =5 LDKL A5,PL0CWT CWT ADDRESS, PLC 0 RF IHPL COMMON PART, ALL PLC:S XIF * EJECT * IHPL02 EQU * IFF PLCNRL=0 U =5 IFF PLCNRL=1 IFT CPU852=1 CF A15,SAVE8 PUSH A1-A8 XIF * IFF PLCNRL=0 U =5 IFF PLCNRL=1 IFF CPU852=1 MSR 8,A15 PUSH A1-A8 XIF * IFF PLCNRL=0 U =5 IFF PLCNRL=1 LDKL A5,PL1CWT CWT ADDRESS, PLC 1 RF IHPL COMMON PART, ALL PLC:S XIF * IHPL03 EQU * IFF PLCNRL=0 U =5 IFF PLCNRL=1 IFF PLCNRL=2 IFT CPU852=1 CF A15,SAVE8 PUSH A1-A8 XIF * IFF PLCNRL=0 U =5 IFF PLCNRL=1 IFF PLCNRL=2 IFF CPU852=1 MSR 8,A15 PUSH A1-A8 XIF * IFF PLCNRL=0 U =5 IFF PLCNRL=1 IFF PLCNRL=2 LDKL A5,PL2CWT CWT ADDRESS, PLC 2 RF IHPL COMMON PART, ALL PLC:S XIF * IHPL04 EQU * IFF PLCNRL=0 U =5 IFF PLCNRL=1 IFF PLCNRL=2 IFF PLCNRL=3 IFT CPU852=1 CF A15,SAVE8 PUSH A1-A8 XIF * IFF PLCNRL=0 U =5 IFF PLCNRL=1 IFF PLCNRL=2 IFF PLCNRL=3 IFF CPU852=1 MSR 8,A15 PUSH A1-A8 XIF * IFF PLCNRL=0 U =5 IFF PLCNRL=1 IFF PLCNRL=2 IFF PLCNRL=3 LDKL A5,PL3CWT CWT ADDRESS, PLC 3 RF IHPL COMMON PART, ALL PLC:S XIF * IHPR01 EQU * IFF PLCNRR=0 IFT CPU852=1 CF A15,SAVE8 PUSH A1-A8 XIF IFF PLCNRR=0 IFF CPU852=1 MSR 8,A15 PUSH A1-A8 XIF IFF PLCNRR=0 LDKL A5,PR1CWT CWTADDRESS PLC 1 REMOTE RF IHPL COMMON PART ALL CWT:S XIF IHPR02 EQU * IFF PLCNRR=0 IFF PLCNRR=1 IFT CPU852=1 CF A15,SAVE8 PUSH A1-A8 XIF IFF PLCNRR=0 IFF PLCNRR=1 IFF CPU852=1 MSR 8,A15 PUSH A1-A8 XIF IFF PLCNRR=0 IFF PLCNRR=1 LDKL A5,PR2CWT CWTADDRESS PLC 2 REMOTE RF IHPL COMMON PART ALL CWT:S XIF IHPR03 EQU * IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 IFT CPU852=1 CF A15,SAVE8 PUSH A1-A8 XIF IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 IFF CPU852=1 MSR 8,A15 PUSH A1-A8 XIF IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 LDKL A5,PR3CWT CWTADDRESS PLC 3 REMOTE RF IHPL COMMON PART ALL PLC:S XIF IHPR04 EQU * IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 IFF PLCNRR=3 IFT CPU852=1 CF A15,SAVE8 PUSH A1-A8 XIF IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 IFF PLCNRR=3 IFF CPU852=1 MSR 8,A15 PUSH A1-A8 XIF IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRL=2 IFF PLCNRL=3 LDKL A5,PR4CWT CWTADDRESS PLC 4 REMOTE RF IHPL COMMON PART ALL CWT:S XIF EJECT * IHPL EQU * ST P,INTSAV SAVE LATEST INTERRUPT LDK A1,0 RESET HIGH BYTE LC A1,CWTCID+CIDINT,A5 INTERRUPT SOURCE CWK A1,/40 RELEASE? RF(E) PLIHR YES, HANDLE CWK A1,/20 I/O COMPLETION? RF(E) PLIHC YES, HANDLE CWK A1,/80 ATTENTION? RF(E) PLIHA YES, HANDLE * CF A15,PLCNOP ILLEGAL CODE, SET NOT OPERABLE ABL TDISP EXIT * EJECT * ************************************************************ * * ROUTINE NAME: * PLIHR * * FUNCTION: * THIS ROUTINE HANDLES RELEASE INTERRUPTS. * IT RESETS THE INTERRUPT, AND IF ANOTHER * PROCESS IS WAITING FOR THE CCA, RETURN * IS MADE TO CCA ALLOCATION ROUTINE. * * CALL: * RF PLIHR * * INPUT: * A5 = CWT ADDRESS * * OUTPUT: * IF PROCESS WAITING * A4 = BLOCK ADDRESS OF WAITING PROCESS * A5 = CWT ADDRESS * ************************************************************ * PLIHR EQU * EX CWTST3,A5 RESET INTERRUPT LD A4,CWTCCQ,A5 PROCESS WAITING FOR CCA? ABL(NZ) CCARST YES, ACTIVATE PROCESS CM CWTCCB,A5 NO, SET CCA FREE ABL TDISP EXIT * EJECT * ************************************************************ * * ROUTINE NAME: * PLIHA * * FUNCTION: * THIS ROUTINE HANDLES ATTENTION INTERRUPTS. IF * ERROR, IT SETS AN ERROR CODE AND STARTS ABORT * OF ALL CALLS. IF COMMUNICATION REESTABLISHED, * IT STARTS RECOVERY. * * CALL: * RF PLIHA * * INPUT: * A5 = CWT ADDRESS * * OUTPUT: * A5 = CWT ADDRESS * A6 = WS NUMBER * ************************************************************ * PLIHA EQU * LD A1,CWTRCA+CCRSTA,A5 PLC STATUS ST A1,CWTPLS,A5 SAVE FOR TESTING IFF UTTEST=0 CF A15,LOGATT LOG RCA XIF LC A6,CWTRCA+CCRDLS,A5 WS NUMBER ANK A6,MASKWS CLEAN EX CWTST3,A5 RELEASE RCA * EJECT * LDKL A2,/FFFF-STACOM-STAERR * MASK FOR ALLOWED ERRORS ANR A2,A1 FATAL ERROR? RF(Z) IA100 NO, CONTINUE CF A15,PLCNOP SET PLC NOT OPERABLE ABL TDISP EXIT * IA100 EQU * LDR A2,A1 STATUS ANK A2,STACOM COMMUNICATION REESTABLISHED? ABL(NZ) PLREWS YES, START RECOVERY OF WS * LDR A2,A6 WS NUMBER CF A15,STAHAN HANDLE ERROR STATUS ABL PLDSP2 LOCAL DISPATCHER * EJECT * ************************************************************ * * ROUTINE NAME: * PLIHC * * FUNCTION: * THIS ROUTINE HANDLES I/O COMPLETION INTERRUPTS. * IT CHECKS WHICH COMMAND THAT HAS BEEN COMPLETED, * AND EXITS TO CORRESPONDING COMMAND HANDLER. * * CALL: * RF PLIHC * * INPUT: * A5 = CWT ADDRESS * * OUTPUT: * A1 = PLC STATUS * A2 = FATAL PLC STATUS * A5 = CWT ADDRESS * A6 = USER PARAMETER * ************************************************************ * PLIHC EQU * LD A1,CWTRCA+CCRSTA,A5 PLC STATUS ST A1,CWTPLS,A5 SAVE FOR TESTING IFF UTTEST=0 CF A15,LOGIOC LOG CCR XIF ANKL A1,/FFFF-STAPOL-STALER * RESET POLL STOP & LINK ERROR LD A6,CWTRCA+CCRIDW,A5 USER PARAMETER (DWT, DLS OR ...) LC A2,CWTRCA+CCRCMD,A5 COMMAND * EJECT * LDK A3,CMDTBL COMMAND TABLE LENGTH IC100 EQU * * SCAN TABLE TO FIND MATCHING COMMAND SUK A3,CMDTB1 DECREMENT INDEX RF(N) IC120 END OF TABLE. ERROR CC A2,CMDTAB+1,A3 COMMAND FOUND? RB(NE) IC100 NO, CONTINUE * C1 A2,CMDTAB+4,A3 MASK FOR ALLOWED ERRORS ANR A2,A1 FATAL ERROR? RF(Z) IC110 NO, CONTINUE CF A15,PLCNOP SET PLC NOT OPERABLE IC110 EQU * ABI CMDTAB+2,A3 CALL COMMAND HANDLING ROUTINE * IC120 EQU * EX CWTST3,A5 RELEASE RCA CF A15,PLCNOP SET PLC NOT OPERABLE ABL PLDSP2 LOCAL DISPATCHER * EJECT * ************************************************************ * * ROUTINE NAME: * COMPSTA * * FUNCTION: * THESE ROUTINES HANDLE COMPLETION OF TEST CU, * OPEN LINE AND OPEN DLS COMMANDS. * THEY CHECK THE RETURN CODE AND EXIT TO THE * ROUTINE THAT MADE THE I/O CALL. * * CALL: * ABI CMDROU,A3 * * INPUT: * A1 = PLC STATUS * A2 = FATAL PLC STATUS * A5 = CWT ADDRESS * A6 = PARAMETER (IF RELEVANT) * * OUTPUT: * A1 = PLC STATUS * A2 = FATAL PLC STATUS * A5 = CWT ADDRESS * A6 = DLS INDEX (IF EXIT TO ODLRST) * ************************************************************ * COMPTC EQU * EX CWTST3,A5 RELEASE RCA ABL TCURST RETURN TO ROUTINE MAKING I/O CALL * EJECT * * * OPEN LINE, COMPLETION * COMPOP EQU * EX CWTST3,A5 RELEASE RCA ABL OPLRST RETURN TO ROUTINE MAKING I/O CALL * * * OPEN DLS, COMPLETION * COMPOD EQU * EX CWTST3,A5 RELEASE RCA LDR A2,A2 FATAL STATUS? RF(NZ) CD100 YES, SKIP STATUS CHECK * LDR A2,A6 WS NUMBER CF A15,STAHAN HANDLE PLC STATUS LDK A2,0 CLEAR FATAL STATUS FLAGS * CD100 EQU * ABL ODLRST RETURN TO ROUTINE MAKING I/O CALL * EJECT * ************************************************************ * * ROUTINE NAME: * COMPTEST * * FUNCTION: * THIS ROUTINE HANDLES COMPLETION OF GET LINE * STATISTICS, GET DLS STATISTICS AND READ LOCAL * MEMORY COMMANDS. * IT CHECKS THE PLC STATUS, SETS EFFECTIVE * LENGTH IN DWT AND EXITS TO THE ROUTINE THAT * MADE THE I/O CALL. * * CALL: * ABI CMDROU,A3 * * INPUT: * A1 = PLC STATUS * A5 = CWT ADDRESS * A6 = DWT ADDRESS * * OUTPUT: * A1 = RETURN CODE * A5 = CWT ADDRESS * A6 = DWT ADDRESS * ************************************************************ * IFT PLCTST=1 COMPPS EQU * COMPDS EQU * COMPRM EQU * * EJECT * LDR A1,A1 PLC STATUS RF(NZ) TS100 ERROR. HANDLE * LD A2,CWTRCA+CCRLEN,A5 EFFECTIVE LENGTH ST A2,DWTTLN,A6 TO DWT RF TS110 EXIT. A1 = 0 * TS100 EQU * LDK A1,NOTOPR RETURN CODE := NOT OPERABLE CM DWTTLN,A6 EFFECTIVE LENGTH := 0 * TS110 EQU * EX CWTST3,A5 RELEASE RCA ABL TSTRST RETURN TO ROUTINE MAKING I/O CALL XIF * EJECT * ************************************************************ * * ROUTINE NAME: * COMPWRI * * FUNCTION: * THIS ROUTINE HANDLES COMPLETION OF STANDARD * WRITE AND FAST WRITE. * IT CHECKS THE PLC STATUS AND RELEASES THE OUTPUT * BUFFER, IF ANY WAS ALLOCATED. IF THE OUTPUT * OPERATION IS FINISHED, IT THEN EXITS TO THE * ROUTINE THAT MADE THE I/O CALL. * * CALL: * ABI CMDROU,A3 * * INPUT: * A1 = PLC STATUS * A2 = FATAL PLC STATUS * A5 = CWT ADDRESS * A6 = DWT ADDRESS * * OUTPUT: * WHEN RETURN TO ROUTINE MAKING OUTPUT CALL * A1 = RETURN CODE * A2 = BITS 0-7 ZERO * BITS 8-15 DEVICE STATUS * A5 = CWT ADDRESS * A6 = DWT ADDRESS * ************************************************************ * EJECT * COMPSW EQU * COMPFW EQU * LDR A2,A2 FATAL PLC STATUS? RF(NZ) WRERR1 YES, HANDLE * LC A2,DWTCP2,A6 CHANEL PARAMETER ANK A2,MASKWS CLEAN WS NUMBER CF A15,STAHAN HANDLE PLC STATUS LC A7,CWTRCA+CCRIDB,A5 TYPE OF WRITE COMMAND ANK A7,/FF CLEAN LD A4,CWTRCA+CCRBUF,A5 BUFFER ADDRESS EX CWTST3,A5 RELEASE RCA ABI WRIROU,A7 CALL CORRESPONDING ROUTINE * * * IRRECOVERABLE ERROR * WRERR1 EQU * EX CWTST3,A5 RELEASE RCA WRERR EQU * ABL PLDSP2 EXIT * * * COMPLETION OF DATA MESSAGE OUTPUT * WRNFLO EQU * WRDATA EQU * CF A15,PLRLBU RELEASE OUTPUT BUFFER CM DWTLD1,A6 INDICATE NO BUFFER ABL ACKRST RETURN TO REQUEST HANDLER * * * COMPLETION OF RECIEVE READY MESSAGE OUTPUT * WRRR EQU * SUK A4,2 START OF MONITOR BLOCK LDR A7,A5 CWT ADDRESS ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD CF A15,LNKOUT REMOVE FROM QUEUE CF A15,FREBLK RETURN BLOCK * ABL PLDSP2 EXIT * * * COMPLETION OF RESET CONFIRMATION MESSAGE OUTPUT * WRRESC EQU * SUK A4,2 START OF MONITOR BLOCK LDR A7,A5 CWT ADDRESS ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD CF A15,LNKOUT REMOVE FROM QUEUE CF A15,FREBLK RETURN BLOCK * LDKL A2,/FFFF-DWFRES MASK FOR RESET FLAG ANS A2,DWTST,A6 CLEAR "RESET" FLAG LDK A4,RELINE RECOVERY CAUSE := LINK RESET CF A15,NDREDW CALL RECOVERY FOR DWT ABL PLDSP2 LOCAL DISPATCHER * EJECT * ************************************************************ * * ROUTINE NAME: * COMPGR * * FUNCTION: * THIS ROUTINE HANDLES COMPLETION OF GENERAL * READ COMMANDS. * IT CHECKS TYPE OF MESSAGE AND CALLS * CORRESPONDING ROUTINE. * * CALL: * ABI CMDROU,A3 * * INPUT: * A1 = PLC STATUS * A2 = FATAL PLC STATUS * A5 = CWT ADDRESS * * OUTPUT: * A1 = PLC STATUS * A4 = BUFFER ADDRESS * A5 = CWT ADDRESS * A6 = DLS INDEX * A7 = DEVICE ADDRESS (IF RELEVANT) * ************************************************************ * COMPGR EQU * LDR A2,A2 FATAL STATUS? RF(NZ) GRERR2 YES, EXIT * EJECT * CF A15,INTYPE A3 := TYPE OF MESSAGE LD A4,CWTRCA+CCRBUF,A5 BUFFER ADDRESS LC A6,CWTRCA+CCRDLS,A5 DLS INDEX ANK A6,MASKWS CLEAN LC A7,X25LCN,A4 DEVICE ADDRESS ANK A7,MASKLC CLEAN * ABI REAROU,A3 ROUTINE FOR THIS MESSAGE TYPE * EJECT * ************************************************************ * * ROUTINE NAME: * GRERR * * FUNCTION: * THIS ROUTINE HANDLES ILLEGAL INPUT MESSAGES. * GRERR1 RETURNS BUFFER * * CALL: * ABI REAROU,A3 * RB GRERR1 * RF GRERR2 * * INPUT: * A4 = BUFFER ADDRESS (IF GRERR1) * A5 = CWT ADDRESS * * OUTPUT: * - * ************************************************************ * GRERR1 EQU * CF A15,PLRLBU RELEASE GENERAL READ BUFFER * GRERR2 EQU * EX CWTST3,A5 RELEASE RCA * ABL PLDSP2 EXIT * EJECT * ************************************************************ * * ROUTINE NAME: * GRSACK * * FUNCTION: * THIS ROUTINE HANDLES STATUS AND RECIEVE READY * MESSAGES FROM A DEVICE. * IT RELEASES THE BUFFER AND RETURNS TO ROUTINE * MAKING I/O CALL. * * CALL: * ABI REAROU,A3 * * INPUT: * A4 = BUFFER ADDRESS * A5 = CWT ADDRESS * A6 = DLS INDEX * A7 = DEVICE ADDRESS * * OUTPUT: * A1 = RETURN CODE * =0 IF OK * ><0 IF ERROR * A2 = BITS 0-7 ZERO * BITS 8-15 DEVICE STATUS * A5 = CWT ADDRESS * A6 = DWT ADDRESS * ************************************************************ * EJECT * GRSTAT EQU * CF A15,GETDWT A6 := DWT ADDRESS RB(Z) GRERR1 NO DWT DEFINED CF A15,FWIPSR UPDATE FLOW CONTROL COUNTERS LC A2,X25DAT,A4 DEVICE STATUS BYTE ANK A2,/FF CLEAN RF SR100 COMMON PART * * GRRR EQU * CF A15,GETDWT A6 := DWT ADDRESS RB(Z) GRERR1 NO DWT DEFINED CF A15,FWIPR UPDATE FLOW CONTROL COUNTERS LDK A2,0 RESET DEVICE STATUS BYTE * * SR100 EQU * * COMMON PART FOR DEVICE STATUS AND RECIEVE READY MESSAGES EX CWTST3,A5 RELEASE RCA CF A15,PLRLBU RELEASE GENERAL READ BUFFER LD A3,DWTST,A6 DWT STATUS LDR A4,A3 ANK A4,DWFAK3 ANYONE WAITING FOR THIS MESSAGE? ABL(Z) PLDSP2 NO, DISPATCH * XRS A4,DWTST,A6 RESET WAIT FLAG LDK A1,0 RETURN CODE := OK ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? ABL(NZ) AK3RST YES, RETURN WITH ACK 3 ABL WINRST NO, RETURN TO WINDOW QUEUE * EJECT * ************************************************************ * * ROUTINE NAME: * GRDATA * * FUNCTION: * THIS ROUTINE HANDLES DATA INPUT MESSAGES. * IT LINKS THE BUFFER TO THE CWT. * * CALL: * ABI REAROU,A3 * * INPUT: * A4 = BUFFER ADDRESS * A5 = CWT ADDRESS * A6 = DLS INDEX * A7 = DEVICE ADDRESS * * OUTPUT: * - * ************************************************************ * GRDATA EQU * CF A15,GETDWT A6 := DWT ADDRESS RB(Z) GRERR1 NO DWT DEFINED * CF A15,FWIPSR UPDATE FLOW CONTROL COUNTERS ST A4,CWTBUF,A5 SAVE INPUT DATA BUFFER ADDRESS ST A6,BUFDWT,A4 SAVE DWT ADDRESS IN BUFFER LD A2,CWTRCA+CCRLEN,A5 EFFECTIVE LENGTH ST A2,BUFLEN,A4 SAVE IN BUFFER LDK A2,X25DAT START OF USER DATA ST A2,BUFBIX,A4 TO BYTE INDEX * EJECT * EX CWTST3,A5 RELEASE RCA ABL PLDSP2 EXIT * EJECT * ************************************************************ * * ROUTINE NAME: * GRRES * * FUNCTION: * THIS ROUTINE HANDLES RESET MESSAGES FROM THE * SECONDARY. * IT RESETS THE FLOW CONTROL COUNTERS IN THE DWT, * AND SETS A RESET PACKET FLAG IN THE DWT. THEN A * RESET CONFIRMATION MESSAGE IS SENT. IF THE * PROCESS IS WAITING FOR LEVEL 3 ACK OR IN A BUFFER * QUEUE IT IS ABORTED. * * CALL: * ABI REAROU,A3 * * INPUT: * A4 = BUFFER ADDRESS * A5 = CWT ADDRESS * A6 = DLS INDEX * A7 = DEVICE ADDRESS * * OUTPUT: * - * ************************************************************ * GRRES EQU * CF A15,GETDWT A6 := DWT ADDRESS RB(Z) GRERR1 NO DWT DEFINED * EJECT * EX CWTST3,A5 RELEASE RCA CF A15,PLRLBU RELEASE GENERAL READ BUFFER CM DWTLD2,A6 RESET FLOW CONTROL COUNTERS * LD A2,DWTST,A6 DWT STATUS ANK A2,DWFRES RESET ALREADY RECIEVED? ABL(NZ) PLDSP2 YES, EXIT LDK A2,DWFRES ORS A2,DWTST,A6 INDICATE RESET RECIEVED * CF A15,PLCCCA RESERVE PLC CCA ENB * CF A15,GETBLK GET OUTPUT BUFFER LDR A7,A5 CWT ADDRESS ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD CF A15,LNKFST PUT BLOCK IN QUEUE (FOR RECOVERY) ADK A4,2 SKIP QUEUE LINK ST A4,CWTCCA+CCRBUF,A5 BUFFER ADDR TO CCA CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR CF A15,WRADR2 WRITE ADDRESS IN CCA (TYPE 2) LDK A2,CMDSW COMMAND CODE "STANDARD WRITE" SC A2,CWTCCA+CCRCMD,A5 TO CCA LDK A2,/1F MESSAGE TYPE FLAGS SC A2,X25FLW,A4 TO OUTPUT BUFFER LDK A2,TYRESC TYPE "RESET CONFIRMATION" SC A2,CWTCCA+CCRIDB,A5 TO CCA, COMMAND ID ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA, COMMAND ID LDK A2,X25DAT LENGTH OF SYSTEM PART ST A2,CWTCCA+CCRLEN,A5 TO CCA LENGTH * EJECT * LD A2,DWTST,A6 DWT STATUS ANK A2,DWFRES RESET STILL WANTED? RF(Z) REERR1 NO, EXIT CF A15,GETWSS A1 := STATUS & INH RF(NZ) REERR1 EXIT IF ERROR CF A15,PLCCIO EXECUTE CIO START RF(NZ) REERR2 EXIT IF ERROR * LDK A1,LINERR RET CODE := LINK ERROR LD A2,DWTST,A6 DWT STATUS LDR A3,A2 ANK A2,DWFAK3 WAITING FOR LEVEL 3 ACK? RF(Z) RE100 NO, CONTINUE XRS A2,DWTST,A6 RESET ACK3 FLAG ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? ABL(NZ) AK3RST YES, RETURN WITH ACK 3 ABL WINRST NO, RETURN TO WINDOW QUEUE * RE100 EQU * CF A15,OUTBUQ REMOVE DWT FROM BUFFER QUEUE LDR A2,A2 FOUND? ABL(NZ) BUFRST YES, RETURN WITH ERROR CODE * ABL PLDSP2 LOCAL DISPATCHER * * REERR1 EQU * CM CWTCCB,A5 SET CCA FREE REERR2 EQU * * ERROR. RETURN MONITOR BLOCK IMMEDIATELY SUK A4,2 START ADDRESS OF MONITOR BLOCK CF A15,LNKOUT REMOVE FROM QUEUE. A7 ALREADY SET CF A15,FREBLK RETURN MONITOR BLOCK ABL PLDSP2 LOCAL DISPATCHER * EJECT * ********************* * RECOVERY ROUTINES * ********************* * * THESE ROUTINES ARE USED AT SYSTEM START OR TC POWER * UP. IN CASE OF POWER UP, THEY FIRST REMOVE ALL RUNNING * OUTPUT OPERATIONS. AFTER THAT, THE PLC IS STARTED, * AND LAST RECOVERY ROUTINES IN DEVICE DRIVERS ARE * CALLED FOR ALL DWT:S. * THE SECTION ALSO CONTAINS ROUTINES FOR RECOVERY * OF I/O ERRORS. * * * ROUTINES IN ORDER OF APPEARANCE IN CODE: * * NAME FUNCTION * * PLON CALL RECOVERY ONCE FOR EACH PLC CHANNEL UNIT * PLSTRT START PLC AND CALL DEVICE RECOVERY * EJECT * ************************************************************ * * ROUTINE NAME: * PLON * * FUNCTION: * THIS ROUTINE WILL ACTIVATE A MONITOR JOB * FOR THE PLC RECOVERY, IF THE JOB NOT ALREADY * IS PENDING. * THE MONITOR JOB WILL CALL THE RECOVERY ROUTINE ONCE * FOR EACH PLC DEFINED. * * CALL: * CF A15,PLON * * INPUT: * - * * OUTPUT: * AT ENTRY TO PLSTRT: * A5 = CWT ADDRESS * ************************************************************ * PLON EQU * LD A1,PLCPFP POWER UP PENDING? RF(NZ) PO100 YES, EXIT IM PLCPFP INDICATE POWER UP STARTED * LDKL A2,PO110 START ADDRESS CF A15,QMJOB ACTIVATE MONITOR JOB * PO100 EQU * RTN A15 * EJECT * PO110 EQU * CM PLCPFP NO LONGER PENDING * * IFF UTTEST=0 QUEUE STATISTICS * RESET QUEUE STATISTICS COUNTERS LDK A1,STATLN TABLE LENGTH PO113 EQU * SUK A1,2 NEXT WORD RF(N) PO116 READY WHEN ALL DONE CM STATAR,A1 RESET COUNTER RB PO113 NEXT WORD PO116 EQU * XIF * LDK A1,16 (MAX NUMBER OF PLC:S) * 2 PO120 EQU * * THIS LOOP IS EXECUTED ONCE FOR EACH PLC SUK A1,2 NEXT PLC RF(N) PO130 EXIT IF ALL DONE LD A5,TABCWT,A1 CWT ADDRESS RB(Z) PO120 TAKE NEXT IF NOT DEFINED CF A15,PLSTRT START ONE PLC RB PO120 NEXT PLC * PO130 EQU * ABL MEXIT MONITOR JOB EXIT * EJECT * ************************************************************ * * ROUTINE NAME: * PLSTRT * * FUNCTION: * THIS ROUTINE FIRST CLEARS ALL WORK AREAS AND * DWT:S, AND SETS THE DWT:S BUSY. IT THEN STARTS * THE PLC, AND CALLS RECOVERY ROUTINES IN ALL * DEVICE DRIVERS. * * CALL: * CF A15,PLSTRT * * INPUT: * A5 = CWT ADDRESS * * OUTPUT: * - * ************************************************************ * PLSTRT EQU * IFT CPU852=1 CF A15,SAVE8 PUSH A1-A8 XIF IFF CPU852=1 MSR 8,A15 PUSH A1-A8 XIF * ENB IM CWTGR,A5 INDICATE GENERAL READ NOT ALLOWED CM CWTABW,A5 STOP ABORT OF WS CM CWTSBQ,A5 RESET SHORT BUFFER QUEUE CM CWTLBQ,A5 RESET LONG BUFFER QUEUE * EJECT * ST100 EQU * * RETURN MONITOR BLOCKS USED AS BUFFERS LDR A7,A5 ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD LDR* A4,A7 FIRST BLOCK RF(Z) ST105 CONTINUE IF NO LEFT CF A15,LNKOUT REMOVE FROM QUEUE CF A15,FREBLK RETURN BLOCK RB ST100 TAKE NEXT ST105 EQU * * RETURN MONITOR BLOCKS FROM CCA QUEUE LDR A7,A5 ADK A7,CWTCCQ CCA QUEUE HEAD LDR* A4,A7 FIRST BLOCK RF(Z) ST110 CONTINUE IF NO LEFT CF A15,LNKOUT REMOVE FROM QUEUE CF A15,FREBLK RETURN BLOCK RB ST105 TAKE NEXT * ST110 EQU * * INITIATE BUFFER AREAS LDR A4,A5 CWT ADDRESS ADKL A4,CWTSOB AREA FOR SHORT OUTPUT BUFFERS LDR A7,A5 ADK A7,CWTPBS POOLBLOCK, SHORT OUTPUT BUFFERS CF A15,INIBUF INITIATE BUFFER AREA LDR A4,A5 CWT ADDRESS ADKL A4,CWTLOB AREA FOR LONG OUTPUT BUFFERS LDR A7,A5 ADK A7,CWTPBL POOLBLOCK, LONG OUTPUT BUFFERS CF A15,INIBUF INITIATE BUFFER AREA LDR A4,A5 CWT ADDRESS ADKL A4,CWTGRB AREA FOR GENERAL READ BUFFERS LDR A7,A5 ADK A7,CWTPBG POOLBLOCK, GENERAL READ BUFFERS CF A15,INIBUF INITIATE BUFFER AREA * * RESET ALL DWT:S AND WORK STATION STATUS LDK A3,MAXWS+1 NUMBER OF WORK STATIONS + 1 ST120 EQU * SUK A3,1 NEXT WORK STATION RF(N) ST150 END IF NO MORE LEFT LDR A2,A3 WORK STATION NUMBER SLA A2,1 MAKE INDEX ADR A2,A5 ADD CWT ADDRESS ADK A2,CWTWSS WORK STATION STATUS WORD CMR A2 CLEAR STATUS LDK A1,NOTOPR SCR A1,A2 WS := NOT OPERABLE LD* A1,CWTINT,A5 WORK STATION TABLE ADDRESS LDR A6,A3 WORK STATION NUMBER CF A15,NDGEDN A7 := HIGEST DWT NUMBER ON WS ADK A7,1 ST130 EQU * SUK A7,1 NEXT DWT RF(N) ST140 NEXT WS IF NO DWT LEFT LDR A6,A3 WS NUMBER CF A15,GETDWT A6 := DWT ADDRESS RB(Z) ST130 NOT DEFINED CM DWTLD2,A6 RESET FLOW CONTROL LDKL A2,/FFFF-DWFBSY-DWFPLC * MASK FOR BUSY AND PLC FLAGS ANS A2,DWTST,A6 RESET FLAGS CM DWTLD1,A6 RELEASE BUFFER, IF ANY CM DWTOTQ,A6 REMOVE DWT FROM QUEUE, IF ANY RB ST130 NEXT DWT ST140 EQU * RB ST120 NEXT WORK STATION * ST150 EQU * * DELAY UNTIL PLC IS READY FOR START LD A4,CWTTPR,A5 TIMER ALREADY STARTED? RF(Z) ST152 NO, START TIMER LDKL A1,-STADLY-1 DELAY TIME STR A1,A4 RESTART TIMER RF ST154 EXIT * ST152 EQU * LDR A1,A5 SAVE CWT ADDRESS CF A15,SETIME START TIMER DATA ST156,STADLY RESTART ADDRESS & DELAY TIME ST A4,CWTTPR,A5 SAVE TIMER POINTER ST154 EQU * ABL TDISP WAIT UNTIL TIMER EXPIRES * ST156 EQU * LDR A5,A1 RESTORE CWT ADDRESS CM CWTTPR,A5 INDICATE NO TIMER RUNNING * * START "TEST CHANNEL UNIT" OPERATION IM CWTCCB,A5 SET CCA BUSY CM CWTOPR,A5 SET PLC OPERABLE LDK A2,CMDTC COMMAND CODE TEST CU ST A2,CWTCCA+CCRDLS,A5 COMMAND AND DLS INDEX TO CCA CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING LDR A3,A5 CWT ADDRESS ADK A3,CWTCSD CONTROL UNIT START DESCRIPTOR ADDR INH CF A15,PLCCIO CIO START RF(NZ) STERR2 EXIT IF ERROR IM CWTOPR,A5 SET NOT OPERABLE UNTIL TEST CU READY ABL TDISP WAIT FOR COMPLETION * * * ENTRY IS MADE HERE WHEN TEST CU IS COMPLETED. * REGISTER CONTENTS ON ENTRY: * A1 = PLC STATUS * A5 = CWT ADDRESS * TCURST EQU * LDR A1,A1 OPERATION OK? RF(NZ) STERR2 NO, EXIT * * PERFORM "OPEN LINE" OPERATION U =5 LDK A2,0 INITIATE LINE COUNTER ST A2,CWTLNO,A5 ST157 EQU * CF A15,PLCCCA RESERVE CCA * LD A2,CWTLNO,A5 GET LINE NO SC A2,CWTCCA+CCRSU1,A5 SET UP LINE IN CCA =5 SLL A2,1 MAKE OPEN LINE PARA- ST A2,CWTPAR,A5 METER AREA ST158 EQU * LD A2,CWTOPP,A5 MAKE ADDRESS TO AD A2,CWTPAR,A5 OPEN LINE PARAMETER AREA LDR* A2,A2 U =5 ST A2,CWTCCA+CCRBUF,A5 SET UP IN CCA LDK A2,CMDOP COMMAND OPEN LINE ST A2,CWTCCA+CCRDLS,A5 COMMAND AND DLS INDEX TO CCA CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR LDK A2,12 PARAMETER AREA LENGTH =1 ST A2,CWTCCA+CCRLEN,A5 TO CCA * CM CWTOPR,A5 SET PLC OPERABLE CF A15,PLCCIO CIO START RF(NZ) STERR2 EXIT IF ERROR ABL PLDSP2 LOCAL DISPATCHER * * * ENTRY TO OPLRST WILL BE MADE WHEN THE OPEN LINE * OPERATION IS COMPLETED. * REGISTER CONTENTS ON ENTRY: * A1 = PLC STATUS * A5 = CWT ADDRESS * OPLRST EQU * LDR A1,A1 OPERATION OK? RF(NZ) STERR2 NO, EXIT * LD A2,CWTPNR,A5 GET PLC NR SUK A2,3 CHECK IF LOCAL RF(NP) ST159 YES IM CWTLNO,A5 INCREMENT LINE NUMBER LD A2,CWTLNO,A5 GET LINE NO SUK A2,4 ALL LINES OPENED ? RB(NZ) ST157 NO, TAKE NEXT CM CWTLNO,A5 ST159 EQU * * CM CWTGR,A5 INDICATE GENERAL READ ALLOWED * * PERFORM OPEN DATA LINK FOR ALL CONNECTED SECONDARIES * LDK A6,MAXWS+1 (MAX NR OF DLS) + 1 ST160 EQU * SUK A6,1 NEXT WORK STATION (DLS) RF(N) ST180 EXIT IF ALL DONE LD* A1,CWTINT,A5 WORK STATION TABLE CF A15,NDGEDN A7 := HIGEST DWT NUMBER ON WS LDR A7,A7 ANY DWT:S? RB(N) ST160 NO, TAKE NEXT WS * CF A15,PLCCCA RESERVE CCA LDR A3,A6 WORK STATION NUMBER SLA A3,1 MAKE INDEX ADR A3,A5 ADD CWT ADDRESS CM CWTWSS,A3 CLEAR WS STATUS SC A6,CWTCCA+CCRDLS,A5 DLS INDEX (WS NUMBER) TO CCA ST A6,CWTCCA+CCRIDW,A5 SAVE DLS INDEX LDK A2,CMDOD COMMAND OPEN DLS SC A2,CWTCCA+CCRCMD,A5 TO CCA LDK A2,MAXFR MAX OUTSTANDING FRAMES SC A2,CWTCCA+CCRSU1,A5 TO SUBCOMMAND 1 CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING CF A15,PLCCIO CIO START RF(NZ) STERR2 EXIT IF ERROR ABL PLDSP2 EXIT. WAIT FOR COMPLETION * * * ENTRY TO ODLRST IS MADE WHEN OPERATION IS COMPLETED. * REGISTER CONTENTS ON ENTRY: * A2 = FATAL PLC STATUS * A5 = CWT ADDRESS * A6 = WORK STATION NUMBER (DLS INDEX) * ODLRST EQU * LDR A2,A2 FATAL ERROR? RF(NZ) STERR2 YES, EXIT LD* A3,CWTINT,A5 WORK STATION TABLE ADDRESS LDK A4,RETCP FLAG "TC POWER UP" CF A15,NDREWS RECOVERY OF ALL DWT:S ON WS RB ST160 TAKE NEXT WORK STATION * * ST180 EQU * * ALL DATA LINKS ARE STARTED. EXIT. ABL PLDSP2 LOCAL DISPATCHER * * STERR2 EQU * * ERROR DURING STARTUP. EXIT. * ABL TDISP EXIT * EJECT * ******************** * LOCAL DISPATCHER * ******************** * * THIS SECTION CONTAINS A DISPATCHER FOR THE PLC DRIVER. * IT CAN BE CALLED EITHER FROM ANOTHER ROUTINE IN THE * PLC DRIVER, OR FROM A TERMINAL DEVICE DRIVER (THROUGH * THE NETWORK DISTRIBUTOR). * SOME INTERRUPTS OR DEVICE DRIVER CALLS SET SEVERAL * RESOURCES FREE. THIS MEANS THAT SEVERAL WAITING * PROCERSSES MAY BECOME READY FOR ACTIVATION. ONLY ONE * OF THESE PROCESSES CAN BE ACTIVATED DIRECTLY. THE * OTHER PROCESSES WILL BE ACTIVATED IN TURN, WHEN FIRST * PROCESS EXITS TO THIS DISPATCHER. * * * ROUTINES IN ORDER OF APPEARANCE IN CODE: * * NAME FUNCTION * * PLDISP ACTIVATE PROCESS OR PERFORM COMMON FUNCTION * EJECT * ************************************************************ * * ROUTINE NAME: * PLDISP * * FUNCTION: * THIS ROUTINE LOOKS FOR WAITING PROCESSES THAT ARE * READY FOR DISPATCHING. IF ANY IS FOUND, IT IS * ACTIVATED. THE ROUTINE ALSO PERFORMS ACTIONS THAT * ARE NOT EXPLICITLY REQUESTED BY USER PROCESSES, EG * GENERAL READ. WHEN NOTHING IS LEFT TO DO, THE ROUTINE * EXITS TO TOSS DISPATCHER. * TWO ENTRIES ARE PROVIDED. ONE IS USED WHEN CALLER * KNOWS OWN DWT ADDRESS, ONE WHEN CALLER KNOWS OWN * CWT ADDRESS. * * CALL: * ABL PLDISP * ABL PLDSP2 * * INPUT: * A5 = CWT ADDRESS (IF PLDSP2) * A6 = DWT ADDRESS (IF PLDISP) * A1-A8 ON A15 STACK * * OUTPUT: * - * ************************************************************ * PLDISP EQU * PRDISP EQU * CF A15,GETCWT A5 := CWT ADDRESS LDR A5,A5 ABL(Z) TDISP NOT DEFINED. EXIT * * PLDSP2 EQU * * * DP100 EQU * ENB * HANDLE CHARACTER INPUT LD A4,CWTBUF,A5 INPUT BUFFER WAITING? RF(Z) DP200 NO, CONTINUE LD A6,BUFDWT,A4 DWT ADDRESS * CF A15,PLGECH A2 := CHARACTER LDR A1,A1 CHECK RETURN CODE RF(N) DP110 BUFFER EMPTY LD A3,DWTST,A6 DEVICE STATUS ANK A3,DWFINP INPUT REQUESTED? ABL(NZ) INPRST YES, RETURN TO DEVICE DRIVER * LD A1,DWTADR,A6 ADDRESS BLOCK LD A1,INTADR,A1 INTERRUPT ENTRY DEFINED? ABR(NZ) A1 YES, GO TO INTERRUPT HANDLER * DP110 EQU * CW A4,DWTLD1,A6 BUFFER CHAINED TO THIS DWT? RF(NE) DP120 NO, CONTINUE CM DWTLD1,A6 REMOVE LINK DP120 EQU * CM CWTBUF,A5 NO BUFFER WAITING CF A15,PLRLBU RELEASE BUFFER * * CHECK IF LEVEL 3 RECIEVE READY SHOULD BE SENT CF A15,GETIFR A2 := NR OF FRAMES NOT ACK:ED SUK A2,6 TIME TO SEND RR? ABL(NN) SENDRR YES * * DP200 EQU * ENB * HANDLE POWER UP FOR TC LD A1,PFPOST POWER UP TASK PENDING? OR A1,PLCPFP PLC POWER UP PENDING? ABL(NZ) TDISP YES, EXIT * * DP300 EQU * * HANDLE ABORT OF ONE WORK STATION LD A6,CWTABW,A5 WS TO ABORT, IF ANY ABL(NZ) ABTHAN DO ABORT, IF REQUESTED * * DP400 EQU * * CHECK IF ANYONE WAITING FOR CCA LD A4,CWTCCQ,A5 ANYONE IN CCA QUEUE? RF(Z) DP500 NO, CONTINUE LD A1,CWTCCB,A5 CCA FREE? RF(NZ) DP500 NO, CONTINUE IM CWTCCB,A5 SET CCA BUSY ABL CCARST ACTIVATE WAITING PROCESS * * DP500 EQU * * CHECK BUFFER QUEUES LD A6,CWTSBQ,A5 ANYONE IN SHORT BUFFERS QUEUE? RF(Z) DP510 NO, CHECK LONG LDR A7,A5 CWT ADDRESS ADK A7,CWTPBS POOLBLOCK FOR SHORT BUFFERS CF A15,PLGTBU A4 := BUFFER ADDRESS RF(Z) DP510 NO BUFFER AVAILABLE LDK A7,CWTSBQ OFFSET TO CWT QUEUE HEAD RF DP520 COMMON PART FOR SHORT/LONG * DP510 EQU * LD A6,CWTLBQ,A5 ANYONE IN LONG BUFFERS QUEUE? RF(Z) DP600 NO, CONTINUE LDR A7,A5 CWT ADDRESS ADK A7,CWTPBL POOLBLOCK FOR LONG BUFFERS CF A15,PLGTBU A4 := BUFFER ADDRESS RF(Z) DP600 CONTINUE IF NO BUFFER AVAILABLE LDK A7,CWTLBQ OFFSET TO LONG BUFFERS QUEUE HEAD * DP520 EQU * * SHORT OR LONG BUFFER FOUND LDR A2,A4 SAVE BUFFER ADDRESS LDR A4,A6 DWT QUEUE LINK ADR A7,A5 BUFFER QUEUE HEAD CF A15,LNKOUT REMOVE FROM QUEUE SUKL A6,DWTOTQ A6 := DWT ADDRESS LDR A4,A2 RESTORE BUFFER ADDRESS LDK A1,0 RET CODE := OK ABL BUFRST RETURN TO ROUTINE WAITING * * DP600 EQU * * CHECK IF GENERAL READ SHOULD BE PERFORMED LD A1,CWTGR,A5 GENERAL READ ALLOWED? RF(NZ) DP800 NO, EXIT * LDR A7,A5 CWT ADDRESS ADK A7,CWTPBG POOLBLOCK FOR GENERAL READ BUFFERS CF A15,PLGTBU A4 := BUFFER ADDRESS ABL(NZ) GREAD PERFORM GR IF BUFFER FOUND * * DP800 EQU * * NOTHING MORE TO DO. EXIT TO DISPATCHER ABL TDISP TOSS DISPATCHER * EJECT * ************ * ROUTINES * ************ * * THIS SECTION CONTAINS MISCELLANEOUS SERVICE ROUTINES. * ALL ROUTINES ARE CALLED BY AN ABL "NAME" INSTRUCTION. * REGISTER INTERFACE IS DESCRIBED FOR EACH ROUTINE. * WHEN A ROUTINE HAS PERFORMED THE REQUESTED FUNCTION, * IT WILL EXIT TO THE LOCAL DISPATCHER. * * ROUTINES IN ORDER OF APPEARANCE IN CODE: * * NAME FUNCTION * * ABTHAN ABORT ALL WAITING DWT:S ON A WORK STATION * PLREWS HANDLE RECOVERY OF ONE WORK STATION * SENDRR SEND LEVEL 3 RECIEVE READY MESSAGE * GREAD PERFORM GENERAL READ * EJECT * ************************************************************ * * ROUTINE NAME: * ABTHAN * * FUNCTION: * THIS ROUTINE WILL HANDLE ABORTS FOR ONE WORK * STATION. ALL REQUESTS OF DWT:S WAITING FOR * LEVEL 3 ACK OR WAITING IN CCA OR BUFFER QUEUES * WILL BE ABORTED. ONE CALL IS NEEDED FOR EACH * REQUEST TO BE ABORTED. * * CALL: * ABL ABTHAN * * INPUT: * A5 = CWT ADDRESS * A6 = WORK STATION NUMBER * * OUTPUT: * AT RETURN TO REQUEST: * A1 = RETURN CODE * A5 = CWT ADDRESS * A6 = DWT ADDRESS * ************************************************************ * ABTHAN EQU * LDR A3,A6 WORK STATION NUMBER SLA A3,1 MAKE INDEX ADR A3,A5 ADD CWT ADDRESS ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS * EJECT * LDR A8,A6 SAVE WS NUMBER LD* A1,CWTINT,A5 WORK STATION TABLE CF A15,NDGEDN A7 := HIGEST DWT NR ON WS LDK A1,0 LCR A1,A3 WORK STATION STATUS * ADK A7,1 PREPARE FOR SUK AH100 EQU * SUK A7,1 NEXT DWT RF(N) AH110 EXIT IF ALL DONE LDR A6,A8 WS NUMBER CF A15,GETDWT A6 := DWT ADDRESS RB(Z) AH100 NOT DEFINED * CM DWTLD2,A6 RESET FLOW CONTROL LD A2,DWTST,A6 DWT STATUS LDR A3,A2 LDKL A4,/FFFF-DWFPLC MASK FOR PLC FLAGS ANS A4,DWTST,A6 RESET FLAGS ANK A2,DWFAK3 IS DWT WAITING FOR LEVEL 3 ACK? RF(Z) AH105 NO, CONTINUE ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? ABL(NZ) AK3RST YES, RETURN WITH ACK 3 ABL WINRST NO, RETURN TO WINDOW QUEUE * AH105 EQU * LD A4,DWTOTQ,A6 CCA QUEUE ELEMENT POINTER LDR A2,A7 SAVE DEVICE ADDRESS LDR A3,A1 SAVE RETURN CODE LDR A7,A5 CWT ADDRESS ADK A7,CWTCCQ CCA QUEUE HEAD CF A15,LNKOUT LINK MONITOR BLOCK OUT OF QUEUE LDR A7,A7 FOUND? ABL(NZ) CCAABT YES, ABORT REQUEST LDR A7,A2 RESTORE DEVICE ADDRESS LDR A1,A3 RESTORE RETURN CODE * CF A15,OUTBUQ REMOVE FROM BUFFER QUEUE LDR A2,A2 FOUND IN QUEUE? ABL(NZ) BUFRST YES, TERMINATE REQUEST RB AH100 NEXT DWT * AH110 EQU * * ALL PROCESSES WAITING FOR ACK 3 OR IN QUEUES ARE ABORTED CM CWTABW,A5 NO MORE ABORT ABL PLDSP2 LOCAL DISPATCHER * EJECT * ************************************************************ * * ROUTINE NAME: * PLREWS * * FUNCTION: * THIS ROUTINE WILL HANDLE RECOVERY OF ONE WORK * STATION. ACTUAL CALL TO TERMINAL DEVICE DRIVER * RECOVERY ROUTINES ARE MADE THROUGH NDREWS. * * CALL: * ABL PLREWS * * INPUT: * A5 = CWT ADDRESS * A6 = WORK STATION NUMBER * * OUTPUT: * AT ENTRY TO DEVICE RECOVERY: * SEE NDREWS * ************************************************************ * PLREWS EQU * LDR A3,A6 WORK STATION NUMBER SLA A3,1 MAKE INDEX ADR A3,A5 ADD CWT ADDRESS ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS * LDKL A2,/FFFF-WSFERR MASK FOR ERROR FLAG ANRS A2,A3 INDICATE WS WORKING AFTER ERROR LCR A1,A3 WS STATUS LDK A2,0 SCR A2,A3 RESET STATUS LDK A4,RESECP ASSUME SECONDARY POWER UP ANK A1,NOTOPR WAS IT? RF(NZ) PR110 YES LDK A4,RELINE NO, LINK ERROR PR110 EQU * LD* A3,CWTINT,A5 WORK STATION TABLE CF A15,NDREWS CALL RECOVERY FOR ALL DWT:S ON WS * ABL PLDSP2 LOCAL DISPATCHER * EJECT * ************************************************************ * * ROUTINE NAME: * SENDRR * * FUNCTION: * THIS ROUTINE WILL SEND ONE LEVEL 3 RECIEVE READY * MESSAGE TO A SECONDARY STATION. * * CALL: * ABL SENDRR * * INPUT: * A5 = CWT ADDRESS * A6 = DWT ADDRESS * * OUTPUT: * - * ************************************************************ * SENDRR EQU * CF A15,PLCCCA RESERVE CCA CF A15,GETBLK GET MONITOR BLOCK AS BUFFER ENB LDR A7,A5 CWT ADDRESS ADK A7,CWTMBQ QUEUE FOR KEEPING TRACK OF MB:S CF A15,LNKFST PUT MONITOR BLOCK IN QUEUE ADK A4,2 A4 := START OF USER PART CF A15,WRADR2 WRITE LINE ADDRESS IN CCA & BUFFER LDK A2,CMDSW COMMAND := STANDARD WRITE SC A2,CWTCCA+CCRCMD,A5 TO CCA LDK A2,TYRR MESSAGE TYPE := RECIEVE READY SC A2,CWTCCA+CCRIDB,A5 TO CCA, IDENTITY LDK A2,X25DAT LENGTH OF X25 HEADER ST A2,CWTCCA+CCRLEN,A5 BUFFER LENGTH TO CCA CM CWTCCA+CCRC1B,A5 RESET DATA CHAIN & MSB BUFFER ADDR ST A4,CWTCCA+CCRBUF,A5 BUFFER ADDRESS TO CCA * CF A15,GETLCS A1 := STATUS & INH RF(Z) RR100 CONTINUE IF OK CM CWTCCB,A5 SET CCA FREE RF RR110 SKIP RR RR100 EQU * CF A15,FWOPR A2 := P(R). UPDATE FLOW CTRL ORK A2,/01 MESSAGE TYPE := RR SC A2,X25FLW,A4 TO BUFFER CF A15,PLCCIO EXECUTE CIO START RF(Z) RR120 EXIT IF OK RR110 EQU * SUK A4,2 START ADDRESS OF MONITOR BLOCK CF A15,LNKOUT REMOVE FROM QUEUE. A7 ALREADY SET CF A15,FREBLK RETURN MONITOR BLOCK * RR120 EQU * ABL PLDSP2 LOCAL DISPATCHER * EJECT * ************************************************************ * * ROUTINE NAME: * GREAD * * FUNCTION: * THIS ROUTINE WILL PERFORM ONE GENERAL READ * OPERATION TO THE PLC. * * CALL: * ABL GREAD * * INPUT: * A4 = BUFFER ADDRESS * A5 = CWT ADDRESS * * OUTPUT: * - * ************************************************************ * GREAD EQU * LDR A6,A4 PARAMETER := BUFFER ADDRESS CF A15,PLCCCA RESERVE PLC CCA * SET CCA PARAMETERS CM CWTCCA+CCRC1B,A5 CLEAR DATA CHAINING & MSB ADDR ST A6,CWTCCA+CCRBUF,A5 BUFFER ADDRESS LD A2,BUFLEN,A6 BUFFER LENGTH ST A2,CWTCCA+CCRLEN,A5 LDK A2,CMDGR COMMAND GENERAL READ ST A2,CWTCCA+CCRDLS,A5 DLS INDEX & COMMAND CF A15,PLCCIO EXECUTE CIO START ABL PLDSP2 CHECK WHAT TO DO NEXT * EJECT * *************** * SUBROUTINES * *************** * * THIS SECTION CONTAINS MISCELLANEOUS SERVICE SUBROUTINES. * ALL ROUTINES ARE CALLED BY A CF A15,"NAME" * INSTRUCTION. REGISTER INTERFACE IS DESCRIBED FOR EACH * ROUTINE. ONLY REGISTERS A1-A8 & PSW ARE CONSIDERED. * REGISTERS NOT MENTIONED UNDER "OUTPUT" ARE UNCHANGED * FROM CALL. * THE ROUTINES ARE OF TWO TYPES, ASYNCHRONOUS ROUTINES * AND COMPUTATION ROUTINES. ASYNCHRONOUS ROUTINES MAY, * IF THE REQUESTED FUNCTION IS OCCUPIED OR NOT USEABLE, * EXIT TO THE LOCAL DISPATCHER AND/OR TOSS DISPATCHER. * THIS MEANS THAT THE A15 STACK AT CALL MUST CONTAIN * INTERRUPT RETURN, A1-A8 AND NOTHING ELSE. COMPUTATION * ROUTINES HAVE NO SUCH LIMITATIONS, AS THEY WILL RETURN * IMMEDIATELY WHEN THEY HAVE PERFORMED THE PROCESSING. * EJECT * * ROUTINES IN ORDER OF APPEARANCE IN CODE: * * NAME FUNCTION * * ASYNCHRONOUS ROUTINES * PLCCCA RESERVE CCA FOR PROCESS * PLCCIO EXECUTE CIO START * * COMPUTATION ROUTINES * PLCNOP SET FLAG INDICATING PLC NOT OPERABLE * GETDWT CALCULATE DWT ADDRESS * GETCWT CALCULATE CWT ADDRESS * GETFR GET NUMBER OF OUTSTANDING FRAMES * FLWINP HANDLE FLOW CONTROL FOR INPUT * FLWOUT HANDLE FLOW CONTROL FOR OUTPUT * WRADDR WRITE LINE ADDRESS IN CCA AND BUFFER * STAHAN PLC RETURN STATUS HANDLER * GETSTA GET STATUS FOR I/O CONNECTION * PLGTBU ALLOCATE BUFFER AND SET TO PLC FORMAT * PLRLBU RELEASE BUFFER OF PLC FORMAT * PLCHAR GET/PUT CHARACTER FROM/IN PLC FORMAT BUFFER * INTYPE DECIDE TYPE OF INPUT MESSAGE * OUTBUQ REMOVE ELEMENT FROM BUFFER QUEUE * LNKFST LINK ELEMENT FIRST IN QUEUE * LNKLST LINK ELEMENT LAST IN QUEUE * LNKOUT LINK ELEMENT OUT OF QUEUE * EJECT * ************************************************************ * * ROUTINE NAME: * PLCCCA * * FUNCTION: * THIS ROUTINE IS CALLED WHEN A PROCESS WANTS TO * USE THE PLC COMMAND COMMUNICATION AREA (CCA). * IF THE AREA IS FREE, THE ROUTINE SETS IT BUSY * AND RETURNS. IF THE AREA IS BUSY, THE CALLING * PROCESS IS PUT IN A QUEUE, AND EXIT IS MADE TO * THE LOCAL DISPATCHER. * PLCCCA ONLY RESERVES THE AREA. * PLCCCS ALSO SAVES THE QUEUE ELEMENT ADDRESS. * * CALL: * CF A15,PLCCCA * CF A15,PLCCCS * * INPUT: * A3 = QUEUE ELEMENT ADDRESS SAVE AREA (IF PLCCCS) * A5 = CWT ADDRESS * A6 = PARAMETER * A1-A8 ON A15 STACK * * OUTPUT: * A1 = RETURN CODE (IF PLCCCS, ELSE CHANGED) * A2-A4 CHANGED * A7-A8 CHANGED * CR = CHANGED * INTERR. INHIBITED * ************************************************************ * EJECT * PLCCCA EQU * LDK A3,0 DON'T SAVE QUEUE ELEMENT ADDRESS * PLCCCS EQU * INH LD A1,CWTCCQ,A5 ANYONE WAITING FOR CCA? RF(NZ) CA100 YES, PUT IN QUEUE LD A4,CWTCCB,A5 PLC BUSY? RF(NZ) CA100 YES, PUT IN QUEUE * * PLC FREE IM CWTCCB,A5 SET PLC BUSY ADKL A15,4 ADJUST STACK FOR RETURN LDK A1,0 RETURN CODE := OK ABR* A15 RETURN IN INHIBIT MODE * * CA100 EQU * * PLC BUSY. PUT REQUEST IN QUEUE. LDR A1,A6 SAVE PARAMETER LDR* A2,A15 SKIP PSW LDR* A2,A15 SAVE RETURN ADDRESS CF A15,GETBLK GET MONITOR BLOCK AND SAVE A1-A2 LDR A3,A3 SAVE POINTER? RF(Z) CA110 NO, CONTINUE STR A4,A3 SAVE QUEUE ELEMENT ADDRESS CA110 EQU * LDR A7,A5 CWT ADDRESS ADK A7,CWTCCQ PLC BUSY QUEUE HEAD CF A15,LNKLST PUT BLOCK LAST IN QUEUE IFF UTTEST=0 QUEUE STATISTICS LD A1,CWTPNR,A5 PLC NUMBER SLA A1,1 MAKE INDEX IM CCQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER XIF ABL PLDSP2 LOCAL DISPATCHER * * * RETURN IS MADE HERE WHEN THE CCA IS FREE. * (AT A RELEASE INTERRUPT OR FROM DISPATCHER.) * REGISTERS ON ENTRY: * A4 = MONITOR BLOCK ADDRESS * A5 = CWT ADDRESS * CCARST EQU * INH LDR A7,A5 CWT ADDRESS ADK A7,CWTCCQ CCA QUEUE HEAD CF A15,LNKOUT REMOVE PROCESS FROM QUEUE LDK A3,0 RETURN CODE := OK * * * ENTRY IS MADE HERE WHEN A REQUEST SHOULD BE ABORTED * DUE TO I/O ERROR. * REGISTERS ON ENTRY: * A3 = RETURN CODE * A4 = MONITOR BLOCK ADDRESS * A5 = CWT ADDRESS * CCAABT EQU * INH LDR A7,A3 SAVE RETURN CODE CF A15,FREBLK RETURN MONITOR BLOCK. LOAD A1-A2 LDR A6,A1 PARAMETER LDR A1,A7 A1 := RETURN CODE ABR A2 RETURN * EJECT * ************************************************************ * * ROUTINE NAME: * PLCCIO * * FUNCTION: * THIS ROUTINE CHECKS IF THE PLC CAN BE USED. IF IT CAN, * THE ROUTINE EXECUTES A CIO START INSTRUCTION. * IF THE PLC IS NOT OPERABLE DUE TO TC POWER UP, * THE ROUTINE WILL EXIT TO TOSS DISPATCHER. IN ALL OTHER * CASES, IT WILL RETURN TO CALLING PROGRAM WITH A RETURN * CODE. * * CALL: * CF A15,PLCCIO * * INPUT: * A5 = CWT ADDRESS * A1-A8 ON A15 STACK * * OUTPUT: * A1 = RETURN CODE * 0 IF OK * NOT 0 ELSE * A2 = CHANGED * CR = CONTENTS OF A1 * INTERR. INHIBITED * ************************************************************ * PLCCIO EQU * INH LDR* A2,A15 SKIP PSW LDR* A2,A15 GET RETURN ADDRESS * EJECT * LD A1,PFPOST POWER UP TASK PENDING? OR A1,PLCPFP PLC POWER UP PENDING? ABL(NZ) TDISP YES, GO TO TOSS DISPATCHER LD A1,CWTOPR,A5 PLC OPERABLE? RF(NZ) CS100 NO, HANDLE IFF UTTEST=0 CF A15,LOGCOM LOG CCR XIF EX CWTCIO,A5 EXECUTE CIO START ABR(A) A2 RETURN IF OK. A1=0 * CF A15,PLCNOP ERROR. SET NOT OPERABLE CS100 EQU * LDK A1,NOTOPR RETURN CODE := NOT OPERABLE CM CWTCCB,A5 SET CCA FREE LDR A1,A1 SET CR ABR A2 RETURN * EJECT * ************************************************************ * * ROUTINE NAME: * PLCNOP * * FUNCTION: * THIS ROUTINE SETS A FLAG TO INDICATE THAT THE PLC * IS "NOT OPERABLE". * * CALL: * CF A15,PLCNOP * * INPUT: * A5 = CWT ADDRESS * * OUTPUT: * - * ************************************************************ * PLCNOP EQU * STR A1,A15 PUSH A1 LD A1,CWTPLS,A5 GET PLC STATUS RF(NZ) PN100 LDKL A1,-1 SET DUMMY ERROR CODE PN100 EQU * ST A1,CWTOPR,A5 SET PLC NOT OPERABLE * IFF UTTEST=0 * EJECT * LD A1,UTTST TRAP CONTROL SUK A1,1 TRAP USED? RF(NG) PN120 NO, SKIP LDK A1,PLCERR ERROR CODE OTR A1,0,/2E TO SOP LAMPS DATA /6300 TRAP TO BUGGER PN120 EQU * * XIF * LDR* A1,A15 POP A1 RTN A15 EJECT * ************************************************************ * * ROUTINE NAME: * GETDWT * * FUNCTION: * THIS ROUTINE CALCULATES THE DWT ADDRESS FOR A * DEVICE CONNECTED TO A PLC. * * CALL: * CF A15,GETDWT * * INPUT: * A5 = CWT ADDRESS * A6 = DLS INDEX * A7 = DEVICE ADDRESS * * OUTPUT: * A6 = DWT ADDRESS IF FOUND, * ELSE 0 * CR = CONTENTS OF A6 * INTERR. INHIBITED * ************************************************************ * GETDWT EQU * INH STR A1,A15 PUSH A1 LD* A1,CWTINT,A5 WORK STATION TABLE CF A15,NDGEDW A6 := DWT ADDRESS LDR* A1,A15 POP A1 ADKL A15,4 ADJUST STACK FOR RETURN ANKL A6,/FFFE SET CR & SKIP ODD ADDRESS ABR* A15 RETURN * EJECT * ************************************************************ * * ROUTINE NAME: * GETCWT * * FUNCTION: * THIS ROUTINE CALCULATES THE CWT ADDRESS FOR * THE PLC CONTROLLING CALLING DEVICE. * * CALL: * CF A15,GETCWT * * INPUT: * A6 = DWT ADDRESS * * OUTPUT: * A5 = CWT ADDRESS IF FOUND, * ELSE 0 * A7 = 0 IF LOCAL CONNECTION * CR = CHANGED * ************************************************************ * GETCWT EQU * LD A5,DWTCHP,A6 CHANNEL PARAMETERS ANK A5,MASKPL CLEAN CHANNEL UNIT INDEX SLL A5,1 MAKE INDEX IFF PLCNRR=0 IFF PLCNRL=0 LDR* A7,A6 CHANNEL PARAMETER SUKL A7,/0500 REMOTE ? RF(Z) GET010 NO ADK A5,8 ADJUST INDEX FOR REMOTE XIF GET010 LD A5,TABCWT,A5 A5 := CWT ADDRESS * IFT CPU852=1 ADKL A15,2 SKIP PSW LDR* P,A15 RETURN XIF IFF CPU852=1 RTN A15 XIF * EJECT * ************************************************************ * * ROUTINE NAME: * GETFR * * FUNCTION: * THIS ROUTINE CALCULATES THE NUMBER OF OUTSTANDING * FRAMES, IE FRAMES THAT HAVE BEEN TRANSFERRED BUT * NOT ACKNOWLEDGED ON LEVEL 3, FOR A LOGICAL * CHANNEL. * GETIFR GETS NUMBER OF FRAMES RECIEVED BY PLC. * GETOFR GETS NUMBER OF FRAMES SENT BY PLC. * * CALL: * CF A15,GETIFR * CF A15,GETOFR * * INPUT: * A6 = DWT ADDRESS * * OUTPUT: * A1 = CHANGED * A2 = NUMBER OF OUTSTANDING FRAMES * CR = CHANGED * ************************************************************ * GETIFR EQU * LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS LDR A1,A2 SRL A2,9 BITS 13-15 := NEXT EXPECTED P(S) SRL A1,5 BITS 13-15 := LAST SENT P(R) RF GF100 TO COMMON PART * EJECT * GETOFR EQU * LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS LDR A1,A2 SRL A2,1 BITS 13-15 := NEXT P(S) TO SEND SLC A1,3 BITS 13-15 := LAST RECIEVED P(R) * * GF100 EQU * SUR A2,A1 A2 := OUTSTANDING FRAMES ANK A2,/07 CLEAN & MODULO 8 * IFT CPU852=1 ADKL A15,2 SKIP PSW LDR* P,A15 RETURN XIF * IFF CPU852=1 RTN A15 XIF * EJECT * ************************************************************ * * ROUTINE NAME: * FLWINP * * FUNCTION: * THIS ROUTINE HANDLES FLOW CONTROL FOR INPUT. IT FETCHES * FLOW CONTROL INFORMATION FROM MESSAGE AND UPDATES * COUNTERS IN DWT. * FWIPR IS FOR MESSAGES ONLY CONTAINING P(R). * FWIPSR IS FOR MESSAGES CONTAINING P(S) AND P(R). * NO ERROR CHECK IS MADE. * * CALL: * CF A15,FWIPR * CF A15,FWIPSR * * INPUT: * A4 = BUFFER ADDRESS * A6 = DWT ADDRESS * * OUTPUT: * A1 = CHANGED * CR = CHANGED * ************************************************************ * FWIPR EQU * STR A2,A15 PUSH A2 LC A1,X25FLW,A4 FLOW CONTROL FROM INPUT ANK A1,/E0 BITS 8-10 = P(R) IN LC A2,DWTLD2,A6 OLD FLOW CONTROL ANK A2,/0E BITS 12-14 = OLD P(S) IN ORR A1,A2 KEEP OLD P(S) LDR* A2,A15 POP A2 RF FI100 COMMON ENDING * * FWIPSR EQU * LC A1,X25FLW,A4 FLOW CONTROL FROM INPUT ANK A1,/EE CLEAN ADK A1,/02 BITS 12-14 := NEXT EXPECTED P(S) IN ANK A1,/EE MODULO 8 * * FI100 EQU * SC A1,DWTLD2,A6 SAVE NEW FLOW CONTROL * IFT CPU852=1 ADKL A15,2 SKIP PSW LDR* P,A15 RETURN XIF * IFF CPU852=1 RTN A15 XIF * EJECT * ************************************************************ * * ROUTINE NAME: * FLWOUT * * FUNCTION: * THIS ROUTINE HANDLES FLOW CONTROL FOR OUTPUT. FLOW * CONTROL INFORMATION IS FETCHED FROM DWT, AND COUNTERS * IN DWT ARE UPDATED. * FWOPR IS FOR MESSAGES CONTAINING ONLY P(R). * FWOPSR IS FOR MESSAGES CONTAINING P(S) AND P(R). * * CALL: * CF A15,FWOPR * CF A15,FWOPSR * * INPUT: * A6 = DWT ADDRESS * * OUTPUT: * A1 = CHANGED * A2 = BITS 0-7 ZERO * BITS 8-10 P(R) TO SEND * BIT 11 ZERO * BITS 12-14 P(S) TO SEND IF FWOPSR * ELSE ZERO * BIT 15 ZERO * CR = CHANGED * ************************************************************ * FWOPR EQU * LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS LDR A1,A2 SRL A2,4 BITS 8-10 := NEXT EXPECTED P(S) IN * (= P(R) TO SEND) ANK A2,/E0 CLEAN ANK A1,/0E BITS 12-14 = NEXT P(S) TO SEND ORR A1,A2 P(S) := SAME AS BEFORE RF FO100 COMMON ENDING * * FWOPSR EQU * LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS LDR A1,A2 SRL A2,4 BITS 8-10 := NEXT EXPECTED P(S) IN * (= P(R) TO SEND) ANK A2,/E0 CLEAN ANK A1,/0E BITS 12-14 = NEXT P(S) TO SEND ORR A2,A1 COUNTERS FOR MESSAGE LDR A1,A2 ADK A1,/02 INCREMENT P(S) TO SEND ANK A1,/EE MODULO 8 * * FO100 EQU * SC A1,DWTLD2+1,A6 SAVE FLOW CONTROL COUNTERS * IFT CPU852=1 ADKL A15,2 SKIP PSW LDR* P,A15 RETURN XIF * IFF CPU852=1 RTN A15 XIF EJECT * ************************************************************ * * ROUTINE NAME: * WRADDR * * FUNCTION: * THIS ROUTINE WRITES THE LINE ADDRESS IN A * MESSAGE. THE ADDRESS CONSISTS OF: DROP ADDRESS, * GROUP NUMBER AND DEVICE ADDRESS. WRADR1 SETS * GROUP=1 INDICATING NO FLOW CONTROL, WRADR2 SETS * GROUP=0 INDICATING FLOW CONTROL. * * CALL: * CF A15,WRADR1 * CF A15,WRADR2 * * INPUT: * A4 = BUFFER ADDRESS * A5 = CWT ADDRESS * A6 = DWT ADDRESS * * OUTPUT: * A2 = CHANGED * CR = CHANGED * ************************************************************ * WRADR1 EQU * LDK A2,/11 GROUP NUMBER 1 RF WA100 TO COMMON PART * EJECT * WRADR2 EQU * LDK A2,/10 GROUP NUMBER 0 * * WA100 EQU * SC A2,X25LGN,A4 GROUP NUMBER TO BUFFER LC A2,DWTCP2,A6 CHANNEL PARAMETERS ANK A2,MASKWS CLEAN WS NUMBER SC A2,CWTCCA+CCRDLS,A5 TO CCA LC A2,DWTCP2+1,A6 ANK A2,MASKLC CLEAN DEVICE ADDRESS SC A2,X25LCN,A4 TO BUFFER * IFT CPU852=1 ADKL A15,2 SKIP PSW LDR* P,A15 RETURN XIF * IFF CPU852=1 RTN A15 XIF * EJECT * ************************************************************ * * ROUTINE NAME: * STAHAN * * FUNCTION: * THIS ROUTINE HANDLES PLC STATUS WORD FOR ONE * WORK STATION. IF "NO CONNECTION", "LINK RESET" * OR "DCE NOT OPERABLE" IS INDICATED, AN ERROR * CODE WILL BE * SET IN THE WORK STATION STATUS WORD (CWTWSS). * OTHER STATUS BITS ARE NOT ALLOWED. * * CALL: * CF A15,STAHAN * * INPUT: * A1 = PLC STATUS * A2 = WORK STATION NUMBER * A5 = CWT ADDRESS * * OUTPUT: * A1 = DEVICE RETURN CODE * CR = CHANGED * ************************************************************ * STAHAN EQU * STR A3,A15 PUSH A3 LDR A3,A1 ANY ERROR? RF(Z) SH120 NO, RETURN STR A4,A15 PUSH A4 * EJECT * LDK A1,NOTOPR ASSUME NO CONNECTION ANKL A3,STADNO+STANOC IS IT? RF(NZ) SH100 YES, CONTINUE LDK A1,LINERR NO, LINK ERROR SH100 EQU * LDR A3,A2 WORK STATION NUMBER SLA A3,1 MAKE INDEX ADR A3,A5 ADD CWT ADDRESS ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS SCR A1,A3 SAVE ERROR CODE LDK A4,WSFERR WORK STATION ERROR ANR* A4,A3 ALREADY DETECTED? RF(NZ) SH110 YES, RETURN LDK A4,WSFERR ORRS A4,A3 SET ERROR DETECTED ST A2,CWTABW,A5 INDICATE ABORT DWT:S FOR WS * SH110 EQU * LDR* A4,A15 POP A4 SH120 EQU * LDR* A3,A15 POP A3 * IFT CPU852=1 ADKL A15,2 SKIP PSW LDR* P,A15 RETURN XIF IFF CPU852=1 RTN A15 XIF * EJECT * ************************************************************ * * ROUTINE NAME: * GETSTA * * FUNCTION: * THIS ROUTINE WILL CHECK THE I/O STATUS FOR * A DEVICE. * GETWSS WILL ONLY CHECK THE STATUS FOR THE * WORK STATION CONNECTION. * GETLCS WILL CHECK BOTH LOGICAL CHANNEL AND * WORK STATION STATUS. * * CALL: * CF A15,GETLCS * CF A15,GETWSS * * INPUT: * A5 = CWT ADDRESS * A6 = DWT ADDRESS * * OUTPUT: * A1 = RETURN CODE * CR = CONTENTS OF A1 * INTERR. INHIBITED * ************************************************************ * GETLCS EQU * INH STR A3,A15 PUSH A3 * LDK A1,LINERR SET RETURN CODE IN CASE LD A3,DWTST,A6 DWT STATUS ANK A3,DWFRES RESET PACKET RECIEVED? RF(NZ) LS110 YES, RETURN. RET CODE = LINERR RF LS100 NOT RESET. CHECK WSS * * GETWSS EQU * INH STR A3,A15 PUSH A3 * * LS100 EQU * LC A3,DWTCP2,A6 WS NUMBER ANK A3,MASKWS CLEAN SLA A3,1 MAKE INDEX ADR A3,A5 CWT ADDRESS LC A1,CWTWSS,A3 WS STATUS * * LS110 EQU * LDR* A3,A15 POP A3 ADKL A15,4 ADJUST STACK ANK A1,/FF CLEAN RETURN CODE & SET CR ABR* A15 RETURN * EJECT * ************************************************************ * * ROUTINE NAME: * PLGTBU * * FUNCTION: * THIS ROUTINE WILL ALLOCATE A BUFFER AND FORMAT IT * ACCORDING TO THE FORMAT USED BY THIS DRIVER. * * CALL: * CF A15,PLGTBU * * INPUT: * A7 = POOLBLOCK ADDRESS * * OUTPUT: * A2 = LENGTH OF USER PART OF BUFFER * A4 = START OF USER PART OF BUFFER (IF ANY) * CR = NOT 0 IF BUFFER ALLOCATED * 0 IF NO BUFFER ALLOCATED * INTERR. INHIBITED * ************************************************************ * PLGTBU EQU * LDR* A2,A15 SKIP PSW LDR* A2,A15 GET RETURN ADDRESS CF A15,GETBUF A4 := BUFFER. INH ABR(Z) A2 RETURN IF NO BUFFER * ST A2,0,A15 SAVE RETURN ADDRESS ADK A4,BUFHLN START OF USER PART ST A7,BUFLNK,A4 SAVE POOLBLOCK ADDRESS LD A2,POBBUS,A7 BUFFER SIZE SUK A2,BUFHLN A2 := LENGTH OF USER PART RF(P) GU100 CONTINUE IF OK ANK A2,0 TOO SHORT. BUFFER LENGTH & CR := 0 GU100 EQU * ST A2,BUFLEN,A4 USER BUFFER LENGTH ABR* A15 RETURN * EJECT * ************************************************************ * * ROUTINE NAME: * PLRLBU * * FUNCTION: * THIS ROUTINE RELEASES AN I/O BUFFER OF THE * FORMAT USED BY THIS DRIVER. * * CALL: * CF A15,PLRLBU * * INPUT: * A4 = BUFFER ADDRESS * * OUTPUT: * A4 = CHANGED * CR = CHANGED * INTERR. INHIBITED IF CPU 852 * ************************************************************ * PLRLBU EQU * STR A7,A15 PUSH A7 LD A7,BUFLNK,A4 POOLBLOCK ADDRESS SUK A4,BUFHLN A4 :- PHYSICAL START OF BUFFER CF A15,RELBUF RELEASE BUFFER & INH LDR* A7,A15 POP A7 * IFT CPU852=1 ADKL A15,2 SKIP PSW LDR* P,A15 RETURN XIF IFF CPU852=1 RTN A15 XIF EJECT * ************************************************************ * * ROUTINE NAME: * PLCHAR * * FUNCTION: * THESE ROUTINES ARE USED TO GET A CHARACTER * FROM A BUFFER OR PUT A CHARACTER IN A BUFFER. * THE BUFFER SHOULD HAVE A HEADER OF THE NORMAL * PLC FORMAT (SE "BUFFER LAYOUT" CONSTANT * DEFINITION). * * CALL: * CF A15,PLGECH * CF A15,PLPUCH * * INPUT: * A2 = IF PUT CHAR * BITS 0-7 IRRELEVANT * BITS 8-15 CHARACTER * A4 = BUFFER ADDRESS * * OUTPUT: * A1 = RETURN CODE * -1 IF OVERFLOW/UNDERFLOW, ELSE * AT PLPUCH: 0 * AT PLGECH: NR OF CHAR LEFT IN BUFFER * A2 = IF PLGECH & A1>=0 : * BITS 0-7 ZERO * BITS 8-15 CHARACTER * INTERR. INHIBITED * ************************************************************ * EJECT * PLGECH EQU * INH * LD A1,BUFLEN,A4 LENGTH OF TEXT IN BUFFER LD A2,BUFBIX,A4 BYTE INDEX SUR A1,A2 SUK A1,1 A1 := NR OF CHAR LEFT RF(N) CH100 EXIT IF UNDERFLOW IM BUFBIX,A4 INCREMENT INDEX ADR A2,A4 ABSOLUTE ADDRESS OF CHARACTER LCR A2,A2 GET CHARACTER ANK A2,/FF CLEAN * RF CH110 NORMAL EXIT * * PLPUCH EQU * INH * LD A1,BUFBIX,A4 BYTE INDEX CW A1,BUFLEN,A4 OUTSIDE BUFFER? RF(NL) CH100 YES, ERROR IM BUFBIX,A4 INCREMENT INDEX ADR A1,A4 FREE PLACE IN BUFFER SCR A2,A1 PUT CHARACTER IN BUFFER LDK A1,0 RETURN CODE := OK RF CH110 NORMAL EXIT * * CH100 EQU * LDKL A1,-1 RETURN CODE := ERROR CH110 EQU * ADKL A15,4 ADJUST STACK ABR* A15 RETURN * EJECT * ************************************************************ * * ROUTINE NAME: * INTYPE * * FUNCTION: * THIS ROUTINE CHECKS A GENERAL READ ANSWER FROM * THE PLC TO DETERMINE TYPE OF MESSAGE. * * CALL: * CF A15,INTYPE * * INPUT: * A5 = CWT ADDRESS * * OUTPUT: * A2 = CHANGED * A3 = TYPE * A4 = CHANGED * CR = CHANGED * ************************************************************ * INTYPE EQU * LDK A2,X25DAT MINIMUM INPUT LENGTH CW A2,CWTRCA+CCRLEN,A5 LENGTH >= MINIMUM? RF(G) ITERR NO, ERROR * EJECT * LD A3,CWTRCA+CCRBUF,A5 BUFFER ADDRESS LC A2,X25LGN,A3 GROUP NUMBER LDR A4,A2 SAVE ANK A4,/0F CLEAN RF(NZ) IT120 NOT GROUP ZERO * * CHANNEL GROUP ZERO. NORMAL MESSAGES. LC A3,X25FLW,A3 FLOW CONTROL BYTE LDR A4,A3 SAVE ANK A4,/01 FLAG RF(NZ) IT100 NOT DATA PACKET LDK A3,TYDATA ASSUME NORMAL DATA ANK A2,/80 QUALIFY BIT SET? RF(Z) ITEXIT NO, NORMAL DATA. EXIT LDK A3,TYSTAT YES, STATUS MESSAGE RF ITEXIT EXIT * IT100 EQU * LDR A4,A3 SAVE FLOW CONTROL BYTE ANK A3,/02 RECIEVE READY? RF(NZ) IT110 NO LDK A3,TYRR TYPE := RECIEVE READY RF ITEXIT EXIT * IT110 EQU * LDK A3,TYRES ASSUME TYPE = RESET ANK A4,/04 IS IT RESET? RF(Z) ITEXIT YES, EXIT LDK A3,TYRESC NO, TYPE := RESET CONFIRMATION RF ITEXIT EXIT * EJECT * IT120 EQU * * NOT NORMAL MESSAGE LDK A3,TYNFLO ASSUME TYPE = NO FLOW CONTROL SUK A4,1 IS IT NO FLOW CONTROL? RF(Z) ITEXIT YES, EXIT * ITERR EQU * LDK A3,TYERR IRRECOVERABLE ERROR * ITEXIT EQU * IFT CPU852=1 ADKL A15,2 SKIP PSW LDR* P,A15 RETURN XIF IFF CPU852=1 RTN A15 XIF * EJECT * ************************************************************ * * ROUTINE NAME: * OUTBUQ * * FUNCTION: * THIS ROUTINE WILL REMOVE A DWT FROM THE QUEUES FOR * SHORT OR LONG OUTPUT BUFFERS, IF IT IS IN ANY * OF THE QUEUES. * * CALL: * CF A15,OUTBUQ * * INPUT: * A5 = CWT ADDRESS * A6 = DWT ADDRESS * * OUTPUT: * A2 = NOT 0 IF DWT FOUND * 0 IF DWT NOT FOUND * A4 = CHANGED * CR = CHANGED * ************************************************************ * OUTBUQ EQU * STR A1,A15 PUSH A1 STR A7,A15 PUSH A7 LDR A4,A6 DWT ADDRESS ADKL A4,DWTOTQ QUEUE LINK * LDR A7,A5 CWT ADDRESS ADK A7,CWTSBQ SHORT BUFFERS QUEUE CF A15,LNKOUT REMOVE DWT FROM QUEUE LDR A7,A7 FOUND? RF(NZ) OB100 YES, RETURN * LDR A7,A5 ADKL A7,CWTLBQ LONG BUFFERS QUEUE CF A15,LNKOUT REMOVE FROM QUEUE * OB100 EQU * LDR A2,A7 A2 := FOUND / NOT FOUND * LDR* A7,A15 POP A7 LDR* A1,A15 POP A1 IFT CPU852=1 ADKL A15,2 SKIP PSW LDR* P,A15 RETURN XIF IFF CPU852=1 RTN A15 XIF * EJECT * ************************************************************ * * ROUTINE NAME: * LNKFST * * FUNCTION: * THIS ROUTINE LINKS A QUEUE ELEMENT FIRST IN * A QUEUE (CLOSEST TO QUEUE HEAD). * ONE WORD IN EACH ELEMENT IS USED AS A LINK. * END OF QUEUE IS INDICATED BY LINK=0 IN LAST * ELEMENT. * * CALL: * CF A15,LNKFST * * INPUT: * A4 = QUEUE ELEMENT LINK ADDRESS * A7 = QUEUE HEAD LINK ADDRESS * * OUTPUT: * A1 = CHANGED * CR = CHANGED * ************************************************************ * LNKFST EQU * LDR* A1,A7 FIRST QUEUE ELEMENT STR A1,A4 SET LINK FROM NEW ELEMENT STR A4,A7 SET NEW ELEMENT FIRST IFT CPU852=1 RF LNKRET RETURN XIF IFF CPU852=1 RTN A15 XIF * EJECT * ************************************************************ * * ROUTINE NAME: * LNKLST * * FUNCTION: * THIS ROUTINE LINKS A QUEUE ELEMENT LAST IN * A QUEUE (OPOSITE END TO QUEUE HEAD). * ONE WORD IN EACH ELEMENT IS USED AS A LINK. * END OF QUEUE IS INDICATED BY LINK=0 IN LAST * ELEMENT. * * CALL: * CF A15,LNKLST * * INPUT: * A4 = QUEUE ELEMENT LINK ADDRESS * A7 = QUEUE HEAD LINK ADDRESS * * OUTPUT: * A1 = CHANGED * A7 = CHANGED * CR = CHANGED * ************************************************************ * LNKLST EQU * LDR A1,A7 SAVE PRESENT ELEMENT LDR* A7,A7 NEXT ELEMENT RB(NZ) LNKLST CONTINUE IF NOT LAST ELEMENT STR A4,A1 LINK NEW ELEMENT AFTER LAST CMR A4 SET END MARKER IN LAST ELEMENT * EJECT * IFT CPU852=1 RF LNKRET RETURN XIF IFF CPU852=1 RTN A15 XIF * EJECT * ************************************************************ * * ROUTINE NAME: * LNKOUT * * FUNCTION: * THIS ROUTINE REMOVES AN ELEMENT FROM A QUEUE. * ONE WORD IN EACH ELEMENT IS USED AS A LINK. * END OF QUEUE IS INDICATED BY LINK=0 IN LAST * ELEMENT. * * CALL: * CF A15,LNKOUT * * INPUT: * A4 = QUEUE ELEMENT LINK ADDRESS * A7 = QUEUE HEAD LINK ADDRESS * * OUTPUT: * A1 = CHANGED * A7 = =0 IF ELEMENT NOT FOUND * ><0 IF ELEMENT FOUND * CR = CHANGED * ************************************************************ * LNKOUT EQU * LDR A1,A7 SAVE PRESENT ELEMENT LDR* A7,A7 NEXT ELEMENT RF(Z) LO100 EXIT IF END OF QUEUE CWR A4,A7 ELEMENT FOUND? RB(NE) LNKOUT NO, CHECK NEXT * EJECT * LDR* A7,A7 ELEMENT AFTER WANTED ELEMENT STR A7,A1 SET LINK FROM PREVIOUS TO NEXT LDK A7,1 INDICATE ELEMENT FOUND LO100 EQU * * * IFT CPU852=1 LNKRET EQU * * COMMON EXIT FOR QUEUE ROUTINES * RETURN WITHOUT CHANGING INTERRUPT ENABLE FLAG ADKL A15,2 SKIP PSW LDR* P,A15 RETURN XIF * IFF CPU852=1 RTN A15 XIF * EJECT * * * * ************************************************************ * * PHILIPS TERMINAL SYSTEM PTS * * TBUFF = TOSS BUFFER HANDLING SUBROUTINES * * * ************************************************************ * * THIS PROGRAM CONTAINS A SET OF BUFFER HANDLING * SUBROUTINES. THEY OPERATE ON BUFFERS ORGANIZED * IN BUFFER POOLS. A BUFFER POOL CONSISTS OF A * POOLBLOCK FOR CONTROL INFORMATION, AND ONE OR * MORE BUFFER AREAS. THE POOLBLOCK AND BUFFER * AREA(S) SHOULD BE SUPPLIED BY THE USER. * * ROUTINES IN ORDER OF APPEARANCE IN CODE: * * NAME FUNCTION * * GETBUF GET BUFFER FROM POOL * RELBUF RETURN BUFFER TO POOL * AREBUF DIVIDE AREA INTO BUFFERS * EJECT * ************* * CONSTANTS * ************* * * * POOLBLOCK LAYOUT DEFINITION * * POOLBLOCK WORD OFFSETS POBID EQU 0 POOL IDENTITY POBFLG EQU 2 BINARY FLAGS POBFRE EQU 4 FREE LIST LINK HEAD POBBUS EQU 6 BUFFER SIZE (BYTES) POBARS EQU 8 AREA SIZE (BYTES) * * POOLBLOCK LENGTH POBLEN EQU 10 LENGTH (BYTES) * EJECT * ************************************************************ * * ROUTINE NAME: * GETBUF * * FUNCTION: * THIS ROUTINE FETCHES ONE BUFFER FROM A BUFFER * POOL AND GIVES IT TO THE CALLER. * * CALL: * CF A15,GETBUF * * INPUT: * A7 = POOLBLOCK ADDRESS * * OUTPUT: * A4 = BUFFER ADDRESS IF BUFFER ALLOCATED * ELSE ZERO * CR = CONTENTS OF A4 * INTERR.= INHIBITED * ************************************************************ * GETBUF EQU * INH LD A4,POBFRE,A7 FREE LIST START RF(Z) GB100 NO BUFFER LEFT. EXIT * EJECT * STR A1,A15 PUSH A1 LDR* A1,A4 NEW START OF FREE LIST ST A1,POBFRE,A7 TO POOLBLOCK LDR* A1,A15 POP A1 * GB100 EQU * ADKL A15,4 ADJUST STACK LDR A4,A4 CR := CONTENTS OF A4 ABR* A15 RETURN * EJECT * ************************************************************ * * ROUTINE NAME: * RELBUF * * FUNCTION: * THIS ROUTINE RELEASES ONE BUFFER AND RETURNS * IT TO A BUFFER POOL. * * CALL: * CF A15,RELBUF * * INPUT: * A4 = BUFFER ADDRESS * A7 = POOLBLOCK ADDRESS * * OUTPUT: * CR = CHANGED * INTERR.= INHIBITED * ************************************************************ * RELBUF EQU * INH STR A1,A15 PUSH A1 * LD A1,POBFRE,A7 OLD FREE LIST START STR A1,A4 LINK AFTER NEW BUFFER ST A4,POBFRE,A7 SET NEW FREE LIST START * LDR* A1,A15 POP A1 ADKL A15,4 ADJUST STACK ABR* A15 RETURN * EJECT * ************************************************************ * * ROUTINE NAME: * AREBUF * * FUNCTION: * THIS ROUTINE ALLOCATES A SPECIFIED DATA AREA TO * A BUFFER POOL. THIS CAN BE DONE IN TWO WAYS. * "INIBUF" IS USED WHEN A NEW BUFFER POOL IS * INITIATED. IT DIVIDES THE AREA INTO BUFFERS, * LINKS THE BUFFERS IN A CHAIN FROM THE FREE LIST * HEAD IN POOLBLOCK, AND PUTS AN END MARKER (-1) * IN THE LAST BUFFER. "LNKBUF" IS USED WHEN A NEW * AREA IS ADDED TO AN EXISTING BUFFER POOL. IT * DIVIDES THE AREA INTO BUFFERS, AND LINKS THE * BUFFERS FIRST IN THE FREE LIST. * * CALL: * CF A15,INIBUF * CF A15,LNKBUF * * INPUT: * A4 = AREA ADDRESS * A7 = POOLBLOCK ADDRESS * * OUTPUT: * CR = CHANGED IF CPU852 * ************************************************************ * EJECT * INIBUF EQU * IFT CPU852=1 STR A1,A15 PUSH A1 XIF * IFF CPU852=1 MSR 4,A15 PUSH A1-A4 XIF * LDK A1,0 MARKER FOR LAST BUFFER RF IL100 GO TO COMMON PART * * LNKBUF EQU * IFT CPU852=1 STR A1,A15 PUSH A1 XIF * IFF CPU852=1 MSR 4,A15 PUSH A1-A4 XIF * LD A1,POBFRE,A7 LINK TO OLD BUFFERS * * IL100 EQU * * * COMMON PART FOR INIBUF AND LNKBUF * IFT CPU852=1 STR A2,A15 PUSH A2-A4 STR A3,A15 STR A4,A15 XIF * EJECT * LDR A2,A7 ADK A2,POBFRE FREE LIST START LDR A3,A4 AD A3,POBARS,A7 END OF AREA SU A3,POBBUS,A7 HIGEST BUFFER START IN AREA * IL110 EQU * * BUFFER LINKING LOOP CWR A4,A3 ROOM LEFT? RF(G) IL120 NO, FINISH * STR A4,A2 SET LINK FROM PREVIOUS TO PRESENT LDR A2,A4 NEW PREVIOUS AD A4,POBBUS,A7 NEW PRESENT RB IL110 TAKE NEXT BUFFER * IL120 EQU * STR A1,A2 SET LINK OR END IN LAST BUFFER * IFT CPU852=1 LDR* A4,A15 POP A1-A4 LDR* A3,A15 LDR* A2,A15 LDR* A1,A15 ADKL A15,2 ADJUST STACK LDR* P,A15 RETURN XIF * IFF CPU852=1 MLR 4,A15 POP A1-A4 RTN A15 XIF * IFF UTTEST=0 EJECT * ****************************************** * * ROUTINE NAMES: LOGCOM * LOGIOC * LOGATT * FUNCTION: LOG MSG TYPE AND CCR+BUFFER * DLSSEL SPECIFIES DLS TO BE SELECTED * 0 MEANS LOG ALL * * RECORD FORMAT: BYTE 1-2 MSG TYPE (CO,RE,AT) * BYTE 3 DLS INDEX * BYTE 4 COMMAND CODE * BYTE 5-6 STATUS-1 * BYTE 7 BUFFER LENGTH * BYTE 8 PACKET HEADER -1 * BYTE 9 PACKET HEADER -2 (LOGICAL CHANNEL) * BYTE 10 PACKET HEADER -3 (FLOW CONTOL) * BYTE 11-16 6 FIRST DATA BYTES *********************************************** * DLSSEL DATA 0 0=LOG ALL * ELSE DLS TO BE LOGGED LOGPTR DATA LOGARE RECORD POINTER IN LOG AREA LOGARE RES 960 LOG AREA LOGEND EQU * DATA 'ENDLOG' MARK END OF LOG AREA *-------------------------------------------- LOGCOM EQU * SUBROUTINE ENTRY IFT CPU852=1 STR A1,A15 STR A2,A15 STR A3,A15 XIF IFF UTTEST=0 IFF CPU852=1 MSR 3,A15 PUSH A1-A3 XIF IFF UTTEST=0 LDKL A1,'CO' MSG TYPE LDK A2,CWTCCA CCA OFFSET RF LOG:10 LOGIOC EQU * SUBROUTINE ENTRY IFT CPU852=1 STR A1,A15 STR A2,A15 STR A3,A15 XIF IFF UTTEST=0 IFF CPU852=1 MSR 3,A15 PUSH A1-A3 XIF IFF UTTEST=0 LDKL A1,'RE' MSG TYPE LDK A2,CWTRCA RCA OFFSET RF LOG:10 LOGATT EQU * SUBROUTINE ENTRY IFT CPU852=1 STR A1,A15 STR A2,A15 STR A3,A15 XIF IFF UTTEST=0 IFF CPU852=1 MSR 3,A15 PUSH A1-A3 XIF IFF UTTEST=0 LDKL A1,'AT' MSG TYPE LDK A2,CWTRCA RCA OFFSET *------------------------------------------ LOG:10 EQU * COMMON PART LD A3,LOGPTR STR A1,A3 LOG MSG TYPE ADR A2,A5 CCR PTR LD A1,DLSSEL SELECTED DLS RF(Z) LOG:15 LOG ALL CC A1,CCRDLS,A2 RF(NE) LOG:20 NOT SELECTED,SKIP LOG:15 EQU * LD A1,CCRDLS,A2 DLS INDEX ST A1,2,A3 +COMMAND INTO LOG LD A1,CCRSTA,A2 STATUS-1 ST A1,4,A3 LOG STATUS-1 LD A1,CCRLEN,A2 BUFFER LENGTH SC A1,6,A3 INTO LOG LD A2,CCRBUF,A2 BUFFER ADDRESS LDR* A1,A2 BYTE 0-1 SC A1,8,A3 PACKET HEADER 2 SRL A1,8 SC A1,7,A3 PACKET HEADER 1 LD A1,2,A2 PACKET HEADER 3+ BYTE 1 SC A1,10,A3 SRL A1,8 SC A1,9,A3 LD A1,4,A2 BYTE 2-3 SC A1,12,A3 SRL A1,8 SC A1,11,A3 LD A1,6,A2 BYTE 4-5 SC A1,14,A3 SRL A1,8 SC A1,13,A3 LD A1,8,A2 SRL A1,8 SC A1,15,A3 ADK A3,16 ST A3,LOGPTR NEXT RECORD IN LOG AREA CWK A3,LOGEND END OF LOG AREA? RF(NE) LOG:20 NO! LDKL A1,LOGARE RESET PTR ST A1,LOGPTR LOG:20 EQU * IFT CPU852=1 LDR* A3,A15 RESTORE LDR* A2,A15 LDR* A1,A15 ADKL A15,4 ABR* A15 RETURN XIF IFF UTTEST=0 IFF CPU852=1 MLR 3,A15 RTN A15 XIF * * END
0x00000…00036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRPL01 REL 11.0 81-05-27 870105041100 «, t00=0x0000, t01=0x0004}
0x00036…0003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x0003e…00062 Head {h00=0x0020, h01=0x0050, text=» =5,CORR. OF RWSI-CWT:S , «, t00=0x0000, t01=0x0042}
0x00062…0008a Head {h00=0x0024, h01=0x0050, text=» OPEN LINE PROC. & COND. ASS. «, t00=0x0000, t01=0x0066}
0x0008a…000a6 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-05-22«, t00=0x0000, t01=0x008e}
0x000a6…000c8 Head {h00=0x001e, h01=0x0050, text=» =4,CORR. OF CWT-DISPL. «, t00=0x0000, t01=0x00aa}
0x000c8…000e4 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-05-20«, t00=0x0000, t01=0x00cc}
0x000e4…00106 Head {h00=0x001e, h01=0x0050, text=» =3,CORR. OF TIMER NAME «, t00=0x0000, t01=0x00e8}
0x00106…00122 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-04-29«, t00=0x0000, t01=0x010a}
0x00122…0014c Head {h00=0x0026, h01=0x0050, text=» =2,CORR. OF OPEN LINE PROCEDURE«, t00=0x0000, t01=0x0126}
0x0014c…00168 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-04-21«, t00=0x0000, t01=0x0150}
0x00168…0018a Head {h00=0x001e, h01=0x0050, text=» GENERAL UPDATE FOR RWSI«, t00=0x0000, t01=0x016c}
0x0018a…001a6 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-01-26«, t00=0x0000, t01=0x018e}
0x001a6…001d2 Head {h00=0x0028, h01=0x0050, text=» =1,OPEN LINE PARAM. AREA EXPANDED«, t00=0x0001, t01=0x001a}
0x001d2…001ee Head {h00=0x0018, h01=0x0050, text=» PRR 11.0 80-11-19«, t00=0x0001, t01=0x0046}
0x001ee…001f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0062}
0x001f8…00202 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x006c}
0x00202…0020c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0076}
0x0020c…00216 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0080}
0x00216…0025a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0001, t01=0x008a}
0x0025a…00264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ce}
0x00264…0028c Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0001, t01=0x00d8}
0x0028c…00296 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0100}
0x00296…002d0 Head {h00=0x0036, h01=0x0050, text=»* DRPL01 = DRIVER PROCESSOR FOR LINE CONTROL, «, t00=0x0001, t01=0x010a}
0x002d0…00302 Head {h00=0x002e, h01=0x0050, text=»* LOCAL & REMOTE CONNECTIONS«, t00=0x0001, t01=0x0144}
0x00302…0030c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0176}
0x0030c…00316 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0180}
0x00316…00320 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x018a}
0x00320…00364 (2, 0, 400) Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0002, t01=0x0004}
0x00364…0036e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0048}
0x0036e…00378 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0052}
0x00378…003ae Head {h00=0x0032, h01=0x0050, text=»* THIS PROGRAM HANDLES I/O OPERATIONS ON THE«, t00=0x0002, t01=0x005c}
0x003ae…003e2 Head {h00=0x0030, h01=0x0050, text=»* PROCESSOR FOR LINE CONTROL (PLC). IT IS «, t00=0x0002, t01=0x0092}
0x003e2…00416 Head {h00=0x0030, h01=0x0050, text=»* CALLED FROM THE TERMINAL DEVICE DRIVERS.«, t00=0x0002, t01=0x00c6}
0x00416…00420 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fa}
0x00420…00456 Head {h00=0x0032, h01=0x0050, text=»* INPUT AND OUTPUT OF CHARACTERS FROM/TO THE«, t00=0x0002, t01=0x0104}
0x00456…00490 Head {h00=0x0036, h01=0x0050, text=»* TERMINAL DEVICE DRIVERS ARE MADE ON CHARACTER «, t00=0x0002, t01=0x013a}
0x00490…004c8 Head {h00=0x0034, h01=0x0050, text=»* BASIS. BLOCKING AND DEBLOCKING OF CHARACTERS«, t00=0x0002, t01=0x0174}
0x004c8…00500 Head {h00=0x0034, h01=0x0050, text=»* IN DATA PACKETS ARE HANDLED BY THIS DRIVER. «, t00=0x0003, t01=0x001c}
0x00500…0050a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0054}
0x0050a…00518 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x005e}
0x00518…00522 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x006c}
0x00522…00560 Head {h00=0x003a, h01=0x0050, text=»* THE PROGRAM IS DIVIDED INTO A NUMBER OF SECTIONS. «, t00=0x0003, t01=0x0076}
0x00560…00598 Head {h00=0x0034, h01=0x0050, text=»* SECTIONS CONTAINING PROGRAM CODE ARE DIVIDED«, t00=0x0003, t01=0x00b4}
0x00598…005ce Head {h00=0x0032, h01=0x0050, text=»* INTO ROUTINES. THE ROUTINES ARE LISTED AT «, t00=0x0003, t01=0x00ec}
0x005ce…00606 Head {h00=0x0034, h01=0x0050, text=»* BEGINNING OF EACH SECTION. THE SECTIONS, IN «, t00=0x0003, t01=0x0122}
0x00606…00634 Head {h00=0x002a, h01=0x0050, text=»* ORDER OF APPEARANCE IN LIST, ARE: «, t00=0x0003, t01=0x015a}
0x00634…0063e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0188}
0x0063e…00658 (4, 0, 400) Head {h00=0x0016, h01=0x0050, text=»* NAME FUNCTION«, t00=0x0004, t01=0x0004}
0x00658…00662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x001e}
0x00662…0068c Head {h00=0x0026, h01=0x0050, text=»* ENTRIES DECLARE ENTRY POINTS «, t00=0x0004, t01=0x0028}
0x0068c…006be Head {h00=0x002e, h01=0x0050, text=»* EXTERNALS DECLARE EXTERNAL REFERENCES «, t00=0x0004, t01=0x0052}
0x006be…006f8 Head {h00=0x0036, h01=0x0050, text=»* CONDITION SET CONDITIONAL ASSEMBLY PARAMETERS «, t00=0x0004, t01=0x0084}
0x006f8…00722 Head {h00=0x0026, h01=0x0050, text=»* CONSTANTS SET CONSTANT VALUES «, t00=0x0004, t01=0x00be}
0x00722…0073e Head {h00=0x0018, h01=0x0050, text=»* DATA DATA AREAS«, t00=0x0004, t01=0x00e8}
0x0073e…00748 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0104}
0x00748…0077c Head {h00=0x0030, h01=0x0050, text=»* REQUEST DEVICE DRIVER REQUEST ROUTINES «, t00=0x0004, t01=0x010e}
0x0077c…007a4 Head {h00=0x0024, h01=0x0050, text=»* INTERRUPT INTERRUPT ENTRIES «, t00=0x0004, t01=0x0142}
0x007a4…007e0 Head {h00=0x0038, h01=0x0050, text=»* RECOVERY SYSTEM START, POWER FAIL AND RECOVERY «, t00=0x0004, t01=0x016a}
0x007e0…0080a Head {h00=0x0026, h01=0x0050, text=»* DISPATCH LOCAL PLC DISPATCHER«, t00=0x0005, t01=0x0016}
0x0080a…00836 Head {h00=0x0028, h01=0x0050, text=»* ROUTINE COMMON SERVICE ROUTINES«, t00=0x0005, t01=0x0040}
0x00836…00866 Head {h00=0x002c, h01=0x0050, text=»* SUBROUTIN COMMON SERVICE SUBROUTINES«, t00=0x0005, t01=0x006c}
0x00866…00894 Head {h00=0x002a, h01=0x0050, text=»* TBUFF BUFFER HANDLING SUBROUTINES«, t00=0x0005, t01=0x009c}
0x00894…0089e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ca}
0x0089e…008ac Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x00d4}
0x008ac…008b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e2}
0x008b6…008ca Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0005, t01=0x00ec}
0x008ca…008de Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0005, t01=0x0100}
0x008de…008f2 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0005, t01=0x0114}
0x008f2…008fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0128}
0x008fc…00916 Head {h00=0x0016, h01=0x0050, text=»* I/O REQUESTS «, t00=0x0005, t01=0x0132}
0x00916…00920 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x014c}
0x00920…00946 Head {h00=0x0022, h01=0x0050, text=» ENTRY PLCHRI CHARACTER INPUT «, t00=0x0005, t01=0x0156}
0x00946…00978 Head {h00=0x002e, h01=0x0050, text=» ENTRY PLSTBL DEFINE START OF OUTPUT BLOCK«, t00=0x0005, t01=0x017c}
0x00978…0099e Head {h00=0x0022, h01=0x0050, text=» ENTRY PLCHRO CHARACTER OUTPUT«, t00=0x0006, t01=0x001e}
0x0099e…009ce Head {h00=0x002c, h01=0x0050, text=» ENTRY PLENBL DEFINE END OF OUTPUT BLOCK«, t00=0x0006, t01=0x0044}
0x009ce…009f4 Head {h00=0x0022, h01=0x0050, text=» ENTRY PLDISP LOCAL DISPATCHER«, t00=0x0006, t01=0x0074}
0x009f4…00a1a Head {h00=0x0022, h01=0x0050, text=» ENTRY PRCHRI CHR INP REMOTE «, t00=0x0006, t01=0x009a}
0x00a1a…00a4a Head {h00=0x002c, h01=0x0050, text=» ENTRY PRSTBL START OUTP BLOCK, REMOTE «, t00=0x0006, t01=0x00c0}
0x00a4a…00a72 Head {h00=0x0024, h01=0x0050, text=» ENTRY PRCHRO CHR OUTP. REMOTE «, t00=0x0006, t01=0x00f0}
0x00a72…00aa0 Head {h00=0x002a, h01=0x0050, text=» ENTRY PRENBL END OUTP BLOCK, REMOTE «, t00=0x0006, t01=0x0118}
0x00aa0…00aca Head {h00=0x0026, h01=0x0050, text=» ENTRY PRDISP LOCAL DSIP. REMOTE «, t00=0x0006, t01=0x0146}
0x00aca…00aee Head {h00=0x0020, h01=0x0050, text=» ENTRY PLTEST TEST COMMANDS «, t00=0x0006, t01=0x0170}
0x00aee…00b0e (7, 0, 398) Head {h00=0x001c, h01=0x0050, text=» ENTRY CWTPLC CWT TABLE «, t00=0x0007, t01=0x0004}
0x00b0e…00b36 Head {h00=0x0024, h01=0x0050, text=» ENTRY GETDWT GET DWT SUBROUTINE«, t00=0x0007, t01=0x0024}
0x00b36…00b40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x004c}
0x00b40…00b4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0056}
0x00b4a…00b62 Head {h00=0x0014, h01=0x0050, text=»* INTERRUPTS «, t00=0x0007, t01=0x0060}
0x00b62…00b6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0078}
0x00b6c…00b8e Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL01 PLC NUMBER 0«, t00=0x0007, t01=0x0082}
0x00b8e…00bb0 Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL02 PLC NUMBER 1«, t00=0x0007, t01=0x00a4}
0x00bb0…00bd2 Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL03 PLC NUMBER 2«, t00=0x0007, t01=0x00c6}
0x00bd2…00bf4 Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL04 PLC NUMBER 3«, t00=0x0007, t01=0x00e8}
0x00bf4…00bfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x010a}
0x00bfe…00c28 Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR01 PLC NUMBER 5,REMOTE «, t00=0x0007, t01=0x0114}
0x00c28…00c52 Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR02 6,REMOTE «, t00=0x0007, t01=0x013e}
0x00c52…00c7c Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR03 7,REMOTE «, t00=0x0007, t01=0x0168}
0x00c7c…00ca6 (8, 0, 400) Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR04 8,REMOTE «, t00=0x0008, t01=0x0004}
0x00ca6…00cb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x002e}
0x00cb0…00cd4 Head {h00=0x0020, h01=0x0050, text=»* RECOVERY AT TC POWER UP«, t00=0x0008, t01=0x0038}
0x00cd4…00cde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x005c}
0x00cde…00d0c Head {h00=0x002a, h01=0x0050, text=» ENTRY PLON RECOVER ALL DEFINED PLC:S «, t00=0x0008, t01=0x0066}
0x00d0c…00d16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0094}
0x00d16…00d24 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x009e}
0x00d24…00d2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ac}
0x00d2e…00d44 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0008, t01=0x00b6}
0x00d44…00d5a Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0008, t01=0x00cc}
0x00d5a…00d70 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0008, t01=0x00e2}
0x00d70…00d7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00f8}
0x00d7a…00d94 Head {h00=0x0016, h01=0x0050, text=»* TOSS MONITOR «, t00=0x0008, t01=0x0102}
0x00d94…00d9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x011c}
0x00d9e…00db6 Head {h00=0x0014, h01=0x0050, text=»* ROUTINES «, t00=0x0008, t01=0x0126}
0x00db6…00dda Head {h00=0x0020, h01=0x0050, text=» EXTRN TDISP TOSS DISPATCHER«, t00=0x0008, t01=0x013e}
0x00dda…00e00 Head {h00=0x0022, h01=0x0050, text=» EXTRN QMJOB QUEUE MONITOR JOB«, t00=0x0008, t01=0x0162}
0x00e00…00e2a Head {h00=0x0026, h01=0x0050, text=» EXTRN MEXIT EXIT FROM MONITOR JOB«, t00=0x0008, t01=0x0188}
0x00e2a…00e52 Head {h00=0x0024, h01=0x0050, text=» EXTRN GETBLK GET MONITOR BLOCK «, t00=0x0009, t01=0x0022}
0x00e52…00e7c Head {h00=0x0026, h01=0x0050, text=» EXTRN FREBLK RETURN MONITOR BLOCK«, t00=0x0009, t01=0x004a}
0x00e7c…00ea8 Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 PUSH A1-A8 ON A15 STACK«, t00=0x0009, t01=0x0074}
0x00ea8…00ec8 Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x0009, t01=0x00a0}
0x00ec8…00ee2 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0009, t01=0x00c0}
0x00ee2…00f08 Head {h00=0x0022, h01=0x0050, text=» EXTRN PFPOST POWER FAIL FLAG «, t00=0x0009, t01=0x00da}
0x00f08…00f38 Head {h00=0x002c, h01=0x0050, text=» EXTRN INTSAV LATEST INTERRUPT SAVE AREA«, t00=0x0009, t01=0x0100}
0x00f38…00f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0130}
0x00f42…00f4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x013a}
0x00f4c…00f70 Head {h00=0x0020, h01=0x0050, text=»* DRND01 SERVICE ROUTINES«, t00=0x0009, t01=0x0144}
0x00f70…00f7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0168}
0x00f7a…00fa8 Head {h00=0x002a, h01=0x0050, text=» EXTRN NDSAV8 SAVE A3-A5, A7-A8 IN DWT«, t00=0x0009, t01=0x0172}
0x00fa8…00fd8 Head {h00=0x002c, h01=0x0050, text=» EXTRN NDGET8 GET A3-A5, A7-A8 FROM DWT «, t00=0x000a, t01=0x0010}
0x00fd8…0100e Head {h00=0x0032, h01=0x0050, text=» EXTRN NDREWS CALL RECOVERY FOR ALL DEV ON WS «, t00=0x000a, t01=0x0040}
0x0100e…0103a Head {h00=0x0028, h01=0x0050, text=» EXTRN NDREDW CALL RECOVERY FOR DWT «, t00=0x000a, t01=0x0076}
0x0103a…0106c Head {h00=0x002e, h01=0x0050, text=» EXTRN NDGEDN GET HIGEST DWT NUMBER ON WS «, t00=0x000a, t01=0x00a2}
0x0106c…01092 Head {h00=0x0022, h01=0x0050, text=» EXTRN NDGEDW GET DWT ADDRESS «, t00=0x000a, t01=0x00d4}
0x01092…0109c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00fa}
0x0109c…010aa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0104}
0x010aa…010b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0112}
0x010b4…010ec Head {h00=0x0034, h01=0x0050, text=»* DRND01 ROUTINES FOR RETURN TO DEVICE DRIVER«, t00=0x000a, t01=0x011c}
0x010ec…010f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0154}
0x010f6…0111c Head {h00=0x0022, h01=0x0050, text=» EXTRN NDREPO POP, OK & RETURN«, t00=0x000a, t01=0x015e}
0x0111c…0113e Head {h00=0x001e, h01=0x0050, text=» EXTRN NDRETO OK & RETURN «, t00=0x000a, t01=0x0184}
0x0113e…01160 Head {h00=0x001e, h01=0x0050, text=» EXTRN NDREP POP & RETURN «, t00=0x000b, t01=0x0016}
0x01160…0117c Head {h00=0x0018, h01=0x0050, text=» EXTRN NDRET RETURN «, t00=0x000b, t01=0x0038}
0x0117c…01186 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0054}
0x01186…01190 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x005e}
0x01190…011ae Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS«, t00=0x000b, t01=0x0068}
0x011ae…011b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0086}
0x011b8…011e0 Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTCHP CHANNEL PARAMETERS«, t00=0x000b, t01=0x0090}
0x011e0…01202 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTST STATUS FLAGS «, t00=0x000b, t01=0x00b8}
0x01202…0122a Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTOR ORDER (RIGHT BYTE) «, t00=0x000b, t01=0x00da}
0x0122a…0125c Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTADR DRIVER ADDRESS BLOCK ADDRESS«, t00=0x000b, t01=0x0102}
0x0125c…0127c Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTOTQ QUEUE LINK«, t00=0x000b, t01=0x0134}
0x0127c…012b0 Head {h00=0x0030, h01=0x0050, text=» EXTRN DWTCP2 SECOND CHANNEL PARAMETER WORD «, t00=0x000b, t01=0x0154}
0x012b0…012e2 Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTLD1 PLC INPUT/OUTPUT BUFFER ADDR«, t00=0x000b, t01=0x0188}
0x012e2…01312 Head {h00=0x002c, h01=0x0050, text=» EXTRN DWTLD2 PLC FLOW CONTROL COUNTERS «, t00=0x000c, t01=0x002a}
0x01312…01346 Head {h00=0x0030, h01=0x0050, text=» EXTRN DWTTBU PLC TEST COMMANDS BUFFER ADDR «, t00=0x000c, t01=0x005a}
0x01346…0137c Head {h00=0x0032, h01=0x0050, text=» EXTRN DWTTLN PLC TEST COMMANDS BUFFER LENGTH «, t00=0x000c, t01=0x008e}
0x0137c…013b2 Head {h00=0x0032, h01=0x0050, text=» EXTRN DWTTCW PLC TEST COMMANDS SPECIAL PARAM «, t00=0x000c, t01=0x00c4}
0x013b2…013bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00fa}
0x013bc…013ca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0104}
0x013ca…013d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0112}
0x013d4…013f4 Head {h00=0x001c, h01=0x0050, text=»* WORK STATION TABLES«, t00=0x000c, t01=0x011c}
0x013f4…013fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x013c}
0x013fe…0141a Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL1 PLC 1 «, t00=0x000c, t01=0x0146}
0x0141a…01436 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL2 PLC 2 «, t00=0x000c, t01=0x0162}
0x01436…01452 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL3 PLC 3 «, t00=0x000c, t01=0x017e}
0x01452…0146e Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL4 PLC 4 «, t00=0x000d, t01=0x000a}
0x0146e…01478 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0026}
0x01478…01494 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR1 REMOTE«, t00=0x000d, t01=0x0030}
0x01494…014b0 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR2 REMOTE«, t00=0x000d, t01=0x004c}
0x014b0…014cc Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR3 REMOTE«, t00=0x000d, t01=0x0068}
0x014cc…014e8 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR4 REMOTE«, t00=0x000d, t01=0x0084}
0x014e8…014f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00a0}
0x014f2…0150c Head {h00=0x0016, h01=0x0050, text=»* MISCELLANEOUS«, t00=0x000d, t01=0x00aa}
0x0150c…01516 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c4}
0x01516…01550 Head {h00=0x0036, h01=0x0050, text=» EXTRN INTADR INTERRUPT ADDR IN DRIVER ADDR BLOCK «, t00=0x000d, t01=0x00ce}
0x01550…0155a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0108}
0x0155a…01568 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0112}
0x01568…01572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0120}
0x01572…01592 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000d, t01=0x012a}
0x01592…015b2 Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000d, t01=0x014a}
0x015b2…015d2 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000d, t01=0x016a}
0x015d2…015dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x018a}
0x015dc…015e6 (14, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0004}
0x015e6…01620 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000e, t01=0x000e}
0x01620…01652 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000e, t01=0x0048}
0x01652…0165c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x007a}
0x0165c…01670 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x000e, t01=0x0084}
0x01670…0167a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0098}
0x0167a…01684 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00a2}
0x01684…016cc Head {h00=0x0044, h01=0x0050, text=»* PLCNRL DEFINES NUMBER OF LOCAL PLC:S ACTUALLY CONNECTED (0-4) «, t00=0x000e, t01=0x00ac}
0x016cc…016d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f4}
0x016d6…016e8 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x000e, t01=0x00fe}
0x016e8…016fe Head {h00=0x0012, h01=0x0050, text=»PLCNRL EQU X:A«, t00=0x000e, t01=0x0110}
0x016fe…01708 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0126}
0x01708…01750 Head {h00=0x0044, h01=0x0050, text=»* PLCNRR DEFINES THE NUMBER OF REMOTE PLC:S ACTUALLY CONN. (0-4)«, t00=0x000e, t01=0x0130}
0x01750…0175a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0178}
0x0175a…0176c Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x000e, t01=0x0182}
0x0176c…01782 (15, 0, 400) Head {h00=0x0012, h01=0x0050, text=»PLCNRR EQU X:B«, t00=0x000f, t01=0x0004}
0x01782…0178c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x001a}
0x0178c…01796 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0024}
0x01796…017a4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x002e}
0x017a4…017ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x003c}
0x017ae…017c4 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000f, t01=0x0046}
0x017c4…017da Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x000f, t01=0x005c}
0x017da…017f0 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000f, t01=0x0072}
0x017f0…017fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0088}
0x017fa…01822 Head {h00=0x0024, h01=0x0050, text=»* SYSTEM PARAMETER DEFINITION«, t00=0x000f, t01=0x0092}
0x01822…0182c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ba}
0x0182c…0185c Head {h00=0x002c, h01=0x0050, text=»* LEVEL 3 FLOW CONTROL WINDOW SIZE (1-7)«, t00=0x000f, t01=0x00c4}
0x0185c…01870 Head {h00=0x0010, h01=0x0050, text=»WINDOW EQU 2«, t00=0x000f, t01=0x00f4}
0x01870…0187a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0108}
0x0187a…018b2 Head {h00=0x0034, h01=0x0050, text=»* MAXIMAL NUMBER OF WORK STATIONS PER PLC (1-32)«, t00=0x000f, t01=0x0112}
0x018b2…018c6 Head {h00=0x0010, h01=0x0050, text=»MAXWS EQU 32«, t00=0x000f, t01=0x014a}
0x018c6…018d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x015e}
0x018d0…01912 Head {h00=0x003e, h01=0x0050, text=»* DELAY BEFORE EXECUTING "TEST CU" AT RESTART. (IN 100 MS)«, t00=0x000f, t01=0x0168}
0x01912…01934 Head {h00=0x001e, h01=0x0050, text=»STADLY EQU 100 10 SECONDS «, t00=0x0010, t01=0x001a}
0x01934…0193e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x003c}
0x0193e…01984 Head {h00=0x0042, h01=0x0050, text=»* LENGTH OF USER PART OF SHORT OUTPUT BUFFER IN WORDS (1-128) «, t00=0x0010, t01=0x0046}
0x01984…01998 Head {h00=0x0010, h01=0x0050, text=»SOBUFU EQU 3«, t00=0x0010, t01=0x008c}
0x01998…019a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a0}
0x019a2…019e8 Head {h00=0x0042, h01=0x0050, text=»* LENGTH OF USER PART OF GENERAL READ BUFFER IN WORDS (1-128) «, t00=0x0010, t01=0x00aa}
0x019e8…019fe Head {h00=0x0012, h01=0x0050, text=»GRBUFU EQU 70 «, t00=0x0010, t01=0x00f0}
0x019fe…01a08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0106}
0x01a08…01a34 Head {h00=0x0028, h01=0x0050, text=»* INACTIVITY TIMER (MINUTES) «, t00=0x0010, t01=0x0110}
0x01a34…01a48 Head {h00=0x0010, h01=0x0050, text=»TIMACT EQU 5«, t00=0x0010, t01=0x013c}
0x01a48…01a52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0150}
0x01a52…01a92 Head {h00=0x003c, h01=0x0050, text=»* IF PLCTST IS 1 THE PLC DIAGNOSTIC COMMANDS ARE HANDLED«, t00=0x0010, t01=0x015a}
0x01a92…01aac Head {h00=0x0016, h01=0x0050, text=»* BY THIS DRIVER. «, t00=0x0011, t01=0x000a}
0x01aac…01ab6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0024}
0x01ab6…01aca Head {h00=0x0010, h01=0x0050, text=»PLCTST EQU 0«, t00=0x0011, t01=0x002e}
0x01aca…01ad4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0042}
0x01ad4…01ade Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x004c}
0x01ade…01b26 Head {h00=0x0044, h01=0x0050, text=»* A TEST VERSION OF THE DRIVER IS OBTAINED BY SETTING UTTEST><0 «, t00=0x0011, t01=0x0056}
0x01b26…01b6a Head {h00=0x0040, h01=0x0050, text=»* IF UTTEST=1 THE TEST CODE IS INCLUDUD BUT TRAP IS NOT USED«, t00=0x0011, t01=0x009e}
0x01b6a…01baa Head {h00=0x003c, h01=0x0050, text=»* IF UTTEST=2 THE TEST CODE IS INCLUDED AND TRAP IS USED«, t00=0x0011, t01=0x00e2}
0x01baa…01bb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0122}
0x01bb4…01bc8 Head {h00=0x0010, h01=0x0050, text=»UTTEST EQU 0«, t00=0x0011, t01=0x012c}
0x01bc8…01bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0140}
0x01bd2…01bdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x014a}
0x01bdc…01c16 Head {h00=0x0036, h01=0x0050, text=»* LOBUFN IS THE NUMBER OF LONG OUTPUT BUFFERS USED«, t00=0x0011, t01=0x0154}
0x01c16…01c32 Head {h00=0x0018, h01=0x0050, text=»* FOR EACH PLC (1-6)«, t00=0x0011, t01=0x018e}
0x01c32…01c3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x001a}
0x01c3c…01c50 Head {h00=0x0010, h01=0x0050, text=»LOBUFN EQU 3«, t00=0x0012, t01=0x0024}
0x01c50…01c5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0038}
0x01c5a…01c64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0042}
0x01c64…01c9e Head {h00=0x0036, h01=0x0050, text=»* LOBUFU IS THE LENGTH OF THE USER PART OF A LONG «, t00=0x0012, t01=0x004c}
0x01c9e…01cc6 Head {h00=0x0024, h01=0x0050, text=»* OUTPUT BUFFER IN WORDS (1-128)«, t00=0x0012, t01=0x0086}
0x01cc6…01cd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ae}
0x01cd0…01ce6 Head {h00=0x0012, h01=0x0050, text=»LOBUFU EQU 70 «, t00=0x0012, t01=0x00b8}
0x01ce6…01cf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ce}
0x01cf0…01cfe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x00d8}
0x01cfe…01d08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e6}
0x01d08…01d2e Head {h00=0x0022, h01=0x0050, text=»* HARDWARE INTERRUPT LEVELS«, t00=0x0012, t01=0x00f0}
0x01d2e…01d62 Head {h00=0x0030, h01=0x0050, text=»* THESE LEVELS MUST CORRESPOND TO INTERRUPT «, t00=0x0012, t01=0x0116}
0x01d62…01d7c Head {h00=0x0016, h01=0x0050, text=»* VECTOR IN SYSTAB«, t00=0x0012, t01=0x014a}
0x01d7c…01d86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0164}
0x01d86…01da8 Head {h00=0x001e, h01=0x0050, text=»INTLV0 EQU 26 PLC NUMBER 1«, t00=0x0012, t01=0x016e}
0x01da8…01dca Head {h00=0x001e, h01=0x0050, text=»INTLV1 EQU 27 PLC NUMBER 2«, t00=0x0012, t01=0x0190}
0x01dca…01dec Head {h00=0x001e, h01=0x0050, text=»INTLV2 EQU 24 PLC NUMBER 3«, t00=0x0013, t01=0x0022}
0x01dec…01e0e Head {h00=0x001e, h01=0x0050, text=»INTLV3 EQU 25 PLC NUMBER 4«, t00=0x0013, t01=0x0044}
0x01e0e…01e38 Head {h00=0x0026, h01=0x0050, text=»INTRV0 EQU 18 PLC NUMBER 5, REMOTE«, t00=0x0013, t01=0x0066}
0x01e38…01e62 Head {h00=0x0026, h01=0x0050, text=»INTRV1 EQU 19 6, REMOTE«, t00=0x0013, t01=0x0090}
0x01e62…01e8c Head {h00=0x0026, h01=0x0050, text=»INTRV2 EQU 20 7, REMOTE«, t00=0x0013, t01=0x00ba}
0x01e8c…01eb6 Head {h00=0x0026, h01=0x0050, text=»INTRV3 EQU 21 8, REMOTE«, t00=0x0013, t01=0x00e4}
0x01eb6…01ec0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x010e}
0x01ec0…01eea Head {h00=0x0026, h01=0x0050, text=»* CHANNEL UNIT DEVICE ADDRESSES«, t00=0x0013, t01=0x0118}
0x01eea…01ef4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0142}
0x01ef4…01f10 Head {h00=0x0018, h01=0x0050, text=»PLCDA0 EQU /06 PLC 1«, t00=0x0013, t01=0x014c}
0x01f10…01f2c Head {h00=0x0018, h01=0x0050, text=»PLCDA1 EQU /07 PLC 2«, t00=0x0013, t01=0x0168}
0x01f2c…01f48 Head {h00=0x0018, h01=0x0050, text=»PLCDA2 EQU /26 PLC 3«, t00=0x0013, t01=0x0184}
0x01f48…01f64 Head {h00=0x0018, h01=0x0050, text=»PLCDA3 EQU /27 PLC 4«, t00=0x0014, t01=0x0010}
0x01f64…01f80 Head {h00=0x0018, h01=0x0050, text=»PLCDA4 EQU /3A PLC 5«, t00=0x0014, t01=0x002c}
0x01f80…01f9c Head {h00=0x0018, h01=0x0050, text=»PLCDA5 EQU /3B PLC 6«, t00=0x0014, t01=0x0048}
0x01f9c…01fb8 Head {h00=0x0018, h01=0x0050, text=»PLCDA6 EQU /2A PLC 7«, t00=0x0014, t01=0x0064}
0x01fb8…01fd4 Head {h00=0x0018, h01=0x0050, text=»PLCDA7 EQU /2B PLC 8«, t00=0x0014, t01=0x0080}
0x01fd4…01fde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x009c}
0x01fde…01fec Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x00a6}
0x01fec…01ff6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00b4}
0x01ff6…02024 Head {h00=0x002a, h01=0x0050, text=»* BUFFER AREA PARAMETER DEFINITION «, t00=0x0014, t01=0x00be}
0x02024…0202e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00ec}
0x0202e…02060 Head {h00=0x002e, h01=0x0050, text=»HEADLW EQU 4 BUFFER HEADER LENGTH (WORDS) «, t00=0x0014, t01=0x00f6}
0x02060…02096 Head {h00=0x0032, h01=0x0050, text=»FLOWLW EQU 2 FLOW CONTROL FIELD LENGTH (WORDS)«, t00=0x0014, t01=0x0128}
0x02096…020cc Head {h00=0x0032, h01=0x0050, text=»SYSTLW EQU HEADLW+FLOWLW SYSTEM PART OF BUFFER«, t00=0x0014, t01=0x015e}
0x020cc…020d6 (21, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0004}
0x020d6…020f8 Head {h00=0x001e, h01=0x0050, text=»* LONG OUTPUT BUFFERS«, t00=0x0015, t01=0x000e}
0x020f8…02136 Head {h00=0x003a, h01=0x0050, text=»LOBUF1 EQU SYSTLW+LOBUFU LENGTH OF ONE BUFFER (WORDS) «, t00=0x0015, t01=0x0030}
0x02136…02160 Head {h00=0x0026, h01=0x0050, text=»LOBUF2 EQU LOBUF1+LOBUF1 2 BUFFERS«, t00=0x0015, t01=0x006e}
0x02160…02180 Head {h00=0x001c, h01=0x0050, text=»LOBUF3 EQU LOBUF2+LOBUF1«, t00=0x0015, t01=0x0098}
0x02180…021a0 Head {h00=0x001c, h01=0x0050, text=»LOBUF4 EQU LOBUF3+LOBUF1«, t00=0x0015, t01=0x00b8}
0x021a0…021c0 Head {h00=0x001c, h01=0x0050, text=»LOBUF5 EQU LOBUF4+LOBUF1«, t00=0x0015, t01=0x00d8}
0x021c0…021e0 Head {h00=0x001c, h01=0x0050, text=»LOBUF6 EQU LOBUF5+LOBUF1«, t00=0x0015, t01=0x00f8}
0x021e0…021f6 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=1 «, t00=0x0015, t01=0x0118}
0x021f6…0222e Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF1 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0015, t01=0x012e}
0x0222e…0223a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0166}
0x0223a…02250 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=2 «, t00=0x0015, t01=0x0172}
0x02250…02288 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF2 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0015, t01=0x0188}
0x02288…02294 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0030}
0x02294…022aa Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=3 «, t00=0x0016, t01=0x003c}
0x022aa…022e2 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF3 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0016, t01=0x0052}
0x022e2…022ee Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x008a}
0x022ee…02304 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=4 «, t00=0x0016, t01=0x0096}
0x02304…0233c Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF4 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0016, t01=0x00ac}
0x0233c…02348 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x00e4}
0x02348…0235e Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=5 «, t00=0x0016, t01=0x00f0}
0x0235e…02396 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF5 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0016, t01=0x0106}
0x02396…023a2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x013e}
0x023a2…023b8 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=6 «, t00=0x0016, t01=0x014a}
0x023b8…023f0 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF6 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0016, t01=0x0160}
0x023f0…023fc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0008}
0x023fc…02406 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0014}
0x02406…02414 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x001e}
0x02414…0241e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x002c}
0x0241e…02442 Head {h00=0x0020, h01=0x0050, text=»* SHORT OUTPUT BUFFERS «, t00=0x0017, t01=0x0036}
0x02442…02480 Head {h00=0x003a, h01=0x0050, text=»SOBUF1 EQU SYSTLW+SOBUFU LENGTH OF ONE BUFFER (WORDS) «, t00=0x0017, t01=0x005a}
0x02480…024aa Head {h00=0x0026, h01=0x0050, text=»SOBUF2 EQU SOBUF1+SOBUF1 2 BUFFERS«, t00=0x0017, t01=0x0098}
0x024aa…024ca Head {h00=0x001c, h01=0x0050, text=»SOBUF4 EQU SOBUF2+SOBUF2«, t00=0x0017, t01=0x00c2}
0x024ca…024ea Head {h00=0x001c, h01=0x0050, text=»SOBUF8 EQU SOBUF4+SOBUF4«, t00=0x0017, t01=0x00e2}
0x024ea…02522 Head {h00=0x0034, h01=0x0050, text=»SOBUFS EQU SOBUF8 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0017, t01=0x0102}
0x02522…0252c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x013a}
0x0252c…02550 Head {h00=0x0020, h01=0x0050, text=»* GENERAL READ BUFFERS «, t00=0x0017, t01=0x0144}
0x02550…0258e Head {h00=0x003a, h01=0x0050, text=»GRBUF1 EQU SYSTLW+GRBUFU LENGTH OF ONE BUFFER (WORDS) «, t00=0x0017, t01=0x0168}
0x0258e…025ae Head {h00=0x001c, h01=0x0050, text=»GRBUF2 EQU GRBUF1+GRBUF1«, t00=0x0018, t01=0x0016}
0x025ae…025e6 Head {h00=0x0034, h01=0x0050, text=»GRBUFS EQU GRBUF2 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0018, t01=0x0036}
0x025e6…025f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x006e}
0x025f0…02626 Head {h00=0x0032, h01=0x0050, text=»* LENGTHS OF USER PART OF BUFFERS (BYTES)«, t00=0x0018, t01=0x0078}
0x02626…0265c Head {h00=0x0032, h01=0x0050, text=»SOBUFL EQU SOBUFU+SOBUFU SHORT OUTPUT BUFFERS «, t00=0x0018, t01=0x00ae}
0x0265c…02690 Head {h00=0x0030, h01=0x0050, text=»LOBUFL EQU LOBUFU+LOBUFU LONG OUTPUT BUFFERS«, t00=0x0018, t01=0x00e4}
0x02690…026c6 Head {h00=0x0032, h01=0x0050, text=»GRBUFL EQU GRBUFU+GRBUFU GENERAL READ BUFFERS «, t00=0x0018, t01=0x0118}
0x026c6…026d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x014e}
0x026d0…026de Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x0158}
0x026de…026e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0166}
0x026e8…0271c Head {h00=0x0030, h01=0x0050, text=»* CONTROLLER COMMAND RECORD (CCR) LAYOUT «, t00=0x0018, t01=0x0170}
0x0271c…02726 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0014}
0x02726…02752 Head {h00=0x0028, h01=0x0050, text=»CCRDLS EQU 0 DATA LINK STATION INDEX«, t00=0x0019, t01=0x001e}
0x02752…02774 Head {h00=0x001e, h01=0x0050, text=»CCRCMD EQU 1 COMMAND CODE «, t00=0x0019, t01=0x004a}
0x02774…0279a Head {h00=0x0022, h01=0x0050, text=»CCRSU1 EQU 2 SUBCOMMAND BYTE 1«, t00=0x0019, t01=0x006c}
0x0279a…027c0 Head {h00=0x0022, h01=0x0050, text=»CCRSU2 EQU 3 SUBCOMMAND BYTE 2«, t00=0x0019, t01=0x0092}
0x027c0…027e4 Head {h00=0x0020, h01=0x0050, text=»CCRSUB EQU 2 SUBCOMMAND WORD«, t00=0x0019, t01=0x00b8}
0x027e4…02804 Head {h00=0x001c, h01=0x0050, text=»CCRSTA EQU 4 STATUS WORD«, t00=0x0019, t01=0x00dc}
0x02804…0282e Head {h00=0x0026, h01=0x0050, text=»CCRIDB EQU 7 IDENTITY, BYTE FIELD «, t00=0x0019, t01=0x00fc}
0x0282e…02858 Head {h00=0x0026, h01=0x0050, text=»CCRIDW EQU 8 IDENTITY, WORD FIELD «, t00=0x0019, t01=0x0126}
0x02858…02884 Head {h00=0x0028, h01=0x0050, text=»CCRLEN EQU 10 BUFFER LENGTH (BYTES) «, t00=0x0019, t01=0x0150}
0x02884…028be Head {h00=0x0036, h01=0x0050, text=»CCRC1B EQU 12 DATA CHAINING CTRL & MSB BUFFER ADDR«, t00=0x0019, t01=0x017c}
0x028be…028e2 Head {h00=0x0020, h01=0x0050, text=»CCRBUF EQU 14 BUFFER ADDRESS«, t00=0x001a, t01=0x0026}
0x028e2…028ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x004a}
0x028ec…028f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0054}
0x028f6…02910 Head {h00=0x0016, h01=0x0050, text=»* BUFFER LAYOUT«, t00=0x001a, t01=0x005e}
0x02910…0291a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0078}
0x0291a…02936 Head {h00=0x0018, h01=0x0050, text=»* HEADER LENGTH«, t00=0x001a, t01=0x0082}
0x02936…02966 Head {h00=0x002c, h01=0x0050, text=»BUFHLN EQU HEADLW+HEADLW LENGTH (BYTES) «, t00=0x001a, t01=0x009e}
0x02966…02982 Head {h00=0x0018, h01=0x0050, text=»* HEADER LAYOUT«, t00=0x001a, t01=0x00ce}
0x02982…029a6 Head {h00=0x0020, h01=0x0050, text=»BUFLNK EQU -8 FREE LIST LINK«, t00=0x001a, t01=0x00ea}
0x029a6…029c8 Head {h00=0x001e, h01=0x0050, text=»BUFDWT EQU -6 DWT ADDRESS «, t00=0x001a, t01=0x010e}
0x029c8…029f6 Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU -4 LENGTH OF TEXT IN BUFFER«, t00=0x001a, t01=0x0130}
0x029f6…02a16 Head {h00=0x001c, h01=0x0050, text=»BUFBIX EQU -2 BYTE INDEX«, t00=0x001a, t01=0x015e}
0x02a16…02a3e Head {h00=0x0024, h01=0x0050, text=»* X25 CONTROL FIELD LAYOUT «, t00=0x001a, t01=0x017e}
0x02a3e…02a70 Head {h00=0x002e, h01=0x0050, text=»X25LGN EQU 0 LOGICAL CHANNEL GROUP NUMBER «, t00=0x001b, t01=0x0016}
0x02a70…02a9c Head {h00=0x0028, h01=0x0050, text=»X25LCN EQU 1 LOGICAL CHANNEL NUMBER «, t00=0x001b, t01=0x0048}
0x02a9c…02aca Head {h00=0x002a, h01=0x0050, text=»X25FLW EQU 2 FLOW CONTROL INFORMATION «, t00=0x001b, t01=0x0074}
0x02aca…02af2 Head {h00=0x0024, h01=0x0050, text=»X25DAT EQU 3 START OF USER DATA «, t00=0x001b, t01=0x00a2}
0x02af2…02afc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ca}
0x02afc…02b0a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x00d4}
0x02b0a…02b14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00e2}
0x02b14…02b32 Head {h00=0x001a, h01=0x0050, text=»* PLC COMMAND CODES«, t00=0x001b, t01=0x00ec}
0x02b32…02b3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x010a}
0x02b3c…02b64 Head {h00=0x0024, h01=0x0050, text=»CMDTC EQU /80 TEST CHANNEL UNIT «, t00=0x001b, t01=0x0114}
0x02b64…02b84 Head {h00=0x001c, h01=0x0050, text=»CMDOP EQU /86 OPEN LINE «, t00=0x001b, t01=0x013c}
0x02b84…02ba2 Head {h00=0x001a, h01=0x0050, text=»CMDOD EQU /85 OPEN DLS«, t00=0x001b, t01=0x015c}
0x02ba2…02bcc Head {h00=0x0026, h01=0x0050, text=»CMDPS EQU /84 GET LINE STATISTICS «, t00=0x001b, t01=0x017a}
0x02bcc…02bf4 Head {h00=0x0024, h01=0x0050, text=»CMDDS EQU /83 GET DLS STATISTICS«, t00=0x001c, t01=0x0014}
0x02bf4…02c1c Head {h00=0x0024, h01=0x0050, text=»CMDRM EQU /87 READ LOCAL MEMORY «, t00=0x001c, t01=0x003c}
0x02c1c…02c40 Head {h00=0x0020, h01=0x0050, text=»CMDSW EQU /40 STANDARD WRITE«, t00=0x001c, t01=0x0064}
0x02c40…02c60 Head {h00=0x001c, h01=0x0050, text=»CMDFW EQU /41 FAST WRITE«, t00=0x001c, t01=0x0088}
0x02c60…02c82 Head {h00=0x001e, h01=0x0050, text=»CMDGR EQU /20 GENERAL READ«, t00=0x001c, t01=0x00a8}
0x02c82…02c8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00ca}
0x02c8c…02c96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00d4}
0x02c96…02cc2 Head {h00=0x0028, h01=0x0050, text=»* APPLICATION TEST COMMAND CODES «, t00=0x001c, t01=0x00de}
0x02cc2…02ccc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x010a}
0x02ccc…02cf4 Head {h00=0x0024, h01=0x0050, text=»ORDPS EQU 1 GET LINE STATISTICS «, t00=0x001c, t01=0x0114}
0x02cf4…02d1a Head {h00=0x0022, h01=0x0050, text=»ORDDS EQU 2 GER DLS STATISTICS«, t00=0x001c, t01=0x013c}
0x02d1a…02d40 Head {h00=0x0022, h01=0x0050, text=»ORDRM EQU 3 READ LOCAL MEMORY «, t00=0x001c, t01=0x0162}
0x02d40…02d4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0188}
0x02d4a…02d54 (29, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0004}
0x02d54…02d6e Head {h00=0x0016, h01=0x0050, text=»* MESSAGE TYPES«, t00=0x001d, t01=0x000e}
0x02d6e…02d78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0028}
0x02d78…02da2 Head {h00=0x0026, h01=0x0050, text=»TYERR EQU 0 ILLEGAL TYPE OR ERROR «, t00=0x001d, t01=0x0032}
0x02da2…02dd8 Head {h00=0x0032, h01=0x0050, text=»TYNFLO EQU 2 DATA PACKET WITH NO FLOW CONTROL «, t00=0x001d, t01=0x005c}
0x02dd8…02e02 Head {h00=0x0026, h01=0x0050, text=»TYSTAT EQU 4 DEVICE STATUS MESSAGE«, t00=0x001d, t01=0x0092}
0x02e02…02e2a Head {h00=0x0024, h01=0x0050, text=»TYDATA EQU 6 NORMAL DATA PACKET «, t00=0x001d, t01=0x00bc}
0x02e2a…02e52 Head {h00=0x0024, h01=0x0050, text=»TYRR EQU 8 RECIEVE READY PACKET «, t00=0x001d, t01=0x00e4}
0x02e52…02e74 Head {h00=0x001e, h01=0x0050, text=»TYRES EQU 10 RESET PACKET «, t00=0x001d, t01=0x010c}
0x02e74…02ea4 Head {h00=0x002c, h01=0x0050, text=»TYRESC EQU 12 RESET CONFIRMATION PACKET «, t00=0x001d, t01=0x012e}
0x02ea4…02eae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x015e}
0x02eae…02ebc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x0168}
0x02ebc…02ec6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0176}
0x02ec6…02eec Head {h00=0x0022, h01=0x0050, text=»* DWT STATUS FLAGS (DWTST) «, t00=0x001d, t01=0x0180}
0x02eec…02ef6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0016}
0x02ef6…02f1e Head {h00=0x0024, h01=0x0050, text=»DWFBSY EQU /8000 DEVICE NOT BUSY«, t00=0x001e, t01=0x0020}
0x02f1e…02f40 Head {h00=0x001e, h01=0x0050, text=»DWFECH EQU /2000 ECHO MODE«, t00=0x001e, t01=0x0048}
0x02f40…02f68 Head {h00=0x0024, h01=0x0050, text=»DWFINP EQU /0020 INPUT REQUESTED«, t00=0x001e, t01=0x006a}
0x02f68…02f96 Head {h00=0x002a, h01=0x0050, text=»DWFRES EQU /0008 RESET SEQUENCE ACTIVE«, t00=0x001e, t01=0x0092}
0x02f96…02fc6 Head {h00=0x002c, h01=0x0050, text=»DWFAK3 EQU /0004 WAITING FOR LEVEL 3 ACK«, t00=0x001e, t01=0x00c0}
0x02fc6…02ff0 Head {h00=0x0026, h01=0x0050, text=»DWFPLC EQU DWFRES+DWFAK3 PLC FLAGS«, t00=0x001e, t01=0x00f0}
0x02ff0…03026 Head {h00=0x0032, h01=0x0050, text=»DWFTY1 EQU /0002 USE ONLY TYPE 1 DATA PACKETS «, t00=0x001e, t01=0x011a}
0x03026…03054 Head {h00=0x002a, h01=0x0050, text=»DWFSAC EQU /0001 WAIT FOR LEVEL 3 ACK «, t00=0x001e, t01=0x0150}
0x03054…0305e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x017e}
0x0305e…03068 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0188}
0x03068…0308e (31, 0, 400) Head {h00=0x0022, h01=0x0050, text=»* PLC STATUS FLAGS (CCRSTA)«, t00=0x001f, t01=0x0004}
0x0308e…03098 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x002a}
0x03098…030be Head {h00=0x0022, h01=0x0050, text=»STANOC EQU /0001 NO CONNECTION«, t00=0x001f, t01=0x0034}
0x030be…030e2 Head {h00=0x0020, h01=0x0050, text=»STALIR EQU /0004 LINK RESET «, t00=0x001f, t01=0x005a}
0x030e2…0310c Head {h00=0x0026, h01=0x0050, text=»STADNO EQU /1000 DCE NOT OPERABLE «, t00=0x001f, t01=0x007e}
0x0310c…03132 Head {h00=0x0022, h01=0x0050, text=»STAE1 EQU STANOC+STALIR DUMMY «, t00=0x001f, t01=0x00a8}
0x03132…03168 Head {h00=0x0032, h01=0x0050, text=»STAERR EQU STAE1+STADNO ERROR IN COMMUNICATION«, t00=0x001f, t01=0x00ce}
0x03168…03172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0104}
0x03172…03198 Head {h00=0x0022, h01=0x0050, text=»STAREQ EQU /8000 REQUEST ERROR«, t00=0x001f, t01=0x010e}
0x03198…031c4 Head {h00=0x0028, h01=0x0050, text=»STANOB EQU /0800 NO BUFFERS FOR CCR «, t00=0x001f, t01=0x0134}
0x031c4…031ec Head {h00=0x0024, h01=0x0050, text=»STAPOL EQU /0100 POLLING STOPPED«, t00=0x001f, t01=0x0160}
0x031ec…03220 Head {h00=0x0030, h01=0x0050, text=»STACOM EQU /0080 COMMUNICATION REESTABLISHED«, t00=0x001f, t01=0x0188}
0x03220…03248 Head {h00=0x0024, h01=0x0050, text=»STASEQ EQU /0010 SEQUENCE ERROR «, t00=0x0020, t01=0x002c}
0x03248…03270 Head {h00=0x0024, h01=0x0050, text=»STAILL EQU /0008 ILLEGAL LENGTH «, t00=0x0020, t01=0x0054}
0x03270…03294 Head {h00=0x0020, h01=0x0050, text=»STALER EQU /0002 LINK ERROR «, t00=0x0020, t01=0x007c}
0x03294…0329e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00a0}
0x0329e…032ac Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x00aa}
0x032ac…032b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00b8}
0x032b6…032dc Head {h00=0x0022, h01=0x0050, text=»* WORK STATION STATUS FLAGS«, t00=0x0020, t01=0x00c2}
0x032dc…032e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00e8}
0x032e6…03310 Head {h00=0x0026, h01=0x0050, text=»WSFERR EQU /01 COMMUNICATION ERROR«, t00=0x0020, t01=0x00f2}
0x03310…0331a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x011c}
0x0331a…03324 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0126}
0x03324…0334e Head {h00=0x0026, h01=0x0050, text=»* MASKS FOR CHANNEL PARAMETERS «, t00=0x0020, t01=0x0130}
0x0334e…03358 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x015a}
0x03358…03384 Head {h00=0x0028, h01=0x0050, text=»MASKPL EQU /0F PLC NUMBER (0-3 USED)«, t00=0x0020, t01=0x0164}
0x03384…033ba Head {h00=0x0032, h01=0x0050, text=»MASKWS EQU /3F WORK STATION NUMBER (1-32 USED)«, t00=0x0020, t01=0x0190}
0x033ba…033ec Head {h00=0x002e, h01=0x0050, text=»MASKLC EQU /3F LOGICAL CHANNEL (0-7 USED) «, t00=0x0021, t01=0x0036}
0x033ec…033f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0068}
0x033f6…03400 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0072}
0x03400…0341a Head {h00=0x0016, h01=0x0050, text=»* RETURN CODES «, t00=0x0021, t01=0x007c}
0x0341a…03424 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0096}
0x03424…03444 Head {h00=0x001c, h01=0x0050, text=»* AT REQUEST RETURN«, t00=0x0021, t01=0x00a0}
0x03444…0346a Head {h00=0x0022, h01=0x0050, text=»NOTOPR EQU /0001 NOT OPERABLE «, t00=0x0021, t01=0x00c0}
0x0346a…0348e Head {h00=0x0020, h01=0x0050, text=»LINERR EQU /0004 LINK ERROR «, t00=0x0021, t01=0x00e6}
0x0348e…034b6 Head {h00=0x0024, h01=0x0050, text=»PLSERR EQU /0001 SOFTWARE ERROR «, t00=0x0021, t01=0x010a}
0x034b6…034d6 Head {h00=0x001c, h01=0x0050, text=»* AT RECOVERY ENTRY«, t00=0x0021, t01=0x0132}
0x034d6…034fa Head {h00=0x0020, h01=0x0050, text=»RETCP EQU /0001 TC POWER UP «, t00=0x0021, t01=0x0152}
0x034fa…03526 Head {h00=0x0028, h01=0x0050, text=»RESECP EQU /0002 SECONDARY POWER UP «, t00=0x0021, t01=0x0176}
0x03526…0354a Head {h00=0x0020, h01=0x0050, text=»RELINE EQU /0004 LINK ERROR «, t00=0x0022, t01=0x0012}
0x0354a…03554 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0036}
0x03554…0355e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0040}
0x0355e…03578 Head {h00=0x0016, h01=0x0050, text=»* MISCELLANEOUS«, t00=0x0022, t01=0x004a}
0x03578…03582 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0064}
0x03582…035b0 Head {h00=0x002a, h01=0x0050, text=»PLCERR EQU /F1 SOP ERROR CODE AT TRAP «, t00=0x0022, t01=0x006e}
0x035b0…035e4 Head {h00=0x0030, h01=0x0050, text=»CIDINT EQU 8 OFFSET TO INTERRUPT DESCRIPTOR «, t00=0x0022, t01=0x009c}
0x035e4…0361a Head {h00=0x0032, h01=0x0050, text=»MAXFR EQU 4 MAX OUTSTANDING FRAMES ON LEVEL 2 «, t00=0x0022, t01=0x00d0}
0x0361a…03624 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0106}
0x03624…03632 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x0110}
0x03632…0363c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x011e}
0x0363c…03652 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0022, t01=0x0128}
0x03652…03668 Head {h00=0x0012, h01=0x0050, text=»* DATA AREAS *«, t00=0x0022, t01=0x013e}
0x03668…0367e Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0022, t01=0x0154}
0x0367e…03688 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x016a}
0x03688…036a6 Head {h00=0x001a, h01=0x0050, text=»* CWT ADDRESS TABLE«, t00=0x0022, t01=0x0174}
0x036a6…036b0 (35, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0004}
0x036b0…036c4 Head {h00=0x0010, h01=0x0050, text=»CWTPLC EQU *«, t00=0x0023, t01=0x000e}
0x036c4…036d8 Head {h00=0x0010, h01=0x0050, text=»TABCWT EQU *«, t00=0x0023, t01=0x0022}
0x036d8…036ee Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0023, t01=0x0036}
0x036ee…03714 Head {h00=0x0022, h01=0x0050, text=» DATA PL0CWT CWT FOR PLC NR 1 «, t00=0x0023, t01=0x004c}
0x03714…0372a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x0023, t01=0x0072}
0x0372a…03750 Head {h00=0x0022, h01=0x0050, text=» DATA PL1CWT CWT FOR PLC NR 2 «, t00=0x0023, t01=0x0088}
0x03750…03766 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x0023, t01=0x00ae}
0x03766…0378c Head {h00=0x0022, h01=0x0050, text=» DATA PL2CWT CWT FOR PLC NR 3 «, t00=0x0023, t01=0x00c4}
0x0378c…037a2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x0023, t01=0x00ea}
0x037a2…037c8 Head {h00=0x0022, h01=0x0050, text=» DATA PL3CWT CWT FOR PLC NR 4 «, t00=0x0023, t01=0x0100}
0x037c8…037d4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0126}
0x037d4…037de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0132}
0x037de…037f4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=4 «, t00=0x0023, t01=0x013c}
0x037f4…0381a Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 4 NOT CONNECTED«, t00=0x0023, t01=0x0152}
0x0381a…03830 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x0023, t01=0x0178}
0x03830…03856 Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 3 NOT CONNECTED«, t00=0x0023, t01=0x018e}
0x03856…0386c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x0024, t01=0x0024}
0x0386c…03892 Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 2 NOT CONNECTED«, t00=0x0024, t01=0x003a}
0x03892…038ac Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=1 =5 «, t00=0x0024, t01=0x0060}
0x038ac…038d6 Head {h00=0x0026, h01=0x0050, text=» DATA 0 PLC NR 1 NOT CONNECTED =5 «, t00=0x0024, t01=0x007a}
0x038d6…038e2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x00a4}
0x038e2…038ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00b0}
0x038ec…03902 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0024, t01=0x00ba}
0x03902…0392e Head {h00=0x0028, h01=0x0050, text=» DATA PR1CWT CWT FOR PLC NR. 5, REM.«, t00=0x0024, t01=0x00d0}
0x0392e…03944 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0024, t01=0x00fc}
0x03944…03970 Head {h00=0x0028, h01=0x0050, text=» DATA PR2CWT CWT FOR PLC NR. 6, REM.«, t00=0x0024, t01=0x0112}
0x03970…03986 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0024, t01=0x013e}
0x03986…039b2 Head {h00=0x0028, h01=0x0050, text=» DATA PR3CWT CWT FOR PLC NR. 7, REM.«, t00=0x0024, t01=0x0154}
0x039b2…039c8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0024, t01=0x0180}
0x039c8…039f4 Head {h00=0x0028, h01=0x0050, text=» DATA PR4CWT CWT FOR PLC NR. 8, REM.«, t00=0x0025, t01=0x0008}
0x039f4…03a00 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0034}
0x03a00…03a0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0040}
0x03a0a…03a20 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=4 «, t00=0x0025, t01=0x004a}
0x03a20…03a46 Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 8 NOT CONNECTED«, t00=0x0025, t01=0x0060}
0x03a46…03a5c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0025, t01=0x0086}
0x03a5c…03a82 Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 7 NOT CONNECTED«, t00=0x0025, t01=0x009c}
0x03a82…03a98 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0025, t01=0x00c2}
0x03a98…03abe Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 6 NOT CONNECTED«, t00=0x0025, t01=0x00d8}
0x03abe…03ad4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0025, t01=0x00fe}
0x03ad4…03afa Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 5 NOT CONNECTED«, t00=0x0025, t01=0x0114}
0x03afa…03b06 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x013a}
0x03b06…03b10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0146}
0x03b10…03b1e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x0150}
0x03b1e…03b28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x015e}
0x03b28…03b32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0168}
0x03b32…03b46 Head {h00=0x0010, h01=0x0050, text=»OPARR1 EQU *«, t00=0x0025, t01=0x0172}
0x03b46…03b60 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0025, t01=0x0186}
0x03b60…03b7c Head {h00=0x0018, h01=0x0050, text=» DATA OPNR10 LINE 0 «, t00=0x0026, t01=0x0010}
0x03b7c…03b98 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR11 LINE 1 «, t00=0x0026, t01=0x002c}
0x03b98…03bb4 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR12 LINE 2 «, t00=0x0026, t01=0x0048}
0x03bb4…03bd0 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR13 LINE 3 «, t00=0x0026, t01=0x0064}
0x03bd0…03bdc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x0080}
0x03bdc…03bf0 Head {h00=0x0010, h01=0x0050, text=»OPARR2 EQU *«, t00=0x0026, t01=0x008c}
0x03bf0…03c0a Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0026, t01=0x00a0}
0x03c0a…03c24 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=1 U =5«, t00=0x0026, t01=0x00ba}
0x03c24…03c40 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR20 LINE 0 «, t00=0x0026, t01=0x00d4}
0x03c40…03c5c Head {h00=0x0018, h01=0x0050, text=» DATA OPNR21 LINE 1 «, t00=0x0026, t01=0x00f0}
0x03c5c…03c78 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR22 LINE 2 «, t00=0x0026, t01=0x010c}
0x03c78…03c94 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR23 LINE 3 «, t00=0x0026, t01=0x0128}
0x03c94…03ca0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x0144}
0x03ca0…03cb4 Head {h00=0x0010, h01=0x0050, text=»OPARR3 EQU *«, t00=0x0026, t01=0x0150}
0x03cb4…03cce Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0026, t01=0x0164}
0x03cce…03ce8 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=1 U =5«, t00=0x0026, t01=0x017e}
0x03ce8…03d02 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=2 U =5«, t00=0x0027, t01=0x0008}
0x03d02…03d1e Head {h00=0x0018, h01=0x0050, text=» DATA OPNR30 LINE 0 «, t00=0x0027, t01=0x0022}
0x03d1e…03d3a Head {h00=0x0018, h01=0x0050, text=» DATA OPNR31 LINE 1 «, t00=0x0027, t01=0x003e}
0x03d3a…03d56 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR32 LINE 2 «, t00=0x0027, t01=0x005a}
0x03d56…03d72 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR33 LINE 3 «, t00=0x0027, t01=0x0076}
0x03d72…03d7e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0092}
0x03d7e…03d92 Head {h00=0x0010, h01=0x0050, text=»OPARR4 EQU *«, t00=0x0027, t01=0x009e}
0x03d92…03dac Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0027, t01=0x00b2}
0x03dac…03dc6 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=1 U =5«, t00=0x0027, t01=0x00cc}
0x03dc6…03de0 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=2 U =5«, t00=0x0027, t01=0x00e6}
0x03de0…03dfa Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=3 U =5«, t00=0x0027, t01=0x0100}
0x03dfa…03e16 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR40 LINE 0 «, t00=0x0027, t01=0x011a}
0x03e16…03e32 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR41 LINE 1 «, t00=0x0027, t01=0x0136}
0x03e32…03e4e Head {h00=0x0018, h01=0x0050, text=» DATA OPNR42 LINE 2 «, t00=0x0027, t01=0x0152}
0x03e4e…03e6a Head {h00=0x0018, h01=0x0050, text=» DATA OPNR43 LINE 3 «, t00=0x0027, t01=0x016e}
0x03e6a…03e76 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x018a}
0x03e76…03e80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0008}
0x03e80…03e9a Head {h00=0x0016, h01=0x0050, text=»OPARL1 EQU * U =5 «, t00=0x0028, t01=0x0012}
0x03e9a…03ebe Head {h00=0x0020, h01=0x0050, text=» DATA OPNL10 LOCAL PLC 1 =5 «, t00=0x0028, t01=0x002c}
0x03ebe…03ed8 Head {h00=0x0016, h01=0x0050, text=»OPARL2 EQU * U =5 «, t00=0x0028, t01=0x0050}
0x03ed8…03efc Head {h00=0x0020, h01=0x0050, text=» DATA OPNL20 LOCAL PLC 2 =5 «, t00=0x0028, t01=0x006a}
0x03efc…03f16 Head {h00=0x0016, h01=0x0050, text=»OPARL3 EQU * U =5 «, t00=0x0028, t01=0x008e}
0x03f16…03f3a Head {h00=0x0020, h01=0x0050, text=» DATA OPNL30 LOCAL PLC 3 =5 «, t00=0x0028, t01=0x00a8}
0x03f3a…03f54 Head {h00=0x0016, h01=0x0050, text=»OPARL4 EQU * U =5 «, t00=0x0028, t01=0x00cc}
0x03f54…03f78 Head {h00=0x0020, h01=0x0050, text=» DATA OPNL40 LOCAL PLC 4 =5 «, t00=0x0028, t01=0x00e6}
0x03f78…03f86 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x010a}
0x03f86…03f90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0118}
0x03f90…03fba Head {h00=0x0026, h01=0x0050, text=»* OPEN LINE PARAMETER AREAS, LOCAL«, t00=0x0028, t01=0x0122}
0x03fba…03fc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x014c}
0x03fc4…03fe0 Head {h00=0x0018, h01=0x0050, text=»* STANDARD AREAS :«, t00=0x0028, t01=0x0156}
0x03fe0…03ffa Head {h00=0x0016, h01=0x0050, text=»* PRIMARY STATION «, t00=0x0028, t01=0x0172}
0x03ffa…04010 Head {h00=0x0012, h01=0x0050, text=»* FULL DUPLEX «, t00=0x0028, t01=0x018c}
0x04010…04028 Head {h00=0x0014, h01=0x0050, text=»* 96000 BITS/SEC«, t00=0x0029, t01=0x0012}
0x04028…04042 Head {h00=0x0016, h01=0x0050, text=»* NO NRZI ENCODING«, t00=0x0029, t01=0x002a}
0x04042…0405e Head {h00=0x0018, h01=0x0050, text=»* 5 RETRANSMISSIONS «, t00=0x0029, t01=0x0044}
0x0405e…04078 Head {h00=0x0016, h01=0x0050, text=»* 5 MIN. TIME OUT «, t00=0x0029, t01=0x0060}
0x04078…04082 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x007a}
0x04082…0408c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0084}
0x0408c…040b4 Head {h00=0x0024, h01=0x0050, text=»OPNL40 EQU * LOCAL PLC 4, LINE 0«, t00=0x0029, t01=0x008e}
0x040b4…040ca Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0029, t01=0x00b6}
0x040ca…040e0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x0029, t01=0x00cc}
0x040e0…040f6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x0029, t01=0x00e2}
0x040f6…0410c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x0029, t01=0x00f8}
0x0410c…04136 Head {h00=0x0026, h01=0x0050, text=» DATA /0101,/A000,/0D05,TIMACT,0,0«, t00=0x0029, t01=0x010e}
0x04136…04142 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x0138}
0x04142…0416a Head {h00=0x0024, h01=0x0050, text=»OPNL30 EQU * LOCAL PLC 3, LINE 0«, t00=0x0029, t01=0x0144}
0x0416a…04180 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0029, t01=0x016c}
0x04180…04196 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x0029, t01=0x0182}
0x04196…041ac Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x002a, t01=0x0008}
0x041ac…041dc Head {h00=0x002c, h01=0x0050, text=» DATA /0101,/A000,/0D05,TIMACT,0,0 U =3 «, t00=0x002a, t01=0x001e}
0x041dc…041e8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x004e}
0x041e8…04210 Head {h00=0x0024, h01=0x0050, text=»OPNL20 EQU * LOCAL PLC 2, LINE 0«, t00=0x002a, t01=0x005a}
0x04210…04226 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x002a, t01=0x0082}
0x04226…0423c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x002a, t01=0x0098}
0x0423c…04266 Head {h00=0x0026, h01=0x0050, text=» DATA /0101,/A000,/0D05,TIMACT,0,0«, t00=0x002a, t01=0x00ae}
0x04266…04272 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x00d8}
0x04272…0429a Head {h00=0x0024, h01=0x0050, text=»OPNL10 EQU * LOCAL PLC 1, LINE 0«, t00=0x002a, t01=0x00e4}
0x0429a…042b0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x002a, t01=0x010c}
0x042b0…042da Head {h00=0x0026, h01=0x0050, text=» DATA /0101,/A000,/0D05,TIMACT,0,0«, t00=0x002a, t01=0x0122}
0x042da…042e6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x014c}
0x042e6…042f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0158}
0x042f0…0431c Head {h00=0x0028, h01=0x0050, text=»* END OF LOCAL LINE PARAMETER AREAS «, t00=0x002a, t01=0x0162}
0x0431c…04326 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x018e}
0x04326…04334 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0008}
0x04334…0433e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0016}
0x0433e…0436a Head {h00=0x0028, h01=0x0050, text=»* OPEN LINE PARAMETER AREAS, REMOTE «, t00=0x002b, t01=0x0020}
0x0436a…04374 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x004c}
0x04374…04390 Head {h00=0x0018, h01=0x0050, text=»* STANDARD AREAS :«, t00=0x002b, t01=0x0056}
0x04390…043aa Head {h00=0x0016, h01=0x0050, text=»* PRIMARY STATION «, t00=0x002b, t01=0x0072}
0x043aa…043c0 Head {h00=0x0012, h01=0x0050, text=»* FULL DUPLEX «, t00=0x002b, t01=0x008c}
0x043c0…043d8 Head {h00=0x0014, h01=0x0050, text=»* 2400 BITS/SEC «, t00=0x002b, t01=0x00a2}
0x043d8…043f2 Head {h00=0x0016, h01=0x0050, text=»* NO NRZI ENCODING«, t00=0x002b, t01=0x00ba}
0x043f2…04408 Head {h00=0x0012, h01=0x0050, text=»* POLLING 13HZ«, t00=0x002b, t01=0x00d4}
0x04408…04424 Head {h00=0x0018, h01=0x0050, text=»* 5 RETRANSMISSIONS «, t00=0x002b, t01=0x00ea}
0x04424…0443e Head {h00=0x0016, h01=0x0050, text=»* 5 MIN. TIME OUT «, t00=0x002b, t01=0x0106}
0x0443e…04448 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0120}
0x04448…04452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x012a}
0x04452…04468 Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 4«, t00=0x002b, t01=0x0134}
0x04468…04484 Head {h00=0x0018, h01=0x0050, text=»OPNR40 EQU * LINE 0 «, t00=0x002b, t01=0x014a}
0x04484…0449a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002b, t01=0x0166}
0x0449a…044b0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002b, t01=0x017c}
0x044b0…044c6 (44, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002c, t01=0x0004}
0x044c6…044dc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x002c, t01=0x001a}
0x044dc…0450a Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0108,0«, t00=0x002c, t01=0x0030}
0x0450a…04516 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x005e}
0x04516…04532 Head {h00=0x0018, h01=0x0050, text=»OPNR41 EQU * LINE 1 «, t00=0x002c, t01=0x006a}
0x04532…04548 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002c, t01=0x0086}
0x04548…0455e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002c, t01=0x009c}
0x0455e…04574 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002c, t01=0x00b2}
0x04574…0458a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x002c, t01=0x00c8}
0x0458a…045b8 Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0908,0«, t00=0x002c, t01=0x00de}
0x045b8…045c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x010c}
0x045c4…045e0 Head {h00=0x0018, h01=0x0050, text=»OPNR42 EQU * LINE 3 «, t00=0x002c, t01=0x0118}
0x045e0…045f6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002c, t01=0x0134}
0x045f6…0460c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002c, t01=0x014a}
0x0460c…04622 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002c, t01=0x0160}
0x04622…04638 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x002c, t01=0x0176}
0x04638…04666 Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0B08,0«, t00=0x002c, t01=0x018c}
0x04666…04672 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x002a}
0x04672…0468e Head {h00=0x0018, h01=0x0050, text=»OPNR43 EQU * LINE 3 «, t00=0x002d, t01=0x0036}
0x0468e…046a4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002d, t01=0x0052}
0x046a4…046ba Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002d, t01=0x0068}
0x046ba…046d0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002d, t01=0x007e}
0x046d0…046e6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x002d, t01=0x0094}
0x046e6…04714 Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/1308,0«, t00=0x002d, t01=0x00aa}
0x04714…04720 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x00d8}
0x04720…04736 Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 3«, t00=0x002d, t01=0x00e4}
0x04736…04752 Head {h00=0x0018, h01=0x0050, text=»OPNR30 EQU * LINE 0 «, t00=0x002d, t01=0x00fa}
0x04752…04768 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002d, t01=0x0116}
0x04768…0477e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002d, t01=0x012c}
0x0477e…04794 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002d, t01=0x0142}
0x04794…047c2 Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0108,0«, t00=0x002d, t01=0x0158}
0x047c2…047ce Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0186}
0x047ce…047ea (46, 0, 398) Head {h00=0x0018, h01=0x0050, text=»OPNR31 EQU * LINE 1 «, t00=0x002e, t01=0x0004}
0x047ea…04800 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002e, t01=0x0020}
0x04800…04816 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002e, t01=0x0036}
0x04816…0482c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002e, t01=0x004c}
0x0482c…0485a Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0908,0«, t00=0x002e, t01=0x0062}
0x0485a…04866 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0090}
0x04866…04882 Head {h00=0x0018, h01=0x0050, text=»OPNR32 EQU * LINE 2 «, t00=0x002e, t01=0x009c}
0x04882…04898 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002e, t01=0x00b8}
0x04898…048ae Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002e, t01=0x00ce}
0x048ae…048c4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002e, t01=0x00e4}
0x048c4…048f2 Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0B08,0«, t00=0x002e, t01=0x00fa}
0x048f2…048fe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0128}
0x048fe…0491a Head {h00=0x0018, h01=0x0050, text=»OPNR33 EQU * LINE 3 «, t00=0x002e, t01=0x0134}
0x0491a…04930 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002e, t01=0x0150}
0x04930…04946 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002e, t01=0x0166}
0x04946…0495c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002e, t01=0x017c}
0x0495c…0498a (47, 0, 400) Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/1308,0«, t00=0x002f, t01=0x0004}
0x0498a…04996 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x0032}
0x04996…049a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x003e}
0x049a0…049b6 Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 2«, t00=0x002f, t01=0x0048}
0x049b6…049d2 Head {h00=0x0018, h01=0x0050, text=»OPNR20 EQU * LINE 0 «, t00=0x002f, t01=0x005e}
0x049d2…049e8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002f, t01=0x007a}
0x049e8…049fe Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002f, t01=0x0090}
0x049fe…04a2c Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0108,0«, t00=0x002f, t01=0x00a6}
0x04a2c…04a38 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x00d4}
0x04a38…04a54 Head {h00=0x0018, h01=0x0050, text=»OPNR21 EQU * LINE 1 «, t00=0x002f, t01=0x00e0}
0x04a54…04a6a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002f, t01=0x00fc}
0x04a6a…04a80 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002f, t01=0x0112}
0x04a80…04aae Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0908,0«, t00=0x002f, t01=0x0128}
0x04aae…04aba Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x0156}
0x04aba…04ad6 Head {h00=0x0018, h01=0x0050, text=»OPNR22 EQU * LINE 2 «, t00=0x002f, t01=0x0162}
0x04ad6…04aec Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002f, t01=0x017e}
0x04aec…04b02 (48, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0030, t01=0x0004}
0x04b02…04b30 Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0B08,0«, t00=0x0030, t01=0x001a}
0x04b30…04b3c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x0048}
0x04b3c…04b58 Head {h00=0x0018, h01=0x0050, text=»OPNR23 EQU * LINE 3 «, t00=0x0030, t01=0x0054}
0x04b58…04b6e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0030, t01=0x0070}
0x04b6e…04b84 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0030, t01=0x0086}
0x04b84…04bb2 Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/1308,0«, t00=0x0030, t01=0x009c}
0x04bb2…04bbe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x00ca}
0x04bbe…04bc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00d6}
0x04bc8…04bde Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 1«, t00=0x0030, t01=0x00e0}
0x04bde…04bfa Head {h00=0x0018, h01=0x0050, text=»OPNR10 EQU * LINE 0 «, t00=0x0030, t01=0x00f6}
0x04bfa…04c10 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0030, t01=0x0112}
0x04c10…04c3e Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0108,0«, t00=0x0030, t01=0x0128}
0x04c3e…04c4a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x0156}
0x04c4a…04c66 Head {h00=0x0018, h01=0x0050, text=»OPNR11 EQU * LINE 1 «, t00=0x0030, t01=0x0162}
0x04c66…04c7c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0030, t01=0x017e}
0x04c7c…04caa (49, 0, 400) Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0908,0«, t00=0x0031, t01=0x0004}
0x04caa…04cb6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0032}
0x04cb6…04cd2 Head {h00=0x0018, h01=0x0050, text=»OPNR12 EQU * LINE 2 «, t00=0x0031, t01=0x003e}
0x04cd2…04ce8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0031, t01=0x005a}
0x04ce8…04d16 Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/0B08,0«, t00=0x0031, t01=0x0070}
0x04d16…04d22 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x009e}
0x04d22…04d3e Head {h00=0x0018, h01=0x0050, text=»OPNR13 EQU * LINE 3 «, t00=0x0031, t01=0x00aa}
0x04d3e…04d54 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0031, t01=0x00c6}
0x04d54…04d82 Head {h00=0x002a, h01=0x0050, text=» DATA /0103,/0400,/0D05,TIMACT,/1308,0«, t00=0x0031, t01=0x00dc}
0x04d82…04d8e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x010a}
0x04d8e…04dba Head {h00=0x0028, h01=0x0050, text=»* END OF REMOTE LINE PARAMETER AREAS«, t00=0x0031, t01=0x0116}
0x04dba…04dc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0142}
0x04dc4…04dce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x014c}
0x04dce…04dfe Head {h00=0x002c, h01=0x0050, text=»PLCPFP DATA 0 PLC LOCAL POWER FAIL FLAG «, t00=0x0031, t01=0x0156}
0x04dfe…04e08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0186}
0x04e08…04e34 Head {h00=0x0028, h01=0x0050, text=» IFF UTTEST=0 TEST VERSION OF DRIVER«, t00=0x0031, t01=0x0190}
0x04e34…04e3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x002c}
0x04e3e…04e4c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x0036}
0x04e4c…04e56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0044}
0x04e56…04e82 Head {h00=0x0028, h01=0x0050, text=»UTTST DATA UTTEST 1 = TRAP NOT USED «, t00=0x0032, t01=0x004e}
0x04e82…04e8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x007a}
0x04e8c…04e96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0084}
0x04e96…04ebc Head {h00=0x0022, h01=0x0050, text=»* QUEUE STATISTICS COUNTERS«, t00=0x0032, t01=0x008e}
0x04ebc…04ee6 Head {h00=0x0026, h01=0x0050, text=»* EACH COUNTER HAS ONE WORD / PLC «, t00=0x0032, t01=0x00b4}
0x04ee6…04ef0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00de}
0x04ef0…04f04 Head {h00=0x0010, h01=0x0050, text=»STATAR EQU *«, t00=0x0032, t01=0x00e8}
0x04f04…04f26 Head {h00=0x001e, h01=0x0050, text=»WIQSTA RES 8 WINDOW QUEUE «, t00=0x0032, t01=0x00fc}
0x04f26…04f4e Head {h00=0x0024, h01=0x0050, text=»SBQSTA RES 8 SHORT BUFFERS QUEUE«, t00=0x0032, t01=0x011e}
0x04f4e…04f76 Head {h00=0x0024, h01=0x0050, text=»LBQSTA RES 8 LONG BUFFERS QUEUE «, t00=0x0032, t01=0x0146}
0x04f76…04f94 Head {h00=0x001a, h01=0x0050, text=»CCQSTA RES 8 CCA QUEUE«, t00=0x0032, t01=0x016e}
0x04f94…04fbc Head {h00=0x0024, h01=0x0050, text=»STATLN EQU *-STATAR TABLE LENGTH«, t00=0x0032, t01=0x018c}
0x04fbc…04fc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0024}
0x04fc6…04fd2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x002e}
0x04fd2…04fe0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x003a}
0x04fe0…04fea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0048}
0x04fea…04ff4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0052}
0x04ff4…05012 Head {h00=0x001a, h01=0x0050, text=»* CWT DISPLACEMENTS «, t00=0x0033, t01=0x005c}
0x05012…0501c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x007a}
0x0501c…0503e Head {h00=0x001e, h01=0x0050, text=»CWTOPR EQU /00 CU OPERABLE«, t00=0x0033, t01=0x0084}
0x0503e…0505e Head {h00=0x001c, h01=0x0050, text=»CWTCCB EQU /02 CCA BUSY «, t00=0x0033, t01=0x00a6}
0x0505e…0508a Head {h00=0x0028, h01=0x0050, text=»CWTGR EQU /04 GENERAL READ ALLOWED «, t00=0x0033, t01=0x00c6}
0x0508a…050b0 Head {h00=0x0022, h01=0x0050, text=»CWTPNR EQU /06 CU NUMBER (0-7)«, t00=0x0033, t01=0x00f2}
0x050b0…050d2 Head {h00=0x001e, h01=0x0050, text=»CWTABW EQU /08 WS TO ABORT«, t00=0x0033, t01=0x0118}
0x050d2…050fe Head {h00=0x0028, h01=0x0050, text=»CWTPLS EQU /0A LATEST PLC RCA STATUS«, t00=0x0033, t01=0x013a}
0x050fe…05126 Head {h00=0x0024, h01=0x0050, text=»CWTLNO EQU /0C LINE NO INDICATOR«, t00=0x0033, t01=0x0166}
0x05126…05156 Head {h00=0x002c, h01=0x0050, text=»CWTPAR EQU /0E INDEX TO PARAMETER AREA «, t00=0x0033, t01=0x018e}
0x05156…05190 Head {h00=0x0036, h01=0x0050, text=»CWTOPP EQU /10 OPEN LINE PARAMETER AREA ADDRESS =2«, t00=0x0034, t01=0x002e}
0x05190…051b8 Head {h00=0x0024, h01=0x0050, text=»CWTINT EQU /12 WS TABLE ADDRESS «, t00=0x0034, t01=0x0068}
0x051b8…051e4 Head {h00=0x0028, h01=0x0050, text=»CWTBUF EQU /14 INP. BUFFER ADDRESS «, t00=0x0034, t01=0x0090}
0x051e4…0521a Head {h00=0x0032, h01=0x0050, text=»CWTSBQ EQU /16 QUEUE FOR SHORT OUTP. BUFFERS «, t00=0x0034, t01=0x00bc}
0x0521a…0524e Head {h00=0x0030, h01=0x0050, text=»CWTLBQ EQU /18 QUEUE FOR LONG OUTP. BUFFERS «, t00=0x0034, t01=0x00f2}
0x0524e…05278 Head {h00=0x0026, h01=0x0050, text=»CWTCCQ EQU /1A QUEUE FOR CCA FREE «, t00=0x0034, t01=0x0126}
0x05278…052ae Head {h00=0x0032, h01=0x0050, text=»CWTMBQ EQU /1C QUEUE OF ALLOCATED MON. BLOCKS «, t00=0x0034, t01=0x0150}
0x052ae…052d4 Head {h00=0x0022, h01=0x0050, text=»CWTTPR EQU /1E TIMER POINTER «, t00=0x0034, t01=0x0186}
0x052d4…052fc Head {h00=0x0024, h01=0x0050, text=»CWTCIO EQU /20 CIO START INSTR. «, t00=0x0035, t01=0x001c}
0x052fc…0531e Head {h00=0x001e, h01=0x0050, text=»CWTST3 EQU /22 SST INSTR. «, t00=0x0035, t01=0x0044}
0x0531e…05350 Head {h00=0x002e, h01=0x0050, text=»CWTCSD EQU /24 CTRL UNIT START DESCRIPTOR «, t00=0x0035, t01=0x0066}
0x05350…05380 Head {h00=0x002c, h01=0x0050, text=»CWTCID EQU /2A CTRL UNIT INTERF. DESCR. «, t00=0x0035, t01=0x0098}
0x05380…053aa Head {h00=0x0026, h01=0x0050, text=»CWTCCA EQU /34 COMMAND CTRL AREA «, t00=0x0035, t01=0x00c8}
0x053aa…053d4 Head {h00=0x0026, h01=0x0050, text=»CWTRCA EQU /44 RESPONSE CTRL AREA «, t00=0x0035, t01=0x00f2}
0x053d4…05408 Head {h00=0x0030, h01=0x0050, text=»CWTPBS EQU /54 POOLBL. SHORT OUTP. BUFFERS «, t00=0x0035, t01=0x011c}
0x05408…0543c Head {h00=0x0030, h01=0x0050, text=»CWTPBL EQU /5E POOLBL. LONG OUTP. BUFFERS =2«, t00=0x0035, t01=0x0150}
0x0543c…05470 Head {h00=0x0030, h01=0x0050, text=»CWTPBG EQU /68 POOLBL. GENERAL READ BUFFERS «, t00=0x0035, t01=0x0184}
0x05470…05492 Head {h00=0x001e, h01=0x0050, text=»CWTWSS EQU /72 WS STATUS «, t00=0x0036, t01=0x0028}
0x05492…054ca Head {h00=0x0034, h01=0x0050, text=»CWTSOB EQU MAXWS+MAXWS+/74 SH. OUTP. BUFFERS =4 «, t00=0x0036, t01=0x004a}
0x054ca…054fe Head {h00=0x0030, h01=0x0050, text=»CWTLOB EQU CWTSOB+SOBUFS LONG OUTP. BUFFERS «, t00=0x0036, t01=0x0082}
0x054fe…05530 Head {h00=0x002e, h01=0x0050, text=»CWTGRB EQU CWTLOB+LOBUFS GEN. READ BUFFERS«, t00=0x0036, t01=0x00b6}
0x05530…0553e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x00e8}
0x0553e…05548 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00f6}
0x05548…05560 Head {h00=0x0014, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0036, t01=0x0100}
0x05560…05582 Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 1 «, t00=0x0036, t01=0x0118}
0x05582…0558c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x013a}
0x0558c…055a0 Head {h00=0x0010, h01=0x0050, text=»PL0CWT EQU *«, t00=0x0036, t01=0x0144}
0x055a0…055aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0158}
0x055aa…055be Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0036, t01=0x0162}
0x055be…055de Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0036, t01=0x0176}
0x055de…05604 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0037, t01=0x0008}
0x05604…05634 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0037, t01=0x002e}
0x05634…0563e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x005e}
0x0563e…05658 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0037, t01=0x0068}
0x05658…05678 Head {h00=0x001c, h01=0x0050, text=» DATA 0 PLC NUMBER (0-3)«, t00=0x0037, t01=0x0082}
0x05678…056aa Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0037, t01=0x00a2}
0x056aa…056d0 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0037, t01=0x00d4}
0x056d0…056f2 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0037, t01=0x00fa}
0x056f2…05716 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INDEX PARAMETER AREA«, t00=0x0037, t01=0x011c}
0x05716…05720 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0140}
0x05720…05748 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0037, t01=0x014a}
0x05748…0577a Head {h00=0x002e, h01=0x0050, text=» DATA OPARL1 OPEN LINE PARAMETER AREA ADDR«, t00=0x0037, t01=0x0172}
0x0577a…057aa Head {h00=0x002c, h01=0x0050, text=» DATA INTPL1 WORK STATION TABLE ADDRESS «, t00=0x0038, t01=0x0014}
0x057aa…057ce Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0038, t01=0x0044}
0x057ce…057fc Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0038, t01=0x0068}
0x057fc…05828 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0038, t01=0x0096}
0x05828…0584a Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0038, t01=0x00c2}
0x0584a…0587c Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0038, t01=0x00e4}
0x0587c…058ac Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0038, t01=0x0116}
0x058ac…058b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0146}
0x058b6…058d2 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0038, t01=0x0150}
0x058d2…058fe Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA0 START I/O OPERATION«, t00=0x0038, t01=0x016c}
0x058fe…05934 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA0 RELEASE RCA AND RESET INTERRUPT«, t00=0x0039, t01=0x0008}
0x05934…0593e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x003e}
0x0593e…0595e Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0039, t01=0x0048}
0x0595e…05990 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0039, t01=0x0068}
0x05990…059b4 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0039, t01=0x009a}
0x059b4…059dc Head {h00=0x0024, h01=0x0050, text=» DATA PL0CWT+CWTCID CID ADDRESS «, t00=0x0039, t01=0x00be}
0x059dc…05a00 Head {h00=0x0020, h01=0x0050, text=» DATA INTLV0 INTERRUPT LEVEL«, t00=0x0039, t01=0x00e6}
0x05a00…05a36 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0039, t01=0x010a}
0x05a36…05a5a Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0039, t01=0x0140}
0x05a5a…05a82 Head {h00=0x0024, h01=0x0050, text=» DATA PL0CWT+CWTCCA CCA ADDRESS «, t00=0x0039, t01=0x0164}
0x05a82…05aa6 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0039, t01=0x018c}
0x05aa6…05ace Head {h00=0x0024, h01=0x0050, text=» DATA PL0CWT+CWTRCA RCA ADDRESS «, t00=0x003a, t01=0x0020}
0x05ace…05af6 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x003a, t01=0x0048}
0x05af6…05b1a Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x003a, t01=0x0070}
0x05b1a…05b3e Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x003a, t01=0x0094}
0x05b3e…05b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00b8}
0x05b48…05b62 Head {h00=0x0016, h01=0x0050, text=»* POOLBLOCKS «, t00=0x003a, t01=0x00c2}
0x05b62…05b82 Head {h00=0x001c, h01=0x0050, text=» DATA 'SO',0 ID & FLAGS «, t00=0x003a, t01=0x00dc}
0x05b82…05bba Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x003a, t01=0x00fc}
0x05bba…05be2 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x003a, t01=0x0134}
0x05be2…05bf6 Head {h00=0x0010, h01=0x0050, text=» DATA 'LO',0«, t00=0x003a, t01=0x015c}
0x05bf6…05c14 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x003a, t01=0x0170}
0x05c14…05c30 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x003a, t01=0x018e}
0x05c30…05c44 Head {h00=0x0010, h01=0x0050, text=» DATA 'GR',0«, t00=0x003b, t01=0x001a}
0x05c44…05c62 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x003b, t01=0x002e}
0x05c62…05c7e Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x003b, t01=0x004c}
0x05c7e…05c88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0068}
0x05c88…05cbe Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x003b, t01=0x0072}
0x05cbe…05cf4 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x003b, t01=0x00a8}
0x05cf4…05cfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00de}
0x05cfe…05d1a Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x003b, t01=0x00e8}
0x05d1a…05d42 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x003b, t01=0x0104}
0x05d42…05d6a Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x003b, t01=0x012c}
0x05d6a…05d92 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x003b, t01=0x0154}
0x05d92…05d9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x017c}
0x05d9c…05da6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0186}
0x05da6…05db2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x0190}
0x05db2…05dc8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x003c, t01=0x000c}
0x05dc8…05dd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0022}
0x05dd2…05de0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x002c}
0x05de0…05dea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x003a}
0x05dea…05e0c Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 2 «, t00=0x003c, t01=0x0044}
0x05e0c…05e16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0066}
0x05e16…05e2a Head {h00=0x0010, h01=0x0050, text=»PL1CWT EQU *«, t00=0x003c, t01=0x0070}
0x05e2a…05e34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0084}
0x05e34…05e48 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x003c, t01=0x008e}
0x05e48…05e68 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x003c, t01=0x00a2}
0x05e68…05e8e Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x003c, t01=0x00c2}
0x05e8e…05ebe Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x003c, t01=0x00e8}
0x05ebe…05ec8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0118}
0x05ec8…05ee2 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x003c, t01=0x0122}
0x05ee2…05f02 Head {h00=0x001c, h01=0x0050, text=» DATA 1 PLC NUMBER (0-3)«, t00=0x003c, t01=0x013c}
0x05f02…05f34 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x003c, t01=0x015c}
0x05f34…05f5a Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x003c, t01=0x018e}
0x05f5a…05f7c Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x003d, t01=0x0024}
0x05f7c…05fa4 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREA «, t00=0x003d, t01=0x0046}
0x05fa4…05fae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x006e}
0x05fae…05fd6 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x003d, t01=0x0078}
0x05fd6…06008 Head {h00=0x002e, h01=0x0050, text=» DATA OPARL2 OPEN LINE PARAMETER AREA ADDR«, t00=0x003d, t01=0x00a0}
0x06008…06038 Head {h00=0x002c, h01=0x0050, text=» DATA INTPL2 WORK STATION TABLE ADDRESS «, t00=0x003d, t01=0x00d2}
0x06038…0605c Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x003d, t01=0x0102}
0x0605c…0608a Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x003d, t01=0x0126}
0x0608a…060b6 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x003d, t01=0x0154}
0x060b6…060d8 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x003d, t01=0x0180}
0x060d8…0610a Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x003e, t01=0x0012}
0x0610a…0613a Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x003e, t01=0x0044}
0x0613a…06144 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0074}
0x06144…06160 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x003e, t01=0x007e}
0x06160…0618c Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA1 START I/O OPERATION«, t00=0x003e, t01=0x009a}
0x0618c…061c2 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA1 RELEASE RCA AND RESET INTERRUPT«, t00=0x003e, t01=0x00c6}
0x061c2…061cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00fc}
0x061cc…061ec Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x003e, t01=0x0106}
0x061ec…0621e Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x003e, t01=0x0126}
0x0621e…06242 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x003e, t01=0x0158}
0x06242…0626a Head {h00=0x0024, h01=0x0050, text=» DATA PL1CWT+CWTCID CID ADDRESS «, t00=0x003e, t01=0x017c}
0x0626a…0628e Head {h00=0x0020, h01=0x0050, text=» DATA INTLV1 INTERRUPT LEVEL«, t00=0x003f, t01=0x0014}
0x0628e…062c4 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x003f, t01=0x0038}
0x062c4…062e8 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x003f, t01=0x006e}
0x062e8…06310 Head {h00=0x0024, h01=0x0050, text=» DATA PL1CWT+CWTCCA CCA ADDRESS «, t00=0x003f, t01=0x0092}
0x06310…06334 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x003f, t01=0x00ba}
0x06334…0635c Head {h00=0x0024, h01=0x0050, text=» DATA PL1CWT+CWTRCA RCA ADDRESS «, t00=0x003f, t01=0x00de}
0x0635c…06384 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x003f, t01=0x0106}
0x06384…063a8 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x003f, t01=0x012e}
0x063a8…063cc Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x003f, t01=0x0152}
0x063cc…063d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0176}
0x063d6…06402 Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x003f, t01=0x0180}
0x06402…06432 Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0040, t01=0x001c}
0x06432…0646a Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0040, t01=0x004c}
0x0646a…06492 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0040, t01=0x0084}
0x06492…064ba Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0040, t01=0x00ac}
0x064ba…064d8 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0040, t01=0x00d4}
0x064d8…064f4 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0040, t01=0x00f2}
0x064f4…0651c Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0040, t01=0x010e}
0x0651c…0653a Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0040, t01=0x0136}
0x0653a…06556 Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0040, t01=0x0154}
0x06556…06560 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0170}
0x06560…06596 Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0040, t01=0x017a}
0x06596…065cc Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0041, t01=0x0020}
0x065cc…065d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0056}
0x065d6…065f2 Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0041, t01=0x0060}
0x065f2…0661a Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0041, t01=0x007c}
0x0661a…06642 Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0041, t01=0x00a4}
0x06642…0666a Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0041, t01=0x00cc}
0x0666a…06674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00f4}
0x06674…0667e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00fe}
0x0667e…06694 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x0041, t01=0x0108}
0x06694…0669e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x011e}
0x0669e…066ac Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x0128}
0x066ac…066b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0136}
0x066b6…066d8 Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 3 «, t00=0x0041, t01=0x0140}
0x066d8…066e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0162}
0x066e2…066f6 Head {h00=0x0010, h01=0x0050, text=»PL2CWT EQU *«, t00=0x0041, t01=0x016c}
0x066f6…06700 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0180}
0x06700…06714 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0041, t01=0x018a}
0x06714…06734 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0042, t01=0x000e}
0x06734…0675a Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0042, t01=0x002e}
0x0675a…0678a Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0042, t01=0x0054}
0x0678a…06794 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0084}
0x06794…067ae Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0042, t01=0x008e}
0x067ae…067ce Head {h00=0x001c, h01=0x0050, text=» DATA 2 PLC NUMBER (0-3)«, t00=0x0042, t01=0x00a8}
0x067ce…06800 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0042, t01=0x00c8}
0x06800…06826 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0042, t01=0x00fa}
0x06826…06848 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0042, t01=0x0120}
0x06848…06870 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREA «, t00=0x0042, t01=0x0142}
0x06870…0687a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x016a}
0x0687a…068a2 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0042, t01=0x0174}
0x068a2…068d4 Head {h00=0x002e, h01=0x0050, text=» DATA OPARL3 OPEN LINE PARAMETER AREA ADDR«, t00=0x0043, t01=0x000c}
0x068d4…06904 Head {h00=0x002c, h01=0x0050, text=» DATA INTPL3 WORK STATION TABLE ADDRESS «, t00=0x0043, t01=0x003e}
0x06904…06928 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0043, t01=0x006e}
0x06928…06956 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0043, t01=0x0092}
0x06956…06982 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0043, t01=0x00c0}
0x06982…069a4 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0043, t01=0x00ec}
0x069a4…069d6 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0043, t01=0x010e}
0x069d6…06a06 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0043, t01=0x0140}
0x06a06…06a10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0170}
0x06a10…06a2c Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0043, t01=0x017a}
0x06a2c…06a58 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA2 START I/O OPERATION«, t00=0x0044, t01=0x0008}
0x06a58…06a8e Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA2 RELEASE RCA AND RESET INTERRUPT«, t00=0x0044, t01=0x0034}
0x06a8e…06a98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x006a}
0x06a98…06ab8 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0044, t01=0x0074}
0x06ab8…06aea Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0044, t01=0x0094}
0x06aea…06b0e Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0044, t01=0x00c6}
0x06b0e…06b36 Head {h00=0x0024, h01=0x0050, text=» DATA PL2CWT+CWTCID CID ADDRESS «, t00=0x0044, t01=0x00ea}
0x06b36…06b5a Head {h00=0x0020, h01=0x0050, text=» DATA INTLV2 INTERRUPT LEVEL«, t00=0x0044, t01=0x0112}
0x06b5a…06b90 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0044, t01=0x0136}
0x06b90…06bb4 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0044, t01=0x016c}
0x06bb4…06bdc Head {h00=0x0024, h01=0x0050, text=» DATA PL2CWT+CWTCCA CCA ADDRESS «, t00=0x0044, t01=0x0190}
0x06bdc…06c00 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0045, t01=0x0028}
0x06c00…06c28 Head {h00=0x0024, h01=0x0050, text=» DATA PL2CWT+CWTRCA RCA ADDRESS «, t00=0x0045, t01=0x004c}
0x06c28…06c50 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0045, t01=0x0074}
0x06c50…06c74 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0045, t01=0x009c}
0x06c74…06c98 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0045, t01=0x00c0}
0x06c98…06ca2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00e4}
0x06ca2…06cce Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0045, t01=0x00ee}
0x06cce…06cfe Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0045, t01=0x011a}
0x06cfe…06d36 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0045, t01=0x014a}
0x06d36…06d5e Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0045, t01=0x0182}
0x06d5e…06d86 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0046, t01=0x001a}
0x06d86…06da4 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0046, t01=0x0042}
0x06da4…06dc0 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0046, t01=0x0060}
0x06dc0…06de8 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0046, t01=0x007c}
0x06de8…06e06 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0046, t01=0x00a4}
0x06e06…06e22 Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0046, t01=0x00c2}
0x06e22…06e2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00de}
0x06e2c…06e62 Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0046, t01=0x00e8}
0x06e62…06e98 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0046, t01=0x011e}
0x06e98…06ea2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0154}
0x06ea2…06ebe Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0046, t01=0x015e}
0x06ebe…06ee6 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0046, t01=0x017a}
0x06ee6…06f0e Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0047, t01=0x0012}
0x06f0e…06f36 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0047, t01=0x003a}
0x06f36…06f40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0062}
0x06f40…06f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x006c}
0x06f4a…06f60 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x0047, t01=0x0076}
0x06f60…06f6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x008c}
0x06f6a…06f78 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x0096}
0x06f78…06f82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00a4}
0x06f82…06fa4 Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 4 «, t00=0x0047, t01=0x00ae}
0x06fa4…06fae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00d0}
0x06fae…06fc2 Head {h00=0x0010, h01=0x0050, text=»PL3CWT EQU *«, t00=0x0047, t01=0x00da}
0x06fc2…06fcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00ee}
0x06fcc…06fe0 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0047, t01=0x00f8}
0x06fe0…07000 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0047, t01=0x010c}
0x07000…07026 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0047, t01=0x012c}
0x07026…07056 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0047, t01=0x0152}
0x07056…07060 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0182}
0x07060…0707a Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0047, t01=0x018c}
0x0707a…0709a Head {h00=0x001c, h01=0x0050, text=» DATA 3 PLC NUMBER (0-3)«, t00=0x0048, t01=0x0016}
0x0709a…070cc Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0048, t01=0x0036}
0x070cc…070f2 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0048, t01=0x0068}
0x070f2…07114 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0048, t01=0x008e}
0x07114…0713c Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREA «, t00=0x0048, t01=0x00b0}
0x0713c…07146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00d8}
0x07146…0716e Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0048, t01=0x00e2}
0x0716e…071a0 Head {h00=0x002e, h01=0x0050, text=» DATA OPARL4 OPEN LINE PARAMETER AREA ADDR«, t00=0x0048, t01=0x010a}
0x071a0…071d0 Head {h00=0x002c, h01=0x0050, text=» DATA INTPL4 WORK STATION TABLE ADDRESS «, t00=0x0048, t01=0x013c}
0x071d0…071f4 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0048, t01=0x016c}
0x071f4…07222 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0048, t01=0x0190}
0x07222…0724e Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0049, t01=0x002e}
0x0724e…07270 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0049, t01=0x005a}
0x07270…072a2 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0049, t01=0x007c}
0x072a2…072d2 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0049, t01=0x00ae}
0x072d2…072dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00de}
0x072dc…072f8 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0049, t01=0x00e8}
0x072f8…07324 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA3 START I/O OPERATION«, t00=0x0049, t01=0x0104}
0x07324…0735a Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA3 RELEASE RCA AND RESET INTERRUPT«, t00=0x0049, t01=0x0130}
0x0735a…07364 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0166}
0x07364…07384 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0049, t01=0x0170}
0x07384…073b6 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0049, t01=0x0190}
0x073b6…073da Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x004a, t01=0x0032}
0x073da…07402 Head {h00=0x0024, h01=0x0050, text=» DATA PL3CWT+CWTCID CID ADDRESS «, t00=0x004a, t01=0x0056}
0x07402…07426 Head {h00=0x0020, h01=0x0050, text=» DATA INTLV3 INTERRUPT LEVEL«, t00=0x004a, t01=0x007e}
0x07426…0745c Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x004a, t01=0x00a2}
0x0745c…07480 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x004a, t01=0x00d8}
0x07480…074a8 Head {h00=0x0024, h01=0x0050, text=» DATA PL3CWT+CWTCCA CCA ADDRESS «, t00=0x004a, t01=0x00fc}
0x074a8…074cc Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x004a, t01=0x0124}
0x074cc…074f4 Head {h00=0x0024, h01=0x0050, text=» DATA PL3CWT+CWTRCA RCA ADDRESS «, t00=0x004a, t01=0x0148}
0x074f4…0751c Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x004a, t01=0x0170}
0x0751c…07540 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x004b, t01=0x0008}
0x07540…07564 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x004b, t01=0x002c}
0x07564…0756e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0050}
0x0756e…0759a Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x004b, t01=0x005a}
0x0759a…075ca Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x004b, t01=0x0086}
0x075ca…07602 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x004b, t01=0x00b6}
0x07602…0762a Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x004b, t01=0x00ee}
0x0762a…07652 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x004b, t01=0x0116}
0x07652…07670 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x004b, t01=0x013e}
0x07670…0768c Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x004b, t01=0x015c}
0x0768c…076b4 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x004b, t01=0x0178}
0x076b4…076d2 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x004c, t01=0x0010}
0x076d2…076ee Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x004c, t01=0x002e}
0x076ee…076f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x004a}
0x076f8…0772e Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x004c, t01=0x0054}
0x0772e…07764 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x004c, t01=0x008a}
0x07764…0776e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x00c0}
0x0776e…0778a Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x004c, t01=0x00ca}
0x0778a…077b2 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x004c, t01=0x00e6}
0x077b2…077da Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x004c, t01=0x010e}
0x077da…07802 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x004c, t01=0x0136}
0x07802…0780e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x015e}
0x0780e…07818 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x016a}
0x07818…07826 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x0174}
0x07826…0783c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x004c, t01=0x0182}
0x0783c…07846 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0008}
0x07846…0786e Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 5 REMOTE«, t00=0x004d, t01=0x0012}
0x0786e…07878 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x003a}
0x07878…0788c Head {h00=0x0010, h01=0x0050, text=»PR1CWT EQU *«, t00=0x004d, t01=0x0044}
0x0788c…07896 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0058}
0x07896…078aa Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x004d, t01=0x0062}
0x078aa…078ca Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x004d, t01=0x0076}
0x078ca…078f0 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x004d, t01=0x0096}
0x078f0…07920 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x004d, t01=0x00bc}
0x07920…0792a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00ec}
0x0792a…07944 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x004d, t01=0x00f6}
0x07944…07968 Head {h00=0x0020, h01=0x0050, text=» DATA 4 PLC NUMBER (4-7) =5 «, t00=0x004d, t01=0x0110}
0x07968…0799a Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x004d, t01=0x0134}
0x0799a…079c0 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x004d, t01=0x0166}
0x079c0…079e2 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x004d, t01=0x018c}
0x079e2…07a0a Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS«, t00=0x004e, t01=0x001e}
0x07a0a…07a14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0046}
0x07a14…07a3c Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x004e, t01=0x0050}
0x07a3c…07a74 Head {h00=0x0034, h01=0x0050, text=» DATA OPARR1 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x004e, t01=0x0078}
0x07a74…07aa4 Head {h00=0x002c, h01=0x0050, text=» DATA INTPR1 WORK STATION TABLE ADDRESS «, t00=0x004e, t01=0x00b0}
0x07aa4…07ac8 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x004e, t01=0x00e0}
0x07ac8…07af6 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x004e, t01=0x0104}
0x07af6…07b22 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x004e, t01=0x0132}
0x07b22…07b44 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x004e, t01=0x015e}
0x07b44…07b76 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x004e, t01=0x0180}
0x07b76…07ba6 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x004f, t01=0x0022}
0x07ba6…07bb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0052}
0x07bb0…07bcc Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x004f, t01=0x005c}
0x07bcc…07bf8 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA4 START I/O OPERATION«, t00=0x004f, t01=0x0078}
0x07bf8…07c2e Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA4 RELEASE RCA AND RESET INTERRUPT«, t00=0x004f, t01=0x00a4}
0x07c2e…07c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00da}
0x07c38…07c58 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x004f, t01=0x00e4}
0x07c58…07c8a Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x004f, t01=0x0104}
0x07c8a…07cae Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x004f, t01=0x0136}
0x07cae…07cd6 Head {h00=0x0024, h01=0x0050, text=» DATA PR1CWT+CWTCID CID ADDRESS «, t00=0x004f, t01=0x015a}
0x07cd6…07cfa Head {h00=0x0020, h01=0x0050, text=» DATA INTRV0 INTERRUPT LEVEL«, t00=0x004f, t01=0x0182}
0x07cfa…07d30 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0050, t01=0x0016}
0x07d30…07d54 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0050, t01=0x004c}
0x07d54…07d7c Head {h00=0x0024, h01=0x0050, text=» DATA PR1CWT+CWTCCA CCA ADDRESS «, t00=0x0050, t01=0x0070}
0x07d7c…07da0 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0050, t01=0x0098}
0x07da0…07dc8 Head {h00=0x0024, h01=0x0050, text=» DATA PR1CWT+CWTRCA RCA ADDRESS «, t00=0x0050, t01=0x00bc}
0x07dc8…07df0 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0050, t01=0x00e4}
0x07df0…07e14 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0050, t01=0x010c}
0x07e14…07e38 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0050, t01=0x0130}
0x07e38…07e42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0154}
0x07e42…07e6e Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0050, t01=0x015e}
0x07e6e…07e9e Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0050, t01=0x018a}
0x07e9e…07ed6 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0051, t01=0x002a}
0x07ed6…07efe Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0051, t01=0x0062}
0x07efe…07f26 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0051, t01=0x008a}
0x07f26…07f44 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0051, t01=0x00b2}
0x07f44…07f60 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0051, t01=0x00d0}
0x07f60…07f88 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0051, t01=0x00ec}
0x07f88…07fa6 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0051, t01=0x0114}
0x07fa6…07fc2 Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0051, t01=0x0132}
0x07fc2…07fcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x014e}
0x07fcc…08002 Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0051, t01=0x0158}
0x08002…08038 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0051, t01=0x018e}
0x08038…08042 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0034}
0x08042…0805e Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0052, t01=0x003e}
0x0805e…08086 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0052, t01=0x005a}
0x08086…080ae Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0052, t01=0x0082}
0x080ae…080d6 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0052, t01=0x00aa}
0x080d6…080e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00d2}
0x080e0…080ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00dc}
0x080ea…080f8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x00e6}
0x080f8…0810e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0052, t01=0x00f4}
0x0810e…08118 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x010a}
0x08118…08140 Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 6 REMOTE«, t00=0x0052, t01=0x0114}
0x08140…0814a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x013c}
0x0814a…0815e Head {h00=0x0010, h01=0x0050, text=»PR2CWT EQU *«, t00=0x0052, t01=0x0146}
0x0815e…08168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x015a}
0x08168…0817c Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0052, t01=0x0164}
0x0817c…0819c Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0052, t01=0x0178}
0x0819c…081c2 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0053, t01=0x0008}
0x081c2…081f2 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0053, t01=0x002e}
0x081f2…081fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x005e}
0x081fc…08216 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0053, t01=0x0068}
0x08216…0823a Head {h00=0x0020, h01=0x0050, text=» DATA 5 PLC NUMBER (4-7) =5 «, t00=0x0053, t01=0x0082}
0x0823a…0826c Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0053, t01=0x00a6}
0x0826c…08292 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0053, t01=0x00d8}
0x08292…082b6 Head {h00=0x0020, h01=0x0050, text=» DATA 0 LINE NO INDICATOR =5«, t00=0x0053, t01=0x00fe}
0x082b6…082e2 Head {h00=0x0028, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS =5 «, t00=0x0053, t01=0x0122}
0x082e2…082ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x014e}
0x082ec…08314 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0053, t01=0x0158}
0x08314…0834c Head {h00=0x0034, h01=0x0050, text=» DATA OPARR2 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x0053, t01=0x0180}
0x0834c…0837c Head {h00=0x002c, h01=0x0050, text=» DATA INTPR2 WORK STATION TABLE ADDRESS «, t00=0x0054, t01=0x0028}
0x0837c…083a0 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0054, t01=0x0058}
0x083a0…083ce Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0054, t01=0x007c}
0x083ce…083fa Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0054, t01=0x00aa}
0x083fa…0841c Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0054, t01=0x00d6}
0x0841c…0844e Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0054, t01=0x00f8}
0x0844e…0847e Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0054, t01=0x012a}
0x0847e…08488 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x015a}
0x08488…084a4 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0054, t01=0x0164}
0x084a4…084d0 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA5 START I/O OPERATION«, t00=0x0054, t01=0x0180}
0x084d0…08506 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA5 RELEASE RCA AND RESET INTERRUPT«, t00=0x0055, t01=0x001c}
0x08506…08510 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0052}
0x08510…08530 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0055, t01=0x005c}
0x08530…08562 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0055, t01=0x007c}
0x08562…08586 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0055, t01=0x00ae}
0x08586…085ae Head {h00=0x0024, h01=0x0050, text=» DATA PR2CWT+CWTCID CID ADDRESS «, t00=0x0055, t01=0x00d2}
0x085ae…085d2 Head {h00=0x0020, h01=0x0050, text=» DATA INTRV1 INTERRUPT LEVEL«, t00=0x0055, t01=0x00fa}
0x085d2…08608 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0055, t01=0x011e}
0x08608…0862c Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0055, t01=0x0154}
0x0862c…08654 Head {h00=0x0024, h01=0x0050, text=» DATA PR2CWT+CWTCCA CCA ADDRESS «, t00=0x0055, t01=0x0178}
0x08654…08678 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0056, t01=0x0010}
0x08678…086a0 Head {h00=0x0024, h01=0x0050, text=» DATA PR2CWT+CWTRCA RCA ADDRESS «, t00=0x0056, t01=0x0034}
0x086a0…086c8 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0056, t01=0x005c}
0x086c8…086ec Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0056, t01=0x0084}
0x086ec…08710 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0056, t01=0x00a8}
0x08710…0871a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00cc}
0x0871a…08746 Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0056, t01=0x00d6}
0x08746…08776 Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0056, t01=0x0102}
0x08776…087ae Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0056, t01=0x0132}
0x087ae…087d6 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0056, t01=0x016a}
0x087d6…087fe (87, 0, 400) Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0057, t01=0x0004}
0x087fe…0881c Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0057, t01=0x002c}
0x0881c…08838 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0057, t01=0x004a}
0x08838…08860 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0057, t01=0x0066}
0x08860…0887e Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0057, t01=0x008e}
0x0887e…0889a Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0057, t01=0x00ac}
0x0889a…088a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00c8}
0x088a4…088da Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0057, t01=0x00d2}
0x088da…08910 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0057, t01=0x0108}
0x08910…0891a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x013e}
0x0891a…08936 Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0057, t01=0x0148}
0x08936…0895e Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0057, t01=0x0164}
0x0895e…08986 Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0057, t01=0x018c}
0x08986…089ae Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0058, t01=0x0024}
0x089ae…089b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x004c}
0x089b8…089c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0056}
0x089c2…089d0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0058, t01=0x0060}
0x089d0…089e6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0058, t01=0x006e}
0x089e6…089f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0084}
0x089f0…08a18 Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 7 REMOTE«, t00=0x0058, t01=0x008e}
0x08a18…08a22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00b6}
0x08a22…08a36 Head {h00=0x0010, h01=0x0050, text=»PR3CWT EQU *«, t00=0x0058, t01=0x00c0}
0x08a36…08a40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00d4}
0x08a40…08a54 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0058, t01=0x00de}
0x08a54…08a74 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0058, t01=0x00f2}
0x08a74…08a9a Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0058, t01=0x0112}
0x08a9a…08aca Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0058, t01=0x0138}
0x08aca…08ad4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0168}
0x08ad4…08aee Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0058, t01=0x0172}
0x08aee…08b12 Head {h00=0x0020, h01=0x0050, text=» DATA 6 PLC NUMBER (4-7) =5 «, t00=0x0058, t01=0x018c}
0x08b12…08b44 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0059, t01=0x0020}
0x08b44…08b6a Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0059, t01=0x0052}
0x08b6a…08b8c Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0059, t01=0x0078}
0x08b8c…08bb4 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS«, t00=0x0059, t01=0x009a}
0x08bb4…08bbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00c2}
0x08bbe…08be6 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0059, t01=0x00cc}
0x08be6…08c1e Head {h00=0x0034, h01=0x0050, text=» DATA OPARR3 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x0059, t01=0x00f4}
0x08c1e…08c4e Head {h00=0x002c, h01=0x0050, text=» DATA INTPR3 WORK STATION TABLE ADDRESS «, t00=0x0059, t01=0x012c}
0x08c4e…08c72 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0059, t01=0x015c}
0x08c72…08ca0 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0059, t01=0x0180}
0x08ca0…08ccc Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x005a, t01=0x001e}
0x08ccc…08cee Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x005a, t01=0x004a}
0x08cee…08d20 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x005a, t01=0x006c}
0x08d20…08d50 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x005a, t01=0x009e}
0x08d50…08d5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00ce}
0x08d5a…08d76 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x005a, t01=0x00d8}
0x08d76…08da2 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA6 START I/O OPERATION«, t00=0x005a, t01=0x00f4}
0x08da2…08dd8 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA6 RELEASE RCA AND RESET INTERRUPT«, t00=0x005a, t01=0x0120}
0x08dd8…08de2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0156}
0x08de2…08e02 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x005a, t01=0x0160}
0x08e02…08e34 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x005a, t01=0x0180}
0x08e34…08e58 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x005b, t01=0x0022}
0x08e58…08e80 Head {h00=0x0024, h01=0x0050, text=» DATA PR3CWT+CWTCID CID ADDRESS «, t00=0x005b, t01=0x0046}
0x08e80…08ea4 Head {h00=0x0020, h01=0x0050, text=» DATA INTRV2 INTERRUPT LEVEL«, t00=0x005b, t01=0x006e}
0x08ea4…08eda Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x005b, t01=0x0092}
0x08eda…08efe Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x005b, t01=0x00c8}
0x08efe…08f26 Head {h00=0x0024, h01=0x0050, text=» DATA PR3CWT+CWTCCA CCA ADDRESS «, t00=0x005b, t01=0x00ec}
0x08f26…08f4a Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x005b, t01=0x0114}
0x08f4a…08f72 Head {h00=0x0024, h01=0x0050, text=» DATA PR3CWT+CWTRCA RCA ADDRESS «, t00=0x005b, t01=0x0138}
0x08f72…08f9a Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x005b, t01=0x0160}
0x08f9a…08fbe Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x005b, t01=0x0188}
0x08fbe…08fe2 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x005c, t01=0x001c}
0x08fe2…08fec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0040}
0x08fec…09018 Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x005c, t01=0x004a}
0x09018…09048 Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x005c, t01=0x0076}
0x09048…09080 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x005c, t01=0x00a6}
0x09080…090a8 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x005c, t01=0x00de}
0x090a8…090d0 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x005c, t01=0x0106}
0x090d0…090ee Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x005c, t01=0x012e}
0x090ee…0910a Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x005c, t01=0x014c}
0x0910a…09132 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x005c, t01=0x0168}
0x09132…09150 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x005c, t01=0x0190}
0x09150…0916c Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x005d, t01=0x001e}
0x0916c…09176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x003a}
0x09176…091ac Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x005d, t01=0x0044}
0x091ac…091e2 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x005d, t01=0x007a}
0x091e2…091ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00b0}
0x091ec…09208 Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x005d, t01=0x00ba}
0x09208…09230 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x005d, t01=0x00d6}
0x09230…09258 Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x005d, t01=0x00fe}
0x09258…09280 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x005d, t01=0x0126}
0x09280…0928a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x014e}
0x0928a…09294 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0158}
0x09294…092a2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005d, t01=0x0162}
0x092a2…092b8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x005d, t01=0x0170}
0x092b8…092c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0186}
0x092c2…092ea Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 8 REMOTE«, t00=0x005d, t01=0x0190}
0x092ea…092f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0028}
0x092f4…09308 Head {h00=0x0010, h01=0x0050, text=»PR4CWT EQU *«, t00=0x005e, t01=0x0032}
0x09308…09312 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0046}
0x09312…09326 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x005e, t01=0x0050}
0x09326…09346 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x005e, t01=0x0064}
0x09346…0936c Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x005e, t01=0x0084}
0x0936c…0939c Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x005e, t01=0x00aa}
0x0939c…093a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x00da}
0x093a6…093c0 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x005e, t01=0x00e4}
0x093c0…093e4 Head {h00=0x0020, h01=0x0050, text=» DATA 7 PLC NUMBER (4-7) =5 «, t00=0x005e, t01=0x00fe}
0x093e4…09416 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x005e, t01=0x0122}
0x09416…0943c Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x005e, t01=0x0154}
0x0943c…0945e Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x005e, t01=0x017a}
0x0945e…09486 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS«, t00=0x005f, t01=0x000c}
0x09486…09490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0034}
0x09490…094b8 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x005f, t01=0x003e}
0x094b8…094f0 Head {h00=0x0034, h01=0x0050, text=» DATA OPARR4 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x005f, t01=0x0066}
0x094f0…09520 Head {h00=0x002c, h01=0x0050, text=» DATA INTPR4 WORK STATION TABLE ADDRESS «, t00=0x005f, t01=0x009e}
0x09520…09544 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x005f, t01=0x00ce}
0x09544…09572 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x005f, t01=0x00f2}
0x09572…0959e Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x005f, t01=0x0120}
0x0959e…095c0 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x005f, t01=0x014c}
0x095c0…095f2 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x005f, t01=0x016e}
0x095f2…09622 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0060, t01=0x0010}
0x09622…0962c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0040}
0x0962c…09648 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0060, t01=0x004a}
0x09648…09674 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA7 START I/O OPERATION«, t00=0x0060, t01=0x0066}
0x09674…096aa Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA7 RELEASE RCA AND RESET INTERRUPT«, t00=0x0060, t01=0x0092}
0x096aa…096b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x00c8}
0x096b4…096d4 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0060, t01=0x00d2}
0x096d4…09706 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0060, t01=0x00f2}
0x09706…0972a Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0060, t01=0x0124}
0x0972a…09752 Head {h00=0x0024, h01=0x0050, text=» DATA PR4CWT+CWTCID CID ADDRESS «, t00=0x0060, t01=0x0148}
0x09752…09776 Head {h00=0x0020, h01=0x0050, text=» DATA INTRV3 INTERRUPT LEVEL«, t00=0x0060, t01=0x0170}
0x09776…097ac (97, 0, 400) Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0061, t01=0x0004}
0x097ac…097d0 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0061, t01=0x003a}
0x097d0…097f8 Head {h00=0x0024, h01=0x0050, text=» DATA PR4CWT+CWTCCA CCA ADDRESS «, t00=0x0061, t01=0x005e}
0x097f8…0981c Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0061, t01=0x0086}
0x0981c…09844 Head {h00=0x0024, h01=0x0050, text=» DATA PR4CWT+CWTRCA RCA ADDRESS «, t00=0x0061, t01=0x00aa}
0x09844…0986c Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0061, t01=0x00d2}
0x0986c…09890 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0061, t01=0x00fa}
0x09890…098b4 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0061, t01=0x011e}
0x098b4…098be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0142}
0x098be…098ea Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0061, t01=0x014c}
0x098ea…0991a Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0061, t01=0x0178}
0x0991a…09952 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0062, t01=0x0018}
0x09952…0997a Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0062, t01=0x0050}
0x0997a…099a2 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0062, t01=0x0078}
0x099a2…099c0 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0062, t01=0x00a0}
0x099c0…099dc Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0062, t01=0x00be}
0x099dc…09a04 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0062, t01=0x00da}
0x09a04…09a22 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0062, t01=0x0102}
0x09a22…09a3e Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0062, t01=0x0120}
0x09a3e…09a48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x013c}
0x09a48…09a7e Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0062, t01=0x0146}
0x09a7e…09ab4 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0062, t01=0x017c}
0x09ab4…09abe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0022}
0x09abe…09ada Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0063, t01=0x002c}
0x09ada…09b02 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0063, t01=0x0048}
0x09b02…09b2a Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0063, t01=0x0070}
0x09b2a…09b52 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0063, t01=0x0098}
0x09b52…09b5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00c0}
0x09b5c…09b66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00ca}
0x09b66…09b72 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x00d4}
0x09b72…09b80 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x00e0}
0x09b80…09b8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00ee}
0x09b8a…09bb4 Head {h00=0x0026, h01=0x0050, text=»* I/O COMPLETION DISPATCH TABLE«, t00=0x0063, t01=0x00f8}
0x09bb4…09bbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0122}
0x09bbe…09bf4 Head {h00=0x0032, h01=0x0050, text=»* THE MOST FREQUENTLY USED ROUTINES ARE PLACED«, t00=0x0063, t01=0x012c}
0x09bf4…09c28 Head {h00=0x0030, h01=0x0050, text=»* AT THE END OF THE TABLE, AS IT IS SCANNED «, t00=0x0063, t01=0x0162}
0x09c28…09c40 Head {h00=0x0014, h01=0x0050, text=»* FROM THE END. «, t00=0x0064, t01=0x0008}
0x09c40…09c4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0020}
0x09c4a…09c5e Head {h00=0x0010, h01=0x0050, text=»CMDTAB EQU *«, t00=0x0064, t01=0x002a}
0x09c5e…09c92 Head {h00=0x0030, h01=0x0050, text=» DATA CMDTC COMMAND CODE "TEST CHANNEL UNIT"«, t00=0x0064, t01=0x003e}
0x09c92…09ccc Head {h00=0x0036, h01=0x0050, text=» DATA COMPTC START OF "TEST CU" COMPLETION ROUTINE«, t00=0x0064, t01=0x0072}
0x09ccc…09d00 Head {h00=0x0030, h01=0x0050, text=» DATA 0 ALLOWED STATUS FOR "TEST CU" COMMAND«, t00=0x0064, t01=0x00ac}
0x09d00…09d30 Head {h00=0x002c, h01=0x0050, text=»CMDTB1 EQU *-CMDTAB LENGTH OF ONE ENTRY «, t00=0x0064, t01=0x00e0}
0x09d30…09d4e Head {h00=0x001a, h01=0x0050, text=» DATA CMDOP OPEN LINE «, t00=0x0064, t01=0x0110}
0x09d4e…09d62 Head {h00=0x0010, h01=0x0050, text=» DATA COMPOP«, t00=0x0064, t01=0x012e}
0x09d62…09d72 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0064, t01=0x0142}
0x09d72…09d8e Head {h00=0x0018, h01=0x0050, text=» DATA CMDOD OPEN DLS«, t00=0x0064, t01=0x0152}
0x09d8e…09da2 Head {h00=0x0010, h01=0x0050, text=» DATA COMPOD«, t00=0x0064, t01=0x016e}
0x09da2…09dbe Head {h00=0x0018, h01=0x0050, text=» DATA STADNO+STANOC «, t00=0x0064, t01=0x0182}
0x09dbe…09dd4 Head {h00=0x0012, h01=0x0050, text=» IFT PLCTST=1 «, t00=0x0065, t01=0x000e}
0x09dd4…09dfc Head {h00=0x0024, h01=0x0050, text=» DATA CMDPS GET LINE STATISTICS «, t00=0x0065, t01=0x0024}
0x09dfc…09e10 Head {h00=0x0010, h01=0x0050, text=» DATA COMPPS«, t00=0x0065, t01=0x004c}
0x09e10…09e36 Head {h00=0x0022, h01=0x0050, text=»STAE2 EQU STAREQ+STAILL DUMMY «, t00=0x0065, t01=0x0060}
0x09e36…09e5c Head {h00=0x0022, h01=0x0050, text=»STAE3 EQU STASEQ+STANOB DUMMY «, t00=0x0065, t01=0x0086}
0x09e5c…09e76 Head {h00=0x0016, h01=0x0050, text=» DATA STAE2+STAE3 «, t00=0x0065, t01=0x00ac}
0x09e76…09e9c Head {h00=0x0022, h01=0x0050, text=» DATA CMDDS GET DLS STATISTICS«, t00=0x0065, t01=0x00c6}
0x09e9c…09eb0 Head {h00=0x0010, h01=0x0050, text=» DATA COMPDS«, t00=0x0065, t01=0x00ec}
0x09eb0…09eca Head {h00=0x0016, h01=0x0050, text=» DATA STAE2+STAE3 «, t00=0x0065, t01=0x0100}
0x09eca…09ef0 Head {h00=0x0022, h01=0x0050, text=» DATA CMDRM READ LOCAL MEMORY «, t00=0x0065, t01=0x011a}
0x09ef0…09f04 Head {h00=0x0010, h01=0x0050, text=» DATA COMPRM«, t00=0x0065, t01=0x0140}
0x09f04…09f18 Head {h00=0x0010, h01=0x0050, text=» DATA STAE2 «, t00=0x0065, t01=0x0154}
0x09f18…09f22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0168}
0x09f22…09f30 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0065, t01=0x0172}
0x09f30…09f3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0180}
0x09f3a…09f46 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0065, t01=0x018a}
0x09f46…09f68 Head {h00=0x001e, h01=0x0050, text=» DATA CMDSW STANDARD WRITE«, t00=0x0066, t01=0x0008}
0x09f68…09f7c Head {h00=0x0010, h01=0x0050, text=» DATA COMPSW«, t00=0x0066, t01=0x002a}
0x09f7c…09f90 Head {h00=0x0010, h01=0x0050, text=» DATA STAERR«, t00=0x0066, t01=0x003e}
0x09f90…09fae Head {h00=0x001a, h01=0x0050, text=» DATA CMDFW FAST WRITE«, t00=0x0066, t01=0x0052}
0x09fae…09fc2 Head {h00=0x0010, h01=0x0050, text=» DATA COMPFW«, t00=0x0066, t01=0x0070}
0x09fc2…09fd6 Head {h00=0x0010, h01=0x0050, text=» DATA STAERR«, t00=0x0066, t01=0x0084}
0x09fd6…09ff6 Head {h00=0x001c, h01=0x0050, text=» DATA CMDGR GENERAL READ«, t00=0x0066, t01=0x0098}
0x09ff6…0a00a Head {h00=0x0010, h01=0x0050, text=» DATA COMPGR«, t00=0x0066, t01=0x00b8}
0x0a00a…0a01a Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0066, t01=0x00cc}
0x0a01a…0a042 Head {h00=0x0024, h01=0x0050, text=»CMDTBL EQU *-CMDTAB TABLE LENGTH«, t00=0x0066, t01=0x00dc}
0x0a042…0a04c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0104}
0x0a04c…0a05a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0066, t01=0x010e}
0x0a05a…0a064 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x011c}
0x0a064…0a090 Head {h00=0x0028, h01=0x0050, text=»* READ COMPLETION DISPATCH TABLE «, t00=0x0066, t01=0x0126}
0x0a090…0a09a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0152}
0x0a09a…0a0d0 Head {h00=0x0032, h01=0x0050, text=»* THIS TABLE IS INDEXED BY THE "MESSAGE TYPE" «, t00=0x0066, t01=0x015c}
0x0a0d0…0a0f2 (103, 0, 400) Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS DEFINED ABOVE.«, t00=0x0067, t01=0x0004}
0x0a0f2…0a106 Head {h00=0x0010, h01=0x0050, text=»REAROU EQU *«, t00=0x0067, t01=0x0026}
0x0a106…0a128 Head {h00=0x001e, h01=0x0050, text=» DATA GRERR1 ERROR ROUTINE«, t00=0x0067, t01=0x003a}
0x0a128…0a162 Head {h00=0x0036, h01=0x0050, text=» DATA GRERR1 DATA PACKET NO FLOW C. (NOT IMPLEM.) «, t00=0x0067, t01=0x005c}
0x0a162…0a190 Head {h00=0x002a, h01=0x0050, text=» DATA GRSTAT DEVICE STATUS DATA PACKET«, t00=0x0067, t01=0x0096}
0x0a190…0a1b8 Head {h00=0x0024, h01=0x0050, text=» DATA GRDATA NORMAL DATA PACKET «, t00=0x0067, t01=0x00c4}
0x0a1b8…0a1e0 Head {h00=0x0024, h01=0x0050, text=» DATA GRRR RECIEVE READY PACKET «, t00=0x0067, t01=0x00ec}
0x0a1e0…0a200 Head {h00=0x001c, h01=0x0050, text=» DATA GRRES RESET PACKET«, t00=0x0067, t01=0x0114}
0x0a200…0a238 Head {h00=0x0034, h01=0x0050, text=» DATA GRERR1 RESET CONFIRM. PACKET (NOT IMPLEM.)«, t00=0x0067, t01=0x0134}
0x0a238…0a242 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x016c}
0x0a242…0a24c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0176}
0x0a24c…0a278 Head {h00=0x0028, h01=0x0050, text=»* WRITE COMPLETION DISPATCH TABLE«, t00=0x0067, t01=0x0180}
0x0a278…0a282 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x001c}
0x0a282…0a2b8 Head {h00=0x0032, h01=0x0050, text=»* THIS TABLE IS INDEXED BY THE "MESSAGE TYPE" «, t00=0x0068, t01=0x0026}
0x0a2b8…0a2da Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS DEFINED ABOVE.«, t00=0x0068, t01=0x005c}
0x0a2da…0a2ee Head {h00=0x0010, h01=0x0050, text=»WRIROU EQU *«, t00=0x0068, t01=0x007e}
0x0a2ee…0a310 Head {h00=0x001e, h01=0x0050, text=» DATA WRERR ERROR ROUTINE «, t00=0x0068, t01=0x0092}
0x0a310…0a346 Head {h00=0x0032, h01=0x0050, text=» DATA WRNFLO DATA PACKET WITHOUT FLOW CONTROL «, t00=0x0068, t01=0x00b4}
0x0a346…0a37c Head {h00=0x0032, h01=0x0050, text=» DATA WRERR DEVICE STATUS DATA (NOT RELEVANT) «, t00=0x0068, t01=0x00ea}
0x0a37c…0a3a4 Head {h00=0x0024, h01=0x0050, text=» DATA WRDATA NORMAL DATA PACKET «, t00=0x0068, t01=0x0120}
0x0a3a4…0a3cc Head {h00=0x0024, h01=0x0050, text=» DATA WRRR RECIEVE READY PACKET «, t00=0x0068, t01=0x0148}
0x0a3cc…0a3fe Head {h00=0x002e, h01=0x0050, text=» DATA WRERR RESET PACKET (NOT IMPLEMENTED)«, t00=0x0068, t01=0x0170}
0x0a3fe…0a42c Head {h00=0x002a, h01=0x0050, text=» DATA WRRESC RESET CONFIRMATION PACKET«, t00=0x0069, t01=0x0012}
0x0a42c…0a436 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0040}
0x0a436…0a444 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0069, t01=0x004a}
0x0a444…0a44e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0058}
0x0a44e…0a46a Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0069, t01=0x0062}
0x0a46a…0a486 Head {h00=0x0018, h01=0x0050, text=»* REQUEST ROUTINES *«, t00=0x0069, t01=0x007e}
0x0a486…0a4a2 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0069, t01=0x009a}
0x0a4a2…0a4ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00b6}
0x0a4ac…0a4e8 Head {h00=0x0038, h01=0x0050, text=»* THIS SECTION CONTAINS REQUEST HANDLING ROUTINES.«, t00=0x0069, t01=0x00c0}
0x0a4e8…0a522 Head {h00=0x0036, h01=0x0050, text=»* THE REQUEST ROUTINES ARE CALLED FROM TERMINAL «, t00=0x0069, t01=0x00fc}
0x0a522…0a55c Head {h00=0x0036, h01=0x0050, text=»* DEVICE DRIVERS. THIS IS NORMALLY DONE THROUGH «, t00=0x0069, t01=0x0136}
0x0a55c…0a59a Head {h00=0x003a, h01=0x0050, text=»* THE TERMINAL NETWORK DISTRIBUTOR DRIVER (DRND01). «, t00=0x0069, t01=0x0170}
0x0a59a…0a5d0 Head {h00=0x0032, h01=0x0050, text=»* THE DISTRIBUTOR DRIVER WILL SWITCH CALL TO«, t00=0x006a, t01=0x001e}
0x0a5d0…0a60a Head {h00=0x0036, h01=0x0050, text=»* CONNECTED LINE DRIVER. RETURN IS MADE DIRECTLY«, t00=0x006a, t01=0x0054}
0x0a60a…0a642 Head {h00=0x0034, h01=0x0050, text=»* FROM THIS DRIVER TO TERMINAL DEVICE DRIVER. «, t00=0x006a, t01=0x008e}
0x0a642…0a67c Head {h00=0x0036, h01=0x0050, text=»* A CALL WILL NORMALLY RESULT IN A WAIT FOR SOME«, t00=0x006a, t01=0x00c6}
0x0a67c…0a6b8 Head {h00=0x0038, h01=0x0050, text=»* I/O ACTION AND DISPATCHING. THIS MEANS, THAT AT «, t00=0x006a, t01=0x0100}
0x0a6b8…0a6f4 Head {h00=0x0038, h01=0x0050, text=»* TIME OF CALL THE DEVICE DRIVER MAY NOT HAVE ANY «, t00=0x006a, t01=0x013c}
0x0a6f4…0a716 Head {h00=0x001e, h01=0x0050, text=»* DATA ON THE A15 STACK.«, t00=0x006a, t01=0x0178}
0x0a716…0a720 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x000a}
0x0a720…0a754 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x006b, t01=0x0014}
0x0a754…0a75e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0048}
0x0a75e…0a776 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x006b, t01=0x0052}
0x0a776…0a780 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x006a}
0x0a780…0a7a8 Head {h00=0x0024, h01=0x0050, text=»* PLCHRI INPUT OF ONE CHARACTER «, t00=0x006b, t01=0x0074}
0x0a7a8…0a7d6 Head {h00=0x002a, h01=0x0050, text=»* PLSTBL DEFINE START OF OUTPUT BLOCK «, t00=0x006b, t01=0x009c}
0x0a7d6…0a7fe Head {h00=0x0024, h01=0x0050, text=»* PLCHRO OUTPUT OF ONE CHARACTER«, t00=0x006b, t01=0x00ca}
0x0a7fe…0a82a Head {h00=0x0028, h01=0x0050, text=»* PLENBL DEFINE END OF OUTPUT BLOCK «, t00=0x006b, t01=0x00f2}
0x0a82a…0a854 Head {h00=0x0026, h01=0x0050, text=»* PLTEST PERFORM PLC TEST FUNCTION«, t00=0x006b, t01=0x011e}
0x0a854…0a85e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0148}
0x0a85e…0a86c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006b, t01=0x0152}
0x0a86c…0a876 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0160}
0x0a876…0a8ba Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x006b, t01=0x016a}
0x0a8ba…0a8c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x001e}
0x0a8c4…0a8dc Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x006c, t01=0x0028}
0x0a8dc…0a8ec Head {h00=0x000c, h01=0x0050, text=»* PLCHRI«, t00=0x006c, t01=0x0040}
0x0a8ec…0a8f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0050}
0x0a8f6…0a90a Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x006c, t01=0x005a}
0x0a90a…0a940 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE FETCHES ONE CHARACTER FROM THE «, t00=0x006c, t01=0x006e}
0x0a940…0a978 Head {h00=0x0034, h01=0x0050, text=»* INPUT BUFFER. IF NO BUFFER HAS ARRIVED, "INPUT«, t00=0x006c, t01=0x00a4}
0x0a978…0a9ac Head {h00=0x0030, h01=0x0050, text=»* REQUESTED" FLAG IN DWT IS SET, AND CALLING«, t00=0x006c, t01=0x00dc}
0x0a9ac…0a9e2 Head {h00=0x0032, h01=0x0050, text=»* PROCESS IS SUSPENDED UNTIL A BUFFER ARRIVES.«, t00=0x006c, t01=0x0110}
0x0a9e2…0a9ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0146}
0x0a9ec…0a9fc Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x006c, t01=0x0150}
0x0a9fc…0aa14 Head {h00=0x0014, h01=0x0050, text=»* ABI INPTAB,A1 «, t00=0x006c, t01=0x0160}
0x0aa14…0aa2a Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLCHRI«, t00=0x006c, t01=0x0178}
0x0aa2a…0aa34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x018e}
0x0aa34…0aa44 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x006d, t01=0x0008}
0x0aa44…0aa60 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x006d, t01=0x0018}
0x0aa60…0aa6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0034}
0x0aa6a…0aa7c Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x006d, t01=0x003e}
0x0aa7c…0aaa0 Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x006d, t01=0x0050}
0x0aaa0…0aac2 Head {h00=0x001e, h01=0x0050, text=»* A1 = BITS 0-14 CHANGED«, t00=0x006d, t01=0x0074}
0x0aac2…0aaee Head {h00=0x0028, h01=0x0050, text=»* BIT 15 1 IF MORE CHAR IN BUFFER «, t00=0x006d, t01=0x0096}
0x0aaee…0ab0c Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x006d, t01=0x00c2}
0x0ab0c…0ab2c Head {h00=0x001c, h01=0x0050, text=»* BITS 8-15 CHARACTER «, t00=0x006d, t01=0x00e0}
0x0ab2c…0ab46 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x006d, t01=0x0100}
0x0ab46…0ab50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x011a}
0x0ab50…0ab94 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x006d, t01=0x0124}
0x0ab94…0ab9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0168}
0x0ab9e…0abb2 Head {h00=0x0010, h01=0x0050, text=»PLCHRI EQU *«, t00=0x006d, t01=0x0172}
0x0abb2…0abc6 Head {h00=0x0010, h01=0x0050, text=»PRCHRI EQU *«, t00=0x006d, t01=0x0186}
0x0abc6…0abe2 Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 PUSH A4 «, t00=0x006e, t01=0x000a}
0x0abe2…0ac0e Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTLD1,A6 INPUT TEXT WAITING?«, t00=0x006e, t01=0x0026}
0x0ac0e…0ac34 Head {h00=0x0022, h01=0x0050, text=» RF(Z) CI100 NO, WAIT FOR TEXT«, t00=0x006e, t01=0x0052}
0x0ac34…0ac3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0078}
0x0ac3e…0ac4c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006e, t01=0x0082}
0x0ac4c…0ac56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0090}
0x0ac56…0ac86 Head {h00=0x002c, h01=0x0050, text=» CF A15,PLGECH GET CHARACTER FROM BUFFER«, t00=0x006e, t01=0x009a}
0x0ac86…0acac Head {h00=0x0022, h01=0x0050, text=» LDR A1,A1 CHECK RETURN STATUS«, t00=0x006e, t01=0x00ca}
0x0acac…0acdc Head {h00=0x002c, h01=0x0050, text=» RF(N) CI100 BUFFER EMPTY, WAIT FOR NEXT«, t00=0x006e, t01=0x00f0}
0x0acdc…0acf8 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x006e, t01=0x0120}
0x0acf8…0ad22 Head {h00=0x0026, h01=0x0050, text=» RF CI110 RETURN TO DEVICE DRIVER «, t00=0x006e, t01=0x013c}
0x0ad22…0ad2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0166}
0x0ad2c…0ad36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0170}
0x0ad36…0ad4a Head {h00=0x0010, h01=0x0050, text=»CI100 EQU * «, t00=0x006e, t01=0x017a}
0x0ad4a…0ad66 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x006e, t01=0x018e}
0x0ad66…0ad94 Head {h00=0x002a, h01=0x0050, text=» LDK A2,DWFINP FLAG "INPUT REQUESTED" «, t00=0x006f, t01=0x001a}
0x0ad94…0adc8 Head {h00=0x0030, h01=0x0050, text=» ORS A2,DWTST,A6 SET INPUT REQUESTED IN DWT «, t00=0x006f, t01=0x0048}
0x0adc8…0adf8 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x006f, t01=0x007c}
0x0adf8…0ae1c Head {h00=0x0020, h01=0x0050, text=» ABL PLDISP LOCAL DISPATCHER«, t00=0x006f, t01=0x00ac}
0x0ae1c…0ae26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00d0}
0x0ae26…0ae30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00da}
0x0ae30…0ae6e Head {h00=0x003a, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN A NEW BUFFER HAS ARRIVED «, t00=0x006f, t01=0x00e4}
0x0ae6e…0ae90 Head {h00=0x001e, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x006f, t01=0x0122}
0x0ae90…0aec0 Head {h00=0x002c, h01=0x0050, text=»* A1 = NR OF CHARACTERS LEFT IN BUFFER «, t00=0x006f, t01=0x0144}
0x0aec0…0aede Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x006f, t01=0x0174}
0x0aede…0aefe (112, 0, 398) Head {h00=0x001c, h01=0x0050, text=»* BITS 8-15 CHARACTER «, t00=0x0070, t01=0x0004}
0x0aefe…0af1c Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0070, t01=0x0024}
0x0af1c…0af38 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0070, t01=0x0042}
0x0af38…0af42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x005e}
0x0af42…0af56 Head {h00=0x0010, h01=0x0050, text=»INPRST EQU *«, t00=0x0070, t01=0x0068}
0x0af56…0af8c Head {h00=0x0032, h01=0x0050, text=» LDKL A3,/FFFF-DWFINP MASK FOR INPUT REQUESTED«, t00=0x0070, t01=0x007c}
0x0af8c…0afb0 Head {h00=0x0020, h01=0x0050, text=» ANS A3,DWTST,A6 RESET FLAG «, t00=0x0070, t01=0x00b2}
0x0afb0…0afdc Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTLD1,A6 LINK BUFFER TO DWT «, t00=0x0070, t01=0x00d6}
0x0afdc…0afe6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0102}
0x0afe6…0b016 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDGET8 GET A3-A5, A7-A8 FROM DWT«, t00=0x0070, t01=0x010c}
0x0b016…0b020 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x013c}
0x0b020…0b02e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0070, t01=0x0146}
0x0b02e…0b038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0154}
0x0b038…0b04c Head {h00=0x0010, h01=0x0050, text=»CI110 EQU * «, t00=0x0070, t01=0x015e}
0x0b04c…0b070 Head {h00=0x0020, h01=0x0050, text=»* RETURN TO DEVICE DRIVER«, t00=0x0070, t01=0x0172}
0x0b070…0b09c Head {h00=0x0028, h01=0x0050, text=» LDR A1,A1 ANY CHAR LEFT IN BUFFER? «, t00=0x0071, t01=0x0008}
0x0b09c…0b0be Head {h00=0x001e, h01=0x0050, text=» RF(Z) CI120 NO, CONTINUE «, t00=0x0071, t01=0x0034}
0x0b0be…0b0e8 Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 INDICATE MORE CHARACTERS«, t00=0x0071, t01=0x0056}
0x0b0e8…0b0fa Head {h00=0x000e, h01=0x0050, text=» RF CI130 «, t00=0x0071, t01=0x0080}
0x0b0fa…0b104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0092}
0x0b104…0b118 Head {h00=0x0010, h01=0x0050, text=»CI120 EQU * «, t00=0x0071, t01=0x009c}
0x0b118…0b13c Head {h00=0x0020, h01=0x0050, text=» CM DWTLD1,A6 UNLINK BUFFER «, t00=0x0071, t01=0x00b0}
0x0b13c…0b150 Head {h00=0x0010, h01=0x0050, text=»CI130 EQU * «, t00=0x0071, t01=0x00d4}
0x0b150…0b15c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0071, t01=0x00e8}
0x0b15c…0b16c Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0071, t01=0x00f4}
0x0b16c…0b176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0104}
0x0b176…0b184 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0071, t01=0x010e}
0x0b184…0b18e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x011c}
0x0b18e…0b1d2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0071, t01=0x0126}
0x0b1d2…0b1dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x016a}
0x0b1dc…0b1f4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0071, t01=0x0174}
0x0b1f4…0b204 Head {h00=0x000c, h01=0x0050, text=»* PLSTBL«, t00=0x0071, t01=0x018c}
0x0b204…0b20e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x000c}
0x0b20e…0b222 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0072, t01=0x0016}
0x0b222…0b25a Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE DEFINES START OF AN OUTPUT BLOCK.«, t00=0x0072, t01=0x002a}
0x0b25a…0b290 Head {h00=0x0032, h01=0x0050, text=»* IT ALLOCATES AN OUTPUT BUFFER, AND LINKS IT «, t00=0x0072, t01=0x0062}
0x0b290…0b2a6 Head {h00=0x0012, h01=0x0050, text=»* TO THE DWT. «, t00=0x0072, t01=0x0098}
0x0b2a6…0b2b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00ae}
0x0b2b0…0b2c0 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0072, t01=0x00b8}
0x0b2c0…0b2d8 Head {h00=0x0014, h01=0x0050, text=»* ABI STBTAB,A1 «, t00=0x0072, t01=0x00c8}
0x0b2d8…0b2ee Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLSTBL«, t00=0x0072, t01=0x00e0}
0x0b2ee…0b2f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00f6}
0x0b2f8…0b308 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0072, t01=0x0100}
0x0b308…0b340 Head {h00=0x0034, h01=0x0050, text=»* A2 = MAXIMAL LENGTH OF TEXT IN BLOCK (BYTES) «, t00=0x0072, t01=0x0110}
0x0b340…0b35c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0072, t01=0x0148}
0x0b35c…0b366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0164}
0x0b366…0b378 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0072, t01=0x016e}
0x0b378…0b39c Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x0072, t01=0x0180}
0x0b39c…0b3b8 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0073, t01=0x0014}
0x0b3b8…0b3ca Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x0073, t01=0x0030}
0x0b3ca…0b3e4 Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x0073, t01=0x0042}
0x0b3e4…0b418 Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x0073, t01=0x005c}
0x0b418…0b436 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x0073, t01=0x0090}
0x0b436…0b450 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x0073, t01=0x00ae}
0x0b450…0b45a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00c8}
0x0b45a…0b49e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0073, t01=0x00d2}
0x0b49e…0b4a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0116}
0x0b4a8…0b4bc Head {h00=0x0010, h01=0x0050, text=»PLSTBL EQU *«, t00=0x0073, t01=0x0120}
0x0b4bc…0b4d0 Head {h00=0x0010, h01=0x0050, text=»PRSTBL EQU *«, t00=0x0073, t01=0x0134}
0x0b4d0…0b4dc Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0073, t01=0x0148}
0x0b4dc…0b50c Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x0073, t01=0x0154}
0x0b50c…0b534 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x0073, t01=0x0184}
0x0b534…0b53e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x001c}
0x0b53e…0b54c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x0026}
0x0b54c…0b556 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0034}
0x0b556…0b588 Head {h00=0x002e, h01=0x0050, text=» LD A1,DWTLD1,A6 BUFFER ALREADY ALLOCATED?«, t00=0x0074, t01=0x003e}
0x0b588…0b5b4 Head {h00=0x0028, h01=0x0050, text=» ABL(NZ) NDREPO YES, SET OK & RETURN«, t00=0x0074, t01=0x0070}
0x0b5b4…0b5de Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x0074, t01=0x009c}
0x0b5de…0b602 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) SBERR2 ERROR, RETURN«, t00=0x0074, t01=0x00c6}
0x0b602…0b60c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00ea}
0x0b60c…0b62e Head {h00=0x001e, h01=0x0050, text=»* CHECK LEVEL 3 WINDOW «, t00=0x0074, t01=0x00f4}
0x0b62e…0b656 Head {h00=0x0024, h01=0x0050, text=» LDR A3,A2 SAVE MAX BLOCK LENGTH«, t00=0x0074, t01=0x0116}
0x0b656…0b678 Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT STATUS«, t00=0x0074, t01=0x013e}
0x0b678…0b6ac Head {h00=0x0030, h01=0x0050, text=» ANKL A1,DWFECH+DWFTY1 ECHO OR ONLY TYPE 1? «, t00=0x0074, t01=0x0160}
0x0b6ac…0b6da (117, 0, 400) Head {h00=0x002a, h01=0x0050, text=» RF(NZ) SB090 YES, DON'T CHECK WINDOW «, t00=0x0075, t01=0x0004}
0x0b6da…0b710 Head {h00=0x0032, h01=0x0050, text=» CF A15,GETOFR A2 := NR OF OUTSTANDING FRAMES «, t00=0x0075, t01=0x0032}
0x0b710…0b73a Head {h00=0x0026, h01=0x0050, text=» LDR A2,A2 ANY FRAMES OUTSTANDING?«, t00=0x0075, t01=0x0068}
0x0b73a…0b75c Head {h00=0x001e, h01=0x0050, text=» RF(Z) SB090 NO, CONTINUE «, t00=0x0075, t01=0x0092}
0x0b75c…0b77e Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT STATUS«, t00=0x0075, t01=0x00b4}
0x0b77e…0b7b2 Head {h00=0x0030, h01=0x0050, text=» ANK A1,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x0075, t01=0x00d6}
0x0b7b2…0b7e8 Head {h00=0x0032, h01=0x0050, text=» RF(NZ) SBERR YES, NO FRAMES MAY BE OUT. ERROR«, t00=0x0075, t01=0x010a}
0x0b7e8…0b80c Head {h00=0x0020, h01=0x0050, text=» SUK A2,WINDOW WINDOW FULL? «, t00=0x0075, t01=0x0140}
0x0b80c…0b82e Head {h00=0x001e, h01=0x0050, text=» RF(N) SB090 NO, CONTINUE «, t00=0x0075, t01=0x0164}
0x0b82e…0b862 Head {h00=0x0030, h01=0x0050, text=»* DWT WILL HAVE TO WAIT UNTIL WINDOW IS OPEN«, t00=0x0075, t01=0x0186}
0x0b862…0b898 Head {h00=0x0032, h01=0x0050, text=» ST A3,DWTLD1,A6 SAVE REQUESTED BUFFER LENGTH «, t00=0x0076, t01=0x002a}
0x0b898…0b8ce Head {h00=0x0032, h01=0x0050, text=» LDK A1,DWFAK3 FLAG "WAITING FOR LEVEL 3 ACK" «, t00=0x0076, t01=0x0060}
0x0b8ce…0b8fe Head {h00=0x002c, h01=0x0050, text=» ORS A1,DWTST,A6 SET FLAG IN DWT STATUS «, t00=0x0076, t01=0x0096}
0x0b8fe…0b924 Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x0076, t01=0x00c6}
0x0b924…0b948 Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x0076, t01=0x00ec}
0x0b948…0b964 Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0076, t01=0x0110}
0x0b964…0b99c Head {h00=0x0034, h01=0x0050, text=» IM WIQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x0076, t01=0x012c}
0x0b99c…0b9a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x0164}
0x0b9a8…0b9cc Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0076, t01=0x0170}
0x0b9cc…0b9d6 (119, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0004}
0x0b9d6…0b9e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x000e}
0x0b9e0…0ba1a Head {h00=0x0036, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN WINDOW IS OPEN AGAIN «, t00=0x0077, t01=0x0018}
0x0ba1a…0ba3e Head {h00=0x0020, h01=0x0050, text=»* (AFTER A LEVEL 3 ACK) «, t00=0x0077, t01=0x0052}
0x0ba3e…0ba68 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x0077, t01=0x0076}
0x0ba68…0ba84 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0077, t01=0x00a0}
0x0ba84…0baa0 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0077, t01=0x00bc}
0x0baa0…0babc Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0077, t01=0x00d8}
0x0babc…0bac6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x00f4}
0x0bac6…0bada Head {h00=0x0010, h01=0x0050, text=»WINRST EQU *«, t00=0x0077, t01=0x00fe}
0x0bada…0bb12 Head {h00=0x0034, h01=0x0050, text=» LD A3,DWTLD1,A6 RESTORE REQUESTED BUFFER LENGTH«, t00=0x0077, t01=0x0112}
0x0bb12…0bb28 Head {h00=0x0012, h01=0x0050, text=» CM DWTLD1,A6 «, t00=0x0077, t01=0x014a}
0x0bb28…0bb46 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 RETURN CODE«, t00=0x0077, t01=0x0160}
0x0bb46…0bb7c Head {h00=0x0032, h01=0x0050, text=» RF(NZ) SBERR2 ERROR, RETURN TO DEVICE DRIVER «, t00=0x0077, t01=0x017e}
0x0bb7c…0bb86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0024}
0x0bb86…0bb90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x002e}
0x0bb90…0bba4 Head {h00=0x0010, h01=0x0050, text=»SB090 EQU * «, t00=0x0078, t01=0x0038}
0x0bba4…0bbb6 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x0078, t01=0x004c}
0x0bbb6…0bbe2 Head {h00=0x0028, h01=0x0050, text=» CWK A3,SOBUFL SHORT BUFFER ENOUGH? «, t00=0x0078, t01=0x005e}
0x0bbe2…0bc0c Head {h00=0x0026, h01=0x0050, text=» RF(G) SB100 NO, TAKE LONG BUFFER «, t00=0x0078, t01=0x008a}
0x0bc0c…0bc16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x00b4}
0x0bc16…0bc40 Head {h00=0x0026, h01=0x0050, text=»* ALLOCATE SHORT OUTPUT BUFFER «, t00=0x0078, t01=0x00be}
0x0bc40…0bc72 Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBS POOLBLOCK FOR SHORT BUFFERS«, t00=0x0078, t01=0x00e8}
0x0bc72…0bc98 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLGTBU ALLOCATE BUFFER«, t00=0x0078, t01=0x011a}
0x0bc98…0bcc8 Head {h00=0x002c, h01=0x0050, text=» RF(NZ) SB120 COMMON PART FOR SHORT/LONG«, t00=0x0078, t01=0x0140}
0x0bcc8…0bcfe Head {h00=0x0032, h01=0x0050, text=» LDK A7,CWTSBQ NO BUFFER LEFT. SET QUEUE HEAD «, t00=0x0078, t01=0x0170}
0x0bcfe…0bd24 Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x0079, t01=0x0016}
0x0bd24…0bd48 Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x0079, t01=0x003c}
0x0bd48…0bd64 Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0079, t01=0x0060}
0x0bd64…0bd9c Head {h00=0x0034, h01=0x0050, text=» IM SBQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x0079, t01=0x007c}
0x0bd9c…0bda8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x00b4}
0x0bda8…0bdd4 Head {h00=0x0028, h01=0x0050, text=» RF SB110 COMMON PART FOR NO BUFFER «, t00=0x0079, t01=0x00c0}
0x0bdd4…0bdde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00ec}
0x0bdde…0bdf2 Head {h00=0x0010, h01=0x0050, text=»SB100 EQU * «, t00=0x0079, t01=0x00f6}
0x0bdf2…0be1c Head {h00=0x0026, h01=0x0050, text=» CWK A3,LOBUFL LONG BUFFER ENOUGH?«, t00=0x0079, t01=0x010a}
0x0be1c…0be3a Head {h00=0x001a, h01=0x0050, text=» RF(G) SBERR NO, ERROR«, t00=0x0079, t01=0x0134}
0x0be3a…0be62 Head {h00=0x0024, h01=0x0050, text=»* ALLOCATE LONG OUTPUT BUFFER«, t00=0x0079, t01=0x0152}
0x0be62…0be94 Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBL POOLBLOCK FOR LONG BUFFERS «, t00=0x0079, t01=0x017a}
0x0be94…0beba Head {h00=0x0022, h01=0x0050, text=» CF A15,PLGTBU ALLOCATE BUFFER«, t00=0x007a, t01=0x001c}
0x0beba…0beea Head {h00=0x002c, h01=0x0050, text=» RF(NZ) SB120 COMMON PART FOR SHORT/LONG«, t00=0x007a, t01=0x0042}
0x0beea…0bf20 Head {h00=0x0032, h01=0x0050, text=» LDK A7,CWTLBQ NO BUFFER LEFT. SET QUEUE HEAD «, t00=0x007a, t01=0x0072}
0x0bf20…0bf46 Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x007a, t01=0x00a8}
0x0bf46…0bf6a Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x007a, t01=0x00ce}
0x0bf6a…0bf86 Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x007a, t01=0x00f2}
0x0bf86…0bfbe Head {h00=0x0034, h01=0x0050, text=» IM LBQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x007a, t01=0x010e}
0x0bfbe…0bfca Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x0146}
0x0bfca…0bfd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0152}
0x0bfd4…0bfe8 Head {h00=0x0010, h01=0x0050, text=»SB110 EQU * «, t00=0x007a, t01=0x015c}
0x0bfe8…0c024 Head {h00=0x0038, h01=0x0050, text=»* NO BUFFER WAS AVAILABLE. PUT REQUEST IN QUEUE. «, t00=0x007a, t01=0x0170}
0x0c024…0c050 Head {h00=0x0028, h01=0x0050, text=» ADR A7,A5 A7 := QUEUE HEAD ADDRESS «, t00=0x007b, t01=0x001c}
0x0c050…0c06e Head {h00=0x001a, h01=0x0050, text=» LDR A4,A6 DWT ADDRESS«, t00=0x007b, t01=0x0048}
0x0c06e…0c098 Head {h00=0x0026, h01=0x0050, text=» ADKL A4,DWTOTQ QUEUE LINK ADDRESS«, t00=0x007b, t01=0x0066}
0x0c098…0c0c0 Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKLST PUT LAST IN QUEUE«, t00=0x007b, t01=0x0090}
0x0c0c0…0c0e4 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x007b, t01=0x00b8}
0x0c0e4…0c0ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00dc}
0x0c0ee…0c0f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00e6}
0x0c0f8…0c12e Head {h00=0x0032, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN A BUFFER IS FREE «, t00=0x007b, t01=0x00f0}
0x0c12e…0c14e Head {h00=0x001c, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x007b, t01=0x0126}
0x0c14e…0c16a Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x007b, t01=0x0146}
0x0c16a…0c192 Head {h00=0x0024, h01=0x0050, text=»* A4 = BUFFER ADDRESS (IF A1=0)«, t00=0x007b, t01=0x0162}
0x0c192…0c1ae Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x007b, t01=0x018a}
0x0c1ae…0c1ca Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x007c, t01=0x0016}
0x0c1ca…0c1d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0032}
0x0c1d4…0c1e8 Head {h00=0x0010, h01=0x0050, text=»BUFRST EQU *«, t00=0x007c, t01=0x003c}
0x0c1e8…0c206 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 RETURN CODE«, t00=0x007c, t01=0x0050}
0x0c206…0c22c Head {h00=0x0022, h01=0x0050, text=» RF(NZ) SBERR2 RETURN IF ERROR«, t00=0x007c, t01=0x006e}
0x0c22c…0c240 Head {h00=0x0010, h01=0x0050, text=»SB120 EQU * «, t00=0x007c, t01=0x0094}
0x0c240…0c26c Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT LENGTH OF X25 HEADER «, t00=0x007c, t01=0x00a8}
0x0c26c…0c2a0 Head {h00=0x0030, h01=0x0050, text=» ST A2,BUFBIX,A4 BYTE INDEX := START OF DATA«, t00=0x007c, t01=0x00d4}
0x0c2a0…0c2d4 Head {h00=0x0030, h01=0x0050, text=» ST A4,DWTLD1,A6 SAVE BUFFER ADDRESS IN DWT «, t00=0x007c, t01=0x0108}
0x0c2d4…0c2de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x013c}
0x0c2de…0c30a Head {h00=0x0028, h01=0x0050, text=» ABL NDREPO RETURN TO DEVICE DRIVER «, t00=0x007c, t01=0x0146}
0x0c30a…0c328 Head {h00=0x001a, h01=0x0050, text=»* RETURN CODE := OK«, t00=0x007c, t01=0x0172}
0x0c328…0c332 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0190}
0x0c332…0c33c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x000a}
0x0c33c…0c350 Head {h00=0x0010, h01=0x0050, text=»SBERR EQU * «, t00=0x007d, t01=0x0014}
0x0c350…0c37c Head {h00=0x0028, h01=0x0050, text=» LDK A1,PLSERR RET CODE := SW ERROR «, t00=0x007d, t01=0x0028}
0x0c37c…0c390 Head {h00=0x0010, h01=0x0050, text=»SBERR2 EQU *«, t00=0x007d, t01=0x0054}
0x0c390…0c3b6 Head {h00=0x0022, h01=0x0050, text=» LDK A2,0 RESET DEVICE STATUS «, t00=0x007d, t01=0x0068}
0x0c3b6…0c3e0 Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x007d, t01=0x008e}
0x0c3e0…0c3ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00b8}
0x0c3ea…0c3f8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007d, t01=0x00c2}
0x0c3f8…0c402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00d0}
0x0c402…0c446 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x007d, t01=0x00da}
0x0c446…0c450 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x011e}
0x0c450…0c468 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x007d, t01=0x0128}
0x0c468…0c478 Head {h00=0x000c, h01=0x0050, text=»* PLCHRO«, t00=0x007d, t01=0x0140}
0x0c478…0c482 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0150}
0x0c482…0c496 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x007d, t01=0x015a}
0x0c496…0c4d4 Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE WRITES ONE CHARACTER TO OUTPUT BUFFER. «, t00=0x007d, t01=0x016e}
0x0c4d4…0c4de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x001c}
0x0c4de…0c4ee Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x007e, t01=0x0026}
0x0c4ee…0c506 Head {h00=0x0014, h01=0x0050, text=»* ABI OUPTAB,A1 «, t00=0x007e, t01=0x0036}
0x0c506…0c51c Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLCHRO«, t00=0x007e, t01=0x004e}
0x0c51c…0c526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0064}
0x0c526…0c536 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x007e, t01=0x006e}
0x0c536…0c55a Head {h00=0x0020, h01=0x0050, text=»* A2 = BITS 0-7 IRRELEVANT«, t00=0x007e, t01=0x007e}
0x0c55a…0c57a Head {h00=0x001c, h01=0x0050, text=»* BITS 8-15 CHARACTER «, t00=0x007e, t01=0x00a2}
0x0c57a…0c596 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x007e, t01=0x00c2}
0x0c596…0c5a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00de}
0x0c5a0…0c5b2 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x007e, t01=0x00e8}
0x0c5b2…0c5d6 Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x007e, t01=0x00fa}
0x0c5d6…0c5f2 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x007e, t01=0x011e}
0x0c5f2…0c604 Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x007e, t01=0x013a}
0x0c604…0c61e Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x007e, t01=0x014c}
0x0c61e…0c652 Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x007e, t01=0x0166}
0x0c652…0c670 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x007f, t01=0x000a}
0x0c670…0c68a Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x007f, t01=0x0028}
0x0c68a…0c694 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0042}
0x0c694…0c6d8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x007f, t01=0x004c}
0x0c6d8…0c6e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0090}
0x0c6e2…0c6f6 Head {h00=0x0010, h01=0x0050, text=»PLCHRO EQU *«, t00=0x007f, t01=0x009a}
0x0c6f6…0c70a Head {h00=0x0010, h01=0x0050, text=»PRCHRO EQU *«, t00=0x007f, t01=0x00ae}
0x0c70a…0c716 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x007f, t01=0x00c2}
0x0c716…0c720 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00ce}
0x0c720…0c72e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007f, t01=0x00d8}
0x0c72e…0c738 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00e6}
0x0c738…0c754 Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 PUSH A4 «, t00=0x007f, t01=0x00f0}
0x0c754…0c77c Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTLD1,A6 BUFFER ADDRESS «, t00=0x007f, t01=0x010c}
0x0c77c…0c7a4 Head {h00=0x0024, h01=0x0050, text=» RF(Z) COERR2 ERROR IF NO BUFFER«, t00=0x007f, t01=0x0134}
0x0c7a4…0c7d2 Head {h00=0x002a, h01=0x0050, text=» CF A15,PLPUCH PUT CHARACTER IN BUFFER«, t00=0x007f, t01=0x015c}
0x0c7d2…0c7f6 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A1 CHECK RETURN CODE«, t00=0x007f, t01=0x018a}
0x0c7f6…0c822 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) COERR1 ERROR IF BUFFER FULL «, t00=0x0080, t01=0x001e}
0x0c822…0c82c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x004a}
0x0c82c…0c848 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x0080, t01=0x0054}
0x0c848…0c882 Head {h00=0x0036, h01=0x0050, text=»* RETURN DIRECTLY INSTEAD OF THROUGH NDRETO TO GET«, t00=0x0080, t01=0x0070}
0x0c882…0c89e Head {h00=0x0018, h01=0x0050, text=»* FASTER PROCESSING.«, t00=0x0080, t01=0x00aa}
0x0c89e…0c8aa Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0080, t01=0x00c6}
0x0c8aa…0c8c8 Head {h00=0x001a, h01=0x0050, text=» ADK A5,4 ADJUST STACK«, t00=0x0080, t01=0x00d2}
0x0c8c8…0c8fa Head {h00=0x002e, h01=0x0050, text=» LDR A2,A1 DEVICE STATUS & RET CODE := OK «, t00=0x0080, t01=0x00f0}
0x0c8fa…0c922 Head {h00=0x0024, h01=0x0050, text=» ABR* A5 RETURN TO DEVICE DRIVER«, t00=0x0080, t01=0x0122}
0x0c922…0c92c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x014a}
0x0c92c…0c936 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0154}
0x0c936…0c94a Head {h00=0x0010, h01=0x0050, text=»COERR1 EQU *«, t00=0x0080, t01=0x015e}
0x0c94a…0c970 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLRLBU RELEASE BUFFER «, t00=0x0080, t01=0x0172}
0x0c970…0c998 Head {h00=0x0024, h01=0x0050, text=» CM DWTLD1,A6 INDICATE NO BUFFER«, t00=0x0081, t01=0x0008}
0x0c998…0c9ac Head {h00=0x0010, h01=0x0050, text=»COERR2 EQU *«, t00=0x0081, t01=0x0030}
0x0c9ac…0c9c8 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x0081, t01=0x0044}
0x0c9c8…0c9f4 Head {h00=0x0028, h01=0x0050, text=» LDK A1,PLSERR RET CODE := SW ERROR «, t00=0x0081, t01=0x0060}
0x0c9f4…0ca1e Head {h00=0x0026, h01=0x0050, text=» ABL NDRET RETURN TO DEVICE DRIVER«, t00=0x0081, t01=0x008c}
0x0ca1e…0ca28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00b6}
0x0ca28…0ca36 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0081, t01=0x00c0}
0x0ca36…0ca40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00ce}
0x0ca40…0ca84 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0081, t01=0x00d8}
0x0ca84…0ca8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x011c}
0x0ca8e…0caa6 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0081, t01=0x0126}
0x0caa6…0cab6 Head {h00=0x000c, h01=0x0050, text=»* PLENBL«, t00=0x0081, t01=0x013e}
0x0cab6…0cac0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x014e}
0x0cac0…0cad4 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0081, t01=0x0158}
0x0cad4…0cb08 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE DEFINES END OF OUTPUT BLOCK. «, t00=0x0081, t01=0x016c}
0x0cb08…0cb3a Head {h00=0x002e, h01=0x0050, text=»* IT SENDS THE BLOCK TO PLC AND WAITS FOR «, t00=0x0082, t01=0x0010}
0x0cb3a…0cb50 Head {h00=0x0012, h01=0x0050, text=»* ACKNOWLEDGE.«, t00=0x0082, t01=0x0042}
0x0cb50…0cb5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0058}
0x0cb5a…0cb6a Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0082, t01=0x0062}
0x0cb6a…0cb82 Head {h00=0x0014, h01=0x0050, text=»* ABI ENBTAB,A1 «, t00=0x0082, t01=0x0072}
0x0cb82…0cb98 Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLENBL«, t00=0x0082, t01=0x008a}
0x0cb98…0cba2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00a0}
0x0cba2…0cbb2 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0082, t01=0x00aa}
0x0cbb2…0cbce Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0082, t01=0x00ba}
0x0cbce…0cbd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00d6}
0x0cbd8…0cbea Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0082, t01=0x00e0}
0x0cbea…0cc0e Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x0082, t01=0x00f2}
0x0cc0e…0cc2a Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0082, t01=0x0116}
0x0cc2a…0cc3c Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x0082, t01=0x0132}
0x0cc3c…0cc56 Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x0082, t01=0x0144}
0x0cc56…0cc8a Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x0082, t01=0x015e}
0x0cc8a…0cca8 (131, 0, 400) Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x0083, t01=0x0004}
0x0cca8…0ccc2 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x0083, t01=0x0022}
0x0ccc2…0cccc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x003c}
0x0cccc…0cd10 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0083, t01=0x0046}
0x0cd10…0cd1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x008a}
0x0cd1a…0cd2e Head {h00=0x0010, h01=0x0050, text=»PLENBL EQU *«, t00=0x0083, t01=0x0094}
0x0cd2e…0cd42 Head {h00=0x0010, h01=0x0050, text=»PRENBL EQU *«, t00=0x0083, t01=0x00a8}
0x0cd42…0cd4e Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0083, t01=0x00bc}
0x0cd4e…0cd7e Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x0083, t01=0x00c8}
0x0cd7e…0cda6 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x0083, t01=0x00f8}
0x0cda6…0cdb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0120}
0x0cdb0…0cdbe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0083, t01=0x012a}
0x0cdbe…0cdc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0138}
0x0cdc8…0cdf8 Head {h00=0x002c, h01=0x0050, text=» LDK A1,PLSERR SET RET CODE JUST IN CASE«, t00=0x0083, t01=0x0142}
0x0cdf8…0ce20 Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTLD1,A6 BUFFER ADDRESS «, t00=0x0083, t01=0x0172}
0x0ce20…0ce50 Head {h00=0x002c, h01=0x0050, text=» ABL(Z) NDREP ERROR IF NO BUFFER. RETURN«, t00=0x0084, t01=0x000a}
0x0ce50…0ce7a Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x0084, t01=0x003a}
0x0ce7a…0cea0 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EBERR1 RETURN IF ERROR«, t00=0x0084, t01=0x0064}
0x0cea0…0ceaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x008a}
0x0ceaa…0cec8 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A6 DWT ADDRESS«, t00=0x0084, t01=0x0094}
0x0cec8…0ceee Head {h00=0x0022, h01=0x0050, text=» ADKL A3,DWTOTQ QUEUE POINTER «, t00=0x0084, t01=0x00b2}
0x0ceee…0cf10 Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCS RESERVE CCA«, t00=0x0084, t01=0x00d8}
0x0cf10…0cf42 Head {h00=0x002e, h01=0x0050, text=» CM DWTOTQ,A6 RESET QUEUE ELEMENT POINTER «, t00=0x0084, t01=0x00fa}
0x0cf42…0cf60 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 RETURN CODE«, t00=0x0084, t01=0x012c}
0x0cf60…0cf86 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EBERR1 RETURN IF ERROR«, t00=0x0084, t01=0x014a}
0x0cf86…0cf90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0170}
0x0cf90…0cfc4 Head {h00=0x0030, h01=0x0050, text=»* WRITE PARAMETERS IN CCA AND X25 HEADER «, t00=0x0084, t01=0x017a}
0x0cfc4…0cfd0 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0085, t01=0x001e}
0x0cfd0…0cff8 Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTLD1,A6 BUFFER ADDRESS «, t00=0x0085, t01=0x002a}
0x0cff8…0d01e Head {h00=0x0022, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 TO CCA«, t00=0x0085, t01=0x0052}
0x0d01e…0d05c Head {h00=0x003a, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR«, t00=0x0085, t01=0x0078}
0x0d05c…0d084 Head {h00=0x0024, h01=0x0050, text=» LDK A3,CMDFW ASSUME FAST WRITE «, t00=0x0085, t01=0x00b6}
0x0d084…0d0aa Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 DEVICE STATUS «, t00=0x0085, t01=0x00de}
0x0d0aa…0d0c2 Head {h00=0x0014, h01=0x0050, text=» LDR A7,A2 SAVE «, t00=0x0085, t01=0x0104}
0x0d0c2…0d0e6 Head {h00=0x0020, h01=0x0050, text=» ANKL A7,DWFECH ECHO OUTPUT?«, t00=0x0085, t01=0x011c}
0x0d0e6…0d10c Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EB090 YES, USE TYPE 1 «, t00=0x0085, t01=0x0140}
0x0d10c…0d13e Head {h00=0x002e, h01=0x0050, text=» LDK A3,CMDSW NOT ECHO, USE STANDARD WRITE«, t00=0x0085, t01=0x0166}
0x0d13e…0d16a Head {h00=0x0028, h01=0x0050, text=» ANK A2,DWFTY1 ONLY TYPE 1 ALLOWED? «, t00=0x0086, t01=0x0008}
0x0d16a…0d18e Head {h00=0x0020, h01=0x0050, text=» RF(Z) EB100 NO, USE TYPE 2 «, t00=0x0086, t01=0x0034}
0x0d18e…0d198 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0058}
0x0d198…0d1a6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0086, t01=0x0062}
0x0d1a6…0d1b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0070}
0x0d1b0…0d1c4 Head {h00=0x0010, h01=0x0050, text=»EB090 EQU * «, t00=0x0086, t01=0x007a}
0x0d1c4…0d1e2 Head {h00=0x001a, h01=0x0050, text=»* NO FLOW CONTROL«, t00=0x0086, t01=0x008e}
0x0d1e2…0d216 Head {h00=0x0030, h01=0x0050, text=» CF A15,WRADR1 WRITE LINE ADDRESS. NO FLOW C«, t00=0x0086, t01=0x00ac}
0x0d216…0d24c Head {h00=0x0032, h01=0x0050, text=» LDK A2,TYNFLO MESSAGE TYPE := NO FLOW CONTROL«, t00=0x0086, t01=0x00e0}
0x0d24c…0d266 Head {h00=0x0016, h01=0x0050, text=» RF EB110 CONTINUE«, t00=0x0086, t01=0x0116}
0x0d266…0d270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0130}
0x0d270…0d284 Head {h00=0x0010, h01=0x0050, text=»EB100 EQU * «, t00=0x0086, t01=0x013a}
0x0d284…0d2a0 Head {h00=0x0018, h01=0x0050, text=»* FLOW CONTROL «, t00=0x0086, t01=0x014e}
0x0d2a0…0d2d4 Head {h00=0x0030, h01=0x0050, text=» CF A15,WRADR2 WRITE LINE ADDRESS. FLOW CTRL«, t00=0x0086, t01=0x016a}
0x0d2d4…0d308 Head {h00=0x0030, h01=0x0050, text=» CF A15,FWOPSR FETCH AND UPDATE FLOW CONTROL«, t00=0x0087, t01=0x000e}
0x0d308…0d336 Head {h00=0x002a, h01=0x0050, text=» SC A2,X25FLW,A4 P(R) & P(S) TO PACKET«, t00=0x0087, t01=0x0042}
0x0d336…0d368 Head {h00=0x002e, h01=0x0050, text=» LDK A2,TYDATA MESSAGE TYPE := NORMAL DATA«, t00=0x0087, t01=0x0070}
0x0d368…0d372 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00a2}
0x0d372…0d386 Head {h00=0x0010, h01=0x0050, text=»EB110 EQU * «, t00=0x0087, t01=0x00ac}
0x0d386…0d3ba Head {h00=0x0030, h01=0x0050, text=» SC A2,CWTCCA+CCRIDB,A5 MESSAGE TYPE TO CCA «, t00=0x0087, t01=0x00c0}
0x0d3ba…0d3e8 Head {h00=0x002a, h01=0x0050, text=» SC A3,CWTCCA+CCRCMD,A5 COMMAND TO CCA«, t00=0x0087, t01=0x00f4}
0x0d3e8…0d41a Head {h00=0x002e, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA«, t00=0x0087, t01=0x0122}
0x0d41a…0d43e Head {h00=0x0020, h01=0x0050, text=» LD A3,BUFBIX,A4 BYTE INDEX «, t00=0x0087, t01=0x0154}
0x0d43e…0d472 Head {h00=0x0030, h01=0x0050, text=» ST A3,CWTCCA+CCRLEN,A5 BUFFER LENGTH TO CCA«, t00=0x0087, t01=0x0178}
0x0d472…0d47c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x001c}
0x0d47c…0d4a6 Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x0088, t01=0x0026}
0x0d4a6…0d4cc Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EBERR2 RETURN IF ERROR«, t00=0x0088, t01=0x0050}
0x0d4cc…0d4f4 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x0088, t01=0x0076}
0x0d4f4…0d518 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) EBERR1 HANDLE ERROR «, t00=0x0088, t01=0x009e}
0x0d518…0d53c Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0088, t01=0x00c2}
0x0d53c…0d546 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00e6}
0x0d546…0d554 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0088, t01=0x00f0}
0x0d554…0d55e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00fe}
0x0d55e…0d596 Head {h00=0x0034, h01=0x0050, text=»* ENTRY TO ACKRST IS MADE WHEN I/O OPERATION «, t00=0x0088, t01=0x0108}
0x0d596…0d5b0 Head {h00=0x0016, h01=0x0050, text=»* IS COMPLETED.«, t00=0x0088, t01=0x0140}
0x0d5b0…0d5da Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x0088, t01=0x015a}
0x0d5da…0d5f6 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0088, t01=0x0184}
0x0d5f6…0d612 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0089, t01=0x0010}
0x0d612…0d62e Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0089, t01=0x002c}
0x0d62e…0d64a Head {h00=0x0018, h01=0x0050, text=»* A7 = MESSAGE TYPE«, t00=0x0089, t01=0x0048}
0x0d64a…0d654 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0064}
0x0d654…0d668 Head {h00=0x0010, h01=0x0050, text=»ACKRST EQU *«, t00=0x0089, t01=0x006e}
0x0d668…0d68e Head {h00=0x0022, h01=0x0050, text=» LDK A2,0 RESET DEVICE STATUS «, t00=0x0089, t01=0x0082}
0x0d68e…0d6ac Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 ANY ERROR? «, t00=0x0089, t01=0x00a8}
0x0d6ac…0d6ce Head {h00=0x001e, h01=0x0050, text=» RF(NZ) EB130 YES, RETURN «, t00=0x0089, t01=0x00c6}
0x0d6ce…0d6d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00e8}
0x0d6d8…0d6fa Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTST,A6 DWT STATUS«, t00=0x0089, t01=0x00f2}
0x0d6fa…0d70c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0089, t01=0x0114}
0x0d70c…0d73a Head {h00=0x002a, h01=0x0050, text=» ANK A4,DWFRES RESET PACKET RECIEVED? «, t00=0x0089, t01=0x0126}
0x0d73a…0d752 Head {h00=0x0014, h01=0x0050, text=» RF(Z) EB120 NO «, t00=0x0089, t01=0x0154}
0x0d752…0d784 Head {h00=0x002e, h01=0x0050, text=» LDK A1,LINERR YES. RET CODE := LINK RESET«, t00=0x0089, t01=0x016c}
0x0d784…0d79c Head {h00=0x0014, h01=0x0050, text=» RF EB130 RETURN«, t00=0x008a, t01=0x000e}
0x0d79c…0d7a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0026}
0x0d7a6…0d7ba Head {h00=0x0010, h01=0x0050, text=»EB120 EQU * «, t00=0x008a, t01=0x0030}
0x0d7ba…0d7ee Head {h00=0x0030, h01=0x0050, text=» CWK A7,TYNFLO PACKET WITH NO FLOW CONTROL? «, t00=0x008a, t01=0x0044}
0x0d7ee…0d80e Head {h00=0x001c, h01=0x0050, text=» RF(E) EB130 YES, RETURN«, t00=0x008a, t01=0x0078}
0x0d80e…0d83a Head {h00=0x0028, h01=0x0050, text=» ANK A3,DWFSAC WAIT FOR LEVEL 3 ACK?«, t00=0x008a, t01=0x0098}
0x0d83a…0d85a Head {h00=0x001c, h01=0x0050, text=» RF(Z) EB130 NO, RETURN «, t00=0x008a, t01=0x00c4}
0x0d85a…0d864 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x00e4}
0x0d864…0d89a Head {h00=0x0032, h01=0x0050, text=» LDK A3,DWFAK3 FLAG "WAITING FOR LEVEL 3 ACK" «, t00=0x008a, t01=0x00ee}
0x0d89a…0d8ca Head {h00=0x002c, h01=0x0050, text=» ORS A3,DWTST,A6 SET FLAG IN DWT STATUS «, t00=0x008a, t01=0x0124}
0x0d8ca…0d8ee Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x008a, t01=0x0154}
0x0d8ee…0d8f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0178}
0x0d8f8…0d906 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008a, t01=0x0182}
0x0d906…0d910 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0190}
0x0d910…0d956 Head {h00=0x0042, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN ACK ON LEVEL 3 HAVE BEEN RECIEVED«, t00=0x008b, t01=0x000a}
0x0d956…0d980 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x008b, t01=0x0050}
0x0d980…0d99c Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x008b, t01=0x007a}
0x0d99c…0d9d0 Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x008b, t01=0x0096}
0x0d9d0…0d9ec Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x008b, t01=0x00ca}
0x0d9ec…0da08 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x008b, t01=0x00e6}
0x0da08…0da12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0102}
0x0da12…0da26 Head {h00=0x0010, h01=0x0050, text=»AK3RST EQU *«, t00=0x008b, t01=0x010c}
0x0da26…0da30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0120}
0x0da30…0da44 Head {h00=0x0010, h01=0x0050, text=»EB130 EQU * «, t00=0x008b, t01=0x012a}
0x0da44…0da4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x013e}
0x0da4e…0da78 Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x008b, t01=0x0148}
0x0da78…0da82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0172}
0x0da82…0da8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x017c}
0x0da8c…0da96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0186}
0x0da96…0daaa Head {h00=0x0010, h01=0x0050, text=»EBERR2 EQU *«, t00=0x008b, t01=0x0190}
0x0daaa…0dacc Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x008c, t01=0x0014}
0x0dacc…0dae0 Head {h00=0x0010, h01=0x0050, text=»EBERR1 EQU *«, t00=0x008c, t01=0x0036}
0x0dae0…0db0e Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTLD1,A6 OUTPUT BUFFER ADDRESS«, t00=0x008c, t01=0x004a}
0x0db0e…0db34 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLRLBU RELEASE BUFFER «, t00=0x008c, t01=0x0078}
0x0db34…0db5c Head {h00=0x0024, h01=0x0050, text=» CM DWTLD1,A6 INDICATE NO BUFFER«, t00=0x008c, t01=0x009e}
0x0db5c…0db84 Head {h00=0x0024, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL«, t00=0x008c, t01=0x00c6}
0x0db84…0dbae Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x008c, t01=0x00ee}
0x0dbae…0dbb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0118}
0x0dbb8…0dbc6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008c, t01=0x0122}
0x0dbc6…0dbd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0130}
0x0dbd0…0dc14 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x008c, t01=0x013a}
0x0dc14…0dc1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x017e}
0x0dc1e…0dc36 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x008c, t01=0x0188}
0x0dc36…0dc46 Head {h00=0x000c, h01=0x0050, text=»* PLTEST«, t00=0x008d, t01=0x0010}
0x0dc46…0dc50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0020}
0x0dc50…0dc64 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x008d, t01=0x002a}
0x0dc64…0dc9a Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES TEST COMMANDS FOR PLC. «, t00=0x008d, t01=0x003e}
0x0dc9a…0dcce Head {h00=0x0030, h01=0x0050, text=»* THE TEST COMMANDS ARE GENERATED BY A TEST «, t00=0x008d, t01=0x0074}
0x0dcce…0dd06 Head {h00=0x0034, h01=0x0050, text=»* COMMAND "DRIVER" WITH AN INTERFACE SIMILAR TO «, t00=0x008d, t01=0x00a8}
0x0dd06…0dd3c Head {h00=0x0032, h01=0x0050, text=»* THAT OF THE NORMAL TERMINAL DEVICE DRIVERS. «, t00=0x008d, t01=0x00e0}
0x0dd3c…0dd72 Head {h00=0x0032, h01=0x0050, text=»* CALL IS MADE DIRECTLY TO THE PLC DRIVER, AND«, t00=0x008d, t01=0x0116}
0x0dd72…0ddaa Head {h00=0x0034, h01=0x0050, text=»* NOT THROUGH THE TERMINAL NETWORK DISTRIBUTOR, «, t00=0x008d, t01=0x014c}
0x0ddaa…0dde0 Head {h00=0x0032, h01=0x0050, text=»* AS THIS FUNCTION IS NOT AVAILABLE FOR OTHER «, t00=0x008d, t01=0x0184}
0x0dde0…0ddf8 Head {h00=0x0014, h01=0x0050, text=»* LINE DRIVERS. «, t00=0x008e, t01=0x002a}
0x0ddf8…0de02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0042}
0x0de02…0de12 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x008e, t01=0x004c}
0x0de12…0de28 Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLTEST«, t00=0x008e, t01=0x005c}
0x0de28…0de32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0072}
0x0de32…0de42 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x008e, t01=0x007c}
0x0de42…0de5e Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x008e, t01=0x008c}
0x0de5e…0de68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00a8}
0x0de68…0de7a Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x008e, t01=0x00b2}
0x0de7a…0de9e Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x008e, t01=0x00c4}
0x0de9e…0deba Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x008e, t01=0x00e8}
0x0deba…0decc Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x008e, t01=0x0104}
0x0decc…0dee6 Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x008e, t01=0x0116}
0x0dee6…0defe Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x008e, t01=0x0130}
0x0defe…0df1c Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x008e, t01=0x0148}
0x0df1c…0df36 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x008e, t01=0x0166}
0x0df36…0df40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0180}
0x0df40…0df84 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x008e, t01=0x018a}
0x0df84…0df8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x003e}
0x0df8e…0df9c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008f, t01=0x0048}
0x0df9c…0dfa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0056}
0x0dfa6…0dfba Head {h00=0x0010, h01=0x0050, text=»PLTEST EQU *«, t00=0x008f, t01=0x0060}
0x0dfba…0dfd0 Head {h00=0x0012, h01=0x0050, text=» IFT PLCTST=1 «, t00=0x008f, t01=0x0074}
0x0dfd0…0e000 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x008f, t01=0x008a}
0x0e000…0e028 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x008f, t01=0x00ba}
0x0e028…0e04a Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x008f, t01=0x00e2}
0x0e04a…0e054 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0104}
0x0e054…0e060 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x008f, t01=0x010e}
0x0e060…0e092 Head {h00=0x002e, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA«, t00=0x008f, t01=0x011a}
0x0e092…0e0d2 Head {h00=0x003c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 DATA CHAINING & MSB OF BUFFER ADDR «, t00=0x008f, t01=0x014c}
0x0e0d2…0e106 Head {h00=0x0030, h01=0x0050, text=» LD A4,DWTTBU,A6 USER REQUEST BUFFER ADDRESS«, t00=0x008f, t01=0x018c}
0x0e106…0e12c Head {h00=0x0022, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 TO CCA«, t00=0x0090, t01=0x0030}
0x0e12c…0e160 Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTTLN,A6 USER REQUEST BUFFER LENGTH «, t00=0x0090, t01=0x0056}
0x0e160…0e18e Head {h00=0x002a, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 LENGTH TO CCA «, t00=0x0090, t01=0x008a}
0x0e18e…0e1c0 Head {h00=0x002e, h01=0x0050, text=» LD A3,DWTTCW,A6 USER REQUEST CONTROL WORD«, t00=0x0090, t01=0x00b8}
0x0e1c0…0e1ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x00ea}
0x0e1ca…0e1f4 Head {h00=0x0026, h01=0x0050, text=»* DETERMINE TYPE OF TEST ORDER «, t00=0x0090, t01=0x00f4}
0x0e1f4…0e226 Head {h00=0x002e, h01=0x0050, text=» LC A1,DWTOR+1,A6 USER REQUEST ORDER CODE «, t00=0x0090, t01=0x011e}
0x0e226…0e240 Head {h00=0x0016, h01=0x0050, text=» ANK A1,/3F CLEAN «, t00=0x0090, t01=0x0150}
0x0e240…0e26a Head {h00=0x0026, h01=0x0050, text=» CWK A1,ORDPS GET LINE STATISTICS?«, t00=0x0090, t01=0x016a}
0x0e26a…0e28a (145, 0, 400) Head {h00=0x001c, h01=0x0050, text=» RF(E) TE100 YES, HANDLE«, t00=0x0091, t01=0x0004}
0x0e28a…0e2b4 Head {h00=0x0026, h01=0x0050, text=» CWK A1,ORDDS GET DLS STATISTICS? «, t00=0x0091, t01=0x0024}
0x0e2b4…0e2d4 Head {h00=0x001c, h01=0x0050, text=» RF(E) TE110 YES, HANDLE«, t00=0x0091, t01=0x004e}
0x0e2d4…0e2fc Head {h00=0x0024, h01=0x0050, text=» CWK A1,ORDRM READ LOCAL MEMORY?«, t00=0x0091, t01=0x006e}
0x0e2fc…0e332 Head {h00=0x0032, h01=0x0050, text=» RF(NE) TEERR2 NO, COMMAND NOT DEFINED. ERROR «, t00=0x0091, t01=0x0096}
0x0e332…0e33c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00cc}
0x0e33c…0e35a Head {h00=0x001a, h01=0x0050, text=»* READ LOCAL MEMORY«, t00=0x0091, t01=0x00d6}
0x0e35a…0e394 Head {h00=0x0036, h01=0x0050, text=» ST A3,CWTCCA+CCRSUB,A5 PLC MEMORY ADDRESS TO CCA «, t00=0x0091, t01=0x00f4}
0x0e394…0e3c8 Head {h00=0x0030, h01=0x0050, text=» LDK A3,CMDRM PLC COMMAND READ LOCAL MEMORY «, t00=0x0091, t01=0x012e}
0x0e3c8…0e3e8 Head {h00=0x001c, h01=0x0050, text=» RF TE120 TO COMMON PART«, t00=0x0091, t01=0x0162}
0x0e3e8…0e3f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0182}
0x0e3f2…0e406 Head {h00=0x0010, h01=0x0050, text=»TE100 EQU * «, t00=0x0091, t01=0x018c}
0x0e406…0e426 Head {h00=0x001c, h01=0x0050, text=»* GET LINE STATISTICS«, t00=0x0092, t01=0x0010}
0x0e426…0e45c Head {h00=0x0032, h01=0x0050, text=» LDK A3,CMDPS PLC COMMAND GET LINE STATISTICS «, t00=0x0092, t01=0x0030}
0x0e45c…0e47c Head {h00=0x001c, h01=0x0050, text=» RF TE120 TO COMMON PART«, t00=0x0092, t01=0x0066}
0x0e47c…0e486 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0086}
0x0e486…0e49a Head {h00=0x0010, h01=0x0050, text=»TE110 EQU * «, t00=0x0092, t01=0x0090}
0x0e49a…0e4ba Head {h00=0x001c, h01=0x0050, text=»* GET DLS STATISTICS «, t00=0x0092, t01=0x00a4}
0x0e4ba…0e4e4 Head {h00=0x0026, h01=0x0050, text=» LC A3,DWTCP2,A6 CHANNEL PARAMETER«, t00=0x0092, t01=0x00c4}
0x0e4e4…0e50a Head {h00=0x0022, h01=0x0050, text=» ANK A3,MASKWS CLEAN WS NUMBER«, t00=0x0092, t01=0x00ee}
0x0e50a…0e528 Head {h00=0x001a, h01=0x0050, text=» SLL A3,8 TO LEFT BYTE«, t00=0x0092, t01=0x0114}
0x0e528…0e55c Head {h00=0x0030, h01=0x0050, text=» ADK A3,CMDDS PLC COMMAND GET DLS STATISTICS«, t00=0x0092, t01=0x0132}
0x0e55c…0e566 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0166}
0x0e566…0e57a Head {h00=0x0010, h01=0x0050, text=»TE120 EQU * «, t00=0x0092, t01=0x0170}
0x0e57a…0e5b4 Head {h00=0x0036, h01=0x0050, text=» ST A3,CWTCCA+CCRDLS,A5 DLS INDEX & COMMAND TO CCA«, t00=0x0092, t01=0x0184}
0x0e5b4…0e5be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x002e}
0x0e5be…0e5e6 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x0093, t01=0x0038}
0x0e5e6…0e60a Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TEERR1 ERROR. HANDLE«, t00=0x0093, t01=0x0060}
0x0e60a…0e634 Head {h00=0x0026, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCER. WAIT «, t00=0x0093, t01=0x0084}
0x0e634…0e63e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00ae}
0x0e63e…0e648 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00b8}
0x0e648…0e688 Head {h00=0x003c, h01=0x0050, text=»* ENTRY IS MADE TO TSTRST WHEN COMMAND IS COMPLETED. «, t00=0x0093, t01=0x00c2}
0x0e688…0e6b2 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x0093, t01=0x0102}
0x0e6b2…0e6ce Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0093, t01=0x012c}
0x0e6ce…0e6ea Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0093, t01=0x0148}
0x0e6ea…0e706 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0093, t01=0x0164}
0x0e706…0e710 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0180}
0x0e710…0e724 Head {h00=0x0010, h01=0x0050, text=»TSTRST EQU *«, t00=0x0093, t01=0x018a}
0x0e724…0e74e Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x0094, t01=0x000e}
0x0e74e…0e758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0038}
0x0e758…0e762 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0042}
0x0e762…0e776 Head {h00=0x0010, h01=0x0050, text=»TEERR2 EQU *«, t00=0x0094, t01=0x004c}
0x0e776…0e79e Head {h00=0x0024, h01=0x0050, text=» CM CWTCCB,A5 INDICATE CCA FREE «, t00=0x0094, t01=0x0060}
0x0e79e…0e7ca Head {h00=0x0028, h01=0x0050, text=» LDK A1,PLSERR RET CODE := SW ERROR «, t00=0x0094, t01=0x0088}
0x0e7ca…0e7de Head {h00=0x0010, h01=0x0050, text=»TEERR1 EQU *«, t00=0x0094, t01=0x00b4}
0x0e7de…0e808 Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x0094, t01=0x00c8}
0x0e808…0e814 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0094, t01=0x00f2}
0x0e814…0e81e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x00fe}
0x0e81e…0e82c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0094, t01=0x0108}
0x0e82c…0e836 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0116}
0x0e836…0e854 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0094, t01=0x0120}
0x0e854…0e872 Head {h00=0x001a, h01=0x0050, text=»* INTERRUPT ROUTINES *«, t00=0x0094, t01=0x013e}
0x0e872…0e890 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0094, t01=0x015c}
0x0e890…0e89a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x017a}
0x0e89a…0e8d8 Head {h00=0x003a, h01=0x0050, text=»* THIS SECTION CONTAINS INTERRUPT HANDLING ROUTINES.«, t00=0x0094, t01=0x0184}
0x0e8d8…0e90c Head {h00=0x0030, h01=0x0050, text=»* IT IS ENTERED IMMEDIATELY AT A RELEASE, «, t00=0x0095, t01=0x0032}
0x0e90c…0e93e Head {h00=0x002e, h01=0x0050, text=»* ATTENTION OR I/O COMPLETION INTERRUPT.«, t00=0x0095, t01=0x0066}
0x0e93e…0e964 Head {h00=0x0022, h01=0x0050, text=»* ALL ROUTINES ARE EXECUTED «, t00=0x0095, t01=0x0098}
0x0e964…0e9a0 Head {h00=0x0038, h01=0x0050, text=»* ON INTERRUPT PRIORITY. AFTER PROCESSING, EXIT IS«, t00=0x0095, t01=0x00be}
0x0e9a0…0e9e2 Head {h00=0x003e, h01=0x0050, text=»* MADE EITHER TO SOME ROUTINE WAITING FOR THE INTERRUPT,«, t00=0x0095, t01=0x00fa}
0x0e9e2…0ea20 Head {h00=0x003a, h01=0x0050, text=»* TO THE LOCAL PLC DISPATCHER OR TO TOSS DISPATCHER.«, t00=0x0095, t01=0x013c}
0x0ea20…0ea5c Head {h00=0x0038, h01=0x0050, text=»* ON EXIT, A15 STACK CONTAINS INTERRUPT RETURN AND«, t00=0x0095, t01=0x017a}
0x0ea5c…0ea6e Head {h00=0x000e, h01=0x0050, text=»* A1-A8.«, t00=0x0096, t01=0x0026}
0x0ea6e…0ea78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0038}
0x0ea78…0ea82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0042}
0x0ea82…0eab6 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x0096, t01=0x004c}
0x0eab6…0eac0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0080}
0x0eac0…0ead8 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x0096, t01=0x008a}
0x0ead8…0eae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00a2}
0x0eae2…0eb00 Head {h00=0x001a, h01=0x0050, text=»* IHPL INTERRUPT ENTRY«, t00=0x0096, t01=0x00ac}
0x0eb00…0eb28 Head {h00=0x0024, h01=0x0050, text=»* PLIHR HANDLE RELEASE INTERRUPT«, t00=0x0096, t01=0x00ca}
0x0eb28…0eb52 Head {h00=0x0026, h01=0x0050, text=»* PLIHA HANDLE ATTENTION INTERRUPT«, t00=0x0096, t01=0x00f2}
0x0eb52…0eb82 Head {h00=0x002c, h01=0x0050, text=»* PLIHC HANDLE I/O COMPLETION INTERRUPT «, t00=0x0096, t01=0x011c}
0x0eb82…0ebb8 Head {h00=0x0032, h01=0x0050, text=»* COMPSTA HANDLE COMPLETION OF START COMMANDS «, t00=0x0096, t01=0x014c}
0x0ebb8…0ebe2 Head {h00=0x0026, h01=0x0050, text=»* (TEST CU, OPEN LINE, OPEN DLS)«, t00=0x0096, t01=0x0182}
0x0ebe2…0ec18 Head {h00=0x0032, h01=0x0050, text=»* COMPTEST HANDLE COMPLETION OF TEST COMMANDS «, t00=0x0097, t01=0x001c}
0x0ec18…0ec52 Head {h00=0x0036, h01=0x0050, text=»* (PLC STATISTICS, DLS STAT., READ LOCAL MEMORY)«, t00=0x0097, t01=0x0052}
0x0ec52…0ec88 Head {h00=0x0032, h01=0x0050, text=»* COMPWRI HANDLE COMPLETION OF WRITE COMMANDS «, t00=0x0097, t01=0x008c}
0x0ec88…0ecc4 Head {h00=0x0038, h01=0x0050, text=»* COMPGR HANDLE COMPLETION OF GENERAL READ COMMANDS «, t00=0x0097, t01=0x00c2}
0x0ecc4…0ecf2 Head {h00=0x002a, h01=0x0050, text=»* GRERR HANDLE ERRORS AT GENERAL READ «, t00=0x0097, t01=0x00fe}
0x0ecf2…0ed2c Head {h00=0x0036, h01=0x0050, text=»* GRSACK HANDLE STATUS AND RR MESSAGE FROM DEVICE «, t00=0x0097, t01=0x012c}
0x0ed2c…0ed5a Head {h00=0x002a, h01=0x0050, text=»* GRDATA HANDLE DATA INPUT FROM DEVICE«, t00=0x0097, t01=0x0166}
0x0ed5a…0ed8e (152, 0, 400) Head {h00=0x0030, h01=0x0050, text=»* GRRES HANDLE RESET MESSAGE FROM SECONDARY «, t00=0x0098, t01=0x0004}
0x0ed8e…0ed98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0038}
0x0ed98…0eda6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0098, t01=0x0042}
0x0eda6…0edb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0050}
0x0edb0…0edf4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0098, t01=0x005a}
0x0edf4…0edfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x009e}
0x0edfe…0ee16 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0098, t01=0x00a8}
0x0ee16…0ee24 Head {h00=0x000a, h01=0x0050, text=»* IHPL«, t00=0x0098, t01=0x00c0}
0x0ee24…0ee2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x00ce}
0x0ee2e…0ee42 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0098, t01=0x00d8}
0x0ee42…0ee78 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE CONTAINS INTERRUPT ENTRIES FOR «, t00=0x0098, t01=0x00ec}
0x0ee78…0eeae Head {h00=0x0032, h01=0x0050, text=»* ALL PLC:S INCLUDED. IT SAVES A1-A8, SETS CWT«, t00=0x0098, t01=0x0122}
0x0eeae…0eee6 Head {h00=0x0034, h01=0x0050, text=»* ADDRESS AND EXITS TO RELEASE OR I/O COMPLETION«, t00=0x0098, t01=0x0158}
0x0eee6…0ef02 Head {h00=0x0018, h01=0x0050, text=»* INTERRUPT HANDLER.«, t00=0x0098, t01=0x0190}
0x0ef02…0ef0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x001c}
0x0ef0c…0ef1c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0099, t01=0x0026}
0x0ef1c…0ef38 Head {h00=0x0018, h01=0x0050, text=»* HARDWARE INTERRUPT«, t00=0x0099, t01=0x0036}
0x0ef38…0ef42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0052}
0x0ef42…0ef52 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0099, t01=0x005c}
0x0ef52…0ef76 Head {h00=0x0020, h01=0x0050, text=»* A15 = SYSTEM STACK POINTER«, t00=0x0099, t01=0x006c}
0x0ef76…0ef92 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0099, t01=0x0090}
0x0ef92…0efa8 Head {h00=0x0012, h01=0x0050, text=»* MODE SYSTEM «, t00=0x0099, t01=0x00ac}
0x0efa8…0efb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00c2}
0x0efb2…0efc4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0099, t01=0x00cc}
0x0efc4…0efe0 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0099, t01=0x00de}
0x0efe0…0efea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00fa}
0x0efea…0f02e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0099, t01=0x0104}
0x0f02e…0f038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0148}
0x0f038…0f04c Head {h00=0x0010, h01=0x0050, text=»IHPL01 EQU *«, t00=0x0099, t01=0x0152}
0x0f04c…0f066 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x0099, t01=0x0166}
0x0f066…0f07c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0099, t01=0x0180}
0x0f07c…0f09c Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x009a, t01=0x0008}
0x0f09c…0f0a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x0028}
0x0f0a8…0f0c2 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x009a, t01=0x0034}
0x0f0c2…0f0d8 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x009a, t01=0x004e}
0x0f0d8…0f0f6 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x009a, t01=0x0064}
0x0f0f6…0f102 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x0082}
0x0f102…0f10c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x008e}
0x0f10c…0f126 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x009a, t01=0x0098}
0x0f126…0f150 Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL0CWT CWT ADDRESS, PLC 0«, t00=0x009a, t01=0x00b2}
0x0f150…0f178 Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x009a, t01=0x00dc}
0x0f178…0f184 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009a, t01=0x0104}
0x0f184…0f18e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0110}
0x0f18e…0f19c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009a, t01=0x011a}
0x0f19c…0f1a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0128}
0x0f1a6…0f1ba Head {h00=0x0010, h01=0x0050, text=»IHPL02 EQU *«, t00=0x009a, t01=0x0132}
0x0f1ba…0f1d4 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x009a, t01=0x0146}
0x0f1d4…0f1ea Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x009a, t01=0x0160}
0x0f1ea…0f200 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x009a, t01=0x0176}
0x0f200…0f220 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x009a, t01=0x018c}
0x0f220…0f22c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x001c}
0x0f22c…0f236 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0028}
0x0f236…0f250 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x009b, t01=0x0032}
0x0f250…0f266 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x009b, t01=0x004c}
0x0f266…0f27c Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x009b, t01=0x0062}
0x0f27c…0f29a Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x009b, t01=0x0078}
0x0f29a…0f2a6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x0096}
0x0f2a6…0f2b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x00a2}
0x0f2b0…0f2ca Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x009b, t01=0x00ac}
0x0f2ca…0f2e0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x009b, t01=0x00c6}
0x0f2e0…0f30a Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL1CWT CWT ADDRESS, PLC 1«, t00=0x009b, t01=0x00dc}
0x0f30a…0f332 Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x009b, t01=0x0106}
0x0f332…0f33e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009b, t01=0x012e}
0x0f33e…0f348 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x013a}
0x0f348…0f35c Head {h00=0x0010, h01=0x0050, text=»IHPL03 EQU *«, t00=0x009b, t01=0x0144}
0x0f35c…0f376 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x009b, t01=0x0158}
0x0f376…0f38c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x009b, t01=0x0172}
0x0f38c…0f3a2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x009b, t01=0x0188}
0x0f3a2…0f3b8 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x009c, t01=0x000e}
0x0f3b8…0f3d8 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x009c, t01=0x0024}
0x0f3d8…0f3e4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x0044}
0x0f3e4…0f3ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0050}
0x0f3ee…0f408 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x009c, t01=0x005a}
0x0f408…0f41e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x009c, t01=0x0074}
0x0f41e…0f434 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x009c, t01=0x008a}
0x0f434…0f44a Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x009c, t01=0x00a0}
0x0f44a…0f468 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x009c, t01=0x00b6}
0x0f468…0f474 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x00d4}
0x0f474…0f47e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00e0}
0x0f47e…0f498 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x009c, t01=0x00ea}
0x0f498…0f4ae Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x009c, t01=0x0104}
0x0f4ae…0f4c4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x009c, t01=0x011a}
0x0f4c4…0f4ee Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL2CWT CWT ADDRESS, PLC 2«, t00=0x009c, t01=0x0130}
0x0f4ee…0f516 Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x009c, t01=0x015a}
0x0f516…0f522 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009c, t01=0x0182}
0x0f522…0f52c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x018e}
0x0f52c…0f540 Head {h00=0x0010, h01=0x0050, text=»IHPL04 EQU *«, t00=0x009d, t01=0x0008}
0x0f540…0f55a Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x009d, t01=0x001c}
0x0f55a…0f570 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x009d, t01=0x0036}
0x0f570…0f586 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x009d, t01=0x004c}
0x0f586…0f59c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x009d, t01=0x0062}
0x0f59c…0f5b2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x009d, t01=0x0078}
0x0f5b2…0f5d2 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x009d, t01=0x008e}
0x0f5d2…0f5de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009d, t01=0x00ae}
0x0f5de…0f5e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00ba}
0x0f5e8…0f602 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x009d, t01=0x00c4}
0x0f602…0f618 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x009d, t01=0x00de}
0x0f618…0f62e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x009d, t01=0x00f4}
0x0f62e…0f644 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x009d, t01=0x010a}
0x0f644…0f65a Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x009d, t01=0x0120}
0x0f65a…0f678 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x009d, t01=0x0136}
0x0f678…0f684 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009d, t01=0x0154}
0x0f684…0f68e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0160}
0x0f68e…0f6a8 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x009d, t01=0x016a}
0x0f6a8…0f6be Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x009d, t01=0x0184}
0x0f6be…0f6d4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x009e, t01=0x000a}
0x0f6d4…0f6ea Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x009e, t01=0x0020}
0x0f6ea…0f714 Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL3CWT CWT ADDRESS, PLC 3«, t00=0x009e, t01=0x0036}
0x0f714…0f73c Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x009e, t01=0x0060}
0x0f73c…0f748 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009e, t01=0x0088}
0x0f748…0f752 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0094}
0x0f752…0f766 Head {h00=0x0010, h01=0x0050, text=»IHPR01 EQU *«, t00=0x009e, t01=0x009e}
0x0f766…0f77c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x009e, t01=0x00b2}
0x0f77c…0f792 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x009e, t01=0x00c8}
0x0f792…0f7b2 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x009e, t01=0x00de}
0x0f7b2…0f7be Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009e, t01=0x00fe}
0x0f7be…0f7d4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x009e, t01=0x010a}
0x0f7d4…0f7ea Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x009e, t01=0x0120}
0x0f7ea…0f808 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x009e, t01=0x0136}
0x0f808…0f814 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009e, t01=0x0154}
0x0f814…0f82a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x009e, t01=0x0160}
0x0f82a…0f85a Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR1CWT CWTADDRESS PLC 1 REMOTE «, t00=0x009e, t01=0x0176}
0x0f85a…0f880 Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL CWT:S«, t00=0x009f, t01=0x0016}
0x0f880…0f88c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x003c}
0x0f88c…0f8a0 Head {h00=0x0010, h01=0x0050, text=»IHPR02 EQU *«, t00=0x009f, t01=0x0048}
0x0f8a0…0f8b6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x009f, t01=0x005c}
0x0f8b6…0f8cc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x009f, t01=0x0072}
0x0f8cc…0f8e2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x009f, t01=0x0088}
0x0f8e2…0f902 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x009f, t01=0x009e}
0x0f902…0f90e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x00be}
0x0f90e…0f924 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x009f, t01=0x00ca}
0x0f924…0f93a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x009f, t01=0x00e0}
0x0f93a…0f950 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x009f, t01=0x00f6}
0x0f950…0f96e Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x009f, t01=0x010c}
0x0f96e…0f97a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x009f, t01=0x012a}
0x0f97a…0f990 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x009f, t01=0x0136}
0x0f990…0f9a6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x009f, t01=0x014c}
0x0f9a6…0f9d6 Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR2CWT CWTADDRESS PLC 2 REMOTE «, t00=0x009f, t01=0x0162}
0x0f9d6…0f9fc (160, 0, 398) Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL CWT:S«, t00=0x00a0, t01=0x0004}
0x0f9fc…0fa08 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a0, t01=0x002a}
0x0fa08…0fa1c Head {h00=0x0010, h01=0x0050, text=»IHPR03 EQU *«, t00=0x00a0, t01=0x0036}
0x0fa1c…0fa32 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00a0, t01=0x004a}
0x0fa32…0fa48 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00a0, t01=0x0060}
0x0fa48…0fa5e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00a0, t01=0x0076}
0x0fa5e…0fa74 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00a0, t01=0x008c}
0x0fa74…0fa94 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00a0, t01=0x00a2}
0x0fa94…0faa0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a0, t01=0x00c2}
0x0faa0…0fab6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00a0, t01=0x00ce}
0x0fab6…0facc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00a0, t01=0x00e4}
0x0facc…0fae2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00a0, t01=0x00fa}
0x0fae2…0faf8 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00a0, t01=0x0110}
0x0faf8…0fb16 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00a0, t01=0x0126}
0x0fb16…0fb22 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a0, t01=0x0144}
0x0fb22…0fb38 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00a0, t01=0x0150}
0x0fb38…0fb4e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00a0, t01=0x0166}
0x0fb4e…0fb64 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00a0, t01=0x017c}
0x0fb64…0fb94 (161, 0, 400) Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR3CWT CWTADDRESS PLC 3 REMOTE «, t00=0x00a1, t01=0x0004}
0x0fb94…0fbba Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL PLC:S«, t00=0x00a1, t01=0x0034}
0x0fbba…0fbc6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x005a}
0x0fbc6…0fbda Head {h00=0x0010, h01=0x0050, text=»IHPR04 EQU *«, t00=0x00a1, t01=0x0066}
0x0fbda…0fbf0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00a1, t01=0x007a}
0x0fbf0…0fc06 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00a1, t01=0x0090}
0x0fc06…0fc1c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00a1, t01=0x00a6}
0x0fc1c…0fc32 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x00a1, t01=0x00bc}
0x0fc32…0fc48 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00a1, t01=0x00d2}
0x0fc48…0fc68 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00a1, t01=0x00e8}
0x0fc68…0fc74 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a1, t01=0x0108}
0x0fc74…0fc8a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00a1, t01=0x0114}
0x0fc8a…0fca0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00a1, t01=0x012a}
0x0fca0…0fcb6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00a1, t01=0x0140}
0x0fcb6…0fccc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x00a1, t01=0x0156}
0x0fccc…0fce2 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00a1, t01=0x016c}
0x0fce2…0fd00 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00a1, t01=0x0182}
0x0fd00…0fd0c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a2, t01=0x0010}
0x0fd0c…0fd22 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00a2, t01=0x001c}
0x0fd22…0fd38 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00a2, t01=0x0032}
0x0fd38…0fd4e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00a2, t01=0x0048}
0x0fd4e…0fd64 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x00a2, t01=0x005e}
0x0fd64…0fd94 Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR4CWT CWTADDRESS PLC 4 REMOTE «, t00=0x00a2, t01=0x0074}
0x0fd94…0fdba Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL CWT:S«, t00=0x00a2, t01=0x00a4}
0x0fdba…0fdc6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a2, t01=0x00ca}
0x0fdc6…0fdd4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a2, t01=0x00d6}
0x0fdd4…0fdde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00e4}
0x0fdde…0fdf0 Head {h00=0x000e, h01=0x0050, text=»IHPL EQU *«, t00=0x00a2, t01=0x00ee}
0x0fdf0…0fe1a Head {h00=0x0026, h01=0x0050, text=» ST P,INTSAV SAVE LATEST INTERRUPT«, t00=0x00a2, t01=0x0100}
0x0fe1a…0fe3c Head {h00=0x001e, h01=0x0050, text=» LDK A1,0 RESET HIGH BYTE «, t00=0x00a2, t01=0x012a}
0x0fe3c…0fe6c Head {h00=0x002c, h01=0x0050, text=» LC A1,CWTCID+CIDINT,A5 INTERRUPT SOURCE«, t00=0x00a2, t01=0x014c}
0x0fe6c…0fe88 Head {h00=0x0018, h01=0x0050, text=» CWK A1,/40 RELEASE?«, t00=0x00a2, t01=0x017c}
0x0fe88…0fea8 Head {h00=0x001c, h01=0x0050, text=» RF(E) PLIHR YES, HANDLE«, t00=0x00a3, t01=0x0008}
0x0fea8…0fecc Head {h00=0x0020, h01=0x0050, text=» CWK A1,/20 I/O COMPLETION? «, t00=0x00a3, t01=0x0028}
0x0fecc…0feec Head {h00=0x001c, h01=0x0050, text=» RF(E) PLIHC YES, HANDLE«, t00=0x00a3, t01=0x004c}
0x0feec…0ff0a Head {h00=0x001a, h01=0x0050, text=» CWK A1,/80 ATTENTION?«, t00=0x00a3, t01=0x006c}
0x0ff0a…0ff2a Head {h00=0x001c, h01=0x0050, text=» RF(E) PLIHA YES, HANDLE«, t00=0x00a3, t01=0x008a}
0x0ff2a…0ff34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x00aa}
0x0ff34…0ff6a Head {h00=0x0032, h01=0x0050, text=» CF A15,PLCNOP ILLEGAL CODE, SET NOT OPERABLE «, t00=0x00a3, t01=0x00b4}
0x0ff6a…0ff82 Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00a3, t01=0x00ea}
0x0ff82…0ff8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0102}
0x0ff8c…0ff9a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a3, t01=0x010c}
0x0ff9a…0ffa4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x011a}
0x0ffa4…0ffe8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00a3, t01=0x0124}
0x0ffe8…0fff2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0168}
0x0fff2…1000a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00a3, t01=0x0172}
0x1000a…1001a Head {h00=0x000c, h01=0x0050, text=»* PLIHR «, t00=0x00a3, t01=0x018a}
0x1001a…10024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x000a}
0x10024…10038 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00a4, t01=0x0014}
0x10038…1006a Head {h00=0x002e, h01=0x0050, text=»* THIS ROUTINE HANDLES RELEASE INTERRUPTS.«, t00=0x00a4, t01=0x0028}
0x1006a…1009c Head {h00=0x002e, h01=0x0050, text=»* IT RESETS THE INTERRUPT, AND IF ANOTHER «, t00=0x00a4, t01=0x005a}
0x1009c…100cc Head {h00=0x002c, h01=0x0050, text=»* PROCESS IS WAITING FOR THE CCA, RETURN«, t00=0x00a4, t01=0x008c}
0x100cc…100f8 Head {h00=0x0028, h01=0x0050, text=»* IS MADE TO CCA ALLOCATION ROUTINE.«, t00=0x00a4, t01=0x00bc}
0x100f8…10102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00e8}
0x10102…10112 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00a4, t01=0x00f2}
0x10112…10124 Head {h00=0x000e, h01=0x0050, text=»* RF PLIHR«, t00=0x00a4, t01=0x0102}
0x10124…1012e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x0114}
0x1012e…1013e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00a4, t01=0x011e}
0x1013e…1015a Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00a4, t01=0x012e}
0x1015a…10164 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x014a}
0x10164…10176 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00a4, t01=0x0154}
0x10176…10192 Head {h00=0x0018, h01=0x0050, text=»* IF PROCESS WAITING«, t00=0x00a4, t01=0x0166}
0x10192…101c2 Head {h00=0x002c, h01=0x0050, text=»* A4 = BLOCK ADDRESS OF WAITING PROCESS«, t00=0x00a4, t01=0x0182}
0x101c2…101de Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00a5, t01=0x0022}
0x101de…101e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x003e}
0x101e8…1022c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00a5, t01=0x0048}
0x1022c…10236 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x008c}
0x10236…1024a Head {h00=0x0010, h01=0x0050, text=»PLIHR EQU * «, t00=0x00a5, t01=0x0096}
0x1024a…10270 Head {h00=0x0022, h01=0x0050, text=» EX CWTST3,A5 RESET INTERRUPT «, t00=0x00a5, t01=0x00aa}
0x10270…102a2 Head {h00=0x002e, h01=0x0050, text=» LD A4,CWTCCQ,A5 PROCESS WAITING FOR CCA? «, t00=0x00a5, t01=0x00d0}
0x102a2…102d0 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) CCARST YES, ACTIVATE PROCESS «, t00=0x00a5, t01=0x0102}
0x102d0…102f6 Head {h00=0x0022, h01=0x0050, text=» CM CWTCCB,A5 NO, SET CCA FREE«, t00=0x00a5, t01=0x0130}
0x102f6…1030e Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00a5, t01=0x0156}
0x1030e…10318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x016e}
0x10318…10326 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a5, t01=0x0178}
0x10326…10330 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0186}
0x10330…10374 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00a5, t01=0x0190}
0x10374…1037e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0044}
0x1037e…10396 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00a6, t01=0x004e}
0x10396…103a6 Head {h00=0x000c, h01=0x0050, text=»* PLIHA «, t00=0x00a6, t01=0x0066}
0x103a6…103b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0076}
0x103b0…103c4 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00a6, t01=0x0080}
0x103c4…103fc Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE HANDLES ATTENTION INTERRUPTS. IF «, t00=0x00a6, t01=0x0094}
0x103fc…10434 Head {h00=0x0034, h01=0x0050, text=»* ERROR, IT SETS AN ERROR CODE AND STARTS ABORT «, t00=0x00a6, t01=0x00cc}
0x10434…1046c Head {h00=0x0034, h01=0x0050, text=»* OF ALL CALLS. IF COMMUNICATION REESTABLISHED, «, t00=0x00a6, t01=0x0104}
0x1046c…1048a Head {h00=0x001a, h01=0x0050, text=»* IT STARTS RECOVERY. «, t00=0x00a6, t01=0x013c}
0x1048a…10494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x015a}
0x10494…104a4 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00a6, t01=0x0164}
0x104a4…104b6 Head {h00=0x000e, h01=0x0050, text=»* RF PLIHA«, t00=0x00a6, t01=0x0174}
0x104b6…104c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0186}
0x104c0…104d0 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00a6, t01=0x0190}
0x104d0…104ec Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00a7, t01=0x0010}
0x104ec…104f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x002c}
0x104f6…10508 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00a7, t01=0x0036}
0x10508…10524 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00a7, t01=0x0048}
0x10524…1053e Head {h00=0x0016, h01=0x0050, text=»* A6 = WS NUMBER «, t00=0x00a7, t01=0x0064}
0x1053e…10548 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x007e}
0x10548…1058c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00a7, t01=0x0088}
0x1058c…10596 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x00cc}
0x10596…105aa Head {h00=0x0010, h01=0x0050, text=»PLIHA EQU * «, t00=0x00a7, t01=0x00d6}
0x105aa…105d4 Head {h00=0x0026, h01=0x0050, text=» LD A1,CWTRCA+CCRSTA,A5 PLC STATUS«, t00=0x00a7, t01=0x00ea}
0x105d4…105fe Head {h00=0x0026, h01=0x0050, text=» ST A1,CWTPLS,A5 SAVE FOR TESTING «, t00=0x00a7, t01=0x0114}
0x105fe…10614 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x00a7, t01=0x013e}
0x10614…10632 Head {h00=0x001a, h01=0x0050, text=» CF A15,LOGATT LOG RCA«, t00=0x00a7, t01=0x0154}
0x10632…1063e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a7, t01=0x0172}
0x1063e…10668 Head {h00=0x0026, h01=0x0050, text=» LC A6,CWTRCA+CCRDLS,A5 WS NUMBER «, t00=0x00a7, t01=0x017e}
0x10668…10684 Head {h00=0x0018, h01=0x0050, text=» ANK A6,MASKWS CLEAN«, t00=0x00a8, t01=0x0018}
0x10684…106a6 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00a8, t01=0x0034}
0x106a6…106b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0056}
0x106b0…106be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a8, t01=0x0060}
0x106be…106c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x006e}
0x106c8…106ec Head {h00=0x0020, h01=0x0050, text=» LDKL A2,/FFFF-STACOM-STAERR«, t00=0x00a8, t01=0x0078}
0x106ec…10710 Head {h00=0x0020, h01=0x0050, text=»* MASK FOR ALLOWED ERRORS«, t00=0x00a8, t01=0x009c}
0x10710…10730 Head {h00=0x001c, h01=0x0050, text=» ANR A2,A1 FATAL ERROR? «, t00=0x00a8, t01=0x00c0}
0x10730…10752 Head {h00=0x001e, h01=0x0050, text=» RF(Z) IA100 NO, CONTINUE «, t00=0x00a8, t01=0x00e0}
0x10752…1077e Head {h00=0x0028, h01=0x0050, text=» CF A15,PLCNOP SET PLC NOT OPERABLE «, t00=0x00a8, t01=0x0102}
0x1077e…10796 Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00a8, t01=0x012e}
0x10796…107a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0146}
0x107a0…107b4 Head {h00=0x0010, h01=0x0050, text=»IA100 EQU * «, t00=0x00a8, t01=0x0150}
0x107b4…107ce Head {h00=0x0016, h01=0x0050, text=» LDR A2,A1 STATUS «, t00=0x00a8, t01=0x0164}
0x107ce…10802 Head {h00=0x0030, h01=0x0050, text=» ANK A2,STACOM COMMUNICATION REESTABLISHED? «, t00=0x00a8, t01=0x017e}
0x10802…10834 Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) PLREWS YES, START RECOVERY OF WS «, t00=0x00a9, t01=0x0022}
0x10834…1083e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0054}
0x1083e…1085a Head {h00=0x0018, h01=0x0050, text=» LDR A2,A6 WS NUMBER«, t00=0x00a9, t01=0x005e}
0x1085a…10884 Head {h00=0x0026, h01=0x0050, text=» CF A15,STAHAN HANDLE ERROR STATUS«, t00=0x00a9, t01=0x007a}
0x10884…108a8 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00a9, t01=0x00a4}
0x108a8…108b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x00c8}
0x108b2…108c0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a9, t01=0x00d2}
0x108c0…108ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x00e0}
0x108ca…1090e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00a9, t01=0x00ea}
0x1090e…10918 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x012e}
0x10918…10930 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00a9, t01=0x0138}
0x10930…10940 Head {h00=0x000c, h01=0x0050, text=»* PLIHC «, t00=0x00a9, t01=0x0150}
0x10940…1094a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0160}
0x1094a…1095e Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00a9, t01=0x016a}
0x1095e…10998 Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE HANDLES I/O COMPLETION INTERRUPTS. «, t00=0x00a9, t01=0x017e}
0x10998…109d2 Head {h00=0x0036, h01=0x0050, text=»* IT CHECKS WHICH COMMAND THAT HAS BEEN COMPLETED,«, t00=0x00aa, t01=0x0028}
0x109d2…10a08 Head {h00=0x0032, h01=0x0050, text=»* AND EXITS TO CORRESPONDING COMMAND HANDLER. «, t00=0x00aa, t01=0x0062}
0x10a08…10a12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0098}
0x10a12…10a22 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00aa, t01=0x00a2}
0x10a22…10a34 Head {h00=0x000e, h01=0x0050, text=»* RF PLIHC«, t00=0x00aa, t01=0x00b2}
0x10a34…10a3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x00c4}
0x10a3e…10a4e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00aa, t01=0x00ce}
0x10a4e…10a6a Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00aa, t01=0x00de}
0x10a6a…10a74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x00fa}
0x10a74…10a86 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00aa, t01=0x0104}
0x10a86…10aa0 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00aa, t01=0x0116}
0x10aa0…10ac0 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00aa, t01=0x0130}
0x10ac0…10adc Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00aa, t01=0x0150}
0x10adc…10afa Head {h00=0x001a, h01=0x0050, text=»* A6 = USER PARAMETER«, t00=0x00aa, t01=0x016c}
0x10afa…10b04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x018a}
0x10b04…10b48 (171, 0, 400) Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00ab, t01=0x0004}
0x10b48…10b52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x0048}
0x10b52…10b66 Head {h00=0x0010, h01=0x0050, text=»PLIHC EQU * «, t00=0x00ab, t01=0x0052}
0x10b66…10b90 Head {h00=0x0026, h01=0x0050, text=» LD A1,CWTRCA+CCRSTA,A5 PLC STATUS«, t00=0x00ab, t01=0x0066}
0x10b90…10bba Head {h00=0x0026, h01=0x0050, text=» ST A1,CWTPLS,A5 SAVE FOR TESTING «, t00=0x00ab, t01=0x0090}
0x10bba…10bd0 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x00ab, t01=0x00ba}
0x10bd0…10bee Head {h00=0x001a, h01=0x0050, text=» CF A15,LOGIOC LOG CCR«, t00=0x00ab, t01=0x00d0}
0x10bee…10bfa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ab, t01=0x00ee}
0x10bfa…10c1e Head {h00=0x0020, h01=0x0050, text=» ANKL A1,/FFFF-STAPOL-STALER«, t00=0x00ab, t01=0x00fa}
0x10c1e…10c48 Head {h00=0x0026, h01=0x0050, text=»* RESET POLL STOP & LINK ERROR «, t00=0x00ab, t01=0x011e}
0x10c48…10c88 Head {h00=0x003c, h01=0x0050, text=» LD A6,CWTRCA+CCRIDW,A5 USER PARAMETER (DWT, DLS OR ...)«, t00=0x00ab, t01=0x0148}
0x10c88…10cb0 Head {h00=0x0024, h01=0x0050, text=» LC A2,CWTRCA+CCRCMD,A5 COMMAND «, t00=0x00ab, t01=0x0188}
0x10cb0…10cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0020}
0x10cba…10cc8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ac, t01=0x002a}
0x10cc8…10cd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0038}
0x10cd2…10cfe Head {h00=0x0028, h01=0x0050, text=» LDK A3,CMDTBL COMMAND TABLE LENGTH «, t00=0x00ac, t01=0x0042}
0x10cfe…10d12 Head {h00=0x0010, h01=0x0050, text=»IC100 EQU * «, t00=0x00ac, t01=0x006e}
0x10d12…10d42 Head {h00=0x002c, h01=0x0050, text=»* SCAN TABLE TO FIND MATCHING COMMAND«, t00=0x00ac, t01=0x0082}
0x10d42…10d68 Head {h00=0x0022, h01=0x0050, text=» SUK A3,CMDTB1 DECREMENT INDEX«, t00=0x00ac, t01=0x00b2}
0x10d68…10d90 Head {h00=0x0024, h01=0x0050, text=» RF(N) IC120 END OF TABLE. ERROR«, t00=0x00ac, t01=0x00d8}
0x10d90…10dba Head {h00=0x0026, h01=0x0050, text=» CC A2,CMDTAB+1,A3 COMMAND FOUND? «, t00=0x00ac, t01=0x0100}
0x10dba…10ddc Head {h00=0x001e, h01=0x0050, text=» RB(NE) IC100 NO, CONTINUE«, t00=0x00ac, t01=0x012a}
0x10ddc…10de6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x014c}
0x10de6…10e18 Head {h00=0x002e, h01=0x0050, text=» C1 A2,CMDTAB+4,A3 MASK FOR ALLOWED ERRORS«, t00=0x00ac, t01=0x0156}
0x10e18…10e38 Head {h00=0x001c, h01=0x0050, text=» ANR A2,A1 FATAL ERROR? «, t00=0x00ac, t01=0x0188}
0x10e38…10e5a Head {h00=0x001e, h01=0x0050, text=» RF(Z) IC110 NO, CONTINUE «, t00=0x00ad, t01=0x0018}
0x10e5a…10e86 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLCNOP SET PLC NOT OPERABLE «, t00=0x00ad, t01=0x003a}
0x10e86…10e9a Head {h00=0x0010, h01=0x0050, text=»IC110 EQU * «, t00=0x00ad, t01=0x0066}
0x10e9a…10ed0 Head {h00=0x0032, h01=0x0050, text=» ABI CMDTAB+2,A3 CALL COMMAND HANDLING ROUTINE«, t00=0x00ad, t01=0x007a}
0x10ed0…10eda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ad, t01=0x00b0}
0x10eda…10eee Head {h00=0x0010, h01=0x0050, text=»IC120 EQU * «, t00=0x00ad, t01=0x00ba}
0x10eee…10f10 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00ad, t01=0x00ce}
0x10f10…10f3c Head {h00=0x0028, h01=0x0050, text=» CF A15,PLCNOP SET PLC NOT OPERABLE «, t00=0x00ad, t01=0x00f0}
0x10f3c…10f60 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00ad, t01=0x011c}
0x10f60…10f6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ad, t01=0x0140}
0x10f6a…10f78 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ad, t01=0x014a}
0x10f78…10f82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ad, t01=0x0158}
0x10f82…10fc6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00ad, t01=0x0162}
0x10fc6…10fd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x0016}
0x10fd0…10fe8 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00ae, t01=0x0020}
0x10fe8…10ffa Head {h00=0x000e, h01=0x0050, text=»* COMPSTA «, t00=0x00ae, t01=0x0038}
0x10ffa…11004 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x004a}
0x11004…11018 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00ae, t01=0x0054}
0x11018…1104e Head {h00=0x0032, h01=0x0050, text=»* THESE ROUTINES HANDLE COMPLETION OF TEST CU,«, t00=0x00ae, t01=0x0068}
0x1104e…11078 Head {h00=0x0026, h01=0x0050, text=»* OPEN LINE AND OPEN DLS COMMANDS.«, t00=0x00ae, t01=0x009e}
0x11078…110ac Head {h00=0x0030, h01=0x0050, text=»* THEY CHECK THE RETURN CODE AND EXIT TO THE«, t00=0x00ae, t01=0x00c8}
0x110ac…110d6 Head {h00=0x0026, h01=0x0050, text=»* ROUTINE THAT MADE THE I/O CALL. «, t00=0x00ae, t01=0x00fc}
0x110d6…110e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x0126}
0x110e0…110f0 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00ae, t01=0x0130}
0x110f0…11108 Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00ae, t01=0x0140}
0x11108…11112 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ae, t01=0x0158}
0x11112…11122 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00ae, t01=0x0162}
0x11122…1113c Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00ae, t01=0x0172}
0x1113c…1115c Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00ae, t01=0x018c}
0x1115c…11178 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00af, t01=0x001c}
0x11178…111a0 Head {h00=0x0024, h01=0x0050, text=»* A6 = PARAMETER (IF RELEVANT) «, t00=0x00af, t01=0x0038}
0x111a0…111aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x0060}
0x111aa…111bc Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00af, t01=0x006a}
0x111bc…111d6 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00af, t01=0x007c}
0x111d6…111f6 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00af, t01=0x0096}
0x111f6…11212 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00af, t01=0x00b6}
0x11212…11240 Head {h00=0x002a, h01=0x0050, text=»* A6 = DLS INDEX (IF EXIT TO ODLRST) «, t00=0x00af, t01=0x00d2}
0x11240…1124a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x0100}
0x1124a…1128e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00af, t01=0x010a}
0x1128e…11298 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00af, t01=0x014e}
0x11298…112ac Head {h00=0x0010, h01=0x0050, text=»COMPTC EQU *«, t00=0x00af, t01=0x0158}
0x112ac…112ce Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00af, t01=0x016c}
0x112ce…11304 Head {h00=0x0032, h01=0x0050, text=» ABL TCURST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00af, t01=0x018e}
0x11304…1130e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0034}
0x1130e…1131c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b0, t01=0x003e}
0x1131c…11326 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x004c}
0x11326…11330 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0056}
0x11330…11352 Head {h00=0x001e, h01=0x0050, text=»* OPEN LINE, COMPLETION«, t00=0x00b0, t01=0x0060}
0x11352…1135c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0082}
0x1135c…11370 Head {h00=0x0010, h01=0x0050, text=»COMPOP EQU *«, t00=0x00b0, t01=0x008c}
0x11370…11392 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00b0, t01=0x00a0}
0x11392…113c8 Head {h00=0x0032, h01=0x0050, text=» ABL OPLRST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00b0, t01=0x00c2}
0x113c8…113d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x00f8}
0x113d2…113dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0102}
0x113dc…113fe Head {h00=0x001e, h01=0x0050, text=»* OPEN DLS, COMPLETION «, t00=0x00b0, t01=0x010c}
0x113fe…11408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x012e}
0x11408…1141c Head {h00=0x0010, h01=0x0050, text=»COMPOD EQU *«, t00=0x00b0, t01=0x0138}
0x1141c…1143e Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00b0, t01=0x014c}
0x1143e…1145e Head {h00=0x001c, h01=0x0050, text=» LDR A2,A2 FATAL STATUS?«, t00=0x00b0, t01=0x016e}
0x1145e…1148a Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CD100 YES, SKIP STATUS CHECK«, t00=0x00b0, t01=0x018e}
0x1148a…11494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x002a}
0x11494…114b0 Head {h00=0x0018, h01=0x0050, text=» LDR A2,A6 WS NUMBER«, t00=0x00b1, t01=0x0034}
0x114b0…114d8 Head {h00=0x0024, h01=0x0050, text=» CF A15,STAHAN HANDLE PLC STATUS«, t00=0x00b1, t01=0x0050}
0x114d8…11502 Head {h00=0x0026, h01=0x0050, text=» LDK A2,0 CLEAR FATAL STATUS FLAGS«, t00=0x00b1, t01=0x0078}
0x11502…1150c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x00a2}
0x1150c…11520 Head {h00=0x0010, h01=0x0050, text=»CD100 EQU * «, t00=0x00b1, t01=0x00ac}
0x11520…11556 Head {h00=0x0032, h01=0x0050, text=» ABL ODLRST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00b1, t01=0x00c0}
0x11556…11560 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x00f6}
0x11560…1156e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b1, t01=0x0100}
0x1156e…11578 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x010e}
0x11578…115bc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b1, t01=0x0118}
0x115bc…115c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x015c}
0x115c6…115de Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00b1, t01=0x0166}
0x115de…115f0 Head {h00=0x000e, h01=0x0050, text=»* COMPTEST«, t00=0x00b1, t01=0x017e}
0x115f0…115fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x0190}
0x115fa…1160e Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00b2, t01=0x000a}
0x1160e…11644 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES COMPLETION OF GET LINE «, t00=0x00b2, t01=0x001e}
0x11644…1167c Head {h00=0x0034, h01=0x0050, text=»* STATISTICS, GET DLS STATISTICS AND READ LOCAL «, t00=0x00b2, t01=0x0054}
0x1167c…11696 Head {h00=0x0016, h01=0x0050, text=»* MEMORY COMMANDS.«, t00=0x00b2, t01=0x008c}
0x11696…116c8 Head {h00=0x002e, h01=0x0050, text=»* IT CHECKS THE PLC STATUS, SETS EFFECTIVE«, t00=0x00b2, t01=0x00a6}
0x116c8…116fe Head {h00=0x0032, h01=0x0050, text=»* LENGTH IN DWT AND EXITS TO THE ROUTINE THAT «, t00=0x00b2, t01=0x00d8}
0x116fe…1171a Head {h00=0x0018, h01=0x0050, text=»* MADE THE I/O CALL.«, t00=0x00b2, t01=0x010e}
0x1171a…11724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x012a}
0x11724…11734 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00b2, t01=0x0134}
0x11734…1174c Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00b2, t01=0x0144}
0x1174c…11756 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x015c}
0x11756…11766 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00b2, t01=0x0166}
0x11766…11780 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00b2, t01=0x0176}
0x11780…1179c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b2, t01=0x0190}
0x1179c…117b8 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00b3, t01=0x001c}
0x117b8…117c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x0038}
0x117c2…117d4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00b3, t01=0x0042}
0x117d4…117f0 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00b3, t01=0x0054}
0x117f0…1180c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b3, t01=0x0070}
0x1180c…11828 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00b3, t01=0x008c}
0x11828…11832 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x00a8}
0x11832…11876 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b3, t01=0x00b2}
0x11876…11880 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x00f6}
0x11880…11896 Head {h00=0x0012, h01=0x0050, text=» IFT PLCTST=1 «, t00=0x00b3, t01=0x0100}
0x11896…118aa Head {h00=0x0010, h01=0x0050, text=»COMPPS EQU *«, t00=0x00b3, t01=0x0116}
0x118aa…118be Head {h00=0x0010, h01=0x0050, text=»COMPDS EQU *«, t00=0x00b3, t01=0x012a}
0x118be…118d2 Head {h00=0x0010, h01=0x0050, text=»COMPRM EQU *«, t00=0x00b3, t01=0x013e}
0x118d2…118dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x0152}
0x118dc…118ea Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b3, t01=0x015c}
0x118ea…118f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x016a}
0x118f4…11912 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 PLC STATUS «, t00=0x00b3, t01=0x0174}
0x11912…11936 (180, 0, 398) Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TS100 ERROR. HANDLE «, t00=0x00b4, t01=0x0004}
0x11936…11940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0028}
0x11940…11970 Head {h00=0x002c, h01=0x0050, text=» LD A2,CWTRCA+CCRLEN,A5 EFFECTIVE LENGTH«, t00=0x00b4, t01=0x0032}
0x11970…11990 Head {h00=0x001c, h01=0x0050, text=» ST A2,DWTTLN,A6 TO DWT «, t00=0x00b4, t01=0x0062}
0x11990…119ae Head {h00=0x001a, h01=0x0050, text=» RF TS110 EXIT. A1 = 0«, t00=0x00b4, t01=0x0082}
0x119ae…119b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x00a0}
0x119b8…119cc Head {h00=0x0010, h01=0x0050, text=»TS100 EQU * «, t00=0x00b4, t01=0x00aa}
0x119cc…119fe Head {h00=0x002e, h01=0x0050, text=» LDK A1,NOTOPR RETURN CODE := NOT OPERABLE«, t00=0x00b4, t01=0x00be}
0x119fe…11a2a Head {h00=0x0028, h01=0x0050, text=» CM DWTTLN,A6 EFFECTIVE LENGTH := 0 «, t00=0x00b4, t01=0x00f0}
0x11a2a…11a34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x011c}
0x11a34…11a48 Head {h00=0x0010, h01=0x0050, text=»TS110 EQU * «, t00=0x00b4, t01=0x0126}
0x11a48…11a6a Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00b4, t01=0x013a}
0x11a6a…11aa0 Head {h00=0x0032, h01=0x0050, text=» ABL TSTRST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00b4, t01=0x015c}
0x11aa0…11aac (181, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b5, t01=0x0004}
0x11aac…11ab6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0010}
0x11ab6…11ac4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b5, t01=0x001a}
0x11ac4…11ace Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0028}
0x11ace…11b12 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b5, t01=0x0032}
0x11b12…11b1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0076}
0x11b1c…11b34 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00b5, t01=0x0080}
0x11b34…11b46 Head {h00=0x000e, h01=0x0050, text=»* COMPWRI «, t00=0x00b5, t01=0x0098}
0x11b46…11b50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x00aa}
0x11b50…11b64 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00b5, t01=0x00b4}
0x11b64…11b9a Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES COMPLETION OF STANDARD «, t00=0x00b5, t01=0x00c8}
0x11b9a…11bba Head {h00=0x001c, h01=0x0050, text=»* WRITE AND FAST WRITE. «, t00=0x00b5, t01=0x00fe}
0x11bba…11bf4 Head {h00=0x0036, h01=0x0050, text=»* IT CHECKS THE PLC STATUS AND RELEASES THE OUTPUT«, t00=0x00b5, t01=0x011e}
0x11bf4…11c2a Head {h00=0x0032, h01=0x0050, text=»* BUFFER, IF ANY WAS ALLOCATED. IF THE OUTPUT «, t00=0x00b5, t01=0x0158}
0x11c2a…11c60 Head {h00=0x0032, h01=0x0050, text=»* OPERATION IS FINISHED, IT THEN EXITS TO THE «, t00=0x00b5, t01=0x018e}
0x11c60…11c8a Head {h00=0x0026, h01=0x0050, text=»* ROUTINE THAT MADE THE I/O CALL. «, t00=0x00b6, t01=0x0034}
0x11c8a…11c94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x005e}
0x11c94…11ca4 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00b6, t01=0x0068}
0x11ca4…11cbc Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00b6, t01=0x0078}
0x11cbc…11cc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x0090}
0x11cc6…11cd6 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00b6, t01=0x009a}
0x11cd6…11cf0 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00b6, t01=0x00aa}
0x11cf0…11d10 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00b6, t01=0x00c4}
0x11d10…11d2c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b6, t01=0x00e4}
0x11d2c…11d48 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00b6, t01=0x0100}
0x11d48…11d52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x011c}
0x11d52…11d64 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00b6, t01=0x0126}
0x11d64…11d98 Head {h00=0x0030, h01=0x0050, text=»* WHEN RETURN TO ROUTINE MAKING OUTPUT CALL «, t00=0x00b6, t01=0x0138}
0x11d98…11db4 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00b6, t01=0x016c}
0x11db4…11dd2 Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO «, t00=0x00b6, t01=0x0188}
0x11dd2…11df4 Head {h00=0x001e, h01=0x0050, text=»* BITS 8-15 DEVICE STATUS«, t00=0x00b7, t01=0x0016}
0x11df4…11e10 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b7, t01=0x0038}
0x11e10…11e2c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00b7, t01=0x0054}
0x11e2c…11e36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x0070}
0x11e36…11e7a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b7, t01=0x007a}
0x11e7a…11e84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x00be}
0x11e84…11e92 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b7, t01=0x00c8}
0x11e92…11e9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x00d6}
0x11e9c…11eb0 Head {h00=0x0010, h01=0x0050, text=»COMPSW EQU *«, t00=0x00b7, t01=0x00e0}
0x11eb0…11ec4 Head {h00=0x0010, h01=0x0050, text=»COMPFW EQU *«, t00=0x00b7, t01=0x00f4}
0x11ec4…11ee8 Head {h00=0x0020, h01=0x0050, text=» LDR A2,A2 FATAL PLC STATUS?«, t00=0x00b7, t01=0x0108}
0x11ee8…11f0a Head {h00=0x001e, h01=0x0050, text=» RF(NZ) WRERR1 YES, HANDLE«, t00=0x00b7, t01=0x012c}
0x11f0a…11f14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x014e}
0x11f14…11f3e Head {h00=0x0026, h01=0x0050, text=» LC A2,DWTCP2,A6 CHANEL PARAMETER «, t00=0x00b7, t01=0x0158}
0x11f3e…11f64 Head {h00=0x0022, h01=0x0050, text=» ANK A2,MASKWS CLEAN WS NUMBER«, t00=0x00b7, t01=0x0182}
0x11f64…11f8c Head {h00=0x0024, h01=0x0050, text=» CF A15,STAHAN HANDLE PLC STATUS«, t00=0x00b8, t01=0x0018}
0x11f8c…11fc2 Head {h00=0x0032, h01=0x0050, text=» LC A7,CWTRCA+CCRIDB,A5 TYPE OF WRITE COMMAND «, t00=0x00b8, t01=0x0040}
0x11fc2…11fdc Head {h00=0x0016, h01=0x0050, text=» ANK A7,/FF CLEAN «, t00=0x00b8, t01=0x0076}
0x11fdc…1200a Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTRCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x00b8, t01=0x0090}
0x1200a…1202c Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00b8, t01=0x00be}
0x1202c…1205e Head {h00=0x002e, h01=0x0050, text=» ABI WRIROU,A7 CALL CORRESPONDING ROUTINE «, t00=0x00b8, t01=0x00e0}
0x1205e…12068 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0112}
0x12068…12072 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x011c}
0x12072…12092 Head {h00=0x001c, h01=0x0050, text=»* IRRECOVERABLE ERROR«, t00=0x00b8, t01=0x0126}
0x12092…1209c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0146}
0x1209c…120b0 Head {h00=0x0010, h01=0x0050, text=»WRERR1 EQU *«, t00=0x00b8, t01=0x0150}
0x120b0…120d2 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00b8, t01=0x0164}
0x120d2…120e6 Head {h00=0x0010, h01=0x0050, text=»WRERR EQU * «, t00=0x00b8, t01=0x0186}
0x120e6…120fe Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00b9, t01=0x000a}
0x120fe…12108 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0022}
0x12108…12112 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x002c}
0x12112…12140 Head {h00=0x002a, h01=0x0050, text=»* COMPLETION OF DATA MESSAGE OUTPUT«, t00=0x00b9, t01=0x0036}
0x12140…1214a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0064}
0x1214a…1215e Head {h00=0x0010, h01=0x0050, text=»WRNFLO EQU *«, t00=0x00b9, t01=0x006e}
0x1215e…12172 Head {h00=0x0010, h01=0x0050, text=»WRDATA EQU *«, t00=0x00b9, t01=0x0082}
0x12172…1219e Head {h00=0x0028, h01=0x0050, text=» CF A15,PLRLBU RELEASE OUTPUT BUFFER«, t00=0x00b9, t01=0x0096}
0x1219e…121c6 Head {h00=0x0024, h01=0x0050, text=» CM DWTLD1,A6 INDICATE NO BUFFER«, t00=0x00b9, t01=0x00c2}
0x121c6…121f4 Head {h00=0x002a, h01=0x0050, text=» ABL ACKRST RETURN TO REQUEST HANDLER «, t00=0x00b9, t01=0x00ea}
0x121f4…121fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0118}
0x121fe…12208 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0122}
0x12208…12240 Head {h00=0x0034, h01=0x0050, text=»* COMPLETION OF RECIEVE READY MESSAGE OUTPUT «, t00=0x00b9, t01=0x012c}
0x12240…1224a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0164}
0x1224a…1225c Head {h00=0x000e, h01=0x0050, text=»WRRR EQU *«, t00=0x00b9, t01=0x016e}
0x1225c…12284 Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 START OF MONITOR BLOCK«, t00=0x00b9, t01=0x0180}
0x12284…122a2 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00ba, t01=0x0018}
0x122a2…122d2 Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00ba, t01=0x0036}
0x122d2…122fa Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00ba, t01=0x0066}
0x122fa…1231e Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00ba, t01=0x008e}
0x1231e…12328 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00b2}
0x12328…12340 Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00ba, t01=0x00bc}
0x12340…1234a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00d4}
0x1234a…12354 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00de}
0x12354…12390 Head {h00=0x0038, h01=0x0050, text=»* COMPLETION OF RESET CONFIRMATION MESSAGE OUTPUT«, t00=0x00ba, t01=0x00e8}
0x12390…1239a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x0124}
0x1239a…123ae Head {h00=0x0010, h01=0x0050, text=»WRRESC EQU *«, t00=0x00ba, t01=0x012e}
0x123ae…123d6 Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 START OF MONITOR BLOCK«, t00=0x00ba, t01=0x0142}
0x123d6…123f4 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00ba, t01=0x016a}
0x123f4…12424 Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00ba, t01=0x0188}
0x12424…1244c Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00bb, t01=0x0028}
0x1244c…12470 Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00bb, t01=0x0050}
0x12470…1247a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0074}
0x1247a…124ac Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/FFFF-DWFRES MASK FOR RESET FLAG «, t00=0x00bb, t01=0x007e}
0x124ac…124d8 Head {h00=0x0028, h01=0x0050, text=» ANS A2,DWTST,A6 CLEAR "RESET" FLAG «, t00=0x00bb, t01=0x00b0}
0x124d8…1250c Head {h00=0x0030, h01=0x0050, text=» LDK A4,RELINE RECOVERY CAUSE := LINK RESET «, t00=0x00bb, t01=0x00dc}
0x1250c…12538 Head {h00=0x0028, h01=0x0050, text=» CF A15,NDREDW CALL RECOVERY FOR DWT«, t00=0x00bb, t01=0x0110}
0x12538…1255c Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00bb, t01=0x013c}
0x1255c…12566 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0160}
0x12566…12574 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bb, t01=0x016a}
0x12574…1257e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0178}
0x1257e…125c2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00bb, t01=0x0182}
0x125c2…125cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0036}
0x125cc…125e4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00bc, t01=0x0040}
0x125e4…125f4 Head {h00=0x000c, h01=0x0050, text=»* COMPGR«, t00=0x00bc, t01=0x0058}
0x125f4…125fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0068}
0x125fe…12612 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00bc, t01=0x0072}
0x12612…12646 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE HANDLES COMPLETION OF GENERAL«, t00=0x00bc, t01=0x0086}
0x12646…1265e Head {h00=0x0014, h01=0x0050, text=»* READ COMMANDS.«, t00=0x00bc, t01=0x00ba}
0x1265e…1268c Head {h00=0x002a, h01=0x0050, text=»* IT CHECKS TYPE OF MESSAGE AND CALLS «, t00=0x00bc, t01=0x00d2}
0x1268c…126ac Head {h00=0x001c, h01=0x0050, text=»* CORRESPONDING ROUTINE.«, t00=0x00bc, t01=0x0100}
0x126ac…126b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0120}
0x126b6…126c6 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00bc, t01=0x012a}
0x126c6…126de Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00bc, t01=0x013a}
0x126de…126e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0152}
0x126e8…126f8 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00bc, t01=0x015c}
0x126f8…12712 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00bc, t01=0x016c}
0x12712…12732 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00bc, t01=0x0186}
0x12732…1274e Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00bd, t01=0x0016}
0x1274e…12758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0032}
0x12758…1276a Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00bd, t01=0x003c}
0x1276a…12784 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00bd, t01=0x004e}
0x12784…127a2 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00bd, t01=0x0068}
0x127a2…127be Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00bd, t01=0x0086}
0x127be…127d8 Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00bd, t01=0x00a2}
0x127d8…12804 Head {h00=0x0028, h01=0x0050, text=»* A7 = DEVICE ADDRESS (IF RELEVANT)«, t00=0x00bd, t01=0x00bc}
0x12804…1280e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x00e8}
0x1280e…12852 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00bd, t01=0x00f2}
0x12852…1285c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0136}
0x1285c…12870 Head {h00=0x0010, h01=0x0050, text=»COMPGR EQU *«, t00=0x00bd, t01=0x0140}
0x12870…12890 Head {h00=0x001c, h01=0x0050, text=» LDR A2,A2 FATAL STATUS?«, t00=0x00bd, t01=0x0154}
0x12890…128b0 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) GRERR2 YES, EXIT«, t00=0x00bd, t01=0x0174}
0x128b0…128ba (190, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0004}
0x128ba…128c8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00be, t01=0x000e}
0x128c8…128d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x001c}
0x128d2…128fe Head {h00=0x0028, h01=0x0050, text=» CF A15,INTYPE A3 := TYPE OF MESSAGE«, t00=0x00be, t01=0x0026}
0x128fe…1292c Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTRCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x00be, t01=0x0052}
0x1292c…12956 Head {h00=0x0026, h01=0x0050, text=» LC A6,CWTRCA+CCRDLS,A5 DLS INDEX «, t00=0x00be, t01=0x0080}
0x12956…12972 Head {h00=0x0018, h01=0x0050, text=» ANK A6,MASKWS CLEAN«, t00=0x00be, t01=0x00aa}
0x12972…1299a Head {h00=0x0024, h01=0x0050, text=» LC A7,X25LCN,A4 DEVICE ADDRESS «, t00=0x00be, t01=0x00c6}
0x1299a…129b6 Head {h00=0x0018, h01=0x0050, text=» ANK A7,MASKLC CLEAN«, t00=0x00be, t01=0x00ee}
0x129b6…129c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x010a}
0x129c0…129f4 Head {h00=0x0030, h01=0x0050, text=» ABI REAROU,A3 ROUTINE FOR THIS MESSAGE TYPE«, t00=0x00be, t01=0x0114}
0x129f4…129fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0148}
0x129fe…12a0c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00be, t01=0x0152}
0x12a0c…12a16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0160}
0x12a16…12a5a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00be, t01=0x016a}
0x12a5a…12a64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x001e}
0x12a64…12a7c Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00bf, t01=0x0028}
0x12a7c…12a8c Head {h00=0x000c, h01=0x0050, text=»* GRERR «, t00=0x00bf, t01=0x0040}
0x12a8c…12a96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x0050}
0x12a96…12aaa Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00bf, t01=0x005a}
0x12aaa…12ae0 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES ILLEGAL INPUT MESSAGES.«, t00=0x00bf, t01=0x006e}
0x12ae0…12b00 Head {h00=0x001c, h01=0x0050, text=»* GRERR1 RETURNS BUFFER «, t00=0x00bf, t01=0x00a4}
0x12b00…12b0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x00c4}
0x12b0a…12b1a Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00bf, t01=0x00ce}
0x12b1a…12b32 Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00bf, t01=0x00de}
0x12b32…12b46 Head {h00=0x0010, h01=0x0050, text=»* RB GRERR1 «, t00=0x00bf, t01=0x00f6}
0x12b46…12b5a Head {h00=0x0010, h01=0x0050, text=»* RF GRERR2 «, t00=0x00bf, t01=0x010a}
0x12b5a…12b64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x011e}
0x12b64…12b74 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00bf, t01=0x0128}
0x12b74…12b9e Head {h00=0x0026, h01=0x0050, text=»* A4 = BUFFER ADDRESS (IF GRERR1)«, t00=0x00bf, t01=0x0138}
0x12b9e…12bba Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00bf, t01=0x0162}
0x12bba…12bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x017e}
0x12bc4…12bd6 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00bf, t01=0x0188}
0x12bd6…12be2 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00c0, t01=0x000a}
0x12be2…12bec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0016}
0x12bec…12c30 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c0, t01=0x0020}
0x12c30…12c3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0064}
0x12c3a…12c4e Head {h00=0x0010, h01=0x0050, text=»GRERR1 EQU *«, t00=0x00c0, t01=0x006e}
0x12c4e…12c80 Head {h00=0x002e, h01=0x0050, text=» CF A15,PLRLBU RELEASE GENERAL READ BUFFER«, t00=0x00c0, t01=0x0082}
0x12c80…12c8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x00b4}
0x12c8a…12c9e Head {h00=0x0010, h01=0x0050, text=»GRERR2 EQU *«, t00=0x00c0, t01=0x00be}
0x12c9e…12cc0 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00c0, t01=0x00d2}
0x12cc0…12cca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x00f4}
0x12cca…12ce2 Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00c0, t01=0x00fe}
0x12ce2…12cec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0116}
0x12cec…12cfa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c0, t01=0x0120}
0x12cfa…12d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x012e}
0x12d04…12d48 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c0, t01=0x0138}
0x12d48…12d52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x017c}
0x12d52…12d6a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00c0, t01=0x0186}
0x12d6a…12d7a Head {h00=0x000c, h01=0x0050, text=»* GRSACK«, t00=0x00c1, t01=0x000e}
0x12d7a…12d84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x001e}
0x12d84…12d98 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00c1, t01=0x0028}
0x12d98…12dd0 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE HANDLES STATUS AND RECIEVE READY «, t00=0x00c1, t01=0x003c}
0x12dd0…12df2 Head {h00=0x001e, h01=0x0050, text=»* MESSAGES FROM A DEVICE. «, t00=0x00c1, t01=0x0074}
0x12df2…12e2a Head {h00=0x0034, h01=0x0050, text=»* IT RELEASES THE BUFFER AND RETURNS TO ROUTINE «, t00=0x00c1, t01=0x0096}
0x12e2a…12e44 Head {h00=0x0016, h01=0x0050, text=»* MAKING I/O CALL.«, t00=0x00c1, t01=0x00ce}
0x12e44…12e4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x00e8}
0x12e4e…12e5e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00c1, t01=0x00f2}
0x12e5e…12e76 Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00c1, t01=0x0102}
0x12e76…12e80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x011a}
0x12e80…12e90 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00c1, t01=0x0124}
0x12e90…12eae Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00c1, t01=0x0134}
0x12eae…12eca Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c1, t01=0x0152}
0x12eca…12ee4 Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00c1, t01=0x016e}
0x12ee4…12f02 Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x00c1, t01=0x0188}
0x12f02…12f0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x0016}
0x12f0c…12f1e Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00c2, t01=0x0020}
0x12f1e…12f3a Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00c2, t01=0x0032}
0x12f3a…12f4e Head {h00=0x0010, h01=0x0050, text=»* =0 IF OK «, t00=0x00c2, t01=0x004e}
0x12f4e…12f66 Head {h00=0x0014, h01=0x0050, text=»* ><0 IF ERROR «, t00=0x00c2, t01=0x0062}
0x12f66…12f84 Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x00c2, t01=0x007a}
0x12f84…12fa8 Head {h00=0x0020, h01=0x0050, text=»* BITS 8-15 DEVICE STATUS «, t00=0x00c2, t01=0x0098}
0x12fa8…12fc4 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c2, t01=0x00bc}
0x12fc4…12fe0 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00c2, t01=0x00d8}
0x12fe0…12fea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x00f4}
0x12fea…1302e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c2, t01=0x00fe}
0x1302e…13038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x0142}
0x13038…13046 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c2, t01=0x014c}
0x13046…13050 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x015a}
0x13050…13064 Head {h00=0x0010, h01=0x0050, text=»GRSTAT EQU *«, t00=0x00c2, t01=0x0164}
0x13064…1308c Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00c2, t01=0x0178}
0x1308c…130b0 Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00c3, t01=0x0010}
0x130b0…130e4 Head {h00=0x0030, h01=0x0050, text=» CF A15,FWIPSR UPDATE FLOW CONTROL COUNTERS «, t00=0x00c3, t01=0x0034}
0x130e4…13110 Head {h00=0x0028, h01=0x0050, text=» LC A2,X25DAT,A4 DEVICE STATUS BYTE «, t00=0x00c3, t01=0x0068}
0x13110…1312a Head {h00=0x0016, h01=0x0050, text=» ANK A2,/FF CLEAN «, t00=0x00c3, t01=0x0094}
0x1312a…13148 Head {h00=0x001a, h01=0x0050, text=» RF SR100 COMMON PART «, t00=0x00c3, t01=0x00ae}
0x13148…13152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x00cc}
0x13152…1315c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x00d6}
0x1315c…1316e Head {h00=0x000e, h01=0x0050, text=»GRRR EQU *«, t00=0x00c3, t01=0x00e0}
0x1316e…13196 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00c3, t01=0x00f2}
0x13196…131ba Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00c3, t01=0x011a}
0x131ba…131ec Head {h00=0x002e, h01=0x0050, text=» CF A15,FWIPR UPDATE FLOW CONTROL COUNTERS«, t00=0x00c3, t01=0x013e}
0x131ec…13216 Head {h00=0x0026, h01=0x0050, text=» LDK A2,0 RESET DEVICE STATUS BYTE«, t00=0x00c3, t01=0x0170}
0x13216…13220 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x000a}
0x13220…1322a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x0014}
0x1322a…1323e Head {h00=0x0010, h01=0x0050, text=»SR100 EQU * «, t00=0x00c4, t01=0x001e}
0x1323e…13284 Head {h00=0x0042, h01=0x0050, text=»* COMMON PART FOR DEVICE STATUS AND RECIEVE READY MESSAGES «, t00=0x00c4, t01=0x0032}
0x13284…132a6 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00c4, t01=0x0078}
0x132a6…132d8 Head {h00=0x002e, h01=0x0050, text=» CF A15,PLRLBU RELEASE GENERAL READ BUFFER«, t00=0x00c4, t01=0x009a}
0x132d8…132fa Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTST,A6 DWT STATUS«, t00=0x00c4, t01=0x00cc}
0x132fa…1330c Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x00c4, t01=0x00ee}
0x1330c…13344 Head {h00=0x0034, h01=0x0050, text=» ANK A4,DWFAK3 ANYONE WAITING FOR THIS MESSAGE? «, t00=0x00c4, t01=0x0100}
0x13344…13368 Head {h00=0x0020, h01=0x0050, text=» ABL(Z) PLDSP2 NO, DISPATCH «, t00=0x00c4, t01=0x0138}
0x13368…13372 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x015c}
0x13372…1339a Head {h00=0x0024, h01=0x0050, text=» XRS A4,DWTST,A6 RESET WAIT FLAG«, t00=0x00c4, t01=0x0166}
0x1339a…133be Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RETURN CODE := OK «, t00=0x00c4, t01=0x018e}
0x133be…133f2 Head {h00=0x0030, h01=0x0050, text=» ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x00c5, t01=0x0022}
0x133f2…13420 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) AK3RST YES, RETURN WITH ACK 3«, t00=0x00c5, t01=0x0056}
0x13420…1344e Head {h00=0x002a, h01=0x0050, text=» ABL WINRST NO, RETURN TO WINDOW QUEUE«, t00=0x00c5, t01=0x0084}
0x1344e…13458 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x00b2}
0x13458…13466 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c5, t01=0x00bc}
0x13466…13470 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x00ca}
0x13470…134b4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c5, t01=0x00d4}
0x134b4…134be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x0118}
0x134be…134d6 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00c5, t01=0x0122}
0x134d6…134e6 Head {h00=0x000c, h01=0x0050, text=»* GRDATA«, t00=0x00c5, t01=0x013a}
0x134e6…134f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x014a}
0x134f0…13504 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00c5, t01=0x0154}
0x13504…13538 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE HANDLES DATA INPUT MESSAGES. «, t00=0x00c5, t01=0x0168}
0x13538…13562 Head {h00=0x0026, h01=0x0050, text=»* IT LINKS THE BUFFER TO THE CWT. «, t00=0x00c6, t01=0x000c}
0x13562…1356c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x0036}
0x1356c…1357c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00c6, t01=0x0040}
0x1357c…13594 Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00c6, t01=0x0050}
0x13594…1359e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x0068}
0x1359e…135ae Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00c6, t01=0x0072}
0x135ae…135cc Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00c6, t01=0x0082}
0x135cc…135e8 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c6, t01=0x00a0}
0x135e8…13602 Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00c6, t01=0x00bc}
0x13602…13620 Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x00c6, t01=0x00d6}
0x13620…1362a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x00f4}
0x1362a…1363c Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00c6, t01=0x00fe}
0x1363c…13648 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00c6, t01=0x0110}
0x13648…13652 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x011c}
0x13652…13696 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c6, t01=0x0126}
0x13696…136a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x016a}
0x136a0…136b4 Head {h00=0x0010, h01=0x0050, text=»GRDATA EQU *«, t00=0x00c6, t01=0x0174}
0x136b4…136dc Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00c6, t01=0x0188}
0x136dc…13700 Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00c7, t01=0x0020}
0x13700…1370a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0044}
0x1370a…1373e Head {h00=0x0030, h01=0x0050, text=» CF A15,FWIPSR UPDATE FLOW CONTROL COUNTERS «, t00=0x00c7, t01=0x004e}
0x1373e…13776 Head {h00=0x0034, h01=0x0050, text=» ST A4,CWTBUF,A5 SAVE INPUT DATA BUFFER ADDRESS «, t00=0x00c7, t01=0x0082}
0x13776…137aa Head {h00=0x0030, h01=0x0050, text=» ST A6,BUFDWT,A4 SAVE DWT ADDRESS IN BUFFER «, t00=0x00c7, t01=0x00ba}
0x137aa…137da Head {h00=0x002c, h01=0x0050, text=» LD A2,CWTRCA+CCRLEN,A5 EFFECTIVE LENGTH«, t00=0x00c7, t01=0x00ee}
0x137da…13802 Head {h00=0x0024, h01=0x0050, text=» ST A2,BUFLEN,A4 SAVE IN BUFFER «, t00=0x00c7, t01=0x011e}
0x13802…1382c Head {h00=0x0026, h01=0x0050, text=» LDK A2,X25DAT START OF USER DATA «, t00=0x00c7, t01=0x0146}
0x1382c…13852 Head {h00=0x0022, h01=0x0050, text=» ST A2,BUFBIX,A4 TO BYTE INDEX«, t00=0x00c7, t01=0x0170}
0x13852…1385c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0008}
0x1385c…1386a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c8, t01=0x0012}
0x1386a…13874 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0020}
0x13874…13896 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00c8, t01=0x002a}
0x13896…138ae Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00c8, t01=0x004c}
0x138ae…138b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0064}
0x138b8…138c6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c8, t01=0x006e}
0x138c6…138d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x007c}
0x138d0…13914 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c8, t01=0x0086}
0x13914…1391e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x00ca}
0x1391e…13936 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00c8, t01=0x00d4}
0x13936…13946 Head {h00=0x000c, h01=0x0050, text=»* GRRES «, t00=0x00c8, t01=0x00ec}
0x13946…13950 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x00fc}
0x13950…13964 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00c8, t01=0x0106}
0x13964…1399a Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES RESET MESSAGES FROM THE«, t00=0x00c8, t01=0x011a}
0x1399a…139ae Head {h00=0x0010, h01=0x0050, text=»* SECONDARY.«, t00=0x00c8, t01=0x0150}
0x139ae…139e8 Head {h00=0x0036, h01=0x0050, text=»* IT RESETS THE FLOW CONTROL COUNTERS IN THE DWT, «, t00=0x00c8, t01=0x0164}
0x139e8…13a22 Head {h00=0x0036, h01=0x0050, text=»* AND SETS A RESET PACKET FLAG IN THE DWT. THEN A «, t00=0x00c9, t01=0x000e}
0x13a22…13a56 Head {h00=0x0030, h01=0x0050, text=»* RESET CONFIRMATION MESSAGE IS SENT. IF THE«, t00=0x00c9, t01=0x0048}
0x13a56…13a92 Head {h00=0x0038, h01=0x0050, text=»* PROCESS IS WAITING FOR LEVEL 3 ACK OR IN A BUFFER «, t00=0x00c9, t01=0x007c}
0x13a92…13ab0 Head {h00=0x001a, h01=0x0050, text=»* QUEUE IT IS ABORTED.«, t00=0x00c9, t01=0x00b8}
0x13ab0…13aba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c9, t01=0x00d6}
0x13aba…13aca Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00c9, t01=0x00e0}
0x13aca…13ae2 Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00c9, t01=0x00f0}
0x13ae2…13aec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c9, t01=0x0108}
0x13aec…13afc Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00c9, t01=0x0112}
0x13afc…13b1a Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00c9, t01=0x0122}
0x13b1a…13b36 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c9, t01=0x0140}
0x13b36…13b50 Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00c9, t01=0x015c}
0x13b50…13b6e Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x00c9, t01=0x0176}
0x13b6e…13b78 (202, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0004}
0x13b78…13b8a Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00ca, t01=0x000e}
0x13b8a…13b96 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00ca, t01=0x0020}
0x13b96…13ba0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x002c}
0x13ba0…13be4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00ca, t01=0x0036}
0x13be4…13bee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x007a}
0x13bee…13c02 Head {h00=0x0010, h01=0x0050, text=»GRRES EQU * «, t00=0x00ca, t01=0x0084}
0x13c02…13c2a Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00ca, t01=0x0098}
0x13c2a…13c4e Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00ca, t01=0x00c0}
0x13c4e…13c58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x00e4}
0x13c58…13c66 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ca, t01=0x00ee}
0x13c66…13c70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x00fc}
0x13c70…13c92 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00ca, t01=0x0106}
0x13c92…13cc4 Head {h00=0x002e, h01=0x0050, text=» CF A15,PLRLBU RELEASE GENERAL READ BUFFER«, t00=0x00ca, t01=0x0128}
0x13cc4…13cf6 Head {h00=0x002e, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL COUNTERS «, t00=0x00ca, t01=0x015a}
0x13cf6…13d00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x018c}
0x13d00…13d22 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x00cb, t01=0x0008}
0x13d22…13d50 Head {h00=0x002a, h01=0x0050, text=» ANK A2,DWFRES RESET ALREADY RECIEVED?«, t00=0x00cb, t01=0x002a}
0x13d50…13d72 Head {h00=0x001e, h01=0x0050, text=» ABL(NZ) PLDSP2 YES, EXIT «, t00=0x00cb, t01=0x0058}
0x13d72…13d88 Head {h00=0x0012, h01=0x0050, text=» LDK A2,DWFRES«, t00=0x00cb, t01=0x007a}
0x13d88…13db8 Head {h00=0x002c, h01=0x0050, text=» ORS A2,DWTST,A6 INDICATE RESET RECIEVED«, t00=0x00cb, t01=0x0090}
0x13db8…13dc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x00c0}
0x13dc2…13de8 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLCCCA RESERVE PLC CCA«, t00=0x00cb, t01=0x00ca}
0x13de8…13df4 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00cb, t01=0x00f0}
0x13df4…13dfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x00fc}
0x13dfe…13e26 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETBLK GET OUTPUT BUFFER«, t00=0x00cb, t01=0x0106}
0x13e26…13e44 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00cb, t01=0x012e}
0x13e44…13e74 Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00cb, t01=0x014c}
0x13e74…13eac Head {h00=0x0034, h01=0x0050, text=» CF A15,LNKFST PUT BLOCK IN QUEUE (FOR RECOVERY)«, t00=0x00cb, t01=0x017c}
0x13eac…13ece Head {h00=0x001e, h01=0x0050, text=» ADK A4,2 SKIP QUEUE LINK «, t00=0x00cc, t01=0x0024}
0x13ece…13f00 Head {h00=0x002e, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 BUFFER ADDR TO CCA«, t00=0x00cc, t01=0x0046}
0x13f00…13f3e Head {h00=0x003a, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR«, t00=0x00cc, t01=0x0078}
0x13f3e…13f72 Head {h00=0x0030, h01=0x0050, text=» CF A15,WRADR2 WRITE ADDRESS IN CCA (TYPE 2)«, t00=0x00cc, t01=0x00b6}
0x13f72…13fa6 Head {h00=0x0030, h01=0x0050, text=» LDK A2,CMDSW COMMAND CODE "STANDARD WRITE" «, t00=0x00cc, t01=0x00ea}
0x13fa6…13fcc Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRCMD,A5 TO CCA«, t00=0x00cc, t01=0x011e}
0x13fcc…13ff2 Head {h00=0x0022, h01=0x0050, text=» LDK A2,/1F MESSAGE TYPE FLAGS«, t00=0x00cc, t01=0x0144}
0x13ff2…1401c Head {h00=0x0026, h01=0x0050, text=» SC A2,X25FLW,A4 TO OUTPUT BUFFER «, t00=0x00cc, t01=0x016a}
0x1401c…1404c (205, 0, 400) Head {h00=0x002c, h01=0x0050, text=» LDK A2,TYRESC TYPE "RESET CONFIRMATION"«, t00=0x00cd, t01=0x0004}
0x1404c…1407e Head {h00=0x002e, h01=0x0050, text=» SC A2,CWTCCA+CCRIDB,A5 TO CCA, COMMAND ID«, t00=0x00cd, t01=0x0034}
0x1407e…140bc Head {h00=0x003a, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA, COMMAND ID«, t00=0x00cd, t01=0x0066}
0x140bc…140e8 Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT LENGTH OF SYSTEM PART«, t00=0x00cd, t01=0x00a4}
0x140e8…14116 Head {h00=0x002a, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 TO CCA LENGTH «, t00=0x00cd, t01=0x00d0}
0x14116…14120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x00fe}
0x14120…1412e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cd, t01=0x0108}
0x1412e…14138 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0116}
0x14138…1415a Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x00cd, t01=0x0120}
0x1415a…14184 Head {h00=0x0026, h01=0x0050, text=» ANK A2,DWFRES RESET STILL WANTED?«, t00=0x00cd, t01=0x0142}
0x14184…141a2 Head {h00=0x001a, h01=0x0050, text=» RF(Z) REERR1 NO, EXIT«, t00=0x00cd, t01=0x016c}
0x141a2…141cc Head {h00=0x0026, h01=0x0050, text=» CF A15,GETWSS A1 := STATUS & INH «, t00=0x00cd, t01=0x018a}
0x141cc…141f0 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) REERR1 EXIT IF ERROR«, t00=0x00ce, t01=0x0024}
0x141f0…14218 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x00ce, t01=0x0048}
0x14218…1423c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) REERR2 EXIT IF ERROR«, t00=0x00ce, t01=0x0070}
0x1423c…14246 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0094}
0x14246…14274 Head {h00=0x002a, h01=0x0050, text=» LDK A1,LINERR RET CODE := LINK ERROR «, t00=0x00ce, t01=0x009e}
0x14274…14296 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x00ce, t01=0x00cc}
0x14296…142a8 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x00ce, t01=0x00ee}
0x142a8…142d8 Head {h00=0x002c, h01=0x0050, text=» ANK A2,DWFAK3 WAITING FOR LEVEL 3 ACK? «, t00=0x00ce, t01=0x0100}
0x142d8…142fa Head {h00=0x001e, h01=0x0050, text=» RF(Z) RE100 NO, CONTINUE «, t00=0x00ce, t01=0x0130}
0x142fa…14322 Head {h00=0x0024, h01=0x0050, text=» XRS A2,DWTST,A6 RESET ACK3 FLAG«, t00=0x00ce, t01=0x0152}
0x14322…14356 Head {h00=0x0030, h01=0x0050, text=» ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x00ce, t01=0x017a}
0x14356…14384 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) AK3RST YES, RETURN WITH ACK 3«, t00=0x00cf, t01=0x001e}
0x14384…143b2 Head {h00=0x002a, h01=0x0050, text=» ABL WINRST NO, RETURN TO WINDOW QUEUE«, t00=0x00cf, t01=0x004c}
0x143b2…143bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x007a}
0x143bc…143d0 Head {h00=0x0010, h01=0x0050, text=»RE100 EQU * «, t00=0x00cf, t01=0x0084}
0x143d0…14404 Head {h00=0x0030, h01=0x0050, text=» CF A15,OUTBUQ REMOVE DWT FROM BUFFER QUEUE «, t00=0x00cf, t01=0x0098}
0x14404…1441e Head {h00=0x0016, h01=0x0050, text=» LDR A2,A2 FOUND? «, t00=0x00cf, t01=0x00cc}
0x1441e…14452 Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) BUFRST YES, RETURN WITH ERROR CODE «, t00=0x00cf, t01=0x00e6}
0x14452…1445c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x011a}
0x1445c…14480 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00cf, t01=0x0124}
0x14480…1448a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x0148}
0x1448a…14494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x0152}
0x14494…144a8 Head {h00=0x0010, h01=0x0050, text=»REERR1 EQU *«, t00=0x00cf, t01=0x015c}
0x144a8…144ca Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x00cf, t01=0x0170}
0x144ca…144de (208, 0, 400) Head {h00=0x0010, h01=0x0050, text=»REERR2 EQU *«, t00=0x00d0, t01=0x0004}
0x144de…14514 Head {h00=0x0032, h01=0x0050, text=»* ERROR. RETURN MONITOR BLOCK IMMEDIATELY«, t00=0x00d0, t01=0x0018}
0x14514…14544 Head {h00=0x002c, h01=0x0050, text=» SUK A4,2 START ADDRESS OF MONITOR BLOCK«, t00=0x00d0, t01=0x004e}
0x14544…1457c Head {h00=0x0034, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE. A7 ALREADY SET«, t00=0x00d0, t01=0x007e}
0x1457c…145a8 Head {h00=0x0028, h01=0x0050, text=» CF A15,FREBLK RETURN MONITOR BLOCK «, t00=0x00d0, t01=0x00b6}
0x145a8…145cc Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00d0, t01=0x00e2}
0x145cc…145d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x0106}
0x145d6…145e4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d0, t01=0x0110}
0x145e4…145ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x011e}
0x145ee…1460c Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x00d0, t01=0x0128}
0x1460c…1462a Head {h00=0x001a, h01=0x0050, text=»* RECOVERY ROUTINES * «, t00=0x00d0, t01=0x0146}
0x1462a…14648 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x00d0, t01=0x0164}
0x14648…14652 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x0182}
0x14652…14692 Head {h00=0x003c, h01=0x0050, text=»* THESE ROUTINES ARE USED AT SYSTEM START OR TC POWER «, t00=0x00d0, t01=0x018c}
0x14692…146d4 Head {h00=0x003e, h01=0x0050, text=»* UP. IN CASE OF POWER UP, THEY FIRST REMOVE ALL RUNNING«, t00=0x00d1, t01=0x003c}
0x146d4…14712 Head {h00=0x003a, h01=0x0050, text=»* OUTPUT OPERATIONS. AFTER THAT, THE PLC IS STARTED,«, t00=0x00d1, t01=0x007e}
0x14712…1474e Head {h00=0x0038, h01=0x0050, text=»* AND LAST RECOVERY ROUTINES IN DEVICE DRIVERS ARE«, t00=0x00d1, t01=0x00bc}
0x1474e…14770 Head {h00=0x001e, h01=0x0050, text=»* CALLED FOR ALL DWT:S. «, t00=0x00d1, t01=0x00f8}
0x14770…147ac Head {h00=0x0038, h01=0x0050, text=»* THE SECTION ALSO CONTAINS ROUTINES FOR RECOVERY «, t00=0x00d1, t01=0x011a}
0x147ac…147c6 Head {h00=0x0016, h01=0x0050, text=»* OF I/O ERRORS.«, t00=0x00d1, t01=0x0156}
0x147c6…147d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0170}
0x147d0…147da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x017a}
0x147da…1480e Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x00d1, t01=0x0184}
0x1480e…14818 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x0028}
0x14818…14830 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x00d2, t01=0x0032}
0x14830…1483a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x004a}
0x1483a…14876 Head {h00=0x0038, h01=0x0050, text=»* PLON CALL RECOVERY ONCE FOR EACH PLC CHANNEL UNIT «, t00=0x00d2, t01=0x0054}
0x14876…148aa Head {h00=0x0030, h01=0x0050, text=»* PLSTRT START PLC AND CALL DEVICE RECOVERY «, t00=0x00d2, t01=0x0090}
0x148aa…148b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x00c4}
0x148b4…148c2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d2, t01=0x00ce}
0x148c2…148cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x00dc}
0x148cc…14910 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d2, t01=0x00e6}
0x14910…1491a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x012a}
0x1491a…14932 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00d2, t01=0x0134}
0x14932…14940 Head {h00=0x000a, h01=0x0050, text=»* PLON«, t00=0x00d2, t01=0x014c}
0x14940…1494a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x015a}
0x1494a…1495e Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00d2, t01=0x0164}
0x1495e…14990 Head {h00=0x002e, h01=0x0050, text=»* THIS ROUTINE WILL ACTIVATE A MONITOR JOB«, t00=0x00d2, t01=0x0178}
0x14990…149c6 Head {h00=0x0032, h01=0x0050, text=»* FOR THE PLC RECOVERY, IF THE JOB NOT ALREADY«, t00=0x00d3, t01=0x001a}
0x149c6…149dc Head {h00=0x0012, h01=0x0050, text=»* IS PENDING. «, t00=0x00d3, t01=0x0050}
0x149dc…14a1a Head {h00=0x003a, h01=0x0050, text=»* THE MONITOR JOB WILL CALL THE RECOVERY ROUTINE ONCE «, t00=0x00d3, t01=0x0066}
0x14a1a…14a3a Head {h00=0x001c, h01=0x0050, text=»* FOR EACH PLC DEFINED. «, t00=0x00d3, t01=0x00a4}
0x14a3a…14a44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x00c4}
0x14a44…14a54 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00d3, t01=0x00ce}
0x14a54…14a6a Head {h00=0x0012, h01=0x0050, text=»* CF A15,PLON «, t00=0x00d3, t01=0x00de}
0x14a6a…14a74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x00f4}
0x14a74…14a84 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00d3, t01=0x00fe}
0x14a84…14a90 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00d3, t01=0x010e}
0x14a90…14a9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x011a}
0x14a9a…14aac Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00d3, t01=0x0124}
0x14aac…14ace Head {h00=0x001e, h01=0x0050, text=»* AT ENTRY TO PLSTRT:«, t00=0x00d3, t01=0x0136}
0x14ace…14aea Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00d3, t01=0x0158}
0x14aea…14af4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0174}
0x14af4…14b38 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d3, t01=0x017e}
0x14b38…14b42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0032}
0x14b42…14b54 Head {h00=0x000e, h01=0x0050, text=»PLON EQU *«, t00=0x00d4, t01=0x003c}
0x14b54…14b7c Head {h00=0x0024, h01=0x0050, text=» LD A1,PLCPFP POWER UP PENDING? «, t00=0x00d4, t01=0x004e}
0x14b7c…14b9c Head {h00=0x001c, h01=0x0050, text=» RF(NZ) PO100 YES, EXIT «, t00=0x00d4, t01=0x0076}
0x14b9c…14bc8 Head {h00=0x0028, h01=0x0050, text=» IM PLCPFP INDICATE POWER UP STARTED«, t00=0x00d4, t01=0x0096}
0x14bc8…14bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x00c2}
0x14bd2…14bf6 Head {h00=0x0020, h01=0x0050, text=» LDKL A2,PO110 START ADDRESS«, t00=0x00d4, t01=0x00cc}
0x14bf6…14c20 Head {h00=0x0026, h01=0x0050, text=» CF A15,QMJOB ACTIVATE MONITOR JOB«, t00=0x00d4, t01=0x00f0}
0x14c20…14c2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x011a}
0x14c2a…14c3e Head {h00=0x0010, h01=0x0050, text=»PO100 EQU * «, t00=0x00d4, t01=0x0124}
0x14c3e…14c4e Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x00d4, t01=0x0138}
0x14c4e…14c58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0148}
0x14c58…14c66 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d4, t01=0x0152}
0x14c66…14c70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0160}
0x14c70…14c84 Head {h00=0x0010, h01=0x0050, text=»PO110 EQU * «, t00=0x00d4, t01=0x016a}
0x14c84…14ca8 Head {h00=0x0020, h01=0x0050, text=» CM PLCPFP NO LONGER PENDING«, t00=0x00d4, t01=0x017e}
0x14ca8…14cb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0012}
0x14cb2…14cbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x001c}
0x14cbc…14ce2 Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x00d5, t01=0x0026}
0x14ce2…14d0e Head {h00=0x0028, h01=0x0050, text=»* RESET QUEUE STATISTICS COUNTERS«, t00=0x00d5, t01=0x004c}
0x14d0e…14d32 Head {h00=0x0020, h01=0x0050, text=» LDK A1,STATLN TABLE LENGTH «, t00=0x00d5, t01=0x0078}
0x14d32…14d46 Head {h00=0x0010, h01=0x0050, text=»PO113 EQU * «, t00=0x00d5, t01=0x009c}
0x14d46…14d62 Head {h00=0x0018, h01=0x0050, text=» SUK A1,2 NEXT WORD «, t00=0x00d5, t01=0x00b0}
0x14d62…14d8a Head {h00=0x0024, h01=0x0050, text=» RF(N) PO116 READY WHEN ALL DONE«, t00=0x00d5, t01=0x00cc}
0x14d8a…14dae Head {h00=0x0020, h01=0x0050, text=» CM STATAR,A1 RESET COUNTER «, t00=0x00d5, t01=0x00f4}
0x14dae…14dca Head {h00=0x0018, h01=0x0050, text=» RB PO113 NEXT WORD «, t00=0x00d5, t01=0x0118}
0x14dca…14dde Head {h00=0x0010, h01=0x0050, text=»PO116 EQU * «, t00=0x00d5, t01=0x0134}
0x14dde…14dea Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d5, t01=0x0148}
0x14dea…14df4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0154}
0x14df4…14e20 Head {h00=0x0028, h01=0x0050, text=» LDK A1,16 (MAX NUMBER OF PLC:S) * 2«, t00=0x00d5, t01=0x015e}
0x14e20…14e34 Head {h00=0x0010, h01=0x0050, text=»PO120 EQU * «, t00=0x00d5, t01=0x018a}
0x14e34…14e68 Head {h00=0x0030, h01=0x0050, text=»* THIS LOOP IS EXECUTED ONCE FOR EACH PLC«, t00=0x00d6, t01=0x000e}
0x14e68…14e82 Head {h00=0x0016, h01=0x0050, text=» SUK A1,2 NEXT PLC«, t00=0x00d6, t01=0x0042}
0x14e82…14ea8 Head {h00=0x0022, h01=0x0050, text=» RF(N) PO130 EXIT IF ALL DONE «, t00=0x00d6, t01=0x005c}
0x14ea8…14ecc Head {h00=0x0020, h01=0x0050, text=» LD A5,TABCWT,A1 CWT ADDRESS«, t00=0x00d6, t01=0x0082}
0x14ecc…14efa Head {h00=0x002a, h01=0x0050, text=» RB(Z) PO120 TAKE NEXT IF NOT DEFINED «, t00=0x00d6, t01=0x00a6}
0x14efa…14f1e Head {h00=0x0020, h01=0x0050, text=» CF A15,PLSTRT START ONE PLC«, t00=0x00d6, t01=0x00d4}
0x14f1e…14f38 Head {h00=0x0016, h01=0x0050, text=» RB PO120 NEXT PLC«, t00=0x00d6, t01=0x00f8}
0x14f38…14f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0112}
0x14f42…14f56 Head {h00=0x0010, h01=0x0050, text=»PO130 EQU * «, t00=0x00d6, t01=0x011c}
0x14f56…14f7a Head {h00=0x0020, h01=0x0050, text=» ABL MEXIT MONITOR JOB EXIT «, t00=0x00d6, t01=0x0130}
0x14f7a…14f84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0154}
0x14f84…14f92 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d6, t01=0x015e}
0x14f92…14f9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x016c}
0x14f9c…14fe0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d6, t01=0x0176}
0x14fe0…14fea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x002a}
0x14fea…15002 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00d7, t01=0x0034}
0x15002…15012 Head {h00=0x000c, h01=0x0050, text=»* PLSTRT«, t00=0x00d7, t01=0x004c}
0x15012…1501c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x005c}
0x1501c…15030 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00d7, t01=0x0066}
0x15030…15066 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE FIRST CLEARS ALL WORK AREAS AND«, t00=0x00d7, t01=0x007a}
0x15066…1509e Head {h00=0x0034, h01=0x0050, text=»* DWT:S, AND SETS THE DWT:S BUSY. IT THEN STARTS«, t00=0x00d7, t01=0x00b0}
0x1509e…150d4 Head {h00=0x0032, h01=0x0050, text=»* THE PLC, AND CALLS RECOVERY ROUTINES IN ALL «, t00=0x00d7, t01=0x00e8}
0x150d4…150ee Head {h00=0x0016, h01=0x0050, text=»* DEVICE DRIVERS. «, t00=0x00d7, t01=0x011e}
0x150ee…150f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x0138}
0x150f8…15108 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00d7, t01=0x0142}
0x15108…15120 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLSTRT «, t00=0x00d7, t01=0x0152}
0x15120…1512a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x016a}
0x1512a…1513a Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00d7, t01=0x0174}
0x1513a…15156 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00d7, t01=0x0184}
0x15156…15160 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0010}
0x15160…15172 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00d8, t01=0x001a}
0x15172…1517e Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00d8, t01=0x002c}
0x1517e…15188 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0038}
0x15188…151cc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d8, t01=0x0042}
0x151cc…151d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0086}
0x151d6…151ea Head {h00=0x0010, h01=0x0050, text=»PLSTRT EQU *«, t00=0x00d8, t01=0x0090}
0x151ea…15200 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00d8, t01=0x00a4}
0x15200…15220 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00d8, t01=0x00ba}
0x15220…1522c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d8, t01=0x00da}
0x1522c…15242 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00d8, t01=0x00e6}
0x15242…15260 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00d8, t01=0x00fc}
0x15260…1526c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00d8, t01=0x011a}
0x1526c…15276 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0126}
0x15276…15282 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00d8, t01=0x0130}
0x15282…152b8 Head {h00=0x0032, h01=0x0050, text=» IM CWTGR,A5 INDICATE GENERAL READ NOT ALLOWED«, t00=0x00d8, t01=0x013c}
0x152b8…152de Head {h00=0x0022, h01=0x0050, text=» CM CWTABW,A5 STOP ABORT OF WS«, t00=0x00d8, t01=0x0172}
0x152de…1530c Head {h00=0x002a, h01=0x0050, text=» CM CWTSBQ,A5 RESET SHORT BUFFER QUEUE«, t00=0x00d9, t01=0x0008}
0x1530c…1533a Head {h00=0x002a, h01=0x0050, text=» CM CWTLBQ,A5 RESET LONG BUFFER QUEUE «, t00=0x00d9, t01=0x0036}
0x1533a…15344 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0064}
0x15344…15352 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d9, t01=0x006e}
0x15352…1535c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x007c}
0x1535c…15370 Head {h00=0x0010, h01=0x0050, text=»ST100 EQU * «, t00=0x00d9, t01=0x0086}
0x15370…153a2 Head {h00=0x002e, h01=0x0050, text=»* RETURN MONITOR BLOCKS USED AS BUFFERS«, t00=0x00d9, t01=0x009a}
0x153a2…153b4 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00d9, t01=0x00cc}
0x153b4…153e4 Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00d9, t01=0x00de}
0x153e4…15404 Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A7 FIRST BLOCK «, t00=0x00d9, t01=0x010e}
0x15404…1542c Head {h00=0x0024, h01=0x0050, text=» RF(Z) ST105 CONTINUE IF NO LEFT«, t00=0x00d9, t01=0x012e}
0x1542c…15454 Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00d9, t01=0x0156}
0x15454…15478 Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00d9, t01=0x017e}
0x15478…15494 Head {h00=0x0018, h01=0x0050, text=» RB ST100 TAKE NEXT «, t00=0x00da, t01=0x0012}
0x15494…154a8 Head {h00=0x0010, h01=0x0050, text=»ST105 EQU * «, t00=0x00da, t01=0x002e}
0x154a8…154da Head {h00=0x002e, h01=0x0050, text=»* RETURN MONITOR BLOCKS FROM CCA QUEUE «, t00=0x00da, t01=0x0042}
0x154da…154ec Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00da, t01=0x0074}
0x154ec…15512 Head {h00=0x0022, h01=0x0050, text=» ADK A7,CWTCCQ CCA QUEUE HEAD «, t00=0x00da, t01=0x0086}
0x15512…15532 Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A7 FIRST BLOCK «, t00=0x00da, t01=0x00ac}
0x15532…1555a Head {h00=0x0024, h01=0x0050, text=» RF(Z) ST110 CONTINUE IF NO LEFT«, t00=0x00da, t01=0x00cc}
0x1555a…15582 Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00da, t01=0x00f4}
0x15582…155a6 Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00da, t01=0x011c}
0x155a6…155c2 Head {h00=0x0018, h01=0x0050, text=» RB ST105 TAKE NEXT «, t00=0x00da, t01=0x0140}
0x155c2…155cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x015c}
0x155cc…155e0 Head {h00=0x0010, h01=0x0050, text=»ST110 EQU * «, t00=0x00da, t01=0x0166}
0x155e0…15602 Head {h00=0x001e, h01=0x0050, text=»* INITIATE BUFFER AREAS«, t00=0x00da, t01=0x017a}
0x15602…15620 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A5 CWT ADDRESS«, t00=0x00db, t01=0x000c}
0x15620…15656 Head {h00=0x0032, h01=0x0050, text=» ADKL A4,CWTSOB AREA FOR SHORT OUTPUT BUFFERS «, t00=0x00db, t01=0x002a}
0x15656…15668 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00db, t01=0x0060}
0x15668…1569e Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTPBS POOLBLOCK, SHORT OUTPUT BUFFERS«, t00=0x00db, t01=0x0072}
0x1569e…156ca Head {h00=0x0028, h01=0x0050, text=» CF A15,INIBUF INITIATE BUFFER AREA «, t00=0x00db, t01=0x00a8}
0x156ca…156e8 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A5 CWT ADDRESS«, t00=0x00db, t01=0x00d4}
0x156e8…1571c Head {h00=0x0030, h01=0x0050, text=» ADKL A4,CWTLOB AREA FOR LONG OUTPUT BUFFERS«, t00=0x00db, t01=0x00f2}
0x1571c…1572e Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00db, t01=0x0126}
0x1572e…15764 Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTPBL POOLBLOCK, LONG OUTPUT BUFFERS «, t00=0x00db, t01=0x0138}
0x15764…15790 Head {h00=0x0028, h01=0x0050, text=» CF A15,INIBUF INITIATE BUFFER AREA «, t00=0x00db, t01=0x016e}
0x15790…157ae Head {h00=0x001a, h01=0x0050, text=» LDR A4,A5 CWT ADDRESS«, t00=0x00dc, t01=0x000a}
0x157ae…157e4 Head {h00=0x0032, h01=0x0050, text=» ADKL A4,CWTGRB AREA FOR GENERAL READ BUFFERS «, t00=0x00dc, t01=0x0028}
0x157e4…157f6 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00dc, t01=0x005e}
0x157f6…1582c Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTPBG POOLBLOCK, GENERAL READ BUFFERS«, t00=0x00dc, t01=0x0070}
0x1582c…15858 Head {h00=0x0028, h01=0x0050, text=» CF A15,INIBUF INITIATE BUFFER AREA «, t00=0x00dc, t01=0x00a6}
0x15858…15862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x00d2}
0x15862…15896 Head {h00=0x0030, h01=0x0050, text=»* RESET ALL DWT:S AND WORK STATION STATUS«, t00=0x00dc, t01=0x00dc}
0x15896…158ca Head {h00=0x0030, h01=0x0050, text=» LDK A3,MAXWS+1 NUMBER OF WORK STATIONS + 1 «, t00=0x00dc, t01=0x0110}
0x158ca…158de Head {h00=0x0010, h01=0x0050, text=»ST120 EQU * «, t00=0x00dc, t01=0x0144}
0x158de…15902 Head {h00=0x0020, h01=0x0050, text=» SUK A3,1 NEXT WORK STATION «, t00=0x00dc, t01=0x0158}
0x15902…1592a Head {h00=0x0024, h01=0x0050, text=» RF(N) ST150 END IF NO MORE LEFT«, t00=0x00dc, t01=0x017c}
0x1592a…15950 Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 WORK STATION NUMBER«, t00=0x00dd, t01=0x0014}
0x15950…1596c Head {h00=0x0018, h01=0x0050, text=» SLA A2,1 MAKE INDEX«, t00=0x00dd, t01=0x003a}
0x1596c…1598e Head {h00=0x001e, h01=0x0050, text=» ADR A2,A5 ADD CWT ADDRESS«, t00=0x00dd, t01=0x0056}
0x1598e…159be Head {h00=0x002c, h01=0x0050, text=» ADK A2,CWTWSS WORK STATION STATUS WORD «, t00=0x00dd, t01=0x0078}
0x159be…159da Head {h00=0x0018, h01=0x0050, text=» CMR A2 CLEAR STATUS«, t00=0x00dd, t01=0x00a8}
0x159da…159f0 Head {h00=0x0012, h01=0x0050, text=» LDK A1,NOTOPR«, t00=0x00dd, t01=0x00c4}
0x159f0…15a16 Head {h00=0x0022, h01=0x0050, text=» SCR A1,A2 WS := NOT OPERABLE «, t00=0x00dd, t01=0x00da}
0x15a16…15a4a Head {h00=0x0030, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE ADDRESS«, t00=0x00dd, t01=0x0100}
0x15a4a…15a70 Head {h00=0x0022, h01=0x0050, text=» LDR A6,A3 WORK STATION NUMBER«, t00=0x00dd, t01=0x0134}
0x15a70…15aa4 Head {h00=0x0030, h01=0x0050, text=» CF A15,NDGEDN A7 := HIGEST DWT NUMBER ON WS«, t00=0x00dd, t01=0x015a}
0x15aa4…15ab6 Head {h00=0x000e, h01=0x0050, text=» ADK A7,1 «, t00=0x00dd, t01=0x018e}
0x15ab6…15aca Head {h00=0x0010, h01=0x0050, text=»ST130 EQU * «, t00=0x00de, t01=0x0010}
0x15aca…15ae4 Head {h00=0x0016, h01=0x0050, text=» SUK A7,1 NEXT DWT«, t00=0x00de, t01=0x0024}
0x15ae4…15b10 Head {h00=0x0028, h01=0x0050, text=» RF(N) ST140 NEXT WS IF NO DWT LEFT «, t00=0x00de, t01=0x003e}
0x15b10…15b2c Head {h00=0x0018, h01=0x0050, text=» LDR A6,A3 WS NUMBER«, t00=0x00de, t01=0x006a}
0x15b2c…15b54 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00de, t01=0x0086}
0x15b54…15b74 Head {h00=0x001c, h01=0x0050, text=» RB(Z) ST130 NOT DEFINED«, t00=0x00de, t01=0x00ae}
0x15b74…15b9c Head {h00=0x0024, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL«, t00=0x00de, t01=0x00ce}
0x15b9c…15bc0 Head {h00=0x0020, h01=0x0050, text=» LDKL A2,/FFFF-DWFBSY-DWFPLC«, t00=0x00de, t01=0x00f6}
0x15bc0…15be8 Head {h00=0x0024, h01=0x0050, text=»* MASK FOR BUSY AND PLC FLAGS«, t00=0x00de, t01=0x011a}
0x15be8…15c0c Head {h00=0x0020, h01=0x0050, text=» ANS A2,DWTST,A6 RESET FLAGS«, t00=0x00de, t01=0x0142}
0x15c0c…15c38 Head {h00=0x0028, h01=0x0050, text=» CM DWTLD1,A6 RELEASE BUFFER, IF ANY«, t00=0x00de, t01=0x0166}
0x15c38…15c6c (223, 0, 398) Head {h00=0x0030, h01=0x0050, text=» CM DWTOTQ,A6 REMOVE DWT FROM QUEUE, IF ANY «, t00=0x00df, t01=0x0004}
0x15c6c…15c86 Head {h00=0x0016, h01=0x0050, text=» RB ST130 NEXT DWT«, t00=0x00df, t01=0x0038}
0x15c86…15c9a Head {h00=0x0010, h01=0x0050, text=»ST140 EQU * «, t00=0x00df, t01=0x0052}
0x15c9a…15cbe Head {h00=0x0020, h01=0x0050, text=» RB ST120 NEXT WORK STATION «, t00=0x00df, t01=0x0066}
0x15cbe…15cc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x008a}
0x15cc8…15cdc Head {h00=0x0010, h01=0x0050, text=»ST150 EQU * «, t00=0x00df, t01=0x0094}
0x15cdc…15d0c Head {h00=0x002c, h01=0x0050, text=»* DELAY UNTIL PLC IS READY FOR START «, t00=0x00df, t01=0x00a8}
0x15d0c…15d3c Head {h00=0x002c, h01=0x0050, text=» LD A4,CWTTPR,A5 TIMER ALREADY STARTED? «, t00=0x00df, t01=0x00d8}
0x15d3c…15d60 Head {h00=0x0020, h01=0x0050, text=» RF(Z) ST152 NO, START TIMER«, t00=0x00df, t01=0x0108}
0x15d60…15d86 Head {h00=0x0022, h01=0x0050, text=» LDKL A1,-STADLY-1 DELAY TIME «, t00=0x00df, t01=0x012c}
0x15d86…15da6 Head {h00=0x001c, h01=0x0050, text=» STR A1,A4 RESTART TIMER«, t00=0x00df, t01=0x0152}
0x15da6…15dbc Head {h00=0x0012, h01=0x0050, text=» RF ST154 EXIT«, t00=0x00df, t01=0x0172}
0x15dbc…15dc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x0188}
0x15dc6…15dda (224, 0, 400) Head {h00=0x0010, h01=0x0050, text=»ST152 EQU * «, t00=0x00e0, t01=0x0004}
0x15dda…15dfe Head {h00=0x0020, h01=0x0050, text=» LDR A1,A5 SAVE CWT ADDRESS «, t00=0x00e0, t01=0x0018}
0x15dfe…15e20 Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME START TIMER«, t00=0x00e0, t01=0x003c}
0x15e20…15e58 Head {h00=0x0034, h01=0x0050, text=» DATA ST156,STADLY RESTART ADDRESS & DELAY TIME «, t00=0x00e0, t01=0x005e}
0x15e58…15e84 Head {h00=0x0028, h01=0x0050, text=» ST A4,CWTTPR,A5 SAVE TIMER POINTER «, t00=0x00e0, t01=0x0096}
0x15e84…15e98 Head {h00=0x0010, h01=0x0050, text=»ST154 EQU * «, t00=0x00e0, t01=0x00c2}
0x15e98…15ec4 Head {h00=0x0028, h01=0x0050, text=» ABL TDISP WAIT UNTIL TIMER EXPIRES «, t00=0x00e0, t01=0x00d6}
0x15ec4…15ece Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0102}
0x15ece…15ee2 Head {h00=0x0010, h01=0x0050, text=»ST156 EQU * «, t00=0x00e0, t01=0x010c}
0x15ee2…15f08 Head {h00=0x0022, h01=0x0050, text=» LDR A5,A1 RESTORE CWT ADDRESS«, t00=0x00e0, t01=0x0120}
0x15f08…15f38 Head {h00=0x002c, h01=0x0050, text=» CM CWTTPR,A5 INDICATE NO TIMER RUNNING «, t00=0x00e0, t01=0x0146}
0x15f38…15f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0176}
0x15f42…15f72 Head {h00=0x002c, h01=0x0050, text=»* START "TEST CHANNEL UNIT" OPERATION«, t00=0x00e0, t01=0x0180}
0x15f72…15f94 Head {h00=0x001e, h01=0x0050, text=» IM CWTCCB,A5 SET CCA BUSY«, t00=0x00e1, t01=0x0020}
0x15f94…15fba Head {h00=0x0022, h01=0x0050, text=» CM CWTOPR,A5 SET PLC OPERABLE«, t00=0x00e1, t01=0x0042}
0x15fba…15fe4 Head {h00=0x0026, h01=0x0050, text=» LDK A2,CMDTC COMMAND CODE TEST CU«, t00=0x00e1, t01=0x0068}
0x15fe4…16020 Head {h00=0x0038, h01=0x0050, text=» ST A2,CWTCCA+CCRDLS,A5 COMMAND AND DLS INDEX TO CCA«, t00=0x00e1, t01=0x0092}
0x16020…16050 Head {h00=0x002c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING«, t00=0x00e1, t01=0x00ce}
0x16050…1606e Head {h00=0x001a, h01=0x0050, text=» LDR A3,A5 CWT ADDRESS«, t00=0x00e1, t01=0x00fe}
0x1606e…160a8 Head {h00=0x0036, h01=0x0050, text=» ADK A3,CWTCSD CONTROL UNIT START DESCRIPTOR ADDR «, t00=0x00e1, t01=0x011c}
0x160a8…160b4 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x00e1, t01=0x0156}
0x160b4…160d4 Head {h00=0x001c, h01=0x0050, text=» CF A15,PLCCIO CIO START«, t00=0x00e1, t01=0x0162}
0x160d4…160f8 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) STERR2 EXIT IF ERROR«, t00=0x00e1, t01=0x0182}
0x160f8…16132 Head {h00=0x0036, h01=0x0050, text=» IM CWTOPR,A5 SET NOT OPERABLE UNTIL TEST CU READY«, t00=0x00e2, t01=0x0016}
0x16132…16158 Head {h00=0x0022, h01=0x0050, text=» ABL TDISP WAIT FOR COMPLETION«, t00=0x00e2, t01=0x0050}
0x16158…16162 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x0076}
0x16162…1616c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x0080}
0x1616c…161a6 Head {h00=0x0036, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN TEST CU IS COMPLETED.«, t00=0x00e2, t01=0x008a}
0x161a6…161d0 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x00e2, t01=0x00c4}
0x161d0…161ea Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00e2, t01=0x00ee}
0x161ea…16206 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00e2, t01=0x0108}
0x16206…16210 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x0124}
0x16210…16224 Head {h00=0x0010, h01=0x0050, text=»TCURST EQU *«, t00=0x00e2, t01=0x012e}
0x16224…16244 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 OPERATION OK?«, t00=0x00e2, t01=0x0142}
0x16244…16264 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) STERR2 NO, EXIT «, t00=0x00e2, t01=0x0162}
0x16264…1626e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x0182}
0x1626e…16298 Head {h00=0x0026, h01=0x0050, text=»* PERFORM "OPEN LINE" OPERATION«, t00=0x00e2, t01=0x018c}
0x16298…162a8 Head {h00=0x000c, h01=0x0050, text=» U =5 «, t00=0x00e3, t01=0x0026}
0x162a8…162d0 Head {h00=0x0024, h01=0x0050, text=» LDK A2,0 INITIATE LINE COUNTER «, t00=0x00e3, t01=0x0036}
0x162d0…162e8 Head {h00=0x0014, h01=0x0050, text=» ST A2,CWTLNO,A5«, t00=0x00e3, t01=0x005e}
0x162e8…162fc Head {h00=0x0010, h01=0x0050, text=»ST157 EQU * «, t00=0x00e3, t01=0x0076}
0x162fc…1631e Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x00e3, t01=0x008a}
0x1631e…16328 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x00ac}
0x16328…1634c Head {h00=0x0020, h01=0x0050, text=» LD A2,CWTLNO,A5 GET LINE NO«, t00=0x00e3, t01=0x00b6}
0x1634c…16382 Head {h00=0x0032, h01=0x0050, text=» SC A2,CWTCCA+CCRSU1,A5 SET UP LINE IN CCA =5 «, t00=0x00e3, t01=0x00da}
0x16382…163a8 Head {h00=0x0022, h01=0x0050, text=» SLL A2,1 MAKE OPEN LINE PARA-«, t00=0x00e3, t01=0x0110}
0x163a8…163cc Head {h00=0x0020, h01=0x0050, text=» ST A2,CWTPAR,A5 METER AREA «, t00=0x00e3, t01=0x0136}
0x163cc…163e0 Head {h00=0x0010, h01=0x0050, text=»ST158 EQU * «, t00=0x00e3, t01=0x015a}
0x163e0…16408 Head {h00=0x0024, h01=0x0050, text=» LD A2,CWTOPP,A5 MAKE ADDRESS TO«, t00=0x00e3, t01=0x016e}
0x16408…1643a Head {h00=0x002e, h01=0x0050, text=» AD A2,CWTPAR,A5 OPEN LINE PARAMETER AREA «, t00=0x00e4, t01=0x0008}
0x1643a…16452 Head {h00=0x0014, h01=0x0050, text=» LDR* A2,A2 U =5«, t00=0x00e4, t01=0x003a}
0x16452…16480 Head {h00=0x002a, h01=0x0050, text=» ST A2,CWTCCA+CCRBUF,A5 SET UP IN CCA «, t00=0x00e4, t01=0x0052}
0x16480…164a8 Head {h00=0x0024, h01=0x0050, text=» LDK A2,CMDOP COMMAND OPEN LINE «, t00=0x00e4, t01=0x0080}
0x164a8…164e4 Head {h00=0x0038, h01=0x0050, text=» ST A2,CWTCCA+CCRDLS,A5 COMMAND AND DLS INDEX TO CCA«, t00=0x00e4, t01=0x00a8}
0x164e4…16522 Head {h00=0x003a, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR«, t00=0x00e4, t01=0x00e4}
0x16522…1654e Head {h00=0x0028, h01=0x0050, text=» LDK A2,12 PARAMETER AREA LENGTH =1 «, t00=0x00e4, t01=0x0122}
0x1654e…16574 Head {h00=0x0022, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 TO CCA«, t00=0x00e4, t01=0x014e}
0x16574…1657e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x0174}
0x1657e…165a4 Head {h00=0x0022, h01=0x0050, text=» CM CWTOPR,A5 SET PLC OPERABLE«, t00=0x00e4, t01=0x017e}
0x165a4…165c4 Head {h00=0x001c, h01=0x0050, text=» CF A15,PLCCIO CIO START«, t00=0x00e5, t01=0x0014}
0x165c4…165e8 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) STERR2 EXIT IF ERROR«, t00=0x00e5, t01=0x0034}
0x165e8…1660c Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00e5, t01=0x0058}
0x1660c…16616 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x007c}
0x16616…16620 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0086}
0x16620…1665c Head {h00=0x0038, h01=0x0050, text=»* ENTRY TO OPLRST WILL BE MADE WHEN THE OPEN LINE«, t00=0x00e5, t01=0x0090}
0x1665c…16680 Head {h00=0x0020, h01=0x0050, text=»* OPERATION IS COMPLETED.«, t00=0x00e5, t01=0x00cc}
0x16680…166aa Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x00e5, t01=0x00f0}
0x166aa…166c4 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00e5, t01=0x011a}
0x166c4…166e0 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00e5, t01=0x0134}
0x166e0…166ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0150}
0x166ea…166fe Head {h00=0x0010, h01=0x0050, text=»OPLRST EQU *«, t00=0x00e5, t01=0x015a}
0x166fe…1671e Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 OPERATION OK?«, t00=0x00e5, t01=0x016e}
0x1671e…1673e Head {h00=0x001c, h01=0x0050, text=» RF(NZ) STERR2 NO, EXIT «, t00=0x00e5, t01=0x018e}
0x1673e…16748 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x001e}
0x16748…1676c Head {h00=0x0020, h01=0x0050, text=» LD A2,CWTPNR,A5 GET PLC NR «, t00=0x00e6, t01=0x0028}
0x1676c…1678c Head {h00=0x001c, h01=0x0050, text=» SUK A2,3 CHECK IF LOCAL«, t00=0x00e6, t01=0x004c}
0x1678c…167a6 Head {h00=0x0016, h01=0x0050, text=» RF(NP) ST159 YES «, t00=0x00e6, t01=0x006c}
0x167a6…167d2 Head {h00=0x0028, h01=0x0050, text=» IM CWTLNO,A5 INCREMENT LINE NUMBER «, t00=0x00e6, t01=0x0086}
0x167d2…167f6 Head {h00=0x0020, h01=0x0050, text=» LD A2,CWTLNO,A5 GET LINE NO«, t00=0x00e6, t01=0x00b2}
0x167f6…1681a Head {h00=0x0020, h01=0x0050, text=» SUK A2,4 ALL LINES OPENED ?«, t00=0x00e6, t01=0x00d6}
0x1681a…1683e Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ST157 NO, TAKE NEXT «, t00=0x00e6, t01=0x00fa}
0x1683e…16854 Head {h00=0x0012, h01=0x0050, text=» CM CWTLNO,A5 «, t00=0x00e6, t01=0x011e}
0x16854…16868 Head {h00=0x0010, h01=0x0050, text=»ST159 EQU * «, t00=0x00e6, t01=0x0134}
0x16868…16872 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x0148}
0x16872…168a4 Head {h00=0x002e, h01=0x0050, text=» CM CWTGR,A5 INDICATE GENERAL READ ALLOWED«, t00=0x00e6, t01=0x0152}
0x168a4…168ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x0184}
0x168ae…168f0 Head {h00=0x003e, h01=0x0050, text=»* PERFORM OPEN DATA LINK FOR ALL CONNECTED SECONDARIES «, t00=0x00e6, t01=0x018e}
0x168f0…168fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x0040}
0x168fa…16926 Head {h00=0x0028, h01=0x0050, text=» LDK A6,MAXWS+1 (MAX NR OF DLS) + 1 «, t00=0x00e7, t01=0x004a}
0x16926…1693a Head {h00=0x0010, h01=0x0050, text=»ST160 EQU * «, t00=0x00e7, t01=0x0076}
0x1693a…16964 Head {h00=0x0026, h01=0x0050, text=» SUK A6,1 NEXT WORK STATION (DLS) «, t00=0x00e7, t01=0x008a}
0x16964…1698a Head {h00=0x0022, h01=0x0050, text=» RF(N) ST180 EXIT IF ALL DONE «, t00=0x00e7, t01=0x00b4}
0x1698a…169b6 Head {h00=0x0028, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE«, t00=0x00e7, t01=0x00da}
0x169b6…169ea Head {h00=0x0030, h01=0x0050, text=» CF A15,NDGEDN A7 := HIGEST DWT NUMBER ON WS«, t00=0x00e7, t01=0x0106}
0x169ea…16a08 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A7 ANY DWT:S? «, t00=0x00e7, t01=0x013a}
0x16a08…16a2e Head {h00=0x0022, h01=0x0050, text=» RB(N) ST160 NO, TAKE NEXT WS «, t00=0x00e7, t01=0x0158}
0x16a2e…16a38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x017e}
0x16a38…16a5a Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x00e7, t01=0x0188}
0x16a5a…16a80 Head {h00=0x0022, h01=0x0050, text=» LDR A3,A6 WORK STATION NUMBER«, t00=0x00e8, t01=0x001a}
0x16a80…16a9c Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x00e8, t01=0x0040}
0x16a9c…16abe Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x00e8, t01=0x005c}
0x16abe…16ae4 Head {h00=0x0022, h01=0x0050, text=» CM CWTWSS,A3 CLEAR WS STATUS «, t00=0x00e8, t01=0x007e}
0x16ae4…16b20 Head {h00=0x0038, h01=0x0050, text=» SC A6,CWTCCA+CCRDLS,A5 DLS INDEX (WS NUMBER) TO CCA«, t00=0x00e8, t01=0x00a4}
0x16b20…16b4e Head {h00=0x002a, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 SAVE DLS INDEX«, t00=0x00e8, t01=0x00e0}
0x16b4e…16b74 Head {h00=0x0022, h01=0x0050, text=» LDK A2,CMDOD COMMAND OPEN DLS«, t00=0x00e8, t01=0x010e}
0x16b74…16b9a Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRCMD,A5 TO CCA«, t00=0x00e8, t01=0x0134}
0x16b9a…16bc6 Head {h00=0x0028, h01=0x0050, text=» LDK A2,MAXFR MAX OUTSTANDING FRAMES«, t00=0x00e8, t01=0x015a}
0x16bc6…16bf6 Head {h00=0x002c, h01=0x0050, text=» SC A2,CWTCCA+CCRSU1,A5 TO SUBCOMMAND 1 «, t00=0x00e8, t01=0x0186}
0x16bf6…16c26 Head {h00=0x002c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING«, t00=0x00e9, t01=0x0026}
0x16c26…16c46 Head {h00=0x001c, h01=0x0050, text=» CF A15,PLCCIO CIO START«, t00=0x00e9, t01=0x0056}
0x16c46…16c6a Head {h00=0x0020, h01=0x0050, text=» RF(NZ) STERR2 EXIT IF ERROR«, t00=0x00e9, t01=0x0076}
0x16c6a…16c98 Head {h00=0x002a, h01=0x0050, text=» ABL PLDSP2 EXIT. WAIT FOR COMPLETION «, t00=0x00e9, t01=0x009a}
0x16c98…16ca2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x00c8}
0x16ca2…16cac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x00d2}
0x16cac…16cee Head {h00=0x003e, h01=0x0050, text=»* ENTRY TO ODLRST IS MADE WHEN OPERATION IS COMPLETED. «, t00=0x00e9, t01=0x00dc}
0x16cee…16d18 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x00e9, t01=0x011e}
0x16d18…16d38 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00e9, t01=0x0148}
0x16d38…16d54 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00e9, t01=0x0168}
0x16d54…16d84 Head {h00=0x002c, h01=0x0050, text=»* A6 = WORK STATION NUMBER (DLS INDEX) «, t00=0x00e9, t01=0x0184}
0x16d84…16d8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x0024}
0x16d8e…16da2 Head {h00=0x0010, h01=0x0050, text=»ODLRST EQU *«, t00=0x00ea, t01=0x002e}
0x16da2…16dc2 Head {h00=0x001c, h01=0x0050, text=» LDR A2,A2 FATAL ERROR? «, t00=0x00ea, t01=0x0042}
0x16dc2…16de2 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) STERR2 YES, EXIT«, t00=0x00ea, t01=0x0062}
0x16de2…16e16 Head {h00=0x0030, h01=0x0050, text=» LD* A3,CWTINT,A5 WORK STATION TABLE ADDRESS«, t00=0x00ea, t01=0x0082}
0x16e16…16e3e Head {h00=0x0024, h01=0x0050, text=» LDK A4,RETCP FLAG "TC POWER UP"«, t00=0x00ea, t01=0x00b6}
0x16e3e…16e70 Head {h00=0x002e, h01=0x0050, text=» CF A15,NDREWS RECOVERY OF ALL DWT:S ON WS«, t00=0x00ea, t01=0x00de}
0x16e70…16e98 Head {h00=0x0024, h01=0x0050, text=» RB ST160 TAKE NEXT WORK STATION«, t00=0x00ea, t01=0x0110}
0x16e98…16ea2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x0138}
0x16ea2…16eac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x0142}
0x16eac…16ec0 Head {h00=0x0010, h01=0x0050, text=»ST180 EQU * «, t00=0x00ea, t01=0x014c}
0x16ec0…16eee Head {h00=0x002a, h01=0x0050, text=»* ALL DATA LINKS ARE STARTED. EXIT.«, t00=0x00ea, t01=0x0160}
0x16eee…16f12 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00ea, t01=0x018e}
0x16f12…16f1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x0022}
0x16f1c…16f26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x002c}
0x16f26…16f3a Head {h00=0x0010, h01=0x0050, text=»STERR2 EQU *«, t00=0x00eb, t01=0x0036}
0x16f3a…16f62 Head {h00=0x0024, h01=0x0050, text=»* ERROR DURING STARTUP. EXIT.«, t00=0x00eb, t01=0x004a}
0x16f62…16f6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x0072}
0x16f6c…16f84 Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00eb, t01=0x007c}
0x16f84…16f8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x0094}
0x16f8e…16f9c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00eb, t01=0x009e}
0x16f9c…16fa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x00ac}
0x16fa6…16fc2 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x00eb, t01=0x00b6}
0x16fc2…16fde Head {h00=0x0018, h01=0x0050, text=»* LOCAL DISPATCHER *«, t00=0x00eb, t01=0x00d2}
0x16fde…16ffa Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x00eb, t01=0x00ee}
0x16ffa…17004 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00eb, t01=0x010a}
0x17004…17046 Head {h00=0x003e, h01=0x0050, text=»* THIS SECTION CONTAINS A DISPATCHER FOR THE PLC DRIVER.«, t00=0x00eb, t01=0x0114}
0x17046…17086 Head {h00=0x003c, h01=0x0050, text=»* IT CAN BE CALLED EITHER FROM ANOTHER ROUTINE IN THE «, t00=0x00eb, t01=0x0156}
0x17086…170c8 Head {h00=0x003e, h01=0x0050, text=»* PLC DRIVER, OR FROM A TERMINAL DEVICE DRIVER (THROUGH «, t00=0x00ec, t01=0x0008}
0x170c8…170ee Head {h00=0x0022, h01=0x0050, text=»* THE NETWORK DISTRIBUTOR). «, t00=0x00ec, t01=0x004a}
0x170ee…1712c Head {h00=0x003a, h01=0x0050, text=»* SOME INTERRUPTS OR DEVICE DRIVER CALLS SET SEVERAL«, t00=0x00ec, t01=0x0070}
0x1712c…17168 Head {h00=0x0038, h01=0x0050, text=»* RESOURCES FREE. THIS MEANS THAT SEVERAL WAITING «, t00=0x00ec, t01=0x00ae}
0x17168…171a8 Head {h00=0x003c, h01=0x0050, text=»* PROCERSSES MAY BECOME READY FOR ACTIVATION. ONLY ONE«, t00=0x00ec, t01=0x00ea}
0x171a8…171e6 Head {h00=0x003a, h01=0x0050, text=»* OF THESE PROCESSES CAN BE ACTIVATED DIRECTLY. THE «, t00=0x00ec, t01=0x012a}
0x171e6…17228 Head {h00=0x003e, h01=0x0050, text=»* OTHER PROCESSES WILL BE ACTIVATED IN TURN, WHEN FIRST «, t00=0x00ec, t01=0x0168}
0x17228…17256 Head {h00=0x002a, h01=0x0050, text=»* PROCESS EXITS TO THIS DISPATCHER. «, t00=0x00ed, t01=0x001a}
0x17256…17260 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0048}
0x17260…1726a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0052}
0x1726a…1729e Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x00ed, t01=0x005c}
0x1729e…172a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0090}
0x172a8…172c0 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x00ed, t01=0x009a}
0x172c0…172ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x00b2}
0x172ca…17306 Head {h00=0x0038, h01=0x0050, text=»* PLDISP ACTIVATE PROCESS OR PERFORM COMMON FUNCTION«, t00=0x00ed, t01=0x00bc}
0x17306…17310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x00f8}
0x17310…1731e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ed, t01=0x0102}
0x1731e…17328 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0110}
0x17328…1736c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00ed, t01=0x011a}
0x1736c…17376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x015e}
0x17376…1738e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00ed, t01=0x0168}
0x1738e…1739e Head {h00=0x000c, h01=0x0050, text=»* PLDISP«, t00=0x00ed, t01=0x0180}
0x1739e…173a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0190}
0x173a8…173bc Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00ee, t01=0x000a}
0x173bc…173f8 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE LOOKS FOR WAITING PROCESSES THAT ARE «, t00=0x00ee, t01=0x001e}
0x173f8…17430 Head {h00=0x0034, h01=0x0050, text=»* READY FOR DISPATCHING. IF ANY IS FOUND, IT IS «, t00=0x00ee, t01=0x005a}
0x17430…1746c Head {h00=0x0038, h01=0x0050, text=»* ACTIVATED. THE ROUTINE ALSO PERFORMS ACTIONS THAT «, t00=0x00ee, t01=0x0092}
0x1746c…174a8 Head {h00=0x0038, h01=0x0050, text=»* ARE NOT EXPLICITLY REQUESTED BY USER PROCESSES, EG«, t00=0x00ee, t01=0x00ce}
0x174a8…174e8 Head {h00=0x003c, h01=0x0050, text=»* GENERAL READ. WHEN NOTHING IS LEFT TO DO, THE ROUTINE «, t00=0x00ee, t01=0x010a}
0x174e8…1750c Head {h00=0x0020, h01=0x0050, text=»* EXITS TO TOSS DISPATCHER. «, t00=0x00ee, t01=0x014a}
0x1750c…17548 Head {h00=0x0038, h01=0x0050, text=»* TWO ENTRIES ARE PROVIDED. ONE IS USED WHEN CALLER «, t00=0x00ee, t01=0x016e}
0x17548…17582 Head {h00=0x0036, h01=0x0050, text=»* KNOWS OWN DWT ADDRESS, ONE WHEN CALLER KNOWS OWN«, t00=0x00ef, t01=0x001a}
0x17582…17598 Head {h00=0x0012, h01=0x0050, text=»* CWT ADDRESS.«, t00=0x00ef, t01=0x0054}
0x17598…175a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x006a}
0x175a2…175b2 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00ef, t01=0x0074}
0x175b2…175c6 Head {h00=0x0010, h01=0x0050, text=»* ABL PLDISP«, t00=0x00ef, t01=0x0084}
0x175c6…175da Head {h00=0x0010, h01=0x0050, text=»* ABL PLDSP2«, t00=0x00ef, t01=0x0098}
0x175da…175e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x00ac}
0x175e4…175f4 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00ef, t01=0x00b6}
0x175f4…1761c Head {h00=0x0024, h01=0x0050, text=»* A5 = CWT ADDRESS (IF PLDSP2) «, t00=0x00ef, t01=0x00c6}
0x1761c…17644 Head {h00=0x0024, h01=0x0050, text=»* A6 = DWT ADDRESS (IF PLDISP) «, t00=0x00ef, t01=0x00ee}
0x17644…17660 Head {h00=0x0018, h01=0x0050, text=»* A1-A8 ON A15 STACK«, t00=0x00ef, t01=0x0116}
0x17660…1766a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x0132}
0x1766a…1767c Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00ef, t01=0x013c}
0x1767c…17688 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00ef, t01=0x014e}
0x17688…17692 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x015a}
0x17692…176d6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00ef, t01=0x0164}
0x176d6…176e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0018}
0x176e0…176f4 Head {h00=0x0010, h01=0x0050, text=»PLDISP EQU *«, t00=0x00f0, t01=0x0022}
0x176f4…17708 Head {h00=0x0010, h01=0x0050, text=»PRDISP EQU *«, t00=0x00f0, t01=0x0036}
0x17708…17730 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x00f0, t01=0x004a}
0x17730…17742 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x00f0, t01=0x0072}
0x17742…1776a Head {h00=0x0024, h01=0x0050, text=» ABL(Z) TDISP NOT DEFINED. EXIT «, t00=0x00f0, t01=0x0084}
0x1776a…17774 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x00ac}
0x17774…1777e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x00b6}
0x1777e…17792 Head {h00=0x0010, h01=0x0050, text=»PLDSP2 EQU *«, t00=0x00f0, t01=0x00c0}
0x17792…1779c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x00d4}
0x1779c…177a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x00de}
0x177a6…177ba Head {h00=0x0010, h01=0x0050, text=»DP100 EQU * «, t00=0x00f0, t01=0x00e8}
0x177ba…177c6 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00f0, t01=0x00fc}
0x177c6…177ea Head {h00=0x0020, h01=0x0050, text=»* HANDLE CHARACTER INPUT «, t00=0x00f0, t01=0x0108}
0x177ea…17818 Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTBUF,A5 INPUT BUFFER WAITING?«, t00=0x00f0, t01=0x012c}
0x17818…1783a Head {h00=0x001e, h01=0x0050, text=» RF(Z) DP200 NO, CONTINUE «, t00=0x00f0, t01=0x015a}
0x1783a…1785e Head {h00=0x0020, h01=0x0050, text=» LD A6,BUFDWT,A4 DWT ADDRESS«, t00=0x00f0, t01=0x017c}
0x1785e…17868 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0010}
0x17868…1788e Head {h00=0x0022, h01=0x0050, text=» CF A15,PLGECH A2 := CHARACTER«, t00=0x00f1, t01=0x001a}
0x1788e…178b2 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A1 CHECK RETURN CODE«, t00=0x00f1, t01=0x0040}
0x178b2…178d4 Head {h00=0x001e, h01=0x0050, text=» RF(N) DP110 BUFFER EMPTY «, t00=0x00f1, t01=0x0064}
0x178d4…178fa Head {h00=0x0022, h01=0x0050, text=» LD A3,DWTST,A6 DEVICE STATUS «, t00=0x00f1, t01=0x0086}
0x178fa…17922 Head {h00=0x0024, h01=0x0050, text=» ANK A3,DWFINP INPUT REQUESTED? «, t00=0x00f1, t01=0x00ac}
0x17922…17956 Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) INPRST YES, RETURN TO DEVICE DRIVER«, t00=0x00f1, t01=0x00d4}
0x17956…17960 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0108}
0x17960…17986 Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTADR,A6 ADDRESS BLOCK«, t00=0x00f1, t01=0x0112}
0x17986…179b8 Head {h00=0x002e, h01=0x0050, text=» LD A1,INTADR,A1 INTERRUPT ENTRY DEFINED? «, t00=0x00f1, t01=0x0138}
0x179b8…179e8 Head {h00=0x002c, h01=0x0050, text=» ABR(NZ) A1 YES, GO TO INTERRUPT HANDLER«, t00=0x00f1, t01=0x016a}
0x179e8…179f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x000a}
0x179f2…17a06 Head {h00=0x0010, h01=0x0050, text=»DP110 EQU * «, t00=0x00f2, t01=0x0014}
0x17a06…17a3a Head {h00=0x0030, h01=0x0050, text=» CW A4,DWTLD1,A6 BUFFER CHAINED TO THIS DWT?«, t00=0x00f2, t01=0x0028}
0x17a3a…17a5c Head {h00=0x001e, h01=0x0050, text=» RF(NE) DP120 NO, CONTINUE«, t00=0x00f2, t01=0x005c}
0x17a5c…17a7e Head {h00=0x001e, h01=0x0050, text=» CM DWTLD1,A6 REMOVE LINK «, t00=0x00f2, t01=0x007e}
0x17a7e…17a92 Head {h00=0x0010, h01=0x0050, text=»DP120 EQU * «, t00=0x00f2, t01=0x00a0}
0x17a92…17aba Head {h00=0x0024, h01=0x0050, text=» CM CWTBUF,A5 NO BUFFER WAITING «, t00=0x00f2, t01=0x00b4}
0x17aba…17ae0 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLRLBU RELEASE BUFFER «, t00=0x00f2, t01=0x00dc}
0x17ae0…17aea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x0102}
0x17aea…17b26 Head {h00=0x0038, h01=0x0050, text=»* CHECK IF LEVEL 3 RECIEVE READY SHOULD BE SENT«, t00=0x00f2, t01=0x010c}
0x17b26…17b5a Head {h00=0x0030, h01=0x0050, text=» CF A15,GETIFR A2 := NR OF FRAMES NOT ACK:ED«, t00=0x00f2, t01=0x0148}
0x17b5a…17b7c Head {h00=0x001e, h01=0x0050, text=» SUK A2,6 TIME TO SEND RR?«, t00=0x00f2, t01=0x017c}
0x17b7c…17b98 Head {h00=0x0018, h01=0x0050, text=» ABL(NN) SENDRR YES «, t00=0x00f3, t01=0x000e}
0x17b98…17ba2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x002a}
0x17ba2…17bac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x0034}
0x17bac…17bc0 Head {h00=0x0010, h01=0x0050, text=»DP200 EQU * «, t00=0x00f3, t01=0x003e}
0x17bc0…17bcc Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00f3, t01=0x0052}
0x17bcc…17bf0 Head {h00=0x0020, h01=0x0050, text=»* HANDLE POWER UP FOR TC «, t00=0x00f3, t01=0x005e}
0x17bf0…17c1c Head {h00=0x0028, h01=0x0050, text=» LD A1,PFPOST POWER UP TASK PENDING?«, t00=0x00f3, t01=0x0082}
0x17c1c…17c48 Head {h00=0x0028, h01=0x0050, text=» OR A1,PLCPFP PLC POWER UP PENDING? «, t00=0x00f3, t01=0x00ae}
0x17c48…17c68 Head {h00=0x001c, h01=0x0050, text=» ABL(NZ) TDISP YES, EXIT«, t00=0x00f3, t01=0x00da}
0x17c68…17c72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x00fa}
0x17c72…17c7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x0104}
0x17c7c…17c90 Head {h00=0x0010, h01=0x0050, text=»DP300 EQU * «, t00=0x00f3, t01=0x010e}
0x17c90…17cbe Head {h00=0x002a, h01=0x0050, text=»* HANDLE ABORT OF ONE WORK STATION «, t00=0x00f3, t01=0x0122}
0x17cbe…17cea Head {h00=0x0028, h01=0x0050, text=» LD A6,CWTABW,A5 WS TO ABORT, IF ANY«, t00=0x00f3, t01=0x0150}
0x17cea…17d18 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) ABTHAN DO ABORT, IF REQUESTED«, t00=0x00f3, t01=0x017c}
0x17d18…17d22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x001a}
0x17d22…17d2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x0024}
0x17d2c…17d40 Head {h00=0x0010, h01=0x0050, text=»DP400 EQU * «, t00=0x00f4, t01=0x002e}
0x17d40…17d6c Head {h00=0x0028, h01=0x0050, text=»* CHECK IF ANYONE WAITING FOR CCA«, t00=0x00f4, t01=0x0042}
0x17d6c…17d9a Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTCCQ,A5 ANYONE IN CCA QUEUE? «, t00=0x00f4, t01=0x006e}
0x17d9a…17dbc Head {h00=0x001e, h01=0x0050, text=» RF(Z) DP500 NO, CONTINUE «, t00=0x00f4, t01=0x009c}
0x17dbc…17dde Head {h00=0x001e, h01=0x0050, text=» LD A1,CWTCCB,A5 CCA FREE?«, t00=0x00f4, t01=0x00be}
0x17dde…17e00 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DP500 NO, CONTINUE«, t00=0x00f4, t01=0x00e0}
0x17e00…17e22 Head {h00=0x001e, h01=0x0050, text=» IM CWTCCB,A5 SET CCA BUSY«, t00=0x00f4, t01=0x0102}
0x17e22…17e4e Head {h00=0x0028, h01=0x0050, text=» ABL CCARST ACTIVATE WAITING PROCESS«, t00=0x00f4, t01=0x0124}
0x17e4e…17e58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x0150}
0x17e58…17e62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x015a}
0x17e62…17e76 Head {h00=0x0010, h01=0x0050, text=»DP500 EQU * «, t00=0x00f4, t01=0x0164}
0x17e76…17e96 Head {h00=0x001c, h01=0x0050, text=»* CHECK BUFFER QUEUES«, t00=0x00f4, t01=0x0178}
0x17e96…17ece Head {h00=0x0034, h01=0x0050, text=» LD A6,CWTSBQ,A5 ANYONE IN SHORT BUFFERS QUEUE? «, t00=0x00f5, t01=0x0008}
0x17ece…17ef2 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DP510 NO, CHECK LONG «, t00=0x00f5, t01=0x0040}
0x17ef2…17f10 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00f5, t01=0x0064}
0x17f10…17f42 Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBS POOLBLOCK FOR SHORT BUFFERS«, t00=0x00f5, t01=0x0082}
0x17f42…17f6e Head {h00=0x0028, h01=0x0050, text=» CF A15,PLGTBU A4 := BUFFER ADDRESS «, t00=0x00f5, t01=0x00b4}
0x17f6e…17f96 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DP510 NO BUFFER AVAILABLE«, t00=0x00f5, t01=0x00e0}
0x17f96…17fc6 Head {h00=0x002c, h01=0x0050, text=» LDK A7,CWTSBQ OFFSET TO CWT QUEUE HEAD «, t00=0x00f5, t01=0x0108}
0x17fc6…17ff2 Head {h00=0x0028, h01=0x0050, text=» RF DP520 COMMON PART FOR SHORT/LONG«, t00=0x00f5, t01=0x0138}
0x17ff2…17ffc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f5, t01=0x0164}
0x17ffc…18010 Head {h00=0x0010, h01=0x0050, text=»DP510 EQU * «, t00=0x00f5, t01=0x016e}
0x18010…18046 Head {h00=0x0032, h01=0x0050, text=» LD A6,CWTLBQ,A5 ANYONE IN LONG BUFFERS QUEUE?«, t00=0x00f5, t01=0x0182}
0x18046…18068 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DP600 NO, CONTINUE «, t00=0x00f6, t01=0x0028}
0x18068…18086 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00f6, t01=0x004a}
0x18086…180b8 Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBL POOLBLOCK FOR LONG BUFFERS «, t00=0x00f6, t01=0x0068}
0x180b8…180e4 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLGTBU A4 := BUFFER ADDRESS «, t00=0x00f6, t01=0x009a}
0x180e4…18118 Head {h00=0x0030, h01=0x0050, text=» RF(Z) DP600 CONTINUE IF NO BUFFER AVAILABLE«, t00=0x00f6, t01=0x00c6}
0x18118…18150 Head {h00=0x0034, h01=0x0050, text=» LDK A7,CWTLBQ OFFSET TO LONG BUFFERS QUEUE HEAD«, t00=0x00f6, t01=0x00fa}
0x18150…1815a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f6, t01=0x0132}
0x1815a…1816e Head {h00=0x0010, h01=0x0050, text=»DP520 EQU * «, t00=0x00f6, t01=0x013c}
0x1816e…18198 Head {h00=0x0026, h01=0x0050, text=»* SHORT OR LONG BUFFER FOUND «, t00=0x00f6, t01=0x0150}
0x18198…181be Head {h00=0x0022, h01=0x0050, text=» LDR A2,A4 SAVE BUFFER ADDRESS«, t00=0x00f6, t01=0x017a}
0x181be…181e0 Head {h00=0x001e, h01=0x0050, text=» LDR A4,A6 DWT QUEUE LINK «, t00=0x00f7, t01=0x0010}
0x181e0…18204 Head {h00=0x0020, h01=0x0050, text=» ADR A7,A5 BUFFER QUEUE HEAD«, t00=0x00f7, t01=0x0032}
0x18204…1822c Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00f7, t01=0x0056}
0x1822c…18256 Head {h00=0x0026, h01=0x0050, text=» SUKL A6,DWTOTQ A6 := DWT ADDRESS «, t00=0x00f7, t01=0x007e}
0x18256…18280 Head {h00=0x0026, h01=0x0050, text=» LDR A4,A2 RESTORE BUFFER ADDRESS «, t00=0x00f7, t01=0x00a8}
0x18280…182a0 Head {h00=0x001c, h01=0x0050, text=» LDK A1,0 RET CODE := OK«, t00=0x00f7, t01=0x00d2}
0x182a0…182ce Head {h00=0x002a, h01=0x0050, text=» ABL BUFRST RETURN TO ROUTINE WAITING «, t00=0x00f7, t01=0x00f2}
0x182ce…182d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f7, t01=0x0120}
0x182d8…182e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f7, t01=0x012a}
0x182e2…182f6 Head {h00=0x0010, h01=0x0050, text=»DP600 EQU * «, t00=0x00f7, t01=0x0134}
0x182f6…1832c Head {h00=0x0032, h01=0x0050, text=»* CHECK IF GENERAL READ SHOULD BE PERFORMED«, t00=0x00f7, t01=0x0148}
0x1832c…1835a Head {h00=0x002a, h01=0x0050, text=» LD A1,CWTGR,A5 GENERAL READ ALLOWED? «, t00=0x00f7, t01=0x017e}
0x1835a…18378 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) DP800 NO, EXIT«, t00=0x00f8, t01=0x001c}
0x18378…18382 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x003a}
0x18382…183a0 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00f8, t01=0x0044}
0x183a0…183da Head {h00=0x0036, h01=0x0050, text=» ADK A7,CWTPBG POOLBLOCK FOR GENERAL READ BUFFERS «, t00=0x00f8, t01=0x0062}
0x183da…18406 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLGTBU A4 := BUFFER ADDRESS «, t00=0x00f8, t01=0x009c}
0x18406…18438 Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) GREAD PERFORM GR IF BUFFER FOUND «, t00=0x00f8, t01=0x00c8}
0x18438…18442 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x00fa}
0x18442…1844c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x0104}
0x1844c…18460 Head {h00=0x0010, h01=0x0050, text=»DP800 EQU * «, t00=0x00f8, t01=0x010e}
0x18460…18494 Head {h00=0x0030, h01=0x0050, text=»* NOTHING MORE TO DO. EXIT TO DISPATCHER «, t00=0x00f8, t01=0x0122}
0x18494…184b6 Head {h00=0x001e, h01=0x0050, text=» ABL TDISP TOSS DISPATCHER«, t00=0x00f8, t01=0x0156}
0x184b6…184c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x0178}
0x184c0…184ce Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f8, t01=0x0182}
0x184ce…184d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x0190}
0x184d8…184ec Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x00f9, t01=0x000a}
0x184ec…18500 Head {h00=0x0010, h01=0x0050, text=»* ROUTINES *«, t00=0x00f9, t01=0x001e}
0x18500…18514 Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x00f9, t01=0x0032}
0x18514…1851e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x0046}
0x1851e…18560 Head {h00=0x003e, h01=0x0050, text=»* THIS SECTION CONTAINS MISCELLANEOUS SERVICE ROUTINES. «, t00=0x00f9, t01=0x0050}
0x18560…185a6 Head {h00=0x0042, h01=0x0050, text=»* ALL ROUTINES ARE CALLED BY AN ABL "NAME" INSTRUCTION. «, t00=0x00f9, t01=0x0092}
0x185a6…185e4 Head {h00=0x003a, h01=0x0050, text=»* REGISTER INTERFACE IS DESCRIBED FOR EACH ROUTINE. «, t00=0x00f9, t01=0x00d8}
0x185e4…18624 Head {h00=0x003c, h01=0x0050, text=»* WHEN A ROUTINE HAS PERFORMED THE REQUESTED FUNCTION,«, t00=0x00f9, t01=0x0116}
0x18624…18656 Head {h00=0x002e, h01=0x0050, text=»* IT WILL EXIT TO THE LOCAL DISPATCHER. «, t00=0x00f9, t01=0x0156}
0x18656…18660 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x0188}
0x18660…18694 (250, 0, 400) Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x00fa, t01=0x0004}
0x18694…1869e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fa, t01=0x0038}
0x1869e…186b6 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x00fa, t01=0x0042}
0x186b6…186c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fa, t01=0x005a}
0x186c0…186fa Head {h00=0x0036, h01=0x0050, text=»* ABTHAN ABORT ALL WAITING DWT:S ON A WORK STATION«, t00=0x00fa, t01=0x0064}
0x186fa…1872e Head {h00=0x0030, h01=0x0050, text=»* PLREWS HANDLE RECOVERY OF ONE WORK STATION«, t00=0x00fa, t01=0x009e}
0x1872e…18762 Head {h00=0x0030, h01=0x0050, text=»* SENDRR SEND LEVEL 3 RECIEVE READY MESSAGE «, t00=0x00fa, t01=0x00d2}
0x18762…18786 Head {h00=0x0020, h01=0x0050, text=»* GREAD PERFORM GENERAL READ«, t00=0x00fa, t01=0x0106}
0x18786…18790 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fa, t01=0x012a}
0x18790…1879e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00fa, t01=0x0134}
0x1879e…187a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fa, t01=0x0142}
0x187a8…187ec Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00fa, t01=0x014c}
0x187ec…187f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fa, t01=0x0190}
0x187f6…1880e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00fb, t01=0x000a}
0x1880e…1881e Head {h00=0x000c, h01=0x0050, text=»* ABTHAN«, t00=0x00fb, t01=0x0022}
0x1881e…18828 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0032}
0x18828…1883c Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00fb, t01=0x003c}
0x1883c…18872 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE WILL HANDLE ABORTS FOR ONE WORK«, t00=0x00fb, t01=0x0050}
0x18872…188a6 Head {h00=0x0030, h01=0x0050, text=»* STATION. ALL REQUESTS OF DWT:S WAITING FOR«, t00=0x00fb, t01=0x0086}
0x188a6…188de Head {h00=0x0034, h01=0x0050, text=»* LEVEL 3 ACK OR WAITING IN CCA OR BUFFER QUEUES«, t00=0x00fb, t01=0x00ba}
0x188de…18914 Head {h00=0x0032, h01=0x0050, text=»* WILL BE ABORTED. ONE CALL IS NEEDED FOR EACH«, t00=0x00fb, t01=0x00f2}
0x18914…18934 Head {h00=0x001c, h01=0x0050, text=»* REQUEST TO BE ABORTED.«, t00=0x00fb, t01=0x0128}
0x18934…1893e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0148}
0x1893e…1894e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00fb, t01=0x0152}
0x1894e…18962 Head {h00=0x0010, h01=0x0050, text=»* ABL ABTHAN«, t00=0x00fb, t01=0x0162}
0x18962…1896c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0176}
0x1896c…1897c Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00fb, t01=0x0180}
0x1897c…18998 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00fb, t01=0x0190}
0x18998…189bc Head {h00=0x0020, h01=0x0050, text=»* A6 = WORK STATION NUMBER «, t00=0x00fc, t01=0x001c}
0x189bc…189c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x0040}
0x189c6…189d8 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00fc, t01=0x004a}
0x189d8…189fc Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO REQUEST:«, t00=0x00fc, t01=0x005c}
0x189fc…18a18 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00fc, t01=0x0080}
0x18a18…18a34 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00fc, t01=0x009c}
0x18a34…18a50 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00fc, t01=0x00b8}
0x18a50…18a5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x00d4}
0x18a5a…18a9e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00fc, t01=0x00de}
0x18a9e…18aa8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x0122}
0x18aa8…18abc Head {h00=0x0010, h01=0x0050, text=»ABTHAN EQU *«, t00=0x00fc, t01=0x012c}
0x18abc…18ae2 Head {h00=0x0022, h01=0x0050, text=» LDR A3,A6 WORK STATION NUMBER«, t00=0x00fc, t01=0x0140}
0x18ae2…18afe Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x00fc, t01=0x0166}
0x18afe…18b20 Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x00fc, t01=0x0182}
0x18b20…18b56 Head {h00=0x0032, h01=0x0050, text=» ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS «, t00=0x00fd, t01=0x0014}
0x18b56…18b60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x004a}
0x18b60…18b6e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00fd, t01=0x0054}
0x18b6e…18b78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x0062}
0x18b78…18b9a Head {h00=0x001e, h01=0x0050, text=» LDR A8,A6 SAVE WS NUMBER «, t00=0x00fd, t01=0x006c}
0x18b9a…18bc6 Head {h00=0x0028, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE«, t00=0x00fd, t01=0x008e}
0x18bc6…18bf6 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDGEDN A7 := HIGEST DWT NR ON WS«, t00=0x00fd, t01=0x00ba}
0x18bf6…18c08 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x00fd, t01=0x00ea}
0x18c08…18c2e Head {h00=0x0022, h01=0x0050, text=» LCR A1,A3 WORK STATION STATUS«, t00=0x00fd, t01=0x00fc}
0x18c2e…18c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x0122}
0x18c38…18c5a Head {h00=0x001e, h01=0x0050, text=» ADK A7,1 PREPARE FOR SUK «, t00=0x00fd, t01=0x012c}
0x18c5a…18c6e Head {h00=0x0010, h01=0x0050, text=»AH100 EQU * «, t00=0x00fd, t01=0x014e}
0x18c6e…18c88 Head {h00=0x0016, h01=0x0050, text=» SUK A7,1 NEXT DWT«, t00=0x00fd, t01=0x0162}
0x18c88…18cae Head {h00=0x0022, h01=0x0050, text=» RF(N) AH110 EXIT IF ALL DONE «, t00=0x00fd, t01=0x017c}
0x18cae…18cca Head {h00=0x0018, h01=0x0050, text=» LDR A6,A8 WS NUMBER«, t00=0x00fe, t01=0x0012}
0x18cca…18cf2 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00fe, t01=0x002e}
0x18cf2…18d12 Head {h00=0x001c, h01=0x0050, text=» RB(Z) AH100 NOT DEFINED«, t00=0x00fe, t01=0x0056}
0x18d12…18d1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x0076}
0x18d1c…18d44 Head {h00=0x0024, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL«, t00=0x00fe, t01=0x0080}
0x18d44…18d66 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x00fe, t01=0x00a8}
0x18d66…18d78 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x00fe, t01=0x00ca}
0x18d78…18da8 Head {h00=0x002c, h01=0x0050, text=» LDKL A4,/FFFF-DWFPLC MASK FOR PLC FLAGS«, t00=0x00fe, t01=0x00dc}
0x18da8…18dcc Head {h00=0x0020, h01=0x0050, text=» ANS A4,DWTST,A6 RESET FLAGS«, t00=0x00fe, t01=0x010c}
0x18dcc…18e02 Head {h00=0x0032, h01=0x0050, text=» ANK A2,DWFAK3 IS DWT WAITING FOR LEVEL 3 ACK?«, t00=0x00fe, t01=0x0130}
0x18e02…18e24 Head {h00=0x001e, h01=0x0050, text=» RF(Z) AH105 NO, CONTINUE «, t00=0x00fe, t01=0x0166}
0x18e24…18e58 Head {h00=0x0030, h01=0x0050, text=» ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x00fe, t01=0x0188}
0x18e58…18e86 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) AK3RST YES, RETURN WITH ACK 3«, t00=0x00ff, t01=0x002c}
0x18e86…18eb4 Head {h00=0x002a, h01=0x0050, text=» ABL WINRST NO, RETURN TO WINDOW QUEUE«, t00=0x00ff, t01=0x005a}
0x18eb4…18ebe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ff, t01=0x0088}
0x18ebe…18ed2 Head {h00=0x0010, h01=0x0050, text=»AH105 EQU * «, t00=0x00ff, t01=0x0092}
0x18ed2…18f04 Head {h00=0x002e, h01=0x0050, text=» LD A4,DWTOTQ,A6 CCA QUEUE ELEMENT POINTER«, t00=0x00ff, t01=0x00a6}
0x18f04…18f2a Head {h00=0x0022, h01=0x0050, text=» LDR A2,A7 SAVE DEVICE ADDRESS«, t00=0x00ff, t01=0x00d8}
0x18f2a…18f4e Head {h00=0x0020, h01=0x0050, text=» LDR A3,A1 SAVE RETURN CODE «, t00=0x00ff, t01=0x00fe}
0x18f4e…18f6c Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00ff, t01=0x0122}
0x18f6c…18f92 Head {h00=0x0022, h01=0x0050, text=» ADK A7,CWTCCQ CCA QUEUE HEAD «, t00=0x00ff, t01=0x0140}
0x18f92…18fc8 Head {h00=0x0032, h01=0x0050, text=» CF A15,LNKOUT LINK MONITOR BLOCK OUT OF QUEUE«, t00=0x00ff, t01=0x0166}
0x18fc8…18fe2 Head {h00=0x0016, h01=0x0050, text=» LDR A7,A7 FOUND? «, t00=0x0100, t01=0x000c}
0x18fe2…1900c Head {h00=0x0026, h01=0x0050, text=» ABL(NZ) CCAABT YES, ABORT REQUEST«, t00=0x0100, t01=0x0026}
0x1900c…19036 Head {h00=0x0026, h01=0x0050, text=» LDR A7,A2 RESTORE DEVICE ADDRESS «, t00=0x0100, t01=0x0050}
0x19036…1905c Head {h00=0x0022, h01=0x0050, text=» LDR A1,A3 RESTORE RETURN CODE«, t00=0x0100, t01=0x007a}
0x1905c…19066 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x00a0}
0x19066…19096 Head {h00=0x002c, h01=0x0050, text=» CF A15,OUTBUQ REMOVE FROM BUFFER QUEUE «, t00=0x0100, t01=0x00aa}
0x19096…190b8 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A2 FOUND IN QUEUE?«, t00=0x0100, t01=0x00da}
0x190b8…190e6 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) BUFRST YES, TERMINATE REQUEST«, t00=0x0100, t01=0x00fc}
0x190e6…19100 Head {h00=0x0016, h01=0x0050, text=» RB AH100 NEXT DWT«, t00=0x0100, t01=0x012a}
0x19100…1910a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x0144}
0x1910a…1911e Head {h00=0x0010, h01=0x0050, text=»AH110 EQU * «, t00=0x0100, t01=0x014e}
0x1911e…19164 Head {h00=0x0042, h01=0x0050, text=»* ALL PROCESSES WAITING FOR ACK 3 OR IN QUEUES ARE ABORTED «, t00=0x0100, t01=0x0162}
0x19164…19188 Head {h00=0x0020, h01=0x0050, text=» CM CWTABW,A5 NO MORE ABORT «, t00=0x0101, t01=0x0018}
0x19188…191ac Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0101, t01=0x003c}
0x191ac…191b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x0060}
0x191b6…191c4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0101, t01=0x006a}
0x191c4…191ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x0078}
0x191ce…19212 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0101, t01=0x0082}
0x19212…1921c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x00c6}
0x1921c…19234 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0101, t01=0x00d0}
0x19234…19244 Head {h00=0x000c, h01=0x0050, text=»* PLREWS«, t00=0x0101, t01=0x00e8}
0x19244…1924e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x00f8}
0x1924e…19262 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0101, t01=0x0102}
0x19262…1929a Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE WILL HANDLE RECOVERY OF ONE WORK «, t00=0x0101, t01=0x0116}
0x1929a…192d2 Head {h00=0x0034, h01=0x0050, text=»* STATION. ACTUAL CALL TO TERMINAL DEVICE DRIVER«, t00=0x0101, t01=0x014e}
0x192d2…19306 Head {h00=0x0030, h01=0x0050, text=»* RECOVERY ROUTINES ARE MADE THROUGH NDREWS.«, t00=0x0101, t01=0x0186}
0x19306…19310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0102, t01=0x002a}
0x19310…19320 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0102, t01=0x0034}
0x19320…19334 Head {h00=0x0010, h01=0x0050, text=»* ABL PLREWS«, t00=0x0102, t01=0x0044}
0x19334…1933e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0102, t01=0x0058}
0x1933e…1934e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0102, t01=0x0062}
0x1934e…1936a Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0102, t01=0x0072}
0x1936a…1938e Head {h00=0x0020, h01=0x0050, text=»* A6 = WORK STATION NUMBER «, t00=0x0102, t01=0x008e}
0x1938e…19398 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0102, t01=0x00b2}
0x19398…193aa Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0102, t01=0x00bc}
0x193aa…193d6 Head {h00=0x0028, h01=0x0050, text=»* AT ENTRY TO DEVICE RECOVERY: «, t00=0x0102, t01=0x00ce}
0x193d6…193ea Head {h00=0x0010, h01=0x0050, text=»* SEE NDREWS«, t00=0x0102, t01=0x00fa}
0x193ea…193f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0102, t01=0x010e}
0x193f4…19438 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0102, t01=0x0118}
0x19438…19442 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0102, t01=0x015c}
0x19442…19456 Head {h00=0x0010, h01=0x0050, text=»PLREWS EQU *«, t00=0x0102, t01=0x0166}
0x19456…1947c Head {h00=0x0022, h01=0x0050, text=» LDR A3,A6 WORK STATION NUMBER«, t00=0x0102, t01=0x017a}
0x1947c…19498 Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x0103, t01=0x0010}
0x19498…194ba Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x0103, t01=0x002c}
0x194ba…194f0 Head {h00=0x0032, h01=0x0050, text=» ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS «, t00=0x0103, t01=0x004e}
0x194f0…194fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0103, t01=0x0084}
0x194fa…1952c Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/FFFF-WSFERR MASK FOR ERROR FLAG «, t00=0x0103, t01=0x008e}
0x1952c…19560 Head {h00=0x0030, h01=0x0050, text=» ANRS A2,A3 INDICATE WS WORKING AFTER ERROR «, t00=0x0103, t01=0x00c0}
0x19560…1957c Head {h00=0x0018, h01=0x0050, text=» LCR A1,A3 WS STATUS«, t00=0x0103, t01=0x00f4}
0x1957c…1958e Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0103, t01=0x0110}
0x1958e…195ae Head {h00=0x001c, h01=0x0050, text=» SCR A2,A3 RESET STATUS «, t00=0x0103, t01=0x0122}
0x195ae…195de Head {h00=0x002c, h01=0x0050, text=» LDK A4,RESECP ASSUME SECONDARY POWER UP«, t00=0x0103, t01=0x0142}
0x195de…195fc Head {h00=0x001a, h01=0x0050, text=» ANK A1,NOTOPR WAS IT?«, t00=0x0103, t01=0x0172}
0x195fc…19616 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) PR110 YES «, t00=0x0103, t01=0x0190}
0x19616…1963c Head {h00=0x0022, h01=0x0050, text=» LDK A4,RELINE NO, LINK ERROR «, t00=0x0104, t01=0x001a}
0x1963c…19650 Head {h00=0x0010, h01=0x0050, text=»PR110 EQU * «, t00=0x0104, t01=0x0040}
0x19650…1967c Head {h00=0x0028, h01=0x0050, text=» LD* A3,CWTINT,A5 WORK STATION TABLE«, t00=0x0104, t01=0x0054}
0x1967c…196b4 Head {h00=0x0034, h01=0x0050, text=» CF A15,NDREWS CALL RECOVERY FOR ALL DWT:S ON WS«, t00=0x0104, t01=0x0080}
0x196b4…196be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x00b8}
0x196be…196e2 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0104, t01=0x00c2}
0x196e2…196ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x00e6}
0x196ec…196fa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0104, t01=0x00f0}
0x196fa…19704 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x00fe}
0x19704…19748 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0104, t01=0x0108}
0x19748…19752 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x014c}
0x19752…1976a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0104, t01=0x0156}
0x1976a…1977a Head {h00=0x000c, h01=0x0050, text=»* SENDRR«, t00=0x0104, t01=0x016e}
0x1977a…19784 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x017e}
0x19784…19798 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0104, t01=0x0188}
0x19798…197d2 Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE WILL SEND ONE LEVEL 3 RECIEVE READY«, t00=0x0105, t01=0x000c}
0x197d2…197fc Head {h00=0x0026, h01=0x0050, text=»* MESSAGE TO A SECONDARY STATION. «, t00=0x0105, t01=0x0046}
0x197fc…19806 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x0070}
0x19806…19816 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0105, t01=0x007a}
0x19816…1982a Head {h00=0x0010, h01=0x0050, text=»* ABL SENDRR«, t00=0x0105, t01=0x008a}
0x1982a…19834 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x009e}
0x19834…19844 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0105, t01=0x00a8}
0x19844…19860 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0105, t01=0x00b8}
0x19860…1987c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0105, t01=0x00d4}
0x1987c…19886 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x00f0}
0x19886…19898 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0105, t01=0x00fa}
0x19898…198a4 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x0105, t01=0x010c}
0x198a4…198ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x0118}
0x198ae…198f2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0105, t01=0x0122}
0x198f2…198fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x0166}
0x198fc…19910 Head {h00=0x0010, h01=0x0050, text=»SENDRR EQU *«, t00=0x0105, t01=0x0170}
0x19910…19932 Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x0105, t01=0x0184}
0x19932…19964 Head {h00=0x002e, h01=0x0050, text=» CF A15,GETBLK GET MONITOR BLOCK AS BUFFER«, t00=0x0106, t01=0x0016}
0x19964…19970 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0106, t01=0x0048}
0x19970…1998e Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0106, t01=0x0054}
0x1998e…199c4 Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTMBQ QUEUE FOR KEEPING TRACK OF MB:S«, t00=0x0106, t01=0x0072}
0x199c4…199f6 Head {h00=0x002e, h01=0x0050, text=» CF A15,LNKFST PUT MONITOR BLOCK IN QUEUE «, t00=0x0106, t01=0x00a8}
0x199f6…19a20 Head {h00=0x0026, h01=0x0050, text=» ADK A4,2 A4 := START OF USER PART«, t00=0x0106, t01=0x00da}
0x19a20…19a5a Head {h00=0x0036, h01=0x0050, text=» CF A15,WRADR2 WRITE LINE ADDRESS IN CCA & BUFFER «, t00=0x0106, t01=0x0104}
0x19a5a…19a8a Head {h00=0x002c, h01=0x0050, text=» LDK A2,CMDSW COMMAND := STANDARD WRITE «, t00=0x0106, t01=0x013e}
0x19a8a…19ab0 Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRCMD,A5 TO CCA«, t00=0x0106, t01=0x016e}
0x19ab0…19ae2 (263, 0, 400) Head {h00=0x002e, h01=0x0050, text=» LDK A2,TYRR MESSAGE TYPE := RECIEVE READY«, t00=0x0107, t01=0x0004}
0x19ae2…19b12 Head {h00=0x002c, h01=0x0050, text=» SC A2,CWTCCA+CCRIDB,A5 TO CCA, IDENTITY«, t00=0x0107, t01=0x0036}
0x19b12…19b3e Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT LENGTH OF X25 HEADER «, t00=0x0107, t01=0x0066}
0x19b3e…19b72 Head {h00=0x0030, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 BUFFER LENGTH TO CCA«, t00=0x0107, t01=0x0092}
0x19b72…19bb2 Head {h00=0x003c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAIN & MSB BUFFER ADDR «, t00=0x0107, t01=0x00c6}
0x19bb2…19be8 Head {h00=0x0032, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 BUFFER ADDRESS TO CCA «, t00=0x0107, t01=0x0106}
0x19be8…19bf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x013c}
0x19bf2…19c1c Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x0107, t01=0x0146}
0x19c1c…19c40 Head {h00=0x0020, h01=0x0050, text=» RF(Z) RR100 CONTINUE IF OK «, t00=0x0107, t01=0x0170}
0x19c40…19c62 (264, 0, 398) Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x0108, t01=0x0004}
0x19c62…19c7c Head {h00=0x0016, h01=0x0050, text=» RF RR110 SKIP RR «, t00=0x0108, t01=0x0026}
0x19c7c…19c90 Head {h00=0x0010, h01=0x0050, text=»RR100 EQU * «, t00=0x0108, t01=0x0040}
0x19c90…19cc2 Head {h00=0x002e, h01=0x0050, text=» CF A15,FWOPR A2 := P(R). UPDATE FLOW CTRL«, t00=0x0108, t01=0x0054}
0x19cc2…19ce8 Head {h00=0x0022, h01=0x0050, text=» ORK A2,/01 MESSAGE TYPE := RR«, t00=0x0108, t01=0x0086}
0x19ce8…19d0a Head {h00=0x001e, h01=0x0050, text=» SC A2,X25FLW,A4 TO BUFFER«, t00=0x0108, t01=0x00ac}
0x19d0a…19d32 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x0108, t01=0x00ce}
0x19d32…19d52 Head {h00=0x001c, h01=0x0050, text=» RF(Z) RR120 EXIT IF OK «, t00=0x0108, t01=0x00f6}
0x19d52…19d66 Head {h00=0x0010, h01=0x0050, text=»RR110 EQU * «, t00=0x0108, t01=0x0116}
0x19d66…19d96 Head {h00=0x002c, h01=0x0050, text=» SUK A4,2 START ADDRESS OF MONITOR BLOCK«, t00=0x0108, t01=0x012a}
0x19d96…19dce Head {h00=0x0034, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE. A7 ALREADY SET«, t00=0x0108, t01=0x015a}
0x19dce…19dfa (265, 0, 398) Head {h00=0x0028, h01=0x0050, text=» CF A15,FREBLK RETURN MONITOR BLOCK «, t00=0x0109, t01=0x0004}
0x19dfa…19e04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x0030}
0x19e04…19e18 Head {h00=0x0010, h01=0x0050, text=»RR120 EQU * «, t00=0x0109, t01=0x003a}
0x19e18…19e3c Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0109, t01=0x004e}
0x19e3c…19e46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x0072}
0x19e46…19e54 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0109, t01=0x007c}
0x19e54…19e5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x008a}
0x19e5e…19ea2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0109, t01=0x0094}
0x19ea2…19eac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x00d8}
0x19eac…19ec4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0109, t01=0x00e2}
0x19ec4…19ed4 Head {h00=0x000c, h01=0x0050, text=»* GREAD «, t00=0x0109, t01=0x00fa}
0x19ed4…19ede Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x010a}
0x19ede…19ef2 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0109, t01=0x0114}
0x19ef2…19f26 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE WILL PERFORM ONE GENERAL READ«, t00=0x0109, t01=0x0128}
0x19f26…19f46 Head {h00=0x001c, h01=0x0050, text=»* OPERATION TO THE PLC. «, t00=0x0109, t01=0x015c}
0x19f46…19f50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x017c}
0x19f50…19f60 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0109, t01=0x0186}
0x19f60…19f74 Head {h00=0x0010, h01=0x0050, text=»* ABL GREAD «, t00=0x010a, t01=0x0008}
0x19f74…19f7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x001c}
0x19f7e…19f8e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x010a, t01=0x0026}
0x19f8e…19fac Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x010a, t01=0x0036}
0x19fac…19fc8 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x010a, t01=0x0054}
0x19fc8…19fd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x0070}
0x19fd2…19fe4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x010a, t01=0x007a}
0x19fe4…19ff0 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x010a, t01=0x008c}
0x19ff0…19ffa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x0098}
0x19ffa…1a03e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x010a, t01=0x00a2}
0x1a03e…1a048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x00e6}
0x1a048…1a05c Head {h00=0x0010, h01=0x0050, text=»GREAD EQU * «, t00=0x010a, t01=0x00f0}
0x1a05c…1a08a Head {h00=0x002a, h01=0x0050, text=» LDR A6,A4 PARAMETER := BUFFER ADDRESS«, t00=0x010a, t01=0x0104}
0x1a08a…1a0b0 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLCCCA RESERVE PLC CCA«, t00=0x010a, t01=0x0132}
0x1a0b0…1a0d2 Head {h00=0x001e, h01=0x0050, text=»* SET CCA PARAMETERS «, t00=0x010a, t01=0x0158}
0x1a0d2…1a10e Head {h00=0x0038, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 CLEAR DATA CHAINING & MSB ADDR «, t00=0x010a, t01=0x017a}
0x1a10e…1a13c Head {h00=0x002a, h01=0x0050, text=» ST A6,CWTCCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x010b, t01=0x0026}
0x1a13c…1a162 Head {h00=0x0022, h01=0x0050, text=» LD A2,BUFLEN,A6 BUFFER LENGTH«, t00=0x010b, t01=0x0054}
0x1a162…1a182 Head {h00=0x001c, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 «, t00=0x010b, t01=0x007a}
0x1a182…1a1ac Head {h00=0x0026, h01=0x0050, text=» LDK A2,CMDGR COMMAND GENERAL READ«, t00=0x010b, t01=0x009a}
0x1a1ac…1a1e0 Head {h00=0x0030, h01=0x0050, text=» ST A2,CWTCCA+CCRDLS,A5 DLS INDEX & COMMAND «, t00=0x010b, t01=0x00c4}
0x1a1e0…1a208 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x010b, t01=0x00f8}
0x1a208…1a232 Head {h00=0x0026, h01=0x0050, text=» ABL PLDSP2 CHECK WHAT TO DO NEXT «, t00=0x010b, t01=0x0120}
0x1a232…1a23c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x014a}
0x1a23c…1a24a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010b, t01=0x0154}
0x1a24a…1a254 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x0162}
0x1a254…1a26c Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x010b, t01=0x016c}
0x1a26c…1a284 Head {h00=0x0014, h01=0x0050, text=»* SUBROUTINES * «, t00=0x010b, t01=0x0184}
0x1a284…1a29c Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x010c, t01=0x000c}
0x1a29c…1a2a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x0024}
0x1a2a6…1a2ea Head {h00=0x0040, h01=0x0050, text=»* THIS SECTION CONTAINS MISCELLANEOUS SERVICE SUBROUTINES.«, t00=0x010c, t01=0x002e}
0x1a2ea…1a324 Head {h00=0x0036, h01=0x0050, text=»* ALL ROUTINES ARE CALLED BY A CF A15,"NAME" «, t00=0x010c, t01=0x0072}
0x1a324…1a366 Head {h00=0x003e, h01=0x0050, text=»* INSTRUCTION. REGISTER INTERFACE IS DESCRIBED FOR EACH «, t00=0x010c, t01=0x00ac}
0x1a366…1a3a6 Head {h00=0x003c, h01=0x0050, text=»* ROUTINE. ONLY REGISTERS A1-A8 & PSW ARE CONSIDERED. «, t00=0x010c, t01=0x00ee}
0x1a3a6…1a3e6 Head {h00=0x003c, h01=0x0050, text=»* REGISTERS NOT MENTIONED UNDER "OUTPUT" ARE UNCHANGED«, t00=0x010c, t01=0x012e}
0x1a3e6…1a3fc Head {h00=0x0012, h01=0x0050, text=»* FROM CALL.«, t00=0x010c, t01=0x016e}
0x1a3fc…1a43c Head {h00=0x003c, h01=0x0050, text=»* THE ROUTINES ARE OF TWO TYPES, ASYNCHRONOUS ROUTINES«, t00=0x010c, t01=0x0184}
0x1a43c…1a47c Head {h00=0x003c, h01=0x0050, text=»* AND COMPUTATION ROUTINES. ASYNCHRONOUS ROUTINES MAY,«, t00=0x010d, t01=0x0034}
0x1a47c…1a4be Head {h00=0x003e, h01=0x0050, text=»* IF THE REQUESTED FUNCTION IS OCCUPIED OR NOT USEABLE, «, t00=0x010d, t01=0x0074}
0x1a4be…1a4fe Head {h00=0x003c, h01=0x0050, text=»* EXIT TO THE LOCAL DISPATCHER AND/OR TOSS DISPATCHER.«, t00=0x010d, t01=0x00b6}
0x1a4fe…1a53c Head {h00=0x003a, h01=0x0050, text=»* THIS MEANS THAT THE A15 STACK AT CALL MUST CONTAIN«, t00=0x010d, t01=0x00f6}
0x1a53c…1a57e Head {h00=0x003e, h01=0x0050, text=»* INTERRUPT RETURN, A1-A8 AND NOTHING ELSE. COMPUTATION «, t00=0x010d, t01=0x0134}
0x1a57e…1a5c0 Head {h00=0x003e, h01=0x0050, text=»* ROUTINES HAVE NO SUCH LIMITATIONS, AS THEY WILL RETURN«, t00=0x010d, t01=0x0176}
0x1a5c0…1a600 Head {h00=0x003c, h01=0x0050, text=»* IMMEDIATELY WHEN THEY HAVE PERFORMED THE PROCESSING.«, t00=0x010e, t01=0x0028}
0x1a600…1a60a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0068}
0x1a60a…1a618 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010e, t01=0x0072}
0x1a618…1a622 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0080}
0x1a622…1a656 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x010e, t01=0x008a}
0x1a656…1a660 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x00be}
0x1a660…1a678 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x010e, t01=0x00c8}
0x1a678…1a682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x00e0}
0x1a682…1a6a6 Head {h00=0x0020, h01=0x0050, text=»* ASYNCHRONOUS ROUTINES«, t00=0x010e, t01=0x00ea}
0x1a6a6…1a6ce Head {h00=0x0024, h01=0x0050, text=»* PLCCCA RESERVE CCA FOR PROCESS«, t00=0x010e, t01=0x010e}
0x1a6ce…1a6f0 Head {h00=0x001e, h01=0x0050, text=»* PLCCIO EXECUTE CIO START«, t00=0x010e, t01=0x0136}
0x1a6f0…1a6fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0158}
0x1a6fa…1a71e Head {h00=0x0020, h01=0x0050, text=»* COMPUTATION ROUTINES «, t00=0x010e, t01=0x0162}
0x1a71e…1a754 Head {h00=0x0032, h01=0x0050, text=»* PLCNOP SET FLAG INDICATING PLC NOT OPERABLE «, t00=0x010e, t01=0x0186}
0x1a754…1a77a Head {h00=0x0022, h01=0x0050, text=»* GETDWT CALCULATE DWT ADDRESS«, t00=0x010f, t01=0x002c}
0x1a77a…1a7a0 Head {h00=0x0022, h01=0x0050, text=»* GETCWT CALCULATE CWT ADDRESS«, t00=0x010f, t01=0x0052}
0x1a7a0…1a7d0 Head {h00=0x002c, h01=0x0050, text=»* GETFR GET NUMBER OF OUTSTANDING FRAMES«, t00=0x010f, t01=0x0078}
0x1a7d0…1a7fe Head {h00=0x002a, h01=0x0050, text=»* FLWINP HANDLE FLOW CONTROL FOR INPUT«, t00=0x010f, t01=0x00a8}
0x1a7fe…1a82e Head {h00=0x002c, h01=0x0050, text=»* FLWOUT HANDLE FLOW CONTROL FOR OUTPUT «, t00=0x010f, t01=0x00d6}
0x1a82e…1a864 Head {h00=0x0032, h01=0x0050, text=»* WRADDR WRITE LINE ADDRESS IN CCA AND BUFFER «, t00=0x010f, t01=0x0106}
0x1a864…1a88e Head {h00=0x0026, h01=0x0050, text=»* STAHAN PLC RETURN STATUS HANDLER«, t00=0x010f, t01=0x013c}
0x1a88e…1a8bc Head {h00=0x002a, h01=0x0050, text=»* GETSTA GET STATUS FOR I/O CONNECTION«, t00=0x010f, t01=0x0166}
0x1a8bc…1a8f2 (272, 0, 400) Head {h00=0x0032, h01=0x0050, text=»* PLGTBU ALLOCATE BUFFER AND SET TO PLC FORMAT«, t00=0x0110, t01=0x0004}
0x1a8f2…1a920 Head {h00=0x002a, h01=0x0050, text=»* PLRLBU RELEASE BUFFER OF PLC FORMAT «, t00=0x0110, t01=0x003a}
0x1a920…1a95c Head {h00=0x0038, h01=0x0050, text=»* PLCHAR GET/PUT CHARACTER FROM/IN PLC FORMAT BUFFER«, t00=0x0110, t01=0x0068}
0x1a95c…1a98a Head {h00=0x002a, h01=0x0050, text=»* INTYPE DECIDE TYPE OF INPUT MESSAGE «, t00=0x0110, t01=0x00a4}
0x1a98a…1a9bc Head {h00=0x002e, h01=0x0050, text=»* OUTBUQ REMOVE ELEMENT FROM BUFFER QUEUE «, t00=0x0110, t01=0x00d2}
0x1a9bc…1a9e8 Head {h00=0x0028, h01=0x0050, text=»* LNKFST LINK ELEMENT FIRST IN QUEUE«, t00=0x0110, t01=0x0104}
0x1a9e8…1aa14 Head {h00=0x0028, h01=0x0050, text=»* LNKLST LINK ELEMENT LAST IN QUEUE «, t00=0x0110, t01=0x0130}
0x1aa14…1aa3e Head {h00=0x0026, h01=0x0050, text=»* LNKOUT LINK ELEMENT OUT OF QUEUE«, t00=0x0110, t01=0x015c}
0x1aa3e…1aa48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x0186}
0x1aa48…1aa56 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0110, t01=0x0190}
0x1aa56…1aa60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x000e}
0x1aa60…1aaa4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0111, t01=0x0018}
0x1aaa4…1aaae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x005c}
0x1aaae…1aac6 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0111, t01=0x0066}
0x1aac6…1aad6 Head {h00=0x000c, h01=0x0050, text=»* PLCCCA«, t00=0x0111, t01=0x007e}
0x1aad6…1aae0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x008e}
0x1aae0…1aaf4 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0111, t01=0x0098}
0x1aaf4…1ab2c Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE IS CALLED WHEN A PROCESS WANTS TO«, t00=0x0111, t01=0x00ac}
0x1ab2c…1ab64 Head {h00=0x0034, h01=0x0050, text=»* USE THE PLC COMMAND COMMUNICATION AREA (CCA). «, t00=0x0111, t01=0x00e4}
0x1ab64…1ab9c Head {h00=0x0034, h01=0x0050, text=»* IF THE AREA IS FREE, THE ROUTINE SETS IT BUSY «, t00=0x0111, t01=0x011c}
0x1ab9c…1abd4 Head {h00=0x0034, h01=0x0050, text=»* AND RETURNS. IF THE AREA IS BUSY, THE CALLING «, t00=0x0111, t01=0x0154}
0x1abd4…1ac0c Head {h00=0x0034, h01=0x0050, text=»* PROCESS IS PUT IN A QUEUE, AND EXIT IS MADE TO«, t00=0x0111, t01=0x018c}
0x1ac0c…1ac2c Head {h00=0x001c, h01=0x0050, text=»* THE LOCAL DISPATCHER. «, t00=0x0112, t01=0x0034}
0x1ac2c…1ac54 Head {h00=0x0024, h01=0x0050, text=»* PLCCCA ONLY RESERVES THE AREA.«, t00=0x0112, t01=0x0054}
0x1ac54…1ac8a Head {h00=0x0032, h01=0x0050, text=»* PLCCCS ALSO SAVES THE QUEUE ELEMENT ADDRESS.«, t00=0x0112, t01=0x007c}
0x1ac8a…1ac94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0112, t01=0x00b2}
0x1ac94…1aca4 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0112, t01=0x00bc}
0x1aca4…1acbc Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCCCA «, t00=0x0112, t01=0x00cc}
0x1acbc…1acd4 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCCCS «, t00=0x0112, t01=0x00e4}
0x1acd4…1acde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0112, t01=0x00fc}
0x1acde…1acee Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0112, t01=0x0106}
0x1acee…1ad2a Head {h00=0x0038, h01=0x0050, text=»* A3 = QUEUE ELEMENT ADDRESS SAVE AREA (IF PLCCCS) «, t00=0x0112, t01=0x0116}
0x1ad2a…1ad46 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0112, t01=0x0152}
0x1ad46…1ad60 Head {h00=0x0016, h01=0x0050, text=»* A6 = PARAMETER «, t00=0x0112, t01=0x016e}
0x1ad60…1ad7c Head {h00=0x0018, h01=0x0050, text=»* A1-A8 ON A15 STACK«, t00=0x0112, t01=0x0188}
0x1ad7c…1ad86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0014}
0x1ad86…1ad98 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0113, t01=0x001e}
0x1ad98…1adce Head {h00=0x0032, h01=0x0050, text=»* A1 = RETURN CODE (IF PLCCCS, ELSE CHANGED) «, t00=0x0113, t01=0x0030}
0x1adce…1ade6 Head {h00=0x0014, h01=0x0050, text=»* A2-A4 CHANGED «, t00=0x0113, t01=0x0066}
0x1ade6…1adfe Head {h00=0x0014, h01=0x0050, text=»* A7-A8 CHANGED «, t00=0x0113, t01=0x007e}
0x1adfe…1ae16 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0113, t01=0x0096}
0x1ae16…1ae32 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0113, t01=0x00ae}
0x1ae32…1ae3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x00ca}
0x1ae3c…1ae80 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0113, t01=0x00d4}
0x1ae80…1ae8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0118}
0x1ae8a…1ae98 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0113, t01=0x0122}
0x1ae98…1aea2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0130}
0x1aea2…1aeb6 Head {h00=0x0010, h01=0x0050, text=»PLCCCA EQU *«, t00=0x0113, t01=0x013a}
0x1aeb6…1aee8 Head {h00=0x002e, h01=0x0050, text=» LDK A3,0 DON'T SAVE QUEUE ELEMENT ADDRESS«, t00=0x0113, t01=0x014e}
0x1aee8…1aef2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0180}
0x1aef2…1af06 Head {h00=0x0010, h01=0x0050, text=»PLCCCS EQU *«, t00=0x0113, t01=0x018a}
0x1af06…1af12 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0114, t01=0x000e}
0x1af12…1af42 Head {h00=0x002c, h01=0x0050, text=» LD A1,CWTCCQ,A5 ANYONE WAITING FOR CCA?«, t00=0x0114, t01=0x001a}
0x1af42…1af6a Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CA100 YES, PUT IN QUEUE «, t00=0x0114, t01=0x004a}
0x1af6a…1af8c Head {h00=0x001e, h01=0x0050, text=» LD A4,CWTCCB,A5 PLC BUSY?«, t00=0x0114, t01=0x0072}
0x1af8c…1afb4 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CA100 YES, PUT IN QUEUE «, t00=0x0114, t01=0x0094}
0x1afb4…1afbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x00bc}
0x1afbe…1afd4 Head {h00=0x0012, h01=0x0050, text=»* PLC FREE «, t00=0x0114, t01=0x00c6}
0x1afd4…1aff6 Head {h00=0x001e, h01=0x0050, text=» IM CWTCCB,A5 SET PLC BUSY«, t00=0x0114, t01=0x00dc}
0x1aff6…1b022 Head {h00=0x0028, h01=0x0050, text=» ADKL A15,4 ADJUST STACK FOR RETURN «, t00=0x0114, t01=0x00fe}
0x1b022…1b046 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RETURN CODE := OK «, t00=0x0114, t01=0x012a}
0x1b046…1b06e Head {h00=0x0024, h01=0x0050, text=» ABR* A15 RETURN IN INHIBIT MODE«, t00=0x0114, t01=0x014e}
0x1b06e…1b078 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x0176}
0x1b078…1b082 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x0180}
0x1b082…1b096 Head {h00=0x0010, h01=0x0050, text=»CA100 EQU * «, t00=0x0114, t01=0x018a}
0x1b096…1b0c2 Head {h00=0x0028, h01=0x0050, text=»* PLC BUSY. PUT REQUEST IN QUEUE.«, t00=0x0115, t01=0x000e}
0x1b0c2…1b0e4 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A6 SAVE PARAMETER «, t00=0x0115, t01=0x003a}
0x1b0e4…1b102 Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 SKIP PSW «, t00=0x0115, t01=0x005c}
0x1b102…1b12a Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A15 SAVE RETURN ADDRESS«, t00=0x0115, t01=0x007a}
0x1b12a…1b162 Head {h00=0x0034, h01=0x0050, text=» CF A15,GETBLK GET MONITOR BLOCK AND SAVE A1-A2 «, t00=0x0115, t01=0x00a2}
0x1b162…1b182 Head {h00=0x001c, h01=0x0050, text=» LDR A3,A3 SAVE POINTER?«, t00=0x0115, t01=0x00da}
0x1b182…1b1a4 Head {h00=0x001e, h01=0x0050, text=» RF(Z) CA110 NO, CONTINUE «, t00=0x0115, t01=0x00fa}
0x1b1a4…1b1d2 Head {h00=0x002a, h01=0x0050, text=» STR A4,A3 SAVE QUEUE ELEMENT ADDRESS «, t00=0x0115, t01=0x011c}
0x1b1d2…1b1e6 Head {h00=0x0010, h01=0x0050, text=»CA110 EQU * «, t00=0x0115, t01=0x014a}
0x1b1e6…1b204 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0115, t01=0x015e}
0x1b204…1b22e Head {h00=0x0026, h01=0x0050, text=» ADK A7,CWTCCQ PLC BUSY QUEUE HEAD«, t00=0x0115, t01=0x017c}
0x1b22e…1b25c Head {h00=0x002a, h01=0x0050, text=» CF A15,LNKLST PUT BLOCK LAST IN QUEUE«, t00=0x0116, t01=0x0016}
0x1b25c…1b282 Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x0116, t01=0x0044}
0x1b282…1b2a6 Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x0116, t01=0x006a}
0x1b2a6…1b2c2 Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0116, t01=0x008e}
0x1b2c2…1b2fa Head {h00=0x0034, h01=0x0050, text=» IM CCQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x0116, t01=0x00aa}
0x1b2fa…1b306 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0116, t01=0x00e2}
0x1b306…1b32a Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0116, t01=0x00ee}
0x1b32a…1b334 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0116, t01=0x0112}
0x1b334…1b33e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0116, t01=0x011c}
0x1b33e…1b374 Head {h00=0x0032, h01=0x0050, text=»* RETURN IS MADE HERE WHEN THE CCA IS FREE.«, t00=0x0116, t01=0x0126}
0x1b374…1b3ae Head {h00=0x0036, h01=0x0050, text=»* (AT A RELEASE INTERRUPT OR FROM DISPATCHER.) «, t00=0x0116, t01=0x015c}
0x1b3ae…1b3d0 Head {h00=0x001e, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x0117, t01=0x0008}
0x1b3d0…1b3f6 Head {h00=0x0022, h01=0x0050, text=»* A4 = MONITOR BLOCK ADDRESS «, t00=0x0117, t01=0x002a}
0x1b3f6…1b412 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0117, t01=0x0050}
0x1b412…1b41c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x006c}
0x1b41c…1b430 Head {h00=0x0010, h01=0x0050, text=»CCARST EQU *«, t00=0x0117, t01=0x0076}
0x1b430…1b43c Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0117, t01=0x008a}
0x1b43c…1b45a Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0117, t01=0x0096}
0x1b45a…1b480 Head {h00=0x0022, h01=0x0050, text=» ADK A7,CWTCCQ CCA QUEUE HEAD «, t00=0x0117, t01=0x00b4}
0x1b480…1b4b0 Head {h00=0x002c, h01=0x0050, text=» CF A15,LNKOUT REMOVE PROCESS FROM QUEUE«, t00=0x0117, t01=0x00da}
0x1b4b0…1b4d4 Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 RETURN CODE := OK «, t00=0x0117, t01=0x010a}
0x1b4d4…1b4de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x012e}
0x1b4de…1b4e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x0138}
0x1b4e8…1b528 Head {h00=0x003c, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN A REQUEST SHOULD BE ABORTED«, t00=0x0117, t01=0x0142}
0x1b528…1b546 Head {h00=0x001a, h01=0x0050, text=»* DUE TO I/O ERROR.«, t00=0x0117, t01=0x0182}
0x1b546…1b568 Head {h00=0x001e, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x0118, t01=0x0010}
0x1b568…1b584 Head {h00=0x0018, h01=0x0050, text=»* A3 = RETURN CODE «, t00=0x0118, t01=0x0032}
0x1b584…1b5aa Head {h00=0x0022, h01=0x0050, text=»* A4 = MONITOR BLOCK ADDRESS «, t00=0x0118, t01=0x004e}
0x1b5aa…1b5c6 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0118, t01=0x0074}
0x1b5c6…1b5d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x0090}
0x1b5d0…1b5e4 Head {h00=0x0010, h01=0x0050, text=»CCAABT EQU *«, t00=0x0118, t01=0x009a}
0x1b5e4…1b5f0 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0118, t01=0x00ae}
0x1b5f0…1b614 Head {h00=0x0020, h01=0x0050, text=» LDR A7,A3 SAVE RETURN CODE «, t00=0x0118, t01=0x00ba}
0x1b614…1b64c Head {h00=0x0034, h01=0x0050, text=» CF A15,FREBLK RETURN MONITOR BLOCK. LOAD A1-A2 «, t00=0x0118, t01=0x00de}
0x1b64c…1b668 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 PARAMETER«, t00=0x0118, t01=0x0116}
0x1b668…1b68c Head {h00=0x0020, h01=0x0050, text=» LDR A1,A7 A1 := RETURN CODE«, t00=0x0118, t01=0x0132}
0x1b68c…1b6a2 Head {h00=0x0012, h01=0x0050, text=» ABR A2 RETURN«, t00=0x0118, t01=0x0156}
0x1b6a2…1b6ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x016c}
0x1b6ac…1b6ba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0118, t01=0x0176}
0x1b6ba…1b6c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x0184}
0x1b6c4…1b708 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0118, t01=0x018e}
0x1b708…1b712 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x0042}
0x1b712…1b72a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0119, t01=0x004c}
0x1b72a…1b73a Head {h00=0x000c, h01=0x0050, text=»* PLCCIO«, t00=0x0119, t01=0x0064}
0x1b73a…1b744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x0074}
0x1b744…1b758 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0119, t01=0x007e}
0x1b758…1b798 Head {h00=0x003c, h01=0x0050, text=»* THIS ROUTINE CHECKS IF THE PLC CAN BE USED. IF IT CAN,«, t00=0x0119, t01=0x0092}
0x1b798…1b7d0 Head {h00=0x0034, h01=0x0050, text=»* THE ROUTINE EXECUTES A CIO START INSTRUCTION. «, t00=0x0119, t01=0x00d2}
0x1b7d0…1b808 Head {h00=0x0034, h01=0x0050, text=»* IF THE PLC IS NOT OPERABLE DUE TO TC POWER UP,«, t00=0x0119, t01=0x010a}
0x1b808…1b848 Head {h00=0x003c, h01=0x0050, text=»* THE ROUTINE WILL EXIT TO TOSS DISPATCHER. IN ALL OTHER«, t00=0x0119, t01=0x0142}
0x1b848…1b888 Head {h00=0x003c, h01=0x0050, text=»* CASES, IT WILL RETURN TO CALLING PROGRAM WITH A RETURN«, t00=0x0119, t01=0x0182}
0x1b888…1b898 Head {h00=0x000c, h01=0x0050, text=»* CODE. «, t00=0x011a, t01=0x0032}
0x1b898…1b8a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x0042}
0x1b8a2…1b8b2 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x011a, t01=0x004c}
0x1b8b2…1b8ca Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCCIO «, t00=0x011a, t01=0x005c}
0x1b8ca…1b8d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x0074}
0x1b8d4…1b8e4 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x011a, t01=0x007e}
0x1b8e4…1b900 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x011a, t01=0x008e}
0x1b900…1b91c Head {h00=0x0018, h01=0x0050, text=»* A1-A8 ON A15 STACK«, t00=0x011a, t01=0x00aa}
0x1b91c…1b926 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x00c6}
0x1b926…1b938 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x011a, t01=0x00d0}
0x1b938…1b954 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x011a, t01=0x00e2}
0x1b954…1b968 Head {h00=0x0010, h01=0x0050, text=»* 0 IF OK «, t00=0x011a, t01=0x00fe}
0x1b968…1b97e Head {h00=0x0012, h01=0x0050, text=»* NOT 0 ELSE«, t00=0x011a, t01=0x0112}
0x1b97e…1b996 Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x011a, t01=0x0128}
0x1b996…1b9b4 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x011a, t01=0x0140}
0x1b9b4…1b9d0 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x011a, t01=0x015e}
0x1b9d0…1b9da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x017a}
0x1b9da…1ba1e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x011a, t01=0x0184}
0x1ba1e…1ba28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011b, t01=0x0038}
0x1ba28…1ba3c Head {h00=0x0010, h01=0x0050, text=»PLCCIO EQU *«, t00=0x011b, t01=0x0042}
0x1ba3c…1ba48 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x011b, t01=0x0056}
0x1ba48…1ba66 Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 SKIP PSW «, t00=0x011b, t01=0x0062}
0x1ba66…1ba8e Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A15 GET RETURN ADDRESS «, t00=0x011b, t01=0x0080}
0x1ba8e…1ba98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011b, t01=0x00a8}
0x1ba98…1baa6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011b, t01=0x00b2}
0x1baa6…1bab0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011b, t01=0x00c0}
0x1bab0…1badc Head {h00=0x0028, h01=0x0050, text=» LD A1,PFPOST POWER UP TASK PENDING?«, t00=0x011b, t01=0x00ca}
0x1badc…1bb08 Head {h00=0x0028, h01=0x0050, text=» OR A1,PLCPFP PLC POWER UP PENDING? «, t00=0x011b, t01=0x00f6}
0x1bb08…1bb3a Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) TDISP YES, GO TO TOSS DISPATCHER «, t00=0x011b, t01=0x0122}
0x1bb3a…1bb60 Head {h00=0x0022, h01=0x0050, text=» LD A1,CWTOPR,A5 PLC OPERABLE?«, t00=0x011b, t01=0x0154}
0x1bb60…1bb80 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) CS100 NO, HANDLE«, t00=0x011b, t01=0x017a}
0x1bb80…1bb96 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x011c, t01=0x000a}
0x1bb96…1bbb4 Head {h00=0x001a, h01=0x0050, text=» CF A15,LOGCOM LOG CCR«, t00=0x011c, t01=0x0020}
0x1bbb4…1bbc0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x011c, t01=0x003e}
0x1bbc0…1bbe8 Head {h00=0x0024, h01=0x0050, text=» EX CWTCIO,A5 EXECUTE CIO START «, t00=0x011c, t01=0x004a}
0x1bbe8…1bc0e Head {h00=0x0022, h01=0x0050, text=» ABR(A) A2 RETURN IF OK. A1=0 «, t00=0x011c, t01=0x0072}
0x1bc0e…1bc18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x0098}
0x1bc18…1bc46 Head {h00=0x002a, h01=0x0050, text=» CF A15,PLCNOP ERROR. SET NOT OPERABLE«, t00=0x011c, t01=0x00a2}
0x1bc46…1bc5a Head {h00=0x0010, h01=0x0050, text=»CS100 EQU * «, t00=0x011c, t01=0x00d0}
0x1bc5a…1bc8c Head {h00=0x002e, h01=0x0050, text=» LDK A1,NOTOPR RETURN CODE := NOT OPERABLE«, t00=0x011c, t01=0x00e4}
0x1bc8c…1bcae Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x011c, t01=0x0116}
0x1bcae…1bcc8 Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 SET CR «, t00=0x011c, t01=0x0138}
0x1bcc8…1bcde Head {h00=0x0012, h01=0x0050, text=» ABR A2 RETURN«, t00=0x011c, t01=0x0152}
0x1bcde…1bce8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x0168}
0x1bce8…1bcf6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011c, t01=0x0172}
0x1bcf6…1bd00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x0180}
0x1bd00…1bd44 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x011c, t01=0x018a}
0x1bd44…1bd4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x003e}
0x1bd4e…1bd66 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x011d, t01=0x0048}
0x1bd66…1bd76 Head {h00=0x000c, h01=0x0050, text=»* PLCNOP«, t00=0x011d, t01=0x0060}
0x1bd76…1bd80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x0070}
0x1bd80…1bd94 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x011d, t01=0x007a}
0x1bd94…1bdd0 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE SETS A FLAG TO INDICATE THAT THE PLC «, t00=0x011d, t01=0x008e}
0x1bdd0…1bdec Head {h00=0x0018, h01=0x0050, text=»* IS "NOT OPERABLE".«, t00=0x011d, t01=0x00ca}
0x1bdec…1bdf6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x00e6}
0x1bdf6…1be06 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x011d, t01=0x00f0}
0x1be06…1be1e Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCNOP «, t00=0x011d, t01=0x0100}
0x1be1e…1be28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x0118}
0x1be28…1be38 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x011d, t01=0x0122}
0x1be38…1be54 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x011d, t01=0x0132}
0x1be54…1be5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x014e}
0x1be5e…1be70 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x011d, t01=0x0158}
0x1be70…1be7c Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x011d, t01=0x016a}
0x1be7c…1be86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x0176}
0x1be86…1beca Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x011d, t01=0x0180}
0x1beca…1bed4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x0034}
0x1bed4…1bee8 Head {h00=0x0010, h01=0x0050, text=»PLCNOP EQU *«, t00=0x011e, t01=0x003e}
0x1bee8…1bf04 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x011e, t01=0x0052}
0x1bf04…1bf2c Head {h00=0x0024, h01=0x0050, text=» LD A1,CWTPLS,A5 GET PLC STATUS «, t00=0x011e, t01=0x006e}
0x1bf2c…1bf42 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) PN100 «, t00=0x011e, t01=0x0096}
0x1bf42…1bf6a Head {h00=0x0024, h01=0x0050, text=» LDKL A1,-1 SET DUMMY ERROR CODE«, t00=0x011e, t01=0x00ac}
0x1bf6a…1bf7e Head {h00=0x0010, h01=0x0050, text=»PN100 EQU * «, t00=0x011e, t01=0x00d4}
0x1bf7e…1bfac Head {h00=0x002a, h01=0x0050, text=» ST A1,CWTOPR,A5 SET PLC NOT OPERABLE «, t00=0x011e, t01=0x00e8}
0x1bfac…1bfb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x0116}
0x1bfb6…1bfcc Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x011e, t01=0x0120}
0x1bfcc…1bfd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x0136}
0x1bfd6…1bfe4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011e, t01=0x0140}
0x1bfe4…1bfee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x014e}
0x1bfee…1c010 Head {h00=0x001e, h01=0x0050, text=» LD A1,UTTST TRAP CONTROL «, t00=0x011e, t01=0x0158}
0x1c010…1c02c Head {h00=0x0018, h01=0x0050, text=» SUK A1,1 TRAP USED?«, t00=0x011e, t01=0x017a}
0x1c02c…1c04a Head {h00=0x001a, h01=0x0050, text=» RF(NG) PN120 NO, SKIP«, t00=0x011f, t01=0x0008}
0x1c04a…1c06c Head {h00=0x001e, h01=0x0050, text=» LDK A1,PLCERR ERROR CODE «, t00=0x011f, t01=0x0026}
0x1c06c…1c08e Head {h00=0x001e, h01=0x0050, text=» OTR A1,0,/2E TO SOP LAMPS«, t00=0x011f, t01=0x0048}
0x1c08e…1c0b0 Head {h00=0x001e, h01=0x0050, text=» DATA /6300 TRAP TO BUGGER«, t00=0x011f, t01=0x006a}
0x1c0b0…1c0c4 Head {h00=0x0010, h01=0x0050, text=»PN120 EQU * «, t00=0x011f, t01=0x008c}
0x1c0c4…1c0ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x00a0}
0x1c0ce…1c0da Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x011f, t01=0x00aa}
0x1c0da…1c0e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x00b6}
0x1c0e4…1c100 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x011f, t01=0x00c0}
0x1c100…1c110 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x011f, t01=0x00dc}
0x1c110…1c11e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011f, t01=0x00ec}
0x1c11e…1c128 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x00fa}
0x1c128…1c16c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x011f, t01=0x0104}
0x1c16c…1c176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x0148}
0x1c176…1c18e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x011f, t01=0x0152}
0x1c18e…1c19e Head {h00=0x000c, h01=0x0050, text=»* GETDWT«, t00=0x011f, t01=0x016a}
0x1c19e…1c1a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x017a}
0x1c1a8…1c1bc Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x011f, t01=0x0184}
0x1c1bc…1c1f4 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE CALCULATES THE DWT ADDRESS FOR A «, t00=0x0120, t01=0x0008}
0x1c1f4…1c218 Head {h00=0x0020, h01=0x0050, text=»* DEVICE CONNECTED TO A PLC.«, t00=0x0120, t01=0x0040}
0x1c218…1c222 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x0064}
0x1c222…1c232 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0120, t01=0x006e}
0x1c232…1c24a Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETDWT «, t00=0x0120, t01=0x007e}
0x1c24a…1c254 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x0096}
0x1c254…1c264 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0120, t01=0x00a0}
0x1c264…1c280 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0120, t01=0x00b0}
0x1c280…1c29a Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x0120, t01=0x00cc}
0x1c29a…1c2b8 Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x0120, t01=0x00e6}
0x1c2b8…1c2c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x0104}
0x1c2c2…1c2d4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0120, t01=0x010e}
0x1c2d4…1c2fa Head {h00=0x0022, h01=0x0050, text=»* A6 = DWT ADDRESS IF FOUND, «, t00=0x0120, t01=0x0120}
0x1c2fa…1c30c Head {h00=0x000e, h01=0x0050, text=»* ELSE 0«, t00=0x0120, t01=0x0146}
0x1c30c…1c32a Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A6«, t00=0x0120, t01=0x0158}
0x1c32a…1c346 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0120, t01=0x0176}
0x1c346…1c350 (289, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x0004}
0x1c350…1c394 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0121, t01=0x000e}
0x1c394…1c39e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x0052}
0x1c39e…1c3b2 Head {h00=0x0010, h01=0x0050, text=»GETDWT EQU *«, t00=0x0121, t01=0x005c}
0x1c3b2…1c3be Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0121, t01=0x0070}
0x1c3be…1c3da Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x0121, t01=0x007c}
0x1c3da…1c406 Head {h00=0x0028, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE«, t00=0x0121, t01=0x0098}
0x1c406…1c42e Head {h00=0x0024, h01=0x0050, text=» CF A15,NDGEDW A6 := DWT ADDRESS«, t00=0x0121, t01=0x00c4}
0x1c42e…1c44a Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x0121, t01=0x00ec}
0x1c44a…1c476 Head {h00=0x0028, h01=0x0050, text=» ADKL A15,4 ADJUST STACK FOR RETURN «, t00=0x0121, t01=0x0108}
0x1c476…1c4a6 Head {h00=0x002c, h01=0x0050, text=» ANKL A6,/FFFE SET CR & SKIP ODD ADDRESS«, t00=0x0121, t01=0x0134}
0x1c4a6…1c4be Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0121, t01=0x0164}
0x1c4be…1c4c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x017c}
0x1c4c8…1c4d6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0121, t01=0x0186}
0x1c4d6…1c4e0 (290, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0004}
0x1c4e0…1c524 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0122, t01=0x000e}
0x1c524…1c52e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0052}
0x1c52e…1c546 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0122, t01=0x005c}
0x1c546…1c556 Head {h00=0x000c, h01=0x0050, text=»* GETCWT«, t00=0x0122, t01=0x0074}
0x1c556…1c560 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0084}
0x1c560…1c574 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0122, t01=0x008e}
0x1c574…1c5aa Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE CALCULATES THE CWT ADDRESS FOR «, t00=0x0122, t01=0x00a2}
0x1c5aa…1c5d8 Head {h00=0x002a, h01=0x0050, text=»* THE PLC CONTROLLING CALLING DEVICE. «, t00=0x0122, t01=0x00d8}
0x1c5d8…1c5e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0106}
0x1c5e2…1c5f2 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0122, t01=0x0110}
0x1c5f2…1c60a Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETCWT «, t00=0x0122, t01=0x0120}
0x1c60a…1c614 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0138}
0x1c614…1c624 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0122, t01=0x0142}
0x1c624…1c640 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0122, t01=0x0152}
0x1c640…1c64a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x016e}
0x1c64a…1c65c Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0122, t01=0x0178}
0x1c65c…1c682 Head {h00=0x0022, h01=0x0050, text=»* A5 = CWT ADDRESS IF FOUND, «, t00=0x0122, t01=0x018a}
0x1c682…1c694 Head {h00=0x000e, h01=0x0050, text=»* ELSE 0«, t00=0x0123, t01=0x0020}
0x1c694…1c6ba Head {h00=0x0022, h01=0x0050, text=»* A7 = 0 IF LOCAL CONNECTION «, t00=0x0123, t01=0x0032}
0x1c6ba…1c6d2 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0123, t01=0x0058}
0x1c6d2…1c6dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0123, t01=0x0070}
0x1c6dc…1c720 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0123, t01=0x007a}
0x1c720…1c72a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0123, t01=0x00be}
0x1c72a…1c73e Head {h00=0x0010, h01=0x0050, text=»GETCWT EQU *«, t00=0x0123, t01=0x00c8}
0x1c73e…1c76a Head {h00=0x0028, h01=0x0050, text=» LD A5,DWTCHP,A6 CHANNEL PARAMETERS «, t00=0x0123, t01=0x00dc}
0x1c76a…1c79a Head {h00=0x002c, h01=0x0050, text=» ANK A5,MASKPL CLEAN CHANNEL UNIT INDEX «, t00=0x0123, t01=0x0108}
0x1c79a…1c7b6 Head {h00=0x0018, h01=0x0050, text=» SLL A5,1 MAKE INDEX«, t00=0x0123, t01=0x0138}
0x1c7b6…1c7cc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0123, t01=0x0154}
0x1c7cc…1c7e2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0123, t01=0x016a}
0x1c7e2…1c808 Head {h00=0x0022, h01=0x0050, text=» LDR* A7,A6 CHANNEL PARAMETER «, t00=0x0123, t01=0x0180}
0x1c808…1c828 Head {h00=0x001c, h01=0x0050, text=» SUKL A7,/0500 REMOTE ? «, t00=0x0124, t01=0x0016}
0x1c828…1c840 Head {h00=0x0014, h01=0x0050, text=» RF(Z) GET010 NO«, t00=0x0124, t01=0x0036}
0x1c840…1c86a Head {h00=0x0026, h01=0x0050, text=» ADK A5,8 ADJUST INDEX FOR REMOTE «, t00=0x0124, t01=0x004e}
0x1c86a…1c876 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0124, t01=0x0078}
0x1c876…1c8a6 Head {h00=0x002c, h01=0x0050, text=»GET010 LD A5,TABCWT,A5 A5 := CWT ADDRESS«, t00=0x0124, t01=0x0084}
0x1c8a6…1c8b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x00b4}
0x1c8b0…1c8c6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0124, t01=0x00be}
0x1c8c6…1c8e2 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0124, t01=0x00d4}
0x1c8e2…1c8fc Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0124, t01=0x00f0}
0x1c8fc…1c908 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0124, t01=0x010a}
0x1c908…1c91e Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0124, t01=0x0116}
0x1c91e…1c92e Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0124, t01=0x012c}
0x1c92e…1c93a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0124, t01=0x013c}
0x1c93a…1c944 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x0148}
0x1c944…1c952 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0124, t01=0x0152}
0x1c952…1c95c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x0160}
0x1c95c…1c9a0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0124, t01=0x016a}
0x1c9a0…1c9aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0125, t01=0x001e}
0x1c9aa…1c9c2 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0125, t01=0x0028}
0x1c9c2…1c9d2 Head {h00=0x000c, h01=0x0050, text=»* GETFR «, t00=0x0125, t01=0x0040}
0x1c9d2…1c9dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0125, t01=0x0050}
0x1c9dc…1c9f0 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0125, t01=0x005a}
0x1c9f0…1ca2c Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE CALCULATES THE NUMBER OF OUTSTANDING «, t00=0x0125, t01=0x006e}
0x1ca2c…1ca66 Head {h00=0x0036, h01=0x0050, text=»* FRAMES, IE FRAMES THAT HAVE BEEN TRANSFERRED BUT«, t00=0x0125, t01=0x00aa}
0x1ca66…1ca9a Head {h00=0x0030, h01=0x0050, text=»* NOT ACKNOWLEDGED ON LEVEL 3, FOR A LOGICAL«, t00=0x0125, t01=0x00e4}
0x1ca9a…1caac Head {h00=0x000e, h01=0x0050, text=»* CHANNEL.«, t00=0x0125, t01=0x0118}
0x1caac…1cae4 Head {h00=0x0034, h01=0x0050, text=»* GETIFR GETS NUMBER OF FRAMES RECIEVED BY PLC. «, t00=0x0125, t01=0x012a}
0x1cae4…1cb18 Head {h00=0x0030, h01=0x0050, text=»* GETOFR GETS NUMBER OF FRAMES SENT BY PLC. «, t00=0x0125, t01=0x0162}
0x1cb18…1cb22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0008}
0x1cb22…1cb32 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0126, t01=0x0012}
0x1cb32…1cb4a Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETIFR «, t00=0x0126, t01=0x0022}
0x1cb4a…1cb62 Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETOFR «, t00=0x0126, t01=0x003a}
0x1cb62…1cb6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0052}
0x1cb6c…1cb7c Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0126, t01=0x005c}
0x1cb7c…1cb98 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0126, t01=0x006c}
0x1cb98…1cba2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0088}
0x1cba2…1cbb4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0126, t01=0x0092}
0x1cbb4…1cbcc Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0126, t01=0x00a4}
0x1cbcc…1cbf8 Head {h00=0x0028, h01=0x0050, text=»* A2 = NUMBER OF OUTSTANDING FRAMES«, t00=0x0126, t01=0x00bc}
0x1cbf8…1cc10 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0126, t01=0x00e8}
0x1cc10…1cc1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0100}
0x1cc1a…1cc5e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0126, t01=0x010a}
0x1cc5e…1cc68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x014e}
0x1cc68…1cc7c Head {h00=0x0010, h01=0x0050, text=»GETIFR EQU *«, t00=0x0126, t01=0x0158}
0x1cc7c…1ccaa Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x0126, t01=0x016c}
0x1ccaa…1ccbc Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0127, t01=0x000a}
0x1ccbc…1ccee Head {h00=0x002e, h01=0x0050, text=» SRL A2,9 BITS 13-15 := NEXT EXPECTED P(S)«, t00=0x0127, t01=0x001c}
0x1ccee…1cd1c Head {h00=0x002a, h01=0x0050, text=» SRL A1,5 BITS 13-15 := LAST SENT P(R)«, t00=0x0127, t01=0x004e}
0x1cd1c…1cd3c Head {h00=0x001c, h01=0x0050, text=» RF GF100 TO COMMON PART«, t00=0x0127, t01=0x007c}
0x1cd3c…1cd46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x009c}
0x1cd46…1cd54 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0127, t01=0x00a6}
0x1cd54…1cd5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x00b4}
0x1cd5e…1cd72 Head {h00=0x0010, h01=0x0050, text=»GETOFR EQU *«, t00=0x0127, t01=0x00be}
0x1cd72…1cda0 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x0127, t01=0x00d2}
0x1cda0…1cdb2 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0127, t01=0x0100}
0x1cdb2…1cde4 Head {h00=0x002e, h01=0x0050, text=» SRL A2,1 BITS 13-15 := NEXT P(S) TO SEND «, t00=0x0127, t01=0x0112}
0x1cde4…1ce16 Head {h00=0x002e, h01=0x0050, text=» SLC A1,3 BITS 13-15 := LAST RECIEVED P(R)«, t00=0x0127, t01=0x0144}
0x1ce16…1ce20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x0176}
0x1ce20…1ce2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x0180}
0x1ce2a…1ce3e Head {h00=0x0010, h01=0x0050, text=»GF100 EQU * «, t00=0x0127, t01=0x018a}
0x1ce3e…1ce6a Head {h00=0x0028, h01=0x0050, text=» SUR A2,A1 A2 := OUTSTANDING FRAMES «, t00=0x0128, t01=0x000e}
0x1ce6a…1ce8e Head {h00=0x0020, h01=0x0050, text=» ANK A2,/07 CLEAN & MODULO 8«, t00=0x0128, t01=0x003a}
0x1ce8e…1ce98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x005e}
0x1ce98…1ceae Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0128, t01=0x0068}
0x1ceae…1ceca Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0128, t01=0x007e}
0x1ceca…1cee4 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0128, t01=0x009a}
0x1cee4…1cef0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0128, t01=0x00b4}
0x1cef0…1cefa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x00c0}
0x1cefa…1cf10 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0128, t01=0x00ca}
0x1cf10…1cf20 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0128, t01=0x00e0}
0x1cf20…1cf2c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0128, t01=0x00f0}
0x1cf2c…1cf36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x00fc}
0x1cf36…1cf44 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0128, t01=0x0106}
0x1cf44…1cf4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x0114}
0x1cf4e…1cf92 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0128, t01=0x011e}
0x1cf92…1cf9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x0162}
0x1cf9c…1cfb4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0128, t01=0x016c}
0x1cfb4…1cfc4 Head {h00=0x000c, h01=0x0050, text=»* FLWINP«, t00=0x0128, t01=0x0184}
0x1cfc4…1cfce (297, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0129, t01=0x0004}
0x1cfce…1cfe2 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0129, t01=0x000e}
0x1cfe2…1d024 Head {h00=0x003e, h01=0x0050, text=»* THIS ROUTINE HANDLES FLOW CONTROL FOR INPUT. IT FETCHES «, t00=0x0129, t01=0x0022}
0x1d024…1d060 Head {h00=0x0038, h01=0x0050, text=»* FLOW CONTROL INFORMATION FROM MESSAGE AND UPDATES «, t00=0x0129, t01=0x0064}
0x1d060…1d07a Head {h00=0x0016, h01=0x0050, text=»* COUNTERS IN DWT.«, t00=0x0129, t01=0x00a0}
0x1d07a…1d0b0 Head {h00=0x0032, h01=0x0050, text=»* FWIPR IS FOR MESSAGES ONLY CONTAINING P(R). «, t00=0x0129, t01=0x00ba}
0x1d0b0…1d0ea Head {h00=0x0036, h01=0x0050, text=»* FWIPSR IS FOR MESSAGES CONTAINING P(S) AND P(R).«, t00=0x0129, t01=0x00f0}
0x1d0ea…1d10c Head {h00=0x001e, h01=0x0050, text=»* NO ERROR CHECK IS MADE. «, t00=0x0129, t01=0x012a}
0x1d10c…1d116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0129, t01=0x014c}
0x1d116…1d126 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0129, t01=0x0156}
0x1d126…1d13c Head {h00=0x0012, h01=0x0050, text=»* CF A15,FWIPR«, t00=0x0129, t01=0x0166}
0x1d13c…1d154 Head {h00=0x0014, h01=0x0050, text=»* CF A15,FWIPSR «, t00=0x0129, t01=0x017c}
0x1d154…1d15e (298, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x0004}
0x1d15e…1d16e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x012a, t01=0x000e}
0x1d16e…1d18c Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x012a, t01=0x001e}
0x1d18c…1d1a8 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x012a, t01=0x003c}
0x1d1a8…1d1b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x0058}
0x1d1b2…1d1c4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x012a, t01=0x0062}
0x1d1c4…1d1dc Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x012a, t01=0x0074}
0x1d1dc…1d1f4 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x012a, t01=0x008c}
0x1d1f4…1d1fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x00a4}
0x1d1fe…1d242 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012a, t01=0x00ae}
0x1d242…1d24c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x00f2}
0x1d24c…1d260 Head {h00=0x0010, h01=0x0050, text=»FWIPR EQU * «, t00=0x012a, t01=0x00fc}
0x1d260…1d27c Head {h00=0x0018, h01=0x0050, text=» STR A2,A15 PUSH A2 «, t00=0x012a, t01=0x0110}
0x1d27c…1d2ac Head {h00=0x002c, h01=0x0050, text=» LC A1,X25FLW,A4 FLOW CONTROL FROM INPUT«, t00=0x012a, t01=0x012c}
0x1d2ac…1d2d4 Head {h00=0x0024, h01=0x0050, text=» ANK A1,/E0 BITS 8-10 = P(R) IN «, t00=0x012a, t01=0x015c}
0x1d2d4…1d2fe Head {h00=0x0026, h01=0x0050, text=» LC A2,DWTLD2,A6 OLD FLOW CONTROL «, t00=0x012a, t01=0x0184}
0x1d2fe…1d32a Head {h00=0x0028, h01=0x0050, text=» ANK A2,/0E BITS 12-14 = OLD P(S) IN«, t00=0x012b, t01=0x001e}
0x1d32a…1d34a Head {h00=0x001c, h01=0x0050, text=» ORR A1,A2 KEEP OLD P(S)«, t00=0x012b, t01=0x004a}
0x1d34a…1d366 Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A15 POP A2 «, t00=0x012b, t01=0x006a}
0x1d366…1d386 Head {h00=0x001c, h01=0x0050, text=» RF FI100 COMMON ENDING «, t00=0x012b, t01=0x0086}
0x1d386…1d390 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x00a6}
0x1d390…1d39a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x00b0}
0x1d39a…1d3ae Head {h00=0x0010, h01=0x0050, text=»FWIPSR EQU *«, t00=0x012b, t01=0x00ba}
0x1d3ae…1d3de Head {h00=0x002c, h01=0x0050, text=» LC A1,X25FLW,A4 FLOW CONTROL FROM INPUT«, t00=0x012b, t01=0x00ce}
0x1d3de…1d3f8 Head {h00=0x0016, h01=0x0050, text=» ANK A1,/EE CLEAN «, t00=0x012b, t01=0x00fe}
0x1d3f8…1d430 Head {h00=0x0034, h01=0x0050, text=» ADK A1,/02 BITS 12-14 := NEXT EXPECTED P(S) IN «, t00=0x012b, t01=0x0118}
0x1d430…1d44c Head {h00=0x0018, h01=0x0050, text=» ANK A1,/EE MODULO 8«, t00=0x012b, t01=0x0150}
0x1d44c…1d456 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x016c}
0x1d456…1d460 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x0176}
0x1d460…1d474 Head {h00=0x0010, h01=0x0050, text=»FI100 EQU * «, t00=0x012b, t01=0x0180}
0x1d474…1d4a2 (300, 0, 400) Head {h00=0x002a, h01=0x0050, text=» SC A1,DWTLD2,A6 SAVE NEW FLOW CONTROL«, t00=0x012c, t01=0x0004}
0x1d4a2…1d4ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x0032}
0x1d4ac…1d4c2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x012c, t01=0x003c}
0x1d4c2…1d4de Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x012c, t01=0x0052}
0x1d4de…1d4f8 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x012c, t01=0x006e}
0x1d4f8…1d504 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012c, t01=0x0088}
0x1d504…1d50e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x0094}
0x1d50e…1d524 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x012c, t01=0x009e}
0x1d524…1d534 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x012c, t01=0x00b4}
0x1d534…1d540 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012c, t01=0x00c4}
0x1d540…1d54a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x00d0}
0x1d54a…1d558 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012c, t01=0x00da}
0x1d558…1d562 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x00e8}
0x1d562…1d5a6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012c, t01=0x00f2}
0x1d5a6…1d5b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x0136}
0x1d5b0…1d5c8 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x012c, t01=0x0140}
0x1d5c8…1d5d8 Head {h00=0x000c, h01=0x0050, text=»* FLWOUT«, t00=0x012c, t01=0x0158}
0x1d5d8…1d5e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x0168}
0x1d5e2…1d5f6 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x012c, t01=0x0172}
0x1d5f6…1d632 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE HANDLES FLOW CONTROL FOR OUTPUT. FLOW«, t00=0x012c, t01=0x0186}
0x1d632…1d672 Head {h00=0x003c, h01=0x0050, text=»* CONTROL INFORMATION IS FETCHED FROM DWT, AND COUNTERS «, t00=0x012d, t01=0x0032}
0x1d672…1d690 Head {h00=0x001a, h01=0x0050, text=»* IN DWT ARE UPDATED. «, t00=0x012d, t01=0x0072}
0x1d690…1d6c6 Head {h00=0x0032, h01=0x0050, text=»* FWOPR IS FOR MESSAGES CONTAINING ONLY P(R). «, t00=0x012d, t01=0x0090}
0x1d6c6…1d700 Head {h00=0x0036, h01=0x0050, text=»* FWOPSR IS FOR MESSAGES CONTAINING P(S) AND P(R).«, t00=0x012d, t01=0x00c6}
0x1d700…1d70a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x0100}
0x1d70a…1d71a Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x012d, t01=0x010a}
0x1d71a…1d730 Head {h00=0x0012, h01=0x0050, text=»* CF A15,FWOPR«, t00=0x012d, t01=0x011a}
0x1d730…1d748 Head {h00=0x0014, h01=0x0050, text=»* CF A15,FWOPSR «, t00=0x012d, t01=0x0130}
0x1d748…1d752 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x0148}
0x1d752…1d762 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x012d, t01=0x0152}
0x1d762…1d77e Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x012d, t01=0x0162}
0x1d77e…1d788 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x017e}
0x1d788…1d79a Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x012d, t01=0x0188}
0x1d79a…1d7b2 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x012e, t01=0x000a}
0x1d7b2…1d7d0 Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x012e, t01=0x0022}
0x1d7d0…1d7f2 Head {h00=0x001e, h01=0x0050, text=»* BITS 8-10 P(R) TO SEND«, t00=0x012e, t01=0x0040}
0x1d7f2…1d80a Head {h00=0x0014, h01=0x0050, text=»* BIT 11 ZERO «, t00=0x012e, t01=0x0062}
0x1d80a…1d838 Head {h00=0x002a, h01=0x0050, text=»* BITS 12-14 P(S) TO SEND IF FWOPSR «, t00=0x012e, t01=0x007a}
0x1d838…1d85a Head {h00=0x001e, h01=0x0050, text=»* ELSE ZERO «, t00=0x012e, t01=0x00a8}
0x1d85a…1d872 Head {h00=0x0014, h01=0x0050, text=»* BIT 15 ZERO «, t00=0x012e, t01=0x00ca}
0x1d872…1d88a Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x012e, t01=0x00e2}
0x1d88a…1d894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x00fa}
0x1d894…1d8d8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012e, t01=0x0104}
0x1d8d8…1d8e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x0148}
0x1d8e2…1d8f6 Head {h00=0x0010, h01=0x0050, text=»FWOPR EQU * «, t00=0x012e, t01=0x0152}
0x1d8f6…1d924 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x012e, t01=0x0166}
0x1d924…1d936 (303, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x012f, t01=0x0004}
0x1d936…1d96a Head {h00=0x0030, h01=0x0050, text=» SRL A2,4 BITS 8-10 := NEXT EXPECTED P(S) IN«, t00=0x012f, t01=0x0016}
0x1d96a…1d988 Head {h00=0x001a, h01=0x0050, text=»* (= P(R) TO SEND) «, t00=0x012f, t01=0x004a}
0x1d988…1d9a2 Head {h00=0x0016, h01=0x0050, text=» ANK A2,/E0 CLEAN «, t00=0x012f, t01=0x0068}
0x1d9a2…1d9d4 Head {h00=0x002e, h01=0x0050, text=» ANK A1,/0E BITS 12-14 = NEXT P(S) TO SEND«, t00=0x012f, t01=0x0082}
0x1d9d4…1d9fe Head {h00=0x0026, h01=0x0050, text=» ORR A1,A2 P(S) := SAME AS BEFORE «, t00=0x012f, t01=0x00b4}
0x1d9fe…1da1e Head {h00=0x001c, h01=0x0050, text=» RF FO100 COMMON ENDING «, t00=0x012f, t01=0x00de}
0x1da1e…1da28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x00fe}
0x1da28…1da32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x0108}
0x1da32…1da46 Head {h00=0x0010, h01=0x0050, text=»FWOPSR EQU *«, t00=0x012f, t01=0x0112}
0x1da46…1da74 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x012f, t01=0x0126}
0x1da74…1da86 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x012f, t01=0x0154}
0x1da86…1daba Head {h00=0x0030, h01=0x0050, text=» SRL A2,4 BITS 8-10 := NEXT EXPECTED P(S) IN«, t00=0x012f, t01=0x0166}
0x1daba…1dad8 Head {h00=0x001a, h01=0x0050, text=»* (= P(R) TO SEND) «, t00=0x0130, t01=0x000a}
0x1dad8…1daf2 Head {h00=0x0016, h01=0x0050, text=» ANK A2,/E0 CLEAN «, t00=0x0130, t01=0x0028}
0x1daf2…1db24 Head {h00=0x002e, h01=0x0050, text=» ANK A1,/0E BITS 12-14 = NEXT P(S) TO SEND«, t00=0x0130, t01=0x0042}
0x1db24…1db4c Head {h00=0x0024, h01=0x0050, text=» ORR A2,A1 COUNTERS FOR MESSAGE «, t00=0x0130, t01=0x0074}
0x1db4c…1db5e Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0130, t01=0x009c}
0x1db5e…1db88 Head {h00=0x0026, h01=0x0050, text=» ADK A1,/02 INCREMENT P(S) TO SEND«, t00=0x0130, t01=0x00ae}
0x1db88…1dba4 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/EE MODULO 8«, t00=0x0130, t01=0x00d8}
0x1dba4…1dbae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x00f4}
0x1dbae…1dbb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x00fe}
0x1dbb8…1dbcc Head {h00=0x0010, h01=0x0050, text=»FO100 EQU * «, t00=0x0130, t01=0x0108}
0x1dbcc…1dc02 Head {h00=0x0032, h01=0x0050, text=» SC A1,DWTLD2+1,A6 SAVE FLOW CONTROL COUNTERS «, t00=0x0130, t01=0x011c}
0x1dc02…1dc0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x0152}
0x1dc0c…1dc22 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0130, t01=0x015c}
0x1dc22…1dc3e Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0130, t01=0x0172}
0x1dc3e…1dc58 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0130, t01=0x018e}
0x1dc58…1dc64 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0131, t01=0x0018}
0x1dc64…1dc6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x0024}
0x1dc6e…1dc84 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0131, t01=0x002e}
0x1dc84…1dc94 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0131, t01=0x0044}
0x1dc94…1dca0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0131, t01=0x0054}
0x1dca0…1dcae Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0131, t01=0x0060}
0x1dcae…1dcb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x006e}
0x1dcb8…1dcfc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0131, t01=0x0078}
0x1dcfc…1dd06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x00bc}
0x1dd06…1dd1e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0131, t01=0x00c6}
0x1dd1e…1dd2e Head {h00=0x000c, h01=0x0050, text=»* WRADDR«, t00=0x0131, t01=0x00de}
0x1dd2e…1dd38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x00ee}
0x1dd38…1dd4c Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0131, t01=0x00f8}
0x1dd4c…1dd80 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE WRITES THE LINE ADDRESS IN A «, t00=0x0131, t01=0x010c}
0x1dd80…1ddba Head {h00=0x0036, h01=0x0050, text=»* MESSAGE. THE ADDRESS CONSISTS OF: DROP ADDRESS, «, t00=0x0131, t01=0x0140}
0x1ddba…1ddf0 Head {h00=0x0032, h01=0x0050, text=»* GROUP NUMBER AND DEVICE ADDRESS. WRADR1 SETS«, t00=0x0131, t01=0x017a}
0x1ddf0…1de2a Head {h00=0x0036, h01=0x0050, text=»* GROUP=1 INDICATING NO FLOW CONTROL, WRADR2 SETS «, t00=0x0132, t01=0x0020}
0x1de2a…1de54 Head {h00=0x0026, h01=0x0050, text=»* GROUP=0 INDICATING FLOW CONTROL.«, t00=0x0132, t01=0x005a}
0x1de54…1de5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0132, t01=0x0084}
0x1de5e…1de6e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0132, t01=0x008e}
0x1de6e…1de86 Head {h00=0x0014, h01=0x0050, text=»* CF A15,WRADR1 «, t00=0x0132, t01=0x009e}
0x1de86…1de9e Head {h00=0x0014, h01=0x0050, text=»* CF A15,WRADR2 «, t00=0x0132, t01=0x00b6}
0x1de9e…1dea8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0132, t01=0x00ce}
0x1dea8…1deb8 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0132, t01=0x00d8}
0x1deb8…1ded6 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0132, t01=0x00e8}
0x1ded6…1def2 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0132, t01=0x0106}
0x1def2…1df0e Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0132, t01=0x0122}
0x1df0e…1df18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0132, t01=0x013e}
0x1df18…1df2a Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0132, t01=0x0148}
0x1df2a…1df42 Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x0132, t01=0x015a}
0x1df42…1df5a Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0132, t01=0x0172}
0x1df5a…1df64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0132, t01=0x018a}
0x1df64…1dfa8 (307, 0, 400) Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0133, t01=0x0004}
0x1dfa8…1dfb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x0048}
0x1dfb2…1dfc6 Head {h00=0x0010, h01=0x0050, text=»WRADR1 EQU *«, t00=0x0133, t01=0x0052}
0x1dfc6…1dfe8 Head {h00=0x001e, h01=0x0050, text=» LDK A2,/11 GROUP NUMBER 1«, t00=0x0133, t01=0x0066}
0x1dfe8…1e008 Head {h00=0x001c, h01=0x0050, text=» RF WA100 TO COMMON PART«, t00=0x0133, t01=0x0088}
0x1e008…1e012 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x00a8}
0x1e012…1e020 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0133, t01=0x00b2}
0x1e020…1e02a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x00c0}
0x1e02a…1e03e Head {h00=0x0010, h01=0x0050, text=»WRADR2 EQU *«, t00=0x0133, t01=0x00ca}
0x1e03e…1e060 Head {h00=0x001e, h01=0x0050, text=» LDK A2,/10 GROUP NUMBER 0«, t00=0x0133, t01=0x00de}
0x1e060…1e06a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x0100}
0x1e06a…1e074 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x010a}
0x1e074…1e088 Head {h00=0x0010, h01=0x0050, text=»WA100 EQU * «, t00=0x0133, t01=0x0114}
0x1e088…1e0b8 Head {h00=0x002c, h01=0x0050, text=» SC A2,X25LGN,A4 GROUP NUMBER TO BUFFER «, t00=0x0133, t01=0x0128}
0x1e0b8…1e0e4 Head {h00=0x0028, h01=0x0050, text=» LC A2,DWTCP2,A6 CHANNEL PARAMETERS «, t00=0x0133, t01=0x0158}
0x1e0e4…1e10a Head {h00=0x0022, h01=0x0050, text=» ANK A2,MASKWS CLEAN WS NUMBER«, t00=0x0133, t01=0x0184}
0x1e10a…1e130 Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRDLS,A5 TO CCA«, t00=0x0134, t01=0x001a}
0x1e130…1e14a Head {h00=0x0016, h01=0x0050, text=» LC A2,DWTCP2+1,A6«, t00=0x0134, t01=0x0040}
0x1e14a…1e176 Head {h00=0x0028, h01=0x0050, text=» ANK A2,MASKLC CLEAN DEVICE ADDRESS «, t00=0x0134, t01=0x005a}
0x1e176…1e198 Head {h00=0x001e, h01=0x0050, text=» SC A2,X25LCN,A4 TO BUFFER«, t00=0x0134, t01=0x0086}
0x1e198…1e1a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x00a8}
0x1e1a2…1e1b8 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0134, t01=0x00b2}
0x1e1b8…1e1d4 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0134, t01=0x00c8}
0x1e1d4…1e1ee Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0134, t01=0x00e4}
0x1e1ee…1e1fa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0134, t01=0x00fe}
0x1e1fa…1e204 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x010a}
0x1e204…1e21a Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0134, t01=0x0114}
0x1e21a…1e22a Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0134, t01=0x012a}
0x1e22a…1e236 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0134, t01=0x013a}
0x1e236…1e240 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x0146}
0x1e240…1e24e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0134, t01=0x0150}
0x1e24e…1e258 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x015e}
0x1e258…1e29c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0134, t01=0x0168}
0x1e29c…1e2a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x001c}
0x1e2a6…1e2be Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0135, t01=0x0026}
0x1e2be…1e2ce Head {h00=0x000c, h01=0x0050, text=»* STAHAN«, t00=0x0135, t01=0x003e}
0x1e2ce…1e2d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x004e}
0x1e2d8…1e2ec Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0135, t01=0x0058}
0x1e2ec…1e322 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES PLC STATUS WORD FOR ONE«, t00=0x0135, t01=0x006c}
0x1e322…1e35a Head {h00=0x0034, h01=0x0050, text=»* WORK STATION. IF "NO CONNECTION", "LINK RESET"«, t00=0x0135, t01=0x00a2}
0x1e35a…1e390 Head {h00=0x0032, h01=0x0050, text=»* OR "DCE NOT OPERABLE" IS INDICATED, AN ERROR«, t00=0x0135, t01=0x00da}
0x1e390…1e3a6 Head {h00=0x0012, h01=0x0050, text=»* CODE WILL BE«, t00=0x0135, t01=0x0110}
0x1e3a6…1e3de Head {h00=0x0034, h01=0x0050, text=»* SET IN THE WORK STATION STATUS WORD (CWTWSS). «, t00=0x0135, t01=0x0126}
0x1e3de…1e40a Head {h00=0x0028, h01=0x0050, text=»* OTHER STATUS BITS ARE NOT ALLOWED.«, t00=0x0135, t01=0x015e}
0x1e40a…1e414 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x018a}
0x1e414…1e424 (310, 0, 400) Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0136, t01=0x0004}
0x1e424…1e43c Head {h00=0x0014, h01=0x0050, text=»* CF A15,STAHAN «, t00=0x0136, t01=0x0014}
0x1e43c…1e446 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x002c}
0x1e446…1e456 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0136, t01=0x0036}
0x1e456…1e470 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x0136, t01=0x0046}
0x1e470…1e494 Head {h00=0x0020, h01=0x0050, text=»* A2 = WORK STATION NUMBER «, t00=0x0136, t01=0x0060}
0x1e494…1e4b0 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0136, t01=0x0084}
0x1e4b0…1e4ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x00a0}
0x1e4ba…1e4cc Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0136, t01=0x00aa}
0x1e4cc…1e4ee Head {h00=0x001e, h01=0x0050, text=»* A1 = DEVICE RETURN CODE«, t00=0x0136, t01=0x00bc}
0x1e4ee…1e506 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0136, t01=0x00de}
0x1e506…1e510 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x00f6}
0x1e510…1e554 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0136, t01=0x0100}
0x1e554…1e55e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x0144}
0x1e55e…1e572 Head {h00=0x0010, h01=0x0050, text=»STAHAN EQU *«, t00=0x0136, t01=0x014e}
0x1e572…1e58e Head {h00=0x0018, h01=0x0050, text=» STR A3,A15 PUSH A3 «, t00=0x0136, t01=0x0162}
0x1e58e…1e5ac Head {h00=0x001a, h01=0x0050, text=» LDR A3,A1 ANY ERROR? «, t00=0x0136, t01=0x017e}
0x1e5ac…1e5cc Head {h00=0x001c, h01=0x0050, text=» RF(Z) SH120 NO, RETURN «, t00=0x0137, t01=0x000c}
0x1e5cc…1e5e8 Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 PUSH A4 «, t00=0x0137, t01=0x002c}
0x1e5e8…1e5f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0137, t01=0x0048}
0x1e5f2…1e600 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0137, t01=0x0052}
0x1e600…1e60a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0137, t01=0x0060}
0x1e60a…1e636 Head {h00=0x0028, h01=0x0050, text=» LDK A1,NOTOPR ASSUME NO CONNECTION «, t00=0x0137, t01=0x006a}
0x1e636…1e65c Head {h00=0x0022, h01=0x0050, text=» ANKL A3,STADNO+STANOC IS IT? «, t00=0x0137, t01=0x0096}
0x1e65c…1e680 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) SH100 YES, CONTINUE «, t00=0x0137, t01=0x00bc}
0x1e680…1e6a6 Head {h00=0x0022, h01=0x0050, text=» LDK A1,LINERR NO, LINK ERROR «, t00=0x0137, t01=0x00e0}
0x1e6a6…1e6ba Head {h00=0x0010, h01=0x0050, text=»SH100 EQU * «, t00=0x0137, t01=0x0106}
0x1e6ba…1e6e0 Head {h00=0x0022, h01=0x0050, text=» LDR A3,A2 WORK STATION NUMBER«, t00=0x0137, t01=0x011a}
0x1e6e0…1e6fc Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x0137, t01=0x0140}
0x1e6fc…1e71e Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x0137, t01=0x015c}
0x1e71e…1e754 Head {h00=0x0032, h01=0x0050, text=» ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS «, t00=0x0137, t01=0x017e}
0x1e754…1e776 Head {h00=0x001e, h01=0x0050, text=» SCR A1,A3 SAVE ERROR CODE«, t00=0x0138, t01=0x0024}
0x1e776…1e7a0 Head {h00=0x0026, h01=0x0050, text=» LDK A4,WSFERR WORK STATION ERROR «, t00=0x0138, t01=0x0046}
0x1e7a0…1e7c6 Head {h00=0x0022, h01=0x0050, text=» ANR* A4,A3 ALREADY DETECTED? «, t00=0x0138, t01=0x0070}
0x1e7c6…1e7e8 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) SH110 YES, RETURN «, t00=0x0138, t01=0x0096}
0x1e7e8…1e7fe Head {h00=0x0012, h01=0x0050, text=» LDK A4,WSFERR«, t00=0x0138, t01=0x00b8}
0x1e7fe…1e824 Head {h00=0x0022, h01=0x0050, text=» ORRS A4,A3 SET ERROR DETECTED«, t00=0x0138, t01=0x00ce}
0x1e824…1e858 Head {h00=0x0030, h01=0x0050, text=» ST A2,CWTABW,A5 INDICATE ABORT DWT:S FOR WS«, t00=0x0138, t01=0x00f4}
0x1e858…1e862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x0128}
0x1e862…1e876 Head {h00=0x0010, h01=0x0050, text=»SH110 EQU * «, t00=0x0138, t01=0x0132}
0x1e876…1e892 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x0138, t01=0x0146}
0x1e892…1e8a6 Head {h00=0x0010, h01=0x0050, text=»SH120 EQU * «, t00=0x0138, t01=0x0162}
0x1e8a6…1e8c2 Head {h00=0x0018, h01=0x0050, text=» LDR* A3,A15 POP A3 «, t00=0x0138, t01=0x0176}
0x1e8c2…1e8cc (313, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x0004}
0x1e8cc…1e8e2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0139, t01=0x000e}
0x1e8e2…1e8fe Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0139, t01=0x0024}
0x1e8fe…1e918 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0139, t01=0x0040}
0x1e918…1e924 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0139, t01=0x005a}
0x1e924…1e93a Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0139, t01=0x0066}
0x1e93a…1e94a Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0139, t01=0x007c}
0x1e94a…1e956 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0139, t01=0x008c}
0x1e956…1e960 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x0098}
0x1e960…1e96e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0139, t01=0x00a2}
0x1e96e…1e978 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x00b0}
0x1e978…1e9bc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0139, t01=0x00ba}
0x1e9bc…1e9c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x00fe}
0x1e9c6…1e9de Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0139, t01=0x0108}
0x1e9de…1e9ee Head {h00=0x000c, h01=0x0050, text=»* GETSTA«, t00=0x0139, t01=0x0120}
0x1e9ee…1e9f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x0130}
0x1e9f8…1ea0c Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0139, t01=0x013a}
0x1ea0c…1ea40 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE WILL CHECK THE I/O STATUS FOR«, t00=0x0139, t01=0x014e}
0x1ea40…1ea54 Head {h00=0x0010, h01=0x0050, text=»* A DEVICE. «, t00=0x0139, t01=0x0182}
0x1ea54…1ea88 Head {h00=0x0030, h01=0x0050, text=»* GETWSS WILL ONLY CHECK THE STATUS FOR THE «, t00=0x013a, t01=0x0008}
0x1ea88…1eaaa Head {h00=0x001e, h01=0x0050, text=»* WORK STATION CONNECTION.«, t00=0x013a, t01=0x003c}
0x1eaaa…1eade Head {h00=0x0030, h01=0x0050, text=»* GETLCS WILL CHECK BOTH LOGICAL CHANNEL AND«, t00=0x013a, t01=0x005e}
0x1eade…1eafc Head {h00=0x001a, h01=0x0050, text=»* WORK STATION STATUS.«, t00=0x013a, t01=0x0092}
0x1eafc…1eb06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x00b0}
0x1eb06…1eb16 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x013a, t01=0x00ba}
0x1eb16…1eb2e Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETLCS «, t00=0x013a, t01=0x00ca}
0x1eb2e…1eb46 Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETWSS «, t00=0x013a, t01=0x00e2}
0x1eb46…1eb50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x00fa}
0x1eb50…1eb60 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x013a, t01=0x0104}
0x1eb60…1eb7c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x013a, t01=0x0114}
0x1eb7c…1eb98 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x013a, t01=0x0130}
0x1eb98…1eba2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x014c}
0x1eba2…1ebb4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x013a, t01=0x0156}
0x1ebb4…1ebd0 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x013a, t01=0x0168}
0x1ebd0…1ebee Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x013a, t01=0x0184}
0x1ebee…1ec0a Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x013b, t01=0x0012}
0x1ec0a…1ec14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x002e}
0x1ec14…1ec58 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x013b, t01=0x0038}
0x1ec58…1ec62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x007c}
0x1ec62…1ec76 Head {h00=0x0010, h01=0x0050, text=»GETLCS EQU *«, t00=0x013b, t01=0x0086}
0x1ec76…1ec82 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x013b, t01=0x009a}
0x1ec82…1ec9e Head {h00=0x0018, h01=0x0050, text=» STR A3,A15 PUSH A3 «, t00=0x013b, t01=0x00a6}
0x1ec9e…1eca8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x00c2}
0x1eca8…1ecd6 Head {h00=0x002a, h01=0x0050, text=» LDK A1,LINERR SET RETURN CODE IN CASE«, t00=0x013b, t01=0x00cc}
0x1ecd6…1ecf8 Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTST,A6 DWT STATUS«, t00=0x013b, t01=0x00fa}
0x1ecf8…1ed26 Head {h00=0x002a, h01=0x0050, text=» ANK A3,DWFRES RESET PACKET RECIEVED? «, t00=0x013b, t01=0x011c}
0x1ed26…1ed5a Head {h00=0x0030, h01=0x0050, text=» RF(NZ) LS110 YES, RETURN. RET CODE = LINERR«, t00=0x013b, t01=0x014a}
0x1ed5a…1ed80 Head {h00=0x0022, h01=0x0050, text=» RF LS100 NOT RESET. CHECK WSS«, t00=0x013b, t01=0x017e}
0x1ed80…1ed8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x0014}
0x1ed8a…1ed94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x001e}
0x1ed94…1eda8 Head {h00=0x0010, h01=0x0050, text=»GETWSS EQU *«, t00=0x013c, t01=0x0028}
0x1eda8…1edb4 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x013c, t01=0x003c}
0x1edb4…1edd0 Head {h00=0x0018, h01=0x0050, text=» STR A3,A15 PUSH A3 «, t00=0x013c, t01=0x0048}
0x1edd0…1edda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x0064}
0x1edda…1ede4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x006e}
0x1ede4…1edf8 Head {h00=0x0010, h01=0x0050, text=»LS100 EQU * «, t00=0x013c, t01=0x0078}
0x1edf8…1ee1a Head {h00=0x001e, h01=0x0050, text=» LC A3,DWTCP2,A6 WS NUMBER«, t00=0x013c, t01=0x008c}
0x1ee1a…1ee36 Head {h00=0x0018, h01=0x0050, text=» ANK A3,MASKWS CLEAN«, t00=0x013c, t01=0x00ae}
0x1ee36…1ee52 Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x013c, t01=0x00ca}
0x1ee52…1ee70 Head {h00=0x001a, h01=0x0050, text=» ADR A3,A5 CWT ADDRESS«, t00=0x013c, t01=0x00e6}
0x1ee70…1ee92 Head {h00=0x001e, h01=0x0050, text=» LC A1,CWTWSS,A3 WS STATUS«, t00=0x013c, t01=0x0104}
0x1ee92…1ee9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x0126}
0x1ee9c…1eea6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x0130}
0x1eea6…1eeba Head {h00=0x0010, h01=0x0050, text=»LS110 EQU * «, t00=0x013c, t01=0x013a}
0x1eeba…1eed6 Head {h00=0x0018, h01=0x0050, text=» LDR* A3,A15 POP A3 «, t00=0x013c, t01=0x014e}
0x1eed6…1eef6 Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x013c, t01=0x016a}
0x1eef6…1ef24 Head {h00=0x002a, h01=0x0050, text=» ANK A1,/FF CLEAN RETURN CODE & SET CR«, t00=0x013c, t01=0x018a}
0x1ef24…1ef3c Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x013d, t01=0x0028}
0x1ef3c…1ef46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x0040}
0x1ef46…1ef54 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x013d, t01=0x004a}
0x1ef54…1ef5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x0058}
0x1ef5e…1efa2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x013d, t01=0x0062}
0x1efa2…1efac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x00a6}
0x1efac…1efc4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x013d, t01=0x00b0}
0x1efc4…1efd4 Head {h00=0x000c, h01=0x0050, text=»* PLGTBU«, t00=0x013d, t01=0x00c8}
0x1efd4…1efde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x00d8}
0x1efde…1eff2 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x013d, t01=0x00e2}
0x1eff2…1f02e Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE WILL ALLOCATE A BUFFER AND FORMAT IT «, t00=0x013d, t01=0x00f6}
0x1f02e…1f064 Head {h00=0x0032, h01=0x0050, text=»* ACCORDING TO THE FORMAT USED BY THIS DRIVER.«, t00=0x013d, t01=0x0132}
0x1f064…1f06e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x0168}
0x1f06e…1f07e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x013d, t01=0x0172}
0x1f07e…1f096 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLGTBU «, t00=0x013d, t01=0x0182}
0x1f096…1f0a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x000a}
0x1f0a0…1f0b0 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x013e, t01=0x0014}
0x1f0b0…1f0d2 Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x013e, t01=0x0024}
0x1f0d2…1f0dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x0046}
0x1f0dc…1f0ee Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x013e, t01=0x0050}
0x1f0ee…1f11c Head {h00=0x002a, h01=0x0050, text=»* A2 = LENGTH OF USER PART OF BUFFER «, t00=0x013e, t01=0x0062}
0x1f11c…1f152 Head {h00=0x0032, h01=0x0050, text=»* A4 = START OF USER PART OF BUFFER (IF ANY) «, t00=0x013e, t01=0x0090}
0x1f152…1f17c Head {h00=0x0026, h01=0x0050, text=»* CR = NOT 0 IF BUFFER ALLOCATED «, t00=0x013e, t01=0x00c6}
0x1f17c…1f1a0 Head {h00=0x0020, h01=0x0050, text=»* 0 IF NO BUFFER ALLOCATED «, t00=0x013e, t01=0x00f0}
0x1f1a0…1f1bc Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x013e, t01=0x0114}
0x1f1bc…1f1c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x0130}
0x1f1c6…1f20a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x013e, t01=0x013a}
0x1f20a…1f214 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x017e}
0x1f214…1f228 Head {h00=0x0010, h01=0x0050, text=»PLGTBU EQU *«, t00=0x013e, t01=0x0188}
0x1f228…1f246 Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 SKIP PSW «, t00=0x013f, t01=0x000c}
0x1f246…1f26e Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A15 GET RETURN ADDRESS «, t00=0x013f, t01=0x002a}
0x1f26e…1f296 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETBUF A4 := BUFFER. INH«, t00=0x013f, t01=0x0052}
0x1f296…1f2bc Head {h00=0x0022, h01=0x0050, text=» ABR(Z) A2 RETURN IF NO BUFFER«, t00=0x013f, t01=0x007a}
0x1f2bc…1f2c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x00a0}
0x1f2c6…1f2ee Head {h00=0x0024, h01=0x0050, text=» ST A2,0,A15 SAVE RETURN ADDRESS«, t00=0x013f, t01=0x00aa}
0x1f2ee…1f318 Head {h00=0x0026, h01=0x0050, text=» ADK A4,BUFHLN START OF USER PART «, t00=0x013f, t01=0x00d2}
0x1f318…1f348 Head {h00=0x002c, h01=0x0050, text=» ST A7,BUFLNK,A4 SAVE POOLBLOCK ADDRESS «, t00=0x013f, t01=0x00fc}
0x1f348…1f36c Head {h00=0x0020, h01=0x0050, text=» LD A2,POBBUS,A7 BUFFER SIZE«, t00=0x013f, t01=0x012c}
0x1f36c…1f39c Head {h00=0x002c, h01=0x0050, text=» SUK A2,BUFHLN A2 := LENGTH OF USER PART«, t00=0x013f, t01=0x0150}
0x1f39c…1f3c0 Head {h00=0x0020, h01=0x0050, text=» RF(P) GU100 CONTINUE IF OK «, t00=0x013f, t01=0x0180}
0x1f3c0…1f3f4 Head {h00=0x0030, h01=0x0050, text=» ANK A2,0 TOO SHORT. BUFFER LENGTH & CR := 0«, t00=0x0140, t01=0x0014}
0x1f3f4…1f408 Head {h00=0x0010, h01=0x0050, text=»GU100 EQU * «, t00=0x0140, t01=0x0048}
0x1f408…1f434 Head {h00=0x0028, h01=0x0050, text=» ST A2,BUFLEN,A4 USER BUFFER LENGTH «, t00=0x0140, t01=0x005c}
0x1f434…1f44c Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0140, t01=0x0088}
0x1f44c…1f456 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x00a0}
0x1f456…1f464 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0140, t01=0x00aa}
0x1f464…1f46e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x00b8}
0x1f46e…1f4b2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0140, t01=0x00c2}
0x1f4b2…1f4bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x0106}
0x1f4bc…1f4d4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0140, t01=0x0110}
0x1f4d4…1f4e4 Head {h00=0x000c, h01=0x0050, text=»* PLRLBU«, t00=0x0140, t01=0x0128}
0x1f4e4…1f4ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x0138}
0x1f4ee…1f502 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0140, t01=0x0142}
0x1f502…1f536 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE RELEASES AN I/O BUFFER OF THE«, t00=0x0140, t01=0x0156}
0x1f536…1f55c Head {h00=0x0022, h01=0x0050, text=»* FORMAT USED BY THIS DRIVER. «, t00=0x0140, t01=0x018a}
0x1f55c…1f566 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x0020}
0x1f566…1f576 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0141, t01=0x002a}
0x1f576…1f58e Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLRLBU «, t00=0x0141, t01=0x003a}
0x1f58e…1f598 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x0052}
0x1f598…1f5a8 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0141, t01=0x005c}
0x1f5a8…1f5c6 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0141, t01=0x006c}
0x1f5c6…1f5d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x008a}
0x1f5d0…1f5e2 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0141, t01=0x0094}
0x1f5e2…1f5fa Head {h00=0x0014, h01=0x0050, text=»* A4 = CHANGED «, t00=0x0141, t01=0x00a6}
0x1f5fa…1f612 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0141, t01=0x00be}
0x1f612…1f638 Head {h00=0x0022, h01=0x0050, text=»* INTERR. INHIBITED IF CPU 852«, t00=0x0141, t01=0x00d6}
0x1f638…1f642 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x00fc}
0x1f642…1f686 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0141, t01=0x0106}
0x1f686…1f690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x014a}
0x1f690…1f6a4 Head {h00=0x0010, h01=0x0050, text=»PLRLBU EQU *«, t00=0x0141, t01=0x0154}
0x1f6a4…1f6c0 Head {h00=0x0018, h01=0x0050, text=» STR A7,A15 PUSH A7 «, t00=0x0141, t01=0x0168}
0x1f6c0…1f6ea Head {h00=0x0026, h01=0x0050, text=» LD A7,BUFLNK,A4 POOLBLOCK ADDRESS«, t00=0x0141, t01=0x0184}
0x1f6ea…1f720 Head {h00=0x0032, h01=0x0050, text=» SUK A4,BUFHLN A4 :- PHYSICAL START OF BUFFER «, t00=0x0142, t01=0x001e}
0x1f720…1f74c Head {h00=0x0028, h01=0x0050, text=» CF A15,RELBUF RELEASE BUFFER & INH «, t00=0x0142, t01=0x0054}
0x1f74c…1f768 Head {h00=0x0018, h01=0x0050, text=» LDR* A7,A15 POP A7 «, t00=0x0142, t01=0x0080}
0x1f768…1f772 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x009c}
0x1f772…1f788 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0142, t01=0x00a6}
0x1f788…1f7a4 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0142, t01=0x00bc}
0x1f7a4…1f7be Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0142, t01=0x00d8}
0x1f7be…1f7ca Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0142, t01=0x00f2}
0x1f7ca…1f7e0 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0142, t01=0x00fe}
0x1f7e0…1f7f0 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0142, t01=0x0114}
0x1f7f0…1f7fc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0142, t01=0x0124}
0x1f7fc…1f80a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0142, t01=0x0130}
0x1f80a…1f814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x013e}
0x1f814…1f858 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0142, t01=0x0148}
0x1f858…1f862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x018c}
0x1f862…1f87a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0143, t01=0x0008}
0x1f87a…1f88a Head {h00=0x000c, h01=0x0050, text=»* PLCHAR«, t00=0x0143, t01=0x0020}
0x1f88a…1f894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x0030}
0x1f894…1f8a8 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0143, t01=0x003a}
0x1f8a8…1f8dc Head {h00=0x0030, h01=0x0050, text=»* THESE ROUTINES ARE USED TO GET A CHARACTER«, t00=0x0143, t01=0x004e}
0x1f8dc…1f914 Head {h00=0x0034, h01=0x0050, text=»* FROM A BUFFER OR PUT A CHARACTER IN A BUFFER. «, t00=0x0143, t01=0x0082}
0x1f914…1f94c Head {h00=0x0034, h01=0x0050, text=»* THE BUFFER SHOULD HAVE A HEADER OF THE NORMAL «, t00=0x0143, t01=0x00ba}
0x1f94c…1f97e Head {h00=0x002e, h01=0x0050, text=»* PLC FORMAT (SE "BUFFER LAYOUT" CONSTANT «, t00=0x0143, t01=0x00f2}
0x1f97e…1f994 Head {h00=0x0012, h01=0x0050, text=»* DEFINITION).«, t00=0x0143, t01=0x0124}
0x1f994…1f99e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x013a}
0x1f99e…1f9ae Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0143, t01=0x0144}
0x1f9ae…1f9c6 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLGECH «, t00=0x0143, t01=0x0154}
0x1f9c6…1f9de Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLPUCH «, t00=0x0143, t01=0x016c}
0x1f9de…1f9e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x0184}
0x1f9e8…1f9f8 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0143, t01=0x018e}
0x1f9f8…1fa14 Head {h00=0x0018, h01=0x0050, text=»* A2 = IF PUT CHAR «, t00=0x0144, t01=0x000e}
0x1fa14…1fa32 Head {h00=0x001a, h01=0x0050, text=»* BITS 0-7 IRRELEVANT«, t00=0x0144, t01=0x002a}
0x1fa32…1fa50 Head {h00=0x001a, h01=0x0050, text=»* BITS 8-15 CHARACTER«, t00=0x0144, t01=0x0048}
0x1fa50…1fa6e Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0144, t01=0x0066}
0x1fa6e…1fa78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x0084}
0x1fa78…1fa8a Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0144, t01=0x008e}
0x1fa8a…1faa6 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0144, t01=0x00a0}
0x1faa6…1fad0 Head {h00=0x0026, h01=0x0050, text=»* -1 IF OVERFLOW/UNDERFLOW, ELSE «, t00=0x0144, t01=0x00bc}
0x1fad0…1fae8 Head {h00=0x0014, h01=0x0050, text=»* AT PLPUCH: 0«, t00=0x0144, t01=0x00e6}
0x1fae8…1fb18 Head {h00=0x002c, h01=0x0050, text=»* AT PLGECH: NR OF CHAR LEFT IN BUFFER«, t00=0x0144, t01=0x00fe}
0x1fb18…1fb3c Head {h00=0x0020, h01=0x0050, text=»* A2 = IF PLGECH & A1>=0 : «, t00=0x0144, t01=0x012e}
0x1fb3c…1fb54 Head {h00=0x0014, h01=0x0050, text=»* BITS 0-7 ZERO«, t00=0x0144, t01=0x0152}
0x1fb54…1fb72 Head {h00=0x001a, h01=0x0050, text=»* BITS 8-15 CHARACTER«, t00=0x0144, t01=0x016a}
0x1fb72…1fb8e Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0144, t01=0x0188}
0x1fb8e…1fb98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x0014}
0x1fb98…1fbdc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0145, t01=0x001e}
0x1fbdc…1fbe6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x0062}
0x1fbe6…1fbf4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0145, t01=0x006c}
0x1fbf4…1fbfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x007a}
0x1fbfe…1fc12 Head {h00=0x0010, h01=0x0050, text=»PLGECH EQU *«, t00=0x0145, t01=0x0084}
0x1fc12…1fc1e Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0145, t01=0x0098}
0x1fc1e…1fc28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x00a4}
0x1fc28…1fc5a Head {h00=0x002e, h01=0x0050, text=» LD A1,BUFLEN,A4 LENGTH OF TEXT IN BUFFER «, t00=0x0145, t01=0x00ae}
0x1fc5a…1fc7e Head {h00=0x0020, h01=0x0050, text=» LD A2,BUFBIX,A4 BYTE INDEX «, t00=0x0145, t01=0x00e0}
0x1fc7e…1fc90 Head {h00=0x000e, h01=0x0050, text=» SUR A1,A2«, t00=0x0145, t01=0x0104}
0x1fc90…1fcb8 Head {h00=0x0024, h01=0x0050, text=» SUK A1,1 A1 := NR OF CHAR LEFT «, t00=0x0145, t01=0x0116}
0x1fcb8…1fcde Head {h00=0x0022, h01=0x0050, text=» RF(N) CH100 EXIT IF UNDERFLOW«, t00=0x0145, t01=0x013e}
0x1fcde…1fd04 Head {h00=0x0022, h01=0x0050, text=» IM BUFBIX,A4 INCREMENT INDEX «, t00=0x0145, t01=0x0164}
0x1fd04…1fd34 Head {h00=0x002c, h01=0x0050, text=» ADR A2,A4 ABSOLUTE ADDRESS OF CHARACTER«, t00=0x0145, t01=0x018a}
0x1fd34…1fd54 Head {h00=0x001c, h01=0x0050, text=» LCR A2,A2 GET CHARACTER«, t00=0x0146, t01=0x002a}
0x1fd54…1fd6e Head {h00=0x0016, h01=0x0050, text=» ANK A2,/FF CLEAN «, t00=0x0146, t01=0x004a}
0x1fd6e…1fd78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0146, t01=0x0064}
0x1fd78…1fd96 Head {h00=0x001a, h01=0x0050, text=» RF CH110 NORMAL EXIT «, t00=0x0146, t01=0x006e}
0x1fd96…1fda0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0146, t01=0x008c}
0x1fda0…1fdaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0146, t01=0x0096}
0x1fdaa…1fdbe Head {h00=0x0010, h01=0x0050, text=»PLPUCH EQU *«, t00=0x0146, t01=0x00a0}
0x1fdbe…1fdca Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0146, t01=0x00b4}
0x1fdca…1fdd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0146, t01=0x00c0}
0x1fdd4…1fdf8 Head {h00=0x0020, h01=0x0050, text=» LD A1,BUFBIX,A4 BYTE INDEX «, t00=0x0146, t01=0x00ca}
0x1fdf8…1fe20 Head {h00=0x0024, h01=0x0050, text=» CW A1,BUFLEN,A4 OUTSIDE BUFFER?«, t00=0x0146, t01=0x00ee}
0x1fe20…1fe40 Head {h00=0x001c, h01=0x0050, text=» RF(NL) CH100 YES, ERROR«, t00=0x0146, t01=0x0116}
0x1fe40…1fe66 Head {h00=0x0022, h01=0x0050, text=» IM BUFBIX,A4 INCREMENT INDEX «, t00=0x0146, t01=0x0136}
0x1fe66…1fe8e Head {h00=0x0024, h01=0x0050, text=» ADR A1,A4 FREE PLACE IN BUFFER «, t00=0x0146, t01=0x015c}
0x1fe8e…1feb8 Head {h00=0x0026, h01=0x0050, text=» SCR A2,A1 PUT CHARACTER IN BUFFER«, t00=0x0146, t01=0x0184}
0x1feb8…1fedc Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RETURN CODE := OK «, t00=0x0147, t01=0x001e}
0x1fedc…1fefa Head {h00=0x001a, h01=0x0050, text=» RF CH110 NORMAL EXIT «, t00=0x0147, t01=0x0042}
0x1fefa…1ff04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x0060}
0x1ff04…1ff0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x006a}
0x1ff0e…1ff22 Head {h00=0x0010, h01=0x0050, text=»CH100 EQU * «, t00=0x0147, t01=0x0074}
0x1ff22…1ff4a Head {h00=0x0024, h01=0x0050, text=» LDKL A1,-1 RETURN CODE := ERROR«, t00=0x0147, t01=0x0088}
0x1ff4a…1ff5e Head {h00=0x0010, h01=0x0050, text=»CH110 EQU * «, t00=0x0147, t01=0x00b0}
0x1ff5e…1ff7e Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x0147, t01=0x00c4}
0x1ff7e…1ff96 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0147, t01=0x00e4}
0x1ff96…1ffa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x00fc}
0x1ffa0…1ffae Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0147, t01=0x0106}
0x1ffae…1ffb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x0114}
0x1ffb8…1fffc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0147, t01=0x011e}
0x1fffc…20006 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x0162}
0x20006…2001e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0147, t01=0x016c}
0x2001e…2002e Head {h00=0x000c, h01=0x0050, text=»* INTYPE«, t00=0x0147, t01=0x0184}
0x2002e…20038 (328, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x0004}
0x20038…2004c Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0148, t01=0x000e}
0x2004c…20084 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE CHECKS A GENERAL READ ANSWER FROM«, t00=0x0148, t01=0x0022}
0x20084…200b4 Head {h00=0x002c, h01=0x0050, text=»* THE PLC TO DETERMINE TYPE OF MESSAGE. «, t00=0x0148, t01=0x005a}
0x200b4…200be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x008a}
0x200be…200ce Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0148, t01=0x0094}
0x200ce…200e6 Head {h00=0x0014, h01=0x0050, text=»* CF A15,INTYPE «, t00=0x0148, t01=0x00a4}
0x200e6…200f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x00bc}
0x200f0…20100 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0148, t01=0x00c6}
0x20100…2011c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0148, t01=0x00d6}
0x2011c…20126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x00f2}
0x20126…20138 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0148, t01=0x00fc}
0x20138…20150 Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x0148, t01=0x010e}
0x20150…20164 Head {h00=0x0010, h01=0x0050, text=»* A3 = TYPE«, t00=0x0148, t01=0x0126}
0x20164…2017c Head {h00=0x0014, h01=0x0050, text=»* A4 = CHANGED «, t00=0x0148, t01=0x013a}
0x2017c…20194 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0148, t01=0x0152}
0x20194…2019e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x016a}
0x2019e…201e2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0148, t01=0x0174}
0x201e2…201ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x0028}
0x201ec…20200 Head {h00=0x0010, h01=0x0050, text=»INTYPE EQU *«, t00=0x0149, t01=0x0032}
0x20200…2022c Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT MINIMUM INPUT LENGTH «, t00=0x0149, t01=0x0046}
0x2022c…2025e Head {h00=0x002e, h01=0x0050, text=» CW A2,CWTRCA+CCRLEN,A5 LENGTH >= MINIMUM?«, t00=0x0149, t01=0x0072}
0x2025e…2027c Head {h00=0x001a, h01=0x0050, text=» RF(G) ITERR NO, ERROR«, t00=0x0149, t01=0x00a4}
0x2027c…20286 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x00c2}
0x20286…20294 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0149, t01=0x00cc}
0x20294…2029e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x00da}
0x2029e…202cc Head {h00=0x002a, h01=0x0050, text=» LD A3,CWTRCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x0149, t01=0x00e4}
0x202cc…202f2 Head {h00=0x0022, h01=0x0050, text=» LC A2,X25LGN,A3 GROUP NUMBER «, t00=0x0149, t01=0x0112}
0x202f2…2030a Head {h00=0x0014, h01=0x0050, text=» LDR A4,A2 SAVE «, t00=0x0149, t01=0x0138}
0x2030a…20324 Head {h00=0x0016, h01=0x0050, text=» ANK A4,/0F CLEAN «, t00=0x0149, t01=0x0150}
0x20324…20348 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) IT120 NOT GROUP ZERO«, t00=0x0149, t01=0x016a}
0x20348…20352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x018e}
0x20352…20384 Head {h00=0x002e, h01=0x0050, text=»* CHANNEL GROUP ZERO. NORMAL MESSAGES. «, t00=0x014a, t01=0x0008}
0x20384…203ae Head {h00=0x0026, h01=0x0050, text=» LC A3,X25FLW,A3 FLOW CONTROL BYTE«, t00=0x014a, t01=0x003a}
0x203ae…203c6 Head {h00=0x0014, h01=0x0050, text=» LDR A4,A3 SAVE «, t00=0x014a, t01=0x0064}
0x203c6…203de Head {h00=0x0014, h01=0x0050, text=» ANK A4,/01 FLAG«, t00=0x014a, t01=0x007c}
0x203de…20404 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) IT100 NOT DATA PACKET «, t00=0x014a, t01=0x0094}
0x20404…2042e Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYDATA ASSUME NORMAL DATA «, t00=0x014a, t01=0x00ba}
0x2042e…20452 Head {h00=0x0020, h01=0x0050, text=» ANK A2,/80 QUALIFY BIT SET?«, t00=0x014a, t01=0x00e4}
0x20452…2047e Head {h00=0x0028, h01=0x0050, text=» RF(Z) ITEXIT NO, NORMAL DATA. EXIT «, t00=0x014a, t01=0x0108}
0x2047e…204a8 Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYSTAT YES, STATUS MESSAGE«, t00=0x014a, t01=0x0134}
0x204a8…204c0 Head {h00=0x0014, h01=0x0050, text=» RF ITEXIT EXIT «, t00=0x014a, t01=0x015e}
0x204c0…204ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x0176}
0x204ca…204de Head {h00=0x0010, h01=0x0050, text=»IT100 EQU * «, t00=0x014a, t01=0x0180}
0x204de…20508 (331, 0, 400) Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 SAVE FLOW CONTROL BYTE «, t00=0x014b, t01=0x0004}
0x20508…2052a Head {h00=0x001e, h01=0x0050, text=» ANK A3,/02 RECIEVE READY?«, t00=0x014b, t01=0x002e}
0x2052a…20542 Head {h00=0x0014, h01=0x0050, text=» RF(NZ) IT110 NO«, t00=0x014b, t01=0x0050}
0x20542…2056c Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYRR TYPE := RECIEVE READY«, t00=0x014b, t01=0x0068}
0x2056c…20584 Head {h00=0x0014, h01=0x0050, text=» RF ITEXIT EXIT «, t00=0x014b, t01=0x0092}
0x20584…2058e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x00aa}
0x2058e…205a2 Head {h00=0x0010, h01=0x0050, text=»IT110 EQU * «, t00=0x014b, t01=0x00b4}
0x205a2…205cc Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYRES ASSUME TYPE = RESET «, t00=0x014b, t01=0x00c8}
0x205cc…205ec Head {h00=0x001c, h01=0x0050, text=» ANK A4,/04 IS IT RESET?«, t00=0x014b, t01=0x00f2}
0x205ec…2060c Head {h00=0x001c, h01=0x0050, text=» RF(Z) ITEXIT YES, EXIT «, t00=0x014b, t01=0x0112}
0x2060c…20642 Head {h00=0x0032, h01=0x0050, text=» LDK A3,TYRESC NO, TYPE := RESET CONFIRMATION «, t00=0x014b, t01=0x0132}
0x20642…2065a Head {h00=0x0014, h01=0x0050, text=» RF ITEXIT EXIT «, t00=0x014b, t01=0x0168}
0x2065a…20664 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x0180}
0x20664…20672 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x014b, t01=0x018a}
0x20672…2067c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0008}
0x2067c…20690 Head {h00=0x0010, h01=0x0050, text=»IT120 EQU * «, t00=0x014c, t01=0x0012}
0x20690…206b0 Head {h00=0x001c, h01=0x0050, text=»* NOT NORMAL MESSAGE «, t00=0x014c, t01=0x0026}
0x206b0…206e4 Head {h00=0x0030, h01=0x0050, text=» LDK A3,TYNFLO ASSUME TYPE = NO FLOW CONTROL«, t00=0x014c, t01=0x0046}
0x206e4…2070c Head {h00=0x0024, h01=0x0050, text=» SUK A4,1 IS IT NO FLOW CONTROL?«, t00=0x014c, t01=0x007a}
0x2070c…2072c Head {h00=0x001c, h01=0x0050, text=» RF(Z) ITEXIT YES, EXIT «, t00=0x014c, t01=0x00a2}
0x2072c…20736 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x00c2}
0x20736…2074a Head {h00=0x0010, h01=0x0050, text=»ITERR EQU * «, t00=0x014c, t01=0x00cc}
0x2074a…20774 Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYERR IRRECOVERABLE ERROR «, t00=0x014c, t01=0x00e0}
0x20774…2077e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x010a}
0x2077e…20792 Head {h00=0x0010, h01=0x0050, text=»ITEXIT EQU *«, t00=0x014c, t01=0x0114}
0x20792…207a8 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x014c, t01=0x0128}
0x207a8…207c4 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x014c, t01=0x013e}
0x207c4…207de Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x014c, t01=0x015a}
0x207de…207ea Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x014c, t01=0x0174}
0x207ea…20800 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x014c, t01=0x0180}
0x20800…20810 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x014d, t01=0x0008}
0x20810…2081c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x014d, t01=0x0018}
0x2081c…20826 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x0024}
0x20826…20834 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x014d, t01=0x002e}
0x20834…2083e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x003c}
0x2083e…20882 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x014d, t01=0x0046}
0x20882…2088c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x008a}
0x2088c…208a4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x014d, t01=0x0094}
0x208a4…208b4 Head {h00=0x000c, h01=0x0050, text=»* OUTBUQ«, t00=0x014d, t01=0x00ac}
0x208b4…208be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x00bc}
0x208be…208d2 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x014d, t01=0x00c6}
0x208d2…2090e Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE WILL REMOVE A DWT FROM THE QUEUES FOR«, t00=0x014d, t01=0x00da}
0x2090e…20946 Head {h00=0x0034, h01=0x0050, text=»* SHORT OR LONG OUTPUT BUFFERS, IF IT IS IN ANY «, t00=0x014d, t01=0x0116}
0x20946…2095e Head {h00=0x0014, h01=0x0050, text=»* OF THE QUEUES.«, t00=0x014d, t01=0x014e}
0x2095e…20968 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x0166}
0x20968…20978 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x014d, t01=0x0170}
0x20978…20990 Head {h00=0x0014, h01=0x0050, text=»* CF A15,OUTBUQ «, t00=0x014d, t01=0x0180}
0x20990…2099a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x0008}
0x2099a…209aa Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x014e, t01=0x0012}
0x209aa…209c6 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x014e, t01=0x0022}
0x209c6…209e2 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x014e, t01=0x003e}
0x209e2…209ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x005a}
0x209ec…209fe Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x014e, t01=0x0064}
0x209fe…20a20 Head {h00=0x001e, h01=0x0050, text=»* A2 = NOT 0 IF DWT FOUND«, t00=0x014e, t01=0x0076}
0x20a20…20a3e Head {h00=0x001a, h01=0x0050, text=»* 0 IF DWT NOT FOUND«, t00=0x014e, t01=0x0098}
0x20a3e…20a56 Head {h00=0x0014, h01=0x0050, text=»* A4 = CHANGED «, t00=0x014e, t01=0x00b6}
0x20a56…20a6e Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x014e, t01=0x00ce}
0x20a6e…20a78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x00e6}
0x20a78…20abc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x014e, t01=0x00f0}
0x20abc…20ac6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x0134}
0x20ac6…20ada Head {h00=0x0010, h01=0x0050, text=»OUTBUQ EQU *«, t00=0x014e, t01=0x013e}
0x20ada…20af6 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x014e, t01=0x0152}
0x20af6…20b12 Head {h00=0x0018, h01=0x0050, text=» STR A7,A15 PUSH A7 «, t00=0x014e, t01=0x016e}
0x20b12…20b30 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A6 DWT ADDRESS«, t00=0x014e, t01=0x018a}
0x20b30…20b52 Head {h00=0x001e, h01=0x0050, text=» ADKL A4,DWTOTQ QUEUE LINK«, t00=0x014f, t01=0x0018}
0x20b52…20b5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x003a}
0x20b5c…20b7a Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x014f, t01=0x0044}
0x20b7a…20ba4 Head {h00=0x0026, h01=0x0050, text=» ADK A7,CWTSBQ SHORT BUFFERS QUEUE«, t00=0x014f, t01=0x0062}
0x20ba4…20bd0 Head {h00=0x0028, h01=0x0050, text=» CF A15,LNKOUT REMOVE DWT FROM QUEUE«, t00=0x014f, t01=0x008c}
0x20bd0…20bea Head {h00=0x0016, h01=0x0050, text=» LDR A7,A7 FOUND? «, t00=0x014f, t01=0x00b8}
0x20bea…20c0c Head {h00=0x001e, h01=0x0050, text=» RF(NZ) OB100 YES, RETURN «, t00=0x014f, t01=0x00d2}
0x20c0c…20c16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x00f4}
0x20c16…20c28 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x014f, t01=0x00fe}
0x20c28…20c52 Head {h00=0x0026, h01=0x0050, text=» ADKL A7,CWTLBQ LONG BUFFERS QUEUE«, t00=0x014f, t01=0x0110}
0x20c52…20c7a Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x014f, t01=0x013a}
0x20c7a…20c84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x0162}
0x20c84…20c98 Head {h00=0x0010, h01=0x0050, text=»OB100 EQU * «, t00=0x014f, t01=0x016c}
0x20c98…20cc2 Head {h00=0x0026, h01=0x0050, text=» LDR A2,A7 A2 := FOUND / NOT FOUND«, t00=0x014f, t01=0x0180}
0x20cc2…20ccc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x001a}
0x20ccc…20ce8 Head {h00=0x0018, h01=0x0050, text=» LDR* A7,A15 POP A7 «, t00=0x0150, t01=0x0024}
0x20ce8…20d04 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x0150, t01=0x0040}
0x20d04…20d1a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0150, t01=0x005c}
0x20d1a…20d36 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0150, t01=0x0072}
0x20d36…20d50 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0150, t01=0x008e}
0x20d50…20d5c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0150, t01=0x00a8}
0x20d5c…20d72 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0150, t01=0x00b4}
0x20d72…20d82 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0150, t01=0x00ca}
0x20d82…20d8e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0150, t01=0x00da}
0x20d8e…20d98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x00e6}
0x20d98…20da6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0150, t01=0x00f0}
0x20da6…20db0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x00fe}
0x20db0…20df4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0150, t01=0x0108}
0x20df4…20dfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x014c}
0x20dfe…20e16 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0150, t01=0x0156}
0x20e16…20e26 Head {h00=0x000c, h01=0x0050, text=»* LNKFST«, t00=0x0150, t01=0x016e}
0x20e26…20e30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x017e}
0x20e30…20e44 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0150, t01=0x0188}
0x20e44…20e7a Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE LINKS A QUEUE ELEMENT FIRST IN «, t00=0x0151, t01=0x000c}
0x20e7a…20ea4 Head {h00=0x0026, h01=0x0050, text=»* A QUEUE (CLOSEST TO QUEUE HEAD).«, t00=0x0151, t01=0x0042}
0x20ea4…20eda Head {h00=0x0032, h01=0x0050, text=»* ONE WORD IN EACH ELEMENT IS USED AS A LINK. «, t00=0x0151, t01=0x006c}
0x20eda…20f10 Head {h00=0x0032, h01=0x0050, text=»* END OF QUEUE IS INDICATED BY LINK=0 IN LAST «, t00=0x0151, t01=0x00a2}
0x20f10…20f22 Head {h00=0x000e, h01=0x0050, text=»* ELEMENT.«, t00=0x0151, t01=0x00d8}
0x20f22…20f2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x00ea}
0x20f2c…20f3c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0151, t01=0x00f4}
0x20f3c…20f54 Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKFST «, t00=0x0151, t01=0x0104}
0x20f54…20f5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x011c}
0x20f5e…20f6e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0151, t01=0x0126}
0x20f6e…20f98 Head {h00=0x0026, h01=0x0050, text=»* A4 = QUEUE ELEMENT LINK ADDRESS«, t00=0x0151, t01=0x0136}
0x20f98…20fc0 Head {h00=0x0024, h01=0x0050, text=»* A7 = QUEUE HEAD LINK ADDRESS «, t00=0x0151, t01=0x0160}
0x20fc0…20fca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x0188}
0x20fca…20fdc (338, 0, 400) Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0152, t01=0x0004}
0x20fdc…20ff4 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0152, t01=0x0016}
0x20ff4…2100c Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0152, t01=0x002e}
0x2100c…21016 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0152, t01=0x0046}
0x21016…2105a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0152, t01=0x0050}
0x2105a…21064 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0152, t01=0x0094}
0x21064…21078 Head {h00=0x0010, h01=0x0050, text=»LNKFST EQU *«, t00=0x0152, t01=0x009e}
0x21078…210a0 Head {h00=0x0024, h01=0x0050, text=» LDR* A1,A7 FIRST QUEUE ELEMENT «, t00=0x0152, t01=0x00b2}
0x210a0…210cc Head {h00=0x0028, h01=0x0050, text=» STR A1,A4 SET LINK FROM NEW ELEMENT«, t00=0x0152, t01=0x00da}
0x210cc…210f4 Head {h00=0x0024, h01=0x0050, text=» STR A4,A7 SET NEW ELEMENT FIRST«, t00=0x0152, t01=0x0106}
0x210f4…2110a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0152, t01=0x012e}
0x2110a…21124 Head {h00=0x0016, h01=0x0050, text=» RF LNKRET RETURN «, t00=0x0152, t01=0x0144}
0x21124…21130 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0152, t01=0x015e}
0x21130…21146 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0152, t01=0x016a}
0x21146…21156 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0152, t01=0x0180}
0x21156…21162 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0152, t01=0x0190}
0x21162…2116c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x000c}
0x2116c…2117a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0153, t01=0x0016}
0x2117a…21184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x0024}
0x21184…211c8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0153, t01=0x002e}
0x211c8…211d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x0072}
0x211d2…211ea Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0153, t01=0x007c}
0x211ea…211fa Head {h00=0x000c, h01=0x0050, text=»* LNKLST«, t00=0x0153, t01=0x0094}
0x211fa…21204 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x00a4}
0x21204…21218 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0153, t01=0x00ae}
0x21218…2124c Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE LINKS A QUEUE ELEMENT LAST IN«, t00=0x0153, t01=0x00c2}
0x2124c…2127a Head {h00=0x002a, h01=0x0050, text=»* A QUEUE (OPOSITE END TO QUEUE HEAD).«, t00=0x0153, t01=0x00f6}
0x2127a…212b0 Head {h00=0x0032, h01=0x0050, text=»* ONE WORD IN EACH ELEMENT IS USED AS A LINK. «, t00=0x0153, t01=0x0124}
0x212b0…212e6 Head {h00=0x0032, h01=0x0050, text=»* END OF QUEUE IS INDICATED BY LINK=0 IN LAST «, t00=0x0153, t01=0x015a}
0x212e6…212f8 Head {h00=0x000e, h01=0x0050, text=»* ELEMENT.«, t00=0x0153, t01=0x0190}
0x212f8…21302 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x0012}
0x21302…21312 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0154, t01=0x001c}
0x21312…2132a Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKLST «, t00=0x0154, t01=0x002c}
0x2132a…21334 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x0044}
0x21334…21344 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0154, t01=0x004e}
0x21344…2136e Head {h00=0x0026, h01=0x0050, text=»* A4 = QUEUE ELEMENT LINK ADDRESS«, t00=0x0154, t01=0x005e}
0x2136e…21396 Head {h00=0x0024, h01=0x0050, text=»* A7 = QUEUE HEAD LINK ADDRESS «, t00=0x0154, t01=0x0088}
0x21396…213a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x00b0}
0x213a0…213b2 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0154, t01=0x00ba}
0x213b2…213ca Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0154, t01=0x00cc}
0x213ca…213e2 Head {h00=0x0014, h01=0x0050, text=»* A7 = CHANGED «, t00=0x0154, t01=0x00e4}
0x213e2…213fa Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0154, t01=0x00fc}
0x213fa…21404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x0114}
0x21404…21448 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0154, t01=0x011e}
0x21448…21452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x0162}
0x21452…21466 Head {h00=0x0010, h01=0x0050, text=»LNKLST EQU *«, t00=0x0154, t01=0x016c}
0x21466…2148e Head {h00=0x0024, h01=0x0050, text=» LDR A1,A7 SAVE PRESENT ELEMENT «, t00=0x0154, t01=0x0180}
0x2148e…214ae Head {h00=0x001c, h01=0x0050, text=» LDR* A7,A7 NEXT ELEMENT«, t00=0x0155, t01=0x0018}
0x214ae…214e2 Head {h00=0x0030, h01=0x0050, text=» RB(NZ) LNKLST CONTINUE IF NOT LAST ELEMENT «, t00=0x0155, t01=0x0038}
0x214e2…21510 Head {h00=0x002a, h01=0x0050, text=» STR A4,A1 LINK NEW ELEMENT AFTER LAST«, t00=0x0155, t01=0x006c}
0x21510…2153e Head {h00=0x002a, h01=0x0050, text=» CMR A4 SET END MARKER IN LAST ELEMENT«, t00=0x0155, t01=0x009a}
0x2153e…21548 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x00c8}
0x21548…21556 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0155, t01=0x00d2}
0x21556…21560 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x00e0}
0x21560…21576 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0155, t01=0x00ea}
0x21576…21590 Head {h00=0x0016, h01=0x0050, text=» RF LNKRET RETURN «, t00=0x0155, t01=0x0100}
0x21590…2159c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0155, t01=0x011a}
0x2159c…215b2 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0155, t01=0x0126}
0x215b2…215c2 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0155, t01=0x013c}
0x215c2…215ce Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0155, t01=0x014c}
0x215ce…215d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x0158}
0x215d8…215e6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0155, t01=0x0162}
0x215e6…215f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x0170}
0x215f0…21634 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0155, t01=0x017a}
0x21634…2163e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x002e}
0x2163e…21656 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0156, t01=0x0038}
0x21656…21666 Head {h00=0x000c, h01=0x0050, text=»* LNKOUT«, t00=0x0156, t01=0x0050}
0x21666…21670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0060}
0x21670…21684 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0156, t01=0x006a}
0x21684…216bc Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE REMOVES AN ELEMENT FROM A QUEUE. «, t00=0x0156, t01=0x007e}
0x216bc…216f2 Head {h00=0x0032, h01=0x0050, text=»* ONE WORD IN EACH ELEMENT IS USED AS A LINK. «, t00=0x0156, t01=0x00b6}
0x216f2…21728 Head {h00=0x0032, h01=0x0050, text=»* END OF QUEUE IS INDICATED BY LINK=0 IN LAST «, t00=0x0156, t01=0x00ec}
0x21728…2173a Head {h00=0x000e, h01=0x0050, text=»* ELEMENT.«, t00=0x0156, t01=0x0122}
0x2173a…21744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0134}
0x21744…21754 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0156, t01=0x013e}
0x21754…2176c Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKOUT «, t00=0x0156, t01=0x014e}
0x2176c…21776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0166}
0x21776…21786 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0156, t01=0x0170}
0x21786…217b0 Head {h00=0x0026, h01=0x0050, text=»* A4 = QUEUE ELEMENT LINK ADDRESS«, t00=0x0156, t01=0x0180}
0x217b0…217d8 Head {h00=0x0024, h01=0x0050, text=»* A7 = QUEUE HEAD LINK ADDRESS «, t00=0x0157, t01=0x001a}
0x217d8…217e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x0042}
0x217e2…217f4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0157, t01=0x004c}
0x217f4…2180c Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0157, t01=0x005e}
0x2180c…21834 Head {h00=0x0024, h01=0x0050, text=»* A7 = =0 IF ELEMENT NOT FOUND «, t00=0x0157, t01=0x0076}
0x21834…21854 Head {h00=0x001c, h01=0x0050, text=»* ><0 IF ELEMENT FOUND «, t00=0x0157, t01=0x009e}
0x21854…2186c Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0157, t01=0x00be}
0x2186c…21876 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x00d6}
0x21876…218ba Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0157, t01=0x00e0}
0x218ba…218c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x0124}
0x218c4…218d8 Head {h00=0x0010, h01=0x0050, text=»LNKOUT EQU *«, t00=0x0157, t01=0x012e}
0x218d8…21900 Head {h00=0x0024, h01=0x0050, text=» LDR A1,A7 SAVE PRESENT ELEMENT «, t00=0x0157, t01=0x0142}
0x21900…21920 Head {h00=0x001c, h01=0x0050, text=» LDR* A7,A7 NEXT ELEMENT«, t00=0x0157, t01=0x016a}
0x21920…2194a Head {h00=0x0026, h01=0x0050, text=» RF(Z) LO100 EXIT IF END OF QUEUE «, t00=0x0157, t01=0x018a}
0x2194a…2196c Head {h00=0x001e, h01=0x0050, text=» CWR A4,A7 ELEMENT FOUND? «, t00=0x0158, t01=0x0024}
0x2196c…21992 Head {h00=0x0022, h01=0x0050, text=» RB(NE) LNKOUT NO, CHECK NEXT «, t00=0x0158, t01=0x0046}
0x21992…2199c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x006c}
0x2199c…219aa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0158, t01=0x0076}
0x219aa…219b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x0084}
0x219b4…219e4 Head {h00=0x002c, h01=0x0050, text=» LDR* A7,A7 ELEMENT AFTER WANTED ELEMENT«, t00=0x0158, t01=0x008e}
0x219e4…21a16 Head {h00=0x002e, h01=0x0050, text=» STR A7,A1 SET LINK FROM PREVIOUS TO NEXT «, t00=0x0158, t01=0x00be}
0x21a16…21a3e Head {h00=0x0024, h01=0x0050, text=» LDK A7,1 INDICATE ELEMENT FOUND«, t00=0x0158, t01=0x00f0}
0x21a3e…21a52 Head {h00=0x0010, h01=0x0050, text=»LO100 EQU * «, t00=0x0158, t01=0x0118}
0x21a52…21a5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x012c}
0x21a5c…21a66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x0136}
0x21a66…21a7c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0158, t01=0x0140}
0x21a7c…21a90 Head {h00=0x0010, h01=0x0050, text=»LNKRET EQU *«, t00=0x0158, t01=0x0156}
0x21a90…21abc Head {h00=0x0028, h01=0x0050, text=»* COMMON EXIT FOR QUEUE ROUTINES «, t00=0x0158, t01=0x016a}
0x21abc…21af6 Head {h00=0x0036, h01=0x0050, text=»* RETURN WITHOUT CHANGING INTERRUPT ENABLE FLAG«, t00=0x0159, t01=0x0008}
0x21af6…21b12 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0159, t01=0x0042}
0x21b12…21b2c Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0159, t01=0x005e}
0x21b2c…21b38 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0159, t01=0x0078}
0x21b38…21b42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x0084}
0x21b42…21b58 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0159, t01=0x008e}
0x21b58…21b68 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0159, t01=0x00a4}
0x21b68…21b74 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0159, t01=0x00b4}
0x21b74…21b7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x00c0}
0x21b7e…21b8c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0159, t01=0x00ca}
0x21b8c…21b96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x00d8}
0x21b96…21ba0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x00e2}
0x21ba0…21baa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x00ec}
0x21baa…21bb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x00f6}
0x21bb4…21bf8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0159, t01=0x0100}
0x21bf8…21c02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x0144}
0x21c02…21c2a Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0159, t01=0x014e}
0x21c2a…21c34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x0176}
0x21c34…21c6a Head {h00=0x0032, h01=0x0050, text=»* TBUFF = TOSS BUFFER HANDLING SUBROUTINES«, t00=0x0159, t01=0x0180}
0x21c6a…21c74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0026}
0x21c74…21c7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0030}
0x21c7e…21c88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x003a}
0x21c88…21ccc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x015a, t01=0x0044}
0x21ccc…21cd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0088}
0x21cd6…21d10 Head {h00=0x0036, h01=0x0050, text=»* THIS PROGRAM CONTAINS A SET OF BUFFER HANDLING«, t00=0x015a, t01=0x0092}
0x21d10…21d4a Head {h00=0x0036, h01=0x0050, text=»* SUBROUTINES. THEY OPERATE ON BUFFERS ORGANIZED«, t00=0x015a, t01=0x00cc}
0x21d4a…21d82 Head {h00=0x0034, h01=0x0050, text=»* IN BUFFER POOLS. A BUFFER POOL CONSISTS OF A«, t00=0x015a, t01=0x0106}
0x21d82…21dbc Head {h00=0x0036, h01=0x0050, text=»* POOLBLOCK FOR CONTROL INFORMATION, AND ONE OR «, t00=0x015a, t01=0x013e}
0x21dbc…21df4 Head {h00=0x0034, h01=0x0050, text=»* MORE BUFFER AREAS. THE POOLBLOCK AND BUFFER «, t00=0x015a, t01=0x0178}
0x21df4…21e28 Head {h00=0x0030, h01=0x0050, text=»* AREA(S) SHOULD BE SUPPLIED BY THE USER. «, t00=0x015b, t01=0x0020}
0x21e28…21e32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x0054}
0x21e32…21e66 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x015b, t01=0x005e}
0x21e66…21e70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x0092}
0x21e70…21e88 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x015b, t01=0x009c}
0x21e88…21e92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x00b4}
0x21e92…21eb8 Head {h00=0x0022, h01=0x0050, text=»* GETBUF GET BUFFER FROM POOL «, t00=0x015b, t01=0x00be}
0x21eb8…21ede Head {h00=0x0022, h01=0x0050, text=»* RELBUF RETURN BUFFER TO POOL«, t00=0x015b, t01=0x00e4}
0x21ede…21f08 Head {h00=0x0026, h01=0x0050, text=»* AREBUF DIVIDE AREA INTO BUFFERS «, t00=0x015b, t01=0x010a}
0x21f08…21f12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x0134}
0x21f12…21f20 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015b, t01=0x013e}
0x21f20…21f2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x014c}
0x21f2a…21f40 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x015b, t01=0x0156}
0x21f40…21f56 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x015b, t01=0x016c}
0x21f56…21f6c Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x015b, t01=0x0182}
0x21f6c…21f76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x0008}
0x21f76…21f80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x0012}
0x21f80…21fa8 Head {h00=0x0024, h01=0x0050, text=»* POOLBLOCK LAYOUT DEFINITION«, t00=0x015c, t01=0x001c}
0x21fa8…21fb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x0044}
0x21fb2…21fd8 Head {h00=0x0022, h01=0x0050, text=»* POOLBLOCK WORD OFFSETS «, t00=0x015c, t01=0x004e}
0x21fd8…21ffa Head {h00=0x001e, h01=0x0050, text=»POBID EQU 0 POOL IDENTITY «, t00=0x015c, t01=0x0074}
0x21ffa…2201c Head {h00=0x001e, h01=0x0050, text=»POBFLG EQU 2 BINARY FLAGS «, t00=0x015c, t01=0x0096}
0x2201c…22044 Head {h00=0x0024, h01=0x0050, text=»POBFRE EQU 4 FREE LIST LINK HEAD«, t00=0x015c, t01=0x00b8}
0x22044…2206c Head {h00=0x0024, h01=0x0050, text=»POBBUS EQU 6 BUFFER SIZE (BYTES)«, t00=0x015c, t01=0x00e0}
0x2206c…22092 Head {h00=0x0022, h01=0x0050, text=»POBARS EQU 8 AREA SIZE (BYTES)«, t00=0x015c, t01=0x0108}
0x22092…2209c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x012e}
0x2209c…220bc Head {h00=0x001c, h01=0x0050, text=»* POOLBLOCK LENGTH «, t00=0x015c, t01=0x0138}
0x220bc…220e0 Head {h00=0x0020, h01=0x0050, text=»POBLEN EQU 10 LENGTH (BYTES)«, t00=0x015c, t01=0x0158}
0x220e0…220ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x017c}
0x220ea…220f8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015c, t01=0x0186}
0x220f8…22102 (349, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x0004}
0x22102…22146 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x015d, t01=0x000e}
0x22146…22150 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x0052}
0x22150…22168 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x015d, t01=0x005c}
0x22168…22178 Head {h00=0x000c, h01=0x0050, text=»* GETBUF«, t00=0x015d, t01=0x0074}
0x22178…22182 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x0084}
0x22182…22196 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x015d, t01=0x008e}
0x22196…221ce Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE FETCHES ONE BUFFER FROM A BUFFER «, t00=0x015d, t01=0x00a2}
0x221ce…221f8 Head {h00=0x0026, h01=0x0050, text=»* POOL AND GIVES IT TO THE CALLER.«, t00=0x015d, t01=0x00da}
0x221f8…22202 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x0104}
0x22202…22212 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x015d, t01=0x010e}
0x22212…2222a Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETBUF «, t00=0x015d, t01=0x011e}
0x2222a…22234 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x0136}
0x22234…22244 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x015d, t01=0x0140}
0x22244…22266 Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x015d, t01=0x0150}
0x22266…22270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x0172}
0x22270…22282 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x015d, t01=0x017c}
0x22282…222b4 Head {h00=0x002e, h01=0x0050, text=»* A4 = BUFFER ADDRESS IF BUFFER ALLOCATED«, t00=0x015d, t01=0x018e}
0x222b4…222ca Head {h00=0x0012, h01=0x0050, text=»* ELSE ZERO«, t00=0x015e, t01=0x0030}
0x222ca…222e8 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A4«, t00=0x015e, t01=0x0046}
0x222e8…22304 Head {h00=0x0018, h01=0x0050, text=»* INTERR.= INHIBITED«, t00=0x015e, t01=0x0064}
0x22304…2230e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x0080}
0x2230e…22352 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x015e, t01=0x008a}
0x22352…2235c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x00ce}
0x2235c…22370 Head {h00=0x0010, h01=0x0050, text=»GETBUF EQU *«, t00=0x015e, t01=0x00d8}
0x22370…2237c Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x015e, t01=0x00ec}
0x2237c…223a4 Head {h00=0x0024, h01=0x0050, text=» LD A4,POBFRE,A7 FREE LIST START«, t00=0x015e, t01=0x00f8}
0x223a4…223ce Head {h00=0x0026, h01=0x0050, text=» RF(Z) GB100 NO BUFFER LEFT. EXIT «, t00=0x015e, t01=0x0120}
0x223ce…223d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x014a}
0x223d8…223e6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015e, t01=0x0154}
0x223e6…223f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x0162}
0x223f0…2240c Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x015e, t01=0x016c}
0x2240c…22436 Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A4 NEW START OF FREE LIST«, t00=0x015e, t01=0x0188}
0x22436…2245c Head {h00=0x0022, h01=0x0050, text=» ST A1,POBFRE,A7 TO POOLBLOCK «, t00=0x015f, t01=0x0022}
0x2245c…22478 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x015f, t01=0x0048}
0x22478…22482 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x0064}
0x22482…22496 Head {h00=0x0010, h01=0x0050, text=»GB100 EQU * «, t00=0x015f, t01=0x006e}
0x22496…224b6 Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x015f, t01=0x0082}
0x224b6…224de Head {h00=0x0024, h01=0x0050, text=» LDR A4,A4 CR := CONTENTS OF A4 «, t00=0x015f, t01=0x00a2}
0x224de…224f6 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x015f, t01=0x00ca}
0x224f6…22500 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x00e2}
0x22500…2250e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015f, t01=0x00ec}
0x2250e…22518 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x00fa}
0x22518…2255c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x015f, t01=0x0104}
0x2255c…22566 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x0148}
0x22566…2257e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x015f, t01=0x0152}
0x2257e…2258e Head {h00=0x000c, h01=0x0050, text=»* RELBUF«, t00=0x015f, t01=0x016a}
0x2258e…22598 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x017a}
0x22598…225ac Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x015f, t01=0x0184}
0x225ac…225e2 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE RELEASES ONE BUFFER AND RETURNS«, t00=0x0160, t01=0x0008}
0x225e2…22600 Head {h00=0x001a, h01=0x0050, text=»* IT TO A BUFFER POOL.«, t00=0x0160, t01=0x003e}
0x22600…2260a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x005c}
0x2260a…2261a Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0160, t01=0x0066}
0x2261a…22632 Head {h00=0x0014, h01=0x0050, text=»* CF A15,RELBUF «, t00=0x0160, t01=0x0076}
0x22632…2263c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x008e}
0x2263c…2264c Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0160, t01=0x0098}
0x2264c…2266a Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0160, t01=0x00a8}
0x2266a…2268c Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x0160, t01=0x00c6}
0x2268c…22696 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x00e8}
0x22696…226a8 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0160, t01=0x00f2}
0x226a8…226c0 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0160, t01=0x0104}
0x226c0…226dc Head {h00=0x0018, h01=0x0050, text=»* INTERR.= INHIBITED«, t00=0x0160, t01=0x011c}
0x226dc…226e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x0138}
0x226e6…2272a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0160, t01=0x0142}
0x2272a…22734 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x0186}
0x22734…22748 Head {h00=0x0010, h01=0x0050, text=»RELBUF EQU *«, t00=0x0160, t01=0x0190}
0x22748…22754 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0161, t01=0x0014}
0x22754…22770 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x0161, t01=0x0020}
0x22770…2277a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x003c}
0x2277a…227a6 Head {h00=0x0028, h01=0x0050, text=» LD A1,POBFRE,A7 OLD FREE LIST START«, t00=0x0161, t01=0x0046}
0x227a6…227ce Head {h00=0x0024, h01=0x0050, text=» STR A1,A4 LINK AFTER NEW BUFFER«, t00=0x0161, t01=0x0072}
0x227ce…227fe Head {h00=0x002c, h01=0x0050, text=» ST A4,POBFRE,A7 SET NEW FREE LIST START«, t00=0x0161, t01=0x009a}
0x227fe…22808 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x00ca}
0x22808…22824 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x0161, t01=0x00d4}
0x22824…22844 Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x0161, t01=0x00f0}
0x22844…2285c Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0161, t01=0x0110}
0x2285c…22866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x0128}
0x22866…22874 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0161, t01=0x0132}
0x22874…2287e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x0140}
0x2287e…228c2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0161, t01=0x014a}
0x228c2…228cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x018e}
0x228cc…228e4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0162, t01=0x0008}
0x228e4…228f4 Head {h00=0x000c, h01=0x0050, text=»* AREBUF«, t00=0x0162, t01=0x0020}
0x228f4…228fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x0030}
0x228fe…22912 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0162, t01=0x003a}
0x22912…2294c Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE ALLOCATES A SPECIFIED DATA AREA TO «, t00=0x0162, t01=0x004e}
0x2294c…22982 Head {h00=0x0032, h01=0x0050, text=»* A BUFFER POOL. THIS CAN BE DONE IN TWO WAYS.«, t00=0x0162, t01=0x0088}
0x22982…229b6 Head {h00=0x0030, h01=0x0050, text=»* "INIBUF" IS USED WHEN A NEW BUFFER POOL IS«, t00=0x0162, t01=0x00be}
0x229b6…229ec Head {h00=0x0032, h01=0x0050, text=»* INITIATED. IT DIVIDES THE AREA INTO BUFFERS,«, t00=0x0162, t01=0x00f2}
0x229ec…22a26 Head {h00=0x0036, h01=0x0050, text=»* LINKS THE BUFFERS IN A CHAIN FROM THE FREE LIST «, t00=0x0162, t01=0x0128}
0x22a26…22a5e Head {h00=0x0034, h01=0x0050, text=»* HEAD IN POOLBLOCK, AND PUTS AN END MARKER (-1)«, t00=0x0162, t01=0x0162}
0x22a5e…22a98 Head {h00=0x0036, h01=0x0050, text=»* IN THE LAST BUFFER. "LNKBUF" IS USED WHEN A NEW «, t00=0x0163, t01=0x000a}
0x22a98…22ace Head {h00=0x0032, h01=0x0050, text=»* AREA IS ADDED TO AN EXISTING BUFFER POOL. IT«, t00=0x0163, t01=0x0044}
0x22ace…22b04 Head {h00=0x0032, h01=0x0050, text=»* DIVIDES THE AREA INTO BUFFERS, AND LINKS THE«, t00=0x0163, t01=0x007a}
0x22b04…22b2e Head {h00=0x0026, h01=0x0050, text=»* BUFFERS FIRST IN THE FREE LIST. «, t00=0x0163, t01=0x00b0}
0x22b2e…22b38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x00da}
0x22b38…22b48 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0163, t01=0x00e4}
0x22b48…22b60 Head {h00=0x0014, h01=0x0050, text=»* CF A15,INIBUF «, t00=0x0163, t01=0x00f4}
0x22b60…22b78 Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKBUF «, t00=0x0163, t01=0x010c}
0x22b78…22b82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x0124}
0x22b82…22b92 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0163, t01=0x012e}
0x22b92…22bae Head {h00=0x0018, h01=0x0050, text=»* A4 = AREA ADDRESS«, t00=0x0163, t01=0x013e}
0x22bae…22bd0 Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x0163, t01=0x015a}
0x22bd0…22bda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x017c}
0x22bda…22bec Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0163, t01=0x0186}
0x22bec…22c0e Head {h00=0x001e, h01=0x0050, text=»* CR = CHANGED IF CPU852 «, t00=0x0164, t01=0x0008}
0x22c0e…22c18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x002a}
0x22c18…22c5c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0164, t01=0x0034}
0x22c5c…22c66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x0078}
0x22c66…22c74 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0164, t01=0x0082}
0x22c74…22c7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x0090}
0x22c7e…22c92 Head {h00=0x0010, h01=0x0050, text=»INIBUF EQU *«, t00=0x0164, t01=0x009a}
0x22c92…22ca8 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0164, t01=0x00ae}
0x22ca8…22cc4 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x0164, t01=0x00c4}
0x22cc4…22cd0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0164, t01=0x00e0}
0x22cd0…22cda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x00ec}
0x22cda…22cf0 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0164, t01=0x00f6}
0x22cf0…22d0e Head {h00=0x001a, h01=0x0050, text=» MSR 4,A15 PUSH A1-A4 «, t00=0x0164, t01=0x010c}
0x22d0e…22d1a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0164, t01=0x012a}
0x22d1a…22d24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x0136}
0x22d24…22d4c Head {h00=0x0024, h01=0x0050, text=» LDK A1,0 MARKER FOR LAST BUFFER«, t00=0x0164, t01=0x0140}
0x22d4c…22d70 Head {h00=0x0020, h01=0x0050, text=» RF IL100 GO TO COMMON PART «, t00=0x0164, t01=0x0168}
0x22d70…22d7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x018c}
0x22d7a…22d84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x0008}
0x22d84…22d98 Head {h00=0x0010, h01=0x0050, text=»LNKBUF EQU *«, t00=0x0165, t01=0x0012}
0x22d98…22dae Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0165, t01=0x0026}
0x22dae…22dca Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x0165, t01=0x003c}
0x22dca…22dd6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0165, t01=0x0058}
0x22dd6…22de0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x0064}
0x22de0…22df6 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0165, t01=0x006e}
0x22df6…22e14 Head {h00=0x001a, h01=0x0050, text=» MSR 4,A15 PUSH A1-A4 «, t00=0x0165, t01=0x0084}
0x22e14…22e20 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0165, t01=0x00a2}
0x22e20…22e2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x00ae}
0x22e2a…22e56 Head {h00=0x0028, h01=0x0050, text=» LD A1,POBFRE,A7 LINK TO OLD BUFFERS«, t00=0x0165, t01=0x00b8}
0x22e56…22e60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x00e4}
0x22e60…22e6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x00ee}
0x22e6a…22e7e Head {h00=0x0010, h01=0x0050, text=»IL100 EQU * «, t00=0x0165, t01=0x00f8}
0x22e7e…22e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x010c}
0x22e88…22eb6 Head {h00=0x002a, h01=0x0050, text=»* COMMON PART FOR INIBUF AND LNKBUF«, t00=0x0165, t01=0x0116}
0x22eb6…22ec0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x0144}
0x22ec0…22ed6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0165, t01=0x014e}
0x22ed6…22ef4 Head {h00=0x001a, h01=0x0050, text=» STR A2,A15 PUSH A2-A4«, t00=0x0165, t01=0x0164}
0x22ef4…22f08 Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x0165, t01=0x0182}
0x22f08…22f1c Head {h00=0x0010, h01=0x0050, text=» STR A4,A15 «, t00=0x0166, t01=0x0008}
0x22f1c…22f28 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0166, t01=0x001c}
0x22f28…22f32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x0028}
0x22f32…22f40 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0166, t01=0x0032}
0x22f40…22f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x0040}
0x22f4a…22f5c Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0166, t01=0x004a}
0x22f5c…22f82 Head {h00=0x0022, h01=0x0050, text=» ADK A2,POBFRE FREE LIST START«, t00=0x0166, t01=0x005c}
0x22f82…22f94 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A4«, t00=0x0166, t01=0x0082}
0x22f94…22fb8 Head {h00=0x0020, h01=0x0050, text=» AD A3,POBARS,A7 END OF AREA«, t00=0x0166, t01=0x0094}
0x22fb8…22fec Head {h00=0x0030, h01=0x0050, text=» SU A3,POBBUS,A7 HIGEST BUFFER START IN AREA«, t00=0x0166, t01=0x00b8}
0x22fec…22ff6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x00ec}
0x22ff6…2300a Head {h00=0x0010, h01=0x0050, text=»IL110 EQU * «, t00=0x0166, t01=0x00f6}
0x2300a…2302a Head {h00=0x001c, h01=0x0050, text=»* BUFFER LINKING LOOP«, t00=0x0166, t01=0x010a}
0x2302a…23048 Head {h00=0x001a, h01=0x0050, text=» CWR A4,A3 ROOM LEFT? «, t00=0x0166, t01=0x012a}
0x23048…23068 Head {h00=0x001c, h01=0x0050, text=» RF(G) IL120 NO, FINISH «, t00=0x0166, t01=0x0148}
0x23068…23072 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x0168}
0x23072…230a6 Head {h00=0x0030, h01=0x0050, text=» STR A4,A2 SET LINK FROM PREVIOUS TO PRESENT«, t00=0x0166, t01=0x0172}
0x230a6…230c6 Head {h00=0x001c, h01=0x0050, text=» LDR A2,A4 NEW PREVIOUS «, t00=0x0167, t01=0x0016}
0x230c6…230ea Head {h00=0x0020, h01=0x0050, text=» AD A4,POBBUS,A7 NEW PRESENT«, t00=0x0167, t01=0x0036}
0x230ea…2310c Head {h00=0x001e, h01=0x0050, text=» RB IL110 TAKE NEXT BUFFER«, t00=0x0167, t01=0x005a}
0x2310c…23116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x007c}
0x23116…2312a Head {h00=0x0010, h01=0x0050, text=»IL120 EQU * «, t00=0x0167, t01=0x0086}
0x2312a…2315c Head {h00=0x002e, h01=0x0050, text=» STR A1,A2 SET LINK OR END IN LAST BUFFER «, t00=0x0167, t01=0x009a}
0x2315c…23166 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x00cc}
0x23166…2317c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0167, t01=0x00d6}
0x2317c…2319a Head {h00=0x001a, h01=0x0050, text=» LDR* A4,A15 POP A1-A4«, t00=0x0167, t01=0x00ec}
0x2319a…231ae Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A15«, t00=0x0167, t01=0x010a}
0x231ae…231c2 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x0167, t01=0x011e}
0x231c2…231d6 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0167, t01=0x0132}
0x231d6…231f6 Head {h00=0x001c, h01=0x0050, text=» ADKL A15,2 ADJUST STACK«, t00=0x0167, t01=0x0146}
0x231f6…23210 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0167, t01=0x0166}
0x23210…2321c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0167, t01=0x0180}
0x2321c…23226 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x018c}
0x23226…2323c Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0168, t01=0x0008}
0x2323c…23258 Head {h00=0x0018, h01=0x0050, text=» MLR 4,A15 POP A1-A4«, t00=0x0168, t01=0x001e}
0x23258…23268 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0168, t01=0x003a}
0x23268…23274 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0168, t01=0x004a}
0x23274…2327e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0056}
0x2327e…23294 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x0168, t01=0x0060}
0x23294…232a2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0168, t01=0x0076}
0x232a2…232ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0084}
0x232ac…232de Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0168, t01=0x008e}
0x232de…232e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x00c0}
0x232e8…23308 Head {h00=0x001c, h01=0x0050, text=»* ROUTINE NAMES: LOGCOM «, t00=0x0168, t01=0x00ca}
0x23308…23328 Head {h00=0x001c, h01=0x0050, text=»* LOGIOC «, t00=0x0168, t01=0x00ea}
0x23328…23348 Head {h00=0x001c, h01=0x0050, text=»* LOGATT «, t00=0x0168, t01=0x010a}
0x23348…2337c Head {h00=0x0030, h01=0x0050, text=»* FUNCTION: LOG MSG TYPE AND CCR+BUFFER«, t00=0x0168, t01=0x012a}
0x2337c…233ba Head {h00=0x003a, h01=0x0050, text=»* DLSSEL SPECIFIES DLS TO BE SELECTED «, t00=0x0168, t01=0x015e}
0x233ba…233e4 Head {h00=0x0026, h01=0x0050, text=»* 0 MEANS LOG ALL «, t00=0x0169, t01=0x000c}
0x233e4…233ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x0036}
0x233ee…23426 Head {h00=0x0034, h01=0x0050, text=»* RECORD FORMAT: BYTE 1-2 MSG TYPE (CO,RE,AT) «, t00=0x0169, t01=0x0040}
0x23426…23454 Head {h00=0x002a, h01=0x0050, text=»* BYTE 3 DLS INDEX «, t00=0x0169, t01=0x0078}
0x23454…23484 Head {h00=0x002c, h01=0x0050, text=»* BYTE 4 COMMAND CODE«, t00=0x0169, t01=0x00a6}
0x23484…234b0 Head {h00=0x0028, h01=0x0050, text=»* BYTE 5-6 STATUS-1«, t00=0x0169, t01=0x00d6}
0x234b0…234e2 Head {h00=0x002e, h01=0x0050, text=»* BYTE 7 BUFFER LENGTH «, t00=0x0169, t01=0x0102}
0x234e2…23516 Head {h00=0x0030, h01=0x0050, text=»* BYTE 8 PACKET HEADER -1«, t00=0x0169, t01=0x0134}
0x23516…2355c Head {h00=0x0042, h01=0x0050, text=»* BYTE 9 PACKET HEADER -2 (LOGICAL CHANNEL)«, t00=0x0169, t01=0x0168}
0x2355c…2359e Head {h00=0x003e, h01=0x0050, text=»* BYTE 10 PACKET HEADER -3 (FLOW CONTOL)«, t00=0x016a, t01=0x001e}
0x2359e…235d8 Head {h00=0x0036, h01=0x0050, text=»* BYTE 11-16 6 FIRST DATA BYTES «, t00=0x016a, t01=0x0060}
0x235d8…23610 Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x016a, t01=0x009a}
0x23610…2361a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x00d2}
0x2361a…2363a Head {h00=0x001c, h01=0x0050, text=»DLSSEL DATA 0 0=LOG ALL «, t00=0x016a, t01=0x00dc}
0x2363a…2365c Head {h00=0x001e, h01=0x0050, text=»* ELSE DLS TO BE LOGGED «, t00=0x016a, t01=0x00fc}
0x2365c…23692 Head {h00=0x0032, h01=0x0050, text=»LOGPTR DATA LOGARE RECORD POINTER IN LOG AREA «, t00=0x016a, t01=0x011e}
0x23692…236b2 Head {h00=0x001c, h01=0x0050, text=»LOGARE RES 960 LOG AREA «, t00=0x016a, t01=0x0154}
0x236b2…236c6 Head {h00=0x0010, h01=0x0050, text=»LOGEND EQU *«, t00=0x016a, t01=0x0174}
0x236c6…236f2 Head {h00=0x0028, h01=0x0050, text=» DATA 'ENDLOG' MARK END OF LOG AREA «, t00=0x016a, t01=0x0188}
0x236f2…23728 Head {h00=0x0032, h01=0x0050, text=»*-------------------------------------------- «, t00=0x016b, t01=0x0024}
0x23728…2374e Head {h00=0x0022, h01=0x0050, text=»LOGCOM EQU * SUBROUTINE ENTRY «, t00=0x016b, t01=0x005a}
0x2374e…23764 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x016b, t01=0x0080}
0x23764…23778 Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x016b, t01=0x0096}
0x23778…2378c Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x016b, t01=0x00aa}
0x2378c…237a0 Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x016b, t01=0x00be}
0x237a0…237ac Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x016b, t01=0x00d2}
0x237ac…237c2 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x016b, t01=0x00de}
0x237c2…237d8 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x016b, t01=0x00f4}
0x237d8…237f6 Head {h00=0x001a, h01=0x0050, text=» MSR 3,A15 PUSH A1-A3 «, t00=0x016b, t01=0x010a}
0x237f6…23802 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x016b, t01=0x0128}
0x23802…23818 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x016b, t01=0x0134}
0x23818…23836 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,'CO' MSG TYPE«, t00=0x016b, t01=0x014a}
0x23836…23858 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CWTCCA CCA OFFSET «, t00=0x016b, t01=0x0168}
0x23858…2386a Head {h00=0x000e, h01=0x0050, text=» RF LOG:10«, t00=0x016b, t01=0x018a}
0x2386a…23872 Head {h00=0x0004, h01=0x0050, t00=0x016c, t01=0x000c}
0x23872…23898 Head {h00=0x0022, h01=0x0050, text=»LOGIOC EQU * SUBROUTINE ENTRY «, t00=0x016c, t01=0x0014}
0x23898…238ae Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x016c, t01=0x003a}
0x238ae…238c2 Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x016c, t01=0x0050}
0x238c2…238d6 Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x016c, t01=0x0064}
0x238d6…238ea Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x016c, t01=0x0078}
0x238ea…238f6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x016c, t01=0x008c}
0x238f6…2390c Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x016c, t01=0x0098}
0x2390c…23922 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x016c, t01=0x00ae}
0x23922…23940 Head {h00=0x001a, h01=0x0050, text=» MSR 3,A15 PUSH A1-A3 «, t00=0x016c, t01=0x00c4}
0x23940…2394c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x016c, t01=0x00e2}
0x2394c…23962 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x016c, t01=0x00ee}
0x23962…23980 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,'RE' MSG TYPE«, t00=0x016c, t01=0x0104}
0x23980…239a2 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CWTRCA RCA OFFSET «, t00=0x016c, t01=0x0122}
0x239a2…239b4 Head {h00=0x000e, h01=0x0050, text=» RF LOG:10«, t00=0x016c, t01=0x0144}
0x239b4…239bc Head {h00=0x0004, h01=0x0050, t00=0x016c, t01=0x0156}
0x239bc…239e2 Head {h00=0x0022, h01=0x0050, text=»LOGATT EQU * SUBROUTINE ENTRY «, t00=0x016c, t01=0x015e}
0x239e2…239f8 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x016c, t01=0x0184}
0x239f8…23a0c Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x016d, t01=0x000a}
0x23a0c…23a20 Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x016d, t01=0x001e}
0x23a20…23a34 Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x016d, t01=0x0032}
0x23a34…23a40 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x016d, t01=0x0046}
0x23a40…23a56 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x016d, t01=0x0052}
0x23a56…23a6c Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x016d, t01=0x0068}
0x23a6c…23a8a Head {h00=0x001a, h01=0x0050, text=» MSR 3,A15 PUSH A1-A3 «, t00=0x016d, t01=0x007e}
0x23a8a…23a96 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x016d, t01=0x009c}
0x23a96…23aac Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x016d, t01=0x00a8}
0x23aac…23aca Head {h00=0x001a, h01=0x0050, text=» LDKL A1,'AT' MSG TYPE«, t00=0x016d, t01=0x00be}
0x23aca…23aec Head {h00=0x001e, h01=0x0050, text=» LDK A2,CWTRCA RCA OFFSET «, t00=0x016d, t01=0x00dc}
0x23aec…23b20 Head {h00=0x0030, h01=0x0050, text=»*------------------------------------------ «, t00=0x016d, t01=0x00fe}
0x23b20…23b40 Head {h00=0x001c, h01=0x0050, text=»LOG:10 EQU * COMMON PART«, t00=0x016d, t01=0x0132}
0x23b40…23b56 Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPTR «, t00=0x016d, t01=0x0152}
0x23b56…23b76 Head {h00=0x001c, h01=0x0050, text=» STR A1,A3 LOG MSG TYPE «, t00=0x016d, t01=0x0168}
0x23b76…23b90 Head {h00=0x0016, h01=0x0050, text=» ADR A2,A5 CCR PTR«, t00=0x016d, t01=0x0188}
0x23b90…23bb2 Head {h00=0x001e, h01=0x0050, text=» LD A1,DLSSEL SELECTED DLS«, t00=0x016e, t01=0x0012}
0x23bb2…23bd0 Head {h00=0x001a, h01=0x0050, text=» RF(Z) LOG:15 LOG ALL «, t00=0x016e, t01=0x0034}
0x23bd0…23be8 Head {h00=0x0014, h01=0x0050, text=» CC A1,CCRDLS,A2«, t00=0x016e, t01=0x0052}
0x23be8…23c10 Head {h00=0x0024, h01=0x0050, text=» RF(NE) LOG:20 NOT SELECTED,SKIP«, t00=0x016e, t01=0x006a}
0x23c10…23c24 Head {h00=0x0010, h01=0x0050, text=»LOG:15 EQU *«, t00=0x016e, t01=0x0092}
0x23c24…23c46 Head {h00=0x001e, h01=0x0050, text=» LD A1,CCRDLS,A2 DLS INDEX«, t00=0x016e, t01=0x00a6}
0x23c46…23c6c Head {h00=0x0022, h01=0x0050, text=» ST A1,2,A3 +COMMAND INTO LOG «, t00=0x016e, t01=0x00c8}
0x23c6c…23c8e Head {h00=0x001e, h01=0x0050, text=» LD A1,CCRSTA,A2 STATUS-1 «, t00=0x016e, t01=0x00ee}
0x23c8e…23cae Head {h00=0x001c, h01=0x0050, text=» ST A1,4,A3 LOG STATUS-1«, t00=0x016e, t01=0x0110}
0x23cae…23cd4 Head {h00=0x0022, h01=0x0050, text=» LD A1,CCRLEN,A2 BUFFER LENGTH«, t00=0x016e, t01=0x0130}
0x23cd4…23cf0 Head {h00=0x0018, h01=0x0050, text=» SC A1,6,A3 INTO LOG«, t00=0x016e, t01=0x0156}
0x23cf0…23d18 Head {h00=0x0024, h01=0x0050, text=» LD A2,CCRBUF,A2 BUFFER ADDRESS «, t00=0x016e, t01=0x0172}
0x23d18…23d34 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A2 BYTE 0-1«, t00=0x016f, t01=0x000a}
0x23d34…23d58 Head {h00=0x0020, h01=0x0050, text=» SC A1,8,A3 PACKET HEADER 2 «, t00=0x016f, t01=0x0026}
0x23d58…23d6a Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x016f, t01=0x004a}
0x23d6a…23d8e Head {h00=0x0020, h01=0x0050, text=» SC A1,7,A3 PACKET HEADER 1 «, t00=0x016f, t01=0x005c}
0x23d8e…23dba Head {h00=0x0028, h01=0x0050, text=» LD A1,2,A2 PACKET HEADER 3+ BYTE 1 «, t00=0x016f, t01=0x0080}
0x23dba…23dce Head {h00=0x0010, h01=0x0050, text=» SC A1,10,A3«, t00=0x016f, t01=0x00ac}
0x23dce…23de0 Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x016f, t01=0x00c0}
0x23de0…23df4 Head {h00=0x0010, h01=0x0050, text=» SC A1,9,A3 «, t00=0x016f, t01=0x00d2}
0x23df4…23e10 Head {h00=0x0018, h01=0x0050, text=» LD A1,4,A2 BYTE 2-3«, t00=0x016f, t01=0x00e6}
0x23e10…23e24 Head {h00=0x0010, h01=0x0050, text=» SC A1,12,A3«, t00=0x016f, t01=0x0102}
0x23e24…23e36 Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x016f, t01=0x0116}
0x23e36…23e4a Head {h00=0x0010, h01=0x0050, text=» SC A1,11,A3«, t00=0x016f, t01=0x0128}
0x23e4a…23e66 Head {h00=0x0018, h01=0x0050, text=» LD A1,6,A2 BYTE 4-5«, t00=0x016f, t01=0x013c}
0x23e66…23e7a Head {h00=0x0010, h01=0x0050, text=» SC A1,14,A3«, t00=0x016f, t01=0x0158}
0x23e7a…23e8c Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x016f, t01=0x016c}
0x23e8c…23ea0 Head {h00=0x0010, h01=0x0050, text=» SC A1,13,A3«, t00=0x016f, t01=0x017e}
0x23ea0…23eb4 (368, 0, 398) Head {h00=0x0010, h01=0x0050, text=» LD A1,8,A2 «, t00=0x0170, t01=0x0004}
0x23eb4…23ec6 Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x0170, t01=0x0018}
0x23ec6…23eda Head {h00=0x0010, h01=0x0050, text=» SC A1,15,A3«, t00=0x0170, t01=0x002a}
0x23eda…23eec Head {h00=0x000e, h01=0x0050, text=» ADK A3,16«, t00=0x0170, t01=0x003e}
0x23eec…23f1a Head {h00=0x002a, h01=0x0050, text=» ST A3,LOGPTR NEXT RECORD IN LOG AREA «, t00=0x0170, t01=0x0050}
0x23f1a…23f42 Head {h00=0x0024, h01=0x0050, text=» CWK A3,LOGEND END OF LOG AREA? «, t00=0x0170, t01=0x007e}
0x23f42…23f5c Head {h00=0x0016, h01=0x0050, text=» RF(NE) LOG:20 NO!«, t00=0x0170, t01=0x00a6}
0x23f5c…23f7e Head {h00=0x001e, h01=0x0050, text=» LDKL A1,LOGARE RESET PTR «, t00=0x0170, t01=0x00c0}
0x23f7e…23f94 Head {h00=0x0012, h01=0x0050, text=» ST A1,LOGPTR «, t00=0x0170, t01=0x00e2}
0x23f94…23fa8 Head {h00=0x0010, h01=0x0050, text=»LOG:20 EQU *«, t00=0x0170, t01=0x00f8}
0x23fa8…23fbe Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0170, t01=0x010c}
0x23fbe…23fda Head {h00=0x0018, h01=0x0050, text=» LDR* A3,A15 RESTORE«, t00=0x0170, t01=0x0122}
0x23fda…23fee Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x0170, t01=0x013e}
0x23fee…24002 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0170, t01=0x0152}
0x24002…24016 Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0170, t01=0x0166}
0x24016…2402e Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0170, t01=0x017a}
0x2402e…2403a (369, 2, 142) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0171, t01=0x0004}
0x2403a…24050 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x0171, t01=0x0010}
0x24050…24066 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0171, t01=0x0026}
0x24066…24078 Head {h00=0x000e, h01=0x0050, text=» MLR 3,A15«, t00=0x0171, t01=0x003c}
0x24078…24088 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0171, t01=0x004e}
0x24088…24094 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0171, t01=0x005e}
0x24094…2409e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x006a}
0x2409e…240a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x0074}
0x240a8…240b4 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0171, t01=0x007e}
0x240b4…240b8 Head {h00=0x4004, h01=0x0000}
0x240b8…240bc 01 71 00 8a ┆ q ┆
0x240bc…240c4 (370, 1, 8) 20 04 00 00 01 72 00 04 ┆ r ┆