|
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: 154962 (0x25d52)
Notes: pts_type(SC)
Names: »DRPL01.SC«
└─⟦7a1dcd5a9⟧ Bits:30009673 Philips computer tape "600134"
└─⟦this⟧ »PTMON/DRPL01.SC«
IDENT DRPL01 REL 11.1 83-10-20 870105041110 DK2,WAITING LEV. 3 ACK (PE-AB) DK1, PE-AB CHGE, LINE 3207 =17,BLOCKING IMPROVED REL 11.1 82-08-13 =16,CHANGED BLOCKING OF OUTPUT REL 11.1 82-07-08 =15,COMPARE ADDR. CORR. REL 11.1 82-02-12 =14,SET CR CORR. REL 11.0 81-10-20 =13,ADAPTED FOR PTS8000 REL 11.0 81-10-14 =12,DIAGNOSTIC FOR RWSI REL 11.0 81-08-27 =11,CH. OF PARAMETERS REL 11.0 81-08-10 =10,CORR. OF RWSI REL 11.0 81-08-10 =9,CORR. OF INTERRUPT ENTRY REL 11.0 81-06-24 =8,OPEN LINE PARAM. CHANGED REL 11.0 81-06-23 =7,CORR. OF CWT-DISPL. REL 11.0 81-06-11 =6,LENGTH OF LONG BUFFERS CHANGED REL 11.0 81-05-27 =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 EJECT * * * * ************************************************************ * * 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 ENTRY PLCLOG LOGG POINTER =11 ENTRY TIMACT INACTIVITY TIMER =11 ENTRY POLRTL POLL FREQ. & NO OF RETRANSM =11 ENTRY POLRTR POLL FR. & NO OF RETR. =11 EJECT * * * INTERRUPTS * ENTRY IHPL01 PLC NUMBER 1 ENTRY IHPL02 PLC NUMBER 2 ENTRY IHPL03 PLC NUMBER 3 ENTRY IHPL04 PLC NUMBER 4 * 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 EXTRN DWTWAT WAIT/ACT INDICATOR =16 * 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 0 * * * 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 1 * * 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 3 U =8 * * POLLING FREQUENCY (L BYTE) & NUMBER OF RETRANSMISSIONS (R BYTE) =11 POLRTL EQU /1805 LOCAL =11 POLRTR EQU /0D05 REMOTE =11 * * 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-32) * LOBUFN EQU 3 * * * LOBUFU IS THE LENGTH OF THE USER PART OF A LONG * OUTPUT BUFFER IN WORDS (1-128) * LOBUFU EQU 128 U =6,=16 * 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 LOBUF7 EQU LOBUF6+LOBUF1 . =17 LOBUF8 EQU LOBUF7+LOBUF1 . =17 LOBUF9 EQU LOBUF8+LOBUF1 . =17 LOBU10 EQU LOBUF9+LOBUF1 . =17 LOBU11 EQU LOBU10+LOBUF1 . =17 LOBU12 EQU LOBU11+LOBUF1 . =17 LOBU13 EQU LOBU12+LOBUF1 . =17 LOBU14 EQU LOBU13+LOBUF1 . =17 LOBU15 EQU LOBU14+LOBUF1 . =17 LOBU16 EQU LOBU15+LOBUF1 . =17 LOBU17 EQU LOBU16+LOBUF1 . =17 LOBU18 EQU LOBU17+LOBUF1 , =17 LOBU19 EQU LOBU18+LOBUF1 . =17 LOBU20 EQU LOBU19+LOBUF1 . =17 LOBU21 EQU LOBU20+LOBUF1 . =17 LOBU22 EQU LOBU21+LOBUF1 . =17 LOBU23 EQU LOBU22+LOBUF1 . =17 LOBU24 EQU LOBU23+LOBUF1 . =17 LOBU25 EQU LOBU24+LOBUF1 . =17 LOBU26 EQU LOBU25+LOBUF1 . =17 LOBU27 EQU LOBU26+LOBUF1 . =17 LOBU28 EQU LOBU27+LOBUF1 . =17 LOBU29 EQU LOBU28+LOBUF1 . =17 LOBU30 EQU LOBU29+LOBUF1 . =17 LOBU31 EQU LOBU30+LOBUF1 . =17 LOBU32 EQU LOBU31+LOBUF1 . =17 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 IFT LOBUFN=7 . =17 LOBUFS EQU LOBUF7 . =17 XIF IFT LOBUFN=8 . =17 LOBUFS EQU LOBUF8 . =17 XIF IFT LOBUFN=9 . =17 LOBUFS EQU LOBUF9 . =17 XIF IFT LOBUFN=10 . =17 LOBUFS EQU LOBU10 . =17 XIF IFT LOBUFN=11 . =17 LOBUFS EQU LOBU11 . =17 XIF IFT LOBUFN=12 . =17 LOBUFS EQU LOBU12 . =17 XIF IFT LOBUFN=13 . =17 LOBUFS EQU LOBU13 . =17 XIF IFT LOBUFN=14 . =17 LOBUFS EQU LOBU14 . =17 XIF IFT LOBUFN=15 . =17 LOBUFS EQU LOBU15 . =17 XIF IFT LOBUFN=16 . =17 LOBUFS EQU LOBU16 . =17 XIF IFT LOBUFN=17 . =17 LOBUFS EQU LOBU17 . =17 XIF IFT LOBUFN=18 . =17 LOBUFS EQU LOBU18 . =17 XIF IFT LOBUFN=19 . =17 LOBUFS EQU LOBU19 . =17 XIF IFT LOBUFN=20 . =17 LOBUFS EQU LOBU20 . =17 XIF IFT LOBUFN=21 . =17 LOBUFS EQU LOBU21 . =17 XIF IFT LOBUFN=22 . =17 LOBUFS EQU LOBU22 . =17 XIF IFT LOBUFN=23 .17 LOBUFS EQU LOBU23 . =17 XIF IFT LOBUFN=24 . =17 LOBUFS EQU LOBU24 . =17 XIF IFT LOBUFN=25 . =17 LOBUFS EQU LOBU25 . =17 XIF IFT LOBUFN=26 . =17 LOBUFS EQU LOBU26 . =17 XIF IFT LOBUFN=27 . =17 LOBUFS EQU LOBU27 . =17 XIF IFT LOBUFN=28 . =17 LOBUFS EQU LOBU28 . =17 XIF IFT LOBUFN=29 . =17 LOBUFS EQU LOBU29 . =17 XIF IFT LOBUFN=30 . =17 LOBUFS EQU LOBU30 . =17 XIF IFT LOBUFN=31 . =17 LOBUFS EQU LOBU31 . =17 XIF IFT LOBUFN=32 . =17 LOBUFS EQU LOBU32 . =17 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 CHABLO EQU /80 FLAG CHANGED BLOCKING =16 * 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 * POLLING 24HZ U =8 * 5 RETRANSMISSIONS * 3 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,POLRTL,TIMACT,/0120,0 =8,=11 XIF OPNL30 EQU * LOCAL PLC 3, LINE 0 IFF PLCNRL=0 IFF PLCNRL=1 IFF PLCNRL=2 DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11 XIF OPNL20 EQU * LOCAL PLC 2, LINE 0 IFF PLCNRL=0 IFF PLCNRL=1 DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11 XIF OPNL10 EQU * LOCAL PLC 1, LINE 0 IFF PLCNRL=0 DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11 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,POLRTR,TIMACT,/0108,0 =11 XIF OPNR41 EQU * LINE 1 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 IFF PLCNRR=3 DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 XIF OPNR42 EQU * LINE 2 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 IFF PLCNRR=3 DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 XIF OPNR43 EQU * LINE 3 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 IFF PLCNRR=3 DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 XIF * REMOTE PLC 3 OPNR30 EQU * LINE 0 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 XIF OPNR31 EQU * LINE 1 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 XIF OPNR32 EQU * LINE 2 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 XIF OPNR33 EQU * LINE 3 IFF PLCNRR=0 IFF PLCNRR=1 IFF PLCNRR=2 DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 XIF * * REMOTE PLC 2 OPNR20 EQU * LINE 0 IFF PLCNRR=0 IFF PLCNRR=1 DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 XIF OPNR21 EQU * LINE 1 IFF PLCNRR=0 IFF PLCNRR=1 DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 XIF OPNR22 EQU * LINE 2 IFF PLCNRR=0 IFF PLCNRR=1 DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 XIF OPNR23 EQU * LINE 3 IFF PLCNRR=0 IFF PLCNRR=1 DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 XIF * * REMOTE PLC 1 OPNR10 EQU * LINE 0 IFF PLCNRR=0 DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 XIF OPNR11 EQU * LINE 1 IFF PLCNRR=0 DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 XIF OPNR12 EQU * LINE 2 IFF PLCNRR=0 DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 XIF OPNR13 EQU * LINE 3 IFF PLCNRR=0 DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 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 CWTLB1 EQU CWTSOB+SOBUFS U =7 CWTLOB EQU CWTLB1+SOBUFS LONG OUTP. BUFFERS =7 CWTGR1 EQU CWTLOB+LOBUFS U =7 CWTGRB EQU CWTGR1+LOBUFS GEN. READ BUFFERS =7 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,DWTST,A6 WAITING LEV. 3 ACK DK2 ANK A1,DWFAK3+DWFSAC . DK2 RF(Z) SB050 . DK2 ANK A1,DWFAK3 . DK2 RF(NZ) SB060 . DK2 * SB050 EQU * . =16 LD A1,DWTLD1,A6 BUFFER ALREADY ALLOCATED? ABL(NZ) NDREPO YES, SET OK & RETURN SB060 EQU * CF A15,GETLCS A1 := STATUS & INH RF(NZ) SBERR2 ERROR, RETURN LD A3,DWTCHP,A6 CHANNEL PARAMETERS =16 ANK A3,CHABLO CHANGED BLOCKING? =16 RF(Z) SB070 NO =16 LDKL A2,LOBUFL LOAD MAX BLOCK LENGTH =16 SB070 EQU * . =16 * * 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 LD A2,BUFBIX,A4 BUFFER INDEX =16 * LDR* A4,A15 POP A4 * RETURN DIRECTLY INSTEAD OF THROUGH NDRETO TO GET * FASTER PROCESSING. CWK A2,LOBUFL+3 BUFFER FULL? =16 RF(NE) OP100 NO =16 LD A2,DWTCHP,A6 CHANNEL PARAMETER =16 ANK A2,CHABLO CHANGED BLOCKING? =16 RF(NZ) EB050 YES SEND BUFFER =16 OP100 EQU * . =16 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 * LDK A1,0 SET RETURN CODE OK =16 LD A2,DWTWAT,A6 GET WAIT/ACT INDICATOR =16 SUK A2,1 . =16 RF(Z) EB040 . =16 LDKL A2,/FFFF-CHABLO RESET CHANGED BLOCKING =16 ANS A2,DWTCHP,A6 . =16 EB040 EQU * . =16 LD A2,DWTCHP,A6 CHANNEL PARAMETER =16 ANK A2,CHABLO CHANGED BLOCKING =16 RB(NZ) OP100 YES, RETURN =16 EB050 EQU * . =16 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) NDREPO ERROR IF NO BUFFER. RETURN =16 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 * * LD A2,DWTCHP,A6 CHANNEL PARAMETER =16 ANK A2,CHABLO CHANGED BLOCKING? =16 ABL(NZ) SB050 YES, START NEW BLOCK =16 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 SC A3,CWTCCA+CCRSU1,A5 STORE LINE NUMBER (0-3) =12 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 PLCNRR=2 U =9 IFF PLCNRR=3 U =9 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 CM CWTCCA+CCRSU1,A5 CLEAR SUB-COMM DK1 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 RF(U) CS090 UNDEFINED, NOT OK =13 LDKL A1,0 SET CR, OK =14 ABR A2 CS090 EQU * * 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 ANKL A7,/0500 MASK =10 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 SRL A3,1 SHIFT ADDRESS =15 SRL A4,1 . =15 CWR A4,A3 ROOM LEFT? RF(G) IL120 NO, FINISH * SLL A3,1 . =15 SLL A4,1 . =15 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 * SLL A3,1 . =15 SLL A4,1 . =15 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 XIF PLCLOG EQU * IFF UTTEST=0 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.1 83-10-20 870105041110 «, t00=0x0000, t01=0x0004}
0x00036…0003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x0003e…00068 Head {h00=0x0026, h01=0x0050, text=» DK2,WAITING LEV. 3 ACK (PE-AB) «, t00=0x0000, t01=0x0042}
0x00068…0008e Head {h00=0x0022, h01=0x0050, text=» DK1, PE-AB CHGE, LINE 3207 «, t00=0x0000, t01=0x006c}
0x0008e…000ae Head {h00=0x001c, h01=0x0050, text=» =17,BLOCKING IMPROVED«, t00=0x0000, t01=0x0092}
0x000ae…000ca Head {h00=0x0018, h01=0x0050, text=» REL 11.1 82-08-13«, t00=0x0000, t01=0x00b2}
0x000ca…000f4 Head {h00=0x0026, h01=0x0050, text=» =16,CHANGED BLOCKING OF OUTPUT «, t00=0x0000, t01=0x00ce}
0x000f4…00110 Head {h00=0x0018, h01=0x0050, text=» REL 11.1 82-07-08«, t00=0x0000, t01=0x00f8}
0x00110…00132 Head {h00=0x001e, h01=0x0050, text=» =15,COMPARE ADDR. CORR.«, t00=0x0000, t01=0x0114}
0x00132…0014e Head {h00=0x0018, h01=0x0050, text=» REL 11.1 82-02-12«, t00=0x0000, t01=0x0136}
0x0014e…0016a Head {h00=0x0018, h01=0x0050, text=» =14,SET CR CORR. «, t00=0x0000, t01=0x0152}
0x0016a…00186 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-10-20«, t00=0x0000, t01=0x016e}
0x00186…001a8 Head {h00=0x001e, h01=0x0050, text=» =13,ADAPTED FOR PTS8000«, t00=0x0000, t01=0x018a}
0x001a8…001c4 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-10-14«, t00=0x0001, t01=0x001c}
0x001c4…001e6 Head {h00=0x001e, h01=0x0050, text=» =12,DIAGNOSTIC FOR RWSI«, t00=0x0001, t01=0x0038}
0x001e6…00202 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-08-27«, t00=0x0001, t01=0x005a}
0x00202…00222 Head {h00=0x001c, h01=0x0050, text=» =11,CH. OF PARAMETERS«, t00=0x0001, t01=0x0076}
0x00222…0023e Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-08-10«, t00=0x0001, t01=0x0096}
0x0023e…0025a Head {h00=0x0018, h01=0x0050, text=» =10,CORR. OF RWSI«, t00=0x0001, t01=0x00b2}
0x0025a…00276 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-08-10«, t00=0x0001, t01=0x00ce}
0x00276…0029c Head {h00=0x0022, h01=0x0050, text=» =9,CORR. OF INTERRUPT ENTRY«, t00=0x0001, t01=0x00ea}
0x0029c…002b8 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-06-24«, t00=0x0001, t01=0x0110}
0x002b8…002de Head {h00=0x0022, h01=0x0050, text=» =8,OPEN LINE PARAM. CHANGED«, t00=0x0001, t01=0x012c}
0x002de…002fa Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-06-23«, t00=0x0001, t01=0x0152}
0x002fa…0031c Head {h00=0x001e, h01=0x0050, text=» =7,CORR. OF CWT-DISPL. «, t00=0x0001, t01=0x016e}
0x0031c…00338 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-06-11«, t00=0x0001, t01=0x0190}
0x00338…00364 Head {h00=0x0028, h01=0x0050, text=» =6,LENGTH OF LONG BUFFERS CHANGED«, t00=0x0002, t01=0x001c}
0x00364…00380 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-05-27«, t00=0x0002, t01=0x0048}
0x00380…003a4 Head {h00=0x0020, h01=0x0050, text=» =5,CORR. OF RWSI-CWT:S , «, t00=0x0002, t01=0x0064}
0x003a4…003cc Head {h00=0x0024, h01=0x0050, text=» OPEN LINE PROC. & COND. ASS. «, t00=0x0002, t01=0x0088}
0x003cc…003e8 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-05-22«, t00=0x0002, t01=0x00b0}
0x003e8…0040a Head {h00=0x001e, h01=0x0050, text=» =4,CORR. OF CWT-DISPL. «, t00=0x0002, t01=0x00cc}
0x0040a…00426 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-05-20«, t00=0x0002, t01=0x00ee}
0x00426…00448 Head {h00=0x001e, h01=0x0050, text=» =3,CORR. OF TIMER NAME «, t00=0x0002, t01=0x010a}
0x00448…00464 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-04-29«, t00=0x0002, t01=0x012c}
0x00464…0048e Head {h00=0x0026, h01=0x0050, text=» =2,CORR. OF OPEN LINE PROCEDURE«, t00=0x0002, t01=0x0148}
0x0048e…004aa Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-04-21«, t00=0x0002, t01=0x0172}
0x004aa…004cc Head {h00=0x001e, h01=0x0050, text=» GENERAL UPDATE FOR RWSI«, t00=0x0002, t01=0x018e}
0x004cc…004e8 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-01-26«, t00=0x0003, t01=0x0020}
0x004e8…00514 Head {h00=0x0028, h01=0x0050, text=» =1,OPEN LINE PARAM. AREA EXPANDED«, t00=0x0003, t01=0x003c}
0x00514…00530 Head {h00=0x0018, h01=0x0050, text=» PRR 11.0 80-11-19«, t00=0x0003, t01=0x0068}
0x00530…0053e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0084}
0x0053e…00548 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0092}
0x00548…00552 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x009c}
0x00552…0055c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00a6}
0x0055c…00566 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00b0}
0x00566…005aa Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0003, t01=0x00ba}
0x005aa…005b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00fe}
0x005b4…005dc Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0003, t01=0x0108}
0x005dc…005e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0130}
0x005e6…00620 Head {h00=0x0036, h01=0x0050, text=»* DRPL01 = DRIVER PROCESSOR FOR LINE CONTROL, «, t00=0x0003, t01=0x013a}
0x00620…00652 Head {h00=0x002e, h01=0x0050, text=»* LOCAL & REMOTE CONNECTIONS«, t00=0x0003, t01=0x0174}
0x00652…0065c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0016}
0x0065c…00666 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0020}
0x00666…00670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x002a}
0x00670…006b4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0004, t01=0x0034}
0x006b4…006be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0078}
0x006be…006c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0082}
0x006c8…006fe Head {h00=0x0032, h01=0x0050, text=»* THIS PROGRAM HANDLES I/O OPERATIONS ON THE«, t00=0x0004, t01=0x008c}
0x006fe…00732 Head {h00=0x0030, h01=0x0050, text=»* PROCESSOR FOR LINE CONTROL (PLC). IT IS «, t00=0x0004, t01=0x00c2}
0x00732…00766 Head {h00=0x0030, h01=0x0050, text=»* CALLED FROM THE TERMINAL DEVICE DRIVERS.«, t00=0x0004, t01=0x00f6}
0x00766…00770 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x012a}
0x00770…007a6 Head {h00=0x0032, h01=0x0050, text=»* INPUT AND OUTPUT OF CHARACTERS FROM/TO THE«, t00=0x0004, t01=0x0134}
0x007a6…007e0 Head {h00=0x0036, h01=0x0050, text=»* TERMINAL DEVICE DRIVERS ARE MADE ON CHARACTER «, t00=0x0004, t01=0x016a}
0x007e0…00818 Head {h00=0x0034, h01=0x0050, text=»* BASIS. BLOCKING AND DEBLOCKING OF CHARACTERS«, t00=0x0005, t01=0x0014}
0x00818…00850 Head {h00=0x0034, h01=0x0050, text=»* IN DATA PACKETS ARE HANDLED BY THIS DRIVER. «, t00=0x0005, t01=0x004c}
0x00850…0085a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0084}
0x0085a…00868 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x008e}
0x00868…00872 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x009c}
0x00872…008b0 Head {h00=0x003a, h01=0x0050, text=»* THE PROGRAM IS DIVIDED INTO A NUMBER OF SECTIONS. «, t00=0x0005, t01=0x00a6}
0x008b0…008e8 Head {h00=0x0034, h01=0x0050, text=»* SECTIONS CONTAINING PROGRAM CODE ARE DIVIDED«, t00=0x0005, t01=0x00e4}
0x008e8…0091e Head {h00=0x0032, h01=0x0050, text=»* INTO ROUTINES. THE ROUTINES ARE LISTED AT «, t00=0x0005, t01=0x011c}
0x0091e…00956 Head {h00=0x0034, h01=0x0050, text=»* BEGINNING OF EACH SECTION. THE SECTIONS, IN «, t00=0x0005, t01=0x0152}
0x00956…00984 Head {h00=0x002a, h01=0x0050, text=»* ORDER OF APPEARANCE IN LIST, ARE: «, t00=0x0005, t01=0x018a}
0x00984…0098e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0028}
0x0098e…009a8 Head {h00=0x0016, h01=0x0050, text=»* NAME FUNCTION«, t00=0x0006, t01=0x0032}
0x009a8…009b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x004c}
0x009b2…009dc Head {h00=0x0026, h01=0x0050, text=»* ENTRIES DECLARE ENTRY POINTS «, t00=0x0006, t01=0x0056}
0x009dc…00a0e Head {h00=0x002e, h01=0x0050, text=»* EXTERNALS DECLARE EXTERNAL REFERENCES «, t00=0x0006, t01=0x0080}
0x00a0e…00a48 Head {h00=0x0036, h01=0x0050, text=»* CONDITION SET CONDITIONAL ASSEMBLY PARAMETERS «, t00=0x0006, t01=0x00b2}
0x00a48…00a72 Head {h00=0x0026, h01=0x0050, text=»* CONSTANTS SET CONSTANT VALUES «, t00=0x0006, t01=0x00ec}
0x00a72…00a8e Head {h00=0x0018, h01=0x0050, text=»* DATA DATA AREAS«, t00=0x0006, t01=0x0116}
0x00a8e…00a98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0132}
0x00a98…00acc Head {h00=0x0030, h01=0x0050, text=»* REQUEST DEVICE DRIVER REQUEST ROUTINES «, t00=0x0006, t01=0x013c}
0x00acc…00af4 Head {h00=0x0024, h01=0x0050, text=»* INTERRUPT INTERRUPT ENTRIES «, t00=0x0006, t01=0x0170}
0x00af4…00b30 Head {h00=0x0038, h01=0x0050, text=»* RECOVERY SYSTEM START, POWER FAIL AND RECOVERY «, t00=0x0007, t01=0x0008}
0x00b30…00b5a Head {h00=0x0026, h01=0x0050, text=»* DISPATCH LOCAL PLC DISPATCHER«, t00=0x0007, t01=0x0044}
0x00b5a…00b86 Head {h00=0x0028, h01=0x0050, text=»* ROUTINE COMMON SERVICE ROUTINES«, t00=0x0007, t01=0x006e}
0x00b86…00bb6 Head {h00=0x002c, h01=0x0050, text=»* SUBROUTIN COMMON SERVICE SUBROUTINES«, t00=0x0007, t01=0x009a}
0x00bb6…00be4 Head {h00=0x002a, h01=0x0050, text=»* TBUFF BUFFER HANDLING SUBROUTINES«, t00=0x0007, t01=0x00ca}
0x00be4…00bee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00f8}
0x00bee…00bfc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0102}
0x00bfc…00c06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0110}
0x00c06…00c1a Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0007, t01=0x011a}
0x00c1a…00c2e Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0007, t01=0x012e}
0x00c2e…00c42 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0007, t01=0x0142}
0x00c42…00c4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0156}
0x00c4c…00c66 Head {h00=0x0016, h01=0x0050, text=»* I/O REQUESTS «, t00=0x0007, t01=0x0160}
0x00c66…00c70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x017a}
0x00c70…00c96 Head {h00=0x0022, h01=0x0050, text=» ENTRY PLCHRI CHARACTER INPUT «, t00=0x0007, t01=0x0184}
0x00c96…00cc8 Head {h00=0x002e, h01=0x0050, text=» ENTRY PLSTBL DEFINE START OF OUTPUT BLOCK«, t00=0x0008, t01=0x001a}
0x00cc8…00cee Head {h00=0x0022, h01=0x0050, text=» ENTRY PLCHRO CHARACTER OUTPUT«, t00=0x0008, t01=0x004c}
0x00cee…00d1e Head {h00=0x002c, h01=0x0050, text=» ENTRY PLENBL DEFINE END OF OUTPUT BLOCK«, t00=0x0008, t01=0x0072}
0x00d1e…00d44 Head {h00=0x0022, h01=0x0050, text=» ENTRY PLDISP LOCAL DISPATCHER«, t00=0x0008, t01=0x00a2}
0x00d44…00d6a Head {h00=0x0022, h01=0x0050, text=» ENTRY PRCHRI CHR INP REMOTE «, t00=0x0008, t01=0x00c8}
0x00d6a…00d9a Head {h00=0x002c, h01=0x0050, text=» ENTRY PRSTBL START OUTP BLOCK, REMOTE «, t00=0x0008, t01=0x00ee}
0x00d9a…00dc2 Head {h00=0x0024, h01=0x0050, text=» ENTRY PRCHRO CHR OUTP. REMOTE «, t00=0x0008, t01=0x011e}
0x00dc2…00df0 Head {h00=0x002a, h01=0x0050, text=» ENTRY PRENBL END OUTP BLOCK, REMOTE «, t00=0x0008, t01=0x0146}
0x00df0…00e1a Head {h00=0x0026, h01=0x0050, text=» ENTRY PRDISP LOCAL DSIP. REMOTE «, t00=0x0008, t01=0x0174}
0x00e1a…00e3e Head {h00=0x0020, h01=0x0050, text=» ENTRY PLTEST TEST COMMANDS «, t00=0x0009, t01=0x000e}
0x00e3e…00e5e Head {h00=0x001c, h01=0x0050, text=» ENTRY CWTPLC CWT TABLE «, t00=0x0009, t01=0x0032}
0x00e5e…00e86 Head {h00=0x0024, h01=0x0050, text=» ENTRY GETDWT GET DWT SUBROUTINE«, t00=0x0009, t01=0x0052}
0x00e86…00eac Head {h00=0x0022, h01=0x0050, text=» ENTRY PLCLOG LOGG POINTER =11«, t00=0x0009, t01=0x007a}
0x00eac…00ed6 Head {h00=0x0026, h01=0x0050, text=» ENTRY TIMACT INACTIVITY TIMER =11«, t00=0x0009, t01=0x00a0}
0x00ed6…00f0c Head {h00=0x0032, h01=0x0050, text=» ENTRY POLRTL POLL FREQ. & NO OF RETRANSM =11 «, t00=0x0009, t01=0x00ca}
0x00f0c…00f3c Head {h00=0x002c, h01=0x0050, text=» ENTRY POLRTR POLL FR. & NO OF RETR. =11«, t00=0x0009, t01=0x0100}
0x00f3c…00f4a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0130}
0x00f4a…00f54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x013e}
0x00f54…00f5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0148}
0x00f5e…00f76 Head {h00=0x0014, h01=0x0050, text=»* INTERRUPTS «, t00=0x0009, t01=0x0152}
0x00f76…00f80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x016a}
0x00f80…00fa2 Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL01 PLC NUMBER 1«, t00=0x0009, t01=0x0174}
0x00fa2…00fc4 Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL02 PLC NUMBER 2«, t00=0x000a, t01=0x0008}
0x00fc4…00fe6 Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL03 PLC NUMBER 3«, t00=0x000a, t01=0x002a}
0x00fe6…01008 Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL04 PLC NUMBER 4«, t00=0x000a, t01=0x004c}
0x01008…01012 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x006e}
0x01012…0103c Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR01 PLC NUMBER 5,REMOTE «, t00=0x000a, t01=0x0078}
0x0103c…01066 Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR02 6,REMOTE «, t00=0x000a, t01=0x00a2}
0x01066…01090 Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR03 7,REMOTE «, t00=0x000a, t01=0x00cc}
0x01090…010ba Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR04 8,REMOTE «, t00=0x000a, t01=0x00f6}
0x010ba…010c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0120}
0x010c4…010e8 Head {h00=0x0020, h01=0x0050, text=»* RECOVERY AT TC POWER UP«, t00=0x000a, t01=0x012a}
0x010e8…010f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x014e}
0x010f2…01120 Head {h00=0x002a, h01=0x0050, text=» ENTRY PLON RECOVER ALL DEFINED PLC:S «, t00=0x000a, t01=0x0158}
0x01120…0112a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0186}
0x0112a…01138 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0190}
0x01138…01142 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x000e}
0x01142…01158 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000b, t01=0x0018}
0x01158…0116e Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x000b, t01=0x002e}
0x0116e…01184 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000b, t01=0x0044}
0x01184…0118e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x005a}
0x0118e…011a8 Head {h00=0x0016, h01=0x0050, text=»* TOSS MONITOR «, t00=0x000b, t01=0x0064}
0x011a8…011b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x007e}
0x011b2…011ca Head {h00=0x0014, h01=0x0050, text=»* ROUTINES «, t00=0x000b, t01=0x0088}
0x011ca…011ee Head {h00=0x0020, h01=0x0050, text=» EXTRN TDISP TOSS DISPATCHER«, t00=0x000b, t01=0x00a0}
0x011ee…01214 Head {h00=0x0022, h01=0x0050, text=» EXTRN QMJOB QUEUE MONITOR JOB«, t00=0x000b, t01=0x00c4}
0x01214…0123e Head {h00=0x0026, h01=0x0050, text=» EXTRN MEXIT EXIT FROM MONITOR JOB«, t00=0x000b, t01=0x00ea}
0x0123e…01266 Head {h00=0x0024, h01=0x0050, text=» EXTRN GETBLK GET MONITOR BLOCK «, t00=0x000b, t01=0x0114}
0x01266…01290 Head {h00=0x0026, h01=0x0050, text=» EXTRN FREBLK RETURN MONITOR BLOCK«, t00=0x000b, t01=0x013c}
0x01290…012bc Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 PUSH A1-A8 ON A15 STACK«, t00=0x000b, t01=0x0166}
0x012bc…012dc (12, 0, 398) Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x000c, t01=0x0004}
0x012dc…012f6 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x000c, t01=0x0024}
0x012f6…0131c Head {h00=0x0022, h01=0x0050, text=» EXTRN PFPOST POWER FAIL FLAG «, t00=0x000c, t01=0x003e}
0x0131c…0134c Head {h00=0x002c, h01=0x0050, text=» EXTRN INTSAV LATEST INTERRUPT SAVE AREA«, t00=0x000c, t01=0x0064}
0x0134c…01356 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0094}
0x01356…01360 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x009e}
0x01360…01384 Head {h00=0x0020, h01=0x0050, text=»* DRND01 SERVICE ROUTINES«, t00=0x000c, t01=0x00a8}
0x01384…0138e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00cc}
0x0138e…013bc Head {h00=0x002a, h01=0x0050, text=» EXTRN NDSAV8 SAVE A3-A5, A7-A8 IN DWT«, t00=0x000c, t01=0x00d6}
0x013bc…013ec Head {h00=0x002c, h01=0x0050, text=» EXTRN NDGET8 GET A3-A5, A7-A8 FROM DWT «, t00=0x000c, t01=0x0104}
0x013ec…01422 Head {h00=0x0032, h01=0x0050, text=» EXTRN NDREWS CALL RECOVERY FOR ALL DEV ON WS «, t00=0x000c, t01=0x0134}
0x01422…0144e Head {h00=0x0028, h01=0x0050, text=» EXTRN NDREDW CALL RECOVERY FOR DWT «, t00=0x000c, t01=0x016a}
0x0144e…01480 Head {h00=0x002e, h01=0x0050, text=» EXTRN NDGEDN GET HIGEST DWT NUMBER ON WS «, t00=0x000d, t01=0x0008}
0x01480…014a6 Head {h00=0x0022, h01=0x0050, text=» EXTRN NDGEDW GET DWT ADDRESS «, t00=0x000d, t01=0x003a}
0x014a6…014b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0060}
0x014b0…014be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x006a}
0x014be…014c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0078}
0x014c8…01500 Head {h00=0x0034, h01=0x0050, text=»* DRND01 ROUTINES FOR RETURN TO DEVICE DRIVER«, t00=0x000d, t01=0x0082}
0x01500…0150a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ba}
0x0150a…01530 Head {h00=0x0022, h01=0x0050, text=» EXTRN NDREPO POP, OK & RETURN«, t00=0x000d, t01=0x00c4}
0x01530…01552 Head {h00=0x001e, h01=0x0050, text=» EXTRN NDRETO OK & RETURN «, t00=0x000d, t01=0x00ea}
0x01552…01574 Head {h00=0x001e, h01=0x0050, text=» EXTRN NDREP POP & RETURN «, t00=0x000d, t01=0x010c}
0x01574…01590 Head {h00=0x0018, h01=0x0050, text=» EXTRN NDRET RETURN «, t00=0x000d, t01=0x012e}
0x01590…0159a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x014a}
0x0159a…015a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0154}
0x015a4…015c2 Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS«, t00=0x000d, t01=0x015e}
0x015c2…015cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x017c}
0x015cc…015f4 Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTCHP CHANNEL PARAMETERS«, t00=0x000d, t01=0x0186}
0x015f4…01616 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTST STATUS FLAGS «, t00=0x000e, t01=0x001e}
0x01616…0163e Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTOR ORDER (RIGHT BYTE) «, t00=0x000e, t01=0x0040}
0x0163e…01670 Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTADR DRIVER ADDRESS BLOCK ADDRESS«, t00=0x000e, t01=0x0068}
0x01670…01690 Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTOTQ QUEUE LINK«, t00=0x000e, t01=0x009a}
0x01690…016c4 Head {h00=0x0030, h01=0x0050, text=» EXTRN DWTCP2 SECOND CHANNEL PARAMETER WORD «, t00=0x000e, t01=0x00ba}
0x016c4…016f6 Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTLD1 PLC INPUT/OUTPUT BUFFER ADDR«, t00=0x000e, t01=0x00ee}
0x016f6…01726 Head {h00=0x002c, h01=0x0050, text=» EXTRN DWTLD2 PLC FLOW CONTROL COUNTERS «, t00=0x000e, t01=0x0120}
0x01726…0175a Head {h00=0x0030, h01=0x0050, text=» EXTRN DWTTBU PLC TEST COMMANDS BUFFER ADDR «, t00=0x000e, t01=0x0150}
0x0175a…01790 Head {h00=0x0032, h01=0x0050, text=» EXTRN DWTTLN PLC TEST COMMANDS BUFFER LENGTH «, t00=0x000e, t01=0x0184}
0x01790…017c6 Head {h00=0x0032, h01=0x0050, text=» EXTRN DWTTCW PLC TEST COMMANDS SPECIAL PARAM «, t00=0x000f, t01=0x002a}
0x017c6…017f2 Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTWAT WAIT/ACT INDICATOR =16«, t00=0x000f, t01=0x0060}
0x017f2…017fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x008c}
0x017fc…0180a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0096}
0x0180a…01814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a4}
0x01814…01834 Head {h00=0x001c, h01=0x0050, text=»* WORK STATION TABLES«, t00=0x000f, t01=0x00ae}
0x01834…0183e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ce}
0x0183e…0185a Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL1 PLC 1 «, t00=0x000f, t01=0x00d8}
0x0185a…01876 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL2 PLC 2 «, t00=0x000f, t01=0x00f4}
0x01876…01892 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL3 PLC 3 «, t00=0x000f, t01=0x0110}
0x01892…018ae Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL4 PLC 4 «, t00=0x000f, t01=0x012c}
0x018ae…018b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0148}
0x018b8…018d4 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR1 REMOTE«, t00=0x000f, t01=0x0152}
0x018d4…018f0 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR2 REMOTE«, t00=0x000f, t01=0x016e}
0x018f0…0190c Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR3 REMOTE«, t00=0x000f, t01=0x018a}
0x0190c…01928 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR4 REMOTE«, t00=0x0010, t01=0x0016}
0x01928…01932 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0032}
0x01932…0194c Head {h00=0x0016, h01=0x0050, text=»* MISCELLANEOUS«, t00=0x0010, t01=0x003c}
0x0194c…01956 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0056}
0x01956…01990 Head {h00=0x0036, h01=0x0050, text=» EXTRN INTADR INTERRUPT ADDR IN DRIVER ADDR BLOCK «, t00=0x0010, t01=0x0060}
0x01990…0199a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x009a}
0x0199a…019a8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x00a4}
0x019a8…019b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b2}
0x019b2…019d2 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0010, t01=0x00bc}
0x019d2…019f2 Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x0010, t01=0x00dc}
0x019f2…01a12 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0010, t01=0x00fc}
0x01a12…01a1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x011c}
0x01a1c…01a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0126}
0x01a26…01a60 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0010, t01=0x0130}
0x01a60…01a92 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0010, t01=0x016a}
0x01a92…01a9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x000c}
0x01a9c…01ab0 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0011, t01=0x0016}
0x01ab0…01aba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x002a}
0x01aba…01ac4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0034}
0x01ac4…01b0c Head {h00=0x0044, h01=0x0050, text=»* PLCNRL DEFINES NUMBER OF LOCAL PLC:S ACTUALLY CONNECTED (0-4) «, t00=0x0011, t01=0x003e}
0x01b0c…01b16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0086}
0x01b16…01b28 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x0011, t01=0x0090}
0x01b28…01b3e Head {h00=0x0012, h01=0x0050, text=»PLCNRL EQU X:A«, t00=0x0011, t01=0x00a2}
0x01b3e…01b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b8}
0x01b48…01b90 Head {h00=0x0044, h01=0x0050, text=»* PLCNRR DEFINES THE NUMBER OF REMOTE PLC:S ACTUALLY CONN. (0-4)«, t00=0x0011, t01=0x00c2}
0x01b90…01b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x010a}
0x01b9a…01bac Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0011, t01=0x0114}
0x01bac…01bc0 Head {h00=0x0010, h01=0x0050, text=»PLCNRR EQU 1«, t00=0x0011, t01=0x0126}
0x01bc0…01bca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x013a}
0x01bca…01bd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0144}
0x01bd4…01be2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x014e}
0x01be2…01bec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x015c}
0x01bec…01c02 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0011, t01=0x0166}
0x01c02…01c18 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0011, t01=0x017c}
0x01c18…01c2e (18, 0, 400) Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0012, t01=0x0004}
0x01c2e…01c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x001a}
0x01c38…01c60 Head {h00=0x0024, h01=0x0050, text=»* SYSTEM PARAMETER DEFINITION«, t00=0x0012, t01=0x0024}
0x01c60…01c6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x004c}
0x01c6a…01c9a Head {h00=0x002c, h01=0x0050, text=»* LEVEL 3 FLOW CONTROL WINDOW SIZE (1-7)«, t00=0x0012, t01=0x0056}
0x01c9a…01cae Head {h00=0x0010, h01=0x0050, text=»WINDOW EQU 2«, t00=0x0012, t01=0x0086}
0x01cae…01cb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x009a}
0x01cb8…01cf0 Head {h00=0x0034, h01=0x0050, text=»* MAXIMAL NUMBER OF WORK STATIONS PER PLC (1-32)«, t00=0x0012, t01=0x00a4}
0x01cf0…01d04 Head {h00=0x0010, h01=0x0050, text=»MAXWS EQU 32«, t00=0x0012, t01=0x00dc}
0x01d04…01d0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00f0}
0x01d0e…01d50 Head {h00=0x003e, h01=0x0050, text=»* DELAY BEFORE EXECUTING "TEST CU" AT RESTART. (IN 100 MS)«, t00=0x0012, t01=0x00fa}
0x01d50…01d72 Head {h00=0x001e, h01=0x0050, text=»STADLY EQU 100 10 SECONDS «, t00=0x0012, t01=0x013c}
0x01d72…01d7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x015e}
0x01d7c…01dc2 Head {h00=0x0042, h01=0x0050, text=»* LENGTH OF USER PART OF SHORT OUTPUT BUFFER IN WORDS (1-128) «, t00=0x0012, t01=0x0168}
0x01dc2…01dd6 Head {h00=0x0010, h01=0x0050, text=»SOBUFU EQU 3«, t00=0x0013, t01=0x001e}
0x01dd6…01de0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0032}
0x01de0…01e26 Head {h00=0x0042, h01=0x0050, text=»* LENGTH OF USER PART OF GENERAL READ BUFFER IN WORDS (1-128) «, t00=0x0013, t01=0x003c}
0x01e26…01e3c Head {h00=0x0012, h01=0x0050, text=»GRBUFU EQU 70 «, t00=0x0013, t01=0x0082}
0x01e3c…01e46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0098}
0x01e46…01e72 Head {h00=0x0028, h01=0x0050, text=»* INACTIVITY TIMER (MINUTES) «, t00=0x0013, t01=0x00a2}
0x01e72…01e8c Head {h00=0x0016, h01=0x0050, text=»TIMACT EQU 3 U =8 «, t00=0x0013, t01=0x00ce}
0x01e8c…01e96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00e8}
0x01e96…01ee4 Head {h00=0x004a, h01=0x0050, text=»* POLLING FREQUENCY (L BYTE) & NUMBER OF RETRANSMISSIONS (R BYTE) =11 «, t00=0x0013, t01=0x00f2}
0x01ee4…01f06 Head {h00=0x001e, h01=0x0050, text=»POLRTL EQU /1805 LOCAL =11«, t00=0x0013, t01=0x0140}
0x01f06…01f2a Head {h00=0x0020, h01=0x0050, text=»POLRTR EQU /0D05 REMOTE =11 «, t00=0x0013, t01=0x0162}
0x01f2a…01f34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0186}
0x01f34…01f74 Head {h00=0x003c, h01=0x0050, text=»* IF PLCTST IS 1 THE PLC DIAGNOSTIC COMMANDS ARE HANDLED«, t00=0x0013, t01=0x0190}
0x01f74…01f8e Head {h00=0x0016, h01=0x0050, text=»* BY THIS DRIVER. «, t00=0x0014, t01=0x0040}
0x01f8e…01f98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x005a}
0x01f98…01fac Head {h00=0x0010, h01=0x0050, text=»PLCTST EQU 0«, t00=0x0014, t01=0x0064}
0x01fac…01fb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0078}
0x01fb6…01fc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0082}
0x01fc0…02008 Head {h00=0x0044, h01=0x0050, text=»* A TEST VERSION OF THE DRIVER IS OBTAINED BY SETTING UTTEST><0 «, t00=0x0014, t01=0x008c}
0x02008…0204c Head {h00=0x0040, h01=0x0050, text=»* IF UTTEST=1 THE TEST CODE IS INCLUDUD BUT TRAP IS NOT USED«, t00=0x0014, t01=0x00d4}
0x0204c…0208c Head {h00=0x003c, h01=0x0050, text=»* IF UTTEST=2 THE TEST CODE IS INCLUDED AND TRAP IS USED«, t00=0x0014, t01=0x0118}
0x0208c…02096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0158}
0x02096…020aa Head {h00=0x0010, h01=0x0050, text=»UTTEST EQU 0«, t00=0x0014, t01=0x0162}
0x020aa…020b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0176}
0x020b4…020be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0180}
0x020be…020f8 Head {h00=0x0036, h01=0x0050, text=»* LOBUFN IS THE NUMBER OF LONG OUTPUT BUFFERS USED«, t00=0x0014, t01=0x018a}
0x020f8…02116 Head {h00=0x001a, h01=0x0050, text=»* FOR EACH PLC (1-32) «, t00=0x0015, t01=0x0034}
0x02116…02120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0052}
0x02120…02134 Head {h00=0x0010, h01=0x0050, text=»LOBUFN EQU 3«, t00=0x0015, t01=0x005c}
0x02134…0213e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0070}
0x0213e…02148 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x007a}
0x02148…02182 Head {h00=0x0036, h01=0x0050, text=»* LOBUFU IS THE LENGTH OF THE USER PART OF A LONG «, t00=0x0015, t01=0x0084}
0x02182…021aa Head {h00=0x0024, h01=0x0050, text=»* OUTPUT BUFFER IN WORDS (1-128)«, t00=0x0015, t01=0x00be}
0x021aa…021b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00e6}
0x021b4…021d4 Head {h00=0x001c, h01=0x0050, text=»LOBUFU EQU 128 U =6,=16 «, t00=0x0015, t01=0x00f0}
0x021d4…021de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0110}
0x021de…021ec Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x011a}
0x021ec…021f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0128}
0x021f6…0221c Head {h00=0x0022, h01=0x0050, text=»* HARDWARE INTERRUPT LEVELS«, t00=0x0015, t01=0x0132}
0x0221c…02250 Head {h00=0x0030, h01=0x0050, text=»* THESE LEVELS MUST CORRESPOND TO INTERRUPT «, t00=0x0015, t01=0x0158}
0x02250…0226a Head {h00=0x0016, h01=0x0050, text=»* VECTOR IN SYSTAB«, t00=0x0015, t01=0x018c}
0x0226a…02274 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0016}
0x02274…02296 Head {h00=0x001e, h01=0x0050, text=»INTLV0 EQU 26 PLC NUMBER 1«, t00=0x0016, t01=0x0020}
0x02296…022b8 Head {h00=0x001e, h01=0x0050, text=»INTLV1 EQU 27 PLC NUMBER 2«, t00=0x0016, t01=0x0042}
0x022b8…022da Head {h00=0x001e, h01=0x0050, text=»INTLV2 EQU 24 PLC NUMBER 3«, t00=0x0016, t01=0x0064}
0x022da…022fc Head {h00=0x001e, h01=0x0050, text=»INTLV3 EQU 25 PLC NUMBER 4«, t00=0x0016, t01=0x0086}
0x022fc…02326 Head {h00=0x0026, h01=0x0050, text=»INTRV0 EQU 18 PLC NUMBER 5, REMOTE«, t00=0x0016, t01=0x00a8}
0x02326…02350 Head {h00=0x0026, h01=0x0050, text=»INTRV1 EQU 19 6, REMOTE«, t00=0x0016, t01=0x00d2}
0x02350…0237a Head {h00=0x0026, h01=0x0050, text=»INTRV2 EQU 20 7, REMOTE«, t00=0x0016, t01=0x00fc}
0x0237a…023a4 Head {h00=0x0026, h01=0x0050, text=»INTRV3 EQU 21 8, REMOTE«, t00=0x0016, t01=0x0126}
0x023a4…023ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0150}
0x023ae…023d8 Head {h00=0x0026, h01=0x0050, text=»* CHANNEL UNIT DEVICE ADDRESSES«, t00=0x0016, t01=0x015a}
0x023d8…023e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0184}
0x023e2…023fe Head {h00=0x0018, h01=0x0050, text=»PLCDA0 EQU /06 PLC 1«, t00=0x0016, t01=0x018e}
0x023fe…0241a Head {h00=0x0018, h01=0x0050, text=»PLCDA1 EQU /07 PLC 2«, t00=0x0017, t01=0x001a}
0x0241a…02436 Head {h00=0x0018, h01=0x0050, text=»PLCDA2 EQU /26 PLC 3«, t00=0x0017, t01=0x0036}
0x02436…02452 Head {h00=0x0018, h01=0x0050, text=»PLCDA3 EQU /27 PLC 4«, t00=0x0017, t01=0x0052}
0x02452…0246e Head {h00=0x0018, h01=0x0050, text=»PLCDA4 EQU /3A PLC 5«, t00=0x0017, t01=0x006e}
0x0246e…0248a Head {h00=0x0018, h01=0x0050, text=»PLCDA5 EQU /3B PLC 6«, t00=0x0017, t01=0x008a}
0x0248a…024a6 Head {h00=0x0018, h01=0x0050, text=»PLCDA6 EQU /2A PLC 7«, t00=0x0017, t01=0x00a6}
0x024a6…024c2 Head {h00=0x0018, h01=0x0050, text=»PLCDA7 EQU /2B PLC 8«, t00=0x0017, t01=0x00c2}
0x024c2…024cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00de}
0x024cc…024da Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x00e8}
0x024da…024e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00f6}
0x024e4…02512 Head {h00=0x002a, h01=0x0050, text=»* BUFFER AREA PARAMETER DEFINITION «, t00=0x0017, t01=0x0100}
0x02512…0251c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x012e}
0x0251c…0254e Head {h00=0x002e, h01=0x0050, text=»HEADLW EQU 4 BUFFER HEADER LENGTH (WORDS) «, t00=0x0017, t01=0x0138}
0x0254e…02584 Head {h00=0x0032, h01=0x0050, text=»FLOWLW EQU 2 FLOW CONTROL FIELD LENGTH (WORDS)«, t00=0x0017, t01=0x016a}
0x02584…025ba Head {h00=0x0032, h01=0x0050, text=»SYSTLW EQU HEADLW+FLOWLW SYSTEM PART OF BUFFER«, t00=0x0018, t01=0x0010}
0x025ba…025c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0046}
0x025c4…025e6 Head {h00=0x001e, h01=0x0050, text=»* LONG OUTPUT BUFFERS«, t00=0x0018, t01=0x0050}
0x025e6…02624 Head {h00=0x003a, h01=0x0050, text=»LOBUF1 EQU SYSTLW+LOBUFU LENGTH OF ONE BUFFER (WORDS) «, t00=0x0018, t01=0x0072}
0x02624…0264e Head {h00=0x0026, h01=0x0050, text=»LOBUF2 EQU LOBUF1+LOBUF1 2 BUFFERS«, t00=0x0018, t01=0x00b0}
0x0264e…0266e Head {h00=0x001c, h01=0x0050, text=»LOBUF3 EQU LOBUF2+LOBUF1«, t00=0x0018, t01=0x00da}
0x0266e…0268e Head {h00=0x001c, h01=0x0050, text=»LOBUF4 EQU LOBUF3+LOBUF1«, t00=0x0018, t01=0x00fa}
0x0268e…026ae Head {h00=0x001c, h01=0x0050, text=»LOBUF5 EQU LOBUF4+LOBUF1«, t00=0x0018, t01=0x011a}
0x026ae…026ce Head {h00=0x001c, h01=0x0050, text=»LOBUF6 EQU LOBUF5+LOBUF1«, t00=0x0018, t01=0x013a}
0x026ce…026f4 Head {h00=0x0022, h01=0x0050, text=»LOBUF7 EQU LOBUF6+LOBUF1 . =17«, t00=0x0018, t01=0x015a}
0x026f4…0271a Head {h00=0x0022, h01=0x0050, text=»LOBUF8 EQU LOBUF7+LOBUF1 . =17«, t00=0x0018, t01=0x0180}
0x0271a…02740 Head {h00=0x0022, h01=0x0050, text=»LOBUF9 EQU LOBUF8+LOBUF1 . =17«, t00=0x0019, t01=0x0016}
0x02740…02766 Head {h00=0x0022, h01=0x0050, text=»LOBU10 EQU LOBUF9+LOBUF1 . =17«, t00=0x0019, t01=0x003c}
0x02766…0278c Head {h00=0x0022, h01=0x0050, text=»LOBU11 EQU LOBU10+LOBUF1 . =17«, t00=0x0019, t01=0x0062}
0x0278c…027b2 Head {h00=0x0022, h01=0x0050, text=»LOBU12 EQU LOBU11+LOBUF1 . =17«, t00=0x0019, t01=0x0088}
0x027b2…027d8 Head {h00=0x0022, h01=0x0050, text=»LOBU13 EQU LOBU12+LOBUF1 . =17«, t00=0x0019, t01=0x00ae}
0x027d8…027fe Head {h00=0x0022, h01=0x0050, text=»LOBU14 EQU LOBU13+LOBUF1 . =17«, t00=0x0019, t01=0x00d4}
0x027fe…02824 Head {h00=0x0022, h01=0x0050, text=»LOBU15 EQU LOBU14+LOBUF1 . =17«, t00=0x0019, t01=0x00fa}
0x02824…0284a Head {h00=0x0022, h01=0x0050, text=»LOBU16 EQU LOBU15+LOBUF1 . =17«, t00=0x0019, t01=0x0120}
0x0284a…02870 Head {h00=0x0022, h01=0x0050, text=»LOBU17 EQU LOBU16+LOBUF1 . =17«, t00=0x0019, t01=0x0146}
0x02870…02896 Head {h00=0x0022, h01=0x0050, text=»LOBU18 EQU LOBU17+LOBUF1 , =17«, t00=0x0019, t01=0x016c}
0x02896…028bc (26, 0, 400) Head {h00=0x0022, h01=0x0050, text=»LOBU19 EQU LOBU18+LOBUF1 . =17«, t00=0x001a, t01=0x0004}
0x028bc…028e2 Head {h00=0x0022, h01=0x0050, text=»LOBU20 EQU LOBU19+LOBUF1 . =17«, t00=0x001a, t01=0x002a}
0x028e2…02908 Head {h00=0x0022, h01=0x0050, text=»LOBU21 EQU LOBU20+LOBUF1 . =17«, t00=0x001a, t01=0x0050}
0x02908…0292e Head {h00=0x0022, h01=0x0050, text=»LOBU22 EQU LOBU21+LOBUF1 . =17«, t00=0x001a, t01=0x0076}
0x0292e…02954 Head {h00=0x0022, h01=0x0050, text=»LOBU23 EQU LOBU22+LOBUF1 . =17«, t00=0x001a, t01=0x009c}
0x02954…0297a Head {h00=0x0022, h01=0x0050, text=»LOBU24 EQU LOBU23+LOBUF1 . =17«, t00=0x001a, t01=0x00c2}
0x0297a…029a0 Head {h00=0x0022, h01=0x0050, text=»LOBU25 EQU LOBU24+LOBUF1 . =17«, t00=0x001a, t01=0x00e8}
0x029a0…029c6 Head {h00=0x0022, h01=0x0050, text=»LOBU26 EQU LOBU25+LOBUF1 . =17«, t00=0x001a, t01=0x010e}
0x029c6…029ec Head {h00=0x0022, h01=0x0050, text=»LOBU27 EQU LOBU26+LOBUF1 . =17«, t00=0x001a, t01=0x0134}
0x029ec…02a12 Head {h00=0x0022, h01=0x0050, text=»LOBU28 EQU LOBU27+LOBUF1 . =17«, t00=0x001a, t01=0x015a}
0x02a12…02a38 Head {h00=0x0022, h01=0x0050, text=»LOBU29 EQU LOBU28+LOBUF1 . =17«, t00=0x001a, t01=0x0180}
0x02a38…02a5e Head {h00=0x0022, h01=0x0050, text=»LOBU30 EQU LOBU29+LOBUF1 . =17«, t00=0x001b, t01=0x0016}
0x02a5e…02a84 Head {h00=0x0022, h01=0x0050, text=»LOBU31 EQU LOBU30+LOBUF1 . =17«, t00=0x001b, t01=0x003c}
0x02a84…02aaa Head {h00=0x0022, h01=0x0050, text=»LOBU32 EQU LOBU31+LOBUF1 . =17«, t00=0x001b, t01=0x0062}
0x02aaa…02ac0 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=1 «, t00=0x001b, t01=0x0088}
0x02ac0…02af8 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF1 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001b, t01=0x009e}
0x02af8…02b04 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00d6}
0x02b04…02b1a Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=2 «, t00=0x001b, t01=0x00e2}
0x02b1a…02b52 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF2 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001b, t01=0x00f8}
0x02b52…02b5e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0130}
0x02b5e…02b74 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=3 «, t00=0x001b, t01=0x013c}
0x02b74…02bac Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF3 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001b, t01=0x0152}
0x02bac…02bb8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x018a}
0x02bb8…02bce Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=4 «, t00=0x001c, t01=0x0008}
0x02bce…02c06 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF4 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001c, t01=0x001e}
0x02c06…02c12 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0056}
0x02c12…02c28 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=5 «, t00=0x001c, t01=0x0062}
0x02c28…02c60 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF5 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001c, t01=0x0078}
0x02c60…02c6c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00b0}
0x02c6c…02c82 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=6 «, t00=0x001c, t01=0x00bc}
0x02c82…02cba Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF6 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001c, t01=0x00d2}
0x02cba…02cc6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x010a}
0x02cc6…02ce2 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=7 . =17 «, t00=0x001c, t01=0x0116}
0x02ce2…02d02 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBUF7 . =17 «, t00=0x001c, t01=0x0132}
0x02d02…02d0e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0152}
0x02d0e…02d2a Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=8 . =17 «, t00=0x001c, t01=0x015e}
0x02d2a…02d4a Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBUF8 . =17 «, t00=0x001c, t01=0x017a}
0x02d4a…02d56 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x000a}
0x02d56…02d72 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=9 . =17 «, t00=0x001d, t01=0x0016}
0x02d72…02d92 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBUF9 . =17 «, t00=0x001d, t01=0x0032}
0x02d92…02d9e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0052}
0x02d9e…02dba Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=10 . =17«, t00=0x001d, t01=0x005e}
0x02dba…02dda Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU10 . =17 «, t00=0x001d, t01=0x007a}
0x02dda…02de6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x009a}
0x02de6…02e02 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=11 . =17«, t00=0x001d, t01=0x00a6}
0x02e02…02e22 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU11 . =17 «, t00=0x001d, t01=0x00c2}
0x02e22…02e2e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00e2}
0x02e2e…02e4a Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=12 . =17«, t00=0x001d, t01=0x00ee}
0x02e4a…02e6a Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU12 . =17 «, t00=0x001d, t01=0x010a}
0x02e6a…02e76 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x012a}
0x02e76…02e92 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=13 . =17«, t00=0x001d, t01=0x0136}
0x02e92…02eb2 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU13 . =17 «, t00=0x001d, t01=0x0152}
0x02eb2…02ebe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0172}
0x02ebe…02eda Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=14 . =17«, t00=0x001d, t01=0x017e}
0x02eda…02efa Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU14 . =17 «, t00=0x001e, t01=0x000a}
0x02efa…02f06 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x002a}
0x02f06…02f22 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=15 . =17«, t00=0x001e, t01=0x0036}
0x02f22…02f42 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU15 . =17 «, t00=0x001e, t01=0x0052}
0x02f42…02f4e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0072}
0x02f4e…02f6a Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=16 . =17«, t00=0x001e, t01=0x007e}
0x02f6a…02f8a Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU16 . =17 «, t00=0x001e, t01=0x009a}
0x02f8a…02f96 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00ba}
0x02f96…02fb2 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=17 . =17«, t00=0x001e, t01=0x00c6}
0x02fb2…02fd2 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU17 . =17 «, t00=0x001e, t01=0x00e2}
0x02fd2…02fde Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0102}
0x02fde…02ffa Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=18 . =17«, t00=0x001e, t01=0x010e}
0x02ffa…0301a Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU18 . =17 «, t00=0x001e, t01=0x012a}
0x0301a…03026 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x014a}
0x03026…03042 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=19 . =17«, t00=0x001e, t01=0x0156}
0x03042…03062 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU19 . =17 «, t00=0x001e, t01=0x0172}
0x03062…0306e (31, 0, 398) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0004}
0x0306e…0308a Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=20 . =17«, t00=0x001f, t01=0x0010}
0x0308a…030aa Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU20 . =17 «, t00=0x001f, t01=0x002c}
0x030aa…030b6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x004c}
0x030b6…030d2 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=21 . =17«, t00=0x001f, t01=0x0058}
0x030d2…030f2 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU21 . =17 «, t00=0x001f, t01=0x0074}
0x030f2…030fe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0094}
0x030fe…0311a Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=22 . =17«, t00=0x001f, t01=0x00a0}
0x0311a…0313a Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU22 . =17 «, t00=0x001f, t01=0x00bc}
0x0313a…03146 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x00dc}
0x03146…03160 Head {h00=0x0016, h01=0x0050, text=» IFT LOBUFN=23 .17«, t00=0x001f, t01=0x00e8}
0x03160…03180 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU23 . =17 «, t00=0x001f, t01=0x0102}
0x03180…0318c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0122}
0x0318c…031a8 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=24 . =17«, t00=0x001f, t01=0x012e}
0x031a8…031c8 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU24 . =17 «, t00=0x001f, t01=0x014a}
0x031c8…031d4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x016a}
0x031d4…031f0 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=25 . =17«, t00=0x001f, t01=0x0176}
0x031f0…03210 (32, 0, 400) Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU25 . =17 «, t00=0x0020, t01=0x0004}
0x03210…0321c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0024}
0x0321c…03238 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=26 . =17«, t00=0x0020, t01=0x0030}
0x03238…03258 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU26 . =17 «, t00=0x0020, t01=0x004c}
0x03258…03264 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x006c}
0x03264…03280 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=27 . =17«, t00=0x0020, t01=0x0078}
0x03280…032a0 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU27 . =17 «, t00=0x0020, t01=0x0094}
0x032a0…032ac Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00b4}
0x032ac…032c8 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=28 . =17«, t00=0x0020, t01=0x00c0}
0x032c8…032e8 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU28 . =17 «, t00=0x0020, t01=0x00dc}
0x032e8…032f4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00fc}
0x032f4…03310 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=29 . =17«, t00=0x0020, t01=0x0108}
0x03310…03330 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU29 . =17 «, t00=0x0020, t01=0x0124}
0x03330…0333c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0144}
0x0333c…03358 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=30 . =17«, t00=0x0020, t01=0x0150}
0x03358…03378 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU30 . =17 «, t00=0x0020, t01=0x016c}
0x03378…03384 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x018c}
0x03384…033a0 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=31 . =17«, t00=0x0021, t01=0x0008}
0x033a0…033c0 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU31 . =17 «, t00=0x0021, t01=0x0024}
0x033c0…033cc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0044}
0x033cc…033e8 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=32 . =17«, t00=0x0021, t01=0x0050}
0x033e8…03408 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU32 . =17 «, t00=0x0021, t01=0x006c}
0x03408…03414 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x008c}
0x03414…0341e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0098}
0x0341e…0342c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x00a2}
0x0342c…03436 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00b0}
0x03436…0345a Head {h00=0x0020, h01=0x0050, text=»* SHORT OUTPUT BUFFERS «, t00=0x0021, t01=0x00ba}
0x0345a…03498 Head {h00=0x003a, h01=0x0050, text=»SOBUF1 EQU SYSTLW+SOBUFU LENGTH OF ONE BUFFER (WORDS) «, t00=0x0021, t01=0x00de}
0x03498…034c2 Head {h00=0x0026, h01=0x0050, text=»SOBUF2 EQU SOBUF1+SOBUF1 2 BUFFERS«, t00=0x0021, t01=0x011c}
0x034c2…034e2 Head {h00=0x001c, h01=0x0050, text=»SOBUF4 EQU SOBUF2+SOBUF2«, t00=0x0021, t01=0x0146}
0x034e2…03502 Head {h00=0x001c, h01=0x0050, text=»SOBUF8 EQU SOBUF4+SOBUF4«, t00=0x0021, t01=0x0166}
0x03502…0353a Head {h00=0x0034, h01=0x0050, text=»SOBUFS EQU SOBUF8 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0021, t01=0x0186}
0x0353a…03544 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x002e}
0x03544…03568 Head {h00=0x0020, h01=0x0050, text=»* GENERAL READ BUFFERS «, t00=0x0022, t01=0x0038}
0x03568…035a6 Head {h00=0x003a, h01=0x0050, text=»GRBUF1 EQU SYSTLW+GRBUFU LENGTH OF ONE BUFFER (WORDS) «, t00=0x0022, t01=0x005c}
0x035a6…035c6 Head {h00=0x001c, h01=0x0050, text=»GRBUF2 EQU GRBUF1+GRBUF1«, t00=0x0022, t01=0x009a}
0x035c6…035fe Head {h00=0x0034, h01=0x0050, text=»GRBUFS EQU GRBUF2 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0022, t01=0x00ba}
0x035fe…03608 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00f2}
0x03608…0363e Head {h00=0x0032, h01=0x0050, text=»* LENGTHS OF USER PART OF BUFFERS (BYTES)«, t00=0x0022, t01=0x00fc}
0x0363e…03674 Head {h00=0x0032, h01=0x0050, text=»SOBUFL EQU SOBUFU+SOBUFU SHORT OUTPUT BUFFERS «, t00=0x0022, t01=0x0132}
0x03674…036a8 Head {h00=0x0030, h01=0x0050, text=»LOBUFL EQU LOBUFU+LOBUFU LONG OUTPUT BUFFERS«, t00=0x0022, t01=0x0168}
0x036a8…036de Head {h00=0x0032, h01=0x0050, text=»GRBUFL EQU GRBUFU+GRBUFU GENERAL READ BUFFERS «, t00=0x0023, t01=0x000c}
0x036de…036e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0042}
0x036e8…036f6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x004c}
0x036f6…03700 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x005a}
0x03700…03734 Head {h00=0x0030, h01=0x0050, text=»* CONTROLLER COMMAND RECORD (CCR) LAYOUT «, t00=0x0023, t01=0x0064}
0x03734…0373e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0098}
0x0373e…0376a Head {h00=0x0028, h01=0x0050, text=»CCRDLS EQU 0 DATA LINK STATION INDEX«, t00=0x0023, t01=0x00a2}
0x0376a…0378c Head {h00=0x001e, h01=0x0050, text=»CCRCMD EQU 1 COMMAND CODE «, t00=0x0023, t01=0x00ce}
0x0378c…037b2 Head {h00=0x0022, h01=0x0050, text=»CCRSU1 EQU 2 SUBCOMMAND BYTE 1«, t00=0x0023, t01=0x00f0}
0x037b2…037d8 Head {h00=0x0022, h01=0x0050, text=»CCRSU2 EQU 3 SUBCOMMAND BYTE 2«, t00=0x0023, t01=0x0116}
0x037d8…037fc Head {h00=0x0020, h01=0x0050, text=»CCRSUB EQU 2 SUBCOMMAND WORD«, t00=0x0023, t01=0x013c}
0x037fc…0381c Head {h00=0x001c, h01=0x0050, text=»CCRSTA EQU 4 STATUS WORD«, t00=0x0023, t01=0x0160}
0x0381c…03846 Head {h00=0x0026, h01=0x0050, text=»CCRIDB EQU 7 IDENTITY, BYTE FIELD «, t00=0x0023, t01=0x0180}
0x03846…03870 Head {h00=0x0026, h01=0x0050, text=»CCRIDW EQU 8 IDENTITY, WORD FIELD «, t00=0x0024, t01=0x001a}
0x03870…0389c Head {h00=0x0028, h01=0x0050, text=»CCRLEN EQU 10 BUFFER LENGTH (BYTES) «, t00=0x0024, t01=0x0044}
0x0389c…038d6 Head {h00=0x0036, h01=0x0050, text=»CCRC1B EQU 12 DATA CHAINING CTRL & MSB BUFFER ADDR«, t00=0x0024, t01=0x0070}
0x038d6…038fa Head {h00=0x0020, h01=0x0050, text=»CCRBUF EQU 14 BUFFER ADDRESS«, t00=0x0024, t01=0x00aa}
0x038fa…03904 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00ce}
0x03904…0390e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00d8}
0x0390e…03928 Head {h00=0x0016, h01=0x0050, text=»* BUFFER LAYOUT«, t00=0x0024, t01=0x00e2}
0x03928…03932 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00fc}
0x03932…0394e Head {h00=0x0018, h01=0x0050, text=»* HEADER LENGTH«, t00=0x0024, t01=0x0106}
0x0394e…0397e Head {h00=0x002c, h01=0x0050, text=»BUFHLN EQU HEADLW+HEADLW LENGTH (BYTES) «, t00=0x0024, t01=0x0122}
0x0397e…0399a Head {h00=0x0018, h01=0x0050, text=»* HEADER LAYOUT«, t00=0x0024, t01=0x0152}
0x0399a…039be Head {h00=0x0020, h01=0x0050, text=»BUFLNK EQU -8 FREE LIST LINK«, t00=0x0024, t01=0x016e}
0x039be…039e0 (37, 0, 400) Head {h00=0x001e, h01=0x0050, text=»BUFDWT EQU -6 DWT ADDRESS «, t00=0x0025, t01=0x0004}
0x039e0…03a0e Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU -4 LENGTH OF TEXT IN BUFFER«, t00=0x0025, t01=0x0026}
0x03a0e…03a2e Head {h00=0x001c, h01=0x0050, text=»BUFBIX EQU -2 BYTE INDEX«, t00=0x0025, t01=0x0054}
0x03a2e…03a56 Head {h00=0x0024, h01=0x0050, text=»* X25 CONTROL FIELD LAYOUT «, t00=0x0025, t01=0x0074}
0x03a56…03a88 Head {h00=0x002e, h01=0x0050, text=»X25LGN EQU 0 LOGICAL CHANNEL GROUP NUMBER «, t00=0x0025, t01=0x009c}
0x03a88…03ab4 Head {h00=0x0028, h01=0x0050, text=»X25LCN EQU 1 LOGICAL CHANNEL NUMBER «, t00=0x0025, t01=0x00ce}
0x03ab4…03ae2 Head {h00=0x002a, h01=0x0050, text=»X25FLW EQU 2 FLOW CONTROL INFORMATION «, t00=0x0025, t01=0x00fa}
0x03ae2…03b0a Head {h00=0x0024, h01=0x0050, text=»X25DAT EQU 3 START OF USER DATA «, t00=0x0025, t01=0x0128}
0x03b0a…03b14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0150}
0x03b14…03b22 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x015a}
0x03b22…03b2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0168}
0x03b2c…03b4a Head {h00=0x001a, h01=0x0050, text=»* PLC COMMAND CODES«, t00=0x0025, t01=0x0172}
0x03b4a…03b54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0190}
0x03b54…03b7c Head {h00=0x0024, h01=0x0050, text=»CMDTC EQU /80 TEST CHANNEL UNIT «, t00=0x0026, t01=0x000a}
0x03b7c…03b9c Head {h00=0x001c, h01=0x0050, text=»CMDOP EQU /86 OPEN LINE «, t00=0x0026, t01=0x0032}
0x03b9c…03bba Head {h00=0x001a, h01=0x0050, text=»CMDOD EQU /85 OPEN DLS«, t00=0x0026, t01=0x0052}
0x03bba…03be4 Head {h00=0x0026, h01=0x0050, text=»CMDPS EQU /84 GET LINE STATISTICS «, t00=0x0026, t01=0x0070}
0x03be4…03c0c Head {h00=0x0024, h01=0x0050, text=»CMDDS EQU /83 GET DLS STATISTICS«, t00=0x0026, t01=0x009a}
0x03c0c…03c34 Head {h00=0x0024, h01=0x0050, text=»CMDRM EQU /87 READ LOCAL MEMORY «, t00=0x0026, t01=0x00c2}
0x03c34…03c58 Head {h00=0x0020, h01=0x0050, text=»CMDSW EQU /40 STANDARD WRITE«, t00=0x0026, t01=0x00ea}
0x03c58…03c78 Head {h00=0x001c, h01=0x0050, text=»CMDFW EQU /41 FAST WRITE«, t00=0x0026, t01=0x010e}
0x03c78…03c9a Head {h00=0x001e, h01=0x0050, text=»CMDGR EQU /20 GENERAL READ«, t00=0x0026, t01=0x012e}
0x03c9a…03ca4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0150}
0x03ca4…03cae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x015a}
0x03cae…03cda Head {h00=0x0028, h01=0x0050, text=»* APPLICATION TEST COMMAND CODES «, t00=0x0026, t01=0x0164}
0x03cda…03ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0190}
0x03ce4…03d0c Head {h00=0x0024, h01=0x0050, text=»ORDPS EQU 1 GET LINE STATISTICS «, t00=0x0027, t01=0x000a}
0x03d0c…03d32 Head {h00=0x0022, h01=0x0050, text=»ORDDS EQU 2 GER DLS STATISTICS«, t00=0x0027, t01=0x0032}
0x03d32…03d58 Head {h00=0x0022, h01=0x0050, text=»ORDRM EQU 3 READ LOCAL MEMORY «, t00=0x0027, t01=0x0058}
0x03d58…03d62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x007e}
0x03d62…03d6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0088}
0x03d6c…03d86 Head {h00=0x0016, h01=0x0050, text=»* MESSAGE TYPES«, t00=0x0027, t01=0x0092}
0x03d86…03d90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00ac}
0x03d90…03dba Head {h00=0x0026, h01=0x0050, text=»TYERR EQU 0 ILLEGAL TYPE OR ERROR «, t00=0x0027, t01=0x00b6}
0x03dba…03df0 Head {h00=0x0032, h01=0x0050, text=»TYNFLO EQU 2 DATA PACKET WITH NO FLOW CONTROL «, t00=0x0027, t01=0x00e0}
0x03df0…03e1a Head {h00=0x0026, h01=0x0050, text=»TYSTAT EQU 4 DEVICE STATUS MESSAGE«, t00=0x0027, t01=0x0116}
0x03e1a…03e42 Head {h00=0x0024, h01=0x0050, text=»TYDATA EQU 6 NORMAL DATA PACKET «, t00=0x0027, t01=0x0140}
0x03e42…03e6a Head {h00=0x0024, h01=0x0050, text=»TYRR EQU 8 RECIEVE READY PACKET «, t00=0x0027, t01=0x0168}
0x03e6a…03e8c Head {h00=0x001e, h01=0x0050, text=»TYRES EQU 10 RESET PACKET «, t00=0x0027, t01=0x0190}
0x03e8c…03ebc Head {h00=0x002c, h01=0x0050, text=»TYRESC EQU 12 RESET CONFIRMATION PACKET «, t00=0x0028, t01=0x0022}
0x03ebc…03ec6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0052}
0x03ec6…03ed4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x005c}
0x03ed4…03ede Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x006a}
0x03ede…03f04 Head {h00=0x0022, h01=0x0050, text=»* DWT STATUS FLAGS (DWTST) «, t00=0x0028, t01=0x0074}
0x03f04…03f0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x009a}
0x03f0e…03f36 Head {h00=0x0024, h01=0x0050, text=»DWFBSY EQU /8000 DEVICE NOT BUSY«, t00=0x0028, t01=0x00a4}
0x03f36…03f58 Head {h00=0x001e, h01=0x0050, text=»DWFECH EQU /2000 ECHO MODE«, t00=0x0028, t01=0x00cc}
0x03f58…03f80 Head {h00=0x0024, h01=0x0050, text=»DWFINP EQU /0020 INPUT REQUESTED«, t00=0x0028, t01=0x00ee}
0x03f80…03fae Head {h00=0x002a, h01=0x0050, text=»DWFRES EQU /0008 RESET SEQUENCE ACTIVE«, t00=0x0028, t01=0x0116}
0x03fae…03fde Head {h00=0x002c, h01=0x0050, text=»DWFAK3 EQU /0004 WAITING FOR LEVEL 3 ACK«, t00=0x0028, t01=0x0144}
0x03fde…04008 Head {h00=0x0026, h01=0x0050, text=»DWFPLC EQU DWFRES+DWFAK3 PLC FLAGS«, t00=0x0028, t01=0x0174}
0x04008…0403e Head {h00=0x0032, h01=0x0050, text=»DWFTY1 EQU /0002 USE ONLY TYPE 1 DATA PACKETS «, t00=0x0029, t01=0x000e}
0x0403e…0406c Head {h00=0x002a, h01=0x0050, text=»DWFSAC EQU /0001 WAIT FOR LEVEL 3 ACK «, t00=0x0029, t01=0x0044}
0x0406c…04076 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0072}
0x04076…04080 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x007c}
0x04080…040a6 Head {h00=0x0022, h01=0x0050, text=»* PLC STATUS FLAGS (CCRSTA)«, t00=0x0029, t01=0x0086}
0x040a6…040b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00ac}
0x040b0…040d6 Head {h00=0x0022, h01=0x0050, text=»STANOC EQU /0001 NO CONNECTION«, t00=0x0029, t01=0x00b6}
0x040d6…040fa Head {h00=0x0020, h01=0x0050, text=»STALIR EQU /0004 LINK RESET «, t00=0x0029, t01=0x00dc}
0x040fa…04124 Head {h00=0x0026, h01=0x0050, text=»STADNO EQU /1000 DCE NOT OPERABLE «, t00=0x0029, t01=0x0100}
0x04124…0414a Head {h00=0x0022, h01=0x0050, text=»STAE1 EQU STANOC+STALIR DUMMY «, t00=0x0029, t01=0x012a}
0x0414a…04180 Head {h00=0x0032, h01=0x0050, text=»STAERR EQU STAE1+STADNO ERROR IN COMMUNICATION«, t00=0x0029, t01=0x0150}
0x04180…0418a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0186}
0x0418a…041b0 Head {h00=0x0022, h01=0x0050, text=»STAREQ EQU /8000 REQUEST ERROR«, t00=0x0029, t01=0x0190}
0x041b0…041dc Head {h00=0x0028, h01=0x0050, text=»STANOB EQU /0800 NO BUFFERS FOR CCR «, t00=0x002a, t01=0x0026}
0x041dc…04204 Head {h00=0x0024, h01=0x0050, text=»STAPOL EQU /0100 POLLING STOPPED«, t00=0x002a, t01=0x0052}
0x04204…04238 Head {h00=0x0030, h01=0x0050, text=»STACOM EQU /0080 COMMUNICATION REESTABLISHED«, t00=0x002a, t01=0x007a}
0x04238…04260 Head {h00=0x0024, h01=0x0050, text=»STASEQ EQU /0010 SEQUENCE ERROR «, t00=0x002a, t01=0x00ae}
0x04260…04288 Head {h00=0x0024, h01=0x0050, text=»STAILL EQU /0008 ILLEGAL LENGTH «, t00=0x002a, t01=0x00d6}
0x04288…042ac Head {h00=0x0020, h01=0x0050, text=»STALER EQU /0002 LINK ERROR «, t00=0x002a, t01=0x00fe}
0x042ac…042b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0122}
0x042b6…042c4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x012c}
0x042c4…042ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x013a}
0x042ce…042f4 Head {h00=0x0022, h01=0x0050, text=»* WORK STATION STATUS FLAGS«, t00=0x002a, t01=0x0144}
0x042f4…042fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x016a}
0x042fe…04328 Head {h00=0x0026, h01=0x0050, text=»WSFERR EQU /01 COMMUNICATION ERROR«, t00=0x002a, t01=0x0174}
0x04328…04332 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x000e}
0x04332…0433c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0018}
0x0433c…04366 Head {h00=0x0026, h01=0x0050, text=»* MASKS FOR CHANNEL PARAMETERS «, t00=0x002b, t01=0x0022}
0x04366…04370 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x004c}
0x04370…0439c Head {h00=0x0028, h01=0x0050, text=»MASKPL EQU /0F PLC NUMBER (0-3 USED)«, t00=0x002b, t01=0x0056}
0x0439c…043d2 Head {h00=0x0032, h01=0x0050, text=»MASKWS EQU /3F WORK STATION NUMBER (1-32 USED)«, t00=0x002b, t01=0x0082}
0x043d2…04404 Head {h00=0x002e, h01=0x0050, text=»MASKLC EQU /3F LOGICAL CHANNEL (0-7 USED) «, t00=0x002b, t01=0x00b8}
0x04404…0440e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00ea}
0x0440e…04418 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00f4}
0x04418…04432 Head {h00=0x0016, h01=0x0050, text=»* RETURN CODES «, t00=0x002b, t01=0x00fe}
0x04432…0443c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0118}
0x0443c…0445c Head {h00=0x001c, h01=0x0050, text=»* AT REQUEST RETURN«, t00=0x002b, t01=0x0122}
0x0445c…04482 Head {h00=0x0022, h01=0x0050, text=»NOTOPR EQU /0001 NOT OPERABLE «, t00=0x002b, t01=0x0142}
0x04482…044a6 Head {h00=0x0020, h01=0x0050, text=»LINERR EQU /0004 LINK ERROR «, t00=0x002b, t01=0x0168}
0x044a6…044ce Head {h00=0x0024, h01=0x0050, text=»PLSERR EQU /0001 SOFTWARE ERROR «, t00=0x002b, t01=0x018c}
0x044ce…044ee Head {h00=0x001c, h01=0x0050, text=»* AT RECOVERY ENTRY«, t00=0x002c, t01=0x0024}
0x044ee…04512 Head {h00=0x0020, h01=0x0050, text=»RETCP EQU /0001 TC POWER UP «, t00=0x002c, t01=0x0044}
0x04512…0453e Head {h00=0x0028, h01=0x0050, text=»RESECP EQU /0002 SECONDARY POWER UP «, t00=0x002c, t01=0x0068}
0x0453e…04562 Head {h00=0x0020, h01=0x0050, text=»RELINE EQU /0004 LINK ERROR «, t00=0x002c, t01=0x0094}
0x04562…0456c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00b8}
0x0456c…04576 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00c2}
0x04576…04590 Head {h00=0x0016, h01=0x0050, text=»* MISCELLANEOUS«, t00=0x002c, t01=0x00cc}
0x04590…0459a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00e6}
0x0459a…045c8 Head {h00=0x002a, h01=0x0050, text=»PLCERR EQU /F1 SOP ERROR CODE AT TRAP «, t00=0x002c, t01=0x00f0}
0x045c8…045fc Head {h00=0x0030, h01=0x0050, text=»CIDINT EQU 8 OFFSET TO INTERRUPT DESCRIPTOR «, t00=0x002c, t01=0x011e}
0x045fc…04632 Head {h00=0x0032, h01=0x0050, text=»MAXFR EQU 4 MAX OUTSTANDING FRAMES ON LEVEL 2 «, t00=0x002c, t01=0x0152}
0x04632…04662 Head {h00=0x002c, h01=0x0050, text=»CHABLO EQU /80 FLAG CHANGED BLOCKING =16«, t00=0x002c, t01=0x0188}
0x04662…0466c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0028}
0x0466c…0467a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0032}
0x0467a…04684 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0040}
0x04684…0469a Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x002d, t01=0x004a}
0x0469a…046b0 Head {h00=0x0012, h01=0x0050, text=»* DATA AREAS *«, t00=0x002d, t01=0x0060}
0x046b0…046c6 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x002d, t01=0x0076}
0x046c6…046d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x008c}
0x046d0…046ee Head {h00=0x001a, h01=0x0050, text=»* CWT ADDRESS TABLE«, t00=0x002d, t01=0x0096}
0x046ee…046f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00b4}
0x046f8…0470c Head {h00=0x0010, h01=0x0050, text=»CWTPLC EQU *«, t00=0x002d, t01=0x00be}
0x0470c…04720 Head {h00=0x0010, h01=0x0050, text=»TABCWT EQU *«, t00=0x002d, t01=0x00d2}
0x04720…04736 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x002d, t01=0x00e6}
0x04736…0475c Head {h00=0x0022, h01=0x0050, text=» DATA PL0CWT CWT FOR PLC NR 1 «, t00=0x002d, t01=0x00fc}
0x0475c…04772 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x002d, t01=0x0122}
0x04772…04798 Head {h00=0x0022, h01=0x0050, text=» DATA PL1CWT CWT FOR PLC NR 2 «, t00=0x002d, t01=0x0138}
0x04798…047ae Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x002d, t01=0x015e}
0x047ae…047d4 Head {h00=0x0022, h01=0x0050, text=» DATA PL2CWT CWT FOR PLC NR 3 «, t00=0x002d, t01=0x0174}
0x047d4…047ea Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x002e, t01=0x000a}
0x047ea…04810 Head {h00=0x0022, h01=0x0050, text=» DATA PL3CWT CWT FOR PLC NR 4 «, t00=0x002e, t01=0x0020}
0x04810…0481c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0046}
0x0481c…04826 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0052}
0x04826…0483c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=4 «, t00=0x002e, t01=0x005c}
0x0483c…04862 Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 4 NOT CONNECTED«, t00=0x002e, t01=0x0072}
0x04862…04878 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x002e, t01=0x0098}
0x04878…0489e Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 3 NOT CONNECTED«, t00=0x002e, t01=0x00ae}
0x0489e…048b4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x002e, t01=0x00d4}
0x048b4…048da Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 2 NOT CONNECTED«, t00=0x002e, t01=0x00ea}
0x048da…048f4 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=1 =5 «, t00=0x002e, t01=0x0110}
0x048f4…0491e Head {h00=0x0026, h01=0x0050, text=» DATA 0 PLC NR 1 NOT CONNECTED =5 «, t00=0x002e, t01=0x012a}
0x0491e…0492a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0154}
0x0492a…04934 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0160}
0x04934…0494a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002e, t01=0x016a}
0x0494a…04976 Head {h00=0x0028, h01=0x0050, text=» DATA PR1CWT CWT FOR PLC NR. 5, REM.«, t00=0x002e, t01=0x0180}
0x04976…0498c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002f, t01=0x001c}
0x0498c…049b8 Head {h00=0x0028, h01=0x0050, text=» DATA PR2CWT CWT FOR PLC NR. 6, REM.«, t00=0x002f, t01=0x0032}
0x049b8…049ce Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002f, t01=0x005e}
0x049ce…049fa Head {h00=0x0028, h01=0x0050, text=» DATA PR3CWT CWT FOR PLC NR. 7, REM.«, t00=0x002f, t01=0x0074}
0x049fa…04a10 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x002f, t01=0x00a0}
0x04a10…04a3c Head {h00=0x0028, h01=0x0050, text=» DATA PR4CWT CWT FOR PLC NR. 8, REM.«, t00=0x002f, t01=0x00b6}
0x04a3c…04a48 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x00e2}
0x04a48…04a52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00ee}
0x04a52…04a68 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=4 «, t00=0x002f, t01=0x00f8}
0x04a68…04a8e Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 8 NOT CONNECTED«, t00=0x002f, t01=0x010e}
0x04a8e…04aa4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x002f, t01=0x0134}
0x04aa4…04aca Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 7 NOT CONNECTED«, t00=0x002f, t01=0x014a}
0x04aca…04ae0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002f, t01=0x0170}
0x04ae0…04b06 Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 6 NOT CONNECTED«, t00=0x002f, t01=0x0186}
0x04b06…04b1c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0030, t01=0x001c}
0x04b1c…04b42 Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 5 NOT CONNECTED«, t00=0x0030, t01=0x0032}
0x04b42…04b4e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x0058}
0x04b4e…04b58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0064}
0x04b58…04b66 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x006e}
0x04b66…04b70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x007c}
0x04b70…04b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0086}
0x04b7a…04b8e Head {h00=0x0010, h01=0x0050, text=»OPARR1 EQU *«, t00=0x0030, t01=0x0090}
0x04b8e…04ba8 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0030, t01=0x00a4}
0x04ba8…04bc4 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR10 LINE 0 «, t00=0x0030, t01=0x00be}
0x04bc4…04be0 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR11 LINE 1 «, t00=0x0030, t01=0x00da}
0x04be0…04bfc Head {h00=0x0018, h01=0x0050, text=» DATA OPNR12 LINE 2 «, t00=0x0030, t01=0x00f6}
0x04bfc…04c18 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR13 LINE 3 «, t00=0x0030, t01=0x0112}
0x04c18…04c24 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x012e}
0x04c24…04c38 Head {h00=0x0010, h01=0x0050, text=»OPARR2 EQU *«, t00=0x0030, t01=0x013a}
0x04c38…04c52 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0030, t01=0x014e}
0x04c52…04c6c Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=1 U =5«, t00=0x0030, t01=0x0168}
0x04c6c…04c88 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR20 LINE 0 «, t00=0x0030, t01=0x0182}
0x04c88…04ca4 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR21 LINE 1 «, t00=0x0031, t01=0x000e}
0x04ca4…04cc0 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR22 LINE 2 «, t00=0x0031, t01=0x002a}
0x04cc0…04cdc Head {h00=0x0018, h01=0x0050, text=» DATA OPNR23 LINE 3 «, t00=0x0031, t01=0x0046}
0x04cdc…04ce8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0062}
0x04ce8…04cfc Head {h00=0x0010, h01=0x0050, text=»OPARR3 EQU *«, t00=0x0031, t01=0x006e}
0x04cfc…04d16 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0031, t01=0x0082}
0x04d16…04d30 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=1 U =5«, t00=0x0031, t01=0x009c}
0x04d30…04d4a Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=2 U =5«, t00=0x0031, t01=0x00b6}
0x04d4a…04d66 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR30 LINE 0 «, t00=0x0031, t01=0x00d0}
0x04d66…04d82 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR31 LINE 1 «, t00=0x0031, t01=0x00ec}
0x04d82…04d9e Head {h00=0x0018, h01=0x0050, text=» DATA OPNR32 LINE 2 «, t00=0x0031, t01=0x0108}
0x04d9e…04dba Head {h00=0x0018, h01=0x0050, text=» DATA OPNR33 LINE 3 «, t00=0x0031, t01=0x0124}
0x04dba…04dc6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0140}
0x04dc6…04dda Head {h00=0x0010, h01=0x0050, text=»OPARR4 EQU *«, t00=0x0031, t01=0x014c}
0x04dda…04df4 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0031, t01=0x0160}
0x04df4…04e0e Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=1 U =5«, t00=0x0031, t01=0x017a}
0x04e0e…04e28 (50, 0, 398) Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=2 U =5«, t00=0x0032, t01=0x0004}
0x04e28…04e42 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=3 U =5«, t00=0x0032, t01=0x001e}
0x04e42…04e5e Head {h00=0x0018, h01=0x0050, text=» DATA OPNR40 LINE 0 «, t00=0x0032, t01=0x0038}
0x04e5e…04e7a Head {h00=0x0018, h01=0x0050, text=» DATA OPNR41 LINE 1 «, t00=0x0032, t01=0x0054}
0x04e7a…04e96 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR42 LINE 2 «, t00=0x0032, t01=0x0070}
0x04e96…04eb2 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR43 LINE 3 «, t00=0x0032, t01=0x008c}
0x04eb2…04ebe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x00a8}
0x04ebe…04ec8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00b4}
0x04ec8…04ee2 Head {h00=0x0016, h01=0x0050, text=»OPARL1 EQU * U =5 «, t00=0x0032, t01=0x00be}
0x04ee2…04f06 Head {h00=0x0020, h01=0x0050, text=» DATA OPNL10 LOCAL PLC 1 =5 «, t00=0x0032, t01=0x00d8}
0x04f06…04f20 Head {h00=0x0016, h01=0x0050, text=»OPARL2 EQU * U =5 «, t00=0x0032, t01=0x00fc}
0x04f20…04f44 Head {h00=0x0020, h01=0x0050, text=» DATA OPNL20 LOCAL PLC 2 =5 «, t00=0x0032, t01=0x0116}
0x04f44…04f5e Head {h00=0x0016, h01=0x0050, text=»OPARL3 EQU * U =5 «, t00=0x0032, t01=0x013a}
0x04f5e…04f82 Head {h00=0x0020, h01=0x0050, text=» DATA OPNL30 LOCAL PLC 3 =5 «, t00=0x0032, t01=0x0154}
0x04f82…04f9c Head {h00=0x0016, h01=0x0050, text=»OPARL4 EQU * U =5 «, t00=0x0032, t01=0x0178}
0x04f9c…04fc0 (51, 0, 398) Head {h00=0x0020, h01=0x0050, text=» DATA OPNL40 LOCAL PLC 4 =5 «, t00=0x0033, t01=0x0004}
0x04fc0…04fce Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x0028}
0x04fce…04fd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0036}
0x04fd8…05002 Head {h00=0x0026, h01=0x0050, text=»* OPEN LINE PARAMETER AREAS, LOCAL«, t00=0x0033, t01=0x0040}
0x05002…0500c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x006a}
0x0500c…05028 Head {h00=0x0018, h01=0x0050, text=»* STANDARD AREAS :«, t00=0x0033, t01=0x0074}
0x05028…05042 Head {h00=0x0016, h01=0x0050, text=»* PRIMARY STATION «, t00=0x0033, t01=0x0090}
0x05042…05058 Head {h00=0x0012, h01=0x0050, text=»* FULL DUPLEX «, t00=0x0033, t01=0x00aa}
0x05058…05070 Head {h00=0x0014, h01=0x0050, text=»* 96000 BITS/SEC«, t00=0x0033, t01=0x00c0}
0x05070…0508a Head {h00=0x0016, h01=0x0050, text=»* NO NRZI ENCODING«, t00=0x0033, t01=0x00d8}
0x0508a…050a6 Head {h00=0x0018, h01=0x0050, text=»* POLLING 24HZ U =8 «, t00=0x0033, t01=0x00f2}
0x050a6…050c2 Head {h00=0x0018, h01=0x0050, text=»* 5 RETRANSMISSIONS «, t00=0x0033, t01=0x010e}
0x050c2…050dc Head {h00=0x0016, h01=0x0050, text=»* 3 MIN. TIME OUT «, t00=0x0033, t01=0x012a}
0x050dc…050e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0144}
0x050e6…050f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x014e}
0x050f0…05118 Head {h00=0x0024, h01=0x0050, text=»OPNL40 EQU * LOCAL PLC 4, LINE 0«, t00=0x0033, t01=0x0158}
0x05118…0512e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0033, t01=0x0180}
0x0512e…05144 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x0034, t01=0x0008}
0x05144…0515a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x0034, t01=0x001e}
0x0515a…05170 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x0034, t01=0x0034}
0x05170…051a6 Head {h00=0x0032, h01=0x0050, text=» DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11«, t00=0x0034, t01=0x004a}
0x051a6…051b2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0080}
0x051b2…051da Head {h00=0x0024, h01=0x0050, text=»OPNL30 EQU * LOCAL PLC 3, LINE 0«, t00=0x0034, t01=0x008c}
0x051da…051f0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0034, t01=0x00b4}
0x051f0…05206 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x0034, t01=0x00ca}
0x05206…0521c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x0034, t01=0x00e0}
0x0521c…05252 Head {h00=0x0032, h01=0x0050, text=» DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11«, t00=0x0034, t01=0x00f6}
0x05252…0525e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x012c}
0x0525e…05286 Head {h00=0x0024, h01=0x0050, text=»OPNL20 EQU * LOCAL PLC 2, LINE 0«, t00=0x0034, t01=0x0138}
0x05286…0529c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0034, t01=0x0160}
0x0529c…052b2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x0034, t01=0x0176}
0x052b2…052e8 Head {h00=0x0032, h01=0x0050, text=» DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11«, t00=0x0034, t01=0x018c}
0x052e8…052f4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x0032}
0x052f4…0531c Head {h00=0x0024, h01=0x0050, text=»OPNL10 EQU * LOCAL PLC 1, LINE 0«, t00=0x0035, t01=0x003e}
0x0531c…05332 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0035, t01=0x0066}
0x05332…05368 Head {h00=0x0032, h01=0x0050, text=» DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11«, t00=0x0035, t01=0x007c}
0x05368…05374 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x00b2}
0x05374…0537e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00be}
0x0537e…053aa Head {h00=0x0028, h01=0x0050, text=»* END OF LOCAL LINE PARAMETER AREAS «, t00=0x0035, t01=0x00c8}
0x053aa…053b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00f4}
0x053b4…053c2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x00fe}
0x053c2…053cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x010c}
0x053cc…053f8 Head {h00=0x0028, h01=0x0050, text=»* OPEN LINE PARAMETER AREAS, REMOTE «, t00=0x0035, t01=0x0116}
0x053f8…05402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0142}
0x05402…0541e Head {h00=0x0018, h01=0x0050, text=»* STANDARD AREAS :«, t00=0x0035, t01=0x014c}
0x0541e…05438 Head {h00=0x0016, h01=0x0050, text=»* PRIMARY STATION «, t00=0x0035, t01=0x0168}
0x05438…0544e Head {h00=0x0012, h01=0x0050, text=»* FULL DUPLEX «, t00=0x0035, t01=0x0182}
0x0544e…05466 Head {h00=0x0014, h01=0x0050, text=»* 2400 BITS/SEC «, t00=0x0036, t01=0x0008}
0x05466…05480 Head {h00=0x0016, h01=0x0050, text=»* NO NRZI ENCODING«, t00=0x0036, t01=0x0020}
0x05480…05496 Head {h00=0x0012, h01=0x0050, text=»* POLLING 13HZ«, t00=0x0036, t01=0x003a}
0x05496…054b2 Head {h00=0x0018, h01=0x0050, text=»* 5 RETRANSMISSIONS «, t00=0x0036, t01=0x0050}
0x054b2…054cc Head {h00=0x0016, h01=0x0050, text=»* 5 MIN. TIME OUT «, t00=0x0036, t01=0x006c}
0x054cc…054d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0086}
0x054d6…054e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0090}
0x054e0…054f6 Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 4«, t00=0x0036, t01=0x009a}
0x054f6…05512 Head {h00=0x0018, h01=0x0050, text=»OPNR40 EQU * LINE 0 «, t00=0x0036, t01=0x00b0}
0x05512…05528 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0036, t01=0x00cc}
0x05528…0553e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0036, t01=0x00e2}
0x0553e…05554 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0036, t01=0x00f8}
0x05554…0556a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0036, t01=0x010e}
0x0556a…0559e Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 «, t00=0x0036, t01=0x0124}
0x0559e…055aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x0158}
0x055aa…055c6 Head {h00=0x0018, h01=0x0050, text=»OPNR41 EQU * LINE 1 «, t00=0x0036, t01=0x0164}
0x055c6…055dc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0036, t01=0x0180}
0x055dc…055f2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0037, t01=0x0008}
0x055f2…05608 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0037, t01=0x001e}
0x05608…0561e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0037, t01=0x0034}
0x0561e…05652 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 «, t00=0x0037, t01=0x004a}
0x05652…0565e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x007e}
0x0565e…0567a Head {h00=0x0018, h01=0x0050, text=»OPNR42 EQU * LINE 2 «, t00=0x0037, t01=0x008a}
0x0567a…05690 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0037, t01=0x00a6}
0x05690…056a6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0037, t01=0x00bc}
0x056a6…056bc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0037, t01=0x00d2}
0x056bc…056d2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0037, t01=0x00e8}
0x056d2…0570a Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 «, t00=0x0037, t01=0x00fe}
0x0570a…05716 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0136}
0x05716…05732 Head {h00=0x0018, h01=0x0050, text=»OPNR43 EQU * LINE 3 «, t00=0x0037, t01=0x0142}
0x05732…05748 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0037, t01=0x015e}
0x05748…0575e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0037, t01=0x0174}
0x0575e…05774 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0037, t01=0x018a}
0x05774…0578a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0038, t01=0x0010}
0x0578a…057c2 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 «, t00=0x0038, t01=0x0026}
0x057c2…057ce Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x005e}
0x057ce…057e4 Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 3«, t00=0x0038, t01=0x006a}
0x057e4…05800 Head {h00=0x0018, h01=0x0050, text=»OPNR30 EQU * LINE 0 «, t00=0x0038, t01=0x0080}
0x05800…05816 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0038, t01=0x009c}
0x05816…0582c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0038, t01=0x00b2}
0x0582c…05842 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0038, t01=0x00c8}
0x05842…05876 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 «, t00=0x0038, t01=0x00de}
0x05876…05882 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0112}
0x05882…0589e Head {h00=0x0018, h01=0x0050, text=»OPNR31 EQU * LINE 1 «, t00=0x0038, t01=0x011e}
0x0589e…058b4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0038, t01=0x013a}
0x058b4…058ca Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0038, t01=0x0150}
0x058ca…058e0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0038, t01=0x0166}
0x058e0…05914 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 «, t00=0x0038, t01=0x017c}
0x05914…05920 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0020}
0x05920…0593c Head {h00=0x0018, h01=0x0050, text=»OPNR32 EQU * LINE 2 «, t00=0x0039, t01=0x002c}
0x0593c…05952 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0039, t01=0x0048}
0x05952…05968 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0039, t01=0x005e}
0x05968…0597e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0039, t01=0x0074}
0x0597e…059b6 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 «, t00=0x0039, t01=0x008a}
0x059b6…059c2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x00c2}
0x059c2…059de Head {h00=0x0018, h01=0x0050, text=»OPNR33 EQU * LINE 3 «, t00=0x0039, t01=0x00ce}
0x059de…059f4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0039, t01=0x00ea}
0x059f4…05a0a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0039, t01=0x0100}
0x05a0a…05a20 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0039, t01=0x0116}
0x05a20…05a58 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 «, t00=0x0039, t01=0x012c}
0x05a58…05a64 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0164}
0x05a64…05a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0170}
0x05a6e…05a84 Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 2«, t00=0x0039, t01=0x017a}
0x05a84…05aa0 Head {h00=0x0018, h01=0x0050, text=»OPNR20 EQU * LINE 0 «, t00=0x0039, t01=0x0190}
0x05aa0…05ab6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003a, t01=0x001c}
0x05ab6…05acc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x003a, t01=0x0032}
0x05acc…05b00 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 «, t00=0x003a, t01=0x0048}
0x05b00…05b0c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x007c}
0x05b0c…05b28 Head {h00=0x0018, h01=0x0050, text=»OPNR21 EQU * LINE 1 «, t00=0x003a, t01=0x0088}
0x05b28…05b3e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003a, t01=0x00a4}
0x05b3e…05b54 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x003a, t01=0x00ba}
0x05b54…05b88 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 «, t00=0x003a, t01=0x00d0}
0x05b88…05b94 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x0104}
0x05b94…05bb0 Head {h00=0x0018, h01=0x0050, text=»OPNR22 EQU * LINE 2 «, t00=0x003a, t01=0x0110}
0x05bb0…05bc6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003a, t01=0x012c}
0x05bc6…05bdc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x003a, t01=0x0142}
0x05bdc…05c14 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 «, t00=0x003a, t01=0x0158}
0x05c14…05c20 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x0190}
0x05c20…05c3c Head {h00=0x0018, h01=0x0050, text=»OPNR23 EQU * LINE 3 «, t00=0x003b, t01=0x000c}
0x05c3c…05c52 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003b, t01=0x0028}
0x05c52…05c68 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x003b, t01=0x003e}
0x05c68…05ca0 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 «, t00=0x003b, t01=0x0054}
0x05ca0…05cac Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x008c}
0x05cac…05cb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0098}
0x05cb6…05ccc Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 1«, t00=0x003b, t01=0x00a2}
0x05ccc…05ce8 Head {h00=0x0018, h01=0x0050, text=»OPNR10 EQU * LINE 0 «, t00=0x003b, t01=0x00b8}
0x05ce8…05cfe Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003b, t01=0x00d4}
0x05cfe…05d32 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 «, t00=0x003b, t01=0x00ea}
0x05d32…05d3e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x011e}
0x05d3e…05d5a Head {h00=0x0018, h01=0x0050, text=»OPNR11 EQU * LINE 1 «, t00=0x003b, t01=0x012a}
0x05d5a…05d70 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003b, t01=0x0146}
0x05d70…05da4 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 «, t00=0x003b, t01=0x015c}
0x05da4…05db0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x0190}
0x05db0…05dcc Head {h00=0x0018, h01=0x0050, text=»OPNR12 EQU * LINE 2 «, t00=0x003c, t01=0x000c}
0x05dcc…05de2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003c, t01=0x0028}
0x05de2…05e1a Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 «, t00=0x003c, t01=0x003e}
0x05e1a…05e26 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0076}
0x05e26…05e42 Head {h00=0x0018, h01=0x0050, text=»OPNR13 EQU * LINE 3 «, t00=0x003c, t01=0x0082}
0x05e42…05e58 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003c, t01=0x009e}
0x05e58…05e90 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 «, t00=0x003c, t01=0x00b4}
0x05e90…05e9c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x00ec}
0x05e9c…05ec8 Head {h00=0x0028, h01=0x0050, text=»* END OF REMOTE LINE PARAMETER AREAS«, t00=0x003c, t01=0x00f8}
0x05ec8…05ed2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0124}
0x05ed2…05edc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x012e}
0x05edc…05f0c Head {h00=0x002c, h01=0x0050, text=»PLCPFP DATA 0 PLC LOCAL POWER FAIL FLAG «, t00=0x003c, t01=0x0138}
0x05f0c…05f16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0168}
0x05f16…05f42 Head {h00=0x0028, h01=0x0050, text=» IFF UTTEST=0 TEST VERSION OF DRIVER«, t00=0x003c, t01=0x0172}
0x05f42…05f4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x000e}
0x05f4c…05f5a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003d, t01=0x0018}
0x05f5a…05f64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0026}
0x05f64…05f90 Head {h00=0x0028, h01=0x0050, text=»UTTST DATA UTTEST 1 = TRAP NOT USED «, t00=0x003d, t01=0x0030}
0x05f90…05f9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x005c}
0x05f9a…05fa4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0066}
0x05fa4…05fca Head {h00=0x0022, h01=0x0050, text=»* QUEUE STATISTICS COUNTERS«, t00=0x003d, t01=0x0070}
0x05fca…05ff4 Head {h00=0x0026, h01=0x0050, text=»* EACH COUNTER HAS ONE WORD / PLC «, t00=0x003d, t01=0x0096}
0x05ff4…05ffe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00c0}
0x05ffe…06012 Head {h00=0x0010, h01=0x0050, text=»STATAR EQU *«, t00=0x003d, t01=0x00ca}
0x06012…06034 Head {h00=0x001e, h01=0x0050, text=»WIQSTA RES 8 WINDOW QUEUE «, t00=0x003d, t01=0x00de}
0x06034…0605c Head {h00=0x0024, h01=0x0050, text=»SBQSTA RES 8 SHORT BUFFERS QUEUE«, t00=0x003d, t01=0x0100}
0x0605c…06084 Head {h00=0x0024, h01=0x0050, text=»LBQSTA RES 8 LONG BUFFERS QUEUE «, t00=0x003d, t01=0x0128}
0x06084…060a2 Head {h00=0x001a, h01=0x0050, text=»CCQSTA RES 8 CCA QUEUE«, t00=0x003d, t01=0x0150}
0x060a2…060ca Head {h00=0x0024, h01=0x0050, text=»STATLN EQU *-STATAR TABLE LENGTH«, t00=0x003d, t01=0x016e}
0x060ca…060d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0008}
0x060d4…060e0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0012}
0x060e0…060ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003e, t01=0x001e}
0x060ee…060f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x002c}
0x060f8…06102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0036}
0x06102…06120 Head {h00=0x001a, h01=0x0050, text=»* CWT DISPLACEMENTS «, t00=0x003e, t01=0x0040}
0x06120…0612a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x005e}
0x0612a…0614c Head {h00=0x001e, h01=0x0050, text=»CWTOPR EQU /00 CU OPERABLE«, t00=0x003e, t01=0x0068}
0x0614c…0616c Head {h00=0x001c, h01=0x0050, text=»CWTCCB EQU /02 CCA BUSY «, t00=0x003e, t01=0x008a}
0x0616c…06198 Head {h00=0x0028, h01=0x0050, text=»CWTGR EQU /04 GENERAL READ ALLOWED «, t00=0x003e, t01=0x00aa}
0x06198…061be Head {h00=0x0022, h01=0x0050, text=»CWTPNR EQU /06 CU NUMBER (0-7)«, t00=0x003e, t01=0x00d6}
0x061be…061e0 Head {h00=0x001e, h01=0x0050, text=»CWTABW EQU /08 WS TO ABORT«, t00=0x003e, t01=0x00fc}
0x061e0…0620c Head {h00=0x0028, h01=0x0050, text=»CWTPLS EQU /0A LATEST PLC RCA STATUS«, t00=0x003e, t01=0x011e}
0x0620c…06234 Head {h00=0x0024, h01=0x0050, text=»CWTLNO EQU /0C LINE NO INDICATOR«, t00=0x003e, t01=0x014a}
0x06234…06264 Head {h00=0x002c, h01=0x0050, text=»CWTPAR EQU /0E INDEX TO PARAMETER AREA «, t00=0x003e, t01=0x0172}
0x06264…0629e Head {h00=0x0036, h01=0x0050, text=»CWTOPP EQU /10 OPEN LINE PARAMETER AREA ADDRESS =2«, t00=0x003f, t01=0x0012}
0x0629e…062c6 Head {h00=0x0024, h01=0x0050, text=»CWTINT EQU /12 WS TABLE ADDRESS «, t00=0x003f, t01=0x004c}
0x062c6…062f2 Head {h00=0x0028, h01=0x0050, text=»CWTBUF EQU /14 INP. BUFFER ADDRESS «, t00=0x003f, t01=0x0074}
0x062f2…06328 Head {h00=0x0032, h01=0x0050, text=»CWTSBQ EQU /16 QUEUE FOR SHORT OUTP. BUFFERS «, t00=0x003f, t01=0x00a0}
0x06328…0635c Head {h00=0x0030, h01=0x0050, text=»CWTLBQ EQU /18 QUEUE FOR LONG OUTP. BUFFERS «, t00=0x003f, t01=0x00d6}
0x0635c…06386 Head {h00=0x0026, h01=0x0050, text=»CWTCCQ EQU /1A QUEUE FOR CCA FREE «, t00=0x003f, t01=0x010a}
0x06386…063bc Head {h00=0x0032, h01=0x0050, text=»CWTMBQ EQU /1C QUEUE OF ALLOCATED MON. BLOCKS «, t00=0x003f, t01=0x0134}
0x063bc…063e2 Head {h00=0x0022, h01=0x0050, text=»CWTTPR EQU /1E TIMER POINTER «, t00=0x003f, t01=0x016a}
0x063e2…0640a Head {h00=0x0024, h01=0x0050, text=»CWTCIO EQU /20 CIO START INSTR. «, t00=0x003f, t01=0x0190}
0x0640a…0642c Head {h00=0x001e, h01=0x0050, text=»CWTST3 EQU /22 SST INSTR. «, t00=0x0040, t01=0x0028}
0x0642c…0645e Head {h00=0x002e, h01=0x0050, text=»CWTCSD EQU /24 CTRL UNIT START DESCRIPTOR «, t00=0x0040, t01=0x004a}
0x0645e…0648e Head {h00=0x002c, h01=0x0050, text=»CWTCID EQU /2A CTRL UNIT INTERF. DESCR. «, t00=0x0040, t01=0x007c}
0x0648e…064b8 Head {h00=0x0026, h01=0x0050, text=»CWTCCA EQU /34 COMMAND CTRL AREA «, t00=0x0040, t01=0x00ac}
0x064b8…064e2 Head {h00=0x0026, h01=0x0050, text=»CWTRCA EQU /44 RESPONSE CTRL AREA «, t00=0x0040, t01=0x00d6}
0x064e2…06516 Head {h00=0x0030, h01=0x0050, text=»CWTPBS EQU /54 POOLBL. SHORT OUTP. BUFFERS «, t00=0x0040, t01=0x0100}
0x06516…0654a Head {h00=0x0030, h01=0x0050, text=»CWTPBL EQU /5E POOLBL. LONG OUTP. BUFFERS =2«, t00=0x0040, t01=0x0134}
0x0654a…0657e Head {h00=0x0030, h01=0x0050, text=»CWTPBG EQU /68 POOLBL. GENERAL READ BUFFERS «, t00=0x0040, t01=0x0168}
0x0657e…065a0 Head {h00=0x001e, h01=0x0050, text=»CWTWSS EQU /72 WS STATUS «, t00=0x0041, t01=0x000c}
0x065a0…065d8 Head {h00=0x0034, h01=0x0050, text=»CWTSOB EQU MAXWS+MAXWS+/74 SH. OUTP. BUFFERS =4 «, t00=0x0041, t01=0x002e}
0x065d8…065fe Head {h00=0x0022, h01=0x0050, text=»CWTLB1 EQU CWTSOB+SOBUFS U =7 «, t00=0x0041, t01=0x0066}
0x065fe…06634 Head {h00=0x0032, h01=0x0050, text=»CWTLOB EQU CWTLB1+SOBUFS LONG OUTP. BUFFERS =7«, t00=0x0041, t01=0x008c}
0x06634…0665a Head {h00=0x0022, h01=0x0050, text=»CWTGR1 EQU CWTLOB+LOBUFS U =7 «, t00=0x0041, t01=0x00c2}
0x0665a…06690 Head {h00=0x0032, h01=0x0050, text=»CWTGRB EQU CWTGR1+LOBUFS GEN. READ BUFFERS =7 «, t00=0x0041, t01=0x00e8}
0x06690…0669e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x011e}
0x0669e…066a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x012c}
0x066a8…066c0 Head {h00=0x0014, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0041, t01=0x0136}
0x066c0…066e2 Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 1 «, t00=0x0041, t01=0x014e}
0x066e2…066ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0170}
0x066ec…06700 Head {h00=0x0010, h01=0x0050, text=»PL0CWT EQU *«, t00=0x0041, t01=0x017a}
0x06700…0670a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x018e}
0x0670a…0671e Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0042, t01=0x0008}
0x0671e…0673e Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0042, t01=0x001c}
0x0673e…06764 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0042, t01=0x003c}
0x06764…06794 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0042, t01=0x0062}
0x06794…0679e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0092}
0x0679e…067b8 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0042, t01=0x009c}
0x067b8…067d8 Head {h00=0x001c, h01=0x0050, text=» DATA 0 PLC NUMBER (0-3)«, t00=0x0042, t01=0x00b6}
0x067d8…0680a Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0042, t01=0x00d6}
0x0680a…06830 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0042, t01=0x0108}
0x06830…06852 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0042, t01=0x012e}
0x06852…06876 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INDEX PARAMETER AREA«, t00=0x0042, t01=0x0150}
0x06876…06880 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0174}
0x06880…068a8 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0042, t01=0x017e}
0x068a8…068da Head {h00=0x002e, h01=0x0050, text=» DATA OPARL1 OPEN LINE PARAMETER AREA ADDR«, t00=0x0043, t01=0x0016}
0x068da…0690a Head {h00=0x002c, h01=0x0050, text=» DATA INTPL1 WORK STATION TABLE ADDRESS «, t00=0x0043, t01=0x0048}
0x0690a…0692e Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0043, t01=0x0078}
0x0692e…0695c Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0043, t01=0x009c}
0x0695c…06988 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0043, t01=0x00ca}
0x06988…069aa Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0043, t01=0x00f6}
0x069aa…069dc Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0043, t01=0x0118}
0x069dc…06a0c Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0043, t01=0x014a}
0x06a0c…06a16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x017a}
0x06a16…06a32 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0043, t01=0x0184}
0x06a32…06a5e Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA0 START I/O OPERATION«, t00=0x0044, t01=0x0010}
0x06a5e…06a94 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA0 RELEASE RCA AND RESET INTERRUPT«, t00=0x0044, t01=0x003c}
0x06a94…06a9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0072}
0x06a9e…06abe Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0044, t01=0x007c}
0x06abe…06af0 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0044, t01=0x009c}
0x06af0…06b14 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0044, t01=0x00ce}
0x06b14…06b3c Head {h00=0x0024, h01=0x0050, text=» DATA PL0CWT+CWTCID CID ADDRESS «, t00=0x0044, t01=0x00f2}
0x06b3c…06b60 Head {h00=0x0020, h01=0x0050, text=» DATA INTLV0 INTERRUPT LEVEL«, t00=0x0044, t01=0x011a}
0x06b60…06b96 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0044, t01=0x013e}
0x06b96…06bba Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0044, t01=0x0174}
0x06bba…06be2 Head {h00=0x0024, h01=0x0050, text=» DATA PL0CWT+CWTCCA CCA ADDRESS «, t00=0x0045, t01=0x0008}
0x06be2…06c06 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0045, t01=0x0030}
0x06c06…06c2e Head {h00=0x0024, h01=0x0050, text=» DATA PL0CWT+CWTRCA RCA ADDRESS «, t00=0x0045, t01=0x0054}
0x06c2e…06c56 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0045, t01=0x007c}
0x06c56…06c7a Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0045, t01=0x00a4}
0x06c7a…06c9e Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0045, t01=0x00c8}
0x06c9e…06ca8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00ec}
0x06ca8…06cc2 Head {h00=0x0016, h01=0x0050, text=»* POOLBLOCKS «, t00=0x0045, t01=0x00f6}
0x06cc2…06ce2 Head {h00=0x001c, h01=0x0050, text=» DATA 'SO',0 ID & FLAGS «, t00=0x0045, t01=0x0110}
0x06ce2…06d1a Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0045, t01=0x0130}
0x06d1a…06d42 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0045, t01=0x0168}
0x06d42…06d56 Head {h00=0x0010, h01=0x0050, text=» DATA 'LO',0«, t00=0x0045, t01=0x0190}
0x06d56…06d74 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0046, t01=0x0014}
0x06d74…06d90 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0046, t01=0x0032}
0x06d90…06da4 Head {h00=0x0010, h01=0x0050, text=» DATA 'GR',0«, t00=0x0046, t01=0x004e}
0x06da4…06dc2 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0046, t01=0x0062}
0x06dc2…06dde Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0046, t01=0x0080}
0x06dde…06de8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x009c}
0x06de8…06e1e Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0046, t01=0x00a6}
0x06e1e…06e54 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0046, t01=0x00dc}
0x06e54…06e5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0112}
0x06e5e…06e7a Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0046, t01=0x011c}
0x06e7a…06ea2 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0046, t01=0x0138}
0x06ea2…06eca Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0046, t01=0x0160}
0x06eca…06ef2 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0046, t01=0x0188}
0x06ef2…06efc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0020}
0x06efc…06f06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x002a}
0x06f06…06f12 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0034}
0x06f12…06f28 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x0047, t01=0x0040}
0x06f28…06f32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0056}
0x06f32…06f40 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x0060}
0x06f40…06f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x006e}
0x06f4a…06f6c Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 2 «, t00=0x0047, t01=0x0078}
0x06f6c…06f76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x009a}
0x06f76…06f8a Head {h00=0x0010, h01=0x0050, text=»PL1CWT EQU *«, t00=0x0047, t01=0x00a4}
0x06f8a…06f94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00b8}
0x06f94…06fa8 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0047, t01=0x00c2}
0x06fa8…06fc8 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0047, t01=0x00d6}
0x06fc8…06fee Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0047, t01=0x00f6}
0x06fee…0701e Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0047, t01=0x011c}
0x0701e…07028 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x014c}
0x07028…07042 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0047, t01=0x0156}
0x07042…07062 Head {h00=0x001c, h01=0x0050, text=» DATA 1 PLC NUMBER (0-3)«, t00=0x0047, t01=0x0170}
0x07062…07094 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0047, t01=0x0190}
0x07094…070ba Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0048, t01=0x0032}
0x070ba…070dc Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0048, t01=0x0058}
0x070dc…07104 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREA «, t00=0x0048, t01=0x007a}
0x07104…0710e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x00a2}
0x0710e…07136 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0048, t01=0x00ac}
0x07136…07168 Head {h00=0x002e, h01=0x0050, text=» DATA OPARL2 OPEN LINE PARAMETER AREA ADDR«, t00=0x0048, t01=0x00d4}
0x07168…07198 Head {h00=0x002c, h01=0x0050, text=» DATA INTPL2 WORK STATION TABLE ADDRESS «, t00=0x0048, t01=0x0106}
0x07198…071bc Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0048, t01=0x0136}
0x071bc…071ea Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0048, t01=0x015a}
0x071ea…07216 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0048, t01=0x0188}
0x07216…07238 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0049, t01=0x0024}
0x07238…0726a Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0049, t01=0x0046}
0x0726a…0729a Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0049, t01=0x0078}
0x0729a…072a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00a8}
0x072a4…072c0 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0049, t01=0x00b2}
0x072c0…072ec Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA1 START I/O OPERATION«, t00=0x0049, t01=0x00ce}
0x072ec…07322 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA1 RELEASE RCA AND RESET INTERRUPT«, t00=0x0049, t01=0x00fa}
0x07322…0732c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0130}
0x0732c…0734c Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0049, t01=0x013a}
0x0734c…0737e Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0049, t01=0x015a}
0x0737e…073a2 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0049, t01=0x018c}
0x073a2…073ca Head {h00=0x0024, h01=0x0050, text=» DATA PL1CWT+CWTCID CID ADDRESS «, t00=0x004a, t01=0x0020}
0x073ca…073ee Head {h00=0x0020, h01=0x0050, text=» DATA INTLV1 INTERRUPT LEVEL«, t00=0x004a, t01=0x0048}
0x073ee…07424 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x004a, t01=0x006c}
0x07424…07448 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x004a, t01=0x00a2}
0x07448…07470 Head {h00=0x0024, h01=0x0050, text=» DATA PL1CWT+CWTCCA CCA ADDRESS «, t00=0x004a, t01=0x00c6}
0x07470…07494 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x004a, t01=0x00ee}
0x07494…074bc Head {h00=0x0024, h01=0x0050, text=» DATA PL1CWT+CWTRCA RCA ADDRESS «, t00=0x004a, t01=0x0112}
0x074bc…074e4 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x004a, t01=0x013a}
0x074e4…07508 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x004a, t01=0x0162}
0x07508…0752c Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x004a, t01=0x0186}
0x0752c…07536 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x001a}
0x07536…07562 Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x004b, t01=0x0024}
0x07562…07592 Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x004b, t01=0x0050}
0x07592…075ca Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x004b, t01=0x0080}
0x075ca…075f2 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x004b, t01=0x00b8}
0x075f2…0761a Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x004b, t01=0x00e0}
0x0761a…07638 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x004b, t01=0x0108}
0x07638…07654 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x004b, t01=0x0126}
0x07654…0767c Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x004b, t01=0x0142}
0x0767c…0769a Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x004b, t01=0x016a}
0x0769a…076b6 Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x004b, t01=0x0188}
0x076b6…076c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0014}
0x076c0…076f6 Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x004c, t01=0x001e}
0x076f6…0772c Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x004c, t01=0x0054}
0x0772c…07736 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x008a}
0x07736…07752 Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x004c, t01=0x0094}
0x07752…0777a Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x004c, t01=0x00b0}
0x0777a…077a2 Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x004c, t01=0x00d8}
0x077a2…077ca Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x004c, t01=0x0100}
0x077ca…077d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0128}
0x077d4…077de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0132}
0x077de…077f4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x004c, t01=0x013c}
0x077f4…077fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0152}
0x077fe…0780c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x015c}
0x0780c…07816 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x016a}
0x07816…07838 Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 3 «, t00=0x004c, t01=0x0174}
0x07838…07842 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0008}
0x07842…07856 Head {h00=0x0010, h01=0x0050, text=»PL2CWT EQU *«, t00=0x004d, t01=0x0012}
0x07856…07860 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0026}
0x07860…07874 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x004d, t01=0x0030}
0x07874…07894 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x004d, t01=0x0044}
0x07894…078ba Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x004d, t01=0x0064}
0x078ba…078ea Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x004d, t01=0x008a}
0x078ea…078f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00ba}
0x078f4…0790e Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x004d, t01=0x00c4}
0x0790e…0792e Head {h00=0x001c, h01=0x0050, text=» DATA 2 PLC NUMBER (0-3)«, t00=0x004d, t01=0x00de}
0x0792e…07960 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x004d, t01=0x00fe}
0x07960…07986 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x004d, t01=0x0130}
0x07986…079a8 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x004d, t01=0x0156}
0x079a8…079d0 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREA «, t00=0x004d, t01=0x0178}
0x079d0…079da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0010}
0x079da…07a02 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x004e, t01=0x001a}
0x07a02…07a34 Head {h00=0x002e, h01=0x0050, text=» DATA OPARL3 OPEN LINE PARAMETER AREA ADDR«, t00=0x004e, t01=0x0042}
0x07a34…07a64 Head {h00=0x002c, h01=0x0050, text=» DATA INTPL3 WORK STATION TABLE ADDRESS «, t00=0x004e, t01=0x0074}
0x07a64…07a88 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x004e, t01=0x00a4}
0x07a88…07ab6 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x004e, t01=0x00c8}
0x07ab6…07ae2 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x004e, t01=0x00f6}
0x07ae2…07b04 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x004e, t01=0x0122}
0x07b04…07b36 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x004e, t01=0x0144}
0x07b36…07b66 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x004e, t01=0x0176}
0x07b66…07b70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0016}
0x07b70…07b8c Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x004f, t01=0x0020}
0x07b8c…07bb8 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA2 START I/O OPERATION«, t00=0x004f, t01=0x003c}
0x07bb8…07bee Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA2 RELEASE RCA AND RESET INTERRUPT«, t00=0x004f, t01=0x0068}
0x07bee…07bf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x009e}
0x07bf8…07c18 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x004f, t01=0x00a8}
0x07c18…07c4a Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x004f, t01=0x00c8}
0x07c4a…07c6e Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x004f, t01=0x00fa}
0x07c6e…07c96 Head {h00=0x0024, h01=0x0050, text=» DATA PL2CWT+CWTCID CID ADDRESS «, t00=0x004f, t01=0x011e}
0x07c96…07cba Head {h00=0x0020, h01=0x0050, text=» DATA INTLV2 INTERRUPT LEVEL«, t00=0x004f, t01=0x0146}
0x07cba…07cf0 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x004f, t01=0x016a}
0x07cf0…07d14 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0050, t01=0x0010}
0x07d14…07d3c Head {h00=0x0024, h01=0x0050, text=» DATA PL2CWT+CWTCCA CCA ADDRESS «, t00=0x0050, t01=0x0034}
0x07d3c…07d60 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0050, t01=0x005c}
0x07d60…07d88 Head {h00=0x0024, h01=0x0050, text=» DATA PL2CWT+CWTRCA RCA ADDRESS «, t00=0x0050, t01=0x0080}
0x07d88…07db0 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0050, t01=0x00a8}
0x07db0…07dd4 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0050, t01=0x00d0}
0x07dd4…07df8 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0050, t01=0x00f4}
0x07df8…07e02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0118}
0x07e02…07e2e Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0050, t01=0x0122}
0x07e2e…07e5e Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0050, t01=0x014e}
0x07e5e…07e96 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0050, t01=0x017e}
0x07e96…07ebe Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0051, t01=0x0026}
0x07ebe…07ee6 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0051, t01=0x004e}
0x07ee6…07f04 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0051, t01=0x0076}
0x07f04…07f20 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0051, t01=0x0094}
0x07f20…07f48 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0051, t01=0x00b0}
0x07f48…07f66 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0051, t01=0x00d8}
0x07f66…07f82 Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0051, t01=0x00f6}
0x07f82…07f8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0112}
0x07f8c…07fc2 Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0051, t01=0x011c}
0x07fc2…07ff8 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0051, t01=0x0152}
0x07ff8…08002 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0188}
0x08002…0801e (82, 0, 400) Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0052, t01=0x0004}
0x0801e…08046 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0052, t01=0x0020}
0x08046…0806e Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0052, t01=0x0048}
0x0806e…08096 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0052, t01=0x0070}
0x08096…080a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0098}
0x080a0…080aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00a2}
0x080aa…080c0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x0052, t01=0x00ac}
0x080c0…080ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00c2}
0x080ca…080d8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x00cc}
0x080d8…080e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00da}
0x080e2…08104 Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 4 «, t00=0x0052, t01=0x00e4}
0x08104…0810e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0106}
0x0810e…08122 Head {h00=0x0010, h01=0x0050, text=»PL3CWT EQU *«, t00=0x0052, t01=0x0110}
0x08122…0812c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0124}
0x0812c…08140 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0052, t01=0x012e}
0x08140…08160 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0052, t01=0x0142}
0x08160…08186 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0052, t01=0x0162}
0x08186…081b6 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0052, t01=0x0188}
0x081b6…081c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0028}
0x081c0…081da Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0053, t01=0x0032}
0x081da…081fa Head {h00=0x001c, h01=0x0050, text=» DATA 3 PLC NUMBER (0-3)«, t00=0x0053, t01=0x004c}
0x081fa…0822c Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0053, t01=0x006c}
0x0822c…08252 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0053, t01=0x009e}
0x08252…08274 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0053, t01=0x00c4}
0x08274…0829c Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREA «, t00=0x0053, t01=0x00e6}
0x0829c…082a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x010e}
0x082a6…082ce Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0053, t01=0x0118}
0x082ce…08300 Head {h00=0x002e, h01=0x0050, text=» DATA OPARL4 OPEN LINE PARAMETER AREA ADDR«, t00=0x0053, t01=0x0140}
0x08300…08330 Head {h00=0x002c, h01=0x0050, text=» DATA INTPL4 WORK STATION TABLE ADDRESS «, t00=0x0053, t01=0x0172}
0x08330…08354 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0054, t01=0x0012}
0x08354…08382 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0054, t01=0x0036}
0x08382…083ae Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0054, t01=0x0064}
0x083ae…083d0 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0054, t01=0x0090}
0x083d0…08402 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0054, t01=0x00b2}
0x08402…08432 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0054, t01=0x00e4}
0x08432…0843c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0114}
0x0843c…08458 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0054, t01=0x011e}
0x08458…08484 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA3 START I/O OPERATION«, t00=0x0054, t01=0x013a}
0x08484…084ba Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA3 RELEASE RCA AND RESET INTERRUPT«, t00=0x0054, t01=0x0166}
0x084ba…084c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x000c}
0x084c4…084e4 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0055, t01=0x0016}
0x084e4…08516 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0055, t01=0x0036}
0x08516…0853a Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0055, t01=0x0068}
0x0853a…08562 Head {h00=0x0024, h01=0x0050, text=» DATA PL3CWT+CWTCID CID ADDRESS «, t00=0x0055, t01=0x008c}
0x08562…08586 Head {h00=0x0020, h01=0x0050, text=» DATA INTLV3 INTERRUPT LEVEL«, t00=0x0055, t01=0x00b4}
0x08586…085bc Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0055, t01=0x00d8}
0x085bc…085e0 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0055, t01=0x010e}
0x085e0…08608 Head {h00=0x0024, h01=0x0050, text=» DATA PL3CWT+CWTCCA CCA ADDRESS «, t00=0x0055, t01=0x0132}
0x08608…0862c Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0055, t01=0x015a}
0x0862c…08654 Head {h00=0x0024, h01=0x0050, text=» DATA PL3CWT+CWTRCA RCA ADDRESS «, t00=0x0055, t01=0x017e}
0x08654…0867c Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0056, t01=0x0016}
0x0867c…086a0 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0056, t01=0x003e}
0x086a0…086c4 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0056, t01=0x0062}
0x086c4…086ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0086}
0x086ce…086fa Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0056, t01=0x0090}
0x086fa…0872a Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0056, t01=0x00bc}
0x0872a…08762 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0056, t01=0x00ec}
0x08762…0878a Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0056, t01=0x0124}
0x0878a…087b2 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0056, t01=0x014c}
0x087b2…087d0 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0056, t01=0x0174}
0x087d0…087ec (87, 0, 398) Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0057, t01=0x0004}
0x087ec…08814 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0057, t01=0x0020}
0x08814…08832 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0057, t01=0x0048}
0x08832…0884e Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0057, t01=0x0066}
0x0884e…08858 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0082}
0x08858…0888e Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0057, t01=0x008c}
0x0888e…088c4 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0057, t01=0x00c2}
0x088c4…088ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00f8}
0x088ce…088ea Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0057, t01=0x0102}
0x088ea…08912 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0057, t01=0x011e}
0x08912…0893a Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0057, t01=0x0146}
0x0893a…08962 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0057, t01=0x016e}
0x08962…0896e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0008}
0x0896e…08978 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0014}
0x08978…08986 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0058, t01=0x001e}
0x08986…0899c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0058, t01=0x002c}
0x0899c…089a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0042}
0x089a6…089ce Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 5 REMOTE«, t00=0x0058, t01=0x004c}
0x089ce…089d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0074}
0x089d8…089ec Head {h00=0x0010, h01=0x0050, text=»PR1CWT EQU *«, t00=0x0058, t01=0x007e}
0x089ec…089f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0092}
0x089f6…08a0a Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0058, t01=0x009c}
0x08a0a…08a2a Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0058, t01=0x00b0}
0x08a2a…08a50 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0058, t01=0x00d0}
0x08a50…08a80 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0058, t01=0x00f6}
0x08a80…08a8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0126}
0x08a8a…08aa4 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0058, t01=0x0130}
0x08aa4…08ac8 Head {h00=0x0020, h01=0x0050, text=» DATA 4 PLC NUMBER (4-7) =5 «, t00=0x0058, t01=0x014a}
0x08ac8…08afa Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0058, t01=0x016e}
0x08afa…08b20 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0059, t01=0x0010}
0x08b20…08b42 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0059, t01=0x0036}
0x08b42…08b6a Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS«, t00=0x0059, t01=0x0058}
0x08b6a…08b74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0080}
0x08b74…08b9c Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0059, t01=0x008a}
0x08b9c…08bd4 Head {h00=0x0034, h01=0x0050, text=» DATA OPARR1 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x0059, t01=0x00b2}
0x08bd4…08c04 Head {h00=0x002c, h01=0x0050, text=» DATA INTPR1 WORK STATION TABLE ADDRESS «, t00=0x0059, t01=0x00ea}
0x08c04…08c28 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0059, t01=0x011a}
0x08c28…08c56 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0059, t01=0x013e}
0x08c56…08c82 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0059, t01=0x016c}
0x08c82…08ca4 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x005a, t01=0x0008}
0x08ca4…08cd6 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x005a, t01=0x002a}
0x08cd6…08d06 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x005a, t01=0x005c}
0x08d06…08d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x008c}
0x08d10…08d2c Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x005a, t01=0x0096}
0x08d2c…08d58 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA4 START I/O OPERATION«, t00=0x005a, t01=0x00b2}
0x08d58…08d8e Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA4 RELEASE RCA AND RESET INTERRUPT«, t00=0x005a, t01=0x00de}
0x08d8e…08d98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0114}
0x08d98…08db8 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x005a, t01=0x011e}
0x08db8…08dea Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x005a, t01=0x013e}
0x08dea…08e0e Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x005a, t01=0x0170}
0x08e0e…08e36 (91, 0, 400) Head {h00=0x0024, h01=0x0050, text=» DATA PR1CWT+CWTCID CID ADDRESS «, t00=0x005b, t01=0x0004}
0x08e36…08e5a Head {h00=0x0020, h01=0x0050, text=» DATA INTRV0 INTERRUPT LEVEL«, t00=0x005b, t01=0x002c}
0x08e5a…08e90 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x005b, t01=0x0050}
0x08e90…08eb4 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x005b, t01=0x0086}
0x08eb4…08edc Head {h00=0x0024, h01=0x0050, text=» DATA PR1CWT+CWTCCA CCA ADDRESS «, t00=0x005b, t01=0x00aa}
0x08edc…08f00 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x005b, t01=0x00d2}
0x08f00…08f28 Head {h00=0x0024, h01=0x0050, text=» DATA PR1CWT+CWTRCA RCA ADDRESS «, t00=0x005b, t01=0x00f6}
0x08f28…08f50 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x005b, t01=0x011e}
0x08f50…08f74 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x005b, t01=0x0146}
0x08f74…08f98 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x005b, t01=0x016a}
0x08f98…08fa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x018e}
0x08fa2…08fce Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x005c, t01=0x0008}
0x08fce…08ffe Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x005c, t01=0x0034}
0x08ffe…09036 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x005c, t01=0x0064}
0x09036…0905e Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x005c, t01=0x009c}
0x0905e…09086 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x005c, t01=0x00c4}
0x09086…090a4 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x005c, t01=0x00ec}
0x090a4…090c0 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x005c, t01=0x010a}
0x090c0…090e8 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x005c, t01=0x0126}
0x090e8…09106 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x005c, t01=0x014e}
0x09106…09122 Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x005c, t01=0x016c}
0x09122…0912c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0188}
0x0912c…09162 (93, 0, 398) Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x005d, t01=0x0004}
0x09162…09198 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x005d, t01=0x003a}
0x09198…091a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0070}
0x091a2…091be Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x005d, t01=0x007a}
0x091be…091e6 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x005d, t01=0x0096}
0x091e6…0920e Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x005d, t01=0x00be}
0x0920e…09236 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x005d, t01=0x00e6}
0x09236…09240 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x010e}
0x09240…0924a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0118}
0x0924a…09258 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005d, t01=0x0122}
0x09258…0926e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x005d, t01=0x0130}
0x0926e…09278 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0146}
0x09278…092a0 Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 6 REMOTE«, t00=0x005d, t01=0x0150}
0x092a0…092aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0178}
0x092aa…092be Head {h00=0x0010, h01=0x0050, text=»PR2CWT EQU *«, t00=0x005d, t01=0x0182}
0x092be…092c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0008}
0x092c8…092dc Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x005e, t01=0x0012}
0x092dc…092fc Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x005e, t01=0x0026}
0x092fc…09322 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x005e, t01=0x0046}
0x09322…09352 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x005e, t01=0x006c}
0x09352…0935c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x009c}
0x0935c…09376 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x005e, t01=0x00a6}
0x09376…0939a Head {h00=0x0020, h01=0x0050, text=» DATA 5 PLC NUMBER (4-7) =5 «, t00=0x005e, t01=0x00c0}
0x0939a…093cc Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x005e, t01=0x00e4}
0x093cc…093f2 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x005e, t01=0x0116}
0x093f2…09416 Head {h00=0x0020, h01=0x0050, text=» DATA 0 LINE NO INDICATOR =5«, t00=0x005e, t01=0x013c}
0x09416…09442 Head {h00=0x0028, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS =5 «, t00=0x005e, t01=0x0160}
0x09442…0944c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x018c}
0x0944c…09474 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x005f, t01=0x0008}
0x09474…094ac Head {h00=0x0034, h01=0x0050, text=» DATA OPARR2 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x005f, t01=0x0030}
0x094ac…094dc Head {h00=0x002c, h01=0x0050, text=» DATA INTPR2 WORK STATION TABLE ADDRESS «, t00=0x005f, t01=0x0068}
0x094dc…09500 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x005f, t01=0x0098}
0x09500…0952e Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x005f, t01=0x00bc}
0x0952e…0955a Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x005f, t01=0x00ea}
0x0955a…0957c Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x005f, t01=0x0116}
0x0957c…095ae Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x005f, t01=0x0138}
0x095ae…095de Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x005f, t01=0x016a}
0x095de…095e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x000a}
0x095e8…09604 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0060, t01=0x0014}
0x09604…09630 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA5 START I/O OPERATION«, t00=0x0060, t01=0x0030}
0x09630…09666 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA5 RELEASE RCA AND RESET INTERRUPT«, t00=0x0060, t01=0x005c}
0x09666…09670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0092}
0x09670…09690 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0060, t01=0x009c}
0x09690…096c2 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0060, t01=0x00bc}
0x096c2…096e6 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0060, t01=0x00ee}
0x096e6…0970e Head {h00=0x0024, h01=0x0050, text=» DATA PR2CWT+CWTCID CID ADDRESS «, t00=0x0060, t01=0x0112}
0x0970e…09732 Head {h00=0x0020, h01=0x0050, text=» DATA INTRV1 INTERRUPT LEVEL«, t00=0x0060, t01=0x013a}
0x09732…09768 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0060, t01=0x015e}
0x09768…0978c (97, 0, 400) Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0061, t01=0x0004}
0x0978c…097b4 Head {h00=0x0024, h01=0x0050, text=» DATA PR2CWT+CWTCCA CCA ADDRESS «, t00=0x0061, t01=0x0028}
0x097b4…097d8 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0061, t01=0x0050}
0x097d8…09800 Head {h00=0x0024, h01=0x0050, text=» DATA PR2CWT+CWTRCA RCA ADDRESS «, t00=0x0061, t01=0x0074}
0x09800…09828 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0061, t01=0x009c}
0x09828…0984c Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0061, t01=0x00c4}
0x0984c…09870 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0061, t01=0x00e8}
0x09870…0987a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x010c}
0x0987a…098a6 Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0061, t01=0x0116}
0x098a6…098d6 Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0061, t01=0x0142}
0x098d6…0990e Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0061, t01=0x0172}
0x0990e…09936 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0062, t01=0x001a}
0x09936…0995e Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0062, t01=0x0042}
0x0995e…0997c Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0062, t01=0x006a}
0x0997c…09998 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0062, t01=0x0088}
0x09998…099c0 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0062, t01=0x00a4}
0x099c0…099de Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0062, t01=0x00cc}
0x099de…099fa Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0062, t01=0x00ea}
0x099fa…09a04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0106}
0x09a04…09a3a Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0062, t01=0x0110}
0x09a3a…09a70 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0062, t01=0x0146}
0x09a70…09a7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x017c}
0x09a7a…09a96 Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0062, t01=0x0186}
0x09a96…09abe Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0063, t01=0x0012}
0x09abe…09ae6 Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0063, t01=0x003a}
0x09ae6…09b0e Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0063, t01=0x0062}
0x09b0e…09b18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x008a}
0x09b18…09b22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0094}
0x09b22…09b30 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x009e}
0x09b30…09b46 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0063, t01=0x00ac}
0x09b46…09b50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00c2}
0x09b50…09b78 Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 7 REMOTE«, t00=0x0063, t01=0x00cc}
0x09b78…09b82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00f4}
0x09b82…09b96 Head {h00=0x0010, h01=0x0050, text=»PR3CWT EQU *«, t00=0x0063, t01=0x00fe}
0x09b96…09ba0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0112}
0x09ba0…09bb4 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0063, t01=0x011c}
0x09bb4…09bd4 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0063, t01=0x0130}
0x09bd4…09bfa Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0063, t01=0x0150}
0x09bfa…09c2a Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0063, t01=0x0176}
0x09c2a…09c34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0016}
0x09c34…09c4e Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0064, t01=0x0020}
0x09c4e…09c72 Head {h00=0x0020, h01=0x0050, text=» DATA 6 PLC NUMBER (4-7) =5 «, t00=0x0064, t01=0x003a}
0x09c72…09ca4 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0064, t01=0x005e}
0x09ca4…09cca Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0064, t01=0x0090}
0x09cca…09cec Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0064, t01=0x00b6}
0x09cec…09d14 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS«, t00=0x0064, t01=0x00d8}
0x09d14…09d1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0100}
0x09d1e…09d46 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0064, t01=0x010a}
0x09d46…09d7e Head {h00=0x0034, h01=0x0050, text=» DATA OPARR3 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x0064, t01=0x0132}
0x09d7e…09dae Head {h00=0x002c, h01=0x0050, text=» DATA INTPR3 WORK STATION TABLE ADDRESS «, t00=0x0064, t01=0x016a}
0x09dae…09dd2 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0065, t01=0x000a}
0x09dd2…09e00 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0065, t01=0x002e}
0x09e00…09e2c Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0065, t01=0x005c}
0x09e2c…09e4e Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0065, t01=0x0088}
0x09e4e…09e80 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0065, t01=0x00aa}
0x09e80…09eb0 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0065, t01=0x00dc}
0x09eb0…09eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x010c}
0x09eba…09ed6 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0065, t01=0x0116}
0x09ed6…09f02 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA6 START I/O OPERATION«, t00=0x0065, t01=0x0132}
0x09f02…09f38 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA6 RELEASE RCA AND RESET INTERRUPT«, t00=0x0065, t01=0x015e}
0x09f38…09f42 (102, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0004}
0x09f42…09f62 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0066, t01=0x000e}
0x09f62…09f94 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0066, t01=0x002e}
0x09f94…09fb8 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0066, t01=0x0060}
0x09fb8…09fe0 Head {h00=0x0024, h01=0x0050, text=» DATA PR3CWT+CWTCID CID ADDRESS «, t00=0x0066, t01=0x0084}
0x09fe0…0a004 Head {h00=0x0020, h01=0x0050, text=» DATA INTRV2 INTERRUPT LEVEL«, t00=0x0066, t01=0x00ac}
0x0a004…0a03a Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0066, t01=0x00d0}
0x0a03a…0a05e Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0066, t01=0x0106}
0x0a05e…0a086 Head {h00=0x0024, h01=0x0050, text=» DATA PR3CWT+CWTCCA CCA ADDRESS «, t00=0x0066, t01=0x012a}
0x0a086…0a0aa Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0066, t01=0x0152}
0x0a0aa…0a0d2 Head {h00=0x0024, h01=0x0050, text=» DATA PR3CWT+CWTRCA RCA ADDRESS «, t00=0x0066, t01=0x0176}
0x0a0d2…0a0fa Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0067, t01=0x000e}
0x0a0fa…0a11e Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0067, t01=0x0036}
0x0a11e…0a142 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0067, t01=0x005a}
0x0a142…0a14c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x007e}
0x0a14c…0a178 Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0067, t01=0x0088}
0x0a178…0a1a8 Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0067, t01=0x00b4}
0x0a1a8…0a1e0 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0067, t01=0x00e4}
0x0a1e0…0a208 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0067, t01=0x011c}
0x0a208…0a230 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0067, t01=0x0144}
0x0a230…0a24e Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0067, t01=0x016c}
0x0a24e…0a26a Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0067, t01=0x018a}
0x0a26a…0a292 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0068, t01=0x0016}
0x0a292…0a2b0 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0068, t01=0x003e}
0x0a2b0…0a2cc Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0068, t01=0x005c}
0x0a2cc…0a2d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0078}
0x0a2d6…0a30c Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0068, t01=0x0082}
0x0a30c…0a342 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0068, t01=0x00b8}
0x0a342…0a34c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00ee}
0x0a34c…0a368 Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0068, t01=0x00f8}
0x0a368…0a390 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0068, t01=0x0114}
0x0a390…0a3b8 Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0068, t01=0x013c}
0x0a3b8…0a3e0 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0068, t01=0x0164}
0x0a3e0…0a3ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x018c}
0x0a3ea…0a3f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0008}
0x0a3f4…0a402 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0069, t01=0x0012}
0x0a402…0a418 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0069, t01=0x0020}
0x0a418…0a422 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0036}
0x0a422…0a44a Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 8 REMOTE«, t00=0x0069, t01=0x0040}
0x0a44a…0a454 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0068}
0x0a454…0a468 Head {h00=0x0010, h01=0x0050, text=»PR4CWT EQU *«, t00=0x0069, t01=0x0072}
0x0a468…0a472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0086}
0x0a472…0a486 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0069, t01=0x0090}
0x0a486…0a4a6 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0069, t01=0x00a4}
0x0a4a6…0a4cc Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0069, t01=0x00c4}
0x0a4cc…0a4fc Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0069, t01=0x00ea}
0x0a4fc…0a506 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x011a}
0x0a506…0a520 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0069, t01=0x0124}
0x0a520…0a544 Head {h00=0x0020, h01=0x0050, text=» DATA 7 PLC NUMBER (4-7) =5 «, t00=0x0069, t01=0x013e}
0x0a544…0a576 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0069, t01=0x0162}
0x0a576…0a59c (106, 0, 400) Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x006a, t01=0x0004}
0x0a59c…0a5be Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x006a, t01=0x002a}
0x0a5be…0a5e6 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS«, t00=0x006a, t01=0x004c}
0x0a5e6…0a5f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0074}
0x0a5f0…0a618 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x006a, t01=0x007e}
0x0a618…0a650 Head {h00=0x0034, h01=0x0050, text=» DATA OPARR4 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x006a, t01=0x00a6}
0x0a650…0a680 Head {h00=0x002c, h01=0x0050, text=» DATA INTPR4 WORK STATION TABLE ADDRESS «, t00=0x006a, t01=0x00de}
0x0a680…0a6a4 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x006a, t01=0x010e}
0x0a6a4…0a6d2 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x006a, t01=0x0132}
0x0a6d2…0a6fe Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x006a, t01=0x0160}
0x0a6fe…0a720 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x006a, t01=0x018c}
0x0a720…0a752 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x006b, t01=0x001e}
0x0a752…0a782 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x006b, t01=0x0050}
0x0a782…0a78c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0080}
0x0a78c…0a7a8 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x006b, t01=0x008a}
0x0a7a8…0a7d4 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA7 START I/O OPERATION«, t00=0x006b, t01=0x00a6}
0x0a7d4…0a80a Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA7 RELEASE RCA AND RESET INTERRUPT«, t00=0x006b, t01=0x00d2}
0x0a80a…0a814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0108}
0x0a814…0a834 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x006b, t01=0x0112}
0x0a834…0a866 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x006b, t01=0x0132}
0x0a866…0a88a Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x006b, t01=0x0164}
0x0a88a…0a8b2 Head {h00=0x0024, h01=0x0050, text=» DATA PR4CWT+CWTCID CID ADDRESS «, t00=0x006b, t01=0x0188}
0x0a8b2…0a8d6 Head {h00=0x0020, h01=0x0050, text=» DATA INTRV3 INTERRUPT LEVEL«, t00=0x006c, t01=0x0020}
0x0a8d6…0a90c Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x006c, t01=0x0044}
0x0a90c…0a930 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x006c, t01=0x007a}
0x0a930…0a958 Head {h00=0x0024, h01=0x0050, text=» DATA PR4CWT+CWTCCA CCA ADDRESS «, t00=0x006c, t01=0x009e}
0x0a958…0a97c Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x006c, t01=0x00c6}
0x0a97c…0a9a4 Head {h00=0x0024, h01=0x0050, text=» DATA PR4CWT+CWTRCA RCA ADDRESS «, t00=0x006c, t01=0x00ea}
0x0a9a4…0a9cc Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x006c, t01=0x0112}
0x0a9cc…0a9f0 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x006c, t01=0x013a}
0x0a9f0…0aa14 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x006c, t01=0x015e}
0x0aa14…0aa1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0182}
0x0aa1e…0aa4a Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x006c, t01=0x018c}
0x0aa4a…0aa7a Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x006d, t01=0x0028}
0x0aa7a…0aab2 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x006d, t01=0x0058}
0x0aab2…0aada Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x006d, t01=0x0090}
0x0aada…0ab02 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x006d, t01=0x00b8}
0x0ab02…0ab20 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x006d, t01=0x00e0}
0x0ab20…0ab3c Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x006d, t01=0x00fe}
0x0ab3c…0ab64 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x006d, t01=0x011a}
0x0ab64…0ab82 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x006d, t01=0x0142}
0x0ab82…0ab9e Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x006d, t01=0x0160}
0x0ab9e…0aba8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x017c}
0x0aba8…0abde Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x006d, t01=0x0186}
0x0abde…0ac14 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x006e, t01=0x002c}
0x0ac14…0ac1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0062}
0x0ac1e…0ac3a Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x006e, t01=0x006c}
0x0ac3a…0ac62 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x006e, t01=0x0088}
0x0ac62…0ac8a Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x006e, t01=0x00b0}
0x0ac8a…0acb2 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x006e, t01=0x00d8}
0x0acb2…0acbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0100}
0x0acbc…0acc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x010a}
0x0acc6…0acd2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x0114}
0x0acd2…0ace0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006e, t01=0x0120}
0x0ace0…0acea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x012e}
0x0acea…0ad14 Head {h00=0x0026, h01=0x0050, text=»* I/O COMPLETION DISPATCH TABLE«, t00=0x006e, t01=0x0138}
0x0ad14…0ad1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0162}
0x0ad1e…0ad54 Head {h00=0x0032, h01=0x0050, text=»* THE MOST FREQUENTLY USED ROUTINES ARE PLACED«, t00=0x006e, t01=0x016c}
0x0ad54…0ad88 Head {h00=0x0030, h01=0x0050, text=»* AT THE END OF THE TABLE, AS IT IS SCANNED «, t00=0x006f, t01=0x0012}
0x0ad88…0ada0 Head {h00=0x0014, h01=0x0050, text=»* FROM THE END. «, t00=0x006f, t01=0x0046}
0x0ada0…0adaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x005e}
0x0adaa…0adbe Head {h00=0x0010, h01=0x0050, text=»CMDTAB EQU *«, t00=0x006f, t01=0x0068}
0x0adbe…0adf2 Head {h00=0x0030, h01=0x0050, text=» DATA CMDTC COMMAND CODE "TEST CHANNEL UNIT"«, t00=0x006f, t01=0x007c}
0x0adf2…0ae2c Head {h00=0x0036, h01=0x0050, text=» DATA COMPTC START OF "TEST CU" COMPLETION ROUTINE«, t00=0x006f, t01=0x00b0}
0x0ae2c…0ae60 Head {h00=0x0030, h01=0x0050, text=» DATA 0 ALLOWED STATUS FOR "TEST CU" COMMAND«, t00=0x006f, t01=0x00ea}
0x0ae60…0ae90 Head {h00=0x002c, h01=0x0050, text=»CMDTB1 EQU *-CMDTAB LENGTH OF ONE ENTRY «, t00=0x006f, t01=0x011e}
0x0ae90…0aeae Head {h00=0x001a, h01=0x0050, text=» DATA CMDOP OPEN LINE «, t00=0x006f, t01=0x014e}
0x0aeae…0aec2 Head {h00=0x0010, h01=0x0050, text=» DATA COMPOP«, t00=0x006f, t01=0x016c}
0x0aec2…0aed2 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x006f, t01=0x0180}
0x0aed2…0aeee Head {h00=0x0018, h01=0x0050, text=» DATA CMDOD OPEN DLS«, t00=0x006f, t01=0x0190}
0x0aeee…0af02 Head {h00=0x0010, h01=0x0050, text=» DATA COMPOD«, t00=0x0070, t01=0x001c}
0x0af02…0af1e Head {h00=0x0018, h01=0x0050, text=» DATA STADNO+STANOC «, t00=0x0070, t01=0x0030}
0x0af1e…0af34 Head {h00=0x0012, h01=0x0050, text=» IFT PLCTST=1 «, t00=0x0070, t01=0x004c}
0x0af34…0af5c Head {h00=0x0024, h01=0x0050, text=» DATA CMDPS GET LINE STATISTICS «, t00=0x0070, t01=0x0062}
0x0af5c…0af70 Head {h00=0x0010, h01=0x0050, text=» DATA COMPPS«, t00=0x0070, t01=0x008a}
0x0af70…0af96 Head {h00=0x0022, h01=0x0050, text=»STAE2 EQU STAREQ+STAILL DUMMY «, t00=0x0070, t01=0x009e}
0x0af96…0afbc Head {h00=0x0022, h01=0x0050, text=»STAE3 EQU STASEQ+STANOB DUMMY «, t00=0x0070, t01=0x00c4}
0x0afbc…0afd6 Head {h00=0x0016, h01=0x0050, text=» DATA STAE2+STAE3 «, t00=0x0070, t01=0x00ea}
0x0afd6…0affc Head {h00=0x0022, h01=0x0050, text=» DATA CMDDS GET DLS STATISTICS«, t00=0x0070, t01=0x0104}
0x0affc…0b010 Head {h00=0x0010, h01=0x0050, text=» DATA COMPDS«, t00=0x0070, t01=0x012a}
0x0b010…0b02a Head {h00=0x0016, h01=0x0050, text=» DATA STAE2+STAE3 «, t00=0x0070, t01=0x013e}
0x0b02a…0b050 Head {h00=0x0022, h01=0x0050, text=» DATA CMDRM READ LOCAL MEMORY «, t00=0x0070, t01=0x0158}
0x0b050…0b064 Head {h00=0x0010, h01=0x0050, text=» DATA COMPRM«, t00=0x0070, t01=0x017e}
0x0b064…0b078 (113, 0, 400) Head {h00=0x0010, h01=0x0050, text=» DATA STAE2 «, t00=0x0071, t01=0x0004}
0x0b078…0b082 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0018}
0x0b082…0b090 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0071, t01=0x0022}
0x0b090…0b09a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0030}
0x0b09a…0b0a6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x003a}
0x0b0a6…0b0c8 Head {h00=0x001e, h01=0x0050, text=» DATA CMDSW STANDARD WRITE«, t00=0x0071, t01=0x0046}
0x0b0c8…0b0dc Head {h00=0x0010, h01=0x0050, text=» DATA COMPSW«, t00=0x0071, t01=0x0068}
0x0b0dc…0b0f0 Head {h00=0x0010, h01=0x0050, text=» DATA STAERR«, t00=0x0071, t01=0x007c}
0x0b0f0…0b10e Head {h00=0x001a, h01=0x0050, text=» DATA CMDFW FAST WRITE«, t00=0x0071, t01=0x0090}
0x0b10e…0b122 Head {h00=0x0010, h01=0x0050, text=» DATA COMPFW«, t00=0x0071, t01=0x00ae}
0x0b122…0b136 Head {h00=0x0010, h01=0x0050, text=» DATA STAERR«, t00=0x0071, t01=0x00c2}
0x0b136…0b156 Head {h00=0x001c, h01=0x0050, text=» DATA CMDGR GENERAL READ«, t00=0x0071, t01=0x00d6}
0x0b156…0b16a Head {h00=0x0010, h01=0x0050, text=» DATA COMPGR«, t00=0x0071, t01=0x00f6}
0x0b16a…0b17a Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0071, t01=0x010a}
0x0b17a…0b1a2 Head {h00=0x0024, h01=0x0050, text=»CMDTBL EQU *-CMDTAB TABLE LENGTH«, t00=0x0071, t01=0x011a}
0x0b1a2…0b1ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0142}
0x0b1ac…0b1ba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0071, t01=0x014c}
0x0b1ba…0b1c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x015a}
0x0b1c4…0b1f0 Head {h00=0x0028, h01=0x0050, text=»* READ COMPLETION DISPATCH TABLE «, t00=0x0071, t01=0x0164}
0x0b1f0…0b1fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0190}
0x0b1fa…0b230 Head {h00=0x0032, h01=0x0050, text=»* THIS TABLE IS INDEXED BY THE "MESSAGE TYPE" «, t00=0x0072, t01=0x000a}
0x0b230…0b252 Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS DEFINED ABOVE.«, t00=0x0072, t01=0x0040}
0x0b252…0b266 Head {h00=0x0010, h01=0x0050, text=»REAROU EQU *«, t00=0x0072, t01=0x0062}
0x0b266…0b288 Head {h00=0x001e, h01=0x0050, text=» DATA GRERR1 ERROR ROUTINE«, t00=0x0072, t01=0x0076}
0x0b288…0b2c2 Head {h00=0x0036, h01=0x0050, text=» DATA GRERR1 DATA PACKET NO FLOW C. (NOT IMPLEM.) «, t00=0x0072, t01=0x0098}
0x0b2c2…0b2f0 Head {h00=0x002a, h01=0x0050, text=» DATA GRSTAT DEVICE STATUS DATA PACKET«, t00=0x0072, t01=0x00d2}
0x0b2f0…0b318 Head {h00=0x0024, h01=0x0050, text=» DATA GRDATA NORMAL DATA PACKET «, t00=0x0072, t01=0x0100}
0x0b318…0b340 Head {h00=0x0024, h01=0x0050, text=» DATA GRRR RECIEVE READY PACKET «, t00=0x0072, t01=0x0128}
0x0b340…0b360 Head {h00=0x001c, h01=0x0050, text=» DATA GRRES RESET PACKET«, t00=0x0072, t01=0x0150}
0x0b360…0b398 Head {h00=0x0034, h01=0x0050, text=» DATA GRERR1 RESET CONFIRM. PACKET (NOT IMPLEM.)«, t00=0x0072, t01=0x0170}
0x0b398…0b3a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0018}
0x0b3a2…0b3ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0022}
0x0b3ac…0b3d8 Head {h00=0x0028, h01=0x0050, text=»* WRITE COMPLETION DISPATCH TABLE«, t00=0x0073, t01=0x002c}
0x0b3d8…0b3e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0058}
0x0b3e2…0b418 Head {h00=0x0032, h01=0x0050, text=»* THIS TABLE IS INDEXED BY THE "MESSAGE TYPE" «, t00=0x0073, t01=0x0062}
0x0b418…0b43a Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS DEFINED ABOVE.«, t00=0x0073, t01=0x0098}
0x0b43a…0b44e Head {h00=0x0010, h01=0x0050, text=»WRIROU EQU *«, t00=0x0073, t01=0x00ba}
0x0b44e…0b470 Head {h00=0x001e, h01=0x0050, text=» DATA WRERR ERROR ROUTINE «, t00=0x0073, t01=0x00ce}
0x0b470…0b4a6 Head {h00=0x0032, h01=0x0050, text=» DATA WRNFLO DATA PACKET WITHOUT FLOW CONTROL «, t00=0x0073, t01=0x00f0}
0x0b4a6…0b4dc Head {h00=0x0032, h01=0x0050, text=» DATA WRERR DEVICE STATUS DATA (NOT RELEVANT) «, t00=0x0073, t01=0x0126}
0x0b4dc…0b504 Head {h00=0x0024, h01=0x0050, text=» DATA WRDATA NORMAL DATA PACKET «, t00=0x0073, t01=0x015c}
0x0b504…0b52c Head {h00=0x0024, h01=0x0050, text=» DATA WRRR RECIEVE READY PACKET «, t00=0x0073, t01=0x0184}
0x0b52c…0b55e Head {h00=0x002e, h01=0x0050, text=» DATA WRERR RESET PACKET (NOT IMPLEMENTED)«, t00=0x0074, t01=0x001c}
0x0b55e…0b58c Head {h00=0x002a, h01=0x0050, text=» DATA WRRESC RESET CONFIRMATION PACKET«, t00=0x0074, t01=0x004e}
0x0b58c…0b596 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x007c}
0x0b596…0b5a4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x0086}
0x0b5a4…0b5ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0094}
0x0b5ae…0b5ca Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0074, t01=0x009e}
0x0b5ca…0b5e6 Head {h00=0x0018, h01=0x0050, text=»* REQUEST ROUTINES *«, t00=0x0074, t01=0x00ba}
0x0b5e6…0b602 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0074, t01=0x00d6}
0x0b602…0b60c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00f2}
0x0b60c…0b648 Head {h00=0x0038, h01=0x0050, text=»* THIS SECTION CONTAINS REQUEST HANDLING ROUTINES.«, t00=0x0074, t01=0x00fc}
0x0b648…0b682 Head {h00=0x0036, h01=0x0050, text=»* THE REQUEST ROUTINES ARE CALLED FROM TERMINAL «, t00=0x0074, t01=0x0138}
0x0b682…0b6bc Head {h00=0x0036, h01=0x0050, text=»* DEVICE DRIVERS. THIS IS NORMALLY DONE THROUGH «, t00=0x0074, t01=0x0172}
0x0b6bc…0b6fa Head {h00=0x003a, h01=0x0050, text=»* THE TERMINAL NETWORK DISTRIBUTOR DRIVER (DRND01). «, t00=0x0075, t01=0x001c}
0x0b6fa…0b730 Head {h00=0x0032, h01=0x0050, text=»* THE DISTRIBUTOR DRIVER WILL SWITCH CALL TO«, t00=0x0075, t01=0x005a}
0x0b730…0b76a Head {h00=0x0036, h01=0x0050, text=»* CONNECTED LINE DRIVER. RETURN IS MADE DIRECTLY«, t00=0x0075, t01=0x0090}
0x0b76a…0b7a2 Head {h00=0x0034, h01=0x0050, text=»* FROM THIS DRIVER TO TERMINAL DEVICE DRIVER. «, t00=0x0075, t01=0x00ca}
0x0b7a2…0b7dc Head {h00=0x0036, h01=0x0050, text=»* A CALL WILL NORMALLY RESULT IN A WAIT FOR SOME«, t00=0x0075, t01=0x0102}
0x0b7dc…0b818 Head {h00=0x0038, h01=0x0050, text=»* I/O ACTION AND DISPATCHING. THIS MEANS, THAT AT «, t00=0x0075, t01=0x013c}
0x0b818…0b854 Head {h00=0x0038, h01=0x0050, text=»* TIME OF CALL THE DEVICE DRIVER MAY NOT HAVE ANY «, t00=0x0075, t01=0x0178}
0x0b854…0b876 Head {h00=0x001e, h01=0x0050, text=»* DATA ON THE A15 STACK.«, t00=0x0076, t01=0x0024}
0x0b876…0b880 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0046}
0x0b880…0b8b4 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x0076, t01=0x0050}
0x0b8b4…0b8be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0084}
0x0b8be…0b8d6 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x0076, t01=0x008e}
0x0b8d6…0b8e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00a6}
0x0b8e0…0b908 Head {h00=0x0024, h01=0x0050, text=»* PLCHRI INPUT OF ONE CHARACTER «, t00=0x0076, t01=0x00b0}
0x0b908…0b936 Head {h00=0x002a, h01=0x0050, text=»* PLSTBL DEFINE START OF OUTPUT BLOCK «, t00=0x0076, t01=0x00d8}
0x0b936…0b95e Head {h00=0x0024, h01=0x0050, text=»* PLCHRO OUTPUT OF ONE CHARACTER«, t00=0x0076, t01=0x0106}
0x0b95e…0b98a Head {h00=0x0028, h01=0x0050, text=»* PLENBL DEFINE END OF OUTPUT BLOCK «, t00=0x0076, t01=0x012e}
0x0b98a…0b9b4 Head {h00=0x0026, h01=0x0050, text=»* PLTEST PERFORM PLC TEST FUNCTION«, t00=0x0076, t01=0x015a}
0x0b9b4…0b9be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0184}
0x0b9be…0b9cc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0076, t01=0x018e}
0x0b9cc…0b9d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x000c}
0x0b9d6…0ba1a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0077, t01=0x0016}
0x0ba1a…0ba24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x005a}
0x0ba24…0ba3c Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0077, t01=0x0064}
0x0ba3c…0ba4c Head {h00=0x000c, h01=0x0050, text=»* PLCHRI«, t00=0x0077, t01=0x007c}
0x0ba4c…0ba56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x008c}
0x0ba56…0ba6a Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0077, t01=0x0096}
0x0ba6a…0baa0 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE FETCHES ONE CHARACTER FROM THE «, t00=0x0077, t01=0x00aa}
0x0baa0…0bad8 Head {h00=0x0034, h01=0x0050, text=»* INPUT BUFFER. IF NO BUFFER HAS ARRIVED, "INPUT«, t00=0x0077, t01=0x00e0}
0x0bad8…0bb0c Head {h00=0x0030, h01=0x0050, text=»* REQUESTED" FLAG IN DWT IS SET, AND CALLING«, t00=0x0077, t01=0x0118}
0x0bb0c…0bb42 Head {h00=0x0032, h01=0x0050, text=»* PROCESS IS SUSPENDED UNTIL A BUFFER ARRIVES.«, t00=0x0077, t01=0x014c}
0x0bb42…0bb4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0182}
0x0bb4c…0bb5c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0077, t01=0x018c}
0x0bb5c…0bb74 Head {h00=0x0014, h01=0x0050, text=»* ABI INPTAB,A1 «, t00=0x0078, t01=0x000c}
0x0bb74…0bb8a Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLCHRI«, t00=0x0078, t01=0x0024}
0x0bb8a…0bb94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x003a}
0x0bb94…0bba4 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0078, t01=0x0044}
0x0bba4…0bbc0 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0078, t01=0x0054}
0x0bbc0…0bbca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0070}
0x0bbca…0bbdc Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0078, t01=0x007a}
0x0bbdc…0bc00 Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x0078, t01=0x008c}
0x0bc00…0bc22 Head {h00=0x001e, h01=0x0050, text=»* A1 = BITS 0-14 CHANGED«, t00=0x0078, t01=0x00b0}
0x0bc22…0bc4e Head {h00=0x0028, h01=0x0050, text=»* BIT 15 1 IF MORE CHAR IN BUFFER «, t00=0x0078, t01=0x00d2}
0x0bc4e…0bc6c Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x0078, t01=0x00fe}
0x0bc6c…0bc8c Head {h00=0x001c, h01=0x0050, text=»* BITS 8-15 CHARACTER «, t00=0x0078, t01=0x011c}
0x0bc8c…0bca6 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x0078, t01=0x013c}
0x0bca6…0bcb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0156}
0x0bcb0…0bcf4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0078, t01=0x0160}
0x0bcf4…0bcfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0014}
0x0bcfe…0bd12 Head {h00=0x0010, h01=0x0050, text=»PLCHRI EQU *«, t00=0x0079, t01=0x001e}
0x0bd12…0bd26 Head {h00=0x0010, h01=0x0050, text=»PRCHRI EQU *«, t00=0x0079, t01=0x0032}
0x0bd26…0bd42 Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 PUSH A4 «, t00=0x0079, t01=0x0046}
0x0bd42…0bd6e Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTLD1,A6 INPUT TEXT WAITING?«, t00=0x0079, t01=0x0062}
0x0bd6e…0bd94 Head {h00=0x0022, h01=0x0050, text=» RF(Z) CI100 NO, WAIT FOR TEXT«, t00=0x0079, t01=0x008e}
0x0bd94…0bd9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00b4}
0x0bd9e…0bdac Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0079, t01=0x00be}
0x0bdac…0bdb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00cc}
0x0bdb6…0bde6 Head {h00=0x002c, h01=0x0050, text=» CF A15,PLGECH GET CHARACTER FROM BUFFER«, t00=0x0079, t01=0x00d6}
0x0bde6…0be0c Head {h00=0x0022, h01=0x0050, text=» LDR A1,A1 CHECK RETURN STATUS«, t00=0x0079, t01=0x0106}
0x0be0c…0be3c Head {h00=0x002c, h01=0x0050, text=» RF(N) CI100 BUFFER EMPTY, WAIT FOR NEXT«, t00=0x0079, t01=0x012c}
0x0be3c…0be58 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x0079, t01=0x015c}
0x0be58…0be82 Head {h00=0x0026, h01=0x0050, text=» RF CI110 RETURN TO DEVICE DRIVER «, t00=0x0079, t01=0x0178}
0x0be82…0be8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0012}
0x0be8c…0be96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x001c}
0x0be96…0beaa Head {h00=0x0010, h01=0x0050, text=»CI100 EQU * «, t00=0x007a, t01=0x0026}
0x0beaa…0bec6 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x007a, t01=0x003a}
0x0bec6…0bef4 Head {h00=0x002a, h01=0x0050, text=» LDK A2,DWFINP FLAG "INPUT REQUESTED" «, t00=0x007a, t01=0x0056}
0x0bef4…0bf28 Head {h00=0x0030, h01=0x0050, text=» ORS A2,DWTST,A6 SET INPUT REQUESTED IN DWT «, t00=0x007a, t01=0x0084}
0x0bf28…0bf58 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x007a, t01=0x00b8}
0x0bf58…0bf7c Head {h00=0x0020, h01=0x0050, text=» ABL PLDISP LOCAL DISPATCHER«, t00=0x007a, t01=0x00e8}
0x0bf7c…0bf86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x010c}
0x0bf86…0bf90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0116}
0x0bf90…0bfce Head {h00=0x003a, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN A NEW BUFFER HAS ARRIVED «, t00=0x007a, t01=0x0120}
0x0bfce…0bff0 Head {h00=0x001e, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x007a, t01=0x015e}
0x0bff0…0c020 Head {h00=0x002c, h01=0x0050, text=»* A1 = NR OF CHARACTERS LEFT IN BUFFER «, t00=0x007a, t01=0x0180}
0x0c020…0c03e Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x007b, t01=0x0020}
0x0c03e…0c05e Head {h00=0x001c, h01=0x0050, text=»* BITS 8-15 CHARACTER «, t00=0x007b, t01=0x003e}
0x0c05e…0c07c Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x007b, t01=0x005e}
0x0c07c…0c098 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x007b, t01=0x007c}
0x0c098…0c0a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0098}
0x0c0a2…0c0b6 Head {h00=0x0010, h01=0x0050, text=»INPRST EQU *«, t00=0x007b, t01=0x00a2}
0x0c0b6…0c0ec Head {h00=0x0032, h01=0x0050, text=» LDKL A3,/FFFF-DWFINP MASK FOR INPUT REQUESTED«, t00=0x007b, t01=0x00b6}
0x0c0ec…0c110 Head {h00=0x0020, h01=0x0050, text=» ANS A3,DWTST,A6 RESET FLAG «, t00=0x007b, t01=0x00ec}
0x0c110…0c13c Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTLD1,A6 LINK BUFFER TO DWT «, t00=0x007b, t01=0x0110}
0x0c13c…0c146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x013c}
0x0c146…0c176 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDGET8 GET A3-A5, A7-A8 FROM DWT«, t00=0x007b, t01=0x0146}
0x0c176…0c180 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0176}
0x0c180…0c18e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007b, t01=0x0180}
0x0c18e…0c198 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x018e}
0x0c198…0c1ac Head {h00=0x0010, h01=0x0050, text=»CI110 EQU * «, t00=0x007c, t01=0x0008}
0x0c1ac…0c1d0 Head {h00=0x0020, h01=0x0050, text=»* RETURN TO DEVICE DRIVER«, t00=0x007c, t01=0x001c}
0x0c1d0…0c1fc Head {h00=0x0028, h01=0x0050, text=» LDR A1,A1 ANY CHAR LEFT IN BUFFER? «, t00=0x007c, t01=0x0040}
0x0c1fc…0c21e Head {h00=0x001e, h01=0x0050, text=» RF(Z) CI120 NO, CONTINUE «, t00=0x007c, t01=0x006c}
0x0c21e…0c248 Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 INDICATE MORE CHARACTERS«, t00=0x007c, t01=0x008e}
0x0c248…0c25a Head {h00=0x000e, h01=0x0050, text=» RF CI130 «, t00=0x007c, t01=0x00b8}
0x0c25a…0c264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00ca}
0x0c264…0c278 Head {h00=0x0010, h01=0x0050, text=»CI120 EQU * «, t00=0x007c, t01=0x00d4}
0x0c278…0c29c Head {h00=0x0020, h01=0x0050, text=» CM DWTLD1,A6 UNLINK BUFFER «, t00=0x007c, t01=0x00e8}
0x0c29c…0c2b0 Head {h00=0x0010, h01=0x0050, text=»CI130 EQU * «, t00=0x007c, t01=0x010c}
0x0c2b0…0c2bc Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x007c, t01=0x0120}
0x0c2bc…0c2cc Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007c, t01=0x012c}
0x0c2cc…0c2d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x013c}
0x0c2d6…0c2e4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007c, t01=0x0146}
0x0c2e4…0c2ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0154}
0x0c2ee…0c332 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x007c, t01=0x015e}
0x0c332…0c33c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0012}
0x0c33c…0c354 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x007d, t01=0x001c}
0x0c354…0c364 Head {h00=0x000c, h01=0x0050, text=»* PLSTBL«, t00=0x007d, t01=0x0034}
0x0c364…0c36e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0044}
0x0c36e…0c382 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x007d, t01=0x004e}
0x0c382…0c3ba Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE DEFINES START OF AN OUTPUT BLOCK.«, t00=0x007d, t01=0x0062}
0x0c3ba…0c3f0 Head {h00=0x0032, h01=0x0050, text=»* IT ALLOCATES AN OUTPUT BUFFER, AND LINKS IT «, t00=0x007d, t01=0x009a}
0x0c3f0…0c406 Head {h00=0x0012, h01=0x0050, text=»* TO THE DWT. «, t00=0x007d, t01=0x00d0}
0x0c406…0c410 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00e6}
0x0c410…0c420 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x007d, t01=0x00f0}
0x0c420…0c438 Head {h00=0x0014, h01=0x0050, text=»* ABI STBTAB,A1 «, t00=0x007d, t01=0x0100}
0x0c438…0c44e Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLSTBL«, t00=0x007d, t01=0x0118}
0x0c44e…0c458 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x012e}
0x0c458…0c468 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x007d, t01=0x0138}
0x0c468…0c4a0 Head {h00=0x0034, h01=0x0050, text=»* A2 = MAXIMAL LENGTH OF TEXT IN BLOCK (BYTES) «, t00=0x007d, t01=0x0148}
0x0c4a0…0c4bc Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x007d, t01=0x0180}
0x0c4bc…0c4c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x000c}
0x0c4c6…0c4d8 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x007e, t01=0x0016}
0x0c4d8…0c4fc Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x007e, t01=0x0028}
0x0c4fc…0c518 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x007e, t01=0x004c}
0x0c518…0c52a Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x007e, t01=0x0068}
0x0c52a…0c544 Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x007e, t01=0x007a}
0x0c544…0c578 Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x007e, t01=0x0094}
0x0c578…0c596 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x007e, t01=0x00c8}
0x0c596…0c5b0 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x007e, t01=0x00e6}
0x0c5b0…0c5ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0100}
0x0c5ba…0c5fe Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x007e, t01=0x010a}
0x0c5fe…0c608 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x014e}
0x0c608…0c61c Head {h00=0x0010, h01=0x0050, text=»PLSTBL EQU *«, t00=0x007e, t01=0x0158}
0x0c61c…0c630 Head {h00=0x0010, h01=0x0050, text=»PRSTBL EQU *«, t00=0x007e, t01=0x016c}
0x0c630…0c63c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x007e, t01=0x0180}
0x0c63c…0c66c Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x007e, t01=0x018c}
0x0c66c…0c694 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x007f, t01=0x002c}
0x0c694…0c69e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0054}
0x0c69e…0c6ac Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007f, t01=0x005e}
0x0c6ac…0c6da Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTST,A6 WAITING LEV. 3 ACK DK2«, t00=0x007f, t01=0x006c}
0x0c6da…0c6fe Head {h00=0x0020, h01=0x0050, text=» ANK A1,DWFAK3+DWFSAC . DK2 «, t00=0x007f, t01=0x009a}
0x0c6fe…0c718 Head {h00=0x0016, h01=0x0050, text=» RF(Z) SB050 . DK2«, t00=0x007f, t01=0x00be}
0x0c718…0c734 Head {h00=0x0018, h01=0x0050, text=» ANK A1,DWFAK3 . DK2«, t00=0x007f, t01=0x00d8}
0x0c734…0c750 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) SB060 . DK2 «, t00=0x007f, t01=0x00f4}
0x0c750…0c75a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0110}
0x0c75a…0c774 Head {h00=0x0016, h01=0x0050, text=»SB050 EQU * . =16 «, t00=0x007f, t01=0x011a}
0x0c774…0c7a6 Head {h00=0x002e, h01=0x0050, text=» LD A1,DWTLD1,A6 BUFFER ALREADY ALLOCATED?«, t00=0x007f, t01=0x0134}
0x0c7a6…0c7d2 Head {h00=0x0028, h01=0x0050, text=» ABL(NZ) NDREPO YES, SET OK & RETURN«, t00=0x007f, t01=0x0166}
0x0c7d2…0c7e6 (128, 0, 400) Head {h00=0x0010, h01=0x0050, text=»SB060 EQU * «, t00=0x0080, t01=0x0004}
0x0c7e6…0c810 Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x0080, t01=0x0018}
0x0c810…0c834 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) SBERR2 ERROR, RETURN«, t00=0x0080, t01=0x0042}
0x0c834…0c864 Head {h00=0x002c, h01=0x0050, text=» LD A3,DWTCHP,A6 CHANNEL PARAMETERS =16 «, t00=0x0080, t01=0x0066}
0x0c864…0c890 Head {h00=0x0028, h01=0x0050, text=» ANK A3,CHABLO CHANGED BLOCKING? =16«, t00=0x0080, t01=0x0096}
0x0c890…0c8ac Head {h00=0x0018, h01=0x0050, text=» RF(Z) SB070 NO =16 «, t00=0x0080, t01=0x00c2}
0x0c8ac…0c8de Head {h00=0x002e, h01=0x0050, text=» LDKL A2,LOBUFL LOAD MAX BLOCK LENGTH =16 «, t00=0x0080, t01=0x00de}
0x0c8de…0c8f8 Head {h00=0x0016, h01=0x0050, text=»SB070 EQU * . =16 «, t00=0x0080, t01=0x0110}
0x0c8f8…0c902 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x012a}
0x0c902…0c924 Head {h00=0x001e, h01=0x0050, text=»* CHECK LEVEL 3 WINDOW «, t00=0x0080, t01=0x0134}
0x0c924…0c94c Head {h00=0x0024, h01=0x0050, text=» LDR A3,A2 SAVE MAX BLOCK LENGTH«, t00=0x0080, t01=0x0156}
0x0c94c…0c96e Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT STATUS«, t00=0x0080, t01=0x017e}
0x0c96e…0c9a2 Head {h00=0x0030, h01=0x0050, text=» ANKL A1,DWFECH+DWFTY1 ECHO OR ONLY TYPE 1? «, t00=0x0081, t01=0x0010}
0x0c9a2…0c9d0 Head {h00=0x002a, h01=0x0050, text=» RF(NZ) SB090 YES, DON'T CHECK WINDOW «, t00=0x0081, t01=0x0044}
0x0c9d0…0ca06 Head {h00=0x0032, h01=0x0050, text=» CF A15,GETOFR A2 := NR OF OUTSTANDING FRAMES «, t00=0x0081, t01=0x0072}
0x0ca06…0ca30 Head {h00=0x0026, h01=0x0050, text=» LDR A2,A2 ANY FRAMES OUTSTANDING?«, t00=0x0081, t01=0x00a8}
0x0ca30…0ca52 Head {h00=0x001e, h01=0x0050, text=» RF(Z) SB090 NO, CONTINUE «, t00=0x0081, t01=0x00d2}
0x0ca52…0ca74 Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT STATUS«, t00=0x0081, t01=0x00f4}
0x0ca74…0caa8 Head {h00=0x0030, h01=0x0050, text=» ANK A1,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x0081, t01=0x0116}
0x0caa8…0cade Head {h00=0x0032, h01=0x0050, text=» RF(NZ) SBERR YES, NO FRAMES MAY BE OUT. ERROR«, t00=0x0081, t01=0x014a}
0x0cade…0cb02 Head {h00=0x0020, h01=0x0050, text=» SUK A2,WINDOW WINDOW FULL? «, t00=0x0081, t01=0x0180}
0x0cb02…0cb24 Head {h00=0x001e, h01=0x0050, text=» RF(N) SB090 NO, CONTINUE «, t00=0x0082, t01=0x0014}
0x0cb24…0cb58 Head {h00=0x0030, h01=0x0050, text=»* DWT WILL HAVE TO WAIT UNTIL WINDOW IS OPEN«, t00=0x0082, t01=0x0036}
0x0cb58…0cb8e Head {h00=0x0032, h01=0x0050, text=» ST A3,DWTLD1,A6 SAVE REQUESTED BUFFER LENGTH «, t00=0x0082, t01=0x006a}
0x0cb8e…0cbc4 Head {h00=0x0032, h01=0x0050, text=» LDK A1,DWFAK3 FLAG "WAITING FOR LEVEL 3 ACK" «, t00=0x0082, t01=0x00a0}
0x0cbc4…0cbf4 Head {h00=0x002c, h01=0x0050, text=» ORS A1,DWTST,A6 SET FLAG IN DWT STATUS «, t00=0x0082, t01=0x00d6}
0x0cbf4…0cc1a Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x0082, t01=0x0106}
0x0cc1a…0cc3e Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x0082, t01=0x012c}
0x0cc3e…0cc5a Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0082, t01=0x0150}
0x0cc5a…0cc92 Head {h00=0x0034, h01=0x0050, text=» IM WIQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x0082, t01=0x016c}
0x0cc92…0cc9e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x0014}
0x0cc9e…0ccc2 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0083, t01=0x0020}
0x0ccc2…0cccc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0044}
0x0cccc…0ccd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x004e}
0x0ccd6…0cd10 Head {h00=0x0036, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN WINDOW IS OPEN AGAIN «, t00=0x0083, t01=0x0058}
0x0cd10…0cd34 Head {h00=0x0020, h01=0x0050, text=»* (AFTER A LEVEL 3 ACK) «, t00=0x0083, t01=0x0092}
0x0cd34…0cd5e Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x0083, t01=0x00b6}
0x0cd5e…0cd7a Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0083, t01=0x00e0}
0x0cd7a…0cd96 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0083, t01=0x00fc}
0x0cd96…0cdb2 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0083, t01=0x0118}
0x0cdb2…0cdbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0134}
0x0cdbc…0cdd0 Head {h00=0x0010, h01=0x0050, text=»WINRST EQU *«, t00=0x0083, t01=0x013e}
0x0cdd0…0ce08 Head {h00=0x0034, h01=0x0050, text=» LD A3,DWTLD1,A6 RESTORE REQUESTED BUFFER LENGTH«, t00=0x0083, t01=0x0152}
0x0ce08…0ce1e Head {h00=0x0012, h01=0x0050, text=» CM DWTLD1,A6 «, t00=0x0083, t01=0x018a}
0x0ce1e…0ce3c Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 RETURN CODE«, t00=0x0084, t01=0x0010}
0x0ce3c…0ce72 Head {h00=0x0032, h01=0x0050, text=» RF(NZ) SBERR2 ERROR, RETURN TO DEVICE DRIVER «, t00=0x0084, t01=0x002e}
0x0ce72…0ce7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x0064}
0x0ce7c…0ce86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x006e}
0x0ce86…0ce9a Head {h00=0x0010, h01=0x0050, text=»SB090 EQU * «, t00=0x0084, t01=0x0078}
0x0ce9a…0ceac Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x0084, t01=0x008c}
0x0ceac…0ced8 Head {h00=0x0028, h01=0x0050, text=» CWK A3,SOBUFL SHORT BUFFER ENOUGH? «, t00=0x0084, t01=0x009e}
0x0ced8…0cf02 Head {h00=0x0026, h01=0x0050, text=» RF(G) SB100 NO, TAKE LONG BUFFER «, t00=0x0084, t01=0x00ca}
0x0cf02…0cf0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00f4}
0x0cf0c…0cf36 Head {h00=0x0026, h01=0x0050, text=»* ALLOCATE SHORT OUTPUT BUFFER «, t00=0x0084, t01=0x00fe}
0x0cf36…0cf68 Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBS POOLBLOCK FOR SHORT BUFFERS«, t00=0x0084, t01=0x0128}
0x0cf68…0cf8e Head {h00=0x0022, h01=0x0050, text=» CF A15,PLGTBU ALLOCATE BUFFER«, t00=0x0084, t01=0x015a}
0x0cf8e…0cfbe Head {h00=0x002c, h01=0x0050, text=» RF(NZ) SB120 COMMON PART FOR SHORT/LONG«, t00=0x0084, t01=0x0180}
0x0cfbe…0cff4 Head {h00=0x0032, h01=0x0050, text=» LDK A7,CWTSBQ NO BUFFER LEFT. SET QUEUE HEAD «, t00=0x0085, t01=0x0020}
0x0cff4…0d01a Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x0085, t01=0x0056}
0x0d01a…0d03e Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x0085, t01=0x007c}
0x0d03e…0d05a Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0085, t01=0x00a0}
0x0d05a…0d092 Head {h00=0x0034, h01=0x0050, text=» IM SBQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x0085, t01=0x00bc}
0x0d092…0d09e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0085, t01=0x00f4}
0x0d09e…0d0ca Head {h00=0x0028, h01=0x0050, text=» RF SB110 COMMON PART FOR NO BUFFER «, t00=0x0085, t01=0x0100}
0x0d0ca…0d0d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x012c}
0x0d0d4…0d0e8 Head {h00=0x0010, h01=0x0050, text=»SB100 EQU * «, t00=0x0085, t01=0x0136}
0x0d0e8…0d112 Head {h00=0x0026, h01=0x0050, text=» CWK A3,LOBUFL LONG BUFFER ENOUGH?«, t00=0x0085, t01=0x014a}
0x0d112…0d130 Head {h00=0x001a, h01=0x0050, text=» RF(G) SBERR NO, ERROR«, t00=0x0085, t01=0x0174}
0x0d130…0d158 (134, 0, 400) Head {h00=0x0024, h01=0x0050, text=»* ALLOCATE LONG OUTPUT BUFFER«, t00=0x0086, t01=0x0004}
0x0d158…0d18a Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBL POOLBLOCK FOR LONG BUFFERS «, t00=0x0086, t01=0x002c}
0x0d18a…0d1b0 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLGTBU ALLOCATE BUFFER«, t00=0x0086, t01=0x005e}
0x0d1b0…0d1e0 Head {h00=0x002c, h01=0x0050, text=» RF(NZ) SB120 COMMON PART FOR SHORT/LONG«, t00=0x0086, t01=0x0084}
0x0d1e0…0d216 Head {h00=0x0032, h01=0x0050, text=» LDK A7,CWTLBQ NO BUFFER LEFT. SET QUEUE HEAD «, t00=0x0086, t01=0x00b4}
0x0d216…0d23c Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x0086, t01=0x00ea}
0x0d23c…0d260 Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x0086, t01=0x0110}
0x0d260…0d27c Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0086, t01=0x0134}
0x0d27c…0d2b4 Head {h00=0x0034, h01=0x0050, text=» IM LBQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x0086, t01=0x0150}
0x0d2b4…0d2c0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x0188}
0x0d2c0…0d2ca (135, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0004}
0x0d2ca…0d2de Head {h00=0x0010, h01=0x0050, text=»SB110 EQU * «, t00=0x0087, t01=0x000e}
0x0d2de…0d31a Head {h00=0x0038, h01=0x0050, text=»* NO BUFFER WAS AVAILABLE. PUT REQUEST IN QUEUE. «, t00=0x0087, t01=0x0022}
0x0d31a…0d346 Head {h00=0x0028, h01=0x0050, text=» ADR A7,A5 A7 := QUEUE HEAD ADDRESS «, t00=0x0087, t01=0x005e}
0x0d346…0d364 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A6 DWT ADDRESS«, t00=0x0087, t01=0x008a}
0x0d364…0d38e Head {h00=0x0026, h01=0x0050, text=» ADKL A4,DWTOTQ QUEUE LINK ADDRESS«, t00=0x0087, t01=0x00a8}
0x0d38e…0d3b6 Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKLST PUT LAST IN QUEUE«, t00=0x0087, t01=0x00d2}
0x0d3b6…0d3da Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0087, t01=0x00fa}
0x0d3da…0d3e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x011e}
0x0d3e4…0d3ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0128}
0x0d3ee…0d424 Head {h00=0x0032, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN A BUFFER IS FREE «, t00=0x0087, t01=0x0132}
0x0d424…0d444 Head {h00=0x001c, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x0087, t01=0x0168}
0x0d444…0d460 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0087, t01=0x0188}
0x0d460…0d488 Head {h00=0x0024, h01=0x0050, text=»* A4 = BUFFER ADDRESS (IF A1=0)«, t00=0x0088, t01=0x0014}
0x0d488…0d4a4 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0088, t01=0x003c}
0x0d4a4…0d4c0 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0088, t01=0x0058}
0x0d4c0…0d4ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0074}
0x0d4ca…0d4de Head {h00=0x0010, h01=0x0050, text=»BUFRST EQU *«, t00=0x0088, t01=0x007e}
0x0d4de…0d4fc Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 RETURN CODE«, t00=0x0088, t01=0x0092}
0x0d4fc…0d522 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) SBERR2 RETURN IF ERROR«, t00=0x0088, t01=0x00b0}
0x0d522…0d536 Head {h00=0x0010, h01=0x0050, text=»SB120 EQU * «, t00=0x0088, t01=0x00d6}
0x0d536…0d562 Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT LENGTH OF X25 HEADER «, t00=0x0088, t01=0x00ea}
0x0d562…0d596 Head {h00=0x0030, h01=0x0050, text=» ST A2,BUFBIX,A4 BYTE INDEX := START OF DATA«, t00=0x0088, t01=0x0116}
0x0d596…0d5ca Head {h00=0x0030, h01=0x0050, text=» ST A4,DWTLD1,A6 SAVE BUFFER ADDRESS IN DWT «, t00=0x0088, t01=0x014a}
0x0d5ca…0d5d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x017e}
0x0d5d4…0d600 Head {h00=0x0028, h01=0x0050, text=» ABL NDREPO RETURN TO DEVICE DRIVER «, t00=0x0088, t01=0x0188}
0x0d600…0d61e Head {h00=0x001a, h01=0x0050, text=»* RETURN CODE := OK«, t00=0x0089, t01=0x0024}
0x0d61e…0d628 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0042}
0x0d628…0d632 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x004c}
0x0d632…0d646 Head {h00=0x0010, h01=0x0050, text=»SBERR EQU * «, t00=0x0089, t01=0x0056}
0x0d646…0d672 Head {h00=0x0028, h01=0x0050, text=» LDK A1,PLSERR RET CODE := SW ERROR «, t00=0x0089, t01=0x006a}
0x0d672…0d686 Head {h00=0x0010, h01=0x0050, text=»SBERR2 EQU *«, t00=0x0089, t01=0x0096}
0x0d686…0d6ac Head {h00=0x0022, h01=0x0050, text=» LDK A2,0 RESET DEVICE STATUS «, t00=0x0089, t01=0x00aa}
0x0d6ac…0d6d6 Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x0089, t01=0x00d0}
0x0d6d6…0d6e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00fa}
0x0d6e0…0d6ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0089, t01=0x0104}
0x0d6ee…0d6f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0112}
0x0d6f8…0d73c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0089, t01=0x011c}
0x0d73c…0d746 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0160}
0x0d746…0d75e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0089, t01=0x016a}
0x0d75e…0d76e Head {h00=0x000c, h01=0x0050, text=»* PLCHRO«, t00=0x0089, t01=0x0182}
0x0d76e…0d778 (138, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0004}
0x0d778…0d78c Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x008a, t01=0x000e}
0x0d78c…0d7ca Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE WRITES ONE CHARACTER TO OUTPUT BUFFER. «, t00=0x008a, t01=0x0022}
0x0d7ca…0d7d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0060}
0x0d7d4…0d7e4 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x008a, t01=0x006a}
0x0d7e4…0d7fc Head {h00=0x0014, h01=0x0050, text=»* ABI OUPTAB,A1 «, t00=0x008a, t01=0x007a}
0x0d7fc…0d812 Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLCHRO«, t00=0x008a, t01=0x0092}
0x0d812…0d81c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x00a8}
0x0d81c…0d82c Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x008a, t01=0x00b2}
0x0d82c…0d850 Head {h00=0x0020, h01=0x0050, text=»* A2 = BITS 0-7 IRRELEVANT«, t00=0x008a, t01=0x00c2}
0x0d850…0d870 Head {h00=0x001c, h01=0x0050, text=»* BITS 8-15 CHARACTER «, t00=0x008a, t01=0x00e6}
0x0d870…0d88c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x008a, t01=0x0106}
0x0d88c…0d896 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0122}
0x0d896…0d8a8 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x008a, t01=0x012c}
0x0d8a8…0d8cc Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x008a, t01=0x013e}
0x0d8cc…0d8e8 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x008a, t01=0x0162}
0x0d8e8…0d8fa Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x008a, t01=0x017e}
0x0d8fa…0d914 Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x008a, t01=0x0190}
0x0d914…0d948 Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x008b, t01=0x001a}
0x0d948…0d966 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x008b, t01=0x004e}
0x0d966…0d980 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x008b, t01=0x006c}
0x0d980…0d98a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0086}
0x0d98a…0d9ce Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x008b, t01=0x0090}
0x0d9ce…0d9d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00d4}
0x0d9d8…0d9ec Head {h00=0x0010, h01=0x0050, text=»PLCHRO EQU *«, t00=0x008b, t01=0x00de}
0x0d9ec…0da00 Head {h00=0x0010, h01=0x0050, text=»PRCHRO EQU *«, t00=0x008b, t01=0x00f2}
0x0da00…0da0c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x008b, t01=0x0106}
0x0da0c…0da16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0112}
0x0da16…0da24 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008b, t01=0x011c}
0x0da24…0da2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x012a}
0x0da2e…0da4a Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 PUSH A4 «, t00=0x008b, t01=0x0134}
0x0da4a…0da72 Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTLD1,A6 BUFFER ADDRESS «, t00=0x008b, t01=0x0150}
0x0da72…0da9a Head {h00=0x0024, h01=0x0050, text=» RF(Z) COERR2 ERROR IF NO BUFFER«, t00=0x008b, t01=0x0178}
0x0da9a…0dac8 Head {h00=0x002a, h01=0x0050, text=» CF A15,PLPUCH PUT CHARACTER IN BUFFER«, t00=0x008c, t01=0x0010}
0x0dac8…0daec Head {h00=0x0020, h01=0x0050, text=» LDR A1,A1 CHECK RETURN CODE«, t00=0x008c, t01=0x003e}
0x0daec…0db18 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) COERR1 ERROR IF BUFFER FULL «, t00=0x008c, t01=0x0062}
0x0db18…0db42 Head {h00=0x0026, h01=0x0050, text=» LD A2,BUFBIX,A4 BUFFER INDEX =16 «, t00=0x008c, t01=0x008e}
0x0db42…0db4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x00b8}
0x0db4c…0db68 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x008c, t01=0x00c2}
0x0db68…0dba2 Head {h00=0x0036, h01=0x0050, text=»* RETURN DIRECTLY INSTEAD OF THROUGH NDRETO TO GET«, t00=0x008c, t01=0x00de}
0x0dba2…0dbbe Head {h00=0x0018, h01=0x0050, text=»* FASTER PROCESSING.«, t00=0x008c, t01=0x0118}
0x0dbbe…0dbe8 Head {h00=0x0026, h01=0x0050, text=» CWK A2,LOBUFL+3 BUFFER FULL? =16 «, t00=0x008c, t01=0x0134}
0x0dbe8…0dc04 Head {h00=0x0018, h01=0x0050, text=» RF(NE) OP100 NO =16«, t00=0x008c, t01=0x015e}
0x0dc04…0dc32 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTCHP,A6 CHANNEL PARAMETER =16«, t00=0x008c, t01=0x017a}
0x0dc32…0dc5e Head {h00=0x0028, h01=0x0050, text=» ANK A2,CHABLO CHANGED BLOCKING? =16«, t00=0x008d, t01=0x0018}
0x0dc5e…0dc88 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) EB050 YES SEND BUFFER =16 «, t00=0x008d, t01=0x0044}
0x0dc88…0dca2 Head {h00=0x0016, h01=0x0050, text=»OP100 EQU * . =16 «, t00=0x008d, t01=0x006e}
0x0dca2…0dcae Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x008d, t01=0x0088}
0x0dcae…0dccc Head {h00=0x001a, h01=0x0050, text=» ADK A5,4 ADJUST STACK«, t00=0x008d, t01=0x0094}
0x0dccc…0dcfe Head {h00=0x002e, h01=0x0050, text=» LDR A2,A1 DEVICE STATUS & RET CODE := OK «, t00=0x008d, t01=0x00b2}
0x0dcfe…0dd26 Head {h00=0x0024, h01=0x0050, text=» ABR* A5 RETURN TO DEVICE DRIVER«, t00=0x008d, t01=0x00e4}
0x0dd26…0dd30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x010c}
0x0dd30…0dd3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0116}
0x0dd3a…0dd4e Head {h00=0x0010, h01=0x0050, text=»COERR1 EQU *«, t00=0x008d, t01=0x0120}
0x0dd4e…0dd74 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLRLBU RELEASE BUFFER «, t00=0x008d, t01=0x0134}
0x0dd74…0dd9c Head {h00=0x0024, h01=0x0050, text=» CM DWTLD1,A6 INDICATE NO BUFFER«, t00=0x008d, t01=0x015a}
0x0dd9c…0ddb0 Head {h00=0x0010, h01=0x0050, text=»COERR2 EQU *«, t00=0x008d, t01=0x0182}
0x0ddb0…0ddcc Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x008e, t01=0x0008}
0x0ddcc…0ddf8 Head {h00=0x0028, h01=0x0050, text=» LDK A1,PLSERR RET CODE := SW ERROR «, t00=0x008e, t01=0x0024}
0x0ddf8…0de22 Head {h00=0x0026, h01=0x0050, text=» ABL NDRET RETURN TO DEVICE DRIVER«, t00=0x008e, t01=0x0050}
0x0de22…0de2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x007a}
0x0de2c…0de3a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008e, t01=0x0084}
0x0de3a…0de44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0092}
0x0de44…0de88 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x008e, t01=0x009c}
0x0de88…0de92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00e0}
0x0de92…0deaa Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x008e, t01=0x00ea}
0x0deaa…0deba Head {h00=0x000c, h01=0x0050, text=»* PLENBL«, t00=0x008e, t01=0x0102}
0x0deba…0dec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0112}
0x0dec4…0ded8 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x008e, t01=0x011c}
0x0ded8…0df0c Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE DEFINES END OF OUTPUT BLOCK. «, t00=0x008e, t01=0x0130}
0x0df0c…0df3e Head {h00=0x002e, h01=0x0050, text=»* IT SENDS THE BLOCK TO PLC AND WAITS FOR «, t00=0x008e, t01=0x0164}
0x0df3e…0df54 Head {h00=0x0012, h01=0x0050, text=»* ACKNOWLEDGE.«, t00=0x008f, t01=0x0008}
0x0df54…0df5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x001e}
0x0df5e…0df6e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x008f, t01=0x0028}
0x0df6e…0df86 Head {h00=0x0014, h01=0x0050, text=»* ABI ENBTAB,A1 «, t00=0x008f, t01=0x0038}
0x0df86…0df9c Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLENBL«, t00=0x008f, t01=0x0050}
0x0df9c…0dfa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0066}
0x0dfa6…0dfb6 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x008f, t01=0x0070}
0x0dfb6…0dfd2 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x008f, t01=0x0080}
0x0dfd2…0dfdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x009c}
0x0dfdc…0dfee Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x008f, t01=0x00a6}
0x0dfee…0e012 Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x008f, t01=0x00b8}
0x0e012…0e02e Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x008f, t01=0x00dc}
0x0e02e…0e040 Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x008f, t01=0x00f8}
0x0e040…0e05a Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x008f, t01=0x010a}
0x0e05a…0e08e Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x008f, t01=0x0124}
0x0e08e…0e0ac Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x008f, t01=0x0158}
0x0e0ac…0e0c6 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x008f, t01=0x0176}
0x0e0c6…0e0d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x0190}
0x0e0d0…0e114 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0090, t01=0x000a}
0x0e114…0e11e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x004e}
0x0e11e…0e132 Head {h00=0x0010, h01=0x0050, text=»PLENBL EQU *«, t00=0x0090, t01=0x0058}
0x0e132…0e146 Head {h00=0x0010, h01=0x0050, text=»PRENBL EQU *«, t00=0x0090, t01=0x006c}
0x0e146…0e16e Head {h00=0x0024, h01=0x0050, text=» LDK A1,0 SET RETURN CODE OK =16«, t00=0x0090, t01=0x0080}
0x0e16e…0e1a2 Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTWAT,A6 GET WAIT/ACT INDICATOR =16 «, t00=0x0090, t01=0x00a8}
0x0e1a2…0e1ba Head {h00=0x0014, h01=0x0050, text=» SUK A2,1 . =16 «, t00=0x0090, t01=0x00dc}
0x0e1ba…0e1d4 Head {h00=0x0016, h01=0x0050, text=» RF(Z) EB040 . =16«, t00=0x0090, t01=0x00f4}
0x0e1d4…0e20c Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/FFFF-CHABLO RESET CHANGED BLOCKING =16«, t00=0x0090, t01=0x010e}
0x0e20c…0e22c Head {h00=0x001c, h01=0x0050, text=» ANS A2,DWTCHP,A6 . =16 «, t00=0x0090, t01=0x0146}
0x0e22c…0e246 Head {h00=0x0016, h01=0x0050, text=»EB040 EQU * . =16 «, t00=0x0090, t01=0x0166}
0x0e246…0e274 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTCHP,A6 CHANNEL PARAMETER =16«, t00=0x0090, t01=0x0180}
0x0e274…0e2a0 Head {h00=0x0028, h01=0x0050, text=» ANK A2,CHABLO CHANGED BLOCKING =16 «, t00=0x0091, t01=0x001e}
0x0e2a0…0e2c6 Head {h00=0x0022, h01=0x0050, text=» RB(NZ) OP100 YES, RETURN =16 «, t00=0x0091, t01=0x004a}
0x0e2c6…0e2e0 Head {h00=0x0016, h01=0x0050, text=»EB050 EQU * . =16 «, t00=0x0091, t01=0x0070}
0x0e2e0…0e2ec Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0091, t01=0x008a}
0x0e2ec…0e31c Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x0091, t01=0x0096}
0x0e31c…0e344 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x0091, t01=0x00c6}
0x0e344…0e34e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00ee}
0x0e34e…0e35c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0091, t01=0x00f8}
0x0e35c…0e366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x0106}
0x0e366…0e396 Head {h00=0x002c, h01=0x0050, text=» LDK A1,PLSERR SET RET CODE JUST IN CASE«, t00=0x0091, t01=0x0110}
0x0e396…0e3be Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTLD1,A6 BUFFER ADDRESS «, t00=0x0091, t01=0x0140}
0x0e3be…0e3f4 Head {h00=0x0032, h01=0x0050, text=» ABL(Z) NDREPO ERROR IF NO BUFFER. RETURN =16 «, t00=0x0091, t01=0x0168}
0x0e3f4…0e41e Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x0092, t01=0x000e}
0x0e41e…0e444 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EBERR1 RETURN IF ERROR«, t00=0x0092, t01=0x0038}
0x0e444…0e44e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x005e}
0x0e44e…0e46c Head {h00=0x001a, h01=0x0050, text=» LDR A3,A6 DWT ADDRESS«, t00=0x0092, t01=0x0068}
0x0e46c…0e492 Head {h00=0x0022, h01=0x0050, text=» ADKL A3,DWTOTQ QUEUE POINTER «, t00=0x0092, t01=0x0086}
0x0e492…0e4b4 Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCS RESERVE CCA«, t00=0x0092, t01=0x00ac}
0x0e4b4…0e4e6 Head {h00=0x002e, h01=0x0050, text=» CM DWTOTQ,A6 RESET QUEUE ELEMENT POINTER «, t00=0x0092, t01=0x00ce}
0x0e4e6…0e504 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 RETURN CODE«, t00=0x0092, t01=0x0100}
0x0e504…0e52a Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EBERR1 RETURN IF ERROR«, t00=0x0092, t01=0x011e}
0x0e52a…0e534 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0144}
0x0e534…0e568 Head {h00=0x0030, h01=0x0050, text=»* WRITE PARAMETERS IN CCA AND X25 HEADER «, t00=0x0092, t01=0x014e}
0x0e568…0e574 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0092, t01=0x0182}
0x0e574…0e59c Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTLD1,A6 BUFFER ADDRESS «, t00=0x0092, t01=0x018e}
0x0e59c…0e5c2 Head {h00=0x0022, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 TO CCA«, t00=0x0093, t01=0x0026}
0x0e5c2…0e600 Head {h00=0x003a, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR«, t00=0x0093, t01=0x004c}
0x0e600…0e628 Head {h00=0x0024, h01=0x0050, text=» LDK A3,CMDFW ASSUME FAST WRITE «, t00=0x0093, t01=0x008a}
0x0e628…0e64e Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 DEVICE STATUS «, t00=0x0093, t01=0x00b2}
0x0e64e…0e666 Head {h00=0x0014, h01=0x0050, text=» LDR A7,A2 SAVE «, t00=0x0093, t01=0x00d8}
0x0e666…0e68a Head {h00=0x0020, h01=0x0050, text=» ANKL A7,DWFECH ECHO OUTPUT?«, t00=0x0093, t01=0x00f0}
0x0e68a…0e6b0 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EB090 YES, USE TYPE 1 «, t00=0x0093, t01=0x0114}
0x0e6b0…0e6e2 Head {h00=0x002e, h01=0x0050, text=» LDK A3,CMDSW NOT ECHO, USE STANDARD WRITE«, t00=0x0093, t01=0x013a}
0x0e6e2…0e70e Head {h00=0x0028, h01=0x0050, text=» ANK A2,DWFTY1 ONLY TYPE 1 ALLOWED? «, t00=0x0093, t01=0x016c}
0x0e70e…0e732 Head {h00=0x0020, h01=0x0050, text=» RF(Z) EB100 NO, USE TYPE 2 «, t00=0x0094, t01=0x0008}
0x0e732…0e73c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x002c}
0x0e73c…0e74a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0094, t01=0x0036}
0x0e74a…0e754 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0044}
0x0e754…0e768 Head {h00=0x0010, h01=0x0050, text=»EB090 EQU * «, t00=0x0094, t01=0x004e}
0x0e768…0e786 Head {h00=0x001a, h01=0x0050, text=»* NO FLOW CONTROL«, t00=0x0094, t01=0x0062}
0x0e786…0e7ba Head {h00=0x0030, h01=0x0050, text=» CF A15,WRADR1 WRITE LINE ADDRESS. NO FLOW C«, t00=0x0094, t01=0x0080}
0x0e7ba…0e7f0 Head {h00=0x0032, h01=0x0050, text=» LDK A2,TYNFLO MESSAGE TYPE := NO FLOW CONTROL«, t00=0x0094, t01=0x00b4}
0x0e7f0…0e80a Head {h00=0x0016, h01=0x0050, text=» RF EB110 CONTINUE«, t00=0x0094, t01=0x00ea}
0x0e80a…0e814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0104}
0x0e814…0e828 Head {h00=0x0010, h01=0x0050, text=»EB100 EQU * «, t00=0x0094, t01=0x010e}
0x0e828…0e844 Head {h00=0x0018, h01=0x0050, text=»* FLOW CONTROL «, t00=0x0094, t01=0x0122}
0x0e844…0e878 Head {h00=0x0030, h01=0x0050, text=» CF A15,WRADR2 WRITE LINE ADDRESS. FLOW CTRL«, t00=0x0094, t01=0x013e}
0x0e878…0e8ac Head {h00=0x0030, h01=0x0050, text=» CF A15,FWOPSR FETCH AND UPDATE FLOW CONTROL«, t00=0x0094, t01=0x0172}
0x0e8ac…0e8da Head {h00=0x002a, h01=0x0050, text=» SC A2,X25FLW,A4 P(R) & P(S) TO PACKET«, t00=0x0095, t01=0x0016}
0x0e8da…0e90c Head {h00=0x002e, h01=0x0050, text=» LDK A2,TYDATA MESSAGE TYPE := NORMAL DATA«, t00=0x0095, t01=0x0044}
0x0e90c…0e916 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0076}
0x0e916…0e92a Head {h00=0x0010, h01=0x0050, text=»EB110 EQU * «, t00=0x0095, t01=0x0080}
0x0e92a…0e95e Head {h00=0x0030, h01=0x0050, text=» SC A2,CWTCCA+CCRIDB,A5 MESSAGE TYPE TO CCA «, t00=0x0095, t01=0x0094}
0x0e95e…0e98c Head {h00=0x002a, h01=0x0050, text=» SC A3,CWTCCA+CCRCMD,A5 COMMAND TO CCA«, t00=0x0095, t01=0x00c8}
0x0e98c…0e9be Head {h00=0x002e, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA«, t00=0x0095, t01=0x00f6}
0x0e9be…0e9e2 Head {h00=0x0020, h01=0x0050, text=» LD A3,BUFBIX,A4 BYTE INDEX «, t00=0x0095, t01=0x0128}
0x0e9e2…0ea16 Head {h00=0x0030, h01=0x0050, text=» ST A3,CWTCCA+CCRLEN,A5 BUFFER LENGTH TO CCA«, t00=0x0095, t01=0x014c}
0x0ea16…0ea20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0180}
0x0ea20…0ea4a Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x0095, t01=0x018a}
0x0ea4a…0ea70 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EBERR2 RETURN IF ERROR«, t00=0x0096, t01=0x0024}
0x0ea70…0ea98 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x0096, t01=0x004a}
0x0ea98…0eabc Head {h00=0x0020, h01=0x0050, text=» RF(NZ) EBERR1 HANDLE ERROR «, t00=0x0096, t01=0x0072}
0x0eabc…0eae0 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0096, t01=0x0096}
0x0eae0…0eaea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00ba}
0x0eaea…0eaf8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0096, t01=0x00c4}
0x0eaf8…0eb02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00d2}
0x0eb02…0eb3a Head {h00=0x0034, h01=0x0050, text=»* ENTRY TO ACKRST IS MADE WHEN I/O OPERATION «, t00=0x0096, t01=0x00dc}
0x0eb3a…0eb54 Head {h00=0x0016, h01=0x0050, text=»* IS COMPLETED.«, t00=0x0096, t01=0x0114}
0x0eb54…0eb7e Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x0096, t01=0x012e}
0x0eb7e…0eb9a Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0096, t01=0x0158}
0x0eb9a…0ebb6 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0096, t01=0x0174}
0x0ebb6…0ebd2 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0096, t01=0x0190}
0x0ebd2…0ebee Head {h00=0x0018, h01=0x0050, text=»* A7 = MESSAGE TYPE«, t00=0x0097, t01=0x001c}
0x0ebee…0ebf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0038}
0x0ebf8…0ec0c Head {h00=0x0010, h01=0x0050, text=»ACKRST EQU *«, t00=0x0097, t01=0x0042}
0x0ec0c…0ec32 Head {h00=0x0022, h01=0x0050, text=» LDK A2,0 RESET DEVICE STATUS «, t00=0x0097, t01=0x0056}
0x0ec32…0ec50 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 ANY ERROR? «, t00=0x0097, t01=0x007c}
0x0ec50…0ec72 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) EB130 YES, RETURN «, t00=0x0097, t01=0x009a}
0x0ec72…0ec7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x00bc}
0x0ec7c…0ec9e Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTST,A6 DWT STATUS«, t00=0x0097, t01=0x00c6}
0x0ec9e…0ecb0 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0097, t01=0x00e8}
0x0ecb0…0ecde Head {h00=0x002a, h01=0x0050, text=» ANK A4,DWFRES RESET PACKET RECIEVED? «, t00=0x0097, t01=0x00fa}
0x0ecde…0ecf6 Head {h00=0x0014, h01=0x0050, text=» RF(Z) EB120 NO «, t00=0x0097, t01=0x0128}
0x0ecf6…0ed28 Head {h00=0x002e, h01=0x0050, text=» LDK A1,LINERR YES. RET CODE := LINK RESET«, t00=0x0097, t01=0x0140}
0x0ed28…0ed40 Head {h00=0x0014, h01=0x0050, text=» RF EB130 RETURN«, t00=0x0097, t01=0x0172}
0x0ed40…0ed4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x018a}
0x0ed4a…0ed5e (152, 0, 400) Head {h00=0x0010, h01=0x0050, text=»EB120 EQU * «, t00=0x0098, t01=0x0004}
0x0ed5e…0ed92 Head {h00=0x0030, h01=0x0050, text=» CWK A7,TYNFLO PACKET WITH NO FLOW CONTROL? «, t00=0x0098, t01=0x0018}
0x0ed92…0edb2 Head {h00=0x001c, h01=0x0050, text=» RF(E) EB130 YES, RETURN«, t00=0x0098, t01=0x004c}
0x0edb2…0edde Head {h00=0x0028, h01=0x0050, text=» ANK A3,DWFSAC WAIT FOR LEVEL 3 ACK?«, t00=0x0098, t01=0x006c}
0x0edde…0edfe Head {h00=0x001c, h01=0x0050, text=» RF(Z) EB130 NO, RETURN «, t00=0x0098, t01=0x0098}
0x0edfe…0ee08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x00b8}
0x0ee08…0ee3e Head {h00=0x0032, h01=0x0050, text=» LDK A3,DWFAK3 FLAG "WAITING FOR LEVEL 3 ACK" «, t00=0x0098, t01=0x00c2}
0x0ee3e…0ee6e Head {h00=0x002c, h01=0x0050, text=» ORS A3,DWTST,A6 SET FLAG IN DWT STATUS «, t00=0x0098, t01=0x00f8}
0x0ee6e…0ee92 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0098, t01=0x0128}
0x0ee92…0ee9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x014c}
0x0ee9c…0eeaa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0098, t01=0x0156}
0x0eeaa…0eeb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0164}
0x0eeb4…0eefa Head {h00=0x0042, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN ACK ON LEVEL 3 HAVE BEEN RECIEVED«, t00=0x0098, t01=0x016e}
0x0eefa…0ef24 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x0099, t01=0x0024}
0x0ef24…0ef40 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0099, t01=0x004e}
0x0ef40…0ef74 Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x0099, t01=0x006a}
0x0ef74…0ef90 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0099, t01=0x009e}
0x0ef90…0efac Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0099, t01=0x00ba}
0x0efac…0efb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00d6}
0x0efb6…0efca Head {h00=0x0010, h01=0x0050, text=»AK3RST EQU *«, t00=0x0099, t01=0x00e0}
0x0efca…0efd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00f4}
0x0efd4…0efe8 Head {h00=0x0010, h01=0x0050, text=»EB130 EQU * «, t00=0x0099, t01=0x00fe}
0x0efe8…0eff2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x0112}
0x0eff2…0f020 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTCHP,A6 CHANNEL PARAMETER =16«, t00=0x0099, t01=0x011c}
0x0f020…0f04c Head {h00=0x0028, h01=0x0050, text=» ANK A2,CHABLO CHANGED BLOCKING? =16«, t00=0x0099, t01=0x014a}
0x0f04c…0f07c Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) SB050 YES, START NEW BLOCK =16 «, t00=0x0099, t01=0x0176}
0x0f07c…0f0a6 Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x009a, t01=0x0016}
0x0f0a6…0f0b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0040}
0x0f0b0…0f0ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x004a}
0x0f0ba…0f0c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0054}
0x0f0c4…0f0d8 Head {h00=0x0010, h01=0x0050, text=»EBERR2 EQU *«, t00=0x009a, t01=0x005e}
0x0f0d8…0f0fa Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x009a, t01=0x0072}
0x0f0fa…0f10e Head {h00=0x0010, h01=0x0050, text=»EBERR1 EQU *«, t00=0x009a, t01=0x0094}
0x0f10e…0f13c Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTLD1,A6 OUTPUT BUFFER ADDRESS«, t00=0x009a, t01=0x00a8}
0x0f13c…0f162 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLRLBU RELEASE BUFFER «, t00=0x009a, t01=0x00d6}
0x0f162…0f18a Head {h00=0x0024, h01=0x0050, text=» CM DWTLD1,A6 INDICATE NO BUFFER«, t00=0x009a, t01=0x00fc}
0x0f18a…0f1b2 Head {h00=0x0024, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL«, t00=0x009a, t01=0x0124}
0x0f1b2…0f1dc Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x009a, t01=0x014c}
0x0f1dc…0f1e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0176}
0x0f1e6…0f1f4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009a, t01=0x0180}
0x0f1f4…0f1fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x018e}
0x0f1fe…0f242 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x009b, t01=0x0008}
0x0f242…0f24c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x004c}
0x0f24c…0f264 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x009b, t01=0x0056}
0x0f264…0f274 Head {h00=0x000c, h01=0x0050, text=»* PLTEST«, t00=0x009b, t01=0x006e}
0x0f274…0f27e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x007e}
0x0f27e…0f292 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x009b, t01=0x0088}
0x0f292…0f2c8 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES TEST COMMANDS FOR PLC. «, t00=0x009b, t01=0x009c}
0x0f2c8…0f2fc Head {h00=0x0030, h01=0x0050, text=»* THE TEST COMMANDS ARE GENERATED BY A TEST «, t00=0x009b, t01=0x00d2}
0x0f2fc…0f334 Head {h00=0x0034, h01=0x0050, text=»* COMMAND "DRIVER" WITH AN INTERFACE SIMILAR TO «, t00=0x009b, t01=0x0106}
0x0f334…0f36a Head {h00=0x0032, h01=0x0050, text=»* THAT OF THE NORMAL TERMINAL DEVICE DRIVERS. «, t00=0x009b, t01=0x013e}
0x0f36a…0f3a0 Head {h00=0x0032, h01=0x0050, text=»* CALL IS MADE DIRECTLY TO THE PLC DRIVER, AND«, t00=0x009b, t01=0x0174}
0x0f3a0…0f3d8 Head {h00=0x0034, h01=0x0050, text=»* NOT THROUGH THE TERMINAL NETWORK DISTRIBUTOR, «, t00=0x009c, t01=0x001a}
0x0f3d8…0f40e Head {h00=0x0032, h01=0x0050, text=»* AS THIS FUNCTION IS NOT AVAILABLE FOR OTHER «, t00=0x009c, t01=0x0052}
0x0f40e…0f426 Head {h00=0x0014, h01=0x0050, text=»* LINE DRIVERS. «, t00=0x009c, t01=0x0088}
0x0f426…0f430 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00a0}
0x0f430…0f440 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x009c, t01=0x00aa}
0x0f440…0f456 Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLTEST«, t00=0x009c, t01=0x00ba}
0x0f456…0f460 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00d0}
0x0f460…0f470 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x009c, t01=0x00da}
0x0f470…0f48c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x009c, t01=0x00ea}
0x0f48c…0f496 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0106}
0x0f496…0f4a8 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x009c, t01=0x0110}
0x0f4a8…0f4cc Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x009c, t01=0x0122}
0x0f4cc…0f4e8 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x009c, t01=0x0146}
0x0f4e8…0f4fa Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x009c, t01=0x0162}
0x0f4fa…0f514 Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x009c, t01=0x0174}
0x0f514…0f52c Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x009c, t01=0x018e}
0x0f52c…0f54a Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x009d, t01=0x0016}
0x0f54a…0f564 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x009d, t01=0x0034}
0x0f564…0f56e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x004e}
0x0f56e…0f5b2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x009d, t01=0x0058}
0x0f5b2…0f5bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x009c}
0x0f5bc…0f5ca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009d, t01=0x00a6}
0x0f5ca…0f5d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x00b4}
0x0f5d4…0f5e8 Head {h00=0x0010, h01=0x0050, text=»PLTEST EQU *«, t00=0x009d, t01=0x00be}
0x0f5e8…0f5fe Head {h00=0x0012, h01=0x0050, text=» IFT PLCTST=1 «, t00=0x009d, t01=0x00d2}
0x0f5fe…0f62e Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x009d, t01=0x00e8}
0x0f62e…0f656 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x009d, t01=0x0118}
0x0f656…0f678 Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x009d, t01=0x0140}
0x0f678…0f682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x0162}
0x0f682…0f68e Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x009d, t01=0x016c}
0x0f68e…0f6c0 Head {h00=0x002e, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA«, t00=0x009d, t01=0x0178}
0x0f6c0…0f700 Head {h00=0x003c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 DATA CHAINING & MSB OF BUFFER ADDR «, t00=0x009e, t01=0x001a}
0x0f700…0f734 Head {h00=0x0030, h01=0x0050, text=» LD A4,DWTTBU,A6 USER REQUEST BUFFER ADDRESS«, t00=0x009e, t01=0x005a}
0x0f734…0f75a Head {h00=0x0022, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 TO CCA«, t00=0x009e, t01=0x008e}
0x0f75a…0f78e Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTTLN,A6 USER REQUEST BUFFER LENGTH «, t00=0x009e, t01=0x00b4}
0x0f78e…0f7bc Head {h00=0x002a, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 LENGTH TO CCA «, t00=0x009e, t01=0x00e8}
0x0f7bc…0f7ee Head {h00=0x002e, h01=0x0050, text=» LD A3,DWTTCW,A6 USER REQUEST CONTROL WORD«, t00=0x009e, t01=0x0116}
0x0f7ee…0f7f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0148}
0x0f7f8…0f822 Head {h00=0x0026, h01=0x0050, text=»* DETERMINE TYPE OF TEST ORDER «, t00=0x009e, t01=0x0152}
0x0f822…0f854 Head {h00=0x002e, h01=0x0050, text=» LC A1,DWTOR+1,A6 USER REQUEST ORDER CODE «, t00=0x009e, t01=0x017c}
0x0f854…0f86e Head {h00=0x0016, h01=0x0050, text=» ANK A1,/3F CLEAN «, t00=0x009f, t01=0x001e}
0x0f86e…0f898 Head {h00=0x0026, h01=0x0050, text=» CWK A1,ORDPS GET LINE STATISTICS?«, t00=0x009f, t01=0x0038}
0x0f898…0f8b8 Head {h00=0x001c, h01=0x0050, text=» RF(E) TE100 YES, HANDLE«, t00=0x009f, t01=0x0062}
0x0f8b8…0f8e2 Head {h00=0x0026, h01=0x0050, text=» CWK A1,ORDDS GET DLS STATISTICS? «, t00=0x009f, t01=0x0082}
0x0f8e2…0f902 Head {h00=0x001c, h01=0x0050, text=» RF(E) TE110 YES, HANDLE«, t00=0x009f, t01=0x00ac}
0x0f902…0f92a Head {h00=0x0024, h01=0x0050, text=» CWK A1,ORDRM READ LOCAL MEMORY?«, t00=0x009f, t01=0x00cc}
0x0f92a…0f960 Head {h00=0x0032, h01=0x0050, text=» RF(NE) TEERR2 NO, COMMAND NOT DEFINED. ERROR «, t00=0x009f, t01=0x00f4}
0x0f960…0f96a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x012a}
0x0f96a…0f988 Head {h00=0x001a, h01=0x0050, text=»* READ LOCAL MEMORY«, t00=0x009f, t01=0x0134}
0x0f988…0f9c2 Head {h00=0x0036, h01=0x0050, text=» ST A3,CWTCCA+CCRSUB,A5 PLC MEMORY ADDRESS TO CCA «, t00=0x009f, t01=0x0152}
0x0f9c2…0f9f6 Head {h00=0x0030, h01=0x0050, text=» LDK A3,CMDRM PLC COMMAND READ LOCAL MEMORY «, t00=0x009f, t01=0x018c}
0x0f9f6…0fa16 Head {h00=0x001c, h01=0x0050, text=» RF TE120 TO COMMON PART«, t00=0x00a0, t01=0x0030}
0x0fa16…0fa20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0050}
0x0fa20…0fa34 Head {h00=0x0010, h01=0x0050, text=»TE100 EQU * «, t00=0x00a0, t01=0x005a}
0x0fa34…0fa54 Head {h00=0x001c, h01=0x0050, text=»* GET LINE STATISTICS«, t00=0x00a0, t01=0x006e}
0x0fa54…0fa90 Head {h00=0x0038, h01=0x0050, text=» SC A3,CWTCCA+CCRSU1,A5 STORE LINE NUMBER (0-3) =12 «, t00=0x00a0, t01=0x008e}
0x0fa90…0fac6 Head {h00=0x0032, h01=0x0050, text=» LDK A3,CMDPS PLC COMMAND GET LINE STATISTICS «, t00=0x00a0, t01=0x00ca}
0x0fac6…0fae6 Head {h00=0x001c, h01=0x0050, text=» RF TE120 TO COMMON PART«, t00=0x00a0, t01=0x0100}
0x0fae6…0faf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0120}
0x0faf0…0fb04 Head {h00=0x0010, h01=0x0050, text=»TE110 EQU * «, t00=0x00a0, t01=0x012a}
0x0fb04…0fb24 Head {h00=0x001c, h01=0x0050, text=»* GET DLS STATISTICS «, t00=0x00a0, t01=0x013e}
0x0fb24…0fb4e Head {h00=0x0026, h01=0x0050, text=» LC A3,DWTCP2,A6 CHANNEL PARAMETER«, t00=0x00a0, t01=0x015e}
0x0fb4e…0fb74 Head {h00=0x0022, h01=0x0050, text=» ANK A3,MASKWS CLEAN WS NUMBER«, t00=0x00a0, t01=0x0188}
0x0fb74…0fb92 Head {h00=0x001a, h01=0x0050, text=» SLL A3,8 TO LEFT BYTE«, t00=0x00a1, t01=0x001e}
0x0fb92…0fbc6 Head {h00=0x0030, h01=0x0050, text=» ADK A3,CMDDS PLC COMMAND GET DLS STATISTICS«, t00=0x00a1, t01=0x003c}
0x0fbc6…0fbd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0070}
0x0fbd0…0fbe4 Head {h00=0x0010, h01=0x0050, text=»TE120 EQU * «, t00=0x00a1, t01=0x007a}
0x0fbe4…0fc1e Head {h00=0x0036, h01=0x0050, text=» ST A3,CWTCCA+CCRDLS,A5 DLS INDEX & COMMAND TO CCA«, t00=0x00a1, t01=0x008e}
0x0fc1e…0fc28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x00c8}
0x0fc28…0fc50 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x00a1, t01=0x00d2}
0x0fc50…0fc74 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TEERR1 ERROR. HANDLE«, t00=0x00a1, t01=0x00fa}
0x0fc74…0fc9e Head {h00=0x0026, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCER. WAIT «, t00=0x00a1, t01=0x011e}
0x0fc9e…0fca8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0148}
0x0fca8…0fcb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0152}
0x0fcb2…0fcf2 Head {h00=0x003c, h01=0x0050, text=»* ENTRY IS MADE TO TSTRST WHEN COMMAND IS COMPLETED. «, t00=0x00a1, t01=0x015c}
0x0fcf2…0fd1c Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x00a2, t01=0x000c}
0x0fd1c…0fd38 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00a2, t01=0x0036}
0x0fd38…0fd54 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00a2, t01=0x0052}
0x0fd54…0fd70 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00a2, t01=0x006e}
0x0fd70…0fd7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x008a}
0x0fd7a…0fd8e Head {h00=0x0010, h01=0x0050, text=»TSTRST EQU *«, t00=0x00a2, t01=0x0094}
0x0fd8e…0fdb8 Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x00a2, t01=0x00a8}
0x0fdb8…0fdc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00d2}
0x0fdc2…0fdcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x00dc}
0x0fdcc…0fde0 Head {h00=0x0010, h01=0x0050, text=»TEERR2 EQU *«, t00=0x00a2, t01=0x00e6}
0x0fde0…0fe08 Head {h00=0x0024, h01=0x0050, text=» CM CWTCCB,A5 INDICATE CCA FREE «, t00=0x00a2, t01=0x00fa}
0x0fe08…0fe34 Head {h00=0x0028, h01=0x0050, text=» LDK A1,PLSERR RET CODE := SW ERROR «, t00=0x00a2, t01=0x0122}
0x0fe34…0fe48 Head {h00=0x0010, h01=0x0050, text=»TEERR1 EQU *«, t00=0x00a2, t01=0x014e}
0x0fe48…0fe72 Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x00a2, t01=0x0162}
0x0fe72…0fe7e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a2, t01=0x018c}
0x0fe7e…0fe88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0008}
0x0fe88…0fe96 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a3, t01=0x0012}
0x0fe96…0fea0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0020}
0x0fea0…0febe Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x00a3, t01=0x002a}
0x0febe…0fedc Head {h00=0x001a, h01=0x0050, text=»* INTERRUPT ROUTINES *«, t00=0x00a3, t01=0x0048}
0x0fedc…0fefa Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x00a3, t01=0x0066}
0x0fefa…0ff04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0084}
0x0ff04…0ff42 Head {h00=0x003a, h01=0x0050, text=»* THIS SECTION CONTAINS INTERRUPT HANDLING ROUTINES.«, t00=0x00a3, t01=0x008e}
0x0ff42…0ff76 Head {h00=0x0030, h01=0x0050, text=»* IT IS ENTERED IMMEDIATELY AT A RELEASE, «, t00=0x00a3, t01=0x00cc}
0x0ff76…0ffa8 Head {h00=0x002e, h01=0x0050, text=»* ATTENTION OR I/O COMPLETION INTERRUPT.«, t00=0x00a3, t01=0x0100}
0x0ffa8…0ffce Head {h00=0x0022, h01=0x0050, text=»* ALL ROUTINES ARE EXECUTED «, t00=0x00a3, t01=0x0132}
0x0ffce…1000a Head {h00=0x0038, h01=0x0050, text=»* ON INTERRUPT PRIORITY. AFTER PROCESSING, EXIT IS«, t00=0x00a3, t01=0x0158}
0x1000a…1004c (164, 0, 400) Head {h00=0x003e, h01=0x0050, text=»* MADE EITHER TO SOME ROUTINE WAITING FOR THE INTERRUPT,«, t00=0x00a4, t01=0x0004}
0x1004c…1008a Head {h00=0x003a, h01=0x0050, text=»* TO THE LOCAL PLC DISPATCHER OR TO TOSS DISPATCHER.«, t00=0x00a4, t01=0x0046}
0x1008a…100c6 Head {h00=0x0038, h01=0x0050, text=»* ON EXIT, A15 STACK CONTAINS INTERRUPT RETURN AND«, t00=0x00a4, t01=0x0084}
0x100c6…100d8 Head {h00=0x000e, h01=0x0050, text=»* A1-A8.«, t00=0x00a4, t01=0x00c0}
0x100d8…100e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00d2}
0x100e2…100ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x00dc}
0x100ec…10120 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x00a4, t01=0x00e6}
0x10120…1012a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x011a}
0x1012a…10142 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x00a4, t01=0x0124}
0x10142…1014c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x013c}
0x1014c…1016a Head {h00=0x001a, h01=0x0050, text=»* IHPL INTERRUPT ENTRY«, t00=0x00a4, t01=0x0146}
0x1016a…10192 Head {h00=0x0024, h01=0x0050, text=»* PLIHR HANDLE RELEASE INTERRUPT«, t00=0x00a4, t01=0x0164}
0x10192…101bc Head {h00=0x0026, h01=0x0050, text=»* PLIHA HANDLE ATTENTION INTERRUPT«, t00=0x00a4, t01=0x018c}
0x101bc…101ec Head {h00=0x002c, h01=0x0050, text=»* PLIHC HANDLE I/O COMPLETION INTERRUPT «, t00=0x00a5, t01=0x0026}
0x101ec…10222 Head {h00=0x0032, h01=0x0050, text=»* COMPSTA HANDLE COMPLETION OF START COMMANDS «, t00=0x00a5, t01=0x0056}
0x10222…1024c Head {h00=0x0026, h01=0x0050, text=»* (TEST CU, OPEN LINE, OPEN DLS)«, t00=0x00a5, t01=0x008c}
0x1024c…10282 Head {h00=0x0032, h01=0x0050, text=»* COMPTEST HANDLE COMPLETION OF TEST COMMANDS «, t00=0x00a5, t01=0x00b6}
0x10282…102bc Head {h00=0x0036, h01=0x0050, text=»* (PLC STATISTICS, DLS STAT., READ LOCAL MEMORY)«, t00=0x00a5, t01=0x00ec}
0x102bc…102f2 Head {h00=0x0032, h01=0x0050, text=»* COMPWRI HANDLE COMPLETION OF WRITE COMMANDS «, t00=0x00a5, t01=0x0126}
0x102f2…1032e Head {h00=0x0038, h01=0x0050, text=»* COMPGR HANDLE COMPLETION OF GENERAL READ COMMANDS «, t00=0x00a5, t01=0x015c}
0x1032e…1035c Head {h00=0x002a, h01=0x0050, text=»* GRERR HANDLE ERRORS AT GENERAL READ «, t00=0x00a6, t01=0x0008}
0x1035c…10396 Head {h00=0x0036, h01=0x0050, text=»* GRSACK HANDLE STATUS AND RR MESSAGE FROM DEVICE «, t00=0x00a6, t01=0x0036}
0x10396…103c4 Head {h00=0x002a, h01=0x0050, text=»* GRDATA HANDLE DATA INPUT FROM DEVICE«, t00=0x00a6, t01=0x0070}
0x103c4…103f8 Head {h00=0x0030, h01=0x0050, text=»* GRRES HANDLE RESET MESSAGE FROM SECONDARY «, t00=0x00a6, t01=0x009e}
0x103f8…10402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x00d2}
0x10402…10410 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a6, t01=0x00dc}
0x10410…1041a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x00ea}
0x1041a…1045e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00a6, t01=0x00f4}
0x1045e…10468 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0138}
0x10468…10480 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00a6, t01=0x0142}
0x10480…1048e Head {h00=0x000a, h01=0x0050, text=»* IHPL«, t00=0x00a6, t01=0x015a}
0x1048e…10498 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0168}
0x10498…104ac Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00a6, t01=0x0172}
0x104ac…104e2 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE CONTAINS INTERRUPT ENTRIES FOR «, t00=0x00a6, t01=0x0186}
0x104e2…10518 Head {h00=0x0032, h01=0x0050, text=»* ALL PLC:S INCLUDED. IT SAVES A1-A8, SETS CWT«, t00=0x00a7, t01=0x002c}
0x10518…10550 Head {h00=0x0034, h01=0x0050, text=»* ADDRESS AND EXITS TO RELEASE OR I/O COMPLETION«, t00=0x00a7, t01=0x0062}
0x10550…1056c Head {h00=0x0018, h01=0x0050, text=»* INTERRUPT HANDLER.«, t00=0x00a7, t01=0x009a}
0x1056c…10576 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x00b6}
0x10576…10586 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00a7, t01=0x00c0}
0x10586…105a2 Head {h00=0x0018, h01=0x0050, text=»* HARDWARE INTERRUPT«, t00=0x00a7, t01=0x00d0}
0x105a2…105ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x00ec}
0x105ac…105bc Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00a7, t01=0x00f6}
0x105bc…105e0 Head {h00=0x0020, h01=0x0050, text=»* A15 = SYSTEM STACK POINTER«, t00=0x00a7, t01=0x0106}
0x105e0…105fc Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x00a7, t01=0x012a}
0x105fc…10612 Head {h00=0x0012, h01=0x0050, text=»* MODE SYSTEM «, t00=0x00a7, t01=0x0146}
0x10612…1061c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x015c}
0x1061c…1062e Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00a7, t01=0x0166}
0x1062e…1064a Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00a7, t01=0x0178}
0x1064a…10654 (168, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0004}
0x10654…10698 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00a8, t01=0x000e}
0x10698…106a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0052}
0x106a2…106b6 Head {h00=0x0010, h01=0x0050, text=»IHPL01 EQU *«, t00=0x00a8, t01=0x005c}
0x106b6…106d0 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a8, t01=0x0070}
0x106d0…106e6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00a8, t01=0x008a}
0x106e6…10706 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00a8, t01=0x00a0}
0x10706…10712 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a8, t01=0x00c0}
0x10712…1072c Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a8, t01=0x00cc}
0x1072c…10742 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00a8, t01=0x00e6}
0x10742…10760 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00a8, t01=0x00fc}
0x10760…1076c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a8, t01=0x011a}
0x1076c…10776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0126}
0x10776…10790 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a8, t01=0x0130}
0x10790…107ba Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL0CWT CWT ADDRESS, PLC 0«, t00=0x00a8, t01=0x014a}
0x107ba…107e2 Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x00a8, t01=0x0174}
0x107e2…107ee Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a9, t01=0x000c}
0x107ee…107f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0018}
0x107f8…10806 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a9, t01=0x0022}
0x10806…10810 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0030}
0x10810…10824 Head {h00=0x0010, h01=0x0050, text=»IHPL02 EQU *«, t00=0x00a9, t01=0x003a}
0x10824…1083e Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a9, t01=0x004e}
0x1083e…10854 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00a9, t01=0x0068}
0x10854…1086a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00a9, t01=0x007e}
0x1086a…1088a Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00a9, t01=0x0094}
0x1088a…10896 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a9, t01=0x00b4}
0x10896…108a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x00c0}
0x108a0…108ba Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a9, t01=0x00ca}
0x108ba…108d0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00a9, t01=0x00e4}
0x108d0…108e6 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00a9, t01=0x00fa}
0x108e6…10904 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00a9, t01=0x0110}
0x10904…10910 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a9, t01=0x012e}
0x10910…1091a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x013a}
0x1091a…10934 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a9, t01=0x0144}
0x10934…1094a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00a9, t01=0x015e}
0x1094a…10974 Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL1CWT CWT ADDRESS, PLC 1«, t00=0x00a9, t01=0x0174}
0x10974…1099c Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x00aa, t01=0x000e}
0x1099c…109a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00aa, t01=0x0036}
0x109a8…109b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0042}
0x109b2…109c6 Head {h00=0x0010, h01=0x0050, text=»IHPL03 EQU *«, t00=0x00aa, t01=0x004c}
0x109c6…109e0 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00aa, t01=0x0060}
0x109e0…109f6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00aa, t01=0x007a}
0x109f6…10a0c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00aa, t01=0x0090}
0x10a0c…10a22 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00aa, t01=0x00a6}
0x10a22…10a42 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00aa, t01=0x00bc}
0x10a42…10a4e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00aa, t01=0x00dc}
0x10a4e…10a58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x00e8}
0x10a58…10a72 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00aa, t01=0x00f2}
0x10a72…10a88 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00aa, t01=0x010c}
0x10a88…10a9e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00aa, t01=0x0122}
0x10a9e…10ab4 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00aa, t01=0x0138}
0x10ab4…10ad2 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00aa, t01=0x014e}
0x10ad2…10ade Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00aa, t01=0x016c}
0x10ade…10ae8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0178}
0x10ae8…10b02 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00aa, t01=0x0182}
0x10b02…10b18 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00ab, t01=0x000c}
0x10b18…10b2e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00ab, t01=0x0022}
0x10b2e…10b58 Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL2CWT CWT ADDRESS, PLC 2«, t00=0x00ab, t01=0x0038}
0x10b58…10b80 Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x00ab, t01=0x0062}
0x10b80…10b8c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ab, t01=0x008a}
0x10b8c…10b96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x0096}
0x10b96…10baa Head {h00=0x0010, h01=0x0050, text=»IHPL04 EQU *«, t00=0x00ab, t01=0x00a0}
0x10baa…10bc4 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00ab, t01=0x00b4}
0x10bc4…10bda Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00ab, t01=0x00ce}
0x10bda…10bf0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00ab, t01=0x00e4}
0x10bf0…10c06 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x00ab, t01=0x00fa}
0x10c06…10c1c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00ab, t01=0x0110}
0x10c1c…10c3c Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00ab, t01=0x0126}
0x10c3c…10c48 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ab, t01=0x0146}
0x10c48…10c52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x0152}
0x10c52…10c6c Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00ab, t01=0x015c}
0x10c6c…10c82 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00ab, t01=0x0176}
0x10c82…10c98 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00ab, t01=0x018c}
0x10c98…10cae Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x00ac, t01=0x0012}
0x10cae…10cc4 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00ac, t01=0x0028}
0x10cc4…10ce2 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00ac, t01=0x003e}
0x10ce2…10cee Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ac, t01=0x005c}
0x10cee…10cf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x0068}
0x10cf8…10d12 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00ac, t01=0x0072}
0x10d12…10d28 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00ac, t01=0x008c}
0x10d28…10d3e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00ac, t01=0x00a2}
0x10d3e…10d54 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x00ac, t01=0x00b8}
0x10d54…10d7e Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL3CWT CWT ADDRESS, PLC 3«, t00=0x00ac, t01=0x00ce}
0x10d7e…10da6 Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x00ac, t01=0x00f8}
0x10da6…10db2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ac, t01=0x0120}
0x10db2…10dbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x012c}
0x10dbc…10dd0 Head {h00=0x0010, h01=0x0050, text=»IHPR01 EQU *«, t00=0x00ac, t01=0x0136}
0x10dd0…10de6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ac, t01=0x014a}
0x10de6…10dfc Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00ac, t01=0x0160}
0x10dfc…10e1c Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00ac, t01=0x0176}
0x10e1c…10e28 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ad, t01=0x0008}
0x10e28…10e3e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ad, t01=0x0014}
0x10e3e…10e54 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00ad, t01=0x002a}
0x10e54…10e72 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00ad, t01=0x0040}
0x10e72…10e7e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ad, t01=0x005e}
0x10e7e…10e94 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ad, t01=0x006a}
0x10e94…10ec4 Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR1CWT CWTADDRESS PLC 1 REMOTE «, t00=0x00ad, t01=0x0080}
0x10ec4…10eea Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL CWT:S«, t00=0x00ad, t01=0x00b0}
0x10eea…10ef6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ad, t01=0x00d6}
0x10ef6…10f0a Head {h00=0x0010, h01=0x0050, text=»IHPR02 EQU *«, t00=0x00ad, t01=0x00e2}
0x10f0a…10f20 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ad, t01=0x00f6}
0x10f20…10f36 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00ad, t01=0x010c}
0x10f36…10f4c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00ad, t01=0x0122}
0x10f4c…10f6c Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00ad, t01=0x0138}
0x10f6c…10f78 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ad, t01=0x0158}
0x10f78…10f8e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ad, t01=0x0164}
0x10f8e…10fa4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00ad, t01=0x017a}
0x10fa4…10fba Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00ad, t01=0x0190}
0x10fba…10fd8 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00ae, t01=0x0016}
0x10fd8…10fe4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x0034}
0x10fe4…10ffa Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ae, t01=0x0040}
0x10ffa…11010 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00ae, t01=0x0056}
0x11010…11040 Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR2CWT CWTADDRESS PLC 2 REMOTE «, t00=0x00ae, t01=0x006c}
0x11040…11066 Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL CWT:S«, t00=0x00ae, t01=0x009c}
0x11066…11072 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x00c2}
0x11072…11086 Head {h00=0x0010, h01=0x0050, text=»IHPR03 EQU *«, t00=0x00ae, t01=0x00ce}
0x11086…1109c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ae, t01=0x00e2}
0x1109c…110b2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00ae, t01=0x00f8}
0x110b2…110c8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00ae, t01=0x010e}
0x110c8…110de Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00ae, t01=0x0124}
0x110de…110fe Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00ae, t01=0x013a}
0x110fe…1110a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x015a}
0x1110a…11120 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ae, t01=0x0166}
0x11120…11136 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00ae, t01=0x017c}
0x11136…1114c (175, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00af, t01=0x0004}
0x1114c…11162 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00af, t01=0x001a}
0x11162…11180 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00af, t01=0x0030}
0x11180…1118c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00af, t01=0x004e}
0x1118c…111a2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00af, t01=0x005a}
0x111a2…111b8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00af, t01=0x0070}
0x111b8…111ce Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00af, t01=0x0086}
0x111ce…111fe Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR3CWT CWTADDRESS PLC 3 REMOTE «, t00=0x00af, t01=0x009c}
0x111fe…11224 Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL PLC:S«, t00=0x00af, t01=0x00cc}
0x11224…11230 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00af, t01=0x00f2}
0x11230…11244 Head {h00=0x0010, h01=0x0050, text=»IHPR04 EQU *«, t00=0x00af, t01=0x00fe}
0x11244…1125a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00af, t01=0x0112}
0x1125a…11270 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00af, t01=0x0128}
0x11270…11286 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00af, t01=0x013e}
0x11286…1129c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x00af, t01=0x0154}
0x1129c…112b2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00af, t01=0x016a}
0x112b2…112d2 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00af, t01=0x0180}
0x112d2…112de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b0, t01=0x0010}
0x112de…112f4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00b0, t01=0x001c}
0x112f4…1130a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00b0, t01=0x0032}
0x1130a…11320 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00b0, t01=0x0048}
0x11320…11336 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x00b0, t01=0x005e}
0x11336…1134c Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00b0, t01=0x0074}
0x1134c…1136a Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00b0, t01=0x008a}
0x1136a…11376 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b0, t01=0x00a8}
0x11376…1138c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00b0, t01=0x00b4}
0x1138c…113a2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00b0, t01=0x00ca}
0x113a2…113bc Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=2 U =9«, t00=0x00b0, t01=0x00e0}
0x113bc…113d6 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=3 U =9«, t00=0x00b0, t01=0x00fa}
0x113d6…11406 Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR4CWT CWTADDRESS PLC 4 REMOTE «, t00=0x00b0, t01=0x0114}
0x11406…1142c Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL CWT:S«, t00=0x00b0, t01=0x0144}
0x1142c…11438 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b0, t01=0x016a}
0x11438…11446 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b0, t01=0x0176}
0x11446…11450 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x0184}
0x11450…11462 Head {h00=0x000e, h01=0x0050, text=»IHPL EQU *«, t00=0x00b0, t01=0x018e}
0x11462…1148c Head {h00=0x0026, h01=0x0050, text=» ST P,INTSAV SAVE LATEST INTERRUPT«, t00=0x00b1, t01=0x0010}
0x1148c…114ae Head {h00=0x001e, h01=0x0050, text=» LDK A1,0 RESET HIGH BYTE «, t00=0x00b1, t01=0x003a}
0x114ae…114de Head {h00=0x002c, h01=0x0050, text=» LC A1,CWTCID+CIDINT,A5 INTERRUPT SOURCE«, t00=0x00b1, t01=0x005c}
0x114de…114fa Head {h00=0x0018, h01=0x0050, text=» CWK A1,/40 RELEASE?«, t00=0x00b1, t01=0x008c}
0x114fa…1151a Head {h00=0x001c, h01=0x0050, text=» RF(E) PLIHR YES, HANDLE«, t00=0x00b1, t01=0x00a8}
0x1151a…1153e Head {h00=0x0020, h01=0x0050, text=» CWK A1,/20 I/O COMPLETION? «, t00=0x00b1, t01=0x00c8}
0x1153e…1155e Head {h00=0x001c, h01=0x0050, text=» RF(E) PLIHC YES, HANDLE«, t00=0x00b1, t01=0x00ec}
0x1155e…1157c Head {h00=0x001a, h01=0x0050, text=» CWK A1,/80 ATTENTION?«, t00=0x00b1, t01=0x010c}
0x1157c…1159c Head {h00=0x001c, h01=0x0050, text=» RF(E) PLIHA YES, HANDLE«, t00=0x00b1, t01=0x012a}
0x1159c…115a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x014a}
0x115a6…115dc Head {h00=0x0032, h01=0x0050, text=» CF A15,PLCNOP ILLEGAL CODE, SET NOT OPERABLE «, t00=0x00b1, t01=0x0154}
0x115dc…115f4 Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00b1, t01=0x018a}
0x115f4…115fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x0012}
0x115fe…1160c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b2, t01=0x001c}
0x1160c…11616 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x002a}
0x11616…1165a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b2, t01=0x0034}
0x1165a…11664 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x0078}
0x11664…1167c Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00b2, t01=0x0082}
0x1167c…1168c Head {h00=0x000c, h01=0x0050, text=»* PLIHR «, t00=0x00b2, t01=0x009a}
0x1168c…11696 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x00aa}
0x11696…116aa Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00b2, t01=0x00b4}
0x116aa…116dc Head {h00=0x002e, h01=0x0050, text=»* THIS ROUTINE HANDLES RELEASE INTERRUPTS.«, t00=0x00b2, t01=0x00c8}
0x116dc…1170e Head {h00=0x002e, h01=0x0050, text=»* IT RESETS THE INTERRUPT, AND IF ANOTHER «, t00=0x00b2, t01=0x00fa}
0x1170e…1173e Head {h00=0x002c, h01=0x0050, text=»* PROCESS IS WAITING FOR THE CCA, RETURN«, t00=0x00b2, t01=0x012c}
0x1173e…1176a Head {h00=0x0028, h01=0x0050, text=»* IS MADE TO CCA ALLOCATION ROUTINE.«, t00=0x00b2, t01=0x015c}
0x1176a…11774 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x0188}
0x11774…11784 (179, 0, 400) Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00b3, t01=0x0004}
0x11784…11796 Head {h00=0x000e, h01=0x0050, text=»* RF PLIHR«, t00=0x00b3, t01=0x0014}
0x11796…117a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x0026}
0x117a0…117b0 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00b3, t01=0x0030}
0x117b0…117cc Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b3, t01=0x0040}
0x117cc…117d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x005c}
0x117d6…117e8 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00b3, t01=0x0066}
0x117e8…11804 Head {h00=0x0018, h01=0x0050, text=»* IF PROCESS WAITING«, t00=0x00b3, t01=0x0078}
0x11804…11834 Head {h00=0x002c, h01=0x0050, text=»* A4 = BLOCK ADDRESS OF WAITING PROCESS«, t00=0x00b3, t01=0x0094}
0x11834…11850 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b3, t01=0x00c4}
0x11850…1185a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x00e0}
0x1185a…1189e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b3, t01=0x00ea}
0x1189e…118a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x012e}
0x118a8…118bc Head {h00=0x0010, h01=0x0050, text=»PLIHR EQU * «, t00=0x00b3, t01=0x0138}
0x118bc…118e2 Head {h00=0x0022, h01=0x0050, text=» EX CWTST3,A5 RESET INTERRUPT «, t00=0x00b3, t01=0x014c}
0x118e2…11914 Head {h00=0x002e, h01=0x0050, text=» LD A4,CWTCCQ,A5 PROCESS WAITING FOR CCA? «, t00=0x00b3, t01=0x0172}
0x11914…11942 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) CCARST YES, ACTIVATE PROCESS «, t00=0x00b4, t01=0x0014}
0x11942…11968 Head {h00=0x0022, h01=0x0050, text=» CM CWTCCB,A5 NO, SET CCA FREE«, t00=0x00b4, t01=0x0042}
0x11968…11980 Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00b4, t01=0x0068}
0x11980…1198a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0080}
0x1198a…11998 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b4, t01=0x008a}
0x11998…119a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0098}
0x119a2…119e6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b4, t01=0x00a2}
0x119e6…119f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x00e6}
0x119f0…11a08 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00b4, t01=0x00f0}
0x11a08…11a18 Head {h00=0x000c, h01=0x0050, text=»* PLIHA «, t00=0x00b4, t01=0x0108}
0x11a18…11a22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0118}
0x11a22…11a36 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00b4, t01=0x0122}
0x11a36…11a6e Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE HANDLES ATTENTION INTERRUPTS. IF «, t00=0x00b4, t01=0x0136}
0x11a6e…11aa6 Head {h00=0x0034, h01=0x0050, text=»* ERROR, IT SETS AN ERROR CODE AND STARTS ABORT «, t00=0x00b4, t01=0x016e}
0x11aa6…11ade Head {h00=0x0034, h01=0x0050, text=»* OF ALL CALLS. IF COMMUNICATION REESTABLISHED, «, t00=0x00b5, t01=0x0016}
0x11ade…11afc Head {h00=0x001a, h01=0x0050, text=»* IT STARTS RECOVERY. «, t00=0x00b5, t01=0x004e}
0x11afc…11b06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x006c}
0x11b06…11b16 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00b5, t01=0x0076}
0x11b16…11b28 Head {h00=0x000e, h01=0x0050, text=»* RF PLIHA«, t00=0x00b5, t01=0x0086}
0x11b28…11b32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0098}
0x11b32…11b42 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00b5, t01=0x00a2}
0x11b42…11b5e Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b5, t01=0x00b2}
0x11b5e…11b68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x00ce}
0x11b68…11b7a Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00b5, t01=0x00d8}
0x11b7a…11b96 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b5, t01=0x00ea}
0x11b96…11bb0 Head {h00=0x0016, h01=0x0050, text=»* A6 = WS NUMBER «, t00=0x00b5, t01=0x0106}
0x11bb0…11bba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0120}
0x11bba…11bfe Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b5, t01=0x012a}
0x11bfe…11c08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x016e}
0x11c08…11c1c Head {h00=0x0010, h01=0x0050, text=»PLIHA EQU * «, t00=0x00b5, t01=0x0178}
0x11c1c…11c46 Head {h00=0x0026, h01=0x0050, text=» LD A1,CWTRCA+CCRSTA,A5 PLC STATUS«, t00=0x00b5, t01=0x018c}
0x11c46…11c70 Head {h00=0x0026, h01=0x0050, text=» ST A1,CWTPLS,A5 SAVE FOR TESTING «, t00=0x00b6, t01=0x0026}
0x11c70…11c86 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x00b6, t01=0x0050}
0x11c86…11ca4 Head {h00=0x001a, h01=0x0050, text=» CF A15,LOGATT LOG RCA«, t00=0x00b6, t01=0x0066}
0x11ca4…11cb0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b6, t01=0x0084}
0x11cb0…11cda Head {h00=0x0026, h01=0x0050, text=» LC A6,CWTRCA+CCRDLS,A5 WS NUMBER «, t00=0x00b6, t01=0x0090}
0x11cda…11cf6 Head {h00=0x0018, h01=0x0050, text=» ANK A6,MASKWS CLEAN«, t00=0x00b6, t01=0x00ba}
0x11cf6…11d18 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00b6, t01=0x00d6}
0x11d18…11d22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x00f8}
0x11d22…11d30 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b6, t01=0x0102}
0x11d30…11d3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x0110}
0x11d3a…11d5e Head {h00=0x0020, h01=0x0050, text=» LDKL A2,/FFFF-STACOM-STAERR«, t00=0x00b6, t01=0x011a}
0x11d5e…11d82 Head {h00=0x0020, h01=0x0050, text=»* MASK FOR ALLOWED ERRORS«, t00=0x00b6, t01=0x013e}
0x11d82…11da2 Head {h00=0x001c, h01=0x0050, text=» ANR A2,A1 FATAL ERROR? «, t00=0x00b6, t01=0x0162}
0x11da2…11dc4 Head {h00=0x001e, h01=0x0050, text=» RF(Z) IA100 NO, CONTINUE «, t00=0x00b6, t01=0x0182}
0x11dc4…11df0 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLCNOP SET PLC NOT OPERABLE «, t00=0x00b7, t01=0x0014}
0x11df0…11e08 Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00b7, t01=0x0040}
0x11e08…11e12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x0058}
0x11e12…11e26 Head {h00=0x0010, h01=0x0050, text=»IA100 EQU * «, t00=0x00b7, t01=0x0062}
0x11e26…11e40 Head {h00=0x0016, h01=0x0050, text=» LDR A2,A1 STATUS «, t00=0x00b7, t01=0x0076}
0x11e40…11e74 Head {h00=0x0030, h01=0x0050, text=» ANK A2,STACOM COMMUNICATION REESTABLISHED? «, t00=0x00b7, t01=0x0090}
0x11e74…11ea6 Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) PLREWS YES, START RECOVERY OF WS «, t00=0x00b7, t01=0x00c4}
0x11ea6…11eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x00f6}
0x11eb0…11ecc Head {h00=0x0018, h01=0x0050, text=» LDR A2,A6 WS NUMBER«, t00=0x00b7, t01=0x0100}
0x11ecc…11ef6 Head {h00=0x0026, h01=0x0050, text=» CF A15,STAHAN HANDLE ERROR STATUS«, t00=0x00b7, t01=0x011c}
0x11ef6…11f1a Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00b7, t01=0x0146}
0x11f1a…11f24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x016a}
0x11f24…11f32 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b7, t01=0x0174}
0x11f32…11f3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x0182}
0x11f3c…11f80 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b7, t01=0x018c}
0x11f80…11f8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0040}
0x11f8a…11fa2 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00b8, t01=0x004a}
0x11fa2…11fb2 Head {h00=0x000c, h01=0x0050, text=»* PLIHC «, t00=0x00b8, t01=0x0062}
0x11fb2…11fbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0072}
0x11fbc…11fd0 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00b8, t01=0x007c}
0x11fd0…1200a Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE HANDLES I/O COMPLETION INTERRUPTS. «, t00=0x00b8, t01=0x0090}
0x1200a…12044 Head {h00=0x0036, h01=0x0050, text=»* IT CHECKS WHICH COMMAND THAT HAS BEEN COMPLETED,«, t00=0x00b8, t01=0x00ca}
0x12044…1207a Head {h00=0x0032, h01=0x0050, text=»* AND EXITS TO CORRESPONDING COMMAND HANDLER. «, t00=0x00b8, t01=0x0104}
0x1207a…12084 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x013a}
0x12084…12094 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00b8, t01=0x0144}
0x12094…120a6 Head {h00=0x000e, h01=0x0050, text=»* RF PLIHC«, t00=0x00b8, t01=0x0154}
0x120a6…120b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0166}
0x120b0…120c0 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00b8, t01=0x0170}
0x120c0…120dc Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b8, t01=0x0180}
0x120dc…120e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x000c}
0x120e6…120f8 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00b9, t01=0x0016}
0x120f8…12112 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00b9, t01=0x0028}
0x12112…12132 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00b9, t01=0x0042}
0x12132…1214e Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b9, t01=0x0062}
0x1214e…1216c Head {h00=0x001a, h01=0x0050, text=»* A6 = USER PARAMETER«, t00=0x00b9, t01=0x007e}
0x1216c…12176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x009c}
0x12176…121ba Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b9, t01=0x00a6}
0x121ba…121c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x00ea}
0x121c4…121d8 Head {h00=0x0010, h01=0x0050, text=»PLIHC EQU * «, t00=0x00b9, t01=0x00f4}
0x121d8…12202 Head {h00=0x0026, h01=0x0050, text=» LD A1,CWTRCA+CCRSTA,A5 PLC STATUS«, t00=0x00b9, t01=0x0108}
0x12202…1222c Head {h00=0x0026, h01=0x0050, text=» ST A1,CWTPLS,A5 SAVE FOR TESTING «, t00=0x00b9, t01=0x0132}
0x1222c…12242 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x00b9, t01=0x015c}
0x12242…12260 Head {h00=0x001a, h01=0x0050, text=» CF A15,LOGIOC LOG CCR«, t00=0x00b9, t01=0x0172}
0x12260…1226c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b9, t01=0x0190}
0x1226c…12290 Head {h00=0x0020, h01=0x0050, text=» ANKL A1,/FFFF-STAPOL-STALER«, t00=0x00ba, t01=0x000c}
0x12290…122ba Head {h00=0x0026, h01=0x0050, text=»* RESET POLL STOP & LINK ERROR «, t00=0x00ba, t01=0x0030}
0x122ba…122fa Head {h00=0x003c, h01=0x0050, text=» LD A6,CWTRCA+CCRIDW,A5 USER PARAMETER (DWT, DLS OR ...)«, t00=0x00ba, t01=0x005a}
0x122fa…12322 Head {h00=0x0024, h01=0x0050, text=» LC A2,CWTRCA+CCRCMD,A5 COMMAND «, t00=0x00ba, t01=0x009a}
0x12322…1232c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00c2}
0x1232c…1233a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ba, t01=0x00cc}
0x1233a…12344 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00da}
0x12344…12370 Head {h00=0x0028, h01=0x0050, text=» LDK A3,CMDTBL COMMAND TABLE LENGTH «, t00=0x00ba, t01=0x00e4}
0x12370…12384 Head {h00=0x0010, h01=0x0050, text=»IC100 EQU * «, t00=0x00ba, t01=0x0110}
0x12384…123b4 Head {h00=0x002c, h01=0x0050, text=»* SCAN TABLE TO FIND MATCHING COMMAND«, t00=0x00ba, t01=0x0124}
0x123b4…123da Head {h00=0x0022, h01=0x0050, text=» SUK A3,CMDTB1 DECREMENT INDEX«, t00=0x00ba, t01=0x0154}
0x123da…12402 Head {h00=0x0024, h01=0x0050, text=» RF(N) IC120 END OF TABLE. ERROR«, t00=0x00ba, t01=0x017a}
0x12402…1242c Head {h00=0x0026, h01=0x0050, text=» CC A2,CMDTAB+1,A3 COMMAND FOUND? «, t00=0x00bb, t01=0x0012}
0x1242c…1244e Head {h00=0x001e, h01=0x0050, text=» RB(NE) IC100 NO, CONTINUE«, t00=0x00bb, t01=0x003c}
0x1244e…12458 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x005e}
0x12458…1248a Head {h00=0x002e, h01=0x0050, text=» C1 A2,CMDTAB+4,A3 MASK FOR ALLOWED ERRORS«, t00=0x00bb, t01=0x0068}
0x1248a…124aa Head {h00=0x001c, h01=0x0050, text=» ANR A2,A1 FATAL ERROR? «, t00=0x00bb, t01=0x009a}
0x124aa…124cc Head {h00=0x001e, h01=0x0050, text=» RF(Z) IC110 NO, CONTINUE «, t00=0x00bb, t01=0x00ba}
0x124cc…124f8 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLCNOP SET PLC NOT OPERABLE «, t00=0x00bb, t01=0x00dc}
0x124f8…1250c Head {h00=0x0010, h01=0x0050, text=»IC110 EQU * «, t00=0x00bb, t01=0x0108}
0x1250c…12542 Head {h00=0x0032, h01=0x0050, text=» ABI CMDTAB+2,A3 CALL COMMAND HANDLING ROUTINE«, t00=0x00bb, t01=0x011c}
0x12542…1254c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0152}
0x1254c…12560 Head {h00=0x0010, h01=0x0050, text=»IC120 EQU * «, t00=0x00bb, t01=0x015c}
0x12560…12582 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00bb, t01=0x0170}
0x12582…125ae (188, 0, 400) Head {h00=0x0028, h01=0x0050, text=» CF A15,PLCNOP SET PLC NOT OPERABLE «, t00=0x00bc, t01=0x0004}
0x125ae…125d2 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00bc, t01=0x0030}
0x125d2…125dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x0054}
0x125dc…125ea Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bc, t01=0x005e}
0x125ea…125f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x006c}
0x125f4…12638 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00bc, t01=0x0076}
0x12638…12642 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x00ba}
0x12642…1265a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00bc, t01=0x00c4}
0x1265a…1266c Head {h00=0x000e, h01=0x0050, text=»* COMPSTA «, t00=0x00bc, t01=0x00dc}
0x1266c…12676 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x00ee}
0x12676…1268a Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00bc, t01=0x00f8}
0x1268a…126c0 Head {h00=0x0032, h01=0x0050, text=»* THESE ROUTINES HANDLE COMPLETION OF TEST CU,«, t00=0x00bc, t01=0x010c}
0x126c0…126ea Head {h00=0x0026, h01=0x0050, text=»* OPEN LINE AND OPEN DLS COMMANDS.«, t00=0x00bc, t01=0x0142}
0x126ea…1271e Head {h00=0x0030, h01=0x0050, text=»* THEY CHECK THE RETURN CODE AND EXIT TO THE«, t00=0x00bc, t01=0x016c}
0x1271e…12748 Head {h00=0x0026, h01=0x0050, text=»* ROUTINE THAT MADE THE I/O CALL. «, t00=0x00bd, t01=0x0010}
0x12748…12752 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x003a}
0x12752…12762 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00bd, t01=0x0044}
0x12762…1277a Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00bd, t01=0x0054}
0x1277a…12784 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x006c}
0x12784…12794 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00bd, t01=0x0076}
0x12794…127ae Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00bd, t01=0x0086}
0x127ae…127ce Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00bd, t01=0x00a0}
0x127ce…127ea Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00bd, t01=0x00c0}
0x127ea…12812 Head {h00=0x0024, h01=0x0050, text=»* A6 = PARAMETER (IF RELEVANT) «, t00=0x00bd, t01=0x00dc}
0x12812…1281c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0104}
0x1281c…1282e Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00bd, t01=0x010e}
0x1282e…12848 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00bd, t01=0x0120}
0x12848…12868 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00bd, t01=0x013a}
0x12868…12884 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00bd, t01=0x015a}
0x12884…128b2 Head {h00=0x002a, h01=0x0050, text=»* A6 = DLS INDEX (IF EXIT TO ODLRST) «, t00=0x00bd, t01=0x0176}
0x128b2…128bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0014}
0x128bc…12900 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00be, t01=0x001e}
0x12900…1290a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0062}
0x1290a…1291e Head {h00=0x0010, h01=0x0050, text=»COMPTC EQU *«, t00=0x00be, t01=0x006c}
0x1291e…12940 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00be, t01=0x0080}
0x12940…12976 Head {h00=0x0032, h01=0x0050, text=» ABL TCURST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00be, t01=0x00a2}
0x12976…12980 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x00d8}
0x12980…1298e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00be, t01=0x00e2}
0x1298e…12998 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x00f0}
0x12998…129a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x00fa}
0x129a2…129c4 Head {h00=0x001e, h01=0x0050, text=»* OPEN LINE, COMPLETION«, t00=0x00be, t01=0x0104}
0x129c4…129ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0126}
0x129ce…129e2 Head {h00=0x0010, h01=0x0050, text=»COMPOP EQU *«, t00=0x00be, t01=0x0130}
0x129e2…12a04 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00be, t01=0x0144}
0x12a04…12a3a Head {h00=0x0032, h01=0x0050, text=» ABL OPLRST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00be, t01=0x0166}
0x12a3a…12a44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x000c}
0x12a44…12a4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x0016}
0x12a4e…12a70 Head {h00=0x001e, h01=0x0050, text=»* OPEN DLS, COMPLETION «, t00=0x00bf, t01=0x0020}
0x12a70…12a7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x0042}
0x12a7a…12a8e Head {h00=0x0010, h01=0x0050, text=»COMPOD EQU *«, t00=0x00bf, t01=0x004c}
0x12a8e…12ab0 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00bf, t01=0x0060}
0x12ab0…12ad0 Head {h00=0x001c, h01=0x0050, text=» LDR A2,A2 FATAL STATUS?«, t00=0x00bf, t01=0x0082}
0x12ad0…12afc Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CD100 YES, SKIP STATUS CHECK«, t00=0x00bf, t01=0x00a2}
0x12afc…12b06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x00ce}
0x12b06…12b22 Head {h00=0x0018, h01=0x0050, text=» LDR A2,A6 WS NUMBER«, t00=0x00bf, t01=0x00d8}
0x12b22…12b4a Head {h00=0x0024, h01=0x0050, text=» CF A15,STAHAN HANDLE PLC STATUS«, t00=0x00bf, t01=0x00f4}
0x12b4a…12b74 Head {h00=0x0026, h01=0x0050, text=» LDK A2,0 CLEAR FATAL STATUS FLAGS«, t00=0x00bf, t01=0x011c}
0x12b74…12b7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x0146}
0x12b7e…12b92 Head {h00=0x0010, h01=0x0050, text=»CD100 EQU * «, t00=0x00bf, t01=0x0150}
0x12b92…12bc8 Head {h00=0x0032, h01=0x0050, text=» ABL ODLRST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00bf, t01=0x0164}
0x12bc8…12bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x000a}
0x12bd2…12be0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c0, t01=0x0014}
0x12be0…12bea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0022}
0x12bea…12c2e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c0, t01=0x002c}
0x12c2e…12c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0070}
0x12c38…12c50 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00c0, t01=0x007a}
0x12c50…12c62 Head {h00=0x000e, h01=0x0050, text=»* COMPTEST«, t00=0x00c0, t01=0x0092}
0x12c62…12c6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x00a4}
0x12c6c…12c80 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00c0, t01=0x00ae}
0x12c80…12cb6 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES COMPLETION OF GET LINE «, t00=0x00c0, t01=0x00c2}
0x12cb6…12cee Head {h00=0x0034, h01=0x0050, text=»* STATISTICS, GET DLS STATISTICS AND READ LOCAL «, t00=0x00c0, t01=0x00f8}
0x12cee…12d08 Head {h00=0x0016, h01=0x0050, text=»* MEMORY COMMANDS.«, t00=0x00c0, t01=0x0130}
0x12d08…12d3a Head {h00=0x002e, h01=0x0050, text=»* IT CHECKS THE PLC STATUS, SETS EFFECTIVE«, t00=0x00c0, t01=0x014a}
0x12d3a…12d70 Head {h00=0x0032, h01=0x0050, text=»* LENGTH IN DWT AND EXITS TO THE ROUTINE THAT «, t00=0x00c0, t01=0x017c}
0x12d70…12d8c Head {h00=0x0018, h01=0x0050, text=»* MADE THE I/O CALL.«, t00=0x00c1, t01=0x0022}
0x12d8c…12d96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x003e}
0x12d96…12da6 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00c1, t01=0x0048}
0x12da6…12dbe Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00c1, t01=0x0058}
0x12dbe…12dc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0070}
0x12dc8…12dd8 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00c1, t01=0x007a}
0x12dd8…12df2 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00c1, t01=0x008a}
0x12df2…12e0e Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c1, t01=0x00a4}
0x12e0e…12e2a Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00c1, t01=0x00c0}
0x12e2a…12e34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x00dc}
0x12e34…12e46 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00c1, t01=0x00e6}
0x12e46…12e62 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00c1, t01=0x00f8}
0x12e62…12e7e Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c1, t01=0x0114}
0x12e7e…12e9a Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00c1, t01=0x0130}
0x12e9a…12ea4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x014c}
0x12ea4…12ee8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c1, t01=0x0156}
0x12ee8…12ef2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x000a}
0x12ef2…12f08 Head {h00=0x0012, h01=0x0050, text=» IFT PLCTST=1 «, t00=0x00c2, t01=0x0014}
0x12f08…12f1c Head {h00=0x0010, h01=0x0050, text=»COMPPS EQU *«, t00=0x00c2, t01=0x002a}
0x12f1c…12f30 Head {h00=0x0010, h01=0x0050, text=»COMPDS EQU *«, t00=0x00c2, t01=0x003e}
0x12f30…12f44 Head {h00=0x0010, h01=0x0050, text=»COMPRM EQU *«, t00=0x00c2, t01=0x0052}
0x12f44…12f4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x0066}
0x12f4e…12f5c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c2, t01=0x0070}
0x12f5c…12f66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x007e}
0x12f66…12f84 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 PLC STATUS «, t00=0x00c2, t01=0x0088}
0x12f84…12fa8 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TS100 ERROR. HANDLE «, t00=0x00c2, t01=0x00a6}
0x12fa8…12fb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x00ca}
0x12fb2…12fe2 Head {h00=0x002c, h01=0x0050, text=» LD A2,CWTRCA+CCRLEN,A5 EFFECTIVE LENGTH«, t00=0x00c2, t01=0x00d4}
0x12fe2…13002 Head {h00=0x001c, h01=0x0050, text=» ST A2,DWTTLN,A6 TO DWT «, t00=0x00c2, t01=0x0104}
0x13002…13020 Head {h00=0x001a, h01=0x0050, text=» RF TS110 EXIT. A1 = 0«, t00=0x00c2, t01=0x0124}
0x13020…1302a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x0142}
0x1302a…1303e Head {h00=0x0010, h01=0x0050, text=»TS100 EQU * «, t00=0x00c2, t01=0x014c}
0x1303e…13070 Head {h00=0x002e, h01=0x0050, text=» LDK A1,NOTOPR RETURN CODE := NOT OPERABLE«, t00=0x00c2, t01=0x0160}
0x13070…1309c (195, 0, 400) Head {h00=0x0028, h01=0x0050, text=» CM DWTTLN,A6 EFFECTIVE LENGTH := 0 «, t00=0x00c3, t01=0x0004}
0x1309c…130a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x0030}
0x130a6…130ba Head {h00=0x0010, h01=0x0050, text=»TS110 EQU * «, t00=0x00c3, t01=0x003a}
0x130ba…130dc Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00c3, t01=0x004e}
0x130dc…13112 Head {h00=0x0032, h01=0x0050, text=» ABL TSTRST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00c3, t01=0x0070}
0x13112…1311e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c3, t01=0x00a6}
0x1311e…13128 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x00b2}
0x13128…13136 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c3, t01=0x00bc}
0x13136…13140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x00ca}
0x13140…13184 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c3, t01=0x00d4}
0x13184…1318e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x0118}
0x1318e…131a6 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00c3, t01=0x0122}
0x131a6…131b8 Head {h00=0x000e, h01=0x0050, text=»* COMPWRI «, t00=0x00c3, t01=0x013a}
0x131b8…131c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x014c}
0x131c2…131d6 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00c3, t01=0x0156}
0x131d6…1320c Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES COMPLETION OF STANDARD «, t00=0x00c3, t01=0x016a}
0x1320c…1322c Head {h00=0x001c, h01=0x0050, text=»* WRITE AND FAST WRITE. «, t00=0x00c4, t01=0x0010}
0x1322c…13266 Head {h00=0x0036, h01=0x0050, text=»* IT CHECKS THE PLC STATUS AND RELEASES THE OUTPUT«, t00=0x00c4, t01=0x0030}
0x13266…1329c Head {h00=0x0032, h01=0x0050, text=»* BUFFER, IF ANY WAS ALLOCATED. IF THE OUTPUT «, t00=0x00c4, t01=0x006a}
0x1329c…132d2 Head {h00=0x0032, h01=0x0050, text=»* OPERATION IS FINISHED, IT THEN EXITS TO THE «, t00=0x00c4, t01=0x00a0}
0x132d2…132fc Head {h00=0x0026, h01=0x0050, text=»* ROUTINE THAT MADE THE I/O CALL. «, t00=0x00c4, t01=0x00d6}
0x132fc…13306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x0100}
0x13306…13316 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00c4, t01=0x010a}
0x13316…1332e Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00c4, t01=0x011a}
0x1332e…13338 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x0132}
0x13338…13348 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00c4, t01=0x013c}
0x13348…13362 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00c4, t01=0x014c}
0x13362…13382 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00c4, t01=0x0166}
0x13382…1339e Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c4, t01=0x0186}
0x1339e…133ba Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00c5, t01=0x0012}
0x133ba…133c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x002e}
0x133c4…133d6 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00c5, t01=0x0038}
0x133d6…1340a Head {h00=0x0030, h01=0x0050, text=»* WHEN RETURN TO ROUTINE MAKING OUTPUT CALL «, t00=0x00c5, t01=0x004a}
0x1340a…13426 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00c5, t01=0x007e}
0x13426…13444 Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO «, t00=0x00c5, t01=0x009a}
0x13444…13466 Head {h00=0x001e, h01=0x0050, text=»* BITS 8-15 DEVICE STATUS«, t00=0x00c5, t01=0x00b8}
0x13466…13482 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c5, t01=0x00da}
0x13482…1349e Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00c5, t01=0x00f6}
0x1349e…134a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x0112}
0x134a8…134ec Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c5, t01=0x011c}
0x134ec…134f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x0160}
0x134f6…13504 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c5, t01=0x016a}
0x13504…1350e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x0178}
0x1350e…13522 Head {h00=0x0010, h01=0x0050, text=»COMPSW EQU *«, t00=0x00c5, t01=0x0182}
0x13522…13536 Head {h00=0x0010, h01=0x0050, text=»COMPFW EQU *«, t00=0x00c6, t01=0x0008}
0x13536…1355a Head {h00=0x0020, h01=0x0050, text=» LDR A2,A2 FATAL PLC STATUS?«, t00=0x00c6, t01=0x001c}
0x1355a…1357c Head {h00=0x001e, h01=0x0050, text=» RF(NZ) WRERR1 YES, HANDLE«, t00=0x00c6, t01=0x0040}
0x1357c…13586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x0062}
0x13586…135b0 Head {h00=0x0026, h01=0x0050, text=» LC A2,DWTCP2,A6 CHANEL PARAMETER «, t00=0x00c6, t01=0x006c}
0x135b0…135d6 Head {h00=0x0022, h01=0x0050, text=» ANK A2,MASKWS CLEAN WS NUMBER«, t00=0x00c6, t01=0x0096}
0x135d6…135fe Head {h00=0x0024, h01=0x0050, text=» CF A15,STAHAN HANDLE PLC STATUS«, t00=0x00c6, t01=0x00bc}
0x135fe…13634 Head {h00=0x0032, h01=0x0050, text=» LC A7,CWTRCA+CCRIDB,A5 TYPE OF WRITE COMMAND «, t00=0x00c6, t01=0x00e4}
0x13634…1364e Head {h00=0x0016, h01=0x0050, text=» ANK A7,/FF CLEAN «, t00=0x00c6, t01=0x011a}
0x1364e…1367c Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTRCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x00c6, t01=0x0134}
0x1367c…1369e Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00c6, t01=0x0162}
0x1369e…136d0 Head {h00=0x002e, h01=0x0050, text=» ABI WRIROU,A7 CALL CORRESPONDING ROUTINE «, t00=0x00c6, t01=0x0184}
0x136d0…136da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0026}
0x136da…136e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0030}
0x136e4…13704 Head {h00=0x001c, h01=0x0050, text=»* IRRECOVERABLE ERROR«, t00=0x00c7, t01=0x003a}
0x13704…1370e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x005a}
0x1370e…13722 Head {h00=0x0010, h01=0x0050, text=»WRERR1 EQU *«, t00=0x00c7, t01=0x0064}
0x13722…13744 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00c7, t01=0x0078}
0x13744…13758 Head {h00=0x0010, h01=0x0050, text=»WRERR EQU * «, t00=0x00c7, t01=0x009a}
0x13758…13770 Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00c7, t01=0x00ae}
0x13770…1377a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x00c6}
0x1377a…13784 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x00d0}
0x13784…137b2 Head {h00=0x002a, h01=0x0050, text=»* COMPLETION OF DATA MESSAGE OUTPUT«, t00=0x00c7, t01=0x00da}
0x137b2…137bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x0108}
0x137bc…137d0 Head {h00=0x0010, h01=0x0050, text=»WRNFLO EQU *«, t00=0x00c7, t01=0x0112}
0x137d0…137e4 Head {h00=0x0010, h01=0x0050, text=»WRDATA EQU *«, t00=0x00c7, t01=0x0126}
0x137e4…13810 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLRLBU RELEASE OUTPUT BUFFER«, t00=0x00c7, t01=0x013a}
0x13810…13838 Head {h00=0x0024, h01=0x0050, text=» CM DWTLD1,A6 INDICATE NO BUFFER«, t00=0x00c7, t01=0x0166}
0x13838…13866 Head {h00=0x002a, h01=0x0050, text=» ABL ACKRST RETURN TO REQUEST HANDLER «, t00=0x00c7, t01=0x018e}
0x13866…13870 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x002c}
0x13870…1387a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0036}
0x1387a…138b2 Head {h00=0x0034, h01=0x0050, text=»* COMPLETION OF RECIEVE READY MESSAGE OUTPUT «, t00=0x00c8, t01=0x0040}
0x138b2…138bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0078}
0x138bc…138ce Head {h00=0x000e, h01=0x0050, text=»WRRR EQU *«, t00=0x00c8, t01=0x0082}
0x138ce…138f6 Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 START OF MONITOR BLOCK«, t00=0x00c8, t01=0x0094}
0x138f6…13914 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00c8, t01=0x00bc}
0x13914…13944 Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00c8, t01=0x00da}
0x13944…1396c Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00c8, t01=0x010a}
0x1396c…13990 Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00c8, t01=0x0132}
0x13990…1399a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0156}
0x1399a…139b2 Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00c8, t01=0x0160}
0x139b2…139bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0178}
0x139bc…139c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0182}
0x139c6…13a02 Head {h00=0x0038, h01=0x0050, text=»* COMPLETION OF RESET CONFIRMATION MESSAGE OUTPUT«, t00=0x00c8, t01=0x018c}
0x13a02…13a0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c9, t01=0x0038}
0x13a0c…13a20 Head {h00=0x0010, h01=0x0050, text=»WRRESC EQU *«, t00=0x00c9, t01=0x0042}
0x13a20…13a48 Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 START OF MONITOR BLOCK«, t00=0x00c9, t01=0x0056}
0x13a48…13a66 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00c9, t01=0x007e}
0x13a66…13a96 Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00c9, t01=0x009c}
0x13a96…13abe Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00c9, t01=0x00cc}
0x13abe…13ae2 Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00c9, t01=0x00f4}
0x13ae2…13aec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c9, t01=0x0118}
0x13aec…13b1e Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/FFFF-DWFRES MASK FOR RESET FLAG «, t00=0x00c9, t01=0x0122}
0x13b1e…13b4a Head {h00=0x0028, h01=0x0050, text=» ANS A2,DWTST,A6 CLEAR "RESET" FLAG «, t00=0x00c9, t01=0x0154}
0x13b4a…13b7e Head {h00=0x0030, h01=0x0050, text=» LDK A4,RELINE RECOVERY CAUSE := LINK RESET «, t00=0x00c9, t01=0x0180}
0x13b7e…13baa Head {h00=0x0028, h01=0x0050, text=» CF A15,NDREDW CALL RECOVERY FOR DWT«, t00=0x00ca, t01=0x0024}
0x13baa…13bce Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00ca, t01=0x0050}
0x13bce…13bd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0074}
0x13bd8…13be6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ca, t01=0x007e}
0x13be6…13bf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x008c}
0x13bf0…13c34 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00ca, t01=0x0096}
0x13c34…13c3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x00da}
0x13c3e…13c56 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00ca, t01=0x00e4}
0x13c56…13c66 Head {h00=0x000c, h01=0x0050, text=»* COMPGR«, t00=0x00ca, t01=0x00fc}
0x13c66…13c70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x010c}
0x13c70…13c84 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00ca, t01=0x0116}
0x13c84…13cb8 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE HANDLES COMPLETION OF GENERAL«, t00=0x00ca, t01=0x012a}
0x13cb8…13cd0 Head {h00=0x0014, h01=0x0050, text=»* READ COMMANDS.«, t00=0x00ca, t01=0x015e}
0x13cd0…13cfe Head {h00=0x002a, h01=0x0050, text=»* IT CHECKS TYPE OF MESSAGE AND CALLS «, t00=0x00ca, t01=0x0176}
0x13cfe…13d1e Head {h00=0x001c, h01=0x0050, text=»* CORRESPONDING ROUTINE.«, t00=0x00cb, t01=0x0014}
0x13d1e…13d28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x0034}
0x13d28…13d38 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00cb, t01=0x003e}
0x13d38…13d50 Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00cb, t01=0x004e}
0x13d50…13d5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x0066}
0x13d5a…13d6a Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00cb, t01=0x0070}
0x13d6a…13d84 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00cb, t01=0x0080}
0x13d84…13da4 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00cb, t01=0x009a}
0x13da4…13dc0 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00cb, t01=0x00ba}
0x13dc0…13dca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x00d6}
0x13dca…13ddc Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00cb, t01=0x00e0}
0x13ddc…13df6 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00cb, t01=0x00f2}
0x13df6…13e14 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00cb, t01=0x010c}
0x13e14…13e30 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00cb, t01=0x012a}
0x13e30…13e4a Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00cb, t01=0x0146}
0x13e4a…13e76 Head {h00=0x0028, h01=0x0050, text=»* A7 = DEVICE ADDRESS (IF RELEVANT)«, t00=0x00cb, t01=0x0160}
0x13e76…13e80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x018c}
0x13e80…13ec4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00cc, t01=0x0008}
0x13ec4…13ece Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x004c}
0x13ece…13ee2 Head {h00=0x0010, h01=0x0050, text=»COMPGR EQU *«, t00=0x00cc, t01=0x0056}
0x13ee2…13f02 Head {h00=0x001c, h01=0x0050, text=» LDR A2,A2 FATAL STATUS?«, t00=0x00cc, t01=0x006a}
0x13f02…13f22 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) GRERR2 YES, EXIT«, t00=0x00cc, t01=0x008a}
0x13f22…13f2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x00aa}
0x13f2c…13f3a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cc, t01=0x00b4}
0x13f3a…13f44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x00c2}
0x13f44…13f70 Head {h00=0x0028, h01=0x0050, text=» CF A15,INTYPE A3 := TYPE OF MESSAGE«, t00=0x00cc, t01=0x00cc}
0x13f70…13f9e Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTRCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x00cc, t01=0x00f8}
0x13f9e…13fc8 Head {h00=0x0026, h01=0x0050, text=» LC A6,CWTRCA+CCRDLS,A5 DLS INDEX «, t00=0x00cc, t01=0x0126}
0x13fc8…13fe4 Head {h00=0x0018, h01=0x0050, text=» ANK A6,MASKWS CLEAN«, t00=0x00cc, t01=0x0150}
0x13fe4…1400c Head {h00=0x0024, h01=0x0050, text=» LC A7,X25LCN,A4 DEVICE ADDRESS «, t00=0x00cc, t01=0x016c}
0x1400c…14028 (205, 0, 400) Head {h00=0x0018, h01=0x0050, text=» ANK A7,MASKLC CLEAN«, t00=0x00cd, t01=0x0004}
0x14028…14032 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0020}
0x14032…14066 Head {h00=0x0030, h01=0x0050, text=» ABI REAROU,A3 ROUTINE FOR THIS MESSAGE TYPE«, t00=0x00cd, t01=0x002a}
0x14066…14070 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x005e}
0x14070…1407e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cd, t01=0x0068}
0x1407e…14088 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0076}
0x14088…140cc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00cd, t01=0x0080}
0x140cc…140d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x00c4}
0x140d6…140ee Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00cd, t01=0x00ce}
0x140ee…140fe Head {h00=0x000c, h01=0x0050, text=»* GRERR «, t00=0x00cd, t01=0x00e6}
0x140fe…14108 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x00f6}
0x14108…1411c Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00cd, t01=0x0100}
0x1411c…14152 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES ILLEGAL INPUT MESSAGES.«, t00=0x00cd, t01=0x0114}
0x14152…14172 Head {h00=0x001c, h01=0x0050, text=»* GRERR1 RETURNS BUFFER «, t00=0x00cd, t01=0x014a}
0x14172…1417c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x016a}
0x1417c…1418c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00cd, t01=0x0174}
0x1418c…141a4 Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00cd, t01=0x0184}
0x141a4…141b8 Head {h00=0x0010, h01=0x0050, text=»* RB GRERR1 «, t00=0x00ce, t01=0x000c}
0x141b8…141cc Head {h00=0x0010, h01=0x0050, text=»* RF GRERR2 «, t00=0x00ce, t01=0x0020}
0x141cc…141d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0034}
0x141d6…141e6 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00ce, t01=0x003e}
0x141e6…14210 Head {h00=0x0026, h01=0x0050, text=»* A4 = BUFFER ADDRESS (IF GRERR1)«, t00=0x00ce, t01=0x004e}
0x14210…1422c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00ce, t01=0x0078}
0x1422c…14236 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0094}
0x14236…14248 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00ce, t01=0x009e}
0x14248…14254 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00ce, t01=0x00b0}
0x14254…1425e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x00bc}
0x1425e…142a2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00ce, t01=0x00c6}
0x142a2…142ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x010a}
0x142ac…142c0 Head {h00=0x0010, h01=0x0050, text=»GRERR1 EQU *«, t00=0x00ce, t01=0x0114}
0x142c0…142f2 Head {h00=0x002e, h01=0x0050, text=» CF A15,PLRLBU RELEASE GENERAL READ BUFFER«, t00=0x00ce, t01=0x0128}
0x142f2…142fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x015a}
0x142fc…14310 Head {h00=0x0010, h01=0x0050, text=»GRERR2 EQU *«, t00=0x00ce, t01=0x0164}
0x14310…14332 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00ce, t01=0x0178}
0x14332…1433c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x000a}
0x1433c…14354 Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00cf, t01=0x0014}
0x14354…1435e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x002c}
0x1435e…1436c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cf, t01=0x0036}
0x1436c…14376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x0044}
0x14376…143ba Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00cf, t01=0x004e}
0x143ba…143c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x0092}
0x143c4…143dc Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00cf, t01=0x009c}
0x143dc…143ec Head {h00=0x000c, h01=0x0050, text=»* GRSACK«, t00=0x00cf, t01=0x00b4}
0x143ec…143f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x00c4}
0x143f6…1440a Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00cf, t01=0x00ce}
0x1440a…14442 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE HANDLES STATUS AND RECIEVE READY «, t00=0x00cf, t01=0x00e2}
0x14442…14464 Head {h00=0x001e, h01=0x0050, text=»* MESSAGES FROM A DEVICE. «, t00=0x00cf, t01=0x011a}
0x14464…1449c Head {h00=0x0034, h01=0x0050, text=»* IT RELEASES THE BUFFER AND RETURNS TO ROUTINE «, t00=0x00cf, t01=0x013c}
0x1449c…144b6 Head {h00=0x0016, h01=0x0050, text=»* MAKING I/O CALL.«, t00=0x00cf, t01=0x0174}
0x144b6…144c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x018e}
0x144c0…144d0 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00d0, t01=0x0008}
0x144d0…144e8 Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00d0, t01=0x0018}
0x144e8…144f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x0030}
0x144f2…14502 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00d0, t01=0x003a}
0x14502…14520 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00d0, t01=0x004a}
0x14520…1453c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00d0, t01=0x0068}
0x1453c…14556 Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00d0, t01=0x0084}
0x14556…14574 Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x00d0, t01=0x009e}
0x14574…1457e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x00bc}
0x1457e…14590 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00d0, t01=0x00c6}
0x14590…145ac Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00d0, t01=0x00d8}
0x145ac…145c0 Head {h00=0x0010, h01=0x0050, text=»* =0 IF OK «, t00=0x00d0, t01=0x00f4}
0x145c0…145d8 Head {h00=0x0014, h01=0x0050, text=»* ><0 IF ERROR «, t00=0x00d0, t01=0x0108}
0x145d8…145f6 Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x00d0, t01=0x0120}
0x145f6…1461a Head {h00=0x0020, h01=0x0050, text=»* BITS 8-15 DEVICE STATUS «, t00=0x00d0, t01=0x013e}
0x1461a…14636 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00d0, t01=0x0162}
0x14636…14652 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00d0, t01=0x017e}
0x14652…1465c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x000a}
0x1465c…146a0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d1, t01=0x0014}
0x146a0…146aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0058}
0x146aa…146b8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d1, t01=0x0062}
0x146b8…146c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0070}
0x146c2…146d6 Head {h00=0x0010, h01=0x0050, text=»GRSTAT EQU *«, t00=0x00d1, t01=0x007a}
0x146d6…146fe Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00d1, t01=0x008e}
0x146fe…14722 Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00d1, t01=0x00b6}
0x14722…14756 Head {h00=0x0030, h01=0x0050, text=» CF A15,FWIPSR UPDATE FLOW CONTROL COUNTERS «, t00=0x00d1, t01=0x00da}
0x14756…14782 Head {h00=0x0028, h01=0x0050, text=» LC A2,X25DAT,A4 DEVICE STATUS BYTE «, t00=0x00d1, t01=0x010e}
0x14782…1479c Head {h00=0x0016, h01=0x0050, text=» ANK A2,/FF CLEAN «, t00=0x00d1, t01=0x013a}
0x1479c…147ba Head {h00=0x001a, h01=0x0050, text=» RF SR100 COMMON PART «, t00=0x00d1, t01=0x0154}
0x147ba…147c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0172}
0x147c4…147ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x017c}
0x147ce…147e0 Head {h00=0x000e, h01=0x0050, text=»GRRR EQU *«, t00=0x00d1, t01=0x0186}
0x147e0…14808 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00d2, t01=0x0008}
0x14808…1482c Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00d2, t01=0x0030}
0x1482c…1485e Head {h00=0x002e, h01=0x0050, text=» CF A15,FWIPR UPDATE FLOW CONTROL COUNTERS«, t00=0x00d2, t01=0x0054}
0x1485e…14888 Head {h00=0x0026, h01=0x0050, text=» LDK A2,0 RESET DEVICE STATUS BYTE«, t00=0x00d2, t01=0x0086}
0x14888…14892 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x00b0}
0x14892…1489c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x00ba}
0x1489c…148b0 Head {h00=0x0010, h01=0x0050, text=»SR100 EQU * «, t00=0x00d2, t01=0x00c4}
0x148b0…148f6 Head {h00=0x0042, h01=0x0050, text=»* COMMON PART FOR DEVICE STATUS AND RECIEVE READY MESSAGES «, t00=0x00d2, t01=0x00d8}
0x148f6…14918 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00d2, t01=0x011e}
0x14918…1494a Head {h00=0x002e, h01=0x0050, text=» CF A15,PLRLBU RELEASE GENERAL READ BUFFER«, t00=0x00d2, t01=0x0140}
0x1494a…1496c Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTST,A6 DWT STATUS«, t00=0x00d2, t01=0x0172}
0x1496c…1497e (211, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x00d3, t01=0x0004}
0x1497e…149b6 Head {h00=0x0034, h01=0x0050, text=» ANK A4,DWFAK3 ANYONE WAITING FOR THIS MESSAGE? «, t00=0x00d3, t01=0x0016}
0x149b6…149da Head {h00=0x0020, h01=0x0050, text=» ABL(Z) PLDSP2 NO, DISPATCH «, t00=0x00d3, t01=0x004e}
0x149da…149e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0072}
0x149e4…14a0c Head {h00=0x0024, h01=0x0050, text=» XRS A4,DWTST,A6 RESET WAIT FLAG«, t00=0x00d3, t01=0x007c}
0x14a0c…14a30 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RETURN CODE := OK «, t00=0x00d3, t01=0x00a4}
0x14a30…14a64 Head {h00=0x0030, h01=0x0050, text=» ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x00d3, t01=0x00c8}
0x14a64…14a92 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) AK3RST YES, RETURN WITH ACK 3«, t00=0x00d3, t01=0x00fc}
0x14a92…14ac0 Head {h00=0x002a, h01=0x0050, text=» ABL WINRST NO, RETURN TO WINDOW QUEUE«, t00=0x00d3, t01=0x012a}
0x14ac0…14aca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0158}
0x14aca…14ad8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d3, t01=0x0162}
0x14ad8…14ae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0170}
0x14ae2…14b26 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d3, t01=0x017a}
0x14b26…14b30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x002e}
0x14b30…14b48 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00d4, t01=0x0038}
0x14b48…14b58 Head {h00=0x000c, h01=0x0050, text=»* GRDATA«, t00=0x00d4, t01=0x0050}
0x14b58…14b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0060}
0x14b62…14b76 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00d4, t01=0x006a}
0x14b76…14baa Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE HANDLES DATA INPUT MESSAGES. «, t00=0x00d4, t01=0x007e}
0x14baa…14bd4 Head {h00=0x0026, h01=0x0050, text=»* IT LINKS THE BUFFER TO THE CWT. «, t00=0x00d4, t01=0x00b2}
0x14bd4…14bde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x00dc}
0x14bde…14bee Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00d4, t01=0x00e6}
0x14bee…14c06 Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00d4, t01=0x00f6}
0x14c06…14c10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x010e}
0x14c10…14c20 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00d4, t01=0x0118}
0x14c20…14c3e Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00d4, t01=0x0128}
0x14c3e…14c5a Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00d4, t01=0x0146}
0x14c5a…14c74 Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00d4, t01=0x0162}
0x14c74…14c92 Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x00d4, t01=0x017c}
0x14c92…14c9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x000a}
0x14c9c…14cae Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00d5, t01=0x0014}
0x14cae…14cba Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00d5, t01=0x0026}
0x14cba…14cc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0032}
0x14cc4…14d08 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d5, t01=0x003c}
0x14d08…14d12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0080}
0x14d12…14d26 Head {h00=0x0010, h01=0x0050, text=»GRDATA EQU *«, t00=0x00d5, t01=0x008a}
0x14d26…14d4e Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00d5, t01=0x009e}
0x14d4e…14d72 Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00d5, t01=0x00c6}
0x14d72…14d7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x00ea}
0x14d7c…14db0 Head {h00=0x0030, h01=0x0050, text=» CF A15,FWIPSR UPDATE FLOW CONTROL COUNTERS «, t00=0x00d5, t01=0x00f4}
0x14db0…14de8 Head {h00=0x0034, h01=0x0050, text=» ST A4,CWTBUF,A5 SAVE INPUT DATA BUFFER ADDRESS «, t00=0x00d5, t01=0x0128}
0x14de8…14e1c Head {h00=0x0030, h01=0x0050, text=» ST A6,BUFDWT,A4 SAVE DWT ADDRESS IN BUFFER «, t00=0x00d5, t01=0x0160}
0x14e1c…14e4c (214, 0, 400) Head {h00=0x002c, h01=0x0050, text=» LD A2,CWTRCA+CCRLEN,A5 EFFECTIVE LENGTH«, t00=0x00d6, t01=0x0004}
0x14e4c…14e74 Head {h00=0x0024, h01=0x0050, text=» ST A2,BUFLEN,A4 SAVE IN BUFFER «, t00=0x00d6, t01=0x0034}
0x14e74…14e9e Head {h00=0x0026, h01=0x0050, text=» LDK A2,X25DAT START OF USER DATA «, t00=0x00d6, t01=0x005c}
0x14e9e…14ec4 Head {h00=0x0022, h01=0x0050, text=» ST A2,BUFBIX,A4 TO BYTE INDEX«, t00=0x00d6, t01=0x0086}
0x14ec4…14ece Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x00ac}
0x14ece…14edc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d6, t01=0x00b6}
0x14edc…14ee6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x00c4}
0x14ee6…14f08 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00d6, t01=0x00ce}
0x14f08…14f20 Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00d6, t01=0x00f0}
0x14f20…14f2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0108}
0x14f2a…14f38 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d6, t01=0x0112}
0x14f38…14f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0120}
0x14f42…14f86 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d6, t01=0x012a}
0x14f86…14f90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x016e}
0x14f90…14fa8 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00d6, t01=0x0178}
0x14fa8…14fb8 Head {h00=0x000c, h01=0x0050, text=»* GRRES «, t00=0x00d6, t01=0x0190}
0x14fb8…14fc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x0010}
0x14fc2…14fd6 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00d7, t01=0x001a}
0x14fd6…1500c Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES RESET MESSAGES FROM THE«, t00=0x00d7, t01=0x002e}
0x1500c…15020 Head {h00=0x0010, h01=0x0050, text=»* SECONDARY.«, t00=0x00d7, t01=0x0064}
0x15020…1505a Head {h00=0x0036, h01=0x0050, text=»* IT RESETS THE FLOW CONTROL COUNTERS IN THE DWT, «, t00=0x00d7, t01=0x0078}
0x1505a…15094 Head {h00=0x0036, h01=0x0050, text=»* AND SETS A RESET PACKET FLAG IN THE DWT. THEN A «, t00=0x00d7, t01=0x00b2}
0x15094…150c8 Head {h00=0x0030, h01=0x0050, text=»* RESET CONFIRMATION MESSAGE IS SENT. IF THE«, t00=0x00d7, t01=0x00ec}
0x150c8…15104 Head {h00=0x0038, h01=0x0050, text=»* PROCESS IS WAITING FOR LEVEL 3 ACK OR IN A BUFFER «, t00=0x00d7, t01=0x0120}
0x15104…15122 Head {h00=0x001a, h01=0x0050, text=»* QUEUE IT IS ABORTED.«, t00=0x00d7, t01=0x015c}
0x15122…1512c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x017a}
0x1512c…1513c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00d7, t01=0x0184}
0x1513c…15154 (216, 0, 398) Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00d8, t01=0x0004}
0x15154…1515e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x001c}
0x1515e…1516e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00d8, t01=0x0026}
0x1516e…1518c Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00d8, t01=0x0036}
0x1518c…151a8 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00d8, t01=0x0054}
0x151a8…151c2 Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00d8, t01=0x0070}
0x151c2…151e0 Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x00d8, t01=0x008a}
0x151e0…151ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x00a8}
0x151ea…151fc Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00d8, t01=0x00b2}
0x151fc…15208 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00d8, t01=0x00c4}
0x15208…15212 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x00d0}
0x15212…15256 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d8, t01=0x00da}
0x15256…15260 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x011e}
0x15260…15274 Head {h00=0x0010, h01=0x0050, text=»GRRES EQU * «, t00=0x00d8, t01=0x0128}
0x15274…1529c Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00d8, t01=0x013c}
0x1529c…152c0 Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00d8, t01=0x0164}
0x152c0…152ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0188}
0x152ca…152d8 (217, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d9, t01=0x0004}
0x152d8…152e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0012}
0x152e2…15304 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00d9, t01=0x001c}
0x15304…15336 Head {h00=0x002e, h01=0x0050, text=» CF A15,PLRLBU RELEASE GENERAL READ BUFFER«, t00=0x00d9, t01=0x003e}
0x15336…15368 Head {h00=0x002e, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL COUNTERS «, t00=0x00d9, t01=0x0070}
0x15368…15372 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x00a2}
0x15372…15394 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x00d9, t01=0x00ac}
0x15394…153c2 Head {h00=0x002a, h01=0x0050, text=» ANK A2,DWFRES RESET ALREADY RECIEVED?«, t00=0x00d9, t01=0x00ce}
0x153c2…153e4 Head {h00=0x001e, h01=0x0050, text=» ABL(NZ) PLDSP2 YES, EXIT «, t00=0x00d9, t01=0x00fc}
0x153e4…153fa Head {h00=0x0012, h01=0x0050, text=» LDK A2,DWFRES«, t00=0x00d9, t01=0x011e}
0x153fa…1542a Head {h00=0x002c, h01=0x0050, text=» ORS A2,DWTST,A6 INDICATE RESET RECIEVED«, t00=0x00d9, t01=0x0134}
0x1542a…15434 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0164}
0x15434…1545a Head {h00=0x0022, h01=0x0050, text=» CF A15,PLCCCA RESERVE PLC CCA«, t00=0x00d9, t01=0x016e}
0x1545a…15466 (218, 0, 400) Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00da, t01=0x0004}
0x15466…15470 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00da, t01=0x0010}
0x15470…15498 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETBLK GET OUTPUT BUFFER«, t00=0x00da, t01=0x001a}
0x15498…154b6 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00da, t01=0x0042}
0x154b6…154e6 Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00da, t01=0x0060}
0x154e6…1551e Head {h00=0x0034, h01=0x0050, text=» CF A15,LNKFST PUT BLOCK IN QUEUE (FOR RECOVERY)«, t00=0x00da, t01=0x0090}
0x1551e…15540 Head {h00=0x001e, h01=0x0050, text=» ADK A4,2 SKIP QUEUE LINK «, t00=0x00da, t01=0x00c8}
0x15540…15572 Head {h00=0x002e, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 BUFFER ADDR TO CCA«, t00=0x00da, t01=0x00ea}
0x15572…155b0 Head {h00=0x003a, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR«, t00=0x00da, t01=0x011c}
0x155b0…155e4 Head {h00=0x0030, h01=0x0050, text=» CF A15,WRADR2 WRITE ADDRESS IN CCA (TYPE 2)«, t00=0x00da, t01=0x015a}
0x155e4…15618 Head {h00=0x0030, h01=0x0050, text=» LDK A2,CMDSW COMMAND CODE "STANDARD WRITE" «, t00=0x00da, t01=0x018e}
0x15618…1563e Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRCMD,A5 TO CCA«, t00=0x00db, t01=0x0032}
0x1563e…15664 Head {h00=0x0022, h01=0x0050, text=» LDK A2,/1F MESSAGE TYPE FLAGS«, t00=0x00db, t01=0x0058}
0x15664…1568e Head {h00=0x0026, h01=0x0050, text=» SC A2,X25FLW,A4 TO OUTPUT BUFFER «, t00=0x00db, t01=0x007e}
0x1568e…156be Head {h00=0x002c, h01=0x0050, text=» LDK A2,TYRESC TYPE "RESET CONFIRMATION"«, t00=0x00db, t01=0x00a8}
0x156be…156f0 Head {h00=0x002e, h01=0x0050, text=» SC A2,CWTCCA+CCRIDB,A5 TO CCA, COMMAND ID«, t00=0x00db, t01=0x00d8}
0x156f0…1572e Head {h00=0x003a, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA, COMMAND ID«, t00=0x00db, t01=0x010a}
0x1572e…1575a Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT LENGTH OF SYSTEM PART«, t00=0x00db, t01=0x0148}
0x1575a…15788 Head {h00=0x002a, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 TO CCA LENGTH «, t00=0x00db, t01=0x0174}
0x15788…15792 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x0012}
0x15792…157a0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00dc, t01=0x001c}
0x157a0…157aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x002a}
0x157aa…157cc Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x00dc, t01=0x0034}
0x157cc…157f6 Head {h00=0x0026, h01=0x0050, text=» ANK A2,DWFRES RESET STILL WANTED?«, t00=0x00dc, t01=0x0056}
0x157f6…15814 Head {h00=0x001a, h01=0x0050, text=» RF(Z) REERR1 NO, EXIT«, t00=0x00dc, t01=0x0080}
0x15814…1583e Head {h00=0x0026, h01=0x0050, text=» CF A15,GETWSS A1 := STATUS & INH «, t00=0x00dc, t01=0x009e}
0x1583e…15862 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) REERR1 EXIT IF ERROR«, t00=0x00dc, t01=0x00c8}
0x15862…1588a Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x00dc, t01=0x00ec}
0x1588a…158ae Head {h00=0x0020, h01=0x0050, text=» RF(NZ) REERR2 EXIT IF ERROR«, t00=0x00dc, t01=0x0114}
0x158ae…158b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x0138}
0x158b8…158e6 Head {h00=0x002a, h01=0x0050, text=» LDK A1,LINERR RET CODE := LINK ERROR «, t00=0x00dc, t01=0x0142}
0x158e6…15908 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x00dc, t01=0x0170}
0x15908…1591a (221, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x00dd, t01=0x0004}
0x1591a…1594a Head {h00=0x002c, h01=0x0050, text=» ANK A2,DWFAK3 WAITING FOR LEVEL 3 ACK? «, t00=0x00dd, t01=0x0016}
0x1594a…1596c Head {h00=0x001e, h01=0x0050, text=» RF(Z) RE100 NO, CONTINUE «, t00=0x00dd, t01=0x0046}
0x1596c…15994 Head {h00=0x0024, h01=0x0050, text=» XRS A2,DWTST,A6 RESET ACK3 FLAG«, t00=0x00dd, t01=0x0068}
0x15994…159c8 Head {h00=0x0030, h01=0x0050, text=» ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x00dd, t01=0x0090}
0x159c8…159f6 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) AK3RST YES, RETURN WITH ACK 3«, t00=0x00dd, t01=0x00c4}
0x159f6…15a24 Head {h00=0x002a, h01=0x0050, text=» ABL WINRST NO, RETURN TO WINDOW QUEUE«, t00=0x00dd, t01=0x00f2}
0x15a24…15a2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x0120}
0x15a2e…15a42 Head {h00=0x0010, h01=0x0050, text=»RE100 EQU * «, t00=0x00dd, t01=0x012a}
0x15a42…15a76 Head {h00=0x0030, h01=0x0050, text=» CF A15,OUTBUQ REMOVE DWT FROM BUFFER QUEUE «, t00=0x00dd, t01=0x013e}
0x15a76…15a90 Head {h00=0x0016, h01=0x0050, text=» LDR A2,A2 FOUND? «, t00=0x00dd, t01=0x0172}
0x15a90…15ac4 Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) BUFRST YES, RETURN WITH ERROR CODE «, t00=0x00dd, t01=0x018c}
0x15ac4…15ace Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0030}
0x15ace…15af2 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00de, t01=0x003a}
0x15af2…15afc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x005e}
0x15afc…15b06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0068}
0x15b06…15b1a Head {h00=0x0010, h01=0x0050, text=»REERR1 EQU *«, t00=0x00de, t01=0x0072}
0x15b1a…15b3c Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x00de, t01=0x0086}
0x15b3c…15b50 Head {h00=0x0010, h01=0x0050, text=»REERR2 EQU *«, t00=0x00de, t01=0x00a8}
0x15b50…15b86 Head {h00=0x0032, h01=0x0050, text=»* ERROR. RETURN MONITOR BLOCK IMMEDIATELY«, t00=0x00de, t01=0x00bc}
0x15b86…15bb6 Head {h00=0x002c, h01=0x0050, text=» SUK A4,2 START ADDRESS OF MONITOR BLOCK«, t00=0x00de, t01=0x00f2}
0x15bb6…15bee Head {h00=0x0034, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE. A7 ALREADY SET«, t00=0x00de, t01=0x0122}
0x15bee…15c1a Head {h00=0x0028, h01=0x0050, text=» CF A15,FREBLK RETURN MONITOR BLOCK «, t00=0x00de, t01=0x015a}
0x15c1a…15c3e Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00de, t01=0x0186}
0x15c3e…15c48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x001a}
0x15c48…15c56 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00df, t01=0x0024}
0x15c56…15c60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x0032}
0x15c60…15c7e Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x00df, t01=0x003c}
0x15c7e…15c9c Head {h00=0x001a, h01=0x0050, text=»* RECOVERY ROUTINES * «, t00=0x00df, t01=0x005a}
0x15c9c…15cba Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x00df, t01=0x0078}
0x15cba…15cc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x0096}
0x15cc4…15d04 Head {h00=0x003c, h01=0x0050, text=»* THESE ROUTINES ARE USED AT SYSTEM START OR TC POWER «, t00=0x00df, t01=0x00a0}
0x15d04…15d46 Head {h00=0x003e, h01=0x0050, text=»* UP. IN CASE OF POWER UP, THEY FIRST REMOVE ALL RUNNING«, t00=0x00df, t01=0x00e0}
0x15d46…15d84 Head {h00=0x003a, h01=0x0050, text=»* OUTPUT OPERATIONS. AFTER THAT, THE PLC IS STARTED,«, t00=0x00df, t01=0x0122}
0x15d84…15dc0 Head {h00=0x0038, h01=0x0050, text=»* AND LAST RECOVERY ROUTINES IN DEVICE DRIVERS ARE«, t00=0x00df, t01=0x0160}
0x15dc0…15de2 Head {h00=0x001e, h01=0x0050, text=»* CALLED FOR ALL DWT:S. «, t00=0x00e0, t01=0x000c}
0x15de2…15e1e Head {h00=0x0038, h01=0x0050, text=»* THE SECTION ALSO CONTAINS ROUTINES FOR RECOVERY «, t00=0x00e0, t01=0x002e}
0x15e1e…15e38 Head {h00=0x0016, h01=0x0050, text=»* OF I/O ERRORS.«, t00=0x00e0, t01=0x006a}
0x15e38…15e42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0084}
0x15e42…15e4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x008e}
0x15e4c…15e80 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x00e0, t01=0x0098}
0x15e80…15e8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x00cc}
0x15e8a…15ea2 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x00e0, t01=0x00d6}
0x15ea2…15eac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x00ee}
0x15eac…15ee8 Head {h00=0x0038, h01=0x0050, text=»* PLON CALL RECOVERY ONCE FOR EACH PLC CHANNEL UNIT «, t00=0x00e0, t01=0x00f8}
0x15ee8…15f1c Head {h00=0x0030, h01=0x0050, text=»* PLSTRT START PLC AND CALL DEVICE RECOVERY «, t00=0x00e0, t01=0x0134}
0x15f1c…15f26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0168}
0x15f26…15f34 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e0, t01=0x0172}
0x15f34…15f3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0180}
0x15f3e…15f82 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00e0, t01=0x018a}
0x15f82…15f8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x003e}
0x15f8c…15fa4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00e1, t01=0x0048}
0x15fa4…15fb2 Head {h00=0x000a, h01=0x0050, text=»* PLON«, t00=0x00e1, t01=0x0060}
0x15fb2…15fbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x006e}
0x15fbc…15fd0 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00e1, t01=0x0078}
0x15fd0…16002 Head {h00=0x002e, h01=0x0050, text=»* THIS ROUTINE WILL ACTIVATE A MONITOR JOB«, t00=0x00e1, t01=0x008c}
0x16002…16038 Head {h00=0x0032, h01=0x0050, text=»* FOR THE PLC RECOVERY, IF THE JOB NOT ALREADY«, t00=0x00e1, t01=0x00be}
0x16038…1604e Head {h00=0x0012, h01=0x0050, text=»* IS PENDING. «, t00=0x00e1, t01=0x00f4}
0x1604e…1608c Head {h00=0x003a, h01=0x0050, text=»* THE MONITOR JOB WILL CALL THE RECOVERY ROUTINE ONCE «, t00=0x00e1, t01=0x010a}
0x1608c…160ac Head {h00=0x001c, h01=0x0050, text=»* FOR EACH PLC DEFINED. «, t00=0x00e1, t01=0x0148}
0x160ac…160b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0168}
0x160b6…160c6 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00e1, t01=0x0172}
0x160c6…160dc Head {h00=0x0012, h01=0x0050, text=»* CF A15,PLON «, t00=0x00e1, t01=0x0182}
0x160dc…160e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x0008}
0x160e6…160f6 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00e2, t01=0x0012}
0x160f6…16102 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00e2, t01=0x0022}
0x16102…1610c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x002e}
0x1610c…1611e Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00e2, t01=0x0038}
0x1611e…16140 Head {h00=0x001e, h01=0x0050, text=»* AT ENTRY TO PLSTRT:«, t00=0x00e2, t01=0x004a}
0x16140…1615c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00e2, t01=0x006c}
0x1615c…16166 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x0088}
0x16166…161aa Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00e2, t01=0x0092}
0x161aa…161b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00d6}
0x161b4…161c6 Head {h00=0x000e, h01=0x0050, text=»PLON EQU *«, t00=0x00e2, t01=0x00e0}
0x161c6…161ee Head {h00=0x0024, h01=0x0050, text=» LD A1,PLCPFP POWER UP PENDING? «, t00=0x00e2, t01=0x00f2}
0x161ee…1620e Head {h00=0x001c, h01=0x0050, text=» RF(NZ) PO100 YES, EXIT «, t00=0x00e2, t01=0x011a}
0x1620e…1623a Head {h00=0x0028, h01=0x0050, text=» IM PLCPFP INDICATE POWER UP STARTED«, t00=0x00e2, t01=0x013a}
0x1623a…16244 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x0166}
0x16244…16268 Head {h00=0x0020, h01=0x0050, text=» LDKL A2,PO110 START ADDRESS«, t00=0x00e2, t01=0x0170}
0x16268…16292 (227, 0, 400) Head {h00=0x0026, h01=0x0050, text=» CF A15,QMJOB ACTIVATE MONITOR JOB«, t00=0x00e3, t01=0x0004}
0x16292…1629c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x002e}
0x1629c…162b0 Head {h00=0x0010, h01=0x0050, text=»PO100 EQU * «, t00=0x00e3, t01=0x0038}
0x162b0…162c0 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x00e3, t01=0x004c}
0x162c0…162ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x005c}
0x162ca…162d8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e3, t01=0x0066}
0x162d8…162e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x0074}
0x162e2…162f6 Head {h00=0x0010, h01=0x0050, text=»PO110 EQU * «, t00=0x00e3, t01=0x007e}
0x162f6…1631a Head {h00=0x0020, h01=0x0050, text=» CM PLCPFP NO LONGER PENDING«, t00=0x00e3, t01=0x0092}
0x1631a…16324 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x00b6}
0x16324…1632e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x00c0}
0x1632e…16354 Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x00e3, t01=0x00ca}
0x16354…16380 Head {h00=0x0028, h01=0x0050, text=»* RESET QUEUE STATISTICS COUNTERS«, t00=0x00e3, t01=0x00f0}
0x16380…163a4 Head {h00=0x0020, h01=0x0050, text=» LDK A1,STATLN TABLE LENGTH «, t00=0x00e3, t01=0x011c}
0x163a4…163b8 Head {h00=0x0010, h01=0x0050, text=»PO113 EQU * «, t00=0x00e3, t01=0x0140}
0x163b8…163d4 Head {h00=0x0018, h01=0x0050, text=» SUK A1,2 NEXT WORD «, t00=0x00e3, t01=0x0154}
0x163d4…163fc Head {h00=0x0024, h01=0x0050, text=» RF(N) PO116 READY WHEN ALL DONE«, t00=0x00e3, t01=0x0170}
0x163fc…16420 Head {h00=0x0020, h01=0x0050, text=» CM STATAR,A1 RESET COUNTER «, t00=0x00e4, t01=0x0008}
0x16420…1643c Head {h00=0x0018, h01=0x0050, text=» RB PO113 NEXT WORD «, t00=0x00e4, t01=0x002c}
0x1643c…16450 Head {h00=0x0010, h01=0x0050, text=»PO116 EQU * «, t00=0x00e4, t01=0x0048}
0x16450…1645c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e4, t01=0x005c}
0x1645c…16466 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x0068}
0x16466…16492 Head {h00=0x0028, h01=0x0050, text=» LDK A1,16 (MAX NUMBER OF PLC:S) * 2«, t00=0x00e4, t01=0x0072}
0x16492…164a6 Head {h00=0x0010, h01=0x0050, text=»PO120 EQU * «, t00=0x00e4, t01=0x009e}
0x164a6…164da Head {h00=0x0030, h01=0x0050, text=»* THIS LOOP IS EXECUTED ONCE FOR EACH PLC«, t00=0x00e4, t01=0x00b2}
0x164da…164f4 Head {h00=0x0016, h01=0x0050, text=» SUK A1,2 NEXT PLC«, t00=0x00e4, t01=0x00e6}
0x164f4…1651a Head {h00=0x0022, h01=0x0050, text=» RF(N) PO130 EXIT IF ALL DONE «, t00=0x00e4, t01=0x0100}
0x1651a…1653e Head {h00=0x0020, h01=0x0050, text=» LD A5,TABCWT,A1 CWT ADDRESS«, t00=0x00e4, t01=0x0126}
0x1653e…1656c Head {h00=0x002a, h01=0x0050, text=» RB(Z) PO120 TAKE NEXT IF NOT DEFINED «, t00=0x00e4, t01=0x014a}
0x1656c…16590 Head {h00=0x0020, h01=0x0050, text=» CF A15,PLSTRT START ONE PLC«, t00=0x00e4, t01=0x0178}
0x16590…165aa Head {h00=0x0016, h01=0x0050, text=» RB PO120 NEXT PLC«, t00=0x00e5, t01=0x000c}
0x165aa…165b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0026}
0x165b4…165c8 Head {h00=0x0010, h01=0x0050, text=»PO130 EQU * «, t00=0x00e5, t01=0x0030}
0x165c8…165ec Head {h00=0x0020, h01=0x0050, text=» ABL MEXIT MONITOR JOB EXIT «, t00=0x00e5, t01=0x0044}
0x165ec…165f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0068}
0x165f6…16604 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e5, t01=0x0072}
0x16604…1660e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0080}
0x1660e…16652 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00e5, t01=0x008a}
0x16652…1665c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x00ce}
0x1665c…16674 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00e5, t01=0x00d8}
0x16674…16684 Head {h00=0x000c, h01=0x0050, text=»* PLSTRT«, t00=0x00e5, t01=0x00f0}
0x16684…1668e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0100}
0x1668e…166a2 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00e5, t01=0x010a}
0x166a2…166d8 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE FIRST CLEARS ALL WORK AREAS AND«, t00=0x00e5, t01=0x011e}
0x166d8…16710 Head {h00=0x0034, h01=0x0050, text=»* DWT:S, AND SETS THE DWT:S BUSY. IT THEN STARTS«, t00=0x00e5, t01=0x0154}
0x16710…16746 Head {h00=0x0032, h01=0x0050, text=»* THE PLC, AND CALLS RECOVERY ROUTINES IN ALL «, t00=0x00e5, t01=0x018c}
0x16746…16760 Head {h00=0x0016, h01=0x0050, text=»* DEVICE DRIVERS. «, t00=0x00e6, t01=0x0032}
0x16760…1676a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x004c}
0x1676a…1677a Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00e6, t01=0x0056}
0x1677a…16792 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLSTRT «, t00=0x00e6, t01=0x0066}
0x16792…1679c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x007e}
0x1679c…167ac Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00e6, t01=0x0088}
0x167ac…167c8 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00e6, t01=0x0098}
0x167c8…167d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x00b4}
0x167d2…167e4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00e6, t01=0x00be}
0x167e4…167f0 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00e6, t01=0x00d0}
0x167f0…167fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x00dc}
0x167fa…1683e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00e6, t01=0x00e6}
0x1683e…16848 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x012a}
0x16848…1685c Head {h00=0x0010, h01=0x0050, text=»PLSTRT EQU *«, t00=0x00e6, t01=0x0134}
0x1685c…16872 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00e6, t01=0x0148}
0x16872…16892 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00e6, t01=0x015e}
0x16892…1689e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e6, t01=0x017e}
0x1689e…168b4 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00e6, t01=0x018a}
0x168b4…168d2 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00e7, t01=0x0010}
0x168d2…168de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e7, t01=0x002e}
0x168de…168e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x003a}
0x168e8…168f4 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00e7, t01=0x0044}
0x168f4…1692a Head {h00=0x0032, h01=0x0050, text=» IM CWTGR,A5 INDICATE GENERAL READ NOT ALLOWED«, t00=0x00e7, t01=0x0050}
0x1692a…16950 Head {h00=0x0022, h01=0x0050, text=» CM CWTABW,A5 STOP ABORT OF WS«, t00=0x00e7, t01=0x0086}
0x16950…1697e Head {h00=0x002a, h01=0x0050, text=» CM CWTSBQ,A5 RESET SHORT BUFFER QUEUE«, t00=0x00e7, t01=0x00ac}
0x1697e…169ac Head {h00=0x002a, h01=0x0050, text=» CM CWTLBQ,A5 RESET LONG BUFFER QUEUE «, t00=0x00e7, t01=0x00da}
0x169ac…169b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x0108}
0x169b6…169c4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e7, t01=0x0112}
0x169c4…169ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x0120}
0x169ce…169e2 Head {h00=0x0010, h01=0x0050, text=»ST100 EQU * «, t00=0x00e7, t01=0x012a}
0x169e2…16a14 Head {h00=0x002e, h01=0x0050, text=»* RETURN MONITOR BLOCKS USED AS BUFFERS«, t00=0x00e7, t01=0x013e}
0x16a14…16a26 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00e7, t01=0x0170}
0x16a26…16a56 Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00e7, t01=0x0182}
0x16a56…16a76 Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A7 FIRST BLOCK «, t00=0x00e8, t01=0x0022}
0x16a76…16a9e Head {h00=0x0024, h01=0x0050, text=» RF(Z) ST105 CONTINUE IF NO LEFT«, t00=0x00e8, t01=0x0042}
0x16a9e…16ac6 Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00e8, t01=0x006a}
0x16ac6…16aea Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00e8, t01=0x0092}
0x16aea…16b06 Head {h00=0x0018, h01=0x0050, text=» RB ST100 TAKE NEXT «, t00=0x00e8, t01=0x00b6}
0x16b06…16b1a Head {h00=0x0010, h01=0x0050, text=»ST105 EQU * «, t00=0x00e8, t01=0x00d2}
0x16b1a…16b4c Head {h00=0x002e, h01=0x0050, text=»* RETURN MONITOR BLOCKS FROM CCA QUEUE «, t00=0x00e8, t01=0x00e6}
0x16b4c…16b5e Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00e8, t01=0x0118}
0x16b5e…16b84 Head {h00=0x0022, h01=0x0050, text=» ADK A7,CWTCCQ CCA QUEUE HEAD «, t00=0x00e8, t01=0x012a}
0x16b84…16ba4 Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A7 FIRST BLOCK «, t00=0x00e8, t01=0x0150}
0x16ba4…16bcc Head {h00=0x0024, h01=0x0050, text=» RF(Z) ST110 CONTINUE IF NO LEFT«, t00=0x00e8, t01=0x0170}
0x16bcc…16bf4 Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00e9, t01=0x0008}
0x16bf4…16c18 Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00e9, t01=0x0030}
0x16c18…16c34 Head {h00=0x0018, h01=0x0050, text=» RB ST105 TAKE NEXT «, t00=0x00e9, t01=0x0054}
0x16c34…16c3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e9, t01=0x0070}
0x16c3e…16c52 Head {h00=0x0010, h01=0x0050, text=»ST110 EQU * «, t00=0x00e9, t01=0x007a}
0x16c52…16c74 Head {h00=0x001e, h01=0x0050, text=»* INITIATE BUFFER AREAS«, t00=0x00e9, t01=0x008e}
0x16c74…16c92 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A5 CWT ADDRESS«, t00=0x00e9, t01=0x00b0}
0x16c92…16cc8 Head {h00=0x0032, h01=0x0050, text=» ADKL A4,CWTSOB AREA FOR SHORT OUTPUT BUFFERS «, t00=0x00e9, t01=0x00ce}
0x16cc8…16cda Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00e9, t01=0x0104}
0x16cda…16d10 Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTPBS POOLBLOCK, SHORT OUTPUT BUFFERS«, t00=0x00e9, t01=0x0116}
0x16d10…16d3c Head {h00=0x0028, h01=0x0050, text=» CF A15,INIBUF INITIATE BUFFER AREA «, t00=0x00e9, t01=0x014c}
0x16d3c…16d5a Head {h00=0x001a, h01=0x0050, text=» LDR A4,A5 CWT ADDRESS«, t00=0x00e9, t01=0x0178}
0x16d5a…16d8e Head {h00=0x0030, h01=0x0050, text=» ADKL A4,CWTLOB AREA FOR LONG OUTPUT BUFFERS«, t00=0x00ea, t01=0x0008}
0x16d8e…16da0 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00ea, t01=0x003c}
0x16da0…16dd6 Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTPBL POOLBLOCK, LONG OUTPUT BUFFERS «, t00=0x00ea, t01=0x004e}
0x16dd6…16e02 Head {h00=0x0028, h01=0x0050, text=» CF A15,INIBUF INITIATE BUFFER AREA «, t00=0x00ea, t01=0x0084}
0x16e02…16e20 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A5 CWT ADDRESS«, t00=0x00ea, t01=0x00b0}
0x16e20…16e56 Head {h00=0x0032, h01=0x0050, text=» ADKL A4,CWTGRB AREA FOR GENERAL READ BUFFERS «, t00=0x00ea, t01=0x00ce}
0x16e56…16e68 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00ea, t01=0x0104}
0x16e68…16e9e Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTPBG POOLBLOCK, GENERAL READ BUFFERS«, t00=0x00ea, t01=0x0116}
0x16e9e…16eca Head {h00=0x0028, h01=0x0050, text=» CF A15,INIBUF INITIATE BUFFER AREA «, t00=0x00ea, t01=0x014c}
0x16eca…16ed4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x0178}
0x16ed4…16f08 Head {h00=0x0030, h01=0x0050, text=»* RESET ALL DWT:S AND WORK STATION STATUS«, t00=0x00ea, t01=0x0182}
0x16f08…16f3c Head {h00=0x0030, h01=0x0050, text=» LDK A3,MAXWS+1 NUMBER OF WORK STATIONS + 1 «, t00=0x00eb, t01=0x0026}
0x16f3c…16f50 Head {h00=0x0010, h01=0x0050, text=»ST120 EQU * «, t00=0x00eb, t01=0x005a}
0x16f50…16f74 Head {h00=0x0020, h01=0x0050, text=» SUK A3,1 NEXT WORK STATION «, t00=0x00eb, t01=0x006e}
0x16f74…16f9c Head {h00=0x0024, h01=0x0050, text=» RF(N) ST150 END IF NO MORE LEFT«, t00=0x00eb, t01=0x0092}
0x16f9c…16fc2 Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 WORK STATION NUMBER«, t00=0x00eb, t01=0x00ba}
0x16fc2…16fde Head {h00=0x0018, h01=0x0050, text=» SLA A2,1 MAKE INDEX«, t00=0x00eb, t01=0x00e0}
0x16fde…17000 Head {h00=0x001e, h01=0x0050, text=» ADR A2,A5 ADD CWT ADDRESS«, t00=0x00eb, t01=0x00fc}
0x17000…17030 Head {h00=0x002c, h01=0x0050, text=» ADK A2,CWTWSS WORK STATION STATUS WORD «, t00=0x00eb, t01=0x011e}
0x17030…1704c Head {h00=0x0018, h01=0x0050, text=» CMR A2 CLEAR STATUS«, t00=0x00eb, t01=0x014e}
0x1704c…17062 Head {h00=0x0012, h01=0x0050, text=» LDK A1,NOTOPR«, t00=0x00eb, t01=0x016a}
0x17062…17088 Head {h00=0x0022, h01=0x0050, text=» SCR A1,A2 WS := NOT OPERABLE «, t00=0x00eb, t01=0x0180}
0x17088…170bc Head {h00=0x0030, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE ADDRESS«, t00=0x00ec, t01=0x0016}
0x170bc…170e2 Head {h00=0x0022, h01=0x0050, text=» LDR A6,A3 WORK STATION NUMBER«, t00=0x00ec, t01=0x004a}
0x170e2…17116 Head {h00=0x0030, h01=0x0050, text=» CF A15,NDGEDN A7 := HIGEST DWT NUMBER ON WS«, t00=0x00ec, t01=0x0070}
0x17116…17128 Head {h00=0x000e, h01=0x0050, text=» ADK A7,1 «, t00=0x00ec, t01=0x00a4}
0x17128…1713c Head {h00=0x0010, h01=0x0050, text=»ST130 EQU * «, t00=0x00ec, t01=0x00b6}
0x1713c…17156 Head {h00=0x0016, h01=0x0050, text=» SUK A7,1 NEXT DWT«, t00=0x00ec, t01=0x00ca}
0x17156…17182 Head {h00=0x0028, h01=0x0050, text=» RF(N) ST140 NEXT WS IF NO DWT LEFT «, t00=0x00ec, t01=0x00e4}
0x17182…1719e Head {h00=0x0018, h01=0x0050, text=» LDR A6,A3 WS NUMBER«, t00=0x00ec, t01=0x0110}
0x1719e…171c6 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00ec, t01=0x012c}
0x171c6…171e6 Head {h00=0x001c, h01=0x0050, text=» RB(Z) ST130 NOT DEFINED«, t00=0x00ec, t01=0x0154}
0x171e6…1720e Head {h00=0x0024, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL«, t00=0x00ec, t01=0x0174}
0x1720e…17232 Head {h00=0x0020, h01=0x0050, text=» LDKL A2,/FFFF-DWFBSY-DWFPLC«, t00=0x00ed, t01=0x000c}
0x17232…1725a Head {h00=0x0024, h01=0x0050, text=»* MASK FOR BUSY AND PLC FLAGS«, t00=0x00ed, t01=0x0030}
0x1725a…1727e Head {h00=0x0020, h01=0x0050, text=» ANS A2,DWTST,A6 RESET FLAGS«, t00=0x00ed, t01=0x0058}
0x1727e…172aa Head {h00=0x0028, h01=0x0050, text=» CM DWTLD1,A6 RELEASE BUFFER, IF ANY«, t00=0x00ed, t01=0x007c}
0x172aa…172de Head {h00=0x0030, h01=0x0050, text=» CM DWTOTQ,A6 REMOVE DWT FROM QUEUE, IF ANY «, t00=0x00ed, t01=0x00a8}
0x172de…172f8 Head {h00=0x0016, h01=0x0050, text=» RB ST130 NEXT DWT«, t00=0x00ed, t01=0x00dc}
0x172f8…1730c Head {h00=0x0010, h01=0x0050, text=»ST140 EQU * «, t00=0x00ed, t01=0x00f6}
0x1730c…17330 Head {h00=0x0020, h01=0x0050, text=» RB ST120 NEXT WORK STATION «, t00=0x00ed, t01=0x010a}
0x17330…1733a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x012e}
0x1733a…1734e Head {h00=0x0010, h01=0x0050, text=»ST150 EQU * «, t00=0x00ed, t01=0x0138}
0x1734e…1737e Head {h00=0x002c, h01=0x0050, text=»* DELAY UNTIL PLC IS READY FOR START «, t00=0x00ed, t01=0x014c}
0x1737e…173ae Head {h00=0x002c, h01=0x0050, text=» LD A4,CWTTPR,A5 TIMER ALREADY STARTED? «, t00=0x00ed, t01=0x017c}
0x173ae…173d2 Head {h00=0x0020, h01=0x0050, text=» RF(Z) ST152 NO, START TIMER«, t00=0x00ee, t01=0x001c}
0x173d2…173f8 Head {h00=0x0022, h01=0x0050, text=» LDKL A1,-STADLY-1 DELAY TIME «, t00=0x00ee, t01=0x0040}
0x173f8…17418 Head {h00=0x001c, h01=0x0050, text=» STR A1,A4 RESTART TIMER«, t00=0x00ee, t01=0x0066}
0x17418…1742e Head {h00=0x0012, h01=0x0050, text=» RF ST154 EXIT«, t00=0x00ee, t01=0x0086}
0x1742e…17438 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ee, t01=0x009c}
0x17438…1744c Head {h00=0x0010, h01=0x0050, text=»ST152 EQU * «, t00=0x00ee, t01=0x00a6}
0x1744c…17470 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A5 SAVE CWT ADDRESS «, t00=0x00ee, t01=0x00ba}
0x17470…17492 Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME START TIMER«, t00=0x00ee, t01=0x00de}
0x17492…174ca Head {h00=0x0034, h01=0x0050, text=» DATA ST156,STADLY RESTART ADDRESS & DELAY TIME «, t00=0x00ee, t01=0x0100}
0x174ca…174f6 Head {h00=0x0028, h01=0x0050, text=» ST A4,CWTTPR,A5 SAVE TIMER POINTER «, t00=0x00ee, t01=0x0138}
0x174f6…1750a Head {h00=0x0010, h01=0x0050, text=»ST154 EQU * «, t00=0x00ee, t01=0x0164}
0x1750a…17536 Head {h00=0x0028, h01=0x0050, text=» ABL TDISP WAIT UNTIL TIMER EXPIRES «, t00=0x00ee, t01=0x0178}
0x17536…17540 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x0014}
0x17540…17554 Head {h00=0x0010, h01=0x0050, text=»ST156 EQU * «, t00=0x00ef, t01=0x001e}
0x17554…1757a Head {h00=0x0022, h01=0x0050, text=» LDR A5,A1 RESTORE CWT ADDRESS«, t00=0x00ef, t01=0x0032}
0x1757a…175aa Head {h00=0x002c, h01=0x0050, text=» CM CWTTPR,A5 INDICATE NO TIMER RUNNING «, t00=0x00ef, t01=0x0058}
0x175aa…175b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ef, t01=0x0088}
0x175b4…175e4 Head {h00=0x002c, h01=0x0050, text=»* START "TEST CHANNEL UNIT" OPERATION«, t00=0x00ef, t01=0x0092}
0x175e4…17606 Head {h00=0x001e, h01=0x0050, text=» IM CWTCCB,A5 SET CCA BUSY«, t00=0x00ef, t01=0x00c2}
0x17606…1762c Head {h00=0x0022, h01=0x0050, text=» CM CWTOPR,A5 SET PLC OPERABLE«, t00=0x00ef, t01=0x00e4}
0x1762c…1765c Head {h00=0x002c, h01=0x0050, text=» CM CWTCCA+CCRSU1,A5 CLEAR SUB-COMM DK1 «, t00=0x00ef, t01=0x010a}
0x1765c…17686 Head {h00=0x0026, h01=0x0050, text=» LDK A2,CMDTC COMMAND CODE TEST CU«, t00=0x00ef, t01=0x013a}
0x17686…176c2 Head {h00=0x0038, h01=0x0050, text=» ST A2,CWTCCA+CCRDLS,A5 COMMAND AND DLS INDEX TO CCA«, t00=0x00ef, t01=0x0164}
0x176c2…176f2 Head {h00=0x002c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING«, t00=0x00f0, t01=0x0010}
0x176f2…17710 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A5 CWT ADDRESS«, t00=0x00f0, t01=0x0040}
0x17710…1774a Head {h00=0x0036, h01=0x0050, text=» ADK A3,CWTCSD CONTROL UNIT START DESCRIPTOR ADDR «, t00=0x00f0, t01=0x005e}
0x1774a…17756 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x00f0, t01=0x0098}
0x17756…17776 Head {h00=0x001c, h01=0x0050, text=» CF A15,PLCCIO CIO START«, t00=0x00f0, t01=0x00a4}
0x17776…1779a Head {h00=0x0020, h01=0x0050, text=» RF(NZ) STERR2 EXIT IF ERROR«, t00=0x00f0, t01=0x00c4}
0x1779a…177d4 Head {h00=0x0036, h01=0x0050, text=» IM CWTOPR,A5 SET NOT OPERABLE UNTIL TEST CU READY«, t00=0x00f0, t01=0x00e8}
0x177d4…177fa Head {h00=0x0022, h01=0x0050, text=» ABL TDISP WAIT FOR COMPLETION«, t00=0x00f0, t01=0x0122}
0x177fa…17804 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0148}
0x17804…1780e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0152}
0x1780e…17848 Head {h00=0x0036, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN TEST CU IS COMPLETED.«, t00=0x00f0, t01=0x015c}
0x17848…17872 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x00f1, t01=0x0008}
0x17872…1788c Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00f1, t01=0x0032}
0x1788c…178a8 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00f1, t01=0x004c}
0x178a8…178b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0068}
0x178b2…178c6 Head {h00=0x0010, h01=0x0050, text=»TCURST EQU *«, t00=0x00f1, t01=0x0072}
0x178c6…178e6 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 OPERATION OK?«, t00=0x00f1, t01=0x0086}
0x178e6…17906 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) STERR2 NO, EXIT «, t00=0x00f1, t01=0x00a6}
0x17906…17910 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x00c6}
0x17910…1793a Head {h00=0x0026, h01=0x0050, text=»* PERFORM "OPEN LINE" OPERATION«, t00=0x00f1, t01=0x00d0}
0x1793a…1794a Head {h00=0x000c, h01=0x0050, text=» U =5 «, t00=0x00f1, t01=0x00fa}
0x1794a…17972 Head {h00=0x0024, h01=0x0050, text=» LDK A2,0 INITIATE LINE COUNTER «, t00=0x00f1, t01=0x010a}
0x17972…1798a Head {h00=0x0014, h01=0x0050, text=» ST A2,CWTLNO,A5«, t00=0x00f1, t01=0x0132}
0x1798a…1799e Head {h00=0x0010, h01=0x0050, text=»ST157 EQU * «, t00=0x00f1, t01=0x014a}
0x1799e…179c0 Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x00f1, t01=0x015e}
0x179c0…179ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0180}
0x179ca…179ee Head {h00=0x0020, h01=0x0050, text=» LD A2,CWTLNO,A5 GET LINE NO«, t00=0x00f1, t01=0x018a}
0x179ee…17a24 Head {h00=0x0032, h01=0x0050, text=» SC A2,CWTCCA+CCRSU1,A5 SET UP LINE IN CCA =5 «, t00=0x00f2, t01=0x001e}
0x17a24…17a4a Head {h00=0x0022, h01=0x0050, text=» SLL A2,1 MAKE OPEN LINE PARA-«, t00=0x00f2, t01=0x0054}
0x17a4a…17a6e Head {h00=0x0020, h01=0x0050, text=» ST A2,CWTPAR,A5 METER AREA «, t00=0x00f2, t01=0x007a}
0x17a6e…17a82 Head {h00=0x0010, h01=0x0050, text=»ST158 EQU * «, t00=0x00f2, t01=0x009e}
0x17a82…17aaa Head {h00=0x0024, h01=0x0050, text=» LD A2,CWTOPP,A5 MAKE ADDRESS TO«, t00=0x00f2, t01=0x00b2}
0x17aaa…17adc Head {h00=0x002e, h01=0x0050, text=» AD A2,CWTPAR,A5 OPEN LINE PARAMETER AREA «, t00=0x00f2, t01=0x00da}
0x17adc…17af4 Head {h00=0x0014, h01=0x0050, text=» LDR* A2,A2 U =5«, t00=0x00f2, t01=0x010c}
0x17af4…17b22 Head {h00=0x002a, h01=0x0050, text=» ST A2,CWTCCA+CCRBUF,A5 SET UP IN CCA «, t00=0x00f2, t01=0x0124}
0x17b22…17b4a Head {h00=0x0024, h01=0x0050, text=» LDK A2,CMDOP COMMAND OPEN LINE «, t00=0x00f2, t01=0x0152}
0x17b4a…17b86 Head {h00=0x0038, h01=0x0050, text=» ST A2,CWTCCA+CCRDLS,A5 COMMAND AND DLS INDEX TO CCA«, t00=0x00f2, t01=0x017a}
0x17b86…17bc4 Head {h00=0x003a, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR«, t00=0x00f3, t01=0x0026}
0x17bc4…17bf0 Head {h00=0x0028, h01=0x0050, text=» LDK A2,12 PARAMETER AREA LENGTH =1 «, t00=0x00f3, t01=0x0064}
0x17bf0…17c16 Head {h00=0x0022, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 TO CCA«, t00=0x00f3, t01=0x0090}
0x17c16…17c20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x00b6}
0x17c20…17c46 Head {h00=0x0022, h01=0x0050, text=» CM CWTOPR,A5 SET PLC OPERABLE«, t00=0x00f3, t01=0x00c0}
0x17c46…17c66 Head {h00=0x001c, h01=0x0050, text=» CF A15,PLCCIO CIO START«, t00=0x00f3, t01=0x00e6}
0x17c66…17c8a Head {h00=0x0020, h01=0x0050, text=» RF(NZ) STERR2 EXIT IF ERROR«, t00=0x00f3, t01=0x0106}
0x17c8a…17cae Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00f3, t01=0x012a}
0x17cae…17cb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x014e}
0x17cb8…17cc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x0158}
0x17cc2…17cfe Head {h00=0x0038, h01=0x0050, text=»* ENTRY TO OPLRST WILL BE MADE WHEN THE OPEN LINE«, t00=0x00f3, t01=0x0162}
0x17cfe…17d22 Head {h00=0x0020, h01=0x0050, text=»* OPERATION IS COMPLETED.«, t00=0x00f4, t01=0x000e}
0x17d22…17d4c Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x00f4, t01=0x0032}
0x17d4c…17d66 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00f4, t01=0x005c}
0x17d66…17d82 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00f4, t01=0x0076}
0x17d82…17d8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x0092}
0x17d8c…17da0 Head {h00=0x0010, h01=0x0050, text=»OPLRST EQU *«, t00=0x00f4, t01=0x009c}
0x17da0…17dc0 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 OPERATION OK?«, t00=0x00f4, t01=0x00b0}
0x17dc0…17de0 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) STERR2 NO, EXIT «, t00=0x00f4, t01=0x00d0}
0x17de0…17dea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x00f0}
0x17dea…17e0e Head {h00=0x0020, h01=0x0050, text=» LD A2,CWTPNR,A5 GET PLC NR «, t00=0x00f4, t01=0x00fa}
0x17e0e…17e2e Head {h00=0x001c, h01=0x0050, text=» SUK A2,3 CHECK IF LOCAL«, t00=0x00f4, t01=0x011e}
0x17e2e…17e48 Head {h00=0x0016, h01=0x0050, text=» RF(NP) ST159 YES «, t00=0x00f4, t01=0x013e}
0x17e48…17e74 Head {h00=0x0028, h01=0x0050, text=» IM CWTLNO,A5 INCREMENT LINE NUMBER «, t00=0x00f4, t01=0x0158}
0x17e74…17e98 Head {h00=0x0020, h01=0x0050, text=» LD A2,CWTLNO,A5 GET LINE NO«, t00=0x00f4, t01=0x0184}
0x17e98…17ebc Head {h00=0x0020, h01=0x0050, text=» SUK A2,4 ALL LINES OPENED ?«, t00=0x00f5, t01=0x0018}
0x17ebc…17ee0 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ST157 NO, TAKE NEXT «, t00=0x00f5, t01=0x003c}
0x17ee0…17ef6 Head {h00=0x0012, h01=0x0050, text=» CM CWTLNO,A5 «, t00=0x00f5, t01=0x0060}
0x17ef6…17f0a Head {h00=0x0010, h01=0x0050, text=»ST159 EQU * «, t00=0x00f5, t01=0x0076}
0x17f0a…17f14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f5, t01=0x008a}
0x17f14…17f46 Head {h00=0x002e, h01=0x0050, text=» CM CWTGR,A5 INDICATE GENERAL READ ALLOWED«, t00=0x00f5, t01=0x0094}
0x17f46…17f50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f5, t01=0x00c6}
0x17f50…17f92 Head {h00=0x003e, h01=0x0050, text=»* PERFORM OPEN DATA LINK FOR ALL CONNECTED SECONDARIES «, t00=0x00f5, t01=0x00d0}
0x17f92…17f9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f5, t01=0x0112}
0x17f9c…17fc8 Head {h00=0x0028, h01=0x0050, text=» LDK A6,MAXWS+1 (MAX NR OF DLS) + 1 «, t00=0x00f5, t01=0x011c}
0x17fc8…17fdc Head {h00=0x0010, h01=0x0050, text=»ST160 EQU * «, t00=0x00f5, t01=0x0148}
0x17fdc…18006 Head {h00=0x0026, h01=0x0050, text=» SUK A6,1 NEXT WORK STATION (DLS) «, t00=0x00f5, t01=0x015c}
0x18006…1802c Head {h00=0x0022, h01=0x0050, text=» RF(N) ST180 EXIT IF ALL DONE «, t00=0x00f5, t01=0x0186}
0x1802c…18058 Head {h00=0x0028, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE«, t00=0x00f6, t01=0x001c}
0x18058…1808c Head {h00=0x0030, h01=0x0050, text=» CF A15,NDGEDN A7 := HIGEST DWT NUMBER ON WS«, t00=0x00f6, t01=0x0048}
0x1808c…180aa Head {h00=0x001a, h01=0x0050, text=» LDR A7,A7 ANY DWT:S? «, t00=0x00f6, t01=0x007c}
0x180aa…180d0 Head {h00=0x0022, h01=0x0050, text=» RB(N) ST160 NO, TAKE NEXT WS «, t00=0x00f6, t01=0x009a}
0x180d0…180da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f6, t01=0x00c0}
0x180da…180fc Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x00f6, t01=0x00ca}
0x180fc…18122 Head {h00=0x0022, h01=0x0050, text=» LDR A3,A6 WORK STATION NUMBER«, t00=0x00f6, t01=0x00ec}
0x18122…1813e Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x00f6, t01=0x0112}
0x1813e…18160 Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x00f6, t01=0x012e}
0x18160…18186 Head {h00=0x0022, h01=0x0050, text=» CM CWTWSS,A3 CLEAR WS STATUS «, t00=0x00f6, t01=0x0150}
0x18186…181c2 Head {h00=0x0038, h01=0x0050, text=» SC A6,CWTCCA+CCRDLS,A5 DLS INDEX (WS NUMBER) TO CCA«, t00=0x00f6, t01=0x0176}
0x181c2…181f0 Head {h00=0x002a, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 SAVE DLS INDEX«, t00=0x00f7, t01=0x0022}
0x181f0…18216 Head {h00=0x0022, h01=0x0050, text=» LDK A2,CMDOD COMMAND OPEN DLS«, t00=0x00f7, t01=0x0050}
0x18216…1823c Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRCMD,A5 TO CCA«, t00=0x00f7, t01=0x0076}
0x1823c…18268 Head {h00=0x0028, h01=0x0050, text=» LDK A2,MAXFR MAX OUTSTANDING FRAMES«, t00=0x00f7, t01=0x009c}
0x18268…18298 Head {h00=0x002c, h01=0x0050, text=» SC A2,CWTCCA+CCRSU1,A5 TO SUBCOMMAND 1 «, t00=0x00f7, t01=0x00c8}
0x18298…182c8 Head {h00=0x002c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING«, t00=0x00f7, t01=0x00f8}
0x182c8…182e8 Head {h00=0x001c, h01=0x0050, text=» CF A15,PLCCIO CIO START«, t00=0x00f7, t01=0x0128}
0x182e8…1830c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) STERR2 EXIT IF ERROR«, t00=0x00f7, t01=0x0148}
0x1830c…1833a Head {h00=0x002a, h01=0x0050, text=» ABL PLDSP2 EXIT. WAIT FOR COMPLETION «, t00=0x00f7, t01=0x016c}
0x1833a…18344 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x000a}
0x18344…1834e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x0014}
0x1834e…18390 Head {h00=0x003e, h01=0x0050, text=»* ENTRY TO ODLRST IS MADE WHEN OPERATION IS COMPLETED. «, t00=0x00f8, t01=0x001e}
0x18390…183ba Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x00f8, t01=0x0060}
0x183ba…183da Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00f8, t01=0x008a}
0x183da…183f6 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00f8, t01=0x00aa}
0x183f6…18426 Head {h00=0x002c, h01=0x0050, text=»* A6 = WORK STATION NUMBER (DLS INDEX) «, t00=0x00f8, t01=0x00c6}
0x18426…18430 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x00f6}
0x18430…18444 Head {h00=0x0010, h01=0x0050, text=»ODLRST EQU *«, t00=0x00f8, t01=0x0100}
0x18444…18464 Head {h00=0x001c, h01=0x0050, text=» LDR A2,A2 FATAL ERROR? «, t00=0x00f8, t01=0x0114}
0x18464…18484 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) STERR2 YES, EXIT«, t00=0x00f8, t01=0x0134}
0x18484…184b8 Head {h00=0x0030, h01=0x0050, text=» LD* A3,CWTINT,A5 WORK STATION TABLE ADDRESS«, t00=0x00f8, t01=0x0154}
0x184b8…184e0 Head {h00=0x0024, h01=0x0050, text=» LDK A4,RETCP FLAG "TC POWER UP"«, t00=0x00f8, t01=0x0188}
0x184e0…18512 Head {h00=0x002e, h01=0x0050, text=» CF A15,NDREWS RECOVERY OF ALL DWT:S ON WS«, t00=0x00f9, t01=0x0020}
0x18512…1853a Head {h00=0x0024, h01=0x0050, text=» RB ST160 TAKE NEXT WORK STATION«, t00=0x00f9, t01=0x0052}
0x1853a…18544 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x007a}
0x18544…1854e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x0084}
0x1854e…18562 Head {h00=0x0010, h01=0x0050, text=»ST180 EQU * «, t00=0x00f9, t01=0x008e}
0x18562…18590 Head {h00=0x002a, h01=0x0050, text=»* ALL DATA LINKS ARE STARTED. EXIT.«, t00=0x00f9, t01=0x00a2}
0x18590…185b4 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00f9, t01=0x00d0}
0x185b4…185be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x00f4}
0x185be…185c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x00fe}
0x185c8…185dc Head {h00=0x0010, h01=0x0050, text=»STERR2 EQU *«, t00=0x00f9, t01=0x0108}
0x185dc…18604 Head {h00=0x0024, h01=0x0050, text=»* ERROR DURING STARTUP. EXIT.«, t00=0x00f9, t01=0x011c}
0x18604…1860e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x0144}
0x1860e…18626 Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00f9, t01=0x014e}
0x18626…18630 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x0166}
0x18630…1863e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f9, t01=0x0170}
0x1863e…18648 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x017e}
0x18648…18664 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x00f9, t01=0x0188}
0x18664…18680 Head {h00=0x0018, h01=0x0050, text=»* LOCAL DISPATCHER *«, t00=0x00fa, t01=0x0014}
0x18680…1869c Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x00fa, t01=0x0030}
0x1869c…186a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fa, t01=0x004c}
0x186a6…186e8 Head {h00=0x003e, h01=0x0050, text=»* THIS SECTION CONTAINS A DISPATCHER FOR THE PLC DRIVER.«, t00=0x00fa, t01=0x0056}
0x186e8…18728 Head {h00=0x003c, h01=0x0050, text=»* IT CAN BE CALLED EITHER FROM ANOTHER ROUTINE IN THE «, t00=0x00fa, t01=0x0098}
0x18728…1876a Head {h00=0x003e, h01=0x0050, text=»* PLC DRIVER, OR FROM A TERMINAL DEVICE DRIVER (THROUGH «, t00=0x00fa, t01=0x00d8}
0x1876a…18790 Head {h00=0x0022, h01=0x0050, text=»* THE NETWORK DISTRIBUTOR). «, t00=0x00fa, t01=0x011a}
0x18790…187ce Head {h00=0x003a, h01=0x0050, text=»* SOME INTERRUPTS OR DEVICE DRIVER CALLS SET SEVERAL«, t00=0x00fa, t01=0x0140}
0x187ce…1880a Head {h00=0x0038, h01=0x0050, text=»* RESOURCES FREE. THIS MEANS THAT SEVERAL WAITING «, t00=0x00fa, t01=0x017e}
0x1880a…1884a Head {h00=0x003c, h01=0x0050, text=»* PROCERSSES MAY BECOME READY FOR ACTIVATION. ONLY ONE«, t00=0x00fb, t01=0x002a}
0x1884a…18888 Head {h00=0x003a, h01=0x0050, text=»* OF THESE PROCESSES CAN BE ACTIVATED DIRECTLY. THE «, t00=0x00fb, t01=0x006a}
0x18888…188ca Head {h00=0x003e, h01=0x0050, text=»* OTHER PROCESSES WILL BE ACTIVATED IN TURN, WHEN FIRST «, t00=0x00fb, t01=0x00a8}
0x188ca…188f8 Head {h00=0x002a, h01=0x0050, text=»* PROCESS EXITS TO THIS DISPATCHER. «, t00=0x00fb, t01=0x00ea}
0x188f8…18902 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0118}
0x18902…1890c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0122}
0x1890c…18940 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x00fb, t01=0x012c}
0x18940…1894a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0160}
0x1894a…18962 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x00fb, t01=0x016a}
0x18962…1896c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0182}
0x1896c…189a8 Head {h00=0x0038, h01=0x0050, text=»* PLDISP ACTIVATE PROCESS OR PERFORM COMMON FUNCTION«, t00=0x00fb, t01=0x018c}
0x189a8…189b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x0038}
0x189b2…189c0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00fc, t01=0x0042}
0x189c0…189ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x0050}
0x189ca…18a0e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00fc, t01=0x005a}
0x18a0e…18a18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x009e}
0x18a18…18a30 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00fc, t01=0x00a8}
0x18a30…18a40 Head {h00=0x000c, h01=0x0050, text=»* PLDISP«, t00=0x00fc, t01=0x00c0}
0x18a40…18a4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x00d0}
0x18a4a…18a5e Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00fc, t01=0x00da}
0x18a5e…18a9a Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE LOOKS FOR WAITING PROCESSES THAT ARE «, t00=0x00fc, t01=0x00ee}
0x18a9a…18ad2 Head {h00=0x0034, h01=0x0050, text=»* READY FOR DISPATCHING. IF ANY IS FOUND, IT IS «, t00=0x00fc, t01=0x012a}
0x18ad2…18b0e Head {h00=0x0038, h01=0x0050, text=»* ACTIVATED. THE ROUTINE ALSO PERFORMS ACTIONS THAT «, t00=0x00fc, t01=0x0162}
0x18b0e…18b4a Head {h00=0x0038, h01=0x0050, text=»* ARE NOT EXPLICITLY REQUESTED BY USER PROCESSES, EG«, t00=0x00fd, t01=0x000e}
0x18b4a…18b8a Head {h00=0x003c, h01=0x0050, text=»* GENERAL READ. WHEN NOTHING IS LEFT TO DO, THE ROUTINE «, t00=0x00fd, t01=0x004a}
0x18b8a…18bae Head {h00=0x0020, h01=0x0050, text=»* EXITS TO TOSS DISPATCHER. «, t00=0x00fd, t01=0x008a}
0x18bae…18bea Head {h00=0x0038, h01=0x0050, text=»* TWO ENTRIES ARE PROVIDED. ONE IS USED WHEN CALLER «, t00=0x00fd, t01=0x00ae}
0x18bea…18c24 Head {h00=0x0036, h01=0x0050, text=»* KNOWS OWN DWT ADDRESS, ONE WHEN CALLER KNOWS OWN«, t00=0x00fd, t01=0x00ea}
0x18c24…18c3a Head {h00=0x0012, h01=0x0050, text=»* CWT ADDRESS.«, t00=0x00fd, t01=0x0124}
0x18c3a…18c44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x013a}
0x18c44…18c54 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00fd, t01=0x0144}
0x18c54…18c68 Head {h00=0x0010, h01=0x0050, text=»* ABL PLDISP«, t00=0x00fd, t01=0x0154}
0x18c68…18c7c Head {h00=0x0010, h01=0x0050, text=»* ABL PLDSP2«, t00=0x00fd, t01=0x0168}
0x18c7c…18c86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x017c}
0x18c86…18c96 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00fd, t01=0x0186}
0x18c96…18cbe Head {h00=0x0024, h01=0x0050, text=»* A5 = CWT ADDRESS (IF PLDSP2) «, t00=0x00fe, t01=0x0008}
0x18cbe…18ce6 Head {h00=0x0024, h01=0x0050, text=»* A6 = DWT ADDRESS (IF PLDISP) «, t00=0x00fe, t01=0x0030}
0x18ce6…18d02 Head {h00=0x0018, h01=0x0050, text=»* A1-A8 ON A15 STACK«, t00=0x00fe, t01=0x0058}
0x18d02…18d0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x0074}
0x18d0c…18d1e Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00fe, t01=0x007e}
0x18d1e…18d2a Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00fe, t01=0x0090}
0x18d2a…18d34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x009c}
0x18d34…18d78 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00fe, t01=0x00a6}
0x18d78…18d82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x00ea}
0x18d82…18d96 Head {h00=0x0010, h01=0x0050, text=»PLDISP EQU *«, t00=0x00fe, t01=0x00f4}
0x18d96…18daa Head {h00=0x0010, h01=0x0050, text=»PRDISP EQU *«, t00=0x00fe, t01=0x0108}
0x18daa…18dd2 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x00fe, t01=0x011c}
0x18dd2…18de4 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x00fe, t01=0x0144}
0x18de4…18e0c Head {h00=0x0024, h01=0x0050, text=» ABL(Z) TDISP NOT DEFINED. EXIT «, t00=0x00fe, t01=0x0156}
0x18e0c…18e16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x017e}
0x18e16…18e20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x0188}
0x18e20…18e34 (255, 0, 400) Head {h00=0x0010, h01=0x0050, text=»PLDSP2 EQU *«, t00=0x00ff, t01=0x0004}
0x18e34…18e3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ff, t01=0x0018}
0x18e3e…18e48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ff, t01=0x0022}
0x18e48…18e5c Head {h00=0x0010, h01=0x0050, text=»DP100 EQU * «, t00=0x00ff, t01=0x002c}
0x18e5c…18e68 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00ff, t01=0x0040}
0x18e68…18e8c Head {h00=0x0020, h01=0x0050, text=»* HANDLE CHARACTER INPUT «, t00=0x00ff, t01=0x004c}
0x18e8c…18eba Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTBUF,A5 INPUT BUFFER WAITING?«, t00=0x00ff, t01=0x0070}
0x18eba…18edc Head {h00=0x001e, h01=0x0050, text=» RF(Z) DP200 NO, CONTINUE «, t00=0x00ff, t01=0x009e}
0x18edc…18f00 Head {h00=0x0020, h01=0x0050, text=» LD A6,BUFDWT,A4 DWT ADDRESS«, t00=0x00ff, t01=0x00c0}
0x18f00…18f0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ff, t01=0x00e4}
0x18f0a…18f30 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLGECH A2 := CHARACTER«, t00=0x00ff, t01=0x00ee}
0x18f30…18f54 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A1 CHECK RETURN CODE«, t00=0x00ff, t01=0x0114}
0x18f54…18f76 Head {h00=0x001e, h01=0x0050, text=» RF(N) DP110 BUFFER EMPTY «, t00=0x00ff, t01=0x0138}
0x18f76…18f9c Head {h00=0x0022, h01=0x0050, text=» LD A3,DWTST,A6 DEVICE STATUS «, t00=0x00ff, t01=0x015a}
0x18f9c…18fc4 Head {h00=0x0024, h01=0x0050, text=» ANK A3,DWFINP INPUT REQUESTED? «, t00=0x00ff, t01=0x0180}
0x18fc4…18ff8 Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) INPRST YES, RETURN TO DEVICE DRIVER«, t00=0x0100, t01=0x0018}
0x18ff8…19002 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x004c}
0x19002…19028 Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTADR,A6 ADDRESS BLOCK«, t00=0x0100, t01=0x0056}
0x19028…1905a Head {h00=0x002e, h01=0x0050, text=» LD A1,INTADR,A1 INTERRUPT ENTRY DEFINED? «, t00=0x0100, t01=0x007c}
0x1905a…1908a Head {h00=0x002c, h01=0x0050, text=» ABR(NZ) A1 YES, GO TO INTERRUPT HANDLER«, t00=0x0100, t01=0x00ae}
0x1908a…19094 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x00de}
0x19094…190a8 Head {h00=0x0010, h01=0x0050, text=»DP110 EQU * «, t00=0x0100, t01=0x00e8}
0x190a8…190dc Head {h00=0x0030, h01=0x0050, text=» CW A4,DWTLD1,A6 BUFFER CHAINED TO THIS DWT?«, t00=0x0100, t01=0x00fc}
0x190dc…190fe Head {h00=0x001e, h01=0x0050, text=» RF(NE) DP120 NO, CONTINUE«, t00=0x0100, t01=0x0130}
0x190fe…19120 Head {h00=0x001e, h01=0x0050, text=» CM DWTLD1,A6 REMOVE LINK «, t00=0x0100, t01=0x0152}
0x19120…19134 Head {h00=0x0010, h01=0x0050, text=»DP120 EQU * «, t00=0x0100, t01=0x0174}
0x19134…1915c Head {h00=0x0024, h01=0x0050, text=» CM CWTBUF,A5 NO BUFFER WAITING «, t00=0x0100, t01=0x0188}
0x1915c…19182 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLRLBU RELEASE BUFFER «, t00=0x0101, t01=0x0020}
0x19182…1918c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x0046}
0x1918c…191c8 Head {h00=0x0038, h01=0x0050, text=»* CHECK IF LEVEL 3 RECIEVE READY SHOULD BE SENT«, t00=0x0101, t01=0x0050}
0x191c8…191fc Head {h00=0x0030, h01=0x0050, text=» CF A15,GETIFR A2 := NR OF FRAMES NOT ACK:ED«, t00=0x0101, t01=0x008c}
0x191fc…1921e Head {h00=0x001e, h01=0x0050, text=» SUK A2,6 TIME TO SEND RR?«, t00=0x0101, t01=0x00c0}
0x1921e…1923a Head {h00=0x0018, h01=0x0050, text=» ABL(NN) SENDRR YES «, t00=0x0101, t01=0x00e2}
0x1923a…19244 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x00fe}
0x19244…1924e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x0108}
0x1924e…19262 Head {h00=0x0010, h01=0x0050, text=»DP200 EQU * «, t00=0x0101, t01=0x0112}
0x19262…1926e Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0101, t01=0x0126}
0x1926e…19292 Head {h00=0x0020, h01=0x0050, text=»* HANDLE POWER UP FOR TC «, t00=0x0101, t01=0x0132}
0x19292…192be Head {h00=0x0028, h01=0x0050, text=» LD A1,PFPOST POWER UP TASK PENDING?«, t00=0x0101, t01=0x0156}
0x192be…192ea Head {h00=0x0028, h01=0x0050, text=» OR A1,PLCPFP PLC POWER UP PENDING? «, t00=0x0101, t01=0x0182}
0x192ea…1930a Head {h00=0x001c, h01=0x0050, text=» ABL(NZ) TDISP YES, EXIT«, t00=0x0102, t01=0x001e}
0x1930a…19314 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0102, t01=0x003e}
0x19314…1931e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0102, t01=0x0048}
0x1931e…19332 Head {h00=0x0010, h01=0x0050, text=»DP300 EQU * «, t00=0x0102, t01=0x0052}
0x19332…19360 Head {h00=0x002a, h01=0x0050, text=»* HANDLE ABORT OF ONE WORK STATION «, t00=0x0102, t01=0x0066}
0x19360…1938c Head {h00=0x0028, h01=0x0050, text=» LD A6,CWTABW,A5 WS TO ABORT, IF ANY«, t00=0x0102, t01=0x0094}
0x1938c…193ba Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) ABTHAN DO ABORT, IF REQUESTED«, t00=0x0102, t01=0x00c0}
0x193ba…193c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0102, t01=0x00ee}
0x193c4…193ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0102, t01=0x00f8}
0x193ce…193e2 Head {h00=0x0010, h01=0x0050, text=»DP400 EQU * «, t00=0x0102, t01=0x0102}
0x193e2…1940e Head {h00=0x0028, h01=0x0050, text=»* CHECK IF ANYONE WAITING FOR CCA«, t00=0x0102, t01=0x0116}
0x1940e…1943c Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTCCQ,A5 ANYONE IN CCA QUEUE? «, t00=0x0102, t01=0x0142}
0x1943c…1945e Head {h00=0x001e, h01=0x0050, text=» RF(Z) DP500 NO, CONTINUE «, t00=0x0102, t01=0x0170}
0x1945e…19480 (259, 0, 400) Head {h00=0x001e, h01=0x0050, text=» LD A1,CWTCCB,A5 CCA FREE?«, t00=0x0103, t01=0x0004}
0x19480…194a2 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DP500 NO, CONTINUE«, t00=0x0103, t01=0x0026}
0x194a2…194c4 Head {h00=0x001e, h01=0x0050, text=» IM CWTCCB,A5 SET CCA BUSY«, t00=0x0103, t01=0x0048}
0x194c4…194f0 Head {h00=0x0028, h01=0x0050, text=» ABL CCARST ACTIVATE WAITING PROCESS«, t00=0x0103, t01=0x006a}
0x194f0…194fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0103, t01=0x0096}
0x194fa…19504 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0103, t01=0x00a0}
0x19504…19518 Head {h00=0x0010, h01=0x0050, text=»DP500 EQU * «, t00=0x0103, t01=0x00aa}
0x19518…19538 Head {h00=0x001c, h01=0x0050, text=»* CHECK BUFFER QUEUES«, t00=0x0103, t01=0x00be}
0x19538…19570 Head {h00=0x0034, h01=0x0050, text=» LD A6,CWTSBQ,A5 ANYONE IN SHORT BUFFERS QUEUE? «, t00=0x0103, t01=0x00de}
0x19570…19594 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DP510 NO, CHECK LONG «, t00=0x0103, t01=0x0116}
0x19594…195b2 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0103, t01=0x013a}
0x195b2…195e4 Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBS POOLBLOCK FOR SHORT BUFFERS«, t00=0x0103, t01=0x0158}
0x195e4…19610 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLGTBU A4 := BUFFER ADDRESS «, t00=0x0103, t01=0x018a}
0x19610…19638 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DP510 NO BUFFER AVAILABLE«, t00=0x0104, t01=0x0026}
0x19638…19668 Head {h00=0x002c, h01=0x0050, text=» LDK A7,CWTSBQ OFFSET TO CWT QUEUE HEAD «, t00=0x0104, t01=0x004e}
0x19668…19694 Head {h00=0x0028, h01=0x0050, text=» RF DP520 COMMON PART FOR SHORT/LONG«, t00=0x0104, t01=0x007e}
0x19694…1969e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x00aa}
0x1969e…196b2 Head {h00=0x0010, h01=0x0050, text=»DP510 EQU * «, t00=0x0104, t01=0x00b4}
0x196b2…196e8 Head {h00=0x0032, h01=0x0050, text=» LD A6,CWTLBQ,A5 ANYONE IN LONG BUFFERS QUEUE?«, t00=0x0104, t01=0x00c8}
0x196e8…1970a Head {h00=0x001e, h01=0x0050, text=» RF(Z) DP600 NO, CONTINUE «, t00=0x0104, t01=0x00fe}
0x1970a…19728 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0104, t01=0x0120}
0x19728…1975a Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBL POOLBLOCK FOR LONG BUFFERS «, t00=0x0104, t01=0x013e}
0x1975a…19786 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLGTBU A4 := BUFFER ADDRESS «, t00=0x0104, t01=0x0170}
0x19786…197ba Head {h00=0x0030, h01=0x0050, text=» RF(Z) DP600 CONTINUE IF NO BUFFER AVAILABLE«, t00=0x0105, t01=0x000c}
0x197ba…197f2 Head {h00=0x0034, h01=0x0050, text=» LDK A7,CWTLBQ OFFSET TO LONG BUFFERS QUEUE HEAD«, t00=0x0105, t01=0x0040}
0x197f2…197fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x0078}
0x197fc…19810 Head {h00=0x0010, h01=0x0050, text=»DP520 EQU * «, t00=0x0105, t01=0x0082}
0x19810…1983a Head {h00=0x0026, h01=0x0050, text=»* SHORT OR LONG BUFFER FOUND «, t00=0x0105, t01=0x0096}
0x1983a…19860 Head {h00=0x0022, h01=0x0050, text=» LDR A2,A4 SAVE BUFFER ADDRESS«, t00=0x0105, t01=0x00c0}
0x19860…19882 Head {h00=0x001e, h01=0x0050, text=» LDR A4,A6 DWT QUEUE LINK «, t00=0x0105, t01=0x00e6}
0x19882…198a6 Head {h00=0x0020, h01=0x0050, text=» ADR A7,A5 BUFFER QUEUE HEAD«, t00=0x0105, t01=0x0108}
0x198a6…198ce Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x0105, t01=0x012c}
0x198ce…198f8 Head {h00=0x0026, h01=0x0050, text=» SUKL A6,DWTOTQ A6 := DWT ADDRESS «, t00=0x0105, t01=0x0154}
0x198f8…19922 Head {h00=0x0026, h01=0x0050, text=» LDR A4,A2 RESTORE BUFFER ADDRESS «, t00=0x0105, t01=0x017e}
0x19922…19942 Head {h00=0x001c, h01=0x0050, text=» LDK A1,0 RET CODE := OK«, t00=0x0106, t01=0x0018}
0x19942…19970 Head {h00=0x002a, h01=0x0050, text=» ABL BUFRST RETURN TO ROUTINE WAITING «, t00=0x0106, t01=0x0038}
0x19970…1997a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x0066}
0x1997a…19984 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x0070}
0x19984…19998 Head {h00=0x0010, h01=0x0050, text=»DP600 EQU * «, t00=0x0106, t01=0x007a}
0x19998…199ce Head {h00=0x0032, h01=0x0050, text=»* CHECK IF GENERAL READ SHOULD BE PERFORMED«, t00=0x0106, t01=0x008e}
0x199ce…199fc Head {h00=0x002a, h01=0x0050, text=» LD A1,CWTGR,A5 GENERAL READ ALLOWED? «, t00=0x0106, t01=0x00c4}
0x199fc…19a1a Head {h00=0x001a, h01=0x0050, text=» RF(NZ) DP800 NO, EXIT«, t00=0x0106, t01=0x00f2}
0x19a1a…19a24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x0110}
0x19a24…19a42 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0106, t01=0x011a}
0x19a42…19a7c Head {h00=0x0036, h01=0x0050, text=» ADK A7,CWTPBG POOLBLOCK FOR GENERAL READ BUFFERS «, t00=0x0106, t01=0x0138}
0x19a7c…19aa8 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLGTBU A4 := BUFFER ADDRESS «, t00=0x0106, t01=0x0172}
0x19aa8…19ada Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) GREAD PERFORM GR IF BUFFER FOUND «, t00=0x0107, t01=0x000e}
0x19ada…19ae4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x0040}
0x19ae4…19aee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x004a}
0x19aee…19b02 Head {h00=0x0010, h01=0x0050, text=»DP800 EQU * «, t00=0x0107, t01=0x0054}
0x19b02…19b36 Head {h00=0x0030, h01=0x0050, text=»* NOTHING MORE TO DO. EXIT TO DISPATCHER «, t00=0x0107, t01=0x0068}
0x19b36…19b58 Head {h00=0x001e, h01=0x0050, text=» ABL TDISP TOSS DISPATCHER«, t00=0x0107, t01=0x009c}
0x19b58…19b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x00be}
0x19b62…19b70 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0107, t01=0x00c8}
0x19b70…19b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x00d6}
0x19b7a…19b8e Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x0107, t01=0x00e0}
0x19b8e…19ba2 Head {h00=0x0010, h01=0x0050, text=»* ROUTINES *«, t00=0x0107, t01=0x00f4}
0x19ba2…19bb6 Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x0107, t01=0x0108}
0x19bb6…19bc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x011c}
0x19bc0…19c02 Head {h00=0x003e, h01=0x0050, text=»* THIS SECTION CONTAINS MISCELLANEOUS SERVICE ROUTINES. «, t00=0x0107, t01=0x0126}
0x19c02…19c48 Head {h00=0x0042, h01=0x0050, text=»* ALL ROUTINES ARE CALLED BY AN ABL "NAME" INSTRUCTION. «, t00=0x0107, t01=0x0168}
0x19c48…19c86 Head {h00=0x003a, h01=0x0050, text=»* REGISTER INTERFACE IS DESCRIBED FOR EACH ROUTINE. «, t00=0x0108, t01=0x001e}
0x19c86…19cc6 Head {h00=0x003c, h01=0x0050, text=»* WHEN A ROUTINE HAS PERFORMED THE REQUESTED FUNCTION,«, t00=0x0108, t01=0x005c}
0x19cc6…19cf8 Head {h00=0x002e, h01=0x0050, text=»* IT WILL EXIT TO THE LOCAL DISPATCHER. «, t00=0x0108, t01=0x009c}
0x19cf8…19d02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x00ce}
0x19d02…19d36 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x0108, t01=0x00d8}
0x19d36…19d40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x010c}
0x19d40…19d58 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x0108, t01=0x0116}
0x19d58…19d62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x012e}
0x19d62…19d9c Head {h00=0x0036, h01=0x0050, text=»* ABTHAN ABORT ALL WAITING DWT:S ON A WORK STATION«, t00=0x0108, t01=0x0138}
0x19d9c…19dd0 Head {h00=0x0030, h01=0x0050, text=»* PLREWS HANDLE RECOVERY OF ONE WORK STATION«, t00=0x0108, t01=0x0172}
0x19dd0…19e04 Head {h00=0x0030, h01=0x0050, text=»* SENDRR SEND LEVEL 3 RECIEVE READY MESSAGE «, t00=0x0109, t01=0x0016}
0x19e04…19e28 Head {h00=0x0020, h01=0x0050, text=»* GREAD PERFORM GENERAL READ«, t00=0x0109, t01=0x004a}
0x19e28…19e32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x006e}
0x19e32…19e40 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0109, t01=0x0078}
0x19e40…19e4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x0086}
0x19e4a…19e8e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0109, t01=0x0090}
0x19e8e…19e98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x00d4}
0x19e98…19eb0 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0109, t01=0x00de}
0x19eb0…19ec0 Head {h00=0x000c, h01=0x0050, text=»* ABTHAN«, t00=0x0109, t01=0x00f6}
0x19ec0…19eca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x0106}
0x19eca…19ede Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0109, t01=0x0110}
0x19ede…19f14 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE WILL HANDLE ABORTS FOR ONE WORK«, t00=0x0109, t01=0x0124}
0x19f14…19f48 Head {h00=0x0030, h01=0x0050, text=»* STATION. ALL REQUESTS OF DWT:S WAITING FOR«, t00=0x0109, t01=0x015a}
0x19f48…19f80 Head {h00=0x0034, h01=0x0050, text=»* LEVEL 3 ACK OR WAITING IN CCA OR BUFFER QUEUES«, t00=0x0109, t01=0x018e}
0x19f80…19fb6 Head {h00=0x0032, h01=0x0050, text=»* WILL BE ABORTED. ONE CALL IS NEEDED FOR EACH«, t00=0x010a, t01=0x0036}
0x19fb6…19fd6 Head {h00=0x001c, h01=0x0050, text=»* REQUEST TO BE ABORTED.«, t00=0x010a, t01=0x006c}
0x19fd6…19fe0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x008c}
0x19fe0…19ff0 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x010a, t01=0x0096}
0x19ff0…1a004 Head {h00=0x0010, h01=0x0050, text=»* ABL ABTHAN«, t00=0x010a, t01=0x00a6}
0x1a004…1a00e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x00ba}
0x1a00e…1a01e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x010a, t01=0x00c4}
0x1a01e…1a03a Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x010a, t01=0x00d4}
0x1a03a…1a05e Head {h00=0x0020, h01=0x0050, text=»* A6 = WORK STATION NUMBER «, t00=0x010a, t01=0x00f0}
0x1a05e…1a068 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x0114}
0x1a068…1a07a Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x010a, t01=0x011e}
0x1a07a…1a09e Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO REQUEST:«, t00=0x010a, t01=0x0130}
0x1a09e…1a0ba Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x010a, t01=0x0154}
0x1a0ba…1a0d6 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x010a, t01=0x0170}
0x1a0d6…1a0f2 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x010a, t01=0x018c}
0x1a0f2…1a0fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x0018}
0x1a0fc…1a140 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x010b, t01=0x0022}
0x1a140…1a14a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x0066}
0x1a14a…1a15e Head {h00=0x0010, h01=0x0050, text=»ABTHAN EQU *«, t00=0x010b, t01=0x0070}
0x1a15e…1a184 Head {h00=0x0022, h01=0x0050, text=» LDR A3,A6 WORK STATION NUMBER«, t00=0x010b, t01=0x0084}
0x1a184…1a1a0 Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x010b, t01=0x00aa}
0x1a1a0…1a1c2 Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x010b, t01=0x00c6}
0x1a1c2…1a1f8 Head {h00=0x0032, h01=0x0050, text=» ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS «, t00=0x010b, t01=0x00e8}
0x1a1f8…1a202 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x011e}
0x1a202…1a210 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010b, t01=0x0128}
0x1a210…1a21a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x0136}
0x1a21a…1a23c Head {h00=0x001e, h01=0x0050, text=» LDR A8,A6 SAVE WS NUMBER «, t00=0x010b, t01=0x0140}
0x1a23c…1a268 Head {h00=0x0028, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE«, t00=0x010b, t01=0x0162}
0x1a268…1a298 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDGEDN A7 := HIGEST DWT NR ON WS«, t00=0x010b, t01=0x018e}
0x1a298…1a2aa Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x010c, t01=0x002e}
0x1a2aa…1a2d0 Head {h00=0x0022, h01=0x0050, text=» LCR A1,A3 WORK STATION STATUS«, t00=0x010c, t01=0x0040}
0x1a2d0…1a2da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x0066}
0x1a2da…1a2fc Head {h00=0x001e, h01=0x0050, text=» ADK A7,1 PREPARE FOR SUK «, t00=0x010c, t01=0x0070}
0x1a2fc…1a310 Head {h00=0x0010, h01=0x0050, text=»AH100 EQU * «, t00=0x010c, t01=0x0092}
0x1a310…1a32a Head {h00=0x0016, h01=0x0050, text=» SUK A7,1 NEXT DWT«, t00=0x010c, t01=0x00a6}
0x1a32a…1a350 Head {h00=0x0022, h01=0x0050, text=» RF(N) AH110 EXIT IF ALL DONE «, t00=0x010c, t01=0x00c0}
0x1a350…1a36c Head {h00=0x0018, h01=0x0050, text=» LDR A6,A8 WS NUMBER«, t00=0x010c, t01=0x00e6}
0x1a36c…1a394 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x010c, t01=0x0102}
0x1a394…1a3b4 Head {h00=0x001c, h01=0x0050, text=» RB(Z) AH100 NOT DEFINED«, t00=0x010c, t01=0x012a}
0x1a3b4…1a3be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x014a}
0x1a3be…1a3e6 Head {h00=0x0024, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL«, t00=0x010c, t01=0x0154}
0x1a3e6…1a408 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x010c, t01=0x017c}
0x1a408…1a41a Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x010d, t01=0x000e}
0x1a41a…1a44a Head {h00=0x002c, h01=0x0050, text=» LDKL A4,/FFFF-DWFPLC MASK FOR PLC FLAGS«, t00=0x010d, t01=0x0020}
0x1a44a…1a46e Head {h00=0x0020, h01=0x0050, text=» ANS A4,DWTST,A6 RESET FLAGS«, t00=0x010d, t01=0x0050}
0x1a46e…1a4a4 Head {h00=0x0032, h01=0x0050, text=» ANK A2,DWFAK3 IS DWT WAITING FOR LEVEL 3 ACK?«, t00=0x010d, t01=0x0074}
0x1a4a4…1a4c6 Head {h00=0x001e, h01=0x0050, text=» RF(Z) AH105 NO, CONTINUE «, t00=0x010d, t01=0x00aa}
0x1a4c6…1a4fa Head {h00=0x0030, h01=0x0050, text=» ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x010d, t01=0x00cc}
0x1a4fa…1a528 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) AK3RST YES, RETURN WITH ACK 3«, t00=0x010d, t01=0x0100}
0x1a528…1a556 Head {h00=0x002a, h01=0x0050, text=» ABL WINRST NO, RETURN TO WINDOW QUEUE«, t00=0x010d, t01=0x012e}
0x1a556…1a560 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010d, t01=0x015c}
0x1a560…1a574 Head {h00=0x0010, h01=0x0050, text=»AH105 EQU * «, t00=0x010d, t01=0x0166}
0x1a574…1a5a6 Head {h00=0x002e, h01=0x0050, text=» LD A4,DWTOTQ,A6 CCA QUEUE ELEMENT POINTER«, t00=0x010d, t01=0x017a}
0x1a5a6…1a5cc Head {h00=0x0022, h01=0x0050, text=» LDR A2,A7 SAVE DEVICE ADDRESS«, t00=0x010e, t01=0x001c}
0x1a5cc…1a5f0 Head {h00=0x0020, h01=0x0050, text=» LDR A3,A1 SAVE RETURN CODE «, t00=0x010e, t01=0x0042}
0x1a5f0…1a60e Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x010e, t01=0x0066}
0x1a60e…1a634 Head {h00=0x0022, h01=0x0050, text=» ADK A7,CWTCCQ CCA QUEUE HEAD «, t00=0x010e, t01=0x0084}
0x1a634…1a66a Head {h00=0x0032, h01=0x0050, text=» CF A15,LNKOUT LINK MONITOR BLOCK OUT OF QUEUE«, t00=0x010e, t01=0x00aa}
0x1a66a…1a684 Head {h00=0x0016, h01=0x0050, text=» LDR A7,A7 FOUND? «, t00=0x010e, t01=0x00e0}
0x1a684…1a6ae Head {h00=0x0026, h01=0x0050, text=» ABL(NZ) CCAABT YES, ABORT REQUEST«, t00=0x010e, t01=0x00fa}
0x1a6ae…1a6d8 Head {h00=0x0026, h01=0x0050, text=» LDR A7,A2 RESTORE DEVICE ADDRESS «, t00=0x010e, t01=0x0124}
0x1a6d8…1a6fe Head {h00=0x0022, h01=0x0050, text=» LDR A1,A3 RESTORE RETURN CODE«, t00=0x010e, t01=0x014e}
0x1a6fe…1a708 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0174}
0x1a708…1a738 Head {h00=0x002c, h01=0x0050, text=» CF A15,OUTBUQ REMOVE FROM BUFFER QUEUE «, t00=0x010e, t01=0x017e}
0x1a738…1a75a Head {h00=0x001e, h01=0x0050, text=» LDR A2,A2 FOUND IN QUEUE?«, t00=0x010f, t01=0x001e}
0x1a75a…1a788 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) BUFRST YES, TERMINATE REQUEST«, t00=0x010f, t01=0x0040}
0x1a788…1a7a2 Head {h00=0x0016, h01=0x0050, text=» RB AH100 NEXT DWT«, t00=0x010f, t01=0x006e}
0x1a7a2…1a7ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x0088}
0x1a7ac…1a7c0 Head {h00=0x0010, h01=0x0050, text=»AH110 EQU * «, t00=0x010f, t01=0x0092}
0x1a7c0…1a806 Head {h00=0x0042, h01=0x0050, text=»* ALL PROCESSES WAITING FOR ACK 3 OR IN QUEUES ARE ABORTED «, t00=0x010f, t01=0x00a6}
0x1a806…1a82a Head {h00=0x0020, h01=0x0050, text=» CM CWTABW,A5 NO MORE ABORT «, t00=0x010f, t01=0x00ec}
0x1a82a…1a84e Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x010f, t01=0x0110}
0x1a84e…1a858 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x0134}
0x1a858…1a866 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010f, t01=0x013e}
0x1a866…1a870 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x014c}
0x1a870…1a8b4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x010f, t01=0x0156}
0x1a8b4…1a8be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x000a}
0x1a8be…1a8d6 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0110, t01=0x0014}
0x1a8d6…1a8e6 Head {h00=0x000c, h01=0x0050, text=»* PLREWS«, t00=0x0110, t01=0x002c}
0x1a8e6…1a8f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x003c}
0x1a8f0…1a904 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0110, t01=0x0046}
0x1a904…1a93c Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE WILL HANDLE RECOVERY OF ONE WORK «, t00=0x0110, t01=0x005a}
0x1a93c…1a974 Head {h00=0x0034, h01=0x0050, text=»* STATION. ACTUAL CALL TO TERMINAL DEVICE DRIVER«, t00=0x0110, t01=0x0092}
0x1a974…1a9a8 Head {h00=0x0030, h01=0x0050, text=»* RECOVERY ROUTINES ARE MADE THROUGH NDREWS.«, t00=0x0110, t01=0x00ca}
0x1a9a8…1a9b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x00fe}
0x1a9b2…1a9c2 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0110, t01=0x0108}
0x1a9c2…1a9d6 Head {h00=0x0010, h01=0x0050, text=»* ABL PLREWS«, t00=0x0110, t01=0x0118}
0x1a9d6…1a9e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x012c}
0x1a9e0…1a9f0 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0110, t01=0x0136}
0x1a9f0…1aa0c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0110, t01=0x0146}
0x1aa0c…1aa30 Head {h00=0x0020, h01=0x0050, text=»* A6 = WORK STATION NUMBER «, t00=0x0110, t01=0x0162}
0x1aa30…1aa3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x0186}
0x1aa3a…1aa4c Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0110, t01=0x0190}
0x1aa4c…1aa78 Head {h00=0x0028, h01=0x0050, text=»* AT ENTRY TO DEVICE RECOVERY: «, t00=0x0111, t01=0x0012}
0x1aa78…1aa8c Head {h00=0x0010, h01=0x0050, text=»* SEE NDREWS«, t00=0x0111, t01=0x003e}
0x1aa8c…1aa96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x0052}
0x1aa96…1aada Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0111, t01=0x005c}
0x1aada…1aae4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x00a0}
0x1aae4…1aaf8 Head {h00=0x0010, h01=0x0050, text=»PLREWS EQU *«, t00=0x0111, t01=0x00aa}
0x1aaf8…1ab1e Head {h00=0x0022, h01=0x0050, text=» LDR A3,A6 WORK STATION NUMBER«, t00=0x0111, t01=0x00be}
0x1ab1e…1ab3a Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x0111, t01=0x00e4}
0x1ab3a…1ab5c Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x0111, t01=0x0100}
0x1ab5c…1ab92 Head {h00=0x0032, h01=0x0050, text=» ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS «, t00=0x0111, t01=0x0122}
0x1ab92…1ab9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x0158}
0x1ab9c…1abce Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/FFFF-WSFERR MASK FOR ERROR FLAG «, t00=0x0111, t01=0x0162}
0x1abce…1ac02 (274, 0, 398) Head {h00=0x0030, h01=0x0050, text=» ANRS A2,A3 INDICATE WS WORKING AFTER ERROR «, t00=0x0112, t01=0x0004}
0x1ac02…1ac1e Head {h00=0x0018, h01=0x0050, text=» LCR A1,A3 WS STATUS«, t00=0x0112, t01=0x0038}
0x1ac1e…1ac30 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0112, t01=0x0054}
0x1ac30…1ac50 Head {h00=0x001c, h01=0x0050, text=» SCR A2,A3 RESET STATUS «, t00=0x0112, t01=0x0066}
0x1ac50…1ac80 Head {h00=0x002c, h01=0x0050, text=» LDK A4,RESECP ASSUME SECONDARY POWER UP«, t00=0x0112, t01=0x0086}
0x1ac80…1ac9e Head {h00=0x001a, h01=0x0050, text=» ANK A1,NOTOPR WAS IT?«, t00=0x0112, t01=0x00b6}
0x1ac9e…1acb8 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) PR110 YES «, t00=0x0112, t01=0x00d4}
0x1acb8…1acde Head {h00=0x0022, h01=0x0050, text=» LDK A4,RELINE NO, LINK ERROR «, t00=0x0112, t01=0x00ee}
0x1acde…1acf2 Head {h00=0x0010, h01=0x0050, text=»PR110 EQU * «, t00=0x0112, t01=0x0114}
0x1acf2…1ad1e Head {h00=0x0028, h01=0x0050, text=» LD* A3,CWTINT,A5 WORK STATION TABLE«, t00=0x0112, t01=0x0128}
0x1ad1e…1ad56 Head {h00=0x0034, h01=0x0050, text=» CF A15,NDREWS CALL RECOVERY FOR ALL DWT:S ON WS«, t00=0x0112, t01=0x0154}
0x1ad56…1ad60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0112, t01=0x018c}
0x1ad60…1ad84 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0113, t01=0x0008}
0x1ad84…1ad8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x002c}
0x1ad8e…1ad9c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0113, t01=0x0036}
0x1ad9c…1ada6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0044}
0x1ada6…1adea Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0113, t01=0x004e}
0x1adea…1adf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0092}
0x1adf4…1ae0c Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0113, t01=0x009c}
0x1ae0c…1ae1c Head {h00=0x000c, h01=0x0050, text=»* SENDRR«, t00=0x0113, t01=0x00b4}
0x1ae1c…1ae26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x00c4}
0x1ae26…1ae3a Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0113, t01=0x00ce}
0x1ae3a…1ae74 Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE WILL SEND ONE LEVEL 3 RECIEVE READY«, t00=0x0113, t01=0x00e2}
0x1ae74…1ae9e Head {h00=0x0026, h01=0x0050, text=»* MESSAGE TO A SECONDARY STATION. «, t00=0x0113, t01=0x011c}
0x1ae9e…1aea8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0146}
0x1aea8…1aeb8 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0113, t01=0x0150}
0x1aeb8…1aecc Head {h00=0x0010, h01=0x0050, text=»* ABL SENDRR«, t00=0x0113, t01=0x0160}
0x1aecc…1aed6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0174}
0x1aed6…1aee6 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0113, t01=0x017e}
0x1aee6…1af02 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0113, t01=0x018e}
0x1af02…1af1e Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0114, t01=0x001a}
0x1af1e…1af28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x0036}
0x1af28…1af3a Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0114, t01=0x0040}
0x1af3a…1af46 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x0114, t01=0x0052}
0x1af46…1af50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x005e}
0x1af50…1af94 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0114, t01=0x0068}
0x1af94…1af9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0114, t01=0x00ac}
0x1af9e…1afb2 Head {h00=0x0010, h01=0x0050, text=»SENDRR EQU *«, t00=0x0114, t01=0x00b6}
0x1afb2…1afd4 Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x0114, t01=0x00ca}
0x1afd4…1b006 Head {h00=0x002e, h01=0x0050, text=» CF A15,GETBLK GET MONITOR BLOCK AS BUFFER«, t00=0x0114, t01=0x00ec}
0x1b006…1b012 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0114, t01=0x011e}
0x1b012…1b030 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0114, t01=0x012a}
0x1b030…1b066 Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTMBQ QUEUE FOR KEEPING TRACK OF MB:S«, t00=0x0114, t01=0x0148}
0x1b066…1b098 Head {h00=0x002e, h01=0x0050, text=» CF A15,LNKFST PUT MONITOR BLOCK IN QUEUE «, t00=0x0114, t01=0x017e}
0x1b098…1b0c2 Head {h00=0x0026, h01=0x0050, text=» ADK A4,2 A4 := START OF USER PART«, t00=0x0115, t01=0x0020}
0x1b0c2…1b0fc Head {h00=0x0036, h01=0x0050, text=» CF A15,WRADR2 WRITE LINE ADDRESS IN CCA & BUFFER «, t00=0x0115, t01=0x004a}
0x1b0fc…1b12c Head {h00=0x002c, h01=0x0050, text=» LDK A2,CMDSW COMMAND := STANDARD WRITE «, t00=0x0115, t01=0x0084}
0x1b12c…1b152 Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRCMD,A5 TO CCA«, t00=0x0115, t01=0x00b4}
0x1b152…1b184 Head {h00=0x002e, h01=0x0050, text=» LDK A2,TYRR MESSAGE TYPE := RECIEVE READY«, t00=0x0115, t01=0x00da}
0x1b184…1b1b4 Head {h00=0x002c, h01=0x0050, text=» SC A2,CWTCCA+CCRIDB,A5 TO CCA, IDENTITY«, t00=0x0115, t01=0x010c}
0x1b1b4…1b1e0 Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT LENGTH OF X25 HEADER «, t00=0x0115, t01=0x013c}
0x1b1e0…1b214 Head {h00=0x0030, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 BUFFER LENGTH TO CCA«, t00=0x0115, t01=0x0168}
0x1b214…1b254 Head {h00=0x003c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAIN & MSB BUFFER ADDR «, t00=0x0116, t01=0x000c}
0x1b254…1b28a Head {h00=0x0032, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 BUFFER ADDRESS TO CCA «, t00=0x0116, t01=0x004c}
0x1b28a…1b294 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0116, t01=0x0082}
0x1b294…1b2be Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x0116, t01=0x008c}
0x1b2be…1b2e2 Head {h00=0x0020, h01=0x0050, text=» RF(Z) RR100 CONTINUE IF OK «, t00=0x0116, t01=0x00b6}
0x1b2e2…1b304 Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x0116, t01=0x00da}
0x1b304…1b31e Head {h00=0x0016, h01=0x0050, text=» RF RR110 SKIP RR «, t00=0x0116, t01=0x00fc}
0x1b31e…1b332 Head {h00=0x0010, h01=0x0050, text=»RR100 EQU * «, t00=0x0116, t01=0x0116}
0x1b332…1b364 Head {h00=0x002e, h01=0x0050, text=» CF A15,FWOPR A2 := P(R). UPDATE FLOW CTRL«, t00=0x0116, t01=0x012a}
0x1b364…1b38a Head {h00=0x0022, h01=0x0050, text=» ORK A2,/01 MESSAGE TYPE := RR«, t00=0x0116, t01=0x015c}
0x1b38a…1b3ac Head {h00=0x001e, h01=0x0050, text=» SC A2,X25FLW,A4 TO BUFFER«, t00=0x0116, t01=0x0182}
0x1b3ac…1b3d4 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x0117, t01=0x0014}
0x1b3d4…1b3f4 Head {h00=0x001c, h01=0x0050, text=» RF(Z) RR120 EXIT IF OK «, t00=0x0117, t01=0x003c}
0x1b3f4…1b408 Head {h00=0x0010, h01=0x0050, text=»RR110 EQU * «, t00=0x0117, t01=0x005c}
0x1b408…1b438 Head {h00=0x002c, h01=0x0050, text=» SUK A4,2 START ADDRESS OF MONITOR BLOCK«, t00=0x0117, t01=0x0070}
0x1b438…1b470 Head {h00=0x0034, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE. A7 ALREADY SET«, t00=0x0117, t01=0x00a0}
0x1b470…1b49c Head {h00=0x0028, h01=0x0050, text=» CF A15,FREBLK RETURN MONITOR BLOCK «, t00=0x0117, t01=0x00d8}
0x1b49c…1b4a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x0104}
0x1b4a6…1b4ba Head {h00=0x0010, h01=0x0050, text=»RR120 EQU * «, t00=0x0117, t01=0x010e}
0x1b4ba…1b4de Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0117, t01=0x0122}
0x1b4de…1b4e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x0146}
0x1b4e8…1b4f6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0117, t01=0x0150}
0x1b4f6…1b500 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x015e}
0x1b500…1b544 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0117, t01=0x0168}
0x1b544…1b54e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x001c}
0x1b54e…1b566 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0118, t01=0x0026}
0x1b566…1b576 Head {h00=0x000c, h01=0x0050, text=»* GREAD «, t00=0x0118, t01=0x003e}
0x1b576…1b580 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x004e}
0x1b580…1b594 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0118, t01=0x0058}
0x1b594…1b5c8 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE WILL PERFORM ONE GENERAL READ«, t00=0x0118, t01=0x006c}
0x1b5c8…1b5e8 Head {h00=0x001c, h01=0x0050, text=»* OPERATION TO THE PLC. «, t00=0x0118, t01=0x00a0}
0x1b5e8…1b5f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x00c0}
0x1b5f2…1b602 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0118, t01=0x00ca}
0x1b602…1b616 Head {h00=0x0010, h01=0x0050, text=»* ABL GREAD «, t00=0x0118, t01=0x00da}
0x1b616…1b620 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x00ee}
0x1b620…1b630 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0118, t01=0x00f8}
0x1b630…1b64e Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0118, t01=0x0108}
0x1b64e…1b66a Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0118, t01=0x0126}
0x1b66a…1b674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x0142}
0x1b674…1b686 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0118, t01=0x014c}
0x1b686…1b692 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x0118, t01=0x015e}
0x1b692…1b69c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x016a}
0x1b69c…1b6e0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0118, t01=0x0174}
0x1b6e0…1b6ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x0028}
0x1b6ea…1b6fe Head {h00=0x0010, h01=0x0050, text=»GREAD EQU * «, t00=0x0119, t01=0x0032}
0x1b6fe…1b72c Head {h00=0x002a, h01=0x0050, text=» LDR A6,A4 PARAMETER := BUFFER ADDRESS«, t00=0x0119, t01=0x0046}
0x1b72c…1b752 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLCCCA RESERVE PLC CCA«, t00=0x0119, t01=0x0074}
0x1b752…1b774 Head {h00=0x001e, h01=0x0050, text=»* SET CCA PARAMETERS «, t00=0x0119, t01=0x009a}
0x1b774…1b7b0 Head {h00=0x0038, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 CLEAR DATA CHAINING & MSB ADDR «, t00=0x0119, t01=0x00bc}
0x1b7b0…1b7de Head {h00=0x002a, h01=0x0050, text=» ST A6,CWTCCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x0119, t01=0x00f8}
0x1b7de…1b804 Head {h00=0x0022, h01=0x0050, text=» LD A2,BUFLEN,A6 BUFFER LENGTH«, t00=0x0119, t01=0x0126}
0x1b804…1b824 Head {h00=0x001c, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 «, t00=0x0119, t01=0x014c}
0x1b824…1b84e Head {h00=0x0026, h01=0x0050, text=» LDK A2,CMDGR COMMAND GENERAL READ«, t00=0x0119, t01=0x016c}
0x1b84e…1b882 Head {h00=0x0030, h01=0x0050, text=» ST A2,CWTCCA+CCRDLS,A5 DLS INDEX & COMMAND «, t00=0x011a, t01=0x0008}
0x1b882…1b8aa Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x011a, t01=0x003c}
0x1b8aa…1b8d4 Head {h00=0x0026, h01=0x0050, text=» ABL PLDSP2 CHECK WHAT TO DO NEXT «, t00=0x011a, t01=0x0064}
0x1b8d4…1b8de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x008e}
0x1b8de…1b8ec Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011a, t01=0x0098}
0x1b8ec…1b8f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x00a6}
0x1b8f6…1b90e Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x011a, t01=0x00b0}
0x1b90e…1b926 Head {h00=0x0014, h01=0x0050, text=»* SUBROUTINES * «, t00=0x011a, t01=0x00c8}
0x1b926…1b93e Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x011a, t01=0x00e0}
0x1b93e…1b948 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011a, t01=0x00f8}
0x1b948…1b98c Head {h00=0x0040, h01=0x0050, text=»* THIS SECTION CONTAINS MISCELLANEOUS SERVICE SUBROUTINES.«, t00=0x011a, t01=0x0102}
0x1b98c…1b9c6 Head {h00=0x0036, h01=0x0050, text=»* ALL ROUTINES ARE CALLED BY A CF A15,"NAME" «, t00=0x011a, t01=0x0146}
0x1b9c6…1ba08 Head {h00=0x003e, h01=0x0050, text=»* INSTRUCTION. REGISTER INTERFACE IS DESCRIBED FOR EACH «, t00=0x011a, t01=0x0180}
0x1ba08…1ba48 Head {h00=0x003c, h01=0x0050, text=»* ROUTINE. ONLY REGISTERS A1-A8 & PSW ARE CONSIDERED. «, t00=0x011b, t01=0x0032}
0x1ba48…1ba88 Head {h00=0x003c, h01=0x0050, text=»* REGISTERS NOT MENTIONED UNDER "OUTPUT" ARE UNCHANGED«, t00=0x011b, t01=0x0072}
0x1ba88…1ba9e Head {h00=0x0012, h01=0x0050, text=»* FROM CALL.«, t00=0x011b, t01=0x00b2}
0x1ba9e…1bade Head {h00=0x003c, h01=0x0050, text=»* THE ROUTINES ARE OF TWO TYPES, ASYNCHRONOUS ROUTINES«, t00=0x011b, t01=0x00c8}
0x1bade…1bb1e Head {h00=0x003c, h01=0x0050, text=»* AND COMPUTATION ROUTINES. ASYNCHRONOUS ROUTINES MAY,«, t00=0x011b, t01=0x0108}
0x1bb1e…1bb60 Head {h00=0x003e, h01=0x0050, text=»* IF THE REQUESTED FUNCTION IS OCCUPIED OR NOT USEABLE, «, t00=0x011b, t01=0x0148}
0x1bb60…1bba0 Head {h00=0x003c, h01=0x0050, text=»* EXIT TO THE LOCAL DISPATCHER AND/OR TOSS DISPATCHER.«, t00=0x011b, t01=0x018a}
0x1bba0…1bbde Head {h00=0x003a, h01=0x0050, text=»* THIS MEANS THAT THE A15 STACK AT CALL MUST CONTAIN«, t00=0x011c, t01=0x003a}
0x1bbde…1bc20 Head {h00=0x003e, h01=0x0050, text=»* INTERRUPT RETURN, A1-A8 AND NOTHING ELSE. COMPUTATION «, t00=0x011c, t01=0x0078}
0x1bc20…1bc62 Head {h00=0x003e, h01=0x0050, text=»* ROUTINES HAVE NO SUCH LIMITATIONS, AS THEY WILL RETURN«, t00=0x011c, t01=0x00ba}
0x1bc62…1bca2 Head {h00=0x003c, h01=0x0050, text=»* IMMEDIATELY WHEN THEY HAVE PERFORMED THE PROCESSING.«, t00=0x011c, t01=0x00fc}
0x1bca2…1bcac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x013c}
0x1bcac…1bcba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011c, t01=0x0146}
0x1bcba…1bcc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x0154}
0x1bcc4…1bcf8 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x011c, t01=0x015e}
0x1bcf8…1bd02 (285, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x0004}
0x1bd02…1bd1a Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x011d, t01=0x000e}
0x1bd1a…1bd24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x0026}
0x1bd24…1bd48 Head {h00=0x0020, h01=0x0050, text=»* ASYNCHRONOUS ROUTINES«, t00=0x011d, t01=0x0030}
0x1bd48…1bd70 Head {h00=0x0024, h01=0x0050, text=»* PLCCCA RESERVE CCA FOR PROCESS«, t00=0x011d, t01=0x0054}
0x1bd70…1bd92 Head {h00=0x001e, h01=0x0050, text=»* PLCCIO EXECUTE CIO START«, t00=0x011d, t01=0x007c}
0x1bd92…1bd9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011d, t01=0x009e}
0x1bd9c…1bdc0 Head {h00=0x0020, h01=0x0050, text=»* COMPUTATION ROUTINES «, t00=0x011d, t01=0x00a8}
0x1bdc0…1bdf6 Head {h00=0x0032, h01=0x0050, text=»* PLCNOP SET FLAG INDICATING PLC NOT OPERABLE «, t00=0x011d, t01=0x00cc}
0x1bdf6…1be1c Head {h00=0x0022, h01=0x0050, text=»* GETDWT CALCULATE DWT ADDRESS«, t00=0x011d, t01=0x0102}
0x1be1c…1be42 Head {h00=0x0022, h01=0x0050, text=»* GETCWT CALCULATE CWT ADDRESS«, t00=0x011d, t01=0x0128}
0x1be42…1be72 Head {h00=0x002c, h01=0x0050, text=»* GETFR GET NUMBER OF OUTSTANDING FRAMES«, t00=0x011d, t01=0x014e}
0x1be72…1bea0 Head {h00=0x002a, h01=0x0050, text=»* FLWINP HANDLE FLOW CONTROL FOR INPUT«, t00=0x011d, t01=0x017e}
0x1bea0…1bed0 Head {h00=0x002c, h01=0x0050, text=»* FLWOUT HANDLE FLOW CONTROL FOR OUTPUT «, t00=0x011e, t01=0x001c}
0x1bed0…1bf06 Head {h00=0x0032, h01=0x0050, text=»* WRADDR WRITE LINE ADDRESS IN CCA AND BUFFER «, t00=0x011e, t01=0x004c}
0x1bf06…1bf30 Head {h00=0x0026, h01=0x0050, text=»* STAHAN PLC RETURN STATUS HANDLER«, t00=0x011e, t01=0x0082}
0x1bf30…1bf5e Head {h00=0x002a, h01=0x0050, text=»* GETSTA GET STATUS FOR I/O CONNECTION«, t00=0x011e, t01=0x00ac}
0x1bf5e…1bf94 Head {h00=0x0032, h01=0x0050, text=»* PLGTBU ALLOCATE BUFFER AND SET TO PLC FORMAT«, t00=0x011e, t01=0x00da}
0x1bf94…1bfc2 Head {h00=0x002a, h01=0x0050, text=»* PLRLBU RELEASE BUFFER OF PLC FORMAT «, t00=0x011e, t01=0x0110}
0x1bfc2…1bffe Head {h00=0x0038, h01=0x0050, text=»* PLCHAR GET/PUT CHARACTER FROM/IN PLC FORMAT BUFFER«, t00=0x011e, t01=0x013e}
0x1bffe…1c02c Head {h00=0x002a, h01=0x0050, text=»* INTYPE DECIDE TYPE OF INPUT MESSAGE «, t00=0x011e, t01=0x017a}
0x1c02c…1c05e Head {h00=0x002e, h01=0x0050, text=»* OUTBUQ REMOVE ELEMENT FROM BUFFER QUEUE «, t00=0x011f, t01=0x0018}
0x1c05e…1c08a Head {h00=0x0028, h01=0x0050, text=»* LNKFST LINK ELEMENT FIRST IN QUEUE«, t00=0x011f, t01=0x004a}
0x1c08a…1c0b6 Head {h00=0x0028, h01=0x0050, text=»* LNKLST LINK ELEMENT LAST IN QUEUE «, t00=0x011f, t01=0x0076}
0x1c0b6…1c0e0 Head {h00=0x0026, h01=0x0050, text=»* LNKOUT LINK ELEMENT OUT OF QUEUE«, t00=0x011f, t01=0x00a2}
0x1c0e0…1c0ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x00cc}
0x1c0ea…1c0f8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011f, t01=0x00d6}
0x1c0f8…1c102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x00e4}
0x1c102…1c146 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x011f, t01=0x00ee}
0x1c146…1c150 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x0132}
0x1c150…1c168 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x011f, t01=0x013c}
0x1c168…1c178 Head {h00=0x000c, h01=0x0050, text=»* PLCCCA«, t00=0x011f, t01=0x0154}
0x1c178…1c182 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x0164}
0x1c182…1c196 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x011f, t01=0x016e}
0x1c196…1c1ce Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE IS CALLED WHEN A PROCESS WANTS TO«, t00=0x011f, t01=0x0182}
0x1c1ce…1c206 Head {h00=0x0034, h01=0x0050, text=»* USE THE PLC COMMAND COMMUNICATION AREA (CCA). «, t00=0x0120, t01=0x002a}
0x1c206…1c23e Head {h00=0x0034, h01=0x0050, text=»* IF THE AREA IS FREE, THE ROUTINE SETS IT BUSY «, t00=0x0120, t01=0x0062}
0x1c23e…1c276 Head {h00=0x0034, h01=0x0050, text=»* AND RETURNS. IF THE AREA IS BUSY, THE CALLING «, t00=0x0120, t01=0x009a}
0x1c276…1c2ae Head {h00=0x0034, h01=0x0050, text=»* PROCESS IS PUT IN A QUEUE, AND EXIT IS MADE TO«, t00=0x0120, t01=0x00d2}
0x1c2ae…1c2ce Head {h00=0x001c, h01=0x0050, text=»* THE LOCAL DISPATCHER. «, t00=0x0120, t01=0x010a}
0x1c2ce…1c2f6 Head {h00=0x0024, h01=0x0050, text=»* PLCCCA ONLY RESERVES THE AREA.«, t00=0x0120, t01=0x012a}
0x1c2f6…1c32c Head {h00=0x0032, h01=0x0050, text=»* PLCCCS ALSO SAVES THE QUEUE ELEMENT ADDRESS.«, t00=0x0120, t01=0x0152}
0x1c32c…1c336 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x0188}
0x1c336…1c346 (289, 0, 400) Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0121, t01=0x0004}
0x1c346…1c35e Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCCCA «, t00=0x0121, t01=0x0014}
0x1c35e…1c376 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCCCS «, t00=0x0121, t01=0x002c}
0x1c376…1c380 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x0044}
0x1c380…1c390 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0121, t01=0x004e}
0x1c390…1c3cc Head {h00=0x0038, h01=0x0050, text=»* A3 = QUEUE ELEMENT ADDRESS SAVE AREA (IF PLCCCS) «, t00=0x0121, t01=0x005e}
0x1c3cc…1c3e8 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0121, t01=0x009a}
0x1c3e8…1c402 Head {h00=0x0016, h01=0x0050, text=»* A6 = PARAMETER «, t00=0x0121, t01=0x00b6}
0x1c402…1c41e Head {h00=0x0018, h01=0x0050, text=»* A1-A8 ON A15 STACK«, t00=0x0121, t01=0x00d0}
0x1c41e…1c428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x00ec}
0x1c428…1c43a Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0121, t01=0x00f6}
0x1c43a…1c470 Head {h00=0x0032, h01=0x0050, text=»* A1 = RETURN CODE (IF PLCCCS, ELSE CHANGED) «, t00=0x0121, t01=0x0108}
0x1c470…1c488 Head {h00=0x0014, h01=0x0050, text=»* A2-A4 CHANGED «, t00=0x0121, t01=0x013e}
0x1c488…1c4a0 Head {h00=0x0014, h01=0x0050, text=»* A7-A8 CHANGED «, t00=0x0121, t01=0x0156}
0x1c4a0…1c4b8 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0121, t01=0x016e}
0x1c4b8…1c4d4 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0121, t01=0x0186}
0x1c4d4…1c4de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0012}
0x1c4de…1c522 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0122, t01=0x001c}
0x1c522…1c52c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0060}
0x1c52c…1c53a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0122, t01=0x006a}
0x1c53a…1c544 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0078}
0x1c544…1c558 Head {h00=0x0010, h01=0x0050, text=»PLCCCA EQU *«, t00=0x0122, t01=0x0082}
0x1c558…1c58a Head {h00=0x002e, h01=0x0050, text=» LDK A3,0 DON'T SAVE QUEUE ELEMENT ADDRESS«, t00=0x0122, t01=0x0096}
0x1c58a…1c594 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x00c8}
0x1c594…1c5a8 Head {h00=0x0010, h01=0x0050, text=»PLCCCS EQU *«, t00=0x0122, t01=0x00d2}
0x1c5a8…1c5b4 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0122, t01=0x00e6}
0x1c5b4…1c5e4 Head {h00=0x002c, h01=0x0050, text=» LD A1,CWTCCQ,A5 ANYONE WAITING FOR CCA?«, t00=0x0122, t01=0x00f2}
0x1c5e4…1c60c Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CA100 YES, PUT IN QUEUE «, t00=0x0122, t01=0x0122}
0x1c60c…1c62e Head {h00=0x001e, h01=0x0050, text=» LD A4,CWTCCB,A5 PLC BUSY?«, t00=0x0122, t01=0x014a}
0x1c62e…1c656 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CA100 YES, PUT IN QUEUE «, t00=0x0122, t01=0x016c}
0x1c656…1c660 (291, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0123, t01=0x0004}
0x1c660…1c676 Head {h00=0x0012, h01=0x0050, text=»* PLC FREE «, t00=0x0123, t01=0x000e}
0x1c676…1c698 Head {h00=0x001e, h01=0x0050, text=» IM CWTCCB,A5 SET PLC BUSY«, t00=0x0123, t01=0x0024}
0x1c698…1c6c4 Head {h00=0x0028, h01=0x0050, text=» ADKL A15,4 ADJUST STACK FOR RETURN «, t00=0x0123, t01=0x0046}
0x1c6c4…1c6e8 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RETURN CODE := OK «, t00=0x0123, t01=0x0072}
0x1c6e8…1c710 Head {h00=0x0024, h01=0x0050, text=» ABR* A15 RETURN IN INHIBIT MODE«, t00=0x0123, t01=0x0096}
0x1c710…1c71a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0123, t01=0x00be}
0x1c71a…1c724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0123, t01=0x00c8}
0x1c724…1c738 Head {h00=0x0010, h01=0x0050, text=»CA100 EQU * «, t00=0x0123, t01=0x00d2}
0x1c738…1c764 Head {h00=0x0028, h01=0x0050, text=»* PLC BUSY. PUT REQUEST IN QUEUE.«, t00=0x0123, t01=0x00e6}
0x1c764…1c786 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A6 SAVE PARAMETER «, t00=0x0123, t01=0x0112}
0x1c786…1c7a4 Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 SKIP PSW «, t00=0x0123, t01=0x0134}
0x1c7a4…1c7cc Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A15 SAVE RETURN ADDRESS«, t00=0x0123, t01=0x0152}
0x1c7cc…1c804 Head {h00=0x0034, h01=0x0050, text=» CF A15,GETBLK GET MONITOR BLOCK AND SAVE A1-A2 «, t00=0x0123, t01=0x017a}
0x1c804…1c824 Head {h00=0x001c, h01=0x0050, text=» LDR A3,A3 SAVE POINTER?«, t00=0x0124, t01=0x0022}
0x1c824…1c846 Head {h00=0x001e, h01=0x0050, text=» RF(Z) CA110 NO, CONTINUE «, t00=0x0124, t01=0x0042}
0x1c846…1c874 Head {h00=0x002a, h01=0x0050, text=» STR A4,A3 SAVE QUEUE ELEMENT ADDRESS «, t00=0x0124, t01=0x0064}
0x1c874…1c888 Head {h00=0x0010, h01=0x0050, text=»CA110 EQU * «, t00=0x0124, t01=0x0092}
0x1c888…1c8a6 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0124, t01=0x00a6}
0x1c8a6…1c8d0 Head {h00=0x0026, h01=0x0050, text=» ADK A7,CWTCCQ PLC BUSY QUEUE HEAD«, t00=0x0124, t01=0x00c4}
0x1c8d0…1c8fe Head {h00=0x002a, h01=0x0050, text=» CF A15,LNKLST PUT BLOCK LAST IN QUEUE«, t00=0x0124, t01=0x00ee}
0x1c8fe…1c924 Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x0124, t01=0x011c}
0x1c924…1c948 Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x0124, t01=0x0142}
0x1c948…1c964 Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0124, t01=0x0166}
0x1c964…1c99c Head {h00=0x0034, h01=0x0050, text=» IM CCQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x0124, t01=0x0182}
0x1c99c…1c9a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0125, t01=0x002a}
0x1c9a8…1c9cc Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0125, t01=0x0036}
0x1c9cc…1c9d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0125, t01=0x005a}
0x1c9d6…1c9e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0125, t01=0x0064}
0x1c9e0…1ca16 Head {h00=0x0032, h01=0x0050, text=»* RETURN IS MADE HERE WHEN THE CCA IS FREE.«, t00=0x0125, t01=0x006e}
0x1ca16…1ca50 Head {h00=0x0036, h01=0x0050, text=»* (AT A RELEASE INTERRUPT OR FROM DISPATCHER.) «, t00=0x0125, t01=0x00a4}
0x1ca50…1ca72 Head {h00=0x001e, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x0125, t01=0x00de}
0x1ca72…1ca98 Head {h00=0x0022, h01=0x0050, text=»* A4 = MONITOR BLOCK ADDRESS «, t00=0x0125, t01=0x0100}
0x1ca98…1cab4 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0125, t01=0x0126}
0x1cab4…1cabe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0125, t01=0x0142}
0x1cabe…1cad2 Head {h00=0x0010, h01=0x0050, text=»CCARST EQU *«, t00=0x0125, t01=0x014c}
0x1cad2…1cade Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0125, t01=0x0160}
0x1cade…1cafc Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0125, t01=0x016c}
0x1cafc…1cb22 Head {h00=0x0022, h01=0x0050, text=» ADK A7,CWTCCQ CCA QUEUE HEAD «, t00=0x0125, t01=0x018a}
0x1cb22…1cb52 Head {h00=0x002c, h01=0x0050, text=» CF A15,LNKOUT REMOVE PROCESS FROM QUEUE«, t00=0x0126, t01=0x0020}
0x1cb52…1cb76 Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 RETURN CODE := OK «, t00=0x0126, t01=0x0050}
0x1cb76…1cb80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0074}
0x1cb80…1cb8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x007e}
0x1cb8a…1cbca Head {h00=0x003c, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN A REQUEST SHOULD BE ABORTED«, t00=0x0126, t01=0x0088}
0x1cbca…1cbe8 Head {h00=0x001a, h01=0x0050, text=»* DUE TO I/O ERROR.«, t00=0x0126, t01=0x00c8}
0x1cbe8…1cc0a Head {h00=0x001e, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x0126, t01=0x00e6}
0x1cc0a…1cc26 Head {h00=0x0018, h01=0x0050, text=»* A3 = RETURN CODE «, t00=0x0126, t01=0x0108}
0x1cc26…1cc4c Head {h00=0x0022, h01=0x0050, text=»* A4 = MONITOR BLOCK ADDRESS «, t00=0x0126, t01=0x0124}
0x1cc4c…1cc68 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0126, t01=0x014a}
0x1cc68…1cc72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0166}
0x1cc72…1cc86 Head {h00=0x0010, h01=0x0050, text=»CCAABT EQU *«, t00=0x0126, t01=0x0170}
0x1cc86…1cc92 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0126, t01=0x0184}
0x1cc92…1ccb6 Head {h00=0x0020, h01=0x0050, text=» LDR A7,A3 SAVE RETURN CODE «, t00=0x0126, t01=0x0190}
0x1ccb6…1ccee Head {h00=0x0034, h01=0x0050, text=» CF A15,FREBLK RETURN MONITOR BLOCK. LOAD A1-A2 «, t00=0x0127, t01=0x0024}
0x1ccee…1cd0a Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 PARAMETER«, t00=0x0127, t01=0x005c}
0x1cd0a…1cd2e Head {h00=0x0020, h01=0x0050, text=» LDR A1,A7 A1 := RETURN CODE«, t00=0x0127, t01=0x0078}
0x1cd2e…1cd44 Head {h00=0x0012, h01=0x0050, text=» ABR A2 RETURN«, t00=0x0127, t01=0x009c}
0x1cd44…1cd4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x00b2}
0x1cd4e…1cd5c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0127, t01=0x00bc}
0x1cd5c…1cd66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x00ca}
0x1cd66…1cdaa Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0127, t01=0x00d4}
0x1cdaa…1cdb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x0118}
0x1cdb4…1cdcc Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0127, t01=0x0122}
0x1cdcc…1cddc Head {h00=0x000c, h01=0x0050, text=»* PLCCIO«, t00=0x0127, t01=0x013a}
0x1cddc…1cde6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x014a}
0x1cde6…1cdfa Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0127, t01=0x0154}
0x1cdfa…1ce3a Head {h00=0x003c, h01=0x0050, text=»* THIS ROUTINE CHECKS IF THE PLC CAN BE USED. IF IT CAN,«, t00=0x0127, t01=0x0168}
0x1ce3a…1ce72 Head {h00=0x0034, h01=0x0050, text=»* THE ROUTINE EXECUTES A CIO START INSTRUCTION. «, t00=0x0128, t01=0x0018}
0x1ce72…1ceaa Head {h00=0x0034, h01=0x0050, text=»* IF THE PLC IS NOT OPERABLE DUE TO TC POWER UP,«, t00=0x0128, t01=0x0050}
0x1ceaa…1ceea Head {h00=0x003c, h01=0x0050, text=»* THE ROUTINE WILL EXIT TO TOSS DISPATCHER. IN ALL OTHER«, t00=0x0128, t01=0x0088}
0x1ceea…1cf2a Head {h00=0x003c, h01=0x0050, text=»* CASES, IT WILL RETURN TO CALLING PROGRAM WITH A RETURN«, t00=0x0128, t01=0x00c8}
0x1cf2a…1cf3a Head {h00=0x000c, h01=0x0050, text=»* CODE. «, t00=0x0128, t01=0x0108}
0x1cf3a…1cf44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x0118}
0x1cf44…1cf54 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0128, t01=0x0122}
0x1cf54…1cf6c Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCCIO «, t00=0x0128, t01=0x0132}
0x1cf6c…1cf76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x014a}
0x1cf76…1cf86 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0128, t01=0x0154}
0x1cf86…1cfa2 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0128, t01=0x0164}
0x1cfa2…1cfbe Head {h00=0x0018, h01=0x0050, text=»* A1-A8 ON A15 STACK«, t00=0x0128, t01=0x0180}
0x1cfbe…1cfc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0129, t01=0x000c}
0x1cfc8…1cfda Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0129, t01=0x0016}
0x1cfda…1cff6 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0129, t01=0x0028}
0x1cff6…1d00a Head {h00=0x0010, h01=0x0050, text=»* 0 IF OK «, t00=0x0129, t01=0x0044}
0x1d00a…1d020 Head {h00=0x0012, h01=0x0050, text=»* NOT 0 ELSE«, t00=0x0129, t01=0x0058}
0x1d020…1d038 Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x0129, t01=0x006e}
0x1d038…1d056 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x0129, t01=0x0086}
0x1d056…1d072 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0129, t01=0x00a4}
0x1d072…1d07c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0129, t01=0x00c0}
0x1d07c…1d0c0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0129, t01=0x00ca}
0x1d0c0…1d0ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0129, t01=0x010e}
0x1d0ca…1d0de Head {h00=0x0010, h01=0x0050, text=»PLCCIO EQU *«, t00=0x0129, t01=0x0118}
0x1d0de…1d0ea Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0129, t01=0x012c}
0x1d0ea…1d108 Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 SKIP PSW «, t00=0x0129, t01=0x0138}
0x1d108…1d130 Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A15 GET RETURN ADDRESS «, t00=0x0129, t01=0x0156}
0x1d130…1d13a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0129, t01=0x017e}
0x1d13a…1d148 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0129, t01=0x0188}
0x1d148…1d152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x0008}
0x1d152…1d17e Head {h00=0x0028, h01=0x0050, text=» LD A1,PFPOST POWER UP TASK PENDING?«, t00=0x012a, t01=0x0012}
0x1d17e…1d1aa Head {h00=0x0028, h01=0x0050, text=» OR A1,PLCPFP PLC POWER UP PENDING? «, t00=0x012a, t01=0x003e}
0x1d1aa…1d1dc Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) TDISP YES, GO TO TOSS DISPATCHER «, t00=0x012a, t01=0x006a}
0x1d1dc…1d202 Head {h00=0x0022, h01=0x0050, text=» LD A1,CWTOPR,A5 PLC OPERABLE?«, t00=0x012a, t01=0x009c}
0x1d202…1d222 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) CS100 NO, HANDLE«, t00=0x012a, t01=0x00c2}
0x1d222…1d238 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x012a, t01=0x00e2}
0x1d238…1d256 Head {h00=0x001a, h01=0x0050, text=» CF A15,LOGCOM LOG CCR«, t00=0x012a, t01=0x00f8}
0x1d256…1d262 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012a, t01=0x0116}
0x1d262…1d28a Head {h00=0x0024, h01=0x0050, text=» EX CWTCIO,A5 EXECUTE CIO START «, t00=0x012a, t01=0x0122}
0x1d28a…1d2b4 Head {h00=0x0026, h01=0x0050, text=» RF(U) CS090 UNDEFINED, NOT OK =13«, t00=0x012a, t01=0x014a}
0x1d2b4…1d2d6 Head {h00=0x001e, h01=0x0050, text=» LDKL A1,0 SET CR, OK =14 «, t00=0x012a, t01=0x0174}
0x1d2d6…1d2e6 Head {h00=0x000c, h01=0x0050, text=» ABR A2 «, t00=0x012b, t01=0x0008}
0x1d2e6…1d2fa Head {h00=0x0010, h01=0x0050, text=»CS090 EQU * «, t00=0x012b, t01=0x0018}
0x1d2fa…1d304 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x002c}
0x1d304…1d332 Head {h00=0x002a, h01=0x0050, text=» CF A15,PLCNOP ERROR. SET NOT OPERABLE«, t00=0x012b, t01=0x0036}
0x1d332…1d346 Head {h00=0x0010, h01=0x0050, text=»CS100 EQU * «, t00=0x012b, t01=0x0064}
0x1d346…1d378 Head {h00=0x002e, h01=0x0050, text=» LDK A1,NOTOPR RETURN CODE := NOT OPERABLE«, t00=0x012b, t01=0x0078}
0x1d378…1d39a Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x012b, t01=0x00aa}
0x1d39a…1d3b4 Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 SET CR «, t00=0x012b, t01=0x00cc}
0x1d3b4…1d3ca Head {h00=0x0012, h01=0x0050, text=» ABR A2 RETURN«, t00=0x012b, t01=0x00e6}
0x1d3ca…1d3d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x00fc}
0x1d3d4…1d3e2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012b, t01=0x0106}
0x1d3e2…1d3ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x0114}
0x1d3ec…1d430 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012b, t01=0x011e}
0x1d430…1d43a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x0162}
0x1d43a…1d452 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x012b, t01=0x016c}
0x1d452…1d462 Head {h00=0x000c, h01=0x0050, text=»* PLCNOP«, t00=0x012b, t01=0x0184}
0x1d462…1d46c (300, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x0004}
0x1d46c…1d480 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x012c, t01=0x000e}
0x1d480…1d4bc Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE SETS A FLAG TO INDICATE THAT THE PLC «, t00=0x012c, t01=0x0022}
0x1d4bc…1d4d8 Head {h00=0x0018, h01=0x0050, text=»* IS "NOT OPERABLE".«, t00=0x012c, t01=0x005e}
0x1d4d8…1d4e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x007a}
0x1d4e2…1d4f2 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x012c, t01=0x0084}
0x1d4f2…1d50a Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCNOP «, t00=0x012c, t01=0x0094}
0x1d50a…1d514 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x00ac}
0x1d514…1d524 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x012c, t01=0x00b6}
0x1d524…1d540 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x012c, t01=0x00c6}
0x1d540…1d54a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x00e2}
0x1d54a…1d55c Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x012c, t01=0x00ec}
0x1d55c…1d568 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x012c, t01=0x00fe}
0x1d568…1d572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x010a}
0x1d572…1d5b6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012c, t01=0x0114}
0x1d5b6…1d5c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x0158}
0x1d5c0…1d5d4 Head {h00=0x0010, h01=0x0050, text=»PLCNOP EQU *«, t00=0x012c, t01=0x0162}
0x1d5d4…1d5f0 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x012c, t01=0x0176}
0x1d5f0…1d618 (301, 0, 400) Head {h00=0x0024, h01=0x0050, text=» LD A1,CWTPLS,A5 GET PLC STATUS «, t00=0x012d, t01=0x0004}
0x1d618…1d62e Head {h00=0x0012, h01=0x0050, text=» RF(NZ) PN100 «, t00=0x012d, t01=0x002c}
0x1d62e…1d656 Head {h00=0x0024, h01=0x0050, text=» LDKL A1,-1 SET DUMMY ERROR CODE«, t00=0x012d, t01=0x0042}
0x1d656…1d66a Head {h00=0x0010, h01=0x0050, text=»PN100 EQU * «, t00=0x012d, t01=0x006a}
0x1d66a…1d698 Head {h00=0x002a, h01=0x0050, text=» ST A1,CWTOPR,A5 SET PLC NOT OPERABLE «, t00=0x012d, t01=0x007e}
0x1d698…1d6a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x00ac}
0x1d6a2…1d6b8 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x012d, t01=0x00b6}
0x1d6b8…1d6c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x00cc}
0x1d6c2…1d6d0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012d, t01=0x00d6}
0x1d6d0…1d6da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x00e4}
0x1d6da…1d6fc Head {h00=0x001e, h01=0x0050, text=» LD A1,UTTST TRAP CONTROL «, t00=0x012d, t01=0x00ee}
0x1d6fc…1d718 Head {h00=0x0018, h01=0x0050, text=» SUK A1,1 TRAP USED?«, t00=0x012d, t01=0x0110}
0x1d718…1d736 Head {h00=0x001a, h01=0x0050, text=» RF(NG) PN120 NO, SKIP«, t00=0x012d, t01=0x012c}
0x1d736…1d758 Head {h00=0x001e, h01=0x0050, text=» LDK A1,PLCERR ERROR CODE «, t00=0x012d, t01=0x014a}
0x1d758…1d77a Head {h00=0x001e, h01=0x0050, text=» OTR A1,0,/2E TO SOP LAMPS«, t00=0x012d, t01=0x016c}
0x1d77a…1d79c Head {h00=0x001e, h01=0x0050, text=» DATA /6300 TRAP TO BUGGER«, t00=0x012d, t01=0x018e}
0x1d79c…1d7b0 Head {h00=0x0010, h01=0x0050, text=»PN120 EQU * «, t00=0x012e, t01=0x0020}
0x1d7b0…1d7ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x0034}
0x1d7ba…1d7c6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012e, t01=0x003e}
0x1d7c6…1d7d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x004a}
0x1d7d0…1d7ec Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x012e, t01=0x0054}
0x1d7ec…1d7fc Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x012e, t01=0x0070}
0x1d7fc…1d80a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012e, t01=0x0080}
0x1d80a…1d814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x008e}
0x1d814…1d858 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012e, t01=0x0098}
0x1d858…1d862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x00dc}
0x1d862…1d87a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x012e, t01=0x00e6}
0x1d87a…1d88a Head {h00=0x000c, h01=0x0050, text=»* GETDWT«, t00=0x012e, t01=0x00fe}
0x1d88a…1d894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x010e}
0x1d894…1d8a8 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x012e, t01=0x0118}
0x1d8a8…1d8e0 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE CALCULATES THE DWT ADDRESS FOR A «, t00=0x012e, t01=0x012c}
0x1d8e0…1d904 Head {h00=0x0020, h01=0x0050, text=»* DEVICE CONNECTED TO A PLC.«, t00=0x012e, t01=0x0164}
0x1d904…1d90e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x0188}
0x1d90e…1d91e (303, 0, 400) Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x012f, t01=0x0004}
0x1d91e…1d936 Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETDWT «, t00=0x012f, t01=0x0014}
0x1d936…1d940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x002c}
0x1d940…1d950 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x012f, t01=0x0036}
0x1d950…1d96c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x012f, t01=0x0046}
0x1d96c…1d986 Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x012f, t01=0x0062}
0x1d986…1d9a4 Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x012f, t01=0x007c}
0x1d9a4…1d9ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x009a}
0x1d9ae…1d9c0 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x012f, t01=0x00a4}
0x1d9c0…1d9e6 Head {h00=0x0022, h01=0x0050, text=»* A6 = DWT ADDRESS IF FOUND, «, t00=0x012f, t01=0x00b6}
0x1d9e6…1d9f8 Head {h00=0x000e, h01=0x0050, text=»* ELSE 0«, t00=0x012f, t01=0x00dc}
0x1d9f8…1da16 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A6«, t00=0x012f, t01=0x00ee}
0x1da16…1da32 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x012f, t01=0x010c}
0x1da32…1da3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x0128}
0x1da3c…1da80 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012f, t01=0x0132}
0x1da80…1da8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x0176}
0x1da8a…1da9e Head {h00=0x0010, h01=0x0050, text=»GETDWT EQU *«, t00=0x012f, t01=0x0180}
0x1da9e…1daaa (304, 0, 400) Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0130, t01=0x0004}
0x1daaa…1dac6 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x0130, t01=0x0010}
0x1dac6…1daf2 Head {h00=0x0028, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE«, t00=0x0130, t01=0x002c}
0x1daf2…1db1a Head {h00=0x0024, h01=0x0050, text=» CF A15,NDGEDW A6 := DWT ADDRESS«, t00=0x0130, t01=0x0058}
0x1db1a…1db36 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x0130, t01=0x0080}
0x1db36…1db62 Head {h00=0x0028, h01=0x0050, text=» ADKL A15,4 ADJUST STACK FOR RETURN «, t00=0x0130, t01=0x009c}
0x1db62…1db92 Head {h00=0x002c, h01=0x0050, text=» ANKL A6,/FFFE SET CR & SKIP ODD ADDRESS«, t00=0x0130, t01=0x00c8}
0x1db92…1dbaa Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0130, t01=0x00f8}
0x1dbaa…1dbb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x0110}
0x1dbb4…1dbc2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0130, t01=0x011a}
0x1dbc2…1dbcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x0128}
0x1dbcc…1dc10 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0130, t01=0x0132}
0x1dc10…1dc1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x0176}
0x1dc1a…1dc32 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0130, t01=0x0180}
0x1dc32…1dc42 Head {h00=0x000c, h01=0x0050, text=»* GETCWT«, t00=0x0131, t01=0x0008}
0x1dc42…1dc4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x0018}
0x1dc4c…1dc60 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0131, t01=0x0022}
0x1dc60…1dc96 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE CALCULATES THE CWT ADDRESS FOR «, t00=0x0131, t01=0x0036}
0x1dc96…1dcc4 Head {h00=0x002a, h01=0x0050, text=»* THE PLC CONTROLLING CALLING DEVICE. «, t00=0x0131, t01=0x006c}
0x1dcc4…1dcce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x009a}
0x1dcce…1dcde Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0131, t01=0x00a4}
0x1dcde…1dcf6 Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETCWT «, t00=0x0131, t01=0x00b4}
0x1dcf6…1dd00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x00cc}
0x1dd00…1dd10 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0131, t01=0x00d6}
0x1dd10…1dd2c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0131, t01=0x00e6}
0x1dd2c…1dd36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x0102}
0x1dd36…1dd48 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0131, t01=0x010c}
0x1dd48…1dd6e Head {h00=0x0022, h01=0x0050, text=»* A5 = CWT ADDRESS IF FOUND, «, t00=0x0131, t01=0x011e}
0x1dd6e…1dd80 Head {h00=0x000e, h01=0x0050, text=»* ELSE 0«, t00=0x0131, t01=0x0144}
0x1dd80…1dda6 Head {h00=0x0022, h01=0x0050, text=»* A7 = 0 IF LOCAL CONNECTION «, t00=0x0131, t01=0x0156}
0x1dda6…1ddbe Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0131, t01=0x017c}
0x1ddbe…1ddc8 (306, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0132, t01=0x0004}
0x1ddc8…1de0c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0132, t01=0x000e}
0x1de0c…1de16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0132, t01=0x0052}
0x1de16…1de2a Head {h00=0x0010, h01=0x0050, text=»GETCWT EQU *«, t00=0x0132, t01=0x005c}
0x1de2a…1de56 Head {h00=0x0028, h01=0x0050, text=» LD A5,DWTCHP,A6 CHANNEL PARAMETERS «, t00=0x0132, t01=0x0070}
0x1de56…1de86 Head {h00=0x002c, h01=0x0050, text=» ANK A5,MASKPL CLEAN CHANNEL UNIT INDEX «, t00=0x0132, t01=0x009c}
0x1de86…1dea2 Head {h00=0x0018, h01=0x0050, text=» SLL A5,1 MAKE INDEX«, t00=0x0132, t01=0x00cc}
0x1dea2…1deb8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0132, t01=0x00e8}
0x1deb8…1dece Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0132, t01=0x00fe}
0x1dece…1def4 Head {h00=0x0022, h01=0x0050, text=» LDR* A7,A6 CHANNEL PARAMETER «, t00=0x0132, t01=0x0114}
0x1def4…1df14 Head {h00=0x001c, h01=0x0050, text=» ANKL A7,/0500 MASK =10 «, t00=0x0132, t01=0x013a}
0x1df14…1df34 Head {h00=0x001c, h01=0x0050, text=» SUKL A7,/0500 REMOTE ? «, t00=0x0132, t01=0x015a}
0x1df34…1df4c Head {h00=0x0014, h01=0x0050, text=» RF(Z) GET010 NO«, t00=0x0132, t01=0x017a}
0x1df4c…1df76 (307, 0, 398) Head {h00=0x0026, h01=0x0050, text=» ADK A5,8 ADJUST INDEX FOR REMOTE «, t00=0x0133, t01=0x0004}
0x1df76…1df82 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0133, t01=0x002e}
0x1df82…1dfb2 Head {h00=0x002c, h01=0x0050, text=»GET010 LD A5,TABCWT,A5 A5 := CWT ADDRESS«, t00=0x0133, t01=0x003a}
0x1dfb2…1dfbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x006a}
0x1dfbc…1dfd2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0133, t01=0x0074}
0x1dfd2…1dfee Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0133, t01=0x008a}
0x1dfee…1e008 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0133, t01=0x00a6}
0x1e008…1e014 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0133, t01=0x00c0}
0x1e014…1e02a Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0133, t01=0x00cc}
0x1e02a…1e03a Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0133, t01=0x00e2}
0x1e03a…1e046 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0133, t01=0x00f2}
0x1e046…1e050 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x00fe}
0x1e050…1e05e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0133, t01=0x0108}
0x1e05e…1e068 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x0116}
0x1e068…1e0ac Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0133, t01=0x0120}
0x1e0ac…1e0b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x0164}
0x1e0b6…1e0ce Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0133, t01=0x016e}
0x1e0ce…1e0de Head {h00=0x000c, h01=0x0050, text=»* GETFR «, t00=0x0133, t01=0x0186}
0x1e0de…1e0e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x0008}
0x1e0e8…1e0fc Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0134, t01=0x0012}
0x1e0fc…1e138 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE CALCULATES THE NUMBER OF OUTSTANDING «, t00=0x0134, t01=0x0026}
0x1e138…1e172 Head {h00=0x0036, h01=0x0050, text=»* FRAMES, IE FRAMES THAT HAVE BEEN TRANSFERRED BUT«, t00=0x0134, t01=0x0062}
0x1e172…1e1a6 Head {h00=0x0030, h01=0x0050, text=»* NOT ACKNOWLEDGED ON LEVEL 3, FOR A LOGICAL«, t00=0x0134, t01=0x009c}
0x1e1a6…1e1b8 Head {h00=0x000e, h01=0x0050, text=»* CHANNEL.«, t00=0x0134, t01=0x00d0}
0x1e1b8…1e1f0 Head {h00=0x0034, h01=0x0050, text=»* GETIFR GETS NUMBER OF FRAMES RECIEVED BY PLC. «, t00=0x0134, t01=0x00e2}
0x1e1f0…1e224 Head {h00=0x0030, h01=0x0050, text=»* GETOFR GETS NUMBER OF FRAMES SENT BY PLC. «, t00=0x0134, t01=0x011a}
0x1e224…1e22e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x014e}
0x1e22e…1e23e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0134, t01=0x0158}
0x1e23e…1e256 Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETIFR «, t00=0x0134, t01=0x0168}
0x1e256…1e26e Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETOFR «, t00=0x0134, t01=0x0180}
0x1e26e…1e278 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x0008}
0x1e278…1e288 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0135, t01=0x0012}
0x1e288…1e2a4 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0135, t01=0x0022}
0x1e2a4…1e2ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x003e}
0x1e2ae…1e2c0 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0135, t01=0x0048}
0x1e2c0…1e2d8 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0135, t01=0x005a}
0x1e2d8…1e304 Head {h00=0x0028, h01=0x0050, text=»* A2 = NUMBER OF OUTSTANDING FRAMES«, t00=0x0135, t01=0x0072}
0x1e304…1e31c Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0135, t01=0x009e}
0x1e31c…1e326 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x00b6}
0x1e326…1e36a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0135, t01=0x00c0}
0x1e36a…1e374 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x0104}
0x1e374…1e388 Head {h00=0x0010, h01=0x0050, text=»GETIFR EQU *«, t00=0x0135, t01=0x010e}
0x1e388…1e3b6 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x0135, t01=0x0122}
0x1e3b6…1e3c8 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0135, t01=0x0150}
0x1e3c8…1e3fa Head {h00=0x002e, h01=0x0050, text=» SRL A2,9 BITS 13-15 := NEXT EXPECTED P(S)«, t00=0x0135, t01=0x0162}
0x1e3fa…1e428 (310, 0, 400) Head {h00=0x002a, h01=0x0050, text=» SRL A1,5 BITS 13-15 := LAST SENT P(R)«, t00=0x0136, t01=0x0004}
0x1e428…1e448 Head {h00=0x001c, h01=0x0050, text=» RF GF100 TO COMMON PART«, t00=0x0136, t01=0x0032}
0x1e448…1e452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x0052}
0x1e452…1e460 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0136, t01=0x005c}
0x1e460…1e46a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x006a}
0x1e46a…1e47e Head {h00=0x0010, h01=0x0050, text=»GETOFR EQU *«, t00=0x0136, t01=0x0074}
0x1e47e…1e4ac Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x0136, t01=0x0088}
0x1e4ac…1e4be Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0136, t01=0x00b6}
0x1e4be…1e4f0 Head {h00=0x002e, h01=0x0050, text=» SRL A2,1 BITS 13-15 := NEXT P(S) TO SEND «, t00=0x0136, t01=0x00c8}
0x1e4f0…1e522 Head {h00=0x002e, h01=0x0050, text=» SLC A1,3 BITS 13-15 := LAST RECIEVED P(R)«, t00=0x0136, t01=0x00fa}
0x1e522…1e52c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x012c}
0x1e52c…1e536 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x0136}
0x1e536…1e54a Head {h00=0x0010, h01=0x0050, text=»GF100 EQU * «, t00=0x0136, t01=0x0140}
0x1e54a…1e576 Head {h00=0x0028, h01=0x0050, text=» SUR A2,A1 A2 := OUTSTANDING FRAMES «, t00=0x0136, t01=0x0154}
0x1e576…1e59a Head {h00=0x0020, h01=0x0050, text=» ANK A2,/07 CLEAN & MODULO 8«, t00=0x0136, t01=0x0180}
0x1e59a…1e5a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0137, t01=0x0014}
0x1e5a4…1e5ba Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0137, t01=0x001e}
0x1e5ba…1e5d6 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0137, t01=0x0034}
0x1e5d6…1e5f0 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0137, t01=0x0050}
0x1e5f0…1e5fc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0137, t01=0x006a}
0x1e5fc…1e606 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0137, t01=0x0076}
0x1e606…1e61c Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0137, t01=0x0080}
0x1e61c…1e62c Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0137, t01=0x0096}
0x1e62c…1e638 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0137, t01=0x00a6}
0x1e638…1e642 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0137, t01=0x00b2}
0x1e642…1e650 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0137, t01=0x00bc}
0x1e650…1e65a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0137, t01=0x00ca}
0x1e65a…1e69e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0137, t01=0x00d4}
0x1e69e…1e6a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0137, t01=0x0118}
0x1e6a8…1e6c0 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0137, t01=0x0122}
0x1e6c0…1e6d0 Head {h00=0x000c, h01=0x0050, text=»* FLWINP«, t00=0x0137, t01=0x013a}
0x1e6d0…1e6da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0137, t01=0x014a}
0x1e6da…1e6ee Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0137, t01=0x0154}
0x1e6ee…1e730 Head {h00=0x003e, h01=0x0050, text=»* THIS ROUTINE HANDLES FLOW CONTROL FOR INPUT. IT FETCHES «, t00=0x0137, t01=0x0168}
0x1e730…1e76c Head {h00=0x0038, h01=0x0050, text=»* FLOW CONTROL INFORMATION FROM MESSAGE AND UPDATES «, t00=0x0138, t01=0x001a}
0x1e76c…1e786 Head {h00=0x0016, h01=0x0050, text=»* COUNTERS IN DWT.«, t00=0x0138, t01=0x0056}
0x1e786…1e7bc Head {h00=0x0032, h01=0x0050, text=»* FWIPR IS FOR MESSAGES ONLY CONTAINING P(R). «, t00=0x0138, t01=0x0070}
0x1e7bc…1e7f6 Head {h00=0x0036, h01=0x0050, text=»* FWIPSR IS FOR MESSAGES CONTAINING P(S) AND P(R).«, t00=0x0138, t01=0x00a6}
0x1e7f6…1e818 Head {h00=0x001e, h01=0x0050, text=»* NO ERROR CHECK IS MADE. «, t00=0x0138, t01=0x00e0}
0x1e818…1e822 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x0102}
0x1e822…1e832 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0138, t01=0x010c}
0x1e832…1e848 Head {h00=0x0012, h01=0x0050, text=»* CF A15,FWIPR«, t00=0x0138, t01=0x011c}
0x1e848…1e860 Head {h00=0x0014, h01=0x0050, text=»* CF A15,FWIPSR «, t00=0x0138, t01=0x0132}
0x1e860…1e86a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x014a}
0x1e86a…1e87a Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0138, t01=0x0154}
0x1e87a…1e898 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0138, t01=0x0164}
0x1e898…1e8b4 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0138, t01=0x0182}
0x1e8b4…1e8be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x000e}
0x1e8be…1e8d0 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0139, t01=0x0018}
0x1e8d0…1e8e8 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0139, t01=0x002a}
0x1e8e8…1e900 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0139, t01=0x0042}
0x1e900…1e90a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x005a}
0x1e90a…1e94e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0139, t01=0x0064}
0x1e94e…1e958 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x00a8}
0x1e958…1e96c Head {h00=0x0010, h01=0x0050, text=»FWIPR EQU * «, t00=0x0139, t01=0x00b2}
0x1e96c…1e988 Head {h00=0x0018, h01=0x0050, text=» STR A2,A15 PUSH A2 «, t00=0x0139, t01=0x00c6}
0x1e988…1e9b8 Head {h00=0x002c, h01=0x0050, text=» LC A1,X25FLW,A4 FLOW CONTROL FROM INPUT«, t00=0x0139, t01=0x00e2}
0x1e9b8…1e9e0 Head {h00=0x0024, h01=0x0050, text=» ANK A1,/E0 BITS 8-10 = P(R) IN «, t00=0x0139, t01=0x0112}
0x1e9e0…1ea0a Head {h00=0x0026, h01=0x0050, text=» LC A2,DWTLD2,A6 OLD FLOW CONTROL «, t00=0x0139, t01=0x013a}
0x1ea0a…1ea36 Head {h00=0x0028, h01=0x0050, text=» ANK A2,/0E BITS 12-14 = OLD P(S) IN«, t00=0x0139, t01=0x0164}
0x1ea36…1ea56 Head {h00=0x001c, h01=0x0050, text=» ORR A1,A2 KEEP OLD P(S)«, t00=0x0139, t01=0x0190}
0x1ea56…1ea72 Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A15 POP A2 «, t00=0x013a, t01=0x0020}
0x1ea72…1ea92 Head {h00=0x001c, h01=0x0050, text=» RF FI100 COMMON ENDING «, t00=0x013a, t01=0x003c}
0x1ea92…1ea9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x005c}
0x1ea9c…1eaa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x0066}
0x1eaa6…1eaba Head {h00=0x0010, h01=0x0050, text=»FWIPSR EQU *«, t00=0x013a, t01=0x0070}
0x1eaba…1eaea Head {h00=0x002c, h01=0x0050, text=» LC A1,X25FLW,A4 FLOW CONTROL FROM INPUT«, t00=0x013a, t01=0x0084}
0x1eaea…1eb04 Head {h00=0x0016, h01=0x0050, text=» ANK A1,/EE CLEAN «, t00=0x013a, t01=0x00b4}
0x1eb04…1eb3c Head {h00=0x0034, h01=0x0050, text=» ADK A1,/02 BITS 12-14 := NEXT EXPECTED P(S) IN «, t00=0x013a, t01=0x00ce}
0x1eb3c…1eb58 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/EE MODULO 8«, t00=0x013a, t01=0x0106}
0x1eb58…1eb62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x0122}
0x1eb62…1eb6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x012c}
0x1eb6c…1eb80 Head {h00=0x0010, h01=0x0050, text=»FI100 EQU * «, t00=0x013a, t01=0x0136}
0x1eb80…1ebae Head {h00=0x002a, h01=0x0050, text=» SC A1,DWTLD2,A6 SAVE NEW FLOW CONTROL«, t00=0x013a, t01=0x014a}
0x1ebae…1ebb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x0178}
0x1ebb8…1ebce Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x013a, t01=0x0182}
0x1ebce…1ebea Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x013b, t01=0x0008}
0x1ebea…1ec04 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x013b, t01=0x0024}
0x1ec04…1ec10 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013b, t01=0x003e}
0x1ec10…1ec1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x004a}
0x1ec1a…1ec30 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x013b, t01=0x0054}
0x1ec30…1ec40 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x013b, t01=0x006a}
0x1ec40…1ec4c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013b, t01=0x007a}
0x1ec4c…1ec56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x0086}
0x1ec56…1ec64 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x013b, t01=0x0090}
0x1ec64…1ec6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x009e}
0x1ec6e…1ecb2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x013b, t01=0x00a8}
0x1ecb2…1ecbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x00ec}
0x1ecbc…1ecd4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x013b, t01=0x00f6}
0x1ecd4…1ece4 Head {h00=0x000c, h01=0x0050, text=»* FLWOUT«, t00=0x013b, t01=0x010e}
0x1ece4…1ecee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x011e}
0x1ecee…1ed02 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x013b, t01=0x0128}
0x1ed02…1ed3e Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE HANDLES FLOW CONTROL FOR OUTPUT. FLOW«, t00=0x013b, t01=0x013c}
0x1ed3e…1ed7e Head {h00=0x003c, h01=0x0050, text=»* CONTROL INFORMATION IS FETCHED FROM DWT, AND COUNTERS «, t00=0x013b, t01=0x0178}
0x1ed7e…1ed9c Head {h00=0x001a, h01=0x0050, text=»* IN DWT ARE UPDATED. «, t00=0x013c, t01=0x0028}
0x1ed9c…1edd2 Head {h00=0x0032, h01=0x0050, text=»* FWOPR IS FOR MESSAGES CONTAINING ONLY P(R). «, t00=0x013c, t01=0x0046}
0x1edd2…1ee0c Head {h00=0x0036, h01=0x0050, text=»* FWOPSR IS FOR MESSAGES CONTAINING P(S) AND P(R).«, t00=0x013c, t01=0x007c}
0x1ee0c…1ee16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x00b6}
0x1ee16…1ee26 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x013c, t01=0x00c0}
0x1ee26…1ee3c Head {h00=0x0012, h01=0x0050, text=»* CF A15,FWOPR«, t00=0x013c, t01=0x00d0}
0x1ee3c…1ee54 Head {h00=0x0014, h01=0x0050, text=»* CF A15,FWOPSR «, t00=0x013c, t01=0x00e6}
0x1ee54…1ee5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x00fe}
0x1ee5e…1ee6e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x013c, t01=0x0108}
0x1ee6e…1ee8a Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x013c, t01=0x0118}
0x1ee8a…1ee94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x0134}
0x1ee94…1eea6 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x013c, t01=0x013e}
0x1eea6…1eebe Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x013c, t01=0x0150}
0x1eebe…1eedc Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x013c, t01=0x0168}
0x1eedc…1eefe Head {h00=0x001e, h01=0x0050, text=»* BITS 8-10 P(R) TO SEND«, t00=0x013c, t01=0x0186}
0x1eefe…1ef16 Head {h00=0x0014, h01=0x0050, text=»* BIT 11 ZERO «, t00=0x013d, t01=0x0018}
0x1ef16…1ef44 Head {h00=0x002a, h01=0x0050, text=»* BITS 12-14 P(S) TO SEND IF FWOPSR «, t00=0x013d, t01=0x0030}
0x1ef44…1ef66 Head {h00=0x001e, h01=0x0050, text=»* ELSE ZERO «, t00=0x013d, t01=0x005e}
0x1ef66…1ef7e Head {h00=0x0014, h01=0x0050, text=»* BIT 15 ZERO «, t00=0x013d, t01=0x0080}
0x1ef7e…1ef96 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x013d, t01=0x0098}
0x1ef96…1efa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x00b0}
0x1efa0…1efe4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x013d, t01=0x00ba}
0x1efe4…1efee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x00fe}
0x1efee…1f002 Head {h00=0x0010, h01=0x0050, text=»FWOPR EQU * «, t00=0x013d, t01=0x0108}
0x1f002…1f030 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x013d, t01=0x011c}
0x1f030…1f042 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x013d, t01=0x014a}
0x1f042…1f076 Head {h00=0x0030, h01=0x0050, text=» SRL A2,4 BITS 8-10 := NEXT EXPECTED P(S) IN«, t00=0x013d, t01=0x015c}
0x1f076…1f094 Head {h00=0x001a, h01=0x0050, text=»* (= P(R) TO SEND) «, t00=0x013d, t01=0x0190}
0x1f094…1f0ae Head {h00=0x0016, h01=0x0050, text=» ANK A2,/E0 CLEAN «, t00=0x013e, t01=0x001e}
0x1f0ae…1f0e0 Head {h00=0x002e, h01=0x0050, text=» ANK A1,/0E BITS 12-14 = NEXT P(S) TO SEND«, t00=0x013e, t01=0x0038}
0x1f0e0…1f10a Head {h00=0x0026, h01=0x0050, text=» ORR A1,A2 P(S) := SAME AS BEFORE «, t00=0x013e, t01=0x006a}
0x1f10a…1f12a Head {h00=0x001c, h01=0x0050, text=» RF FO100 COMMON ENDING «, t00=0x013e, t01=0x0094}
0x1f12a…1f134 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x00b4}
0x1f134…1f13e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x00be}
0x1f13e…1f152 Head {h00=0x0010, h01=0x0050, text=»FWOPSR EQU *«, t00=0x013e, t01=0x00c8}
0x1f152…1f180 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x013e, t01=0x00dc}
0x1f180…1f192 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x013e, t01=0x010a}
0x1f192…1f1c6 Head {h00=0x0030, h01=0x0050, text=» SRL A2,4 BITS 8-10 := NEXT EXPECTED P(S) IN«, t00=0x013e, t01=0x011c}
0x1f1c6…1f1e4 Head {h00=0x001a, h01=0x0050, text=»* (= P(R) TO SEND) «, t00=0x013e, t01=0x0150}
0x1f1e4…1f1fe Head {h00=0x0016, h01=0x0050, text=» ANK A2,/E0 CLEAN «, t00=0x013e, t01=0x016e}
0x1f1fe…1f230 Head {h00=0x002e, h01=0x0050, text=» ANK A1,/0E BITS 12-14 = NEXT P(S) TO SEND«, t00=0x013e, t01=0x0188}
0x1f230…1f258 Head {h00=0x0024, h01=0x0050, text=» ORR A2,A1 COUNTERS FOR MESSAGE «, t00=0x013f, t01=0x002a}
0x1f258…1f26a Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x013f, t01=0x0052}
0x1f26a…1f294 Head {h00=0x0026, h01=0x0050, text=» ADK A1,/02 INCREMENT P(S) TO SEND«, t00=0x013f, t01=0x0064}
0x1f294…1f2b0 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/EE MODULO 8«, t00=0x013f, t01=0x008e}
0x1f2b0…1f2ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x00aa}
0x1f2ba…1f2c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x00b4}
0x1f2c4…1f2d8 Head {h00=0x0010, h01=0x0050, text=»FO100 EQU * «, t00=0x013f, t01=0x00be}
0x1f2d8…1f30e Head {h00=0x0032, h01=0x0050, text=» SC A1,DWTLD2+1,A6 SAVE FLOW CONTROL COUNTERS «, t00=0x013f, t01=0x00d2}
0x1f30e…1f318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x0108}
0x1f318…1f32e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x013f, t01=0x0112}
0x1f32e…1f34a Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x013f, t01=0x0128}
0x1f34a…1f364 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x013f, t01=0x0144}
0x1f364…1f370 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013f, t01=0x015e}
0x1f370…1f37a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x016a}
0x1f37a…1f390 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x013f, t01=0x0174}
0x1f390…1f3a0 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x013f, t01=0x018a}
0x1f3a0…1f3ac Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0140, t01=0x000a}
0x1f3ac…1f3ba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0140, t01=0x0016}
0x1f3ba…1f3c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x0024}
0x1f3c4…1f408 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0140, t01=0x002e}
0x1f408…1f412 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x0072}
0x1f412…1f42a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0140, t01=0x007c}
0x1f42a…1f43a Head {h00=0x000c, h01=0x0050, text=»* WRADDR«, t00=0x0140, t01=0x0094}
0x1f43a…1f444 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x00a4}
0x1f444…1f458 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0140, t01=0x00ae}
0x1f458…1f48c Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE WRITES THE LINE ADDRESS IN A «, t00=0x0140, t01=0x00c2}
0x1f48c…1f4c6 Head {h00=0x0036, h01=0x0050, text=»* MESSAGE. THE ADDRESS CONSISTS OF: DROP ADDRESS, «, t00=0x0140, t01=0x00f6}
0x1f4c6…1f4fc Head {h00=0x0032, h01=0x0050, text=»* GROUP NUMBER AND DEVICE ADDRESS. WRADR1 SETS«, t00=0x0140, t01=0x0130}
0x1f4fc…1f536 Head {h00=0x0036, h01=0x0050, text=»* GROUP=1 INDICATING NO FLOW CONTROL, WRADR2 SETS «, t00=0x0140, t01=0x0166}
0x1f536…1f560 Head {h00=0x0026, h01=0x0050, text=»* GROUP=0 INDICATING FLOW CONTROL.«, t00=0x0141, t01=0x0010}
0x1f560…1f56a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x003a}
0x1f56a…1f57a Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0141, t01=0x0044}
0x1f57a…1f592 Head {h00=0x0014, h01=0x0050, text=»* CF A15,WRADR1 «, t00=0x0141, t01=0x0054}
0x1f592…1f5aa Head {h00=0x0014, h01=0x0050, text=»* CF A15,WRADR2 «, t00=0x0141, t01=0x006c}
0x1f5aa…1f5b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x0084}
0x1f5b4…1f5c4 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0141, t01=0x008e}
0x1f5c4…1f5e2 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0141, t01=0x009e}
0x1f5e2…1f5fe Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0141, t01=0x00bc}
0x1f5fe…1f61a Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0141, t01=0x00d8}
0x1f61a…1f624 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x00f4}
0x1f624…1f636 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0141, t01=0x00fe}
0x1f636…1f64e Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x0141, t01=0x0110}
0x1f64e…1f666 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0141, t01=0x0128}
0x1f666…1f670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x0140}
0x1f670…1f6b4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0141, t01=0x014a}
0x1f6b4…1f6be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x018e}
0x1f6be…1f6d2 Head {h00=0x0010, h01=0x0050, text=»WRADR1 EQU *«, t00=0x0142, t01=0x0008}
0x1f6d2…1f6f4 Head {h00=0x001e, h01=0x0050, text=» LDK A2,/11 GROUP NUMBER 1«, t00=0x0142, t01=0x001c}
0x1f6f4…1f714 Head {h00=0x001c, h01=0x0050, text=» RF WA100 TO COMMON PART«, t00=0x0142, t01=0x003e}
0x1f714…1f71e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x005e}
0x1f71e…1f72c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0142, t01=0x0068}
0x1f72c…1f736 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x0076}
0x1f736…1f74a Head {h00=0x0010, h01=0x0050, text=»WRADR2 EQU *«, t00=0x0142, t01=0x0080}
0x1f74a…1f76c Head {h00=0x001e, h01=0x0050, text=» LDK A2,/10 GROUP NUMBER 0«, t00=0x0142, t01=0x0094}
0x1f76c…1f776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x00b6}
0x1f776…1f780 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x00c0}
0x1f780…1f794 Head {h00=0x0010, h01=0x0050, text=»WA100 EQU * «, t00=0x0142, t01=0x00ca}
0x1f794…1f7c4 Head {h00=0x002c, h01=0x0050, text=» SC A2,X25LGN,A4 GROUP NUMBER TO BUFFER «, t00=0x0142, t01=0x00de}
0x1f7c4…1f7f0 Head {h00=0x0028, h01=0x0050, text=» LC A2,DWTCP2,A6 CHANNEL PARAMETERS «, t00=0x0142, t01=0x010e}
0x1f7f0…1f816 Head {h00=0x0022, h01=0x0050, text=» ANK A2,MASKWS CLEAN WS NUMBER«, t00=0x0142, t01=0x013a}
0x1f816…1f83c Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRDLS,A5 TO CCA«, t00=0x0142, t01=0x0160}
0x1f83c…1f856 Head {h00=0x0016, h01=0x0050, text=» LC A2,DWTCP2+1,A6«, t00=0x0142, t01=0x0186}
0x1f856…1f882 Head {h00=0x0028, h01=0x0050, text=» ANK A2,MASKLC CLEAN DEVICE ADDRESS «, t00=0x0143, t01=0x0010}
0x1f882…1f8a4 Head {h00=0x001e, h01=0x0050, text=» SC A2,X25LCN,A4 TO BUFFER«, t00=0x0143, t01=0x003c}
0x1f8a4…1f8ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x005e}
0x1f8ae…1f8c4 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0143, t01=0x0068}
0x1f8c4…1f8e0 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0143, t01=0x007e}
0x1f8e0…1f8fa Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0143, t01=0x009a}
0x1f8fa…1f906 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0143, t01=0x00b4}
0x1f906…1f910 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x00c0}
0x1f910…1f926 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0143, t01=0x00ca}
0x1f926…1f936 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0143, t01=0x00e0}
0x1f936…1f942 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0143, t01=0x00f0}
0x1f942…1f94c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x00fc}
0x1f94c…1f95a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0143, t01=0x0106}
0x1f95a…1f964 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x0114}
0x1f964…1f9a8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0143, t01=0x011e}
0x1f9a8…1f9b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x0162}
0x1f9b2…1f9ca Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0143, t01=0x016c}
0x1f9ca…1f9da Head {h00=0x000c, h01=0x0050, text=»* STAHAN«, t00=0x0143, t01=0x0184}
0x1f9da…1f9e4 (324, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x0004}
0x1f9e4…1f9f8 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0144, t01=0x000e}
0x1f9f8…1fa2e Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES PLC STATUS WORD FOR ONE«, t00=0x0144, t01=0x0022}
0x1fa2e…1fa66 Head {h00=0x0034, h01=0x0050, text=»* WORK STATION. IF "NO CONNECTION", "LINK RESET"«, t00=0x0144, t01=0x0058}
0x1fa66…1fa9c Head {h00=0x0032, h01=0x0050, text=»* OR "DCE NOT OPERABLE" IS INDICATED, AN ERROR«, t00=0x0144, t01=0x0090}
0x1fa9c…1fab2 Head {h00=0x0012, h01=0x0050, text=»* CODE WILL BE«, t00=0x0144, t01=0x00c6}
0x1fab2…1faea Head {h00=0x0034, h01=0x0050, text=»* SET IN THE WORK STATION STATUS WORD (CWTWSS). «, t00=0x0144, t01=0x00dc}
0x1faea…1fb16 Head {h00=0x0028, h01=0x0050, text=»* OTHER STATUS BITS ARE NOT ALLOWED.«, t00=0x0144, t01=0x0114}
0x1fb16…1fb20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x0140}
0x1fb20…1fb30 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0144, t01=0x014a}
0x1fb30…1fb48 Head {h00=0x0014, h01=0x0050, text=»* CF A15,STAHAN «, t00=0x0144, t01=0x015a}
0x1fb48…1fb52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x0172}
0x1fb52…1fb62 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0144, t01=0x017c}
0x1fb62…1fb7c Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x0144, t01=0x018c}
0x1fb7c…1fba0 Head {h00=0x0020, h01=0x0050, text=»* A2 = WORK STATION NUMBER «, t00=0x0145, t01=0x0016}
0x1fba0…1fbbc Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0145, t01=0x003a}
0x1fbbc…1fbc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x0056}
0x1fbc6…1fbd8 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0145, t01=0x0060}
0x1fbd8…1fbfa Head {h00=0x001e, h01=0x0050, text=»* A1 = DEVICE RETURN CODE«, t00=0x0145, t01=0x0072}
0x1fbfa…1fc12 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0145, t01=0x0094}
0x1fc12…1fc1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x00ac}
0x1fc1c…1fc60 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0145, t01=0x00b6}
0x1fc60…1fc6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x00fa}
0x1fc6a…1fc7e Head {h00=0x0010, h01=0x0050, text=»STAHAN EQU *«, t00=0x0145, t01=0x0104}
0x1fc7e…1fc9a Head {h00=0x0018, h01=0x0050, text=» STR A3,A15 PUSH A3 «, t00=0x0145, t01=0x0118}
0x1fc9a…1fcb8 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A1 ANY ERROR? «, t00=0x0145, t01=0x0134}
0x1fcb8…1fcd8 Head {h00=0x001c, h01=0x0050, text=» RF(Z) SH120 NO, RETURN «, t00=0x0145, t01=0x0152}
0x1fcd8…1fcf4 Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 PUSH A4 «, t00=0x0145, t01=0x0172}
0x1fcf4…1fcfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x018e}
0x1fcfe…1fd0c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0146, t01=0x0008}
0x1fd0c…1fd16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0146, t01=0x0016}
0x1fd16…1fd42 Head {h00=0x0028, h01=0x0050, text=» LDK A1,NOTOPR ASSUME NO CONNECTION «, t00=0x0146, t01=0x0020}
0x1fd42…1fd68 Head {h00=0x0022, h01=0x0050, text=» ANKL A3,STADNO+STANOC IS IT? «, t00=0x0146, t01=0x004c}
0x1fd68…1fd8c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) SH100 YES, CONTINUE «, t00=0x0146, t01=0x0072}
0x1fd8c…1fdb2 Head {h00=0x0022, h01=0x0050, text=» LDK A1,LINERR NO, LINK ERROR «, t00=0x0146, t01=0x0096}
0x1fdb2…1fdc6 Head {h00=0x0010, h01=0x0050, text=»SH100 EQU * «, t00=0x0146, t01=0x00bc}
0x1fdc6…1fdec Head {h00=0x0022, h01=0x0050, text=» LDR A3,A2 WORK STATION NUMBER«, t00=0x0146, t01=0x00d0}
0x1fdec…1fe08 Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x0146, t01=0x00f6}
0x1fe08…1fe2a Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x0146, t01=0x0112}
0x1fe2a…1fe60 Head {h00=0x0032, h01=0x0050, text=» ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS «, t00=0x0146, t01=0x0134}
0x1fe60…1fe82 Head {h00=0x001e, h01=0x0050, text=» SCR A1,A3 SAVE ERROR CODE«, t00=0x0146, t01=0x016a}
0x1fe82…1feac Head {h00=0x0026, h01=0x0050, text=» LDK A4,WSFERR WORK STATION ERROR «, t00=0x0146, t01=0x018c}
0x1feac…1fed2 Head {h00=0x0022, h01=0x0050, text=» ANR* A4,A3 ALREADY DETECTED? «, t00=0x0147, t01=0x0026}
0x1fed2…1fef4 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) SH110 YES, RETURN «, t00=0x0147, t01=0x004c}
0x1fef4…1ff0a Head {h00=0x0012, h01=0x0050, text=» LDK A4,WSFERR«, t00=0x0147, t01=0x006e}
0x1ff0a…1ff30 Head {h00=0x0022, h01=0x0050, text=» ORRS A4,A3 SET ERROR DETECTED«, t00=0x0147, t01=0x0084}
0x1ff30…1ff64 Head {h00=0x0030, h01=0x0050, text=» ST A2,CWTABW,A5 INDICATE ABORT DWT:S FOR WS«, t00=0x0147, t01=0x00aa}
0x1ff64…1ff6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x00de}
0x1ff6e…1ff82 Head {h00=0x0010, h01=0x0050, text=»SH110 EQU * «, t00=0x0147, t01=0x00e8}
0x1ff82…1ff9e Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x0147, t01=0x00fc}
0x1ff9e…1ffb2 Head {h00=0x0010, h01=0x0050, text=»SH120 EQU * «, t00=0x0147, t01=0x0118}
0x1ffb2…1ffce Head {h00=0x0018, h01=0x0050, text=» LDR* A3,A15 POP A3 «, t00=0x0147, t01=0x012c}
0x1ffce…1ffd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x0148}
0x1ffd8…1ffee Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0147, t01=0x0152}
0x1ffee…2000a Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0147, t01=0x0168}
0x2000a…20024 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0147, t01=0x0184}
0x20024…20030 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0148, t01=0x000e}
0x20030…20046 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0148, t01=0x001a}
0x20046…20056 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0148, t01=0x0030}
0x20056…20062 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0148, t01=0x0040}
0x20062…2006c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x004c}
0x2006c…2007a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0148, t01=0x0056}
0x2007a…20084 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x0064}
0x20084…200c8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0148, t01=0x006e}
0x200c8…200d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x00b2}
0x200d2…200ea Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0148, t01=0x00bc}
0x200ea…200fa Head {h00=0x000c, h01=0x0050, text=»* GETSTA«, t00=0x0148, t01=0x00d4}
0x200fa…20104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x00e4}
0x20104…20118 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0148, t01=0x00ee}
0x20118…2014c Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE WILL CHECK THE I/O STATUS FOR«, t00=0x0148, t01=0x0102}
0x2014c…20160 Head {h00=0x0010, h01=0x0050, text=»* A DEVICE. «, t00=0x0148, t01=0x0136}
0x20160…20194 Head {h00=0x0030, h01=0x0050, text=»* GETWSS WILL ONLY CHECK THE STATUS FOR THE «, t00=0x0148, t01=0x014a}
0x20194…201b6 Head {h00=0x001e, h01=0x0050, text=»* WORK STATION CONNECTION.«, t00=0x0148, t01=0x017e}
0x201b6…201ea Head {h00=0x0030, h01=0x0050, text=»* GETLCS WILL CHECK BOTH LOGICAL CHANNEL AND«, t00=0x0149, t01=0x0010}
0x201ea…20208 Head {h00=0x001a, h01=0x0050, text=»* WORK STATION STATUS.«, t00=0x0149, t01=0x0044}
0x20208…20212 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x0062}
0x20212…20222 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0149, t01=0x006c}
0x20222…2023a Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETLCS «, t00=0x0149, t01=0x007c}
0x2023a…20252 Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETWSS «, t00=0x0149, t01=0x0094}
0x20252…2025c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x00ac}
0x2025c…2026c Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0149, t01=0x00b6}
0x2026c…20288 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0149, t01=0x00c6}
0x20288…202a4 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0149, t01=0x00e2}
0x202a4…202ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x00fe}
0x202ae…202c0 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0149, t01=0x0108}
0x202c0…202dc Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0149, t01=0x011a}
0x202dc…202fa Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x0149, t01=0x0136}
0x202fa…20316 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0149, t01=0x0154}
0x20316…20320 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x0170}
0x20320…20364 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0149, t01=0x017a}
0x20364…2036e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x002e}
0x2036e…20382 Head {h00=0x0010, h01=0x0050, text=»GETLCS EQU *«, t00=0x014a, t01=0x0038}
0x20382…2038e Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x014a, t01=0x004c}
0x2038e…203aa Head {h00=0x0018, h01=0x0050, text=» STR A3,A15 PUSH A3 «, t00=0x014a, t01=0x0058}
0x203aa…203b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x0074}
0x203b4…203e2 Head {h00=0x002a, h01=0x0050, text=» LDK A1,LINERR SET RETURN CODE IN CASE«, t00=0x014a, t01=0x007e}
0x203e2…20404 Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTST,A6 DWT STATUS«, t00=0x014a, t01=0x00ac}
0x20404…20432 Head {h00=0x002a, h01=0x0050, text=» ANK A3,DWFRES RESET PACKET RECIEVED? «, t00=0x014a, t01=0x00ce}
0x20432…20466 Head {h00=0x0030, h01=0x0050, text=» RF(NZ) LS110 YES, RETURN. RET CODE = LINERR«, t00=0x014a, t01=0x00fc}
0x20466…2048c Head {h00=0x0022, h01=0x0050, text=» RF LS100 NOT RESET. CHECK WSS«, t00=0x014a, t01=0x0130}
0x2048c…20496 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x0156}
0x20496…204a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x0160}
0x204a0…204b4 Head {h00=0x0010, h01=0x0050, text=»GETWSS EQU *«, t00=0x014a, t01=0x016a}
0x204b4…204c0 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x014a, t01=0x017e}
0x204c0…204dc Head {h00=0x0018, h01=0x0050, text=» STR A3,A15 PUSH A3 «, t00=0x014a, t01=0x018a}
0x204dc…204e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x0016}
0x204e6…204f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x0020}
0x204f0…20504 Head {h00=0x0010, h01=0x0050, text=»LS100 EQU * «, t00=0x014b, t01=0x002a}
0x20504…20526 Head {h00=0x001e, h01=0x0050, text=» LC A3,DWTCP2,A6 WS NUMBER«, t00=0x014b, t01=0x003e}
0x20526…20542 Head {h00=0x0018, h01=0x0050, text=» ANK A3,MASKWS CLEAN«, t00=0x014b, t01=0x0060}
0x20542…2055e Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x014b, t01=0x007c}
0x2055e…2057c Head {h00=0x001a, h01=0x0050, text=» ADR A3,A5 CWT ADDRESS«, t00=0x014b, t01=0x0098}
0x2057c…2059e Head {h00=0x001e, h01=0x0050, text=» LC A1,CWTWSS,A3 WS STATUS«, t00=0x014b, t01=0x00b6}
0x2059e…205a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x00d8}
0x205a8…205b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x00e2}
0x205b2…205c6 Head {h00=0x0010, h01=0x0050, text=»LS110 EQU * «, t00=0x014b, t01=0x00ec}
0x205c6…205e2 Head {h00=0x0018, h01=0x0050, text=» LDR* A3,A15 POP A3 «, t00=0x014b, t01=0x0100}
0x205e2…20602 Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x014b, t01=0x011c}
0x20602…20630 Head {h00=0x002a, h01=0x0050, text=» ANK A1,/FF CLEAN RETURN CODE & SET CR«, t00=0x014b, t01=0x013c}
0x20630…20648 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x014b, t01=0x016a}
0x20648…20652 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x0182}
0x20652…20660 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x014b, t01=0x018c}
0x20660…2066a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x000a}
0x2066a…206ae Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x014c, t01=0x0014}
0x206ae…206b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0058}
0x206b8…206d0 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x014c, t01=0x0062}
0x206d0…206e0 Head {h00=0x000c, h01=0x0050, text=»* PLGTBU«, t00=0x014c, t01=0x007a}
0x206e0…206ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x008a}
0x206ea…206fe Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x014c, t01=0x0094}
0x206fe…2073a Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE WILL ALLOCATE A BUFFER AND FORMAT IT «, t00=0x014c, t01=0x00a8}
0x2073a…20770 Head {h00=0x0032, h01=0x0050, text=»* ACCORDING TO THE FORMAT USED BY THIS DRIVER.«, t00=0x014c, t01=0x00e4}
0x20770…2077a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x011a}
0x2077a…2078a Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x014c, t01=0x0124}
0x2078a…207a2 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLGTBU «, t00=0x014c, t01=0x0134}
0x207a2…207ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x014c}
0x207ac…207bc Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x014c, t01=0x0156}
0x207bc…207de Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x014c, t01=0x0166}
0x207de…207e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0188}
0x207e8…207fa (333, 0, 398) Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x014d, t01=0x0004}
0x207fa…20828 Head {h00=0x002a, h01=0x0050, text=»* A2 = LENGTH OF USER PART OF BUFFER «, t00=0x014d, t01=0x0016}
0x20828…2085e Head {h00=0x0032, h01=0x0050, text=»* A4 = START OF USER PART OF BUFFER (IF ANY) «, t00=0x014d, t01=0x0044}
0x2085e…20888 Head {h00=0x0026, h01=0x0050, text=»* CR = NOT 0 IF BUFFER ALLOCATED «, t00=0x014d, t01=0x007a}
0x20888…208ac Head {h00=0x0020, h01=0x0050, text=»* 0 IF NO BUFFER ALLOCATED «, t00=0x014d, t01=0x00a4}
0x208ac…208c8 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x014d, t01=0x00c8}
0x208c8…208d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x00e4}
0x208d2…20916 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x014d, t01=0x00ee}
0x20916…20920 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x0132}
0x20920…20934 Head {h00=0x0010, h01=0x0050, text=»PLGTBU EQU *«, t00=0x014d, t01=0x013c}
0x20934…20952 Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 SKIP PSW «, t00=0x014d, t01=0x0150}
0x20952…2097a Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A15 GET RETURN ADDRESS «, t00=0x014d, t01=0x016e}
0x2097a…209a2 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETBUF A4 := BUFFER. INH«, t00=0x014e, t01=0x0008}
0x209a2…209c8 Head {h00=0x0022, h01=0x0050, text=» ABR(Z) A2 RETURN IF NO BUFFER«, t00=0x014e, t01=0x0030}
0x209c8…209d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x0056}
0x209d2…209fa Head {h00=0x0024, h01=0x0050, text=» ST A2,0,A15 SAVE RETURN ADDRESS«, t00=0x014e, t01=0x0060}
0x209fa…20a24 Head {h00=0x0026, h01=0x0050, text=» ADK A4,BUFHLN START OF USER PART «, t00=0x014e, t01=0x0088}
0x20a24…20a54 Head {h00=0x002c, h01=0x0050, text=» ST A7,BUFLNK,A4 SAVE POOLBLOCK ADDRESS «, t00=0x014e, t01=0x00b2}
0x20a54…20a78 Head {h00=0x0020, h01=0x0050, text=» LD A2,POBBUS,A7 BUFFER SIZE«, t00=0x014e, t01=0x00e2}
0x20a78…20aa8 Head {h00=0x002c, h01=0x0050, text=» SUK A2,BUFHLN A2 := LENGTH OF USER PART«, t00=0x014e, t01=0x0106}
0x20aa8…20acc Head {h00=0x0020, h01=0x0050, text=» RF(P) GU100 CONTINUE IF OK «, t00=0x014e, t01=0x0136}
0x20acc…20b00 Head {h00=0x0030, h01=0x0050, text=» ANK A2,0 TOO SHORT. BUFFER LENGTH & CR := 0«, t00=0x014e, t01=0x015a}
0x20b00…20b14 Head {h00=0x0010, h01=0x0050, text=»GU100 EQU * «, t00=0x014e, t01=0x018e}
0x20b14…20b40 Head {h00=0x0028, h01=0x0050, text=» ST A2,BUFLEN,A4 USER BUFFER LENGTH «, t00=0x014f, t01=0x0012}
0x20b40…20b58 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x014f, t01=0x003e}
0x20b58…20b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x0056}
0x20b62…20b70 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x014f, t01=0x0060}
0x20b70…20b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x006e}
0x20b7a…20bbe Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x014f, t01=0x0078}
0x20bbe…20bc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x00bc}
0x20bc8…20be0 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x014f, t01=0x00c6}
0x20be0…20bf0 Head {h00=0x000c, h01=0x0050, text=»* PLRLBU«, t00=0x014f, t01=0x00de}
0x20bf0…20bfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x00ee}
0x20bfa…20c0e Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x014f, t01=0x00f8}
0x20c0e…20c42 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE RELEASES AN I/O BUFFER OF THE«, t00=0x014f, t01=0x010c}
0x20c42…20c68 Head {h00=0x0022, h01=0x0050, text=»* FORMAT USED BY THIS DRIVER. «, t00=0x014f, t01=0x0140}
0x20c68…20c72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x0166}
0x20c72…20c82 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x014f, t01=0x0170}
0x20c82…20c9a Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLRLBU «, t00=0x014f, t01=0x0180}
0x20c9a…20ca4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x0008}
0x20ca4…20cb4 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0150, t01=0x0012}
0x20cb4…20cd2 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0150, t01=0x0022}
0x20cd2…20cdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x0040}
0x20cdc…20cee Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0150, t01=0x004a}
0x20cee…20d06 Head {h00=0x0014, h01=0x0050, text=»* A4 = CHANGED «, t00=0x0150, t01=0x005c}
0x20d06…20d1e Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0150, t01=0x0074}
0x20d1e…20d44 Head {h00=0x0022, h01=0x0050, text=»* INTERR. INHIBITED IF CPU 852«, t00=0x0150, t01=0x008c}
0x20d44…20d4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x00b2}
0x20d4e…20d92 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0150, t01=0x00bc}
0x20d92…20d9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x0100}
0x20d9c…20db0 Head {h00=0x0010, h01=0x0050, text=»PLRLBU EQU *«, t00=0x0150, t01=0x010a}
0x20db0…20dcc Head {h00=0x0018, h01=0x0050, text=» STR A7,A15 PUSH A7 «, t00=0x0150, t01=0x011e}
0x20dcc…20df6 Head {h00=0x0026, h01=0x0050, text=» LD A7,BUFLNK,A4 POOLBLOCK ADDRESS«, t00=0x0150, t01=0x013a}
0x20df6…20e2c Head {h00=0x0032, h01=0x0050, text=» SUK A4,BUFHLN A4 :- PHYSICAL START OF BUFFER «, t00=0x0150, t01=0x0164}
0x20e2c…20e58 Head {h00=0x0028, h01=0x0050, text=» CF A15,RELBUF RELEASE BUFFER & INH «, t00=0x0151, t01=0x000a}
0x20e58…20e74 Head {h00=0x0018, h01=0x0050, text=» LDR* A7,A15 POP A7 «, t00=0x0151, t01=0x0036}
0x20e74…20e7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x0052}
0x20e7e…20e94 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0151, t01=0x005c}
0x20e94…20eb0 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0151, t01=0x0072}
0x20eb0…20eca Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0151, t01=0x008e}
0x20eca…20ed6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0151, t01=0x00a8}
0x20ed6…20eec Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0151, t01=0x00b4}
0x20eec…20efc Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0151, t01=0x00ca}
0x20efc…20f08 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0151, t01=0x00da}
0x20f08…20f16 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0151, t01=0x00e6}
0x20f16…20f20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x00f4}
0x20f20…20f64 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0151, t01=0x00fe}
0x20f64…20f6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x0142}
0x20f6e…20f86 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0151, t01=0x014c}
0x20f86…20f96 Head {h00=0x000c, h01=0x0050, text=»* PLCHAR«, t00=0x0151, t01=0x0164}
0x20f96…20fa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x0174}
0x20fa0…20fb4 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0151, t01=0x017e}
0x20fb4…20fe8 (338, 0, 400) Head {h00=0x0030, h01=0x0050, text=»* THESE ROUTINES ARE USED TO GET A CHARACTER«, t00=0x0152, t01=0x0004}
0x20fe8…21020 Head {h00=0x0034, h01=0x0050, text=»* FROM A BUFFER OR PUT A CHARACTER IN A BUFFER. «, t00=0x0152, t01=0x0038}
0x21020…21058 Head {h00=0x0034, h01=0x0050, text=»* THE BUFFER SHOULD HAVE A HEADER OF THE NORMAL «, t00=0x0152, t01=0x0070}
0x21058…2108a Head {h00=0x002e, h01=0x0050, text=»* PLC FORMAT (SE "BUFFER LAYOUT" CONSTANT «, t00=0x0152, t01=0x00a8}
0x2108a…210a0 Head {h00=0x0012, h01=0x0050, text=»* DEFINITION).«, t00=0x0152, t01=0x00da}
0x210a0…210aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0152, t01=0x00f0}
0x210aa…210ba Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0152, t01=0x00fa}
0x210ba…210d2 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLGECH «, t00=0x0152, t01=0x010a}
0x210d2…210ea Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLPUCH «, t00=0x0152, t01=0x0122}
0x210ea…210f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0152, t01=0x013a}
0x210f4…21104 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0152, t01=0x0144}
0x21104…21120 Head {h00=0x0018, h01=0x0050, text=»* A2 = IF PUT CHAR «, t00=0x0152, t01=0x0154}
0x21120…2113e Head {h00=0x001a, h01=0x0050, text=»* BITS 0-7 IRRELEVANT«, t00=0x0152, t01=0x0170}
0x2113e…2115c Head {h00=0x001a, h01=0x0050, text=»* BITS 8-15 CHARACTER«, t00=0x0152, t01=0x018e}
0x2115c…2117a Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0153, t01=0x001c}
0x2117a…21184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x003a}
0x21184…21196 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0153, t01=0x0044}
0x21196…211b2 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0153, t01=0x0056}
0x211b2…211dc Head {h00=0x0026, h01=0x0050, text=»* -1 IF OVERFLOW/UNDERFLOW, ELSE «, t00=0x0153, t01=0x0072}
0x211dc…211f4 Head {h00=0x0014, h01=0x0050, text=»* AT PLPUCH: 0«, t00=0x0153, t01=0x009c}
0x211f4…21224 Head {h00=0x002c, h01=0x0050, text=»* AT PLGECH: NR OF CHAR LEFT IN BUFFER«, t00=0x0153, t01=0x00b4}
0x21224…21248 Head {h00=0x0020, h01=0x0050, text=»* A2 = IF PLGECH & A1>=0 : «, t00=0x0153, t01=0x00e4}
0x21248…21260 Head {h00=0x0014, h01=0x0050, text=»* BITS 0-7 ZERO«, t00=0x0153, t01=0x0108}
0x21260…2127e Head {h00=0x001a, h01=0x0050, text=»* BITS 8-15 CHARACTER«, t00=0x0153, t01=0x0120}
0x2127e…2129a Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0153, t01=0x013e}
0x2129a…212a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x015a}
0x212a4…212e8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0153, t01=0x0164}
0x212e8…212f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x0018}
0x212f2…21300 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0154, t01=0x0022}
0x21300…2130a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x0030}
0x2130a…2131e Head {h00=0x0010, h01=0x0050, text=»PLGECH EQU *«, t00=0x0154, t01=0x003a}
0x2131e…2132a Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0154, t01=0x004e}
0x2132a…21334 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x005a}
0x21334…21366 Head {h00=0x002e, h01=0x0050, text=» LD A1,BUFLEN,A4 LENGTH OF TEXT IN BUFFER «, t00=0x0154, t01=0x0064}
0x21366…2138a Head {h00=0x0020, h01=0x0050, text=» LD A2,BUFBIX,A4 BYTE INDEX «, t00=0x0154, t01=0x0096}
0x2138a…2139c Head {h00=0x000e, h01=0x0050, text=» SUR A1,A2«, t00=0x0154, t01=0x00ba}
0x2139c…213c4 Head {h00=0x0024, h01=0x0050, text=» SUK A1,1 A1 := NR OF CHAR LEFT «, t00=0x0154, t01=0x00cc}
0x213c4…213ea Head {h00=0x0022, h01=0x0050, text=» RF(N) CH100 EXIT IF UNDERFLOW«, t00=0x0154, t01=0x00f4}
0x213ea…21410 Head {h00=0x0022, h01=0x0050, text=» IM BUFBIX,A4 INCREMENT INDEX «, t00=0x0154, t01=0x011a}
0x21410…21440 Head {h00=0x002c, h01=0x0050, text=» ADR A2,A4 ABSOLUTE ADDRESS OF CHARACTER«, t00=0x0154, t01=0x0140}
0x21440…21460 Head {h00=0x001c, h01=0x0050, text=» LCR A2,A2 GET CHARACTER«, t00=0x0154, t01=0x0170}
0x21460…2147a Head {h00=0x0016, h01=0x0050, text=» ANK A2,/FF CLEAN «, t00=0x0154, t01=0x0190}
0x2147a…21484 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x001a}
0x21484…214a2 Head {h00=0x001a, h01=0x0050, text=» RF CH110 NORMAL EXIT «, t00=0x0155, t01=0x0024}
0x214a2…214ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x0042}
0x214ac…214b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x004c}
0x214b6…214ca Head {h00=0x0010, h01=0x0050, text=»PLPUCH EQU *«, t00=0x0155, t01=0x0056}
0x214ca…214d6 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0155, t01=0x006a}
0x214d6…214e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x0076}
0x214e0…21504 Head {h00=0x0020, h01=0x0050, text=» LD A1,BUFBIX,A4 BYTE INDEX «, t00=0x0155, t01=0x0080}
0x21504…2152c Head {h00=0x0024, h01=0x0050, text=» CW A1,BUFLEN,A4 OUTSIDE BUFFER?«, t00=0x0155, t01=0x00a4}
0x2152c…2154c Head {h00=0x001c, h01=0x0050, text=» RF(NL) CH100 YES, ERROR«, t00=0x0155, t01=0x00cc}
0x2154c…21572 Head {h00=0x0022, h01=0x0050, text=» IM BUFBIX,A4 INCREMENT INDEX «, t00=0x0155, t01=0x00ec}
0x21572…2159a Head {h00=0x0024, h01=0x0050, text=» ADR A1,A4 FREE PLACE IN BUFFER «, t00=0x0155, t01=0x0112}
0x2159a…215c4 Head {h00=0x0026, h01=0x0050, text=» SCR A2,A1 PUT CHARACTER IN BUFFER«, t00=0x0155, t01=0x013a}
0x215c4…215e8 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RETURN CODE := OK «, t00=0x0155, t01=0x0164}
0x215e8…21606 Head {h00=0x001a, h01=0x0050, text=» RF CH110 NORMAL EXIT «, t00=0x0155, t01=0x0188}
0x21606…21610 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0016}
0x21610…2161a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0020}
0x2161a…2162e Head {h00=0x0010, h01=0x0050, text=»CH100 EQU * «, t00=0x0156, t01=0x002a}
0x2162e…21656 Head {h00=0x0024, h01=0x0050, text=» LDKL A1,-1 RETURN CODE := ERROR«, t00=0x0156, t01=0x003e}
0x21656…2166a Head {h00=0x0010, h01=0x0050, text=»CH110 EQU * «, t00=0x0156, t01=0x0066}
0x2166a…2168a Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x0156, t01=0x007a}
0x2168a…216a2 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0156, t01=0x009a}
0x216a2…216ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x00b2}
0x216ac…216ba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0156, t01=0x00bc}
0x216ba…216c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x00ca}
0x216c4…21708 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0156, t01=0x00d4}
0x21708…21712 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0118}
0x21712…2172a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0156, t01=0x0122}
0x2172a…2173a Head {h00=0x000c, h01=0x0050, text=»* INTYPE«, t00=0x0156, t01=0x013a}
0x2173a…21744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x014a}
0x21744…21758 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0156, t01=0x0154}
0x21758…21790 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE CHECKS A GENERAL READ ANSWER FROM«, t00=0x0156, t01=0x0168}
0x21790…217c0 Head {h00=0x002c, h01=0x0050, text=»* THE PLC TO DETERMINE TYPE OF MESSAGE. «, t00=0x0157, t01=0x0010}
0x217c0…217ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x0040}
0x217ca…217da Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0157, t01=0x004a}
0x217da…217f2 Head {h00=0x0014, h01=0x0050, text=»* CF A15,INTYPE «, t00=0x0157, t01=0x005a}
0x217f2…217fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x0072}
0x217fc…2180c Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0157, t01=0x007c}
0x2180c…21828 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0157, t01=0x008c}
0x21828…21832 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x00a8}
0x21832…21844 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0157, t01=0x00b2}
0x21844…2185c Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x0157, t01=0x00c4}
0x2185c…21870 Head {h00=0x0010, h01=0x0050, text=»* A3 = TYPE«, t00=0x0157, t01=0x00dc}
0x21870…21888 Head {h00=0x0014, h01=0x0050, text=»* A4 = CHANGED «, t00=0x0157, t01=0x00f0}
0x21888…218a0 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0157, t01=0x0108}
0x218a0…218aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x0120}
0x218aa…218ee Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0157, t01=0x012a}
0x218ee…218f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x016e}
0x218f8…2190c Head {h00=0x0010, h01=0x0050, text=»INTYPE EQU *«, t00=0x0157, t01=0x0178}
0x2190c…21938 Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT MINIMUM INPUT LENGTH «, t00=0x0157, t01=0x018c}
0x21938…2196a Head {h00=0x002e, h01=0x0050, text=» CW A2,CWTRCA+CCRLEN,A5 LENGTH >= MINIMUM?«, t00=0x0158, t01=0x0028}
0x2196a…21988 Head {h00=0x001a, h01=0x0050, text=» RF(G) ITERR NO, ERROR«, t00=0x0158, t01=0x005a}
0x21988…21992 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x0078}
0x21992…219a0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0158, t01=0x0082}
0x219a0…219aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x0090}
0x219aa…219d8 Head {h00=0x002a, h01=0x0050, text=» LD A3,CWTRCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x0158, t01=0x009a}
0x219d8…219fe Head {h00=0x0022, h01=0x0050, text=» LC A2,X25LGN,A3 GROUP NUMBER «, t00=0x0158, t01=0x00c8}
0x219fe…21a16 Head {h00=0x0014, h01=0x0050, text=» LDR A4,A2 SAVE «, t00=0x0158, t01=0x00ee}
0x21a16…21a30 Head {h00=0x0016, h01=0x0050, text=» ANK A4,/0F CLEAN «, t00=0x0158, t01=0x0106}
0x21a30…21a54 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) IT120 NOT GROUP ZERO«, t00=0x0158, t01=0x0120}
0x21a54…21a5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x0144}
0x21a5e…21a90 Head {h00=0x002e, h01=0x0050, text=»* CHANNEL GROUP ZERO. NORMAL MESSAGES. «, t00=0x0158, t01=0x014e}
0x21a90…21aba Head {h00=0x0026, h01=0x0050, text=» LC A3,X25FLW,A3 FLOW CONTROL BYTE«, t00=0x0158, t01=0x0180}
0x21aba…21ad2 Head {h00=0x0014, h01=0x0050, text=» LDR A4,A3 SAVE «, t00=0x0159, t01=0x001a}
0x21ad2…21aea Head {h00=0x0014, h01=0x0050, text=» ANK A4,/01 FLAG«, t00=0x0159, t01=0x0032}
0x21aea…21b10 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) IT100 NOT DATA PACKET «, t00=0x0159, t01=0x004a}
0x21b10…21b3a Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYDATA ASSUME NORMAL DATA «, t00=0x0159, t01=0x0070}
0x21b3a…21b5e Head {h00=0x0020, h01=0x0050, text=» ANK A2,/80 QUALIFY BIT SET?«, t00=0x0159, t01=0x009a}
0x21b5e…21b8a Head {h00=0x0028, h01=0x0050, text=» RF(Z) ITEXIT NO, NORMAL DATA. EXIT «, t00=0x0159, t01=0x00be}
0x21b8a…21bb4 Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYSTAT YES, STATUS MESSAGE«, t00=0x0159, t01=0x00ea}
0x21bb4…21bcc Head {h00=0x0014, h01=0x0050, text=» RF ITEXIT EXIT «, t00=0x0159, t01=0x0114}
0x21bcc…21bd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x012c}
0x21bd6…21bea Head {h00=0x0010, h01=0x0050, text=»IT100 EQU * «, t00=0x0159, t01=0x0136}
0x21bea…21c14 Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 SAVE FLOW CONTROL BYTE «, t00=0x0159, t01=0x014a}
0x21c14…21c36 Head {h00=0x001e, h01=0x0050, text=» ANK A3,/02 RECIEVE READY?«, t00=0x0159, t01=0x0174}
0x21c36…21c4e Head {h00=0x0014, h01=0x0050, text=» RF(NZ) IT110 NO«, t00=0x015a, t01=0x0008}
0x21c4e…21c78 Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYRR TYPE := RECIEVE READY«, t00=0x015a, t01=0x0020}
0x21c78…21c90 Head {h00=0x0014, h01=0x0050, text=» RF ITEXIT EXIT «, t00=0x015a, t01=0x004a}
0x21c90…21c9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0062}
0x21c9a…21cae Head {h00=0x0010, h01=0x0050, text=»IT110 EQU * «, t00=0x015a, t01=0x006c}
0x21cae…21cd8 Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYRES ASSUME TYPE = RESET «, t00=0x015a, t01=0x0080}
0x21cd8…21cf8 Head {h00=0x001c, h01=0x0050, text=» ANK A4,/04 IS IT RESET?«, t00=0x015a, t01=0x00aa}
0x21cf8…21d18 Head {h00=0x001c, h01=0x0050, text=» RF(Z) ITEXIT YES, EXIT «, t00=0x015a, t01=0x00ca}
0x21d18…21d4e Head {h00=0x0032, h01=0x0050, text=» LDK A3,TYRESC NO, TYPE := RESET CONFIRMATION «, t00=0x015a, t01=0x00ea}
0x21d4e…21d66 Head {h00=0x0014, h01=0x0050, text=» RF ITEXIT EXIT «, t00=0x015a, t01=0x0120}
0x21d66…21d70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0138}
0x21d70…21d7e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015a, t01=0x0142}
0x21d7e…21d88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0150}
0x21d88…21d9c Head {h00=0x0010, h01=0x0050, text=»IT120 EQU * «, t00=0x015a, t01=0x015a}
0x21d9c…21dbc Head {h00=0x001c, h01=0x0050, text=»* NOT NORMAL MESSAGE «, t00=0x015a, t01=0x016e}
0x21dbc…21df0 Head {h00=0x0030, h01=0x0050, text=» LDK A3,TYNFLO ASSUME TYPE = NO FLOW CONTROL«, t00=0x015a, t01=0x018e}
0x21df0…21e18 Head {h00=0x0024, h01=0x0050, text=» SUK A4,1 IS IT NO FLOW CONTROL?«, t00=0x015b, t01=0x0032}
0x21e18…21e38 Head {h00=0x001c, h01=0x0050, text=» RF(Z) ITEXIT YES, EXIT «, t00=0x015b, t01=0x005a}
0x21e38…21e42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x007a}
0x21e42…21e56 Head {h00=0x0010, h01=0x0050, text=»ITERR EQU * «, t00=0x015b, t01=0x0084}
0x21e56…21e80 Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYERR IRRECOVERABLE ERROR «, t00=0x015b, t01=0x0098}
0x21e80…21e8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x00c2}
0x21e8a…21e9e Head {h00=0x0010, h01=0x0050, text=»ITEXIT EQU *«, t00=0x015b, t01=0x00cc}
0x21e9e…21eb4 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x015b, t01=0x00e0}
0x21eb4…21ed0 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x015b, t01=0x00f6}
0x21ed0…21eea Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x015b, t01=0x0112}
0x21eea…21ef6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x015b, t01=0x012c}
0x21ef6…21f0c Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x015b, t01=0x0138}
0x21f0c…21f1c Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x015b, t01=0x014e}
0x21f1c…21f28 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x015b, t01=0x015e}
0x21f28…21f32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x016a}
0x21f32…21f40 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015b, t01=0x0174}
0x21f40…21f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x0182}
0x21f4a…21f8e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x015b, t01=0x018c}
0x21f8e…21f98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x0040}
0x21f98…21fb0 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x015c, t01=0x004a}
0x21fb0…21fc0 Head {h00=0x000c, h01=0x0050, text=»* OUTBUQ«, t00=0x015c, t01=0x0062}
0x21fc0…21fca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x0072}
0x21fca…21fde Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x015c, t01=0x007c}
0x21fde…2201a Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE WILL REMOVE A DWT FROM THE QUEUES FOR«, t00=0x015c, t01=0x0090}
0x2201a…22052 Head {h00=0x0034, h01=0x0050, text=»* SHORT OR LONG OUTPUT BUFFERS, IF IT IS IN ANY «, t00=0x015c, t01=0x00cc}
0x22052…2206a Head {h00=0x0014, h01=0x0050, text=»* OF THE QUEUES.«, t00=0x015c, t01=0x0104}
0x2206a…22074 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x011c}
0x22074…22084 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x015c, t01=0x0126}
0x22084…2209c Head {h00=0x0014, h01=0x0050, text=»* CF A15,OUTBUQ «, t00=0x015c, t01=0x0136}
0x2209c…220a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x014e}
0x220a6…220b6 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x015c, t01=0x0158}
0x220b6…220d2 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x015c, t01=0x0168}
0x220d2…220ee Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x015c, t01=0x0184}
0x220ee…220f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x0010}
0x220f8…2210a Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x015d, t01=0x001a}
0x2210a…2212c Head {h00=0x001e, h01=0x0050, text=»* A2 = NOT 0 IF DWT FOUND«, t00=0x015d, t01=0x002c}
0x2212c…2214a Head {h00=0x001a, h01=0x0050, text=»* 0 IF DWT NOT FOUND«, t00=0x015d, t01=0x004e}
0x2214a…22162 Head {h00=0x0014, h01=0x0050, text=»* A4 = CHANGED «, t00=0x015d, t01=0x006c}
0x22162…2217a Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x015d, t01=0x0084}
0x2217a…22184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x009c}
0x22184…221c8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x015d, t01=0x00a6}
0x221c8…221d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x00ea}
0x221d2…221e6 Head {h00=0x0010, h01=0x0050, text=»OUTBUQ EQU *«, t00=0x015d, t01=0x00f4}
0x221e6…22202 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x015d, t01=0x0108}
0x22202…2221e Head {h00=0x0018, h01=0x0050, text=» STR A7,A15 PUSH A7 «, t00=0x015d, t01=0x0124}
0x2221e…2223c Head {h00=0x001a, h01=0x0050, text=» LDR A4,A6 DWT ADDRESS«, t00=0x015d, t01=0x0140}
0x2223c…2225e Head {h00=0x001e, h01=0x0050, text=» ADKL A4,DWTOTQ QUEUE LINK«, t00=0x015d, t01=0x015e}
0x2225e…22268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x0180}
0x22268…22286 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x015d, t01=0x018a}
0x22286…222b0 Head {h00=0x0026, h01=0x0050, text=» ADK A7,CWTSBQ SHORT BUFFERS QUEUE«, t00=0x015e, t01=0x0018}
0x222b0…222dc Head {h00=0x0028, h01=0x0050, text=» CF A15,LNKOUT REMOVE DWT FROM QUEUE«, t00=0x015e, t01=0x0042}
0x222dc…222f6 Head {h00=0x0016, h01=0x0050, text=» LDR A7,A7 FOUND? «, t00=0x015e, t01=0x006e}
0x222f6…22318 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) OB100 YES, RETURN «, t00=0x015e, t01=0x0088}
0x22318…22322 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x00aa}
0x22322…22334 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x015e, t01=0x00b4}
0x22334…2235e Head {h00=0x0026, h01=0x0050, text=» ADKL A7,CWTLBQ LONG BUFFERS QUEUE«, t00=0x015e, t01=0x00c6}
0x2235e…22386 Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x015e, t01=0x00f0}
0x22386…22390 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x0118}
0x22390…223a4 Head {h00=0x0010, h01=0x0050, text=»OB100 EQU * «, t00=0x015e, t01=0x0122}
0x223a4…223ce Head {h00=0x0026, h01=0x0050, text=» LDR A2,A7 A2 := FOUND / NOT FOUND«, t00=0x015e, t01=0x0136}
0x223ce…223d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x0160}
0x223d8…223f4 Head {h00=0x0018, h01=0x0050, text=» LDR* A7,A15 POP A7 «, t00=0x015e, t01=0x016a}
0x223f4…22410 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x015e, t01=0x0186}
0x22410…22426 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x015f, t01=0x0012}
0x22426…22442 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x015f, t01=0x0028}
0x22442…2245c Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x015f, t01=0x0044}
0x2245c…22468 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x015f, t01=0x005e}
0x22468…2247e Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x015f, t01=0x006a}
0x2247e…2248e Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x015f, t01=0x0080}
0x2248e…2249a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x015f, t01=0x0090}
0x2249a…224a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x009c}
0x224a4…224b2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015f, t01=0x00a6}
0x224b2…224bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x00b4}
0x224bc…22500 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x015f, t01=0x00be}
0x22500…2250a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x0102}
0x2250a…22522 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x015f, t01=0x010c}
0x22522…22532 Head {h00=0x000c, h01=0x0050, text=»* LNKFST«, t00=0x015f, t01=0x0124}
0x22532…2253c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x0134}
0x2253c…22550 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x015f, t01=0x013e}
0x22550…22586 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE LINKS A QUEUE ELEMENT FIRST IN «, t00=0x015f, t01=0x0152}
0x22586…225b0 Head {h00=0x0026, h01=0x0050, text=»* A QUEUE (CLOSEST TO QUEUE HEAD).«, t00=0x015f, t01=0x0188}
0x225b0…225e6 Head {h00=0x0032, h01=0x0050, text=»* ONE WORD IN EACH ELEMENT IS USED AS A LINK. «, t00=0x0160, t01=0x0022}
0x225e6…2261c Head {h00=0x0032, h01=0x0050, text=»* END OF QUEUE IS INDICATED BY LINK=0 IN LAST «, t00=0x0160, t01=0x0058}
0x2261c…2262e Head {h00=0x000e, h01=0x0050, text=»* ELEMENT.«, t00=0x0160, t01=0x008e}
0x2262e…22638 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x00a0}
0x22638…22648 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0160, t01=0x00aa}
0x22648…22660 Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKFST «, t00=0x0160, t01=0x00ba}
0x22660…2266a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x00d2}
0x2266a…2267a Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0160, t01=0x00dc}
0x2267a…226a4 Head {h00=0x0026, h01=0x0050, text=»* A4 = QUEUE ELEMENT LINK ADDRESS«, t00=0x0160, t01=0x00ec}
0x226a4…226cc Head {h00=0x0024, h01=0x0050, text=»* A7 = QUEUE HEAD LINK ADDRESS «, t00=0x0160, t01=0x0116}
0x226cc…226d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x013e}
0x226d6…226e8 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0160, t01=0x0148}
0x226e8…22700 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0160, t01=0x015a}
0x22700…22718 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0160, t01=0x0172}
0x22718…22722 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x018a}
0x22722…22766 (353, 0, 400) Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0161, t01=0x0004}
0x22766…22770 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x0048}
0x22770…22784 Head {h00=0x0010, h01=0x0050, text=»LNKFST EQU *«, t00=0x0161, t01=0x0052}
0x22784…227ac Head {h00=0x0024, h01=0x0050, text=» LDR* A1,A7 FIRST QUEUE ELEMENT «, t00=0x0161, t01=0x0066}
0x227ac…227d8 Head {h00=0x0028, h01=0x0050, text=» STR A1,A4 SET LINK FROM NEW ELEMENT«, t00=0x0161, t01=0x008e}
0x227d8…22800 Head {h00=0x0024, h01=0x0050, text=» STR A4,A7 SET NEW ELEMENT FIRST«, t00=0x0161, t01=0x00ba}
0x22800…22816 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0161, t01=0x00e2}
0x22816…22830 Head {h00=0x0016, h01=0x0050, text=» RF LNKRET RETURN «, t00=0x0161, t01=0x00f8}
0x22830…2283c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0161, t01=0x0112}
0x2283c…22852 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0161, t01=0x011e}
0x22852…22862 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0161, t01=0x0134}
0x22862…2286e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0161, t01=0x0144}
0x2286e…22878 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x0150}
0x22878…22886 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0161, t01=0x015a}
0x22886…22890 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x0168}
0x22890…228d4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0161, t01=0x0172}
0x228d4…228de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x0026}
0x228de…228f6 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0162, t01=0x0030}
0x228f6…22906 Head {h00=0x000c, h01=0x0050, text=»* LNKLST«, t00=0x0162, t01=0x0048}
0x22906…22910 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x0058}
0x22910…22924 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0162, t01=0x0062}
0x22924…22958 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE LINKS A QUEUE ELEMENT LAST IN«, t00=0x0162, t01=0x0076}
0x22958…22986 Head {h00=0x002a, h01=0x0050, text=»* A QUEUE (OPOSITE END TO QUEUE HEAD).«, t00=0x0162, t01=0x00aa}
0x22986…229bc Head {h00=0x0032, h01=0x0050, text=»* ONE WORD IN EACH ELEMENT IS USED AS A LINK. «, t00=0x0162, t01=0x00d8}
0x229bc…229f2 Head {h00=0x0032, h01=0x0050, text=»* END OF QUEUE IS INDICATED BY LINK=0 IN LAST «, t00=0x0162, t01=0x010e}
0x229f2…22a04 Head {h00=0x000e, h01=0x0050, text=»* ELEMENT.«, t00=0x0162, t01=0x0144}
0x22a04…22a0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x0156}
0x22a0e…22a1e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0162, t01=0x0160}
0x22a1e…22a36 Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKLST «, t00=0x0162, t01=0x0170}
0x22a36…22a40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x0188}
0x22a40…22a50 (355, 0, 400) Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0163, t01=0x0004}
0x22a50…22a7a Head {h00=0x0026, h01=0x0050, text=»* A4 = QUEUE ELEMENT LINK ADDRESS«, t00=0x0163, t01=0x0014}
0x22a7a…22aa2 Head {h00=0x0024, h01=0x0050, text=»* A7 = QUEUE HEAD LINK ADDRESS «, t00=0x0163, t01=0x003e}
0x22aa2…22aac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x0066}
0x22aac…22abe Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0163, t01=0x0070}
0x22abe…22ad6 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0163, t01=0x0082}
0x22ad6…22aee Head {h00=0x0014, h01=0x0050, text=»* A7 = CHANGED «, t00=0x0163, t01=0x009a}
0x22aee…22b06 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0163, t01=0x00b2}
0x22b06…22b10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x00ca}
0x22b10…22b54 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0163, t01=0x00d4}
0x22b54…22b5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x0118}
0x22b5e…22b72 Head {h00=0x0010, h01=0x0050, text=»LNKLST EQU *«, t00=0x0163, t01=0x0122}
0x22b72…22b9a Head {h00=0x0024, h01=0x0050, text=» LDR A1,A7 SAVE PRESENT ELEMENT «, t00=0x0163, t01=0x0136}
0x22b9a…22bba Head {h00=0x001c, h01=0x0050, text=» LDR* A7,A7 NEXT ELEMENT«, t00=0x0163, t01=0x015e}
0x22bba…22bee Head {h00=0x0030, h01=0x0050, text=» RB(NZ) LNKLST CONTINUE IF NOT LAST ELEMENT «, t00=0x0163, t01=0x017e}
0x22bee…22c1c Head {h00=0x002a, h01=0x0050, text=» STR A4,A1 LINK NEW ELEMENT AFTER LAST«, t00=0x0164, t01=0x0022}
0x22c1c…22c4a Head {h00=0x002a, h01=0x0050, text=» CMR A4 SET END MARKER IN LAST ELEMENT«, t00=0x0164, t01=0x0050}
0x22c4a…22c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x007e}
0x22c54…22c62 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0164, t01=0x0088}
0x22c62…22c6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x0096}
0x22c6c…22c82 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0164, t01=0x00a0}
0x22c82…22c9c Head {h00=0x0016, h01=0x0050, text=» RF LNKRET RETURN «, t00=0x0164, t01=0x00b6}
0x22c9c…22ca8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0164, t01=0x00d0}
0x22ca8…22cbe Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0164, t01=0x00dc}
0x22cbe…22cce Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0164, t01=0x00f2}
0x22cce…22cda Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0164, t01=0x0102}
0x22cda…22ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x010e}
0x22ce4…22cf2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0164, t01=0x0118}
0x22cf2…22cfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x0126}
0x22cfc…22d40 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0164, t01=0x0130}
0x22d40…22d4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x0174}
0x22d4a…22d62 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0164, t01=0x017e}
0x22d62…22d72 Head {h00=0x000c, h01=0x0050, text=»* LNKOUT«, t00=0x0165, t01=0x0008}
0x22d72…22d7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x0018}
0x22d7c…22d90 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0165, t01=0x0022}
0x22d90…22dc8 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE REMOVES AN ELEMENT FROM A QUEUE. «, t00=0x0165, t01=0x0036}
0x22dc8…22dfe Head {h00=0x0032, h01=0x0050, text=»* ONE WORD IN EACH ELEMENT IS USED AS A LINK. «, t00=0x0165, t01=0x006e}
0x22dfe…22e34 Head {h00=0x0032, h01=0x0050, text=»* END OF QUEUE IS INDICATED BY LINK=0 IN LAST «, t00=0x0165, t01=0x00a4}
0x22e34…22e46 Head {h00=0x000e, h01=0x0050, text=»* ELEMENT.«, t00=0x0165, t01=0x00da}
0x22e46…22e50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x00ec}
0x22e50…22e60 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0165, t01=0x00f6}
0x22e60…22e78 Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKOUT «, t00=0x0165, t01=0x0106}
0x22e78…22e82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x011e}
0x22e82…22e92 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0165, t01=0x0128}
0x22e92…22ebc Head {h00=0x0026, h01=0x0050, text=»* A4 = QUEUE ELEMENT LINK ADDRESS«, t00=0x0165, t01=0x0138}
0x22ebc…22ee4 Head {h00=0x0024, h01=0x0050, text=»* A7 = QUEUE HEAD LINK ADDRESS «, t00=0x0165, t01=0x0162}
0x22ee4…22eee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x018a}
0x22eee…22f00 (358, 0, 400) Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0166, t01=0x0004}
0x22f00…22f18 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0166, t01=0x0016}
0x22f18…22f40 Head {h00=0x0024, h01=0x0050, text=»* A7 = =0 IF ELEMENT NOT FOUND «, t00=0x0166, t01=0x002e}
0x22f40…22f60 Head {h00=0x001c, h01=0x0050, text=»* ><0 IF ELEMENT FOUND «, t00=0x0166, t01=0x0056}
0x22f60…22f78 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0166, t01=0x0076}
0x22f78…22f82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x008e}
0x22f82…22fc6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0166, t01=0x0098}
0x22fc6…22fd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x00dc}
0x22fd0…22fe4 Head {h00=0x0010, h01=0x0050, text=»LNKOUT EQU *«, t00=0x0166, t01=0x00e6}
0x22fe4…2300c Head {h00=0x0024, h01=0x0050, text=» LDR A1,A7 SAVE PRESENT ELEMENT «, t00=0x0166, t01=0x00fa}
0x2300c…2302c Head {h00=0x001c, h01=0x0050, text=» LDR* A7,A7 NEXT ELEMENT«, t00=0x0166, t01=0x0122}
0x2302c…23056 Head {h00=0x0026, h01=0x0050, text=» RF(Z) LO100 EXIT IF END OF QUEUE «, t00=0x0166, t01=0x0142}
0x23056…23078 Head {h00=0x001e, h01=0x0050, text=» CWR A4,A7 ELEMENT FOUND? «, t00=0x0166, t01=0x016c}
0x23078…2309e Head {h00=0x0022, h01=0x0050, text=» RB(NE) LNKOUT NO, CHECK NEXT «, t00=0x0166, t01=0x018e}
0x2309e…230a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0024}
0x230a8…230b6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0167, t01=0x002e}
0x230b6…230c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x003c}
0x230c0…230f0 Head {h00=0x002c, h01=0x0050, text=» LDR* A7,A7 ELEMENT AFTER WANTED ELEMENT«, t00=0x0167, t01=0x0046}
0x230f0…23122 Head {h00=0x002e, h01=0x0050, text=» STR A7,A1 SET LINK FROM PREVIOUS TO NEXT «, t00=0x0167, t01=0x0076}
0x23122…2314a Head {h00=0x0024, h01=0x0050, text=» LDK A7,1 INDICATE ELEMENT FOUND«, t00=0x0167, t01=0x00a8}
0x2314a…2315e Head {h00=0x0010, h01=0x0050, text=»LO100 EQU * «, t00=0x0167, t01=0x00d0}
0x2315e…23168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x00e4}
0x23168…23172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x00ee}
0x23172…23188 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0167, t01=0x00f8}
0x23188…2319c Head {h00=0x0010, h01=0x0050, text=»LNKRET EQU *«, t00=0x0167, t01=0x010e}
0x2319c…231c8 Head {h00=0x0028, h01=0x0050, text=»* COMMON EXIT FOR QUEUE ROUTINES «, t00=0x0167, t01=0x0122}
0x231c8…23202 Head {h00=0x0036, h01=0x0050, text=»* RETURN WITHOUT CHANGING INTERRUPT ENABLE FLAG«, t00=0x0167, t01=0x014e}
0x23202…2321e Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0167, t01=0x0188}
0x2321e…23238 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0168, t01=0x0014}
0x23238…23244 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0168, t01=0x002e}
0x23244…2324e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x003a}
0x2324e…23264 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0168, t01=0x0044}
0x23264…23274 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0168, t01=0x005a}
0x23274…23280 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0168, t01=0x006a}
0x23280…2328a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0076}
0x2328a…23298 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0168, t01=0x0080}
0x23298…232a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x008e}
0x232a2…232ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0098}
0x232ac…232b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x00a2}
0x232b6…232c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x00ac}
0x232c0…23304 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0168, t01=0x00b6}
0x23304…2330e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x00fa}
0x2330e…23336 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0168, t01=0x0104}
0x23336…23340 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x012c}
0x23340…23376 Head {h00=0x0032, h01=0x0050, text=»* TBUFF = TOSS BUFFER HANDLING SUBROUTINES«, t00=0x0168, t01=0x0136}
0x23376…23380 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x016c}
0x23380…2338a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0176}
0x2338a…23394 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0180}
0x23394…233d8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0168, t01=0x018a}
0x233d8…233e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x003e}
0x233e2…2341c Head {h00=0x0036, h01=0x0050, text=»* THIS PROGRAM CONTAINS A SET OF BUFFER HANDLING«, t00=0x0169, t01=0x0048}
0x2341c…23456 Head {h00=0x0036, h01=0x0050, text=»* SUBROUTINES. THEY OPERATE ON BUFFERS ORGANIZED«, t00=0x0169, t01=0x0082}
0x23456…2348e Head {h00=0x0034, h01=0x0050, text=»* IN BUFFER POOLS. A BUFFER POOL CONSISTS OF A«, t00=0x0169, t01=0x00bc}
0x2348e…234c8 Head {h00=0x0036, h01=0x0050, text=»* POOLBLOCK FOR CONTROL INFORMATION, AND ONE OR «, t00=0x0169, t01=0x00f4}
0x234c8…23500 Head {h00=0x0034, h01=0x0050, text=»* MORE BUFFER AREAS. THE POOLBLOCK AND BUFFER «, t00=0x0169, t01=0x012e}
0x23500…23534 Head {h00=0x0030, h01=0x0050, text=»* AREA(S) SHOULD BE SUPPLIED BY THE USER. «, t00=0x0169, t01=0x0166}
0x23534…2353e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x000a}
0x2353e…23572 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x016a, t01=0x0014}
0x23572…2357c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0048}
0x2357c…23594 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x016a, t01=0x0052}
0x23594…2359e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x006a}
0x2359e…235c4 Head {h00=0x0022, h01=0x0050, text=»* GETBUF GET BUFFER FROM POOL «, t00=0x016a, t01=0x0074}
0x235c4…235ea Head {h00=0x0022, h01=0x0050, text=»* RELBUF RETURN BUFFER TO POOL«, t00=0x016a, t01=0x009a}
0x235ea…23614 Head {h00=0x0026, h01=0x0050, text=»* AREBUF DIVIDE AREA INTO BUFFERS «, t00=0x016a, t01=0x00c0}
0x23614…2361e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x00ea}
0x2361e…2362c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016a, t01=0x00f4}
0x2362c…23636 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0102}
0x23636…2364c Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x016a, t01=0x010c}
0x2364c…23662 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x016a, t01=0x0122}
0x23662…23678 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x016a, t01=0x0138}
0x23678…23682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x014e}
0x23682…2368c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0158}
0x2368c…236b4 Head {h00=0x0024, h01=0x0050, text=»* POOLBLOCK LAYOUT DEFINITION«, t00=0x016a, t01=0x0162}
0x236b4…236be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x018a}
0x236be…236e4 (363, 0, 400) Head {h00=0x0022, h01=0x0050, text=»* POOLBLOCK WORD OFFSETS «, t00=0x016b, t01=0x0004}
0x236e4…23706 Head {h00=0x001e, h01=0x0050, text=»POBID EQU 0 POOL IDENTITY «, t00=0x016b, t01=0x002a}
0x23706…23728 Head {h00=0x001e, h01=0x0050, text=»POBFLG EQU 2 BINARY FLAGS «, t00=0x016b, t01=0x004c}
0x23728…23750 Head {h00=0x0024, h01=0x0050, text=»POBFRE EQU 4 FREE LIST LINK HEAD«, t00=0x016b, t01=0x006e}
0x23750…23778 Head {h00=0x0024, h01=0x0050, text=»POBBUS EQU 6 BUFFER SIZE (BYTES)«, t00=0x016b, t01=0x0096}
0x23778…2379e Head {h00=0x0022, h01=0x0050, text=»POBARS EQU 8 AREA SIZE (BYTES)«, t00=0x016b, t01=0x00be}
0x2379e…237a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x00e4}
0x237a8…237c8 Head {h00=0x001c, h01=0x0050, text=»* POOLBLOCK LENGTH «, t00=0x016b, t01=0x00ee}
0x237c8…237ec Head {h00=0x0020, h01=0x0050, text=»POBLEN EQU 10 LENGTH (BYTES)«, t00=0x016b, t01=0x010e}
0x237ec…237f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x0132}
0x237f6…23804 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016b, t01=0x013c}
0x23804…2380e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x014a}
0x2380e…23852 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x016b, t01=0x0154}
0x23852…2385c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x0008}
0x2385c…23874 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x016c, t01=0x0012}
0x23874…23884 Head {h00=0x000c, h01=0x0050, text=»* GETBUF«, t00=0x016c, t01=0x002a}
0x23884…2388e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x003a}
0x2388e…238a2 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x016c, t01=0x0044}
0x238a2…238da Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE FETCHES ONE BUFFER FROM A BUFFER «, t00=0x016c, t01=0x0058}
0x238da…23904 Head {h00=0x0026, h01=0x0050, text=»* POOL AND GIVES IT TO THE CALLER.«, t00=0x016c, t01=0x0090}
0x23904…2390e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x00ba}
0x2390e…2391e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x016c, t01=0x00c4}
0x2391e…23936 Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETBUF «, t00=0x016c, t01=0x00d4}
0x23936…23940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x00ec}
0x23940…23950 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x016c, t01=0x00f6}
0x23950…23972 Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x016c, t01=0x0106}
0x23972…2397c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x0128}
0x2397c…2398e Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x016c, t01=0x0132}
0x2398e…239c0 Head {h00=0x002e, h01=0x0050, text=»* A4 = BUFFER ADDRESS IF BUFFER ALLOCATED«, t00=0x016c, t01=0x0144}
0x239c0…239d6 Head {h00=0x0012, h01=0x0050, text=»* ELSE ZERO«, t00=0x016c, t01=0x0176}
0x239d6…239f4 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A4«, t00=0x016c, t01=0x018c}
0x239f4…23a10 Head {h00=0x0018, h01=0x0050, text=»* INTERR.= INHIBITED«, t00=0x016d, t01=0x001a}
0x23a10…23a1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x0036}
0x23a1a…23a5e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x016d, t01=0x0040}
0x23a5e…23a68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x0084}
0x23a68…23a7c Head {h00=0x0010, h01=0x0050, text=»GETBUF EQU *«, t00=0x016d, t01=0x008e}
0x23a7c…23a88 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x016d, t01=0x00a2}
0x23a88…23ab0 Head {h00=0x0024, h01=0x0050, text=» LD A4,POBFRE,A7 FREE LIST START«, t00=0x016d, t01=0x00ae}
0x23ab0…23ada Head {h00=0x0026, h01=0x0050, text=» RF(Z) GB100 NO BUFFER LEFT. EXIT «, t00=0x016d, t01=0x00d6}
0x23ada…23ae4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x0100}
0x23ae4…23af2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016d, t01=0x010a}
0x23af2…23afc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x0118}
0x23afc…23b18 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x016d, t01=0x0122}
0x23b18…23b42 Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A4 NEW START OF FREE LIST«, t00=0x016d, t01=0x013e}
0x23b42…23b68 Head {h00=0x0022, h01=0x0050, text=» ST A1,POBFRE,A7 TO POOLBLOCK «, t00=0x016d, t01=0x0168}
0x23b68…23b84 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x016d, t01=0x018e}
0x23b84…23b8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x001a}
0x23b8e…23ba2 Head {h00=0x0010, h01=0x0050, text=»GB100 EQU * «, t00=0x016e, t01=0x0024}
0x23ba2…23bc2 Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x016e, t01=0x0038}
0x23bc2…23bea Head {h00=0x0024, h01=0x0050, text=» LDR A4,A4 CR := CONTENTS OF A4 «, t00=0x016e, t01=0x0058}
0x23bea…23c02 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x016e, t01=0x0080}
0x23c02…23c0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x0098}
0x23c0c…23c1a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016e, t01=0x00a2}
0x23c1a…23c24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x00b0}
0x23c24…23c68 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x016e, t01=0x00ba}
0x23c68…23c72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x00fe}
0x23c72…23c8a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x016e, t01=0x0108}
0x23c8a…23c9a Head {h00=0x000c, h01=0x0050, text=»* RELBUF«, t00=0x016e, t01=0x0120}
0x23c9a…23ca4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x0130}
0x23ca4…23cb8 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x016e, t01=0x013a}
0x23cb8…23cee Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE RELEASES ONE BUFFER AND RETURNS«, t00=0x016e, t01=0x014e}
0x23cee…23d0c Head {h00=0x001a, h01=0x0050, text=»* IT TO A BUFFER POOL.«, t00=0x016e, t01=0x0184}
0x23d0c…23d16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x0012}
0x23d16…23d26 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x016f, t01=0x001c}
0x23d26…23d3e Head {h00=0x0014, h01=0x0050, text=»* CF A15,RELBUF «, t00=0x016f, t01=0x002c}
0x23d3e…23d48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x0044}
0x23d48…23d58 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x016f, t01=0x004e}
0x23d58…23d76 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x016f, t01=0x005e}
0x23d76…23d98 Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x016f, t01=0x007c}
0x23d98…23da2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x009e}
0x23da2…23db4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x016f, t01=0x00a8}
0x23db4…23dcc Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x016f, t01=0x00ba}
0x23dcc…23de8 Head {h00=0x0018, h01=0x0050, text=»* INTERR.= INHIBITED«, t00=0x016f, t01=0x00d2}
0x23de8…23df2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x00ee}
0x23df2…23e36 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x016f, t01=0x00f8}
0x23e36…23e40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x013c}
0x23e40…23e54 Head {h00=0x0010, h01=0x0050, text=»RELBUF EQU *«, t00=0x016f, t01=0x0146}
0x23e54…23e60 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x016f, t01=0x015a}
0x23e60…23e7c Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x016f, t01=0x0166}
0x23e7c…23e86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x0182}
0x23e86…23eb2 Head {h00=0x0028, h01=0x0050, text=» LD A1,POBFRE,A7 OLD FREE LIST START«, t00=0x016f, t01=0x018c}
0x23eb2…23eda Head {h00=0x0024, h01=0x0050, text=» STR A1,A4 LINK AFTER NEW BUFFER«, t00=0x0170, t01=0x0028}
0x23eda…23f0a Head {h00=0x002c, h01=0x0050, text=» ST A4,POBFRE,A7 SET NEW FREE LIST START«, t00=0x0170, t01=0x0050}
0x23f0a…23f14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x0080}
0x23f14…23f30 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x0170, t01=0x008a}
0x23f30…23f50 Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x0170, t01=0x00a6}
0x23f50…23f68 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0170, t01=0x00c6}
0x23f68…23f72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x00de}
0x23f72…23f80 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0170, t01=0x00e8}
0x23f80…23f8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x00f6}
0x23f8a…23fce Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0170, t01=0x0100}
0x23fce…23fd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x0144}
0x23fd8…23ff0 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0170, t01=0x014e}
0x23ff0…24000 Head {h00=0x000c, h01=0x0050, text=»* AREBUF«, t00=0x0170, t01=0x0166}
0x24000…2400a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x0176}
0x2400a…2401e Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0170, t01=0x0180}
0x2401e…24058 (369, 0, 400) Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE ALLOCATES A SPECIFIED DATA AREA TO «, t00=0x0171, t01=0x0004}
0x24058…2408e Head {h00=0x0032, h01=0x0050, text=»* A BUFFER POOL. THIS CAN BE DONE IN TWO WAYS.«, t00=0x0171, t01=0x003e}
0x2408e…240c2 Head {h00=0x0030, h01=0x0050, text=»* "INIBUF" IS USED WHEN A NEW BUFFER POOL IS«, t00=0x0171, t01=0x0074}
0x240c2…240f8 Head {h00=0x0032, h01=0x0050, text=»* INITIATED. IT DIVIDES THE AREA INTO BUFFERS,«, t00=0x0171, t01=0x00a8}
0x240f8…24132 Head {h00=0x0036, h01=0x0050, text=»* LINKS THE BUFFERS IN A CHAIN FROM THE FREE LIST «, t00=0x0171, t01=0x00de}
0x24132…2416a Head {h00=0x0034, h01=0x0050, text=»* HEAD IN POOLBLOCK, AND PUTS AN END MARKER (-1)«, t00=0x0171, t01=0x0118}
0x2416a…241a4 Head {h00=0x0036, h01=0x0050, text=»* IN THE LAST BUFFER. "LNKBUF" IS USED WHEN A NEW «, t00=0x0171, t01=0x0150}
0x241a4…241da Head {h00=0x0032, h01=0x0050, text=»* AREA IS ADDED TO AN EXISTING BUFFER POOL. IT«, t00=0x0171, t01=0x018a}
0x241da…24210 Head {h00=0x0032, h01=0x0050, text=»* DIVIDES THE AREA INTO BUFFERS, AND LINKS THE«, t00=0x0172, t01=0x0030}
0x24210…2423a Head {h00=0x0026, h01=0x0050, text=»* BUFFERS FIRST IN THE FREE LIST. «, t00=0x0172, t01=0x0066}
0x2423a…24244 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x0090}
0x24244…24254 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0172, t01=0x009a}
0x24254…2426c Head {h00=0x0014, h01=0x0050, text=»* CF A15,INIBUF «, t00=0x0172, t01=0x00aa}
0x2426c…24284 Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKBUF «, t00=0x0172, t01=0x00c2}
0x24284…2428e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x00da}
0x2428e…2429e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0172, t01=0x00e4}
0x2429e…242ba Head {h00=0x0018, h01=0x0050, text=»* A4 = AREA ADDRESS«, t00=0x0172, t01=0x00f4}
0x242ba…242dc Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x0172, t01=0x0110}
0x242dc…242e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x0132}
0x242e6…242f8 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0172, t01=0x013c}
0x242f8…2431a Head {h00=0x001e, h01=0x0050, text=»* CR = CHANGED IF CPU852 «, t00=0x0172, t01=0x014e}
0x2431a…24324 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x0170}
0x24324…24368 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0172, t01=0x017a}
0x24368…24372 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x002e}
0x24372…24380 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0173, t01=0x0038}
0x24380…2438a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x0046}
0x2438a…2439e Head {h00=0x0010, h01=0x0050, text=»INIBUF EQU *«, t00=0x0173, t01=0x0050}
0x2439e…243b4 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0173, t01=0x0064}
0x243b4…243d0 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x0173, t01=0x007a}
0x243d0…243dc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0173, t01=0x0096}
0x243dc…243e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x00a2}
0x243e6…243fc Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0173, t01=0x00ac}
0x243fc…2441a Head {h00=0x001a, h01=0x0050, text=» MSR 4,A15 PUSH A1-A4 «, t00=0x0173, t01=0x00c2}
0x2441a…24426 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0173, t01=0x00e0}
0x24426…24430 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x00ec}
0x24430…24458 Head {h00=0x0024, h01=0x0050, text=» LDK A1,0 MARKER FOR LAST BUFFER«, t00=0x0173, t01=0x00f6}
0x24458…2447c Head {h00=0x0020, h01=0x0050, text=» RF IL100 GO TO COMMON PART «, t00=0x0173, t01=0x011e}
0x2447c…24486 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x0142}
0x24486…24490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x014c}
0x24490…244a4 Head {h00=0x0010, h01=0x0050, text=»LNKBUF EQU *«, t00=0x0173, t01=0x0156}
0x244a4…244ba Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0173, t01=0x016a}
0x244ba…244d6 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x0173, t01=0x0180}
0x244d6…244e2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0174, t01=0x000c}
0x244e2…244ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0018}
0x244ec…24502 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0174, t01=0x0022}
0x24502…24520 Head {h00=0x001a, h01=0x0050, text=» MSR 4,A15 PUSH A1-A4 «, t00=0x0174, t01=0x0038}
0x24520…2452c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0174, t01=0x0056}
0x2452c…24536 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0062}
0x24536…24562 Head {h00=0x0028, h01=0x0050, text=» LD A1,POBFRE,A7 LINK TO OLD BUFFERS«, t00=0x0174, t01=0x006c}
0x24562…2456c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0098}
0x2456c…24576 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x00a2}
0x24576…2458a Head {h00=0x0010, h01=0x0050, text=»IL100 EQU * «, t00=0x0174, t01=0x00ac}
0x2458a…24594 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x00c0}
0x24594…245c2 Head {h00=0x002a, h01=0x0050, text=»* COMMON PART FOR INIBUF AND LNKBUF«, t00=0x0174, t01=0x00ca}
0x245c2…245cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x00f8}
0x245cc…245e2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0174, t01=0x0102}
0x245e2…24600 Head {h00=0x001a, h01=0x0050, text=» STR A2,A15 PUSH A2-A4«, t00=0x0174, t01=0x0118}
0x24600…24614 Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x0174, t01=0x0136}
0x24614…24628 Head {h00=0x0010, h01=0x0050, text=» STR A4,A15 «, t00=0x0174, t01=0x014a}
0x24628…24634 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0174, t01=0x015e}
0x24634…2463e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x016a}
0x2463e…2464c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0174, t01=0x0174}
0x2464c…24656 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0182}
0x24656…24668 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0174, t01=0x018c}
0x24668…2468e Head {h00=0x0022, h01=0x0050, text=» ADK A2,POBFRE FREE LIST START«, t00=0x0175, t01=0x000e}
0x2468e…246a0 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A4«, t00=0x0175, t01=0x0034}
0x246a0…246c4 Head {h00=0x0020, h01=0x0050, text=» AD A3,POBARS,A7 END OF AREA«, t00=0x0175, t01=0x0046}
0x246c4…246f8 Head {h00=0x0030, h01=0x0050, text=» SU A3,POBBUS,A7 HIGEST BUFFER START IN AREA«, t00=0x0175, t01=0x006a}
0x246f8…24702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x009e}
0x24702…24716 Head {h00=0x0010, h01=0x0050, text=»IL110 EQU * «, t00=0x0175, t01=0x00a8}
0x24716…24736 Head {h00=0x001c, h01=0x0050, text=»* BUFFER LINKING LOOP«, t00=0x0175, t01=0x00bc}
0x24736…2475a Head {h00=0x0020, h01=0x0050, text=» SRL A3,1 SHIFT ADDRESS =15 «, t00=0x0175, t01=0x00dc}
0x2475a…24772 Head {h00=0x0014, h01=0x0050, text=» SRL A4,1 . =15 «, t00=0x0175, t01=0x0100}
0x24772…24790 Head {h00=0x001a, h01=0x0050, text=» CWR A4,A3 ROOM LEFT? «, t00=0x0175, t01=0x0118}
0x24790…247b0 Head {h00=0x001c, h01=0x0050, text=» RF(G) IL120 NO, FINISH «, t00=0x0175, t01=0x0136}
0x247b0…247ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x0156}
0x247ba…247d2 Head {h00=0x0014, h01=0x0050, text=» SLL A3,1 . =15 «, t00=0x0175, t01=0x0160}
0x247d2…247ea Head {h00=0x0014, h01=0x0050, text=» SLL A4,1 . =15 «, t00=0x0175, t01=0x0178}
0x247ea…2481e Head {h00=0x0030, h01=0x0050, text=» STR A4,A2 SET LINK FROM PREVIOUS TO PRESENT«, t00=0x0175, t01=0x0190}
0x2481e…2483e Head {h00=0x001c, h01=0x0050, text=» LDR A2,A4 NEW PREVIOUS «, t00=0x0176, t01=0x0034}
0x2483e…24862 Head {h00=0x0020, h01=0x0050, text=» AD A4,POBBUS,A7 NEW PRESENT«, t00=0x0176, t01=0x0054}
0x24862…24884 Head {h00=0x001e, h01=0x0050, text=» RB IL110 TAKE NEXT BUFFER«, t00=0x0176, t01=0x0078}
0x24884…2488e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x009a}
0x2488e…248a2 Head {h00=0x0010, h01=0x0050, text=»IL120 EQU * «, t00=0x0176, t01=0x00a4}
0x248a2…248ba Head {h00=0x0014, h01=0x0050, text=» SLL A3,1 . =15 «, t00=0x0176, t01=0x00b8}
0x248ba…248d2 Head {h00=0x0014, h01=0x0050, text=» SLL A4,1 . =15 «, t00=0x0176, t01=0x00d0}
0x248d2…24904 Head {h00=0x002e, h01=0x0050, text=» STR A1,A2 SET LINK OR END IN LAST BUFFER «, t00=0x0176, t01=0x00e8}
0x24904…2490e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x011a}
0x2490e…24924 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0176, t01=0x0124}
0x24924…24942 Head {h00=0x001a, h01=0x0050, text=» LDR* A4,A15 POP A1-A4«, t00=0x0176, t01=0x013a}
0x24942…24956 Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A15«, t00=0x0176, t01=0x0158}
0x24956…2496a Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x0176, t01=0x016c}
0x2496a…2497e Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0176, t01=0x0180}
0x2497e…2499e (375, 0, 400) Head {h00=0x001c, h01=0x0050, text=» ADKL A15,2 ADJUST STACK«, t00=0x0177, t01=0x0004}
0x2499e…249b8 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0177, t01=0x0024}
0x249b8…249c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0177, t01=0x003e}
0x249c4…249ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x004a}
0x249ce…249e4 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0177, t01=0x0054}
0x249e4…24a00 Head {h00=0x0018, h01=0x0050, text=» MLR 4,A15 POP A1-A4«, t00=0x0177, t01=0x006a}
0x24a00…24a10 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0177, t01=0x0086}
0x24a10…24a1c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0177, t01=0x0096}
0x24a1c…24a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x00a2}
0x24a26…24a3c Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x0177, t01=0x00ac}
0x24a3c…24a4a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0177, t01=0x00c2}
0x24a4a…24a54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x00d0}
0x24a54…24a86 Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0177, t01=0x00da}
0x24a86…24a90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x010c}
0x24a90…24ab0 Head {h00=0x001c, h01=0x0050, text=»* ROUTINE NAMES: LOGCOM «, t00=0x0177, t01=0x0116}
0x24ab0…24ad0 Head {h00=0x001c, h01=0x0050, text=»* LOGIOC «, t00=0x0177, t01=0x0136}
0x24ad0…24af0 Head {h00=0x001c, h01=0x0050, text=»* LOGATT «, t00=0x0177, t01=0x0156}
0x24af0…24b24 Head {h00=0x0030, h01=0x0050, text=»* FUNCTION: LOG MSG TYPE AND CCR+BUFFER«, t00=0x0177, t01=0x0176}
0x24b24…24b62 Head {h00=0x003a, h01=0x0050, text=»* DLSSEL SPECIFIES DLS TO BE SELECTED «, t00=0x0178, t01=0x001a}
0x24b62…24b8c Head {h00=0x0026, h01=0x0050, text=»* 0 MEANS LOG ALL «, t00=0x0178, t01=0x0058}
0x24b8c…24b96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x0082}
0x24b96…24bce Head {h00=0x0034, h01=0x0050, text=»* RECORD FORMAT: BYTE 1-2 MSG TYPE (CO,RE,AT) «, t00=0x0178, t01=0x008c}
0x24bce…24bfc Head {h00=0x002a, h01=0x0050, text=»* BYTE 3 DLS INDEX «, t00=0x0178, t01=0x00c4}
0x24bfc…24c2c Head {h00=0x002c, h01=0x0050, text=»* BYTE 4 COMMAND CODE«, t00=0x0178, t01=0x00f2}
0x24c2c…24c58 Head {h00=0x0028, h01=0x0050, text=»* BYTE 5-6 STATUS-1«, t00=0x0178, t01=0x0122}
0x24c58…24c8a Head {h00=0x002e, h01=0x0050, text=»* BYTE 7 BUFFER LENGTH «, t00=0x0178, t01=0x014e}
0x24c8a…24cbe Head {h00=0x0030, h01=0x0050, text=»* BYTE 8 PACKET HEADER -1«, t00=0x0178, t01=0x0180}
0x24cbe…24d04 Head {h00=0x0042, h01=0x0050, text=»* BYTE 9 PACKET HEADER -2 (LOGICAL CHANNEL)«, t00=0x0179, t01=0x0024}
0x24d04…24d46 Head {h00=0x003e, h01=0x0050, text=»* BYTE 10 PACKET HEADER -3 (FLOW CONTOL)«, t00=0x0179, t01=0x006a}
0x24d46…24d80 Head {h00=0x0036, h01=0x0050, text=»* BYTE 11-16 6 FIRST DATA BYTES «, t00=0x0179, t01=0x00ac}
0x24d80…24db8 Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0179, t01=0x00e6}
0x24db8…24dc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0179, t01=0x011e}
0x24dc2…24de2 Head {h00=0x001c, h01=0x0050, text=»DLSSEL DATA 0 0=LOG ALL «, t00=0x0179, t01=0x0128}
0x24de2…24e04 Head {h00=0x001e, h01=0x0050, text=»* ELSE DLS TO BE LOGGED «, t00=0x0179, t01=0x0148}
0x24e04…24e10 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0179, t01=0x016a}
0x24e10…24e24 Head {h00=0x0010, h01=0x0050, text=»PLCLOG EQU *«, t00=0x0179, t01=0x0176}
0x24e24…24e3a Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x0179, t01=0x018a}
0x24e3a…24e70 Head {h00=0x0032, h01=0x0050, text=»LOGPTR DATA LOGARE RECORD POINTER IN LOG AREA «, t00=0x017a, t01=0x0010}
0x24e70…24e90 Head {h00=0x001c, h01=0x0050, text=»LOGARE RES 960 LOG AREA «, t00=0x017a, t01=0x0046}
0x24e90…24ea4 Head {h00=0x0010, h01=0x0050, text=»LOGEND EQU *«, t00=0x017a, t01=0x0066}
0x24ea4…24ed0 Head {h00=0x0028, h01=0x0050, text=» DATA 'ENDLOG' MARK END OF LOG AREA «, t00=0x017a, t01=0x007a}
0x24ed0…24f06 Head {h00=0x0032, h01=0x0050, text=»*-------------------------------------------- «, t00=0x017a, t01=0x00a6}
0x24f06…24f2c Head {h00=0x0022, h01=0x0050, text=»LOGCOM EQU * SUBROUTINE ENTRY «, t00=0x017a, t01=0x00dc}
0x24f2c…24f42 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x017a, t01=0x0102}
0x24f42…24f56 Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x017a, t01=0x0118}
0x24f56…24f6a Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x017a, t01=0x012c}
0x24f6a…24f7e Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x017a, t01=0x0140}
0x24f7e…24f8a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017a, t01=0x0154}
0x24f8a…24fa0 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017a, t01=0x0160}
0x24fa0…24fb6 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x017a, t01=0x0176}
0x24fb6…24fd4 Head {h00=0x001a, h01=0x0050, text=» MSR 3,A15 PUSH A1-A3 «, t00=0x017a, t01=0x018c}
0x24fd4…24fe0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017b, t01=0x001a}
0x24fe0…24ff6 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017b, t01=0x0026}
0x24ff6…25014 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,'CO' MSG TYPE«, t00=0x017b, t01=0x003c}
0x25014…25036 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CWTCCA CCA OFFSET «, t00=0x017b, t01=0x005a}
0x25036…25048 Head {h00=0x000e, h01=0x0050, text=» RF LOG:10«, t00=0x017b, t01=0x007c}
0x25048…25050 Head {h00=0x0004, h01=0x0050, t00=0x017b, t01=0x008e}
0x25050…25076 Head {h00=0x0022, h01=0x0050, text=»LOGIOC EQU * SUBROUTINE ENTRY «, t00=0x017b, t01=0x0096}
0x25076…2508c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x017b, t01=0x00bc}
0x2508c…250a0 Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x017b, t01=0x00d2}
0x250a0…250b4 Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x017b, t01=0x00e6}
0x250b4…250c8 Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x017b, t01=0x00fa}
0x250c8…250d4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017b, t01=0x010e}
0x250d4…250ea Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017b, t01=0x011a}
0x250ea…25100 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x017b, t01=0x0130}
0x25100…2511e Head {h00=0x001a, h01=0x0050, text=» MSR 3,A15 PUSH A1-A3 «, t00=0x017b, t01=0x0146}
0x2511e…2512a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017b, t01=0x0164}
0x2512a…25140 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017b, t01=0x0170}
0x25140…2515e Head {h00=0x001a, h01=0x0050, text=» LDKL A1,'RE' MSG TYPE«, t00=0x017b, t01=0x0186}
0x2515e…25180 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CWTRCA RCA OFFSET «, t00=0x017c, t01=0x0014}
0x25180…25192 Head {h00=0x000e, h01=0x0050, text=» RF LOG:10«, t00=0x017c, t01=0x0036}
0x25192…2519a Head {h00=0x0004, h01=0x0050, t00=0x017c, t01=0x0048}
0x2519a…251c0 Head {h00=0x0022, h01=0x0050, text=»LOGATT EQU * SUBROUTINE ENTRY «, t00=0x017c, t01=0x0050}
0x251c0…251d6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x017c, t01=0x0076}
0x251d6…251ea Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x017c, t01=0x008c}
0x251ea…251fe Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x017c, t01=0x00a0}
0x251fe…25212 Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x017c, t01=0x00b4}
0x25212…2521e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017c, t01=0x00c8}
0x2521e…25234 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017c, t01=0x00d4}
0x25234…2524a Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x017c, t01=0x00ea}
0x2524a…25268 Head {h00=0x001a, h01=0x0050, text=» MSR 3,A15 PUSH A1-A3 «, t00=0x017c, t01=0x0100}
0x25268…25274 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017c, t01=0x011e}
0x25274…2528a Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017c, t01=0x012a}
0x2528a…252a8 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,'AT' MSG TYPE«, t00=0x017c, t01=0x0140}
0x252a8…252ca Head {h00=0x001e, h01=0x0050, text=» LDK A2,CWTRCA RCA OFFSET «, t00=0x017c, t01=0x015e}
0x252ca…252fe Head {h00=0x0030, h01=0x0050, text=»*------------------------------------------ «, t00=0x017c, t01=0x0180}
0x252fe…2531e Head {h00=0x001c, h01=0x0050, text=»LOG:10 EQU * COMMON PART«, t00=0x017d, t01=0x0024}
0x2531e…25334 Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPTR «, t00=0x017d, t01=0x0044}
0x25334…25354 Head {h00=0x001c, h01=0x0050, text=» STR A1,A3 LOG MSG TYPE «, t00=0x017d, t01=0x005a}
0x25354…2536e Head {h00=0x0016, h01=0x0050, text=» ADR A2,A5 CCR PTR«, t00=0x017d, t01=0x007a}
0x2536e…25390 Head {h00=0x001e, h01=0x0050, text=» LD A1,DLSSEL SELECTED DLS«, t00=0x017d, t01=0x0094}
0x25390…253ae Head {h00=0x001a, h01=0x0050, text=» RF(Z) LOG:15 LOG ALL «, t00=0x017d, t01=0x00b6}
0x253ae…253c6 Head {h00=0x0014, h01=0x0050, text=» CC A1,CCRDLS,A2«, t00=0x017d, t01=0x00d4}
0x253c6…253ee Head {h00=0x0024, h01=0x0050, text=» RF(NE) LOG:20 NOT SELECTED,SKIP«, t00=0x017d, t01=0x00ec}
0x253ee…25402 Head {h00=0x0010, h01=0x0050, text=»LOG:15 EQU *«, t00=0x017d, t01=0x0114}
0x25402…25424 Head {h00=0x001e, h01=0x0050, text=» LD A1,CCRDLS,A2 DLS INDEX«, t00=0x017d, t01=0x0128}
0x25424…2544a Head {h00=0x0022, h01=0x0050, text=» ST A1,2,A3 +COMMAND INTO LOG «, t00=0x017d, t01=0x014a}
0x2544a…2546c Head {h00=0x001e, h01=0x0050, text=» LD A1,CCRSTA,A2 STATUS-1 «, t00=0x017d, t01=0x0170}
0x2546c…2548c (382, 0, 400) Head {h00=0x001c, h01=0x0050, text=» ST A1,4,A3 LOG STATUS-1«, t00=0x017e, t01=0x0004}
0x2548c…254b2 Head {h00=0x0022, h01=0x0050, text=» LD A1,CCRLEN,A2 BUFFER LENGTH«, t00=0x017e, t01=0x0024}
0x254b2…254ce Head {h00=0x0018, h01=0x0050, text=» SC A1,6,A3 INTO LOG«, t00=0x017e, t01=0x004a}
0x254ce…254f6 Head {h00=0x0024, h01=0x0050, text=» LD A2,CCRBUF,A2 BUFFER ADDRESS «, t00=0x017e, t01=0x0066}
0x254f6…25512 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A2 BYTE 0-1«, t00=0x017e, t01=0x008e}
0x25512…25536 Head {h00=0x0020, h01=0x0050, text=» SC A1,8,A3 PACKET HEADER 2 «, t00=0x017e, t01=0x00aa}
0x25536…25548 Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x017e, t01=0x00ce}
0x25548…2556c Head {h00=0x0020, h01=0x0050, text=» SC A1,7,A3 PACKET HEADER 1 «, t00=0x017e, t01=0x00e0}
0x2556c…25598 Head {h00=0x0028, h01=0x0050, text=» LD A1,2,A2 PACKET HEADER 3+ BYTE 1 «, t00=0x017e, t01=0x0104}
0x25598…255ac Head {h00=0x0010, h01=0x0050, text=» SC A1,10,A3«, t00=0x017e, t01=0x0130}
0x255ac…255be Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x017e, t01=0x0144}
0x255be…255d2 Head {h00=0x0010, h01=0x0050, text=» SC A1,9,A3 «, t00=0x017e, t01=0x0156}
0x255d2…255ee Head {h00=0x0018, h01=0x0050, text=» LD A1,4,A2 BYTE 2-3«, t00=0x017e, t01=0x016a}
0x255ee…25602 Head {h00=0x0010, h01=0x0050, text=» SC A1,12,A3«, t00=0x017e, t01=0x0186}
0x25602…25614 Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x017f, t01=0x000a}
0x25614…25628 Head {h00=0x0010, h01=0x0050, text=» SC A1,11,A3«, t00=0x017f, t01=0x001c}
0x25628…25644 Head {h00=0x0018, h01=0x0050, text=» LD A1,6,A2 BYTE 4-5«, t00=0x017f, t01=0x0030}
0x25644…25658 Head {h00=0x0010, h01=0x0050, text=» SC A1,14,A3«, t00=0x017f, t01=0x004c}
0x25658…2566a Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x017f, t01=0x0060}
0x2566a…2567e Head {h00=0x0010, h01=0x0050, text=» SC A1,13,A3«, t00=0x017f, t01=0x0072}
0x2567e…25692 Head {h00=0x0010, h01=0x0050, text=» LD A1,8,A2 «, t00=0x017f, t01=0x0086}
0x25692…256a4 Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x017f, t01=0x009a}
0x256a4…256b8 Head {h00=0x0010, h01=0x0050, text=» SC A1,15,A3«, t00=0x017f, t01=0x00ac}
0x256b8…256ca Head {h00=0x000e, h01=0x0050, text=» ADK A3,16«, t00=0x017f, t01=0x00c0}
0x256ca…256f8 Head {h00=0x002a, h01=0x0050, text=» ST A3,LOGPTR NEXT RECORD IN LOG AREA «, t00=0x017f, t01=0x00d2}
0x256f8…25720 Head {h00=0x0024, h01=0x0050, text=» CWK A3,LOGEND END OF LOG AREA? «, t00=0x017f, t01=0x0100}
0x25720…2573a Head {h00=0x0016, h01=0x0050, text=» RF(NE) LOG:20 NO!«, t00=0x017f, t01=0x0128}
0x2573a…2575c Head {h00=0x001e, h01=0x0050, text=» LDKL A1,LOGARE RESET PTR «, t00=0x017f, t01=0x0142}
0x2575c…25772 Head {h00=0x0012, h01=0x0050, text=» ST A1,LOGPTR «, t00=0x017f, t01=0x0164}
0x25772…25786 Head {h00=0x0010, h01=0x0050, text=»LOG:20 EQU *«, t00=0x017f, t01=0x017a}
0x25786…2579c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x017f, t01=0x018e}
0x2579c…257b8 Head {h00=0x0018, h01=0x0050, text=» LDR* A3,A15 RESTORE«, t00=0x0180, t01=0x0014}
0x257b8…257cc Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x0180, t01=0x0030}
0x257cc…257e0 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0180, t01=0x0044}
0x257e0…257f4 Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0180, t01=0x0058}
0x257f4…2580c Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0180, t01=0x006c}
0x2580c…25818 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0180, t01=0x0084}
0x25818…2582e Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x0180, t01=0x0090}
0x2582e…25844 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0180, t01=0x00a6}
0x25844…25856 Head {h00=0x000e, h01=0x0050, text=» MLR 3,A15«, t00=0x0180, t01=0x00bc}
0x25856…25866 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0180, t01=0x00ce}
0x25866…25872 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0180, t01=0x00de}
0x25872…2587c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0180, t01=0x00ea}
0x2587c…25886 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0180, t01=0x00f4}
0x25886…25892 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0180, t01=0x00fe}
0x25892…25896 Head {h00=0x4004, h01=0x0000}
0x25896…2589a 01 80 01 0a ┆ ┆
0x2589a…258a2 (385, 1, 8) 20 04 00 00 01 81 00 04 ┆ ┆
0x258a2…258f2 (386, 0, 400) 98 a0 00 02 17 02 81 5c 00 02 86 40 00 fc e4 46 00 0d ec 21 53 53 54 06 f6 97 c1 e0 57 4e ec 21 41 41 54 06 f6 97 c1 e8 57 42 ec 21 56 56 54 06 f6 97 c1 f0 57 36 ec 21 50 50 54 06 f6 97 c1 f8 57 2a ec 21 4c 4c 54 06 f6 97 c2 60 57 1e ec 21 ┆ @ F !SST WN !AAT WB !VVT W6 !PPT W* !LLT `W !┆
0x258f2…25942 52 52 54 06 f6 97 c2 68 57 12 ec 21 51 51 50 08 81 20 00 80 f6 97 d6 24 f6 97 c2 28 83 41 00 fa 85 41 01 08 86 41 01 0a 84 40 00 f0 85 30 1c 02 85 14 50 56 83 40 00 fa eb 50 ff fc 50 06 84 30 1d 01 5f 12 82 50 ff fe 86 48 00 28 26 3f 83 40 ┆RRT hW !QQP $ ( A A A @ 0 PV @ P P 0 _ P H (&? @┆
0x25942…25992 01 08 23 3f 9b 18 5c 1a 86 48 00 02 26 c0 83 44 00 02 23 c0 9b 18 5c 2a 86 48 00 0a a6 20 80 00 83 44 00 0a a3 20 80 00 9b 18 5c 3e f6 97 c0 4e 81 20 c0 bc 91 40 01 80 8f 04 85 12 f6 97 c5 e0 82 12 83 44 00 06 94 8c f6 97 c8 b4 86 40 01 0a ┆ #? H & D # * H D > N @ D @ ┆
0x25992…259e2 85 40 01 08 86 29 85 49 00 28 83 44 00 02 23 40 50 56 83 44 00 08 83 4c ff fe eb 20 00 06 54 70 85 44 00 30 50 1e 95 40 01 80 83 60 01 16 54 02 13 02 84 0c 94 40 01 16 82 31 85 51 00 02 13 04 83 61 01 16 85 08 95 20 00 3e 85 49 00 3a 85 49 ┆ @ ) I ( D #@PV D L Tp D 0P @ ` T @ 1 Q a > I : I┆
0x259e2…25a32 00 3c 83 44 00 2e 23 ff 50 36 85 08 15 01 f6 97 c5 e0 1d 01 82 14 57 28 f6 97 c0 4e 57 22 85 44 00 0a 56 1a 83 60 01 16 54 02 13 02 84 0c 94 40 01 16 81 31 82 51 00 02 02 04 10 41 04 10 15 54 10 00 80 00 01 51 05 40 00 0a 10 40 00 84 10 80 ┆ < D .# P6 W( NW" D V ` T @ 1 Q A T Q @ @ ┆
0x25a32…25a82 (387, 0, 400) 13 04 83 61 01 16 f0 3a 85 40 00 c0 25 01 50 44 85 48 00 12 84 04 9c 08 9d 10 a5 20 ff fe 85 49 00 12 85 48 00 08 84 54 ff fc 50 28 85 48 00 12 83 12 13 01 a3 20 ff fe 83 55 00 02 83 10 13 03 a3 20 ff fe eb 40 01 7e 55 08 83 41 01 7e 84 c1 ┆ a : @ % PD H I H T P( H U @ ~U A ~ ┆
0x25a82…25ad2 01 8c 94 8c 92 a0 00 02 85 3c 85 2b 92 a0 00 02 82 2b 98 a0 00 04 50 0c 17 04 81 20 be f6 91 40 01 80 8f 04 f0 3a 83 60 01 16 50 3a 93 40 01 16 81 40 01 16 11 02 82 40 01 16 12 02 84 44 00 02 ec 28 50 08 12 04 ea 0c 5c 0a 57 10 84 48 00 02 ┆ < + + P @ : ` P: @ @ @ D (P W H ┆
0x25ad2…25b22 82 24 84 49 00 30 a0 25 a0 45 00 02 11 04 e9 0c 5c 2c a0 61 01 16 f0 3a 81 40 00 ea 51 10 80 41 00 f4 81 00 19 02 a0 25 e9 40 00 a8 5c 0a 80 a0 00 05 81 a0 00 20 01 42 81 41 01 0a 01 01 81 41 01 04 a0 41 01 06 a0 41 01 08 f6 97 c6 42 f6 97 ┆ $ I 0 % E , a : @ Q A % @ B A A A A B ┆
0x25b22…25b72 c6 ce 81 40 01 06 82 40 01 08 50 0c a0 41 01 08 82 40 01 0c 82 45 9f a6 11 02 81 41 01 06 91 a0 00 01 81 c1 01 04 91 a0 00 1f e9 a0 00 80 51 02 5f 38 80 a0 00 06 81 a0 00 20 01 42 81 41 01 0a 01 01 81 41 01 04 a0 41 01 06 a0 41 01 08 f6 97 ┆ @ @ P A @ E A Q _8 B A A A A ┆
0x25b72…25bc2 c6 42 f6 97 c6 ce 81 40 01 06 82 40 01 08 50 0c a0 41 01 08 82 40 01 0c 82 45 9f ae 11 02 81 41 01 06 91 a0 00 01 81 c1 01 04 91 a0 00 1f e9 a0 00 80 51 02 5f 38 f0 3a 24 00 00 00 12 80 02 89 48 00 00 24 84 04 aa a9 52 20 01 2a aa 54 88 00 ┆ B @ @ P A @ E A Q _8 :$ H $ R * T ┆
0x25bc2…25c12 (388, 0, 400) 81 20 00 80 f6 97 d6 24 81 20 00 80 f6 97 d6 24 81 20 00 80 f6 97 d6 24 ee 20 00 80 51 5a ee 20 00 01 52 54 1e 01 85 44 00 28 25 3f 83 18 23 1f 13 01 3b 48 ad 0c 83 18 13 01 3b 44 13 05 26 60 3e 65 96 20 05 00 f0 3a ee 20 00 80 51 2a ee 20 ┆ $ $ $ QZ RT D (%? # ;H ;D &`>e : Q* ┆
0x25c12…25c62 00 01 52 24 1e 01 85 44 00 28 25 3f 83 18 23 1f 13 01 3b 48 ad 0c 83 18 13 01 3b 44 13 06 26 60 3e 65 96 20 06 00 f0 3a 81 20 00 80 f6 97 d6 24 81 20 00 80 f6 97 d6 24 81 20 00 80 f6 97 d6 24 83 c0 01 a6 50 3c 93 c0 01 72 84 c0 00 a8 84 c1 ┆ R$ D (%? # ;H ;D &`>e : $ $ $ P< r ┆
0x25c62…25cb2 00 d2 80 41 00 f4 f6 97 c5 52 93 a0 00 02 19 01 52 14 81 41 01 1a 93 a0 00 05 f6 97 c2 b4 81 40 01 1a 84 b2 5f 18 a0 53 00 00 94 a0 00 02 84 c1 00 a8 f0 3a 81 20 30 00 e1 4e 00 01 e2 4e 00 04 93 a0 00 01 ea 21 54 54 50 0a 39 48 e1 4e 00 01 ┆ A R R A @ _ S : 0 N N !TTP 9H N ┆
0x25cb2…25d02 93 a0 00 01 81 41 01 1c f6 97 c5 52 81 41 01 26 93 a0 00 07 e1 4e 00 01 39 48 e1 4e 00 02 81 41 01 1e 93 a0 00 02 02 00 f6 97 c5 3e 80 82 50 1a e7 4e 00 02 ef 21 41 41 54 10 93 a0 00 03 83 c1 01 20 f6 97 c4 ea e7 4e 00 02 82 41 01 22 01 00 ┆ A R A & N 9H N A > P N !AAT N A " ┆
0x25d02…25d52 f6 97 c5 3e 80 82 50 12 ef 21 53 53 54 0c 93 a0 00 04 f6 97 c5 52 93 a0 00 02 81 41 01 24 e9 20 00 ff 55 08 81 20 00 80 f6 97 d6 24 81 04 50 08 83 c1 01 28 39 41 93 84 11 10 00 00 00 00 00 01 11 4a a8 22 80 80 00 15 00 84 00 a2 40 22 04 40 ┆ > P !SST R A $ U $ P (9A J " @" @┆